Dec 212017
PCX.TPU – TP 6.0 Object-Oriented unit for displaying or saving PCX format picture files on Hercules, EGA, VGA, or compatible adapters. | |||
---|---|---|---|
File Name | File Size | Zip Size | Zip Type |
CHESS.PCX | 41648 | 19930 | deflated |
EGA.DOC | 3077 | 1020 | deflated |
EGA.INT | 1195 | 418 | deflated |
EGA.TPU | 1664 | 796 | deflated |
PCX.DOC | 26305 | 6527 | deflated |
PCX.INT | 6451 | 1753 | deflated |
PCX.TPU | 11008 | 4606 | deflated |
PCX_READ.ME | 2683 | 1174 | deflated |
RUNPCX.PAS | 1667 | 757 | deflated |
SHAREWRE.TXT | 1715 | 770 | deflated |
TP208.PCX | 15700 | 2460 | deflated |
Download File TPPCX.ZIP Here
Contents of the EGA.DOC file
Documentation on EGA.TPU unit. ( See EGA.INT )
CONSTANTS
EGACard EGACard: boolean = false;
VGACard VGACard: boolean = false;
Default state of boolean expressions are false. Initialization of
this unit calls an internal procedure ( DetectEGA ) which
detects whether an EGA/VGA adapter is present. If an EGA adapter
is detected, the EGACard constant is set to true. The unit goes
on to determine if a VGA adapter is also present. If so the
VGACard constant is also set to true. ie: EGA adapter only:
EGACard = true, VGACard = false; VGA adapter: EGACard = true,
VGACard = true.
EGA_Pal EGA_Pal: PaletteType (graph unit)
Default EGA palette settings. Used with EGA_ResetPalette;
PROCEDURES
All procedures utilize the EGA Graphics 1&2 Controller Chips and Sequencer
Chip for functions. Functions work equally well for the VGA due to downward
compatibility.
EGA_SetPlane_Write procedure EGA_SetPlane_Write( Plane: byte );
Sets BitMask Register and MapMask Register for
writing to bit plane requested. Valid input for
plane is 0 to 3 only.
EGA_SetPlane_Read procedure EGA_SetPlane_Read( Plane: byte );
Sets ReadMap Register for reading bit plane
requested. Valid input for plane is 0 to 3 only.
EGA_Reset_Write procedure EGA_Reset_Write;
Resets BitMask register and MapMask register to
their default states. Should be final call to
procedures using the EGA_SetPlane_Write call.
EGA_Reset_Read procedure EGA_Reset_Read;
Resets the ReadMap Register to its default state.
Should be called after all calls to the EGA_SetPlane_
Read procedure are completed.
EGA_ResetPalette procedure EGA_ResetPalette;
Resets the EGA/VGA palette entries to their default
16 color values. Should be used if EGA_SetPalette
has been used before program termination.
EGA_SetRGBPalette procedure EGA_SetRGBPalette( cn, r, g, b: integer );
Sets color number (cn) to the values of r (red),
g (green), b (blue). r g b must be in the range of 0
to 255 ( $00..$FF ). Typical values are one of four,
$00, $55, $AA, $FF on most 64 color systems. A
number between these ranges does nothing more or
less to the color displayed. This procedure uses the
EGA BIOS interrupt $10 so parameter tables are
saved.
CONSTANTS
EGACard EGACard: boolean = false;
VGACard VGACard: boolean = false;
Default state of boolean expressions are false. Initialization of
this unit calls an internal procedure ( DetectEGA ) which
detects whether an EGA/VGA adapter is present. If an EGA adapter
is detected, the EGACard constant is set to true. The unit goes
on to determine if a VGA adapter is also present. If so the
VGACard constant is also set to true. ie: EGA adapter only:
EGACard = true, VGACard = false; VGA adapter: EGACard = true,
VGACard = true.
EGA_Pal EGA_Pal: PaletteType (graph unit)
Default EGA palette settings. Used with EGA_ResetPalette;
PROCEDURES
All procedures utilize the EGA Graphics 1&2 Controller Chips and Sequencer
Chip for functions. Functions work equally well for the VGA due to downward
compatibility.
EGA_SetPlane_Write procedure EGA_SetPlane_Write( Plane: byte );
Sets BitMask Register and MapMask Register for
writing to bit plane requested. Valid input for
plane is 0 to 3 only.
EGA_SetPlane_Read procedure EGA_SetPlane_Read( Plane: byte );
Sets ReadMap Register for reading bit plane
requested. Valid input for plane is 0 to 3 only.
EGA_Reset_Write procedure EGA_Reset_Write;
Resets BitMask register and MapMask register to
their default states. Should be final call to
procedures using the EGA_SetPlane_Write call.
EGA_Reset_Read procedure EGA_Reset_Read;
Resets the ReadMap Register to its default state.
Should be called after all calls to the EGA_SetPlane_
Read procedure are completed.
EGA_ResetPalette procedure EGA_ResetPalette;
Resets the EGA/VGA palette entries to their default
16 color values. Should be used if EGA_SetPalette
has been used before program termination.
EGA_SetRGBPalette procedure EGA_SetRGBPalette( cn, r, g, b: integer );
Sets color number (cn) to the values of r (red),
g (green), b (blue). r g b must be in the range of 0
to 255 ( $00..$FF ). Typical values are one of four,
$00, $55, $AA, $FF on most 64 color systems. A
number between these ranges does nothing more or
less to the color displayed. This procedure uses the
EGA BIOS interrupt $10 so parameter tables are
saved.
December 21, 2017
Add comments