--- a/hedgewars/uGame.pas Tue Feb 09 21:51:52 2010 +0000
+++ b/hedgewars/uGame.pas Wed Feb 10 00:55:40 2010 +0000
@@ -27,7 +27,7 @@
////////////////////
implementation
////////////////////
-uses uMisc, uConsts, uWorld, uKeys, uTeams, uIO, uAI, uGears, uConsole;
+uses uMisc, uConsts, uWorld, uKeys, uTeams, uIO, uAI, uGears, uConsole, uScript;
procedure DoGameTick(Lag: LongInt);
var i: LongInt;
@@ -46,6 +46,7 @@
i:= 1;
while (GameState <> gsExit) and (i <= Lag) do
begin
+ ScriptCall('onGameTick');
if not CurrentTeam^.ExtDriven then
begin
if CurrentHedgehog^.BotLevel <> 0 then ProcessBot;