4 #(define-event-function (id event) (number-or-string? ly:event?)
5 (_i "This sets the @code{spanner-id} property of the following
6 @var{event} to the given @var{id} (numbers will be converted to a
7 string). This can be used to tell LilyPond how to connect overlapping
8 or parallel slurs or phrasing slurs within a single @code{Voice}.
9 @lilypond[quote,verbatim]
10 \\fixed c' { c\\=1( d\\=2( e\\=1) f\\=2) }
12 (set! (ly:music-property event 'spanner-id)
18 startGroup = #(make-span-event 'NoteGroupingEvent START)
19 stopGroup = #(make-span-event 'NoteGroupingEvent STOP)
22 cr = #(make-span-event 'CrescendoEvent START)
23 decr = #(make-span-event 'DecrescendoEvent START)
24 enddecr = #(make-span-event 'DecrescendoEvent STOP)
25 endcr = #(make-span-event 'CrescendoEvent STOP)
28 startMeasureCount = #(make-span-event 'MeasureCounterEvent START)
29 stopMeasureCount = #(make-span-event 'MeasureCounterEvent STOP)
32 startTextSpan = #(make-span-event 'TextSpanEvent START)
33 stopTextSpan = #(make-span-event 'TextSpanEvent STOP)
36 startTrillSpan = #(make-span-event 'TrillSpanEvent START)
37 stopTrillSpan = #(make-span-event 'TrillSpanEvent STOP)
40 episemInitium = #(make-span-event 'EpisemaEvent START)
41 episemFinis = #(make-span-event 'EpisemaEvent STOP)
44 cresc = #(make-music 'CrescendoEvent 'span-direction START 'span-type 'text 'span-text "cresc.")
45 endcresc = #(make-span-event 'CrescendoEvent STOP)
46 dim = #(make-music 'DecrescendoEvent 'span-direction START 'span-type 'text 'span-text "dim.")
47 enddim = #(make-span-event 'DecrescendoEvent STOP)
48 decresc = #(make-music 'DecrescendoEvent 'span-direction START 'span-type 'text 'span-text "decresc.")
49 enddecresc = #(make-span-event 'DecrescendoEvent STOP)
51 % Deprecated functions:
52 % TODO: DEPRECATED_2_13_19
54 $(make-event-chord (list cr))
55 \once \set crescendoText = \markup { \italic "cresc." }
56 \once \set crescendoSpanner = #'text
61 $(make-event-chord (list decr))
62 \once \set decrescendoText = \markup { \italic "dim." }
63 \once \set decrescendoSpanner = #'text
67 $(make-event-chord (list enddecr))
68 % \unset decrescendoText
69 % \unset decrescendoSpanner
72 deprecatedendcresc = {
73 $(make-event-chord (list endcr))
74 % \unset crescendoText
75 % \unset crescendoSpanner
82 \set crescendoText = \markup { \italic "cresc." }
83 \set crescendoSpanner = #'text
87 \set decrescendoText = \markup { \italic "decresc." }
88 \set decrescendoSpanner = #'text
92 \set decrescendoText = \markup { \italic "decr." }
93 \set decrescendoSpanner = #'text
97 \set decrescendoText = \markup { \italic "dim." }
98 \set decrescendoSpanner = #'text
103 \unset crescendoSpanner
107 \unset decrescendoText
108 \unset decrescendoSpanner
112 sustainOff = #(make-span-event 'SustainEvent STOP)
113 sustainOn = #(make-span-event 'SustainEvent START)
115 unaCorda = #(make-span-event 'UnaCordaEvent START)
116 treCorde = #(make-span-event 'UnaCordaEvent STOP)
118 sostenutoOn = #(make-span-event 'SostenutoEvent START)
119 sostenutoOff = #(make-span-event 'SostenutoEvent STOP)
121 %crescpoco = \set crescendoText = "cresc. poco a poco"
122 %decresc = \set crescendoText = "decr."
123 %dim = \set crescendoText = "dim."
125 newSpacingSection = #(make-event-chord (list (make-music 'SpacingSectionEvent)))
127 breakDynamicSpan = #(make-music 'BreakDynamicSpanEvent)