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