diff options
Diffstat (limited to 'fonts/tengwar/fullvowels.mf')
-rw-r--r-- | fonts/tengwar/fullvowels.mf | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/fonts/tengwar/fullvowels.mf b/fonts/tengwar/fullvowels.mf new file mode 100644 index 0000000000..d3db6dcf7c --- /dev/null +++ b/fonts/tengwar/fullvowels.mf @@ -0,0 +1,42 @@ +% Copyright 1988 Michael Urban +% Everyone is granted permission to copy, modify and redistribute +% this file, provided that a currently-dated copy of this +% copyright notice is included in the copy. +% License is granted to produce fonts based on the information +% in this file, provided that such fonts are redistributed +% without charge to any third party. + +% SCCS ID @(#)fullvowels.mf 1.1 10/1/86 + +beginchar ("a",shortwidth, xht#, 0); "The letter a (modus beleriandi)"; + begingroup; + save x,y; + pickup elvishpen; + top y1= h; x1 = .75[leadgap, w]; + lft x2= leadgap; y2= .4h; + bot y3= 0; x3= .5[leadgap, w]; + y4= .2h; rt x4=w; + draw z1..z2{down}..z3{right}..z4; + endgroup; +endchar; + +beginchar ("y", shortwidth, xht#, 1/2dep#); "The letter y (modus beleriandi)"; + begingroup; + save x,y; + pickup elvishpen; + x1=leadgap; y1=.5h; + x2 = 2/3[x1,w]; top y2=h; + rt x3=w; y3=0; + lft x4=leadgap; y4=-d; + draw z1..z2{right}..z3..z4; + endgroup; +endchar; + + +beginchar("o", shortwidth,xht#,0); "The letter o (anna ar taith)"; + pickup elvishpen; + nutelco(w,shortstem, stemdepth); + nuluva (bowpoint, leadgap, true); + draw barpoint..barpoint+3thin*right; +endchar; + |