hedgewars/uTouch.pas
changeset 15908 014f4edd0421
parent 14559 1dab5d92aca7
equal deleted inserted replaced
15907:a323e1954a6f 15908:014f4edd0421
   307 
   307 
   308     if widget = @utilityWidget then
   308     if widget = @utilityWidget then
   309         if (CurrentHedgehog <> nil)then
   309         if (CurrentHedgehog <> nil)then
   310             if(Ammoz[CurrentHedgehog^.CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0)then
   310             if(Ammoz[CurrentHedgehog^.CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0)then
   311                 begin
   311                 begin
   312                 ParseTeamCommand('put');
   312                 ParseTeamCommand('+put');
   313                 targetted:= true;
   313                 targetted:= true;
   314                 end
   314                 end
   315             else if (CurAmmoGear <> nil) and (CurAmmoGear^.AmmoType = amSwitch) then
   315             else if (CurAmmoGear <> nil) and (CurAmmoGear^.AmmoType = amSwitch) then
   316                 ParseTeamCommand('switch')
   316                 ParseTeamCommand('switch')
   317             else WriteLnToConsole(inttostr(ord(Ammoz[CurrentHedgehog^.CurAmmoType].NameId)) + ' ' + inttostr(ord(sidSwitch)));
   317             else WriteLnToConsole(inttostr(ord(Ammoz[CurrentHedgehog^.CurAmmoType].NameId)) + ' ' + inttostr(ord(sidSwitch)));
   344     begin
   344     begin
   345     if isOnRect(AmmoRect, finger) then
   345     if isOnRect(AmmoRect, finger) then
   346         begin
   346         begin
   347         CursorPoint.X:= finger.x;
   347         CursorPoint.X:= finger.x;
   348         CursorPoint.Y:= finger.y;
   348         CursorPoint.Y:= finger.y;
   349         ParseTeamCommand('put');
   349         ParseTeamCommand('+put');
   350         end
   350         end
   351     else
   351     else
   352         bShowAmmoMenu:= false;
   352         bShowAmmoMenu:= false;
   353     exit;
   353     exit;
   354     end;
   354     end;