-\version "2.17.12"
+\version "2.19.35"
\header {
texidoc = "@code{\\note-by-number} and @code{\\note} support
-all note head styles and straight flags."
+all note head styles and all flag styles (default, straight, flat, mensural)."
}
#(define styles-list
'(default altdefault
baroque neomensural
mensural petrucci
+ semipetrucci blackpetrucci
harmonic harmonic-black
harmonic-mixed diamond
cross xcircle
'(-3 -2 -1 0 1 2 3 4 5 6))))))))
styles))))
+%% Testing all combinations of note-head/flag-styles would be too much
+%% Thus, limited examples
\markup {
\column {
- \vspace #1
+ \combine \null \vspace #1
\underline "Note-head-styles:"
\override #'(baseline-skip . 6)
\show-note-styles #styles-list
\markup {
\column {
- \vspace #1
+ \combine \null \vspace #1
\underline "Modern-straight-flag:"
\override #'(flag-style . modern-straight-flag)
- \show-note-styles #'(default)
+ \show-note-styles #'(default mensural)
}
}
\markup {
\column {
- \vspace #1
+ \combine \null \vspace #1
\underline "Old-straight-flag:"
\override #'(flag-style . old-straight-flag)
\show-note-styles #'(default)
}
}
+
+\markup {
+ \column {
+ \combine \null \vspace #1
+ \underline "Flat-flag:"
+ \override #'(flag-style . flat-flag)
+ \show-note-styles #'(default)
+ }
+}
+
+\markup {
+ \column {
+ \combine \null \vspace #1
+ \underline "default-flag:"
+ \override #'(flag-style . default)
+ \show-note-styles #'(default mensural)
+ }
+}