home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume16 / gnuplot2.02 / patch3 / patch2b
Encoding:
Text File  |  1991-01-05  |  55.4 KB  |  1,134 lines
  1. diff -cr ./bitmap.c ../gnuplot2.02/bitmap.c
  2. *** ./bitmap.c    Mon Dec  3 15:32:30 1990
  3. --- ../gnuplot2.02/bitmap.c    Thu Dec  6 16:08:08 1990
  4. ***************
  5. *** 0
  6.  
  7. --- 1,1051 -----
  8. + /* GNUPLOT - bitmap.c */
  9. + /*
  10. +  * Copyright (C) 1990
  11. +  *
  12. +  * Permission to use, copy, and distribute this software and its
  13. +  * documentation for any purpose with or without fee is hereby granted,
  14. +  * provided that the above copyright notice appear in all copies and
  15. +  * that both that copyright notice and this permission notice appear
  16. +  * in supporting documentation.
  17. +  *
  18. +  * Permission to modify the software is granted, but not the right to
  19. +  * distribute the modified code.  Modifications are to be distributed
  20. +  * as patches to released version.
  21. +  *
  22. +  * This software  is provided "as is" without express or implied warranty.
  23. +  *
  24. +  *
  25. +  * AUTHORS
  26. +  *  Jyrki Yli-Nokari <jty@intrin.UUCP>
  27. +  *  Ronald J. Hartranft <rjh2@ns.cc.lehigh.edu>
  28. +  *  Russell Lang <rjl@monu1.cc.monash.edu.au>
  29. +  *
  30. +  * send your comments or suggestions to (pixar!info-gnuplot@sun.com).
  31. +  *
  32. +  */
  33. + 
  34. + /*
  35. + ** General raster plotting routines.
  36. + ** Raster routines written and copyrighted 1987 by
  37. + ** Jyrki Yli-Nokari (jty@intrin.UUCP)
  38. + ** Intrinsic, Ltd.
  39. + **
  40. + ** You may use this code for anything you like as long as
  41. + ** you are not selling it and the credit is given and
  42. + ** this message retained.
  43. + **
  44. + */
  45. + 
  46. + /* Bitmap plotting routines derived from above raster plotting routines
  47. +  * Russell Lang, 1990
  48. +  */
  49. + 
  50. + #include <stdio.h>
  51. + #include "plot.h"
  52. + #include "bitmap.h"
  53. + 
  54. + bitmap *b_p = (bitmap *)NULL;    /* global pointer to bitmap */
  55. + unsigned int b_currx, b_curry;    /* the current coordinates */
  56. + unsigned int b_xsize, b_ysize;    /* the size of the bitmap */
  57. + unsigned int b_planes;            /* number of color planes */
  58. + unsigned int b_psize;            /* size of each plane */
  59. + unsigned int b_rastermode;        /* raster mode rotates -90deg */
  60. + unsigned int b_linemask = 0xffff;    /* 16 bit mask for dotted lines */
  61. + unsigned int b_value = 1;        /* colour of lines */
  62. + unsigned int b_hchar;            /* width of characters */
  63. + unsigned int b_hbits;            /* actual bits in char horizontally */
  64. + unsigned int b_vchar;            /* height of characters */
  65. + unsigned int b_vbits;            /* actual bits in char vertically */
  66. + unsigned int b_angle;            /* rotation of text */
  67. + char_box b_font[FNT_CHARS];        /* the current font */
  68. + unsigned int b_pattern[] = {0xffff, 0x1111,
  69. +     0xffff, 0x5555, 0x3333, 0x7777, 0x3f3f, 0x0f0f, 0x5f5f};
  70. + int b_maskcount = 0;
  71. + unsigned int b_lastx, b_lasty;    /* last pixel set - used by b_line */
  72. + 
  73. + #define IN(i,size)  ((unsigned)i < (unsigned)size)
  74. + 
  75. + /* 5x9 font, bottom row first, left pixel in lsb */
  76. + char_row fnt5x9[FNT_CHARS][FNT5X9_VBITS] = {
  77. +   /* */  {000000,000000,000000,000000,000000,000000,000000,000000,000000},
  78. +   /*!*/  {000000,000000,0x0004,000000,0x0004,0x0004,0x0004,0x0004,0x0004},
  79. +   /*"*/  {000000,000000,000000,000000,000000,000000,0x000a,0x000a,0x000a},
  80. +   /*#*/  {000000,000000,0x000a,0x000a,0x001f,0x000a,0x001f,0x000a,0x000a},
  81. +   /*$*/  {000000,000000,0x0004,0x000f,0x0014,0x000e,0x0005,0x001e,0x0004},
  82. +   /*%*/  {000000,000000,0x0018,0x0019,0x0002,0x0004,0x0008,0x0013,0x0003},
  83. +   /*&*/  {000000,000000,0x0016,0x0009,0x0015,0x0002,0x0005,0x0005,0x0002},
  84. +   /*'*/  {000000,000000,000000,000000,000000,0x0002,0x0004,0x0006,0x0006},
  85. +   /*(*/  {000000,000000,0x0008,0x0004,0x0002,0x0002,0x0002,0x0004,0x0008},
  86. +   /*)*/  {000000,000000,0x0002,0x0004,0x0008,0x0008,0x0008,0x0004,0x0002},
  87. +   /***/  {000000,000000,0x0004,0x0015,0x000e,0x001f,0x000e,0x0015,0x0004},
  88. +   /*+*/  {000000,000000,000000,0x0004,0x0004,0x001f,0x0004,0x0004,000000},
  89. +   /*,*/  {000000,0x0002,0x0004,0x0006,0x0006,000000,000000,000000,000000},
  90. +   /*-*/  {000000,000000,000000,000000,000000,0x001f,000000,000000,000000},
  91. +   /*.*/  {000000,000000,0x0006,0x0006,000000,000000,000000,000000,000000},
  92. +   /*-/-*/{000000,000000,000000,0x0001,0x0002,0x0004,0x0008,0x0010,000000},
  93. +   /*0*/  {000000,000000,0x000e,0x0011,0x0013,0x0015,0x0019,0x0011,0x000e},
  94. +   /*1*/  {000000,000000,0x000e,0x0004,0x0004,0x0004,0x0004,0x0006,0x0004},
  95. +   /*2*/  {000000,000000,0x001f,0x0001,0x0001,0x000e,0x0010,0x0011,0x000e},
  96. +   /*3*/  {000000,000000,0x000e,0x0011,0x0010,0x000c,0x0010,0x0011,0x000e},
  97. +   /*4*/  {000000,000000,0x0008,0x0008,0x001f,0x0009,0x000a,0x000c,0x0008},
  98. +   /*5*/  {000000,000000,0x000e,0x0011,0x0010,0x0010,0x000f,0x0001,0x001f},
  99. +   /*6*/  {000000,000000,0x000e,0x0011,0x0011,0x000f,0x0001,0x0002,0x000c},
  100. +   /*7*/  {000000,000000,0x0001,0x0001,0x0002,0x0004,0x0008,0x0010,0x001f},
  101. +   /*8*/  {000000,000000,0x000e,0x0011,0x0011,0x000e,0x0011,0x0011,0x000e},
  102. +   /*9*/  {000000,000000,0x0006,0x0008,0x0010,0x001e,0x0011,0x0011,0x000e},
  103. +   /*:*/  {000000,000000,000000,0x0006,0x0006,000000,0x0006,0x0006,000000},
  104. +   /*;*/  {000000,0x0001,0x0002,0x0006,0x0006,000000,0x0006,0x0006,000000},
  105. +   /*<*/  {000000,000000,0x0008,0x0004,0x0002,0x0001,0x0002,0x0004,0x0008},
  106. +   /*=*/  {000000,000000,000000,000000,0x001f,000000,0x001f,000000,000000},
  107. +   /*>*/  {000000,000000,0x0002,0x0004,0x0008,0x0010,0x0008,0x0004,0x0002},
  108. +   /*?*/  {000000,000000,0x0004,000000,0x0004,0x0008,0x0010,0x0011,0x000e},
  109. +   /*@*/  {000000,000000,0x000e,0x0015,0x0015,0x0016,0x0010,0x0011,0x000e},
  110. +   /*A*/  {000000,000000,0x0011,0x0011,0x001f,0x0011,0x0011,0x000a,0x0004},
  111. +   /*B*/  {000000,000000,0x000f,0x0012,0x0012,0x000e,0x0012,0x0012,0x000f},
  112. +   /*C*/  {000000,000000,0x000e,0x0011,0x0001,0x0001,0x0001,0x0011,0x000e},
  113. +   /*D*/  {000000,000000,0x000f,0x0012,0x0012,0x0012,0x0012,0x0012,0x000f},
  114. +   /*E*/  {000000,000000,0x001f,0x0001,0x0001,0x0007,0x0001,0x0001,0x001f},
  115. +   /*F*/  {000000,000000,0x0001,0x0001,0x0001,0x0007,0x0001,0x0001,0x001f},
  116. +   /*G*/  {000000,000000,0x001e,0x0011,0x0011,0x0019,0x0001,0x0001,0x001e},
  117. +   /*H*/  {000000,000000,0x0011,0x0011,0x0011,0x001f,0x0011,0x0011,0x0011},
  118. +   /*I*/  {000000,000000,0x000e,0x0004,0x0004,0x0004,0x0004,0x0004,0x000e},
  119. +   /*J*/  {000000,000000,0x000e,0x0011,0x0010,0x0010,0x0010,0x0010,0x0010},
  120. +   /*K*/  {000000,000000,0x0011,0x0009,0x0005,0x0003,0x0005,0x0009,0x0011},
  121. +   /*L*/  {000000,000000,0x001f,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001},
  122. +   /*M*/  {000000,000000,0x0011,0x0011,0x0011,0x0015,0x0015,0x001b,0x0011},
  123. +   /*N*/  {000000,000000,0x0011,0x0011,0x0011,0x0019,0x0015,0x0013,0x0011},
  124. +   /*O*/  {000000,000000,0x000e,0x0011,0x0011,0x0011,0x0011,0x0011,0x000e},
  125. +   /*P*/  {000000,000000,0x0001,0x0001,0x0001,0x000f,0x0011,0x0011,0x000f},
  126. +   /*Q*/  {000000,0x0018,0x000e,0x0015,0x0011,0x0011,0x0011,0x0011,0x000e},
  127. +   /*R*/  {000000,000000,0x0011,0x0009,0x0005,0x000f,0x0011,0x0011,0x000f},
  128. +   /*S*/  {000000,000000,0x000e,0x0011,0x0010,0x000e,0x0001,0x0011,0x000e},
  129. +   /*T*/  {000000,000000,0x0004,0x0004,0x0004,0x0004,0x0004,0x0004,0x001f},
  130. +   /*U*/  {000000,000000,0x000e,0x0011,0x0011,0x0011,0x0011,0x0011,0x0011},
  131. +   /*V*/  {000000,000000,0x0004,0x0004,0x000a,0x000a,0x0011,0x0011,0x0011},
  132. +   /*W*/  {000000,000000,0x0011,0x001b,0x0015,0x0011,0x0011,0x0011,0x0011},
  133. +   /*X*/  {000000,000000,0x0011,0x0011,0x000a,0x0004,0x000a,0x0011,0x0011},
  134. +   /*Y*/  {000000,000000,0x0004,0x0004,0x0004,0x0004,0x000a,0x0011,0x0011},
  135. +   /*Z*/  {000000,000000,0x001f,0x0001,0x0002,0x0004,0x0008,0x0010,0x001f},
  136. +   /*[*/  {000000,000000,0x000e,0x0002,0x0002,0x0002,0x0002,0x0002,0x000e},
  137. +   /*\*/  {000000,000000,000000,0x0010,0x0008,0x0004,0x0002,0x0001,000000},
  138. +   /*]*/  {000000,000000,0x000e,0x0008,0x0008,0x0008,0x0008,0x0008,0x000e},
  139. +   /*^*/  {000000,000000,000000,000000,000000,000000,0x0011,0x000a,0x0004},
  140. +   /*_*/  {000000,000000,0x001f,000000,000000,000000,000000,000000,000000},
  141. +   /*`*/  {000000,000000,000000,000000,000000,0x0008,0x0004,0x000c,0x000c},
  142. +   /*a*/  {000000,000000,0x001e,0x0011,0x001e,0x0010,0x000e,000000,000000},
  143. +   /*b*/  {000000,000000,0x000d,0x0013,0x0011,0x0013,0x000d,0x0001,0x0001},
  144. +   /*c*/  {000000,000000,0x000e,0x0011,0x0001,0x0011,0x000e,000000,000000},
  145. +   /*d*/  {000000,000000,0x0016,0x0019,0x0011,0x0019,0x0016,0x0010,0x0010},
  146. +   /*e*/  {000000,000000,0x000e,0x0001,0x001f,0x0011,0x000e,000000,000000},
  147. +   /*f*/  {000000,000000,0x0004,0x0004,0x0004,0x000e,0x0004,0x0014,0x0008},
  148. +   /*g*/  {0x000e,0x0011,0x0016,0x0019,0x0011,0x0019,0x0016,000000,000000},
  149. +   /*h*/  {000000,000000,0x0011,0x0011,0x0011,0x0013,0x000d,0x0001,0x0001},
  150. +   /*i*/  {000000,000000,0x000e,0x0004,0x0004,0x0004,0x0006,000000,0x0004},
  151. +   /*j*/  {0x0006,0x0009,0x0008,0x0008,0x0008,0x0008,0x000c,000000,0x0008},
  152. +   /*k*/  {000000,000000,0x0009,0x0005,0x0003,0x0005,0x0009,0x0001,0x0001},
  153. +   /*l*/  {000000,000000,0x000e,0x0004,0x0004,0x0004,0x0004,0x0004,0x0006},
  154. +   /*m*/  {000000,000000,0x0015,0x0015,0x0015,0x0015,0x000b,000000,000000},
  155. +   /*n*/  {000000,000000,0x0011,0x0011,0x0011,0x0013,0x000d,000000,000000},
  156. +   /*o*/  {000000,000000,0x000e,0x0011,0x0011,0x0011,0x000e,000000,000000},
  157. +   /*p*/  {0x0001,0x0001,0x000d,0x0013,0x0011,0x0013,0x000d,000000,000000},
  158. +   /*q*/  {0x0010,0x0010,0x0016,0x0019,0x0011,0x0019,0x0016,000000,000000},
  159. +   /*r*/  {000000,000000,0x0001,0x0001,0x0001,0x0013,0x000d,000000,000000},
  160. +   /*s*/  {000000,000000,0x000f,0x0010,0x000e,0x0001,0x001e,000000,000000},
  161. +   /*t*/  {000000,000000,0x0008,0x0014,0x0004,0x0004,0x001f,0x0004,0x0004},
  162. +   /*u*/  {000000,000000,0x0016,0x0019,0x0011,0x0011,0x0011,000000,000000},
  163. +   /*v*/  {000000,000000,0x0004,0x000a,0x0011,0x0011,0x0011,000000,000000},
  164. +   /*w*/  {000000,000000,0x000a,0x0015,0x0015,0x0011,0x0011,000000,000000},
  165. +   /*x*/  {000000,000000,0x0011,0x000a,0x0004,0x000a,0x0011,000000,000000},
  166. +   /*y*/  {0x000e,0x0010,0x001e,0x0011,0x0011,0x0011,0x0011,000000,000000},
  167. +   /*z*/  {000000,000000,0x001f,0x0002,0x0004,0x0008,0x001f,000000,000000},
  168. +   /*{*/  {000000,000000,0x0008,0x0004,0x0004,0x0002,0x0004,0x0004,0x0008},
  169. +   /*|*/  {000000,000000,0x0004,0x0004,0x0004,000000,0x0004,0x0004,0x0004},
  170. +   /*}*/  {000000,000000,0x0002,0x0004,0x0004,0x0008,0x0004,0x0004,0x0002},
  171. +   /*~*/  {000000,000000,000000,000000,000000,000000,0x0008,0x0015,0x0002},
  172. +   /*DEL*/{000000,000000,0x001f,0x001f,0x001f,0x001f,0x001f,0x001f,0x001f},
  173. + };
  174. + 
  175. + /* 9x17 font, bottom row first, left pixel in lsb */
  176. + char_row fnt9x17[FNT_CHARS][FNT9X17_VBITS] = {
  177. +   /* */  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  178. +           000000,000000,000000,000000,000000,000000,000000,000000},
  179. +   /*!*/  {000000,000000,000000,000000,0x0010,000000,000000,000000,0x0010,
  180. +           0x0010,0x0010,0x0010,0x0010,0x0010,0x0010,0x0010,0x0010},
  181. +   /*"*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  182. +           000000,000000,000000,0x0044,0x0044,0x0044,0x0044,0x0044},
  183. +   /*#*/  {000000,000000,000000,000000,0x0044,0x0044,0x0044,0x0044,0x01ff,
  184. +           0x0044,0x0044,0x0044,0x01ff,0x0044,0x0044,0x0044,0x0044},
  185. +   /*$*/  {000000,000000,000000,000000,0x0010,0x0010,0x007e,0x0091,0x0110,
  186. +           0x0090,0x007c,0x0012,0x0011,0x0112,0x00fc,0x0010,0x0010},
  187. +   /*%*/  {000000,000000,000000,000000,0x0080,0x0141,0x0081,0x0002,0x0004,
  188. +           0x0008,0x0010,0x0020,0x0040,0x0080,0x0102,0x0105,0x0002},
  189. +   /*&*/  {000000,000000,000000,000000,0x011c,0x00a2,0x0041,0x00c1,0x0141,
  190. +           0x0022,0x001c,0x0014,0x0022,0x0022,0x001c,000000,000000},
  191. +   /*'*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  192. +           000000,000000,0x0004,0x0008,0x0010,0x0030,0x0038,0x0010},
  193. +   /*(*/  {000000,000000,000000,000000,0x0040,0x0020,0x0010,0x0008,0x0008,
  194. +           0x0004,0x0004,0x0004,0x0008,0x0008,0x0010,0x0020,0x0040},
  195. +   /*)*/  {000000,000000,000000,000000,0x0004,0x0008,0x0010,0x0020,0x0020,
  196. +           0x0040,0x0040,0x0040,0x0020,0x0020,0x0010,0x0008,0x0004},
  197. +   /***/  {000000,000000,000000,000000,0x0010,0x0010,0x0111,0x0092,0x0054,
  198. +           0x0038,0x01ff,0x0038,0x0054,0x0092,0x0111,0x0010,0x0010},
  199. +   /*+*/  {000000,000000,000000,000000,000000,000000,0x0010,0x0010,0x0010,
  200. +           0x0010,0x01ff,0x0010,0x0010,0x0010,0x0010,000000,000000},
  201. +   /*,*/  {000000,000000,0x0004,0x0008,0x0010,0x0030,0x0038,0x0010,000000,
  202. +           000000,000000,000000,000000,000000,000000,000000,000000},
  203. +   /*-*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  204. +           000000,0x01ff,000000,000000,000000,000000,000000,000000},
  205. +   /*.*/  {000000,000000,000000,000000,0x0010,0x0038,0x0010,000000,000000,
  206. +           000000,000000,000000,000000,000000,000000,000000,000000},
  207. +   /*-/-*/{000000,000000,000000,000000,000000,000000,0x0001,0x0002,0x0004,
  208. +           0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,000000,000000},
  209. +   /*0*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0103,0x0105,
  210. +           0x0109,0x0111,0x0121,0x0141,0x0181,0x0101,0x0082,0x007c},
  211. +   /*1*/  {000000,000000,000000,000000,0x007c,0x0010,0x0010,0x0010,0x0010,
  212. +           0x0010,0x0010,0x0010,0x0010,0x0010,0x001c,0x0018,0x0010},
  213. +   /*2*/  {000000,000000,000000,000000,0x01ff,0x0001,0x0001,0x0001,0x0001,
  214. +           0x0002,0x007c,0x0080,0x0100,0x0100,0x0101,0x0082,0x007c},
  215. +   /*3*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0100,0x0100,
  216. +           0x0080,0x0078,0x0080,0x0100,0x0100,0x0101,0x0082,0x007c},
  217. +   /*4*/  {000000,000000,000000,000000,0x0040,0x0040,0x0040,0x0040,0x0040,
  218. +           0x01ff,0x0041,0x0042,0x0044,0x0048,0x0050,0x0060,0x0040},
  219. +   /*5*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0100,0x0100,
  220. +           0x0100,0x0080,0x007f,0x0001,0x0001,0x0001,0x0001,0x01ff},
  221. +   /*6*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0101,0x0101,
  222. +           0x0081,0x007f,0x0001,0x0001,0x0001,0x0002,0x0084,0x0078},
  223. +   /*7*/  {000000,000000,000000,000000,0x0001,0x0001,0x0001,0x0002,0x0004,
  224. +           0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,0x0100,0x01ff},
  225. +   /*8*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0101,0x0101,
  226. +           0x0082,0x007c,0x0082,0x0101,0x0101,0x0101,0x0082,0x007c},
  227. +   /*9*/  {000000,000000,000000,000000,0x001c,0x0022,0x0040,0x0080,0x0100,
  228. +           0x0100,0x01fc,0x0102,0x0101,0x0101,0x0101,0x0082,0x007c},
  229. +   /*:*/  {000000,000000,000000,000000,000000,000000,0x0010,0x0038,0x0010,
  230. +           000000,000000,000000,0x0010,0x0038,0x0010,000000,000000},
  231. +   /*;*/  {000000,000000,000000,0x0004,0x0008,0x0010,0x0030,0x0038,0x0010,
  232. +           000000,000000,000000,0x0010,0x0038,0x0010,000000,000000},
  233. +   /*<*/  {000000,000000,000000,000000,0x0040,0x0020,0x0010,0x0008,0x0004,
  234. +           0x0002,0x0001,0x0002,0x0004,0x0008,0x0010,0x0020,0x0040},
  235. +   /*=*/  {000000,000000,000000,000000,000000,000000,000000,000000,0x01ff,
  236. +           000000,000000,000000,0x01ff,000000,000000,000000,000000},
  237. +   /*>*/  {000000,000000,000000,000000,0x0004,0x0008,0x0010,0x0020,0x0040,
  238. +           0x0080,0x0100,0x0080,0x0040,0x0020,0x0010,0x0008,0x0004},
  239. +   /*?*/  {000000,000000,000000,0x0010,0x0038,0x0010,000000,0x0010,0x0010,
  240. +           0x0020,0x0040,0x0080,0x0100,0x0100,0x0101,0x0082,0x007c},
  241. +   /*@*/  {000000,000000,000000,000000,0x007c,0x0002,0x0001,0x01f9,0x0145,
  242. +           0x0145,0x0145,0x0179,0x0101,0x0101,0x0101,0x0082,0x007c},
  243. +   /*A*/  {000000,000000,000000,000000,0x0101,0x0101,0x0101,0x0101,0x01ff,
  244. +           0x0101,0x0082,0x0082,0x0044,0x0044,0x0028,0x0028,0x0010},
  245. +   /*B*/  {000000,000000,000000,000000,0x007f,0x0084,0x0104,0x0104,0x0104,
  246. +           0x0084,0x007c,0x0084,0x0104,0x0104,0x0104,0x0084,0x007f},
  247. +   /*C*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0001,0x0001,
  248. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0101,0x0082,0x007c},
  249. +   /*D*/  {000000,000000,000000,000000,0x007f,0x0084,0x0104,0x0104,0x0104,
  250. +           0x0104,0x0104,0x0104,0x0104,0x0104,0x0104,0x0084,0x007f},
  251. +   /*E*/  {000000,000000,000000,000000,0x01ff,0x0001,0x0001,0x0001,0x0001,
  252. +           0x0001,0x001f,0x0001,0x0001,0x0001,0x0001,0x0001,0x01ff},
  253. +   /*F*/  {000000,000000,000000,000000,0x0001,0x0001,0x0001,0x0001,0x0001,
  254. +           0x0001,0x001f,0x0001,0x0001,0x0001,0x0001,0x0001,0x01ff},
  255. +   /*G*/  {000000,000000,000000,000000,0x00fc,0x0102,0x0101,0x0101,0x0101,
  256. +           0x0101,0x01c1,0x0001,0x0001,0x0001,0x0001,0x0102,0x00fc},
  257. +   /*H*/  {000000,000000,000000,000000,0x0101,0x0101,0x0101,0x0101,0x0101,
  258. +           0x0101,0x01ff,0x0101,0x0101,0x0101,0x0101,0x0101,0x0101},
  259. +   /*I*/  {000000,000000,000000,000000,0x007c,0x0010,0x0010,0x0010,0x0010,
  260. +           0x0010,0x0010,0x0010,0x0010,0x0010,0x0010,0x0010,0x007c},
  261. +   /*J*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0100,0x0100,
  262. +           0x0100,0x0100,0x0100,0x0100,0x0100,0x0100,0x0100,0x0180},
  263. +   /*K*/  {000000,000000,000000,000000,0x0101,0x0081,0x0041,0x0021,0x0011,
  264. +           0x0009,0x0005,0x000b,0x0011,0x0021,0x0041,0x0081,0x0101},
  265. +   /*L*/  {000000,000000,000000,000000,0x01ff,0x0101,0x0001,0x0001,0x0001,
  266. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001},
  267. +   /*M*/  {000000,000000,000000,000000,0x0101,0x0101,0x0101,0x0101,0x0101,
  268. +           0x0101,0x0111,0x0111,0x0129,0x0145,0x0145,0x0183,0x0101},
  269. +   /*N*/  {000000,000000,000000,000000,0x0101,0x0101,0x0101,0x0181,0x0141,
  270. +           0x0141,0x0121,0x0111,0x0109,0x0105,0x0105,0x0103,0x0101},
  271. +   /*O*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0101,0x0101,
  272. +           0x0101,0x0101,0x0101,0x0101,0x0101,0x0101,0x0082,0x007c},
  273. +   /*P*/  {000000,000000,000000,000000,0x0001,0x0001,0x0001,0x0001,0x0001,
  274. +           0x0001,0x007f,0x0081,0x0101,0x0101,0x0101,0x0081,0x007f},
  275. +   /*Q*/  {000000,000000,0x0180,0x0040,0x007c,0x0092,0x0101,0x0101,0x0101,
  276. +           0x0101,0x0101,0x0101,0x0101,0x0101,0x0101,0x0082,0x007c},
  277. +   /*R*/  {000000,000000,000000,000000,0x0101,0x0081,0x0041,0x0021,0x0011,
  278. +           0x0009,0x007f,0x0081,0x0101,0x0101,0x0101,0x0081,0x007f},
  279. +   /*S*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0100,0x0100,
  280. +           0x0080,0x007c,0x0002,0x0001,0x0001,0x0101,0x0082,0x007c},
  281. +   /*T*/  {000000,000000,000000,000000,0x0038,0x0010,0x0010,0x0010,0x0010,
  282. +           0x0010,0x0010,0x0010,0x0010,0x0010,0x0010,0x0111,0x01ff},
  283. +   /*U*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0101,0x0101,
  284. +           0x0101,0x0101,0x0101,0x0101,0x0101,0x0101,0x0101,0x0101},
  285. +   /*V*/  {000000,000000,000000,000000,0x0010,0x0010,0x0028,0x0028,0x0044,
  286. +           0x0044,0x0082,0x0082,0x0101,0x0101,0x0101,0x0101,0x0101},
  287. +   /*W*/  {000000,000000,000000,000000,0x0101,0x0183,0x0145,0x0145,0x0129,
  288. +           0x0111,0x0111,0x0101,0x0101,0x0101,0x0101,0x0101,0x0101},
  289. +   /*X*/  {000000,000000,000000,000000,0x0101,0x0101,0x0082,0x0082,0x0044,
  290. +           0x0028,0x0010,0x0028,0x0044,0x0082,0x0082,0x0101,0x0101},
  291. +   /*Y*/  {000000,000000,000000,000000,0x0010,0x0010,0x0010,0x0010,0x0010,
  292. +           0x0010,0x0010,0x0028,0x0044,0x0082,0x0082,0x0101,0x0101},
  293. +   /*Z*/  {000000,000000,000000,000000,0x01ff,0x0001,0x0002,0x0002,0x0004,
  294. +           0x0008,0x0010,0x0020,0x0040,0x0080,0x0080,0x0100,0x01ff},
  295. +   /*[*/  {000000,000000,000000,000000,0x007c,0x0004,0x0004,0x0004,0x0004,
  296. +           0x0004,0x0004,0x0004,0x0004,0x0004,0x0004,0x0004,0x007c},
  297. +   /*\*/  {000000,000000,000000,000000,000000,000000,0x0100,0x0080,0x0040,
  298. +           0x0020,0x0010,0x0008,0x0004,0x0002,0x0001,000000,000000},
  299. +   /*]*/  {000000,000000,000000,000000,0x007c,0x0040,0x0040,0x0040,0x0040,
  300. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x007c},
  301. +   /*^*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  302. +           000000,000000,000000,0x0101,0x0082,0x0044,0x0028,0x0010},
  303. +   /*_*/  {000000,000000,000000,000000,0x01ff,000000,000000,000000,000000,
  304. +           000000,000000,000000,000000,000000,000000,000000,000000},
  305. +   /*`*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  306. +           000000,000000,0x0020,0x0010,0x0008,0x000c,0x001c,0x0008},
  307. +   /*a*/  {000000,000000,000000,000000,0x03fc,0x0102,0x0101,0x0102,0x01fc,
  308. +           0x0100,0x0100,0x0080,0x007c,000000,000000,000000,000000},
  309. +   /*b*/  {000000,000000,000000,000000,0x007d,0x0083,0x0101,0x0101,0x0101,
  310. +           0x0101,0x0101,0x0083,0x007d,0x0001,0x0001,0x0001,0x0001},
  311. +   /*c*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0001,0x0001,
  312. +           0x0001,0x0101,0x0082,0x007c,000000,000000,000000,000000},
  313. +   /*d*/  {000000,000000,000000,000000,0x017c,0x0182,0x0101,0x0101,0x0101,
  314. +           0x0101,0x0101,0x0182,0x017c,0x0100,0x0100,0x0100,0x0100},
  315. +   /*e*/  {000000,000000,000000,000000,0x007c,0x0002,0x0001,0x0001,0x01ff,
  316. +           0x0101,0x0101,0x0082,0x007c,000000,000000,000000,000000},
  317. +   /*f*/  {000000,000000,000000,000000,0x0010,0x0010,0x0010,0x0010,0x0010,
  318. +           0x0010,0x007c,0x0010,0x0010,0x0010,0x0110,0x00a0,0x0040},
  319. +   /*g*/  {0x007c,0x0082,0x0101,0x0100,0x017c,0x0182,0x0101,0x0101,0x0101,
  320. +           0x0101,0x0101,0x0182,0x017c,000000,000000,000000,000000},
  321. +   /*h*/  {000000,000000,000000,000000,0x0101,0x0101,0x0101,0x0101,0x0101,
  322. +           0x0103,0x0103,0x0085,0x0079,0x0001,0x0001,0x0001,0x0001},
  323. +   /*i*/  {000000,000000,000000,000000,0x007c,0x0010,0x0010,0x0010,0x0010,
  324. +           0x0010,0x0010,0x0018,000000,000000,0x0018,0x0018,000000},
  325. +   /*j*/  {0x003c,0x0042,0x0081,0x0080,0x0080,0x0080,0x0080,0x0080,0x0080,
  326. +           0x0080,0x0080,0x00c0,000000,000000,0x00c0,0x00c0,000000},
  327. +   /*k*/  {000000,000000,000000,000000,0x0082,0x0042,0x0022,0x0012,0x000a,
  328. +           0x0016,0x0022,0x0042,0x0002,0x0002,0x0002,0x0002,0x0002},
  329. +   /*l*/  {000000,000000,000000,000000,0x007c,0x0010,0x0010,0x0010,0x0010,
  330. +           0x0010,0x0010,0x0010,0x0010,0x0010,0x0010,0x0010,0x001c},
  331. +   /*m*/  {000000,000000,000000,000000,0x0111,0x0111,0x0111,0x0111,0x0111,
  332. +           0x0111,0x0111,0x00ab,0x0045,000000,000000,000000,000000},
  333. +   /*n*/  {000000,000000,000000,000000,0x0101,0x0101,0x0101,0x0101,0x0101,
  334. +           0x0101,0x0101,0x0083,0x007d,000000,000000,000000,000000},
  335. +   /*o*/  {000000,000000,000000,000000,0x007c,0x0082,0x0101,0x0101,0x0101,
  336. +           0x0101,0x0101,0x0082,0x007c,000000,000000,000000,000000},
  337. +   /*p*/  {0x0001,0x0001,0x0001,0x0001,0x007d,0x0003,0x0081,0x0101,0x0101,
  338. +           0x0101,0x0101,0x0083,0x007d,000000,000000,000000,000000},
  339. +   /*q*/  {0x0100,0x0100,0x0100,0x0100,0x017c,0x0182,0x0101,0x0101,0x0101,
  340. +           0x0101,0x0101,0x0182,0x017c,000000,000000,000000,000000},
  341. +   /*r*/  {000000,000000,000000,000000,0x0001,0x0001,0x0001,0x0001,0x0001,
  342. +           0x0001,0x0103,0x0085,0x0079,000000,000000,000000,000000},
  343. +   /*s*/  {000000,000000,000000,000000,0x007e,0x0081,0x0100,0x0080,0x007c,
  344. +           0x0002,0x0001,0x0102,0x00fc,000000,000000,000000,000000},
  345. +   /*t*/  {000000,000000,000000,000000,0x0040,0x00a0,0x0110,0x0010,0x0010,
  346. +           0x0010,0x0010,0x0010,0x00fe,0x0010,0x0010,0x0010,0x0010},
  347. +   /*u*/  {000000,000000,000000,000000,0x013c,0x0142,0x0181,0x0101,0x0101,
  348. +           0x0101,0x0101,0x0101,0x0101,000000,000000,000000,000000},
  349. +   /*v*/  {000000,000000,000000,000000,0x0010,0x0028,0x0044,0x0082,0x0101,
  350. +           0x0101,0x0101,0x0101,0x0101,000000,000000,000000,000000},
  351. +   /*w*/  {000000,000000,000000,000000,0x0044,0x00aa,0x0111,0x0111,0x0101,
  352. +           0x0101,0x0101,0x0101,0x0101,000000,000000,000000,000000},
  353. +   /*x*/  {000000,000000,000000,000000,0x0101,0x0082,0x0044,0x0028,0x0010,
  354. +           0x0028,0x0044,0x0082,0x0101,000000,000000,000000,000000},
  355. +   /*y*/  {0x007c,0x0082,0x0101,0x0100,0x0100,0x01fc,0x0102,0x0101,0x0101,
  356. +           0x0101,0x0101,0x0101,0x0101,000000,000000,000000,000000},
  357. +   /*z*/  {000000,000000,000000,000000,0x01ff,0x0002,0x0004,0x0008,0x0010,
  358. +           0x0020,0x0040,0x0080,0x01ff,000000,000000,000000,000000},
  359. +   /*{*/  {000000,000000,000000,000000,0x00c0,0x0020,0x0010,0x0010,0x0010,
  360. +           0x0008,0x0004,0x0008,0x0010,0x0010,0x0010,0x0020,0x00c0},
  361. +   /*|*/  {000000,000000,000000,000000,0x0010,0x0010,0x0010,0x0010,0x0010,
  362. +           000000,000000,000000,0x0010,0x0010,0x0010,0x0010,0x0010},
  363. +   /*}*/  {000000,000000,000000,000000,0x0006,0x0008,0x0010,0x0010,0x0010,
  364. +           0x0020,0x0040,0x0020,0x0010,0x0010,0x0010,0x0008,0x0006},
  365. +   /*~*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  366. +           000000,000000,000000,0x0040,0x00a0,0x0111,0x000a,0x0004},
  367. +   /*DEL*/{000000,000000,000000,000000,0x0155,000000,0x0155,000000,0x0155,
  368. +           000000,0x0155,000000,0x0155,000000,0x0155,000000,0x0155},
  369. + };
  370. + 
  371. + /* 13x25 font, bottom row first, left pixel in lsb */
  372. + char_row fnt13x25[FNT_CHARS][FNT13X25_VBITS] = {
  373. +   /* */  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  374. +           000000,000000,000000,000000,000000,000000,000000,000000,000000,
  375. +           000000,000000,000000,000000,000000,000000,000000},
  376. +   /*!*/  {000000,000000,000000,000000,000000,0x00e0,0x00e0,0x00e0,000000,
  377. +           000000,000000,0x0040,0x0040,0x0040,0x0040,0x0040,0x00e0,0x00e0,
  378. +           0x00e0,0x00e0,0x00e0,0x00e0,0x00e0,0x00e0,0x0040},
  379. +   /*"*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  380. +           000000,000000,000000,000000,000000,000000,000000,000000,000000,
  381. +           0x0208,0x0208,0x0208,0x0208,0x0208,0x0208,0x0208},
  382. +   /*#*/  {000000,000000,000000,000000,000000,000000,0x0208,0x0208,0x0208,
  383. +           0x0208,0x0208,0x0208,0x1fff,0x0208,0x0208,0x0208,0x0208,0x0208,
  384. +           0x1fff,0x0208,0x0208,0x0208,0x0208,0x0208,0x0208},
  385. +   /*$*/  {000000,000000,000000,000000,000000,000000,0x0040,0x0040,0x0040,
  386. +           0x03f8,0x0444,0x0842,0x0840,0x0840,0x0440,0x03f8,0x0044,0x0042,
  387. +           0x0042,0x0842,0x0444,0x03f8,0x0040,0x0040,0x0040},
  388. +   /*%*/  {000000,000000,000000,000000,000000,000000,0x0c00,0x1200,0x1201,
  389. +           0x0c01,0x0002,0x0004,0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,
  390. +           0x0200,0x0400,0x0800,0x1006,0x1009,0x0009,0x0006},
  391. +   /*&*/  {000000,000000,000000,000000,000000,000000,0x1078,0x1084,0x0902,
  392. +           0x0601,0x0601,0x0901,0x1081,0x0042,0x0024,0x0018,0x0018,0x0024,
  393. +           0x0042,0x0042,0x0042,0x0042,0x0024,0x0018,000000},
  394. +   /*'*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  395. +           000000,000000,000000,000000,000000,0x0001,0x0002,0x0004,0x0008,
  396. +           0x0010,0x0030,0x0078,0x0078,0x0078,0x0030,000000},
  397. +   /*(*/  {000000,000000,000000,000000,000000,000000,0x0080,0x0040,0x0020,
  398. +           0x0020,0x0010,0x0008,0x0008,0x0004,0x0004,0x0004,0x0004,0x0004,
  399. +           0x0008,0x0008,0x0010,0x0020,0x0020,0x0040,0x0080},
  400. +   /*)*/  {000000,000000,000000,000000,000000,000000,0x0020,0x0040,0x0080,
  401. +           0x0080,0x0100,0x0200,0x0200,0x0400,0x0400,0x0400,0x0400,0x0400,
  402. +           0x0200,0x0200,0x0100,0x0080,0x0080,0x0040,0x0020},
  403. +   /***/  {000000,000000,000000,000000,000000,000000,0x0040,0x0040,0x0040,
  404. +           0x1041,0x0842,0x0444,0x0248,0x0150,0x00e0,0x1fff,0x00e0,0x0150,
  405. +           0x0248,0x0444,0x0842,0x1041,0x0040,0x0040,0x0040},
  406. +   /*+*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  407. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x1fff,0x0040,0x0040,
  408. +           0x0040,0x0040,0x0040,0x0040,000000,000000,000000},
  409. +   /*,*/  {000000,000000,0x0001,0x0002,0x0004,0x0008,0x0010,0x0030,0x0078,
  410. +           0x0078,0x0078,0x0030,000000,000000,000000,000000,000000,000000,
  411. +           000000,000000,000000,000000,000000,000000,000000},
  412. +   /*-*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  413. +           000000,000000,000000,000000,000000,000000,0x1fff,000000,000000,
  414. +           000000,000000,000000,000000,000000,000000,000000},
  415. +   /*.*/  {000000,000000,000000,000000,000000,000000,000000,0x0038,0x007c,
  416. +           0x007c,0x007c,0x0038,000000,000000,000000,000000,000000,000000,
  417. +           000000,000000,000000,000000,000000,000000,000000},
  418. +   /*-/-*/{000000,000000,000000,000000,000000,000000,000000,000000,0x0001,
  419. +           0x0001,0x0002,0x0004,0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,
  420. +           0x0200,0x0400,0x0800,0x1000,0x1000,000000,000000},
  421. +   /*0*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  422. +           0x1001,0x1003,0x1005,0x1009,0x1011,0x1021,0x1041,0x1081,0x1101,
  423. +           0x1201,0x1401,0x1801,0x1001,0x0802,0x0404,0x03f8},
  424. +   /*1*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0040,0x0040,
  425. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,
  426. +           0x0040,0x0040,0x0040,0x0048,0x0070,0x0060,0x0040},
  427. +   /*2*/  {000000,000000,000000,000000,000000,000000,0x1fff,0x0001,0x0001,
  428. +           0x0001,0x0001,0x0001,0x0001,0x0002,0x03fc,0x0400,0x0800,0x1000,
  429. +           0x1000,0x1000,0x1000,0x1001,0x0802,0x0404,0x03f8},
  430. +   /*3*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  431. +           0x1001,0x1000,0x1000,0x1000,0x0800,0x0400,0x03e0,0x0400,0x0800,
  432. +           0x1000,0x1000,0x1000,0x1001,0x0802,0x0404,0x03f8},
  433. +   /*4*/  {000000,000000,000000,000000,000000,000000,0x0200,0x0200,0x0200,
  434. +           0x0200,0x0200,0x0200,0x0200,0x1fff,0x0201,0x0201,0x0202,0x0204,
  435. +           0x0208,0x0210,0x0220,0x0240,0x0280,0x0300,0x0200},
  436. +   /*5*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  437. +           0x1001,0x1000,0x1000,0x1000,0x1000,0x1000,0x0800,0x0400,0x03ff,
  438. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x1fff},
  439. +   /*6*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  440. +           0x1001,0x1001,0x1001,0x1001,0x0801,0x0401,0x03ff,0x0001,0x0001,
  441. +           0x0001,0x0001,0x0002,0x0004,0x0808,0x0410,0x03e0},
  442. +   /*7*/  {000000,000000,000000,000000,000000,000000,0x0001,0x0001,0x0001,
  443. +           0x0002,0x0002,0x0004,0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,
  444. +           0x0200,0x0400,0x0800,0x0800,0x1000,0x1000,0x1fff},
  445. +   /*8*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  446. +           0x1001,0x1001,0x1001,0x1001,0x0802,0x0404,0x03f8,0x0404,0x0802,
  447. +           0x1001,0x1001,0x1001,0x1001,0x0802,0x0404,0x03f8},
  448. +   /*9*/  {000000,000000,000000,000000,000000,000000,0x00f8,0x0104,0x0202,
  449. +           0x0400,0x0800,0x1000,0x1000,0x1000,0x1000,0x1ff8,0x1004,0x1002,
  450. +           0x1001,0x1001,0x1001,0x1001,0x0802,0x0404,0x03f8},
  451. +   /*:*/  {000000,000000,000000,000000,000000,000000,000000,000000,0x0030,
  452. +           0x0078,0x0078,0x0030,000000,000000,000000,000000,000000,000000,
  453. +           0x0030,0x0078,0x0078,0x0030,000000,000000,000000},
  454. +   /*;*/  {000000,000000,0x0001,0x0002,0x0004,0x0008,0x0010,0x0030,0x0078,
  455. +           0x0078,0x0078,0x0030,000000,000000,000000,000000,000000,000000,
  456. +           0x0030,0x0078,0x0078,0x0030,000000,000000,000000},
  457. +   /*<*/  {000000,000000,000000,000000,000000,000000,0x0200,0x0100,0x0080,
  458. +           0x0040,0x0020,0x0010,0x0008,0x0004,0x0002,0x0001,0x0002,0x0004,
  459. +           0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,0x0200},
  460. +   /*=*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  461. +           000000,000000,000000,0x1fff,000000,000000,000000,000000,000000,
  462. +           0x1fff,000000,000000,000000,000000,000000,000000},
  463. +   /*>*/  {000000,000000,000000,000000,000000,000000,0x0008,0x0010,0x0020,
  464. +           0x0040,0x0080,0x0100,0x0200,0x0400,0x0800,0x1000,0x0800,0x0400,
  465. +           0x0200,0x0100,0x0080,0x0040,0x0020,0x0010,0x0008},
  466. +   /*?*/  {000000,000000,000000,000000,000000,0x0040,0x00e0,0x0040,000000,
  467. +           000000,000000,0x0040,0x0040,0x0080,0x0100,0x0200,0x0400,0x0800,
  468. +           0x1000,0x1000,0x1001,0x1001,0x0802,0x0404,0x03f8},
  469. +   /*@*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0002,
  470. +           0x0001,0x0001,0x0ee1,0x1111,0x1111,0x1111,0x1111,0x1111,0x12e1,
  471. +           0x1001,0x1001,0x1001,0x1001,0x0802,0x0404,0x03f8},
  472. +   /*A*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1001,
  473. +           0x1001,0x1001,0x1001,0x1fff,0x1001,0x1001,0x1001,0x1001,0x0802,
  474. +           0x0802,0x0404,0x0208,0x0110,0x00a0,0x00a0,0x0040},
  475. +   /*B*/  {000000,000000,000000,000000,000000,000000,0x03ff,0x0408,0x0808,
  476. +           0x1008,0x1008,0x1008,0x1008,0x0808,0x0408,0x03f8,0x0408,0x0808,
  477. +           0x1008,0x1008,0x1008,0x1008,0x0808,0x0408,0x03ff},
  478. +   /*C*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  479. +           0x1001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,
  480. +           0x0001,0x0001,0x0001,0x1001,0x0802,0x0404,0x03f8},
  481. +   /*D*/  {000000,000000,000000,000000,000000,000000,0x03ff,0x0408,0x0808,
  482. +           0x1008,0x1008,0x1008,0x1008,0x1008,0x1008,0x1008,0x1008,0x1008,
  483. +           0x1008,0x1008,0x1008,0x1008,0x0808,0x0408,0x03ff},
  484. +   /*E*/  {000000,000000,000000,000000,000000,000000,0x1fff,0x0001,0x0001,
  485. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x007f,0x0001,0x0001,
  486. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x1fff},
  487. +   /*F*/  {000000,000000,000000,000000,000000,000000,0x0001,0x0001,0x0001,
  488. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x007f,0x0001,0x0001,
  489. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x1fff},
  490. +   /*G*/  {000000,000000,000000,000000,000000,000000,0x0ff8,0x1004,0x1002,
  491. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1f01,0x0001,0x0001,
  492. +           0x0001,0x0001,0x0001,0x0001,0x0002,0x1004,0x0ff8},
  493. +   /*H*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1001,
  494. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1fff,0x1001,0x1001,
  495. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001},
  496. +   /*I*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0040,0x0040,
  497. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,
  498. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x03f8},
  499. +   /*J*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  500. +           0x1001,0x1000,0x1000,0x1000,0x1000,0x1000,0x1000,0x1000,0x1000,
  501. +           0x1000,0x1000,0x1000,0x1000,0x1000,0x1000,0x1e00},
  502. +   /*K*/  {000000,000000,000000,000000,000000,000000,0x1001,0x0801,0x0401,
  503. +           0x0201,0x0101,0x0081,0x0041,0x0021,0x0011,0x000f,0x0009,0x0011,
  504. +           0x0021,0x0041,0x0081,0x0101,0x0201,0x0401,0x0801},
  505. +   /*L*/  {000000,000000,000000,000000,000000,000000,0x1fff,0x1001,0x1001,
  506. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,
  507. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001},
  508. +   /*M*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1001,
  509. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1041,0x1041,0x10a1,
  510. +           0x10a1,0x1111,0x1209,0x1209,0x1405,0x1803,0x1001},
  511. +   /*N*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1001,
  512. +           0x1001,0x1801,0x1401,0x1201,0x1201,0x1101,0x1081,0x1041,0x1041,
  513. +           0x1021,0x1011,0x1009,0x1009,0x1005,0x1003,0x1001},
  514. +   /*O*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  515. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,
  516. +           0x1001,0x1001,0x1001,0x1001,0x0802,0x0404,0x03f8},
  517. +   /*P*/  {000000,000000,000000,000000,000000,000000,0x0001,0x0001,0x0001,
  518. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x03ff,0x0401,0x0801,
  519. +           0x1001,0x1001,0x1001,0x1001,0x0801,0x0401,0x03ff},
  520. +   /*Q*/  {000000,000000,000000,000000,0x0c00,0x0200,0x03f8,0x0494,0x0862,
  521. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,
  522. +           0x1001,0x1001,0x1001,0x1001,0x0802,0x0404,0x03f8},
  523. +   /*R*/  {000000,000000,000000,000000,000000,000000,0x1001,0x0801,0x0401,
  524. +           0x0201,0x0101,0x0081,0x0041,0x0021,0x0011,0x03ff,0x0401,0x0801,
  525. +           0x1001,0x1001,0x1001,0x1001,0x0801,0x0401,0x03ff},
  526. +   /*S*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  527. +           0x1001,0x1000,0x1000,0x1000,0x0800,0x0400,0x03f8,0x0004,0x0002,
  528. +           0x0001,0x0001,0x0001,0x1001,0x0802,0x0404,0x03f8},
  529. +   /*T*/  {000000,000000,000000,000000,000000,000000,0x00e0,0x0040,0x0040,
  530. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,
  531. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x1041,0x1fff},
  532. +   /*U*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  533. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,
  534. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001},
  535. +   /*V*/  {000000,000000,000000,000000,000000,000000,0x0040,0x0040,0x00a0,
  536. +           0x00a0,0x0110,0x0110,0x0208,0x0208,0x0404,0x0404,0x0802,0x0802,
  537. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001},
  538. +   /*W*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1803,
  539. +           0x1405,0x1405,0x1209,0x1209,0x1111,0x1111,0x10a1,0x1041,0x1001,
  540. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001},
  541. +   /*X*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1001,
  542. +           0x0802,0x0802,0x0404,0x0208,0x0110,0x00a0,0x0040,0x00a0,0x0110,
  543. +           0x0208,0x0404,0x0802,0x0802,0x1001,0x1001,0x1001},
  544. +   /*Y*/  {000000,000000,000000,000000,000000,000000,0x0040,0x0040,0x0040,
  545. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x00a0,0x0110,0x0208,
  546. +           0x0404,0x0802,0x0802,0x1001,0x1001,0x1001,0x1001},
  547. +   /*Z*/  {000000,000000,000000,000000,000000,000000,0x1fff,0x0001,0x0001,
  548. +           0x0002,0x0004,0x0004,0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,
  549. +           0x0200,0x0400,0x0400,0x0800,0x1000,0x1000,0x1fff},
  550. +   /*[*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0008,0x0008,
  551. +           0x0008,0x0008,0x0008,0x0008,0x0008,0x0008,0x0008,0x0008,0x0008,
  552. +           0x0008,0x0008,0x0008,0x0008,0x0008,0x0008,0x03f8},
  553. +   /*\*/  {000000,000000,000000,000000,000000,000000,000000,000000,0x1000,
  554. +           0x1000,0x0800,0x0400,0x0200,0x0100,0x0080,0x0040,0x0020,0x0010,
  555. +           0x0008,0x0004,0x0002,0x0001,0x0001,000000,000000},
  556. +   /*]*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0200,0x0200,
  557. +           0x0200,0x0200,0x0200,0x0200,0x0200,0x0200,0x0200,0x0200,0x0200,
  558. +           0x0200,0x0200,0x0200,0x0200,0x0200,0x0200,0x03f8},
  559. +   /*^*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  560. +           000000,000000,000000,000000,000000,000000,000000,000000,000000,
  561. +           0x1001,0x0802,0x0404,0x0208,0x0110,0x00a0,0x0040},
  562. +   /*_*/  {000000,000000,000000,000000,000000,000000,0x1fff,000000,000000,
  563. +           000000,000000,000000,000000,000000,000000,000000,000000,000000,
  564. +           000000,000000,000000,000000,000000,000000,000000},
  565. +   /*`*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  566. +           000000,000000,000000,000000,000000,0x0400,0x0200,0x0100,0x0080,
  567. +           0x0040,0x0060,0x00f0,0x00f0,0x00f0,0x0060,000000},
  568. +   /*a*/  {000000,000000,000000,000000,000000,000000,0x17f8,0x0804,0x0802,
  569. +           0x0802,0x0802,0x0804,0x0ff8,0x0800,0x0800,0x0800,0x0800,0x0404,
  570. +           0x03f8,000000,000000,000000,000000,000000,000000},
  571. +   /*b*/  {000000,000000,000000,000000,000000,000000,0x03f9,0x0405,0x0803,
  572. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x0803,0x0405,
  573. +           0x03f9,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001},
  574. +   /*c*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  575. +           0x1001,0x0001,0x0001,0x0001,0x0001,0x0001,0x1001,0x0802,0x0404,
  576. +           0x03f8,000000,000000,000000,000000,000000,000000},
  577. +   /*d*/  {000000,000000,000000,000000,000000,000000,0x13f8,0x1404,0x1802,
  578. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1802,0x1404,
  579. +           0x13f8,0x1000,0x1000,0x1000,0x1000,0x1000,0x1000},
  580. +   /*e*/  {000000,000000,000000,000000,000000,000000,0x0ff8,0x0004,0x0002,
  581. +           0x0001,0x0001,0x0001,0x1fff,0x1001,0x1001,0x1001,0x0802,0x0404,
  582. +           0x03f8,000000,000000,000000,000000,000000,000000},
  583. +   /*f*/  {000000,000000,000000,000000,000000,000000,0x0040,0x0040,0x0040,
  584. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x03f8,0x0040,0x0040,
  585. +           0x0040,0x0040,0x0040,0x1040,0x0880,0x0500,0x0200},
  586. +   /*g*/  {0x03f8,0x0404,0x0802,0x1001,0x1000,0x1000,0x13f8,0x1404,0x1802,
  587. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1802,0x1404,
  588. +           0x13f8,000000,000000,000000,000000,000000,000000},
  589. +   /*h*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1001,
  590. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x0803,0x0405,
  591. +           0x03f9,0x0001,0x0001,0x0001,0x0001,0x0001,0x0001},
  592. +   /*i*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0040,0x0040,
  593. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0070,
  594. +           000000,000000,000000,0x00e0,0x00e0,0x00e0,000000},
  595. +   /*j*/  {0x00f0,0x0108,0x0204,0x0402,0x0400,0x0400,0x0400,0x0400,0x0400,
  596. +           0x0400,0x0400,0x0400,0x0400,0x0400,0x0400,0x0400,0x0400,0x0700,
  597. +           000000,000000,000000,0x0700,0x0700,0x0700,000000},
  598. +   /*k*/  {000000,000000,000000,000000,000000,000000,0x0804,0x0404,0x0204,
  599. +           0x0104,0x0084,0x0044,0x0024,0x0014,0x002c,0x0044,0x0084,0x0104,
  600. +           0x0204,0x0004,0x0004,0x0004,0x0004,0x0004,0x0004},
  601. +   /*l*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0040,0x0040,
  602. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,
  603. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0070},
  604. +   /*m*/  {000000,000000,000000,000000,000000,000000,0x1041,0x1041,0x1041,
  605. +           0x1041,0x1041,0x1041,0x1041,0x1041,0x1041,0x1041,0x08a3,0x0515,
  606. +           0x0209,000000,000000,000000,000000,000000,000000},
  607. +   /*n*/  {000000,000000,000000,000000,000000,000000,0x1001,0x1001,0x1001,
  608. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x0803,0x0405,
  609. +           0x03f9,000000,000000,000000,000000,000000,000000},
  610. +   /*o*/  {000000,000000,000000,000000,000000,000000,0x03f8,0x0404,0x0802,
  611. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x0802,0x0404,
  612. +           0x03f8,000000,000000,000000,000000,000000,000000},
  613. +   /*p*/  {0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x03f9,0x0405,0x0803,
  614. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x0803,0x0405,
  615. +           0x03f9,000000,000000,000000,000000,000000,000000},
  616. +   /*q*/  {0x1000,0x1000,0x1000,0x1000,0x1000,0x1000,0x13f8,0x1404,0x1802,
  617. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1802,0x1404,
  618. +           0x13f8,000000,000000,000000,000000,000000,000000},
  619. +   /*r*/  {000000,000000,000000,000000,000000,000000,0x0001,0x0001,0x0001,
  620. +           0x0001,0x0001,0x0001,0x0001,0x0001,0x0001,0x1001,0x0803,0x0405,
  621. +           0x03f9,000000,000000,000000,000000,000000,000000},
  622. +   /*s*/  {000000,000000,000000,000000,000000,000000,0x03fc,0x0402,0x0800,
  623. +           0x0800,0x0800,0x0400,0x03f8,0x0004,0x0002,0x0002,0x0002,0x0804,
  624. +           0x07f8,000000,000000,000000,000000,000000,000000},
  625. +   /*t*/  {000000,000000,000000,000000,000000,000000,0x0200,0x0500,0x0880,
  626. +           0x1040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,
  627. +           0x07fc,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040},
  628. +   /*u*/  {000000,000000,000000,000000,000000,000000,0x13f8,0x1404,0x1802,
  629. +           0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,
  630. +           0x1001,000000,000000,000000,000000,000000,000000},
  631. +   /*v*/  {000000,000000,000000,000000,000000,000000,0x0040,0x00a0,0x0110,
  632. +           0x0208,0x0404,0x0802,0x0802,0x1001,0x1001,0x1001,0x1001,0x1001,
  633. +           0x1001,000000,000000,000000,000000,000000,000000},
  634. +   /*w*/  {000000,000000,000000,000000,000000,000000,0x0208,0x0514,0x08a2,
  635. +           0x08a2,0x1041,0x1041,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,
  636. +           0x1001,000000,000000,000000,000000,000000,000000},
  637. +   /*x*/  {000000,000000,000000,000000,000000,000000,0x1001,0x0802,0x0404,
  638. +           0x0208,0x0110,0x00a0,0x0040,0x00a0,0x0110,0x0208,0x0404,0x0802,
  639. +           0x1001,000000,000000,000000,000000,000000,000000},
  640. +   /*y*/  {0x03f8,0x0404,0x0802,0x1001,0x1000,0x1000,0x1000,0x1000,0x1ff8,
  641. +           0x1004,0x1002,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,0x1001,
  642. +           0x1001,000000,000000,000000,000000,000000,000000},
  643. +   /*z*/  {000000,000000,000000,000000,000000,000000,0x1fff,0x0002,0x0004,
  644. +           0x0008,0x0010,0x0020,0x0040,0x0080,0x0100,0x0200,0x0400,0x0800,
  645. +           0x1fff,000000,000000,000000,000000,000000,000000},
  646. +   /*{*/  {000000,000000,000000,000000,000000,000000,0x0600,0x0100,0x0080,
  647. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0020,0x0010,0x0020,0x0040,
  648. +           0x0040,0x0040,0x0040,0x0040,0x0080,0x0100,0x0600},
  649. +   /*|*/  {000000,000000,000000,000000,000000,000000,0x0040,0x0040,0x0040,
  650. +           0x0040,0x0040,0x0040,0x0040,000000,000000,000000,000000,000000,
  651. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0040,0x0040},
  652. +   /*}*/  {000000,000000,000000,000000,000000,000000,0x000c,0x0010,0x0020,
  653. +           0x0040,0x0040,0x0040,0x0040,0x0040,0x0080,0x0100,0x0080,0x0040,
  654. +           0x0040,0x0040,0x0040,0x0040,0x0020,0x0010,0x000c},
  655. +   /*~*/  {000000,000000,000000,000000,000000,000000,000000,000000,000000,
  656. +           000000,000000,000000,000000,000000,000000,000000,000000,000000,
  657. +           0x0600,0x0900,0x1080,0x1041,0x0021,0x0012,0x000c},
  658. +   /*DEL*/{000000,000000,000000,000000,000000,000000,0x1249,000000,000000,
  659. +           0x1249,000000,000000,0x1249,000000,000000,0x1249,000000,000000,
  660. +           0x1249,000000,000000,0x1249,000000,000000,0x1249},
  661. + };
  662. + 
  663. + /*
  664. + ** The plotting area is defined as a huge bitmap.
  665. + ** The bitmap is stored in a dynamically allocated pixel array b_p
  666. + **
  667. + ** The bitmap is allocated (and initialized to zero) with
  668. + ** b_makebitmap(xsize, ysize, planes)
  669. + ** and freed with b_freebitmap()
  670. + ** xsize and ysize will be rounded up to a multiple of 8.
  671. + **
  672. + ** Valid (int) coordinates range from zero to (xsize-1,ysize-1)
  673. + **
  674. + ** Plotting is done via b_move(x, y) and b_vector(x, y) functions,
  675. + ** where the point (x,y) is the target to go from the current point
  676. + ** To set the color use b_setvalue(value) where value is the value 
  677. + ** (0 or 1 or a color number) to be stored in every pixel.
  678. + ** To get dotted line styles, use b_setlinetype(linetype).
  679. + **
  680. + ** Internally all plotting goes through b_setpixel(x, y, value).
  681. + */
  682. + 
  683. + 
  684. + /*
  685. + ** set pixel (x, y, value) to value value (this can be 1/0 or a color number).
  686. + */
  687. + void
  688. + b_setpixel(x, y, value)
  689. + unsigned int x, y, value;
  690. + {
  691. +   register unsigned int row;
  692. +   register unsigned char mask;
  693. +   int i;
  694. +   if (b_rastermode) {
  695. +     /* interchange so that new (x,y) is old (y,b_ysize-1-x) */
  696. +     row = x;  /* temp storage */
  697. +     x = y;
  698. +     y = b_ysize-1-row;
  699. +   }
  700. +   if (IN(x, b_xsize) && IN(y, b_ysize))
  701. +   {
  702. +     row = y/8;
  703. +     mask = 1<<(y%8);
  704. + 
  705. +     for (i=0; i<b_planes; i++) {
  706. +         if (value&1)
  707. +             *((*b_p)[row]+x) |= mask;
  708. +         else
  709. +             *((*b_p)[row]+x) &= ~mask;
  710. +         row += b_psize;
  711. +         value >>= 1;
  712. +     }
  713. +   }
  714. + #ifdef BITMAPDEBUG
  715. +   else
  716. +   {
  717. +     if (b_rastermode)
  718. +       fprintf(stderr, "Warning: setpixel(%d, %d, %d) out of bounds\n", 
  719. +         b_ysize-1-y, x, value);
  720. +     else
  721. +       fprintf(stderr, "Warning: setpixel(%d, %d, %d) out of bounds\n",
  722. +         x, y, value);
  723. +   }
  724. + #endif
  725. + }
  726. + 
  727. + /*
  728. + ** get pixel (x,y) value----unused
  729. + */
  730. + /****************************
  731. + unsigned int
  732. + b_getpixel(x, y)
  733. + unsigned int x, y;
  734. + {
  735. +   register unsigned int row;
  736. +   register unsigned char mask;
  737. +   register unsigned char value;
  738. +   int i;
  739. + 
  740. +   if (b_rastermode) {
  741. +     row = x;
  742. +     x = y;
  743. +     y = b_ysize-1-row;
  744. +   }
  745. +   if (IN(x, b_xsize) && IN(y, b_ysize))
  746. +   {
  747. +     row = y/8 + (b_planes-1)*b_psize;
  748. +     mask = 1<<(y%8);
  749. + 
  750. +     for (i=0; i<b_planes; i++) {
  751. +         if ( *((*b_p)[row]+x) & mask )
  752. +             value |= 1;
  753. +         row -= b_psize;
  754. +         value <<= 1;
  755. +     }
  756. +     return(value);
  757. +   }
  758. +   else
  759. +   {
  760. + #ifdef BITMAPDEBUG
  761. +     if (b_rastermode)
  762. +       fprintf(stderr, "Warning: getpixel(%d,%d) out of bounds\n",
  763. +         b_ysize-1-y, x);
  764. +     else
  765. +       fprintf(stderr, "Warning: getpixel(%d,%d) out of bounds\n", x, y);
  766. + #endif
  767. +     return(0);
  768. +   }
  769. + }
  770. + ********************************/
  771. + 
  772. + /*
  773. + ** allocate the bitmap
  774. + */
  775. + void
  776. + b_makebitmap(x, y, planes)
  777. + unsigned int x, y, planes;
  778. + {
  779. +   register unsigned j;
  780. +   unsigned rows;
  781. + 
  782. +   x = 8 * (unsigned int)(x/8.0+0.9);    /* round up to multiple of 8 */
  783. +   y = 8 * (unsigned int)(y/8.0+0.9);    /* round up to multiple of 8 */
  784. +   b_psize = y/8;                    /* size of each plane */
  785. +   rows = b_psize * planes;            /* total number of rows of 8 pixels high */
  786. +   b_xsize = x; b_ysize = y;
  787. +   b_currx = b_curry = 0;
  788. +   b_planes = planes;
  789. +   b_value = 1;
  790. +   b_angle = 0;
  791. +   b_rastermode = 0;
  792. +   /* allocate row pointers */
  793. +   b_p = (bitmap *)alloc( rows * sizeof(pixels *), "bitmap row buffer");
  794. +   bzero(b_p, rows * sizeof(pixels *));
  795. +   for (j = 0; j < rows; j++) {
  796. +     /* allocate bitmap buffers */
  797. +     (*b_p)[j] = (pixels *)alloc(x * sizeof(pixels),(char *)NULL);
  798. +     if ((*b_p)[j] == (pixels *)NULL) {
  799. +         b_freebitmap();  /* free what we have already allocated */
  800. +         int_error("out of memory for bitmap buffer", NO_CARET);
  801. +     }
  802. +     bzero((*b_p)[j], x * sizeof(pixels));
  803. +   }
  804. + }
  805. +   
  806. + /*
  807. + ** free the allocated bitmap
  808. + */
  809. + void
  810. + b_freebitmap()
  811. + {
  812. +   int j;
  813. +   unsigned rows;
  814. + 
  815. +   rows = b_psize * b_planes;   /* total number of rows of 8 pixels high */
  816. +   for (j = 0; j < rows; j++)
  817. +   {
  818. +     (void) free((char *)(*b_p)[j]);
  819. +   }
  820. +   (void) free((char *)b_p);
  821. +   b_p = (bitmap *)(NULL);
  822. + }
  823. + 
  824. + /*
  825. + ** set pixel at (x,y) with color b_value and dotted mask b_linemask.
  826. + */
  827. + void
  828. + b_setmaskpixel(x,y,value)
  829. + unsigned int x,y,value;
  830. + {
  831. +     /* dotted line generator */
  832. +     if ((b_linemask>>b_maskcount)&(unsigned int)(1)) {
  833. +         b_setpixel(x,y,value);
  834. +     }
  835. +     b_maskcount= (b_maskcount+1) % 16;
  836. +     b_lastx= x;  /* last pixel set with mask */
  837. +     b_lasty= y;
  838. + }
  839. + 
  840. + /*
  841. + ** draw a line from (x1,y1) to (x2,y2)
  842. + ** with color b_value and dotted mask b_linemask.
  843. + */
  844. + void
  845. + b_line(x1,y1,x2,y2)
  846. + unsigned int x1,y1,x2,y2;
  847. + {
  848. + int runcount;
  849. + int dx,dy;
  850. + int xinc,yinc;
  851. + unsigned int xplot,yplot;
  852. + 
  853. +     runcount=0;
  854. +     dx = abs((int)(x1)-(int)(x2));
  855. +     if (x2>x1)  xinc=  1;
  856. +     if (x2==x1) xinc=  0;
  857. +     if (x2<x1)  xinc= -1;
  858. +     dy = abs((int)(y1)-(int)(y2));
  859. +     if (y2>y1)  yinc=  1;
  860. +     if (y2==y1) yinc=  0;
  861. +     if (y2<y1)  yinc= -1;
  862. +     xplot=x1;
  863. +     yplot=y1;
  864. +     if (dx>dy) {
  865. +         /* iterate x */
  866. +         if ( (b_linemask==0xffff) ||
  867. +             ((xplot!=b_lastx) && (yplot!=b_lasty)) )
  868. +             b_setmaskpixel(xplot,yplot,b_value);
  869. +         while (xplot!=x2) {
  870. +             xplot+=xinc;
  871. +             runcount+=dy;
  872. +             if (runcount>=(dx-runcount)) {
  873. +                 yplot+=yinc;
  874. +                 runcount-=dx;
  875. +             }
  876. +             b_setmaskpixel(xplot,yplot,b_value);
  877. +         }
  878. +     } else {
  879. +         /* iterate y */
  880. +         if ( (b_linemask==0xffff) ||
  881. +             ((xplot!=b_lastx) && (yplot!=b_lasty)) )
  882. +             b_setmaskpixel(xplot,yplot,b_value);
  883. +         while (yplot!=y2) {
  884. +             yplot+=yinc;
  885. +             runcount+=dx;
  886. +             if (runcount>=(dy-runcount)) {
  887. +                 xplot+=xinc;
  888. +                 runcount-=dy;
  889. +             }
  890. +             b_setmaskpixel(xplot,yplot,b_value);
  891. +         }
  892. +     }
  893. + }
  894. + 
  895. + /*
  896. + ** set character size
  897. + */
  898. + void
  899. + b_charsize(size)
  900. + unsigned int size;
  901. + {
  902. +     int j;
  903. +     switch(size) {
  904. +         case FNT5X9:
  905. +             b_hchar = FNT5X9_HCHAR;
  906. +             b_hbits = FNT5X9_HBITS;
  907. +             b_vchar = FNT5X9_VCHAR;
  908. +             b_vbits = FNT5X9_VBITS;
  909. +             for (j = 0; j < FNT_CHARS; j++ )
  910. +                 b_font[j] = &fnt5x9[j][0];
  911. +             break;
  912. +         case FNT9X17:
  913. +             b_hchar = FNT9X17_HCHAR;
  914. +             b_hbits = FNT9X17_HBITS;
  915. +             b_vchar = FNT9X17_VCHAR;
  916. +             b_vbits = FNT9X17_VBITS;
  917. +             for (j = 0; j < FNT_CHARS; j++ )
  918. +                 b_font[j] = &fnt9x17[j][0];
  919. +             break;
  920. +         case FNT13X25:
  921. +             b_hchar = FNT13X25_HCHAR;
  922. +             b_hbits = FNT13X25_HBITS;
  923. +             b_vchar = FNT13X25_VCHAR;
  924. +             b_vbits = FNT13X25_VBITS;
  925. +             for (j = 0; j < FNT_CHARS; j++ )
  926. +                 b_font[j] = &fnt13x25[j][0];
  927. +             break;
  928. +         default:
  929. +             int_error("Unknown character size",NO_CARET);
  930. +     }
  931. + }
  932. + 
  933. + 
  934. + /*
  935. + ** put characater c at (x,y) rotated by angle with color b_value.
  936. + */
  937. + void
  938. + b_putc(x,y,c,angle)
  939. + unsigned int x,y;
  940. + char c;
  941. + unsigned int angle;
  942. + {
  943. +     unsigned int i, j, k;
  944. +     char_row fc;
  945. + 
  946. +     j = c - ' ';
  947. +     for ( i = 0; i < b_vbits; i++ ) {
  948. +         fc = *( b_font[j] + i );
  949. +         if ( c == '_' ) {    /* treat underline specially */
  950. +             if ( fc  ) {    /* this this the underline row ? *?
  951. +                 /* draw the under line for the full h_char width */
  952. +                 for ( k = ( b_hbits - b_hchar )/2;
  953. +                     k < ( b_hbits + b_hchar )/2; k++ ) {
  954. +                     switch(angle) {
  955. +                         case 0 : b_setpixel(x+k+1,y+i,b_value);
  956. +                             break;
  957. +                         case 1 : b_setpixel(x-i,y+k+1,b_value);
  958. +                             break;
  959. +                     }
  960. +                 }
  961. +             }
  962. +         }
  963. +         else {
  964. +             /* draw character */
  965. +             for ( k = 0; k < b_hbits; k++ ) {
  966. +                 if ( ( fc >> k ) & 1 ) {
  967. +                     switch(angle) {
  968. +                         case 0 : b_setpixel(x+k+1,y+i,b_value);
  969. +                             break;
  970. +                         case 1 : b_setpixel(x-i,y+k+1,b_value);
  971. +                             break;
  972. +                     }
  973. +                 }
  974. +             }
  975. +         }
  976. +     }
  977. + }
  978. + 
  979. + 
  980. + /*
  981. + ** set b_linemask to b_pattern[linetype]
  982. + */
  983. + int
  984. + b_setlinetype(linetype)
  985. + int linetype;
  986. + {
  987. +     if (linetype>=7)
  988. +         linetype %= 7;
  989. +     b_linemask = b_pattern[linetype+2];
  990. +     b_maskcount=0;
  991. + }
  992. + 
  993. + /*
  994. + ** set b_value to value
  995. + */
  996. + void
  997. + b_setvalue(value)
  998. + unsigned int value;
  999. + {
  1000. +     b_value = value;
  1001. + }
  1002. + 
  1003. + /*
  1004. + ** move to (x,y)
  1005. + */
  1006. + int
  1007. + b_move(x, y)
  1008. + unsigned int x, y;
  1009. + {
  1010. +   b_currx = x;
  1011. +   b_curry = y;
  1012. + }
  1013. + 
  1014. + /*
  1015. + ** draw to (x,y) with color b_value
  1016. + */
  1017. + int
  1018. + b_vector(x, y)
  1019. + unsigned int x, y;
  1020. + {
  1021. +   b_line(b_currx, b_curry, x, y);
  1022. +   b_currx = x;
  1023. +   b_curry = y;
  1024. + }
  1025. + 
  1026. + 
  1027. + /*
  1028. + ** put text str at (x,y) with color b_value and rotation b_angle
  1029. + */
  1030. + int
  1031. + b_put_text(x,y,str)
  1032. + unsigned int x, y;
  1033. + char *str;
  1034. + {
  1035. +     if (b_angle == 1)
  1036. +         x += b_vchar/2;
  1037. +     else
  1038. +         y -= b_vchar/2;
  1039. +    switch (b_angle) {
  1040. +       case 0:
  1041. +      for (; *str; ++str, x += b_hchar)
  1042. +         b_putc (x, y, *str, b_angle);
  1043. +                     break;
  1044. +       case 1:
  1045. +      for (; *str; ++str, y += b_hchar)
  1046. +         b_putc (x, y, *str, b_angle);
  1047. +                     break;
  1048. +     }
  1049. + }
  1050. + 
  1051. + 
  1052. + int
  1053. + b_text_angle(ang)
  1054. + int ang;
  1055. + {
  1056. +     b_angle=(unsigned int)ang;
  1057. +     return TRUE;
  1058. + }
  1059. diff -cr ./bitmap.h ../gnuplot2.02/bitmap.h
  1060. *** ./bitmap.h    Mon Dec  3 15:32:34 1990
  1061. --- ../gnuplot2.02/bitmap.h    Thu Dec  6 16:08:01 1990
  1062. ***************
  1063. *** 0
  1064.  
  1065. --- 1,68 -----
  1066. + /* bitmap.h */
  1067. + 
  1068. + /* allow up to 16 bit width for character array */
  1069. + typedef unsigned int char_row;
  1070. + typedef char_row * char_box;
  1071. + 
  1072. + #define FNT_CHARS   96      /* Number of characters in the font set */
  1073. + 
  1074. + #define FNT5X9 0
  1075. + #define FNT5X9_VCHAR 11 /* vertical spacing between characters */
  1076. + #define FNT5X9_VBITS 9 /* actual number of rows of bits per char */
  1077. + #define FNT5X9_HCHAR 7 /* horizontal spacing between characters */
  1078. + #define FNT5X9_HBITS 5 /* actual number of bits per row per char */
  1079. + extern char_row fnt5x9[FNT_CHARS][FNT5X9_VBITS];
  1080. + 
  1081. + #define FNT9X17 1
  1082. + #define FNT9X17_VCHAR 21 /* vertical spacing between characters */
  1083. + #define FNT9X17_VBITS 17 /* actual number of rows of bits per char */
  1084. + #define FNT9X17_HCHAR 13 /* horizontal spacing between characters */
  1085. + #define FNT9X17_HBITS 9 /* actual number of bits per row per char */
  1086. + extern char_row fnt9x17[FNT_CHARS][FNT9X17_VBITS];
  1087. + 
  1088. + #define FNT13X25 2
  1089. + #define FNT13X25_VCHAR 31 /* vertical spacing between characters */
  1090. + #define FNT13X25_VBITS 25 /* actual number of rows of bits per char */
  1091. + #define FNT13X25_HCHAR 19 /* horizontal spacing between characters */
  1092. + #define FNT13X25_HBITS 13 /* actual number of bits per row per char */
  1093. + extern char_row fnt13x25[FNT_CHARS][FNT13X25_VBITS];
  1094. + 
  1095. + 
  1096. + typedef unsigned char pixels;  /* the type of one set of 8 pixels in bitmap */
  1097. + typedef pixels *bitmap[];  /* the bitmap */
  1098. + 
  1099. + extern bitmap *b_p;                        /* global pointer to bitmap */
  1100. + extern unsigned int b_currx, b_curry;    /* the current coordinates */
  1101. + extern unsigned int b_xsize, b_ysize;    /* the size of the bitmap */
  1102. + extern unsigned int b_planes;            /* number of color planes */
  1103. + extern unsigned int b_psize;            /* size of each plane */
  1104. + extern unsigned int b_rastermode;        /* raster mode rotates -90deg */
  1105. + extern unsigned int b_linemask;            /* 16 bit mask for dotted lines */
  1106. + extern unsigned int b_value;            /* colour of lines */
  1107. + extern unsigned int b_hchar;            /* width of characters */
  1108. + extern unsigned int b_hbits;            /* actual bits in char horizontally */
  1109. + extern unsigned int b_vchar;            /* height of characters */
  1110. + extern unsigned int b_vbits;            /* actual bits in char vertically */
  1111. + extern unsigned int b_angle;            /* rotation of text */
  1112. + extern char_box b_font[FNT_CHARS];        /* the current font */
  1113. + extern unsigned int b_pattern[];
  1114. + extern int b_maskcount;
  1115. + extern unsigned int b_lastx, b_lasty;    /* last pixel set - used by b_line */
  1116. + 
  1117. + 
  1118. + extern void b_makebitmap();
  1119. + extern void b_freebitmap();
  1120. + extern void b_setpixel();
  1121. + extern unsigned int b_getpixel();
  1122. + extern void b_line();
  1123. + extern void b_setmaskpixel();
  1124. + extern void b_putc();
  1125. + extern void b_charsize();
  1126. + extern void b_setvalue();
  1127. + 
  1128. + extern int b_setlinetype();
  1129. + extern int b_move();
  1130. + extern int b_vector();
  1131. + extern int b_put_text();
  1132. + extern int b_text_angle();
  1133. + 
  1134.