hedgewars/uIO.pas
changeset 6876 f588dfc27da3
parent 6874 b9e2e509a42d
child 6898 344b0dbd9690
equal deleted inserted replaced
6875:6528171ce36d 6876:f588dfc27da3
   346         'w': ParseCommand('setweap ' + headcmd^.str[2], true);
   346         'w': ParseCommand('setweap ' + headcmd^.str[2], true);
   347         't': ParseCommand('taunt ' + headcmd^.str[2], true);
   347         't': ParseCommand('taunt ' + headcmd^.str[2], true);
   348         'h': ParseCommand('hogsay ' + copy(headcmd^.str, 2, Pred(headcmd^.len)), true);
   348         'h': ParseCommand('hogsay ' + copy(headcmd^.str, 2, Pred(headcmd^.len)), true);
   349         '1'..'5': ParseCommand('timer ' + headcmd^.cmd, true);
   349         '1'..'5': ParseCommand('timer ' + headcmd^.cmd, true);
   350         else
   350         else
   351             if headcmd^.cmd >= #128 and headcmd^.cmd <= char(128 + cMaxSlotIndex) then
   351             if (headcmd^.cmd >= #128) and (headcmd^.cmd <= char(128 + cMaxSlotIndex)) then
   352                 ParseCommand('slot ' + char(byte(headcmd^.cmd) - 79), true)
   352                 ParseCommand('slot ' + char(byte(headcmd^.cmd) - 79), true)
   353                 else
   353                 else
   354                 OutError('Unexpected protocol command: ' + headcmd^.cmd, True)
   354                 OutError('Unexpected protocol command: ' + headcmd^.cmd, True)
   355         end;
   355         end;
   356     RemoveCmd
   356     RemoveCmd