1 %%%% This file is part of LilyPond, the GNU music typesetter.
3 %%%% Copyright (C) 1996--2009 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 predefinedDiagramTable = #fretboard-table
47 \type "Engraver_group"
50 \consists "Output_property_engraver"
51 \consists "Bar_engraver"
52 %% Bar_engraver must be first so default bars aren't overwritten
55 \consists "Font_size_engraver"
56 \consists "Separating_line_group_engraver"
57 \consists "Dot_column_engraver"
58 \consists "Staff_collecting_engraver"
60 %% perhaps move to Voice context?
61 \consists "Ottava_spanner_engraver"
62 \consists "Clef_engraver"
63 \consists "Key_engraver"
64 \consists "Time_signature_engraver"
65 \consists "Ledger_line_engraver"
66 \consists "Staff_symbol_engraver"
67 \consists "Collision_engraver"
68 \consists "Grob_pq_engraver"
69 \consists "Rest_collision_engraver"
70 \consists "Accidental_engraver"
71 \consists "Piano_pedal_engraver"
72 \consists "Piano_pedal_align_engraver"
73 \consists "Instrument_name_engraver"
74 \consists "Axis_group_engraver"
75 \consists "Figured_bass_engraver"
76 \consists "Figured_bass_position_engraver"
77 \consists "Script_row_engraver"
79 localKeySignature = #'()
81 ignoreFiguredBassRest = ##t
83 %% explicitly set instrument, so we don't get
84 %% weird effects when doing instrument names for
88 shortInstrumentName = #'()
94 \description "Handles clefs, bar lines, keys, accidentals. It can contain
95 @code{Voice} contexts."
101 \type "Engraver_group"
105 \remove "Accidental_engraver"
106 \remove "Ottava_spanner_engraver"
107 \remove "Key_engraver"
108 \remove "Piano_pedal_engraver"
110 \description "Handles typesetting for percussion."
114 \defaultchild "DrumVoice"
116 clefGlyph = #"clefs.percussion"
118 \override Script #'staff-padding = #0.75
123 \type "Engraver_group"
125 \consists "Vertical_align_engraver"
126 topLevelAlignment = ##f
128 \consists "System_start_delimiter_engraver"
129 systemStartDelimiter = #'SystemStartBracket
131 shortVocalName = #'()
135 \accepts "RhythmicStaff"
136 \accepts "GrandStaff"
137 \accepts "PianoStaff"
139 \accepts "ChordNames"
140 \accepts "FiguredBass"
141 \accepts "ChoirStaff"
142 \accepts "StaffGroup"
143 \defaultchild "Staff"
144 \description "Identical to @code{StaffGroup} except that the
145 contained staves are not connected vertically."
149 \type "Engraver_group"
151 localKeySignature = #'()
154 squashedPosition = #0
158 \override BarLine #'bar-size = #4
159 \override VoltaBracket #'staff-padding = #3
160 \override StaffSymbol #'line-count = #1
162 \override Stem #'neutral-direction = #UP
163 \override Beam #'neutral-direction = #UP
165 \consists "Output_property_engraver"
166 \consists "Font_size_engraver"
167 \consists "Separating_line_group_engraver"
168 \consists "Dot_column_engraver"
169 \consists "Bar_engraver"
170 \consists "Staff_symbol_engraver"
171 \consists "Pitch_squash_engraver"
172 \consists "Time_signature_engraver"
173 \consists "Instrument_name_engraver"
174 \consists "Axis_group_engraver"
175 \consists "Ledger_line_engraver"
179 \defaultchild "Voice"
181 \description "A context like @code{Staff} but for printing rhythms.
182 Pitches are ignored; the notes are printed on one line."
187 \type "Engraver_group"
190 \description "Corresponds to a voice on a staff. This context
191 handles the conversion of dynamic signs, stems, beams, super- and
192 subscripts, slurs, ties, and rests.
194 You have to instantiate this explicitly if you want to have
195 multiple voices on the same staff."
197 localKeySignature = #'()
198 \consists "Font_size_engraver"
200 \consists "Pitched_trill_engraver"
201 \consists "Output_property_engraver"
202 \consists "Arpeggio_engraver"
203 \consists "Multi_measure_rest_engraver"
204 \consists "Text_spanner_engraver"
205 \consists "Trill_spanner_engraver"
206 \consists "Grob_pq_engraver"
207 \consists "Forbid_line_break_engraver"
208 \consists "Laissez_vibrer_engraver"
209 \consists "Repeat_tie_engraver"
210 \consists "Note_head_line_engraver"
211 \consists "Glissando_engraver"
212 \consists "Ligature_bracket_engraver"
213 \consists "Breathing_sign_engraver"
214 \consists "Note_heads_engraver"
215 \consists "Dots_engraver"
216 \consists "Rest_engraver"
217 \consists "Tweak_engraver"
219 %% switch on to make stem directions interpolate for the
221 % \consists "Melody_engraver"
223 \consists "Stem_engraver"
224 \consists "Beam_engraver"
225 \consists "Grace_beam_engraver"
226 \consists "Auto_beam_engraver"
228 %% must come before Script_column_engraver.
229 \consists "New_fingering_engraver"
231 \consists "Chord_tremolo_engraver"
232 \consists "Percent_repeat_engraver"
233 \consists "Slash_repeat_engraver"
234 \consists "Part_combine_engraver"
236 \consists "Text_engraver"
237 \consists "New_dynamic_engraver"
238 \consists "Dynamic_align_engraver"
239 % \consists "Dynamic_engraver"
240 \consists "Fingering_engraver"
241 \consists "Bend_engraver"
243 \consists "Script_engraver"
244 \consists "Script_column_engraver"
245 \consists "Rhythmic_column_engraver"
246 \consists "Note_spacing_engraver"
247 \consists "Spanner_break_forbid_engraver"
248 \consists "Phrasing_slur_engraver"
249 \consists "Cluster_spanner_engraver"
250 \consists "Slur_engraver"
251 \consists "Tie_engraver"
252 \consists "Tuplet_engraver"
253 \consists "Grace_engraver"
254 \consists "Instrument_switch_engraver"
263 \override Stem #'length-fraction = #(magstep -4)
264 \override Beam #'length-fraction = #(magstep -4)
265 \override Beam #'beam-thickness = #0.35
273 \description "A voice on a percussion staff."
274 \remove "Arpeggio_engraver"
275 \consists "Grob_pq_engraver"
277 \remove "Note_head_line_engraver"
278 \remove "Glissando_engraver"
279 \remove "Ligature_bracket_engraver"
280 \remove "Note_heads_engraver"
281 \consists "Drum_notes_engraver"
282 \remove "New_fingering_engraver"
284 \remove "Fingering_engraver"
286 \remove "Cluster_spanner_engraver"
290 \type "Engraver_group"
292 localKeySignature = #'()
294 \description "A group of staves, with a brace on the left
295 side, grouping the staves together. The bar lines of the
296 contained staves are connected vertically."
298 \consists "Span_bar_engraver"
299 \consists "Span_arpeggio_engraver"
300 \consists "System_start_delimiter_engraver"
301 systemStartDelimiter = #'SystemStartBrace
303 \defaultchild "Staff"
305 \accepts "FiguredBass"
314 \description "Just like @code{GrandStaff} but with support for
315 instrument names at the start of each system."
317 \consists "Instrument_name_engraver"
318 \consists "Vertical_align_engraver"
319 topLevelAlignment = ##f
321 \override StaffGrouper #'between-staff-spacing #'stretchability = #5
323 instrumentName = #'()
324 shortInstrumentName = #'()
328 \type "Engraver_group"
331 \consists "Vertical_align_engraver"
332 topLevelAlignment = ##f
334 \consists "Span_bar_engraver"
335 \consists "Span_arpeggio_engraver"
336 \consists "Output_property_engraver"
337 systemStartDelimiter = #'SystemStartBracket
339 \consists "System_start_delimiter_engraver"
341 \defaultchild "Staff"
343 \accepts "RhythmicStaff"
345 \accepts "GrandStaff"
346 \accepts "PianoStaff"
349 \accepts "ChordNames"
350 \accepts "FiguredBass"
351 \accepts "ChoirStaff"
352 \accepts "StaffGroup"
354 \description "Groups staves while adding a bracket on the left
355 side, grouping the staves together. The bar lines of the contained
356 staves are connected vertically. @code{StaffGroup} only consists of
357 a collection of staves, with a bracket in front and spanning bar lines."
361 \type "Engraver_group"
364 \consists "Output_property_engraver"
365 \consists "Bar_engraver"
366 \consists "Piano_pedal_engraver"
367 \consists "Script_engraver"
368 \consists "New_dynamic_engraver"
369 \consists "Dynamic_align_engraver"
370 \consists "Text_engraver"
371 \consists "Text_spanner_engraver"
372 \consists "Axis_group_engraver"
374 pedalSustainStrings = #'("Ped." "*Ped." "*")
375 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
376 \override VerticalAxisGroup #'staff-affinity = #CENTER
377 \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5) (padding . 0.5))
378 \override TextScript #'font-shape = #'italic
379 \override DynamicLineSpanner #'Y-offset = #0
381 \description "Holds a single line of dynamics, which will be
382 centered between the staves surrounding this context."
387 \type "Engraver_group"
389 \description "Corresponds to a voice with lyrics. Handles the
390 printing of a single line of lyrics."
393 instrumentName = #'()
394 shortInstrumentName = #'()
396 \consists "Lyric_engraver"
397 \consists "Extender_engraver"
398 \consists "Hyphen_engraver"
399 \consists "Stanza_number_engraver"
400 \consists "Instrument_name_engraver"
401 \consists "Font_size_engraver"
402 \consists "Hara_kiri_engraver"
404 \override VerticalAxisGroup #'remove-first = ##t
405 \override VerticalAxisGroup #'remove-empty = ##t
406 \override VerticalAxisGroup #'staff-affinity = #UP
407 \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5.5) (stretchability . 1) (padding . 0.5))
408 \override VerticalAxisGroup #'inter-loose-line-spacing = #'((space . 0) (stretchability . 0) (padding . 0.2))
409 \override VerticalAxisGroup #'non-affinity-spacing #'padding = #1.0
410 \override SeparationItem #'padding = #0.2
411 \override InstrumentName #'self-alignment-Y = ##f
413 %% sync with define-grobs.scm ;
414 \override InstrumentName #'font-size = #1.0
416 %% make sure that barlines aren't collapsed, when
417 %% Bar_engraver is there.
418 \override BarLine #'bar-size = #0.1
423 \type "Engraver_group"
425 \description "A context for printing the names of notes."
426 \consists "Axis_group_engraver"
428 % FIXME: not sure what the default should be here.
429 \override VerticalAxisGroup #'staff-affinity = #DOWN
431 \consists "Tie_engraver"
432 \consists "Note_name_engraver"
433 \consists "Separating_line_group_engraver"
437 \type "Engraver_group"
439 \description "Typesets chord names."
441 \consists "Output_property_engraver"
442 \consists "Separating_line_group_engraver"
443 \consists "Chord_name_engraver"
444 \consists "Hara_kiri_engraver"
445 % \consists "Note_spacing_engraver"
446 \override VerticalAxisGroup #'remove-first = ##t
447 \override VerticalAxisGroup #'remove-empty = ##t
448 \override VerticalAxisGroup #'staff-affinity = #DOWN
449 \override VerticalAxisGroup #'inter-staff-spacing #'padding = #0.5
450 \override VerticalAxisGroup #'inter-loose-line-spacing #'padding = #0.5
454 RemoveEmptyStaffContext = \context {
456 \remove "Axis_group_engraver"
457 \consists "Hara_kiri_engraver"
458 \override Beam #'auto-knee-gap = #'()
459 \override VerticalAxisGroup #'remove-empty = ##t
462 AncientRemoveEmptyStaffContext = \context {
463 %% why not add by default?
465 \RemoveEmptyStaffContext
466 \accepts "VaticanaVoice"
467 \accepts "GregorianTranscriptionVoice"
468 \accepts "MensuralVoice"
472 \type "Score_engraver"
475 \description "This is the top level notation context. No
476 other context can contain a @code{Score} context. This context
477 handles the administration of time signatures. It also makes sure
478 that items such as clefs, time signatures, and key-signatures are
479 aligned across staves.
481 You cannot explicitly instantiate a @code{Score} context (since it
482 is not contained in any other context). It is instantiated
483 automatically when an output definition (a @code{\score} or
484 @code{\layout} block) is processed."
486 \consists "Paper_column_engraver"
487 \consists "Vertically_spaced_contexts_engraver"
488 \consists "Repeat_acknowledge_engraver"
489 \consists "Staff_collecting_engraver"
491 %% move the alias along with the engraver.
493 \consists "Timing_translator"
494 \consists "Default_bar_line_engraver"
495 \consists "Output_property_engraver"
496 \consists "System_start_delimiter_engraver"
497 \consists "Mark_engraver"
498 \consists "Volta_engraver"
499 \consists "Metronome_mark_engraver"
500 \consists "Break_align_engraver"
501 \consists "Spacing_engraver"
502 \consists "Grace_spacing_engraver"
503 \consists "Vertical_align_engraver"
504 \consists "Stanza_number_align_engraver"
505 \consists "Bar_number_engraver"
506 \consists "Parenthesis_engraver"
508 \defaultchild "Staff"
510 \accepts "FretBoards"
512 \accepts "RhythmicStaff"
514 \accepts "VaticanaStaff"
515 \accepts "GregorianTranscriptionStaff"
516 \accepts "MensuralStaff"
517 \accepts "StaffGroup"
520 \accepts "ChordNames"
521 \accepts "GrandStaff"
522 \accepts "ChoirStaff"
523 \accepts "PianoStaff"
526 \accepts "FiguredBass"
529 noteToFretFunction = #determine-frets
531 soloIIText = #"Solo II"
533 printPartCombineTexts = ##t
534 systemStartDelimiter =#'SystemStartBar
536 drumStyleTable = #drums-style
538 melismaBusyProperties = #default-melisma-properties
540 clefGlyph = #"clefs.G"
542 middleCClefPosition = #-6
543 middleCPosition = #-6
546 crescendoSpanner = #'hairpin
547 decrescendoSpanner = #'hairpin
549 defaultBarType = #"|"
550 doubleRepeatType = #":|:"
551 barNumberVisibility = #first-bar-number-invisible
554 explicitClefVisibility = #all-visible
555 explicitKeySignatureVisibility = #all-visible
556 implicitTimeSignatureVisibility = #end-of-line-invisible
558 repeatCountVisibility = #all-repeat-counts-visible
560 beamSettings = #default-beam-settings
562 autoBeamCheck = #default-auto-beam-check
563 scriptDefinitions = #default-script-alist
565 pedalSustainStrings = #'("Ped." "*Ped." "*")
566 pedalSustainStyle = #'text
567 pedalUnaCordaStrings = #'("una corda" "" "tre corde")
568 pedalUnaCordaStyle = #'text
570 %% These are in ordinary italic font, including the *,
571 %% but they are unlikely to be used,
572 %% as the default pedal-style for SostenutoPedal is 'mixed':
573 %% i.e. Sost. Ped_____________________
574 pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
575 pedalSostenutoStyle = #'mixed
577 harmonicAccidentals = ##t
578 fingeringOrientations = #'(up down)
579 stringNumberOrientations = #'(up down)
580 strokeFingerOrientations = #'(right)
582 lyricMelismaAlignment = #LEFT
583 markFormatter = #format-mark-letters
587 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
588 autoCautionaries = #'()
590 printKeyCancellation = ##t
591 keyAlterationOrder = #`(
592 (6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
593 (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
594 (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
595 (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
598 barCheckSynchronize = ##f
601 chordNameFunction = #ignatzek-chord-names
602 majorSevenSymbol = #whiteTriangleMarkup
603 chordNameSeparator = #(make-simple-markup "/")
604 chordNameExceptions = #ignatzekExceptions
605 chordNoteNamer = #'()
606 chordRootNamer = #note-name->markup
607 chordPrefixSpacer = #0
608 chordNameExceptionsFull = #fullJazzExceptions
609 chordNameExceptionsPartial = #partialJazzExceptions
610 noChordSymbol = #(make-simple-markup "N.C.")
612 bassStaffProperties = #'((assign clefGlyph "clefs.F")
613 (assign clefPosition 2)
614 (assign middleCPosition 6)
615 (assign middleCClefPosition 6))
617 stringOneTopmost = ##t
620 %% One may change the strings tuning as following :
621 %% The lenght of the list must be equal to the number of string
622 stringTunings = #guitar-tuning
623 tablatureFormat = #fret-number-tablature-format
626 figuredBassFormatter = #format-bass-figure
627 metronomeMarkFormatter = #format-metronome-markup
630 %% See also make-voice-props-set
632 (Voice Stem direction ,UP)
633 (Voice Stem font-size -3)
634 (Voice NoteHead font-size -3)
635 (Voice TabNoteHead font-size -4)
636 (Voice Dots font-size -3)
637 (Voice Stem length-fraction 0.8)
638 (Voice Stem no-stem-extend #t)
639 (Voice Beam beam-thickness 0.384)
640 (Voice Beam length-fraction 0.8)
641 (Voice Accidental font-size -4)
642 (Voice AccidentalCautionary font-size -4)
643 (Voice Slur direction ,DOWN)
644 (Voice Script font-size -3)
645 (Voice Fingering font-size -8)
646 (Voice StringNumber font-size -8)
649 keepAliveInterfaces = #'(
650 rhythmic-grob-interface
652 percent-repeat-item-interface
653 percent-repeat-interface
655 ;; need this, as stanza numbers are items, and appear only once.
656 stanza-number-interface
658 % \quoteDuring is supposed to quote everything, cueDuring only the essentials
659 quotedEventTypes = #'(StreamEvent)
660 quotedCueEventTypes = #'(
666 instrumentTransposition = #(ly:make-pitch 0 0 0)
668 verticallySpacedContexts = #'(Staff)
669 topLevelAlignment = ##t
678 \type "Engraver_group"
680 \description "A context for printing a figured bass line."
682 \consists "Figured_bass_engraver"
683 \consists "Separating_line_group_engraver"
684 \consists "Hara_kiri_engraver"
686 \override VerticalAxisGroup #'remove-empty = ##t
687 \override VerticalAxisGroup #'remove-first = ##t
688 \override VerticalAxisGroup #'staff-affinity = #UP
689 \override VerticalAxisGroup #'inter-staff-spacing #'padding = #0.5
690 \override VerticalAxisGroup #'inter-loose-line-spacing #'padding = #0.5
695 \type "Engraver_group"
697 %% don't want to route anything out of here:
700 \description "Silently discards all musical information given to this
708 \consists "Tab_note_heads_engraver"
709 \consists "Tab_harmonic_engraver"
711 \remove "Note_heads_engraver"
712 \remove "Fingering_engraver"
713 \remove "New_fingering_engraver"
715 \description "Context for drawing notes in a Tab staff."
717 %% TabStaff increase the staff-space, which in turn
718 %% increases beam thickness and spacing; beams are
719 %% too big. We have to adjust the beam settings:
720 \override Beam #'beam-thickness = #0.32
721 \override Beam #'length-fraction = #0.62
723 %% No accidental in tablature !
724 \remove "Accidental_engraver"
725 %% make the Stems as short as possible to minimize their influence
726 %% on the slur::calc-control-points routine
727 \override Stem #'length = #0
728 \override Stem #'no-stem-extend = ##t
729 \override Stem #'flag-style = #'no-flag
730 \override Stem #'details = #'((lengths 0 0 0 0 0 0)
731 (beamed-lengths 0 0 0)
732 (beamed-minimum-free-lengths 0 0 0)
733 (beamed-extreme-minimum-free-lengths 0 0)
735 %% after all, the stubs of the stems may still be visible, so ...
736 \override Stem #'transparent = ##t
737 %% automatic beams should be suppressed for similar reasons ...
739 %% remove beams, dots and rests ...
740 \override Beam #'stencil = ##f
741 \override Dots #'stencil = ##f
742 \override Rest #'stencil = ##f
743 \override MultiMeasureRest #'stencil = ##f
744 \override MultiMeasureRestNumber #'transparent = ##t
745 %% ... all kinds of ties/slurs
746 \override Tie #'stencil = ##f
747 \override RepeatTie #'stencil = ##f
748 \override LaissezVibrerTie #'stencil = ##f
749 \override Slur #'stencil = #slur::draw-tab-slur
750 \override PhrasingSlur #'stencil = ##f
751 %% 'tied to' fret numbers become invisible or parenthesized, respectively)
752 \override Tie #'after-line-breaking = #tie::handle-tab-note-head
753 \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
754 %% ... and all kinds of markups, spanners etc.
755 \override TupletBracket #'stencil = ##f
756 \override TupletNumber #'stencil = ##f
757 \override DynamicText #'transparent = ##t
758 \override DynamicTextSpanner #'stencil = ##f
759 \override TextSpanner #'stencil = ##f
760 \override Hairpin #'transparent = ##t
761 \override Script #'stencil = ##f
762 \override TextScript #'stencil = ##f
763 %% the direction for glissando lines will be automatically corrected
764 \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
765 \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
767 \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
770 \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
771 \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
779 \consists "Tab_staff_symbol_engraver"
781 \description "Context for generating tablature. It accepts only @code{TabVoice}
782 contexts and handles the line spacing, the tablature clef etc. properly."
785 \defaultchild "TabVoice"
787 %% 6 strings, bigger spacing
788 \override StaffSymbol #'staff-space = #1.5
790 %% Don't draw stems over the tablature figures !
791 \override Stem #'avoid-note-head = ##t
793 %% No accidental in tablature !
794 \remove "Accidental_engraver"
795 \remove "Key_engraver"
797 \remove "Ottava_spanner_engraver"
799 \override Clef #'stencil = #clef::print-modern-tab-if-set
801 \override TimeSignature #'stencil = ##f
802 %% better parentheses in a TabStaff
803 \override ParenthesesItem #'stencils = #parentheses-item::calc-tabstaff-parenthesis-stencils
805 \override Arpeggio #'stencil = ##f
806 %% we ignore collision warnings that may occur due to
807 %% stem overlapping, because we have no stems ;-)
808 \override NoteColumn #'ignore-collision = ##t
809 %% Special "TAB" clef
810 clefGlyph = #"clefs.tab"
816 \name "VaticanaVoice"
818 \description "Same as @code{Voice} context, except that it is
819 accommodated for typesetting Gregorian Chant in the notational style
822 \remove "Slur_engraver"
823 \remove "Stem_engraver"
824 \remove "Ligature_bracket_engraver"
825 \consists "Vaticana_ligature_engraver"
827 %% Set default head for notes outside of \[ \].
828 \override NoteHead #'style = #'vaticana.punctum
830 %% Put some space before and after divisiones.
831 %% FIXME: This does not seem to show any effect.
832 \override Script #'padding = #0.5
834 %% There are no beams in Gregorian Chant notation.
837 %% Prepare TextSpanner for \episem{Initium|Finis} use.
839 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
840 %% required to force the articulation signs being placed vertically
841 %% tightly to the correpsonding note heads.
843 \override TextSpanner #'style = #'line
844 \override TextSpanner #'padding = #-0.1
849 \name "VaticanaStaff"
852 \accepts "VaticanaVoice"
853 \defaultchild "VaticanaVoice"
855 \description "Same as @code{Staff} context, except that it is
856 accommodated for typesetting Gregorian Chant in the notational style
859 \remove "Time_signature_engraver"
860 \consists "Custos_engraver"
862 %% We can not remove Bar_engraver; otherwise clefs and custodes will
863 %% not show up any more among other line breaking issues.
864 %% Instead, we make the grob transparent.
865 \override BarLine #'transparent = ##t
867 \override StaffSymbol #'line-count = #4
868 \override StaffSymbol #'thickness = #0.6
870 %% FIXME: unit on StaffSymbol's width should be \linewidth.
871 %% \override StaffSymbol #'width = #60.0
873 %% Choose vaticana do clef on 3rd line as default.
874 clefGlyph = #"clefs.vaticana.do"
876 middleCClefPosition = #1
880 %% Select vaticana style font.
881 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
882 \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
883 \override Custos #'style = #'vaticana
884 \override Custos #'neutral-position = #3
885 \override Custos #'neutral-direction = #DOWN
886 \override Dots #'style = #'vaticana
891 \name "GregorianTranscriptionVoice"
894 %% Removing ligature bracket engraver without replacing it by some
895 %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
896 %% warning for every "\[" and "\]". Therefore, we make the grob
897 %% transparent instead.
898 \override LigatureBracket #'transparent = ##t
900 %% Put some space before and after divisiones.
901 %% FIXME: This does not seem to show any effect.
902 \override Script #'padding = #0.5
904 %% There are no beams in Gregorian Chant notation.
907 %% Prepare TextSpanner for \episem{Initium|Finis} use.
909 %% N.B.: dash-fraction MUST be unset; otherwise, TextSpanner will
910 %% always produce dashed lines, regardless of the style property.
912 %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
913 %% required to force the articulation signs being placed vertically
914 %% tightly to the correpsonding note heads.
916 \override TextSpanner #'dash-fraction = #'()
917 \override TextSpanner #'style = #'line
918 \override TextSpanner #'padding = #-0.1
923 \name "GregorianTranscriptionStaff"
926 \accepts "GregorianTranscriptionVoice"
927 \defaultchild "GregorianTranscriptionVoice"
929 %% We can not remove Bar_engraver; otherwise clefs and custodes will
930 %% not show up any more among other line breaking issues.
931 %% Instead, we make the grob transparent.
932 \override BarLine #'transparent = ##t
937 \name "MensuralVoice"
939 \description "Same as @code{Voice} context, except that it is
940 accommodated for typesetting a piece in mensural style."
942 \remove "Slur_engraver"
943 \remove "Ligature_bracket_engraver"
944 \consists "Mensural_ligature_engraver"
946 %% Set default head for notes outside of \[ \].
947 \override NoteHead #'style = #'mensural
948 \override Rest #'style = #'mensural
950 %% There are no beams in mensural notation.
956 \name "MensuralStaff"
959 \defaultchild "MensuralVoice"
960 \accepts "MensuralVoice"
961 \description "Same as @code{Staff} context, except that it is
962 accommodated for typesetting a piece in mensural style."
964 \consists "Custos_engraver"
966 %% We can not remove Bar_engraver; otherwise clefs and custodes will
967 %% not show up any more among other line breaking issues.
968 %% Instead, we make the grob transparent.
969 \override BarLine #'transparent = ##t
971 \override StaffSymbol #'thickness = #0.6
973 %% FIXME: unit on StaffSymbol's width should be \linewidth.
974 %% \override StaffSymbol #'width = #60.0
976 %% Choose mensural g clef on 2nd line as default.
977 clefGlyph = #"clefs.mensural.g"
978 middleCClefPosition = #-6
979 middleCPosition = #-6
983 %% Select mensural style font.
984 \override TimeSignature #'style = #'mensural
985 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
986 \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
987 \override Custos #'style = #'mensural
988 \override Custos #'neutral-position = #3
989 \override Custos #'neutral-direction = #DOWN
991 %% Accidentals are valid only once (same as
992 %% #(set-accidental-style 'forget))
994 autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
995 autoCautionaries = #'()
996 printKeyCancellation = ##f
999 RemoveEmptyDrumStaffContext = \context {
1001 \remove "Axis_group_engraver"
1002 \override VerticalAxisGroup #'remove-empty = ##t
1003 \consists "Hara_kiri_engraver"
1006 RemoveEmptyRhythmicStaffContext = \context {
1008 \remove "Axis_group_engraver"
1009 \override VerticalAxisGroup #'remove-empty = ##t
1010 \consists "Hara_kiri_engraver"
1013 RemoveEmptyTabStaffContext = \context {
1015 \remove "Axis_group_engraver"
1016 \override VerticalAxisGroup #'remove-empty = ##t
1017 \consists "Hara_kiri_engraver"