summaryrefslogtreecommitdiff
path: root/fonts/mbboard/source/mbbcrklo.mf
diff options
context:
space:
mode:
Diffstat (limited to 'fonts/mbboard/source/mbbcrklo.mf')
-rw-r--r--fonts/mbboard/source/mbbcrklo.mf312
1 files changed, 312 insertions, 0 deletions
diff --git a/fonts/mbboard/source/mbbcrklo.mf b/fonts/mbboard/source/mbbcrklo.mf
new file mode 100644
index 0000000000..94b5b7691b
--- /dev/null
+++ b/fonts/mbboard/source/mbbcrklo.mf
@@ -0,0 +1,312 @@
+% blackboard typefaces by Anthony Phan.
+% file: mbbcrklo.mf (Cork roman lowercase)
+% last modification: 25.10.2001.
+
+% some new instructions (eg. begincorkchar)
+% and new measures (eg. accent_height#)
+% are defined in the driver file `bbcrkdrv.mf'.
+
+use_rule1;
+
+begincorkchar("a","grave",hex"E0",accent_height#,0);
+italcorr cork_ic[a];
+complete_grave(lshift,rshift);
+endcorkchar;
+
+begincorkchar("a","acute",hex"E1",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("a","circumflex",hex"E2",accent_height#,0);
+italcorr cork_ic[a];
+complete_hat(lshift,rshift);
+endcorkchar;
+
+begincorkchar("a","tilde",hex"E3",accent_height#,0);
+italcorr cork_ic[a];
+complete_tilde(lshift,rshift);
+endcorkchar;
+
+begincorkchar("a","umlaut",hex"E4",accent_height_ter#,0);
+italcorr cork_ic[a];
+complete_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("a","circ",hex"E5",accent_height#,0);
+italcorr cork_ic[a];
+complete_circ(lshift,rshift);
+endcorkchar;
+
+begincorkchar("a","breve",hex"A0",accent_height#,0);
+italcorr cork_ic[a];
+complete_breve(lshift,rshift);
+endcorkchar;
+
+begincorkchar("a","ogonek",hex"A1",0,desc_depth#);
+italcorr cork_ic[a];
+pickup circle.nib; rt x0=w-apprr;
+complete_ogonek(x0,0);
+endcorkchar;
+
+begincorkchar("c","acute",hex"A2",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("c","hacheck",hex"A3",accent_height#,0);
+italcorr cork_ic[a];
+complete_hacheck(lshift,rshift);
+endcorkchar;
+
+begincorkchar("c","cedilla",hex"E7",0,desc_depth#);
+italcorr cork_ic[a];
+pickup circle.nib; lft x0l=apprl; rt x0r=w-apprr;
+complete_cedilla(0.527[x0l,x0r],-oo);
+endcorkchar;
+
+begincorkchar("d","bar",hex"9E",0,0);
+italcorr cork_ic[a];
+pickup circle.nib;
+y1=y2=y3=y4=good.y 0.5[x_height,h];
+rt x1=w-apprr+hround u; x2=w-apprr; x3=x2-hthick-thin;
+rt x1-lft x4=slash_width; pickup square.nib;
+draw z1..z2; draw z3..z4; labels(1,2,3,4);
+endcorkchar;
+
+begincorkchar("d","hacheck",hex"A4",0,0);
+italcorr cork_ic[a];
+correct_width_by(0,7.5u#-hthick#-thin#);
+pickup circle.nib;
+top y1=x_height; top y4=h; rt x3=w-apprr; x3-x5=hthick;
+lft x1=hround min(apprl+9u,x5-thin); complete_comma;
+endcorkchar;
+
+begincorkchar("e","grave",hex"E8",accent_height#,0);
+italcorr cork_ic[a];
+complete_grave(lshift,rshift);
+endcorkchar;
+
+begincorkchar("e","acute",hex"E9",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("e","circumflex",hex"EA",accent_height#,0);
+italcorr cork_ic[a];
+complete_hat(lshift,rshift);
+endcorkchar;
+
+begincorkchar("e","umlaut",hex"EB",accent_height_ter#,0);
+italcorr cork_ic[a];
+complete_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("e","hacheck",hex"A5",accent_height#,0);
+italcorr cork_ic[a];
+complete_hacheck(lshift,rshift);
+endcorkchar;
+
+begincorkchar("e","ogonek",hex"A6",0,desc_depth#);
+italcorr cork_ic[a];
+complete_ogonek(0.5[apprl,w-apprr],-oo);
+endcorkchar;
+
+begincorkchar(bbdotless_i,"grave",hex"EC",accent_height#,0);
+italcorr cork_ic[a];
+complete_grave(lshift,rshift);
+endcorkchar;
+
+begincorkchar(bbdotless_i,"acute",hex"ED",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar(bbdotless_i,"circumflex",hex"EE",accent_height#,0);
+italcorr cork_ic[a];
+complete_hat(lshift,rshift);
+endcorkchar;
+
+begincorkchar(bbdotless_i,"umlaut",hex"EF",accent_height_ter#,0);
+italcorr cork_ic[a];
+complete_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("i","j",hex"BC",0,desc_depth#);
+italcorr cork_ic[a+1];
+currentpicture:=currentpicture+cork_picture[a+1] shifted (w,0);
+correct_width_by(0,cork_wd[a+1]);
+endcorkchar;
+
+begincorkchar("g","breve",hex"A7",accent_height#,0);
+italcorr cork_ic[a];
+complete_breve(lshift,rshift);
+endcorkchar;
+
+begincorkchar("l","acute",hex"A8",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("l","hacheck",hex"A9",0,0);
+italcorr cork_ic[a];
+correct_width_by(0,7.5u#+2appr#-charwd);
+pickup circle.nib; top y1=x_height; top y4=h;
+rt x3=w-apprr; x3-x5=hthick;
+lft x1=hround min(apprl+hthick+thin+u,x5-thin);
+complete_comma;
+endcorkchar;
+
+begincorkchar("l","cross",hex"AA",0,0);
+italcorr cork_ic[a];
+correct_width_by(0.5u#,0.5u#);
+x2l=vround(0.5[apprl,w-apprr]-0.5(hthick+thin))+0.5thin;
+x3l-x2l=hthick; x0-x3l=0.5thin; x2l-x1l=x4l-x3l=hround 1.25u+0.5thin;
+y0=x_height; y4l-y0=vround 1.25u;
+a:=thin/cosd angle((z4l-z0)slanted slant);
+forsuffixes $=1,2,3: z$l=whatever[z0,z4l]; endfor
+penpos1(a,-90); penpos2(a,-90); penpos3(a,-90); penpos4(a,-90);
+penstroke z1e..z2e; penstroke z3e..z4e;
+labels(0); penlabels(1,2,3,4);
+endcorkchar;
+
+begincorkchar("n","acute",hex"AB",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("n","hacheck",hex"AC",accent_height#,0);
+italcorr cork_ic[a];
+complete_hacheck(lshift,rshift);
+endcorkchar;
+
+begincorkchar("n","tilde",hex"F1",accent_height#,0);
+italcorr cork_ic[a];
+complete_tilde(lshift,rshift);
+endcorkchar;
+
+begincorkchar("o","grave",hex"F2",accent_height#,0);
+italcorr cork_ic[a];
+complete_grave(lshift,rshift);
+endcorkchar;
+
+begincorkchar("o","acute",hex"F3",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("o","circumflex",hex"F4",accent_height#,0);
+italcorr cork_ic[a];
+complete_hat(lshift,rshift);
+endcorkchar;
+
+begincorkchar("o","tilde",hex"F5",accent_height#,0);
+italcorr cork_ic[a];
+complete_tilde(lshift,rshift);
+endcorkchar;
+
+begincorkchar("o","umlaut",hex"F6",accent_height_ter#,0);
+italcorr cork_ic[a];
+complete_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("o","long umlaut",hex"AE",accent_height#,0);
+italcorr cork_ic[a];
+complete_long_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("r","acute",hex"AF",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("r","hacheck",hex"B0",accent_height#,0);
+italcorr cork_ic[a];
+complete_hacheck(lshift,rshift);
+endcorkchar;
+
+begincorkchar("s","acute",hex"B1",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("s","hacheck",hex"B2",accent_height#,0);
+italcorr cork_ic[a];
+complete_hacheck(lshift,rshift);
+endcorkchar;
+
+begincorkchar("s","cedilla",hex"B3",0,desc_depth#);
+italcorr cork_ic[a];
+complete_cedilla(0.5[apprl,w-apprr],-oo);
+endcorkchar;
+
+begincorkchar("t","hacheck",hex"B4",
+ asc_height#-cork_ht[byte "t"],0);
+italcorr cork_ic[a];
+correct_width_by(0,1.5u#);
+pickup circle.nib;
+bot y1=x_height+max(thin,vround 0.1x_height);
+top y4=h; rt x3=w-apprr; x3-x5=hthick;
+lft x1=hround min(apprl+hthick+thin+u,x5-thin);
+complete_comma;
+endcorkchar;
+
+begincorkchar("t","cedilla",hex"B5",0,desc_depth#);
+italcorr cork_ic[a];
+complete_cedilla(0.5[apprl,w-apprr],-oo);
+endcorkchar;
+
+begincorkchar("u","grave",hex"F9",accent_height#,0);
+italcorr cork_ic[a];
+complete_grave(lshift,rshift);
+endcorkchar;
+
+begincorkchar("u","acute",hex"FA",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("u","circumflex",hex"FB",accent_height#,0);
+italcorr cork_ic[a];
+complete_hat(lshift,rshift);
+endcorkchar;
+
+begincorkchar("u","umlaut",hex"FC",accent_height_ter#,0);
+italcorr cork_ic[a];
+complete_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("u","long umlaut",hex"B6",accent_height#,0);
+italcorr cork_ic[a];
+complete_long_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("u","circ",hex"B7",accent_height#,0);
+italcorr cork_ic[a];
+complete_circ(lshift,rshift);
+endcorkchar;
+
+begincorkchar("y","acute",hex"FD",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("y","umlaut",hex"B8",accent_height_ter#,0);
+italcorr cork_ic[a];
+complete_umlaut(lshift,rshift);
+endcorkchar;
+
+begincorkchar("z","acute",hex"B9",accent_height#,0);
+italcorr cork_ic[a];
+complete_acute(lshift,rshift);
+endcorkchar;
+
+begincorkchar("z","hacheck",hex"BA",accent_height#,0);
+italcorr cork_ic[a];
+complete_hacheck(lshift,rshift);
+endcorkchar;
+
+begincorkchar("z","dot",hex"BB",accent_height_bis#,0);
+italcorr cork_ic[a];
+complete_dot(lshift,rshift);
+endcorkchar;