hedgewars/uIO.pas
changeset 95 1ef5e2c41115
parent 72 aeb2ac1878dc
child 112 ca5f06017e99
equal deleted inserted replaced
94:c6eec0bdb630 95:1ef5e2c41115
    54      extcmd: array[word] of packed record
    54      extcmd: array[word] of packed record
    55                                    Time: LongWord;
    55                                    Time: LongWord;
    56                                    case byte of
    56                                    case byte of
    57                                         1: (len: byte;
    57                                         1: (len: byte;
    58                                             cmd: Char;
    58                                             cmd: Char;
    59                                             X, Y: integer;);
    59                                             X, Y: SmallInt);
    60                                         2: (str: shortstring);
    60                                         2: (str: shortstring);
    61                                    end;
    61                                    end;
    62      cmdcurpos: integer = 0;
    62      cmdcurpos: integer = 0;
    63      cmdendpos: integer = -1;
    63      cmdendpos: integer = -1;
    64 
    64