2748         cWindSpeedf:= SignAs(cWindSpeed,cWindSpeed).QWordValue / SignAs(_1,_1).QWordValue;

  2748         cWindSpeedf:= SignAs(cWindSpeed,cWindSpeed).QWordValue / SignAs(_1,_1).QWordValue;

  2749         if cWindSpeed.isNegative then

  2749         if cWindSpeed.isNegative then

  2750             cWindSpeedf := -cWindSpeedf;

  2750             cWindSpeedf := -cWindSpeedf;

  2751         vg:= AddVisualGear(0, 0, vgtSmoothWindBar);

  2751         vg:= AddVisualGear(0, 0, vgtSmoothWindBar);

  2752         if vg <> nil then vg^.dAngle:= hwFloat2Float(cWindSpeed);

  2752         if vg <> nil then vg^.dAngle:= hwFloat2Float(cWindSpeed);

  2754         end;

  2754         end;

  2755     lc_setwind:= 0

  2755     lc_setwind:= 0

  2756 end;

  2756 end;

  2757 

  2757 

  2758 function lc_getwind(L : Plua_State) : LongInt; Cdecl;

  2758 function lc_getwind(L : Plua_State) : LongInt; Cdecl;