5 stemUp
= \override Stem
#'direction
= #1
6 stemDown
= \override Stem
#'direction
= #-
1
7 stemNeutral
= \revert Stem
#'direction
9 slurUp
= \override Slur
#'direction
= #1
10 slurDown
= \override Slur
#'direction
= #-
1
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
= #1
29 phrasingSlurDown
= \override PhrasingSlur
#'direction
= #-
1
30 phrasingSlurNeutral
= \revert PhrasingSlur
#'direction
32 shiftOn
= \override NoteColumn
#'horizontal-shift
= #1
33 shiftOnn
= \override NoteColumn
#'horizontal-shift
= #2
34 shiftOnnn
= \override NoteColumn
#'horizontal-shift
= #3
35 shiftOff
= \revert NoteColumn
#'horizontal-shift
37 tieUp
= \override Tie
#'direction
= #1
38 tieDown
= \override Tie
#'direction
= #-
1
39 tieNeutral
= \revert Tie
#'direction
42 \override Tie
#'dash-period
= #0.75
43 \override Tie
#'dash-fraction
= #0.4
46 \override Tie
#'dash-period
= #0.75
47 \override Tie
#'dash-fraction
= #0.1
50 \revert Tie
#'dash-period
51 \revert Tie
#'dash-fraction
54 setEasyHeads
= \sequential {
55 \override NoteHead
#'print-function
= #Note
_head
::brew
_ez
_stencil
56 \override NoteHead
#'font-size
= #-
7
57 \override NoteHead
#'font-family
= #'sans
58 \override NoteHead
#'font-series
= #'bold
61 aikenHeads
= \set shapeNoteStyles
= ##(do re mi fa
#f la ti
)
64 \set shapeNoteStyles
= ##(#f #f mi
#f fa la
#f)
67 \override DynamicText
#'direction
= #1
68 \override DynamicLineSpanner
#'direction
= #1
72 \override DynamicText
#'direction
= #-
1
73 \override DynamicLineSpanner
#'direction
= #-
1
77 \revert DynamicText
#'direction
78 \revert DynamicLineSpanner
#'direction
82 dotsUp
= \override Dots
#'direction
= #1
83 dotsDown
= \override Dots
#'direction
= #-
1
84 dotsNeutral
= \revert Dots
#'direction
86 tupletUp
= \override TupletBracket
#'direction
= #1
87 tupletDown
= \override TupletBracket
#'direction
= #-
1
88 tupletNeutral
= \revert TupletBracket
#'direction
90 cadenzaOn
= \set Timing
.timing
= ##f
92 \set Timing
.timing
= ##t
93 \set Timing
.measurePosition
= #(ly
:make-moment
0 1)
96 % dynamic ly:dir? text script, articulation script ly:dir?
97 oneVoice
= #(context-spec-music
(make-voice-props-revert
) 'Voice
)
98 voiceOne
= #(context-spec-music
(make-voice-props-set
0) 'Voice
)
99 voiceTwo
= #(context-spec-music
(make-voice-props-set
1) 'Voice
)
100 voiceThree
=#(context-spec-music
(make-voice-props-set
2) 'Voice
)
101 voiceFour
= #(context-spec-music
(make-voice-props-set
3) 'Voice
)
115 %% End the incipit and print a ``normal line start''.
116 endincipit
= \context Staff
{
117 \partial 16 s16 % Hack to handle e.g. \bar ".|" \endincipit
118 \once \override Staff
.Clef
#'full-size-change
= ##t
119 \once \override Staff
.Clef
#'non-default
= ##t
123 autoBeamOff
= \set autoBeaming
= ##f
124 autoBeamOn
= \set autoBeaming
= ##t
126 fatText
= \override TextScript
#'no-spacing-rods
= ##f
127 emptyText
= \override TextScript
#'no-spacing-rods
= ##t
129 showStaffSwitch
= \set followVoice
= ##t
130 hideStaffSwitch
= \set followVoice
= ##f
134 % For drawing vertical chord brackets with \arpeggio
135 % This is a shorthand for the value of the print-function property
136 % of either Staff.Arpeggio or PianoStaff.Arpeggio, depending whether
137 % cross-staff brackets are desired.
139 arpeggio
= #(make-music
'ArpeggioEvent
)
141 arpeggioUp
= \sequential {
142 \revert Arpeggio
#'print-function
143 \override Arpeggio
#'arpeggio-direction
= #1
145 arpeggioDown
= \sequential {
146 \revert Arpeggio
#'print-function
147 \override Arpeggio
#'arpeggio-direction
= #-
1
149 arpeggioNeutral
= \sequential {
150 \revert Arpeggio
#'print-function
151 \revert Arpeggio
#'arpeggio-direction
153 arpeggioBracket
= \sequential {
154 \override Arpeggio
#'print-function
= #Arpeggio
::brew
_chord
_bracket
157 glissando
= #(make-music
'GlissandoEvent
)
159 fermataMarkup
= \markup { \musicglyph #"scripts.ufermata" }
161 hideNotes
=\sequential {
162 % hide notes, accidentals, etc.
163 \override Dots
#'transparent
= ##t
164 \override NoteHead
#'transparent
= ##t
165 \override NoteHead
#'no-ledgers
= ##t
166 \override Stem
#'transparent
= ##t
167 \override Beam
#'transparent
= ##t
168 \override Accidental
#'transparent
= ##t
172 unHideNotes
= \sequential {
173 \revert Accidental
#'transparent
174 \revert Beam
#'transparent
175 \revert Stem
#'transparent
176 \revert NoteHead
#'transparent
177 \revert NoteHead
#'no-ledgers
178 \revert Dots
#'transparent
182 \set chordRootNamer
= #(chord-name-
>german-markup
#t
)
183 \set chordNoteNamer
= #note-name-
>german-markup
186 \set chordRootNamer
= #(chord-name-
>german-markup
#f)
187 \set chordNoteNamer
= #note-name-
>german-markup
191 \set chordRootNamer
= #(chord-name-
>italian-markup
#t
)
192 \set chordPrefixSpacer
= #0.4
196 \set chordRootNamer
= #(chord-name-
>italian-markup
#f)
197 \set chordPrefixSpacer
= #0.4
201 \set squashedPosition
= #0
202 \override NoteHead
#'style
= #'slash
206 \unset squashedPosition
207 \revert NoteHead
#'style
210 textSpannerUp
= \override TextSpanner
#'direction
= #1
211 textSpannerDown
= \override TextSpanner
#'direction
= #-
1
212 textSpannerNeutral
= \revert TextSpanner
#'direction