hedgewars/HHHandlers.inc
changeset 6304 3036c242b19d
parent 6295 5b2b304a91ec
child 6331 27b82275dc34
equal deleted inserted replaced
6303:3edb3c857995 6304:3036c242b19d
   354                       amGrenade, amMolotov, 
   354                       amGrenade, amMolotov, 
   355                   amClusterBomb, amGasBomb, 
   355                   amClusterBomb, amGasBomb, 
   356                       amBazooka, amSnowball, 
   356                       amBazooka, amSnowball, 
   357                           amBee, amSMine,
   357                           amBee, amSMine,
   358                        amMortar, amWatermelon,
   358                        amMortar, amWatermelon,
   359                   amHellishBomb, amDrill,
   359                   amHellishBomb, amDrill: FollowGear:= newGear;
   360                         amPiano: FollowGear:= newGear;
       
   361 
   360 
   362                       amShotgun, amPickHammer,
   361                       amShotgun, amPickHammer,
   363                          amRope, amDEagle,
   362                          amRope, amDEagle,
   364                       amSineGun, amSniperRifle,
   363                       amSineGun, amSniperRifle,
   365                     amFirePunch, amWhip,
   364                     amFirePunch, amWhip,
   370                      amKamikaze, amCake,
   369                      amKamikaze, amCake,
   371                     amSeduction, amBallgun,
   370                     amSeduction, amBallgun,
   372                       amJetpack, amBirdy,
   371                       amJetpack, amBirdy,
   373                  amFlamethrower, amLandGun,
   372                  amFlamethrower, amLandGun,
   374                   amResurrector, amStructure,
   373                   amResurrector, amStructure,
   375                        amTardis: CurAmmoGear:= newGear;
   374                        amTardis, amPiano: CurAmmoGear:= newGear;
   376                   end;
   375                   end;
   377               if (CurAmmoType = amMine) or (CurAmmoType = amSMine) and (GameFlags and gfInfAttack <> 0) then newGear^.FlightTime:= GameTicks + 1000;
   376               if (CurAmmoType = amMine) or (CurAmmoType = amSMine) and (GameFlags and gfInfAttack <> 0) then newGear^.FlightTime:= GameTicks + 1000;
   378         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then
   377         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then
   379             begin
   378             begin
   380             newGear^.Target.X:= TargetPoint.X;
   379             newGear^.Target.X:= TargetPoint.X;