|
|
1.1 root 1: %
2: % Fat versions of the stroked Courier and Courier-Oblique - from Johnathan Shopiro.
3: % Can be selectively pulled in using the -C option that's available with all the
4: % PostScript translators or permanently added to any of the prologues. Helps on
5: % Linotronic typesetters, where Courier and Courier-Oblique are too light!
6: %
7:
8: /newdict /Courier findfont length dict def
9: /Courier findfont {
10: 1 index /FID ne
11: {newdict 3 1 roll put}
12: {pop pop}
13: ifelse
14: } forall
15: newdict /StrokeWidth 60 put
16: /Courier newdict definefont pop
17:
18: /newdict /Courier-Oblique findfont length dict def
19: /Courier-Oblique findfont {
20: 1 index /FID ne
21: {newdict 3 1 roll put}
22: {pop pop}
23: ifelse
24: } forall
25: newdict /StrokeWidth 60 put
26: /Courier-Oblique newdict definefont pop
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.