home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 11 / 11.iso / m / m242 / 1.ddi / SOURCE.ZIP / MONO_HAT.C < prev   
Encoding:
Text File  |  1989-10-16  |  723 b   |  25 lines
  1. /* hatch style for monochrome - from 0 to 15 */
  2. mono_hatch() {
  3.     htinit();
  4.     htdefind(0,0,2);        /* 2 pixels of background */
  5.     htdefind(1,1,2);        /* 2 pixels of color 1 */
  6.     htdefind(2,0,4);        /* 4 pixels of background */
  7.     htdefind(3,1,4);        /* 4 pixels of color 1 */
  8.     htdefstl(0,2,1,0);
  9.     htdefstl(1,2,1,1);
  10.     htdefstl(2,0,2,0,1);
  11.     htdefstl(3,1,2,1,0);
  12.     htdefstl(4,2,2,1,0);
  13.     htdefstl(5,3,2,1,0);
  14.     htdefstl(6,0,2,2,3);
  15.     htdefstl(7,1,2,2,3);
  16.     htdefstl(8,2,2,3,2);
  17.     htdefstl(9,3,2,3,2);
  18.     htdefstl(10,2,1,0);
  19.     htdefstl(11,2,1,1);
  20.     htdefstl(12,0,2,0,1);
  21.     htdefstl(13,1,2,1,0);
  22.     htdefstl(14,2,2,1,0);
  23.     htdefstl(15,3,2,1,0);
  24. }
  25.