hedgewars/uIO.pas
changeset 72 aeb2ac1878dc
parent 70 82d93eeecebe
child 95 1ef5e2c41115
equal deleted inserted replaced
71:5f56c6979496 72:aeb2ac1878dc
    94      'W': OutError(copy(s, 2, Length(s) - 1), false);
    94      'W': OutError(copy(s, 2, Length(s) - 1), false);
    95      'T': case s[2] of
    95      'T': case s[2] of
    96                'L': GameType:= gmtLocal;
    96                'L': GameType:= gmtLocal;
    97                'D': GameType:= gmtDemo;
    97                'D': GameType:= gmtDemo;
    98                'N': GameType:= gmtNet;
    98                'N': GameType:= gmtNet;
       
    99                'S': GameType:= gmtSave;
    99                else OutError(errmsgIncorrectUse + ' IPC "T" :' + s[2], true) end;
   100                else OutError(errmsgIncorrectUse + ' IPC "T" :' + s[2], true) end;
   100      else
   101      else
   101      inc(cmdendpos);
   102      inc(cmdendpos);
   102      extcmd[cmdendpos].Time := PLongWord(@s[byte(s[0]) - 3])^;
   103      extcmd[cmdendpos].Time := PLongWord(@s[byte(s[0]) - 3])^;
   103      extcmd[cmdendpos].str  := s;
   104      extcmd[cmdendpos].str  := s;