hedgewars/HHHandlers.inc
changeset 5035 a00636066077
parent 5034 a30772158f50
child 5038 c77241027071
equal deleted inserted replaced
5034:a30772158f50 5035:a00636066077
   387             begin
   387             begin
   388             OnUsedAmmo(CurrentHedgehog^);
   388             OnUsedAmmo(CurrentHedgehog^);
   389             if ((Ammoz[a].Ammo.Propz and ammoprop_NoRoundEnd) = 0) and ((GameFlags and gfInfAttack) = 0) then
   389             if ((Ammoz[a].Ammo.Propz and ammoprop_NoRoundEnd) = 0) and ((GameFlags and gfInfAttack) = 0) then
   390                 begin
   390                 begin
   391                 if TagTurnTimeLeft = 0 then TagTurnTimeLeft:= TurnTimeLeft;
   391                 if TagTurnTimeLeft = 0 then TagTurnTimeLeft:= TurnTimeLeft;
   392                 TurnTimeLeft:=Ammoz[a].TimeAfterTurn * cGetAwayTime div 100;
   392                 TurnTimeLeft:=(Ammoz[a].TimeAfterTurn * cGetAwayTime) div 100;
   393                 end;
   393                 end;
   394             if ((Ammoz[a].Ammo.Propz and ammoprop_NoRoundEnd) = 0) then State:= State or gstAttacked;
   394             if ((Ammoz[a].Ammo.Propz and ammoprop_NoRoundEnd) = 0) then State:= State or gstAttacked;
   395             if (CurAmmoGear <> nil) and ((Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_AltAttack) <> 0) then
   395             if (CurAmmoGear <> nil) and ((Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_AltAttack) <> 0) then
   396                 ShowCrosshair:= (Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_NoCrossHair) = 0
   396                 ShowCrosshair:= (Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_NoCrossHair) = 0
   397             else
   397             else