hedgewars/uGears.pas
changeset 7407 c1ade666c124
parent 7406 1fe2c821f9bf
child 7410 dc869f3187ca
child 7411 efc75c2d3be9
equal deleted inserted replaced
7406:1fe2c821f9bf 7407:c1ade666c124
   459         end;
   459         end;
   460 
   460 
   461     if (not CurrentTeam^.ExtDriven) or CurrentTeam^.hasGone then
   461     if (not CurrentTeam^.ExtDriven) or CurrentTeam^.hasGone then
   462         inc(hiTicks) // we do not recieve a message for this
   462         inc(hiTicks) // we do not recieve a message for this
   463     end;
   463     end;
       
   464 AddRandomness(CheckSum);
   464 ScriptCall('onGameTick');
   465 ScriptCall('onGameTick');
   465 if GameTicks mod 20 = 0 then ScriptCall('onGameTick20');
   466 if GameTicks mod 20 = 0 then ScriptCall('onGameTick20');
   466 inc(GameTicks)
   467 inc(GameTicks)
   467 end;
   468 end;
   468 
   469