trunk/Master/texmf-dist/fonts/source

git-svn-id: svn://tug.org/texlive/trunk@101 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 176 insertions, 0 deletions

diff --git a/Master/texmf-dist/fonts/source/public/ethiop/eth_nn.mf b/Master/texmf-dist/fonts/source/public/ethiop/eth_nn.mf
new file mode 100644
index 00000000000..1c26b034014
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/ethiop/eth_nn.mf
@@ -0,0 +1,176 @@
+%-------------------------------------------------------------
+% This is ETH_NN.MF     as of Dec, 1995 by Jochen Metzinger
+% originally distributed by Abass B. Alamnehe [February, 1993]
+%-------------------------------------------------------------
+
+iff known eth_Na:
+cmchar "The letter Na";
+beginchar(eth_Na,7u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(3.5u#,1.5u#);
+
+pickup fine.nib; penpos0(stem,5); penpos1(stem,0); penpos2(stem,0);
+penpos3(stem,5); penpos4(stem,5); penpos5(stem,0); penpos6(stem,0);
+penpos7(stem,7);
+x1l=w-5u; x0l=x1l+.5u; x2r=w-1.2u; x3r=x2r-.5u;
+x4r=x3l; x5r=x4r-.25u; x6r=x4r+.25u; x7r=x4r-.25u;
+bot y0=0; y1=.075h; y2=.575h; y3=y4=.625h; y5=.675h; y6=.875h; y7=.95h;
+filldraw stroke z0e{left}...{up}z1e---z2e{up}...{left}z3e;
+filldraw stroke z4e{left}...{up}z5e---z6e{up}...{left}z7e;
+
+x8=x7l; x9=x7r; y8=y9=y7; lft_half_ellipse(8,1.25u);
+rt_half_ellipse(9,1.75u);
+penlabels(0,1,2,3,4,5,6,7); endchar;
+
+
+iff known eth_NU:
+cmchar "The letter NU";
+beginchar(eth_NU,7u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(3.5u#,2.5u#);
+
+pickup fine.nib; penpos0(stem,5); penpos1(stem,0); penpos2(stem,0);
+penpos3(stem,5); penpos4(stem,5); penpos5(stem,0); penpos6(stem,0);
+penpos7(stem,7);
+x1l=w-5u; x0l=x1l+.5u; x2r=w-1.2u; x3r=x2r-.5u;
+x4r=x3l; x5r=x4r-.25u; x6r=x4r+.25u; x7r=x4r-.25u;
+bot y0=0; y1=.075h; y2=.575h; y3=y4=.625h; y5=.675h; y6=.875h; y7=.95h;
+filldraw stroke z0e{left}...{up}z1e---z2e{up}...{left}z3e;
+filldraw stroke z4e{left}...{up}z5e---z6e{up}...{left}z7e;
+
+x8=x7l; x9=x7r; y8=y9=y7; lft_half_ellipse(8,1.25u);
+rt_half_ellipse(9,1.75u);
+x10=w-1.75u; y10=.45h; rt_wing(10,1.25u,0);
+penlabels(0,1,2,3,4,5,6,7); endchar;
+
+
+iff known eth_NI:
+cmchar "The letter NI";
+beginchar(eth_NI,7u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(3.5u#,2u#);
+
+pickup fine.nib; penpos0(stem,5); penpos1(stem,0); penpos2(stem,0);
+penpos3(stem,5); penpos4(stem,5); penpos5(stem,0); penpos6(stem,0);
+penpos7(stem,7);
+x1l=w-5u; x0l=x1l+.5u; x2r=w-1.2u; x3r=x2r-.5u;
+x4r=x3l; x5r=x4r-.25u; x6r=x4r+.25u; x7r=x4r-.25u;
+bot y0=0; y1=.075h; y2=.575h; y3=y4=.625h; y5=.675h; y6=.875h; y7=.95h;
+
+filldraw stroke z0e{left}...{up}z1e---z2e{up}...{left}z3e;
+filldraw stroke z4e{left}...{up}z5e---z6e{up}...{left}z7e;
+z8=z0r; rt_half_ellipse(8,1.5u);
+x9=x7l; x10=x7r; y9=y10=y7; lft_half_ellipse(9,1.25u);
+rt_half_ellipse(10,1.75u);
+penlabels(0,1,2,3,4,5,6); endchar;
+
+
+iff known eth_NA:
+cmchar "The letter NA";
+beginchar(eth_NA,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(.5u#,-.5u#);
+
+pickup fine.nib; pos0(vair,90); pos1(vair,105); penpos2(stem,180);
+penpos3(stem,180); pos4(vair,270); penpos5(stem,187); penpos6(stem,180);
+penpos7(stem,180); penpos8(stem,180);
+x0=w-4.5u; x1=.45w; x2r=1.75u; x3r=2.5u; x4=w-6u;
+x5=x4; x6=x5+.5u; x7=x5; x8=x5+.5u;
+y0=.8h; y1=.8h+.025h; y2=.55h; y3=.425h; y4=.45h; y5=y4; y6=y4-.1h; 
+y7=.075h; bot y8=0;
+
+filldraw stroke z0e{left}...z1e{left}...{down}z2e...z3e{right}..z4e;
+filldraw stroke z5e{right}...{down}z6e---z7e{down}...{right}z8e;
+x9=x0; y9=y0+o; rt_wing(9,0,-o);
+penpos10(stem,5); penpos11(stem,5);
+x10=x4-.5u; x11=x10+.25u; y10=y0+o; y11=y0+.2h; filldraw  stroke z10e--z11e;
+x12=x11l; x13=x11r; y12=y13=y11; lft_half_ellipse(12,1.5u);
+rt_half_ellipse(13,1.25u);
+penlabels(0,1,2,3,4,5,6,7,8,10,11); endchar;
+
+
+iff known eth_NE:
+cmchar "The letter NE";
+beginchar(eth_NE,7u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(3u#,1.5u#);
+
+pickup fine.nib; penpos0(stem,0); penpos1(stem,0); penpos2(stem,0);
+penpos3(stem,5); penpos4(stem,5); penpos5(stem,0); penpos6(stem,0);
+penpos7(stem,7);
+x1l=w-5u; x0l=x1l+.5u; x2r=w-1.2u; x3r=x2r-.5u;
+x4r=x3l; x5r=x4r-.25u; x6r=x4r+.25u; x7r=x4r-.25u;
+bot y0=0; y1=.075h; y2=.575h; y3=y4=.625h; y5=.7h; y6=.9h; y7=.975h;
+filldraw stroke z0e{left}...{up}z1e---z2e{up}...{left}z3e;
+filldraw stroke z4e{left}...{up}z5e---z6e{up}...{left}z7e;
+x8=x0; bot y8=0; half_ring(8);
+x9=x7l; x10=x7r; y9=y10=y7; lft_half_ellipse(9,1.25u);
+rt_half_ellipse(10,1.75u);
+penlabels(0,1,2,3,4,5,6); endchar;
+
+
+iff known eth_Ne:
+cmchar "The letter Ne";
+beginchar(eth_Ne,10u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(1u#,1u#);
+
+pickup fine.nib; penpos0(stem,5); penpos1(stem,0); penpos2(stem,0);
+penpos3(stem,0); penpos4(stem,0); penpos5(stem,0); penpos6(stem,0);
+pos7(vair,45);
+x1=.5w; x0l=x1l+.25u; x2r=w-1.25u; x3r=x2r-.5u;
+x4l=w-5u; x5l=x4l-.25u; x6l=w-4.5u; x7=.5w;
+bot y0=0; y1=.075h; y2=.5h; y3=.55h; y4=y3; y5=y4+.025h; y6=.75h; top y7=.85h;
+filldraw stroke z0e{left}...{up}z1e---z2e{up}...{left}z3e---z4e;
+filldraw stroke z4e{left}...{up}z5e---z6e{up}...{left}z7e;
+
+x8=x7; y8=y7; lft_wing(8,1.5u,o);
+penpos9(stem,0); penpos10(stem,0); x9+.25u=x10=x7; y9=y7; y10=y9+.125h;
+filldraw stroke z9e--z10e;
+x14=x9l+.25u; x15=x9r; y14=y15=y10;
+upper_left_wing(14); upper_right_wing(15);
+penlabels(0,1,2,3,4,5,6,7); endchar;
+
+
+iff known eth_NO:
+cmchar "The letter NO";
+beginchar(eth_NO,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(.5u#,.5u#);
+
+pickup fine.nib; pos0(vair,90); pos1(vair,105); penpos2(stem,180);
+penpos3(stem,180); pos4(vair,270); penpos5(stem,185); penpos6(stem,180);
+penpos7(stem,180); penpos8(stem,180);
+x0=w-4.5u; x1=.45w; x2r=1.75u; x3r=2.5u; x4=w-6u;
+x5=x4; x6=x5+.5u; x7=x5; x8=x5+.5u;
+y0=.8h; y1=.8h+.025h; y2=.55h; y3=.425h; y4=.45h; y5=y4; y6=y4-.1h; 
+y7=.075h; bot y8=0;
+filldraw stroke z0e{left}...z1e{left}...{down}z2e...z3e{right}..z4e;
+filldraw stroke z5e{right}...{down}z6e---z7e{down}...{right}z8e;
+x9=x0-1.75u; y9=y0-.05h; ynseven_ring(9,0,1/6);
+
+penpos10(stem,0); penpos11(stem,7);
+x10=x4-.5u; x11=x10+.25u; y10=y0+o; y11=y0+.2h; filldraw  stroke z10e--z11e;
+
+x12=x11l; x13=x11r; y12=y13=y11; lft_half_ellipse(12,1.5u);
+rt_half_ellipse(13,1.25u);
+penlabels(0,1,2,3,4,5,6,7,8,10,11); endchar;
+
+
+iff known eth_NuA:
+cmchar "The letter NuA";
+beginchar(eth_NuA,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(0,0);
+
+pickup fine.nib; pos0(vair,90); pos1(vair,105); penpos2(stem,180);
+penpos3(stem,180); pos4(vair,270); penpos5(stem,187); penpos6(stem,180);
+penpos7(stem,180); penpos8(stem,180);
+x0=w-4.5u; x1=.45w; x2r=1.75u; x3r=2.5u; x4=w-6u;
+x5=x4; x6=x5+.5u; x7=x5; x8=x5+.5u;
+y0=.8h; y1=.8h+.025h; y2=.55h; y3=.425h; y4=.45h; y5=y4; y6=y4-.1h; 
+y7=.075h; bot y8=0;
+
+filldraw stroke z0e{left}...z1e{left}...{down}z2e...z3e{right}..z4e;
+filldraw stroke z5e{right}...{down}z6e---z7e{down}...{right}z8e;
+x9=x0; y9=y0+o; rt_wing(9,0,-o);
+
+penpos12(stem,0); penpos11(stem,0); x12+.25u=x11=x7; y12=y0; y11=y12+.175h;
+filldraw stroke z12e--z11e;
+x14=x12l+.25u; x15=x12r; y14=y15=y11;
+upper_left_wing(14); upper_right_wing(15);
+x20=x8r; x21=x8l; y20=y21=y8; lft_wing(20,2u,.015h); 
+rt_wing(21,1.25u,.015h);
+penlabels(0,1,2,3,4,5,6,7,8,10,11); endchar;