ly/engraver-init.ly

   1 %%%% This file is part of LilyPond, the GNU music typesetter.
   2 %%%%
   3 %%%% Copyright (C) 1996--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
   4 %%%%                          Jan Nieuwenhuizen <janneke@gnu.org>
   5 %%%%
   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.
  10 %%%%
  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.
  15 %%%%
  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/>.
  18
  19 \version "2.17.29"
  20
  21 \context {
  22   \name "Global"
  23
  24   \accepts "Score"
  25
  26   \defaultchild "Score"
  27   \description "Hard coded entry point for LilyPond.  Cannot be tuned."
  28   \grobdescriptions #all-grob-descriptions
  29 }
  30
  31 \context {
  32   \type "Engraver_group"
  33   \name "FretBoards"
  34   \alias "Staff"
  35   \description "A context for displaying fret diagrams."
  36
  37   \consists "Fretboard_engraver"
  38   \consists "Output_property_engraver"
  39   \consists "Axis_group_engraver"
  40   \consists "Separating_line_group_engraver"
  41   \consists "Font_size_engraver"
  42   \consists "Instrument_name_engraver"
  43
  44   %% explicitly set instrument, so it is not inherited from the parent
  45   instrumentName = #'()
  46   shortInstrumentName = #'()
  47
  48   predefinedDiagramTable = #default-fret-table
  49   handleNegativeFrets = #'recalculate
  50   restrainOpenStrings = ##f
  51 }
  52
  53 \context {
  54   \type "Engraver_group"
  55   \name "Staff"
  56
  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
  61   %% with empty ones.
  62
  63   \consists "Font_size_engraver"
  64   \consists "Separating_line_group_engraver"
  65   \consists "Dot_column_engraver"
  66   \consists "Staff_collecting_engraver"
  67
  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 "Fingering_column_engraver"
  88
  89   localKeySignature = #'()
  90   createSpacing = ##t
  91   ignoreFiguredBassRest = ##f
  92
  93   %% explicitly set instrument, so we don't get
  94   %% weird effects when doing instrument names for
  95   %% piano staves
  96   instrumentName = #'()
  97   shortInstrumentName = #'()
  98
  99   \defaultchild "Voice"
 100   \accepts "Voice"
 101   \accepts "CueVoice"
 102   \accepts "NullVoice"
 103
 104   \description "Handles clefs, bar lines, keys, accidentals.  It can contain
 105 @code{Voice} contexts."
 106
 107 }
 108
 109 \context {
 110   \Staff
 111   \type "Engraver_group"
 112   \name "DrumStaff"
 113   \alias "Staff"
 114
 115   \remove "Accidental_engraver"
 116   \remove "Ottava_spanner_engraver"
 117   \remove "Key_engraver"
 118   \remove "Piano_pedal_engraver"
 119
 120   \description "Handles typesetting for percussion."
 121
 122   \denies "Voice"
 123   \accepts "DrumVoice"
 124   \defaultchild "DrumVoice"
 125
 126   clefGlyph = #"clefs.percussion"
 127   clefPosition = #0
 128   \override Script.staff-padding = #0.75
 129 }
 130
 131
 132 \context {
 133   \type "Engraver_group"
 134   \name "ChoirStaff"
 135   \consists "Vertical_align_engraver"
 136   topLevelAlignment = ##f
 137
 138   \consists "Instrument_name_engraver"
 139   \consists "System_start_delimiter_engraver"
 140   systemStartDelimiter = #'SystemStartBracket
 141   %% explicitly set instrument, so it is not inherited from the parent
 142   instrumentName = #'()
 143   shortInstrumentName = #'()
 144   vocalName = #'()
 145   shortVocalName = #'()
 146
 147   \accepts "Staff"
 148   \accepts "DrumStaff"
 149   \accepts "RhythmicStaff"
 150   \accepts "GrandStaff"
 151   \accepts "PianoStaff"
 152   \accepts "Lyrics"
 153   \accepts "ChordNames"
 154   \accepts "FiguredBass"
 155   \accepts "ChoirStaff"
 156   \accepts "StaffGroup"
 157   \defaultchild "Staff"
 158   \description "Identical to @code{StaffGroup} except that the
 159 contained staves are not connected vertically."
 160 }
 161
 162 \context{
 163   \type "Engraver_group"
 164
 165   localKeySignature = #'()
 166   createSpacing = ##t
 167
 168   squashedPosition = #0
 169   \name RhythmicStaff
 170   \alias "Staff"
 171
 172   \override VoltaBracket.staff-padding = #3
 173   \override StaffSymbol.line-count = #1
 174
 175   \override Stem.neutral-direction = #UP
 176   \override Beam.neutral-direction = #UP
 177
 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"
 189
 190   %% explicitly set instrument, so it is not inherited from the parent
 191   instrumentName = #'()
 192   shortInstrumentName = #'()
 193
 194   \accepts "Voice"
 195   \accepts "CueVoice"
 196   \defaultchild "Voice"
 197
 198   \description "A context like @code{Staff} but for printing rhythms.
 199 Pitches are ignored; the notes are printed on one line."
 200 }
 201
 202
 203 \context {
 204   \type "Engraver_group"
 205   \name "Voice"
 206
 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.
 210
 211 You have to instantiate this explicitly if you want to have
 212 multiple voices on the same staff."
 213
 214   \consists "Font_size_engraver"
 215
 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
 234   %% switch on to make stem directions interpolate for the
 235   %% center line.
 236   %  \consists "Melody_engraver"
 237
 238   \consists "Stem_engraver"
 239   \consists "Beam_engraver"
 240   \consists "Grace_beam_engraver"
 241   \consists "Auto_beam_engraver"
 242   \consists "Grace_auto_beam_engraver"
 243
 244   %% must come before Script_column_engraver.
 245   \consists "New_fingering_engraver"
 246
 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"
 252
 253   \consists "Text_engraver"
 254   \consists "Dynamic_engraver"
 255   \consists "Dynamic_align_engraver"
 256   \consists "Fingering_engraver"
 257   \consists "Bend_engraver"
 258
 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"
 271 }
 272
 273 \context{
 274   \Voice
 275
 276   \name CueVoice
 277   \alias Voice
 278   fontSize = #-4
 279   \override Stem.length-fraction = #(magstep -4)
 280   \override Beam.length-fraction = #(magstep -4)
 281   \override Beam.beam-thickness = #0.35
 282 }
 283
 284 \context {
 285   \Voice
 286   \name DrumVoice
 287   \alias Voice
 288
 289   \description "A voice on a percussion staff."
 290   \remove "Arpeggio_engraver"
 291   \consists "Grob_pq_engraver"
 292
 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"
 299
 300   \remove "Fingering_engraver"
 301
 302   \remove "Cluster_spanner_engraver"
 303 }
 304
 305 \context{
 306   \type "Engraver_group"
 307   \name GrandStaff
 308   localKeySignature = #'()
 309
 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."
 313
 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 = #'()
 325
 326   \defaultchild "Staff"
 327   \accepts "Staff"
 328   \accepts "RhythmicStaff"
 329   \accepts "DrumStaff"
 330   \accepts "TabStaff"
 331   \accepts "Lyrics"
 332   \accepts "FiguredBass"
 333   \accepts "Dynamics"
 334   \accepts "ChordNames"
 335 }
 336
 337 \context{
 338   \GrandStaff
 339   \name "PianoStaff"
 340   \alias "GrandStaff"
 341
 342   \description "Just like @code{GrandStaff}, but the staves are only removed
 343 together, never separately."
 344
 345   \consists "Vertical_align_engraver"
 346   \consists "Keep_alive_together_engraver"
 347   topLevelAlignment = ##f
 348
 349   instrumentName = #'()
 350   shortInstrumentName = #'()
 351 }
 352
 353 \context {
 354   \type "Engraver_group"
 355   \name "StaffGroup"
 356
 357   \consists "Vertical_align_engraver"
 358   topLevelAlignment = ##f
 359
 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 = #'()
 369
 370   \consists "System_start_delimiter_engraver"
 371
 372   \defaultchild "Staff"
 373   \accepts "Staff"
 374   \accepts "RhythmicStaff"
 375   \accepts "DrumStaff"
 376   \accepts "GrandStaff"
 377   \accepts "PianoStaff"
 378   \accepts "TabStaff"
 379   \accepts "Lyrics"
 380   \accepts "ChordNames"
 381   \accepts "FiguredBass"
 382   \accepts "ChoirStaff"
 383   \accepts "StaffGroup"
 384
 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."
 389 }
 390
 391 \context {
 392   \type "Engraver_group"
 393   \name Dynamics
 394   \alias Voice
 395   \consists "Output_property_engraver"
 396   \consists "Bar_engraver"
 397   \consists "Piano_pedal_engraver"
 398   \consists "Script_engraver"
 399   \consists "Dynamic_engraver"
 400   \consists "Dynamic_align_engraver"
 401   \consists "Text_engraver"
 402   \consists "Text_spanner_engraver"
 403   \consists "Font_size_engraver"
 404   \consists "Axis_group_engraver"
 405
 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)
 411        (padding . 0.5))
 412   \override TextScript.font-shape = #'italic
 413   \override DynamicLineSpanner.Y-offset = #0
 414   \override DynamicLineSpanner.outside-staff-priority = ##f
 415   \override DynamicText.outside-staff-priority = ##f
 416   \override Hairpin.outside-staff-priority = ##f
 417   \override DynamicText.X-offset =
 418   #(ly:make-simple-closure
 419     `(,+
 420       ,(ly:make-simple-closure
 421          (list ly:self-alignment-interface::centered-on-note-columns))
 422       ,(ly:make-simple-closure
 423         (list ly:self-alignment-interface::x-aligned-on-self))))
 424
 425   \description "Holds a single line of dynamics, which will be
 426 centered between the staves surrounding this context."
 427 }
 428
 429
 430 \context{
 431   \type "Engraver_group"
 432
 433   \description "Corresponds to a voice with lyrics.  Handles the
 434 printing of a single line of lyrics."
 435
 436   \name "Lyrics"
 437   \consists "Lyric_engraver"
 438   \consists "Extender_engraver"
 439   \consists "Hyphen_engraver"
 440   \consists "Stanza_number_engraver"
 441   \consists "Instrument_name_engraver"
 442   \consists "Font_size_engraver"
 443   \consists "Axis_group_engraver"
 444   \consists "Pure_from_neighbor_engraver"
 445   searchForVoice = ##f
 446   %% explicitly set instrument, so it is not inherited from the parent
 447   instrumentName = #'()
 448   shortInstrumentName = #'()
 449
 450   \override VerticalAxisGroup.remove-first = ##t
 451   \override VerticalAxisGroup.remove-empty = ##t
 452   \override VerticalAxisGroup.staff-affinity = #UP
 453   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
 454     #'((basic-distance . 5.5)
 455        (padding . 0.5)
 456        (stretchability . 1))
 457   \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
 458      #'((basic-distance . 0)
 459         (minimum-distance . 2.8)
 460         (padding . 0.2)
 461         (stretchability . 0))
 462   \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = #1.5
 463   \override InstrumentName.self-alignment-Y = ##f
 464
 465   %% sync with define-grobs.scm ;
 466   \override InstrumentName.font-size = #1.0
 467
 468   %% make sure that barlines aren't collapsed, when
 469   %% Bar_engraver is there.
 470   \override BarLine.bar-extent = #'(-0.05 . 0.05)
 471
 472 }
 473
 474 \context {
 475   \type "Engraver_group"
 476   \name NoteNames
 477   \description "A context for printing the names of notes."
 478   \consists "Axis_group_engraver"
 479
 480   \override VerticalAxisGroup.staff-affinity = #UP
 481   \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
 482     #'((basic-distance . 0)
 483        (minimum-distance . 2.8)
 484        (padding . 0.2)
 485        (stretchability . 0))
 486   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
 487     #'((basic-distance . 5.5)
 488        (padding . 0.5)
 489        (stretchability . 1))
 490   \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = 1.5
 491
 492   \consists "Tie_engraver"
 493   \consists "Note_name_engraver"
 494   \consists "Separating_line_group_engraver"
 495 }
 496
 497 \context {
 498   \type "Engraver_group"
 499   \name ChordNames
 500   \description "Typesets chord names."
 501
 502   \consists "Output_property_engraver"
 503   \consists "Separating_line_group_engraver"
 504   \consists "Chord_name_engraver"
 505   \consists "Axis_group_engraver"
 506 %  \consists "Note_spacing_engraver"
 507
 508   \override VerticalAxisGroup.remove-first = ##t
 509   \override VerticalAxisGroup.remove-empty = ##t
 510   \override VerticalAxisGroup.staff-affinity = #DOWN
 511   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
 512   \override VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0.5
 513 }
 514
 515 \context {
 516   \type "Score_engraver"
 517   \name "Score"
 518
 519   \description "This is the top level notation context.  No
 520 other context can contain a @code{Score} context.  This context
 521 handles the administration of time signatures.  It also makes sure
 522 that items such as clefs, time signatures, and key-signatures are
 523 aligned across staves.
 524
 525 You cannot explicitly instantiate a @code{Score} context (since it
 526 is not contained in any other context).  It is instantiated
 527 automatically when an output definition (a @code{\\score} or
 528 @code{\\layout} block) is processed."
 529
 530   \consists "Paper_column_engraver"
 531   \consists "Repeat_acknowledge_engraver"
 532   \consists "Staff_collecting_engraver"
 533
 534   \alias "Timing"
 535
 536   %% An alias for Timing is established by the Timing_translator in
 537   %% whatever context it is initialized, and the timing variables are
 538   %% then copied from wherever Timing had been previously established.
 539   %% The alias at Score level provides a target for initializing
 540   %% Timing variables in layout definitions before any
 541   %% Timing_translator has been run.
 542
 543   % timing translator must come BEFORE bar number engraver
 544   \consists "Timing_translator"
 545   \consists "Default_bar_line_engraver"
 546   \consists "Output_property_engraver"
 547   \consists "Tweak_engraver"
 548   \consists "System_start_delimiter_engraver"
 549   \consists "Mark_engraver"
 550   \consists "Volta_engraver"
 551   \consists "Metronome_mark_engraver"
 552   \consists "Break_align_engraver"
 553   \consists "Spacing_engraver"
 554   \consists "Grace_spacing_engraver"
 555   \consists "Vertical_align_engraver"
 556   \consists "Stanza_number_align_engraver"
 557   \consists "Bar_number_engraver"
 558   \consists "Parenthesis_engraver"
 559   \consists "Concurrent_hairpin_engraver"
 560   \consists "Beam_collision_engraver"
 561   \consists "Footnote_engraver"
 562
 563   \defaultchild "Staff"
 564
 565   \accepts "FretBoards"
 566   \accepts "Staff"
 567   \accepts "RhythmicStaff"
 568   \accepts "TabStaff"
 569   \accepts "VaticanaStaff"
 570   \accepts "GregorianTranscriptionStaff"
 571   \accepts "MensuralStaff"
 572   \accepts "PetrucciStaff"
 573   \accepts "StaffGroup"
 574   \accepts "DrumStaff"
 575   \accepts "KievanStaff"
 576   \accepts "Lyrics"
 577   \accepts "ChordNames"
 578   \accepts "GrandStaff"
 579   \accepts "ChoirStaff"
 580   \accepts "PianoStaff"
 581   \accepts "Devnull"
 582   \accepts "NoteNames"
 583   \accepts "FiguredBass"
 584
 585   noteToFretFunction = #determine-frets
 586   predefinedDiagramTable = ##f
 587   soloText = #"Solo"
 588   soloIIText = #"Solo II"
 589   aDueText = #"a2"
 590   printPartCombineTexts = ##t
 591   partCombineTextsOnNote = ##t
 592   systemStartDelimiter =#'SystemStartBar
 593
 594   drumStyleTable = #drums-style
 595
 596   melismaBusyProperties = #default-melisma-properties
 597   tieWaitForNote = ##f
 598   clefGlyph = #"clefs.G"
 599   clefPosition = #-2
 600   middleCClefPosition = #-6
 601   middleCPosition = #-6
 602   firstClef = ##t
 603
 604   crescendoSpanner = #'hairpin
 605   decrescendoSpanner = #'hairpin
 606
 607   defaultBarType = #"|"
 608   doubleRepeatType = #":..:"
 609   startRepeatType = #".|:"
 610   endRepeatType = #":|."
 611   alternativeRestores = #'(measurePosition measureLength)
 612   barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
 613   barNumberFormatter = #robust-bar-number-function
 614   clefTranspositionFormatter = #clef-transposition-markup
 615   cueClefTranspositionFormatter = #clef-transposition-markup
 616   automaticBars = ##t
 617
 618   explicitClefVisibility = #all-visible
 619   explicitCueClefVisibility = #end-of-line-invisible
 620   explicitKeySignatureVisibility = #all-visible
 621   implicitTimeSignatureVisibility = #end-of-line-invisible
 622
 623   repeatCountVisibility = #all-repeat-counts-visible
 624
 625 %% Other Timing variables are derived and set by the Timing_translator
 626 %% at initialization time by calling the functions in
 627 %% scm/time-signature-settings.scm
 628
 629   timeSignatureSettings = #default-time-signature-settings
 630   timeSignatureFraction = 4/4
 631
 632   beamHalfMeasure = ##t
 633
 634   autoBeaming = ##t
 635   autoBeamCheck = #default-auto-beam-check
 636
 637   completionFactor = #unity-if-multimeasure
 638
 639   scriptDefinitions = #default-script-alist
 640
 641   pedalSustainStrings = #'("Ped." "*Ped." "*")
 642   pedalSustainStyle = #'text
 643   pedalUnaCordaStrings = #'("una corda" "" "tre corde")
 644   pedalUnaCordaStyle = #'text
 645
 646 %% These are in ordinary italic font, including the *,
 647 %% but they are unlikely to be used,
 648 %% as the default pedal-style for SostenutoPedal is 'mixed':
 649 %% i.e.  Sost. Ped_____________________
 650   pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
 651   pedalSostenutoStyle = #'mixed
 652
 653   harmonicAccidentals = ##t
 654   fingeringOrientations = #'(up down)
 655   stringNumberOrientations = #'(up down)
 656   strokeFingerOrientations = #'(right)
 657
 658   lyricMelismaAlignment = #LEFT
 659   markFormatter = #format-mark-letters
 660   rehearsalMark = #1
 661   subdivideBeams = ##f
 662   extraNatural = ##t
 663   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
 664   autoCautionaries = #'()
 665
 666   printKeyCancellation = ##t
 667   keyAlterationOrder = #`(
 668     (6 . ,FLAT) (2  . ,FLAT) (5 . ,FLAT ) (1  . ,FLAT) (4  . ,FLAT) (0  . ,FLAT) (3  . ,FLAT)
 669     (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
 670     (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
 671     (3  . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
 672   )
 673
 674   barCheckSynchronize = ##f
 675
 676 %% chord names:
 677   chordNameFunction = #ignatzek-chord-names
 678   minorChordModifier = #(make-simple-markup "m")
 679   additionalPitchPrefix = #"" % was "add"
 680   majorSevenSymbol = #whiteTriangleMarkup
 681   chordNameLowercaseMinor = ##f
 682   chordNameSeparator = #(make-hspace-markup 0.5)
 683   slashChordSeparator = #(make-simple-markup "/")
 684   chordNameExceptions = #ignatzekExceptions
 685   chordNoteNamer = #'()
 686   chordRootNamer = #note-name->markup
 687   chordPrefixSpacer = #0
 688   chordNameExceptionsFull = #fullJazzExceptions
 689   chordNameExceptionsPartial = #partialJazzExceptions
 690   noChordSymbol = #(make-simple-markup "N.C.")
 691
 692   bassStaffProperties = #'((assign clefGlyph "clefs.F")
 693   (assign clefPosition 2)
 694   (assign middleCPosition 6)
 695   (assign middleCClefPosition 6))
 696 %% tablature:
 697   stringOneTopmost = ##t
 698   highStringOne = ##t
 699
 700 %% One may change the string tunings as follows :
 701 %% The length of the list must be equal to the number of strings
 702   stringTunings = #guitar-tuning
 703   tablatureFormat = #fret-number-tablature-format
 704   tabStaffLineLayoutFunction = #tablature-position-on-lines
 705
 706 %%
 707   figuredBassFormatter = #format-bass-figure
 708   metronomeMarkFormatter = #format-metronome-markup
 709
 710   %% See also make-voice-props-set
 711   graceSettings = #score-grace-settings
 712
 713   keepAliveInterfaces = #'(
 714     bass-figure-interface
 715     chord-name-interface
 716     cluster-beacon-interface
 717     fret-diagram-interface
 718     lyric-syllable-interface
 719     note-head-interface
 720     tab-note-head-interface
 721     lyric-interface
 722     percent-repeat-item-interface
 723     percent-repeat-interface
 724
 725     ;; need this, as stanza numbers are items, and appear only once.
 726     stanza-number-interface
 727   )
 728   % \quoteDuring is supposed to quote everything, cueDuring only the essentials
 729   quotedEventTypes = #'(StreamEvent)
 730   quotedCueEventTypes = #'(
 731     note-event
 732     rest-event
 733     tie-event
 734     beam-event
 735     tuplet-span-event)
 736   instrumentTransposition = #(ly:make-pitch 0 0 0)
 737
 738   topLevelAlignment = ##t
 739
 740   timing = ##t
 741 }
 742
 743
 744
 745
 746 \context {
 747   \type "Engraver_group"
 748   \name "FiguredBass"
 749   \description "A context for printing a figured bass line."
 750
 751   \consists "Figured_bass_engraver"
 752   \consists "Separating_line_group_engraver"
 753   \consists "Axis_group_engraver"
 754
 755   \override VerticalAxisGroup.remove-empty = ##t
 756   \override VerticalAxisGroup.remove-first = ##t
 757   \override VerticalAxisGroup.staff-affinity = #UP
 758   \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
 759   \override VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0.5
 760 }
 761
 762 \context {
 763   \name "Devnull"
 764   \type "Engraver_group"
 765
 766 %% don't want to route anything out of here:
 767   \alias "Staff"
 768   \alias "Voice"
 769   \description "Silently discards all musical information given to this
 770 context."
 771 }
 772
 773 \context {
 774   \name "NullVoice"
 775   \type "Engraver_group"
 776
 777   \description "Non-printing context, typically used for aligning
 778 lyrics in polyphonic situations, or with @code{\partcombine}."
 779
 780   %% don't route anything out of here
 781   \alias "Staff"
 782   \alias "Voice"
 783
 784   %% all three are needed for ties to work with lyrics
 785   \consists "Note_heads_engraver"
 786   \consists "Rhythmic_column_engraver"
 787   \consists "Tie_engraver"
 788
 789   %% both are needed for melismas to work with \autoBeamOff
 790   \consists "Beam_engraver"
 791   \consists "Stem_engraver"
 792
 793   %% needed for slurs to work with lyrics
 794   \consists "Slur_engraver"
 795
 796   %% keep noteheads inside the staff
 797   \consists "Pitch_squash_engraver"
 798   squashedPosition = 0
 799
 800   %% `\omit NoteHead' would give slur attachment errors
 801   \omit Accidental
 802   \omit Beam
 803   \omit Dots
 804   \omit Flag
 805   \omit Rest
 806   \omit Slur
 807   \omit Stem
 808   \omit Tie
 809
 810   %% let these take up space (for lyric extenders, etc.)
 811   \override NoteHead.transparent = ##t
 812   \override TabNoteHead.transparent = ##t
 813
 814   %% don't let notes shift
 815   \override NoteHead.X-offset = 0
 816   \override NoteColumn.ignore-collision = ##t
 817
 818   %% keep beams and stems inside the staff
 819   \override Beam.positions = #'(1 . 1)
 820   \override Stem.length = 0
 821
 822   %% prevent "weird stem size" warnings
 823   \override Stem.direction = #UP
 824 }
 825
 826 \context {
 827   \Voice
 828   \name "TabVoice"
 829   \alias "Voice"
 830   \consists "Tab_note_heads_engraver"
 831   \consists "Tab_tie_follow_engraver"
 832
 833   \remove "Note_heads_engraver"
 834   \remove "Fingering_engraver"
 835   \remove "New_fingering_engraver"
 836   \remove "Pitched_trill_engraver"
 837
 838   \description "Context for drawing notes in a Tab staff."
 839
 840   %% No accidental in tablature !
 841   \remove "Accidental_engraver"
 842 }
 843
 844 \context {
 845   \Staff
 846   \alias "Staff"
 847   \name "TabStaff"
 848   \denies "Voice"
 849   \consists "Tab_staff_symbol_engraver"
 850
 851   \description "Context for generating tablature. It accepts only @code{TabVoice}
 852 contexts and handles the line spacing, the tablature clef etc. properly."
 853
 854   \accepts "TabVoice"
 855   \defaultchild "TabVoice"
 856
 857   %% 6 strings, bigger spacing
 858   \override StaffSymbol.staff-space = #1.5
 859
 860   %% Don't draw stems over the tablature figures !
 861   \override Stem.avoid-note-head = ##t
 862
 863   %% No accidental in tablature !
 864   \remove "Accidental_engraver"
 865   \remove "Key_engraver"
 866
 867   \remove "Ottava_spanner_engraver"
 868   %% the clef handler
 869   \override Clef.stencil = #clef::print-modern-tab-if-set
 870   %% no time signature
 871   \override TimeSignature.stencil = ##f
 872   %% no arpeggios
 873   \override Arpeggio.stencil = ##f
 874   %% we ignore collision warnings that may occur due to
 875   %% stem overlapping, because we have no stems ;-)
 876   \override NoteColumn.ignore-collision = ##t
 877   %% Special "TAB" clef
 878   clefGlyph = #"clefs.tab"
 879   clefPosition = #0
 880   %% Change string if note results in negative fret number
 881   handleNegativeFrets = #'recalculate
 882   %% Allow open strings even if minimumFret is set
 883   restrainOpenStrings = ##f
 884
 885   %% TabStaff increase the staff-space, which in turn
 886   %% increases beam thickness and spacing; beams are
 887   %% too big. We have to adjust the beam settings:
 888   \override Beam.beam-thickness = #0.32
 889   \override Beam.length-fraction = #0.62
 890   %% the same goes for tremolo beams
 891   \override StemTremolo.beam-thickness = #0.32
 892   %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
 893   %% and the tablature staff space is scaled (1.5 by default),
 894   %% so we use the inversion of the scale factor:
 895   \override StemTremolo.length-fraction = #(lambda (grob)
 896                                                (/ 1 (ly:staff-symbol-staff-space grob)))
 897   \override StemTremolo.beam-width = #stem-tremolo::calc-tab-width
 898
 899   %% make the Stems as short as possible to minimize their influence
 900   %% on the slur::calc-control-points routine
 901   \override Stem.no-stem-extend = ##t
 902   \override Flag.style = #'no-flag
 903   \override Stem.details = #'((lengths 0 0 0 0 0 0)
 904                                 (beamed-lengths 0 0 0)
 905                                 (beamed-minimum-free-lengths 0 0 0)
 906                                 (beamed-extreme-minimum-free-lengths 0 0)
 907                                 (stem-shorten 0 0))
 908   %% after all, the stubs of the stems may still be visible, so ...
 909   \override Stem.stencil = ##f
 910   \override Flag.stencil = ##f
 911   %% automatic beams should be suppressed for similar reasons ...
 912   autoBeaming = ##f
 913   %% remove beams, dots and rests ...
 914   \override Beam.stencil = ##f
 915   \override StemTremolo.stencil = ##f
 916   \override Dots.stencil = ##f
 917   \override Rest.stencil = ##f
 918   \override MultiMeasureRest.stencil = ##f
 919   \override MultiMeasureRestNumber.stencil = ##f
 920   \override MultiMeasureRestText.stencil = ##f
 921   %% ... all kinds of ties/slurs
 922   \override Tie.stencil = ##f
 923   \override RepeatTie.stencil = ##f
 924   \override LaissezVibrerTie.stencil = ##f
 925   \override Slur.stencil = #slur::draw-tab-slur
 926   \override PhrasingSlur.stencil = ##f
 927   %% 'tied to' fret numbers become invisible or parenthesized, respectively)
 928   \override Tie.after-line-breaking = #tie::handle-tab-note-head
 929   \override RepeatTie.after-line-breaking = #repeat-tie::handle-tab-note-head
 930   %% ... and all kinds of markups, spanners etc.
 931   \override TupletBracket.stencil = ##f
 932   \override TupletNumber.stencil = ##f
 933   \override DynamicText.stencil = ##f
 934   \override DynamicTextSpanner.stencil = ##f
 935   \override TextSpanner.stencil = ##f
 936   \override Hairpin.stencil = ##f
 937   \override Script.stencil = ##f
 938   \override TextScript.stencil = ##f
 939   \override Glissando.stencil = #glissando::draw-tab-glissando
 940   %% the direction for glissando lines will be automatically corrected
 941   \override Glissando.extra-dy = #glissando::calc-tab-extra-dy
 942   \override Glissando.bound-details.right = #`((attach-dir . ,LEFT)
 943                                                    (padding . 0.3))
 944   \override Glissando.bound-details.left = #`((attach-dir . ,RIGHT)
 945                                                    (padding . 0.3))
 946   %% dead notes
 947   \override TabNoteHead.glyph-name = #tab-note-head::calc-glyph-name
 948   \override TabNoteHead.stencil = #tab-note-head::whiteout-if-style-set
 949 }
 950
 951 \context {
 952   \Voice
 953   \name "VaticanaVoice"
 954   \alias "Voice"
 955   \description "Same as @code{Voice} context, except that it is
 956 accommodated for typesetting Gregorian Chant in the notational style
 957 of Editio Vaticana."
 958
 959   \remove "Slur_engraver"
 960   \remove "Stem_engraver"
 961   \remove "Ligature_bracket_engraver"
 962   \consists "Vaticana_ligature_engraver"
 963   \remove "Text_spanner_engraver"
 964   \consists "Episema_engraver"
 965
 966   %% Set default head for notes outside of \[ \].
 967   \override NoteHead.style = #'vaticana.punctum
 968
 969   %% Put some space before and after divisiones.
 970   %% FIXME: This does not seem to show any effect.
 971   \override Script.padding = #0.5
 972
 973   %% There are no beams in Gregorian Chant notation.
 974   autoBeaming = ##f
 975 }
 976
 977 \context {
 978   \Staff
 979   \name "VaticanaStaff"
 980   \alias "Staff"
 981   \denies "Voice"
 982   \accepts "VaticanaVoice"
 983   \defaultchild "VaticanaVoice"
 984
 985   \description "Same as @code{Staff} context, except that it is
 986 accommodated for typesetting Gregorian Chant in the notational style
 987 of Editio Vaticana."
 988
 989   \remove "Time_signature_engraver"
 990   \consists "Custos_engraver"
 991
 992   %% We can not remove Bar_engraver; otherwise clefs and custodes will
 993   %% not show up any more among other line breaking issues.
 994   %% Instead, we make the grob transparent.
 995   \override BarLine.transparent = ##t
 996
 997   \override StaffSymbol.line-count = #4
 998   \override StaffSymbol.thickness = #0.6
 999
1000   %% FIXME: unit on StaffSymbol's width should be \linewidth.
1001   %% \override StaffSymbol.width = #60.0
1002
1003   %% Choose vaticana do clef on 3rd line as default.
1004   clefGlyph = #"clefs.vaticana.do"
1005   middleCPosition = #1
1006   middleCClefPosition = #1
1007   clefPosition = #1
1008   clefTransposition = #0
1009
1010   %% Select vaticana style font.
1011   \override KeySignature.glyph-name-alist = #alteration-vaticana-glyph-name-alist
1012   \override Accidental.glyph-name-alist = #alteration-vaticana-glyph-name-alist
1013   \override Custos.style = #'vaticana
1014   \override Custos.neutral-position = #3
1015   \override Custos.neutral-direction = #DOWN
1016   \override Dots.style = #'vaticana
1017 }
1018
1019 \context {
1020   \Voice
1021   \name "GregorianTranscriptionVoice"
1022   \alias "Voice"
1023   \consists "Episema_engraver"
1024
1025   %% Removing ligature bracket engraver without replacing it by some
1026   %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
1027   %% warning for every "\[" and "\]".  Therefore, we make the grob
1028   %% transparent instead.
1029   \override LigatureBracket.transparent = ##t
1030
1031   %% Put some space before and after divisiones.
1032   %% FIXME: This does not seem to show any effect.
1033   \override Script.padding = #0.5
1034
1035   %% There are no beams in Gregorian Chant notation.
1036   autoBeaming = ##f
1037
1038 }
1039
1040 \context {
1041   \Staff
1042   \name "GregorianTranscriptionStaff"
1043   \alias "Staff"
1044   \denies "Voice"
1045   \accepts "GregorianTranscriptionVoice"
1046   \defaultchild "GregorianTranscriptionVoice"
1047
1048   %% We can not remove Bar_engraver; otherwise clefs and custodes will
1049   %% not show up any more among other line breaking issues.
1050   %% Instead, we make the grob transparent.
1051   \override BarLine.transparent = ##t
1052 }
1053
1054 \context {
1055   \Voice
1056   \name "MensuralVoice"
1057   \alias "Voice"
1058   \description "Same as @code{Voice} context, except that it is
1059 accommodated for typesetting a piece in mensural style."
1060
1061   \remove "Slur_engraver"
1062   \remove "Ligature_bracket_engraver"
1063   \consists "Mensural_ligature_engraver"
1064
1065   %% Set default head for notes outside of \[ \].
1066   \override NoteHead.style = #'mensural
1067   \override Rest.style = #'mensural
1068   \override Flag.style = #'mensural
1069
1070   %% There are no beams in mensural notation.
1071   autoBeaming = ##f
1072 }
1073
1074 \context {
1075   \Staff
1076   \name "MensuralStaff"
1077   \alias "Staff"
1078   \denies "Voice"
1079   \defaultchild "MensuralVoice"
1080   \accepts "MensuralVoice"
1081   \description "Same as @code{Staff} context, except that it is
1082 accommodated for typesetting a piece in mensural style."
1083
1084   \consists "Custos_engraver"
1085
1086   %% We can not remove Bar_engraver; otherwise clefs and custodes will
1087   %% not show up any more among other line breaking issues.
1088   %% Instead, we make the grob transparent.
1089   \override BarLine.transparent = ##t
1090
1091   \override StaffSymbol.thickness = #0.6
1092
1093   %% FIXME: unit on StaffSymbol's width should be \linewidth.
1094   %% \override StaffSymbol.width = #60.0
1095
1096   %% Choose mensural g clef on 2nd line as default.
1097   clefGlyph = #"clefs.mensural.g"
1098   middleCClefPosition = #-6
1099   middleCPosition = #-6
1100   clefPosition = #-2
1101   clefTransposition = #0
1102
1103   %% Select mensural style font.
1104   \override TimeSignature.style = #'mensural
1105   \override KeySignature.glyph-name-alist = #alteration-mensural-glyph-name-alist
1106   \override Accidental.glyph-name-alist = #alteration-mensural-glyph-name-alist
1107   \override Custos.style = #'mensural
1108   \override Custos.neutral-position = #3
1109   \override Custos.neutral-direction = #DOWN
1110
1111   %% Accidentals are valid only once (same as
1112   %% \accidentalStyle forget)
1113   extraNatural = ##f
1114   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
1115   autoCautionaries = #'()
1116   printKeyCancellation = ##f
1117 }
1118
1119 \context {
1120   \Voice
1121   \name "PetrucciVoice"
1122   \alias "Voice"
1123   \description "Same as @code{Voice} context, except that it is
1124 accommodated for typesetting a piece in Petrucci style."
1125
1126   \remove "Ligature_bracket_engraver"
1127   \consists "Mensural_ligature_engraver"
1128
1129   %% Set glyph styles.
1130   \override NoteHead.style = #'petrucci
1131   \override Rest.style = #'mensural
1132
1133   % Thickens and shortens stems.
1134   \override Stem.thickness = #1.7
1135   \override Stem.length = #5
1136
1137   %% There are no beams in Petrucci notation.
1138   autoBeaming = ##f
1139 }
1140
1141 \context {
1142   \Staff
1143   \name "PetrucciStaff"
1144   \alias "Staff"
1145   \denies "Voice"
1146   \defaultchild "PetrucciVoice"
1147   \accepts "PetrucciVoice"
1148   \description "Same as @code{Staff} context, except that it is
1149 accommodated for typesetting a piece in Petrucci style."
1150
1151   \consists "Custos_engraver"
1152
1153   \override StaffSymbol.thickness = #1.3
1154
1155   %% Choose Petrucci g clef on 2nd line as default.
1156   clefGlyph = #"clefs.petrucci.g"
1157   middleCClefPosition = #-6
1158   middleCPosition = #-6
1159   clefPosition = #-2
1160   clefTransposition = #0
1161
1162   \override Custos.style = #'mensural
1163   \override Custos.neutral-position = #3
1164   \override Custos.neutral-direction = #DOWN
1165
1166   %% Accidentals are valid only once (if the following note is different)
1167   extraNatural = ##f
1168   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1169                              ,neo-modern-accidental-rule)
1170   autoCautionaries = #'()
1171   printKeyCancellation = ##f
1172 }
1173
1174 \context {
1175  \Voice
1176  \name "KievanVoice"
1177  \alias "Voice"
1178  \description "Same as @code{Voice} context, except that it is
1179 accommodated for typesetting a piece in Kievan style."
1180
1181   \remove "Ligature_bracket_engraver"
1182   \consists "Kievan_ligature_engraver"
1183
1184  %% Set glyph styles.
1185  \override NoteHead.style = #'kievan
1186  \override Stem.X-offset = #stem::kievan-offset-callback
1187  \override Stem.stencil = ##f
1188  \override Flag.stencil = ##f
1189  \override Rest.style = #'mensural
1190  \override Accidental.glyph-name-alist = #alteration-kievan-glyph-name-alist
1191  \override Dots.style = #'kievan
1192  \override Slur.stencil = ##f
1193  \override Stem.length = #0.0
1194  \override Beam.positions = #beam::get-kievan-positions
1195  \override Beam.quantized-positions = #beam::get-kievan-quantized-positions
1196  \override NoteHead.duration-log = #note-head::calc-kievan-duration-log
1197
1198  %% There are beams in Kievan notation, but they are invoked manually
1199  autoBeaming = ##f
1200 }
1201
1202 \context {
1203  \Staff
1204  \name "KievanStaff"
1205  \alias "Staff"
1206  \denies "Voice"
1207  \defaultchild "KievanVoice"
1208  \accepts "KievanVoice"
1209  \description "Same as @code{Staff} context, except that it is
1210 accommodated for typesetting a piece in Kievan style."
1211
1212  \remove "Time_signature_engraver"
1213
1214  %% Choose Kievan tsefaut clef
1215  clefGlyph = #"clefs.kievan.do"
1216  middleCClefPosition = #0
1217  middleCPosition = #0
1218  clefPosition = #0
1219  clefTransposition = #0
1220
1221  %% Accidentals are valid only once (if the following note is different)
1222  extraNatural = ##f
1223  autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
1224                             ,neo-modern-accidental-rule)
1225  autoCautionaries = #'()
1226  printKeyCancellation = ##f
1227
1228 }
1229
1230 %% Keep the old definitions in here for compatibility (they erase previous
1231 %% settings to the corresponding context!).
1232 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
1233 %% into the desired context. That's just as easy, requires only one line more
1234 %% (the \*Staff), but preserves previous context mods.
1235 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
1236 RemoveEmptyStaffContext = \context {
1237   \Staff
1238   \RemoveEmptyStaves
1239 }
1240
1241 AncientRemoveEmptyStaffContext = \context {
1242   \VaticanaStaff
1243   \RemoveEmptyStaves
1244 }
1245
1246 RemoveEmptyDrumStaffContext = \context {
1247   \DrumStaff
1248   \RemoveEmptyStaves
1249 }
1250
1251 RemoveEmptyRhythmicStaffContext = \context {
1252   \RhythmicStaff
1253   \RemoveEmptyStaves
1254 }
1255
1256 RemoveEmptyTabStaffContext = \context {
1257   \TabStaff
1258   \RemoveEmptyStaves
1259 }