diff options
Diffstat (limited to 'fonts/nahuatl/font')
-rw-r--r-- | fonts/nahuatl/font/mf/Nahuatl.mf | 64 | ||||
-rw-r--r-- | fonts/nahuatl/font/mf/U.mf | 87 | ||||
-rw-r--r-- | fonts/nahuatl/font/pk/nahuatl.pk | bin | 0 -> 61628 bytes | |||
-rw-r--r-- | fonts/nahuatl/font/tfm/Nahuatl.tfm | bin | 0 -> 140 bytes |
4 files changed, 151 insertions, 0 deletions
diff --git a/fonts/nahuatl/font/mf/Nahuatl.mf b/fonts/nahuatl/font/mf/Nahuatl.mf new file mode 100644 index 0000000000..7dc2d6a9b2 --- /dev/null +++ b/fonts/nahuatl/font/mf/Nahuatl.mf @@ -0,0 +1,64 @@ +% This is the source of nahuatl.mf +% +% (c) 2021 SIL OFL +% +% Version 1.1 – 26 February 2007 +% +% https://ctan.org/license/ofl +% +% Roberto Alvarez Zavala +% +% This file is part of the package nahuatl V 0.1 +% +% Please read the files readme.txt +% +% +% Content: nahuatl.mf +% + +font_size:=12pt#; + +mode_setup; + +define_pixels(u); + +ro:=1.618; +a=1; +b=0.61804; +c=0.38194; +dr=0.23608; +e=0.14591; +f=0.09017; +g=0.05573; +hr=0.03444; +i=0.02128; +j:=i*0.618; + +def ccr (expr d,e,f) = ( (d-f)*(w/a) , e*h/b )..( (d+f)*(w/a) , e*h/b )..cycle; enddef; +def cir (expr a,b) = draw a..b..cycle; enddef; + +input A.mf +input B.mf +input C.mf +input D.mf +input E.mf +input F.mf +input G.mf +input H.mf +input I.mf +input J.mf +input K.mf +input L.mf +input M.mf +input N.mf +input O.mf +input P.mf +input Q.mf +input R.mf +input S.mf +input T.mf +input U.mf + +end input +end +bye.
\ No newline at end of file diff --git a/fonts/nahuatl/font/mf/U.mf b/fonts/nahuatl/font/mf/U.mf new file mode 100644 index 0000000000..160e42f65c --- /dev/null +++ b/fonts/nahuatl/font/mf/U.mf @@ -0,0 +1,87 @@ +beginchar ("U", 10pt#, 10pt#, 0); "Yolotl"; + +z0= ( (dr-i)*w, (a-e)*h); +z1= ( (e-i)*w, (a-dr-i)*h); +z2= ( (0)*w, (a-e+i)*h); +z3= ( (e+hr)*w, (a)*h); +z4= ( (c)*w, (a-e)*h); + +z5= ( (dr-i)*w, (a-e)*h); +z6= ( (e)*w, (a-c-hr)*h); +z7= ( (dr)*w, (dr)*h); +z8= ( (.5a)*w, (0)*h); + +z0= ( (dr-i)*w, (a-e)*h); +z9= ( (dr-i)*w, (a-e)*h); +z10= ( (dr-hr)*w, (a-dr)*h); +z11= ( (c-i)*w, (b-g)*h); +z12= ( (.5a)*w, (b+i)*h); + +z13= ( (dr)*w, (dr)*h); +z14= ( (c)*w, (dr+f)*h); +z15= ( (.5a)*w, (dr)*h); + +z16= ( (.5a)*w, (a)*h); +z17= ( (.5a)*w, (0)*h); + +z18= ( (.5a)*w, (a-e)*h); + +z19= ( (g)*w, (a+b-f)*h); +z20= ( (e-g)*w, (a+b-e)*h); +z21= ( (e)*w, (a+b-f)*h); +z22= ( (g)*w, (a+b)*h); +z23= ( (-g)*w, (a+b-f)*h); +z24= ( (i)*w, (a+b-dr)*h); +z25= ( (dr+hr)*w, (a+b-dr-hr)*h); +z26= ( (c-i)*w, (a+b-dr-hr)*h); +z27= ( (c)*w, (a+b-c-hr)*h); + +z28= ( (c)*w, (a+b-e-2i)*h); +z29= ( (.5a)*w, (a+b-dr-f-g)*h); + +z30= ( (.5a-hr)*w, (hr)*h); + +z31= ( (b)*w, (a+b-c)*h); + + +pickup pencircle scaled 12; + +draw z0..z1..z2..z3..z4; +draw z5..z6..z7..z8; +draw z0..z10..z11..z12; +draw z13..z14..z15; + +draw (z0..z1..z2..z3..z4) reflectedabout (z16, z17); +draw (z5..z6..z7..z8) reflectedabout (z16, z17); +draw (z0..z10..z11..z12) reflectedabout (z16, z17); +draw (z13..z14..z15) reflectedabout (z16, z17); + +draw z4{dir80}..{dir260}z18; +draw (z4{dir80}..{dir260}z18) reflectedabout (z16, z17); + +draw z19..z20..z21..z22..z23..z24..z25..{dir270}z27--z4; +draw z20{dir0}..z28..{dir270}z29--z18; + +draw (z19..z20..z21..z22..z23) shifted (z30)..{dir270}z29; +draw (z20) shifted (z30) {dir270}..{dir270}z31-- (z18) shifted (z18-z4); + +%draw ccr (.5a,f,hr); + +penlabels(range 0 thru 32); + +endchar; + +endinput + +z0= ( ()*w, ()*h); +z1= ( ()*w, ()*h); +z2= ( ()*w, ()*h); +z3= ( ()*w, ()*h); +z4= ( ()*w, ()*h); +z5= ( ()*w, ()*h); +z6= ( ()*w, ()*h); +z7= ( ()*w, ()*h); +z8= ( ()*w, ()*h); +z9= ( ()*w, ()*h); + +draw z0..z1..z2..z3..z4..z5..z6..z7..z8..z9
\ No newline at end of file diff --git a/fonts/nahuatl/font/pk/nahuatl.pk b/fonts/nahuatl/font/pk/nahuatl.pk Binary files differnew file mode 100644 index 0000000000..1628221104 --- /dev/null +++ b/fonts/nahuatl/font/pk/nahuatl.pk diff --git a/fonts/nahuatl/font/tfm/Nahuatl.tfm b/fonts/nahuatl/font/tfm/Nahuatl.tfm Binary files differnew file mode 100644 index 0000000000..0ccc7e27d5 --- /dev/null +++ b/fonts/nahuatl/font/tfm/Nahuatl.tfm |