ly/grace-init.ly

   1 \version "2.14.0"
   2
   3 startGraceSlur = #(make-music 'SlurEvent 'span-direction START 'spanner-id "grace")
   4 stopGraceSlur = #(make-music 'SlurEvent 'span-direction STOP 'spanner-id "grace")
   5
   6
   7 startGraceMusic =  {
   8 }
   9
  10 stopGraceMusic =  {
  11 }
  12
  13 startAppoggiaturaMusic =
  14  {
  15     s1*0\startGraceSlur
  16 }
  17
  18 stopAppoggiaturaMusic =  {
  19     s1*0\stopGraceSlur
  20 }
  21
  22 startAcciaccaturaMusic =  {
  23     s1*0\startGraceSlur
  24     \override Stem  #'stroke-style = #"grace"
  25 }
  26
  27 stopAcciaccaturaMusic =  {
  28     \revert Stem #'stroke-style
  29     s1*0\stopGraceSlur
  30 }