ACE3/TO_MERGE/agm/Wind/scripts/KestrelonLoadRad.sqf

23 lines
718 B
Plaintext

// by Falke
disableSerialization;
_display1 = _this select 0;
_ctrl10 = _display1 displayCtrl 42010;
_rad1=1;
AGM_Kestrel_wind_Head=0;
while {AGM_isKestrelWheel} do {
_rad2=(AGM_Kestrel_wind_Head*2);
if (_rad2 > 5) then { _rad2=5; };
if (_rad2 < -5) then { _rad2=-5; };
_rad1=_rad1+_rad2;
if (_rad1 < 0) then { _rad1=_rad1+9; };
if (_rad1 > 9) then { _rad1=_rad1-9; };
waitUntil {preloadTitleRsc ["AGM_KestrelWheel_Preload", "PLAIN"]};
_ctrl10 ctrlSetText format["AGM_Wind\data\kestrel_%1.paa",round _rad1];
_Night = (sunOrMoon*sunOrMoon+(moonIntensity/5));
_ctrl10 ctrlsettextcolor [_Night,_Night,_Night,1];
sleep 0.01;
_i = 0; waitUntil {_i = _i + 1; _i > 1};
};
_ctrl10 ctrlShow false;