summaryrefslogtreecommitdiff
path: root/fonts/knot/tri.mf
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/knot/tri.mf
Initial commit
Diffstat (limited to 'fonts/knot/tri.mf')
-rw-r--r--fonts/knot/tri.mf38
1 files changed, 38 insertions, 0 deletions
diff --git a/fonts/knot/tri.mf b/fonts/knot/tri.mf
new file mode 100644
index 0000000000..81d15fd2f1
--- /dev/null
+++ b/fonts/knot/tri.mf
@@ -0,0 +1,38 @@
+mode_setup;
+
+scale# := 0.25pt#;
+knotwid# = 8scale#;
+croswid# = .25knotwid#;
+croswidang# = croswid#/(cosd 30);
+gap# = 1scale#;
+thin# = .2scale#;
+thick# = .2scale#;
+sqwid# = 25scale#;
+sqht# = (cosd 30)*25scale#;
+define_pixels(scale, thick, thin, gap, croswid);
+define_blacker_pixels(knotwid, croswid, croswidang);
+font_normal_space sqwid#;
+pair cw, cwang;
+cw := (croswid, 0);
+cwang := (croswidang, 0);
+
+pickup pencircle xscaled thick yscaled thin;
+knot_pen := savepen;
+pair x[]i, x[]o;
+pair y[]i, y[]o;
+
+extra_beginchar := extra_beginchar & "pickup knot_pen;";
+
+beginchar (7, sqwid#, sqht#, 0); "tricycle 7";
+ z1 = (gap, gap); penpos1(croswidang, 30);
+ z2 = (w/2, h - gap); penpos2(croswidang, -90);
+ z3 = (w - gap, gap); penpos3(croswidang, 150);
+ z4 = .5[.5[z1, z2],z3]; penpos4(croswid, 150);
+ z5 = .5[.5[z2, z3],z1]; penpos5(croswid, 30);
+ z6 = .5[.5[z1, z3],z2]; penpos6(croswid, -90);
+ penstroke z1e{dir 60}..z6e..{dir -60}z3e;
+ penstroke z1e{dir 0}..z4e..{dir 120}z2e;
+ penstroke z2e{dir -120}..z5e..{dir 0}z3e;
+endchar;
+
+end.