hedgewars/uIO.pas
changeset 2969 79024988792e
parent 2948 3f21a9dc93d0
child 3038 4e48c276a468
equal deleted inserted replaced
2968:f59631c3c1c0 2969:79024988792e
   315             end;
   315             end;
   316         'P': begin
   316         'P': begin
   317             // these are equations solved for CursorPoint
   317             // these are equations solved for CursorPoint
   318             // SDLNet_Read16(@(headcmd^.X)) == CursorPoint.X - WorldDx;
   318             // SDLNet_Read16(@(headcmd^.X)) == CursorPoint.X - WorldDx;
   319             // SDLNet_Read16(@(headcmd^.Y)) == cScreenHeight - CursorPoint.Y - WorldDy;
   319             // SDLNet_Read16(@(headcmd^.Y)) == cScreenHeight - CursorPoint.Y - WorldDy;
   320             CursorPoint.X:= SmallInt(SDLNet_Read16(@(headcmd^.X))) + WorldDx;
   320             if not (CurrentTeam^.ExtDriven and bShowAmmoMenu) then
   321             CursorPoint.Y:= cScreenHeight - SmallInt(SDLNet_Read16(@(headcmd^.Y))) - WorldDy;
   321                begin
       
   322                CursorPoint.X:= SmallInt(SDLNet_Read16(@(headcmd^.X))) + WorldDx;
       
   323                CursorPoint.Y:= cScreenHeight - SmallInt(SDLNet_Read16(@(headcmd^.Y))) - WorldDy
       
   324                end
   322             end;
   325             end;
   323         'w': ParseCommand('setweap ' + headcmd^.str[2], true);
   326         'w': ParseCommand('setweap ' + headcmd^.str[2], true);
   324         't': ParseCommand('taunt ' + headcmd^.str[2], true);
   327         't': ParseCommand('taunt ' + headcmd^.str[2], true);
   325         'g': ParseCommand('newgrave', true);
   328         'g': ParseCommand('newgrave', true);
   326         'h': ParseCommand('hogsay ' + copy(headcmd^.str, 2, Pred(headcmd^.len)), true);
   329         'h': ParseCommand('hogsay ' + copy(headcmd^.str, 2, Pred(headcmd^.len)), true);