home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / sprint / drawln01.zip / DRAWLINE.TST next >
Text File  |  1993-03-12  |  7KB  |  127 lines
  1. Printer default
  2. STYLE TopMargin  1 inch, BottomMargin 1 inch
  3. STYLE LeftMargin 1 inch, RightMargin  1 inch
  4. STYLE Paper     11 inch, PaperWidth 8.5 inch
  5. STYLE Spread     1 line
  6. STYLE WordSpacing  1000
  7. R 65,T 5,FONT Times, SIZE 12 points, SPACING 13 points
  8. @=From the desk of
  9. @=NORMAN SWARTZ
  10.  
  11. @>March 12, 1993
  12.  
  13. This file illustrates how to set up figures for printing usingthe IBM line drawing characters.  You will need to customize yourversion of Sprint according to the directions in the fileDRAWLN01.DOC.
  14.  
  15. Here is the simplest sort of line drawing, using Extended fontthroughout, i.e. for the enclosing box and for the text within:
  16. R 0,T 5
  17.  
  18. @begin(text, font Extended, size 9 points, spacing 1 line, notct)
  19.     ╒═══════════════════════════════════════════════════════════╕
  20.     │                                                           │
  21.     │  As you can see, in this example, the text inside the     │
  22.     │  box is Extended, just like the characters used to draw   │
  23.     │  the box itself.  The text and line-drawing characters    │
  24.     │  are monospaced, and the right-hand vertical line of the  │
  25.     │  box falls into correct alignment because the whitespace  │
  26.     │  at the right edge of each line of print consists of      │
  27.     │  fixed-pitch blankspaces.                                 │
  28.     │                                                           │
  29.     ╘═══════════════════════════════════════════════════════════╛
  30. @end(text)
  31. R 65,T 5
  32.  
  33. In the next figure, we will print the text, inside the box, usingTimes font.  This is trickier because Times, unlike Extended, isa proportionally-spaced font.  We will first print the box, usingthe "column" (not the "columns") macro - the effect is to movethe `print head', after the macro completes, back to the pointwhere the macro started.  We can then `overprint' with the text. We will indent the box 1@" from the left margin  (in effect 2@"from the left edge of the paper), and make it 3@" wide:
  34.  
  35. @begin(column, linelength 4 inches, size 10 points, spacing 10points, font extended, fill no)
  36. @tabset(1 inch)
  37.     ╓@>(─)╖
  38.     ║@>║
  39.     ║@>║
  40.     ║@>║
  41.     ║@>║
  42.     ║@>║
  43.     ║@>║
  44.     ║@>║
  45.     ║@>║
  46.     ║@>║
  47.     ╙@>(─)╜
  48. @end(column)
  49. @style(leftmargin 2.3 inches, rightmargin 3.8 inches, fill yes,justify yes, font times, size 10.75 points, spacing 12 points)
  50. @*This filling for the box was printed in Times font,proportionally-spaced, with both left- and right-justification. It is essential to follow this bit of text with "@@blankspace(xxlines)" in order to move the print head down below the enclosingbox.
  51. @blankspace(.35 inch)
  52. @style(leftmargin 1 inch, rightmargin 1 inch, size 12 points,spacing 13 points)
  53. To fit the text inside the box above, I set the left margin to2.3@" and the right margin to 3.8@".  The actual height of thebox was determined by trial-and-error.
  54.  
  55. @begin(Group)
  56. @begin(column, linelength 2.5 inches, fill yes, justify yes)
  57. The same technique - using the "column" macro - can be adapted toprint text outside of the box, to its left or right.  Examine thefile DRAWLINE.TST to see how this might be done.
  58. @end(column)
  59. @style(leftindent 3 inches, linelength 3.5 inches, fill no, fontExtended, spacing 1 line, notct)
  60. ╔══════════════╤══════════════╗
  61. ║  Upper       │  Upper       ║
  62. ║  left        │  right       ║
  63. ║  quadrant    │  quadrant    ║
  64. ╟──────────────┼──────────────╢
  65. ║  Lower       │  Lower       ║
  66. ║  left        │  right       ║
  67. ║  quadrant    │  quadrant    ║
  68. ╚══════════════╧══════════════╝
  69. @end(Group)
  70. @style(leftindent 0 inches, linelength 6.5 inches, fill yes, fonttimes, spacing 13 points, tct yes)
  71.  
  72. For your reference, here is a table of the ASCII values, 128-255,for the font Extended.  As you will see (when this file isprinted), many of the values in this font are not defined.  Toprint the title in boldface, it was necessary to revert to theCourier font, since the bold, italics, and bold italics typefacesare not available in the Extended font.
  73.  
  74. R 0
  75. @begin(text, font Extended, fill no, size 9 points, spacing 1 line, notct)
  76. @macro{revert() = "FONT COURIER@b[@eval]ENDF"}
  77. ╔═══════════════════════════════════╡ @revert{Extended} ╞═══════════════════════════════════╗
  78. ║                                                                                  ║
  79. ║  128  Ç  141  ì  154  Ü  167  º  180 ┤   193  ┴  206 ╬   219  █  232  Φ  245  ⌡  ║
  80. ║  129  ü  142  Ä  155  ¢  168  ¿  181  ╡  194 ┬   207  ╧  220 ▄   233  Θ  246  ÷  ║
  81. ║  130  é  143  Å  156  £  169  ⌐  182 ╢   195  ├  208 ╨   221  ▌  234  Ω  247  ≈  ║
  82. ║  131  â  144  É  157  ¥  170  ¬  183  ╖  196 ─   209  ╤  222 ▐   235  δ  248  °  ║
  83. ║  132  ä  145  æ  158  ₧  171  ½  184 ╕   197  ┼  210 ╥   223  ▀  236  ∞  249  ∙  ║
  84. ║  133  à  146  Æ  159  ƒ  172  ¼  185  ╣  198 ╞   211  ╙  224  α  237  φ  250  ·  ║
  85. ║  134  å  147  ô  160  á  173  ¡  186 ║   199  ╟  212 ╘   225  ß  238  ε  251  √  ║
  86. ║  135  ç  148  ö  161  í  174  «  187  ╗  200 ╚   213  ╒  226  Γ  239  ∩  252  ⁿ  ║
  87. ║  136  ê  149  ò  162  ó  175  »  188 ╝   201  ╔  214 ╓   227  π  240  ≡  253  ²  ║
  88. ║  137  ë  150  û  163  ú  176 ░   189  ╜  202 ╩   215  ╫  228  Σ  241  ±  254  ■  ║
  89. ║  138  è  151  ù  164  ñ  177  ▒  190 ╛   203  ╦  216 ╪   229  σ  242  ≥  255     ║
  90. ║  139  ï  152  ÿ  165  Ñ  178 ▓   191  ┐  204 ╠   217  ┘  230  µ  243  ≤          ║
  91. ║  140  î  153  Ö  166  ª  179  │  192 └   205  ═  218 ┌   231  τ  244  ⌠          ║
  92. ║                                                                                  ║
  93. ╚══════════════════════════════════════════════════════════════════════════════════╝
  94. @end(Text)
  95. R 65,T 5
  96.  
  97. By the way, now that you have the line-drawing characters, don'tforget about the tried-and-true "@@box()" and "@@bar()". Witness:
  98.  
  99. @begin(Box, margins +1.5 inches)
  100. @blankspace(0.5 lines)
  101. @=The sentence immediately below is false.
  102. @blankspace(0.5 lines)
  103. @bar(0.5 points)
  104. @blankspace(0.5 lines)
  105. @=The sentence immediately above is true.
  106. @blankspace(0.5 lines)
  107. @end(Box)
  108.  
  109. You can add a shadow to the enclosing box by using characters176-178, or 219-223.
  110. R 0,T 5
  111.  
  112. @begin(text, font Extended, fill no, size 10 points, spacing 1 line, notct)
  113. @define(raise, script +0.20)
  114. @define(boost, script +0.15)
  115. ╔══════════════════════════╤═══════════════════════════════════════════════╗
  116. ║ Professor Norman Swartz  │ e-mail (via Internet):   norman@boost{_}swartz@@sfu.ca ║█
  117. ║ Department of Philosophy │ e-mail (via Bitnet):     swartz@@sfuvax.bitnet ║█
  118. ║ Simon Fraser University  │                                               ║█
  119. ║ Burnaby, B.C.            │ fax:                           (604)-291-4455 ║█
  120. ║ Canada V5A 1S6           │ voice (Dept. of Phil. at SFU): (604)-291-3343 ║█
  121. ╚══════════════════════════╧═══════════════════════════════════════════════╝█
  122.  @raise{▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀}
  123. @end(text)
  124.  
  125. R 65,T 5
  126. Those of you who develop other features of Sprint, please doshare them with the SPRINT-L mailgroup and upload them tomsdos/sprint in the Simtel and Oakland repositories.
  127.