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 Flag  #'stroke-style = #"grace"
  25 }
  26
  27 stopAcciaccaturaMusic =  {
  28     \revert Flag #'stroke-style
  29     s1*0\stopGraceSlur
  30 }
  31
  32 startSlashedGraceMusic =  {
  33   \override Flag #'stroke-style = #"grace"
  34 }
  35
  36 stopSlashedGraceMusic =  {
  37   \revert Flag #'stroke-style
  38 }