2 #(set-global-staff-size 17)
5 texidoc = "Default flag styles: '(), 'mensural and 'no-flag.
6 Compare all three methods to print them (C++ default implementation,
7 Scheme implementation using the 'flag-style grob property and
8 setting the 'flag property explicitly to the desired Scheme function.
9 All three lines should be absolutely identical."
16 % test notes, which will be shown in different style:
17 testnotes = { \autoBeamOff c'8 d'16 c'32 d'64 \acciaccatura {c'8} d'64 c''8 d''16 c''32 d''64 \acciaccatura {c''8} d''64 }
20 \override Score.RehearsalMark #'self-alignment-X = #LEFT
24 % Old settings: default, 'mensural, 'no-flag
25 \mark "Default flags (C++)"
28 \mark "Symbol: 'mensural (C++)"
29 \override Stem #'flag-style = #'mensural
32 \mark "Symbol: 'no-flag (C++)"
33 \override Stem #'flag-style = #'no-flag
38 % The same, but with the Scheme implementation of default-flag
39 \override Stem #'flag = #default-flag
40 \revert Stem #'flag-style
41 \mark "Default flags (Scheme)"
44 \mark "Symbol: 'mensural (Scheme)"
45 \override Stem #'flag-style = #'mensural
48 \mark "Symbol: 'no-flag (Scheme)"
49 \override Stem #'flag-style = #'no-flag
54 % New settings: no settings, normal-flag, mensural-flag, no-flag
55 \mark "Function: normal-flag"
56 \override Stem #'flag = #normal-flag
59 \mark "Function: mensural-flag"
60 \override Stem #'flag = #mensural-flag
63 \mark "Function: no-flag"
64 \override Stem #'flag = #no-flag