ly/spanners-init.ly

   1 \version "1.7.3"
   2
   3
   4
   5 groupOpen = #(make-span-event 'NoteGroupingEvent START)
   6 groupClose = #(make-span-event 'NoteGroupingEvent STOP)
   7
   8
   9 cr = #(make-span-event 'CrescendoEvent START)
  10 rc = #(make-span-event 'CrescendoEvent STOP)
  11 decr = #(make-span-event 'DecrescendoEvent START)
  12 rced = #(make-span-event 'DecrescendoEvent STOP)
  13
  14 startTextSpan = #(make-span-event 'TextSpanEvent START)
  15 stopTextSpan = #(make-span-event 'TextSpanEvent STOP)
  16
  17 cresc = \notes {
  18   #(ly:export (make-event-chord (list cr)))
  19   \property Voice.crescendoText = #'((font-shape . italic) "cresc.")
  20   \property Voice.crescendoSpanner = #'dashed-line
  21 }
  22
  23 % ah, this is handy: maybe drop resetting of properties in
  24 % dynamic-engraver ?
  25 endcresc = \notes {
  26   #(ly:export (make-event-chord (list rc)))
  27   \property Voice.crescendoText \unset
  28   \property Voice.crescendoSpanner \unset
  29 }
  30
  31 dim = \notes {
  32   #(ly:export (make-event-chord (list decr)))
  33
  34   \property Voice.decrescendoText = #"dim."
  35   \property Voice.decrescendoSpanner = #'dashed-line
  36 }
  37
  38 enddim = \notes {
  39   #(ly:export (make-event-chord (list rced)))
  40    \property Voice.decrescendoText \unset
  41  \property Voice.decrescendoSpanner \unset
  42 }
  43
  44 %{
  45
  46 cresc = \spanevent \start "crescendo"
  47 endcresc = \spanevent \stop "crescendo"
  48
  49 %}
  50
  51 % better name sustainstart/stop?
  52 sustainUp = #(make-span-event 'SustainEvent STOP)
  53 sustainDown = #(make-span-event 'SustainEvent START)
  54
  55 unaCorda = #(make-span-event 'UnaCordaEvent START)
  56 treCorde = #(make-span-event 'UnaCordaEvent STOP)
  57
  58 sostenutoDown = #(make-span-event 'SostenutoEvent START)
  59 sostenutoUp = #(make-span-event 'SostenutoEvent STOP)
  60
  61 %crescpoco = \property Voice.crescendoText = "cresc. poco a poco"
  62 %decresc = \property Voice.crescendoText = "decr."
  63 %dim = \property Voice.crescendoText = "dim."