5 stemUp
= \override Stem
#'direction
= #UP
6 stemDown
= \override Stem
#'direction
= #DOWN
7 stemNeutral
= \revert Stem
#'direction
9 slurUp
= \override Slur
#'direction
= #UP
10 slurDown
= \override Slur
#'direction
= #DOWN
11 slurNeutral
= \revert Slur
#'direction
13 %% There's also dash, but setting dash period/length should be fixed.
15 \override Slur
#'dash-period
= #0.75
16 \override Slur
#'dash-fraction
= #0.4
19 \override Slur
#'dash-period
= #0.75
20 \override Slur
#'dash-fraction
= #0.1
23 \revert Slur
#'dash-period
24 \revert Slur
#'dash-fraction
28 phrasingSlurUp
= \override PhrasingSlur
#'direction
= #UP
29 phrasingSlurDown
= \override PhrasingSlur
#'direction
= #DOWN
30 phrasingSlurNeutral
= \revert PhrasingSlur
#'direction
32 mergeDifferentlyDottedOn
= {
33 \override Staff
.NoteCollision
#'merge-differently-dotted
= ##t
35 mergeDifferentlyDottedOff
= {
36 \revert Staff
.NoteCollision
#'merge-differently-dotted
39 mergeDifferentlyHeadedOn
= {
40 \override Staff
.NoteCollision
#'merge-differently-headed
= ##t
42 mergeDifferentlyHeadedOff
= {
43 \revert Staff
.NoteCollision
#'merge-differently-headed
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
51 tieUp
= \override Tie
#'direction
= #UP
52 tieDown
= \override Tie
#'direction
= #DOWN
53 tieNeutral
= \revert Tie
#'direction
56 \override Tie
#'dash-period
= #0.75
57 \override Tie
#'dash-fraction
= #0.4
60 \override Tie
#'dash-period
= #0.75
61 \override Tie
#'dash-fraction
= #0.1
64 \revert Tie
#'dash-period
65 \revert Tie
#'dash-fraction
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
76 \revert NoteHead
#'stencil
77 \revert NoteHead
#'font-size
78 \revert NoteHead
#'font-family
79 \revert NoteHead
#'font-series
82 aikenHeads
= \set shapeNoteStyles
= #'#(do re mi fa
#f la ti
)
84 sacredHarpHeads
= \set shapeNoteStyles
= #'#(fa
#f la fa
#f la mi
)
87 \override DynamicText
#'direction
= #UP
88 \override DynamicLineSpanner
#'direction
= #UP
92 \override DynamicText
#'direction
= #DOWN
93 \override DynamicLineSpanner
#'direction
= #DOWN
97 \revert DynamicText
#'direction
98 \revert DynamicLineSpanner
#'direction
102 dotsUp
= \override Dots
#'direction
= #UP
103 dotsDown
= \override Dots
#'direction
= #DOWN
104 dotsNeutral
= \revert Dots
#'direction
106 tupletUp
= \override TupletBracket
#'direction
= #UP
107 tupletDown
= \override TupletBracket
#'direction
= #DOWN
108 tupletNeutral
= \revert TupletBracket
#'direction
110 cadenzaOn
= \set Timing
.timing
= ##f
112 \set Timing
.timing
= ##t
113 \set Timing
.measurePosition
= #ZERO-MOMENT
116 % dynamic ly:dir? text script, articulation script ly:dir?
117 oneVoice
= #(context-spec-music
(make-voice-props-revert
) 'Voice
)
118 voiceOne
= #(context-spec-music
(make-voice-props-set
0) 'Voice
)
119 voiceTwo
= #(context-spec-music
(make-voice-props-set
1) 'Voice
)
120 voiceThree
= #(context-spec-music
(make-voice-props-set
2) 'Voice
)
121 voiceFour
= #(context-spec-music
(make-voice-props-set
3) 'Voice
)
124 \override NoteHead
#'style
= #'diamond
125 \override NoteHead
#'color
= #red
126 \override Stem
#'color
= #red
127 \override Beam
#'color
= #red
130 \override NoteHead
#'style
= #'triangle
131 \override NoteHead
#'color
= #blue
132 \override Stem
#'color
= #blue
133 \override Beam
#'color
= #blue
136 \override NoteHead
#'style
= #'xcircle
137 \override NoteHead
#'color
= #green
138 \override Stem
#'color
= #green
139 \override Beam
#'color
= #green
142 \override NoteHead
#'style
= #'cross
143 \override NoteHead
#'color
= #magenta
144 \override Stem
#'color
= #magenta
145 \override Beam
#'color
= #magenta
147 voiceNeutralStyle
= {
148 \revert NoteHead
#'style
149 \revert NoteHead
#'color
178 %% End the incipit and print a ``normal line start''.
179 endincipit
= \context Staff
{
180 \partial 16 s16 % Hack to handle e.g. \bar ".|" \endincipit
181 \once \override Staff
.Clef
#'full-size-change
= ##t
182 \once \override Staff
.Clef
#'non-default
= ##t
186 autoBeamOff
= \set autoBeaming
= ##f
187 autoBeamOn
= \set autoBeaming
= ##t
190 \override TextScript
#'extra-spacing-width
= #'(0 . 0)
191 \override TextScript
#'extra-spacing-height
= #'(-inf
.0 . +inf
.0)
195 \override TextScript
#'extra-spacing-width
= #'(+inf
.0 . -inf
.0)
196 \override TextScript
#'extra-spacing-height
= #'(0 . 0)
200 \override BalloonTextItem
#'extra-spacing-width
= #'(0 . 0)
201 \override BalloonTextItem
#'extra-spacing-height
= #'(-inf
.0 . +inf
.0)
205 \override BalloonTextItem
#'extra-spacing-width
= #'(+inf
.0 . -inf
.0)
206 \override BalloonTextItem
#'extra-spacing-height
= #'(0 . 0)
210 showStaffSwitch
= \set followVoice
= ##t
211 hideStaffSwitch
= \set followVoice
= ##f
213 expandFullBarRests
= {
214 \set Score
.skipBars
= ##f
217 compressFullBarRests
= {
218 \set Score
.skipBars
= ##t
221 numericTimeSignature
= {
222 \override Staff
.TimeSignature
#'style
= #'()
225 defaultTimeSignature
= {
226 \revert Staff
.TimeSignature
#'style
230 % For drawing vertical chord brackets with \arpeggio
231 % This is a shorthand for the value of the print-function property
232 % of either Staff.Arpeggio or PianoStaff.Arpeggio, depending whether
233 % cross-staff brackets are desired.
235 arpeggio
= #(make-music
'ArpeggioEvent
)
238 \revert Arpeggio
#'stencil
239 \revert Arpeggio
#'X-extent
240 \override Arpeggio
#'arpeggio-direction
= #UP
242 arpeggioArrowDown
= {
243 \revert Arpeggio
#'stencil
244 \revert Arpeggio
#'X-extent
245 \override Arpeggio
#'arpeggio-direction
= #DOWN
248 \revert Arpeggio
#'stencil
249 \revert Arpeggio
#'X-extent
250 \revert Arpeggio
#'arpeggio-direction
253 \revert Arpeggio
#'X-extent
254 \override Arpeggio
#'stencil
= #ly
:arpeggio
::brew-chord-bracket
256 arpeggioParenthesis
= {
257 \override Arpeggio
#'stencil
= #ly
:arpeggio
::brew-chord-slur
258 \override Arpeggio
#'X-extent
= #ly
:grob
::stencil-width
261 glissando
= #(make-music
'GlissandoEvent
)
263 fermataMarkup
= \markup { \musicglyph #"scripts.ufermata" }
266 % hide notes, accidentals, etc.
267 \override Dots
#'transparent
= ##t
268 \override NoteHead
#'transparent
= ##t
269 \override NoteHead
#'no-ledgers
= ##t
270 \override Stem
#'transparent
= ##t
271 \override Beam
#'transparent
= ##t
272 \override Accidental
#'transparent
= ##t
277 \revert Accidental
#'transparent
278 \revert Beam
#'transparent
279 \revert Stem
#'transparent
280 \revert NoteHead
#'transparent
281 \revert NoteHead
#'no-ledgers
282 \revert Dots
#'transparent
286 \set chordRootNamer
= #(chord-name-
>german-markup
#t
)
287 \set chordNoteNamer
= #note-name-
>german-markup
290 \set chordRootNamer
= #(chord-name-
>german-markup
#f)
291 \set chordNoteNamer
= #note-name-
>german-markup
295 \set chordRootNamer
= #(chord-name-
>italian-markup
#t
)
296 \set chordPrefixSpacer
= #0.4
300 \set chordRootNamer
= #(chord-name-
>italian-markup
#f)
301 \set chordPrefixSpacer
= #0.4
305 \set squashedPosition
= #0
306 \override NoteHead
#'style
= #'slash
307 \override Accidental
#'stencil
= ##f
311 \unset squashedPosition
312 \revert NoteHead
#'style
313 \revert Accidental
#'stencil
316 textSpannerUp
= \override TextSpanner
#'direction
= #UP
317 textSpannerDown
= \override TextSpanner
#'direction
= #DOWN
318 textSpannerNeutral
= \revert TextSpanner
#'direction
322 bassFigureExtendersOn
= {
323 \set useBassFigureExtenders
= ##t
324 \set Staff
.useBassFigureExtenders
= ##t
327 bassFigureExtendersOff
= {
328 \set useBassFigureExtenders
= ##f
329 \set Staff
.useBassFigureExtenders
= ##f
332 bassFigureStaffAlignmentDown
= {
333 \override Staff
.BassFigureAlignmentPositioning
#'direction
= #DOWN
336 bassFigureStaffAlignmentUp
= {
337 \override Staff
.BassFigureAlignmentPositioning
#'direction
= #UP
340 bassFigureStaffAlignmentNeutral
= {
341 \revert Staff
.BassFigureAlignmentPositioning
#'direction
344 predefinedFretboardsOff
= {
345 \set FretBoards
.predefinedDiagramTable
= ##f
348 predefinedFretboardsOn
= {
349 \set FretBoards
.predefinedDiagramTable
= #fretboard-table
352 pointAndClickOff
= #(define-music-function
(parser location
) ()
353 (ly
:set-option
'point-and-click
#f)
354 (make-music
'SequentialMusic
'void
#t
))
356 pointAndClickOn
= #(define-music-function
(parser location
) ()
357 (ly
:set-option
'point-and-click
#t
)
358 (make-music
'SequentialMusic
'void
#t
))