hedgewars/uGearsHedgehog.pas
changeset 13668 91d48cbae927
parent 13647 3d14950641a4
child 13679 3f6fae745f84
equal deleted inserted replaced
13667:841ad2ad341d 13668:91d48cbae927
   467                                  PlaySound(sndInvulnerable);
   467                                  PlaySound(sndInvulnerable);
   468                                  Effects[heInvulnerable]:= 1
   468                                  Effects[heInvulnerable]:= 1
   469                                  end;
   469                                  end;
   470                     amExtraTime: begin
   470                     amExtraTime: begin
   471                                  PlaySound(sndExtraTime);
   471                                  PlaySound(sndExtraTime);
   472                                  TurnTimeLeft:= TurnTimeLeft + 30000
   472                                  if TurnTimeLeft <= (cMaxTurnTime - ExtraTime) then
       
   473                                      TurnTimeLeft:= TurnTimeLeft + ExtraTime
       
   474                                  else
       
   475                                      TurnTimeLeft:= cMaxTurnTime;
   473                                  end;
   476                                  end;
   474                    amLaserSight: begin
   477                    amLaserSight: begin
   475                                  PlaySound(sndLaserSight);
   478                                  PlaySound(sndLaserSight);
   476                                  cLaserSighting:= true
   479                                  cLaserSighting:= true
   477                                  end;
   480                                  end;