hedgewars/HHHandlers.inc
changeset 4246 e5cb885492df
parent 4241 835fd7a0e1bf
child 4301 4866cc130b8d
equal deleted inserted replaced
4244:bf46b4bdf27d 4246:e5cb885492df
   303                     amResurrector: begin
   303                     amResurrector: begin
   304                         CurAmmoGear:= AddGear(hwRound(lx), hwRound(ly),
   304                         CurAmmoGear:= AddGear(hwRound(lx), hwRound(ly),
   305                                 gtResurrector, 0, _0, _0, 0);
   305                                 gtResurrector, 0, _0, _0, 0);
   306                         CurAmmoGear^.SoundChannel := LoopSound(sndResurrector);
   306                         CurAmmoGear^.SoundChannel := LoopSound(sndResurrector);
   307                     end;
   307                     end;
       
   308                    amDrillStrike: AddGear(CurWeapon^.Pos, 0, gtAirAttack, 3, _0, _0, 0);
       
   309                    //amMelonStrike: AddGear(CurWeapon^.Pos, 0, gtAirAttack, 4, _0, _0, 0);
   308                   end;
   310                   end;
   309 
   311 
   310         uStats.AmmoUsed(CurAmmoType);
   312         uStats.AmmoUsed(CurAmmoType);
   311 
   313 
   312         if not (SpeechText = '') then
   314         if not (SpeechText = '') then