home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / misc / volume28 / jgraph / patch07.5 < prev    next >
Encoding:
Text File  |  1992-02-25  |  48.9 KB  |  1,613 lines
  1. Newsgroups: comp.sources.misc
  2. From: jsp@Princeton.EDU (James Plank)
  3. Subject:  v28i074:  jgraph - A filter for plotting postscript graphs, Patch07.5
  4. Message-ID: <1992Feb26.061320.20320@sparky.imd.sterling.com>
  5. X-Md4-Signature: 42c6ca5d688539d80e38ad93d6692f2c
  6. Date: Wed, 26 Feb 1992 06:13:20 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: jsp@Princeton.EDU (James Plank)
  10. Posting-number: Volume 28, Issue 74
  11. Archive-name: jgraph/patch07.5
  12. Environment: UNIX, VMS, postscript
  13. Patch-To: jgraph: Volume 16, Issue 20
  14.  
  15. Jgraph patch 7.5: Mon Feb 10 10:42:11 EST 1992
  16.  
  17. Jgraph now has color!  Check out the man page (cfill and color
  18. commands).  Also, I've removed the quirk that grid lines are automatically
  19. generated for major and minor hash marks.  Now you do grid_lines
  20. for major ones and mgrid_lines for minor ones.
  21.  
  22. Oh, a final word about color strings -- you can't set the color of
  23. a string that you've made with newstring or copystring.  However, you
  24. can plot strings as curve points with different colors, so do that.
  25. It seemed better than adding color to all labels.  (this will probably
  26. be a fix for a later version).
  27.  
  28. Again, let me know of bugs or comments.
  29.  
  30. Take it easy
  31.  
  32. Jim
  33. jsp@princeton.edu
  34.  
  35. (oh, and as always, jgraph is available via anonymous ftp to
  36. princeton.edu in pub/jgraph.Z.  It's a shell bundle file.
  37. Remember to set ftp to binary before getting it).
  38.  
  39. Here's the patch from v. 7.3:
  40.  
  41. *** ../work/README    Tue Feb 25 22:26:42 1992
  42. --- README    Tue Feb 25 22:28:16 1992
  43. ***************
  44. *** 1,4 ****
  45. ! $Revision: 7.3 $
  46.   
  47.   Jgraph takes the description of a graph or graphs in the standard
  48.   input, and produces a postscript file on the standard output.  Jgraph
  49. --- 1,4 ----
  50. ! $Revision: 7.5 $
  51.   
  52.   Jgraph takes the description of a graph or graphs in the standard
  53.   input, and produces a postscript file on the standard output.  Jgraph
  54. *** /dev/null    Tue Feb 25 22:09:31 1992
  55. --- alb.jgr    Tue Feb 25 22:28:19 1992
  56. ***************
  57. *** 0 ****
  58. --- 1,443 ----
  59. + newgraph
  60. + xaxis min 1 max 25 size 6.000 nodraw
  61. + yaxis min .25 max 5 size 1.14 nodraw
  62. + 
  63. + newstring x 12.5 y .25 vjc hjc : (a)
  64. + 
  65. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  66. +     1 5 1 4 1 3 1 2 1 1 
  67. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  68. +     2 5 3 4 3 3 3 2 3 1 
  69. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  70. +     2 4 3 3 
  71. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  72. +     2 3 3 2 
  73. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  74. +     2 2 3 1 
  75. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  76. +     2 1 
  77. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  78. +     3 5 3 4 
  79. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  80. +     4 5 3 4 
  81. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  82. +     4 4 3 3 
  83. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  84. +     4 3 3 2 
  85. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  86. +     4 2 3 1 
  87. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  88. +     4 1 
  89. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  90. +     5 5 7 4 7 3 7 2 7 1 
  91. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  92. +     5 4 7 3 
  93. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  94. +     5 3 7 2 
  95. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  96. +     5 2 7 1 
  97. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  98. +     5 1 
  99. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  100. +     6 5 7 4 
  101. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  102. +     6 4 7 3 
  103. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  104. +     6 3 7 2 
  105. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  106. +     6 2 7 1 
  107. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  108. +     6 1 
  109. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  110. +     7 5 7 4 
  111. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  112. +     8 5 7 4 
  113. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  114. +     8 4 7 3 
  115. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  116. +     8 3 7 2 
  117. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  118. +     8 2 7 1 
  119. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  120. +     8 1 
  121. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  122. +     9 5 7 4 
  123. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  124. +     9 4 7 3 
  125. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  126. +     9 3 7 2 
  127. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  128. +     9 2 7 1 
  129. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  130. +     9 1 
  131. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  132. +     10 5 13 4 13 3 13 2 13 1 
  133. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  134. +     10 4 13 3 
  135. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  136. +     10 3 13 2 
  137. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  138. +     10 2 13 1 
  139. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  140. +     10 1 
  141. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  142. +     11 5 13 4 
  143. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  144. +     11 4 13 3 
  145. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  146. +     11 3 13 2 
  147. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  148. +     11 2 13 1 
  149. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  150. +     11 1 
  151. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  152. +     12 5 13 4 
  153. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  154. +     12 4 13 3 
  155. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  156. +     12 3 13 2 
  157. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  158. +     12 2 13 1 
  159. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  160. +     12 1 
  161. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  162. +     13 5 13 4 
  163. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  164. +     14 5 13 4 
  165. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  166. +     14 4 13 3 
  167. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  168. +     14 3 13 2 
  169. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  170. +     14 2 13 1 
  171. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  172. +     14 1 
  173. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  174. +     15 5 13 4 
  175. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  176. +     15 4 13 3 
  177. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  178. +     15 3 13 2 
  179. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  180. +     15 2 13 1 
  181. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  182. +     15 1 
  183. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  184. +     16 5 13 4 
  185. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  186. +     16 4 13 3 
  187. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  188. +     16 3 13 2 
  189. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  190. +     16 2 13 1 
  191. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  192. +     16 1 
  193. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  194. +     17 5 21 4 21 3 21 2 21 1 
  195. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  196. +     17 4 21 3 
  197. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  198. +     17 3 21 2 
  199. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  200. +     17 2 21 1 
  201. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  202. +     17 1 
  203. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  204. +     18 5 21 4 
  205. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  206. +     18 4 21 3 
  207. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  208. +     18 3 21 2 
  209. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  210. +     18 2 21 1 
  211. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  212. +     18 1 
  213. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  214. +     19 5 21 4 
  215. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  216. +     19 4 21 3 
  217. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  218. +     19 3 21 2 
  219. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  220. +     19 2 21 1 
  221. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  222. +     19 1 
  223. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  224. +     20 5 21 4 
  225. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  226. +     20 4 21 3 
  227. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  228. +     20 3 21 2 
  229. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  230. +     20 2 21 1 
  231. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  232. +     20 1 
  233. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  234. +     21 5 21 4 
  235. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  236. +     22 5 21 4 
  237. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  238. +     22 4 21 3 
  239. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  240. +     22 3 21 2 
  241. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  242. +     22 2 21 1 
  243. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  244. +     22 1 
  245. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  246. +     23 5 21 4 
  247. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  248. +     23 4 21 3 
  249. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  250. +     23 3 21 2 
  251. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  252. +     23 2 21 1 
  253. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  254. +     23 1 
  255. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  256. +     24 5 21 4 
  257. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  258. +     24 4 21 3 
  259. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  260. +     24 3 21 2 
  261. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  262. +     24 2 21 1 
  263. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  264. +     24 1 
  265. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  266. +     25 5 21 4 
  267. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  268. +     25 4 21 3 
  269. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  270. +     25 3 21 2 
  271. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  272. +     25 2 21 1 
  273. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  274. +     25 1 
  275. + 
  276. + newgraph
  277. + xaxis min 1 max 25 size 6.000 nodraw
  278. + yaxis min .25 max 5 size 1.14 nodraw
  279. + y_translate -1.5
  280. + 
  281. + newstring x 12.5 y .25 vjc hjc : (b)
  282. + 
  283. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  284. +     1 5 21 4 21 3 21 2 21 1 
  285. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  286. +     1 4 3 3 7 2 13 1 
  287. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  288. +     1 3 3 2 7 1 
  289. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  290. +     1 2 3 1 
  291. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  292. +     1 1 
  293. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  294. +     2 5 3 4 7 3 13 2 21 1 
  295. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  296. +     2 4 3 3 
  297. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  298. +     2 3 3 2 
  299. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  300. +     2 2 3 1 
  301. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  302. +     2 1 
  303. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  304. +     3 5 3 4 
  305. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  306. +     4 5 3 4 
  307. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  308. +     4 4 3 3 
  309. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  310. +     4 3 3 2 
  311. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  312. +     4 2 3 1 
  313. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  314. +     4 1 
  315. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  316. +     5 5 7 4 13 3 21 2 
  317. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  318. +     5 4 7 3 
  319. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  320. +     5 3 7 2 
  321. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  322. +     5 2 7 1 
  323. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  324. +     5 1 
  325. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  326. +     6 5 7 4 
  327. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  328. +     6 4 7 3 
  329. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  330. +     6 3 7 2 
  331. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  332. +     6 2 7 1 
  333. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  334. +     6 1 
  335. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  336. +     7 5 7 4 
  337. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  338. +     8 5 7 4 
  339. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  340. +     8 4 7 3 
  341. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  342. +     8 3 7 2 
  343. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  344. +     8 2 7 1 
  345. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  346. +     8 1 
  347. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  348. +     9 5 7 4 
  349. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  350. +     9 4 7 3 
  351. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  352. +     9 3 7 2 
  353. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  354. +     9 2 7 1 
  355. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  356. +     9 1 
  357. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  358. +     10 5 13 4 21 3 
  359. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  360. +     10 4 13 3 
  361. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  362. +     10 3 13 2 
  363. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  364. +     10 2 13 1 
  365. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  366. +     10 1 
  367. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  368. +     11 5 13 4 
  369. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  370. +     11 4 13 3 
  371. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  372. +     11 3 13 2 
  373. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  374. +     11 2 13 1 
  375. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  376. +     11 1 
  377. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  378. +     12 5 13 4 
  379. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  380. +     12 4 13 3 
  381. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  382. +     12 3 13 2 
  383. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  384. +     12 2 13 1 
  385. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  386. +     12 1 
  387. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  388. +     13 5 13 4 
  389. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  390. +     14 5 13 4 
  391. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  392. +     14 4 13 3 
  393. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  394. +     14 3 13 2 
  395. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  396. +     14 2 13 1 
  397. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  398. +     14 1 
  399. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  400. +     15 5 13 4 
  401. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  402. +     15 4 13 3 
  403. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  404. +     15 3 13 2 
  405. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  406. +     15 2 13 1 
  407. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  408. +     15 1 
  409. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  410. +     16 5 13 4 
  411. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  412. +     16 4 13 3 
  413. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  414. +     16 3 13 2 
  415. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  416. +     16 2 13 1 
  417. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  418. +     16 1 
  419. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  420. +     17 5 21 4 
  421. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  422. +     17 4 21 3 
  423. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  424. +     17 3 21 2 
  425. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  426. +     17 2 21 1 
  427. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  428. +     17 1 
  429. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  430. +     18 5 21 4 
  431. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  432. +     18 4 21 3 
  433. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  434. +     18 3 21 2 
  435. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  436. +     18 2 21 1 
  437. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  438. +     18 1 
  439. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  440. +     19 5 21 4 
  441. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  442. +     19 4 21 3 
  443. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  444. +     19 3 21 2 
  445. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  446. +     19 2 21 1 
  447. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  448. +     19 1 
  449. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  450. +     20 5 21 4 
  451. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  452. +     20 4 21 3 
  453. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  454. +     20 3 21 2 
  455. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  456. +     20 2 21 1 
  457. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  458. +     20 1 
  459. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  460. +     21 5 21 4 
  461. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  462. +     22 5 21 4 
  463. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  464. +     22 4 21 3 
  465. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  466. +     22 3 21 2 
  467. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  468. +     22 2 21 1 
  469. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  470. +     22 1 
  471. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  472. +     23 5 21 4 
  473. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  474. +     23 4 21 3 
  475. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  476. +     23 3 21 2 
  477. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  478. +     23 2 21 1 
  479. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  480. +     23 1 
  481. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  482. +     24 5 21 4 
  483. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  484. +     24 4 21 3 
  485. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  486. +     24 3 21 2 
  487. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  488. +     24 2 21 1 
  489. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  490. +     24 1 
  491. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  492. +     25 5 21 4 
  493. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  494. +     25 4 21 3 
  495. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  496. +     25 3 21 2 
  497. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  498. +     25 2 21 1 
  499. + newcurve linetype solid marktype circle marksize 0.200 0.200 pts
  500. +     25 1 
  501. + 
  502. *** ../work/draw.c    Tue Feb 25 22:26:45 1992
  503. --- draw.c    Tue Feb 25 22:28:20 1992
  504. ***************
  505. *** 1,7 ****
  506.   /* 
  507.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/draw.c,v $
  508. !  * $Revision: 7.3 $
  509. !  * $Date: 92/02/04 12:20:48 $
  510.    * $Author: jsp $
  511.    */
  512.   
  513. --- 1,7 ----
  514.   /* 
  515.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/draw.c,v $
  516. !  * $Revision: 7.5 $
  517. !  * $Date: 92/02/10 10:36:49 $
  518.    * $Author: jsp $
  519.    */
  520.   
  521. ***************
  522. *** 57,63 ****
  523.     setlinewidth(1.0);
  524.     comment("Drawing Axis");
  525.     gsave();
  526. !   printf("%f setgray\n", a->gray);
  527.     if (a->draw_axis_line) {
  528.       printline(0.0, a->draw_at, a->psize, a->draw_at, orientation);
  529.     }
  530. --- 57,63 ----
  531.     setlinewidth(1.0);
  532.     comment("Drawing Axis");
  533.     gsave();
  534. !   setgray(a->graytype, a->gray);
  535.     if (a->draw_axis_line) {
  536.       printline(0.0, a->draw_at, a->psize, a->draw_at, orientation);
  537.     }
  538. ***************
  539. *** 81,88 ****
  540.         draw_label(a->hl);
  541.       }
  542.     }
  543. !   if (a->grid_lines) {
  544. !     for (h = first(a->hash_lines); h != nil(a->hash_lines); h = next(h)) {
  545.         printline(h->loc, 0.0, h->loc, other->psize, orientation);
  546.       }
  547.     }
  548. --- 81,88 ----
  549.         draw_label(a->hl);
  550.       }
  551.     }
  552. !   for (h = first(a->hash_lines); h != nil(a->hash_lines); h = next(h)) {
  553. !     if ((h->major && a->grid_lines) || (!h->major && a->mgrid_lines)) {
  554.         printline(h->loc, 0.0, h->loc, other->psize, orientation);
  555.       }
  556.     }
  557. ***************
  558. *** 138,144 ****
  559.      float this_x, this_y, last_x, last_y;
  560.   
  561.     gsave();
  562. !   printf("%f setgray\n", c->gray);
  563.     if (c->clip) set_clip(g);
  564.     comment("Drawing Curve");
  565.     if (c->linetype != '0') {
  566. --- 138,144 ----
  567.      float this_x, this_y, last_x, last_y;
  568.   
  569.     gsave();
  570. !   setgray(c->graytype, c->gray);
  571.     if (c->clip) set_clip(g);
  572.     comment("Drawing Curve");
  573.     if (c->linetype != '0') {
  574. ***************
  575. *** 228,240 ****
  576.                 cont_poly(x+ms0, y-ms1);
  577.                 cont_poly(x+ms0, y+ms1);
  578.                 cont_poly(x-ms0, y+ms1);
  579. !               end_poly(c->fill);
  580.                 break;
  581.       case 'd': start_poly(x-ms0, y);
  582.                 cont_poly(x, y-ms1);
  583.                 cont_poly(x+ms0, y);
  584.                 cont_poly(x, y+ms1);
  585. !               end_poly(c->fill);
  586.                 break;
  587.       case 'g': p = first(c->general_marks);
  588.                 if (p == nil(c->general_marks)) return;
  589. --- 228,240 ----
  590.                 cont_poly(x+ms0, y-ms1);
  591.                 cont_poly(x+ms0, y+ms1);
  592.                 cont_poly(x-ms0, y+ms1);
  593. !               end_poly(c->filltype, c->fill);
  594.                 break;
  595.       case 'd': start_poly(x-ms0, y);
  596.                 cont_poly(x, y-ms1);
  597.                 cont_poly(x+ms0, y);
  598.                 cont_poly(x, y+ms1);
  599. !               end_poly(c->filltype, c->fill);
  600.                 break;
  601.       case 'g': p = first(c->general_marks);
  602.                 if (p == nil(c->general_marks)) return;
  603. ***************
  604. *** 242,272 ****
  605.                 start_poly(x+p->x*ms0, y+p->y*ms1);
  606.                 for(p = next(p); p != nil(c->general_marks); p = next(p))
  607.                   cont_poly(x+p->x*ms0, y+p->y*ms1);
  608. !               end_poly(c->fill);
  609.                 break;
  610.       case 'x': printline(x-ms0, y-ms1, x+ms0, y+ms1, 'x');
  611.                 printline(x-ms0, y+ms1, x+ms0, y-ms1, 'x');
  612.                 break;
  613. !     case 'o': printellipse(x, y, ms0, ms0, c->fill);
  614.                 break;
  615. !     case 'e': printellipse(x, y, ms0, ms1, c->fill);
  616.                 break;
  617.       case 't': start_poly(x+ms0, y-ms1);
  618.                 cont_poly(x, y+ms1);
  619.                 cont_poly(x-ms0, y-ms1);
  620. !               end_poly(c->fill);
  621.                 break;
  622.       case 'X': start_poly(x+ms0, y);
  623.                 cont_poly(x-ms0, y);
  624.                 cont_poly(x-ms0, g->x_axis->draw_at);
  625.                 cont_poly(x+ms0, g->x_axis->draw_at);
  626. !               end_poly(c->fill);
  627.                 break;
  628.       case 'Y': start_poly(x, y+ms1);
  629.                 cont_poly(x, y-ms1);
  630.                 cont_poly(g->y_axis->draw_at, y-ms1);
  631.                 cont_poly(g->y_axis->draw_at, y+ms1);
  632. !               end_poly(c->fill);
  633.                 break;
  634.       case 'l': c->lmark->x += x;
  635.                 c->lmark->y += y;
  636. --- 242,272 ----
  637.                 start_poly(x+p->x*ms0, y+p->y*ms1);
  638.                 for(p = next(p); p != nil(c->general_marks); p = next(p))
  639.                   cont_poly(x+p->x*ms0, y+p->y*ms1);
  640. !               end_poly(c->filltype, c->fill);
  641.                 break;
  642.       case 'x': printline(x-ms0, y-ms1, x+ms0, y+ms1, 'x');
  643.                 printline(x-ms0, y+ms1, x+ms0, y-ms1, 'x');
  644.                 break;
  645. !     case 'o': printellipse(x, y, ms0, ms0, c->filltype, c->fill);
  646.                 break;
  647. !     case 'e': printellipse(x, y, ms0, ms1, c->filltype, c->fill);
  648.                 break;
  649.       case 't': start_poly(x+ms0, y-ms1);
  650.                 cont_poly(x, y+ms1);
  651.                 cont_poly(x-ms0, y-ms1);
  652. !               end_poly(c->filltype, c->fill);
  653.                 break;
  654.       case 'X': start_poly(x+ms0, y);
  655.                 cont_poly(x-ms0, y);
  656.                 cont_poly(x-ms0, g->x_axis->draw_at);
  657.                 cont_poly(x+ms0, g->x_axis->draw_at);
  658. !               end_poly(c->filltype, c->fill);
  659.                 break;
  660.       case 'Y': start_poly(x, y+ms1);
  661.                 cont_poly(x, y-ms1);
  662.                 cont_poly(g->y_axis->draw_at, y-ms1);
  663.                 cont_poly(g->y_axis->draw_at, y+ms1);
  664. !               end_poly(c->filltype, c->fill);
  665.                 break;
  666.       case 'l': c->lmark->x += x;
  667.                 c->lmark->y += y;
  668. ***************
  669. *** 315,321 ****
  670.     start_poly(0.0, 0.0);
  671.     cont_poly(-(c->asize[0]), (c->asize[1]));
  672.     cont_poly(-(c->asize[0]), -(c->asize[1]));
  673. !   end_poly(c->fill);
  674.     grestore();
  675.     printf("\n");
  676.   }
  677. --- 315,321 ----
  678.     start_poly(0.0, 0.0);
  679.     cont_poly(-(c->asize[0]), (c->asize[1]));
  680.     cont_poly(-(c->asize[0]), -(c->asize[1]));
  681. !   end_poly(c->filltype, c->fill);
  682.     grestore();
  683.     printf("\n");
  684.   }
  685. ***************
  686. *** 334,340 ****
  687.     for (c = first(g->curves); c != nil(g->curves); c = next(c)) {
  688.       if (c->l->label != CNULL) {
  689.         gsave();
  690. !       printf("%f setgray\n", c->gray);
  691.         y = c->l->y - (c->l->fontsize / 2.0 * FCPI / FPPI);
  692.         if (l->anylines) {
  693.           if (c->linetype != '0' && l->linelength != 0) {
  694. --- 334,340 ----
  695.     for (c = first(g->curves); c != nil(g->curves); c = next(c)) {
  696.       if (c->l->label != CNULL) {
  697.         gsave();
  698. !       setgray(c->graytype, c->gray);
  699.         y = c->l->y - (c->l->fontsize / 2.0 * FCPI / FPPI);
  700.         if (l->anylines) {
  701.           if (c->linetype != '0' && l->linelength != 0) {
  702. ***************
  703. *** 443,448 ****
  704. --- 443,449 ----
  705.     }
  706.     printf("1 setlinecap 1 setlinejoin\n");
  707.     printf("0.700 setlinewidth\n");
  708. +   printf("0.00 setgray\n");
  709.     gsave();
  710.     setfont("Times-Roman", 9.00);
  711.   }
  712. *** ../work/edit.c    Tue Feb 25 22:26:47 1992
  713. --- edit.c    Tue Feb 25 22:28:22 1992
  714. ***************
  715. *** 1,7 ****
  716.   /* 
  717.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/edit.c,v $
  718. !  * $Revision: 7.3 $
  719. !  * $Date: 92/02/04 12:20:49 $
  720.    * $Author: jsp $
  721.    */
  722.   
  723. --- 1,7 ----
  724.   /* 
  725.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/edit.c,v $
  726. !  * $Revision: 7.5 $
  727. !  * $Date: 92/02/10 10:36:50 $
  728.    * $Author: jsp $
  729.    */
  730.   
  731. ***************
  732. *** 65,71 ****
  733.     copy_label(c1->lmark, c2->lmark);
  734.     c1->l->label = CNULL;
  735.     c1->clip = c2->clip;
  736. -   c1->gray = c2->gray;
  737.     for (f = first(c2->gen_linetype); 
  738.          f != nil(c2->gen_linetype); 
  739.          f = next(f)) {
  740. --- 65,70 ----
  741. ***************
  742. *** 86,92 ****
  743.       newp->y = p->y;
  744.       insert(newp, c1->general_marks);
  745.     }
  746. !   c1->fill = c2->fill;
  747.     c1->rarrows = c2->rarrows;
  748.     c1->larrows = c2->larrows;
  749.     c1->asize[0] = c2->asize[0];
  750. --- 85,98 ----
  751.       newp->y = p->y;
  752.       insert(newp, c1->general_marks);
  753.     }
  754. !   c1->graytype = c2->graytype;
  755. !   c1->gray[0] = c2->gray[0];
  756. !   c1->gray[1] = c2->gray[1];
  757. !   c1->gray[2] = c2->gray[2];
  758. !   c1->filltype = c2->filltype;
  759. !   c1->fill[0] = c2->fill[0];
  760. !   c1->fill[1] = c2->fill[1];
  761. !   c1->fill[2] = c2->fill[2];
  762.     c1->rarrows = c2->rarrows;
  763.     c1->larrows = c2->larrows;
  764.     c1->asize[0] = c2->asize[0];
  765. ***************
  766. *** 131,138 ****
  767.     a1->auto_hash_marks = a2->auto_hash_marks;
  768.     a1->minor_hashes = a2->minor_hashes;
  769.     a1->hash_scale = a2->hash_scale;
  770. !   a1->gray = a2->gray;
  771.     a1->grid_lines = a2->grid_lines;
  772.     a1->precision = a2->precision;
  773.     a1->start_given = a2->start_given;
  774.     a1->is_lg = a2->is_lg;
  775. --- 137,148 ----
  776.     a1->auto_hash_marks = a2->auto_hash_marks;
  777.     a1->minor_hashes = a2->minor_hashes;
  778.     a1->hash_scale = a2->hash_scale;
  779. !   a1->graytype = a2->graytype;
  780. !   a1->gray[0] = a2->gray[0];
  781. !   a1->gray[1] = a2->gray[1];
  782. !   a1->gray[2] = a2->gray[2];
  783.     a1->grid_lines = a2->grid_lines;
  784. +   a1->mgrid_lines = a2->mgrid_lines;
  785.     a1->precision = a2->precision;
  786.     a1->start_given = a2->start_given;
  787.     a1->is_lg = a2->is_lg;
  788. ***************
  789. *** 339,345 ****
  790.         }
  791.         rejecttoken();
  792.       } else if (strcmp(inp_str, "fill") == 0) {
  793. !       if (!getfloat(&f)) rejecttoken(); else c->fill = f;
  794.       } else if (strcmp(inp_str, "marktype") == 0) {
  795.         if (!getstring(inp_str)) return;
  796.         for (i = 0; i < NMARKTYPES && strcmp(inp_str, MARKTYPESTRS[i]) != 0; i++) ;
  797. --- 349,369 ----
  798.         }
  799.         rejecttoken();
  800.       } else if (strcmp(inp_str, "fill") == 0) {
  801. !     if (!getfloat(&f)) rejecttoken(); else {
  802. !       /* grey fill */
  803. !       c->filltype = 'g';
  804. !           c->fill[0] = f;
  805. !     }
  806. !     } else if (strcmp(inp_str, "cfill") == 0) {
  807. !      /* color fill */
  808. !     c->filltype = 'c';
  809. !     for( i = 0 ; i < 3 ; i++ )  {
  810. !       if(!getfloat(&f)) { 
  811. !         rejecttoken(); 
  812. !          c->filltype = 'n';
  813. !             break ;
  814. !       } else c->fill[i] = f ;
  815. !     }
  816.       } else if (strcmp(inp_str, "marktype") == 0) {
  817.         if (!getstring(inp_str)) return;
  818.         for (i = 0; i < NMARKTYPES && strcmp(inp_str, MARKTYPESTRS[i]) != 0; i++) ;
  819. ***************
  820. *** 384,390 ****
  821.       } else if (strcmp(inp_str, "linethickness") == 0) {
  822.         if (!getfloat(&f)) rejecttoken(); else c->linethick = f;
  823.       } else if (strcmp(inp_str, "gray") == 0) {
  824. !       if (!getfloat(&f)) rejecttoken(); else c->gray = f;
  825.       } else if (strcmp(inp_str, "larrows") == 0) {
  826.         c->larrows = 1;
  827.       } else if (strcmp(inp_str, "nolarrows") == 0) {
  828. --- 408,426 ----
  829.       } else if (strcmp(inp_str, "linethickness") == 0) {
  830.         if (!getfloat(&f)) rejecttoken(); else c->linethick = f;
  831.       } else if (strcmp(inp_str, "gray") == 0) {
  832. !         if (!getfloat(&f)) rejecttoken(); else {
  833. !           c->graytype = 'g';
  834. !           c->gray[0] = f;
  835. !         }
  836. !     } else if (strcmp(inp_str, "color") == 0) {
  837. !         c->graytype = 'c';
  838. !         for( i = 0 ; i < 3 ; i++ )  {
  839. !           if(!getfloat(&f)) {
  840. !             rejecttoken();
  841. !             c->graytype = 'n';
  842. !             break ;
  843. !           } else c->gray[i] = f ;
  844. !         }
  845.       } else if (strcmp(inp_str, "larrows") == 0) {
  846.         c->larrows = 1;
  847.       } else if (strcmp(inp_str, "nolarrows") == 0) {
  848. ***************
  849. *** 513,519 ****
  850.         if (getfloat(&f)) {
  851.           h = (Hash) get_node (a->hash_lines);
  852.           h->loc = f;
  853. !         h->size = (inp_str[0] == 'h') ? HASH_SIZE : MHASH_SIZE;
  854.           insert(h, a->hash_lines);
  855.         } else rejecttoken();
  856.       } else if (strcmp(inp_str, "hash_label") == 0) {
  857. --- 549,556 ----
  858.         if (getfloat(&f)) {
  859.           h = (Hash) get_node (a->hash_lines);
  860.           h->loc = f;
  861. !         h->major = (inp_str[0] == 'h');
  862. !         h->size = h->major ? HASH_SIZE : MHASH_SIZE;
  863.           insert(h, a->hash_lines);
  864.         } else rejecttoken();
  865.       } else if (strcmp(inp_str, "hash_label") == 0) {
  866. ***************
  867. *** 556,563 ****
  868.         a->grid_lines = 0;
  869.       } else if (strcmp(inp_str, "grid_lines") == 0) {
  870.         a->grid_lines = 1;
  871.       } else if (strcmp(inp_str, "gray") == 0) {
  872. !       if ( getfloat(&f)) a->gray = f; else rejecttoken();
  873.       } else {
  874.         rejecttoken(); 
  875.         return;
  876. --- 593,616 ----
  877.         a->grid_lines = 0;
  878.       } else if (strcmp(inp_str, "grid_lines") == 0) {
  879.         a->grid_lines = 1;
  880. +     } else if (strcmp(inp_str, "no_mgrid_lines") == 0) {
  881. +       a->mgrid_lines = 0;
  882. +     } else if (strcmp(inp_str, "mgrid_lines") == 0) {
  883. +       a->mgrid_lines = 1;
  884.       } else if (strcmp(inp_str, "gray") == 0) {
  885. !       if (!getfloat(&f)) rejecttoken(); else {
  886. !         a->graytype = 'g';
  887. !         a->gray[0] = f;
  888. !       }
  889. !     } else if (strcmp(inp_str, "color") == 0) {
  890. !       a->graytype = 'c';
  891. !       for( i = 0 ; i < 3 ; i++ )  {
  892. !         if(!getfloat(&f)) {
  893. !           rejecttoken();
  894. !           a->graytype = 'n';
  895. !           break ;
  896. !         } else a->gray[i] = f ;
  897. !       }
  898.       } else {
  899.         rejecttoken(); 
  900.         return;
  901. *** ../work/gpaper.jgr    Tue Feb 25 22:26:48 1992
  902. --- gpaper.jgr    Tue Feb 25 22:28:27 1992
  903. ***************
  904. *** 1,24 ****
  905.   newgraph
  906.   
  907. ! xaxis size 8 min 0 max 8 hash 1 mhash 9 
  908. ! yaxis size 10.5 min 0 max 10.5 hash 1 mhash 9
  909.   
  910. ! newgraph
  911. ! inherit_axes
  912.   
  913.   xaxis hash_scale 1
  914.   yaxis hash_scale 1
  915.   
  916. ! newgraph
  917. ! inherit_axes
  918. ! 
  919. ! xaxis gray .5 grid_lines 
  920. ! yaxis gray .5 grid_lines
  921. ! 
  922. ! newgraph 
  923. ! inherit_axes
  924. ! 
  925. ! xaxis gray 0 mhash 0 grid_lines
  926. ! yaxis gray 0 mhash 0 grid_lines
  927. ! 
  928.   
  929. --- 1,14 ----
  930.   newgraph
  931.   
  932. ! xaxis size 7 min 0 max 7 hash 1 mhash 9  grid_lines
  933. ! yaxis size 9 min 0 max 9 hash 1 mhash 9 grid_lines
  934.   
  935. ! copygraph
  936.   
  937.   xaxis hash_scale 1
  938.   yaxis hash_scale 1
  939.   
  940. ! copygraph
  941. ! xaxis gray .5 nodraw no_grid_lines mgrid_lines 
  942. ! yaxis gray .5 nodraw no_grid_lines mgrid_lines
  943.   
  944. *** ../work/jgraph.1    Tue Feb 25 22:26:49 1992
  945. --- jgraph.1    Tue Feb 25 22:28:29 1992
  946. ***************
  947. *** 597,605 ****
  948.   .TP
  949.   \fBno_grid_lines\fR
  950.   \fBGrid_lines\fR
  951. ! specifies to plot a grid line at each (major and minor) hash
  952.   mark on this axis.  The default is 
  953.   \fBno_grid_lines.\fR
  954.   .PD
  955.   .RE
  956.   .LP
  957. --- 597,615 ----
  958.   .TP
  959.   \fBno_grid_lines\fR
  960.   \fBGrid_lines\fR
  961. ! specifies to plot a grid line at each major hash
  962.   mark on this axis.  The default is 
  963.   \fBno_grid_lines.\fR
  964. + .TP
  965. + \fBmgrid_lines\fR
  966. + .br
  967. + .ns
  968. + .TP
  969. + \fBno_mgrid_lines\fR
  970. + \fBGrid_lines\fR
  971. + specifies to plot a grid line at each minor hash
  972. + mark on this axis.  The default is 
  973. + \fBno_mgrid_lines.\fR
  974.   .PD
  975.   .RE
  976.   .LP
  977. ***************
  978. *** 657,672 ****
  979.   \fBjgraph\fR
  980.   .TP
  981.   \fBgray \|[\fIfloat\fB\|]\fR   
  982. ! This specifies the gray scale in which to draw the curve (i.e. the
  983. ! curve's marks, lines, and arrows).  0.0 (The default) is black.
  984. ! 1.0 is white.
  985.   .TP
  986.   \fBfill \|[\fIfloat\fB\|]\fR   
  987.   This sets the filling of marks which define an area
  988. ! to fill (e.g.  ``box'', ``circle'', ``xbar'').  1.0 fills the mark with
  989. ! white.  0.0 fills it with black.  Anything in between is differing
  990. ! levels of gray.  Anything negative fills it with nothing (i.e.  makes
  991. ! it see-through).  The default is 0 (black).
  992.   .TP
  993.   \fBgmarks \|[\|{\fIfloat\fB\|} \|{\fIfloat\fB\|}\|]*\fR   
  994.   \fBGmarks\fR
  995. --- 667,704 ----
  996.   \fBjgraph\fR
  997.   .TP
  998.   \fBgray \|[\fIfloat\fB\|]\fR   
  999. ! .br
  1000. ! .ns
  1001.   .TP
  1002. + \fBcolor \|[\fIfloat\fB \fIfloat\fB \fIfloat\fB\|]\fR   
  1003. + These specify either the grayness of the curve or its color.  Values 
  1004. + for 
  1005. + \fBgray\fR   
  1006. + should be from 0 (black) to 1 (white).  Values for
  1007. + \fBcolor\fR   
  1008. + should also be from 0 to 1.  They are RGB values, and thus define the 
  1009. + amount of red, green and blue in the curve respectively.  Specifying
  1010. + color nullifies the gray value, and vice versa.  The default is 
  1011. + \fBgray 0\fR.
  1012. + .TP
  1013.   \fBfill \|[\fIfloat\fB\|]\fR   
  1014. + .br
  1015. + .ns
  1016. + .TP
  1017. + \fBcfill \|[\fIfloat\fB\| \|\fIfloat\fB\| \|\fIfloat\fB\|]\fR   
  1018.   This sets the filling of marks which define an area
  1019. ! to fill (e.g.  ``box'', ``circle'', ``xbar'').  
  1020. ! \fBfill\fR   
  1021. ! defines a gray value, and 
  1022. ! \fBcfill\fR   
  1023. ! defines a color value (see 
  1024. ! \fBgray\fR   
  1025. ! and
  1026. ! \fBcolor\fR   
  1027. ! above for a description of the units).
  1028. ! The default is 
  1029. ! \fBfill 0\fR   
  1030. ! (black).
  1031.   .TP
  1032.   \fBgmarks \|[\|{\fIfloat\fB\|} \|{\fIfloat\fB\|}\|]*\fR   
  1033.   \fBGmarks\fR
  1034. ***************
  1035. *** 944,954 ****
  1036.   marks, labels, axes, etc.
  1037.   .RS
  1038.   .TP
  1039. ! \fBgray \|[\fIfloat\fB\|]\fR   
  1040. ! This specifies a gray-scale for drawing the axes (axis lines, hash
  1041. ! marks, hash labels and grid lines).  The default is 0.0 (black). 
  1042. ! 1.0 is white.
  1043.   .TP
  1044.   \fBhash_at \|[\fIfloat\fB\|]\fR   
  1045.   Draw a hash mark at this point.  No label is
  1046.   made for this hash mark.
  1047. --- 976,997 ----
  1048.   marks, labels, axes, etc.
  1049.   .RS
  1050.   .TP
  1051. ! \fBgray \|[\fIfloat\fB\|]\fR
  1052. ! .br
  1053. ! .ns
  1054.   .TP
  1055. + \fBcolor \|[\fIfloat\fB \fIfloat\fB \fIfloat\fB\|]\fR
  1056. + These specify either the grayness of the axis or its color.  Values
  1057. + for
  1058. + \fBgray\fR
  1059. + should be from 0 (black) to 1 (white).  Values for
  1060. + \fBcolor\fR
  1061. + should also be from 0 to 1.  They are RGB values, and thus define the
  1062. + amount of red, green and blue in the axis respectively.  Specifying
  1063. + color nullifies the gray value, and vice versa.  The default is
  1064. + \fBgray 0\fR.  These values affect every part of the axis:  the label,
  1065. + the hash marks and labels, the axis line and the grid lines.
  1066. + .TP
  1067.   \fBhash_at \|[\fIfloat\fB\|]\fR   
  1068.   Draw a hash mark at this point.  No label is
  1069.   made for this hash mark.
  1070. ***************
  1071. *** 1216,1219 ****
  1072.   .sp
  1073.   There may well be loads of other bugs.  Send to jsp@princeton.edu.
  1074.   .sp
  1075. ! This is $Revision: 7.3 $.
  1076. --- 1259,1262 ----
  1077.   .sp
  1078.   There may well be loads of other bugs.  Send to jsp@princeton.edu.
  1079.   .sp
  1080. ! This is $Revision: 7.5 $.
  1081. *** ../work/jgraph.c    Tue Feb 25 22:26:51 1992
  1082. --- jgraph.c    Tue Feb 25 22:28:30 1992
  1083. ***************
  1084. *** 1,7 ****
  1085.   /* 
  1086.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/jgraph.c,v $
  1087. !  * $Revision: 7.3 $
  1088. !  * $Date: 92/02/04 12:20:57 $
  1089.    * $Author: jsp $
  1090.    */
  1091.   
  1092. --- 1,7 ----
  1093.   /* 
  1094.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/jgraph.c,v $
  1095. !  * $Revision: 7.5 $
  1096. !  * $Date: 92/02/10 10:36:56 $
  1097.    * $Author: jsp $
  1098.    */
  1099.   
  1100. ***************
  1101. *** 51,57 ****
  1102.     new_c->lmark->hj = 'c';
  1103.     new_c->lmark->vj = 'c';
  1104.     new_c->clip = 0;
  1105. !   new_c->gray = 0.0;
  1106.     
  1107.     new_c->pts = (Point) make_list(sizeof(struct point));
  1108.     new_c->npts = 0;
  1109. --- 51,60 ----
  1110.     new_c->lmark->hj = 'c';
  1111.     new_c->lmark->vj = 'c';
  1112.     new_c->clip = 0;
  1113. !   new_c->graytype = 'n';
  1114. !   new_c->gray[0] = 0.0;
  1115. !   new_c->gray[1] = 0.0;
  1116. !   new_c->gray[2] = 0.0;
  1117.     
  1118.     new_c->pts = (Point) make_list(sizeof(struct point));
  1119.     new_c->npts = 0;
  1120. ***************
  1121. *** 62,68 ****
  1122.     new_c->marksize[0] = FSIG;
  1123.     new_c->marksize[1] = FSIG;
  1124.     new_c->general_marks = (Point) make_list(sizeof(struct point));
  1125. !   new_c->fill = 0.0;
  1126.     new_c->rarrows = 0;
  1127.     new_c->larrows = 0;
  1128.     new_c->asize[0] = FSIG;
  1129. --- 65,74 ----
  1130.     new_c->marksize[0] = FSIG;
  1131.     new_c->marksize[1] = FSIG;
  1132.     new_c->general_marks = (Point) make_list(sizeof(struct point));
  1133. !   new_c->filltype = 'n';
  1134. !   new_c->fill[0] = 0.0;
  1135. !   new_c->fill[1] = 0.0;
  1136. !   new_c->fill[2] = 0.0;
  1137.     new_c->rarrows = 0;
  1138.     new_c->larrows = 0;
  1139.     new_c->asize[0] = FSIG;
  1140. ***************
  1141. *** 135,141 ****
  1142.     a->start_given = 0;
  1143.     a->hash_scale = -1.0;
  1144.     a->grid_lines = 0;
  1145. !   a->gray = 0.0;
  1146.     a->is_x = is_x;
  1147.     a->is_lg = 0;
  1148.     a->hash_labels = (String) make_list (sizeof(struct string));
  1149. --- 141,151 ----
  1150.     a->start_given = 0;
  1151.     a->hash_scale = -1.0;
  1152.     a->grid_lines = 0;
  1153. !   a->mgrid_lines = 0;
  1154. !   a->graytype = 'n';
  1155. !   a->gray[0] = 0.0;
  1156. !   a->gray[1] = 0.0;
  1157. !   a->gray[2] = 0.0;
  1158.     a->is_x = is_x;
  1159.     a->is_lg = 0;
  1160.     a->hash_labels = (String) make_list (sizeof(struct string));
  1161. *** ../work/jgraph.h    Tue Feb 25 22:26:52 1992
  1162. --- jgraph.h    Tue Feb 25 22:28:31 1992
  1163. ***************
  1164. *** 1,7 ****
  1165.   /* 
  1166.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/jgraph.h,v $
  1167. !  * $Revision: 7.3 $
  1168. !  * $Date: 92/02/04 12:21:00 $
  1169.    * $Author: jsp $
  1170.    */
  1171.   
  1172. --- 1,7 ----
  1173.   /* 
  1174.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/jgraph.h,v $
  1175. !  * $Revision: 7.5 $
  1176. !  * $Date: 92/02/10 10:37:00 $
  1177.    * $Author: jsp $
  1178.    */
  1179.   
  1180. ***************
  1181. *** 55,64 ****
  1182.     int npts;
  1183.     Point general_marks;
  1184.     float marksize[2];
  1185. !   float fill;
  1186. !   float gray;
  1187.     float linethick;
  1188.     Flist gen_linetype;
  1189.     char marktype;
  1190.     char linetype;
  1191.     int rarrows;
  1192. --- 55,66 ----
  1193.     int npts;
  1194.     Point general_marks;
  1195.     float marksize[2];
  1196. !   float fill[3];
  1197. !   float gray[3];
  1198.     float linethick;
  1199.     Flist gen_linetype;
  1200. +   char graytype ;
  1201. +   char filltype ;
  1202.     char marktype;
  1203.     char linetype;
  1204.     int rarrows;
  1205. ***************
  1206. *** 80,85 ****
  1207. --- 82,88 ----
  1208.     struct hash *blink;
  1209.     float loc;
  1210.     float size;
  1211. +   int major;
  1212.   } *Hash;
  1213.   
  1214.   typedef struct deflt {
  1215. ***************
  1216. *** 114,121 ****
  1217.     float draw_hash_marks_at;
  1218.     float draw_hash_labels_at;
  1219.     float draw_at;
  1220. !   float gray;
  1221.     int grid_lines;
  1222.     int draw_hash_labels;
  1223.     int draw_axis_line;
  1224.     int draw_hash_marks;
  1225. --- 117,126 ----
  1226.     float draw_hash_marks_at;
  1227.     float draw_hash_labels_at;
  1228.     float draw_at;
  1229. !   float gray[3];
  1230. !   char graytype;
  1231.     int grid_lines;
  1232. +   int mgrid_lines;
  1233.     int draw_hash_labels;
  1234.     int draw_axis_line;
  1235.     int draw_hash_marks;
  1236. *** ../work/list.c    Tue Feb 25 22:26:53 1992
  1237. --- list.c    Tue Feb 25 22:28:31 1992
  1238. ***************
  1239. *** 1,7 ****
  1240.   /* 
  1241.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/list.c,v $
  1242. !  * $Revision: 7.3 $
  1243. !  * $Date: 92/02/04 12:21:02 $
  1244.    * $Author: jsp $
  1245.    */
  1246.   
  1247. --- 1,7 ----
  1248.   /* 
  1249.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/list.c,v $
  1250. !  * $Revision: 7.5 $
  1251. !  * $Date: 92/02/10 10:37:01 $
  1252.    * $Author: jsp $
  1253.    */
  1254.   
  1255. *** ../work/list.h    Tue Feb 25 22:26:54 1992
  1256. --- list.h    Tue Feb 25 22:28:32 1992
  1257. ***************
  1258. *** 1,7 ****
  1259.   /* 
  1260.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/list.h,v $
  1261. !  * $Revision: 7.3 $
  1262. !  * $Date: 92/02/04 12:21:04 $
  1263.    * $Author: jsp $
  1264.    */
  1265.   
  1266. --- 1,7 ----
  1267.   /* 
  1268.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/list.h,v $
  1269. !  * $Revision: 7.5 $
  1270. !  * $Date: 92/02/10 10:37:03 $
  1271.    * $Author: jsp $
  1272.    */
  1273.   
  1274. *** ../work/printline.c    Tue Feb 25 22:26:55 1992
  1275. --- printline.c    Tue Feb 25 22:28:33 1992
  1276. ***************
  1277. *** 1,7 ****
  1278.   /* 
  1279.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/printline.c,v $
  1280. !  * $Revision: 7.3 $
  1281. !  * $Date: 92/02/04 12:21:40 $
  1282.    * $Author: jsp $
  1283.    */
  1284.   
  1285. --- 1,7 ----
  1286.   /* 
  1287.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/printline.c,v $
  1288. !  * $Revision: 7.5 $
  1289. !  * $Date: 92/02/10 10:37:06 $
  1290.    * $Author: jsp $
  1291.    */
  1292.   
  1293. ***************
  1294. *** 74,79 ****
  1295. --- 74,103 ----
  1296.     }
  1297.   }
  1298.     
  1299. + setfill( t, f)
  1300. + char t ;
  1301. + float f[] ;
  1302. + {
  1303. +     if ( t == 'g' )  {
  1304. +        if( f[0] >= 0.0 ) printf("gsave %f setgray fill grestore ", f[0] );
  1305. +     } else if ( t == 'c' )  {
  1306. +        printf("gsave %f %f %f setrgbcolor fill grestore ", f[0], f[1], f[2] );
  1307. +     } else {
  1308. +        printf("fill ");
  1309. +     }
  1310. + }
  1311. + 
  1312. + setgray( t, f)
  1313. + char t ;
  1314. + float f[] ;
  1315. + {
  1316. +     if ( t == 'g' )  {
  1317. +        if( f[0] >= 0.0 ) printf("%f setgray\n", f[0] );
  1318. +     } else if ( t == 'c' )  {
  1319. +        printf("%f %f %f setrgbcolor\n", f[0], f[1], f[2] );
  1320. +     }
  1321. + }
  1322. + 
  1323.   printline(x1, y1,x2, y2, orientation)
  1324.   float x1, y1, x2, y2;
  1325.   char orientation;
  1326. ***************
  1327. *** 133,156 ****
  1328.     printf("  %f %f lineto\n", x1, y1);
  1329.   }
  1330.   
  1331. ! end_poly(fill)
  1332. ! float fill;
  1333.   {
  1334. !   if (fill < 0.0) printf("closepath stroke\n");
  1335. !   else {
  1336. !     printf("closepath gsave");
  1337. !     printf(" %f setgray fill ", fill);
  1338. !     printf("grestore stroke\n");
  1339. !   }
  1340.   }
  1341.   
  1342. ! printellipse(x, y, radius1, radius2, fill)
  1343. ! float x, y, radius1, radius2, fill;
  1344.   {
  1345.     printf("newpath %f %f %f %f 0 360 DrawEllipse ", x, y, radius1, radius2);
  1346. !   if (fill < 0)
  1347. !     printf("stroke\n");
  1348. !     else printf("gsave  %f setgray fill grestore stroke\n", fill);
  1349.   }
  1350.   
  1351.   set_comment(c)
  1352. --- 157,178 ----
  1353.     printf("  %f %f lineto\n", x1, y1);
  1354.   }
  1355.   
  1356. ! end_poly(ftype, fill)
  1357. ! char  ftype ;
  1358. ! float fill[];
  1359.   {
  1360. !   printf("closepath ");
  1361. !   setfill( ftype, fill );
  1362. !   printf("stroke\n");
  1363.   }
  1364.   
  1365. ! printellipse(x, y, radius1, radius2, ftype, fill)
  1366. ! char ftype ;
  1367. ! float x, y, radius1, radius2, fill[];
  1368.   {
  1369.     printf("newpath %f %f %f %f 0 360 DrawEllipse ", x, y, radius1, radius2);
  1370. !   setfill( ftype, fill );
  1371. !   printf("stroke\n");
  1372.   }
  1373.   
  1374.   set_comment(c)
  1375. ***************
  1376. *** 196,202 ****
  1377.     } else if (vj == 't') {
  1378.       printf("0 %f rmoveto ", -size * FCPI / FPPI);
  1379.     }
  1380. !   printf("show grestore\n", r);
  1381.   }
  1382.   
  1383.   setlinewidth(size)
  1384. --- 218,224 ----
  1385.     } else if (vj == 't') {
  1386.       printf("0 %f rmoveto ", -size * FCPI / FPPI);
  1387.     }
  1388. !   printf("show grestore\n");
  1389.   }
  1390.   
  1391.   setlinewidth(size)
  1392. *** ../work/prio_list.c    Tue Feb 25 22:26:56 1992
  1393. --- prio_list.c    Tue Feb 25 22:28:34 1992
  1394. ***************
  1395. *** 1,7 ****
  1396.   /* 
  1397.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/prio_list.c,v $
  1398. !  * $Revision: 7.3 $
  1399. !  * $Date: 92/02/04 12:21:41 $
  1400.    * $Author: jsp $
  1401.    */
  1402.   
  1403. --- 1,7 ----
  1404.   /* 
  1405.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/prio_list.c,v $
  1406. !  * $Revision: 7.5 $
  1407. !  * $Date: 92/02/10 10:37:08 $
  1408.    * $Author: jsp $
  1409.    */
  1410.   
  1411. *** ../work/prio_list.h    Tue Feb 25 22:26:58 1992
  1412. --- prio_list.h    Tue Feb 25 22:28:34 1992
  1413. ***************
  1414. *** 1,7 ****
  1415.   /* 
  1416.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/prio_list.h,v $
  1417. !  * $Revision: 7.3 $
  1418. !  * $Date: 92/02/04 12:21:42 $
  1419.    * $Author: jsp $
  1420.    */
  1421.   
  1422. --- 1,7 ----
  1423.   /* 
  1424.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/prio_list.h,v $
  1425. !  * $Revision: 7.5 $
  1426. !  * $Date: 92/02/10 10:37:10 $
  1427.    * $Author: jsp $
  1428.    */
  1429.   
  1430. *** ../work/process.c    Tue Feb 25 22:26:59 1992
  1431. --- process.c    Tue Feb 25 22:28:36 1992
  1432. ***************
  1433. *** 1,7 ****
  1434.   /* 
  1435.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/process.c,v $
  1436. !  * $Revision: 7.3 $
  1437. !  * $Date: 92/02/04 12:21:43 $
  1438.    * $Author: jsp $
  1439.    */
  1440.   
  1441. --- 1,7 ----
  1442.   /* 
  1443.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/process.c,v $
  1444. !  * $Revision: 7.5 $
  1445. !  * $Date: 92/02/10 10:37:11 $
  1446.    * $Author: jsp $
  1447.    */
  1448.   
  1449. ***************
  1450. *** 224,230 ****
  1451.         exit(1);
  1452.       } else if (a->pmin <= 0.0 && a->is_lg) {
  1453.         error_header();
  1454. !       fprintf(stderr, "Graph %d: Trying to derive %c axis\n", AXIS_CHAR(a));
  1455.         fprintf(stderr, 
  1456.           "        Minimum value %f will be -infinity with log axes\n", a->pmin);
  1457.         exit(1);
  1458. --- 224,230 ----
  1459.         exit(1);
  1460.       } else if (a->pmin <= 0.0 && a->is_lg) {
  1461.         error_header();
  1462. !       fprintf(stderr, "Trying to derive %c axis\n", AXIS_CHAR(a));
  1463.         fprintf(stderr, 
  1464.           "        Minimum value %f will be -infinity with log axes\n", a->pmin);
  1465.         exit(1);
  1466. ***************
  1467. *** 240,246 ****
  1468.         exit(1);
  1469.       } else if (a->pmax <= 0.0 && a->is_lg) {
  1470.         error_header();
  1471. !       fprintf(stderr, "Graph %d: Trying to derive %c axis\n", AXIS_CHAR(a));
  1472.         fprintf(stderr, 
  1473.           "        Maximum value %f will be -infinity with log axes\n", a->pmax);
  1474.         exit(1);
  1475. --- 240,246 ----
  1476.         exit(1);
  1477.       } else if (a->pmax <= 0.0 && a->is_lg) {
  1478.         error_header();
  1479. !       fprintf(stderr, "Trying to derive %c axis\n", AXIS_CHAR(a));
  1480.         fprintf(stderr, 
  1481.           "        Maximum value %f will be -infinity with log axes\n", a->pmax);
  1482.         exit(1);
  1483. ***************
  1484. *** 318,323 ****
  1485. --- 318,324 ----
  1486.           h = (Hash) get_node(a->hash_lines);
  1487.           h->loc = hloc;
  1488.           h->size = HASH_SIZE;
  1489. +         h->major = 1;
  1490.           insert(h, a->hash_lines);
  1491.           if (a->auto_hash_labels) {
  1492.             s = (String) get_node (a->hash_labels);
  1493. ***************
  1494. *** 348,353 ****
  1495. --- 349,355 ----
  1496.             h = (Hash) get_node(a->hash_lines);
  1497.             h->loc = hloc;
  1498.             h->size = MHASH_SIZE;
  1499. +           h->major = 0;
  1500.             insert(h, a->hash_lines);
  1501.           }
  1502.         }
  1503. *** ../work/show.c    Tue Feb 25 22:27:00 1992
  1504. --- show.c    Tue Feb 25 22:28:38 1992
  1505. ***************
  1506. *** 1,7 ****
  1507.   /* 
  1508.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/show.c,v $
  1509. !  * $Revision: 7.3 $
  1510. !  * $Date: 92/02/04 12:21:46 $
  1511.    * $Author: jsp $
  1512.    */ 
  1513.   
  1514. --- 1,7 ----
  1515.   /* 
  1516.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/show.c,v $
  1517. !  * $Revision: 7.5 $
  1518. !  * $Date: 92/02/10 10:37:14 $
  1519.    * $Author: jsp $
  1520.    */ 
  1521.   
  1522. ***************
  1523. *** 111,117 ****
  1524.     }
  1525.     printf("marksize %f %f ", ptodist(c->marksize[0], g->x_axis), 
  1526.                               ptodist(c->marksize[1], g->y_axis));
  1527. !   printf("fill %f\n", c->fill);
  1528.     if (c->marktype == 'g') {
  1529.       spaces(nsp); printf("gmarks");
  1530.       for(p = first(c->general_marks); p != nil(c->general_marks); p = next(p))
  1531. --- 111,121 ----
  1532.     }
  1533.     printf("marksize %f %f ", ptodist(c->marksize[0], g->x_axis), 
  1534.                               ptodist(c->marksize[1], g->y_axis));
  1535. !   if (c->filltype == 'g') {
  1536. !      printf("fill %f\n", c->fill[0] );
  1537. !   } else if (c->filltype == 'c')  {
  1538. !      printf("cfill %f %f %f\n", c->fill[0], c->fill[1], c->fill[2] );
  1539. !   }
  1540.     if (c->marktype == 'g') {
  1541.       spaces(nsp); printf("gmarks");
  1542.       for(p = first(c->general_marks); p != nil(c->general_marks); p = next(p))
  1543. ***************
  1544. *** 147,153 ****
  1545.     }
  1546.     printf("linethickness %f\n", c->linethick);
  1547.     spaces(nsp); 
  1548. !   printf("gray %f ", c->gray);
  1549.     if(!c->clip) printf("no"); printf("clip ");
  1550.     if(!c->rarrows) printf("no"); printf("rarrows ");
  1551.     if(!c->larrows) printf("no"); printf("larrows ");
  1552. --- 151,161 ----
  1553.     }
  1554.     printf("linethickness %f\n", c->linethick);
  1555.     spaces(nsp); 
  1556. !   if (c->graytype == 'g') {
  1557. !     printf("gray %f ", c->gray[0]);
  1558. !   } else if (c->graytype == 'c') {
  1559. !     printf("color %f %f %f ", c->gray[0], c->gray[1], c->gray[2]);
  1560. !   }
  1561.     if(!c->clip) printf("no"); printf("clip ");
  1562.     if(!c->rarrows) printf("no"); printf("rarrows ");
  1563.     if(!c->larrows) printf("no"); printf("larrows ");
  1564. ***************
  1565. *** 189,197 ****
  1566.     spaces(nsp); 
  1567.     printf("%sgrid_lines\n", (a->grid_lines) ? "" : "no_");
  1568.     spaces(nsp); 
  1569.     printf("%sdraw_axis_label\n", (a->draw_axis_label) ? "" : "no_");
  1570.     spaces(nsp); 
  1571. !   printf("gray %f\n", a->gray);
  1572.     spaces(nsp);
  1573.   
  1574.     printf("(* The real settings for generating auto_hash_labels:\n");
  1575. --- 197,212 ----
  1576.     spaces(nsp); 
  1577.     printf("%sgrid_lines\n", (a->grid_lines) ? "" : "no_");
  1578.     spaces(nsp); 
  1579. +   printf("%smgrid_lines\n", (a->mgrid_lines) ? "" : "no_");
  1580. +   spaces(nsp); 
  1581.     printf("%sdraw_axis_label\n", (a->draw_axis_label) ? "" : "no_");
  1582.     spaces(nsp); 
  1583. !   if (a->graytype == 'g') {
  1584. !     printf("gray %f\n", a->gray[0]);
  1585. !   } else if (a->graytype == 'c') {
  1586. !     printf("color %f %f %f\n", a->gray[0], a->gray[1], a->gray[2]);
  1587. !   }
  1588. ! 
  1589.     spaces(nsp);
  1590.   
  1591.     printf("(* The real settings for generating auto_hash_labels:\n");
  1592. *** ../work/token.c    Tue Feb 25 22:27:01 1992
  1593. --- token.c    Tue Feb 25 22:28:49 1992
  1594. ***************
  1595. *** 1,7 ****
  1596.   /* 
  1597.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/token.c,v $
  1598. !  * $Revision: 7.3 $
  1599. !  * $Date: 92/02/04 12:21:47 $
  1600.    * $Author: jsp $
  1601.    */
  1602.   
  1603. --- 1,7 ----
  1604.   /* 
  1605.    * $Source: /n/fs/vd/jsp/src/jgraph/RCS/token.c,v $
  1606. !  * $Revision: 7.5 $
  1607. !  * $Date: 92/02/10 10:37:15 $
  1608.    * $Author: jsp $
  1609.    */
  1610.   
  1611.  
  1612. exit 0 # Just in case...
  1613.