added TeamsCount and TotalTurns to lua as requested by mikade
authorHenek
Wed, 10 Nov 2010 18:34:11 +0100
changeset 4235 6b1dfbd60a45
parent 4234 60920aeb1606
child 4236 fa2680cfff86
added TeamsCount and TotalTurns to lua as requested by mikade
hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Tue Nov 09 22:44:12 2010 -0500
+++ b/hedgewars/uScript.pas	Wed Nov 10 18:34:11 2010 +0100
@@ -51,7 +51,8 @@
     uSound,
     uTeams,
     uKeys,
-    uChat;
+    uChat,
+    uStats;
 
 var luaState : Plua_State;
     ScriptAmmoLoadout : shortstring;
@@ -882,7 +883,8 @@
     ScriptApplyAmmoStore
     end;
 
-ScriptSetInteger('ClansCount', ClansCount)
+ScriptSetInteger('ClansCount', ClansCount);
+ScriptSetInteger('TeamsCount', TeamsCount)
 end;
 
 procedure ScriptLoad(name : shortstring);
@@ -908,6 +910,7 @@
 ScriptSetInteger('TurnTimeLeft', TurnTimeLeft);
 ScriptSetInteger('GameTime', GameTicks);
 ScriptSetInteger('RealTime', RealTicks);
+ScriptSetInteger('TotalRounds', TotalRounds);
 if (CurrentHedgehog <> nil) and (CurrentHedgehog^.Gear <> nil) then
     ScriptSetInteger('CurrentHedgehog', CurrentHedgehog^.Gear^.UID)
 else