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