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"
35 \description "A context for displaying fret diagrams."
37 \consists "Fretboard_engraver"
38 \consists "Output_property_engraver"
39 \consists "Hara_kiri_engraver"
40 \consists "Separating_line_group_engraver"
41 \consists "Font_size_engraver"
42 \consists "Instrument_name_engraver"
44 %% explicitly set instrument, so it is not inherited from the parent
46 shortInstrumentName = #'()
48 predefinedDiagramTable = #default-fret-table
49 handleNegativeFrets = #'recalculate
50 restrainOpenStrings = ##f
54 \type "Engraver_group"
57 \consists "Output_property_engraver"
58 \consists "Bar_engraver"
59 \consists "Pure_from_neighbor_engraver"
60 %% Bar_engraver must be first so default bars aren't overwritten
63 \consists "Font_size_engraver"
64 \consists "Separating_line_group_engraver"
65 \consists "Dot_column_engraver"
66 \consists "Staff_collecting_engraver"
68 %% perhaps move to Voice context?
69 \consists "Ottava_spanner_engraver"
70 \consists "Clef_engraver"
71 \consists "Key_engraver"
72 \consists "Time_signature_engraver"
73 \consists "Ledger_line_engraver"
74 \consists "Staff_symbol_engraver"
75 \consists "Collision_engraver"
76 \consists "Grob_pq_engraver"
77 \consists "Rest_collision_engraver"
78 \consists "Accidental_engraver"
79 \consists "Piano_pedal_engraver"
80 \consists "Piano_pedal_align_engraver"
81 \consists "Instrument_name_engraver"
82 \consists "Axis_group_engraver"
83 \consists "Figured_bass_engraver"
84 \consists "Figured_bass_position_engraver"
85 \consists "Script_row_engraver"
86 \consists "Cue_clef_engraver"
88 localKeySignature = #'()
90 ignoreFiguredBassRest = ##f
92 %% explicitly set instrument, so we don't get
93 %% weird effects when doing instrument names for
96 shortInstrumentName = #'()
102 \description "Handles clefs, bar lines, keys, accidentals. It can contain
103 @code{Voice} contexts."
109 \type "Engraver_group"
113 \remove "Accidental_engraver"
114 \remove "Ottava_spanner_engraver"
115 \remove "Key_engraver"
116 \remove "Piano_pedal_engraver"
118 \description "Handles typesetting for percussion."
122 \defaultchild "DrumVoice"
124 clefGlyph = #"clefs.percussion"
126 \override Script #'staff-padding = #0.75
131 \type "Engraver_group"
133 \consists "Vertical_align_engraver"
134 topLevelAlignment = ##f
136 \consists "Instrument_name_engraver"
137 \consists "System_start_delimiter_engraver"
138 systemStartDelimiter = #'SystemStartBracket
139 %% explicitly set instrument, so it is not inherited from the parent
140 instrumentName = #'()
141 shortInstrumentName = #'()
143 shortVocalName = #'()
147 \accepts "RhythmicStaff"
148 \accepts "GrandStaff"
149 \accepts "PianoStaff"
151 \accepts "ChordNames"
152 \accepts "FiguredBass"
153 \accepts "ChoirStaff"
154 \accepts "StaffGroup"
155 \defaultchild "Staff"
156 \description "Identical to @code{StaffGroup} except that the
157 contained staves are not connected vertically."
161 \type "Engraver_group"
163 localKeySignature = #'()
166 squashedPosition = #0
170 \override BarLine #'bar-extent = #'(-2 . 2)
171 \override VoltaBracket #'staff-padding = #3
172 \override StaffSymbol #'line-count = #1
174 \override Stem #'neutral-direction = #UP
175 \override Beam #'neutral-direction = #UP
177 \consists "Output_property_engraver"
178 \consists "Font_size_engraver"
179 \consists "Separating_line_group_engraver"
180 \consists "Dot_column_engraver"
181 \consists "Bar_engraver"
182 \consists "Staff_symbol_engraver"
183 \consists "Pitch_squash_engraver"
184 \consists "Time_signature_engraver"
185 \consists "Instrument_name_engraver"
186 \consists "Axis_group_engraver"
187 \consists "Ledger_line_engraver"
189 %% explicitly set instrument, so it is not inherited from the parent
190 instrumentName = #'()
191 shortInstrumentName = #'()
195 \defaultchild "Voice"
197 \description "A context like @code{Staff} but for printing rhythms.
198 Pitches are ignored; the notes are printed on one line."
203 \type "Engraver_group"
206 \description "Corresponds to a voice on a staff. This context
207 handles the conversion of dynamic signs, stems, beams, super- and
208 subscripts, slurs, ties, and rests.
210 You have to instantiate this explicitly if you want to have
211 multiple voices on the same staff."
213 \consists "Font_size_engraver"
215 \consists "Pitched_trill_engraver"
216 \consists "Output_property_engraver"
217 \consists "Arpeggio_engraver"
218 \consists "Multi_measure_rest_engraver"
219 \consists "Text_spanner_engraver"
220 \consists "Trill_spanner_engraver"
221 \consists "Grob_pq_engraver"
222 \consists "Forbid_line_break_engraver"
223 \consists "Laissez_vibrer_engraver"
224 \consists "Repeat_tie_engraver"
225 \consists "Note_head_line_engraver"
226 \consists "Glissando_engraver"
227 \consists "Ligature_bracket_engraver"
228 \consists "Breathing_sign_engraver"
229 \consists "Note_heads_engraver"
230 \consists "Dots_engraver"
231 \consists "Rest_engraver"
232 \consists "Tweak_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 "Tweak_engraver"
438 \consists "Stanza_number_engraver"
439 \consists "Instrument_name_engraver"
440 \consists "Font_size_engraver"
441 \consists "Hara_kiri_engraver"
442 \consists "Pure_from_neighbor_engraver"
444 %% explicitly set instrument, so it is not inherited from the parent
445 instrumentName = #'()
446 shortInstrumentName = #'()
448 \override VerticalAxisGroup #'remove-first = ##t
449 \override VerticalAxisGroup #'remove-empty = ##t
450 \override VerticalAxisGroup #'staff-affinity = #UP
451 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
452 #'((basic-distance . 5.5)
454 (stretchability . 1))
455 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
456 #'((basic-distance . 0)
457 (minimum-distance . 2.8)
459 (stretchability . 0))
460 \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
461 \override InstrumentName #'self-alignment-Y = ##f
463 %% sync with define-grobs.scm ;
464 \override InstrumentName #'font-size = #1.0
466 %% make sure that barlines aren't collapsed, when
467 %% Bar_engraver is there.
468 \override BarLine #'bar-extent = #'(-0.05 . 0.05)
473 \type "Engraver_group"
475 \description "A context for printing the names of notes."
476 \consists "Axis_group_engraver"
478 \override VerticalAxisGroup #'staff-affinity = #UP
479 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
480 #'((basic-distance . 0)
481 (minimum-distance . 2.8)
483 (stretchability . 0))
484 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
485 #'((basic-distance . 5.5)
487 (stretchability . 1))
488 \override VerticalAxisGroup
489 #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
491 \consists "Tie_engraver"
492 \consists "Note_name_engraver"
493 \consists "Separating_line_group_engraver"
497 \type "Engraver_group"
499 \description "Typesets chord names."
501 \consists "Output_property_engraver"
502 \consists "Separating_line_group_engraver"
503 \consists "Chord_name_engraver"
504 \consists "Hara_kiri_engraver"
505 % \consists "Note_spacing_engraver"
506 \override VerticalAxisGroup #'remove-first = ##t
507 \override VerticalAxisGroup #'remove-empty = ##t
508 \override VerticalAxisGroup #'staff-affinity = #DOWN
509 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
510 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
514 \type "Score_engraver"
517 \description "This is the top level notation context. No
518 other context can contain a @code{Score} context. This context
519 handles the administration of time signatures. It also makes sure
520 that items such as clefs, time signatures, and key-signatures are
521 aligned across staves.
523 You cannot explicitly instantiate a @code{Score} context (since it
524 is not contained in any other context). It is instantiated
525 automatically when an output definition (a @code{\score} or
526 @code{\layout} block) is processed."
528 \consists "Paper_column_engraver"
529 \consists "Repeat_acknowledge_engraver"
530 \consists "Staff_collecting_engraver"
534 %% An alias for Timing is established by the Timing_translator in
535 %% whatever context it is initialized, and the timing variables are
536 %% then copied from wherever Timing had been previously established.
537 %% The alias at Score level provides a target for initializing
538 %% Timing variables in layout definitions before any
539 %% Timing_translator has been run.
541 % timing translator must come BEFORE bar number engraver
542 \consists "Timing_translator"
543 \consists "Default_bar_line_engraver"
544 \consists "Output_property_engraver"
545 \consists "System_start_delimiter_engraver"
546 \consists "Mark_engraver"
547 \consists "Volta_engraver"
548 \consists "Metronome_mark_engraver"
549 \consists "Break_align_engraver"
550 \consists "Spacing_engraver"
551 \consists "Grace_spacing_engraver"
552 \consists "Vertical_align_engraver"
553 \consists "Stanza_number_align_engraver"
554 \consists "Bar_number_engraver"
555 \consists "Parenthesis_engraver"
556 \consists "Concurrent_hairpin_engraver"
557 \consists "Beam_collision_engraver"
558 \consists "Footnote_engraver"
560 \defaultchild "Staff"
562 \accepts "FretBoards"
564 \accepts "RhythmicStaff"
566 \accepts "VaticanaStaff"
567 \accepts "GregorianTranscriptionStaff"
568 \accepts "MensuralStaff"
569 \accepts "PetrucciStaff"
570 \accepts "StaffGroup"
572 \accepts "KievanStaff"
574 \accepts "ChordNames"
575 \accepts "GrandStaff"
576 \accepts "ChoirStaff"
577 \accepts "PianoStaff"
580 \accepts "FiguredBass"
582 noteToFretFunction = #determine-frets
583 predefinedDiagramTable = ##f
585 soloIIText = #"Solo II"
587 printPartCombineTexts = ##t
588 partCombineTextsOnNote = ##t
589 systemStartDelimiter =#'SystemStartBar
591 drumStyleTable = #drums-style
593 melismaBusyProperties = #default-melisma-properties
595 clefGlyph = #"clefs.G"
597 middleCClefPosition = #-6
598 middleCPosition = #-6
601 crescendoSpanner = #'hairpin
602 decrescendoSpanner = #'hairpin
604 defaultBarType = #"|"
605 doubleRepeatType = #":|:"
606 startRepeatType = #"|:"
607 endRepeatType = #":|"
608 barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
609 barNumberFormatter = #robust-bar-number-function
612 explicitClefVisibility = #all-visible
613 explicitCueClefVisibility = #end-of-line-invisible
614 explicitKeySignatureVisibility = #all-visible
615 implicitTimeSignatureVisibility = #end-of-line-invisible
617 repeatCountVisibility = #all-repeat-counts-visible
619 timeSignatureSettings = #default-time-signature-settings
620 timeSignatureFraction = 4/4
622 %% These defaults should be the same as the rules established in
623 %% scm/time-signature-settings.scm for 4/4 time
624 measureLength = #(ly:make-moment 4 4)
625 baseMoment = #(ly:make-moment 1 4)
626 beatStructure = #'(1 1 1 1)
627 beamExceptions = #'((end . (((1 . 8) . (4 4))
628 ((1 . 12) . (3 3 3 3)))))
629 beamHalfMeasure = ##t
632 autoBeamCheck = #default-auto-beam-check
634 scriptDefinitions = #default-script-alist
636 pedalSustainStrings = #'("Ped." "*Ped." "*")
637 pedalSustainStyle = #'text
638 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
639 pedalUnaCordaStyle = #'text
641 %% These are in ordinary italic font, including the *,
642 %% but they are unlikely to be used,
643 %% as the default pedal-style for SostenutoPedal is 'mixed':
644 %% i.e. Sost. Ped_____________________
645 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
646 pedalSostenutoStyle = #'mixed
648 harmonicAccidentals = ##t
649 fingeringOrientations = #'(up down)
650 stringNumberOrientations = #'(up down)
651 strokeFingerOrientations = #'(right)
653 lyricMelismaAlignment = #LEFT
654 markFormatter = #format-mark-letters
658 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
659 autoCautionaries = #'()
661 printKeyCancellation = ##t
662 keyAlterationOrder = #`(
663 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
664 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
665 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
666 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
669 barCheckSynchronize = ##f
672 chordNameFunction = #ignatzek-chord-names
673 minorChordModifier = #(make-simple-markup "m")
674 additionalPitchPrefix = #"" % was "add"
675 majorSevenSymbol = #whiteTriangleMarkup
676 chordNameLowercaseMinor = ##f
677 chordNameSeparator = #(make-hspace-markup 0.5)
678 slashChordSeparator = #(make-simple-markup "/")
679 chordNameExceptions = #ignatzekExceptions
680 chordNoteNamer = #'()
681 chordRootNamer = #note-name->markup
682 chordPrefixSpacer = #0
683 chordNameExceptionsFull = #fullJazzExceptions
684 chordNameExceptionsPartial = #partialJazzExceptions
685 noChordSymbol = #(make-simple-markup "N.C.")
687 bassStaffProperties = #'((assign clefGlyph "clefs.F")
688 (assign clefPosition 2)
689 (assign middleCPosition 6)
690 (assign middleCClefPosition 6))
692 stringOneTopmost = ##t
695 %% One may change the string tunings as follows :
696 %% The length of the list must be equal to the number of strings
697 stringTunings = #guitar-tuning
698 tablatureFormat = #fret-number-tablature-format
699 tabStaffLineLayoutFunction = #tablature-position-on-lines
702 figuredBassFormatter = #format-bass-figure
703 metronomeMarkFormatter = #format-metronome-markup
706 %% See also make-voice-props-set
708 (Voice Stem direction ,UP)
709 (Voice Stem font-size -3)
710 (Voice Flag font-size -3)
711 (Voice NoteHead font-size -3)
712 (Voice TabNoteHead font-size -4)
713 (Voice Dots font-size -3)
714 (Voice Stem length-fraction 0.8)
715 (Voice Stem no-stem-extend #t)
716 (Voice Beam beam-thickness 0.384)
717 (Voice Beam length-fraction 0.8)
718 (Voice Accidental font-size -4)
719 (Voice AccidentalCautionary font-size -4)
720 (Voice Slur direction ,DOWN)
721 (Voice Script font-size -3)
722 (Voice Fingering font-size -8)
723 (Voice StringNumber font-size -8)
726 keepAliveInterfaces = #'(
727 bass-figure-interface
729 cluster-beacon-interface
730 fret-diagram-interface
731 lyric-syllable-interface
733 tab-note-head-interface
735 percent-repeat-item-interface
736 percent-repeat-interface
738 ;; need this, as stanza numbers are items, and appear only once.
739 stanza-number-interface
741 % \quoteDuring is supposed to quote everything, cueDuring only the essentials
742 quotedEventTypes = #'(StreamEvent)
743 quotedCueEventTypes = #'(
749 instrumentTransposition = #(ly:make-pitch 0 0 0)
751 topLevelAlignment = ##t
760 \type "Engraver_group"
762 \description "A context for printing a figured bass line."
764 \consists "Figured_bass_engraver"
765 \consists "Separating_line_group_engraver"
766 \consists "Hara_kiri_engraver"
768 \override VerticalAxisGroup #'remove-empty = ##t
769 \override VerticalAxisGroup #'remove-first = ##t
770 \override VerticalAxisGroup #'staff-affinity = #UP
771 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
772 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
777 \type "Engraver_group"
779 %% don't want to route anything out of here:
782 \description "Silently discards all musical information given to this
790 \consists "Tab_note_heads_engraver"
791 \consists "Tab_tie_follow_engraver"
793 \remove "Note_heads_engraver"
794 \remove "Fingering_engraver"
795 \remove "New_fingering_engraver"
796 \remove "Pitched_trill_engraver"
798 \description "Context for drawing notes in a Tab staff."
800 %% TabStaff increase the staff-space, which in turn
801 %% increases beam thickness and spacing; beams are
802 %% too big. We have to adjust the beam settings:
803 \override Beam #'beam-thickness = #0.32
804 \override Beam #'length-fraction = #0.62
805 %% the same goes for tremolo beams
806 \override StemTremolo #'beam-thickness = #0.32
807 %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
808 %% and the tablature staff space is scaled (1.5 by default),
809 %% so we use the inversion of the scale factor:
810 \override StemTremolo #'length-fraction = #(lambda (grob)
811 (/ 1 (ly:staff-symbol-staff-space grob)))
812 \override StemTremolo #'beam-width = #stem-tremolo::calc-tab-width
814 %% No accidental in tablature !
815 \remove "Accidental_engraver"
816 %% make the Stems as short as possible to minimize their influence
817 %% on the slur::calc-control-points routine
818 \override Stem #'no-stem-extend = ##t
819 \override Flag #'style = #'no-flag
820 \override Stem #'details = #'((lengths 0 0 0 0 0 0)
821 (beamed-lengths 0 0 0)
822 (beamed-minimum-free-lengths 0 0 0)
823 (beamed-extreme-minimum-free-lengths 0 0)
825 %% after all, the stubs of the stems may still be visible, so ...
826 \override Stem #'stencil = ##f
827 \override Flag #'stencil = ##f
828 %% automatic beams should be suppressed for similar reasons ...
830 %% remove beams, dots and rests ...
831 \override Beam #'stencil = ##f
832 \override StemTremolo #'stencil = ##f
833 \override Dots #'stencil = ##f
834 \override Rest #'stencil = ##f
835 \override MultiMeasureRest #'stencil = ##f
836 \override MultiMeasureRestNumber #'stencil = ##f
837 \override MultiMeasureRestText #'stencil = ##f
838 %% ... all kinds of ties/slurs
839 \override Tie #'stencil = ##f
840 \override RepeatTie #'stencil = ##f
841 \override LaissezVibrerTie #'stencil = ##f
842 \override Slur #'stencil = #slur::draw-tab-slur
843 \override PhrasingSlur #'stencil = ##f
844 %% 'tied to' fret numbers become invisible or parenthesized, respectively)
845 \override Tie #'after-line-breaking = #tie::handle-tab-note-head
846 \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
847 %% ... and all kinds of markups, spanners etc.
848 \override TupletBracket #'stencil = ##f
849 \override TupletNumber #'stencil = ##f
850 \override DynamicText #'stencil = ##f
851 \override DynamicTextSpanner #'stencil = ##f
852 \override TextSpanner #'stencil = ##f
853 \override Hairpin #'stencil = ##f
854 \override Script #'stencil = ##f
855 \override TextScript #'stencil = ##f
856 \override Glissando #'stencil = #glissando::draw-tab-glissando
857 %% the direction for glissando lines will be automatically corrected
858 \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
859 \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
861 \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
864 \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
865 \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
873 \consists "Tab_staff_symbol_engraver"
875 \description "Context for generating tablature. It accepts only @code{TabVoice}
876 contexts and handles the line spacing, the tablature clef etc. properly."
879 \defaultchild "TabVoice"
881 %% 6 strings, bigger spacing
882 \override StaffSymbol #'staff-space = #1.5
884 %% Don't draw stems over the tablature figures !
885 \override Stem #'avoid-note-head = ##t
887 %% No accidental in tablature !
888 \remove "Accidental_engraver"
889 \remove "Key_engraver"
891 \remove "Ottava_spanner_engraver"
893 \override Clef #'stencil = #clef::print-modern-tab-if-set
895 \override TimeSignature #'stencil = ##f
897 \override Arpeggio #'stencil = ##f
898 %% we ignore collision warnings that may occur due to
899 %% stem overlapping, because we have no stems ;-)
900 \override NoteColumn #'ignore-collision = ##t
901 %% Special "TAB" clef
902 clefGlyph = #"clefs.tab"
904 %% Change string if note results in negative fret number
905 handleNegativeFrets = #'recalculate
906 %% Allow open strings even if minimumFret is set
907 restrainOpenStrings = ##f
912 \name "VaticanaVoice"
914 \description "Same as @code{Voice} context, except that it is
915 accommodated for typesetting Gregorian Chant in the notational style
918 \remove "Slur_engraver"
919 \remove "Stem_engraver"
920 \remove "Ligature_bracket_engraver"
921 \consists "Vaticana_ligature_engraver"
922 \remove "Text_spanner_engraver"
923 \consists "Episema_engraver"
925 %% Set default head for notes outside of \[ \].
926 \override NoteHead #'style = #'vaticana.punctum
928 %% Put some space before and after divisiones.
929 %% FIXME: This does not seem to show any effect.
930 \override Script #'padding = #0.5
932 %% There are no beams in Gregorian Chant notation.
938 \name "VaticanaStaff"
941 \accepts "VaticanaVoice"
942 \defaultchild "VaticanaVoice"
944 \description "Same as @code{Staff} context, except that it is
945 accommodated for typesetting Gregorian Chant in the notational style
948 \remove "Time_signature_engraver"
949 \consists "Custos_engraver"
951 %% We can not remove Bar_engraver; otherwise clefs and custodes will
952 %% not show up any more among other line breaking issues.
953 %% Instead, we make the grob transparent.
954 \override BarLine #'transparent = ##t
956 \override StaffSymbol #'line-count = #4
957 \override StaffSymbol #'thickness = #0.6
959 %% FIXME: unit on StaffSymbol's width should be \linewidth.
960 %% \override StaffSymbol #'width = #60.0
962 %% Choose vaticana do clef on 3rd line as default.
963 clefGlyph = #"clefs.vaticana.do"
965 middleCClefPosition = #1
969 %% Select vaticana style font.
970 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
971 \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
972 \override Custos #'style = #'vaticana
973 \override Custos #'neutral-position = #3
974 \override Custos #'neutral-direction = #DOWN
975 \override Dots #'style = #'vaticana
980 \name "GregorianTranscriptionVoice"
982 \consists "Episema_engraver"
984 %% Removing ligature bracket engraver without replacing it by some
985 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
986 %% warning for every "\[" and "\]". Therefore, we make the grob
987 %% transparent instead.
988 \override LigatureBracket #'transparent = ##t
990 %% Put some space before and after divisiones.
991 %% FIXME: This does not seem to show any effect.
992 \override Script #'padding = #0.5
994 %% There are no beams in Gregorian Chant notation.
1001 \name "GregorianTranscriptionStaff"
1004 \accepts "GregorianTranscriptionVoice"
1005 \defaultchild "GregorianTranscriptionVoice"
1007 %% We can not remove Bar_engraver; otherwise clefs and custodes will
1008 %% not show up any more among other line breaking issues.
1009 %% Instead, we make the grob transparent.
1010 \override BarLine #'transparent = ##t
1015 \name "MensuralVoice"
1017 \description "Same as @code{Voice} context, except that it is
1018 accommodated for typesetting a piece in mensural style."
1020 \remove "Slur_engraver"
1021 \remove "Ligature_bracket_engraver"
1022 \consists "Mensural_ligature_engraver"
1024 %% Set default head for notes outside of \[ \].
1025 \override NoteHead #'style = #'mensural
1026 \override Rest #'style = #'mensural
1027 \override Flag #'style = #'mensural
1029 %% There are no beams in mensural notation.
1035 \name "MensuralStaff"
1038 \defaultchild "MensuralVoice"
1039 \accepts "MensuralVoice"
1040 \description "Same as @code{Staff} context, except that it is
1041 accommodated for typesetting a piece in mensural style."
1043 \consists "Custos_engraver"
1045 %% We can not remove Bar_engraver; otherwise clefs and custodes will
1046 %% not show up any more among other line breaking issues.
1047 %% Instead, we make the grob transparent.
1048 \override BarLine #'transparent = ##t
1050 \override StaffSymbol #'thickness = #0.6
1052 %% FIXME: unit on StaffSymbol's width should be \linewidth.
1053 %% \override StaffSymbol #'width = #60.0
1055 %% Choose mensural g clef on 2nd line as default.
1056 clefGlyph = #"clefs.mensural.g"
1057 middleCClefPosition = #-6
1058 middleCPosition = #-6
1062 %% Select mensural style font.
1063 \override TimeSignature #'style = #'mensural
1064 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1065 \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1066 \override Custos #'style = #'mensural
1067 \override Custos #'neutral-position = #3
1068 \override Custos #'neutral-direction = #DOWN
1070 %% Accidentals are valid only once (same as
1071 %% \accidentalStyle "forget")
1073 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
1074 autoCautionaries = #'()
1075 printKeyCancellation = ##f
1080 \name "PetrucciVoice"
1082 \description "Same as @code{Voice} context, except that it is
1083 accommodated for typesetting a piece in Petrucci style."
1085 \remove "Ligature_bracket_engraver"
1086 \consists "Mensural_ligature_engraver"
1088 %% Set glyph styles.
1089 \override NoteHead #'style = #'petrucci
1090 \override Rest #'style = #'mensural
1092 % Thickens and shortens stems.
1093 \override Stem #'thickness = #1.7
1094 \override Stem #'length = #5
1096 %% There are no beams in Petrucci notation.
1102 \name "PetrucciStaff"
1105 \defaultchild "PetrucciVoice"
1106 \accepts "PetrucciVoice"
1107 \description "Same as @code{Staff} context, except that it is
1108 accommodated for typesetting a piece in Petrucci style."
1110 \consists "Custos_engraver"
1112 \override StaffSymbol #'thickness = #1.3
1114 %% Choose Petrucci g clef on 2nd line as default.
1115 clefGlyph = #"clefs.petrucci.g"
1116 middleCClefPosition = #-6
1117 middleCPosition = #-6
1121 \override Custos #'style = #'mensural
1122 \override Custos #'neutral-position = #3
1123 \override Custos #'neutral-direction = #DOWN
1125 %% Accidentals are valid only once (if the following note is different)
1127 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1128 ,neo-modern-accidental-rule)
1129 autoCautionaries = #'()
1130 printKeyCancellation = ##f
1137 \description "Same as @code{Voice} context, except that it is
1138 accommodated for typesetting a piece in Kievan style."
1140 %% Set glyph styles.
1141 \override NoteHead #'style = #'kievan
1142 \override Rest #'style = #'mensural
1143 \override Accidental #'glyph-name-alist = #alteration-kievan-glyph-name-alist
1144 \override Dots #'style = #'kievan
1145 \override Slur #'stencil = ##f
1147 %% There are beams in Kievan notation, but they are invoked manually
1149 \override Beam #'beam-thickness = #0.32
1150 \override Beam #'length-fraction = #0.62
1158 \defaultchild "KievanVoice"
1159 \accepts "KievanVoice"
1160 \description "Same as @code{Staff} context, except that it is
1161 accommodated for typesetting a piece in Kievan style."
1163 \remove "Time_signature_engraver"
1165 %% Choose Kievan tsefaut clef
1166 clefGlyph = #"clefs.kievan.do"
1167 middleCClefPosition = #0
1168 middleCPosition = #0
1172 %% Accidentals are valid only once (if the following note is different)
1174 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1175 ,neo-modern-accidental-rule)
1176 autoCautionaries = #'()
1177 printKeyCancellation = ##f
1181 %% Keep the old definitions in here for compatibility (they erase previous
1182 %% settings to the corresponding context!).
1183 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
1184 %% into the desired context. That's just as easy, requires only one line more
1185 %% (the \*Staff), but preserves previous context mods.
1186 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
1187 RemoveEmptyStaffContext = \context {
1192 AncientRemoveEmptyStaffContext = \context {
1197 RemoveEmptyDrumStaffContext = \context {
1202 RemoveEmptyRhythmicStaffContext = \context {
1207 RemoveEmptyTabStaffContext = \context {