]> git.donarmstrong.com Git - lilypond.git/blob - ly/spanners-init.ly
Run update-with-convert-ly, and run convert-ly manually on scm/*.scm
[lilypond.git] / ly / spanners-init.ly
1 \version "2.15.18"
2
3 startGroup = #(make-span-event 'NoteGroupingEvent START)
4 stopGroup = #(make-span-event 'NoteGroupingEvent STOP)
5
6
7 cr = #(make-span-event 'CrescendoEvent START)
8 decr = #(make-span-event 'DecrescendoEvent START)
9 enddecr = #(make-span-event 'DecrescendoEvent STOP)
10 endcr = #(make-span-event 'CrescendoEvent STOP) 
11
12
13 startTextSpan = #(make-span-event 'TextSpanEvent START)
14 stopTextSpan = #(make-span-event 'TextSpanEvent STOP)
15
16
17 startTrillSpan = #(make-span-event 'TrillSpanEvent START)
18 stopTrillSpan = #(make-span-event 'TrillSpanEvent STOP)
19
20
21 episemInitium = #(make-span-event 'EpisemaEvent START)
22 episemFinis = #(make-span-event 'EpisemaEvent STOP)
23
24
25 cresc = #(make-music 'CrescendoEvent 'span-direction START 'span-type 'text 'span-text "cresc.")
26 endcresc =  #(make-span-event 'CrescendoEvent STOP)
27 dim = #(make-music 'DecrescendoEvent 'span-direction START 'span-type 'text 'span-text "dim.")
28 enddim =  #(make-span-event 'DecrescendoEvent STOP)
29 decresc = #(make-music 'DecrescendoEvent 'span-direction START 'span-type 'text 'span-text "decresc.")
30 enddecresc =  #(make-span-event 'DecrescendoEvent STOP)
31
32 % Deprecated functions:
33 % TODO: DEPRECATED_2_13_19
34 deprecatedcresc =  {
35   $(make-event-chord (list cr))
36   \once \set crescendoText = \markup { \italic "cresc." }
37   \once \set crescendoSpanner = #'text
38 }
39
40
41 deprecateddim =  {
42   $(make-event-chord (list decr))
43   \once \set decrescendoText = \markup { \italic "dim." }
44   \once \set decrescendoSpanner = #'text
45 }
46
47 deprecatedenddim =  {
48   $(make-event-chord (list enddecr))
49 %  \unset decrescendoText 
50 %  \unset decrescendoSpanner 
51 }
52
53 deprecatedendcresc =  {
54   $(make-event-chord (list endcr))
55 %  \unset crescendoText 
56 %  \unset crescendoSpanner 
57 }
58
59
60 %%%%%%%%%%%%%%%%
61
62 crescTextCresc = {
63     \set crescendoText = \markup { \italic "cresc." }
64     \set crescendoSpanner = #'text
65 }
66
67 dimTextDecresc = {
68     \set decrescendoText = \markup { \italic "decresc." }
69     \set decrescendoSpanner = #'text
70 }
71
72 dimTextDecr = {
73     \set decrescendoText = \markup { \italic "decr." }
74     \set decrescendoSpanner = #'text
75 }
76
77 dimTextDim = {
78     \set decrescendoText = \markup { \italic "dim." }
79     \set decrescendoSpanner = #'text
80 }
81
82 crescHairpin = {
83     \unset crescendoText 
84     \unset crescendoSpanner 
85 }
86
87 dimHairpin = {
88     \unset decrescendoText 
89     \unset decrescendoSpanner 
90 }
91
92
93 sustainOff = #(make-span-event 'SustainEvent STOP)
94 sustainOn = #(make-span-event 'SustainEvent START)
95
96 unaCorda = #(make-span-event 'UnaCordaEvent START)
97 treCorde = #(make-span-event 'UnaCordaEvent STOP)
98
99 sostenutoOn = #(make-span-event 'SostenutoEvent START)
100 sostenutoOff = #(make-span-event 'SostenutoEvent STOP)
101
102 %crescpoco = \set crescendoText = "cresc. poco a poco"
103 %decresc = \set crescendoText = "decr."
104 %dim = \set crescendoText = "dim."
105
106 newSpacingSection = #(make-event-chord (list (make-music 'SpacingSectionEvent)))
107
108 breakDynamicSpan = #(make-music 'BreakDynamicSpanEvent)