ly/grace-init.ly

   1 \version "2.3.1"
   2
   3
   4 startGraceMusic = \notes {
   5     \context Voice \applycontext #set-start-grace-properties
   6 }
   7
   8 stopGraceMusic = \notes {
   9     \context Voice \applycontext #set-stop-grace-properties
  10 }
  11
  12 startAppoggiaturaMusic =
  13 \notes {
  14     \context Voice \applycontext #set-start-grace-properties
  15     s1*0(
  16 }
  17
  18 stopAppoggiaturaMusic = \notes {
  19     \context Voice \applycontext #set-stop-grace-properties
  20     s1*0)
  21 }
  22
  23 startAcciaccaturaMusic = \notes {
  24     \context Voice \applycontext #set-start-grace-properties
  25     s1*0(
  26     \override Stem  #'stroke-style = #"grace"
  27 }
  28
  29 stopAcciaccaturaMusic = \notes {
  30     \revert Stem #'stroke-style
  31     \context Voice \applycontext #set-stop-grace-properties
  32     s1*0)
  33 }