-\version "2.10.0"
+\version "2.14.0"
+
+startGraceSlur = #(make-music 'SlurEvent 'span-direction START 'spanner-id "grace")
+stopGraceSlur = #(make-music 'SlurEvent 'span-direction STOP 'spanner-id "grace")
startGraceMusic = {
startAppoggiaturaMusic =
{
- s1*0(
+ s1*0\startGraceSlur
}
stopAppoggiaturaMusic = {
- s1*0)
+ s1*0\stopGraceSlur
}
startAcciaccaturaMusic = {
- s1*0(
- \override Stem #'stroke-style = #"grace"
+ s1*0\startGraceSlur
+ \override Flag #'stroke-style = #"grace"
}
stopAcciaccaturaMusic = {
- \revert Stem #'stroke-style
- s1*0)
+ \revert Flag #'stroke-style
+ s1*0\stopGraceSlur
+}
+
+startSlashedGraceMusic = {
+ \override Flag #'stroke-style = #"grace"
+}
+
+stopSlashedGraceMusic = {
+ \revert Flag #'stroke-style
}