equal
deleted
inserted
replaced
1303 begin |
1303 begin |
1304 cWindSpeed:= int2hwfloat(lua_tointeger(L, 1)) / 100 * cMaxWindSpeed; |
1304 cWindSpeed:= int2hwfloat(lua_tointeger(L, 1)) / 100 * cMaxWindSpeed; |
1305 cWindSpeedf:= SignAs(cWindSpeed,cWindSpeed).QWordValue / SignAs(_1,_1).QWordValue; |
1305 cWindSpeedf:= SignAs(cWindSpeed,cWindSpeed).QWordValue / SignAs(_1,_1).QWordValue; |
1306 if cWindSpeed.isNegative then |
1306 if cWindSpeed.isNegative then |
1307 CWindSpeedf := -cWindSpeedf; |
1307 CWindSpeedf := -cWindSpeedf; |
1308 AddGear(0, 0, gtATSmoothWindCh, 0, _0, _0, 1)^.Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed); |
1308 AddVisualGear(0, 0, vgtSmoothWindBar); |
1309 end; |
1309 end; |
1310 lc_setwind:= 0 |
1310 lc_setwind:= 0 |
1311 end; |
1311 end; |
1312 |
1312 |
1313 function lc_getdatapath(L : Plua_State) : LongInt; Cdecl; |
1313 function lc_getdatapath(L : Plua_State) : LongInt; Cdecl; |