ly/engraver-init.ly

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