diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/drm/drmtcap.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/drm/drmtcap.mf | 22 |
1 files changed, 18 insertions, 4 deletions
diff --git a/Master/texmf-dist/fonts/source/public/drm/drmtcap.mf b/Master/texmf-dist/fonts/source/public/drm/drmtcap.mf index 2776df83320..2980c9e3301 100644 --- a/Master/texmf-dist/fonts/source/public/drm/drmtcap.mf +++ b/Master/texmf-dist/fonts/source/public/drm/drmtcap.mf @@ -681,7 +681,8 @@ llserif(1,12,13,14,26)(1); urserif(4,15,16,17,27)(1); ulserif(3,18,19,20,28)(1); -fill z5--z4..z16..z16--z17--z20--z19..z18..z3--z1..z12..z13--z14--z6--z7..z29..z30--z5--cycle; +fill +z5--z4..z16..z16--z17--z20--z19..z18..z3--z1..z12..z13--z14--z6--z7..z29..z30--z5--z4..cycle; lowl := currentpicture; @@ -715,9 +716,11 @@ draw z21--z24; llserif(1,12,13,14,26)(1); ulserif(3,18,19,20,28)(1); +y11 := y9; +y29 := y30; fill -z1--z3..z18..z19--z20--z8--z10---z11..{left}z9--z4--z16--z21..z23..z24--z27..z25..z22--z17--z5--z30{right}..z29---z7--z6--z14--z13..z12..z1..cycle; +z1--z3..z18..z19--z20--z8--z10---z11--z9--z4--z16--z21..z23..z24--z27..z25..z22--z17--z5--z30--z29---z7--z6--z14--z13..z12..z1..cycle; lowe := currentpicture; @@ -753,7 +756,10 @@ llserif(1,12,13,14,26)(1); lrserif(5,31,32,33,34)(1); ulserif(3,18,19,20,28)(1); -fill z5--z17--z22..z25..z27--z24..z23..z21--z16--z4--z9..z11..z10--z8--z20--z19..z18..z3--z1..z12..z13--z14--z33--z32..z31..z5..cycle; +y4 := y11 := y9; + +fill +z5--z17--z22..z25..z27--z24..z23..z21--z16--z4--z9--z11..z10--z8--z20--z19..z18..z3--z1..z12..z13--z14--z33--z32..z31..z5--z17--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); @@ -819,7 +825,7 @@ lowy := currentpicture; endchar; -beginchar("z",6em#/12+2ss#,1.2ex#,0); "The Letter Z"; +beginchar("z",8em#/12+2ss#,1.2ex#,0); "The Letter Z"; z0 = (ss+ssslant,h); z1 = (w-ss,h); @@ -832,6 +838,14 @@ z12 = z4 shifted (-lserw,thinstroke); lftdownsideserif(0,5,6); upsideserif(4,7,8); +if (x8 < x12): + x8 := x12; +fi +if (x6 > x9): + x6 := x9; +fi +y6 := y9 - ((y9 - y5)/6); +y8 := y12 + ((y7 - y12)/6); fill z1--z0--z5..z6..z9--z10--z3--z4--z7..z8..z12--z11--z1--cycle; |