% 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;