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