1 %%%% This file is part of LilyPond, the GNU music typesetter.
3 %%%% Copyright (C) 1996--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
4 %%%% Jan Nieuwenhuizen <janneke@gnu.org>
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.
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.
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/>.
27 \description "Hard coded entry point for LilyPond. Cannot be tuned."
28 \grobdescriptions #all-grob-descriptions
29 EventClasses = #all-event-classes
33 \type "Engraver_group"
36 \description "A context for displaying fret diagrams."
38 \consists "Fretboard_engraver"
39 \consists "Output_property_engraver"
40 \consists "Hara_kiri_engraver"
41 \consists "Separating_line_group_engraver"
42 \consists "Font_size_engraver"
43 \consists "Instrument_name_engraver"
45 %% explicitly set instrument, so it is not inherited from the parent
47 shortInstrumentName = #'()
49 predefinedDiagramTable = #default-fret-table
50 handleNegativeFrets = #'recalculate
51 restrainOpenStrings = ##f
55 \type "Engraver_group"
58 \consists "Output_property_engraver"
59 \consists "Bar_engraver"
60 \consists "Pure_from_neighbor_engraver"
61 %% Bar_engraver must be first so default bars aren't overwritten
64 \consists "Font_size_engraver"
65 \consists "Separating_line_group_engraver"
66 \consists "Dot_column_engraver"
67 \consists "Staff_collecting_engraver"
69 %% perhaps move to Voice context?
70 \consists "Ottava_spanner_engraver"
71 \consists "Clef_engraver"
72 \consists "Key_engraver"
73 \consists "Time_signature_engraver"
74 \consists "Ledger_line_engraver"
75 \consists "Staff_symbol_engraver"
76 \consists "Collision_engraver"
77 \consists "Grob_pq_engraver"
78 \consists "Rest_collision_engraver"
79 \consists "Accidental_engraver"
80 \consists "Piano_pedal_engraver"
81 \consists "Piano_pedal_align_engraver"
82 \consists "Instrument_name_engraver"
83 \consists "Axis_group_engraver"
84 \consists "Figured_bass_engraver"
85 \consists "Figured_bass_position_engraver"
86 \consists "Script_row_engraver"
87 \consists "Cue_clef_engraver"
88 \consists "Footnote_engraver"
90 localKeySignature = #'()
92 ignoreFiguredBassRest = ##f
94 %% explicitly set instrument, so we don't get
95 %% weird effects when doing instrument names for
98 shortInstrumentName = #'()
100 \defaultchild "Voice"
104 \description "Handles clefs, bar lines, keys, accidentals. It can contain
105 @code{Voice} contexts."
111 \type "Engraver_group"
115 \remove "Accidental_engraver"
116 \remove "Ottava_spanner_engraver"
117 \remove "Key_engraver"
118 \remove "Piano_pedal_engraver"
120 \description "Handles typesetting for percussion."
124 \defaultchild "DrumVoice"
126 clefGlyph = #"clefs.percussion"
128 \override Script #'staff-padding = #0.75
133 \type "Engraver_group"
135 \consists "Vertical_align_engraver"
136 topLevelAlignment = ##f
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 = #'()
145 shortVocalName = #'()
149 \accepts "RhythmicStaff"
150 \accepts "GrandStaff"
151 \accepts "PianoStaff"
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."
163 \type "Engraver_group"
165 localKeySignature = #'()
168 squashedPosition = #0
172 \override BarLine #'bar-extent = #'(-2 . 2)
173 \override VoltaBracket #'staff-padding = #3
174 \override StaffSymbol #'line-count = #1
176 \override Stem #'neutral-direction = #UP
177 \override Beam #'neutral-direction = #UP
179 \consists "Output_property_engraver"
180 \consists "Font_size_engraver"
181 \consists "Separating_line_group_engraver"
182 \consists "Dot_column_engraver"
183 \consists "Bar_engraver"
184 \consists "Staff_symbol_engraver"
185 \consists "Pitch_squash_engraver"
186 \consists "Time_signature_engraver"
187 \consists "Instrument_name_engraver"
188 \consists "Axis_group_engraver"
189 \consists "Ledger_line_engraver"
191 %% explicitly set instrument, so it is not inherited from the parent
192 instrumentName = #'()
193 shortInstrumentName = #'()
197 \defaultchild "Voice"
199 \description "A context like @code{Staff} but for printing rhythms.
200 Pitches are ignored; the notes are printed on one line."
205 \type "Engraver_group"
208 \description "Corresponds to a voice on a staff. This context
209 handles the conversion of dynamic signs, stems, beams, super- and
210 subscripts, slurs, ties, and rests.
212 You have to instantiate this explicitly if you want to have
213 multiple voices on the same staff."
215 \consists "Font_size_engraver"
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 \consists "Tweak_engraver"
236 %% switch on to make stem directions interpolate for the
238 % \consists "Melody_engraver"
240 \consists "Stem_engraver"
241 \consists "Beam_engraver"
242 \consists "Grace_beam_engraver"
243 \consists "Auto_beam_engraver"
245 %% must come before Script_column_engraver.
246 \consists "New_fingering_engraver"
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"
254 \consists "Text_engraver"
255 \consists "New_dynamic_engraver"
256 \consists "Dynamic_align_engraver"
257 % \consists "Dynamic_engraver"
258 \consists "Fingering_engraver"
259 \consists "Bend_engraver"
261 \consists "Script_engraver"
262 \consists "Script_column_engraver"
263 \consists "Fingering_column_engraver"
264 \consists "Rhythmic_column_engraver"
265 \consists "Note_spacing_engraver"
266 \consists "Spanner_break_forbid_engraver"
267 \consists "Phrasing_slur_engraver"
268 \consists "Cluster_spanner_engraver"
269 \consists "Slur_engraver"
270 \consists "Tie_engraver"
271 \consists "Tuplet_engraver"
272 \consists "Grace_engraver"
273 \consists "Instrument_switch_engraver"
282 \override Stem #'length-fraction = #(magstep -4)
283 \override Beam #'length-fraction = #(magstep -4)
284 \override Beam #'beam-thickness = #0.35
292 \description "A voice on a percussion staff."
293 \remove "Arpeggio_engraver"
294 \consists "Grob_pq_engraver"
296 \remove "Note_head_line_engraver"
297 \remove "Glissando_engraver"
298 \remove "Ligature_bracket_engraver"
299 \remove "Note_heads_engraver"
300 \consists "Drum_notes_engraver"
301 \remove "New_fingering_engraver"
303 \remove "Fingering_engraver"
305 \remove "Cluster_spanner_engraver"
309 \type "Engraver_group"
311 localKeySignature = #'()
313 \description "A group of staves, with a brace on the left
314 side, grouping the staves together. The bar lines of the
315 contained staves are connected vertically."
317 \consists "Instrument_name_engraver"
318 \consists "Span_bar_engraver"
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 = #'()
329 \defaultchild "Staff"
331 \accepts "RhythmicStaff"
335 \accepts "FiguredBass"
337 \accepts "ChordNames"
345 \description "Just like @code{GrandStaff}, but the staves are only removed
346 together, never separately."
348 \consists "Vertical_align_engraver"
349 \consists "Keep_alive_together_engraver"
350 topLevelAlignment = ##f
352 instrumentName = #'()
353 shortInstrumentName = #'()
357 \type "Engraver_group"
360 \consists "Vertical_align_engraver"
361 topLevelAlignment = ##f
363 \consists "Instrument_name_engraver"
364 \consists "Span_bar_engraver"
365 \consists "Span_bar_stub_engraver"
366 \consists "Span_arpeggio_engraver"
367 \consists "Output_property_engraver"
368 systemStartDelimiter = #'SystemStartBracket
369 %% explicitly set instrument, so it is not inherited from the parent
370 instrumentName = #'()
371 shortInstrumentName = #'()
373 \consists "System_start_delimiter_engraver"
375 \defaultchild "Staff"
377 \accepts "RhythmicStaff"
379 \accepts "GrandStaff"
380 \accepts "PianoStaff"
383 \accepts "ChordNames"
384 \accepts "FiguredBass"
385 \accepts "ChoirStaff"
386 \accepts "StaffGroup"
388 \description "Groups staves while adding a bracket on the left
389 side, grouping the staves together. The bar lines of the contained
390 staves are connected vertically. @code{StaffGroup} only consists of
391 a collection of staves, with a bracket in front and spanning bar lines."
395 \type "Engraver_group"
398 \consists "Output_property_engraver"
399 \consists "Bar_engraver"
400 \consists "Piano_pedal_engraver"
401 \consists "Script_engraver"
402 \consists "New_dynamic_engraver"
403 \consists "Dynamic_align_engraver"
404 \consists "Text_engraver"
405 \consists "Text_spanner_engraver"
406 \consists "Axis_group_engraver"
407 \consists "Tweak_engraver"
409 pedalSustainStrings = #'("Ped." "*Ped." "*")
410 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
411 \override VerticalAxisGroup #'staff-affinity = #CENTER
412 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
413 #'((basic-distance . 5)
415 \override TextScript #'font-shape = #'italic
416 \override DynamicLineSpanner #'Y-offset = #0
417 \override DynamicText #'X-offset =
418 #(ly:make-simple-closure
420 ,(ly:make-simple-closure
421 (list ly:self-alignment-interface::centered-on-note-columns))
422 ,(ly:make-simple-closure
423 (list ly:self-alignment-interface::x-aligned-on-self))))
425 \description "Holds a single line of dynamics, which will be
426 centered between the staves surrounding this context."
431 \type "Engraver_group"
433 \description "Corresponds to a voice with lyrics. Handles the
434 printing of a single line of lyrics."
437 \consists "Lyric_engraver"
438 \consists "Extender_engraver"
439 \consists "Hyphen_engraver"
440 \consists "Tweak_engraver"
441 \consists "Stanza_number_engraver"
442 \consists "Instrument_name_engraver"
443 \consists "Font_size_engraver"
444 \consists "Hara_kiri_engraver"
445 \consists "Pure_from_neighbor_engraver"
447 %% explicitly set instrument, so it is not inherited from the parent
448 instrumentName = #'()
449 shortInstrumentName = #'()
451 \override VerticalAxisGroup #'remove-first = ##t
452 \override VerticalAxisGroup #'remove-empty = ##t
453 \override VerticalAxisGroup #'staff-affinity = #UP
454 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
455 #'((basic-distance . 5.5)
457 (stretchability . 1))
458 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
459 #'((basic-distance . 0)
460 (minimum-distance . 2.8)
462 (stretchability . 0))
463 \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
464 \override InstrumentName #'self-alignment-Y = ##f
466 %% sync with define-grobs.scm ;
467 \override InstrumentName #'font-size = #1.0
469 %% make sure that barlines aren't collapsed, when
470 %% Bar_engraver is there.
471 \override BarLine #'bar-extent = #'(-0.05 . 0.05)
476 \type "Engraver_group"
478 \description "A context for printing the names of notes."
479 \consists "Axis_group_engraver"
481 \override VerticalAxisGroup #'staff-affinity = #UP
482 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
483 #'((basic-distance . 0)
484 (minimum-distance . 2.8)
486 (stretchability . 0))
487 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
488 #'((basic-distance . 5.5)
490 (stretchability . 1))
491 \override VerticalAxisGroup
492 #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
494 \consists "Tie_engraver"
495 \consists "Note_name_engraver"
496 \consists "Separating_line_group_engraver"
500 \type "Engraver_group"
502 \description "Typesets chord names."
504 \consists "Output_property_engraver"
505 \consists "Separating_line_group_engraver"
506 \consists "Chord_name_engraver"
507 \consists "Hara_kiri_engraver"
508 % \consists "Note_spacing_engraver"
509 \override VerticalAxisGroup #'remove-first = ##t
510 \override VerticalAxisGroup #'remove-empty = ##t
511 \override VerticalAxisGroup #'staff-affinity = #DOWN
512 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
513 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
517 \type "Score_engraver"
520 \description "This is the top level notation context. No
521 other context can contain a @code{Score} context. This context
522 handles the administration of time signatures. It also makes sure
523 that items such as clefs, time signatures, and key-signatures are
524 aligned across staves.
526 You cannot explicitly instantiate a @code{Score} context (since it
527 is not contained in any other context). It is instantiated
528 automatically when an output definition (a @code{\score} or
529 @code{\layout} block) is processed."
531 \consists "Paper_column_engraver"
532 \consists "Repeat_acknowledge_engraver"
533 \consists "Staff_collecting_engraver"
537 %% An alias for Timing is established by the Timing_translator in
538 %% whatever context it is initialized, and the timing variables are
539 %% then copied from wherever Timing had been previously established.
540 %% The alias at Score level provides a target for initializing
541 %% Timing variables in layout definitions before any
542 %% Timing_translator has been run.
544 % timing translator must come BEFORE bar number engraver
545 \consists "Timing_translator"
546 \consists "Default_bar_line_engraver"
547 \consists "Output_property_engraver"
548 \consists "System_start_delimiter_engraver"
549 \consists "Mark_engraver"
550 \consists "Volta_engraver"
551 \consists "Metronome_mark_engraver"
552 \consists "Break_align_engraver"
553 \consists "Spacing_engraver"
554 \consists "Grace_spacing_engraver"
555 \consists "Vertical_align_engraver"
556 \consists "Stanza_number_align_engraver"
557 \consists "Bar_number_engraver"
558 \consists "Parenthesis_engraver"
559 \consists "Concurrent_hairpin_engraver"
560 \consists "Beam_collision_engraver"
561 \consists "Footnote_engraver"
563 \defaultchild "Staff"
565 \accepts "FretBoards"
567 \accepts "RhythmicStaff"
569 \accepts "VaticanaStaff"
570 \accepts "GregorianTranscriptionStaff"
571 \accepts "MensuralStaff"
572 \accepts "PetrucciStaff"
573 \accepts "StaffGroup"
575 \accepts "KievanStaff"
577 \accepts "ChordNames"
578 \accepts "GrandStaff"
579 \accepts "ChoirStaff"
580 \accepts "PianoStaff"
583 \accepts "FiguredBass"
585 noteToFretFunction = #determine-frets
586 predefinedDiagramTable = ##f
588 soloIIText = #"Solo II"
590 printPartCombineTexts = ##t
591 partCombineTextsOnNote = ##t
592 systemStartDelimiter =#'SystemStartBar
594 drumStyleTable = #drums-style
596 melismaBusyProperties = #default-melisma-properties
598 clefGlyph = #"clefs.G"
600 middleCClefPosition = #-6
601 middleCPosition = #-6
604 crescendoSpanner = #'hairpin
605 decrescendoSpanner = #'hairpin
607 defaultBarType = #"|"
608 doubleRepeatType = #":|:"
609 startRepeatType = #"|:"
610 endRepeatType = #":|"
611 barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
612 barNumberFormatter = #robust-bar-number-function
615 explicitClefVisibility = #all-visible
616 explicitCueClefVisibility = #end-of-line-invisible
617 explicitKeySignatureVisibility = #all-visible
618 implicitTimeSignatureVisibility = #end-of-line-invisible
620 repeatCountVisibility = #all-repeat-counts-visible
622 timeSignatureSettings = #default-time-signature-settings
623 timeSignatureFraction = 4/4
625 %% These defaults should be the same as the rules established in
626 %% scm/time-signature-settings.scm for 4/4 time
627 measureLength = #(ly:make-moment 4 4)
628 baseMoment = #(ly:make-moment 1 4)
629 beatStructure = #'(1 1 1 1)
630 beamExceptions = #'((end . (((1 . 8) . (4 4))
631 ((1 . 12) . (3 3 3 3)))))
632 beamHalfMeasure = ##t
635 autoBeamCheck = #default-auto-beam-check
637 scriptDefinitions = #default-script-alist
639 pedalSustainStrings = #'("Ped." "*Ped." "*")
640 pedalSustainStyle = #'text
641 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
642 pedalUnaCordaStyle = #'text
644 %% These are in ordinary italic font, including the *,
645 %% but they are unlikely to be used,
646 %% as the default pedal-style for SostenutoPedal is 'mixed':
647 %% i.e. Sost. Ped_____________________
648 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
649 pedalSostenutoStyle = #'mixed
651 harmonicAccidentals = ##t
652 fingeringOrientations = #'(up down)
653 stringNumberOrientations = #'(up down)
654 strokeFingerOrientations = #'(right)
656 lyricMelismaAlignment = #LEFT
657 markFormatter = #format-mark-letters
661 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
662 autoCautionaries = #'()
664 printKeyCancellation = ##t
665 keyAlterationOrder = #`(
666 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
667 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
668 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
669 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
672 barCheckSynchronize = ##f
675 chordNameFunction = #ignatzek-chord-names
676 minorChordModifier = #(make-simple-markup "m")
677 additionalPitchPrefix = #"" % was "add"
678 majorSevenSymbol = #whiteTriangleMarkup
679 chordNameLowercaseMinor = ##f
680 chordNameSeparator = #(make-hspace-markup 0.5)
681 slashChordSeparator = #(make-simple-markup "/")
682 chordNameExceptions = #ignatzekExceptions
683 chordNoteNamer = #'()
684 chordRootNamer = #note-name->markup
685 chordPrefixSpacer = #0
686 chordNameExceptionsFull = #fullJazzExceptions
687 chordNameExceptionsPartial = #partialJazzExceptions
688 noChordSymbol = #(make-simple-markup "N.C.")
690 bassStaffProperties = #'((assign clefGlyph "clefs.F")
691 (assign clefPosition 2)
692 (assign middleCPosition 6)
693 (assign middleCClefPosition 6))
695 stringOneTopmost = ##t
698 %% One may change the string tunings as follows :
699 %% The length of the list must be equal to the number of strings
700 stringTunings = #guitar-tuning
701 tablatureFormat = #fret-number-tablature-format
702 tabStaffLineLayoutFunction = #tablature-position-on-lines
705 figuredBassFormatter = #format-bass-figure
706 metronomeMarkFormatter = #format-metronome-markup
709 %% See also make-voice-props-set
711 (Voice Stem direction ,UP)
712 (Voice Stem font-size -3)
713 (Voice Flag font-size -3)
714 (Voice NoteHead font-size -3)
715 (Voice TabNoteHead font-size -4)
716 (Voice Dots font-size -3)
717 (Voice Stem length-fraction 0.8)
718 (Voice Stem no-stem-extend #t)
719 (Voice Beam beam-thickness 0.384)
720 (Voice Beam length-fraction 0.8)
721 (Voice Accidental font-size -4)
722 (Voice AccidentalCautionary font-size -4)
723 (Voice Slur direction ,DOWN)
724 (Voice Script font-size -3)
725 (Voice Fingering font-size -8)
726 (Voice StringNumber font-size -8)
729 keepAliveInterfaces = #'(
730 bass-figure-interface
732 cluster-beacon-interface
733 fret-diagram-interface
734 lyric-syllable-interface
736 tab-note-head-interface
738 percent-repeat-item-interface
739 percent-repeat-interface
741 ;; need this, as stanza numbers are items, and appear only once.
742 stanza-number-interface
744 % \quoteDuring is supposed to quote everything, cueDuring only the essentials
745 quotedEventTypes = #'(StreamEvent)
746 quotedCueEventTypes = #'(
752 instrumentTransposition = #(ly:make-pitch 0 0 0)
754 topLevelAlignment = ##t
763 \type "Engraver_group"
765 \description "A context for printing a figured bass line."
767 \consists "Figured_bass_engraver"
768 \consists "Separating_line_group_engraver"
769 \consists "Hara_kiri_engraver"
771 \override VerticalAxisGroup #'remove-empty = ##t
772 \override VerticalAxisGroup #'remove-first = ##t
773 \override VerticalAxisGroup #'staff-affinity = #UP
774 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
775 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
780 \type "Engraver_group"
782 %% don't want to route anything out of here:
785 \description "Silently discards all musical information given to this
793 \consists "Tab_note_heads_engraver"
794 \consists "Tab_tie_follow_engraver"
796 \remove "Note_heads_engraver"
797 \remove "Fingering_engraver"
798 \remove "New_fingering_engraver"
799 \remove "Pitched_trill_engraver"
801 \description "Context for drawing notes in a Tab staff."
803 %% TabStaff increase the staff-space, which in turn
804 %% increases beam thickness and spacing; beams are
805 %% too big. We have to adjust the beam settings:
806 \override Beam #'beam-thickness = #0.32
807 \override Beam #'length-fraction = #0.62
808 %% the same goes for tremolo beams
809 \override StemTremolo #'beam-thickness = #0.32
810 %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
811 %% and the tablature staff space is scaled (1.5 by default),
812 %% so we use the inversion of the scale factor:
813 \override StemTremolo #'length-fraction = #(lambda (grob)
814 (/ 1 (ly:staff-symbol-staff-space grob)))
815 \override StemTremolo #'beam-width = #stem-tremolo::calc-tab-width
817 %% No accidental in tablature !
818 \remove "Accidental_engraver"
819 %% make the Stems as short as possible to minimize their influence
820 %% on the slur::calc-control-points routine
821 \override Stem #'no-stem-extend = ##t
822 \override Flag #'style = #'no-flag
823 \override Stem #'details = #'((lengths 0 0 0 0 0 0)
824 (beamed-lengths 0 0 0)
825 (beamed-minimum-free-lengths 0 0 0)
826 (beamed-extreme-minimum-free-lengths 0 0)
828 %% after all, the stubs of the stems may still be visible, so ...
829 \override Stem #'stencil = ##f
830 \override Flag #'stencil = ##f
831 %% automatic beams should be suppressed for similar reasons ...
833 %% remove beams, dots and rests ...
834 \override Beam #'stencil = ##f
835 \override StemTremolo #'stencil = ##f
836 \override Dots #'stencil = ##f
837 \override Rest #'stencil = ##f
838 \override MultiMeasureRest #'stencil = ##f
839 \override MultiMeasureRestNumber #'stencil = ##f
840 \override MultiMeasureRestText #'stencil = ##f
841 %% ... all kinds of ties/slurs
842 \override Tie #'stencil = ##f
843 \override RepeatTie #'stencil = ##f
844 \override LaissezVibrerTie #'stencil = ##f
845 \override Slur #'stencil = #slur::draw-tab-slur
846 \override PhrasingSlur #'stencil = ##f
847 %% 'tied to' fret numbers become invisible or parenthesized, respectively)
848 \override Tie #'after-line-breaking = #tie::handle-tab-note-head
849 \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
850 %% ... and all kinds of markups, spanners etc.
851 \override TupletBracket #'stencil = ##f
852 \override TupletNumber #'stencil = ##f
853 \override DynamicText #'stencil = ##f
854 \override DynamicTextSpanner #'stencil = ##f
855 \override TextSpanner #'stencil = ##f
856 \override Hairpin #'stencil = ##f
857 \override Script #'stencil = ##f
858 \override TextScript #'stencil = ##f
859 \override Glissando #'stencil = #glissando::draw-tab-glissando
860 %% the direction for glissando lines will be automatically corrected
861 \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
862 \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
864 \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
867 \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
868 \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
876 \consists "Tab_staff_symbol_engraver"
878 \description "Context for generating tablature. It accepts only @code{TabVoice}
879 contexts and handles the line spacing, the tablature clef etc. properly."
882 \defaultchild "TabVoice"
884 %% 6 strings, bigger spacing
885 \override StaffSymbol #'staff-space = #1.5
887 %% Don't draw stems over the tablature figures !
888 \override Stem #'avoid-note-head = ##t
890 %% No accidental in tablature !
891 \remove "Accidental_engraver"
892 \remove "Key_engraver"
894 \remove "Ottava_spanner_engraver"
896 \override Clef #'stencil = #clef::print-modern-tab-if-set
898 \override TimeSignature #'stencil = ##f
900 \override Arpeggio #'stencil = ##f
901 %% we ignore collision warnings that may occur due to
902 %% stem overlapping, because we have no stems ;-)
903 \override NoteColumn #'ignore-collision = ##t
904 %% Special "TAB" clef
905 clefGlyph = #"clefs.tab"
907 %% Change string if note results in negative fret number
908 handleNegativeFrets = #'recalculate
909 %% Allow open strings even if minimumFret is set
910 restrainOpenStrings = ##f
915 \name "VaticanaVoice"
917 \description "Same as @code{Voice} context, except that it is
918 accommodated for typesetting Gregorian Chant in the notational style
921 \remove "Slur_engraver"
922 \remove "Stem_engraver"
923 \remove "Ligature_bracket_engraver"
924 \consists "Vaticana_ligature_engraver"
925 \remove "Text_spanner_engraver"
926 \consists "Episema_engraver"
928 %% Set default head for notes outside of \[ \].
929 \override NoteHead #'style = #'vaticana.punctum
931 %% Put some space before and after divisiones.
932 %% FIXME: This does not seem to show any effect.
933 \override Script #'padding = #0.5
935 %% There are no beams in Gregorian Chant notation.
941 \name "VaticanaStaff"
944 \accepts "VaticanaVoice"
945 \defaultchild "VaticanaVoice"
947 \description "Same as @code{Staff} context, except that it is
948 accommodated for typesetting Gregorian Chant in the notational style
951 \remove "Time_signature_engraver"
952 \consists "Custos_engraver"
954 %% We can not remove Bar_engraver; otherwise clefs and custodes will
955 %% not show up any more among other line breaking issues.
956 %% Instead, we make the grob transparent.
957 \override BarLine #'transparent = ##t
959 \override StaffSymbol #'line-count = #4
960 \override StaffSymbol #'thickness = #0.6
962 %% FIXME: unit on StaffSymbol's width should be \linewidth.
963 %% \override StaffSymbol #'width = #60.0
965 %% Choose vaticana do clef on 3rd line as default.
966 clefGlyph = #"clefs.vaticana.do"
968 middleCClefPosition = #1
972 %% Select vaticana style font.
973 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
974 \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
975 \override Custos #'style = #'vaticana
976 \override Custos #'neutral-position = #3
977 \override Custos #'neutral-direction = #DOWN
978 \override Dots #'style = #'vaticana
983 \name "GregorianTranscriptionVoice"
985 \consists "Episema_engraver"
987 %% Removing ligature bracket engraver without replacing it by some
988 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
989 %% warning for every "\[" and "\]". Therefore, we make the grob
990 %% transparent instead.
991 \override LigatureBracket #'transparent = ##t
993 %% Put some space before and after divisiones.
994 %% FIXME: This does not seem to show any effect.
995 \override Script #'padding = #0.5
997 %% There are no beams in Gregorian Chant notation.
1004 \name "GregorianTranscriptionStaff"
1007 \accepts "GregorianTranscriptionVoice"
1008 \defaultchild "GregorianTranscriptionVoice"
1010 %% We can not remove Bar_engraver; otherwise clefs and custodes will
1011 %% not show up any more among other line breaking issues.
1012 %% Instead, we make the grob transparent.
1013 \override BarLine #'transparent = ##t
1018 \name "MensuralVoice"
1020 \description "Same as @code{Voice} context, except that it is
1021 accommodated for typesetting a piece in mensural style."
1023 \remove "Slur_engraver"
1024 \remove "Ligature_bracket_engraver"
1025 \consists "Mensural_ligature_engraver"
1027 %% Set default head for notes outside of \[ \].
1028 \override NoteHead #'style = #'mensural
1029 \override Rest #'style = #'mensural
1030 \override Flag #'style = #'mensural
1032 %% There are no beams in mensural notation.
1038 \name "MensuralStaff"
1041 \defaultchild "MensuralVoice"
1042 \accepts "MensuralVoice"
1043 \description "Same as @code{Staff} context, except that it is
1044 accommodated for typesetting a piece in mensural style."
1046 \consists "Custos_engraver"
1048 %% We can not remove Bar_engraver; otherwise clefs and custodes will
1049 %% not show up any more among other line breaking issues.
1050 %% Instead, we make the grob transparent.
1051 \override BarLine #'transparent = ##t
1053 \override StaffSymbol #'thickness = #0.6
1055 %% FIXME: unit on StaffSymbol's width should be \linewidth.
1056 %% \override StaffSymbol #'width = #60.0
1058 %% Choose mensural g clef on 2nd line as default.
1059 clefGlyph = #"clefs.mensural.g"
1060 middleCClefPosition = #-6
1061 middleCPosition = #-6
1065 %% Select mensural style font.
1066 \override TimeSignature #'style = #'mensural
1067 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1068 \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1069 \override Custos #'style = #'mensural
1070 \override Custos #'neutral-position = #3
1071 \override Custos #'neutral-direction = #DOWN
1073 %% Accidentals are valid only once (same as
1074 %% \accidentalStyle "forget")
1076 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
1077 autoCautionaries = #'()
1078 printKeyCancellation = ##f
1083 \name "PetrucciVoice"
1085 \description "Same as @code{Voice} context, except that it is
1086 accommodated for typesetting a piece in Petrucci style."
1088 \remove "Ligature_bracket_engraver"
1089 \consists "Mensural_ligature_engraver"
1091 %% Set glyph styles.
1092 \override NoteHead #'style = #'petrucci
1093 \override Rest #'style = #'mensural
1095 % Thickens and shortens stems.
1096 \override Stem #'thickness = #1.7
1097 \override Stem #'length = #5
1099 %% There are no beams in Petrucci notation.
1105 \name "PetrucciStaff"
1108 \defaultchild "PetrucciVoice"
1109 \accepts "PetrucciVoice"
1110 \description "Same as @code{Staff} context, except that it is
1111 accommodated for typesetting a piece in Petrucci style."
1113 \consists "Custos_engraver"
1115 \override StaffSymbol #'thickness = #1.3
1117 %% Choose Petrucci g clef on 2nd line as default.
1118 clefGlyph = #"clefs.petrucci.g"
1119 middleCClefPosition = #-6
1120 middleCPosition = #-6
1124 \override Custos #'style = #'mensural
1125 \override Custos #'neutral-position = #3
1126 \override Custos #'neutral-direction = #DOWN
1128 %% Accidentals are valid only once (if the following note is different)
1130 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1131 ,neo-modern-accidental-rule)
1132 autoCautionaries = #'()
1133 printKeyCancellation = ##f
1140 \description "Same as @code{Voice} context, except that it is
1141 accommodated for typesetting a piece in Kievan style."
1143 %% Set glyph styles.
1144 \override NoteHead #'style = #'kievan
1145 \override Rest #'style = #'mensural
1146 \override Accidental #'glyph-name-alist = #alteration-kievan-glyph-name-alist
1147 \override Dots #'style = #'kievan
1148 \override Slur #'stencil = ##f
1150 %% There are beams in Kievan notation, but they are invoked manually
1159 \defaultchild "KievanVoice"
1160 \accepts "KievanVoice"
1161 \description "Same as @code{Staff} context, except that it is
1162 accommodated for typesetting a piece in Kievan style."
1164 \remove "Time_signature_engraver"
1166 %% Choose Kievan tsefaut clef
1167 clefGlyph = #"clefs.kievan.do"
1168 middleCClefPosition = #0
1169 middleCPosition = #0
1173 %% Accidentals are valid only once (if the following note is different)
1175 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1176 ,neo-modern-accidental-rule)
1177 autoCautionaries = #'()
1178 printKeyCancellation = ##f
1182 %% Keep the old definitions in here for compatibility (they erase previous
1183 %% settings to the corresponding context!).
1184 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
1185 %% into the desired context. That's just as easy, requires only one line more
1186 %% (the \*Staff), but preserves previous context mods.
1187 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
1188 RemoveEmptyStaffContext = \context {
1193 AncientRemoveEmptyStaffContext = \context {
1198 RemoveEmptyDrumStaffContext = \context {
1203 RemoveEmptyRhythmicStaffContext = \context {
1208 RemoveEmptyTabStaffContext = \context {