hedgewars/hwengine.pas
changeset 14765 ba8dd081359d
parent 14628 a049926fcdd3
child 14808 9443dc6663ba
equal deleted inserted replaced
14764:b3fa6a19fc25 14765: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;