hedgewars/uFLNet.pas
branchqmlfrontend
changeset 11442 6b04a266feee
parent 11441 908aed8525f9
child 11444 91f8c6ff5bab
equal deleted inserted replaced
11441:908aed8525f9 11442:6b04a266feee
   119         f:= cmd.str1[0] <> #0;
   119         f:= cmd.str1[0] <> #0;
   120         if f then
   120         if f then
   121             sendUI(mtNetData, @cmd, sizeof(cmd));
   121             sendUI(mtNetData, @cmd, sizeof(cmd));
   122     until not f;
   122     until not f;
   123     state.l:= 0
   123     state.l:= 0
       
   124 end;
       
   125 
       
   126 procedure handler_SS;
       
   127 var cmd: TCmdParamSS;
       
   128 begin
       
   129     cmd.cmd:= state.cmd;
       
   130     cmd.str1:= getShortString;
       
   131     if cmd.str1[0] = #0 then exit;
       
   132     cmd.str2:= getShortString;
       
   133     if cmd.str2[0] = #0 then exit;
       
   134     sendUI(mtNetData, @cmd, sizeof(cmd));
       
   135     handleTail()
   124 end;
   136 end;
   125 
   137 
   126 procedure handler__i;
   138 procedure handler__i;
   127 var cmd: TCmdParami;
   139 var cmd: TCmdParami;
   128     s: shortstring;
   140     s: shortstring;
   202     -21, 4, 0, 0, -20, 0, 0, 0, -19, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -18, 0, 0,
   214     -21, 4, 0, 0, -20, 0, 0, 0, -19, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -18, 0, 0,
   203     0, 0, 0, 0, 0, -17, 25, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, -16, 8, 0, 0, 0, 0, 0, 0,
   215     0, 0, 0, 0, 0, -17, 25, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, -16, 8, 0, 0, 0, 0, 0, 0,
   204     -15, 0, 0, 0, 0, -14, 20, 0, 0, 0, 0, 9, 0, 0, 0, 0, 0, 0, 0, -13, 0, 0, 0, 0,
   216     -15, 0, 0, 0, 0, -14, 20, 0, 0, 0, 0, 9, 0, 0, 0, 0, 0, 0, 0, -13, 0, 0, 0, 0,
   205     0, -12, 8, 0, 0, 0, 0, 0, 0, -11, 0, -10);
   217     0, -12, 8, 0, 0, 0, 0, 0, 0, -11, 0, -10);
   206 const handlers: array[0..46] of PHandler = (@handler__UNKNOWN_, @handler_L,
   218 const handlers: array[0..46] of PHandler = (@handler__UNKNOWN_, @handler_L,
   207     @handler_MS, @handler_S, @handler_SL, @handler_L, @handler_S, @handler_,
   219     @handler_SS, @handler_S, @handler_SL, @handler_L, @handler_S, @handler_,
   208     @handler_, @handler_MS, @handler_S, @handler_MS, @handler_MS, @handler_S,
   220     @handler_, @handler_MS, @handler_S, @handler_MS, @handler_MS, @handler_S,
   209     @handler_i, @handler_MS, @handler_L, @handler_S, @handler_SL, @handler_MS,
   221     @handler_i, @handler_MS, @handler_L, @handler_S, @handler_SL, @handler_MS,
   210     @handler_SL, @handler_, @handler_S, @handler_MS, @handler_MS, @handler_MS,
   222     @handler_SL, @handler_, @handler_S, @handler_MS, @handler_MS, @handler_SS,
   211     @handler_L, @handler_ML, @handler__i, @handler_SMS, @handler_SL, @handler_S,
   223     @handler_L, @handler_ML, @handler__i, @handler_SMS, @handler_SL, @handler_S,
   212     @handler_i, @handler_S, @handler_S, @handler_MS, @handler_i, @handler_i,
   224     @handler_i, @handler_S, @handler_S, @handler_MS, @handler_i, @handler_i,
   213     @handler_S, @handler_ML, @handler_i, @handler_L, @handler_SL, @handler_SL,
   225     @handler_S, @handler_ML, @handler_i, @handler_L, @handler_SL, @handler_SL,
   214     @handler_MS, @handler_S, @handler_MS);
   226     @handler_MS, @handler_S, @handler_MS);
   215 
   227