hedgewars/uGearsHedgehog.pas
changeset 6532 76d63e00002f
parent 6515 74a04089bb56
child 6543 697e9b730189
equal deleted inserted replaced
6531:c938a35588af 6532:76d63e00002f
   365                       amJetpack, amBirdy,
   365                       amJetpack, amBirdy,
   366                  amFlamethrower, amLandGun,
   366                  amFlamethrower, amLandGun,
   367                   amResurrector, amStructure,
   367                   amResurrector, amStructure,
   368                        amTardis, amPiano: CurAmmoGear:= newGear;
   368                        amTardis, amPiano: CurAmmoGear:= newGear;
   369                   end;
   369                   end;
   370               if (CurAmmoType = amMine) or (CurAmmoType = amSMine) and (GameFlags and gfInfAttack <> 0) then newGear^.FlightTime:= GameTicks + 1000;
   370               if ((CurAmmoType = amMine) or (CurAmmoType = amSMine)) and (GameFlags and gfInfAttack <> 0) then
       
   371                  newGear^.FlightTime:= GameTicks + 1000
       
   372               else if CurAmmoType = amDrill then newGear^.FlightTime:= GameTicks + 250;
   371         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then
   373         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then
   372             begin
   374             begin
   373             newGear^.Target.X:= TargetPoint.X;
   375             newGear^.Target.X:= TargetPoint.X;
   374             newGear^.Target.Y:= TargetPoint.Y
   376             newGear^.Target.Y:= TargetPoint.Y
   375             end;
   377             end;