-type\r
- /* Sprite structure */\r
- TSprite = record\r
- X, Y : integer; /* Sprite coordinates */\r
- DX,DY: integer; /* Deltas for sprite movement */\r
- W, H : integer; /* Sprite width and height */\r
- Image: array[ 1..16, 1..16 ] of byte; /* Sprite image data */\r
- }\r
- /* RGB color structure */\r
- TRgb = record\r
- R, G, B: byte;\r
- }\r
-var\r
- S : array[ 1..MAX_SPRITE ] of TSprite; /* An array of sprites */\r
- Palette: array[ byte ] of TRgb; /* Palette */\r
- Page : word; /* Page offset */\r
- I : word;\r
+typedef unsigned char byte;\r
+typedef unsigned short word;\r
+typedef unsigned long dword;\r
+\r
+/* Sprite structure */\r
+typedef struct {\r
+ int X, Y; /* Sprite coordinates */\r
+ int DX,DY; /* Deltas for sprite movement */\r
+ int W, H; /* Sprite width and height */\r
+ byte Image[16,16]; /* Sprite image data */\r
+} TSprite;\r
+\r
+/* RGB color structure */\r
+typedef struct {\r
+ byte R, G, B;\r
+} TRgb;\r
+Tsprite S[MAX_SPRITE]; /* An array of sprites */\r
+TRgb Palette[ byte ]; /* Palette */\r
+word Page; /* Page offset */\r
+word i;\r