turbopascal-textgraf

Textmode and Graphics Mode Lib for Turbo Pascal on DOS (Predecessor of the X-LIB Unit)

Compile

Compile.bat uses Turbo Pascal 6.0 installed in c:\progrs\tp\

compile.bat

In your pascal code with add following usage

use textgraf

case InitTextGraf of
     1: begin end;
end;
GrafikMode($13);

Method	Description
`InitTextGraf: integer`	Must be called at the very beginning of the program while still in text mode. Without this, the rest won't work. Returns 0 if everything is OK, -1 for unknown video type, and 1 for insufficient memory (requires about 12KB).
`SetPaletteSave(On: boolean)`	Call with `On = true` after `InitTextGraf` and in text mode. Saves the text palette and reserves memory for the graphics palette, which will then be used automatically. `On = false` disables this automation and frees the memory for the palettes (about 1.5KB).
`ToText`	Switches from graphics to text mode. Saves the screen content, etc.
`ToGraph`	Switches back to graphics mode. A graphics mode should have been exited with `ToText` beforehand to initialize all values.
`GrafikMode(Mode: byte)`	Sets the video mode.
`GetMonTyp: MonitorTyp`	Returns the monitor type.
`SetVGAColors(var Colors: VGAColors)`	Sets the VGA colors.