Blob


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 %
8 /newdict /Courier findfont length 1 add 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
18 /newdict /Courier-Oblique findfont length 1 add 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