home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / C-ASM_VI.ARJ / PROGC.ZIP / PROGC027.C < prev    next >
Text File  |  1988-05-15  |  936b  |  22 lines

  1.  
  2. /************************************************************************/
  3. /* Fetch type of display attached to EGA and print it                   */
  4. /************************************************************************/
  5.  
  6. print_display_type()
  7.         {
  8.         static  char    *types[] =
  9.                         {"Unknown", "Unknown", "Unknown", "Enhanced",
  10.                          "Color",   "Monochrome", "Unknown", "Monochrome",
  11.                          "Color"};
  12.         int     index;
  13.         index = get_display_type();             /* Get display type     */
  14.                                                 /* Print the type       */
  15.         if (index < 7)
  16.                 printf("\n%s Display attached to EGA", types[index]);
  17.         else if (index < 9)
  18.                 printf("\n%s Display attached to VGA", types[index]);
  19.         else
  20.                 printf("\EGA/VGA are not installed");
  21.         }
  22.