]> git.donarmstrong.com Git - lilypond.git/blob - mf/feta-puntje.mf
patch::: 1.5.30.uu1
[lilypond.git] / mf / feta-puntje.mf
1 fet_begingroup("dots");
2
3 save dot_radius;
4 4 dot_radius# = staff_space# - stafflinethickness#;
5 define_whole_blacker_pixels(dot_radius);
6
7 fet_beginchar("duration dot","dot", "dot")
8         pickup pencircle scaled dot_radius;
9         drawdot (dot_radius,0);
10         set_char_box(0, 2*dot_radius#, dot_radius#, dot_radius#);
11 fet_endchar;
12
13 fet_endgroup("dots");