hedgewars/uIO.pas
changeset 4522 0f590eefd531
parent 4467 adedeec8f18f
child 4531 4ea193b0e378
equal deleted inserted replaced
4521:96066d42c3f9 4522:0f590eefd531
   403             TargetPoint.Y:= putY
   403             TargetPoint.Y:= putY
   404             end;
   404             end;
   405         {$IFDEF DEBUGFILE}AddFilelog('put: ' + inttostr(TargetPoint.X) + ', ' + inttostr(TargetPoint.Y));{$ENDIF}
   405         {$IFDEF DEBUGFILE}AddFilelog('put: ' + inttostr(TargetPoint.X) + ', ' + inttostr(TargetPoint.Y));{$ENDIF}
   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;
   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
   412             OutError('got /put while not being in choose target mode', false)
   412             OutError('got /put while not being in choose target mode', false)
   413 end;
   413 end;