hedgewars/uIO.pas
changeset 7442 9bb6abdb5675
parent 7180 53ffc8853008
parent 7426 55b49cc1f33a
child 7628 bc7b1d228a2c
equal deleted inserted replaced
7392:bc3306c59a08 7442:9bb6abdb5675
   401             begin
   401             begin
   402             TargetPoint.X:= putX;
   402             TargetPoint.X:= putX;
   403             TargetPoint.Y:= putY
   403             TargetPoint.Y:= putY
   404             end;
   404             end;
   405         AddFileLog('put: ' + inttostr(TargetPoint.X) + ', ' + inttostr(TargetPoint.Y));
   405         AddFileLog('put: ' + inttostr(TargetPoint.X) + ', ' + inttostr(TargetPoint.Y));
   406         State:= State and not gstHHChooseTarget;
   406         State:= State and (not gstHHChooseTarget);
   407         if (Ammoz[CurAmmoType].Ammo.Propz and ammoprop_AttackingPut) <> 0 then
   407         if (Ammoz[CurAmmoType].Ammo.Propz and ammoprop_AttackingPut) <> 0 then
   408             Message:= Message or (gmAttack and InputMask);
   408             Message:= Message or (gmAttack and InputMask);
   409         end
   409         end
   410     else
   410     else
   411         if CurrentTeam^.ExtDriven then
   411         if CurrentTeam^.ExtDriven then