home *** CD-ROM | disk | FTP | other *** search
/ Amiga Computing 56 / ac056a.adf / PAINTJET.PPD < prev    next >
Text File  |  1992-10-21  |  4KB  |  193 lines
  1. rem HP Paintjet (using PC-8 character set)
  2.  
  3. cc '@'=27,"E",27,"&k0G",27,"(10U",27,"(s1Q"
  4. cc 'b'=27,"(s3B"    ; 27,"(s0B"
  5. cc 'i'=27,"(s1S"    ; 27,"(s0S"
  6. cc 'q'=27,"(s2Q"    ; 27,"(s1Q"
  7. cc 's'=27,"&a+0.25R",27,"(s6V" ; 27,"&a-0.25R",27,"(s12V" ;; subscript
  8. cc 't'=27,"&a-0.25R",27,"(s6V" ; 27,"&a+0.25R",27,"(s12V" ;; superscript
  9. cc 'u'=27,"&d0D"    ; 27,"&d@"
  10.  
  11. rem colours - use ctrlcode twice to return to black
  12.  
  13. cc 'r'=27,"&v1S" ; 27,"&v0S" ;; red
  14. cc 'g'=27,"&v2S" ; 27,"&v0S" ;; green
  15. cc 'm'=27,"&v5S" ; 27,"&v0S" ;; magenta
  16. cc 'y'=27,"&v3S" ; 27,"&v0S" ;; yellow
  17. cc 'a'=27,"&v6S" ; 27,"&v0S" ;; cyan
  18. cc 'd'=27,"&v4S" ; 27,"&v0S" ;; dark blue
  19.  
  20. rem Character redefinitions using PC-8 Symbol set
  21.  
  22. rc ''=27,"&p1X",2
  23. rc ''=27,"&p1X",3
  24. rc ''=27,"&p1X",4
  25. rc 'Ÿ'=27,"&p1X",5
  26. rc ''=27,"&p1X",6
  27. rc ''=27,"&p1X",11
  28. rc 12=13,12 ;; form feed
  29. rc ''=27,"&p1X",14
  30. rc ''=27,"&p1X",15
  31. rc ''=27,"&p1X",16
  32. rc ''=27,"&p1X",17
  33. rc ''=27,"&p1X",18
  34. rc ''=27,"&p1X",19
  35. rc '¶'=27,"&p1X",20
  36. rc '§'=27,"&p1X",21
  37. rc ''=27,"&p1X",22
  38. rc ''=27,"&p1X",23
  39. rc ''=27,"&p1X",24
  40. rc ''=27,"&p1X",25
  41. rc ''=27,"&p1X",26
  42. rc ''=27,"&p1X",27
  43. rc ''=27,"&p1X",28
  44. rc ''=27,"&p1X",29
  45. rc ''=27,"&p1X",30
  46. rc ''=27,"&p1X",31
  47.  
  48. rem accented chars defined so as not to be split into letter and accent
  49.  
  50. rc 'Ç'=128
  51. rc 'ü'=129
  52. rc 'é'=130
  53. rc 'â'=131
  54. rc 'ä'=132
  55. rc 'à'=133
  56. rc 'å'=134
  57. rc 'ç'=135
  58. rc 'ê'=136
  59. rc 'ë'=137
  60. rc 'è'=138
  61. rc 'ï'=139
  62. rc 'î'=140
  63. rc 'ì'=141
  64. rc 'Ä'=142
  65. rc 'Å'=143
  66. rc 'É'=144
  67. rc 'æ'=145
  68. rc 'Æ'=146
  69. rc 'ô'=147
  70. rc 'ö'=148
  71. rc 'ò'=149
  72. rc 'û'=150
  73. rc 'ù'=151
  74. rc 'ÿ'=152
  75. rc 'Ö'=153
  76. rc 'Ü'=154
  77. rc 'ø'=27,"(8U",214,27,"(10U" ;; o slash
  78. rc '£'=156
  79. rc 'Ø'=27,"(8U",210,27,"(10U" ;; O slash
  80. IF PC
  81. rc ''=158
  82. ENDIF
  83. IF ST
  84. rc 158=27,"(8U",222,27,"(10U" ;; double s
  85. ENDIF
  86. rc 'á'=160
  87. rc 'í'=161
  88. rc 'ó'=162
  89. rc 'ú'=163
  90. rc 'ñ'=164
  91. rc 'Ñ'=165
  92. rc 'ß'=27,"(8U",222,27,"(10U"
  93. rc '»'=27,"(10U",175
  94.  
  95. IF ANSI
  96. rc 'Ÿ'=218
  97. rc '—'=191
  98. rc '˜'=192
  99. rc 'ž'=217
  100. rc 'œ'=196
  101. rc '•'=179
  102. rc 'š'=194
  103. rc '™'=193
  104. rc ''=197
  105. rc '›'=195
  106. rc '–'=180
  107. rc 'ª'=166
  108. rc 'º'=167
  109. rc '¿'=168
  110. rc '¬'=170
  111. rc '½'=171
  112. rc '¼'=172
  113. rc '¡'=173
  114. rc '«'=174
  115. rc 'µ'=230
  116. rc '±'=241
  117. rc '÷'=246
  118. rc '°'=248
  119. rc '·'=250
  120. rc 'Þ'=253
  121. rc 164=27,"(0N",164,27,"(10U" ;; curr. sym.
  122. rc 165=27,"(0N",165,27,"(10U" ;; yen
  123. rc 166=27,"(0N",166,27,"(10U" ;; vert
  124. rc 169=27,"(0N",169,27,"(10U" ;; copyright
  125. rc 174=27,"(0N",174,27,"(10U" ;; registered
  126. rc 175=27,"(0N",175,27,"(10U" ;; overline
  127. rc 179=27,"(0N",179,27,"(10U" ;; super 3
  128. rc 190=27,"(0N",190,27,"(10U" ;; 3/4
  129. rc 215=27,"(0N",215,27,"(10U" ;; multiply
  130. ENDIF
  131.  
  132. IF VER5
  133. acute      ; 27,"&f0S",27,"(8U",8,168,27,"(10U",27,"&f1S"
  134. grave      ; 27,"&f0S",27,"(8U",8,169,27,"(10U",27,"&f1S"
  135. circumflex ; 27,"&f0S",27,"(8U",8,170,27,"(10U",27,"&f1S"
  136. umlaut     ; 27,"&f0S",27,"(8U",8,171,27,"(10U",27,"&f1S"
  137. tilde      ; 27,"&f0S",27,"(8U",8,172,27,"(10U",27,"&f1S"
  138. macron     ; 27,"&f0S",27,"(8U",8,176,27,"(10U",27,"&f1S"
  139.  
  140. ascend 27,"*p-5Y" ; 27,"*p+5Y"
  141. ENDIF
  142.  
  143. hl 27,"="
  144.  
  145. IF VER5
  146. mm 5
  147. mf 1
  148. pp on
  149. ms on
  150. ff on
  151. double ;; no auto doubling
  152. regular ibuclsturgmyad
  153. group en
  154. end 27,"E"
  155. omit p
  156. menu
  157. "Red:^XR"       R
  158. "Green:^XG"     G
  159. "Cyan:^XA"      A
  160. "Magenta:^XM"   M
  161. "Dark blue:^XD" D
  162. "Yellow:^XY"    Y
  163. menuend
  164. ELSE
  165. mm 5
  166. mf 1
  167. ff on
  168. cw 72
  169. cc 'c'=27,"(s20H"    ; 27,"(s10H"
  170. cc 'e'=27,"(s16.67H" ; 27,"(s10H"
  171. cc 'l'=27,"(s5H"    ; 27,"(s10H"
  172. cc 'p'=27,"(s1P"    ; 27,"(s0P"
  173. ENDIF
  174.  
  175. rem all widths in units of 1/720"
  176.  
  177. IF VER5
  178. rules c=2,e=1,n=0
  179.  
  180. font 0 ; Courier 10 cpi
  181. enter 27,"(s0p10h3T"27,"&k12H"
  182. cw 72
  183.  
  184. font 1 ; "elite", 12 cpi
  185. enter 27,"(s0p12h3T",27,"&k10H"
  186. cw 60
  187.  
  188. font 2 ; "condensed", 18 cpi
  189. enter 27,"(s0p18h12v3T"27,"&k6.6667H"
  190. cw 40
  191.  
  192. ENDIF
  193.