home *** CD-ROM | disk | FTP | other *** search
- {***************************************}
- { VGA256 BGI driver unit interface }
- { interfaces to vga extras }
- { and VGADriverProc }
- { By: Markham Thomas }
- { Feb 3, 1989 }
- {***************************************}
-
- unit DVGATPU;
- interface
-
- type RGB = array[0..255,0..2] of byte;
-
- procedure _VGADriverProc;
- function DetectVGA256:integer;
- procedure setvgapalette(var DACarray :RGB);
- procedure flashmodeon;
- procedure flashmodeoff;
-
- implementation
- procedure _VGADRIVERPROC; external;
- {$L VGA256.OBJ }
- function DetectVGA256; external;
- procedure setvgapalette; external;
- procedure flashmodeon; external;
- procedure flashmodeoff; external;
- {$L VGAEXTRA.OBJ }
-
- end.