]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-eindelijk.mf
release: 1.1.0
[lilypond.git] / mf / feta-eindelijk.mf
index 7649ea0e8ee9129d2e96a73dcc8bfbf313feaaa9..f3c26b669bac6454bf2f4678185ba9ae10bb3195 100644 (file)
@@ -1,8 +1,10 @@
-% eindelijk.mf
-% LilyPond's own rest(s)
-
-% todo breve/longa rests
-
+% feta-eindelijk.mf -- implement rest symbols
+%
+% part of LilyPond's pretty-but-neat music font
+%
+% source file of the Feta (not the Font-En-Tja) music font
+% 
+% (c) 1997, 1998 Jan Nieuwenhuizen <janneke@gnu.org>
 
 fet_begingroup("rests");
 
@@ -85,6 +87,25 @@ fet_beginchar("half rest (outside staff)", "1o", "outsidehalfrest");
        draw z5 .. z6;
 fet_endchar;
 
+
+save breve_rest_y, breve_rest_x;
+
+breve_rest_y# =  interline#;
+breve_rest_x# = 3/5 interline#;
+
+define_pixels(breve_rest_y, breve_rest_x);
+
+fet_beginchar("breve rest", "-1", "breverest");
+       set_char_box(0, breve_rest_x#, 0, breve_rest_y#);
+       draw_block ((0,0), (breve_rest_x, breve_rest_y));
+fet_endchar;
+
+fet_beginchar("longa rest", "-2", "longarest");
+       set_char_box(0, breve_rest_x#, breve_rest_y#, breve_rest_y#);
+       draw_block ((0,-breve_rest_y), (breve_rest_x, breve_rest_y));
+fet_endchar;
+
+
 fet_beginchar("Quarter rest","2","quartrest");
        save alpha;
        alpha:=-50;