changeset 95 | 1ef5e2c41115 |
parent 72 | aeb2ac1878dc |
child 112 | ca5f06017e99 |
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 |