ly/engraver-init.ly

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