summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/ethiop/eth_c_c.mf
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-09 23:38:21 +0000
committerKarl Berry <karl@freefriends.org>2006-01-09 23:38:21 +0000
commit215012a8d684889983ec2c0629e1c704e6853d9c (patch)
treeebf1271bd71869069824935ae8a5678745bf8bce /Master/texmf-dist/fonts/source/public/ethiop/eth_c_c.mf
parent1af3d19d6dbcbf309667d9cb4aa3cdda914914a9 (diff)
trunk/Master/texmf-dist/fonts/source
git-svn-id: svn://tug.org/texlive/trunk@101 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/ethiop/eth_c_c.mf')
-rw-r--r--Master/texmf-dist/fonts/source/public/ethiop/eth_c_c.mf173
1 files changed, 173 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/ethiop/eth_c_c.mf b/Master/texmf-dist/fonts/source/public/ethiop/eth_c_c.mf
new file mode 100644
index 00000000000..8b37a800d13
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/ethiop/eth_c_c.mf
@@ -0,0 +1,173 @@
+%-------------------------------------------------------------
+% This is ETH_C_C.MF as of Dec, 1995 by Jochen Metzinger
+% originally distributed by Abass B. Alamnehe [February, 1993]
+%-------------------------------------------------------------
+
+iff known eth_^ca:
+cmchar "The letter ^ca";
+beginchar(eth_^ca,10u#,.5[cap_height#,x_height#],0);
+adjust_fit(1.5u#,1.5u#);
+
+% STEM
+pickup fine.nib; penpos1(stem,7); penpos2(stem,0); penpos2'(stem,5);
+x1=w-4.75u; x2=x1-.75u; x2'=x1;
+y1=.95h; y2=.075h; bot y2'=0;
+filldraw stroke z1e---z2e{down}...{right}z2'e;
+
+% WINGS
+x3=.5[x1r,x2'r]; y3=.65h; rt_wing(3,2u,.02h);
+x4=.5[x1l,x2l]; y4=.65h; lft_wing(4,2u,.02h);
+
+penpos6(stem,0); penpos7(stem,0); x6=x1l; x7=x1r; y7=y6=y1;
+lft_half_ellipse(6,1.75u); rt_half_ellipse(7,1.75u);
+penlabels(1,2,2',3,4,6,7); endchar;
+
+
+iff known eth_^cU:
+cmchar "The letter ^cU";
+beginchar(eth_^cU,10u#,.5[cap_height#,x_height#],0);
+adjust_fit(1.5u#,1.5u#);
+
+% STEM
+pickup fine.nib; penpos1(stem,7); penpos2(stem,0); penpos2'(stem,5);
+x1=w-4.75u; x2=x1-.75u; x2'=x1;
+y1=.95h; y2=.075h; bot y2'=0;
+filldraw stroke z1e---z2e{down}...{right}z2'e;
+
+% WINGS
+x3=.5[x1r,x2'r]; y3=.65h; rt_wing(3,2u,.02h);
+x4=.5[x1l,x2l]; y4=.65h; lft_wing(4,2u,.02h);
+
+penpos6(stem,0); penpos7(stem,0); x6=x1l; x7=x1r; y7=y6=y1;
+lft_half_ellipse(6,1.75u); rt_half_ellipse(7,1.75u);
+x8=x2r; y8=.25h; rt_half_ellipse(8,1.75u);
+penlabels(1,2,3,4,5,6,7); endchar;
+
+
+iff known eth_^cI:
+cmchar "The letter ^cI";
+beginchar(eth_^cI,10u#,.5[cap_height#,x_height#],0);
+adjust_fit(1.5u#,1.5u#);
+
+% STEM
+pickup fine.nib; penpos1(stem,7); penpos2(stem,0); penpos2'(stem,5);
+x1=w-4.75u; x2=x1-.75u; x2'=x1;
+y1=.95h; y2=.075h; bot y2'=0;
+filldraw stroke z1e---z2e{down}...{right}z2'e;
+
+% WINGS
+x3=.5[x1r,x2'r]; y3=.65h; rt_wing(3,2u,.02h);
+x4=.5[x1l,x2l]; y4=.65h; lft_wing(4,2u,.02h);
+
+penpos6(stem,0); penpos7(stem,0); x6=x1l; x7=x1r; y7=y6=y1;
+lft_half_ellipse(6,1.5u); rt_half_ellipse(7,1.5u);
+z8=z2'r; rt_half_ellipse(8,1.5u);
+penlabels(1,2,3,4,5); endchar;
+
+
+iff known eth_^cA:
+cmchar "The letter ^cA";
+beginchar(eth_^cA,12u#,.5[cap_height#,x_height#],0);
+adjust_fit(1.5u#,.5u#);
+pickup fine.nib; penpos0(1.2stem,5); penpos0'(stem,0); penpos1(stem,0);
+pos2(vair,-90);
+
+x0=.5w; x0'=x0+.5u; x1=x0+.25u; x2=x0-4u;
+y0=.95h; y0'=y0-.1h; y1=.4h; y2=.15h;
+filldraw stroke z0e{right}...{down}z0'e---z1e..pulled_arc.e(1,2);
+x3=x0'r+oo; x3'=lft x0'l; y3=.65h; y3'=y3-oo;
+rt_wing(3,2u,.02h); lft_wing(3',2u,.02h);
+z4=z2l; t_wing(4);
+penpos6(stem,0); penpos7(stem,0); x6=x0l; x7=x0r; y7=y6=y0;
+lft_half_ellipse(6,1.75u); rt_half_ellipse(7,1.75u);
+penlabels(1,2,3,4,5); endchar;
+
+
+iff known eth_^cE:
+cmchar "The letter ^cE";
+beginchar(eth_^cE,10u#,.55[cap_height#,x_height#],0);
+adjust_fit(1.5u#,1.5u#);
+
+% STEM
+pickup fine.nib; penpos1(stem,7); penpos2(stem,0); penpos2'(stem,5);
+x1=w-4.75u; x2=x1-.75u; x2'=x1;
+y1=.95h; y2=.075h; bot y2'=0;
+filldraw stroke z1e---z2e{down}...{right}z2'e;
+
+% WINGS
+x3=.5[x1r,x2'r]; y3=.65h; rt_wing(3,2u,.02h);
+x4=.5[x1l,x2l]; y4=.65h; lft_wing(4,2u,.02h);
+
+penpos6(stem,0); penpos7(stem,0); x6=x1l; x7=x1r; y7=y6=y1;
+lft_half_ellipse(6,1.75u); rt_half_ellipse(7,1.75u);
+x8=x2'; bot y8=0; half_ring(8);
+penlabels(1,2,3,4,5,6); endchar;
+
+
+iff known eth_^ce:
+cmchar "The letter ^ce";
+beginchar(eth_^ce,10u#,cap_height#,0);
+adjust_fit(2.5u#,1.5u#);
+
+% STEM
+pickup fine.nib; penpos1(stem,0); penpos2(stem,0); penpos2'(stem,0);
+x1=w-4.75u; x2=x1-.75u; x2'=x1; y1=.8h; y2=.075h; bot y2'=0;
+filldraw stroke z1e--z2e{down}...{right}z2'e;
+
+% WINGS
+x3=.5[x1r,x2'r]; y3=.55h; rt_wing(3,2u,.02h);
+x4=.5[x1l,x2l]; y4=.55h; lft_wing(4,2u,.02h);
+
+penpos5(stem,0); penpos5'(stem,5); x5r=x1l; x5'r=x5r+.25u;
+y5=y1; y5'=y5+.15h; filldraw stroke z5e--z5'e;
+
+x6=x5'l; x7=x5'r; y6=y7=y5';
+upside_down_left_wing(6); rt_half_ellipse(7,1.5u);
+penlabels(1,2,2',3,4); endchar;
+
+
+iff known eth_^cO:
+cmchar "The letter ^cO";
+beginchar(eth_^cO,10u#,cap_height#,0);
+adjust_fit(1.5u#,1.5u#);
+
+pickup fine.nib; penpos0(1.2stem,180); penpos0'(stem,180); penpos1(stem,180);
+pos2(stem,180); pos2'(stem,180);
+pos3(vair,115); pos4(stem,0); pos4'(stem,0); pos5(vair,270);
+x0=.5w; x0'=x0-.5u; x1=x0; x2=x0-1.5u; x2'=x2+u;
+x3=x0+.5u; x4r=x1l+2u; x4'r=x4r-u; x5=x1;
+bot y0=0; y0'=.125h; y1=.5h; y2=.7h; y2'=y4'=.85h; y4=.75h; y5=.575h;
+
+filldraw stroke pulled_arc.e(5,4)...z4'e--z2'e{left}...{down}z2e...z1e{down}
+...z0'e{down}..z0e;
+x6=x1l; x6'=lft x1r; y6=.45h; y6'=y6-oo;
+rt_wing(6,2u,.02h); lft_wing(6',2u,.02h);
+
+x7=x4'r+2.5u; x8=x2'r; y7=y4'+.175h; y8=y2'+.15h;
+right_wing_no_bar(7) lft_half_ellipse(8,0);
+pos9(vair,90); pos9'(vair,90); x9=x2'r; x9'=x9-.75u; y9=y2'; y9'=y9+.05h;
+draw z9--z9';
+penlabels(1,2,2',4,4',5,6,7,8,9,9'); endchar;
+
+
+iff known eth_^cuA:
+cmchar "The letter ^cuA";
+beginchar(eth_^cuA,10u#,.5[cap_height#,x_height#],0);
+adjust_fit(1.5u#,1.5u#);
+
+% STEM
+pickup fine.nib; penpos1(stem,7); penpos2(stem,0); penpos2'(stem,5);
+x1=w-4.75u; x2=x1-.75u; x2'=x1;
+y1=.95h; y2=.075h; bot y2'=0;
+filldraw stroke z1e---z2e{down}...{right}z2'e;
+
+% WINGS
+x3=.5[x1r,x2'r]; y3=.65h; rt_wing(3,2u,.02h);
+x4=.5[x1l,x2l]; y4=.65h; lft_wing(4,2u,.02h);
+
+penpos6(stem,0); penpos7(stem,0); x6=x1l; x7=x1r; y7=y6=y1;
+lft_half_ellipse(6,1.75u); rt_half_ellipse(7,1.75u);
+
+x20=x2'l; x21=x2'r; y20=y21=y2'; lft_wing(20,2u,.02h);
+rt_wing(21,1.25u,.02h);
+penlabels(1,2,2',3,4,6,7); endchar;