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
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
49 restrainOpenStrings = ##f
53 \type "Engraver_group"
56 \consists "Output_property_engraver"
57 \consists "Bar_engraver"
58 \consists "Pure_from_neighbor_engraver"
59 %% Bar_engraver must be first so default bars aren't overwritten
62 \consists "Font_size_engraver"
63 \consists "Separating_line_group_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 "Dot_column_engraver"
230 \consists "Rest_engraver"
231 \consists "Tweak_engraver"
232 \consists "Footnote_engraver"
234 %% switch on to make stem directions interpolate for the
236 % \consists "Melody_engraver"
238 \consists "Stem_engraver"
239 \consists "Beam_engraver"
240 \consists "Grace_beam_engraver"
241 \consists "Auto_beam_engraver"
243 %% must come before Script_column_engraver.
244 \consists "New_fingering_engraver"
246 \consists "Chord_tremolo_engraver"
247 \consists "Double_percent_repeat_engraver"
248 \consists "Percent_repeat_engraver"
249 \consists "Slash_repeat_engraver"
250 \consists "Part_combine_engraver"
252 \consists "Text_engraver"
253 \consists "New_dynamic_engraver"
254 \consists "Dynamic_align_engraver"
255 % \consists "Dynamic_engraver"
256 \consists "Fingering_engraver"
257 \consists "Bend_engraver"
259 \consists "Script_engraver"
260 \consists "Script_column_engraver"
261 \consists "Rhythmic_column_engraver"
262 \consists "Note_spacing_engraver"
263 \consists "Spanner_break_forbid_engraver"
264 \consists "Phrasing_slur_engraver"
265 \consists "Cluster_spanner_engraver"
266 \consists "Slur_engraver"
267 \consists "Tie_engraver"
268 \consists "Tuplet_engraver"
269 \consists "Grace_engraver"
270 \consists "Instrument_switch_engraver"
279 \override Stem #'length-fraction = #(magstep -4)
280 \override Beam #'length-fraction = #(magstep -4)
281 \override Beam #'beam-thickness = #0.35
289 \description "A voice on a percussion staff."
290 \remove "Arpeggio_engraver"
291 \consists "Grob_pq_engraver"
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"
300 \remove "Fingering_engraver"
302 \remove "Cluster_spanner_engraver"
306 \type "Engraver_group"
308 localKeySignature = #'()
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."
314 \consists "Instrument_name_engraver"
315 \consists "Span_bar_engraver"
316 \consists "Span_bar_stub_engraver"
317 \consists "Span_arpeggio_engraver"
318 \consists "System_start_delimiter_engraver"
319 \consists "Vertical_align_engraver"
320 systemStartDelimiter = #'SystemStartBrace
321 topLevelAlignment = ##f
322 %% explicitly set instrument, so it is not inherited from the parent
323 instrumentName = #'()
324 shortInstrumentName = #'()
326 \defaultchild "Staff"
328 \accepts "RhythmicStaff"
332 \accepts "FiguredBass"
334 \accepts "ChordNames"
342 \description "Just like @code{GrandStaff}, but the staves are only removed
343 together, never separately."
345 \consists "Vertical_align_engraver"
346 \consists "Keep_alive_together_engraver"
347 topLevelAlignment = ##f
349 instrumentName = #'()
350 shortInstrumentName = #'()
354 \type "Engraver_group"
357 \consists "Vertical_align_engraver"
358 topLevelAlignment = ##f
360 \consists "Instrument_name_engraver"
361 \consists "Span_bar_engraver"
362 \consists "Span_bar_stub_engraver"
363 \consists "Span_arpeggio_engraver"
364 \consists "Output_property_engraver"
365 systemStartDelimiter = #'SystemStartBracket
366 %% explicitly set instrument, so it is not inherited from the parent
367 instrumentName = #'()
368 shortInstrumentName = #'()
370 \consists "System_start_delimiter_engraver"
372 \defaultchild "Staff"
374 \accepts "RhythmicStaff"
376 \accepts "GrandStaff"
377 \accepts "PianoStaff"
380 \accepts "ChordNames"
381 \accepts "FiguredBass"
382 \accepts "ChoirStaff"
383 \accepts "StaffGroup"
385 \description "Groups staves while adding a bracket on the left
386 side, grouping the staves together. The bar lines of the contained
387 staves are connected vertically. @code{StaffGroup} only consists of
388 a collection of staves, with a bracket in front and spanning bar lines."
392 \type "Engraver_group"
395 \consists "Output_property_engraver"
396 \consists "Bar_engraver"
397 \consists "Piano_pedal_engraver"
398 \consists "Script_engraver"
399 \consists "New_dynamic_engraver"
400 \consists "Dynamic_align_engraver"
401 \consists "Text_engraver"
402 \consists "Text_spanner_engraver"
403 \consists "Axis_group_engraver"
404 \consists "Tweak_engraver"
406 pedalSustainStrings = #'("Ped." "*Ped." "*")
407 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
408 \override VerticalAxisGroup #'staff-affinity = #CENTER
409 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
410 #'((basic-distance . 5)
412 \override TextScript #'font-shape = #'italic
413 \override DynamicLineSpanner #'Y-offset = #0
414 \override DynamicText #'X-offset =
415 #(ly:make-simple-closure
417 ,(ly:make-simple-closure
418 (list ly:self-alignment-interface::centered-on-note-columns))
419 ,(ly:make-simple-closure
420 (list ly:self-alignment-interface::x-aligned-on-self))))
422 \description "Holds a single line of dynamics, which will be
423 centered between the staves surrounding this context."
428 \type "Engraver_group"
430 \description "Corresponds to a voice with lyrics. Handles the
431 printing of a single line of lyrics."
434 \consists "Lyric_engraver"
435 \consists "Extender_engraver"
436 \consists "Hyphen_engraver"
437 \consists "Stanza_number_engraver"
438 \consists "Instrument_name_engraver"
439 \consists "Font_size_engraver"
440 \consists "Hara_kiri_engraver"
441 \consists "Pure_from_neighbor_engraver"
443 %% explicitly set instrument, so it is not inherited from the parent
444 instrumentName = #'()
445 shortInstrumentName = #'()
447 \override VerticalAxisGroup #'remove-first = ##t
448 \override VerticalAxisGroup #'remove-empty = ##t
449 \override VerticalAxisGroup #'staff-affinity = #UP
450 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
451 #'((basic-distance . 5.5)
453 (stretchability . 1))
454 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
455 #'((basic-distance . 0)
456 (minimum-distance . 2.8)
458 (stretchability . 0))
459 \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
460 \override InstrumentName #'self-alignment-Y = ##f
462 %% sync with define-grobs.scm ;
463 \override InstrumentName #'font-size = #1.0
465 %% make sure that barlines aren't collapsed, when
466 %% Bar_engraver is there.
467 \override BarLine #'bar-extent = #'(-0.05 . 0.05)
472 \type "Engraver_group"
474 \description "A context for printing the names of notes."
475 \consists "Axis_group_engraver"
477 \override VerticalAxisGroup #'staff-affinity = #UP
478 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
479 #'((basic-distance . 0)
480 (minimum-distance . 2.8)
482 (stretchability . 0))
483 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
484 #'((basic-distance . 5.5)
486 (stretchability . 1))
487 \override VerticalAxisGroup
488 #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
490 \consists "Tie_engraver"
491 \consists "Note_name_engraver"
492 \consists "Separating_line_group_engraver"
496 \type "Engraver_group"
498 \description "Typesets chord names."
500 \consists "Output_property_engraver"
501 \consists "Separating_line_group_engraver"
502 \consists "Chord_name_engraver"
503 \consists "Hara_kiri_engraver"
504 % \consists "Note_spacing_engraver"
505 \override VerticalAxisGroup #'remove-first = ##t
506 \override VerticalAxisGroup #'remove-empty = ##t
507 \override VerticalAxisGroup #'staff-affinity = #DOWN
508 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
509 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
513 \type "Score_engraver"
516 \description "This is the top level notation context. No
517 other context can contain a @code{Score} context. This context
518 handles the administration of time signatures. It also makes sure
519 that items such as clefs, time signatures, and key-signatures are
520 aligned across staves.
522 You cannot explicitly instantiate a @code{Score} context (since it
523 is not contained in any other context). It is instantiated
524 automatically when an output definition (a @code{\score} or
525 @code{\layout} block) is processed."
527 \consists "Paper_column_engraver"
528 \consists "Repeat_acknowledge_engraver"
529 \consists "Staff_collecting_engraver"
531 %% move the alias along with the engraver.
533 % timing translator must come BEFORE bar number engraver
534 \consists "Timing_translator"
535 \consists "Default_bar_line_engraver"
536 \consists "Output_property_engraver"
537 \consists "System_start_delimiter_engraver"
538 \consists "Mark_engraver"
539 \consists "Volta_engraver"
540 \consists "Metronome_mark_engraver"
541 \consists "Break_align_engraver"
542 \consists "Spacing_engraver"
543 \consists "Grace_spacing_engraver"
544 \consists "Vertical_align_engraver"
545 \consists "Stanza_number_align_engraver"
546 \consists "Bar_number_engraver"
547 \consists "Parenthesis_engraver"
548 \consists "Concurrent_hairpin_engraver"
549 \consists "Beam_collision_engraver"
551 \defaultchild "Staff"
553 \accepts "FretBoards"
555 \accepts "RhythmicStaff"
557 \accepts "VaticanaStaff"
558 \accepts "GregorianTranscriptionStaff"
559 \accepts "MensuralStaff"
560 \accepts "PetrucciStaff"
561 \accepts "StaffGroup"
563 \accepts "KievanStaff"
565 \accepts "ChordNames"
566 \accepts "GrandStaff"
567 \accepts "ChoirStaff"
568 \accepts "PianoStaff"
571 \accepts "FiguredBass"
573 noteToFretFunction = #determine-frets
574 predefinedDiagramTable = ##f
576 soloIIText = #"Solo II"
578 printPartCombineTexts = ##t
579 partCombineTextsOnNote = ##t
580 systemStartDelimiter =#'SystemStartBar
582 drumStyleTable = #drums-style
584 melismaBusyProperties = #default-melisma-properties
586 clefGlyph = #"clefs.G"
588 middleCClefPosition = #-6
589 middleCPosition = #-6
592 crescendoSpanner = #'hairpin
593 decrescendoSpanner = #'hairpin
595 defaultBarType = #"|"
596 doubleRepeatType = #":|:"
597 barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
598 barNumberFormatter = #robust-bar-number-function
601 explicitClefVisibility = #all-visible
602 explicitCueClefVisibility = #end-of-line-invisible
603 explicitKeySignatureVisibility = #all-visible
604 implicitTimeSignatureVisibility = #end-of-line-invisible
606 repeatCountVisibility = #all-repeat-counts-visible
608 timeSignatureSettings = #default-time-signature-settings
609 timeSignatureFraction = #'(4 . 4)
611 %% These defaults should be the same as the rules established in
612 %% scm/time-signature-settings.scm for 4/4 time
613 measureLength = #(ly:make-moment 4 4)
614 baseMoment = #(ly:make-moment 1 4)
615 beatStructure = #'(1 1 1 1)
616 beamExceptions = #'((end . (((1 . 8) . (4 4))
617 ((1 . 12) . (3 3 3 3)))))
618 beamWholeMeasure = ##t
619 beamHalfMeasure = ##f
622 autoBeamCheck = #default-auto-beam-check
624 scriptDefinitions = #default-script-alist
626 pedalSustainStrings = #'("Ped." "*Ped." "*")
627 pedalSustainStyle = #'text
628 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
629 pedalUnaCordaStyle = #'text
631 %% These are in ordinary italic font, including the *,
632 %% but they are unlikely to be used,
633 %% as the default pedal-style for SostenutoPedal is 'mixed':
634 %% i.e. Sost. Ped_____________________
635 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
636 pedalSostenutoStyle = #'mixed
638 harmonicAccidentals = ##t
639 fingeringOrientations = #'(up down)
640 stringNumberOrientations = #'(up down)
641 strokeFingerOrientations = #'(right)
643 lyricMelismaAlignment = #LEFT
644 markFormatter = #format-mark-letters
648 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
649 autoCautionaries = #'()
651 printKeyCancellation = ##t
652 keyAlterationOrder = #`(
653 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
654 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
655 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
656 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
659 barCheckSynchronize = ##f
662 chordNameFunction = #ignatzek-chord-names
663 minorChordModifier = #(make-simple-markup "m")
664 additionalPitchPrefix = #"" % was "add"
665 majorSevenSymbol = #whiteTriangleMarkup
666 chordNameLowercaseMinor = ##f
667 chordNameSeparator = #(make-hspace-markup 0.5)
668 slashChordSeparator = #(make-simple-markup "/")
669 chordNameExceptions = #ignatzekExceptions
670 chordNoteNamer = #'()
671 chordRootNamer = #note-name->markup
672 chordPrefixSpacer = #0
673 chordNameExceptionsFull = #fullJazzExceptions
674 chordNameExceptionsPartial = #partialJazzExceptions
675 noChordSymbol = #(make-simple-markup "N.C.")
677 bassStaffProperties = #'((assign clefGlyph "clefs.F")
678 (assign clefPosition 2)
679 (assign middleCPosition 6)
680 (assign middleCClefPosition 6))
682 stringOneTopmost = ##t
685 %% One may change the string tunings as follows :
686 %% The length of the list must be equal to the number of strings
687 stringTunings = #guitar-tuning
688 tablatureFormat = #fret-number-tablature-format
689 tabStaffLineLayoutFunction = #tablature-position-on-lines
692 figuredBassFormatter = #format-bass-figure
693 metronomeMarkFormatter = #format-metronome-markup
696 %% See also make-voice-props-set
698 (Voice Stem direction ,UP)
699 (Voice Stem font-size -3)
700 (Voice Flag font-size -3)
701 (Voice NoteHead font-size -3)
702 (Voice TabNoteHead font-size -4)
703 (Voice Dots font-size -3)
704 (Voice Stem length-fraction 0.8)
705 (Voice Stem no-stem-extend #t)
706 (Voice Beam beam-thickness 0.384)
707 (Voice Beam length-fraction 0.8)
708 (Voice Accidental font-size -4)
709 (Voice AccidentalCautionary font-size -4)
710 (Voice Slur direction ,DOWN)
711 (Voice Script font-size -3)
712 (Voice Fingering font-size -8)
713 (Voice StringNumber font-size -8)
716 keepAliveInterfaces = #'(
717 bass-figure-interface
719 cluster-beacon-interface
720 fret-diagram-interface
721 lyric-syllable-interface
723 tab-note-head-interface
725 percent-repeat-item-interface
726 percent-repeat-interface
728 ;; need this, as stanza numbers are items, and appear only once.
729 stanza-number-interface
731 % \quoteDuring is supposed to quote everything, cueDuring only the essentials
732 quotedEventTypes = #'(StreamEvent)
733 quotedCueEventTypes = #'(
739 instrumentTransposition = #(ly:make-pitch 0 0 0)
741 topLevelAlignment = ##t
750 \type "Engraver_group"
752 \description "A context for printing a figured bass line."
754 \consists "Figured_bass_engraver"
755 \consists "Separating_line_group_engraver"
756 \consists "Hara_kiri_engraver"
758 \override VerticalAxisGroup #'remove-empty = ##t
759 \override VerticalAxisGroup #'remove-first = ##t
760 \override VerticalAxisGroup #'staff-affinity = #UP
761 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
762 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
767 \type "Engraver_group"
769 %% don't want to route anything out of here:
772 \description "Silently discards all musical information given to this
780 \consists "Tab_note_heads_engraver"
781 \consists "Tab_tie_follow_engraver"
783 \remove "Note_heads_engraver"
784 \remove "Fingering_engraver"
785 \remove "New_fingering_engraver"
786 \remove "Pitched_trill_engraver"
788 \description "Context for drawing notes in a Tab staff."
790 %% TabStaff increase the staff-space, which in turn
791 %% increases beam thickness and spacing; beams are
792 %% too big. We have to adjust the beam settings:
793 \override Beam #'beam-thickness = #0.32
794 \override Beam #'length-fraction = #0.62
795 %% the same goes for tremolo beams
796 \override StemTremolo #'beam-thickness = #0.32
797 %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
798 %% and the tablature staff space is scaled (1.5 by default),
799 %% so we use the inversion of the scale factor:
800 \override StemTremolo #'length-fraction = #(lambda (grob)
801 (/ 1 (ly:staff-symbol-staff-space grob)))
802 \override StemTremolo #'beam-width = #stem-tremolo::calc-tab-width
804 %% No accidental in tablature !
805 \remove "Accidental_engraver"
806 %% make the Stems as short as possible to minimize their influence
807 %% on the slur::calc-control-points routine
808 \override Stem #'no-stem-extend = ##t
809 \override Flag #'style = #'no-flag
810 \override Stem #'details = #'((lengths 0 0 0 0 0 0)
811 (beamed-lengths 0 0 0)
812 (beamed-minimum-free-lengths 0 0 0)
813 (beamed-extreme-minimum-free-lengths 0 0)
815 %% after all, the stubs of the stems may still be visible, so ...
816 \override Stem #'stencil = ##f
817 \override Flag #'stencil = ##f
818 %% automatic beams should be suppressed for similar reasons ...
820 %% remove beams, dots and rests ...
821 \override Beam #'stencil = ##f
822 \override StemTremolo #'stencil = ##f
823 \override Dots #'stencil = ##f
824 \override Rest #'stencil = ##f
825 \override MultiMeasureRest #'stencil = ##f
826 \override MultiMeasureRestNumber #'stencil = ##f
827 \override MultiMeasureRestText #'stencil = ##f
828 %% ... all kinds of ties/slurs
829 \override Tie #'stencil = ##f
830 \override RepeatTie #'stencil = ##f
831 \override LaissezVibrerTie #'stencil = ##f
832 \override Slur #'stencil = #slur::draw-tab-slur
833 \override PhrasingSlur #'stencil = ##f
834 %% 'tied to' fret numbers become invisible or parenthesized, respectively)
835 \override Tie #'after-line-breaking = #tie::handle-tab-note-head
836 \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
837 %% ... and all kinds of markups, spanners etc.
838 \override TupletBracket #'stencil = ##f
839 \override TupletNumber #'stencil = ##f
840 \override DynamicText #'stencil = ##f
841 \override DynamicTextSpanner #'stencil = ##f
842 \override TextSpanner #'stencil = ##f
843 \override Hairpin #'stencil = ##f
844 \override Script #'stencil = ##f
845 \override TextScript #'stencil = ##f
846 \override Glissando #'stencil = #glissando::draw-tab-glissando
847 %% the direction for glissando lines will be automatically corrected
848 \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
849 \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
851 \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
854 \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
855 \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
863 \consists "Tab_staff_symbol_engraver"
865 \description "Context for generating tablature. It accepts only @code{TabVoice}
866 contexts and handles the line spacing, the tablature clef etc. properly."
869 \defaultchild "TabVoice"
871 %% 6 strings, bigger spacing
872 \override StaffSymbol #'staff-space = #1.5
874 %% Don't draw stems over the tablature figures !
875 \override Stem #'avoid-note-head = ##t
877 %% No accidental in tablature !
878 \remove "Accidental_engraver"
879 \remove "Key_engraver"
881 \remove "Ottava_spanner_engraver"
883 \override Clef #'stencil = #clef::print-modern-tab-if-set
885 \override TimeSignature #'stencil = ##f
887 \override Arpeggio #'stencil = ##f
888 %% we ignore collision warnings that may occur due to
889 %% stem overlapping, because we have no stems ;-)
890 \override NoteColumn #'ignore-collision = ##t
891 %% Special "TAB" clef
892 clefGlyph = #"clefs.tab"
894 %% Change string if note results in negative fret number
895 handleNegativeFrets = #'recalculate
896 %% Allow open strings even if minimumFret is set
897 restrainOpenStrings = ##f
902 \name "VaticanaVoice"
904 \description "Same as @code{Voice} context, except that it is
905 accommodated for typesetting Gregorian Chant in the notational style
908 \remove "Slur_engraver"
909 \remove "Stem_engraver"
910 \remove "Ligature_bracket_engraver"
911 \consists "Vaticana_ligature_engraver"
912 \remove "Text_spanner_engraver"
913 \consists "Episema_engraver"
915 %% Set default head for notes outside of \[ \].
916 \override NoteHead #'style = #'vaticana.punctum
918 %% Put some space before and after divisiones.
919 %% FIXME: This does not seem to show any effect.
920 \override Script #'padding = #0.5
922 %% There are no beams in Gregorian Chant notation.
928 \name "VaticanaStaff"
931 \accepts "VaticanaVoice"
932 \defaultchild "VaticanaVoice"
934 \description "Same as @code{Staff} context, except that it is
935 accommodated for typesetting Gregorian Chant in the notational style
938 \remove "Time_signature_engraver"
939 \consists "Custos_engraver"
941 %% We can not remove Bar_engraver; otherwise clefs and custodes will
942 %% not show up any more among other line breaking issues.
943 %% Instead, we make the grob transparent.
944 \override BarLine #'transparent = ##t
946 \override StaffSymbol #'line-count = #4
947 \override StaffSymbol #'thickness = #0.6
949 %% FIXME: unit on StaffSymbol's width should be \linewidth.
950 %% \override StaffSymbol #'width = #60.0
952 %% Choose vaticana do clef on 3rd line as default.
953 clefGlyph = #"clefs.vaticana.do"
955 middleCClefPosition = #1
959 %% Select vaticana style font.
960 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
961 \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
962 \override Custos #'style = #'vaticana
963 \override Custos #'neutral-position = #3
964 \override Custos #'neutral-direction = #DOWN
965 \override Dots #'style = #'vaticana
970 \name "GregorianTranscriptionVoice"
972 \consists "Episema_engraver"
974 %% Removing ligature bracket engraver without replacing it by some
975 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
976 %% warning for every "\[" and "\]". Therefore, we make the grob
977 %% transparent instead.
978 \override LigatureBracket #'transparent = ##t
980 %% Put some space before and after divisiones.
981 %% FIXME: This does not seem to show any effect.
982 \override Script #'padding = #0.5
984 %% There are no beams in Gregorian Chant notation.
991 \name "GregorianTranscriptionStaff"
994 \accepts "GregorianTranscriptionVoice"
995 \defaultchild "GregorianTranscriptionVoice"
997 %% We can not remove Bar_engraver; otherwise clefs and custodes will
998 %% not show up any more among other line breaking issues.
999 %% Instead, we make the grob transparent.
1000 \override BarLine #'transparent = ##t
1005 \name "MensuralVoice"
1007 \description "Same as @code{Voice} context, except that it is
1008 accommodated for typesetting a piece in mensural style."
1010 \remove "Slur_engraver"
1011 \remove "Ligature_bracket_engraver"
1012 \consists "Mensural_ligature_engraver"
1014 %% Set default head for notes outside of \[ \].
1015 \override NoteHead #'style = #'mensural
1016 \override Rest #'style = #'mensural
1017 \override Flag #'style = #'mensural
1019 %% There are no beams in mensural notation.
1025 \name "MensuralStaff"
1028 \defaultchild "MensuralVoice"
1029 \accepts "MensuralVoice"
1030 \description "Same as @code{Staff} context, except that it is
1031 accommodated for typesetting a piece in mensural style."
1033 \consists "Custos_engraver"
1035 %% We can not remove Bar_engraver; otherwise clefs and custodes will
1036 %% not show up any more among other line breaking issues.
1037 %% Instead, we make the grob transparent.
1038 \override BarLine #'transparent = ##t
1040 \override StaffSymbol #'thickness = #0.6
1042 %% FIXME: unit on StaffSymbol's width should be \linewidth.
1043 %% \override StaffSymbol #'width = #60.0
1045 %% Choose mensural g clef on 2nd line as default.
1046 clefGlyph = #"clefs.mensural.g"
1047 middleCClefPosition = #-6
1048 middleCPosition = #-6
1052 %% Select mensural style font.
1053 \override TimeSignature #'style = #'mensural
1054 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1055 \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1056 \override Custos #'style = #'mensural
1057 \override Custos #'neutral-position = #3
1058 \override Custos #'neutral-direction = #DOWN
1060 %% Accidentals are valid only once (same as
1061 %% \accidentalStyle "forget")
1063 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
1064 autoCautionaries = #'()
1065 printKeyCancellation = ##f
1070 \name "PetrucciVoice"
1072 \description "Same as @code{Voice} context, except that it is
1073 accommodated for typesetting a piece in Petrucci style."
1075 \remove "Ligature_bracket_engraver"
1076 \consists "Mensural_ligature_engraver"
1078 %% Set glyph styles.
1079 \override NoteHead #'style = #'petrucci
1080 \override Rest #'style = #'mensural
1082 % Thickens and shortens stems.
1083 \override Stem #'thickness = #1.7
1084 \override Stem #'length = #5
1086 %% There are no beams in Petrucci notation.
1092 \name "PetrucciStaff"
1095 \defaultchild "PetrucciVoice"
1096 \accepts "PetrucciVoice"
1097 \description "Same as @code{Staff} context, except that it is
1098 accommodated for typesetting a piece in Petrucci style."
1100 \consists "Custos_engraver"
1102 \override StaffSymbol #'thickness = #1.3
1104 %% Choose Petrucci g clef on 2nd line as default.
1105 clefGlyph = #"clefs.petrucci.g"
1106 middleCClefPosition = #-6
1107 middleCPosition = #-6
1111 \override Custos #'style = #'mensural
1112 \override Custos #'neutral-position = #3
1113 \override Custos #'neutral-direction = #DOWN
1115 %% Accidentals are valid only once (if the following note is different)
1117 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1118 ,neo-modern-accidental-rule)
1119 autoCautionaries = #'()
1120 printKeyCancellation = ##f
1127 \description "Same as @code{Voice} context, except that it is
1128 accommodated for typesetting a piece in Kievan style."
1130 %% Set glyph styles.
1131 \override NoteHead #'style = #'kievan
1132 \override Rest #'style = #'mensural
1133 \override Accidental #'glyph-name-alist = #alteration-kievan-glyph-name-alist
1134 \override Dots #'style = #'kievan
1135 \override Slur #'stencil = ##f
1137 %% There are beams in Kievan notation, but they are invoked manually
1139 \override Beam #'beam-thickness = #0.32
1140 \override Beam #'length-fraction = #0.62
1148 \defaultchild "KievanVoice"
1149 \accepts "KievanVoice"
1150 \description "Same as @code{Staff} context, except that it is
1151 accommodated for typesetting a piece in Kievan style."
1153 \remove "Time_signature_engraver"
1155 %% Choose Kievan tsefaut clef
1156 clefGlyph = #"clefs.kievan.do"
1157 middleCClefPosition = #0
1158 middleCPosition = #0
1162 %% Accidentals are valid only once (if the following note is different)
1164 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1165 ,neo-modern-accidental-rule)
1166 autoCautionaries = #'()
1167 printKeyCancellation = ##f
1171 %% Keep the old definitions in here for compatibility (they erase previous
1172 %% settings to the corresponding context!).
1173 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
1174 %% into the desired context. That's just as easy, requires only one line more
1175 %% (the \*Staff), but preserves previous context mods.
1176 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
1177 RemoveEmptyStaffContext = \context {
1182 AncientRemoveEmptyStaffContext = \context {
1187 RemoveEmptyDrumStaffContext = \context {
1192 RemoveEmptyRhythmicStaffContext = \context {
1197 RemoveEmptyTabStaffContext = \context {