hedgewars/uGears.pas
changeset 8011 ffd5eba8f7c2
parent 8003 7d8bce524daf
child 8026 4a4f21070479
child 8030 165aeaaaf445
equal deleted inserted replaced
8010:195677b0d06b 8011:ffd5eba8f7c2
   471     end;
   471     end;
   472 AddRandomness(CheckSum);
   472 AddRandomness(CheckSum);
   473 ScriptCall('onGameTick');
   473 ScriptCall('onGameTick');
   474 if GameTicks mod 20 = 0 then ScriptCall('onGameTick20');
   474 if GameTicks mod 20 = 0 then ScriptCall('onGameTick20');
   475 
   475 
   476 AddFileLog('CheckSum = ' + inttostr(CheckSum));
       
   477 inc(GameTicks)
   476 inc(GameTicks)
   478 end;
   477 end;
   479 
   478 
   480 //Purpose, to reset all transient attributes toggled by a utility and clean up various gears and effects at end of turn
   479 //Purpose, to reset all transient attributes toggled by a utility and clean up various gears and effects at end of turn
   481 //If any of these are set as permanent toggles in the frontend, that needs to be checked and skipped here.
   480 //If any of these are set as permanent toggles in the frontend, that needs to be checked and skipped here.