hedgewars/hwengine.pas
changeset 14770 ba8dd081359d
parent 14633 a049926fcdd3
child 14813 9443dc6663ba
equal deleted inserted replaced
14769:b3fa6a19fc25 14770:ba8dd081359d
   104                 SetSound(false);
   104                 SetSound(false);
   105             FinishProgress;
   105             FinishProgress;
   106             PlayMusic;
   106             PlayMusic;
   107             InitZoom(zoom);
   107             InitZoom(zoom);
   108             ScriptCall('onGameStart');
   108             ScriptCall('onGameStart');
       
   109             RandomizeHHAnim;
   109             for t:= 0 to Pred(TeamsCount) do
   110             for t:= 0 to Pred(TeamsCount) do
   110                 with TeamsArray[t]^ do
   111                 with TeamsArray[t]^ do
   111                     MaxTeamHealth:= TeamHealth;
   112                     MaxTeamHealth:= TeamHealth;
   112             RecountAllTeamsHealth;
   113             RecountAllTeamsHealth;
   113             GameState:= gsGame;
   114             GameState:= gsGame;