]> git.donarmstrong.com Git - lilypond.git/blob - ly/property-init.ly
Merge branch 'master' into dev/texi2html
[lilypond.git] / ly / property-init.ly
1 % property-init.ly
2
3 \version "2.11.38"
4
5 stemUp = \override Stem  #'direction = #UP
6 stemDown = \override Stem  #'direction = #DOWN 
7 stemNeutral= \revert Stem #'direction
8
9 slurUp = \override Slur  #'direction = #UP
10 slurDown = \override Slur  #'direction = #DOWN
11 slurNeutral = \revert Slur #'direction
12
13 %% There's also dash, but setting dash period/length should be fixed.
14 slurDashed = {
15   \override Slur #'dash-period = #0.75
16   \override Slur #'dash-fraction = #0.4
17 }
18 slurDotted = {
19   \override Slur  #'dash-period = #0.75
20   \override Slur #'dash-fraction = #0.1
21 }
22 slurSolid = {
23   \revert Slur #'dash-period
24   \revert Slur #'dash-fraction
25 }
26
27
28 phrasingSlurUp = \override PhrasingSlur  #'direction = #UP
29 phrasingSlurDown = \override PhrasingSlur  #'direction = #DOWN
30 phrasingSlurNeutral = \revert PhrasingSlur #'direction
31
32 mergeDifferentlyDottedOn = {
33   \override Staff.NoteCollision #'merge-differently-dotted = ##t
34 }
35 mergeDifferentlyDottedOff = {
36   \revert Staff.NoteCollision #'merge-differently-dotted
37 }
38
39 mergeDifferentlyHeadedOn = {
40   \override Staff.NoteCollision #'merge-differently-headed = ##t
41 }
42 mergeDifferentlyHeadedOff = {
43   \revert Staff.NoteCollision #'merge-differently-headed
44 }
45
46 shiftOn = \override NoteColumn  #'horizontal-shift = #1
47 shiftOnn = \override NoteColumn  #'horizontal-shift = #2
48 shiftOnnn = \override NoteColumn  #'horizontal-shift = #3
49 shiftOff = \revert NoteColumn #'horizontal-shift
50
51 tieUp = \override Tie  #'direction = #UP
52 tieDown = \override Tie  #'direction = #DOWN
53 tieNeutral = \revert Tie #'direction
54
55 tieDashed = {
56   \override Tie #'dash-period = #0.75
57   \override Tie #'dash-fraction = #0.4
58 }
59 tieDotted = {
60   \override Tie #'dash-period = #0.75
61   \override Tie #'dash-fraction = #0.1
62 }
63 tieSolid = {
64   \revert Tie #'dash-period
65   \revert Tie #'dash-fraction
66 }
67
68 easyHeadsOn = {
69   \override NoteHead  #'stencil = #ly:note-head::brew-ez-stencil
70   \override NoteHead #'font-size = #-7
71   \override NoteHead #'font-family = #'sans
72   \override NoteHead #'font-series = #'bold
73 }
74
75 easyHeadsOff = {
76   \revert NoteHead #'stencil
77   \revert NoteHead #'font-size
78   \revert NoteHead #'font-family
79   \revert NoteHead #'font-series
80 }
81
82 aikenHeads = \set shapeNoteStyles = ##(do re mi fa #f la ti)
83
84 sacredHarpHeads =
85   \set shapeNoteStyles = ##(fa #f la fa #f la mi)
86
87 dynamicUp = {
88   \override DynamicText  #'direction = #UP
89   \override DynamicLineSpanner  #'direction = #UP
90 }
91
92 dynamicDown = {
93   \override DynamicText  #'direction = #DOWN
94   \override DynamicLineSpanner  #'direction = #DOWN
95 }
96
97 dynamicNeutral = {
98   \revert DynamicText #'direction
99   \revert DynamicLineSpanner #'direction
100 }
101
102
103 dotsUp = \override Dots  #'direction = #UP
104 dotsDown = \override Dots  #'direction = #DOWN
105 dotsNeutral = \revert Dots #'direction 
106
107 tupletUp = \override TupletBracket  #'direction = #UP
108 tupletDown = \override TupletBracket  #'direction = #DOWN
109 tupletNeutral = \revert TupletBracket #'direction
110
111 cadenzaOn = \set Timing.timing = ##f
112 cadenzaOff = {
113   \set Timing.timing = ##t
114   \set Timing.measurePosition = #ZERO-MOMENT
115 }
116
117 % dynamic ly:dir?  text script, articulation script ly:dir?     
118 oneVoice = #(context-spec-music (make-voice-props-revert) 'Voice)
119 voiceOne = #(context-spec-music (make-voice-props-set 0) 'Voice)
120 voiceTwo = #(context-spec-music (make-voice-props-set 1) 'Voice)
121 voiceThree =#(context-spec-music (make-voice-props-set 2) 'Voice)
122 voiceFour = #(context-spec-music (make-voice-props-set 3) 'Voice)
123
124 voiceOneStyle = {
125   \override NoteHead #'style = #'diamond
126   \override NoteHead #'color = #red
127   \override Stem #'color = #red
128   \override Beam #'color = #red
129 }
130 voiceTwoStyle = {
131   \override NoteHead #'style = #'triangle
132   \override NoteHead #'color = #blue
133   \override Stem #'color = #blue
134   \override Beam #'color = #blue
135 }
136 voiceThreeStyle = {
137   \override NoteHead #'style = #'xcircle
138   \override NoteHead #'color = #green
139   \override Stem #'color = #green
140   \override Beam #'color = #green
141 }
142 voiceFourStyle = {
143   \override NoteHead #'style = #'cross
144   \override NoteHead #'color = #magenta
145   \override Stem #'color = #magenta
146   \override Beam #'color = #magenta
147 }
148 voiceNeutralStyle = {
149   \revert NoteHead #'style
150   \revert NoteHead #'color
151   \revert Stem #'color
152   \revert Beam #'color
153 }
154
155 teeny = {
156   \set fontSize = #-3
157 }
158
159 tiny = {
160   \set fontSize = #-2
161 }
162
163 small = {
164   \set fontSize = #-1
165 }
166
167 normalsize = {
168   \set fontSize = #0
169 }
170
171 large = {
172   \set fontSize = #1
173 }
174
175 huge = {
176   \set fontSize = #2
177 }
178
179 %% End the incipit and print a ``normal line start''.
180 endincipit =  \context Staff {
181   \partial 16 s16  % Hack to handle e.g. \bar ".|" \endincipit
182   \once \override Staff.Clef  #'full-size-change = ##t
183   \once \override Staff.Clef  #'non-default = ##t
184   \bar ""
185 }
186
187 autoBeamOff = \set autoBeaming = ##f
188 autoBeamOn = \set autoBeaming = ##t
189
190 textLengthOn = {
191   \override TextScript  #'extra-spacing-width = #'(0 . 0)
192   \override TextScript  #'infinite-spacing-height = ##t
193 }
194
195 textLengthOff = {
196   \override TextScript  #'extra-spacing-width = #'(+inf.0 . -inf.0)
197   \override TextScript  #'infinite-spacing-height = ##f
198 }
199
200 balloonLengthOn = {
201   \override BalloonTextItem #'extra-spacing-width = #'(0 . 0)
202   \override BalloonTextItem #'infinite-spacing-height = ##t
203 }
204
205 balloonLengthOff = {
206   \override BalloonTextItem #'extra-spacing-width = #'(+inf.0 . -inf.0)
207   \override BalloonTextItem #'infinite-spacing-height = ##f
208 }
209
210
211 showStaffSwitch = \set followVoice = ##t
212 hideStaffSwitch = \set followVoice = ##f
213
214 expandFullBarRests = {
215   \set Score.skipBars = ##f
216 }
217
218 compressFullBarRests = {
219   \set Score.skipBars = ##t
220 }
221
222 numericTimeSignature = {
223   \override Staff.TimeSignature #'style = #'()
224 }
225
226 defaultTimeSignature = {
227   \revert Staff.TimeSignature #'style
228 }
229
230
231 % For drawing vertical chord brackets with \arpeggio
232 % This is a shorthand for the value of the print-function property 
233 % of either Staff.Arpeggio or PianoStaff.Arpeggio, depending whether 
234 % cross-staff brackets are desired. 
235
236 arpeggio = #(make-music 'ArpeggioEvent)
237
238 arpeggioArrowUp = \sequential {
239   \revert Arpeggio  #'stencil
240   \override Arpeggio  #'arpeggio-direction = #UP
241 }
242 arpeggioArrowDown = \sequential {
243   \revert Arpeggio #'stencil
244   \override Arpeggio  #'arpeggio-direction = #DOWN
245 }
246 arpeggioNormal = \sequential {
247   \revert Arpeggio #'stencil
248   \revert Arpeggio  #'arpeggio-direction
249 }
250 arpeggioBracket = \sequential {
251   \override Arpeggio #'stencil = #ly:arpeggio::brew-chord-bracket
252 }
253 arpeggioParenthesis = \sequential {
254   \override Arpeggio #'stencil = #ly:arpeggio::brew-chord-slur
255 }
256
257 glissando = #(make-music 'GlissandoEvent)
258
259 fermataMarkup = \markup { \musicglyph #"scripts.ufermata" } 
260
261 hideNotes =\sequential {
262   % hide notes, accidentals, etc.
263   \override Dots  #'transparent = ##t
264   \override NoteHead  #'transparent = ##t
265   \override NoteHead  #'no-ledgers = ##t
266   \override Stem  #'transparent = ##t
267   \override Beam  #'transparent = ##t
268   \override Accidental  #'transparent = ##t
269 }
270
271
272 unHideNotes = \sequential {
273   \revert Accidental #'transparent
274   \revert Beam #'transparent
275   \revert Stem #'transparent
276   \revert NoteHead #'transparent
277   \revert NoteHead #'no-ledgers
278   \revert Dots #'transparent 
279 }
280
281 germanChords = {
282     \set chordRootNamer = #(chord-name->german-markup #t)
283     \set chordNoteNamer = #note-name->german-markup
284 }
285 semiGermanChords = {
286     \set chordRootNamer = #(chord-name->german-markup #f)
287     \set chordNoteNamer = #note-name->german-markup
288 }
289
290 frenchChords = {
291     \set chordRootNamer = #(chord-name->italian-markup #t)
292     \set chordPrefixSpacer = #0.4
293 }
294
295 italianChords = {
296     \set chordRootNamer = #(chord-name->italian-markup #f)
297     \set chordPrefixSpacer = #0.4
298 }
299
300 improvisationOn =  {
301     \set squashedPosition = #0
302     \override NoteHead  #'style = #'slash
303     \override Accidental #'stencil = ##f
304 }
305
306 improvisationOff =  {
307     \unset squashedPosition 
308     \revert NoteHead #'style
309     \revert Accidental #'stencil
310 }
311
312 textSpannerUp = \override TextSpanner #'direction = #UP
313 textSpannerDown = \override TextSpanner #'direction = #DOWN
314 textSpannerNeutral = \revert TextSpanner #'direction
315
316
317
318 bassFigureExtendersOn = {
319   \set useBassFigureExtenders = ##t
320   \set Staff.useBassFigureExtenders = ##t
321 }
322
323 bassFigureExtendersOff = {
324   \set useBassFigureExtenders = ##f
325   \set Staff.useBassFigureExtenders = ##f
326 }
327
328 bassFigureStaffAlignmentDown = {
329   \override Staff.BassFigureAlignmentPositioning #'direction = #DOWN
330 }
331
332 bassFigureStaffAlignmentUp = {
333   \override Staff.BassFigureAlignmentPositioning #'direction = #UP
334 }
335
336 bassFigureStaffAlignmentNeutral = {
337   \revert Staff.BassFigureAlignmentPositioning #'direction
338 }
339