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"
87 \consists "Footnote_engraver"
89 localKeySignature = #'()
91 ignoreFiguredBassRest = ##f
93 %% explicitly set instrument, so we don't get
94 %% weird effects when doing instrument names for
97 shortInstrumentName = #'()
103 \description "Handles clefs, bar lines, keys, accidentals. It can contain
104 @code{Voice} contexts."
110 \type "Engraver_group"
114 \remove "Accidental_engraver"
115 \remove "Ottava_spanner_engraver"
116 \remove "Key_engraver"
117 \remove "Piano_pedal_engraver"
119 \description "Handles typesetting for percussion."
123 \defaultchild "DrumVoice"
125 clefGlyph = #"clefs.percussion"
127 \override Script #'staff-padding = #0.75
132 \type "Engraver_group"
134 \consists "Vertical_align_engraver"
135 topLevelAlignment = ##f
137 \consists "Instrument_name_engraver"
138 \consists "System_start_delimiter_engraver"
139 systemStartDelimiter = #'SystemStartBracket
140 %% explicitly set instrument, so it is not inherited from the parent
141 instrumentName = #'()
142 shortInstrumentName = #'()
144 shortVocalName = #'()
148 \accepts "RhythmicStaff"
149 \accepts "GrandStaff"
150 \accepts "PianoStaff"
152 \accepts "ChordNames"
153 \accepts "FiguredBass"
154 \accepts "ChoirStaff"
155 \accepts "StaffGroup"
156 \defaultchild "Staff"
157 \description "Identical to @code{StaffGroup} except that the
158 contained staves are not connected vertically."
162 \type "Engraver_group"
164 localKeySignature = #'()
167 squashedPosition = #0
171 \override BarLine #'bar-extent = #'(-2 . 2)
172 \override VoltaBracket #'staff-padding = #3
173 \override StaffSymbol #'line-count = #1
175 \override Stem #'neutral-direction = #UP
176 \override Beam #'neutral-direction = #UP
178 \consists "Output_property_engraver"
179 \consists "Font_size_engraver"
180 \consists "Separating_line_group_engraver"
181 \consists "Dot_column_engraver"
182 \consists "Bar_engraver"
183 \consists "Staff_symbol_engraver"
184 \consists "Pitch_squash_engraver"
185 \consists "Time_signature_engraver"
186 \consists "Instrument_name_engraver"
187 \consists "Axis_group_engraver"
188 \consists "Ledger_line_engraver"
190 %% explicitly set instrument, so it is not inherited from the parent
191 instrumentName = #'()
192 shortInstrumentName = #'()
196 \defaultchild "Voice"
198 \description "A context like @code{Staff} but for printing rhythms.
199 Pitches are ignored; the notes are printed on one line."
204 \type "Engraver_group"
207 \description "Corresponds to a voice on a staff. This context
208 handles the conversion of dynamic signs, stems, beams, super- and
209 subscripts, slurs, ties, and rests.
211 You have to instantiate this explicitly if you want to have
212 multiple voices on the same staff."
214 \consists "Font_size_engraver"
216 \consists "Pitched_trill_engraver"
217 \consists "Output_property_engraver"
218 \consists "Arpeggio_engraver"
219 \consists "Multi_measure_rest_engraver"
220 \consists "Text_spanner_engraver"
221 \consists "Trill_spanner_engraver"
222 \consists "Grob_pq_engraver"
223 \consists "Forbid_line_break_engraver"
224 \consists "Laissez_vibrer_engraver"
225 \consists "Repeat_tie_engraver"
226 \consists "Note_head_line_engraver"
227 \consists "Glissando_engraver"
228 \consists "Ligature_bracket_engraver"
229 \consists "Breathing_sign_engraver"
230 \consists "Note_heads_engraver"
231 \consists "Dots_engraver"
232 \consists "Rest_engraver"
233 \consists "Tweak_engraver"
235 %% switch on to make stem directions interpolate for the
237 % \consists "Melody_engraver"
239 \consists "Stem_engraver"
240 \consists "Beam_engraver"
241 \consists "Grace_beam_engraver"
242 \consists "Auto_beam_engraver"
244 %% must come before Script_column_engraver.
245 \consists "New_fingering_engraver"
247 \consists "Chord_tremolo_engraver"
248 \consists "Double_percent_repeat_engraver"
249 \consists "Percent_repeat_engraver"
250 \consists "Slash_repeat_engraver"
251 \consists "Part_combine_engraver"
253 \consists "Text_engraver"
254 \consists "New_dynamic_engraver"
255 \consists "Dynamic_align_engraver"
256 % \consists "Dynamic_engraver"
257 \consists "Fingering_engraver"
258 \consists "Bend_engraver"
260 \consists "Script_engraver"
261 \consists "Script_column_engraver"
262 \consists "Rhythmic_column_engraver"
263 \consists "Note_spacing_engraver"
264 \consists "Spanner_break_forbid_engraver"
265 \consists "Phrasing_slur_engraver"
266 \consists "Cluster_spanner_engraver"
267 \consists "Slur_engraver"
268 \consists "Tie_engraver"
269 \consists "Tuplet_engraver"
270 \consists "Grace_engraver"
271 \consists "Instrument_switch_engraver"
280 \override Stem #'length-fraction = #(magstep -4)
281 \override Beam #'length-fraction = #(magstep -4)
282 \override Beam #'beam-thickness = #0.35
290 \description "A voice on a percussion staff."
291 \remove "Arpeggio_engraver"
292 \consists "Grob_pq_engraver"
294 \remove "Note_head_line_engraver"
295 \remove "Glissando_engraver"
296 \remove "Ligature_bracket_engraver"
297 \remove "Note_heads_engraver"
298 \consists "Drum_notes_engraver"
299 \remove "New_fingering_engraver"
301 \remove "Fingering_engraver"
303 \remove "Cluster_spanner_engraver"
307 \type "Engraver_group"
309 localKeySignature = #'()
311 \description "A group of staves, with a brace on the left
312 side, grouping the staves together. The bar lines of the
313 contained staves are connected vertically."
315 \consists "Instrument_name_engraver"
316 \consists "Span_bar_engraver"
317 \consists "Span_bar_stub_engraver"
318 \consists "Span_arpeggio_engraver"
319 \consists "System_start_delimiter_engraver"
320 \consists "Vertical_align_engraver"
321 systemStartDelimiter = #'SystemStartBrace
322 topLevelAlignment = ##f
323 %% explicitly set instrument, so it is not inherited from the parent
324 instrumentName = #'()
325 shortInstrumentName = #'()
327 \defaultchild "Staff"
329 \accepts "RhythmicStaff"
333 \accepts "FiguredBass"
335 \accepts "ChordNames"
343 \description "Just like @code{GrandStaff}, but the staves are only removed
344 together, never separately."
346 \consists "Vertical_align_engraver"
347 \consists "Keep_alive_together_engraver"
348 topLevelAlignment = ##f
350 instrumentName = #'()
351 shortInstrumentName = #'()
355 \type "Engraver_group"
358 \consists "Vertical_align_engraver"
359 topLevelAlignment = ##f
361 \consists "Instrument_name_engraver"
362 \consists "Span_bar_engraver"
363 \consists "Span_bar_stub_engraver"
364 \consists "Span_arpeggio_engraver"
365 \consists "Output_property_engraver"
366 systemStartDelimiter = #'SystemStartBracket
367 %% explicitly set instrument, so it is not inherited from the parent
368 instrumentName = #'()
369 shortInstrumentName = #'()
371 \consists "System_start_delimiter_engraver"
373 \defaultchild "Staff"
375 \accepts "RhythmicStaff"
377 \accepts "GrandStaff"
378 \accepts "PianoStaff"
381 \accepts "ChordNames"
382 \accepts "FiguredBass"
383 \accepts "ChoirStaff"
384 \accepts "StaffGroup"
386 \description "Groups staves while adding a bracket on the left
387 side, grouping the staves together. The bar lines of the contained
388 staves are connected vertically. @code{StaffGroup} only consists of
389 a collection of staves, with a bracket in front and spanning bar lines."
393 \type "Engraver_group"
396 \consists "Output_property_engraver"
397 \consists "Bar_engraver"
398 \consists "Piano_pedal_engraver"
399 \consists "Script_engraver"
400 \consists "New_dynamic_engraver"
401 \consists "Dynamic_align_engraver"
402 \consists "Text_engraver"
403 \consists "Text_spanner_engraver"
404 \consists "Axis_group_engraver"
405 \consists "Tweak_engraver"
407 pedalSustainStrings = #'("Ped." "*Ped." "*")
408 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
409 \override VerticalAxisGroup #'staff-affinity = #CENTER
410 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
411 #'((basic-distance . 5)
413 \override TextScript #'font-shape = #'italic
414 \override DynamicLineSpanner #'Y-offset = #0
415 \override DynamicText #'X-offset =
416 #(ly:make-simple-closure
418 ,(ly:make-simple-closure
419 (list ly:self-alignment-interface::centered-on-note-columns))
420 ,(ly:make-simple-closure
421 (list ly:self-alignment-interface::x-aligned-on-self))))
423 \description "Holds a single line of dynamics, which will be
424 centered between the staves surrounding this context."
429 \type "Engraver_group"
431 \description "Corresponds to a voice with lyrics. Handles the
432 printing of a single line of lyrics."
435 \consists "Lyric_engraver"
436 \consists "Extender_engraver"
437 \consists "Hyphen_engraver"
438 \consists "Tweak_engraver"
439 \consists "Stanza_number_engraver"
440 \consists "Instrument_name_engraver"
441 \consists "Font_size_engraver"
442 \consists "Hara_kiri_engraver"
443 \consists "Pure_from_neighbor_engraver"
445 %% explicitly set instrument, so it is not inherited from the parent
446 instrumentName = #'()
447 shortInstrumentName = #'()
449 \override VerticalAxisGroup #'remove-first = ##t
450 \override VerticalAxisGroup #'remove-empty = ##t
451 \override VerticalAxisGroup #'staff-affinity = #UP
452 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
453 #'((basic-distance . 5.5)
455 (stretchability . 1))
456 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
457 #'((basic-distance . 0)
458 (minimum-distance . 2.8)
460 (stretchability . 0))
461 \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
462 \override InstrumentName #'self-alignment-Y = ##f
464 %% sync with define-grobs.scm ;
465 \override InstrumentName #'font-size = #1.0
467 %% make sure that barlines aren't collapsed, when
468 %% Bar_engraver is there.
469 \override BarLine #'bar-extent = #'(-0.05 . 0.05)
474 \type "Engraver_group"
476 \description "A context for printing the names of notes."
477 \consists "Axis_group_engraver"
479 \override VerticalAxisGroup #'staff-affinity = #UP
480 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
481 #'((basic-distance . 0)
482 (minimum-distance . 2.8)
484 (stretchability . 0))
485 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
486 #'((basic-distance . 5.5)
488 (stretchability . 1))
489 \override VerticalAxisGroup
490 #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
492 \consists "Tie_engraver"
493 \consists "Note_name_engraver"
494 \consists "Separating_line_group_engraver"
498 \type "Engraver_group"
500 \description "Typesets chord names."
502 \consists "Output_property_engraver"
503 \consists "Separating_line_group_engraver"
504 \consists "Chord_name_engraver"
505 \consists "Hara_kiri_engraver"
506 % \consists "Note_spacing_engraver"
507 \override VerticalAxisGroup #'remove-first = ##t
508 \override VerticalAxisGroup #'remove-empty = ##t
509 \override VerticalAxisGroup #'staff-affinity = #DOWN
510 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
511 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
515 \type "Score_engraver"
518 \description "This is the top level notation context. No
519 other context can contain a @code{Score} context. This context
520 handles the administration of time signatures. It also makes sure
521 that items such as clefs, time signatures, and key-signatures are
522 aligned across staves.
524 You cannot explicitly instantiate a @code{Score} context (since it
525 is not contained in any other context). It is instantiated
526 automatically when an output definition (a @code{\score} or
527 @code{\layout} block) is processed."
529 \consists "Paper_column_engraver"
530 \consists "Repeat_acknowledge_engraver"
531 \consists "Staff_collecting_engraver"
535 %% An alias for Timing is established by the Timing_translator in
536 %% whatever context it is initialized, and the timing variables are
537 %% then copied from wherever Timing had been previously established.
538 %% The alias at Score level provides a target for initializing
539 %% Timing variables in layout definitions before any
540 %% Timing_translator has been run.
542 % timing translator must come BEFORE bar number engraver
543 \consists "Timing_translator"
544 \consists "Default_bar_line_engraver"
545 \consists "Output_property_engraver"
546 \consists "System_start_delimiter_engraver"
547 \consists "Mark_engraver"
548 \consists "Volta_engraver"
549 \consists "Metronome_mark_engraver"
550 \consists "Break_align_engraver"
551 \consists "Spacing_engraver"
552 \consists "Grace_spacing_engraver"
553 \consists "Vertical_align_engraver"
554 \consists "Stanza_number_align_engraver"
555 \consists "Bar_number_engraver"
556 \consists "Parenthesis_engraver"
557 \consists "Concurrent_hairpin_engraver"
558 \consists "Beam_collision_engraver"
559 \consists "Footnote_engraver"
561 \defaultchild "Staff"
563 \accepts "FretBoards"
565 \accepts "RhythmicStaff"
567 \accepts "VaticanaStaff"
568 \accepts "GregorianTranscriptionStaff"
569 \accepts "MensuralStaff"
570 \accepts "PetrucciStaff"
571 \accepts "StaffGroup"
573 \accepts "KievanStaff"
575 \accepts "ChordNames"
576 \accepts "GrandStaff"
577 \accepts "ChoirStaff"
578 \accepts "PianoStaff"
581 \accepts "FiguredBass"
583 noteToFretFunction = #determine-frets
584 predefinedDiagramTable = ##f
586 soloIIText = #"Solo II"
588 printPartCombineTexts = ##t
589 partCombineTextsOnNote = ##t
590 systemStartDelimiter =#'SystemStartBar
592 drumStyleTable = #drums-style
594 melismaBusyProperties = #default-melisma-properties
596 clefGlyph = #"clefs.G"
598 middleCClefPosition = #-6
599 middleCPosition = #-6
602 crescendoSpanner = #'hairpin
603 decrescendoSpanner = #'hairpin
605 defaultBarType = #"|"
606 doubleRepeatType = #":|:"
607 startRepeatType = #"|:"
608 endRepeatType = #":|"
609 barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
610 barNumberFormatter = #robust-bar-number-function
613 explicitClefVisibility = #all-visible
614 explicitCueClefVisibility = #end-of-line-invisible
615 explicitKeySignatureVisibility = #all-visible
616 implicitTimeSignatureVisibility = #end-of-line-invisible
618 repeatCountVisibility = #all-repeat-counts-visible
620 timeSignatureSettings = #default-time-signature-settings
621 timeSignatureFraction = 4/4
623 %% These defaults should be the same as the rules established in
624 %% scm/time-signature-settings.scm for 4/4 time
625 measureLength = #(ly:make-moment 4 4)
626 baseMoment = #(ly:make-moment 1 4)
627 beatStructure = #'(1 1 1 1)
628 beamExceptions = #'((end . (((1 . 8) . (4 4))
629 ((1 . 12) . (3 3 3 3)))))
630 beamHalfMeasure = ##t
633 autoBeamCheck = #default-auto-beam-check
635 scriptDefinitions = #default-script-alist
637 pedalSustainStrings = #'("Ped." "*Ped." "*")
638 pedalSustainStyle = #'text
639 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
640 pedalUnaCordaStyle = #'text
642 %% These are in ordinary italic font, including the *,
643 %% but they are unlikely to be used,
644 %% as the default pedal-style for SostenutoPedal is 'mixed':
645 %% i.e. Sost. Ped_____________________
646 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
647 pedalSostenutoStyle = #'mixed
649 harmonicAccidentals = ##t
650 fingeringOrientations = #'(up down)
651 stringNumberOrientations = #'(up down)
652 strokeFingerOrientations = #'(right)
654 lyricMelismaAlignment = #LEFT
655 markFormatter = #format-mark-letters
659 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
660 autoCautionaries = #'()
662 printKeyCancellation = ##t
663 keyAlterationOrder = #`(
664 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
665 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
666 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
667 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
670 barCheckSynchronize = ##f
673 chordNameFunction = #ignatzek-chord-names
674 minorChordModifier = #(make-simple-markup "m")
675 additionalPitchPrefix = #"" % was "add"
676 majorSevenSymbol = #whiteTriangleMarkup
677 chordNameLowercaseMinor = ##f
678 chordNameSeparator = #(make-hspace-markup 0.5)
679 slashChordSeparator = #(make-simple-markup "/")
680 chordNameExceptions = #ignatzekExceptions
681 chordNoteNamer = #'()
682 chordRootNamer = #note-name->markup
683 chordPrefixSpacer = #0
684 chordNameExceptionsFull = #fullJazzExceptions
685 chordNameExceptionsPartial = #partialJazzExceptions
686 noChordSymbol = #(make-simple-markup "N.C.")
688 bassStaffProperties = #'((assign clefGlyph "clefs.F")
689 (assign clefPosition 2)
690 (assign middleCPosition 6)
691 (assign middleCClefPosition 6))
693 stringOneTopmost = ##t
696 %% One may change the string tunings as follows :
697 %% The length of the list must be equal to the number of strings
698 stringTunings = #guitar-tuning
699 tablatureFormat = #fret-number-tablature-format
700 tabStaffLineLayoutFunction = #tablature-position-on-lines
703 figuredBassFormatter = #format-bass-figure
704 metronomeMarkFormatter = #format-metronome-markup
707 %% See also make-voice-props-set
709 (Voice Stem direction ,UP)
710 (Voice Stem font-size -3)
711 (Voice Flag font-size -3)
712 (Voice NoteHead font-size -3)
713 (Voice TabNoteHead font-size -4)
714 (Voice Dots font-size -3)
715 (Voice Stem length-fraction 0.8)
716 (Voice Stem no-stem-extend #t)
717 (Voice Beam beam-thickness 0.384)
718 (Voice Beam length-fraction 0.8)
719 (Voice Accidental font-size -4)
720 (Voice AccidentalCautionary font-size -4)
721 (Voice Slur direction ,DOWN)
722 (Voice Script font-size -3)
723 (Voice Fingering font-size -8)
724 (Voice StringNumber font-size -8)
727 keepAliveInterfaces = #'(
728 bass-figure-interface
730 cluster-beacon-interface
731 fret-diagram-interface
732 lyric-syllable-interface
734 tab-note-head-interface
736 percent-repeat-item-interface
737 percent-repeat-interface
739 ;; need this, as stanza numbers are items, and appear only once.
740 stanza-number-interface
742 % \quoteDuring is supposed to quote everything, cueDuring only the essentials
743 quotedEventTypes = #'(StreamEvent)
744 quotedCueEventTypes = #'(
750 instrumentTransposition = #(ly:make-pitch 0 0 0)
752 topLevelAlignment = ##t
761 \type "Engraver_group"
763 \description "A context for printing a figured bass line."
765 \consists "Figured_bass_engraver"
766 \consists "Separating_line_group_engraver"
767 \consists "Hara_kiri_engraver"
769 \override VerticalAxisGroup #'remove-empty = ##t
770 \override VerticalAxisGroup #'remove-first = ##t
771 \override VerticalAxisGroup #'staff-affinity = #UP
772 \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
773 \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
778 \type "Engraver_group"
780 %% don't want to route anything out of here:
783 \description "Silently discards all musical information given to this
791 \consists "Tab_note_heads_engraver"
792 \consists "Tab_tie_follow_engraver"
794 \remove "Note_heads_engraver"
795 \remove "Fingering_engraver"
796 \remove "New_fingering_engraver"
797 \remove "Pitched_trill_engraver"
799 \description "Context for drawing notes in a Tab staff."
801 %% TabStaff increase the staff-space, which in turn
802 %% increases beam thickness and spacing; beams are
803 %% too big. We have to adjust the beam settings:
804 \override Beam #'beam-thickness = #0.32
805 \override Beam #'length-fraction = #0.62
806 %% the same goes for tremolo beams
807 \override StemTremolo #'beam-thickness = #0.32
808 %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
809 %% and the tablature staff space is scaled (1.5 by default),
810 %% so we use the inversion of the scale factor:
811 \override StemTremolo #'length-fraction = #(lambda (grob)
812 (/ 1 (ly:staff-symbol-staff-space grob)))
813 \override StemTremolo #'beam-width = #stem-tremolo::calc-tab-width
815 %% No accidental in tablature !
816 \remove "Accidental_engraver"
817 %% make the Stems as short as possible to minimize their influence
818 %% on the slur::calc-control-points routine
819 \override Stem #'no-stem-extend = ##t
820 \override Flag #'style = #'no-flag
821 \override Stem #'details = #'((lengths 0 0 0 0 0 0)
822 (beamed-lengths 0 0 0)
823 (beamed-minimum-free-lengths 0 0 0)
824 (beamed-extreme-minimum-free-lengths 0 0)
826 %% after all, the stubs of the stems may still be visible, so ...
827 \override Stem #'stencil = ##f
828 \override Flag #'stencil = ##f
829 %% automatic beams should be suppressed for similar reasons ...
831 %% remove beams, dots and rests ...
832 \override Beam #'stencil = ##f
833 \override StemTremolo #'stencil = ##f
834 \override Dots #'stencil = ##f
835 \override Rest #'stencil = ##f
836 \override MultiMeasureRest #'stencil = ##f
837 \override MultiMeasureRestNumber #'stencil = ##f
838 \override MultiMeasureRestText #'stencil = ##f
839 %% ... all kinds of ties/slurs
840 \override Tie #'stencil = ##f
841 \override RepeatTie #'stencil = ##f
842 \override LaissezVibrerTie #'stencil = ##f
843 \override Slur #'stencil = #slur::draw-tab-slur
844 \override PhrasingSlur #'stencil = ##f
845 %% 'tied to' fret numbers become invisible or parenthesized, respectively)
846 \override Tie #'after-line-breaking = #tie::handle-tab-note-head
847 \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
848 %% ... and all kinds of markups, spanners etc.
849 \override TupletBracket #'stencil = ##f
850 \override TupletNumber #'stencil = ##f
851 \override DynamicText #'stencil = ##f
852 \override DynamicTextSpanner #'stencil = ##f
853 \override TextSpanner #'stencil = ##f
854 \override Hairpin #'stencil = ##f
855 \override Script #'stencil = ##f
856 \override TextScript #'stencil = ##f
857 \override Glissando #'stencil = #glissando::draw-tab-glissando
858 %% the direction for glissando lines will be automatically corrected
859 \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
860 \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
862 \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
865 \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
866 \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
874 \consists "Tab_staff_symbol_engraver"
876 \description "Context for generating tablature. It accepts only @code{TabVoice}
877 contexts and handles the line spacing, the tablature clef etc. properly."
880 \defaultchild "TabVoice"
882 %% 6 strings, bigger spacing
883 \override StaffSymbol #'staff-space = #1.5
885 %% Don't draw stems over the tablature figures !
886 \override Stem #'avoid-note-head = ##t
888 %% No accidental in tablature !
889 \remove "Accidental_engraver"
890 \remove "Key_engraver"
892 \remove "Ottava_spanner_engraver"
894 \override Clef #'stencil = #clef::print-modern-tab-if-set
896 \override TimeSignature #'stencil = ##f
898 \override Arpeggio #'stencil = ##f
899 %% we ignore collision warnings that may occur due to
900 %% stem overlapping, because we have no stems ;-)
901 \override NoteColumn #'ignore-collision = ##t
902 %% Special "TAB" clef
903 clefGlyph = #"clefs.tab"
905 %% Change string if note results in negative fret number
906 handleNegativeFrets = #'recalculate
907 %% Allow open strings even if minimumFret is set
908 restrainOpenStrings = ##f
913 \name "VaticanaVoice"
915 \description "Same as @code{Voice} context, except that it is
916 accommodated for typesetting Gregorian Chant in the notational style
919 \remove "Slur_engraver"
920 \remove "Stem_engraver"
921 \remove "Ligature_bracket_engraver"
922 \consists "Vaticana_ligature_engraver"
923 \remove "Text_spanner_engraver"
924 \consists "Episema_engraver"
926 %% Set default head for notes outside of \[ \].
927 \override NoteHead #'style = #'vaticana.punctum
929 %% Put some space before and after divisiones.
930 %% FIXME: This does not seem to show any effect.
931 \override Script #'padding = #0.5
933 %% There are no beams in Gregorian Chant notation.
939 \name "VaticanaStaff"
942 \accepts "VaticanaVoice"
943 \defaultchild "VaticanaVoice"
945 \description "Same as @code{Staff} context, except that it is
946 accommodated for typesetting Gregorian Chant in the notational style
949 \remove "Time_signature_engraver"
950 \consists "Custos_engraver"
952 %% We can not remove Bar_engraver; otherwise clefs and custodes will
953 %% not show up any more among other line breaking issues.
954 %% Instead, we make the grob transparent.
955 \override BarLine #'transparent = ##t
957 \override StaffSymbol #'line-count = #4
958 \override StaffSymbol #'thickness = #0.6
960 %% FIXME: unit on StaffSymbol's width should be \linewidth.
961 %% \override StaffSymbol #'width = #60.0
963 %% Choose vaticana do clef on 3rd line as default.
964 clefGlyph = #"clefs.vaticana.do"
966 middleCClefPosition = #1
970 %% Select vaticana style font.
971 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
972 \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
973 \override Custos #'style = #'vaticana
974 \override Custos #'neutral-position = #3
975 \override Custos #'neutral-direction = #DOWN
976 \override Dots #'style = #'vaticana
981 \name "GregorianTranscriptionVoice"
983 \consists "Episema_engraver"
985 %% Removing ligature bracket engraver without replacing it by some
986 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
987 %% warning for every "\[" and "\]". Therefore, we make the grob
988 %% transparent instead.
989 \override LigatureBracket #'transparent = ##t
991 %% Put some space before and after divisiones.
992 %% FIXME: This does not seem to show any effect.
993 \override Script #'padding = #0.5
995 %% There are no beams in Gregorian Chant notation.
1002 \name "GregorianTranscriptionStaff"
1005 \accepts "GregorianTranscriptionVoice"
1006 \defaultchild "GregorianTranscriptionVoice"
1008 %% We can not remove Bar_engraver; otherwise clefs and custodes will
1009 %% not show up any more among other line breaking issues.
1010 %% Instead, we make the grob transparent.
1011 \override BarLine #'transparent = ##t
1016 \name "MensuralVoice"
1018 \description "Same as @code{Voice} context, except that it is
1019 accommodated for typesetting a piece in mensural style."
1021 \remove "Slur_engraver"
1022 \remove "Ligature_bracket_engraver"
1023 \consists "Mensural_ligature_engraver"
1025 %% Set default head for notes outside of \[ \].
1026 \override NoteHead #'style = #'mensural
1027 \override Rest #'style = #'mensural
1028 \override Flag #'style = #'mensural
1030 %% There are no beams in mensural notation.
1036 \name "MensuralStaff"
1039 \defaultchild "MensuralVoice"
1040 \accepts "MensuralVoice"
1041 \description "Same as @code{Staff} context, except that it is
1042 accommodated for typesetting a piece in mensural style."
1044 \consists "Custos_engraver"
1046 %% We can not remove Bar_engraver; otherwise clefs and custodes will
1047 %% not show up any more among other line breaking issues.
1048 %% Instead, we make the grob transparent.
1049 \override BarLine #'transparent = ##t
1051 \override StaffSymbol #'thickness = #0.6
1053 %% FIXME: unit on StaffSymbol's width should be \linewidth.
1054 %% \override StaffSymbol #'width = #60.0
1056 %% Choose mensural g clef on 2nd line as default.
1057 clefGlyph = #"clefs.mensural.g"
1058 middleCClefPosition = #-6
1059 middleCPosition = #-6
1063 %% Select mensural style font.
1064 \override TimeSignature #'style = #'mensural
1065 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1066 \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
1067 \override Custos #'style = #'mensural
1068 \override Custos #'neutral-position = #3
1069 \override Custos #'neutral-direction = #DOWN
1071 %% Accidentals are valid only once (same as
1072 %% \accidentalStyle "forget")
1074 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
1075 autoCautionaries = #'()
1076 printKeyCancellation = ##f
1081 \name "PetrucciVoice"
1083 \description "Same as @code{Voice} context, except that it is
1084 accommodated for typesetting a piece in Petrucci style."
1086 \remove "Ligature_bracket_engraver"
1087 \consists "Mensural_ligature_engraver"
1089 %% Set glyph styles.
1090 \override NoteHead #'style = #'petrucci
1091 \override Rest #'style = #'mensural
1093 % Thickens and shortens stems.
1094 \override Stem #'thickness = #1.7
1095 \override Stem #'length = #5
1097 %% There are no beams in Petrucci notation.
1103 \name "PetrucciStaff"
1106 \defaultchild "PetrucciVoice"
1107 \accepts "PetrucciVoice"
1108 \description "Same as @code{Staff} context, except that it is
1109 accommodated for typesetting a piece in Petrucci style."
1111 \consists "Custos_engraver"
1113 \override StaffSymbol #'thickness = #1.3
1115 %% Choose Petrucci g clef on 2nd line as default.
1116 clefGlyph = #"clefs.petrucci.g"
1117 middleCClefPosition = #-6
1118 middleCPosition = #-6
1122 \override Custos #'style = #'mensural
1123 \override Custos #'neutral-position = #3
1124 \override Custos #'neutral-direction = #DOWN
1126 %% Accidentals are valid only once (if the following note is different)
1128 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1129 ,neo-modern-accidental-rule)
1130 autoCautionaries = #'()
1131 printKeyCancellation = ##f
1138 \description "Same as @code{Voice} context, except that it is
1139 accommodated for typesetting a piece in Kievan style."
1141 %% Set glyph styles.
1142 \override NoteHead #'style = #'kievan
1143 \override Rest #'style = #'mensural
1144 \override Accidental #'glyph-name-alist = #alteration-kievan-glyph-name-alist
1145 \override Dots #'style = #'kievan
1146 \override Slur #'stencil = ##f
1148 %% There are beams in Kievan notation, but they are invoked manually
1157 \defaultchild "KievanVoice"
1158 \accepts "KievanVoice"
1159 \description "Same as @code{Staff} context, except that it is
1160 accommodated for typesetting a piece in Kievan style."
1162 \remove "Time_signature_engraver"
1164 %% Choose Kievan tsefaut clef
1165 clefGlyph = #"clefs.kievan.do"
1166 middleCClefPosition = #0
1167 middleCPosition = #0
1171 %% Accidentals are valid only once (if the following note is different)
1173 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1174 ,neo-modern-accidental-rule)
1175 autoCautionaries = #'()
1176 printKeyCancellation = ##f
1180 %% Keep the old definitions in here for compatibility (they erase previous
1181 %% settings to the corresponding context!).
1182 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
1183 %% into the desired context. That's just as easy, requires only one line more
1184 %% (the \*Staff), but preserves previous context mods.
1185 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
1186 RemoveEmptyStaffContext = \context {
1191 AncientRemoveEmptyStaffContext = \context {
1196 RemoveEmptyDrumStaffContext = \context {
1201 RemoveEmptyRhythmicStaffContext = \context {
1206 RemoveEmptyTabStaffContext = \context {