]> git.donarmstrong.com Git - lilypond.git/blob - ly/engraver-init.ly
Let ChoirStaff accept Dynamics
[lilypond.git] / ly / engraver-init.ly
1 %%%% This file is part of LilyPond, the GNU music typesetter.
2 %%%%
3 %%%% Copyright (C) 1996--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
4 %%%%                          Jan Nieuwenhuizen <janneke@gnu.org>
5 %%%%
6 %%%% LilyPond is free software: you can redistribute it and/or modify
7 %%%% it under the terms of the GNU General Public License as published by
8 %%%% the Free Software Foundation, either version 3 of the License, or
9 %%%% (at your option) any later version.
10 %%%%
11 %%%% LilyPond is distributed in the hope that it will be useful,
12 %%%% but WITHOUT ANY WARRANTY; without even the implied warranty of
13 %%%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 %%%% GNU General Public License for more details.
15 %%%%
16 %%%% You should have received a copy of the GNU General Public License
17 %%%% along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
18
19 \version "2.19.19"
20
21 \context {
22   \name "Global"
23
24   \accepts "Score"
25
26   \defaultchild "Score"
27   \description "Hard coded entry point for LilyPond.  Cannot be tuned."
28   \grobdescriptions #all-grob-descriptions
29 }
30
31 \context {
32   \type "Engraver_group"
33   \name "FretBoards"
34   \alias "Staff"
35   \description "A context for displaying fret diagrams."
36
37   \consists "Fretboard_engraver"
38   \consists "Output_property_engraver"
39   \consists "Axis_group_engraver"
40   \consists "Separating_line_group_engraver"
41   \consists "Font_size_engraver"
42   \consists "Instrument_name_engraver"
43
44   %% explicitly set instrument, so it is not inherited from the parent
45   instrumentName = #'()
46   shortInstrumentName = #'()
47
48   predefinedDiagramTable = #default-fret-table
49   handleNegativeFrets = #'recalculate
50   restrainOpenStrings = ##f
51 }
52
53 \context {
54   \type "Engraver_group"
55   \name "Staff"
56
57   \consists "Output_property_engraver"
58   \consists "Bar_engraver"
59   \consists "Pure_from_neighbor_engraver"
60   %% Bar_engraver must be first so default bars aren't overwritten
61   %% with empty ones.
62
63   \consists "Font_size_engraver"
64   \consists "Separating_line_group_engraver"
65   \consists "Dot_column_engraver"
66   \consists "Staff_collecting_engraver"
67
68   %% perhaps move to Voice context?
69   \consists "Ottava_spanner_engraver"
70   \consists "Clef_engraver"
71   \consists "Key_engraver"
72   \consists "Time_signature_engraver"
73   \consists "Ledger_line_engraver"
74   \consists "Staff_symbol_engraver"
75   \consists "Collision_engraver"
76   \consists "Grob_pq_engraver"
77   \consists "Rest_collision_engraver"
78   \consists "Accidental_engraver"
79   \consists "Piano_pedal_engraver"
80   \consists "Piano_pedal_align_engraver"
81   \consists "Instrument_name_engraver"
82   \consists "Axis_group_engraver"
83   \consists "Figured_bass_engraver"
84   \consists "Figured_bass_position_engraver"
85   \consists "Script_row_engraver"
86   \consists "Cue_clef_engraver"
87   \consists "Fingering_column_engraver"
88
89   localAlterations = #'()
90   createSpacing = ##t
91   ignoreFiguredBassRest = ##f
92
93   %% explicitly set instrument, so we don't get
94   %% weird effects when doing instrument names for
95   %% piano staves
96   instrumentName = #'()
97   shortInstrumentName = #'()
98
99   \defaultchild "Voice"
100   \accepts "CueVoice"
101   \accepts "NullVoice"
102   \accepts "Voice"
103
104   \description "Handles clefs, bar lines, keys, accidentals.  It can contain
105 @code{Voice} contexts."
106
107 }
108
109 \context {
110   \Staff
111   \type "Engraver_group"
112   \name "DrumStaff"
113   \alias "Staff"
114
115   \remove "Accidental_engraver"
116   \remove "Ottava_spanner_engraver"
117   \remove "Key_engraver"
118   \remove "Piano_pedal_engraver"
119
120   \description "Handles typesetting for percussion."
121
122   \denies "Voice"
123   \accepts "DrumVoice"
124   \defaultchild "DrumVoice"
125
126   clefGlyph = #"clefs.percussion"
127   clefPosition = #0
128   \override Script.staff-padding = #0.75
129 }
130
131
132 \context {
133   \type "Engraver_group"
134   \name "ChoirStaff"
135   \consists "Vertical_align_engraver"
136   topLevelAlignment = ##f
137
138   \consists "Instrument_name_engraver"
139   \consists "System_start_delimiter_engraver"
140   systemStartDelimiter = #'SystemStartBracket
141   %% explicitly set instrument, so it is not inherited from the parent
142   instrumentName = #'()
143   shortInstrumentName = #'()
144   vocalName = #'()
145   shortVocalName = #'()
146
147   \accepts "ChoirStaff"
148   \accepts "ChordNames"
149   \accepts "DrumStaff"
150   \accepts "Dynamics"
151   \accepts "FiguredBass"
152   \accepts "GrandStaff"
153   \accepts "Lyrics"
154   \accepts "OneStaff"
155   \accepts "PianoStaff"
156   \accepts "RhythmicStaff"
157   \accepts "Staff"
158   \accepts "StaffGroup"
159   \defaultchild "Staff"
160   \description "Identical to @code{StaffGroup} except that the
161 contained staves are not connected vertically."
162 }
163
164 \context{
165   \type "Engraver_group"
166
167   localAlterations = #'()
168   createSpacing = ##t
169
170   squashedPosition = #0
171   \name "RhythmicStaff"
172   \alias "Staff"
173
174   \override VoltaBracket.staff-padding = #3
175   \override StaffSymbol.line-count = #1
176
177   \override Stem.neutral-direction = #UP
178   \override Beam.neutral-direction = #UP
179
180   \consists "Output_property_engraver"
181   \consists "Font_size_engraver"
182   \consists "Separating_line_group_engraver"
183   \consists "Dot_column_engraver"
184   \consists "Bar_engraver"
185   \consists "Staff_symbol_engraver"
186   \consists "Pitch_squash_engraver"
187   \consists "Time_signature_engraver"
188   \consists "Instrument_name_engraver"
189   \consists "Axis_group_engraver"
190   \consists "Ledger_line_engraver"
191
192   %% explicitly set instrument, so it is not inherited from the parent
193   instrumentName = #'()
194   shortInstrumentName = #'()
195
196   \accepts "CueVoice"
197   \accepts "NullVoice"
198   \accepts "Voice"
199   \defaultchild "Voice"
200
201   \description "A context like @code{Staff} but for printing rhythms.
202 Pitches are ignored; the notes are printed on one line."
203 }
204
205
206 \context {
207   \type "Engraver_group"
208   \name "Voice"
209
210   \description "Corresponds to a voice on a staff.  This context
211 handles the conversion of dynamic signs, stems, beams, super- and
212 subscripts, slurs, ties, and rests.
213
214 You have to instantiate this explicitly if you want to have
215 multiple voices on the same staff."
216   %% Grace_engraver sets properties, it must come first.
217   \consists "Grace_engraver"
218   \consists "Font_size_engraver"
219
220   \consists "Pitched_trill_engraver"
221   \consists "Output_property_engraver"
222   \consists "Arpeggio_engraver"
223   \consists "Multi_measure_rest_engraver"
224   \consists "Text_spanner_engraver"
225   \consists "Trill_spanner_engraver"
226   \consists "Grob_pq_engraver"
227   \consists "Forbid_line_break_engraver"
228   \consists "Laissez_vibrer_engraver"
229   \consists "Repeat_tie_engraver"
230   \consists "Note_head_line_engraver"
231   \consists "Glissando_engraver"
232   \consists "Ligature_bracket_engraver"
233   \consists "Breathing_sign_engraver"
234   \consists "Note_heads_engraver"
235   \consists "Dots_engraver"
236   \consists "Rest_engraver"
237
238   %% switch on to make stem directions interpolate for the
239   %% center line.
240   %  \consists "Melody_engraver"
241
242   \consists "Stem_engraver"
243   \consists "Beam_engraver"
244   \consists "Grace_beam_engraver"
245   \consists "Auto_beam_engraver"
246   \consists "Grace_auto_beam_engraver"
247
248   %% must come before Script_column_engraver.
249   \consists "New_fingering_engraver"
250
251   \consists "Chord_tremolo_engraver"
252   \consists "Double_percent_repeat_engraver"
253   \consists "Percent_repeat_engraver"
254   \consists "Slash_repeat_engraver"
255   \consists "Part_combine_engraver"
256
257   \consists "Text_engraver"
258   \consists "Dynamic_engraver"
259   \consists "Dynamic_align_engraver"
260   \consists "Fingering_engraver"
261   \consists "Bend_engraver"
262
263   \consists "Script_engraver"
264   \consists "Script_column_engraver"
265   \consists "Rhythmic_column_engraver"
266   \consists "Note_spacing_engraver"
267   \consists "Spanner_break_forbid_engraver"
268   \consists "Phrasing_slur_engraver"
269   \consists "Cluster_spanner_engraver"
270   \consists "Slur_engraver"
271   \consists "Tie_engraver"
272   \consists "Tuplet_engraver"
273   \consists "Instrument_switch_engraver"
274 }
275
276 \context{
277   \Voice
278
279   \name "CueVoice"
280   \alias "Voice"
281   fontSize = #-4
282   \override NoteHead.ignore-ambitus = ##t
283   \override Stem.length-fraction = #(magstep -4)
284   \override Beam.length-fraction = #(magstep -4)
285   \override Beam.beam-thickness = #0.35
286 }
287
288 \context {
289   \Voice
290   \name "DrumVoice"
291   \alias "Voice"
292
293   \description "A voice on a percussion staff."
294   \remove "Arpeggio_engraver"
295   \consists "Grob_pq_engraver"
296
297   \remove "Note_head_line_engraver"
298   \remove "Glissando_engraver"
299   \remove "Ligature_bracket_engraver"
300   \remove "Note_heads_engraver"
301   \consists "Drum_notes_engraver"
302   \remove "New_fingering_engraver"
303
304   \remove "Fingering_engraver"
305
306   \remove "Cluster_spanner_engraver"
307 }
308
309 \context{
310   \type "Engraver_group"
311   \name "GrandStaff"
312   localAlterations = #'()
313
314   \description "A group of staves, with a brace on the left
315 side, grouping the staves together.  The bar lines of the
316 contained staves are connected vertically."
317
318   \consists "Instrument_name_engraver"
319   \consists "Span_bar_engraver"
320   %% The default for DynamicText.extra-spacing-width causes dynamics to
321   %% be placed across span bars, so switch it off:
322   \override DynamicText.extra-spacing-width = ##f
323   \consists "Span_bar_stub_engraver"
324   \consists "Span_arpeggio_engraver"
325   \consists "System_start_delimiter_engraver"
326   \consists "Vertical_align_engraver"
327   systemStartDelimiter = #'SystemStartBrace
328   topLevelAlignment = ##f
329   %% explicitly set instrument, so it is not inherited from the parent
330   instrumentName = #'()
331   shortInstrumentName = #'()
332
333   \defaultchild "Staff"
334   \accepts "ChordNames"
335   \accepts "DrumStaff"
336   \accepts "Dynamics"
337   \accepts "FiguredBass"
338   \accepts "Lyrics"
339   \accepts "RhythmicStaff"
340   \accepts "Staff"
341   \accepts "TabStaff"
342 }
343
344 \context{
345   \GrandStaff
346   \name "PianoStaff"
347   \alias "GrandStaff"
348
349   \description "Just like @code{GrandStaff}, but the staves are only removed
350 together, never separately."
351
352   \consists "Vertical_align_engraver"
353   \consists "Keep_alive_together_engraver"
354   topLevelAlignment = ##f
355
356   instrumentName = #'()
357   shortInstrumentName = #'()
358 }
359
360 \context {
361   \type "Engraver_group"
362   \name "StaffGroup"
363
364   \consists "Vertical_align_engraver"
365   topLevelAlignment = ##f
366
367   \consists "Instrument_name_engraver"
368   \consists "Span_bar_engraver"
369   %% The default for DynamicText.extra-spacing-width causes dynamics to
370   %% be placed across span bars, so switch it off:
371   \override DynamicText.extra-spacing-width = ##f
372   \consists "Span_bar_stub_engraver"
373   \consists "Span_arpeggio_engraver"
374   \consists "Output_property_engraver"
375   systemStartDelimiter = #'SystemStartBracket
376   %% explicitly set instrument, so it is not inherited from the parent
377   instrumentName = #'()
378   shortInstrumentName = #'()
379
380   \consists "System_start_delimiter_engraver"
381
382   \defaultchild "Staff"
383   \accepts "ChoirStaff"
384   \accepts "ChordNames"
385   \accepts "DrumStaff"
386   \accepts "FiguredBass"
387   \accepts "FretBoards"
388   \accepts "GrandStaff"
389   \accepts "Lyrics"
390   \accepts "OneStaff"
391   \accepts "PianoStaff"
392   \accepts "RhythmicStaff"
393   \accepts "Staff"
394   \accepts "StaffGroup"
395   \accepts "TabStaff"
396
397   \description "Groups staves while adding a bracket on the left
398 side, grouping the staves together.  The bar lines of the contained
399 staves are connected vertically.  @code{StaffGroup} only consists of
400 a collection of staves, with a bracket in front and spanning bar lines."
401 }
402
403 \context {
404   \type "Engraver_group"
405   \name "OneStaff"
406   \accepts "ChordNames"
407   \accepts "DrumStaff"
408   \accepts "Dynamics"
409   \accepts "FiguredBass"
410   \accepts "FretBoards"
411   \accepts "GregorianTranscriptionStaff"
412   \accepts "KievanStaff"
413   \accepts "Lyrics"
414   \accepts "MensuralStaff"
415   \accepts "NoteNames"
416   \accepts "PetrucciStaff"
417   \accepts "RhythmicStaff"
418   \accepts "Staff"
419   \accepts "TabStaff"
420   \accepts "VaticanaStaff"
421   \defaultchild "Staff"
422   \consists "Axis_group_engraver"
423
424   \description "Provides a common axis for the contained staves,
425 making all of them appear in the same vertical space.  This can be
426 useful for typesetting staves of different types in immediate succession
427 or for temporarily changing the character of one staff or overlaying
428 it with a different one.  Often used with @code{\\stopStaff} and
429 @code{\\startStaff} for best results."
430 }
431
432 \context {
433   \type "Engraver_group"
434   \name "Dynamics"
435   \alias "Voice"
436   \consists "Output_property_engraver"
437   \consists "Bar_engraver"
438   \consists "Piano_pedal_engraver"
439   \consists "Script_engraver"
440   \consists "Dynamic_engraver"
441   \consists "Dynamic_align_engraver"
442   \consists "Text_engraver"
443   \consists "Text_spanner_engraver"
444   \consists "Font_size_engraver"
445   \consists "Axis_group_engraver"
446
447   pedalSustainStrings = #'("Ped." "*Ped." "*")
448   pedalUnaCordaStrings = #'("una corda" "" "tre corde")
449   \override VerticalAxisGroup.staff-affinity = #CENTER
450   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
451     #'((basic-distance . 5)
452        (padding . 0.5))
453   \override TextScript.font-shape = #'italic
454   \override DynamicLineSpanner.Y-offset = #0
455   \override DynamicLineSpanner.outside-staff-priority = ##f
456   \override DynamicText.outside-staff-priority = ##f
457   \override Hairpin.outside-staff-priority = ##f
458
459   \description "Holds a single line of dynamics, which will be
460 centered between the staves surrounding this context."
461 }
462
463
464 \context{
465   \type "Engraver_group"
466
467   \description "Corresponds to a voice with lyrics.  Handles the
468 printing of a single line of lyrics."
469
470   \name "Lyrics"
471   \consists "Lyric_engraver"
472   \consists "Extender_engraver"
473   \consists "Hyphen_engraver"
474   \consists "Stanza_number_engraver"
475   \consists "Instrument_name_engraver"
476   \consists "Font_size_engraver"
477   \consists "Axis_group_engraver"
478   \consists "Pure_from_neighbor_engraver"
479   searchForVoice = ##f
480   %% explicitly set instrument, so it is not inherited from the parent
481   instrumentName = #'()
482   shortInstrumentName = #'()
483
484   \override VerticalAxisGroup.remove-first = ##t
485   \override VerticalAxisGroup.remove-empty = ##t
486   \override VerticalAxisGroup.staff-affinity = #UP
487   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
488     #'((basic-distance . 5.5)
489        (padding . 0.5)
490        (stretchability . 1))
491   \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
492      #'((basic-distance . 0)
493         (minimum-distance . 2.8)
494         (padding . 0.2)
495         (stretchability . 0))
496   \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = #1.5
497   \override InstrumentName.self-alignment-Y = ##f
498
499   %% sync with define-grobs.scm ;
500   \override InstrumentName.font-size = #1.0
501
502   %% make sure that barlines aren't collapsed, when
503   %% Bar_engraver is there.
504   \override BarLine.bar-extent = #'(-0.05 . 0.05)
505
506 }
507
508 \context {
509   \type "Engraver_group"
510   \name "NoteNames"
511   \description "A context for printing the names of notes."
512   \consists "Axis_group_engraver"
513
514   \override VerticalAxisGroup.staff-affinity = #UP
515   \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
516     #'((basic-distance . 0)
517        (minimum-distance . 2.8)
518        (padding . 0.2)
519        (stretchability . 0))
520   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
521     #'((basic-distance . 5.5)
522        (padding . 0.5)
523        (stretchability . 1))
524   \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = 1.5
525
526   \consists "Tie_engraver"
527   \consists "Note_name_engraver"
528   \consists "Separating_line_group_engraver"
529 }
530
531 \context {
532   \type "Engraver_group"
533   \name "ChordNames"
534   \alias Staff                  % Catch Staff-level overrides like
535                                 % \key, \transposition
536   \description "Typesets chord names."
537
538   \consists "Output_property_engraver"
539   \consists "Separating_line_group_engraver"
540   \consists "Chord_name_engraver"
541   \consists "Axis_group_engraver"
542   %\consists "Note_spacing_engraver"
543
544   \override VerticalAxisGroup.remove-first = ##t
545   \override VerticalAxisGroup.remove-empty = ##t
546   \override VerticalAxisGroup.staff-affinity = #DOWN
547   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
548   \override VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0.5
549   \override ParenthesesItem.font-size = #1.5
550 }
551
552 \context {
553   \type "Score_engraver"
554   \name "Score"
555
556   \description "This is the top level notation context.  No
557 other context can contain a @code{Score} context.  This context
558 handles the administration of time signatures.  It also makes sure
559 that items such as clefs, time signatures, and key-signatures are
560 aligned across staves.
561
562 You cannot explicitly instantiate a @code{Score} context (since it
563 is not contained in any other context).  It is instantiated
564 automatically when an output definition (a @code{\\score} or
565 @code{\\layout} block) is processed."
566
567   \consists "Paper_column_engraver"
568   \consists "Repeat_acknowledge_engraver"
569   \consists "Staff_collecting_engraver"
570
571   \alias "Timing"
572
573   %% An alias for Timing is established by the Timing_translator in
574   %% whatever context it is initialized, and the timing variables are
575   %% then copied from wherever Timing had been previously established.
576   %% The alias at Score level provides a target for initializing
577   %% Timing variables in layout definitions before any
578   %% Timing_translator has been run.
579
580   %% timing translator must come BEFORE bar number engraver
581   \consists "Timing_translator"
582   \consists "Default_bar_line_engraver"
583   \consists "Output_property_engraver"
584   \consists "Tweak_engraver"
585   \consists "System_start_delimiter_engraver"
586   \consists "Mark_engraver"
587   \consists "Volta_engraver"
588   \consists "Metronome_mark_engraver"
589   \consists "Break_align_engraver"
590   \consists "Spacing_engraver"
591   \consists "Grace_spacing_engraver"
592   \consists "Vertical_align_engraver"
593   \consists "Stanza_number_align_engraver"
594   \consists "Bar_number_engraver"
595   \consists "Parenthesis_engraver"
596   \consists "Concurrent_hairpin_engraver"
597   \consists "Beam_collision_engraver"
598   \consists "Footnote_engraver"
599
600   \defaultchild "Staff"
601
602   \accepts "ChoirStaff"
603   \accepts "ChordNames"
604   \accepts "Devnull"
605   \accepts "DrumStaff"
606   \accepts "Dynamics"
607   \accepts "FiguredBass"
608   \accepts "FretBoards"
609   \accepts "GrandStaff"
610   \accepts "GregorianTranscriptionStaff"
611   \accepts "KievanStaff"
612   \accepts "Lyrics"
613   \accepts "MensuralStaff"
614   \accepts "NoteNames"
615   \accepts "OneStaff"
616   \accepts "PetrucciStaff"
617   \accepts "PianoStaff"
618   \accepts "RhythmicStaff"
619   \accepts "Staff"
620   \accepts "StaffGroup"
621   \accepts "TabStaff"
622   \accepts "VaticanaStaff"
623
624   noteToFretFunction = #determine-frets
625   predefinedDiagramTable = ##f
626   soloText = #"Solo"
627   soloIIText = #"Solo II"
628   aDueText = #"a2"
629   printPartCombineTexts = ##t
630   partCombineTextsOnNote = ##t
631   systemStartDelimiter =#'SystemStartBar
632
633   drumStyleTable = #drums-style
634
635   associatedVoiceType = #'Voice
636   melismaBusyProperties = #default-melisma-properties
637   tieWaitForNote = ##f
638   clefGlyph = #"clefs.G"
639   clefPosition = #-2
640   middleCClefPosition = #-6
641   middleCPosition = #-6
642   firstClef = ##t
643
644   crescendoSpanner = #'hairpin
645   decrescendoSpanner = #'hairpin
646
647   defaultBarType = #"|"
648   doubleRepeatType = #":..:"
649   startRepeatType = #".|:"
650   endRepeatType = #":|."
651   alternativeRestores = #'(measurePosition measureLength lastChord)
652   barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
653   barNumberFormatter = #robust-bar-number-function
654   clefTranspositionFormatter = #clef-transposition-markup
655   cueClefTranspositionFormatter = #clef-transposition-markup
656   automaticBars = ##t
657
658   explicitClefVisibility = #all-visible
659   explicitCueClefVisibility = #end-of-line-invisible
660   explicitKeySignatureVisibility = #all-visible
661   initialTimeSignatureVisibility = #end-of-line-invisible
662
663   repeatCountVisibility = #all-repeat-counts-visible
664
665   %% Other Timing variables are derived and set by the Timing_translator
666   %% at initialization time by calling the functions in
667   %% scm/time-signature-settings.scm
668
669   timeSignatureSettings = #default-time-signature-settings
670   timeSignatureFraction = 4/4
671
672   beamHalfMeasure = ##t
673
674   autoBeaming = ##t
675   autoBeamCheck = #default-auto-beam-check
676
677   completionFactor = #unity-if-multimeasure
678
679   scriptDefinitions = #default-script-alist
680
681   pedalSustainStrings = #'("Ped." "*Ped." "*")
682   pedalSustainStyle = #'text
683   pedalUnaCordaStrings = #'("una corda" "" "tre corde")
684   pedalUnaCordaStyle = #'text
685
686   %% These are in ordinary italic font, including the *,
687   %% but they are unlikely to be used,
688   %% as the default pedal-style for SostenutoPedal is 'mixed':
689   %% i.e.  Sost. Ped_____________________
690   pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
691   pedalSostenutoStyle = #'mixed
692
693   harmonicAccidentals = ##t
694   fingeringOrientations = #'(up down)
695   stringNumberOrientations = #'(up down)
696   strokeFingerOrientations = #'(right)
697
698   lyricMelismaAlignment = #LEFT
699   markFormatter = #format-mark-letters
700   rehearsalMark = #1
701   subdivideBeams = ##f
702   extraNatural = ##t
703   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
704   autoCautionaries = #'()
705
706   printKeyCancellation = ##t
707   keyAlterationOrder = #`(
708     (6 . ,FLAT) (2  . ,FLAT) (5 . ,FLAT ) (1  . ,FLAT) (4  . ,FLAT) (0  . ,FLAT) (3  . ,FLAT)
709     (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
710     (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
711     (3  . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
712   )
713
714   barCheckSynchronize = ##f
715
716   %% chord names:
717   chordNameFunction = #ignatzek-chord-names
718   minorChordModifier = #(make-simple-markup "m")
719   additionalPitchPrefix = #"" % was "add"
720   majorSevenSymbol = #whiteTriangleMarkup
721   chordNameLowercaseMinor = ##f
722   chordNameSeparator = #(make-hspace-markup 0.5)
723   slashChordSeparator = #(make-simple-markup "/")
724   chordNameExceptions = #ignatzekExceptions
725   chordNoteNamer = #'()
726   chordRootNamer = #note-name->markup
727   chordPrefixSpacer = #0
728   chordNameExceptionsFull = #fullJazzExceptions
729   chordNameExceptionsPartial = #partialJazzExceptions
730   noChordSymbol = #(make-simple-markup "N.C.")
731
732   %% tablature:
733   stringOneTopmost = ##t
734   highStringOne = ##t
735
736   %% One may change the string tunings as follows :
737   %% The length of the list must be equal to the number of strings
738   stringTunings = #guitar-tuning
739   tablatureFormat = #fret-number-tablature-format
740   tabStaffLineLayoutFunction = #tablature-position-on-lines
741
742 %%
743   figuredBassFormatter = #format-bass-figure
744   metronomeMarkFormatter = #format-metronome-markup
745
746   %% See also make-voice-props-set
747   graceSettings = #score-grace-settings
748
749   keepAliveInterfaces = #'(
750     bass-figure-interface
751     chord-name-interface
752     cluster-beacon-interface
753     fret-diagram-interface
754     lyric-syllable-interface
755     note-head-interface
756     tab-note-head-interface
757     lyric-interface
758     percent-repeat-item-interface
759     percent-repeat-interface
760
761     ;; need this, as stanza numbers are items, and appear only once.
762     stanza-number-interface
763   )
764   %% \quoteDuring is supposed to quote everything, cueDuring only the essentials
765   quotedEventTypes = #'(StreamEvent)
766   quotedCueEventTypes = #'(
767     note-event
768     rest-event
769     tie-event
770     beam-event
771     tuplet-span-event)
772   instrumentTransposition = #(ly:make-pitch 0 0 0)
773
774   topLevelAlignment = ##t
775
776   timing = ##t
777 }
778
779
780
781
782 \context {
783   \type "Engraver_group"
784   \name "FiguredBass"
785   \description "A context for printing a figured bass line."
786
787   \consists "Figured_bass_engraver"
788   \consists "Separating_line_group_engraver"
789   \consists "Axis_group_engraver"
790
791   \override VerticalAxisGroup.remove-empty = ##t
792   \override VerticalAxisGroup.remove-first = ##t
793   \override VerticalAxisGroup.staff-affinity = #UP
794   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
795   \override VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0.5
796 }
797
798 \context {
799   \name "Devnull"
800   \type "Engraver_group"
801
802   %% don't want to route anything out of here:
803   \alias "Staff"
804   \alias "Voice"
805   \description "Silently discards all musical information given to this
806 context."
807 }
808
809 \context {
810   \name "NullVoice"
811   \type "Engraver_group"
812   \description "For aligning lyrics without printing notes"
813
814   %% don't route anything out of here
815   \alias "Staff"
816   \alias "Voice"
817
818   %% provide non-printing NoteHeads with proper extents for lyric alignment
819   \consists "Note_heads_engraver"
820   \omit NoteHead
821   \override NoteHead.X-extent = #(lambda (g)
822     (ly:stencil-extent (ly:note-head::print g) X))
823
824   %% generate no accidentals
825   nullAccidentals = ##t
826
827   %% keep noteheads inside the staff
828   \consists "Pitch_squash_engraver"
829   squashedPosition = 0
830
831   %% the engravers that control the 'busy' flags for note-onsets and melismata
832   \consists "Grob_pq_engraver"
833   \consists "Tie_engraver"
834   \omit Tie
835   \consists "Beam_engraver"
836   \omit Beam
837   \consists "Slur_engraver"
838   \omit Slur
839 }
840
841 \context {
842   \Voice
843   \name "TabVoice"
844   \alias "Voice"
845   \consists "Tab_note_heads_engraver"
846   \consists "Tab_tie_follow_engraver"
847
848   \remove "Note_heads_engraver"
849   \remove "Fingering_engraver"
850   \remove "New_fingering_engraver"
851   \remove "Pitched_trill_engraver"
852
853   \description "Context for drawing notes in a Tab staff."
854
855   %% No accidental in tablature !
856   \remove "Accidental_engraver"
857 }
858
859 \context {
860   \Staff
861   \alias "Staff"
862   \name "TabStaff"
863   \denies "Voice"
864   \consists "Tab_staff_symbol_engraver"
865
866   \description "Context for generating tablature. It accepts only @code{TabVoice}
867 contexts and handles the line spacing, the tablature clef etc. properly."
868
869   \accepts "TabVoice"
870   \defaultchild "TabVoice"
871
872   %% 6 strings, bigger spacing
873   \override StaffSymbol.staff-space = #1.5
874
875   %% Don't draw stems over the tablature figures !
876   \override Stem.avoid-note-head = ##t
877
878   %% No accidental in tablature !
879   \remove "Accidental_engraver"
880   \remove "Key_engraver"
881
882   \remove "Ottava_spanner_engraver"
883   %% the clef handler
884   \override Clef.stencil = #clef::print-modern-tab-if-set
885   %% no time signature
886   \override TimeSignature.stencil = ##f
887   %% no arpeggios
888   \override Arpeggio.stencil = ##f
889   %% we ignore collision warnings that may occur due to
890   %% stem overlapping, because we have no stems ;-)
891   \override NoteColumn.ignore-collision = ##t
892   %% Special "TAB" clef
893   clefGlyph = #"clefs.tab"
894   clefPosition = #0
895   %% Change string if note results in negative fret number
896   handleNegativeFrets = #'recalculate
897   %% Allow open strings even if minimumFret is set
898   restrainOpenStrings = ##f
899
900   %% TabStaff increase the staff-space, which in turn
901   %% increases beam thickness and spacing; beams are
902   %% too big. We have to adjust the beam settings:
903   \override Beam.beam-thickness = #0.32
904   \override Beam.length-fraction = #0.62
905   %% the same goes for tremolo beams
906   \override StemTremolo.beam-thickness = #0.32
907   %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
908   %% and the tablature staff space is scaled (1.5 by default),
909   %% so we use the inversion of the scale factor:
910   \override StemTremolo.length-fraction = #(lambda (grob)
911                                                (/ 1 (ly:staff-symbol-staff-space grob)))
912   \override StemTremolo.beam-width = #stem-tremolo::calc-tab-width
913
914   %% make the Stems as short as possible to minimize their influence
915   %% on the slur::calc-control-points routine
916   \override Stem.no-stem-extend = ##t
917   \override Flag.style = #'no-flag
918   \override Stem.details = #'((lengths 0 0 0 0 0 0)
919                                 (beamed-lengths 0 0 0)
920                                 (beamed-minimum-free-lengths 0 0 0)
921                                 (beamed-extreme-minimum-free-lengths 0 0)
922                                 (stem-shorten 0 0))
923   %% after all, the stubs of the stems may still be visible, so ...
924   \override Stem.stencil = ##f
925   \override Flag.stencil = ##f
926   %% automatic beams should be suppressed for similar reasons ...
927   autoBeaming = ##f
928   %% remove beams, dots and rests ...
929   \override Beam.stencil = ##f
930   \override StemTremolo.stencil = ##f
931   \override Dots.stencil = ##f
932   \override Rest.stencil = ##f
933   \override MultiMeasureRest.stencil = ##f
934   \override MultiMeasureRestNumber.stencil = ##f
935   \override MultiMeasureRestText.stencil = ##f
936   %% ... all kinds of ties/slurs
937   \override Tie.stencil = ##f
938   \override RepeatTie.stencil = ##f
939   \override LaissezVibrerTie.stencil = ##f
940   \override Slur.stencil = #slur::draw-tab-slur
941   \override PhrasingSlur.stencil = ##f
942   %% 'tied to' fret numbers become invisible or parenthesized, respectively)
943   \override Tie.after-line-breaking = #tie::handle-tab-note-head
944   \override RepeatTie.after-line-breaking = #repeat-tie::handle-tab-note-head
945   %% ... and all kinds of markups, spanners etc.
946   \override TupletBracket.stencil = ##f
947   \override TupletNumber.stencil = ##f
948   \override DynamicText.stencil = ##f
949   \override DynamicTextSpanner.stencil = ##f
950   \override TextSpanner.stencil = ##f
951   \override Hairpin.stencil = ##f
952   \override Script.stencil = ##f
953   \override TextScript.stencil = ##f
954   \override Glissando.stencil = #glissando::draw-tab-glissando
955   %% the direction for glissando lines will be automatically corrected
956   \override Glissando.extra-dy = #glissando::calc-tab-extra-dy
957   \override Glissando.bound-details.right = #`((attach-dir . ,LEFT)
958                                                    (padding . 0.3))
959   \override Glissando.bound-details.left = #`((attach-dir . ,RIGHT)
960                                                    (padding . 0.3))
961   %% dead notes
962   \override TabNoteHead.glyph-name = #tab-note-head::calc-glyph-name
963   \override TabNoteHead.stencil = #tab-note-head::whiteout-if-style-set
964 }
965
966 \context {
967   \Voice
968   \name "VaticanaVoice"
969   \alias "Voice"
970   \description "Same as @code{Voice} context, except that it is
971 accommodated for typesetting Gregorian Chant in the notational style
972 of Editio Vaticana."
973
974   \remove "Slur_engraver"
975   \remove "Stem_engraver"
976   \remove "Ligature_bracket_engraver"
977   \consists "Vaticana_ligature_engraver"
978   \remove "Text_spanner_engraver"
979   \consists "Episema_engraver"
980
981   %% Set default head for notes outside of \[ \].
982   \override NoteHead.style = #'vaticana.punctum
983
984   %% Put some space before and after divisiones.
985   %% FIXME: This does not seem to show any effect.
986   \override Script.padding = #0.5
987
988   %% There are no beams in Gregorian Chant notation.
989   autoBeaming = ##f
990 }
991
992 \context {
993   \Staff
994   \name "VaticanaStaff"
995   \alias "Staff"
996   \denies "Voice"
997   \accepts "VaticanaVoice"
998   \defaultchild "VaticanaVoice"
999
1000   \description "Same as @code{Staff} context, except that it is
1001 accommodated for typesetting Gregorian Chant in the notational style
1002 of Editio Vaticana."
1003
1004   \remove "Time_signature_engraver"
1005   \consists "Custos_engraver"
1006
1007   %% We can not remove Bar_engraver; otherwise clefs and custodes will
1008   %% not show up any more among other line breaking issues.
1009   %% Instead, we make the grob transparent.
1010   \override BarLine.transparent = ##t
1011
1012   \override StaffSymbol.line-count = #4
1013   \override StaffSymbol.thickness = #0.6
1014
1015   %% FIXME: unit on StaffSymbol's width should be \linewidth.
1016   %% \override StaffSymbol.width = #60.0
1017
1018   %% Choose vaticana do clef on 3rd line as default.
1019   clefGlyph = #"clefs.vaticana.do"
1020   middleCPosition = #1
1021   middleCClefPosition = #1
1022   clefPosition = #1
1023   clefTransposition = #0
1024
1025   %% Select vaticana style font.
1026   \override KeySignature.glyph-name-alist = #alteration-vaticana-glyph-name-alist
1027   \override Accidental.glyph-name-alist = #alteration-vaticana-glyph-name-alist
1028   \override Custos.style = #'vaticana
1029   \override Custos.neutral-position = #3
1030   \override Custos.neutral-direction = #DOWN
1031   \override Dots.style = #'vaticana
1032 }
1033
1034 \context {
1035   \Voice
1036   \name "GregorianTranscriptionVoice"
1037   \alias "Voice"
1038   \consists "Episema_engraver"
1039
1040   %% Removing ligature bracket engraver without replacing it by some
1041   %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
1042   %% warning for every "\[" and "\]".  Therefore, we make the grob
1043   %% transparent instead.
1044   \override LigatureBracket.transparent = ##t
1045
1046   %% Put some space before and after divisiones.
1047   %% FIXME: This does not seem to show any effect.
1048   \override Script.padding = #0.5
1049
1050   %% There are no beams in Gregorian Chant notation.
1051   autoBeaming = ##f
1052 }
1053
1054 \context {
1055   \Staff
1056   \name "GregorianTranscriptionStaff"
1057   \alias "Staff"
1058   \denies "Voice"
1059   \accepts "GregorianTranscriptionVoice"
1060   \defaultchild "GregorianTranscriptionVoice"
1061
1062   %% We can not remove Bar_engraver; otherwise clefs and custodes will
1063   %% not show up any more among other line breaking issues.
1064   %% Instead, we make the grob transparent.
1065   \override BarLine.transparent = ##t
1066 }
1067
1068 \context {
1069   \Voice
1070   \name "MensuralVoice"
1071   \alias "Voice"
1072   \description "Same as @code{Voice} context, except that it is
1073 accommodated for typesetting a piece in mensural style."
1074
1075   \remove "Slur_engraver"
1076   \remove "Ligature_bracket_engraver"
1077   \consists "Mensural_ligature_engraver"
1078
1079   %% Set default head for notes outside of \[ \].
1080   \override NoteHead.style = #'mensural
1081   \override Rest.style = #'mensural
1082   \override Flag.style = #'mensural
1083
1084   %% There are no beams in mensural notation.
1085   autoBeaming = ##f
1086 }
1087
1088 \context {
1089   \Staff
1090   \name "MensuralStaff"
1091   \alias "Staff"
1092   \denies "Voice"
1093   \defaultchild "MensuralVoice"
1094   \accepts "MensuralVoice"
1095   \description "Same as @code{Staff} context, except that it is
1096 accommodated for typesetting a piece in mensural style."
1097
1098   \consists "Custos_engraver"
1099
1100   %% We can not remove Bar_engraver; otherwise clefs and custodes will
1101   %% not show up any more among other line breaking issues.
1102   %% Instead, we make the grob transparent.
1103   \override BarLine.transparent = ##t
1104
1105   \override StaffSymbol.thickness = #0.6
1106
1107   %% FIXME: unit on StaffSymbol's width should be \linewidth.
1108   %% \override StaffSymbol.width = #60.0
1109
1110   %% Choose mensural g clef on 2nd line as default.
1111   clefGlyph = #"clefs.mensural.g"
1112   middleCClefPosition = #-6
1113   middleCPosition = #-6
1114   clefPosition = #-2
1115   clefTransposition = #0
1116
1117   %% Select mensural style font.
1118   \override TimeSignature.style = #'mensural
1119   \override KeySignature.glyph-name-alist = #alteration-mensural-glyph-name-alist
1120   \override Accidental.glyph-name-alist = #alteration-mensural-glyph-name-alist
1121   \override Custos.style = #'mensural
1122   \override Custos.neutral-position = #3
1123   \override Custos.neutral-direction = #DOWN
1124
1125   %% Accidentals are valid only once (same as
1126   %% \accidentalStyle forget)
1127   extraNatural = ##f
1128   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
1129   autoCautionaries = #'()
1130   printKeyCancellation = ##f
1131 }
1132
1133 \context {
1134   \Voice
1135   \name "PetrucciVoice"
1136   \alias "Voice"
1137   \description "Same as @code{Voice} context, except that it is
1138 accommodated for typesetting a piece in Petrucci style."
1139
1140   \remove "Ligature_bracket_engraver"
1141   \consists "Mensural_ligature_engraver"
1142
1143   %% Set glyph styles.
1144   \override NoteHead.style = #'petrucci
1145   \override Rest.style = #'mensural
1146
1147   %% Thickens and shortens stems.
1148   \override Stem.thickness = #1.7
1149   \override Stem.length = #5
1150
1151   %% There are no beams in Petrucci notation.
1152   autoBeaming = ##f
1153 }
1154
1155 \context {
1156   \Staff
1157   \name "PetrucciStaff"
1158   \alias "Staff"
1159   \denies "Voice"
1160   \defaultchild "PetrucciVoice"
1161   \accepts "PetrucciVoice"
1162   \description "Same as @code{Staff} context, except that it is
1163 accommodated for typesetting a piece in Petrucci style."
1164
1165   \consists "Custos_engraver"
1166
1167   \override StaffSymbol.thickness = #1.3
1168
1169   %% Choose Petrucci g clef on 2nd line as default.
1170   clefGlyph = #"clefs.petrucci.g"
1171   middleCClefPosition = #-6
1172   middleCPosition = #-6
1173   clefPosition = #-2
1174   clefTransposition = #0
1175
1176   \override Custos.style = #'mensural
1177   \override Custos.neutral-position = #3
1178   \override Custos.neutral-direction = #DOWN
1179
1180   %% Accidentals are valid only once (if the following note is different)
1181   extraNatural = ##f
1182   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1183                              ,neo-modern-accidental-rule)
1184   autoCautionaries = #'()
1185   printKeyCancellation = ##f
1186 }
1187
1188 \context {
1189   \Voice
1190   \name "KievanVoice"
1191   \alias "Voice"
1192   \description "Same as @code{Voice} context, except that it is
1193 accommodated for typesetting a piece in Kievan style."
1194
1195   \remove "Ligature_bracket_engraver"
1196   \consists "Kievan_ligature_engraver"
1197
1198   %% Set glyph styles.
1199   \override NoteHead.style = #'kievan
1200   \override Stem.X-offset = #stem::kievan-offset-callback
1201   \override Stem.stencil = ##f
1202   \override Flag.stencil = ##f
1203   \override Rest.style = #'mensural
1204   \override Accidental.glyph-name-alist = #alteration-kievan-glyph-name-alist
1205   \override Dots.style = #'kievan
1206   \override Slur.stencil = ##f
1207   \override Stem.length = #0.0
1208   \override Beam.positions = #beam::get-kievan-positions
1209   \override Beam.quantized-positions = #beam::get-kievan-quantized-positions
1210   \override NoteHead.duration-log = #note-head::calc-kievan-duration-log
1211
1212   %% There are beams in Kievan notation, but they are invoked manually
1213   autoBeaming = ##f
1214 }
1215
1216 \context {
1217   \Staff
1218   \name "KievanStaff"
1219   \alias "Staff"
1220   \denies "Voice"
1221   \defaultchild "KievanVoice"
1222   \accepts "KievanVoice"
1223   \description "Same as @code{Staff} context, except that it is
1224 accommodated for typesetting a piece in Kievan style."
1225
1226   \remove "Time_signature_engraver"
1227
1228   %% Choose Kievan tsefaut clef
1229   clefGlyph = #"clefs.kievan.do"
1230   middleCClefPosition = #0
1231   middleCPosition = #0
1232   clefPosition = #0
1233   clefTransposition = #0
1234
1235   %% Accidentals are valid only once (if the following note is different)
1236   extraNatural = ##f
1237   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1238                              ,neo-modern-accidental-rule)
1239   autoCautionaries = #'()
1240   printKeyCancellation = ##f
1241
1242 }
1243
1244 %% Keep the old definitions in here for compatibility (they erase previous
1245 %% settings to the corresponding context!).
1246 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
1247 %% into the desired context. That's just as easy, requires only one line more
1248 %% (the \*Staff), but preserves previous context mods.
1249 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
1250 RemoveEmptyStaffContext = \context {
1251   \Staff
1252   \RemoveEmptyStaves
1253 }
1254
1255 AncientRemoveEmptyStaffContext = \context {
1256   \VaticanaStaff
1257   \RemoveEmptyStaves
1258 }
1259
1260 RemoveEmptyDrumStaffContext = \context {
1261   \DrumStaff
1262   \RemoveEmptyStaves
1263 }
1264
1265 RemoveEmptyRhythmicStaffContext = \context {
1266   \RhythmicStaff
1267   \RemoveEmptyStaves
1268 }
1269
1270 RemoveEmptyTabStaffContext = \context {
1271   \TabStaff
1272   \RemoveEmptyStaves
1273 }