03.03.2013 Aufrufe

MDA CGA EGA Hercules SVGA TIGA Windows ...

MDA CGA EGA Hercules SVGA TIGA Windows ...

MDA CGA EGA Hercules SVGA TIGA Windows ...

MEHR ANZEIGEN
WENIGER ANZEIGEN

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

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!