home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / C-ASM_VI.ARJ / PROGC.ZIP / PROGC050.C < prev    next >
Encoding:
Text File  |  1988-04-11  |  922 b   |  22 lines
  1.  
  2. /************************************************************************/
  3. /* Replace capital letter A with a new bitmap                           */
  4. /************************************************************************/
  5.  
  6. replace_a()
  7.         {
  8.         static  char    new_A[32] =   {0x7E,
  9.                                        0x42,
  10.                                        0x42,
  11.                                        0x42,
  12.                                        0x7E,
  13.                                        0x42,
  14.                                        0x42,
  15.                                        0xE7,
  16.                                        0,0,0,0,0,0,0,0,
  17.                                        0,0,0,0,0,0,0,0,
  18.                                        0,0,0,0,0,0,0,0};
  19.         write_char_gen(new_A, 'A', 1);          /* Replace 'A' only     */
  20.         printf("\nNew AAAAAAAAA's");
  21.         }
  22.