ly/engraver-init.ly

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