home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / C-ASM_VI.ARJ / PROGC.ZIP / PROGC046.C < prev    next >
Text File  |  1988-04-10  |  707b  |  17 lines
  1.  
  2. /************************************************************************/
  3. /* Change 8 characters starting at row 24 and column 40                 */
  4. /* to black characters on white background                              */
  5. /************************************************************************/
  6.  
  7. make_reverse()
  8.         {
  9.         #define GRAY    7
  10.         #define BLACK   0
  11.         int     i;
  12.         set_cursor_position(24,40);             /* Move cursor to 20,40 */
  13.         printf("Reverse ");                     /* Put a string there   */
  14.         for (i = 0; i < 8 ; i++)                /* Change its attribute */
  15.                 write_attribute(24,40 + i, GRAY, BLACK);
  16.         }
  17.