213             end;

   213             end;

   214         if curHandledGear^.Active then

   214         if curHandledGear^.Active then

   215             begin

   215             begin

   216             if curHandledGear^.RenderTimer and (curHandledGear^.Timer > 500) and ((curHandledGear^.Timer mod 1000) = 0) then

   216             if curHandledGear^.RenderTimer and (curHandledGear^.Timer > 500) and ((curHandledGear^.Timer mod 1000) = 0) then

   217                 begin

   217                 begin

   219                 curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(curHandledGear^.Timer div 1000)), cWhiteColor, fntSmall);

   219                 curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(curHandledGear^.Timer div 1000)), cWhiteColor, fntSmall);

   220                 end;

   220                 end;

   221             curHandledGear^.doStep(curHandledGear);

   221             curHandledGear^.doStep(curHandledGear);

   222             // might be useful later

   222             // might be useful later

   223             //ScriptCall('onGearStep', Gear^.uid);

   223             //ScriptCall('onGearStep', Gear^.uid);