diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/drm/drmlow.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/drm/drmlow.mf | 1358 |
1 files changed, 1358 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/drm/drmlow.mf b/Master/texmf-dist/fonts/source/public/drm/drmlow.mf new file mode 100644 index 00000000000..ed5713c75a7 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/drm/drmlow.mf @@ -0,0 +1,1358 @@ +% +AMDG This document was begun on 1X April 11EX, Easter +% Tuesday, and it is humbly dedicated to Our Risen Lord +% Jesus Christ, for His mercy. + +beginchar("a",exw#+2ss#,ex#,0); "The Letter a"; + +z0 = (ss,3h/4); +z1 = (x3/2,h+o); +z2 = (w-ss-lserwl,3h/4); +z3 = (x2,lserhl); +z8 = z7 shifted (0,lserhl); +z9 = 0.5[z18,z19]; y9 := 0-o; +z10 = (ss-o,h/4); +z15 = z2 shifted (-thickl,0); +z16 = z1 shifted (0,-thinl); +z17 = z9 shifted (0,thinl); +z18 = z10 shifted (thickl,0); +z19 = z3 shifted (-thickl,lserhl); +z20 = (w/2-thickl,h/2); +z21 = z20 shifted (thickl/2,-thinl); +z22 = 0.2[z15,z19]; +z23 = z19 shifted (-thinl,0); +z24 = z22 shifted (0,-thickl/2); +z25 = z16 shifted (.5thickl,0); + +lrserif(3,4,5,6,7)(1); +drtbulb(0,11,12,13,14); + +fill +z13..z12..z11..z0{up}..{right}z1{right}..{down}z2--z3..z4..z5--z6--z7--z8..z9..{up}z10..z20..z22--z15{up}..{left}z16{left}..z13..cycle; +unfill z18..z21..z24--z19..z17..cycle; + +lowa := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("b",1.2exw#+2ss#,asch#,0); "The Letter b"; + +z0 = (ss+userwl,h-userhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+lserwl,lserhl); +z3 = z2 shifted (thickl,0); +z12 = z1 shifted (0,userhl); +z13 = z3 shifted (0,-lserhl); +z19 = 0.5[z15,z17]; +z20 = (w-ss,(ex+o)/2); +z21 = (x2,y19); +z14 = 0.5[z22,z23] shifted (0,ex/2); +z15 = z14 shifted (0,-thinl); +z16 = 0.5[z22,z23] shifted (0,-ex/2-o); +z17 = z16 shifted (0,thinl); +z22 = z21 shifted (thickl,0); +z23 = z20 shifted (-curvl,0); + +ulserif(0,4,5,6,7)(1); +llserif(2,8,9,10,11)(1); + +fill z0..z4..z5--z6--z12--z13--z10--z9..z8..z2--cycle; +fill +z21{up}..{right}z14{right}..{down}z20{down}..{left}z16{left}..{up}z21..cycle; +unfill +z22{up}..{right}z15{right}..{down}z23{down}..{left}z17{left}..{up}z22..cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("d",1.2exw#+2ss#,asch#,0); "The Letter d"; + +z0 = (w-ss-lserwl,h-userhl); +z1 = z0 shifted (-thickl,0); +z2 = (x0,lserhl); +z3 = z2 shifted (-thickl,0); +z12 = z0 shifted (0,userhl); +z13 = z3 shifted (0,-lserhl); +z19 = 0.5[z15,z17]; y19 := ex/2; +z20 = (x2,(ex+o)/2); +z21 = (ss,(ex+o)/2); +z14 = 0.5[z22,z23] shifted (0,ex/2); +z15 = z14 shifted (0,-thinl); +z16 = 0.5[z22,z23] shifted (0,-ex/2-o); +z17 = z16 shifted (0,thinl); +z22 = z21 shifted (curvl,0); +z23 = z20 shifted (-thickl,0); + +ulserif(1,4,5,6,7)(1); +lrserif(2,8,9,10,11)(1); + +fill z1..z4..z5--z6--z12--z2..z8..z9--z10--z13--z1--cycle; +fill +z21{up}..{right}z14{right}..{down}z20{down}..{left}z16{left}..{up}z21..cycle; +unfill +z22{up}..{right}z15{right}..{down}z23{down}..{left}z17{left}..{up}z22..cycle; + +lowd := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("l",0.6exw#+2ss#,asch#,0); "The Letter l"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+userwl,h-userhl); +z3 = z2 shifted (thickl,0); +z16 = z3 shifted (0,userhl); + +ulserif(2,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +lrserif(1,12,13,14,15)(1); + +fill +z0--z2..z4..z5--z6--z7--z16--z1..z12..z13--z14--z10--z9..z8..z0..cycle; + +lowl := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("h",exw#+2ss#+5hair#,asch#,0); "The Letter h"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+userwl,h-userhl); +z3 = z2 shifted (thickl,0); +z16 = z3 shifted (0,userhl); +z50 = 0.5[z0,z19]; +z17 = (x50,ex+o); +z18 = z17 shifted (0,-thinl); +z44 = z17; +z45 = z44 shifted (0,-thinl); +z19 = (w-ss-lserwl,lserhl); +z20 = z19 shifted (-thickl,0); +z25 = z20 shifted (0,-lserhl); +z26 = z1 shifted (0,-lserhl); +z27 = z19 shifted (0,w/3); +z28 = z27 shifted (-thickl,0); +z29 = z1 shifted (0,w/3); +z30 = z29 shifted (-thickl,0); +z35 = (x28,ex-thickl); +z36 = (x27,ex-thickl); +z37 = (x30,ex-thickl); +z38 = (x29,ex-thickl); + +ulserif(2,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +lrserif(19,21,22,23,24)(1); +llserif(20,40,41,42,43)(1); +lrserif(1,31,32,33,34)(1); + +path hone; path htwo; +hone = +z26--z10--z9..z8..z0--z2..z4..z5--z6--z16--z1..z31..z32--z33--cycle; +htwo = +z1--z29--z38{up}..{right}z18{right}..{right}z45{right}..{down}z35--z28--z20..z40..z41--z42--z23--z22..z21..z19--z27---z36{up}..{left}z44{left}..{left}z17{left}..{down}z37--z30--z0--cycle; +fill hone; fill htwo; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar("p",1.2exw#+2ss#,ex#,dep#); "The Letter p"; + +z0 = (ss+lserwl,-d+lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+userwl,h-userhl); +z3 = z2 shifted (thickl,0); +z16 = z3 shifted (0,userhl); +z22 = z1 shifted (0,userhl); +z23 = z3 shifted (0,-lserhl); +z50 = 0.5[z2,(w-ss,y2)]; +z24 = (x50,h); +z25 = z24 shifted (0,-thinl); +z26 = (x50,0); +z27 = z26 shifted (0,thinl); +z29 = 0.5[z25,z27]; +z30 = (w-ss,y29); +z31 = (x0,y30); +z32 = z31 shifted (thickl,0); +z33 = z30 shifted (-curvl,0); + +ulserif(2,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +lrserif(1,12,13,14,15)(1); + +fill z0..z8..z9--z10--z14--z13..z12..z1--z16--z6--z5..z4..z2--cycle; +fill +z31{up}..{right}z24{right}..{down}z30{down}..{left}z26{left}..{up}z31..cycle; +unfill +z32{up}..{right}z25{right}..{down}z33{down}..{left}z27{left}..{up}z32..cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar("q",1.2exw#+2ss#,ex#,dep#); "The Letter q"; + +z0 = (w-(ss+lserwl),-d+lserhl); +z1 = z0 shifted (-thickl,0); +z2 = (w-(ss+userwl),h-userhl); +z3 = z2 shifted (-thickl,0); +z16 = z3 shifted (0,userhl); +z17 = 0.5[z16 shifted (thickl,0),(ss,y16)]; +z18 = z17 shifted (0,-thinl); +z19 = (x17,0); +z20 = z19 shifted (0,thinl); +z21 = 0.5[z18,z20]; +z22 = (ss,h/2); +z23 = z22 shifted (curvl,0); +z24 = z16 shifted (0,-h/2); +z25 = z24 shifted (thickl,0); + +lrserif(0,4,5,6,7)(1); +llserif(1,8,9,10,11)(1); +urserif(2,12,13,14,15)(1); + +fill +z16--z14--z13..z12..z2--z0..z4..z5--z6--z10--z9..z8..z1--z16--cycle; +fill +z22{up}..{right}z17{right}..{down}z25{down}..{left}z19{left}..{up}z22..cycle; +unfill +z23{up}..{right}z18{right}..{down}z24{down}..{left}z20{left}..{up}z23..cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("t",exw#/phi+2ss#,theight#,0); "The Letter t"; + +z0 = (ss+hair,ex); +z1 = z0 shifted (0,-thinl); +z2 = (w-ss/2-hair,ex); +z3 = z2 shifted (0,-thinl); +z4 = (w/2+thickl/2,h+o); +z5 = (w/2,0-o); +z6 = z5 shifted (-thickl/2,2lserh); +z7 = z6 shifted (thickl,0); +z8 = (x7,y2); +z9 = (x7,y3); +z10 = (x6,y1); +z11 = (w-ss,y7); +z12 = z11 shifted (-thinl/2,0); +z13 = 0.5[z7,z12] shifted (0,-y7/2); +z14 = (x7,y5); +z15 = 0.5[z2,z3] shifted (hair,0); +z16 = 0.5[z0,z1] shifted (-hair,0); +z17 = (x10,y0); +z18 = 0.5[z0,z17]; +z19 = z4 shifted (-hair/4,0); + +pickup pencircle scaled 2; +fill +z4--z8--z2..z15..z3--z9--z7{down}..{right}z13{right}..{up}z12..z11{down}..{left}z14{left}..{up}z6--z10--z1..z16..z0--z18{right}..{dir +80}z19--z4--cycle; + +lowt := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("f",exw#/phi+2ss#,asch#,0); "The Letter f"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+lserwl,h-1.5userhl); +z3 = z2 shifted (thickl,0); +z12 = (x0,ex-thinl); +z13 = z12 shifted (thickl,0); +z14 = z12 shifted (0,thinl); +z15 = z13 shifted (0,thinl); +z16 = (ss+hair,y12); +armlen = x12 - x16; +z17 = z13 shifted (armlen,0); +z18 = z16 shifted (0,thinl); +z19 = z17 shifted (0,thinl); +z20 = 0.5[z16,z18] shifted (-hair,0); +z21 = 0.5[z19,z17] shifted (hair,0); +z22 = (x19,y3); +z27 = 0.5[z3,z22]; y27 := h+o; +z28 = z27 shifted (0,-thinl); + +lrserif(1,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +dlftbulb(22,23,24,25,26); + +fill +z1..z4..z5--z6--z10--z9..z8..z0--z12--z16..z20..z18--z14--z2{up}..{right}z27{right}..{down}z24..z23..z22..{right}z25{dir 160}..z28..{down}z3--z15--z19..z21..z17--z13--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar("o",exw#+2ss#,ex#,0); "The Letter o"; + +z0 = (w/2,h+o); +z1 = (w/2,-o); +z2 = (ss,h/2); +z3 = (w-ss,h/2); +z4 = z3 shifted (-curvl,0); +z5 = z2 shifted (curvl,0); +z6 = z0 shifted (0,-thinl); +z7 = z1 shifted (0,thinl); + +fill z1..z3..z0..z2..cycle; +unfill z4..z6..z5..z7..cycle; + +lowo := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("u",1.2exw#+2ss#,ex#,0); "The Letter u"; + +z0 = (ss+userwl,h-userhl); +z1 = z0 shifted (thickl,0); +z2 = (w-ss-lserwl,lserhl); +z3 = z2 shifted (-thickl,0); +z12 = z1 shifted (0,userhl); +z13 = z3 shifted (0,-lserhl); +z14 = (w/2,-o); +z15 = z14 shifted (0,1.5thinl); +z16 = (x0,h/4); +z17 = 0.5[z16,z14] shifted (0,-lserwl); +z18 = z17 shifted (3o,lserhl); +z19 = z16 shifted (thickl,0); +z20 = (w-ss-userwl,h-userhl); +z21 = z20 shifted (-thickl,0); +z22 = (x21,h/4); +z23 = z22 shifted (thickl,0); +z24 = 0.5[z23,z14] shifted (-2o,-lserwl); +z29 = z20 shifted (0,userhl); +z30 = z24 shifted (0,lserhl); + +ulserif(0,4,5,6,7)(1); +lrserif(2,8,9,10,11)(1); +ulserif(21,25,26,27,28)(1); + +fill +z1--z12--z6--z5..z4..z0--z16{down}..{right}z14{right}..{up}z23--z29--z27--z26..z25..z21--z22{down}..z15..{up}z19--cycle; +fill z13--z10--z9..z8..z2--z23--z22--cycle; + +lowu := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("i",0.6exw#+2ss#,ex#,0); "The Letter i"; + +z0 = (w/2-thickl/2,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (w/2-thickl/2,h-userhl); +z3 = z2 shifted (thickl,0); +z16 = z3 shifted (0,userhl); +% dot +z17 = (w/2,h+2userh+dotwid); +z18 = z17 shifted (0,dotwid); +z19 = z17 shifted (0,-dotwid); +z20 = z17 shifted (dotwid,0); +z21 = z17 shifted (-dotwid,0); + +ulserif(2,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +lrserif(1,12,13,14,15)(1); + +fill z0..z8..z9--z10--z14--z13..z12..z1--z16--z6--z5..z4..z2--cycle; +dotlessi := currentpicture; +fill z18..z20..z19..z21..cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar("j",0.4exw#+2ss#,ex#,dep#); "The Letter j"; + +z0 = (w-thickl-ss,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (w-thickl-ss,h-userhl); +z3 = z2 shifted (thickl,0); +z8 = z3 shifted (0,userhl); +z9 = (x0-lserwl,-dep); +z10 = z9 shifted (0,thinl); +z11 = (x0-2lserwl,-dep/2); +% dot +z17 = (w-thickl+userw/3-ss,h+2userh+dotwid); +z18 = z17 shifted (0,dotwid); +z19 = z17 shifted (0,-dotwid); +z20 = z17 shifted (dotwid,0); +z21 = z17 shifted (-dotwid,0); + +ulserif(2,4,5,6,7)(1); +ulftbulb(11,12,13,14,15); + +fill +z5--z6--z8--z1{down}..z9..z11..z12..z13..z14..z10..{up}z0--z2..z4..cycle; +dotlessj := currentpicture; +fill z18..z20..z19..z21..cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar(oct"031",exw#/phi+2ss#,ex#,0); "dotless i"; + +currentpicture := dotlessi; + +endchar; + +beginchar(oct"032",0.4exw#+2ss#,ex#,dep#); "dotless j"; + +currentpicture := dotlessj; + +endchar; + +beginchar("c",exw#+2ss#,ex#,0); "The Letter c"; + +z0 = (w/2+hair,h+o); +z1 = (w/2+hair,-o); +z2 = (w-ss,0.7h); +z3 = (w-ss,h/4); +z4 = (ss,h/2); +z9 = z0 shifted (0,-thinl); +z10 = z4 shifted (curvl,0); +z11 = z1 shifted (0,thinl); +z12 = z3 shifted (0,hair/2); +z13 = z12 shifted (-hair/2,0); +z14 = (w-ss,h/2); + +urtbulb(2,5,6,7,8); + +fill +z1{right}..z3..z12..z13{dir -135}..{left}z11{left}..{up}z10{up}..{right}z9{right}..{dir +-40}z7{left}..{down}z6..z5..z2..{left}z0{left}..z4..{right}z1..cycle; + +lowc := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar("e",exw#+2ss#,ex#,0); "The Letter e"; + +z0 = (w/2,h+o); +z1 = (w/2,-o); +z2 = (w-ss,h/2); +z3 = (w-ss-hair,h/4); +z4 = (ss,h/2); +z9 = z0 shifted (0,-thinl); +z10 = z4 shifted (curvl,0); +z11 = z1 shifted (0,thinl); +z12 = z3 shifted (0,hair/2); +z13 = z12 shifted (-hair/2,0); +z14 = z2 shifted (-curvl,thinl); +z15 = z10 shifted (0,thinl); + +fill +z2{up}..{left}z0{left}..{down}z4{down}..{right}z1{right}..z3..z12..z13{dir +-120}..{left}z11{left}..{up}z10{up}..z9..{down}z14--z15--z10--cycle; + +lowe := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar(oct"034",(exw#/phi)*2+2ss#,asch#,0); "The ligature fi"; + +singwid = (ex/phi)/2; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+userwl,h-1.5userhl); +z3 = z2 shifted (thickl,0); +z12 = (x2,ex-thinl); +z13 = z12 shifted (thickl,0); +z14 = z12 shifted (0,thinl); +z15 = z12 shifted (thickl,thinl); +z16 = z12 shifted (-lserwl,0); +z17 = z13 shifted (lserwl+2thickl,0); +z18 = z16 shifted (0,thinl); +z19 = z17 shifted (0,thinl); +z20 = z16 shifted (-hair/2,hair/2); +z21 = z17 shifted (o,o); +z22 = z17 shifted (-thickl+o,h/3-userhl); x22 := x32; +z27 = 0.5[z13,z32]; y27 := h+o; +z28 = z27 shifted (0,-thinl); +z30 = z1 shifted (2lserwl+hair,0); +z31 = z30 shifted (thickl,0); +z32 = (x30,y12); +z33 = z32 shifted (thickl,0); +z46 = (x31,ex); + +lrserif(1,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +dlftbulb(22,23,24,25,26); +ulserif(32,34,35,36,37)(1); +llserif(30,38,39,40,41)(1); +lrserif(31,42,43,44,45)(1); + +y34 := y13; +y46 := y15; +y32 := y34; + +fill +z1..z4..z5--z6--z10--z9..z8..z0--z12--z16..z20..z18--z14--z2{up}..{right}z27{right}..{down}z24..z23..z22..{right}z25{dir +120}..{left}z28{left}..{down}z3--z15--z46--z31..z42..z43--z44--z40--z39..z38..z30--z32..z34--z13--cycle; + +filig := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("g",exw#+2ss#,ex#,dep#); "The Letter g"; + +gtailwid = thinl/2; +z0 = (w/2,h+o); +z1 = z0 shifted (0,-thinl); +z2 = (w/2,1.5lserwl); +z3 = z2 shifted (0,thinl); +z4 = 0.5[z1,z3]; +z5 = (ss,y4); +z7 = z5 shifted (curvl,0); +z6 = (w-ss,y4); +z8 = z6 shifted (-curvl,0); +z10 = (w-ss,h+o); +z9 = (z0{right}..{down}z6) intersectionpoint (z10--z4); +z11 = z10 shifted (thinl,-1.5thinl); +z12 = z11 shifted (-gtailwid,0); +z13 = z10 shifted (0,-gtailwid); +z14 = z9 shifted (0,-gtailwid);%FFF +z15 = (ss+lserwl/2,lserhl); +z16 = z15 shifted (1.3thinl,0); +z17 = (z5{down}..{right}z2) intersectionpoint (z15--z4); +z21 = (w/2,thinl); +z22 = (w/2,-dep); +z23 = (ss,-dep/2); +z24 = (w-ss,-dep/2); +z25 = z21 shifted (0,-thinl); +z26 = z22 shifted (0,thinl); +z27 = z23 shifted (curvl,0); +z28 = z24 shifted (-curvl,0); +z29 = 0.5[z26,z25]; +z30 = (z23{up}..{right}z21) intersectionpoint (z15--z29); +z31 = (4w/7,y21); +z32 = (3w/7,y21); +z33 = (4w/7,y22); +z34 = (3w/7,y22); +z35 = 0.3[z29,z8]; +z36 = (x35,y25); +z37 = (x35,y26); +z38 = 0.7[z27,z29]; +z39 = (x38,y25); +z40 = (x38,y26); + +fill +z21{right}..{right}z31..z24..z33{left}..{left}z22{left}..{left}z34{left}..z23..{right}z32{right}..cycle; +unfill +z25{right}..{right}z36..z28..z37{left}..{left}z26{left}..{left}z40..z27..{right}z39..cycle; +fill z5..z0..z6..z2..cycle; +unfill z7..z1..z8..z3..cycle; +fill z9..z10..{down}z11..z12..z13{dir 140}..z14..cycle; +fill z17{up}..z15..{up}z30..z16..z17..cycle; + +lowg := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar("m",1.1em#+2ss#,ex#,0); "The Letter m"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +%z2 = z1 shifted (hair+2lserwl,0); +%z3 = z2 shifted (thickl,0); +%z4 = z3 shifted (hair+2lserwl,0); +%z5 = z4 shifted (thickl,0); +z2 = (w/2-thickl/2,lserhl); +z3 = z2 shifted (thickl,0); +z4 = (w-ss-lserwl-thickl,lserhl); +z5 = z4 shifted (thickl,0); +z30 = (ss+userwl,h-userhl); +z31 = z30 shifted (thickl,0); +z32 = z31 shifted (hair+2userwl,0); +z33 = z32 shifted (thickl/2,0); +z34 = z33 shifted (hair+2userwl+thickl/2,0); +z35 = z34 shifted (thickl,-thinl); +z40 = z31 shifted (0,userhl); +x35 := x5; +x32 := x2; +x34 := x4; +z45 = 0.5[z32,z33]; +z46 = 0.5[z34,z35]; +z41 = 0.5[z40,z45]; +z42 = 0.5[z45,z46] shifted (0,userhl); +z43 = z41 shifted (0,-thinl); +z44 = z42 shifted (0,-thinl); +z47 = 0.5[z31,z33] shifted (0,userhl+o); +z48 = 0.5[z55,z34] shifted (0,userhl+o); +z49 = z33 shifted (0,-thinl); +z50 = z31 shifted (0,-thinl); +looph = y47-y41; +z51 = z48 shifted (0,-looph); +z52 = z47 shifted (0,-0.8thinl); +z53 = z49 shifted (-hair/2,hair); +z54 = z49 shifted (-thickl/2,hair); +z55 = z33 shifted (thickl/2,0); +x54 := x2; +x55 := x3; + +llserif(0,6,7,8,9)(1); +lrserif(1,10,11,12,13)(1); +llserif(2,14,15,16,17)(1); +lrserif(3,18,19,20,21)(1); +llserif(4,22,23,24,25)(1); +lrserif(5,26,27,28,29)(1); +ulserif(30,36,37,38,39)(1); + +fill +z1..z10..z11--z12--z8--z7..z6..z0--z30..z36..z37--z38--z40--z31{up}..{right}z47{right}..z55--z32..{right}z48{right}..{down}z35--z5..z26..z27--z28--z24--z23..z22..z4--z34..{left}z51{left}..z55--z3..z18..z19--z20--z16--z15..z14..z2--z54..z41..z50--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar("n",1.2exw#+2ss#,ex#,0); "The Letter n"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (w-ss-lserwl-thickstroke,lserhl); +z3 = z2 shifted (thickl,0); +z20 = (ss+userwl,h-userhl); +z21 = z20 shifted (thickl,0); +z22 = z21 shifted (0,userhl); +z23 = (x2,y21); +z24 = z23 shifted (thickl,-thinl); +z29 = z20 shifted (0,userhl); +z30 = z24 shifted (0,userhl+thinl); +z31 = 0.5[z30,z29] shifted (0,o); +z32 = z31 shifted (0,-0.8thinl); +z33 = z28 shifted (0,-userhl); + +llserif(0,4,5,6,7)(1); +lrserif(1,8,9,10,11)(1); +llserif(2,12,13,14,15)(1); +lrserif(3,16,17,18,19)(1); +ulserif(20,25,26,27,28)(1); + +fill +z6--z5..z4..z0--z20..z25..z26--z27--z28--z33--z20..{right}z31{right}..{down}z24--z3..z16..z17--z18--z14--z13..z12..z2--z23..z32..z21--z1..z8..z9--z10--z6--cycle; + +lown := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar("r",exw#+2ss#,ex#,0); "The Letter r"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z10 = (ss+userwl,h-userhl); +z11 = z10 shifted (thickl,0); +z16 = 0.5[z11,z10]; +llserif(0,2,3,4,5)(1); +lrserif(1,6,7,8,9)(1); +ulserif(10,12,13,14,15)(1); +%z15 = z16 shifted (0,userh); +%z17 = z15 shifted (lserwl+o+lserwl+o,-userhl+2o); +hookw = w-x15-ss-bulbsh; +z17 = z16 shifted (hookw,userh/2); +z18 = 0.5[z16,z17]; y18 := h+o; +z23 = z18 shifted (0,-thinl); +z24 = z17 shifted (0,-2hair); +z25 = z16 shifted (thickl/2,-thinl); +rbulb(17,19,20,21,22); + +fill +z1..z6..z7--z8--z4--z3..z2..z0--z10..z12..z13--z14--z15--z16--z10..{right}z18{right}..z17..z19..z20..z21{up}..{down}z24{dir +160}..z23..z11--cycle; + +lowr := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar("k",1.2exw#+2ss#,asch#,0); "The Letter k"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+userwl,h-userhl); +z3 = z2 shifted (thickl,0); +z16 = z3 shifted (0,userhl); +z17 = (w-ss-lserwl,lserhl); +z18 = z17 shifted (-slantl,0); +z27 = (w-ss-hair-userwl,ex-userhl); +z41 = (x17,y27); +z28 = z27 shifted (-1.5thinl,0); +z37 = 0.5[z41,z17]; x37 := x1; +z38 = z37 shifted (0,slantl-o/2); +z39 = 0.25[z38,z17]; +z40 = 0.30[z39,z38]; +z42 = z37 shifted (0,thinl); +z43 = 0.1[z37,z27]; +z44 = 0.3[z43,z27]; + +ulserif(2,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +lrserif(1,12,13,14,15)(1); +llserif(18,19,20,21,22)(1); +lrserif(17,23,24,25,26)(1); +urserif(27,29,30,31,32)(1); +ulserif(28,33,34,35,36)(1); + +fill +z3--z16--z6--z5..z4..z2--z0..z8..z9--z10--z14--z13..z12..z1--z37--z43--z18..z19..z20--z21--z25--z24..z23..z17--z44--z27..z29..z30--z31--z35--z34..z33..z28--z42--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar("x",1.2exw#+2ss#,ex#,0); "The Letter x"; + +z0 = (w/2,h/2); +z1 = (ss+userwl,h-userhl); +z2 = (w-ss-userwl,h-userhl); +z3 = (ss+lserwl,lserhl); +z4 = (w-ss-lserwl,lserhl); +z5 = z1 shifted (curvl,0); +z6 = z4 shifted (-curvl,0); +z7 = z2 shifted (-thinl,0); +z8 = z3 shifted (thinl,0); +z41 = ba[z1,z6]; +z41 = bb[z7,z3]; +z42 = bc[z5,z4]; +z42 = bd[z7,z3]; +z43 = be[z8,z2]; +z43 = bf[z6,z1]; +z44 = bg[z8,z2]; +z44 = bh[z5,z4]; + +ulserif(1,9,10,11,12)(1); +urserif(5,13,14,15,16)(1); +ulserif(7,17,18,19,20)(1); +urserif(2,21,22,23,24)(1); +llserif(3,25,26,27,28)(1); +lrserif(8,29,30,31,32)(1); +llserif(6,33,34,35,36)(1); +lrserif(4,37,38,39,40)(1); + +fill z1--z41--z3..z25..z26--z27--z31--z30..z29..z8--z43--z6..z33..z34--z35--z39--z38..z37..z4--z44--z2..z21..z22--z23--z19--z18..z17..z7--z42--z5..z13..z14--z15--z11--z10..z9..z1--cycle; + + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar("s",0.8exw#+2ss#,ex#,0); "The Letter s"; + +z0 = (w/2,h+o); +z1 = (w/2,0-o); +z2 = (w-ss-userhl,h-userhl/2); +z3 = (w-ss,h/4); +z4 = (ss,3h/4); +z5 = (userhl+ss,curvl+userhl/2-o); +z14 = z0 shifted (0,-thinstroke); +z15 = z1 shifted (0,thinstroke); +z16 = z4 shifted (curvl,0); +z17 = z3 shifted (-curvl,0); +z18 = z2 shifted (0,-curvl); +z19 = z11 shifted (0,-curvl); +z20 = z5 shifted (0,-curvl); +z21 = z18 shifted (0,-userwl/3); +z22 = z21 shifted (userhl,0); +z24 = z2 shifted (0,userhl/2); +z23 = z24 shifted (userhl,0); +z25 = (w/2,h/2+1.3thinstroke/2); +z26 = (w/2,h/2-1.3thinstroke/2); +z10 = z5 shifted (0,userhl/2); +z11 = z10 shifted (-userhl,0); +z12 = z11 shifted (0,-0.5userhl-curvl-userwl/3); +z13 = z12 shifted (userhl,0); + +%sctbackserif(5,10,11,12,13,20)(2); + +pickup pencircle scaled 1; + +fill +z2..{left}z0{left}..{down}z4{down}..z26..{down}z17{down}..{left}z15{left}..z5--z10..z11--z12..z13--z20..{right}z1{right}..{up}z3{up}..z25..{up}z16{up}..{right}z14{right}..z18--z21..z22--z23..z24--cycle; + +%path outcurves; path incurves; path toprt; +%outcurves = z2..tension 1.1..z0..tension +% 1.1..z4..z26..z17..z15..tension 1.1..z5; +%incurves = z20..tension 1.1..z1..tension +% 1.1..z3..z25..z16..z14..tension 1.1..z18; +%toprt = z18---z21..tension 2..z22---z23..tension 2..z24---z2; + +%fill outcurves & botlftserif & incurves & toprt & cycle; + +lows := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("v",1.2exw#+2ss#,ex#,0); "The Letter v"; + +z1=(ss+userwl,h-userhl); +z2=z1 shifted (slantwid,0); +z3=z1-(0,2h/3); +z4=z3+(thickl,0); +z5=(w-ss-userwl,h-userhl); +z6=z5 shifted (-thinl,0); +z7=z5-(0,2h/3); +z8=z7-(thinl,0); +z9=(w/2,-o); +z30=0.25[z9,z5]; +z10=z30-(thinl,0); +z31 = 0.1[z9,z1]; +z32 = da[z2,z30]; +z32 = db[z6,z31]; + +ulserif(1,11,12,13,14)(1); +urserif(2,15,16,17,18)(1); +ulserif(6,19,20,21,22)(1); +urserif(5,23,24,25,26)(1); + +pickup cappen; + +fill z9--z5..z23..z24--z25--z21--z20..z19..z6--z32--z2..z15..z16--z17--z13--z12--z11..z1--z9--cycle; + +penlabels(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("z",exw#+2ss#,ex#,0); "The Letter z"; + +z0 = (ss+ssslant,h); +z1 = (w-ss,h); +z3 = (ss,0); +z4 = (w-ss-ssslant,0); +z9 = z0 shifted (lserw,-thinstroke); +z10 = z1 shifted (-1.2curvwid,-thinstroke); +z11 = z3 shifted (1.2curvwid,thinstroke); +z12 = z4 shifted (-lserw,thinstroke); + +lftdownsideserif(0,5,6); +upsideserif(4,7,8); + +fill z1--z0--z5..z6..z9--z10--z3--z4--z7..z8..z12--z11--z1--cycle; + +lowz := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("w",1.05em#+ss#,ex#,0); "The Letter w"; + +dubbots=w/3; + +z1=(ss+userwl,h-userhl); +z2=z1+(slantwid,0); +z5=(w-ss-userwl,h-userhl); +z6=z5 shifted (-thinl,0); +z3 = 0.5[z2,z6] shifted (-thickl/2,0); +z4 = z3 shifted (thickl,0); +z7=(dubbots,-o); +z8=(2dubbots,-o); +z33=(w/2-o/2,3h/4-2.5o); +pair lined; lined = z4-z33; +%z44 = z8 shifted lined; +z44 = z8 shifted (thickl,0) rotatedaround (z8,60); +z45 = z8 shifted (-thinl,0); +z34 = (z4--z44) intersectionpoint (z6..z45); +lined := z1-z2; +z46 = z7 shifted lined rotatedaround (z7,-120); +z47 = z7 shifted (-thinl,0); +z35 = (z3--z47) intersectionpoint (z2--z46); +z36=0.94[z8,z3]; + +pickup cappen; + +ulserif(1,9,10,11,12)(1); +urserif(2,13,14,15,16)(1); +ulserif(3,17,18,19,20)(1); +urserif(4,21,22,23,24)(1); +ulserif(6,25,26,27,28)(1); +urserif(5,29,30,31,32)(1); + +fill z8--z5..z29..z30--z31--z27--z26..z25..z6--z34--z4..z21..z22--z23--z19--z18..z17..z3--z35--z2..z13..z14--z15--z11--z10..z9..z1--z7--z33--z8--cycle; + +penlabels(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + +beginchar("y",1.2exw#+2ss#,ex#,dep#); "The Letter y"; + +z0 = (ss+userwl,h-userhl); +z1 = z0 shifted (slantl,0); +z2 = (w-ss-userwl,h-userhl); +z3 = z2 shifted (-thinl,0); +z4 = 0.6[z0,z2] shifted (0,-h+2lserhl); +z21 = z4 shifted (-slantl,0); +z23 = z4 shifted (-thinl,0); +z22 = ca[z1,z4]; +z22 = cb[z3,z23]; +z24 = 1.4[z2,z4] shifted (-1.5thinl,0); +x25 = x24-lserwl; +y25 = -dep; +z26 = z25 shifted (-1.5lserwl,2lserhl); +z29 = z26 shifted (bulbsh,bulbsh); +z30 = z26 shifted (2bulbsh,0); +z31 = z29 shifted (0,-2bulbsh-hair); +z33 = z31 shifted (0,bulbsh); +z27 = z25 shifted (0,1.3thinl); +z28 = z24 shifted (1.5thinl,0); + +ulserif(0,5,6,7,8)(1); +urserif(1,9,10,11,12)(1); +ulserif(3,13,14,15,16)(1); +urserif(2,17,18,19,20)(1); + +fill +z22--z1..z9..z10--z11--z7--z6..z5..z0---z21..z24..{left}z27{left}..{up}z33{down}..z30..z29..z26..z31..{right}z25{right}..z28---z4--z2..z17..z18--z19--z15--z14..z13..z3--cycle; + +lowy := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar(oct"370",exw#+2ss#,ex#,0); "The Letter slash o"; + +pickup pencircle scaled thinl; +bot lft z0 = (o,0); +top rt z1 = (w-o,h); + +currentpicture := lowo; + +draw z0--z1; + +penlabels(0,1); +endchar; + +beginchar(oct"033",1.3exw#+2ss#,asch#,0); "The ligature ff"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+lserwl,h-1.5userhl); +z3 = z2 shifted (thickl,0); +z12 = (x0,ex-thinl); +z13 = z12 shifted (thickl,0); +z14 = z12 shifted (0,thinl); +z15 = z12 shifted (thickl,thinl); +z16 = (ss+o,y12); +z17 = z13 shifted (lserwl,0); +z18 = z16 shifted (0,thinl); +z19 = z17 shifted (0,thinl); +z20 = 0.5[z18,z16] shifted (-o,0); +z21 = z17 shifted (o,o); +z22 = z33 shifted (-3bulbsh,0); +z27 = 0.5[z3,z32]; y27 := h+o; +z28 = z27 shifted (0,-thinl); +lrserif(1,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +dlftbulb(22,23,24,25,26); + +z30 = z1 shifted (2lserwl+hair,0); +z31 = z30 shifted (thickl,0); +z33 = (x31,y2); +z32 = z33 shifted (-thickl,0); +z42 = (x30,y12); +z43 = z42 shifted (thickl,0); +z44 = z42 shifted (0,thinl); +z45 = z43 shifted (0,thinl); +z46 = z42 shifted (-lserwl,0); +z47 = z43 shifted (lserwl,0); +z48 = z46 shifted (0,thinl); +z49 = z47 shifted (0,thinl); +z50 = z46 shifted (-o,o); +z51 = z47 shifted (o,o); +z52 = z47 shifted (o,h/3-o); +z57 = 0.5[z33,z52]; y57 := (h+o); +z58 = z57 shifted (0,-thinl); + +lrserif(31,34,35,36,37)(1); +llserif(30,38,39,40,41)(1); +dlftbulb(52,53,54,55,56); + +fill z1..z4..z5--z6--z10--z9..z8..z0--z12--z16..z20..z18-- + z14--z2{up}..{right}z27{right}..{down}z24..z23..z22.. + {right}z25{down}..{left}z28{left}..{down}z3--z15-- + z19..z45--z43--z13--cycle; +flig := currentpicture; +fill z31..z34..z35--z36--z40--z39..z38..z30--z42--z13--z15-- + z44--z32{up}..{right}z57{right}..{down}z54..z53..z52.. + {right}z55{down}..{left}z58{left}..{down}z33--z45--z49.. + z51..z47--z43--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62); +endchar; + +beginchar(oct"035",1.2exw#+2ss#,asch#,0); "The ligature fl"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+userwl,h-1.5userhl); +z3 = z2 shifted (thickl,0); +z12 = (x0,ex-thinl); +z13 = z12 shifted (thickl,0); +z14 = z12 shifted (0,thinl); +z15 = z13 shifted (0,thinl); +z16 = z12 shifted (-lserwl,0); +z17 = z13 shifted (lserwl,0); +z18 = z16 shifted (0,thinl); +z19 = z17 shifted (0,thinl); +z20 = 0.5[z18,z16] shifted (-o,0); +z21 = z17 shifted (o,o); +z27 = z3 shifted (userwl,thickl); +z28 = z27 shifted (0,-thinl); +% the l part +z30 = z1 shifted (2lserwl+hair,0); +z31 = z30 shifted (thickl,0); +z32 = (x30,h-userhl); +z33 = z32 shifted (thickl,0); +z46 = z33 shifted (0,userhl); +z47 = aca[z32,z30]; +z47 = acb[z19,(w,y19)]; +z48 = acc[z32,z30]; +z48 = acd[z17,(w,y17)]; +z49 = z47 shifted (2o,0); +z50 = z48 shifted (2o,0); +z22 = (x47-(2bulbsh-thickl),y3); +llserif(30,38,39,40,41)(1); +lrserif(31,42,43,44,45)(1); +lrserif(1,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +dlftbulb(22,23,24,25,26); +fill z1..z4..z5--z6--z10--z9..z8..z0--z12--z16..z20..z18-- + z14--z2{up}..{right}z27{right}..{down}z24..z23..z22.. + {right}z25--z22--z32..{left}z28{left}..{down}z3--z15-- + z49--z50--z13--cycle; + +fill z30--z32--z33--z31..z42..z43--z44--z40--z39..z38.. + z30..cycle; + +fllig := currentpicture; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar(oct"036",1.85exw#+2ss#,asch#,0); "The ligature ffi"; + +currentpicture := flig + filig shifted (hair+2lserwl+thickl,0); + +endchar; + +beginchar(oct"040",((exw#/phi)*2)+ss#+2o#,asch#,0); "The ligature ft"; + +currentpicture := flig + lowt shifted (1.5lserwl+thickl,0); + +endchar; + +beginchar(oct"037",1.85exw#+2ss#,asch#,0); "The ligature ffl"; + +currentpicture := flig + fllig shifted + (hair+2lserwl+thickl,0); + +endchar; + +beginchar(oct"376",1.2exw#+2ss#,asch#,dep#); "The Letter thorn"; + +z0 = (ss+userwl,h-userhl); +z1 = z0 shifted (thickl,0); +z2 = (ss+userwl,lserhl); +z3 = z2 shifted (thickl,0); +z12 = z1 shifted (0,userhl); +z13 = z3 shifted (0,-lserhl); +x19 = (w-x13); y19 = ex/2; +z20 = (w-ss,y19); +z21 = (x2,y19); +z22 = z21 shifted (thickl,0); +z23 = z20 shifted (-curvl,0); +x24 = x2; y24 = -dep+lserhl; +x25 = x3; y25 = -dep+lserhl; +z26 = z25 shifted (0,-lserhl); +z14 = 0.5[z21,z20]; y14 := ex+o; +z15 = z14 shifted (0,-thinl); +z16 = (x14,0-o); +z17 = z16 shifted (0,thinl); + +ulserif(0,4,5,6,7)(1); +llserif(24,8,9,10,11)(1); +lrserif(25,27,28,29,30)(1); + +fill z0..z4..z5--z6--z12--z25..z27..z28--z29--z10--z9..z8..z24--z2--cycle; +fill +z21{up}..{right}z14{right}..{down}z20{down}..{left}z16{left}..{up}z21..cycle; +unfill +z22{up}..{right}z15{right}..{down}z23{down}..{left}z17{left}..{up}z22..cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); + +endchar; + + +beginchar(oct"027",exw#+2ss#,asch#,dep#); "The ligature fj"; + +z0 = (ss+lserwl,lserh); +z1 = z0 shifted (thickl,0); +z2 = (ss+lserwl,h-1.5userhl); +z3 = z2 shifted (thickl,0); +z12 = z2 shifted (0,-h/3+o); +z13 = z12 shifted (thickl,0); +z14 = z12 shifted (0,thinl); +z15 = z13 shifted (0,thinl); +z16 = z12 shifted (-lserwl,0); +z17 = z13 shifted (lserwl+2thickl-o,0); +z18 = z16 shifted (0,thinl); +z19 = z17 shifted (0,thinl); +z20 = z16 shifted (-o,o); +z21 = z17 shifted (o,o); +z22 = z17 shifted (-2bulbsh,h/3-userhl); +z27 = z3 shifted (thickl+2o,thickl); +z28 = z27 shifted (0,-thinl); +z30 = (w-ss-thickl,lserhl); +z31 = z30 shifted (thickl,0); +z32 = (w-ss-thickl,y13); +z33 = z32 shifted (thickl,0); +z46 = z33 shifted (0,userhl); +z49 = (x30-thickl,-dep); +z50 = z49 shifted (0,thinl); +z51 = (x30-2.5thickl,-dep/2); + +lrserif(1,4,5,6,7)(1); +llserif(0,8,9,10,11)(1); +dlftbulb(22,23,24,25,26); +ulserif(32,34,35,36,37)(1); +ulftbulb(51,52,53,54,55); + +y34 := y13; +y46 := y15; + +fill +z1..z4..z5--z6--z10--z9..z8..z0--z12--z16..z20..z18--z14--z2{up}..{right}z27{right}..{down}z24..z23..z22..{right}z25{dir +160}..{left}z28{left}..{down}z3--z15--z46--z31{down}..z49..z51..z52..z53..{left}z54{down}..z50..{up}z30--z32..z34--z13--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57); + +endchar; + +beginchar(oct"255",exw#+2ss#,ex#,dep#); "The Letter ng"; + +z0 = (ss+lserwl,lserhl); +z1 = z0 shifted (thickl,0); +z2 = z1 shifted (o+2lserwl,0); +z3 = z2 shifted (thickl,0); +z20 = (ss+userwl,h-userhl); +z21 = z20 shifted (thickl,0); +z22 = z21 shifted (0,userhl); +z23 = z21 shifted (o+2userwl,0); +z24 = z23 shifted (thickl,-thinl); +z29 = z20 shifted (0,userhl); +z30 = z24 shifted (0,userhl+thinl); +z31 = 0.5[z30,z29] shifted (0,o/2); +z32 = z31 shifted (0,-0.8thinl); +z33 = z28 shifted (0,-userhl); +z40 = z2; +z41 = z3; +z49 = (x40-6o,-dep); +z50 = z49 shifted (0,thinl); +z51 = (x1,-dep/2); +z56 = 0.5[z2,(x2,-dep)]; + +llserif(0,4,5,6,7)(1); +lrserif(1,8,9,10,11)(1); +ulserif(20,25,26,27,28)(1); +ulftbulb(51,52,53,54,55); + +fill +z6--z5..z4..z0--z20..z25..z26--z27--z28--z33--z20..{right}z31{right}..{down}z24--z3{down}..z49..{up}z51..z52..z53..{left}z54{down}..z50..z56..{up}z2--z23..z32..z21--z1..z8..z9--z10--z6--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56); +endchar; + +beginchar(oct"236",1.2exw#+2ss#,asch#,0); "The Letter d-bar"; + +currentpicture := lowd; + +pickup pencircle scaled thinl; +lft z24 = (w/2,h-2userw); +rt z25 = (w-ss,h-2userw); + +draw z24--z25; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar(oct"377",1.1exw#+2ss#,asch#,0); "The Letter Eszett"; + +z0 = (w/2,h+o/2); +z1 = (w-ss-thickl/2,3h/4); +z2 = (w-ss,h/4); +z3 = (ss+lserwl,lserhl); +z4 = (x3,h-userwl); +z5 = z3 shifted (thickl,0); +z6 = z2 shifted (-thickl,0); +z7 = z1 shifted (-thickl,0); +z8 = z0 shifted (0,-thinl); +z9 = z5 shifted (0,-lserhl); +z14 = z4 shifted (thickl,0); +z15 = (w/2,h/2+thinl); +z16 = z15 shifted (0,-thinl); +z17 = (x14,y15); +z18 = (x5,y16); +z19 = (x5+thickl,y5); +z20 = z19 shifted (bulbsh,bulbsh); +z21 = z20 shifted (-bulbsh,bulbsh); +z22 = z21 shifted (-bulbsh,-bulbsh); +z23 = (x19,0); + +llserif(3,10,11,12,13)(1); + +pickup pencircle scaled 1; + +fill +z9--z12--z11..z10..z3--z4{up}..{right}z0{right}..{down}z1{down}..{left}z16--z15{right}..{down}z2{down}..{left}z23..z22..z21..z20{down}..{left}z19{right}..{up}z6{up}..{left}z16--z18--z17--z15{right}..{up}z7{up}..{left}z8{left}..{down}z14---cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar(oct"360",exw#+2ss#,asch#,0); "The Letter eth"; + +z0 = (ss,h); +z1 = z0 shifted (0,-thinl); +z2 = 0.5[z0,z1] shifted (-o,0); +z3 = (w/2,ex+o/2); +z4 = z3 shifted (0,-thinl); +z5 = (w/2,-o/2); +z6 = z5 shifted (0,thinl); +z7 = (ss,ex/2); +z8 = z7 shifted (thickl,0); +z9 = (w-ss,ex/2); +z10 = z9 shifted (-thickl,0); + +fill +z7{up}..{right}z3{right}..{down}z9{down}..{left}z5{left}..{up}cycle; +unfill +z8{up}..{right}z4{right}..{down}z10{down}..{left}z6{left}..{up}cycle; +fill z9{up}..{left}z0..z2..z1{right}..{down}z10--cycle; + +pickup pencircle scaled thinl; +top rt z11 = (3w/4,h); +z13 = (0,h/2); +bot lft z14 = (z11--z13) intersectionpoint + (z10{up}..{left}z1); +z12 = 2.5[z11,z14]; +draw z11--z12; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar(oct"346",1.4exw#+2ss#,ex#,0); "the ligature ae (aesc)"; + +hw = w/2; +z0 = (ss,3h/4); +z1 = (hw/2+ss/2,h+o); +z2 = (hw+thickl/2,2h/3); +z3 = (hw+thickl/2,lserhl); +z8 = z3 shifted (-thickl/2,0); +z9 = (hw/2+ss,-o); +z10 = (ss-o,h/4); +z15 = z2 shifted (-thickl,0); +z16 = z1 shifted (0,-thinl); +z17 = z9 shifted (0,thinl); +z18 = z10 shifted (thickl,0); +z19 = z3 shifted (-thickl,lserhl); +z20 = (hw/2-thickl,3h/8); +z21 = z20 shifted (thickl/2,-thinl); +z22 = 0.2[z15,z19]; +z23 = z19 shifted (-thinl,0); +z24 = z22 shifted (0,-thickl/2); +z25 = z16 shifted (.5thickl,0); +% e part +z30 = (w-hw/2-ss,h+o); +z31 = (w-ss,h/2); +z33 = z30 shifted (0,-thinl); +z34 = (hw-thickl/2,h/2); +z35 = z34 shifted (thickl,0); +z36 = z30 shifted (0,-h-o); +z37 = z36 shifted (0,thinl); +z38 = z31 shifted (0,-h/4); +z39 = z38 shifted (0,hair/2); +z40 = z39 shifted (-hair/2,0); +z41 = z31 shifted (-thickl,thinl); +z42 = z35 shifted (0,thinl); + +drtbulb(0,11,12,13,14); + +fill +z13..z12..z11..z0{up}..z1..{down}z2--z3--z8..z9..{up}z10..z22--z15{up}..z25{left}..z16..z13..cycle; +unfill z18{up}..z24--z19..{left}z17..cycle; + +fill +z31{up}..{left}z30{left}..{down}z34{down}..{right}z36{right}..z38..z39..z40..{left}z37{left}..{up}z35{up}..{right}z33{right}..{down}z41--z42--z35--z31--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar(oct"367",1.4exw#+2ss#,ex#,0); "the ligature oe"; + +z30 = (hw+hw/2-ss,h+o); +z31 = (w-ss,h/2); +z33 = z30 shifted (0,-thinl); +z34 = (w/2-thickl/2,h/2); +z35 = z34 shifted (thickl,0); +z36 = z30 shifted (0,-h-o); +z37 = z36 shifted (0,thinl); +z38 = z31 shifted (0,-h/4); +z39 = z38 shifted (0,hair/2); +z40 = z39 shifted (-hair/2,0); +z41 = z31 shifted (-thickl,thinl); +z42 = z35 shifted (0,thinl); +% o part +z0 = (ss,h/2); +z1 = (hw/2+ss,h+o); +z2 = z0 shifted (thickl,0); +z3 = z1 shifted (0,-thinl); +z4 = (hw/2+ss,-o/2); +z5 = z4 shifted (0,thinl); + +fill z1..z35..z4..z0..cycle; +unfill z3..z34..z5..z2..cycle; + +fill +z31{up}..{left}z30{left}..{down}z34{down}..{right}z36{right}..z38..z39..z40..{left}z37{left}..{up}z35{up}..{right}z33{right}..{down}z41--z42--z35--z31--cycle; + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; + +beginchar(oct"136",exw#+ss#+5em#/6,cap#,0);"The ligature Th"; + +z1=(ss+userh,h); +z2=z1-(0,thinstroke); +z3=(5em/6-ss,h); +z4=z3-(0,thinstroke); +z5=((5em/6)/2-thickstroke/2,y2); +z6=((5em/6)/2+thickstroke/2,y2); +z7=(x5,lserh); +z8=z7+(thickstroke,0); + +llserif(7,9,10,11,12)(1); +lrserif(8,13,14,15,16)(1); +tlsideserif(1,17,18,19,20); +trsideserif(3,21,22,23,24); +y11 := 0; y15 := 0; + +fill z7..z9..z10--z11--z15--z14..z13..z8--z6--z4--z3--z1..z17{left}..{left}z18{down}..tension 2..z19..z20{up}---z2--z5--z7--cycle; +fill hone shifted (x3-userwl-ss,0); +fill htwo shifted (x3-userwl-ss,0); + +penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51); +endchar; |