ly/engraver-init.ly

   1 %%%% This file is part of LilyPond, the GNU music typesetter.
   2 %%%%
   3 %%%% Copyright (C) 1996--2010 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.13.10"
  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   \description "A context for displaying fret diagrams."
  35
  36   \consists "Fretboard_engraver"
  37   \consists "Output_property_engraver"
  38   \consists "Hara_kiri_engraver"
  39   \consists "Separating_line_group_engraver"
  40   \consists "Font_size_engraver"
  41   \consists "Instrument_name_engraver"
  42
  43   predefinedDiagramTable = #fretboard-table
  44 }
  45
  46 \context {
  47   \type "Engraver_group"
  48   \name "Staff"
  49
  50   \consists "Output_property_engraver"
  51   \consists "Bar_engraver"
  52   %% Bar_engraver must be first so default bars aren't overwritten
  53   %% with empty ones.
  54
  55   \consists "Font_size_engraver"
  56   \consists "Separating_line_group_engraver"
  57   \consists "Dot_column_engraver"
  58   \consists "Staff_collecting_engraver"
  59
  60  %% perhaps move to Voice context?
  61   \consists "Ottava_spanner_engraver"
  62   \consists "Clef_engraver"
  63   \consists "Key_engraver"
  64   \consists "Time_signature_engraver"
  65   \consists "Ledger_line_engraver"
  66   \consists "Staff_symbol_engraver"
  67   \consists "Collision_engraver"
  68   \consists "Grob_pq_engraver"
  69   \consists "Rest_collision_engraver"
  70   \consists "Accidental_engraver"
  71   \consists "Piano_pedal_engraver"
  72   \consists "Piano_pedal_align_engraver"
  73   \consists "Instrument_name_engraver"
  74   \consists "Axis_group_engraver"
  75   \consists "Figured_bass_engraver"
  76   \consists "Figured_bass_position_engraver"
  77   \consists "Script_row_engraver"
  78
  79   localKeySignature = #'()
  80   createSpacing = ##t
  81   ignoreFiguredBassRest = ##f
  82
  83   %% explicitly set instrument, so we don't get
  84   %% weird effects when doing instrument names for
  85   %% piano staves
  86
  87   instrumentName = #'()
  88   shortInstrumentName = #'()
  89
  90   \defaultchild "Voice"
  91   \accepts "Voice"
  92   \accepts "CueVoice"
  93
  94   \description "Handles clefs, bar lines, keys, accidentals.  It can contain
  95 @code{Voice} contexts."
  96
  97 }
  98
  99 \context {
 100   \Staff
 101   \type "Engraver_group"
 102   \name "DrumStaff"
 103   \alias "Staff"
 104
 105   \remove "Accidental_engraver"
 106   \remove "Ottava_spanner_engraver"
 107   \remove "Key_engraver"
 108   \remove "Piano_pedal_engraver"
 109
 110   \description "Handles typesetting for percussion."
 111
 112   \denies "Voice"
 113   \accepts "DrumVoice"
 114   \defaultchild "DrumVoice"
 115
 116   clefGlyph = #"clefs.percussion"
 117   clefPosition = #0
 118   \override Script #'staff-padding = #0.75
 119 }
 120
 121
 122 \context {
 123   \type "Engraver_group"
 124   \name "ChoirStaff"
 125   \consists "Vertical_align_engraver"
 126   topLevelAlignment = ##f
 127
 128   \consists "System_start_delimiter_engraver"
 129   systemStartDelimiter = #'SystemStartBracket
 130   vocalName = #'()
 131   shortVocalName = #'()
 132
 133   \accepts "Staff"
 134   \accepts "DrumStaff"
 135   \accepts "RhythmicStaff"
 136   \accepts "GrandStaff"
 137   \accepts "PianoStaff"
 138   \accepts "Lyrics"
 139   \accepts "ChordNames"
 140   \accepts "FiguredBass"
 141   \accepts "ChoirStaff"
 142   \accepts "StaffGroup"
 143   \defaultchild "Staff"
 144   \description "Identical to @code{StaffGroup} except that the
 145 contained staves are not connected vertically."
 146 }
 147
 148 \context{
 149   \type "Engraver_group"
 150
 151   localKeySignature = #'()
 152   createSpacing = ##t
 153
 154   squashedPosition = #0
 155   \name RhythmicStaff
 156   \alias "Staff"
 157
 158   \override BarLine #'bar-size = #4
 159   \override VoltaBracket #'staff-padding = #3
 160   \override StaffSymbol #'line-count = #1
 161
 162   \override Stem  #'neutral-direction = #UP
 163   \override Beam  #'neutral-direction = #UP
 164
 165   \consists "Output_property_engraver"
 166   \consists "Font_size_engraver"
 167   \consists "Separating_line_group_engraver"
 168   \consists "Dot_column_engraver"
 169   \consists "Bar_engraver"
 170   \consists "Staff_symbol_engraver"
 171   \consists "Pitch_squash_engraver"
 172   \consists "Time_signature_engraver"
 173   \consists "Instrument_name_engraver"
 174   \consists "Axis_group_engraver"
 175   \consists "Ledger_line_engraver"
 176
 177   \accepts "Voice"
 178   \accepts "CueVoice"
 179   \defaultchild "Voice"
 180
 181   \description "A context like @code{Staff} but for printing rhythms.
 182 Pitches are ignored; the notes are printed on one line."
 183 }
 184
 185
 186 \context {
 187   \type "Engraver_group"
 188   \name "Voice"
 189
 190   \description "Corresponds to a voice on a staff.  This context
 191 handles the conversion of dynamic signs, stems, beams, super- and
 192 subscripts, slurs, ties, and rests.
 193
 194 You have to instantiate this explicitly if you want to have
 195 multiple voices on the same staff."
 196
 197   localKeySignature = #'()
 198   \consists "Font_size_engraver"
 199
 200   \consists "Pitched_trill_engraver"
 201   \consists "Output_property_engraver"
 202   \consists "Arpeggio_engraver"
 203   \consists "Multi_measure_rest_engraver"
 204   \consists "Text_spanner_engraver"
 205   \consists "Trill_spanner_engraver"
 206   \consists "Grob_pq_engraver"
 207   \consists "Forbid_line_break_engraver"
 208   \consists "Laissez_vibrer_engraver"
 209   \consists "Repeat_tie_engraver"
 210   \consists "Note_head_line_engraver"
 211   \consists "Glissando_engraver"
 212   \consists "Ligature_bracket_engraver"
 213   \consists "Breathing_sign_engraver"
 214   \consists "Note_heads_engraver"
 215   \consists "Dots_engraver"
 216   \consists "Rest_engraver"
 217   \consists "Tweak_engraver"
 218
 219   %% switch on to make stem directions interpolate for the
 220   %% center line.
 221   %  \consists "Melody_engraver"
 222
 223   \consists "Stem_engraver"
 224   \consists "Beam_engraver"
 225   \consists "Grace_beam_engraver"
 226   \consists "Auto_beam_engraver"
 227
 228   %% must come before Script_column_engraver.
 229   \consists "New_fingering_engraver"
 230
 231   \consists "Chord_tremolo_engraver"
 232   \consists "Percent_repeat_engraver"
 233   \consists "Slash_repeat_engraver"
 234   \consists "Part_combine_engraver"
 235
 236   \consists "Text_engraver"
 237   \consists "New_dynamic_engraver"
 238   \consists "Dynamic_align_engraver"
 239 %  \consists "Dynamic_engraver"
 240   \consists "Fingering_engraver"
 241   \consists "Bend_engraver"
 242
 243   \consists "Script_engraver"
 244   \consists "Script_column_engraver"
 245   \consists "Rhythmic_column_engraver"
 246   \consists "Note_spacing_engraver"
 247   \consists "Spanner_break_forbid_engraver"
 248   \consists "Phrasing_slur_engraver"
 249   \consists "Cluster_spanner_engraver"
 250   \consists "Slur_engraver"
 251   \consists "Tie_engraver"
 252   \consists "Tuplet_engraver"
 253   \consists "Grace_engraver"
 254   \consists "Instrument_switch_engraver"
 255 }
 256
 257 \context{
 258   \Voice
 259
 260   \name CueVoice
 261   \alias Voice
 262   fontSize = #-4
 263   \override Stem #'length-fraction = #(magstep -4)
 264   \override Beam #'length-fraction = #(magstep -4)
 265   \override Beam #'beam-thickness = #0.35
 266 }
 267
 268 \context {
 269   \Voice
 270   \name DrumVoice
 271   \alias Voice
 272
 273   \description "A voice on a percussion staff."
 274   \remove "Arpeggio_engraver"
 275   \consists "Grob_pq_engraver"
 276
 277   \remove "Note_head_line_engraver"
 278   \remove "Glissando_engraver"
 279   \remove "Ligature_bracket_engraver"
 280   \remove "Note_heads_engraver"
 281   \consists "Drum_notes_engraver"
 282   \remove "New_fingering_engraver"
 283
 284   \remove "Fingering_engraver"
 285
 286   \remove "Cluster_spanner_engraver"
 287 }
 288
 289 \context{
 290   \type "Engraver_group"
 291   \name GrandStaff
 292   localKeySignature = #'()
 293
 294   \description "A group of staves, with a brace on the left
 295 side, grouping the staves together.  The bar lines of the
 296 contained staves are connected vertically."
 297
 298   \consists "Span_bar_engraver"
 299   \consists "Span_arpeggio_engraver"
 300   \consists "System_start_delimiter_engraver"
 301   systemStartDelimiter = #'SystemStartBrace
 302
 303   \defaultchild "Staff"
 304   \accepts "Staff"
 305   \accepts "FiguredBass"
 306   \accepts "Dynamics"
 307 }
 308
 309 \context{
 310   \GrandStaff
 311   \name "PianoStaff"
 312   \alias "GrandStaff"
 313
 314   \description "Just like @code{GrandStaff} but with support for
 315 instrument names at the start of each system."
 316
 317   \consists "Instrument_name_engraver"
 318   \consists "Vertical_align_engraver"
 319   topLevelAlignment = ##f
 320
 321   \override StaffGrouper #'between-staff-spacing #'stretchability = #5
 322
 323   instrumentName = #'()
 324   shortInstrumentName = #'()
 325 }
 326
 327 \context {
 328   \type "Engraver_group"
 329   \name "StaffGroup"
 330
 331   \consists "Vertical_align_engraver"
 332   topLevelAlignment = ##f
 333
 334   \consists "Span_bar_engraver"
 335   \consists "Span_arpeggio_engraver"
 336   \consists "Output_property_engraver"
 337   systemStartDelimiter = #'SystemStartBracket
 338
 339   \consists "System_start_delimiter_engraver"
 340
 341   \defaultchild "Staff"
 342   \accepts "Staff"
 343   \accepts "RhythmicStaff"
 344   \accepts "DrumStaff"
 345   \accepts "GrandStaff"
 346   \accepts "PianoStaff"
 347   \accepts "TabStaff"
 348   \accepts "Lyrics"
 349   \accepts "ChordNames"
 350   \accepts "FiguredBass"
 351   \accepts "ChoirStaff"
 352   \accepts "StaffGroup"
 353
 354   \description "Groups staves while adding a bracket on the left
 355 side, grouping the staves together.  The bar lines of the contained
 356 staves are connected vertically.  @code{StaffGroup} only consists of
 357 a collection of staves, with a bracket in front and spanning bar lines."
 358 }
 359
 360 \context {
 361   \type "Engraver_group"
 362   \name Dynamics
 363   \alias Voice
 364   \consists "Output_property_engraver"
 365   \consists "Bar_engraver"
 366   \consists "Piano_pedal_engraver"
 367   \consists "Script_engraver"
 368   \consists "New_dynamic_engraver"
 369   \consists "Dynamic_align_engraver"
 370   \consists "Text_engraver"
 371   \consists "Text_spanner_engraver"
 372   \consists "Axis_group_engraver"
 373
 374   pedalSustainStrings = #'("Ped." "*Ped." "*")
 375   pedalUnaCordaStrings = #'("una corda" "" "tre corde")
 376   \override VerticalAxisGroup #'staff-affinity = #CENTER
 377   \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5) (padding . 0.5))
 378   \override TextScript #'font-shape = #'italic
 379   \override DynamicLineSpanner #'Y-offset = #0
 380
 381   \description "Holds a single line of dynamics, which will be
 382 centered between the staves surrounding this context."
 383 }
 384
 385
 386 \context{
 387   \type "Engraver_group"
 388
 389   \description "Corresponds to a voice with lyrics.  Handles the
 390 printing of a single line of lyrics."
 391
 392   \name "Lyrics"
 393   instrumentName = #'()
 394   shortInstrumentName = #'()
 395
 396   \consists "Lyric_engraver"
 397   \consists "Extender_engraver"
 398   \consists "Hyphen_engraver"
 399   \consists "Stanza_number_engraver"
 400   \consists "Instrument_name_engraver"
 401   \consists "Font_size_engraver"
 402   \consists "Hara_kiri_engraver"
 403
 404   \override VerticalAxisGroup #'remove-first = ##t
 405   \override VerticalAxisGroup #'remove-empty = ##t
 406   \override VerticalAxisGroup #'staff-affinity = #UP
 407   \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5.5) (stretchability . 1) (padding . 0.5))
 408   \override VerticalAxisGroup #'inter-loose-line-spacing = #'((space . 0) (stretchability . 0) (padding . 0.2))
 409   \override VerticalAxisGroup #'non-affinity-spacing #'padding = #1.0
 410   \override InstrumentName #'self-alignment-Y = ##f
 411
 412   %% sync with define-grobs.scm ;
 413   \override InstrumentName #'font-size = #1.0
 414
 415   %% make sure that barlines aren't collapsed, when
 416   %% Bar_engraver is there.
 417   \override BarLine #'bar-size = #0.1
 418
 419 }
 420
 421 \context {
 422   \type "Engraver_group"
 423   \name NoteNames
 424   \description "A context for printing the names of notes."
 425   \consists "Axis_group_engraver"
 426
 427   % FIXME: not sure what the default should be here.
 428   \override VerticalAxisGroup #'staff-affinity = #DOWN
 429
 430   \consists "Tie_engraver"
 431   \consists "Note_name_engraver"
 432   \consists "Separating_line_group_engraver"
 433 }
 434
 435 \context {
 436   \type "Engraver_group"
 437   \name ChordNames
 438   \description "Typesets chord names."
 439
 440   \consists "Output_property_engraver"
 441   \consists "Separating_line_group_engraver"
 442   \consists "Chord_name_engraver"
 443   \consists "Hara_kiri_engraver"
 444 %  \consists "Note_spacing_engraver"
 445   \override VerticalAxisGroup #'remove-first = ##t
 446   \override VerticalAxisGroup #'remove-empty = ##t
 447   \override VerticalAxisGroup #'staff-affinity = #DOWN
 448   \override VerticalAxisGroup #'inter-staff-spacing #'padding = #0.5
 449   \override VerticalAxisGroup #'inter-loose-line-spacing #'padding = #0.5
 450 }
 451
 452
 453 RemoveEmptyStaves = \with {
 454   \remove "Axis_group_engraver"
 455   \remove "Hara_kiri_engraver"
 456   \consists "Hara_kiri_engraver"
 457   \override Beam #'auto-knee-gap = #'()
 458   \override VerticalAxisGroup #'remove-empty = ##t
 459 }
 460
 461
 462 \context {
 463   \type "Score_engraver"
 464   \name "Score"
 465
 466   \description "This is the top level notation context.  No
 467 other context can contain a @code{Score} context.  This context
 468 handles the administration of time signatures.  It also makes sure
 469 that items such as clefs, time signatures, and key-signatures are
 470 aligned across staves.
 471
 472 You cannot explicitly instantiate a @code{Score} context (since it
 473 is not contained in any other context).  It is instantiated
 474 automatically when an output definition (a @code{\score} or
 475 @code{\layout} block) is processed."
 476
 477   \consists "Paper_column_engraver"
 478   \consists "Vertically_spaced_contexts_engraver"
 479   \consists "Repeat_acknowledge_engraver"
 480   \consists "Staff_collecting_engraver"
 481
 482   %% move the alias along with the engraver.
 483
 484   \consists "Timing_translator"
 485   \consists "Default_bar_line_engraver"
 486   \consists "Output_property_engraver"
 487   \consists "System_start_delimiter_engraver"
 488   \consists "Mark_engraver"
 489   \consists "Volta_engraver"
 490   \consists "Metronome_mark_engraver"
 491   \consists "Break_align_engraver"
 492   \consists "Spacing_engraver"
 493   \consists "Grace_spacing_engraver"
 494   \consists "Vertical_align_engraver"
 495   \consists "Stanza_number_align_engraver"
 496   \consists "Bar_number_engraver"
 497   \consists "Parenthesis_engraver"
 498
 499   \defaultchild "Staff"
 500
 501   \accepts "FretBoards"
 502   \accepts "Staff"
 503   \accepts "RhythmicStaff"
 504   \accepts "TabStaff"
 505   \accepts "VaticanaStaff"
 506   \accepts "GregorianTranscriptionStaff"
 507   \accepts "MensuralStaff"
 508   \accepts "StaffGroup"
 509   \accepts "DrumStaff"
 510   \accepts "Lyrics"
 511   \accepts "ChordNames"
 512   \accepts "GrandStaff"
 513   \accepts "ChoirStaff"
 514   \accepts "PianoStaff"
 515   \accepts "Devnull"
 516   \accepts "NoteNames"
 517   \accepts "FiguredBass"
 518
 519
 520   noteToFretFunction = #determine-frets
 521   predefinedDiagramTable = ##f
 522   soloText = #"Solo"
 523   soloIIText = #"Solo II"
 524   aDueText = #"a2"
 525   printPartCombineTexts = ##t
 526   systemStartDelimiter =#'SystemStartBar
 527
 528   drumStyleTable = #drums-style
 529
 530   melismaBusyProperties = #default-melisma-properties
 531   tieWaitForNote = ##f
 532   clefGlyph = #"clefs.G"
 533   clefPosition = #-2
 534   middleCClefPosition = #-6
 535   middleCPosition = #-6
 536   firstClef = ##t
 537
 538   crescendoSpanner = #'hairpin
 539   decrescendoSpanner = #'hairpin
 540
 541   defaultBarType = #"|"
 542   doubleRepeatType = #":|:"
 543   barNumberVisibility = #first-bar-number-invisible
 544   automaticBars = ##t
 545
 546   explicitClefVisibility = #all-visible
 547   explicitKeySignatureVisibility = #all-visible
 548   implicitTimeSignatureVisibility = #end-of-line-invisible
 549
 550   repeatCountVisibility = #all-repeat-counts-visible
 551
 552   beamSettings = #default-beam-settings
 553   autoBeaming = ##t
 554   autoBeamCheck = #default-auto-beam-check
 555   scriptDefinitions = #default-script-alist
 556
 557   pedalSustainStrings = #'("Ped." "*Ped." "*")
 558   pedalSustainStyle = #'text
 559   pedalUnaCordaStrings = #'("una corda" "" "tre corde")
 560   pedalUnaCordaStyle = #'text
 561
 562 %% These are in ordinary italic font, including the *,
 563 %% but they are unlikely to be used,
 564 %% as the default pedal-style for SostenutoPedal is 'mixed':
 565 %% i.e.  Sost. Ped_____________________
 566   pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
 567   pedalSostenutoStyle = #'mixed
 568
 569   harmonicAccidentals = ##t
 570   fingeringOrientations = #'(up down)
 571   stringNumberOrientations = #'(up down)
 572   strokeFingerOrientations = #'(right)
 573
 574   lyricMelismaAlignment = #LEFT
 575   markFormatter = #format-mark-letters
 576   rehearsalMark = #1
 577   subdivideBeams = ##f
 578   extraNatural = ##t
 579   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
 580   autoCautionaries = #'()
 581
 582   printKeyCancellation = ##t
 583   keyAlterationOrder = #`(
 584     (6 . ,FLAT) (2  . ,FLAT) (5 . ,FLAT ) (1  . ,FLAT) (4  . ,FLAT) (0  . ,FLAT) (3  . ,FLAT)
 585     (3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
 586     (6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
 587     (3  . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
 588   )
 589
 590   barCheckSynchronize = ##f
 591
 592 %% chord names:
 593   chordNameFunction = #ignatzek-chord-names
 594   majorSevenSymbol = #whiteTriangleMarkup
 595   chordNameLowercaseMinor = ##f
 596   chordNameSeparator = #(make-simple-markup  "/")
 597   chordNameExceptions = #ignatzekExceptions
 598   chordNoteNamer = #'()
 599   chordRootNamer = #note-name->markup
 600   chordPrefixSpacer = #0
 601   chordNameExceptionsFull = #fullJazzExceptions
 602   chordNameExceptionsPartial = #partialJazzExceptions
 603   noChordSymbol = #(make-simple-markup "N.C.")
 604
 605   bassStaffProperties = #'((assign clefGlyph "clefs.F")
 606   (assign clefPosition 2)
 607   (assign middleCPosition 6)
 608   (assign middleCClefPosition 6))
 609 %% tablature:
 610   stringOneTopmost = ##t
 611   highStringOne = ##t
 612
 613 %% One may change the string tunings as follows :
 614 %% The length of the list must be equal to the number of strings
 615   stringTunings = #guitar-tuning
 616   tablatureFormat = #fret-number-tablature-format
 617   tabStaffLineLayoutFunction = #tablature-position-on-lines
 618
 619 %%
 620   figuredBassFormatter = #format-bass-figure
 621   metronomeMarkFormatter = #format-metronome-markup
 622
 623
 624   %% See also make-voice-props-set
 625   graceSettings = #`(
 626     (Voice Stem direction ,UP)
 627     (Voice Stem font-size -3)
 628     (Voice NoteHead font-size -3)
 629     (Voice TabNoteHead font-size -4)
 630     (Voice Dots font-size -3)
 631     (Voice Stem length-fraction 0.8)
 632     (Voice Stem no-stem-extend #t)
 633     (Voice Beam beam-thickness 0.384)
 634     (Voice Beam length-fraction 0.8)
 635     (Voice Accidental font-size -4)
 636     (Voice AccidentalCautionary font-size -4)
 637     (Voice Slur direction ,DOWN)
 638     (Voice Script font-size -3)
 639     (Voice Fingering font-size -8)
 640     (Voice StringNumber font-size -8)
 641   )
 642
 643   keepAliveInterfaces = #'(
 644     rhythmic-grob-interface
 645     lyric-interface
 646     percent-repeat-item-interface
 647     percent-repeat-interface
 648
 649     ;; need this, as stanza numbers are items, and appear only once.
 650     stanza-number-interface
 651   )
 652   % \quoteDuring is supposed to quote everything, cueDuring only the essentials
 653   quotedEventTypes = #'(StreamEvent)
 654   quotedCueEventTypes = #'(
 655     note-event
 656     rest-event
 657     tie-event
 658     beam-event
 659     tuplet-span-event)
 660   instrumentTransposition = #(ly:make-pitch 0 0 0)
 661
 662   verticallySpacedContexts = #'(Staff)
 663   topLevelAlignment = ##t
 664
 665   timing = ##t
 666 }
 667
 668
 669
 670
 671 \context {
 672   \type "Engraver_group"
 673   \name "FiguredBass"
 674   \description "A context for printing a figured bass line."
 675
 676   \consists "Figured_bass_engraver"
 677   \consists "Separating_line_group_engraver"
 678   \consists "Hara_kiri_engraver"
 679
 680   \override VerticalAxisGroup #'remove-empty = ##t
 681   \override VerticalAxisGroup #'remove-first = ##t
 682   \override VerticalAxisGroup #'staff-affinity = #UP
 683   \override VerticalAxisGroup #'inter-staff-spacing #'padding = #0.5
 684   \override VerticalAxisGroup #'inter-loose-line-spacing #'padding = #0.5
 685 }
 686
 687 \context {
 688   \name "Devnull"
 689   \type "Engraver_group"
 690
 691 %% don't want to route anything out of here:
 692   \alias "Staff"
 693   \alias "Voice"
 694   \description "Silently discards all musical information given to this
 695 context."
 696 }
 697
 698 \context {
 699   \Voice
 700   \name "TabVoice"
 701   \alias "Voice"
 702   \consists "Tab_note_heads_engraver"
 703   \consists "Tab_harmonic_engraver"
 704
 705   \remove "Note_heads_engraver"
 706   \remove "Fingering_engraver"
 707   \remove "New_fingering_engraver"
 708
 709   \description "Context for drawing notes in a Tab staff."
 710
 711   %% TabStaff increase the staff-space, which in turn
 712   %% increases beam thickness and spacing; beams are
 713   %% too big. We have to adjust the beam settings:
 714   \override Beam #'beam-thickness = #0.32
 715   \override Beam #'length-fraction = #0.62
 716
 717   %% No accidental in tablature !
 718   \remove "Accidental_engraver"
 719   %% make the Stems as short as possible to minimize their influence
 720   %% on the slur::calc-control-points routine
 721   \override Stem #'length = #0
 722   \override Stem #'no-stem-extend = ##t
 723   \override Stem #'flag-style = #'no-flag
 724   \override Stem #'details = #'((lengths 0 0 0 0 0 0)
 725                                 (beamed-lengths 0 0 0)
 726                                 (beamed-minimum-free-lengths 0 0 0)
 727                                 (beamed-extreme-minimum-free-lengths 0 0)
 728                                 (stem-shorten 0 0))
 729   %% after all, the stubs of the stems may still be visible, so ...
 730   \override Stem #'transparent = ##t
 731   %% automatic beams should be suppressed for similar reasons ...
 732   autoBeaming = ##f
 733   %% remove beams, dots and rests ...
 734   \override Beam #'stencil = ##f
 735   \override Dots #'stencil = ##f
 736   \override Rest #'stencil = ##f
 737   \override MultiMeasureRest #'stencil = ##f
 738   \override MultiMeasureRestNumber #'transparent = ##t
 739   %% ... all kinds of ties/slurs
 740   \override Tie  #'stencil = ##f
 741   \override RepeatTie #'stencil = ##f
 742   \override LaissezVibrerTie #'stencil = ##f
 743   \override Slur #'stencil = #slur::draw-tab-slur
 744   \override PhrasingSlur #'stencil = ##f
 745   %% 'tied to' fret numbers become invisible or parenthesized, respectively)
 746   \override Tie #'after-line-breaking = #tie::handle-tab-note-head
 747   \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
 748   %% ... and all kinds of markups, spanners etc.
 749   \override TupletBracket #'stencil = ##f
 750   \override TupletNumber #'stencil = ##f
 751   \override DynamicText #'transparent = ##t
 752   \override DynamicTextSpanner #'stencil = ##f
 753   \override TextSpanner #'stencil = ##f
 754   \override Hairpin #'transparent = ##t
 755   \override Script #'stencil = ##f
 756   \override TextScript #'stencil = ##f
 757   %% the direction for glissando lines will be automatically corrected
 758   \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
 759   \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
 760                                                    (padding . 0.3))
 761   \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
 762                                                    (padding . 0.3))
 763   %% dead notes
 764   \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
 765   \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
 766 }
 767
 768 \context {
 769   \Staff
 770   \alias "Staff"
 771   \name "TabStaff"
 772   \denies "Voice"
 773   \consists "Tab_staff_symbol_engraver"
 774
 775   \description "Context for generating tablature. It accepts only @code{TabVoice}
 776 contexts and handles the line spacing, the tablature clef etc. properly."
 777
 778   \accepts "TabVoice"
 779   \defaultchild "TabVoice"
 780
 781   %% 6 strings, bigger spacing
 782   \override StaffSymbol #'staff-space = #1.5
 783
 784   %% Don't draw stems over the tablature figures !
 785   \override Stem #'avoid-note-head = ##t
 786
 787   %% No accidental in tablature !
 788   \remove "Accidental_engraver"
 789   \remove "Key_engraver"
 790
 791   \remove "Ottava_spanner_engraver"
 792   %% the clef handler
 793   \override Clef #'stencil = #clef::print-modern-tab-if-set
 794   %% no time signature
 795   \override TimeSignature #'stencil = ##f
 796   %% better parentheses in a TabStaff
 797   \override ParenthesesItem #'stencils = #parentheses-item::calc-tabstaff-parenthesis-stencils
 798   %% no arpeggios
 799   \override Arpeggio #'stencil = ##f
 800   %% we ignore collision warnings that may occur due to
 801   %% stem overlapping, because we have no stems ;-)
 802   \override NoteColumn #'ignore-collision = ##t
 803   %% Special "TAB" clef
 804   clefGlyph = #"clefs.tab"
 805   clefPosition = #0
 806 }
 807
 808 \context {
 809   \Voice
 810   \name "VaticanaVoice"
 811   \alias "Voice"
 812   \description "Same as @code{Voice} context, except that it is
 813 accommodated for typesetting Gregorian Chant in the notational style
 814 of Editio Vaticana."
 815
 816   \remove "Slur_engraver"
 817   \remove "Stem_engraver"
 818   \remove "Ligature_bracket_engraver"
 819   \consists "Vaticana_ligature_engraver"
 820   \remove "Text_spanner_engraver"
 821   \consists "Episema_engraver"
 822
 823   %% Set default head for notes outside of \[ \].
 824   \override NoteHead #'style = #'vaticana.punctum
 825
 826   %% Put some space before and after divisiones.
 827   %% FIXME: This does not seem to show any effect.
 828   \override Script #'padding = #0.5
 829
 830   %% There are no beams in Gregorian Chant notation.
 831   autoBeaming = ##f
 832 }
 833
 834 \context {
 835   \Staff
 836   \name "VaticanaStaff"
 837   \alias "Staff"
 838   \denies "Voice"
 839   \accepts "VaticanaVoice"
 840   \defaultchild "VaticanaVoice"
 841
 842   \description "Same as @code{Staff} context, except that it is
 843 accommodated for typesetting Gregorian Chant in the notational style
 844 of Editio Vaticana."
 845
 846   \remove "Time_signature_engraver"
 847   \consists "Custos_engraver"
 848
 849   %% We can not remove Bar_engraver; otherwise clefs and custodes will
 850   %% not show up any more among other line breaking issues.
 851   %% Instead, we make the grob transparent.
 852   \override BarLine #'transparent = ##t
 853
 854   \override StaffSymbol #'line-count = #4
 855   \override StaffSymbol #'thickness = #0.6
 856
 857   %% FIXME: unit on StaffSymbol's width should be \linewidth.
 858   %% \override StaffSymbol #'width = #60.0
 859
 860   %% Choose vaticana do clef on 3rd line as default.
 861   clefGlyph = #"clefs.vaticana.do"
 862   middleCPosition = #1
 863   middleCClefPosition = #1
 864   clefPosition = #1
 865   clefOctavation = #0
 866
 867   %% Select vaticana style font.
 868   \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
 869   \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
 870   \override Custos #'style = #'vaticana
 871   \override Custos #'neutral-position = #3
 872   \override Custos #'neutral-direction = #DOWN
 873   \override Dots #'style = #'vaticana
 874 }
 875
 876 \context {
 877   \Voice
 878   \name "GregorianTranscriptionVoice"
 879   \alias "Voice"
 880   \consists "Episema_engraver"
 881
 882   %% Removing ligature bracket engraver without replacing it by some
 883   %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
 884   %% warning for every "\[" and "\]".  Therefore, we make the grob
 885   %% transparent instead.
 886   \override LigatureBracket #'transparent = ##t
 887
 888   %% Put some space before and after divisiones.
 889   %% FIXME: This does not seem to show any effect.
 890   \override Script #'padding = #0.5
 891
 892   %% There are no beams in Gregorian Chant notation.
 893   autoBeaming = ##f
 894
 895 }
 896
 897 \context {
 898   \Staff
 899   \name "GregorianTranscriptionStaff"
 900   \alias "Staff"
 901   \denies "Voice"
 902   \accepts "GregorianTranscriptionVoice"
 903   \defaultchild "GregorianTranscriptionVoice"
 904
 905   %% We can not remove Bar_engraver; otherwise clefs and custodes will
 906   %% not show up any more among other line breaking issues.
 907   %% Instead, we make the grob transparent.
 908   \override BarLine #'transparent = ##t
 909 }
 910
 911 \context {
 912   \Voice
 913   \name "MensuralVoice"
 914   \alias "Voice"
 915   \description "Same as @code{Voice} context, except that it is
 916 accommodated for typesetting a piece in mensural style."
 917
 918   \remove "Slur_engraver"
 919   \remove "Ligature_bracket_engraver"
 920   \consists "Mensural_ligature_engraver"
 921
 922   %% Set default head for notes outside of \[ \].
 923   \override NoteHead #'style = #'mensural
 924   \override Rest #'style = #'mensural
 925
 926   %% There are no beams in mensural notation.
 927   autoBeaming = ##f
 928 }
 929
 930 \context {
 931   \Staff
 932   \name "MensuralStaff"
 933   \alias "Staff"
 934   \denies "Voice"
 935   \defaultchild "MensuralVoice"
 936   \accepts "MensuralVoice"
 937   \description "Same as @code{Staff} context, except that it is
 938 accommodated for typesetting a piece in mensural style."
 939
 940   \consists "Custos_engraver"
 941
 942   %% We can not remove Bar_engraver; otherwise clefs and custodes will
 943   %% not show up any more among other line breaking issues.
 944   %% Instead, we make the grob transparent.
 945   \override BarLine #'transparent = ##t
 946
 947   \override StaffSymbol #'thickness = #0.6
 948
 949   %% FIXME: unit on StaffSymbol's width should be \linewidth.
 950   %% \override StaffSymbol #'width = #60.0
 951
 952   %% Choose mensural g clef on 2nd line as default.
 953   clefGlyph = #"clefs.mensural.g"
 954   middleCClefPosition = #-6
 955   middleCPosition = #-6
 956   clefPosition = #-2
 957   clefOctavation = #0
 958
 959   %% Select mensural style font.
 960   \override TimeSignature #'style = #'mensural
 961   \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
 962   \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
 963   \override Custos #'style = #'mensural
 964   \override Custos #'neutral-position = #3
 965   \override Custos #'neutral-direction = #DOWN
 966
 967   %% Accidentals are valid only once (same as
 968   %% #(set-accidental-style 'forget))
 969   extraNatural = ##f
 970   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
 971   autoCautionaries = #'()
 972   printKeyCancellation = ##f
 973 }
 974
 975
 976 %% Keep the old definitions in here for compatibility (they erase previous
 977 %% settings to the corresponding context!).
 978 %% For new scores, one should simply insert the \RemoveEmptyStaves settings
 979 %% into the desired context. That's just as easy, requires only one line more
 980 %% (the \*Staff), but preserves previous context mods.
 981 %% TODO: DEPRECATED_2.13.17, remove at some point in the future
 982 RemoveEmptyStaffContext = \context {
 983   \Staff
 984   \RemoveEmptyStaves
 985 }
 986
 987 AncientRemoveEmptyStaffContext = \context {
 988   \VaticanaStaff
 989   \RemoveEmptyStaves
 990 }
 991
 992 RemoveEmptyDrumStaffContext = \context {
 993   \DrumStaff
 994   \RemoveEmptyStaves
 995 }
 996
 997 RemoveEmptyRhythmicStaffContext = \context {
 998   \RhythmicStaff
 999   \RemoveEmptyStaves
1000 }
1001
1002 RemoveEmptyTabStaffContext = \context {
1003   \TabStaff
1004   \RemoveEmptyStaves
1005 }
1006