/contrib/groff/tmac/psold.tmac

 1.\" psold.tmac
 2.\"
 3.\" In newer PostScript printers, text fonts contain all ISO Latin-1
 4.\" characters.  The font description files that comes with groff match
 5.\" these fonts.  The text fonts in older PostScript printers are missing
 6.\" some of these characters.  This file prevents those characters from
 7.\" being used.  This will allow the PostScript output to be printed on
 8.\" such old printers.
 9.nr _C \n(.C
10.cp 0
11.\" Define an accented character.
12.de ps-achar
13.\" Note that character definitions are always interpreted with
14.\" compatibility mode off.
15.char \\$1 \\$3\
16\k[acc]\
17\h'(u;-\w'\\$2'-\w'\\$3'/2+\\\\n[skw]+(\w'x'*0)-\\\\n[skw])'\
18\v'(u;\w'x'*0+\\\\n[rst]+(\w'\\$3'*0)-\\\\n[rst])'\
19\\$2\
20\v'(u;\w'x'*0-\\\\n[rst]+(\w'\\$3'*0)+\\\\n[rst])'\
21\h'|\\\\n[acc]u'
22.ie '\\$3'\(.i' .hcode \\$1i
23.el .hcode \\$1\\$3
24..
25.ps-achar \['y] \(aa y
26.ps-achar \['Y] \(aa Y
27.char \[12] \v'-.7m\s[\\n(.s*6u/10u]+.7m'1\v'-.7m\s0+.7m'\
28\(f/\s[\\n(.s*6u/10u]2\s0
29.char \[14] \v'-.7m\s[\\n(.s*6u/10u]+.7m'1\v'-.7m\s0+.7m'\
30\(f/\s[\\n(.s*6u/10u]4\s0
31.char \[34] \v'-.7m\s[\\n(.s*6u/10u]+.7m'3\v'-.7m\s0+.7m'\
32\(f/\s[\\n(.s*6u/10u]4\s0
33.char \[S1] \v'-.2m'\s-31\s+3\v'+.2m'
34.char \[S2] \v'-.2m'\s-32\s+3\v'+.2m'
35.char \[S3] \v'-.2m'\s-33\s+3\v'+.2m'
36.char \[bb] |
37.char \[de] \fS\(de
38.char \[-D] \Z'\v'-.1m'-'D
39.char \[TP] \
40I\h'-.25m'\v'-.33m'\s'\En(.s*6u/10u'\v'.33m'D\v'-.33m'\s0\v'.33m'
41.char \[Sd] \Z'\v'-.3m'\h'.2m'-'\(pd
42.char \[Tp] \zlp
43.tr \[char166]\[bb]
44.tr \[char176]\[de]
45.tr \[char177]\[+-]
46.tr \[char178]\[S2]
47.tr \[char179]\[S3]
48.tr \[char181]\[mc]
49.tr \[char185]\[S1]
50.tr \[char188]\[14]
51.tr \[char189]\[12]
52.tr \[char190]\[34]
53.tr \[char208]\[-D]
54.tr \[char215]\[mu]
55.tr \[char221]\['Y]
56.tr \[char222]\[TP]
57.tr \[char240]\[Sd]
58.tr \[char247]\[di]
59.tr \[char253]\['y]
60.tr \[char254]\[Tp]
61.cp \n(_C