hedgewars/uGears.pas
changeset 6596 4c06ea12de1c
parent 6580 6155187bf599
child 6700 e04da46ee43c
equal deleted inserted replaced
6595:f567d52183ec 6596:4c06ea12de1c
   416                 if (TurnTimeLeft = 5000)
   416                 if (TurnTimeLeft = 5000)
   417                 and (cHedgehogTurnTime >= 10000)
   417                 and (cHedgehogTurnTime >= 10000)
   418                 and (not PlacingHogs)
   418                 and (not PlacingHogs)
   419                 and (CurrentHedgehog^.Gear <> nil)
   419                 and (CurrentHedgehog^.Gear <> nil)
   420                 and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then
   420                 and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then
   421                     AddVoice(sndHurry, CurrentTeam^.voicepack);
   421                     PlaySound(sndHurry, CurrentTeam^.voicepack);
   422             if ReadyTimeLeft > 0 then
   422             if ReadyTimeLeft > 0 then
   423                 begin
   423                 begin
   424                 if ReadyTimeLeft = 2000 then
   424                 if (ReadyTimeLeft = 2000) and (LastVoice.snd = sndNone) then
   425                     AddVoice(sndComeonthen, CurrentTeam^.voicepack);
   425                     AddVoice(sndComeonthen, CurrentTeam^.voicepack);
   426                 dec(ReadyTimeLeft)
   426                 dec(ReadyTimeLeft)
   427                 end
   427                 end
   428             else
   428             else
   429                 dec(TurnTimeLeft)
   429                 dec(TurnTimeLeft)