hedgewars/uGears.pas
changeset 3799 5341dc5a8919
parent 3784 75aa91bea32b
child 3831 3410db7ac43e
equal deleted inserted replaced
3798:7dcfdd595b30 3799:5341dc5a8919
   846                 if (TurnTimeLeft = 5000)
   846                 if (TurnTimeLeft = 5000)
   847                     and (not PlacingHogs)
   847                     and (not PlacingHogs)
   848                     and (CurrentHedgehog^.Gear <> nil)
   848                     and (CurrentHedgehog^.Gear <> nil)
   849                     and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then
   849                     and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then
   850                         PlaySound(sndHurry, CurrentTeam^.voicepack);
   850                         PlaySound(sndHurry, CurrentTeam^.voicepack);
   851                 dec(TurnTimeLeft)
   851                 if ReadyTimeLeft > 0 then
       
   852                     begin
       
   853                     if ReadyTimeLeft = 2000 then
       
   854                         PlaySound(sndComeonthen, CurrentTeam^.voicepack);
       
   855                     dec(ReadyTimeLeft)
       
   856                     end
       
   857                 else
       
   858                     dec(TurnTimeLeft)
   852                 end;
   859                 end;
   853 
   860 
   854 if skipFlag then
   861 if skipFlag then
   855     begin
   862     begin
   856     TurnTimeLeft:= 0;
   863     TurnTimeLeft:= 0;