summaryrefslogtreecommitdiff
path: root/fonts/capbas/cmgray.mf
blob: d23b0f4d5ecbab5f7ca7548707489f8bf9840f52 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
% Computer Modern Typewriter Text for use with 10 point
if unknown mag: mag := 1; fi;

input mftools;
uu# := 0.1pt#;
picture groundpattern;
gentile(0.013/mag,8,8,150uu#,150uu#,50uu#,pensquare,groundpattern)(
7,14,21,28,35,42,48,56, 6,13,20,27,34,41,48,63)

def endchar =
 scantokens extra_endchar;
 reversevideo;reversevideo;
 tilepic(groundpattern);
 if proofing>0: makebox(proofrule); fi
 chardx:=w;     % desired width of the character in pixels
 shipit;
 if displaying>0: makebox(screenrule); showit; fi
 clearit;
 endgroup enddef;

input cmssbx10;