%! Simon font %%BoundingBox: 0 -10 40 50 %%Was: 0 -5 40 40 %%Was: 0 0 40 40 %0 serverdict begin exitserver /TBuildCharDict 10 dict def /SimonFont 10 dict def /fudge 110 def SimonFont begin %% /FontType 3 def /FontMatrix [0.001 0 0 0.001 0 0] def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for % Character definitions /Metrics 130 dict def /CharDefs 130 dict def CharDefs begin /.notdef () def /The_letter_x ( gsave initclip newpath 0 0 M 0 1000 L 1000 1000 L 1000 0 L 0 0 L %new path 192 488 M 22 -2 44 -2 66 -2 c 0 2 l 28 0 54 0 82 2 c -2 -2 l -148 0 l closepath %end path %erase %new path 404 180 M 146 0 l -22 2 -44 2 -66 2 c 0 -2 l -82 0 l closepath %end path %erase %new path 410 488 M 24 -2 48 -2 72 -2 c 0 2 l 20 0 38 0 58 2 c -2 -2 l -130 0 l closepath %end path %erase %new path 188 180 M 128 0 l -24 2 -48 2 -72 2 c 0 -2 l -58 0 l closepath %end path %erase eoclip newpath %new path 280 486 M -2 2 -6 4 -8 4 c 0 -2 l -38 0 l -2 0 -2 0 -4 -2 c 0 -2 l 2 0 l 0 -4 l 76 -100 154 -198 230 -298 c 2 -2 6 -2 8 -2 c 38 0 l 2 0 2 0 4 2 c 0 2 l -2 0 l 0 4 l -76 100 -154 198 -230 298 c closepath %end path fill %new path 230 180 M 10 0 l 6 0 12 2 16 6 c 0 0 2 2 2 2 c 80 100 160 198 238 298 c 2 0 2 2 2 2 c -2 0 l 0 0 0 0 -2 2 c -2 0 l 0 -2 l -6 0 l -6 0 -12 -2 -16 -6 c 0 0 -2 -2 -2 -2 c -80 -100 -160 -198 -238 -298 c -2 0 -2 -2 -2 -2 c closepath %end path fill %new path 264 442 M 24 0 l -10 16 -22 32 -32 48 c 0 -2 l -66 0 l 0 -22 l 2 0 l 16 0 34 0 46 -4 c 6 -2 10 -6 16 -10 c 2 -4 6 -8 10 -12 c closepath %end path fill %new path 314 442 M -2 2 -2 6 -2 8 c 2 0 l 0 4 0 6 4 10 c 6 6 14 8 22 8 c 0 22 l -2 -2 l -80 0 l 10 -16 22 -32 32 -48 c 0 2 l 26 0 l closepath %end path fill %new path 428 226 M 2 -2 2 -6 2 -8 c -2 0 l 0 -4 0 -6 -4 -10 c -6 -6 -14 -8 -22 -8 c 0 -20 l 82 0 l -10 16 -22 32 -32 48 c 0 -2 l -26 0 l closepath %end path fill %new path 478 226 M -24 0 l 10 -16 22 -32 32 -46 c 66 0 l 0 22 l -2 0 l -16 0 -34 0 -46 4 c -6 2 -10 6 -16 10 c -2 4 -6 8 -10 12 c closepath %end path fill %new path 422 422 M 12 0 l 16 22 32 46 48 68 c -2 -2 l -72 0 l 0 -22 l 2 0 l 6 0 12 -2 16 -6 c 2 -2 4 -6 4 -10 c 2 -2 2 -4 2 -6 c -2 0 l 0 -8 -4 -18 -10 -24 c closepath %end path fill %new path 446 422 M 2 4 6 8 10 12 c 8 8 20 16 32 22 c 16 8 34 12 52 12 c 0 22 l -2 -2 l -58 0 l -16 -22 -32 -46 -48 -68 c 2 2 l 12 0 l closepath %end path fill %new path 280 246 M -2 -4 -6 -8 -10 -12 c -8 -8 -20 -16 -32 -22 c -16 -8 -34 -12 -52 -12 c 0 -20 l 60 0 l 16 22 32 46 48 68 c -2 -2 l -12 0 l closepath %end path fill %new path 304 246 M -12 0 l -16 -22 -32 -46 -48 -66 c 74 0 l 0 22 l -2 0 l -6 0 -12 2 -16 6 c -2 2 -4 6 -4 10 c -2 2 -2 4 -2 6 c 2 0 l 0 8 4 18 10 24 c closepath %end path fill grestore ) def end % of CharDefs dictionary Encoding 120 /The_letter_x put Metrics begin /The_letter_x 367 fudge add def /.notdef 0 def end /BuildChar { TBuildCharDict begin %% /char exch def /fontdict exch def /M {moveto} def /L {lineto} def /l {rlineto} def /C {curveto} def /c {rcurveto} def /charname fontdict /Encoding get char get def %% /charproc fontdict /CharDefs get charname get def /charwdth fontdict /Metrics get charname get def %% gsave 1.3 1.3 scale 0.2 setflat 0.2 setlinewidth charwdth 0 %was: 0 -180 0 -200 charwdth 1000 setcachedevice -186 fudge add 0 translate charproc cvx exec grestore end } def %was: /FontBBox [186 fudge sub 180 552 490] def /FontBBox [186 fudge sub 200 552 490] def end /Simon SimonFont definefont pop /Simon findfont 40 scalefont setfont 0 0 moveto (x) show