diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/moonphase |
Initial commit
Diffstat (limited to 'fonts/moonphase')
-rw-r--r-- | fonts/moonphase/moonphase.mf | 60 | ||||
-rw-r--r-- | fonts/moonphase/moonphase.tex | 9 |
2 files changed, 69 insertions, 0 deletions
diff --git a/fonts/moonphase/moonphase.mf b/fonts/moonphase/moonphase.mf new file mode 100644 index 0000000000..a3360c8e30 --- /dev/null +++ b/fonts/moonphase/moonphase.mf @@ -0,0 +1,60 @@ +% moonphase.mf +% by Stanislav Brabec, utx@k332.feld.cvut.cz + +font_size=10pt#; +mode_setup; +design_size=10pt#; + +path octcircle,fiveoctcircle,profile,peye,leye,reye,nose,lips; +octcircle=(right{up}..(right+up)/sqrt2) scaled .5; +fiveoctcircle = halfcircle rotated -22.5 & octcircle rotated 157.5; +profile = (0pt,9.5pt)---(0pt,7.5pt)..(-.5pt,6pt)..(-.8pt,4.7pt).. + (0pt,4.5pt)---(.5pt,4.6pt)-- + (0pt,4.5pt)--(0pt,2.5pt)--(1.3pt,2.7pt)--(0pt,2.5pt)--(.2pt,.5pt); +peye = (1pt,7.5pt)..{5*right+up}(2pt,7.3pt); +leye = (3pt,7.4pt)..{5*right+up}(4pt,7.3pt); +reye = (6pt,7.3pt){5*right+down}..(7pt,7.4pt); +nose = +(5pt,6.5pt)---(5pt,5.8pt)..(4.5pt,4.2pt)..(5pt,3.9pt)---(5.2pt,3.9pt); +lips = (4pt,2.5pt)..(5pt,2.4pt)..(6pt,2.5pt); + +"New Moon"; +beginchar(0,10pt#,10pt#,0); +fill fullcircle scaled 10pt shifted (5pt,5pt); +pickup pencircle scaled .75pt; +undraw leye; +undraw reye; +undraw nose; +undraw lips; +endchar; + +"Open Moon"; +beginchar(1,7.8pt#,10pt#,0); +pickup pencircle scaled .8pt; +draw fiveoctcircle scaled 9.2pt rotated -90 shifted (2.2pt,5pt); +pickup pencircle scaled .5pt; +draw profile shifted (2.2pt,0pt); +draw peye shifted (2.2pt,0pt); +endchar; + +"Full Moon"; +beginchar(2,10pt#,10pt#,0); +pickup pencircle scaled .7pt; +draw fullcircle scaled 9.3pt shifted (5pt,5pt); +pickup pencircle scaled .5pt; +draw leye; +draw reye; +draw nose; +draw lips; +endchar; + +"Close Moon"; +beginchar(3,7.8pt#,10pt#,0); +pickup pencircle scaled .8pt; +draw fiveoctcircle scaled 9.2pt rotated 90 shifted (5pt,5pt); +pickup pencircle scaled .5pt; +draw profile reflectedabout((0,0),(0,1)) shifted (5pt,0pt); +draw peye reflectedabout((0,0),(0,1)) shifted (5pt,0pt); +endchar; + +end. diff --git a/fonts/moonphase/moonphase.tex b/fonts/moonphase/moonphase.tex new file mode 100644 index 0000000000..32cfb6f5fc --- /dev/null +++ b/fonts/moonphase/moonphase.tex @@ -0,0 +1,9 @@ +% moonphase.tex +% by Stanislav Brabec, utx@k332.feld.cvut.cz + +\font\moonphase=moonphase +\def\newmoon{\hbox{\moonphase\char0}} +\def\rightmoon{\hbox{\moonphase\char1}} +\def\fullmoon{\hbox{\moonphase\char2}} +\def\leftmoon{\hbox{\moonphase\char3}} +\endinput |