From 52a5942994007acc29107f036c9b8f386b19399f Mon Sep 17 00:00:00 2001 From: Ian Jauslin Date: Wed, 13 Sep 2017 23:29:54 +0000 Subject: Initial commit --- dimer_font/dimer.mf | 65 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 65 insertions(+) create mode 100644 dimer_font/dimer.mf (limited to 'dimer_font/dimer.mf') diff --git a/dimer_font/dimer.mf b/dimer_font/dimer.mf new file mode 100644 index 0000000..8f0e49b --- /dev/null +++ b/dimer_font/dimer.mf @@ -0,0 +1,65 @@ +%% half-dimer pointing up +% name, width, height, depth +beginchar("a",1.5pt#,7pt#,0); + pickup pencircle scaled 4; + + x1=y1=x2=x3=0; + y2=h; + x4=-x5=-y4=-y5=w; + y3=2y4; + + draw z1..z2; + draw z1..z4..z3..z5..cycle; +endchar; + +%% half-dimer pointing down +beginchar("b",1.5pt#,7pt#,0); + pickup pencircle scaled 4; + + x1=x2=x3=0; + y1=h-2w; + y2=-2w; + x4=-x5=w; + y4=y5=h-w; + y3=h; + + draw z1..z2; + draw z1..z4..z3..z5..cycle; +endchar; + +%% radius for horizontal dimers +r=1.5pt; + +%% half-dimer pointing right +beginchar("c",10pt#,4.5pt#,0); + pickup pencircle scaled 4; + + y1=y2=y3=h-r; + x3=0; + y4=h; + y5=h-2r; + x4=x5=r; + x1=2r; + x2=w; + + draw z1..z2; + draw z1..z4..z3..z5..cycle; +endchar; + +%% half-dimer pointing left +beginchar("d",10pt#,4.5pt#,0); + pickup pencircle scaled 4; + + y1=y2=y3=h-r; + x3=w; + y4=h; + y5=h-2r; + x4=x5=w-r; + x1=w-2r; + x2=0; + + draw z1..z2; + draw z1..z4..z3..z5..cycle; +endchar; + +end -- cgit v1.2.3-70-g09d2