123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384 |
- params ["_vic"];
- comment "Variable Decs";
- _vic setvariable ["Speed",200,true];
- _vic setvariable ["turnon",true,true];
- comment "Increment Speed";
- _vic addAction ["<t color='#A668C2'>Increment Cap by 10</t>",
- {
- (_this select 0) setvariable ["Speed",(((_this select 0) getVariable "Speed")+10),true];
- hint parseText format["<t color='#A668C2'> Cap set to:%1 Kmph</t>",((_this select 0) getVariable "Speed")];
- },[1],0,false,true,"User16"," driver _target == _this"];
- comment "Decrement Speed";
- _vic addAction ["<t color='#FF69B4'>Decrement Cap by 10</t>",
- {
- (_this select 0) setvariable ["Speed",(((_this select 0) getVariable "Speed")-10),true];
- hint parseText format["<t color='#FF69B4'>Cap set to:%1 Kmph</t>",((_this select 0) getVariable "Speed")];
- },[1],0,false,true,"User17"," driver _target == _this"];
- comment "Engage";
- _vic addAction ["<t color='#00FF00'>Engage Matter Stopper</t>",
- {
- (_this select 0) setvariable ["turnon",true,true];
- hint parseText "<t color='#00FF00'>ENGAGING C.R.U.I.S.I.E Control System</t>";
- while { (alive (_this select 0)) AND (((_this select 0) getvariable "turnon"))} do
- {
- _Multiplier = 0.4;
- _Acceleration = 0.6;
- _sleep_time_acceleration_loop = 0.1;
- _Max_Multiplier = .1;
- _Coef_mul=(-1)*((_Acceleration*_Multiplier/2)*(15*_sleep_time_acceleration_loop));
- if ((speed (_this select 0)) > ((_this select 0) getVariable "Speed")) then {
- ((_this select 0)) setVelocity
- [
- (velocity ((_this select 0)) select 0)+((vectordir ((_this select 0))) select 0)*_Coef_mul,
- (velocity ((_this select 0)) select 1)+((vectordir ((_this select 0))) select 1)*_Coef_mul,
- (velocity ((_this select 0)) select 2)+((vectordir ((_this select 0))) select 2)*_Coef_mul
- ]
- };
- if (_Multiplier < _Max_Multiplier) then {_Multiplier = _Multiplier + 0.1*(15*_sleep_time_acceleration_loop)};
-
- };
- turnon=false;
- },[1],0,false,true,"User18"," driver _target == _this"];
- comment "Disenage";
- _vic addAction ["<t color='#FFA500'>Disengage Matter Stopper</t>",
- {
- (_this select 0) setvariable ["turnon",false,true];
- hint parseText "<t color='#FFA500'>DISENGAGING</t>";
- hint parseText "<t color='#FFA500'>DRIVE DOWN</t>";
- },[1],0,false,true,"User19"," driver _target == _this"];
|