home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / PROG / PASCAL / TPPCX.ZIP / EGA.DOC < prev    next >
Encoding:
Text File  |  1991-01-28  |  3.0 KB  |  67 lines
  1. Documentation on EGA.TPU unit. ( See EGA.INT )
  2.  
  3. CONSTANTS ────────────────────────────────────────────────────────────────────
  4.  
  5. EGACard     EGACard: boolean = false;
  6. VGACard     VGACard: boolean = false;
  7.  
  8.             Default state of boolean expressions are false. Initialization of
  9.             this unit calls an internal procedure ( DetectEGA ) which
  10.             detects whether an EGA/VGA adapter is present. If an EGA adapter
  11.             is detected, the EGACard constant is set to true. The unit goes
  12.             on to determine if a VGA adapter is also present. If so the
  13.             VGACard constant is also set to true. ie: EGA adapter only:
  14.             EGACard = true, VGACard = false; VGA adapter: EGACard = true,
  15.             VGACard = true.
  16.  
  17. EGA_Pal     EGA_Pal: PaletteType (graph unit)
  18.  
  19.             Default EGA palette settings. Used with EGA_ResetPalette;
  20.  
  21. PROCEDURES ───────────────────────────────────────────────────────────────────
  22.  
  23. All procedures utilize the EGA Graphics 1&2 Controller Chips and Sequencer
  24. Chip for functions. Functions work equally well for the VGA due to downward
  25. compatibility.
  26.  
  27. EGA_SetPlane_Write      procedure EGA_SetPlane_Write( Plane: byte );
  28.  
  29.                         Sets BitMask Register and MapMask Register for
  30.                         writing to bit plane requested. Valid input for
  31.                         plane is 0 to 3 only.
  32.  
  33. EGA_SetPlane_Read       procedure EGA_SetPlane_Read( Plane: byte );
  34.  
  35.                         Sets ReadMap Register for reading bit plane
  36.                         requested. Valid input for plane is 0 to 3 only.
  37.  
  38. EGA_Reset_Write         procedure EGA_Reset_Write;
  39.  
  40.                         Resets BitMask register and MapMask register to
  41.                         their default states. Should be final call to
  42.                         procedures using the EGA_SetPlane_Write call.
  43.  
  44. EGA_Reset_Read          procedure EGA_Reset_Read;
  45.  
  46.                         Resets the ReadMap Register to its default state.
  47.                         Should be called after all calls to the EGA_SetPlane_
  48.                         Read procedure are completed.
  49.  
  50. EGA_ResetPalette        procedure EGA_ResetPalette;
  51.  
  52.                         Resets the EGA/VGA palette entries to their default
  53.                         16 color values. Should be used if EGA_SetPalette
  54.                         has been used before program termination.
  55.  
  56. EGA_SetRGBPalette       procedure EGA_SetRGBPalette( cn, r, g, b: integer );
  57.  
  58.                         Sets color number (cn) to the values of r (red),
  59.                         g (green), b (blue). r g b must be in the range of 0
  60.                         to 255 ( $00..$FF ). Typical values are one of four,
  61.                         $00, $55, $AA, $FF on most 64 color systems. A
  62.                         number between these ranges does nothing more or
  63.                         less to the color displayed. This procedure uses the
  64.                         EGA BIOS interrupt $10 so parameter tables are
  65.                         saved.
  66.  
  67.