hedgewars/uGearsHedgehog.pas
changeset 14035 f09276eb0c27
parent 14016 52e20f8f538a
child 14217 ab5e710d353d
equal deleted inserted replaced
14034:caf7a86214bd 14035:f09276eb0c27
   698     begin
   698     begin
   699     AllInactive:= false;
   699     AllInactive:= false;
   700     Gear^.Z:= cCurrHHZ;
   700     Gear^.Z:= cCurrHHZ;
   701     RemoveGearFromList(Gear);
   701     RemoveGearFromList(Gear);
   702     InsertGearToList(Gear);
   702     InsertGearToList(Gear);
   703     PlaySoundV(sndByeBye, Gear^.Hedgehog^.Team^.voicepack);
   703     case random(3) of
       
   704     0: PlaySoundV(sndByeBye, Gear^.Hedgehog^.Team^.voicepack);
       
   705     1: PlaySoundV(sndSoLong, Gear^.Hedgehog^.Team^.voicepack);
       
   706     2: PlaySoundV(sndOhDear, Gear^.Hedgehog^.Team^.voicepack);
       
   707     end;
   704     Gear^.Pos:= 0;
   708     Gear^.Pos:= 0;
   705     Gear^.Timer:= timertime
   709     Gear^.Timer:= timertime
   706     end
   710     end
   707 end;
   711 end;
   708 
   712