+%%%% This file is part of LilyPond, the GNU music typesetter.
+%%%%
+%%%% Copyright (C) 1996--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
+%%%% Jan Nieuwenhuizen <janneke@gnu.org>
+%%%%
+%%%% LilyPond is free software: you can redistribute it and/or modify
+%%%% it under the terms of the GNU General Public License as published by
+%%%% the Free Software Foundation, either version 3 of the License, or
+%%%% (at your option) any later version.
+%%%%
+%%%% LilyPond is distributed in the hope that it will be useful,
+%%%% but WITHOUT ANY WARRANTY; without even the implied warranty of
+%%%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+%%%% GNU General Public License for more details.
+%%%%
+%%%% You should have received a copy of the GNU General Public License
+%%%% along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
+
\version "2.12.0"
\context {
\grobdescriptions #all-grob-descriptions
}
-
\context {
\type "Engraver_group"
\name "FretBoards"
+ \description "A context for displaying fret diagrams."
- \consists "Output_property_engraver"
-
- \consists "Axis_group_engraver"
\consists "Fretboard_engraver"
+ \consists "Rest_swallow_translator"
+ \consists "Output_property_engraver"
+ \consists "Skip_event_swallow_translator"
+ \consists "Hara_kiri_engraver"
\consists "Separating_line_group_engraver"
\consists "Font_size_engraver"
\consists "Instrument_name_engraver"
\context {
\type "Engraver_group"
\name "Staff"
-
- \consists "Output_property_engraver"
+
+ \consists "Output_property_engraver"
\consists "Bar_engraver"
%% Bar_engraver must be first so default bars aren't overwritten
%% with empty ones.
-
+
\consists "Font_size_engraver"
- \consists "Separating_line_group_engraver"
+ \consists "Separating_line_group_engraver"
\consists "Dot_column_engraver"
\consists "Staff_collecting_engraver"
\consists "Clef_engraver"
\consists "Key_engraver"
\consists "Time_signature_engraver"
- \consists "Ledger_line_engraver"
+ \consists "Ledger_line_engraver"
\consists "Staff_symbol_engraver"
\consists "Collision_engraver"
+ \consists "Grob_pq_engraver"
\consists "Rest_collision_engraver"
\consists "Accidental_engraver"
\consists "Piano_pedal_engraver"
localKeySignature = #'()
createSpacing = ##t
- ignoreFiguredBassRest = ##t
- \override VerticalAxisGroup #'minimum-Y-extent = #'(-4 . 4)
-
- %% explicitly set instrument, so we don't get
+ ignoreFiguredBassRest = ##t
+
+ %% explicitly set instrument, so we don't get
%% weird effects when doing instrument names for
%% piano staves
instrumentName = #'()
shortInstrumentName = #'()
-
+
\defaultchild "Voice"
\accepts "Voice"
\accepts "CueVoice"
-
+
\description "Handles clefs, bar lines, keys, accidentals. It can contain
@code{Voice} contexts."
\type "Engraver_group"
\name "DrumStaff"
\alias "Staff"
-
+
\remove "Accidental_engraver"
\remove "Ottava_spanner_engraver"
- \remove "Key_engraver"
+ \remove "Key_engraver"
\remove "Piano_pedal_engraver"
\remove "String_number_engraver"
-
+
\description "Handles typesetting for percussion."
\denies "Voice"
clefGlyph = #"clefs.percussion"
clefPosition = #0
- \override Script #'staff-padding = #0.75
+ \override Script #'staff-padding = #0.75
}
\context {
\type "Engraver_group"
\name "ChoirStaff"
+ \consists "Vertical_align_engraver"
+ topLevelAlignment = ##f
+
\consists "System_start_delimiter_engraver"
systemStartDelimiter = #'SystemStartBracket
vocalName = #'()
\context{
\type "Engraver_group"
-
- \override VerticalAxisGroup #'minimum-Y-extent = ##f
+
localKeySignature = #'()
createSpacing = ##t
squashedPosition = #0
\name RhythmicStaff
\alias "Staff"
-
+
\override BarLine #'bar-size = #4
\override VoltaBracket #'staff-padding = #3
- \override StaffSymbol #'line-count = #1
+ \override StaffSymbol #'line-count = #1
\override Stem #'neutral-direction = #UP
\override Beam #'neutral-direction = #UP
-
+
\consists "Output_property_engraver"
\consists "Font_size_engraver"
- \consists "Separating_line_group_engraver"
+ \consists "Separating_line_group_engraver"
\consists "Dot_column_engraver"
\consists "Bar_engraver"
\consists "Staff_symbol_engraver"
\consists "Time_signature_engraver"
\consists "Instrument_name_engraver"
\consists "Axis_group_engraver"
- \consists "Ledger_line_engraver"
-
+ \consists "Ledger_line_engraver"
+
\accepts "Voice"
\accepts "CueVoice"
\defaultchild "Voice"
\consists "Font_size_engraver"
\consists "Pitched_trill_engraver"
- \consists "Output_property_engraver"
+ \consists "Output_property_engraver"
\consists "Arpeggio_engraver"
\consists "Multi_measure_rest_engraver"
\consists "Text_spanner_engraver"
\consists "Dots_engraver"
\consists "Rest_engraver"
\consists "Tweak_engraver"
-
+
%% switch on to make stem directions interpolate for the
%% center line.
% \consists "Melody_engraver"
%% must come before Script_column_engraver.
\consists "New_fingering_engraver"
-
+
\consists "Chord_tremolo_engraver"
\consists "Percent_repeat_engraver"
\consists "Slash_repeat_engraver"
\context{
\Voice
-
+
\name CueVoice
\alias Voice
fontSize = #-4
\override Stem #'length-fraction = #(magstep -4)
\override Beam #'length-fraction = #(magstep -4)
- \override Beam #'thickness = #0.35
+ \override Beam #'beam-thickness = #0.35
}
\context {
\type "Engraver_group"
\name GrandStaff
localKeySignature = #'()
-
+
\description "A group of staves, with a brace on the left
side, grouping the staves together. The bar lines of the
contained staves are connected vertically."
\defaultchild "Staff"
\accepts "Staff"
\accepts "FiguredBass"
+ \accepts "Dynamics"
}
\context{
instrument names at the start of each system."
\consists "Instrument_name_engraver"
+ \consists "Vertical_align_engraver"
+ topLevelAlignment = ##f
+
+ \override StaffGrouper #'between-staff-spacing #'stretchability = #5
instrumentName = #'()
shortInstrumentName = #'()
\type "Engraver_group"
\name "StaffGroup"
+ \consists "Vertical_align_engraver"
+ topLevelAlignment = ##f
+
\consists "Span_bar_engraver"
\consists "Span_arpeggio_engraver"
- \consists "Output_property_engraver"
+ \consists "Output_property_engraver"
systemStartDelimiter = #'SystemStartBracket
\consists "System_start_delimiter_engraver"
\accepts "DrumStaff"
\accepts "GrandStaff"
\accepts "PianoStaff"
- \accepts "TabStaff"
+ \accepts "TabStaff"
\accepts "Lyrics"
\accepts "ChordNames"
\accepts "FiguredBass"
\accepts "ChoirStaff"
\accepts "StaffGroup"
-
+
\description "Groups staves while adding a bracket on the left
side, grouping the staves together. The bar lines of the contained
staves are connected vertically. @code{StaffGroup} only consists of
a collection of staves, with a bracket in front and spanning bar lines."
}
+\context {
+ \type "Engraver_group"
+ \name Dynamics
+ \alias Voice
+ \consists "Output_property_engraver"
+ \consists "Bar_engraver"
+ \consists "Piano_pedal_engraver"
+ \consists "Script_engraver"
+ \consists "New_dynamic_engraver"
+ \consists "Dynamic_align_engraver"
+ \consists "Text_engraver"
+ \consists "Skip_event_swallow_translator"
+ \consists "Axis_group_engraver"
+
+ pedalSustainStrings = #'("Ped." "*Ped." "*")
+ pedalUnaCordaStrings = #'("una corda" "" "tre corde")
+ \override VerticalAxisGroup #'staff-affinity = #CENTER
+ \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5) (padding . 0.5))
+ \override TextScript #'font-shape = #'italic
+
+ \description "Holds a single line of dynamics, which will be
+centered between the staves surrounding this context."
+}
+
+
\context{
\type "Engraver_group"
- \override VerticalAxisGroup #'minimum-Y-extent = #'(-0.75 . 2.0)
\description "Corresponds to a voice with lyrics. Handles the
printing of a single line of lyrics."
-
+
\name "Lyrics"
instrumentName = #'()
shortInstrumentName = #'()
-
+
\consists "Lyric_engraver"
\consists "Extender_engraver"
\consists "Hyphen_engraver"
\override VerticalAxisGroup #'remove-first = ##t
\override VerticalAxisGroup #'remove-empty = ##t
- \override VerticalAxisGroup #'keep-fixed-while-stretching = ##t
+ \override VerticalAxisGroup #'staff-affinity = #UP
+ \override VerticalAxisGroup #'inter-staff-spacing = #'((space . 5.5) (stretchability . 1) (padding . 0.5))
+ \override VerticalAxisGroup #'inter-loose-line-spacing = #'((space . 0) (stretchability . 0) (padding . 0.2))
+ \override VerticalAxisGroup #'non-affinity-spacing #'padding = #1.0
\override SeparationItem #'padding = #0.2
\override InstrumentName #'self-alignment-Y = ##f
%% make sure that barlines aren't collapsed, when
%% Bar_engraver is there.
- \override BarLine #'bar-size = #0.1
-
+ \override BarLine #'bar-size = #0.1
+
}
\context {
\type "Engraver_group"
\name NoteNames
+ \description "A context for printing the names of notes."
\consists "Axis_group_engraver"
- \override VerticalAxisGroup #'minimum-Y-extent = ##f
+ % FIXME: not sure what the default should be here.
+ \override VerticalAxisGroup #'staff-affinity = #DOWN
-
- \consists "Rest_swallow_translator"
+
+ \consists "Rest_swallow_translator"
\consists "Skip_event_swallow_translator"
\consists "Tie_engraver"
\consists "Note_name_engraver"
\type "Engraver_group"
\name ChordNames
\description "Typesets chord names."
-
- \consists "Rest_swallow_translator"
- \consists "Output_property_engraver"
+
+ \consists "Rest_swallow_translator"
+ \consists "Output_property_engraver"
\consists "Separating_line_group_engraver"
\consists "Chord_name_engraver"
\consists "Skip_event_swallow_translator"
\consists "Hara_kiri_engraver"
% \consists "Note_spacing_engraver"
- \override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 2)
\override VerticalAxisGroup #'remove-first = ##t
\override VerticalAxisGroup #'remove-empty = ##t
+ \override VerticalAxisGroup #'staff-affinity = #DOWN
+ \override VerticalAxisGroup #'inter-staff-spacing #'padding = #0.5
+ \override VerticalAxisGroup #'inter-loose-line-spacing #'padding = #0.5
}
AncientRemoveEmptyStaffContext = \context {
%% why not add by default?
-
+
\RemoveEmptyStaffContext
\accepts "VaticanaVoice"
\accepts "GregorianTranscriptionVoice"
\context {
\type "Score_engraver"
\name "Score"
-
+
\description "This is the top level notation context. No
other context can contain a @code{Score} context. This context
handles the administration of time signatures. It also makes sure
\consists "System_start_delimiter_engraver"
\consists "Mark_engraver"
\consists "Volta_engraver"
- \consists "Metronome_mark_engraver"
+ \consists "Metronome_mark_engraver"
\consists "Break_align_engraver"
\consists "Spacing_engraver"
\consists "Grace_spacing_engraver"
\consists "Stanza_number_align_engraver"
\consists "Bar_number_engraver"
\consists "Parenthesis_engraver"
-
+
\defaultchild "Staff"
\accepts "FretBoards"
systemStartDelimiter =#'SystemStartBar
drumStyleTable = #drums-style
-
+
melismaBusyProperties = #default-melisma-properties
tieWaitForNote = ##f
clefGlyph = #"clefs.G"
crescendoSpanner = #'hairpin
decrescendoSpanner = #'hairpin
-
+
defaultBarType = #"|"
doubleRepeatType = #":|:"
barNumberVisibility = #first-bar-number-invisible
automaticBars = ##t
-
+
explicitClefVisibility = #all-visible
explicitKeySignatureVisibility = #all-visible
implicitTimeSignatureVisibility = #end-of-line-invisible
-
+
repeatCountVisibility = #all-repeat-counts-visible
-
- autoBeamSettings = #default-auto-beam-settings
+
+ beamSettings = #default-beam-settings
autoBeaming = ##t
autoBeamCheck = #default-auto-beam-check
scriptDefinitions = #default-script-alist
pedalUnaCordaStyle = #'text
%% These are in ordinary italic font, including the *,
-%% but they are unlikely to be used,
+%% but they are unlikely to be used,
%% as the default pedal-style for SostenutoPedal is 'mixed':
-%% i.e. Sost. Ped_____________________
- pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
+%% i.e. Sost. Ped_____________________
+ pedalSostenutoStrings = #'("Sost. Ped." "*Sost. Ped." "*")
pedalSostenutoStyle = #'mixed
- harmonicAccidentals = ##t
+ harmonicAccidentals = ##t
fingeringOrientations = #'(up down)
stringNumberOrientations = #'(up down)
strokeFingerOrientations = #'(right)
-
+
lyricMelismaAlignment = #LEFT
markFormatter = #format-mark-letters
rehearsalMark = #1
subdivideBeams = ##f
extraNatural = ##t
autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0))
- autoCautionaries = #'()
+ autoCautionaries = #'()
printKeyCancellation = ##t
keyAlterationOrder = #`(
)
barCheckSynchronize = ##f
-
+
%% chord names:
chordNameFunction = #ignatzek-chord-names
majorSevenSymbol = #whiteTriangleMarkup
chordPrefixSpacer = #0
chordNameExceptionsFull = #fullJazzExceptions
chordNameExceptionsPartial = #partialJazzExceptions
-
+ noChordSymbol = #(make-simple-markup "N.C.")
bassStaffProperties = #'((assign clefGlyph "clefs.F")
(assign clefPosition 2)
(Voice Stem direction ,UP)
(Voice Stem font-size -3)
(Voice NoteHead font-size -3)
+ (Voice TabNoteHead font-size -4)
(Voice Dots font-size -3)
(Voice Stem length-fraction 0.8)
(Voice Stem no-stem-extend #t)
- (Voice Beam thickness 0.384)
+ (Voice Beam beam-thickness 0.384)
(Voice Beam length-fraction 0.8)
(Voice Accidental font-size -4)
(Voice AccidentalCautionary font-size -4)
(Voice Slur direction ,DOWN)
(Voice Script font-size -3)
+ (Voice Fingering font-size -8)
+ (Voice StringNumber font-size -8)
)
keepAliveInterfaces = #'(
percent-repeat-item-interface
percent-repeat-interface
- ;; need this, as stanza numbers are items, and appear only once.
+ ;; need this, as stanza numbers are items, and appear only once.
stanza-number-interface
)
quotedEventTypes = #'(
instrumentTransposition = #(ly:make-pitch 0 0 0)
verticallySpacedContexts = #'(Staff)
-
+ topLevelAlignment = ##t
+
timing = ##t
}
\context {
\type "Engraver_group"
\name "FiguredBass"
+ \description "A context for printing a figured bass line."
\consists "Figured_bass_engraver"
\consists "Note_swallow_translator"
\override VerticalAxisGroup #'remove-empty = ##t
\override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 2)
+ \override VerticalAxisGroup #'staff-affinity = #UP
+ \override VerticalAxisGroup #'inter-staff-spacing #'padding = #0.5
+ \override VerticalAxisGroup #'inter-loose-line-spacing #'padding = #0.5
}
\context {
\name "Devnull"
\type "Engraver_group"
-%% don't want to route anything out of here:
+%% don't want to route anything out of here:
\alias "Staff"
\alias "Voice"
\consists "Swallow_engraver"
\alias "Voice"
\consists "Tab_note_heads_engraver"
\consists "Tab_harmonic_engraver"
-
+
\remove "Note_heads_engraver"
\remove "Fingering_engraver"
\remove "New_fingering_engraver"
%% TabStaff increase the staff-space, which in turn
%% increases beam thickness and spacing; beams are
%% too big. We have to adjust the beam settings:
- \override Beam #'thickness = #0.32
+ \override Beam #'beam-thickness = #0.32
\override Beam #'length-fraction = #0.62
%% No accidental in tablature !
- \remove Accidental_engraver
-
- \override Glissando #'extra-dy = #0.75
+ \remove "Accidental_engraver"
+ %% make the Stems as short as possible to minimize their influence
+ %% on the slur::calc-control-points routine
+ \override Stem #'length = #0
+ \override Stem #'no-stem-extend = ##t
+ \override Stem #'flag-style = #'no-flag
+ \override Stem #'details = #'((lengths 0 0 0 0 0 0)
+ (beamed-lengths 0 0 0)
+ (beamed-minimum-free-lengths 0 0 0)
+ (beamed-extreme-minimum-free-lengths 0 0)
+ (stem-shorten 0 0))
+ %% after all, the stubs of the stems may still be visible, so ...
+ \override Stem #'transparent = ##t
+ %% automatic beams should be suppressed for similar reasons ...
+ autoBeaming = ##f
+ %% remove beams, dots and rests ...
+ \override Beam #'stencil = ##f
+ \override Dots #'stencil = ##f
+ \override Rest #'stencil = ##f
+ \override MultiMeasureRest #'stencil = ##f
+ \override MultiMeasureRestNumber #'transparent = ##t
+ %% ... all kinds of ties/slurs
+ \override Tie #'stencil = ##f
+ \override RepeatTie #'stencil = ##f
+ \override LaissezVibrerTie #'stencil = ##f
+ \override Slur #'stencil = #slur::draw-tab-slur
+ \override PhrasingSlur #'stencil = ##f
+ %% 'tied to' fret numbers become invisible or parenthesized, respectively)
+ \override Tie #'after-line-breaking = #tie::handle-tab-note-head
+ \override RepeatTie #'after-line-breaking = #repeat-tie::handle-tab-note-head
+ %% ... and all kinds of markups, spanners etc.
+ \override TupletBracket #'stencil = ##f
+ \override TupletNumber #'stencil = ##f
+ \override DynamicText #'transparent = ##t
+ \override DynamicTextSpanner #'stencil = ##f
+ \override TextSpanner #'stencil = ##f
+ \override Hairpin #'transparent = ##t
+ \override Script #'stencil = ##f
+ \override TextScript #'stencil = ##f
+ %% the direction for glissando lines will be automatically corrected
+ \override Glissando #'extra-dy = #glissando::calc-tab-extra-dy
\override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
(padding . 0.3))
\override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
(padding . 0.3))
- \override Glissando #'extra-dy = #0.75
- \override Glissando #'gap = #0.2
+ %% dead notes
+ \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
+ \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
}
\context {
\name "TabStaff"
\denies "Voice"
\consists "Tab_staff_symbol_engraver"
-
- \description "Context for generating tablature. [DOCME]"
+
+ \description "Context for generating tablature. It accepts only @code{TabVoice}
+contexts and handles the line spacing, the tablature clef etc. properly."
\accepts "TabVoice"
\defaultchild "TabVoice"
-
- %% 6 strings
+
+ %% 6 strings, bigger spacing
\override StaffSymbol #'staff-space = #1.5
%% Don't draw stems over the tablature figures !
\override Stem #'avoid-note-head = ##t
-
+
%% No accidental in tablature !
\remove "Accidental_engraver"
\remove "Key_engraver"
+
\remove "String_number_engraver"
+ \remove "Ottava_spanner_engraver"
+ %% the clef handler
+ \override Clef #'stencil = #clef::print-modern-tab-if-set
+ %% no time signature
+ \override TimeSignature #'stencil = ##f
+ %% better parentheses in a TabStaff
+ \override ParenthesesItem #'stencils = #parentheses-item::calc-tabstaff-parenthesis-stencils
+ %% no arpeggios
+ \override Arpeggio #'stencil = ##f
+ %% we ignore collision warnings that may occur due to
+ %% stem overlapping, because we have no stems ;-)
+ \override NoteColumn #'ignore-collision = ##t
%% Special "TAB" clef
clefGlyph = #"clefs.tab"
clefPosition = #0
}
-%% TODO: Gregorian Chant contexts should be moved to gregorian.ly,
-%% but this does not work (is this a bug or intended behaviour?):
-%%
-%% If I try to do so, I get "error: unknown escaped string:
-%% `\VaticanaStaff'" in params-init.ly. If I also move
-%% "\context { \Vaticana*Context }" from params-init.ly to the end
-%% of gregorian.ly, then I get "error: parse error, unexpected
-%% TRANSLATOR: \context { \VaticanaStaff }" in
-%% gregorian.ly. --jr
-
\context {
\Voice
\name "VaticanaVoice"
projects / lilypond.git / blobdiff