X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Ffeta-test-generic.mf;h=c18061b15a32c4f0e6a5b6a9b51e45b359958bd7;hb=be6c990b752b8f9619988d870794ba779c9fe807;hp=ae432902d8b57bce1405410b429e760d4f5f4e60;hpb=2ec5f924eb75dfc6b584a8df25a03bdfde31fc6c;p=lilypond.git diff --git a/mf/feta-test-generic.mf b/mf/feta-test-generic.mf index ae432902d8..c18061b15a 100644 --- a/mf/feta-test-generic.mf +++ b/mf/feta-test-generic.mf @@ -2,74 +2,17 @@ % test stuff. % in a separate file to avoid tainting non-test font files for testing. % -% -fet_beginchar("> accent", "sforzato", "sforzatoaccent") - set_char_box(.9 staff_space#, .9 staff_space#, .5 staff_space#, .5 staff_space#); - save thickness, diminish; - - thickness = 0.05 staff_space + linethickness; - pickup pencircle scaled thickness; - - % prevent blobs at crossing lines - diminish = 1.0; - - top y1 = h; - lft x1 = -b; - rt x2 = w; - y2 = .25 thickness* diminish; - - rt z4 = (w,0); - x3 = - linethickness + 0.1 staff_space; - z3 = whatever [z1, z4]; - - penpos2(thickness*(2 - diminish)/2 , 90); - penpos1(thickness, 90); - penpos3(thickness, 90); - - draw z1 .. z3; - draw (z1 .. z3) yscaled -1; - draw z4; - penstroke z3e .. z2e; - penstroke (z3e .. z2e) yscaled -1; - - penlabels(1,2,3); - labels(4); -fet_endchar; - - -fet_beginchar("espr", "espr", "espressivo") - set_char_box(1.9 staff_space#, 1.9 staff_space#, .5 staff_space#, .5 staff_space#); - save thickness, diminish; - thickness = 0.05 staff_space + linethickness; - pickup pencircle scaled thickness; - t = thickness; - diminish = .1; - top z1 =(0.2 staff_space,h); - rt z3 =(w,0); - x2 = .5[x1,x3]; - z2 = whatever[z1,z3]; - penpos1(t,90); - penpos2(t,90); - penpos3(diminish*t,90); - draw z1 .. z2; - penstroke z2e .. z3e; - penlabels(1,2,3); - pickup pencircle scaled (diminish* thickness); - draw z3; - addto currentpicture also currentpicture xscaled -1; - addto currentpicture also currentpicture yscaled -1; - -fet_endchar; -input feta-bolletjes; -%input feta-banier; -%input feta-slag; -%input feta-eindelijk; -%input feta-klef; -% input feta-toevallig; -% input feta-schrift; -% input feta-haak; -% input feta-timesig; -% input feta-pendaal; -% input feta-accordion; -% input feta-solfa; +%input feta-rests; +input feta-accidentals; +%input feta-dots; +%input feta-noteheads; +%input feta-arrowheads; +%input feta-scripts; +%input feta-flags; +%input feta-trills; +%input feta-clefs; +%input feta-brackettips; +%input feta-timesignatures; +%input feta-pedals; +%input feta-accordion;