summaryrefslogtreecommitdiff
path: root/fonts/thai/rmit/chard7.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/thai/rmit/chard7.mf
Initial commit
Diffstat (limited to 'fonts/thai/rmit/chard7.mf')
-rw-r--r--fonts/thai/rmit/chard7.mf32
1 files changed, 32 insertions, 0 deletions
diff --git a/fonts/thai/rmit/chard7.mf b/fonts/thai/rmit/chard7.mf
new file mode 100644
index 0000000000..fa8ae9f95d
--- /dev/null
+++ b/fonts/thai/rmit/chard7.mf
@@ -0,0 +1,32 @@
+beginthaichar("EU", "D7", "eu", 0, normht# + uvgap# + uvht#, 0);
+ med := 1/2[thin, thick];
+ if 3med > 1/2normwd: med := 1/6normwd; fi;
+ x1l + med = x1r;
+ y1l - thin = y1r;
+ z1 = 1/2[z1l, z1r];
+ x2t = x2b = 1/2[x1, x3];
+ y2t = y2b + med;
+ z2 = 1/2[z2t, z2b];
+ x3l + med = x3r;
+ y3l + thin = y3r;
+ z3 = 1/2[z3l, z3r];
+ penpos4(med, 0);
+ penpos5(med, 0);
+
+ x1r = - rightgap;
+ x3r = x1l - normwd;
+ y1r = normht + uvgap;
+ y2t = y1r + uvht - 3/4dia;
+ y3l = y1r + thin;
+ x4r = x1r;
+ y4r = normht + uvgap + uvht;
+ z5 = z4 - (2med, 0);
+ z6l = (z1{up} .. {left}z2t) intersectionpoint ((x5l, 0) .. (x5l, y4r));
+ z6r = (z1{up} .. {left}z2t) intersectionpoint ((x5r, 0) .. (x5r, y4r));
+
+ filldraw z1r -- z3l{up} .. z2t .. {down}cycle;
+ unfill z1l -- z3r{up} .. z2b .. {down}cycle;
+ filldraw z1r -- z4r -- z4l -- z1l -- cycle;
+ filldraw z6r -- z5r -- z5l -- z6l -- cycle;
+ penlabels(1,2,3);
+endthaichar;