MDA CGA EGA Hercules SVGA TIGA Windows ...
MDA CGA EGA Hercules SVGA TIGA Windows ...
MDA CGA EGA Hercules SVGA TIGA Windows ...
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
8.4.3 Programmbeispiel <strong>SVGA</strong>Demo.PAS<br />
• VESA Informationsrecord vereinbaren, holen und prüfen.<br />
• Grafikspeicherbänke in Hauptspeicher einblenden & mit Pixeln füllen.<br />
program <strong>SVGA</strong>Demo; (* Super VGA Demo *) uses dos;<br />
type InfoPtr = ^ InfoBuf;<br />
IntPtr = ^ IntWurm;<br />
CharPtr = ^ CharWurm;<br />
IntWurm = array[ 0..127 ] of integer;<br />
CharWurm = array[ 0..255 ] of char;<br />
InfoBuf = record<br />
signatur : array[ 0..3 ] of char; (* "VESA" *)<br />
version : integer; (* 1, 2, 3 ...*)<br />
manufact: CharPtr; (* Name des Herstellers *)<br />
implFunc: integer;<br />
suppMods: IntPtr; (* einstellbare Grafikmodi *)<br />
reserved: CharWurm;<br />
end;<br />
var infAdr : InfoPtr; adrval : longint; reg : registers;<br />
Systemprogrammierung I, Sommer 2000, P. Schulthess 13