;=====Создаём источник света======
_light1 = "#lightpoint" createVehicleLocal getpos _pos
_light1 setLightColor [0.1,0.05,0.01]
_light1 setLightBrightness 0.09
_light1 setLightAmbient [0.3,0.2,0.1]
_light1 LightAttachObject [_pos,[0,0,0]]

_light2 = "#lightpoint" createVehicleLocal getpos _pos
_light2 setLightColor [1,1,1.01]
_light2 setLightBrightness 0.09
_light2 setLightAmbient [0.3,0.2,0.1]
_light2 LightAttachObject [_pos,[0,0,0]]

;=======Создаём частицы огня======
_fire1 = "#particlesource" createVehicleLocal getpos _pos
_fire1 setParticleCircle [0, [0, 0, 0]]
_fire1 setParticleRandom [0.2, [ 1, 1, 0], [2, 2, 1], 0.2, 0.2, [0, 0, 0, 0], 0, 0]
_fire1 setDropInterval 0.05

_fire2 = "#particlesource" createVehicleLocal getpos _pos
_fire2 setParticleCircle [0, [0, 0, 0]]
_fire2 setParticleRandom [0.5, [1, 1, 0.4], [0, 0, 4], 0, 0.5, [0, 0, 0, 0], 0, 0]
_fire2 setDropInterval 0.005

;=======Создаём частицы дыма=======
_smoke1 = "#particlesource" createVehicleLocal getpos _pos
_smoke1 setParticleCircle [0, [0, 0, 0]]
_smoke1 setParticleRandom [0.2, [random 0.5, random 0.5, 0], [1, 1, 1], 0.4, 0.2, [0, 0, 0, 0], 0, 0]
_smoke1 setDropInterval 0.02

_smoke2 = "#particlesource" createVehicleLocal getpos _pos
_smoke2 setParticleCircle [0, [0, 0, 0]]
_smoke2 setParticleRandom [0.2, [random 0.4, random 0.4, 0], [1, 1, 1], 5, 0.4, [0, 0, 0, 0], 0, 0]
_smoke2 setDropInterval 0.05

;========Параметры эффектов огня======
_fire1 setParticleParams [["\ca\data\ParticleEffects\FireAndSmokeAnim\FireAnim", 8, 2, 8], "", "Billboard", 1, 1, [random 0.5, random 0.5, 0], [0, 0, 2], 1, 1, 0.9, 0.3, [4,6], [[1,1,1,0.7],[1,1,1,0.5],[1,1,1,0]], [0,1], 1, 1, "", "", _pos]
_fire2 setParticleParams [["\ca\data\ParticleEffects\FireAndSmokeAnim\FireAnim", 8, 2, 1], "", "Billboard", 1, 2, [0, random 0.5, random 1], [0, 0, 1], 10, 1, 0.9, 0.3, [1],[[1,1,1,0.5],[1,1,1,0.2],[1,1,1,0]], [0.5,0.5,0], 1, 1, "", "", _pos]

;=======Параметры эффектов дыма======
_smoke1 setParticleParams [["\ca\data\ParticleEffects\FireAndSmokeAnim\SmokeAnim",8,3,1],"","Billboard",0.05,8,[0,0,0],[0,0,+4],0,1.275,1,0.2,[1,3],[[0.1,0.1,0.1,1],[0.2,0.2,0.2,0.6],[0.6,0.6,0.6,0.1]],[0,5,0],0,0,"","",_pos]
_smoke2 setParticleParams [["\ca\data\ParticleEffects\FireAndSmokeAnim\SmokeAnim",8,1,8],"","Billboard",0.05,9,[0,0,0],[0,0,+4],0,1.275,1,0.2,[2,5],[[0.1,0.1,0.1,1],[0.2,0.2,0.2,0.6],[0.6,0.6,0.6,0.1]],[0,1,0],0,0,"","",_pos]

/*
How to use
[unit,intensity,time,lifecheck,fade] spawn BIS_Effects_Burn

unit: the name of the object that the fire will be attached to
intensity: the intensity of the fire. Recommended to use values between 0.7 and 10, higher values may be used if desired though.
time: the time that the fire started. use global variable "time". this is used to keep effects synced for JIP players
lifecheck: if this is true then the unit will only burn as ling as it is dead (!alive unit). set to false to burn things like buildings and gamelogics
fade: if true then the fire will die down over time, eventually dying out. set to false if you want it to keep burning. (affected by rain too).

If you want to kill a fire you can delete the object it is attached to.
hint: you can attach a gamelogic to a moving object via the attachto command, and then make the gamelogic burn.
that way you can kill the fire without deleting the object.

examples:
To make a gamelogic named mygamelogic burn forever with a big fire:
[mygamelogic,10,time,false,false] spawn BIS_Effects_Burn

same with medium sized fire:
[mygamelogic,5,time,false,false] spawn BIS_Effects_Burn

To make a gamelogic burn and have the fire fade over time:
[mygamelogic,10,time,false,true] spawn BIS_Effects_Burn

To make it smoke, with no visible flame you can use an intensity of 3 or lower:
[mygamelogic,3,time,false,false] spawn BIS_Effects_Burn

BIS_Effects_Burn=compile preprocessFile "\ca\Data\ParticleEffects\SCRIPTS\destruction\burn.sqf";

/*
Как, чтобы использоваться
[устройство,интенсивность,время,lifecheck,линяют] икру BIS_Effects_Burn

устройство: имя объекта, что огонь будет приложен, чтобы
интенсивность: интенсивность огня. Рекомендованное, чтобы использовать величины между 0.7 и 10, более высокие величины могут быть использованы если захотеть, хотя.
время: время, что глобальная переменная пожарного started. использования "времени это использован, чтобы держать эффекты синхронизированные для игроков JIP lifecheck: если это - истина, тогда устройство только будет жечь такое же ling как оно мертво (!живое устройство было установлено в ложь, чтобы жечь вещи подобно построениям и gamelogics линять: если истина, тогда огонь затихнет временем, в конечном счете умирая out. был установлен в ложь если Вы хотите, это, чтобы продолжать гореть. (пораженное дождем слишком).

Если Вы хотите убить огонь на который Вы можете удалить объект, который он приложен.
намек: Вы можете подключить gamelogic на перемещение объекта через команду attachto, затем делать gamelogic ожогом.
этот путь, который Вы можете убить огонь не удаляя объект.

примеры:
Чтобы делать gamelogic поименованным mygamelogic ожогом навсегда с большим огнем:
[mygamelogic,10,время,ложь,ложь] плодят BIS_Effects_Burn

это с серединой измерял огонь:
[mygamelogic,5,время,ложь,ложь] плодят BIS_Effects_Burn

Для того, чтобы делать gamelogic ожогом и иметь огонь линять временем: [mygamelogic,10,время,ложь,истина] икра BIS_Effects_Burn

Для того, чтобы делать этим дымом, без видимого пламени Вы можете использовать интенсивность 3 или уменьшать:
[mygamelogic,3,время,ложь,ложь] плодят BIS_Effects_Burn

BIS_Effects_Burn=compile preprocessFile "\ca\Data\ParticleEffects\SCRIPTS\destruction\burn.sqf";
*/

_fl = "#particlesource" createVehicleLocal getpos _v;
_fl attachto [_v,[0,0,0],"destructionEffect2"];
_fl setdropinterval 0.02;

_sm = "#particlesource" createVehicleLocal getpos _v;
_sm attachto [_v,[0,0,0],"destructionEffect1"];

_li = "#lightpoint" createVehicleLocal getpos _v;
_li setLightBrightness 0;
_li setLightAmbient[0.8, 0.6, 0.2];
_li setLightColor[1, 0.5, 0.4];
_li lightAttachObject [_v, [0,0,0]];

если (isserver), тогда
{
_snd = createSoundSource ["Sound_Fire", getpos _v, [], 0];
_snd attachto [_v,[0,0,0],"destructionEffect1"];
};

пока {(_int>3) && !(живой _v && _lifecheck) && (getpos _v выбор 2 > -2.5) && !(isnull _v)} делать
{
_fl setParticleParams
[["\Ca\Data\ParticleEffects\Universal\Universal", 16, 10, 32], "", "Рекламные щиты", 1, 0.3*_int, "destructionEffect2",[0, 0, 0.17*_int], 0, 10, 7.9, 1, [0.3*_int, 0.05*_int],
[[1,1,1,-0], [1,1,1,-1], [1,1,1,-1], [1,1,1,-1], [1,1,1,-1], [1,1,1,0]],
[0.5, 1], 1, 0, "", "", _v];
_fl setParticleRandom [0.04*_int, [0.1*_int, 0.1*_int, 0.1*_int], [0.05*_int, 0.05*_int, 0.05*_int], 0, 0.06*_int, [0, 0, 0, 0], 0, 0];

_cl = 0.8/_int;
_sm setDropInterval (0.02*_int);
_sm setParticleParams
[["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48], "","Billboard",1, 3*_int, "destructionEffect1",[0, 0, 0.5*_int], 0, 0.05, 0.04, 0.05, [0.5 + 0.5*_int, 3 + 3*_int], [[_cl, _cl, _cl, 0.2],[_cl, _cl, _cl, 1],[_cl, _cl, _cl, 1],
[0.05+_cl, 0.05+_cl, 0.05+_cl, 0.9],[0.1+_cl, 0.1+_cl, 0.1+_cl, 0.6],[0.2+_cl, 0.2+_cl, 0.2+_cl, 0.3], [1,1,1, 0]],
[0.8,0.3,0.25], 1, 0, "", "", _v];
_sm setParticleRandom [0.7*_int, [1 - _int/10,1 - _int/10,1 - _int/10], [0.2*_int, 0.2*_int, 0.05*_int], 0, 0.3, [0.05, 0.05, 0.05, 0], 0, 0];

_li setLightBrightness (_int/30);

если (_fade), тогда {_int=_int - 0.02 - rain/10;};
сон 3;
};

deletevehicle _fl;

пока {(_int>0.7) &&!(живой _v && _lifecheck) && (getpos _v выбор 2 > -2.5) && !(isnull _v)} делать
{
_cl = 0.8/_int;
_sm setDropInterval (0.01 + 0.02*_int);
_sm setParticleParams
[["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48], "","Billboard",1, 3*_int, "destructionEffect1",[0, 0, 0.5*_int], 0, 0.05, 0.04, 0.05, [0.5*_int, 3*_int], [[_cl, _cl, _cl, 0.2],[_cl, _cl, _cl, 1],[_cl, _cl, _cl, 1],
[0.05+_cl, 0.05+_cl, 0.05+_cl, 0.9],[0.1+_cl, 0.1+_cl, 0.1+_cl, 0.6],[0.2+_cl, 0.2+_cl, 0.2+_cl, 0.3], [1,1,1, 0]],
[0.8,0.3,0.25], 1, 0, "", "", _v];
_sm setParticleRandom [0.7*_int, [1 - _int/10,1 - _int/10,1 - _int/10], [0.2*_int, 0.2*_int, 0.05*_int], 0, 0.3, [0.05, 0.05, 0.05, 0], 0, 0];

_li setLightBrightness (_int/30);

если (_fade), тогда {_int=_int - 0.02 - rain/10;};
сон 3;
};

deletevehicle _sm;
deletevehicle _li;
если (isserver), тогда {deletevehicle _snd;};
clearVehicleInit _v;