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