hedgewars/uIO.pas
changeset 15135 7a8cc8bc963e
parent 15093 8cb1eebee4a0
equal deleted inserted replaced
15134:0e0b5fc1674e 15135:7a8cc8bc963e
   541             end;
   541             end;
   542         AddFileLog('put: ' + inttostr(TargetPoint.X) + ', ' + inttostr(TargetPoint.Y));
   542         AddFileLog('put: ' + inttostr(TargetPoint.X) + ', ' + inttostr(TargetPoint.Y));
   543         State:= State and (not gstChooseTarget);
   543         State:= State and (not gstChooseTarget);
   544         if (Ammoz[CurAmmoType].Ammo.Propz and ammoprop_AttackingPut) <> 0 then
   544         if (Ammoz[CurAmmoType].Ammo.Propz and ammoprop_AttackingPut) <> 0 then
   545             Message:= Message or (gmAttack and InputMask);
   545             Message:= Message or (gmAttack and InputMask);
       
   546         Message:= Message and (not (gmHJump or gmLJump or gmLeft or gmRight or gmUp or gmDown));
   546         end
   547         end
   547         else
   548         else
   548             PlaySound(sndDenied)
   549             PlaySound(sndDenied)
   549     else
   550     else
   550         if CurrentTeam^.ExtDriven then
   551         if CurrentTeam^.ExtDriven then