home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume21 / ipl / part02 < prev    next >
Text File  |  1990-03-22  |  30KB  |  2,035 lines
  1. Subject:  v21i033:  2D graphic system with table beautifier, Part02/14
  2. Newsgroups: comp.sources.unix
  3. Approved: rsalz@uunet.UU.NET
  4. X-Checksum-Snefru: 6ac08f0d 049f1e4a 06eed964 bba564d5
  5.  
  6. Submitted-by: Steve Grubb <uunet!lsr-vax!scg>
  7. Posting-number: Volume 21, Issue 33
  8. Archive-name: ipl/part02
  9.  
  10. # ipl part02
  11. #    This is a shell archive.
  12. #    Remove everything above and including the cut line.
  13. #    Then run the rest of the file through sh.
  14. #---------------------- cut here -----------------------------
  15. #!/bin/sh
  16. # shar:    Shell Archiver
  17. #    Run the following text with /bin/sh to create:
  18. #        run.examples
  19. #        run.install
  20. #        run.manual
  21. #        bin/pipl
  22. #        bin/nicetab
  23. #        tplates/area.coords
  24. #        tplates/areadef.g
  25. #        tplates/areas.g
  26. #        tplates/areas2.g
  27. #        tplates/clear.g
  28. #        tplates/coms
  29. #        tplates/comsclinics
  30. #        tplates/comsvisits
  31. #        tplates/dashsize.g
  32. #        tplates/dashsize.mu
  33. #        tplates/fonts.mu
  34. #        tplates/gallery.g
  35. #        tplates/lineparm.g
  36. #        tplates/linethick.g
  37. #        tplates/linethick.mu
  38. #        tplates/linetype.g
  39. #        tplates/linetype.mu
  40. #        tplates/log1
  41. #        tplates/month.stubs
  42. #        tplates/mps
  43. #        tplates/mpsclinics
  44. #        tplates/mpsvisits
  45. #        tplates/viplstartup.g
  46. cat << \SHAR_EOF > run.examples
  47. #!/bin/sh
  48. #runs off some examples
  49. #
  50.  
  51. echo -n "This will produce a number of IPL examples,
  52. along with listings of the control files that generated
  53. them.  It may tie up the printer for a while.
  54.  
  55. Enter a command for printing the control files.  Use
  56. small text if possible, or lpr(1); use echo(1) if you
  57. don't want to print the control files at all.
  58.  
  59. Command: "
  60.  
  61. read PCOM
  62.  
  63. echo -n "Using: $PCOM
  64.  
  65. Begin? (y/n) "
  66.  
  67. read x
  68. if [ $x = "n" ] 
  69. then 
  70. exit
  71. fi
  72.  
  73. cd /550/pub/src/ipl_1.0
  74. cd examples
  75.  
  76. pipl areadef1.g
  77. $PCOM areadef1.g
  78. pipl areadef2.g
  79. $PCOM areadef2.g
  80.  
  81. pipl arrow.g
  82. $PCOM arrow.g
  83.  
  84. pipl bargraph1.g
  85. $PCOM bargraph1.g
  86.  
  87. pipl distrib1.g
  88. $PCOM distrib1.g
  89. pipl distrib2.g
  90. $PCOM distrib2.g
  91. pipl point1.g
  92.  
  93. pipl errorbar1.g
  94. $PCOM errorbar1.g
  95.  
  96. pipl legend1.g
  97. $PCOM legend1.g
  98.  
  99. pipl lineplot1.g
  100. $PCOM lineplot1.g
  101.  
  102. pipl map1.g
  103. $PCOM map1.g
  104.  
  105. pipl nicetab1.g
  106. $PCOM table10
  107. $PCOM nicetab1.g
  108.  
  109. pipl points.ipl
  110. $PCOM2 points.ipl
  111.  
  112. pipl rangebar1.g
  113. $PCOM rangebar1.g
  114.  
  115. pipl vbargraph1.g
  116. $PCOM vbargraph1.g
  117.  
  118. pipl vector1.g
  119. $PCOM vector1.g
  120.  
  121. pipl vrangebar1.g
  122. $PCOM vrangebar1.g
  123.  
  124. # misc examples
  125. pipl examp12.g
  126. $PCOM examp12.g
  127. pipl examp1.g
  128. $PCOM examp1.g
  129. pipl examp16.g
  130. $PCOM examp16.g
  131. pipl examp3.g
  132. $PCOM examp3.g
  133. pipl examp10.g
  134. $PCOM examp10.g
  135. SHAR_EOF
  136. chmod 755 run*
  137. ############################
  138.  
  139. cat << \SHAR_EOF > run.install
  140. #!/bin/sh
  141.  
  142. h=`hostname`
  143. TODAY=`date +%m%d%y`
  144.  
  145. echo -n "
  146. IPL graphic utility 
  147.  
  148. This script does not need to be run by superuser.  It will prompt you
  149. for some parameters, build an install.h file, go to the source directory,
  150. and do a 'make'.  You can ^C at any time.  It will put one executable in
  151. bin/ipl (moving it will cause problems).
  152.  
  153. Indicate the following by pressing return for the [default]
  154. or entering a response:
  155.  
  156. "
  157. d=`pwd`
  158. echo -n "
  159.  
  160. Doing a pwd from here yields: \"$d.\"
  161. If this pathname will be usable from everywhere on your network, press return.
  162. Otherwise, enter the fully qualified pathname: "
  163. read x; if [ "$x " != " " ]; then d=$x; fi
  164.  
  165. cd $d
  166.  
  167.  
  168. p=lpr
  169. echo -n "Your command for routing postscript code to printer [$p]: "
  170. read x; 
  171. if [ "$x " != " " ]; then 
  172.   p=$x; 
  173.   sed "s/ lpr$/ $p/" < bin/pipl > bin/foo
  174.   mv bin/foo bin/pipl
  175. fi
  176.  
  177. t=/usr/tmp
  178. echo -n "Place for temp files to go [$t]: "
  179. read x; if [ "$x " != " " ]; then t=$x; fi
  180.  
  181. echo "
  182. IPL uses a fixed 2-D (rows, fields) array of char strings for internal
  183. plot data storage.
  184. You can specify maximum number of rows, max number of fields per row,
  185. and max number of characters in each field."
  186.  
  187. r=1000
  188. echo -n "Maximum number of rows (observations) [$r]: "
  189. read x; if [ "$x " != " " ]; then r=$x; fi
  190.  
  191. c=24
  192. echo -n "Maximum number of fields (variables) [$c]: "
  193. read x; if [ "$x " != " " ]; then c=$x; fi
  194.  
  195. z=20
  196. echo -n "Maximum number of characters in a field [$z]: "
  197. read x; if [ "$x " != " " ]; then z=$x; fi
  198.  
  199. > install.h
  200. echo "#define INSTALL_TMP \"$t\"" >> install.h
  201. echo "#define PATHNAME_LEN 80" >> install.h
  202. echo "#define HBUFSIZ 4096" >> install.h
  203. echo "#define MAX_D_ROWS $r" >> install.h
  204. echo "#define MAX_D_COLS $c" >> install.h
  205. echo "#define DATAITEM_LEN $z" >> install.h
  206. echo "#define TEMPLATE_PATH \"$d/tplates\"" >> install.h
  207. echo "#define MONTHSTUB_PATH \"$d/tplates/month.stubs\"" >> install.h
  208.  
  209. echo "
  210. Here are the defines:"
  211. cat install.h
  212. echo -n "
  213.  
  214. Proceed with installation? "
  215. read x
  216. if [ $x = "n" ]; then exit; fi
  217.  
  218. echo "${TODAY} IPL installed on $h at: $d" >> Introduction
  219.  
  220. cd $d
  221.  
  222. # make pipl shell script
  223. chmod 755 ./bin/pipl
  224.  
  225.  
  226. #compile ipl
  227. cd $d/src
  228. make 
  229.  
  230. cd $d/examples
  231. ln -s $d/bin/ipl sipl
  232. ln -s $d/bin/ipl tipl
  233. ln -s $d/bin/pipl pipl
  234. ln -s $d/bin/ipl vipl
  235. ln -s $d/bin/nicetab nicetab
  236.  
  237.  
  238. echo "
  239. You can now try out IPL by going to the examples directory and running:
  240.  - demo.sipl (if in Sunview), 
  241.         OR
  242.  - demo.pipl which produces postscript output
  243.  
  244. If you want to make links from a system bin (such as /usr/local/bin)
  245. do the following: cd /usr/local/bin
  246.           ln $d/bin/ipl sipl 
  247.           ln $d/bin/ipl tipl 
  248.           ln $d/bin/ipl vipl 
  249.           ln $d/bin/pipl pipl
  250.           ln $d/bin/nicetab nicetab
  251.  
  252. The command names are important-- changing them will cause problems:
  253. tipl        displays control files, outputs postscript 
  254. sipl        displays control files under Sunview
  255. vipl        allows interactive annotation under Sunview
  256. pipl        displays control files, and routes postscript to printer
  257. nicetab     table beautifier
  258.  
  259. Good luck!!
  260. "
  261. SHAR_EOF
  262. chmod 755 run*
  263. ############################
  264.  
  265. cat << \SHAR_EOF > run.manual
  266. #!/bin/sh
  267.  
  268. if [ -f Introduction ]; then echo 
  269. else
  270.     echo "Wrong directory."; exit; fi
  271.  
  272. echo -n "
  273. This script will run off the Users Guide for IPL 1.0.
  274. Examples will not be included-- they can be run using the
  275. command: run.examples.
  276.  
  277. Begin? (y/n): "
  278. read x
  279. if [ "$x " != "y " ]; then exit; fi
  280.  
  281.  
  282. pipl tplates/gallery.g
  283. lpr Cover
  284. lpr New
  285. lpr Introduction
  286.  
  287. pipl tplates/areas.g
  288. pipl tplates/areas2.g
  289. pipl tplates/areadef.g
  290. lpr tplates/[A-Z]*
  291.  
  292.  
  293. SHAR_EOF
  294. chmod 755 run*
  295. ############################
  296.  
  297. cat << \SHAR_EOF > bin/pipl
  298. #! /bin/sh
  299. tipl "$1" "$2" "$3" "$4" "$5" "$6" "$7" "$8" "$9" "$10" "$11" "$12" "$13" "$14" "$15" "$16" "$17" "$18" "$19" "$20" | lpr
  300. SHAR_EOF
  301. chmod 755 bin/*
  302. ############################
  303.  
  304. cat << \SHAR_EOF > bin/nicetab
  305.  
  306. # Args are: file body.size area title.size
  307. # Not all args need to be given, but they must be in position, i.e.,
  308. # if title.size is to be specified, all other args must be given also.
  309.  
  310. echo "Proc Page:
  311.  
  312. Proc Nicetab:
  313. File:    \$2
  314. Body.size:    \$3
  315. Area:    \$4
  316. Title.size:    \$5
  317. " > /usr/tmp/nicetab$$
  318.  
  319. if [ $# -eq 0 ]; then pipl /usr/tmp/nicetab$$ - 10 nicetab 11
  320. elif [ $# -eq 1 ]; then pipl /usr/tmp/nicetab$$ $1 10 nicetab 11
  321. elif [ $# -eq 2 ]; then pipl /usr/tmp/nicetab$$ $1 $2 nicetab 11
  322. elif [ $# -eq 3 ]; then pipl /usr/tmp/nicetab$$ $1 $2 $3 11
  323. elif [ $# -eq 4 ]; then pipl /usr/tmp/nicetab$$ $1 $2 $3 $4
  324. fi
  325. rm /usr/tmp/nicetab$$
  326. SHAR_EOF
  327. chmod 755 bin/*
  328. ############################
  329.  
  330. cat << \SHAR_EOF > tplates/area.coords
  331. /* # area.coords
  332. # 
  333. #   The following is a list of predefined graphics areas (windows) on the page.
  334. # Some use the whole page; those beginning with '2' are for doing two plots 
  335. # per page, 3 for three plots per page, etc.
  336. #   These names can be used as the Area in Proc Areadef.  If none
  337. # of these is suitable, Area.left, Area.right, etc. can be defined explicitly.
  338. # Coordinates are in inches, with the origin in the lower left.
  339. #
  340. #                 ---portrait----    ---landscape---
  341. # format is: 
  342. # AREA NAME (must be followed by space(s))
  343. #             XLO YLO XHI YHI    XLO YLO XHI YHI
  344. # */
  345.  
  346. char *Areacoords[25] = {
  347. "standard     1.2 3.5 7.4 8.0   1.5 1.5 9.0 6.2",
  348. "square       1.2 2.0 7.2 8.0   2.2 0.8 8.2 6.8",
  349. "dist1        1.2 6.5 7.2 8.0   2.2 5.3 8.2 6.8",
  350. "whole        1.2 1.0 7.4 9.0   1.5 1.2 9.0 7.0",
  351. "2hi          1.0 6.0 7.6 9.5   1.0 4.5 9.0 7.5",
  352. "2lo          1.0 1.5 7.6 5.0   1.0 0.75 9.0 3.75",
  353. "2left        1.0 1.0 4.0 9.5   1.0 1.0 5.25 6.5",
  354. "2right       5.0 1.0 8.0 9.5   6.25 1.0 10.5 6.5",
  355. "3hi          1.0 7.0 7.6 9.0   1.0 5.5 9.0 7.5",
  356. "3mid         1.0 4.0 7.6 6.0   1.0 3.0 9.0 5.0",
  357. "3lo          1.0 1.0 7.6 3.0   1.0 0.5 9.0 2.5",
  358. "4nw          1.0 6.0 4.0 9.0   1.0 4.0 5.25 7.0",
  359. "4ne          4.5 6.0 7.5 9.0   6.25 4.0 10.5 7.0",
  360. "4sw          1.0 1.5 4.0 4.5   1.0 0.5 5.25 3.5",
  361. "4se          4.5 1.5 7.5 4.5   6.25 0.5 10.5 3.5",
  362. "map          0.4 2.0 6.8 8.4   1.4 0.8 7.8 7.2",
  363. "usamap       .5  5 8 9.5        .5  1 10.5 7",
  364. "lifetab      1.0 1.0 7.0 4.5   1.5 1.0 7.5 4.5",
  365. "nicetab      1.0 0.5 7.5 10    1.5 0.5 9.0 7.0",
  366. "narrowtab    2.0 0.5 6.0 10    3.0 0.5 8.0 7.0",
  367. "narrowleft   1.0 0.4 4.0 10.5  1.0 1.0 5.25 6.5",
  368. "narrowright  5.0 0.4 8.0 10.5  6.25 1.0 10.5 6.5" 
  369.     } ;
  370. int Nareas = 23;
  371. SHAR_EOF
  372. ############################
  373.  
  374. cat << \SHAR_EOF > tplates/areadef.g
  375. Proc Page:
  376. Title: Areadef Terminology
  377.  
  378. Proc Areadef:
  379. Subtitle: Dwarf Productivity for Fiscal Year 1844
  380. Area: standard
  381. Xmax: 6
  382. Ymax: 50
  383. Yinc: 10
  384. Ystub.minor: 10
  385. Ystub.ticlen.minor: -0.1
  386. Xstub:     Sleepy
  387.     Doc
  388.     Grumpy
  389.     Dopey~(Absent)
  390.     Sneezy
  391.     
  392. Xlabel: Dwarf Identification
  393. Ylabel: Coal (tons/week)
  394. Xstart.0or1: 1
  395. Frame: double
  396. Subtitle.above: 0.4
  397. Ystub.grid: line
  398.  
  399.  
  400.  
  401. Proc Getdata:
  402. Data:     15
  403.     40
  404.     47
  405.     08
  406.     26
  407.  
  408. Proc Bargraph:
  409. Field: 1
  410. Shade: 0.9
  411.  
  412.  
  413. Proc Text:
  414. Position:   1.65   9.46
  415. Text: Subtitle                                                                       
  416.  
  417. Proc Draw:
  418. Points: 1.53 9.38 1.53 9.64
  419.  2.36 9.64
  420.  2.36 9.38
  421.  1.53 9.38
  422.  
  423. Proc Arrow:
  424. Points: 2.07 9.38 2.98 8.57
  425.  
  426. Proc Text:
  427. Position:   1.67   3.07
  428. Text: Xstubs (text)                                                                  
  429.  
  430. Proc Draw:
  431. Points: 1.53 3.01 1.53 3.25
  432.  2.79 3.25
  433.  2.79 3.01
  434.  1.53 3.01
  435.  
  436. Proc Arrow:
  437. Points: 2.77 3.15 3.98 3.33
  438.  
  439. Proc Arrow:
  440. Points: 2.77 3.20 3.07 3.39
  441.  
  442. Proc Text:
  443. Position:   0.48   7.41
  444. Text: Ystubs                                                                         
  445. (num)                                                                          
  446.                                                                                
  447.  
  448. Proc Draw:
  449. Points: 0.38 7.15 0.38 7.58
  450.  0.97 7.58
  451.  0.97 7.15
  452.  0.38 7.15
  453.  
  454. Proc Arrow:
  455. Points: 0.64 7.15 0.95 5.39
  456.  
  457. Proc Arrow:
  458. Points: 0.62 7.15 0.93 6.31
  459.  
  460. Proc Text:
  461. Position:   3.26   2.66
  462. Text: Xlabel                                                                         
  463.  
  464. Proc Draw:
  465. Points: 3.15 2.60 3.15 2.80
  466.  3.80 2.80
  467.  3.80 2.60
  468.  3.15 2.60
  469.  
  470. Proc Arrow:
  471. Points: 3.76 2.74 4.28 2.89
  472.  
  473. Proc Text:
  474. Position:   0.40   3.87
  475. Text: Ylabel                                                                         
  476.  
  477. Proc Draw:
  478. Points: 0.27 3.81 0.27 4.04
  479.  0.95 4.04
  480.  0.95 3.81
  481.  0.27 3.81
  482.  
  483. Proc Arrow:
  484. Points: 0.66 4.09 0.56 4.51
  485.  
  486. Proc Text:
  487. Position:   1.19   1.57
  488. Text: Other parameters..
  489.   Yinc\: 10                                                                     
  490.   Xinc\: 1                                                                      
  491.   Xstart.0or1\: 1                                                               
  492.   Ystub.grid\: line                                                             
  493.  
  494. Proc Draw:
  495. Points: 0.99 0.76 0.99 1.85
  496.  2.87 1.85
  497.  2.87 0.76
  498.  0.99 0.76
  499. SHAR_EOF
  500. ############################
  501.  
  502. cat << \SHAR_EOF > tplates/areas.g
  503. Proc Page:
  504. Title: Predefined graphing areas-- click on your choice
  505. Title.belowtop: 0.0
  506.  
  507. Proc Areadef:
  508. Subtitle: whole
  509. Subtitle.above: 0.1
  510. Area.rectangle: 0.5 7 2.5 9.8
  511. Xmax: 8.5
  512. Ymax: 11
  513. Xaxis: none
  514. Yaxis: none
  515. Frame: double
  516. Saveas: A
  517.  
  518. # whole        
  519. Proc Polygon:
  520. Rectangle: 1.2 1.0 7.4 9.0
  521. Outline: y
  522. Shade: 0.9
  523. System: data
  524.  
  525. Proc Areadef:
  526. Clone: A
  527. Area.rectangle: 3 7 5 9.8
  528. Subtitle: standard
  529.  
  530. # standard     
  531. Proc Polygon:
  532. Rectangle: 1.2 3.5 7.4 8.0   
  533. Outline: y
  534. Shade: 0.9
  535. System: data
  536.  
  537. Proc Areadef:
  538. Clone: A
  539. Area.rectangle: 5.5 7 7.5 9.8
  540. Subtitle: square
  541.  
  542. # square       
  543. Proc Polygon:
  544. Rectangle: 1.2 2.0 7.2 8.0  
  545. Outline: y
  546. Shade: 0.9
  547. System: data
  548.  
  549. ################################################
  550.  
  551. Proc Areadef:
  552. Clone: A
  553. Area.rectangle: 0.5 3.5 2.5 6.3
  554. Subtitle: dist1 (for bars)
  555.  
  556. # dist1        
  557. Proc Polygon:
  558. Rectangle: 1.2 6.5 7.2 8.0 
  559. Outline: y
  560. Shade: 0.9
  561. System: data
  562.  
  563. Proc Areadef:
  564. Clone: A
  565. Area.rectangle: 3.0 3.5 5.0 6.3
  566. Subtitle: 2hi and 2lo
  567.  
  568. # 2hi          
  569. Proc Polygon:
  570. Rectangle: 1.0 6.0 7.6 9.5
  571. Outline: y
  572. Shade: 0.9
  573. System: data
  574.  
  575. # 2lo          
  576. Proc Polygon:
  577. Rectangle: 1.0 1.5 7.6 5.0
  578. Outline: y
  579. Shade: 0.9
  580. System: data
  581.  
  582. Proc Areadef:
  583. Clone: A
  584. Area.rectangle: 5.5 3.5 7.5 6.3
  585. Subtitle: 2left and 2right
  586.  
  587. # 2left        
  588. Proc Polygon:
  589. Rectangle: 1.0 1.0 4.0 9.5
  590. Outline: y
  591. Shade: 0.9
  592. System: data
  593.  
  594. # 2right       
  595. Proc Polygon:
  596. Rectangle: 5.0 1.0 8.0 9.5
  597. Outline: y
  598. Shade: 0.9
  599. System: data
  600.  
  601. ##################################################
  602.  
  603. Proc Areadef:
  604. Clone: A
  605. Area.rectangle: 0.5 0.2 2.5 3.0
  606. Subtitle: 3hi, 3mid, 3lo
  607.  
  608. # 3hi          
  609. Proc Polygon:
  610. Rectangle: 1.0 7.0 7.6 9.0
  611. Outline: y
  612. Shade: 0.9
  613. System: data
  614.  
  615. # 3mid         
  616. Proc Polygon:
  617. Rectangle: 1.0 4.0 7.6 6.0
  618. Outline: y
  619. Shade: 0.9
  620. System: data
  621.  
  622. # 3lo          
  623. Proc Polygon:
  624. Rectangle: 1.0 1.0 7.6 3.0
  625. Outline: y
  626. Shade: 0.9
  627. System: data
  628.  
  629. Proc Areadef:
  630. Clone: A
  631. Area.rectangle: 3.0 0.2 5.0 3.0
  632. Subtitle: 4nw, 4ne, 4sw, 4se
  633.  
  634. # 4nw          
  635. Proc Polygon:
  636. Rectangle: 1.0 6.0 4.0 9.0
  637. Outline: y
  638. Shade: 0.9
  639. System: data
  640.  
  641. # 4ne          
  642. Proc Polygon:
  643. Rectangle: 4.5 6.0 7.5 9.0
  644. Outline: y
  645. Shade: 0.9
  646. System: data
  647.  
  648. # 4sw          
  649. Proc Polygon:
  650. Rectangle: 1.0 1.5 4.0 4.5
  651. Outline: y
  652. Shade: 0.9
  653. System: data
  654.  
  655. # 4se          
  656. Proc Polygon:
  657. Rectangle: 4.5 1.5 7.5 4.5
  658. Outline: y
  659. Shade: 0.9
  660. System: data
  661.  
  662. Proc Areadef:
  663. Clone: A
  664. Area.rectangle: 5.5 0.2 7.5 3.0
  665. Subtitle: lifetab
  666.  
  667. # lifetab      
  668. Proc Polygon:
  669. Rectangle: 1.0 1.0 7.0 4.5
  670. Outline: y
  671. Shade: 0.9
  672. System: data
  673.  
  674. Proc Areadef:
  675. Clone: A
  676. Area.rectangle: 6.8 10.2 7.8 10.7
  677. Subtitle: none
  678. Subtitle.above: -0.2
  679. Subtitle.justify: center
  680. Shade: 0.98
  681. SHAR_EOF
  682. ############################
  683.  
  684. cat << \SHAR_EOF > tplates/areas2.g
  685. Proc Page:
  686. Paperway: landscape
  687. Title: Predefined graphing areas-- click on your choice
  688. Title.belowtop: 0.0
  689.  
  690. Proc Areadef:
  691. Subtitle: whole
  692. Subtitle.above: 0.1
  693. Area.rectangle: 0.5 5.5 3.3 7.5
  694. Xmax: 8.5
  695. Ymax: 11
  696. Xaxis: none
  697. Yaxis: none
  698. Frame: double
  699. Saveas: A
  700.  
  701. # whole        
  702. Proc Polygon:
  703. Rectangle: 1.2 1.0 7.4 9.0
  704. Outline: y
  705. Shade: 0.9
  706. System: data
  707.  
  708. Proc Areadef:
  709. Clone: A
  710. Area.rectangle: 4 5.5 6.8 7.5 
  711. Subtitle: standard
  712.  
  713. # standard     
  714. Proc Polygon:
  715. Rectangle:  1.386     2.012     7.100     8.338     
  716. Outline: y
  717. Shade: 0.9
  718. System: data
  719.  
  720. Proc Areadef:
  721. Clone: A
  722. Area.rectangle: 7.5 5.5 10.3 7.5
  723. Subtitle: square
  724.  
  725. # square       
  726. Proc Polygon:
  727. Rectangle: 1.646     0.619     6.136     10.038    
  728. Outline: y
  729. Shade: 0.9
  730. System: data
  731.  
  732.  
  733. ################################################
  734.  
  735. Proc Areadef:
  736. Clone: A
  737. Area.rectangle: 0.5 3 3.3 5
  738. Subtitle: dist1 (for bars)
  739.  
  740. # dist1        
  741. Proc Polygon:
  742. Rectangle: 1.2 6.5 7.2 8.0 
  743. Outline: y
  744. Shade: 0.9
  745. System: data
  746.  
  747. Proc Areadef:
  748. Clone: A
  749. Area.rectangle: 4.0 3 6.8 5
  750. Subtitle: 2hi and 2lo
  751.  
  752. # 2hi          
  753. Proc Polygon:
  754. Rectangle: 1.0 6.0 7.6 9.5
  755. Outline: y
  756. Shade: 0.9
  757. System: data
  758.  
  759. # 2lo          
  760. Proc Polygon:
  761. Rectangle: 1.0 1.5 7.6 5.0
  762. Outline: y
  763. Shade: 0.9
  764. System: data
  765.  
  766. Proc Areadef:
  767. Clone: A
  768. Area.rectangle: 7.5 3 10.3 5
  769. Subtitle: 2left and 2right
  770.  
  771. # 2left        
  772. Proc Polygon:
  773. Rectangle: 1.0 1.0 4.0 9.5
  774. Outline: y
  775. Shade: 0.9
  776. System: data
  777.  
  778. # 2right       
  779. Proc Polygon:
  780. Rectangle: 5.0 1.0 8.0 9.5
  781. Outline: y
  782. Shade: 0.9
  783. System: data
  784.  
  785. ##################################################
  786.  
  787. Proc Areadef:
  788. Clone: A
  789. Area.rectangle: 0.5 0.5 3.3 2.5
  790. Subtitle: 3hi, 3mid, 3lo
  791.  
  792. # 3hi          
  793. Proc Polygon:
  794. Rectangle: 1.0 7.0 7.6 9.0
  795. Outline: y
  796. Shade: 0.9
  797. System: data
  798.  
  799. # 3mid         
  800. Proc Polygon:
  801. Rectangle: 1.0 4.0 7.6 6.0
  802. Outline: y
  803. Shade: 0.9
  804. System: data
  805.  
  806. # 3lo          
  807. Proc Polygon:
  808. Rectangle: 1.0 1.0 7.6 3.0
  809. Outline: y
  810. Shade: 0.9
  811. System: data
  812.  
  813. Proc Areadef:
  814. Clone: A
  815. Area.rectangle: 4.0 0.5 6.8 2.5
  816. Subtitle: 4nw, 4ne, 4sw, 4se
  817.  
  818. # 4nw          
  819. Proc Polygon:
  820. Rectangle: 1.0 6.0 4.0 9.0
  821. Outline: y
  822. Shade: 0.9
  823. System: data
  824.  
  825. # 4ne          
  826. Proc Polygon:
  827. Rectangle: 4.5 6.0 7.5 9.0
  828. Outline: y
  829. Shade: 0.9
  830. System: data
  831.  
  832. # 4sw          
  833. Proc Polygon:
  834. Rectangle: 1.0 1.5 4.0 4.5
  835. Outline: y
  836. Shade: 0.9
  837. System: data
  838.  
  839. # 4se          
  840. Proc Polygon:
  841. Rectangle: 4.5 1.5 7.5 4.5
  842. Outline: y
  843. Shade: 0.9
  844. System: data
  845.  
  846. Proc Areadef:
  847. Clone: A
  848. Area.rectangle: 7.5 0.5 10.3 2.5
  849. Subtitle: lifetab
  850.  
  851. # lifetab      
  852. Proc Polygon:
  853. Rectangle: 1.0 1.0 7.0 4.5
  854. Outline: y
  855. Shade: 0.9
  856. System: data
  857.  
  858. Proc Areadef:
  859. Clone: A
  860. Area.rectangle: 9.2 7.8 10.2 8.3
  861. Subtitle: none
  862. Subtitle.above: -0.2
  863. Subtitle.justify: center
  864. Shade: 0.98
  865. SHAR_EOF
  866. ############################
  867.  
  868. cat << \SHAR_EOF > tplates/clear.g
  869. Proc Page:
  870.  
  871. Proc Polygon: 
  872. Points: 0 0 8.5 11
  873. Shade: 0.9
  874. SHAR_EOF
  875. ############################
  876.  
  877. cat << \SHAR_EOF > tplates/coms
  878. !0
  879. !6
  880. !12
  881. !18
  882. !24
  883. !30
  884. !36
  885. !42
  886. !48
  887. !54
  888. !60
  889. !66
  890. !72
  891. !78
  892. !84
  893. !90
  894. !96
  895. !102
  896. SHAR_EOF
  897. ############################
  898.  
  899. cat << \SHAR_EOF > tplates/comsclinics
  900. 01
  901. 02
  902. 03
  903. 04
  904. 05
  905. 06
  906. 07
  907. 08
  908. 09
  909. 10
  910. 11
  911. 12
  912. 13
  913. 14
  914. 15
  915. 16
  916. 17
  917. 18
  918. 19
  919. 20
  920. 21
  921. 22
  922. 23
  923. 24
  924. 25
  925. 26
  926. 27
  927. 28
  928. 29
  929. 30
  930. 31
  931. 32
  932. 33
  933. 34
  934. 35
  935. 36
  936. 37
  937. 38
  938. 39
  939. 42
  940. SHAR_EOF
  941. ############################
  942.  
  943. cat << \SHAR_EOF > tplates/comsvisits
  944. !0
  945. !6
  946. !12
  947. !18
  948. !24
  949. !30
  950. !36
  951. !42
  952. !48
  953. !54
  954. !60
  955. !66
  956. !72
  957. !78
  958. !84
  959. !90
  960. !96
  961. !102
  962. SHAR_EOF
  963. ############################
  964.  
  965. cat << \SHAR_EOF > tplates/dashsize.g
  966. Proc Page:
  967.  
  968. Proc Legend:
  969. Location: 6 9
  970. Title: Pattern magnification
  971. Entry:
  972.     1
  973.     2
  974.     3
  975.     4
  976.     5
  977. Entry.size: 12
  978. Linetype: 3 3 3 3 3
  979. Linetype.magnify: 1 2 3 4 5
  980. Linethick: 1 1 1 1 1 
  981.  
  982. SHAR_EOF
  983. ############################
  984.  
  985. cat << \SHAR_EOF > tplates/dashsize.mu
  986. 5.830  8.912  7.272  9.125 : 0 : 0 
  987. 5.818  8.662  7.297  8.875 : 1 : 1
  988. 5.830  8.425  7.248  8.662 : 2 : 2
  989. 5.818  8.200  7.284  8.425 : 3 : 3
  990. 5.830  7.963  7.248  8.200 : 4 : 4
  991. 5.806  7.737  7.248  7.963 : 5 : 5
  992. SHAR_EOF
  993. ############################
  994.  
  995. cat << \SHAR_EOF > tplates/fonts.mu
  996. 7 6.7 11 7   : Helvetica: /Helvetica
  997. 7 6.4 11 6.7 : Helvetica Oblique: /Helvetica-Oblique
  998. 7 6.1 11 6.4 : Helvetica Bold: /Helvetica-Bold
  999. 7 5.8 11 6.1 : Helvetica Bold Oblique: /Helvetica-BoldOblique
  1000. 7 5.5 11 5.8 : Times Roman: /Times-Roman
  1001. 7 5.2 11 5.5 : Times Bold : /Times-Bold 
  1002. 7 4.9 11 5.2 : Times Italic: /Times-Italic
  1003. 7 4.6 11 4.9 : Times Bold Italic : /Times-BoldItalic 
  1004. 7 4.3 11 4.6 : Courier : /Courier 
  1005. 7 4 11 4.3   : Courier Oblique : /Courier-Oblique 
  1006. 7 3.7 11 4   : Courier Bold : /Courier-Bold 
  1007. 7 3.4 11 3.7 : Courier Bold Oblique : /Courier-BoldOblique 
  1008. 7 3.1 11 3.4 : Helvetica Narrow : /Helvetica-Narrow 
  1009. 7 2.9 11 3.1 : Helvetica Narrow Oblique : /Helvetica-Narrow-Oblique 
  1010. 7 2.6 11 2.9 : Helvetica Narrow Bold : /Helvetica-Narrow-Bold 
  1011. 7 2.3 11 2.6 : Helvetica Narrow Bold Oblique: /Helvetica-Narrow-BoldOblique
  1012. SHAR_EOF
  1013. ############################
  1014.  
  1015. cat << \SHAR_EOF > tplates/gallery.g
  1016. Proc Page:
  1017. Title: IPL 1.0   Available types of plots 
  1018. Title.belowtop: 0.0
  1019.  
  1020. Proc Areadef:
  1021. Area.rectangle: 0.5 8 2.5 10
  1022. Subtitle: Distribution (2-way)
  1023. Xmax: 10
  1024. Xmin: 0
  1025. Ymax: 10
  1026. Ymin: 0
  1027. Xaxis: none
  1028. Yaxis: none
  1029. Frame: double
  1030. Subtitle.above: 0.08
  1031. Saveas: A
  1032.  
  1033. Proc Getdata:
  1034. Data: 5 5
  1035. 0.922     1.562     
  1036. 2.572     1.250     
  1037. 2.083     2.500     
  1038. 2.572     4.250     
  1039. 3.428     4.813     
  1040. 3.611     4.500     
  1041. 5.017     4.938     
  1042. 5.689     6.688     
  1043. 5.811     6.063     
  1044. 5.933     6.000     
  1045. 7.461     5.250     
  1046. 8.072     5.625     
  1047.  
  1048. Proc Distribution:
  1049. Xfield: 1
  1050. Yfield: 2
  1051. Mark: sym6e
  1052.  
  1053. Proc Getdata:
  1054. Data:
  1055. 7.583     6.875     
  1056. 8.439     7.938     
  1057. 8.500     9.313     
  1058. 5.689     3.563     
  1059. 5.567     5.125     
  1060. 5.200     3.937     
  1061. 5.139     4.562     
  1062. 4.528     3.688     
  1063. 4.467     3.063     
  1064. 4.467     3.625     
  1065. 6.483     1.125     
  1066.  
  1067. Proc Distribution:
  1068. Xfield: 1
  1069. Yfield: 2
  1070. Mark: sym1n
  1071. Mark.size: 12
  1072.  
  1073. Proc Getdata:
  1074. Data:    2 2 FB-1
  1075.     2 7 FB-2
  1076.     2 8.1 FB-3
  1077.     2 9 FB-4
  1078.  
  1079. Proc Distribution:
  1080. Xfield: 1
  1081. Yfield: 2
  1082. Mark.field: 3
  1083. Mark: 
  1084.  
  1085. Proc Areadef:
  1086. Clone: A
  1087. Area.rectangle: 3.0 8 5.0 10
  1088. Subtitle: Lineplot
  1089.  
  1090. Proc Getdata:
  1091. Data:     0.522     2.188     
  1092.     3.089     5.312     
  1093.     4.311     3.750     
  1094.     6.511     6.813     
  1095.     8.406     5.625     
  1096.  
  1097. Proc Lineplot:
  1098. Xfield: 1
  1099. Yfield: 2
  1100. Linetype: 1
  1101.  
  1102. Proc Getdata:
  1103. Data:    0.400     1.188     0.3
  1104.     2.844     2.562     2.2
  1105.     6.206     1.562     1.2
  1106.     8.344     3.312     2.4
  1107. Proc Lineplot: 
  1108. Xfield: 1
  1109. Yfield: 2
  1110. Linetype: 0
  1111. Shade: 0.9
  1112. Proc Lineplot:
  1113. Xfield: 1
  1114. Yfield: 3
  1115. Linetype: 0
  1116. Shade: 1.0
  1117.  
  1118. Proc Getdata:
  1119. Data:    
  1120.     0.5   6
  1121.     4  7
  1122.     7  7.5
  1123.     9  9
  1124. Proc Lineplot:
  1125. Xfield: 1
  1126. Yfield: 2
  1127. Stairstep: y
  1128.  
  1129. Proc Areadef:
  1130. Clone: A
  1131. Area.rectangle: 5.5 8 7.5 10
  1132. Subtitle: Bargraph
  1133.  
  1134. Proc Getdata:
  1135. Data:     7
  1136.     3
  1137.     6
  1138.     2
  1139.     3
  1140.     5
  1141.     9
  1142.     4
  1143.  
  1144. Proc Bargraph:
  1145. Field: 1
  1146.  
  1147. Proc Areadef:
  1148. Clone: A
  1149. Area.rectangle: 0.5 5.5 2.5 7.5
  1150. Subtitle: Map
  1151. Xmax: 40
  1152. Ymax: 40
  1153.  
  1154. Proc Map:
  1155. Mode: state
  1156.  
  1157. Proc Areadef:
  1158. Clone: A
  1159. Area.rectangle: 3.0 5.5 5.0 7.5
  1160. Subtitle: Pie
  1161.  
  1162. Proc Getdata:
  1163. Data:     12
  1164.     16
  1165.     22
  1166.     10
  1167.     17
  1168.     4
  1169.     19
  1170.     
  1171.     
  1172. Proc Pie:
  1173. Field: 1
  1174. Center: 4.0 6.5
  1175. Radius: 0.8
  1176. Shade: 0.95 0.9 0.85 0.8 0.7
  1177.  
  1178.  
  1179. Proc Areadef:
  1180. Clone: A
  1181. Area.rectangle: 5.5 5.5 7.5 7.5
  1182. Subtitle: Rangebar (error bars)
  1183. Xmax: 10
  1184. Ymax: 100
  1185.  
  1186. Proc Getdata:
  1187. Data: 225 33 44 55 66 77 2.3 1
  1188.       220 35 40 50 60 66 3   2
  1189.       220 38 44 52 64 70 4.5 3
  1190.  
  1191. Proc Rangebar:
  1192. Nval: 5
  1193. Field: 2 3 4 5 6
  1194.  
  1195.  
  1196. Proc Getdata:
  1197. Data:    
  1198.     4  15 50 50 80  0   0
  1199.     5  40 70 70 90  0   0
  1200.     6  10 29 29  46 46  80 
  1201.       
  1202. Proc Rangebar:
  1203. Nval: 2
  1204. Field: 2 3
  1205. Xfield: 1
  1206. Shade: 0.6
  1207.  
  1208. Proc Rangebar:
  1209. Nval: 2
  1210. Field: 4 5
  1211. Xfield: 1
  1212. Shade: 0.9
  1213.  
  1214. Proc Rangebar:
  1215. Nval: 2
  1216. Field: 6 7
  1217. Xfield: 1
  1218. Shade: 0.5 
  1219.  
  1220. Proc Getdata:
  1221. Data:    7 50 3
  1222.     8 60 4
  1223.     9 40 5
  1224.  
  1225. Proc Errorbars:
  1226. Xfield: 1
  1227. Yfield: 2
  1228. Errfield: 3
  1229.  
  1230. Proc Areadef:
  1231. Clone: A
  1232. Area.rectangle: 0.5 3.0 2.5 5.0
  1233. Subtitle: Vbargraph
  1234.  
  1235. Proc Getdata:
  1236. Data:     7 6
  1237.     3 2
  1238.     6 5
  1239.     2 1
  1240.     3 2
  1241.     5 4
  1242.     9 8
  1243.     4 3
  1244.  
  1245. Proc Vbargraph:
  1246. Field: 1 2
  1247.  
  1248. Proc Areadef:
  1249. Clone: A
  1250. Area.rectangle: 3.0 3.0 5.0 5.0
  1251. Subtitle: Vector
  1252. Xmax: 100
  1253. Ymax: 100
  1254.  
  1255. Proc Getdata:
  1256. Data:
  1257. 87.722    13.125    33.944    23.750    
  1258. 73.667    8.750     21.111    11.250    
  1259. 65.111    26.250    35.167    36.875    
  1260. 51.667    36.250    18.667    79.375    
  1261. 35.167    15.625    4.611     93.750    
  1262.  
  1263. Proc Vector:
  1264. Point1fields: 1 2
  1265. Point2fields: 3 4
  1266. Headlength: 0.1
  1267. Headwidth: 0.25
  1268.  
  1269. Proc Areadef:
  1270. Clone: A
  1271. Area.rectangle: 5.5 3.0 7.5 5.0
  1272. Subtitle: Distribution (1-way)
  1273.  
  1274. Proc Areadef:
  1275. Clone: A
  1276. Area.rectangle: 5.5 4.2 7.5 4.7
  1277. Subtitle: 
  1278.  
  1279. Proc Getdata:
  1280. Data:     1.3
  1281.     1.6
  1282.     1.8
  1283.     2.4
  1284.     3.2
  1285.     7.6
  1286.     7.8
  1287.     1
  1288.     2
  1289.     3
  1290.     4
  1291.     5
  1292.     6
  1293.     8
  1294.     9
  1295.     
  1296. Proc Distribution:
  1297. Xfield: 1
  1298.  
  1299. Proc Areadef:
  1300. Clone: A
  1301. Area.rectangle: 0.5 0.5 2.5 2.5
  1302. Subtitle: Legend
  1303.  
  1304. Proc Legend:
  1305. Corner: A
  1306. Entry:
  1307.     symbol# sym1n
  1308.     symbol# sym2n
  1309.     symbol# sym3n
  1310.     symbol# sym4n
  1311.     symbol# sym5n
  1312. Mark:    sym1n sym2n sym3n sym4n sym5n 
  1313. Mark.size: 8
  1314.  
  1315. Proc Areadef:
  1316. Clone: A
  1317. Area.rectangle: 3.0 0.5 5.0 2.5
  1318. Subtitle: Vrangebar (timeline)
  1319. Xmax: 100
  1320. Ymax: 7
  1321.  
  1322. Proc Getdata:
  1323. Data: 225 33 44 55 66 77 2.3 1
  1324.       220 35 40 50 60 66 3   2
  1325.       220 38 44 52 64 70 4.5 3
  1326.  
  1327. Proc Vrangebar:
  1328. Nval: 5
  1329. Field: 2 3 4 5 6
  1330.  
  1331.  
  1332. Proc Getdata:
  1333. Data:    
  1334.     4  15 50 50 80  0   0
  1335.     5  40 70 70 90  0   0
  1336.     6  10 29 29  46 46  80 
  1337.       
  1338. Proc Vrangebar:
  1339. Nval: 2
  1340. Field: 2 3
  1341. Yfield: 1
  1342. Shade: 0.6
  1343.  
  1344. Proc Vrangebar:
  1345. Nval: 2
  1346. Field: 4 5
  1347. Yfield: 1
  1348. Shade: 0.9
  1349.  
  1350. Proc Vrangebar:
  1351. Nval: 2
  1352. Field: 6 7
  1353. Yfield: 1
  1354. Shade: 0.5 
  1355.  
  1356. Proc Areadef:
  1357. Clone: A
  1358. Area.rectangle: 5.5 2.2 7.5 2.5
  1359. Subtitle: Text annotation
  1360. Subtitle.above: -0.2
  1361. Subtitle.justify: center
  1362.  
  1363. Proc Areadef:
  1364. Clone: A
  1365. Area.rectangle: 5.5 1.9 7.5 2.2
  1366. Subtitle: Boxes
  1367. Subtitle.above: -0.2
  1368. Subtitle.justify: center
  1369.  
  1370. Proc Areadef:
  1371. Clone: A
  1372. Area.rectangle: 5.5 1.6 7.5 1.9
  1373. Subtitle: Arrows
  1374. Subtitle.above: -0.2
  1375. Subtitle.justify: center
  1376.  
  1377. Proc Areadef:
  1378. Clone: A
  1379. Area.rectangle: 5.5 1.3 7.5 1.6
  1380. Subtitle: Lines
  1381. Subtitle.above: -0.2
  1382. Subtitle.justify: center
  1383.  
  1384. Proc Areadef:
  1385. Clone: A
  1386. Area.rectangle: 5.5 1.0 7.5 1.3
  1387. Subtitle: Tables
  1388. Subtitle.above: -0.2
  1389. Subtitle.justify: center
  1390.  
  1391.  
  1392. Proc Areadef:
  1393. Clone: A
  1394. Area.rectangle: 5.5 0.7 7.5 1.0
  1395. Subtitle: Combinations
  1396. Subtitle.above: -0.2
  1397. Subtitle.justify: center
  1398.  
  1399. Proc Areadef:
  1400. Clone: A
  1401. Area.rectangle: 5.5 0.4 7.5 0.7
  1402. Subtitle: Misc
  1403. Subtitle.above: -0.2
  1404. Subtitle.justify: center
  1405.  
  1406. SHAR_EOF
  1407. ############################
  1408.  
  1409. cat << \SHAR_EOF > tplates/lineparm.g
  1410. Proc Page:
  1411.  
  1412. Proc Legend:
  1413. Location: 6 9
  1414. Title: Pattern magnification
  1415. Entry:
  1416.     1
  1417.     2
  1418.     3
  1419.     4
  1420.     5
  1421. Entry.size: 12
  1422. Linetype: 3 3 3 3 3
  1423. Linetype.magnify: 1 2 3 4 5
  1424. Linethick: 1 1 1 1 1 
  1425.  
  1426.  
  1427. Proc Legend:
  1428. Location: 6 9
  1429. Title: Line thicknesses    
  1430. Entry:
  1431. 0.2 
  1432. 0.4 
  1433. 0.6 
  1434. 0.8 
  1435. 1 
  1436. 1.5 
  1437. 2 
  1438. 2.5 
  1439. 3 
  1440. 4
  1441. Entry.size: 12
  1442. Linetype: 0 0 0 0 0 0 0 0 0 0
  1443. Linetype.magnify: 3 3 3 3 3 3 3 3 3 3
  1444. Linethick: 0.2 0.4 0.6 0.8 1 1.5 2 2.5 3 4
  1445.  
  1446. SHAR_EOF
  1447. ############################
  1448.  
  1449. cat << \SHAR_EOF > tplates/linethick.g
  1450. Proc Page:
  1451.  
  1452. Proc Legend:
  1453. Location: 6 9
  1454. Title: Line thicknesses    
  1455. Entry:
  1456. 0.2 
  1457. 0.4 
  1458. 0.6 
  1459. 0.8 
  1460. 1 
  1461. 1.5 
  1462. 2 
  1463. 2.5 
  1464. 3 
  1465. 4
  1466. Entry.size: 12
  1467. Linetype: 0 0 0 0 0 0 0 0 0 0
  1468. Linetype.magnify: 3 3 3 3 3 3 3 3 3 3
  1469. Linethick: 0.2 0.4 0.6 0.8 1 1.5 2 2.5 3 4
  1470.  
  1471. SHAR_EOF
  1472. ############################
  1473.  
  1474. cat << \SHAR_EOF > tplates/linethick.mu
  1475. 5.830  8.912  7.272  9.125 : 0 : 0.2 
  1476. 5.818  8.662  7.297  8.875 : 0.4 : 0.4
  1477. 5.830  8.425  7.248  8.662 : 0.6 : 0.6
  1478. 5.818  8.200  7.284  8.425 : 0.8 : 0.8
  1479. 5.830  7.963  7.248  8.200 : 1 : 1
  1480. 5.806  7.737  7.248  7.963 : 1.5 : 1.5
  1481. 5.818  7.500  7.223  7.750 : 2 : 2
  1482. 5.781  7.263  7.187  7.487 : 2.5 : 2.5
  1483. 5.830  7.025  7.187  7.250 : 3 : 3
  1484. 5.781  6.812  7.187  7.025 : 4 : 4
  1485. SHAR_EOF
  1486. ############################
  1487.  
  1488. cat << \SHAR_EOF > tplates/linetype.g
  1489. Proc Page:
  1490.  
  1491. Proc Legend:
  1492. Location: 6 9
  1493. Title:  Linetype numbers
  1494. Entry:
  1495.     0
  1496.     1
  1497.     2
  1498.     3
  1499.     4
  1500.     5
  1501.     6
  1502.     7
  1503.     8
  1504.     9
  1505. Entry.size: 12
  1506. Linetype: 0 1 2 3 4 5 6 7 8 9
  1507. Linetype.magnify: 3 3 3 3 3 3 3 3 3 3
  1508. Linethick: 1 1 1 1 1 1 1 1 1 1
  1509.  
  1510. SHAR_EOF
  1511. ############################
  1512.  
  1513. cat << \SHAR_EOF > tplates/linetype.mu
  1514. 5.830  8.912  7.272  9.125 : 0 : 0 
  1515. 5.818  8.662  7.297  8.875 : 1 : 1
  1516. 5.830  8.425  7.248  8.662 : 2 : 2
  1517. 5.818  8.200  7.284  8.425 : 3 : 3
  1518. 5.830  7.963  7.248  8.200 : 4 : 4
  1519. 5.806  7.737  7.248  7.963 : 5 : 5
  1520. 5.818  7.500  7.223  7.750 : 6 : 6
  1521. 5.781  7.263  7.187  7.487 : 7 : 7
  1522. 5.830  7.025  7.187  7.250 : 8 : 8
  1523. 5.781  6.812  7.187  7.025 : 9 : 9
  1524. SHAR_EOF
  1525. ############################
  1526.  
  1527. cat << \SHAR_EOF > tplates/log1
  1528. !1
  1529. !2
  1530. !3
  1531. !4
  1532. !5
  1533. !6
  1534. !7
  1535. !8
  1536. !9
  1537. !10
  1538. !20
  1539. !30
  1540. !40
  1541. !50
  1542. !60
  1543. !70
  1544. !80
  1545. !90
  1546. !100
  1547. !200
  1548. !300
  1549. !400
  1550. !500
  1551. !600
  1552. !700
  1553. !800
  1554. !900
  1555. !1000
  1556. !2000
  1557. !3000
  1558. !4000
  1559. !5000
  1560. !6000
  1561. !7000
  1562. !8000
  1563. !9000
  1564. !10000
  1565. !20000
  1566. !30000
  1567. !40000
  1568. !50000
  1569. !60000
  1570. !70000
  1571. !80000
  1572. !90000
  1573. !100000
  1574. !200000
  1575. !300000
  1576. !400000
  1577. !500000
  1578. !600000
  1579. !700000
  1580. !800000
  1581. !900000
  1582. !1000000
  1583. !2000000
  1584. SHAR_EOF
  1585. ############################
  1586.  
  1587. cat << \SHAR_EOF > tplates/month.stubs
  1588.  
  1589. J~1970
  1590. F
  1591. M
  1592. A
  1593. M
  1594. J
  1595. J
  1596. A
  1597. S
  1598. O
  1599. N
  1600. D
  1601. J~1971
  1602. F
  1603. M
  1604. A
  1605. M
  1606. J
  1607. J
  1608. A
  1609. S
  1610. O
  1611. N
  1612. D
  1613. J~1972
  1614. F
  1615. M
  1616. A
  1617. M
  1618. J
  1619. J
  1620. A
  1621. S
  1622. O
  1623. N
  1624. D
  1625. J~1973
  1626. F
  1627. M
  1628. A
  1629. M
  1630. J
  1631. J
  1632. A
  1633. S
  1634. O
  1635. N
  1636. D
  1637. J~1974
  1638. F
  1639. M
  1640. A
  1641. M
  1642. J
  1643. J
  1644. A
  1645. S
  1646. O
  1647. N
  1648. D
  1649. J~1975
  1650. F
  1651. M
  1652. A
  1653. M
  1654. J
  1655. J
  1656. A
  1657. S
  1658. O
  1659. N
  1660. D
  1661. J~1976
  1662. F
  1663. M
  1664. A
  1665. M
  1666. J
  1667. J
  1668. A
  1669. S
  1670. O
  1671. N
  1672. D
  1673. J~1977
  1674. F
  1675. M
  1676. A
  1677. M
  1678. J
  1679. J
  1680. A
  1681. S
  1682. O
  1683. N
  1684. D
  1685. J~1978
  1686. F
  1687. M
  1688. A
  1689. M
  1690. J
  1691. J
  1692. A
  1693. S
  1694. O
  1695. N
  1696. D
  1697. J~1979
  1698. F
  1699. M
  1700. A
  1701. M
  1702. J
  1703. J
  1704. A
  1705. S
  1706. O
  1707. N
  1708. D
  1709. J~1980
  1710. F
  1711. M
  1712. A
  1713. M
  1714. J
  1715. J
  1716. A
  1717. S
  1718. O
  1719. N
  1720. D
  1721. J~1981
  1722. F
  1723. M
  1724. A
  1725. M
  1726. J
  1727. J
  1728. A
  1729. S
  1730. O
  1731. N
  1732. D
  1733. J~1982
  1734. F
  1735. M
  1736. A
  1737. M
  1738. J
  1739. J
  1740. A
  1741. S
  1742. O
  1743. N
  1744. D
  1745. J~1983
  1746. F
  1747. M
  1748. A
  1749. M
  1750. J
  1751. J
  1752. A
  1753. S
  1754. O
  1755. N
  1756. D
  1757. J~1984
  1758. F
  1759. M
  1760. A
  1761. M
  1762. J
  1763. J
  1764. A
  1765. S
  1766. O
  1767. N
  1768. D
  1769. J~1985
  1770. F
  1771. M
  1772. A
  1773. M
  1774. J
  1775. J
  1776. A
  1777. S
  1778. O
  1779. N
  1780. D
  1781. J~1986
  1782. F
  1783. M
  1784. A
  1785. M
  1786. J
  1787. J
  1788. A
  1789. S
  1790. O
  1791. N
  1792. D
  1793. J~1987
  1794. F
  1795. M
  1796. A
  1797. M
  1798. J
  1799. J
  1800. A
  1801. S
  1802. O
  1803. N
  1804. D
  1805. J~1988
  1806. F
  1807. M
  1808. A
  1809. M
  1810. J
  1811. J
  1812. A
  1813. S
  1814. O
  1815. N
  1816. D
  1817. J~1989
  1818. F
  1819. M
  1820. A
  1821. M
  1822. J
  1823. J
  1824. A
  1825. S
  1826. O
  1827. N
  1828. D
  1829. J~1990
  1830. F
  1831. M
  1832. A
  1833. M
  1834. J
  1835. J
  1836. A
  1837. S
  1838. O
  1839. N
  1840. D
  1841. J~1991
  1842. F
  1843. M
  1844. A
  1845. M
  1846. J
  1847. J
  1848. A
  1849. S
  1850. O
  1851. N
  1852. D
  1853. J~1992
  1854. F
  1855. M
  1856. A
  1857. M
  1858. J
  1859. J
  1860. A
  1861. S
  1862. O
  1863. N
  1864. D
  1865. J~1993
  1866. F
  1867. M
  1868. A
  1869. M
  1870. J
  1871. J
  1872. A
  1873. S
  1874. O
  1875. N
  1876. D
  1877. J~1994
  1878. F
  1879. M
  1880. A
  1881. M
  1882. J
  1883. J
  1884. A
  1885. S
  1886. O
  1887. N
  1888. D
  1889. J~1995
  1890. F
  1891. M
  1892. A
  1893. M
  1894. J
  1895. J
  1896. A
  1897. S
  1898. O
  1899. N
  1900. D
  1901. J~1996
  1902. SHAR_EOF
  1903. ############################
  1904.  
  1905. cat << \SHAR_EOF > tplates/mps
  1906. !0
  1907. !3
  1908. !6
  1909. !12
  1910. !18
  1911. !24
  1912. !30
  1913. !36
  1914. !42
  1915. !48
  1916. !54
  1917. !60
  1918.  
  1919.  
  1920.  
  1921.  
  1922.  
  1923.  
  1924. SHAR_EOF
  1925. ############################
  1926.  
  1927. cat << \SHAR_EOF > tplates/mpsclinics
  1928. 01
  1929. 02
  1930. 04
  1931. 05
  1932. 06
  1933. 07
  1934. 08
  1935. 09
  1936. 10
  1937. 11
  1938. 12
  1939. 13
  1940. 14
  1941. 15
  1942. 16
  1943. SHAR_EOF
  1944. ############################
  1945.  
  1946. cat << \SHAR_EOF > tplates/mpsvisits
  1947. !0
  1948. !3
  1949. !6
  1950. !12
  1951. !18
  1952. !24
  1953. !30
  1954. !36
  1955. !42
  1956. !48
  1957. !54
  1958. !60
  1959.  
  1960.  
  1961.  
  1962.  
  1963.  
  1964.  
  1965. SHAR_EOF
  1966. ############################
  1967.  
  1968. cat << \SHAR_EOF > tplates/viplstartup.g
  1969. Proc Page:
  1970.  
  1971. Proc Text:
  1972. Position: 2 10.5
  1973. Text:    VIPL -- IPL Version 1.0
  1974.  
  1975.       This is a utility for interactively adding 
  1976.     text annotations, lines, arrows, etc. to an 
  1977.     existing IPL control file.  These annotations
  1978.     will be added with basic, default attributes.
  1979.     You will get a chance to re-do at every step.
  1980.     Things like typesize, font, and line attributes 
  1981.     can be changed by editing the IPL control file
  1982.     that is produced.  The following are available:
  1983.  
  1984.     Text\: Adds 10-point text at a location pointed
  1985.     to by the mouse.  No limit to number of lines.
  1986.  
  1987.     Arrow\: Draws an arrow between two points given
  1988.     with the mouse.
  1989.  
  1990.     Line\: Draws a solid line between two points given
  1991.     with the mouse.  Line can be constrained to
  1992.     horizontal only, vertical only, or unconstrained.
  1993.  
  1994.     Box\: Draws a solid-line box.  The user must define
  1995.     the lower-left and the upper-right corners of the 
  1996.     box with the mouse.  If you are drawing a box around
  1997.     text, do the text first, and remember that text 
  1998.     placement is not exactly equivalent to Postscript.
  1999.  
  2000.     Bullet\: Places a bullet at the pointed-to location.
  2001.  
  2002.     Set_parms\: This is where you set things like text
  2003.     size, font, line dashing and thickness.  Values
  2004.     remain in effect until changed again.
  2005.  
  2006.     Datapoint\: This is a handy way to use the mouse for
  2007.     data entry, and to access the Cartesian coordinates
  2008.     of the mouse location.  The coordinates can 
  2009.     optionally be dumped into a file.  Use the left
  2010.     mouse button to enter points; pressing the right
  2011.     button sends you back to the main menu.  If a
  2012.     graphics area has been set up, coordinates will be
  2013.     in data units-- otherwise they will be in absolute
  2014.     units, i.e. inches from the lower-left corner.
  2015.  
  2016.     Print\: This will send a postscript image of what
  2017.     you have done so far to your laser printer.  It 
  2018.     does not save or re-save the control file.
  2019.  
  2020.     Redraw\: This redraws the image.
  2021.  
  2022.     Quit\: From here you can either 1) save the new IPL
  2023.     file under a different name; 2) re-save under the
  2024.     original file name; or 3) quit without saving.
  2025.  
  2026. Proc Draw:
  2027. Points: 1.45 2.55 1.45 10.69
  2028.  6.62 10.69
  2029.  6.62 2.55
  2030.  1.45 2.55
  2031. SHAR_EOF
  2032. ############################
  2033.  
  2034.  
  2035.