1 %%%% This file is part of LilyPond, the GNU music typesetter.
3 %%%% Copyright (C) 1996--2011 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
32 \type "Engraver_group"
34 \description "A context for displaying fret diagrams."
36 \consists "Fretboard_engraver"
37 \consists "Output_property_engraver"
38 \consists "Hara_kiri_engraver"
39 \consists "Separating_line_group_engraver"
40 \consists "Font_size_engraver"
41 \consists "Instrument_name_engraver"
43 %% explicitly set instrument, so it is not inherited from the parent
45 shortInstrumentName = #'()
47 predefinedDiagramTable = #default-fret-table
48 handleNegativeFrets = #'recalculate
52 \type "Engraver_group"
55 \consists "Output_property_engraver"
56 \consists "Bar_engraver"
57 \consists "Pure_from_neighbor_engraver"
58 %% Bar_engraver must be first so default bars aren't overwritten
61 \consists "Font_size_engraver"
62 \consists "Separating_line_group_engraver"
63 \consists "Dot_column_engraver"
64 \consists "Staff_collecting_engraver"
66 %% perhaps move to Voice context?
67 \consists "Ottava_spanner_engraver"
68 \consists "Clef_engraver"
69 \consists "Key_engraver"
70 \consists "Time_signature_engraver"
71 \consists "Ledger_line_engraver"
72 \consists "Staff_symbol_engraver"
73 \consists "Collision_engraver"
74 \consists "Grob_pq_engraver"
75 \consists "Rest_collision_engraver"
76 \consists "Accidental_engraver"
77 \consists "Piano_pedal_engraver"
78 \consists "Piano_pedal_align_engraver"
79 \consists "Instrument_name_engraver"
80 \consists "Axis_group_engraver"
81 \consists "Figured_bass_engraver"
82 \consists "Figured_bass_position_engraver"
83 \consists "Script_row_engraver"
84 \consists "Cue_clef_engraver"
86 localKeySignature = #'()
88 ignoreFiguredBassRest = ##f
90 %% explicitly set instrument, so we don't get
91 %% weird effects when doing instrument names for
94 shortInstrumentName = #'()
100 \description "Handles clefs, bar lines, keys, accidentals. It can contain
101 @code{Voice} contexts."
107 \type "Engraver_group"
111 \remove "Accidental_engraver"
112 \remove "Ottava_spanner_engraver"
113 \remove "Key_engraver"
114 \remove "Piano_pedal_engraver"
116 \description "Handles typesetting for percussion."
120 \defaultchild "DrumVoice"
122 clefGlyph = #"clefs.percussion"
124 \override Script #'staff-padding = #0.75
129 \type "Engraver_group"
131 \consists "Vertical_align_engraver"
132 topLevelAlignment = ##f
134 \consists "Instrument_name_engraver"
135 \consists "System_start_delimiter_engraver"
136 systemStartDelimiter = #'SystemStartBracket
137 %% explicitly set instrument, so it is not inherited from the parent
138 instrumentName = #'()
139 shortInstrumentName = #'()
141 shortVocalName = #'()
145 \accepts "RhythmicStaff"
146 \accepts "GrandStaff"
147 \accepts "PianoStaff"
149 \accepts "ChordNames"
150 \accepts "FiguredBass"
151 \accepts "ChoirStaff"
152 \accepts "StaffGroup"
153 \defaultchild "Staff"
154 \description "Identical to @code{StaffGroup} except that the
155 contained staves are not connected vertically."
159 \type "Engraver_group"
161 localKeySignature = #'()
164 squashedPosition = #0
168 \override BarLine #'bar-extent = #'(-2 . 2)
169 \override VoltaBracket #'staff-padding = #3
170 \override StaffSymbol #'line-count = #1
172 \override Stem #'neutral-direction = #UP
173 \override Beam #'neutral-direction = #UP
175 \consists "Output_property_engraver"
176 \consists "Font_size_engraver"
177 \consists "Separating_line_group_engraver"
178 \consists "Dot_column_engraver"
179 \consists "Bar_engraver"
180 \consists "Staff_symbol_engraver"
181 \consists "Pitch_squash_engraver"
182 \consists "Time_signature_engraver"
183 \consists "Instrument_name_engraver"
184 \consists "Axis_group_engraver"
185 \consists "Ledger_line_engraver"
187 %% explicitly set instrument, so it is not inherited from the parent
188 instrumentName = #'()
189 shortInstrumentName = #'()
193 \defaultchild "Voice"
195 \description "A context like @code{Staff} but for printing rhythms.
196 Pitches are ignored; the notes are printed on one line."
201 \type "Engraver_group"
204 \description "Corresponds to a voice on a staff. This context
205 handles the conversion of dynamic signs, stems, beams, super- and
206 subscripts, slurs, ties, and rests.
208 You have to instantiate this explicitly if you want to have
209 multiple voices on the same staff."
211 \consists "Font_size_engraver"
213 \consists "Pitched_trill_engraver"
214 \consists "Output_property_engraver"
215 \consists "Arpeggio_engraver"
216 \consists "Multi_measure_rest_engraver"
217 \consists "Text_spanner_engraver"
218 \consists "Trill_spanner_engraver"
219 \consists "Grob_pq_engraver"
220 \consists "Forbid_line_break_engraver"
221 \consists "Laissez_vibrer_engraver"
222 \consists "Repeat_tie_engraver"
223 \consists "Note_head_line_engraver"
224 \consists "Glissando_engraver"
225 \consists "Ligature_bracket_engraver"
226 \consists "Breathing_sign_engraver"
227 \consists "Note_heads_engraver"
228 \consists "Dots_engraver"
229 \consists "Rest_engraver"
230 \consists "Tweak_engraver"
231 \consists "Footnote_engraver"
233 %% switch on to make stem directions interpolate for the
235 % \consists "Melody_engraver"
237 \consists "Stem_engraver"
238 \consists "Beam_engraver"
239 \consists "Grace_beam_engraver"
240 \consists "Auto_beam_engraver"
242 %% must come before Script_column_engraver.
243 \consists "New_fingering_engraver"
245 \consists "Chord_tremolo_engraver"
246 \consists "Double_percent_repeat_engraver"
247 \consists "Percent_repeat_engraver"
248 \consists "Slash_repeat_engraver"
249 \consists "Part_combine_engraver"
251 \consists "Text_engraver"
252 \consists "New_dynamic_engraver"
253 \consists "Dynamic_align_engraver"
254 % \consists "Dynamic_engraver"
255 \consists "Fingering_engraver"
256 \consists "Bend_engraver"
258 \consists "Script_engraver"
259 \consists "Script_column_engraver"
260 \consists "Rhythmic_column_engraver"
261 \consists "Note_spacing_engraver"
262 \consists "Spanner_break_forbid_engraver"
263 \consists "Phrasing_slur_engraver"
264 \consists "Cluster_spanner_engraver"
265 \consists "Slur_engraver"
266 \consists "Tie_engraver"
267 \consists "Tuplet_engraver"
268 \consists "Grace_engraver"
269 \consists "Instrument_switch_engraver"
278 \override Stem #'length-fraction = #(magstep -4)
279 \override Beam #'length-fraction = #(magstep -4)
280 \override Beam #'beam-thickness = #0.35
288 \description "A voice on a percussion staff."
289 \remove "Arpeggio_engraver"
290 \consists "Grob_pq_engraver"
292 \remove "Note_head_line_engraver"
293 \remove "Glissando_engraver"
294 \remove "Ligature_bracket_engraver"
295 \remove "Note_heads_engraver"
296 \consists "Drum_notes_engraver"
297 \remove "New_fingering_engraver"
299 \remove "Fingering_engraver"
301 \remove "Cluster_spanner_engraver"
305 \type "Engraver_group"
307 localKeySignature = #'()
309 \description "A group of staves, with a brace on the left
310 side, grouping the staves together. The bar lines of the
311 contained staves are connected vertically."
313 \consists "Instrument_name_engraver"
314 \consists "Span_bar_engraver"
315 \consists "Span_bar_stub_engraver"
316 \consists "Span_arpeggio_engraver"
317 \consists "System_start_delimiter_engraver"
318 \consists "Vertical_align_engraver"
319 systemStartDelimiter = #'SystemStartBrace
320 topLevelAlignment = ##f
321 %% explicitly set instrument, so it is not inherited from the parent
322 instrumentName = #'()
323 shortInstrumentName = #'()
325 \defaultchild "Staff"
327 \accepts "RhythmicStaff"
331 \accepts "FiguredBass"
333 \accepts "ChordNames"
341 \description "Just like @code{GrandStaff}, but the staves are only removed
342 together, never separately."
344 \consists "Vertical_align_engraver"
345 \consists "Keep_alive_together_engraver"
346 topLevelAlignment = ##f
348 instrumentName = #'()
349 shortInstrumentName = #'()
353 \type "Engraver_group"
356 \consists "Vertical_align_engraver"
357 topLevelAlignment = ##f
359 \consists "Instrument_name_engraver"
360 \consists "Span_bar_engraver"
361 \consists "Span_bar_stub_engraver"
362 \consists "Span_arpeggio_engraver"
363 \consists "Output_property_engraver"
364 systemStartDelimiter = #'SystemStartBracket
365 %% explicitly set instrument, so it is not inherited from the parent
366 instrumentName = #'()
367 shortInstrumentName = #'()
369 \consists "System_start_delimiter_engraver"
371 \defaultchild "Staff"
373 \accepts "RhythmicStaff"
375 \accepts "GrandStaff"
376 \accepts "PianoStaff"
379 \accepts "ChordNames"
380 \accepts "FiguredBass"
381 \accepts "ChoirStaff"
382 \accepts "StaffGroup"
384 \description "Groups staves while adding a bracket on the left
385 side, grouping the staves together. The bar lines of the contained
386 staves are connected vertically. @code{StaffGroup} only consists of
387 a collection of staves, with a bracket in front and spanning bar lines."
391 \type "Engraver_group"
394 \consists "Output_property_engraver"
395 \consists "Bar_engraver"
396 \consists "Piano_pedal_engraver"
397 \consists "Script_engraver"
398 \consists "New_dynamic_engraver"
399 \consists "Dynamic_align_engraver"
400 \consists "Text_engraver"
401 \consists "Text_spanner_engraver"
402 \consists "Axis_group_engraver"
403 \consists "Tweak_engraver"
405 pedalSustainStrings = #'("Ped." "*Ped." "*")
406 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
407 \override VerticalAxisGroup #'staff-affinity = #CENTER
408 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
409 #'((basic-distance . 5)
411 \override TextScript #'font-shape = #'italic
412 \override DynamicLineSpanner #'Y-offset = #0
413 \override DynamicText #'X-offset =
414 #(ly:make-simple-closure
416 ,(ly:make-simple-closure
417 (list ly:self-alignment-interface::centered-on-note-columns))
418 ,(ly:make-simple-closure
419 (list ly:self-alignment-interface::x-aligned-on-self))))
421 \description "Holds a single line of dynamics, which will be
422 centered between the staves surrounding this context."
427 \type "Engraver_group"
429 \description "Corresponds to a voice with lyrics. Handles the
430 printing of a single line of lyrics."
433 \consists "Lyric_engraver"
434 \consists "Extender_engraver"
435 \consists "Hyphen_engraver"
436 \consists "Stanza_number_engraver"
437 \consists "Instrument_name_engraver"
438 \consists "Font_size_engraver"
439 \consists "Hara_kiri_engraver"
440 \consists "Pure_from_neighbor_engraver"
442 %% explicitly set instrument, so it is not inherited from the parent
443 instrumentName = #'()
444 shortInstrumentName = #'()
446 \override VerticalAxisGroup #'remove-first = ##t
447 \override VerticalAxisGroup #'remove-empty = ##t
448 \override VerticalAxisGroup #'staff-affinity = #UP
449 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
450 #'((basic-distance . 5.5)
452 (stretchability . 1))
453 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
454 #'((basic-distance . 0)
455 (minimum-distance . 2.8)
457 (stretchability . 0))
458 \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
459 \override InstrumentName #'self-alignment-Y = ##f
461 %% sync with define-grobs.scm ;
462 \override InstrumentName #'font-size = #1.0
464 %% make sure that barlines aren't collapsed, when
465 %% Bar_engraver is there.
466 \override BarLine #'bar-extent = #'(-0.05 . 0.05)
471 \type "Engraver_group"
473 \description "A context for printing the names of notes."
474 \consists "Axis_group_engraver"
476 \override VerticalAxisGroup #'staff-affinity = #UP
477 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
478 #'((basic-distance . 0)
479 (minimum-distance . 2.8)
481 (stretchability . 0))
482 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
483 #'((basic-distance . 5.5)
485 (stretchability . 1))
486 \override VerticalAxisGroup
487 #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
489 \consists "Tie_engraver"
490 \consists "Note_name_engraver"
491 \consists "Separating_line_group_engraver"
495 \type "Engraver_group"
497 \description "Typesets chord names."
499 \consists "Output_property_engraver"
500 \consists "Separating_line_group_engraver"
501 \consists "Chord_name_engraver"
502 \consists "Hara_kiri_engraver"
503 % \consists "Note_spacing_engraver"
504 \override VerticalAxisGroup #'remove-first = ##t
505 \override VerticalAxisGroup #'remove-empty = ##t
506 \override VerticalAxisGroup #'staff-affinity = #DOWN
507 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
508 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
512 \type "Score_engraver"
515 \description "This is the top level notation context. No
516 other context can contain a @code{Score} context. This context
517 handles the administration of time signatures. It also makes sure
518 that items such as clefs, time signatures, and key-signatures are
519 aligned across staves.
521 You cannot explicitly instantiate a @code{Score} context (since it
522 is not contained in any other context). It is instantiated
523 automatically when an output definition (a @code{\score} or
524 @code{\layout} block) is processed."
526 \consists "Paper_column_engraver"
527 \consists "Repeat_acknowledge_engraver"
528 \consists "Staff_collecting_engraver"
530 %% move the alias along with the engraver.
532 % timing translator must come BEFORE bar number engraver
533 \consists "Timing_translator"
534 \consists "Default_bar_line_engraver"
535 \consists "Output_property_engraver"
536 \consists "System_start_delimiter_engraver"
537 \consists "Mark_engraver"
538 \consists "Volta_engraver"
539 \consists "Metronome_mark_engraver"
540 \consists "Break_align_engraver"
541 \consists "Spacing_engraver"
542 \consists "Grace_spacing_engraver"
543 \consists "Vertical_align_engraver"
544 \consists "Stanza_number_align_engraver"
545 \consists "Bar_number_engraver"
546 \consists "Parenthesis_engraver"
547 \consists "Concurrent_hairpin_engraver"
548 \consists "Beam_collision_engraver"
550 \defaultchild "Staff"
552 \accepts "FretBoards"
554 \accepts "RhythmicStaff"
556 \accepts "VaticanaStaff"
557 \accepts "GregorianTranscriptionStaff"
558 \accepts "MensuralStaff"
559 \accepts "PetrucciStaff"
560 \accepts "StaffGroup"
563 \accepts "ChordNames"
564 \accepts "GrandStaff"
565 \accepts "ChoirStaff"
566 \accepts "PianoStaff"
569 \accepts "FiguredBass"
572 noteToFretFunction = #determine-frets
573 predefinedDiagramTable = ##f
575 soloIIText = #"Solo II"
577 printPartCombineTexts = ##t
578 partCombineTextsOnNote = ##t
579 systemStartDelimiter =#'SystemStartBar
581 drumStyleTable = #drums-style
583 melismaBusyProperties = #default-melisma-properties
585 clefGlyph = #"clefs.G"
587 middleCClefPosition = #-6
588 middleCPosition = #-6
591 crescendoSpanner = #'hairpin
592 decrescendoSpanner = #'hairpin
594 defaultBarType = #"|"
595 doubleRepeatType = #":|:"
596 barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
597 barNumberFormatter = #robust-bar-number-function
600 explicitClefVisibility = #all-visible
601 explicitCueClefVisibility = #end-of-line-invisible
602 explicitKeySignatureVisibility = #all-visible
603 implicitTimeSignatureVisibility = #end-of-line-invisible
605 repeatCountVisibility = #all-repeat-counts-visible
607 timeSignatureSettings = #default-time-signature-settings
608 timeSignatureFraction = #'(4 . 4)
610 %% These defaults should be the same as the rules established in
611 %% scm/time-signature-settings.scm for 4/4 time
612 measureLength = #(ly:make-moment 4 4)
613 baseMoment = #(ly:make-moment 1 4)
614 beatStructure = #'(1 1 1 1)
615 beamExceptions = #'((end . (((1 . 8) . (4 4))
616 ((1 . 12) . (3 3 3 3)))))
618 autoBeamCheck = #default-auto-beam-check
620 scriptDefinitions = #default-script-alist
622 pedalSustainStrings = #'("Ped." "*Ped." "*")
623 pedalSustainStyle = #'text
624 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
625 pedalUnaCordaStyle = #'text
627 %% These are in ordinary italic font, including the *,
628 %% but they are unlikely to be used,
629 %% as the default pedal-style for SostenutoPedal is 'mixed':
630 %% i.e. Sost. Ped_____________________
631 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
632 pedalSostenutoStyle = #'mixed
634 harmonicAccidentals = ##t
635 fingeringOrientations = #'(up down)
636 stringNumberOrientations = #'(up down)
637 strokeFingerOrientations = #'(right)
639 lyricMelismaAlignment = #LEFT
640 markFormatter = #format-mark-letters
644 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
645 autoCautionaries = #'()
647 printKeyCancellation = ##t
648 keyAlterationOrder = #`(
649 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
650 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
651 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
652 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
655 barCheckSynchronize = ##f
658 chordNameFunction = #ignatzek-chord-names
659 minorChordModifier = #(make-simple-markup "m")
660 additionalPitchPrefix = #"" % was "add"
661 majorSevenSymbol = #whiteTriangleMarkup
662 chordNameLowercaseMinor = ##f
663 chordNameSeparator = #(make-hspace-markup 0.5)
664 slashChordSeparator = #(make-simple-markup "/")
665 chordNameExceptions = #ignatzekExceptions
666 chordNoteNamer = #'()
667 chordRootNamer = #note-name->markup
668 chordPrefixSpacer = #0
669 chordNameExceptionsFull = #fullJazzExceptions
670 chordNameExceptionsPartial = #partialJazzExceptions
671 noChordSymbol = #(make-simple-markup "N.C.")
673 bassStaffProperties = #'((assign clefGlyph "clefs.F")
674 (assign clefPosition 2)
675 (assign middleCPosition 6)
676 (assign middleCClefPosition 6))
678 stringOneTopmost = ##t
681 %% One may change the string tunings as follows :
682 %% The length of the list must be equal to the number of strings
683 stringTunings = #guitar-tuning
684 tablatureFormat = #fret-number-tablature-format
685 tabStaffLineLayoutFunction = #tablature-position-on-lines
688 figuredBassFormatter = #format-bass-figure
689 metronomeMarkFormatter = #format-metronome-markup
692 %% See also make-voice-props-set
694 (Voice Stem direction ,UP)
695 (Voice Stem font-size -3)
696 (Voice Flag font-size -3)
697 (Voice NoteHead font-size -3)
698 (Voice TabNoteHead font-size -4)
699 (Voice Dots font-size -3)
700 (Voice Stem length-fraction 0.8)
701 (Voice Stem no-stem-extend #t)
702 (Voice Beam beam-thickness 0.384)
703 (Voice Beam length-fraction 0.8)
704 (Voice Accidental font-size -4)
705 (Voice AccidentalCautionary font-size -4)
706 (Voice Slur direction ,DOWN)
707 (Voice Script font-size -3)
708 (Voice Fingering font-size -8)
709 (Voice StringNumber font-size -8)
712 keepAliveInterfaces = #'(
713 bass-figure-interface
715 cluster-beacon-interface
716 fret-diagram-interface
717 lyric-syllable-interface
719 tab-note-head-interface
721 percent-repeat-item-interface
722 percent-repeat-interface
724 ;; need this, as stanza numbers are items, and appear only once.
725 stanza-number-interface
727 % \quoteDuring is supposed to quote everything, cueDuring only the essentials
728 quotedEventTypes = #'(StreamEvent)
729 quotedCueEventTypes = #'(
735 instrumentTransposition = #(ly:make-pitch 0 0 0)
737 topLevelAlignment = ##t
746 \type "Engraver_group"
748 \description "A context for printing a figured bass line."
750 \consists "Figured_bass_engraver"
751 \consists "Separating_line_group_engraver"
752 \consists "Hara_kiri_engraver"
754 \override VerticalAxisGroup #'remove-empty = ##t
755 \override VerticalAxisGroup #'remove-first = ##t
756 \override VerticalAxisGroup #'staff-affinity = #UP
757 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
758 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
763 \type "Engraver_group"
765 %% don't want to route anything out of here:
768 \description "Silently discards all musical information given to this
776 \consists "Tab_note_heads_engraver"
777 \consists "Tab_tie_follow_engraver"
779 \remove "Note_heads_engraver"
780 \remove "Fingering_engraver"
781 \remove "New_fingering_engraver"
783 \description "Context for drawing notes in a Tab staff."
785 %% TabStaff increase the staff-space, which in turn
786 %% increases beam thickness and spacing; beams are
787 %% too big. We have to adjust the beam settings:
788 \override Beam #'beam-thickness = #0.32
789 \override Beam #'length-fraction = #0.62
790 %% the same goes for tremolo beams
791 \override StemTremolo #'beam-thickness = #0.32
792 %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
793 %% and the tablature staff space is scaled (1.5 by default),
794 %% so we use the inversion of the scale factor:
795 \override StemTremolo #'length-fraction = #(lambda (grob)
796 (/ 1 (ly:staff-symbol-staff-space grob)))
797 \override StemTremolo #'beam-width = #stem-tremolo::calc-tab-width
799 %% No accidental in tablature !
800 \remove "Accidental_engraver"
801 %% make the Stems as short as possible to minimize their influence
802 %% on the slur::calc-control-points routine
803 \override Stem #'no-stem-extend = ##t
804 \override Flag #'style = #'no-flag
805 \override Stem #'details = #'((lengths 0 0 0 0 0 0)
806 (beamed-lengths 0 0 0)
807 (beamed-minimum-free-lengths 0 0 0)
808 (beamed-extreme-minimum-free-lengths 0 0)
810 %% after all, the stubs of the stems may still be visible, so ...
811 \override Stem #'transparent = ##t
812 \override Flag #'transparent = ##t
813 %% automatic beams should be suppressed for similar reasons ...
815 %% remove beams, dots and rests ...
816 \override Beam #'stencil = ##f
817 \override StemTremolo #'stencil = ##f
818 \override Dots #'stencil = ##f
819 \override Rest #'stencil = ##f
820 \override MultiMeasureRest #'stencil = ##f
821 \override MultiMeasureRestNumber #'transparent = ##t
822 \override MultiMeasureRestText #'transparent = ##t
823 %% ... all kinds of ties/slurs
824 \override Tie #'stencil = ##f
825 \override RepeatTie #'stencil = ##f
826 \override LaissezVibrerTie #'stencil = ##f
827 \override Slur #'stencil = #slur::draw-tab-slur
828 \override PhrasingSlur #'stencil = ##f
829 %% 'tied to' fret numbers become invisible or parenthesized, respectively)
830 \override Tie #'after-line-breaking = #tie::handle-tab-note-head
831 \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
832 %% ... and all kinds of markups, spanners etc.
833 \override TupletBracket #'stencil = ##f
834 \override TupletNumber #'stencil = ##f
835 \override DynamicText #'transparent = ##t
836 \override DynamicTextSpanner #'stencil = ##f
837 \override TextSpanner #'stencil = ##f
838 \override Hairpin #'transparent = ##t
839 \override Script #'stencil = ##f
840 \override TextScript #'stencil = ##f
841 \override Glissando #'stencil = #glissando::draw-tab-glissando
842 %% the direction for glissando lines will be automatically corrected
843 \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
844 \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
846 \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
849 \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
850 \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
858 \consists "Tab_staff_symbol_engraver"
860 \description "Context for generating tablature. It accepts only @code{TabVoice}
861 contexts and handles the line spacing, the tablature clef etc. properly."
864 \defaultchild "TabVoice"
866 %% 6 strings, bigger spacing
867 \override StaffSymbol #'staff-space = #1.5
869 %% Don't draw stems over the tablature figures !
870 \override Stem #'avoid-note-head = ##t
872 %% No accidental in tablature !
873 \remove "Accidental_engraver"
874 \remove "Key_engraver"
876 \remove "Ottava_spanner_engraver"
878 \override Clef #'stencil = #clef::print-modern-tab-if-set
880 \override TimeSignature #'stencil = ##f
882 \override Arpeggio #'stencil = ##f
883 %% we ignore collision warnings that may occur due to
884 %% stem overlapping, because we have no stems ;-)
885 \override NoteColumn #'ignore-collision = ##t
886 %% Special "TAB" clef
887 clefGlyph = #"clefs.tab"
889 %% Change string if note results in negative fret number
890 handleNegativeFrets = #'recalculate
895 \name "VaticanaVoice"
897 \description "Same as @code{Voice} context, except that it is
898 accommodated for typesetting Gregorian Chant in the notational style
901 \remove "Slur_engraver"
902 \remove "Stem_engraver"
903 \remove "Ligature_bracket_engraver"
904 \consists "Vaticana_ligature_engraver"
905 \remove "Text_spanner_engraver"
906 \consists "Episema_engraver"
908 %% Set default head for notes outside of \[ \].
909 \override NoteHead #'style = #'vaticana.punctum
911 %% Put some space before and after divisiones.
912 %% FIXME: This does not seem to show any effect.
913 \override Script #'padding = #0.5
915 %% There are no beams in Gregorian Chant notation.
921 \name "VaticanaStaff"
924 \accepts "VaticanaVoice"
925 \defaultchild "VaticanaVoice"
927 \description "Same as @code{Staff} context, except that it is
928 accommodated for typesetting Gregorian Chant in the notational style
931 \remove "Time_signature_engraver"
932 \consists "Custos_engraver"
934 %% We can not remove Bar_engraver; otherwise clefs and custodes will
935 %% not show up any more among other line breaking issues.
936 %% Instead, we make the grob transparent.
937 \override BarLine #'transparent = ##t
939 \override StaffSymbol #'line-count = #4
940 \override StaffSymbol #'thickness = #0.6
942 %% FIXME: unit on StaffSymbol's width should be \linewidth.
943 %% \override StaffSymbol #'width = #60.0
945 %% Choose vaticana do clef on 3rd line as default.
946 clefGlyph = #"clefs.vaticana.do"
948 middleCClefPosition = #1
952 %% Select vaticana style font.
953 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
954 \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
955 \override Custos #'style = #'vaticana
956 \override Custos #'neutral-position = #3
957 \override Custos #'neutral-direction = #DOWN
958 \override Dots #'style = #'vaticana
963 \name "GregorianTranscriptionVoice"
965 \consists "Episema_engraver"
967 %% Removing ligature bracket engraver without replacing it by some
968 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
969 %% warning for every "\[" and "\]". Therefore, we make the grob
970 %% transparent instead.
971 \override LigatureBracket #'transparent = ##t
973 %% Put some space before and after divisiones.
974 %% FIXME: This does not seem to show any effect.
975 \override Script #'padding = #0.5
977 %% There are no beams in Gregorian Chant notation.
984 \name "GregorianTranscriptionStaff"
987 \accepts "GregorianTranscriptionVoice"
988 \defaultchild "GregorianTranscriptionVoice"
990 %% We can not remove Bar_engraver; otherwise clefs and custodes will
991 %% not show up any more among other line breaking issues.
992 %% Instead, we make the grob transparent.
993 \override BarLine #'transparent = ##t
998 \name "MensuralVoice"
1000 \description "Same as @code{Voice} context, except that it is
1001 accommodated for typesetting a piece in mensural style."
1003 \remove "Slur_engraver"
1004 \remove "Ligature_bracket_engraver"
1005 \consists "Mensural_ligature_engraver"
1007 %% Set default head for notes outside of \[ \].
1008 \override NoteHead #'style = #'mensural
1009 \override Rest #'style = #'mensural
1010 \override Flag #'style = #'mensural
1012 %% There are no beams in mensural notation.
1018 \name "MensuralStaff"
1021 \defaultchild "MensuralVoice"
1022 \accepts "MensuralVoice"
1023 \description "Same as @code{Staff} context, except that it is
1024 accommodated for typesetting a piece in mensural style."
1026 \consists "Custos_engraver"
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
1033 \override StaffSymbol #'thickness = #0.6
1035 %% FIXME: unit on StaffSymbol's width should be \linewidth.
1036 %% \override StaffSymbol #'width = #60.0
1038 %% Choose mensural g clef on 2nd line as default.
1039 clefGlyph = #"clefs.mensural.g"
1040 middleCClefPosition = #-6
1041 middleCPosition = #-6
1045 %% Select mensural style font.
1046 \override TimeSignature #'style = #'mensural
1047 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1048 \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1049 \override Custos #'style = #'mensural
1050 \override Custos #'neutral-position = #3
1051 \override Custos #'neutral-direction = #DOWN
1053 %% Accidentals are valid only once (same as
1054 %% \accidentalStyle "forget")
1056 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
1057 autoCautionaries = #'()
1058 printKeyCancellation = ##f
1063 \name "PetrucciVoice"
1065 \description "Same as @code{Voice} context, except that it is
1066 accommodated for typesetting a piece in Petrucci style."
1068 \remove "Ligature_bracket_engraver"
1069 \consists "Mensural_ligature_engraver"
1071 %% Set glyph styles.
1072 \override NoteHead #'style = #'petrucci
1073 \override Rest #'style = #'mensural
1075 % Thickens and shortens stems.
1076 \override Stem #'thickness = #1.7
1077 \override Stem #'length = #5
1079 %% There are no beams in Petrucci notation.
1085 \name "PetrucciStaff"
1088 \defaultchild "PetrucciVoice"
1089 \accepts "PetrucciVoice"
1090 \description "Same as @code{Staff} context, except that it is
1091 accommodated for typesetting a piece in Petrucci style."
1093 \consists "Custos_engraver"
1095 \override StaffSymbol #'thickness = #1.3
1097 %% Choose Petrucci g clef on 2nd line as default.
1098 clefGlyph = #"clefs.petrucci.g"
1099 middleCClefPosition = #-6
1100 middleCPosition = #-6
1104 \override Custos #'style = #'mensural
1105 \override Custos #'neutral-position = #3
1106 \override Custos #'neutral-direction = #DOWN
1108 %% Accidentals are valid only once (if the following note is different)
1110 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1111 ,neo-modern-accidental-rule)
1112 autoCautionaries = #'()
1113 printKeyCancellation = ##f
1116 %% Keep the old definitions in here for compatibility (they erase previous
1117 %% settings to the corresponding context!).
1118 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
1119 %% into the desired context. That's just as easy, requires only one line more
1120 %% (the \*Staff), but preserves previous context mods.
1121 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
1122 RemoveEmptyStaffContext = \context {
1127 AncientRemoveEmptyStaffContext = \context {
1132 RemoveEmptyDrumStaffContext = \context {
1137 RemoveEmptyRhythmicStaffContext = \context {
1142 RemoveEmptyTabStaffContext = \context {