hedgewars/HHHandlers.inc
changeset 5038 c77241027071
parent 5035 a00636066077
child 5136 948da1e50205
equal deleted inserted replaced
5037:1edc06d2247c 5038:c77241027071
   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                 if (CurAmmoGear <> nil) and ((Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_AltAttack) <> 0) then
       
   394                     ShowCrosshair:= (Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_NoCrossHair) = 0
       
   395                 else ShowCrosshair:= false;
   393                 end;
   396                 end;
   394             if ((Ammoz[a].Ammo.Propz and ammoprop_NoRoundEnd) = 0) then State:= State or gstAttacked;
   397             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
       
   396                 ShowCrosshair:= (Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_NoCrossHair) = 0
       
   397             else
       
   398                 ShowCrosshair:= (Ammoz[a].Ammo.Propz and ammoprop_NoCrosshair) = 0;
       
   399             if (Ammoz[a].Ammo.Propz and ammoprop_NoRoundEnd) <> 0 then ApplyAmmoChanges(CurrentHedgehog^)
   398             if (Ammoz[a].Ammo.Propz and ammoprop_NoRoundEnd) <> 0 then ApplyAmmoChanges(CurrentHedgehog^)
   400             end;
   399             end;
   401         end
   400         end
   402     else
   401     else
   403         begin
   402         begin