1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
//--- ArmA 2 countermeasures, by Maddmatt.
Private ["_dirpos","_div","_emmiters","_flare","_flarecount","_flares","_flarevel","_i","_launchercount","_li","_muzzzlevel","_relpos","_sm","_sp","_vehicle","_vvel"];
_vehicle = _this select 0;
_flares = [];
_emmiters = [];
_muzzzlevel = 25;
if (_vehicle isKindOf "Plane") then {_muzzzlevel = 150};
_launchercount = 0;
while {([0,0,0] distance (_vehicle selectionPosition (format ["flare_launcher%1",_launchercount+1]))) != 0} do {_launchercount = _launchercount+1};
for "_i" from 1 to (_launchercount) do {
_flarecount = (_vehicle getVariable "FlareCount") - 1;
_vehicle setVariable ["FlareCount", _flarecount];
_relpos = _vehicle modelToWorld (_vehicle selectionPosition format["flare_launcher%1",_i]);
_dirpos = _vehicle modelToWorld (_vehicle selectionPosition format["flare_launcher%1_dir",_i]);
_flare = "FlareCountermeasure" createVehicleLocal _relpos;
_dirpos = [(_dirpos select 0) - (_relpos select 0),(_dirpos select 1) - (_relpos select 1),(_dirpos select 2) - (_relpos select 2)];
_div = (abs (_dirpos select 0)) + (abs (_dirpos select 1)) + (abs (_dirpos select 2));
_flarevel = [(_dirpos select 0)/_div*_muzzzlevel,(_dirpos select 1)/_div*_muzzzlevel,(_dirpos select 2)/_div*_muzzzlevel];
_vvel = velocity _vehicle;
_flare setVelocity [(_flarevel select 0) + (_vvel select 0),(_flarevel select 1) + (_vvel select 1),(_flarevel select 2) + (_vvel select 2)];
_flares = _flares + [_flare];
_sm = "#particlesource" createVehicleLocal getpos _flare;
_sm setParticleRandom [0.5, [0.3, 0.3, 0.3], [0.5, 0.5, 0.5], 0, 0.3, [0, 0, 0, 0], 0, 0,360];
_sm setParticleParams [["\ca\Data\ParticleEffects\Universal\Universal", 16, 12, 8,0],"", "Billboard", 1, 3, [0, 0, 0],[0,0,0], 1, 1, 0.80, 0.5, [1.3,4],[[0.9,0.9,0.9,0.6], [1,1,1,0.3], [1,1,1,0]],[1],0.1,0.1,"","",_flare];
_sm setDropInterval 0.02;
_sp = "#particlesource" createVehicleLocal getpos _flare;
_sp setParticleRandom [0.03, [0.3, 0.3, 0.3], [1, 1, 1], 0, 0.2, [0, 0, 0, 0], 0, 0,360];
_sp setParticleParams [["\ca\Data\ParticleEffects\Universal\Universal", 16, 13, 2,0],"", "Billboard", 1, 0.1, [0, 0, 0],[0,0,0], 1, 1, 0.80, 0.5, [1.5,0],[[1,1,1,-4], [1,1,1,-4], [1,1,1,-2],[1,1,1,0]],[1000],0.1,0.1,"","",_flare,360];
_sp setDropInterval 0.001;
_li = "#lightpoint" createVehicleLocal getpos _flare;
_li setLightBrightness 0.1;
_li setLightAmbient [0.8, 0.6, 0.2];
_li setLightColor [1, 0.5, 0.2];
_li lightAttachObject [_flare, [0,0,0]];
_emmiters = _emmiters + [_sm,_sp,_li];
};
(_emmiters + _flares) spawn {
sleep 4.5 + random 1;
{deletevehicle _x} forEach _this;
};
|
