]> 4ch.mooo.com Git - 16.git/blob - 16/ADT2PLAY/typconst.inc
code miraculously works on real hardware
[16.git] / 16 / ADT2PLAY / typconst.inc
1 const
2   BYTE_NULL  = $0ff;
3   WORD_NULL  = $0ffff;
4   DWORD_NULL = $0ffffffff;
5
6 type
7   tCHAR8x8  = array[char] of array[0..7] of Byte;
8   tCHAR8x16 = array[char] of array[0..15] of Byte;
9
10 type
11   tRGB = Record r,g,b: Byte end;
12   tRGB_PALETTE = array[0..255] of tRGB;