hedgewars/uScript.pas
changeset 12621 d972b31f8881
parent 12600 ef780eda6e48
child 12683 047c5b7ec422
equal deleted inserted replaced
12620:22bbf0392b71 12621:d972b31f8881
  2086         end;
  2086         end;
  2087     lc_dismissteam:= 0;
  2087     lc_dismissteam:= 0;
  2088 end;
  2088 end;
  2089 
  2089 
  2090 function lc_getteamstats(L : Plua_State) : LongInt; Cdecl;
  2090 function lc_getteamstats(L : Plua_State) : LongInt; Cdecl;
  2091 var i, h  : LongInt;
  2091 var i: LongInt;
  2092 begin
  2092 begin
  2093     if CheckLuaParamCount(L, 1, 'GetTeamStats', 'teamname') then
  2093     if CheckLuaParamCount(L, 1, 'GetTeamStats', 'teamname') then
  2094         begin
  2094         begin
  2095         if TeamsCount > 0 then
  2095         if TeamsCount > 0 then
  2096             for i:= 0 to Pred(TeamsCount) do
  2096             for i:= 0 to Pred(TeamsCount) do