%%%% This file is part of LilyPond, the GNU music typesetter.
%%%%
-%%%% Copyright (C) 1996--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
+%%%% Copyright (C) 1996--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
%%%% Jan Nieuwenhuizen <janneke@gnu.org>
%%%%
%%%% LilyPond is free software: you can redistribute it and/or modify
%%%% 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.16.0"
+\version "2.19.19"
\context {
\name "Global"
\defaultchild "Score"
\description "Hard coded entry point for LilyPond. Cannot be tuned."
\grobdescriptions #all-grob-descriptions
- EventClasses = #all-event-classes
}
\context {
\consists "Fretboard_engraver"
\consists "Output_property_engraver"
- \consists "Hara_kiri_engraver"
+ \consists "Axis_group_engraver"
\consists "Separating_line_group_engraver"
\consists "Font_size_engraver"
\consists "Instrument_name_engraver"
\consists "Dot_column_engraver"
\consists "Staff_collecting_engraver"
- %% perhaps move to Voice context?
+ %% perhaps move to Voice context?
\consists "Ottava_spanner_engraver"
\consists "Clef_engraver"
\consists "Key_engraver"
\consists "Figured_bass_position_engraver"
\consists "Script_row_engraver"
\consists "Cue_clef_engraver"
+ \consists "Fingering_column_engraver"
- localKeySignature = #'()
+ localAlterations = #'()
createSpacing = ##t
ignoreFiguredBassRest = ##f
shortInstrumentName = #'()
\defaultchild "Voice"
- \accepts "Voice"
\accepts "CueVoice"
+ \accepts "NullVoice"
+ \accepts "Voice"
\description "Handles clefs, bar lines, keys, accidentals. It can contain
@code{Voice} contexts."
clefGlyph = #"clefs.percussion"
clefPosition = #0
- \override Script #'staff-padding = #0.75
+ \override Script.staff-padding = #0.75
}
vocalName = #'()
shortVocalName = #'()
- \accepts "Staff"
+ \accepts "ChoirStaff"
+ \accepts "ChordNames"
\accepts "DrumStaff"
- \accepts "RhythmicStaff"
+ \accepts "Dynamics"
+ \accepts "FiguredBass"
\accepts "GrandStaff"
- \accepts "PianoStaff"
\accepts "Lyrics"
- \accepts "ChordNames"
- \accepts "FiguredBass"
- \accepts "ChoirStaff"
+ \accepts "OneStaff"
+ \accepts "PianoStaff"
+ \accepts "RhythmicStaff"
+ \accepts "Staff"
\accepts "StaffGroup"
\defaultchild "Staff"
\description "Identical to @code{StaffGroup} except that the
\context{
\type "Engraver_group"
- localKeySignature = #'()
+ localAlterations = #'()
createSpacing = ##t
squashedPosition = #0
- \name RhythmicStaff
+ \name "RhythmicStaff"
\alias "Staff"
- \override BarLine #'bar-extent = #'(-2 . 2)
- \override VoltaBracket #'staff-padding = #3
- \override StaffSymbol #'line-count = #1
+ \override VoltaBracket.staff-padding = #3
+ \override StaffSymbol.line-count = #1
- \override Stem #'neutral-direction = #UP
- \override Beam #'neutral-direction = #UP
+ \override Stem.neutral-direction = #UP
+ \override Beam.neutral-direction = #UP
\consists "Output_property_engraver"
\consists "Font_size_engraver"
instrumentName = #'()
shortInstrumentName = #'()
- \accepts "Voice"
\accepts "CueVoice"
+ \accepts "NullVoice"
+ \accepts "Voice"
\defaultchild "Voice"
\description "A context like @code{Staff} but for printing rhythms.
You have to instantiate this explicitly if you want to have
multiple voices on the same staff."
-
+ %% Grace_engraver sets properties, it must come first.
+ \consists "Grace_engraver"
\consists "Font_size_engraver"
\consists "Pitched_trill_engraver"
\consists "Note_heads_engraver"
\consists "Dots_engraver"
\consists "Rest_engraver"
- \consists "Tweak_engraver"
%% switch on to make stem directions interpolate for the
%% center line.
\consists "Beam_engraver"
\consists "Grace_beam_engraver"
\consists "Auto_beam_engraver"
+ \consists "Grace_auto_beam_engraver"
%% must come before Script_column_engraver.
\consists "New_fingering_engraver"
\consists "Part_combine_engraver"
\consists "Text_engraver"
- \consists "New_dynamic_engraver"
+ \consists "Dynamic_engraver"
\consists "Dynamic_align_engraver"
-% \consists "Dynamic_engraver"
\consists "Fingering_engraver"
\consists "Bend_engraver"
\consists "Script_engraver"
\consists "Script_column_engraver"
- \consists "Fingering_column_engraver"
\consists "Rhythmic_column_engraver"
\consists "Note_spacing_engraver"
\consists "Spanner_break_forbid_engraver"
\consists "Slur_engraver"
\consists "Tie_engraver"
\consists "Tuplet_engraver"
- \consists "Grace_engraver"
\consists "Instrument_switch_engraver"
}
\context{
\Voice
- \name CueVoice
- \alias Voice
+ \name "CueVoice"
+ \alias "Voice"
fontSize = #-4
- \override Stem #'length-fraction = #(magstep -4)
- \override Beam #'length-fraction = #(magstep -4)
- \override Beam #'beam-thickness = #0.35
+ \override NoteHead.ignore-ambitus = ##t
+ \override Stem.length-fraction = #(magstep -4)
+ \override Beam.length-fraction = #(magstep -4)
+ \override Beam.beam-thickness = #0.35
}
\context {
\Voice
- \name DrumVoice
- \alias Voice
+ \name "DrumVoice"
+ \alias "Voice"
\description "A voice on a percussion staff."
\remove "Arpeggio_engraver"
\context{
\type "Engraver_group"
- \name GrandStaff
- localKeySignature = #'()
+ \name "GrandStaff"
+ localAlterations = #'()
\description "A group of staves, with a brace on the left
side, grouping the staves together. The bar lines of the
\consists "Instrument_name_engraver"
\consists "Span_bar_engraver"
+ %% The default for DynamicText.extra-spacing-width causes dynamics to
+ %% be placed across span bars, so switch it off:
+ \override DynamicText.extra-spacing-width = ##f
\consists "Span_bar_stub_engraver"
\consists "Span_arpeggio_engraver"
\consists "System_start_delimiter_engraver"
shortInstrumentName = #'()
\defaultchild "Staff"
- \accepts "Staff"
- \accepts "RhythmicStaff"
+ \accepts "ChordNames"
\accepts "DrumStaff"
- \accepts "TabStaff"
- \accepts "Lyrics"
- \accepts "FiguredBass"
\accepts "Dynamics"
- \accepts "ChordNames"
+ \accepts "FiguredBass"
+ \accepts "Lyrics"
+ \accepts "RhythmicStaff"
+ \accepts "Staff"
+ \accepts "TabStaff"
}
\context{
\consists "Instrument_name_engraver"
\consists "Span_bar_engraver"
+ %% The default for DynamicText.extra-spacing-width causes dynamics to
+ %% be placed across span bars, so switch it off:
+ \override DynamicText.extra-spacing-width = ##f
\consists "Span_bar_stub_engraver"
\consists "Span_arpeggio_engraver"
\consists "Output_property_engraver"
\consists "System_start_delimiter_engraver"
\defaultchild "Staff"
- \accepts "Staff"
- \accepts "RhythmicStaff"
+ \accepts "ChoirStaff"
+ \accepts "ChordNames"
\accepts "DrumStaff"
+ \accepts "FiguredBass"
+ \accepts "FretBoards"
\accepts "GrandStaff"
- \accepts "PianoStaff"
- \accepts "TabStaff"
\accepts "Lyrics"
- \accepts "ChordNames"
- \accepts "FiguredBass"
- \accepts "ChoirStaff"
+ \accepts "OneStaff"
+ \accepts "PianoStaff"
+ \accepts "RhythmicStaff"
+ \accepts "Staff"
\accepts "StaffGroup"
+ \accepts "TabStaff"
\description "Groups staves while adding a bracket on the left
side, grouping the staves together. The bar lines of the contained
\context {
\type "Engraver_group"
- \name Dynamics
- \alias Voice
+ \name "OneStaff"
+ \accepts "ChordNames"
+ \accepts "DrumStaff"
+ \accepts "Dynamics"
+ \accepts "FiguredBass"
+ \accepts "FretBoards"
+ \accepts "GregorianTranscriptionStaff"
+ \accepts "KievanStaff"
+ \accepts "Lyrics"
+ \accepts "MensuralStaff"
+ \accepts "NoteNames"
+ \accepts "PetrucciStaff"
+ \accepts "RhythmicStaff"
+ \accepts "Staff"
+ \accepts "TabStaff"
+ \accepts "VaticanaStaff"
+ \defaultchild "Staff"
+ \consists "Axis_group_engraver"
+
+ \description "Provides a common axis for the contained staves,
+making all of them appear in the same vertical space. This can be
+useful for typesetting staves of different types in immediate succession
+or for temporarily changing the character of one staff or overlaying
+it with a different one. Often used with @code{\\stopStaff} and
+@code{\\startStaff} for best results."
+}
+
+\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_engraver"
\consists "Dynamic_align_engraver"
\consists "Text_engraver"
\consists "Text_spanner_engraver"
\consists "Font_size_engraver"
\consists "Axis_group_engraver"
- \consists "Tweak_engraver"
pedalSustainStrings = #'("Ped." "*Ped." "*")
pedalUnaCordaStrings = #'("una corda" "" "tre corde")
- \override VerticalAxisGroup #'staff-affinity = #CENTER
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
+ \override VerticalAxisGroup.staff-affinity = #CENTER
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
#'((basic-distance . 5)
(padding . 0.5))
- \override TextScript #'font-shape = #'italic
- \override DynamicLineSpanner #'Y-offset = #0
- \override DynamicText #'X-offset =
- #(ly:make-simple-closure
- `(,+
- ,(ly:make-simple-closure
- (list ly:self-alignment-interface::centered-on-note-columns))
- ,(ly:make-simple-closure
- (list ly:self-alignment-interface::x-aligned-on-self))))
+ \override TextScript.font-shape = #'italic
+ \override DynamicLineSpanner.Y-offset = #0
+ \override DynamicLineSpanner.outside-staff-priority = ##f
+ \override DynamicText.outside-staff-priority = ##f
+ \override Hairpin.outside-staff-priority = ##f
\description "Holds a single line of dynamics, which will be
centered between the staves surrounding this context."
\consists "Lyric_engraver"
\consists "Extender_engraver"
\consists "Hyphen_engraver"
- \consists "Tweak_engraver"
\consists "Stanza_number_engraver"
\consists "Instrument_name_engraver"
\consists "Font_size_engraver"
- \consists "Hara_kiri_engraver"
+ \consists "Axis_group_engraver"
\consists "Pure_from_neighbor_engraver"
searchForVoice = ##f
%% explicitly set instrument, so it is not inherited from the parent
instrumentName = #'()
shortInstrumentName = #'()
- \override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'remove-empty = ##t
- \override VerticalAxisGroup #'staff-affinity = #UP
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
+ \override VerticalAxisGroup.remove-first = ##t
+ \override VerticalAxisGroup.remove-empty = ##t
+ \override VerticalAxisGroup.staff-affinity = #UP
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
#'((basic-distance . 5.5)
(padding . 0.5)
(stretchability . 1))
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
+ \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
#'((basic-distance . 0)
- (minimum-distance . 2.8)
- (padding . 0.2)
- (stretchability . 0))
- \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
- \override InstrumentName #'self-alignment-Y = ##f
+ (minimum-distance . 2.8)
+ (padding . 0.2)
+ (stretchability . 0))
+ \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = #1.5
+ \override InstrumentName.self-alignment-Y = ##f
%% sync with define-grobs.scm ;
- \override InstrumentName #'font-size = #1.0
+ \override InstrumentName.font-size = #1.0
%% make sure that barlines aren't collapsed, when
%% Bar_engraver is there.
- \override BarLine #'bar-extent = #'(-0.05 . 0.05)
+ \override BarLine.bar-extent = #'(-0.05 . 0.05)
}
\context {
\type "Engraver_group"
- \name NoteNames
+ \name "NoteNames"
\description "A context for printing the names of notes."
\consists "Axis_group_engraver"
- \override VerticalAxisGroup #'staff-affinity = #UP
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
+ \override VerticalAxisGroup.staff-affinity = #UP
+ \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
#'((basic-distance . 0)
(minimum-distance . 2.8)
(padding . 0.2)
(stretchability . 0))
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
#'((basic-distance . 5.5)
(padding . 0.5)
(stretchability . 1))
- \override VerticalAxisGroup
- #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
+ \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = 1.5
\consists "Tie_engraver"
\consists "Note_name_engraver"
\context {
\type "Engraver_group"
- \name ChordNames
+ \name "ChordNames"
+ \alias Staff % Catch Staff-level overrides like
+ % \key, \transposition
\description "Typesets chord names."
\consists "Output_property_engraver"
\consists "Separating_line_group_engraver"
\consists "Chord_name_engraver"
- \consists "Hara_kiri_engraver"
-% \consists "Note_spacing_engraver"
- \override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'remove-empty = ##t
- \override VerticalAxisGroup #'staff-affinity = #DOWN
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
+ \consists "Axis_group_engraver"
+ %\consists "Note_spacing_engraver"
+
+ \override VerticalAxisGroup.remove-first = ##t
+ \override VerticalAxisGroup.remove-empty = ##t
+ \override VerticalAxisGroup.staff-affinity = #DOWN
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
+ \override VerticalAxisGroup.nonstaff-nonstaff-spacing.padding = #0.5
+ \override ParenthesesItem.font-size = #1.5
}
\context {
You cannot explicitly instantiate a @code{Score} context (since it
is not contained in any other context). It is instantiated
-automatically when an output definition (a @code{\score} or
-@code{\layout} block) is processed."
+automatically when an output definition (a @code{\\score} or
+@code{\\layout} block) is processed."
\consists "Paper_column_engraver"
\consists "Repeat_acknowledge_engraver"
%% Timing variables in layout definitions before any
%% Timing_translator has been run.
- % timing translator must come BEFORE bar number engraver
+ %% timing translator must come BEFORE bar number engraver
\consists "Timing_translator"
\consists "Default_bar_line_engraver"
\consists "Output_property_engraver"
+ \consists "Tweak_engraver"
\consists "System_start_delimiter_engraver"
\consists "Mark_engraver"
\consists "Volta_engraver"
\defaultchild "Staff"
+ \accepts "ChoirStaff"
+ \accepts "ChordNames"
+ \accepts "Devnull"
+ \accepts "DrumStaff"
+ \accepts "Dynamics"
+ \accepts "FiguredBass"
\accepts "FretBoards"
- \accepts "Staff"
- \accepts "RhythmicStaff"
- \accepts "TabStaff"
- \accepts "VaticanaStaff"
+ \accepts "GrandStaff"
\accepts "GregorianTranscriptionStaff"
- \accepts "MensuralStaff"
- \accepts "PetrucciStaff"
- \accepts "StaffGroup"
- \accepts "DrumStaff"
\accepts "KievanStaff"
\accepts "Lyrics"
- \accepts "ChordNames"
- \accepts "GrandStaff"
- \accepts "ChoirStaff"
- \accepts "PianoStaff"
- \accepts "Devnull"
+ \accepts "MensuralStaff"
\accepts "NoteNames"
- \accepts "FiguredBass"
+ \accepts "OneStaff"
+ \accepts "PetrucciStaff"
+ \accepts "PianoStaff"
+ \accepts "RhythmicStaff"
+ \accepts "Staff"
+ \accepts "StaffGroup"
+ \accepts "TabStaff"
+ \accepts "VaticanaStaff"
noteToFretFunction = #determine-frets
predefinedDiagramTable = ##f
drumStyleTable = #drums-style
+ associatedVoiceType = #'Voice
melismaBusyProperties = #default-melisma-properties
tieWaitForNote = ##f
clefGlyph = #"clefs.G"
doubleRepeatType = #":..:"
startRepeatType = #".|:"
endRepeatType = #":|."
+ alternativeRestores = #'(measurePosition measureLength lastChord)
barNumberVisibility = #first-bar-number-invisible-and-no-parenthesized-bar-numbers
barNumberFormatter = #robust-bar-number-function
+ clefTranspositionFormatter = #clef-transposition-markup
+ cueClefTranspositionFormatter = #clef-transposition-markup
automaticBars = ##t
explicitClefVisibility = #all-visible
explicitCueClefVisibility = #end-of-line-invisible
explicitKeySignatureVisibility = #all-visible
- implicitTimeSignatureVisibility = #end-of-line-invisible
+ initialTimeSignatureVisibility = #end-of-line-invisible
repeatCountVisibility = #all-repeat-counts-visible
+ %% Other Timing variables are derived and set by the Timing_translator
+ %% at initialization time by calling the functions in
+ %% scm/time-signature-settings.scm
+
timeSignatureSettings = #default-time-signature-settings
timeSignatureFraction = 4/4
-%% These defaults should be the same as the rules established in
-%% scm/time-signature-settings.scm for 4/4 time
- measureLength = #(ly:make-moment 4 4)
- baseMoment = #(ly:make-moment 1 4)
- beatStructure = #'(1 1 1 1)
- beamExceptions = #'((end . (((1 . 8) . (4 4))
- ((1 . 12) . (3 3 3 3)))))
beamHalfMeasure = ##t
autoBeaming = ##t
autoBeamCheck = #default-auto-beam-check
+ completionFactor = #unity-if-multimeasure
+
scriptDefinitions = #default-script-alist
pedalSustainStrings = #'("Ped." "*Ped." "*")
pedalUnaCordaStrings = #'("una corda" "" "tre corde")
pedalUnaCordaStyle = #'text
-%% These are in ordinary italic font, including the *,
-%% but they are unlikely to be used,
-%% as the default pedal-style for SostenutoPedal is 'mixed':
-%% i.e. Sost. Ped_____________________
+ %% These are in ordinary italic font, including the *,
+ %% 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." "*")
pedalSostenutoStyle = #'mixed
barCheckSynchronize = ##f
-%% chord names:
+ %% chord names:
chordNameFunction = #ignatzek-chord-names
minorChordModifier = #(make-simple-markup "m")
additionalPitchPrefix = #"" % was "add"
chordNameExceptionsPartial = #partialJazzExceptions
noChordSymbol = #(make-simple-markup "N.C.")
- bassStaffProperties = #'((assign clefGlyph "clefs.F")
- (assign clefPosition 2)
- (assign middleCPosition 6)
- (assign middleCClefPosition 6))
-%% tablature:
+ %% tablature:
stringOneTopmost = ##t
highStringOne = ##t
-%% One may change the string tunings as follows :
-%% The length of the list must be equal to the number of strings
+ %% One may change the string tunings as follows :
+ %% The length of the list must be equal to the number of strings
stringTunings = #guitar-tuning
tablatureFormat = #fret-number-tablature-format
tabStaffLineLayoutFunction = #tablature-position-on-lines
figuredBassFormatter = #format-bass-figure
metronomeMarkFormatter = #format-metronome-markup
-
%% See also make-voice-props-set
- graceSettings = #`(
- (Voice Stem direction ,UP)
- (Voice Stem font-size -3)
- (Voice Flag 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 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)
- )
+ graceSettings = #score-grace-settings
keepAliveInterfaces = #'(
bass-figure-interface
;; need this, as stanza numbers are items, and appear only once.
stanza-number-interface
)
- % \quoteDuring is supposed to quote everything, cueDuring only the essentials
+ %% \quoteDuring is supposed to quote everything, cueDuring only the essentials
quotedEventTypes = #'(StreamEvent)
quotedCueEventTypes = #'(
note-event
\consists "Figured_bass_engraver"
\consists "Separating_line_group_engraver"
- \consists "Hara_kiri_engraver"
+ \consists "Axis_group_engraver"
- \override VerticalAxisGroup #'remove-empty = ##t
- \override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'staff-affinity = #UP
- \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #0.5
- \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
+ \override VerticalAxisGroup.remove-empty = ##t
+ \override VerticalAxisGroup.remove-first = ##t
+ \override VerticalAxisGroup.staff-affinity = #UP
+ \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #0.5
+ \override VerticalAxisGroup.nonstaff-nonstaff-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"
\description "Silently discards all musical information given to this
context."
}
+\context {
+ \name "NullVoice"
+ \type "Engraver_group"
+ \description "For aligning lyrics without printing notes"
+
+ %% don't route anything out of here
+ \alias "Staff"
+ \alias "Voice"
+
+ %% provide non-printing NoteHeads with proper extents for lyric alignment
+ \consists "Note_heads_engraver"
+ \omit NoteHead
+ \override NoteHead.X-extent = #(lambda (g)
+ (ly:stencil-extent (ly:note-head::print g) X))
+
+ %% generate no accidentals
+ nullAccidentals = ##t
+
+ %% keep noteheads inside the staff
+ \consists "Pitch_squash_engraver"
+ squashedPosition = 0
+
+ %% generate no ledger lines, needed for staves with custom
+ %% line positions and ledger lines that appear inside the staff
+ \override NoteHead.no-ledgers = ##t
+
+ %% the engravers that control the 'busy' flags for note-onsets and melismata
+ \consists "Grob_pq_engraver"
+ \consists "Tie_engraver"
+ \omit Tie
+ \consists "Beam_engraver"
+ \omit Beam
+ \consists "Slur_engraver"
+ \omit Slur
+}
+
\context {
\Voice
\name "TabVoice"
\description "Context for drawing notes in a Tab staff."
- %% 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 #'beam-thickness = #0.32
- \override Beam #'length-fraction = #0.62
- %% the same goes for tremolo beams
- \override StemTremolo #'beam-thickness = #0.32
- %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
- %% and the tablature staff space is scaled (1.5 by default),
- %% so we use the inversion of the scale factor:
- \override StemTremolo #'length-fraction = #(lambda (grob)
- (/ 1 (ly:staff-symbol-staff-space grob)))
- \override StemTremolo #'beam-width = #stem-tremolo::calc-tab-width
-
%% No accidental in tablature !
\remove "Accidental_engraver"
- %% make the Stems as short as possible to minimize their influence
- %% on the slur::calc-control-points routine
- \override Stem #'no-stem-extend = ##t
- \override 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 #'stencil = ##f
- \override Flag #'stencil = ##f
- %% automatic beams should be suppressed for similar reasons ...
- autoBeaming = ##f
- %% remove beams, dots and rests ...
- \override Beam #'stencil = ##f
- \override StemTremolo #'stencil = ##f
- \override Dots #'stencil = ##f
- \override Rest #'stencil = ##f
- \override MultiMeasureRest #'stencil = ##f
- \override MultiMeasureRestNumber #'stencil = ##f
- \override MultiMeasureRestText #'stencil = ##f
- %% ... 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 #'stencil = ##f
- \override DynamicTextSpanner #'stencil = ##f
- \override TextSpanner #'stencil = ##f
- \override Hairpin #'stencil = ##f
- \override Script #'stencil = ##f
- \override TextScript #'stencil = ##f
- \override Glissando #'stencil = #glissando::draw-tab-glissando
- %% 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))
- %% dead notes
- \override TabNoteHead #'glyph-name = #tab-note-head::calc-glyph-name
- \override TabNoteHead #'stencil = #tab-note-head::whiteout-if-style-set
}
\context {
\defaultchild "TabVoice"
%% 6 strings, bigger spacing
- \override StaffSymbol #'staff-space = #1.5
+ \override StaffSymbol.staff-space = #1.5
%% Don't draw stems over the tablature figures !
- \override Stem #'avoid-note-head = ##t
+ \override Stem.avoid-note-head = ##t
%% No accidental in tablature !
\remove "Accidental_engraver"
\remove "Ottava_spanner_engraver"
%% the clef handler
- \override Clef #'stencil = #clef::print-modern-tab-if-set
+ \override Clef.stencil = #clef::print-modern-tab-if-set
%% no time signature
- \override TimeSignature #'stencil = ##f
+ \override TimeSignature.stencil = ##f
%% no arpeggios
- \override Arpeggio #'stencil = ##f
+ \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
+ \override NoteColumn.ignore-collision = ##t
%% Special "TAB" clef
clefGlyph = #"clefs.tab"
clefPosition = #0
handleNegativeFrets = #'recalculate
%% Allow open strings even if minimumFret is set
restrainOpenStrings = ##f
+
+ %% 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.beam-thickness = #0.32
+ \override Beam.length-fraction = #0.62
+ %% the same goes for tremolo beams
+ \override StemTremolo.beam-thickness = #0.32
+ %% NOTE: in lily/stem-tremolo.cc, we have length-fraction = 1,
+ %% and the tablature staff space is scaled (1.5 by default),
+ %% so we use the inversion of the scale factor:
+ \override StemTremolo.length-fraction = #(lambda (grob)
+ (/ 1 (ly:staff-symbol-staff-space grob)))
+ \override StemTremolo.beam-width = #stem-tremolo::calc-tab-width
+
+ %% make the Stems as short as possible to minimize their influence
+ %% on the slur::calc-control-points routine
+ \override Stem.no-stem-extend = ##t
+ \override 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.stencil = ##f
+ \override Flag.stencil = ##f
+ %% automatic beams should be suppressed for similar reasons ...
+ autoBeaming = ##f
+ %% remove beams, dots and rests ...
+ \override Beam.stencil = ##f
+ \override StemTremolo.stencil = ##f
+ \override Dots.stencil = ##f
+ \override Rest.stencil = ##f
+ \override MultiMeasureRest.stencil = ##f
+ \override MultiMeasureRestNumber.stencil = ##f
+ \override MultiMeasureRestText.stencil = ##f
+ %% ... 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.stencil = ##f
+ \override DynamicTextSpanner.stencil = ##f
+ \override TextSpanner.stencil = ##f
+ \override Hairpin.stencil = ##f
+ \override Script.stencil = ##f
+ \override TextScript.stencil = ##f
+ \override Glissando.stencil = #glissando::draw-tab-glissando
+ %% 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))
+ %% dead notes
+ \override TabNoteHead.glyph-name = #tab-note-head::calc-glyph-name
+ \override TabNoteHead.stencil = #tab-note-head::whiteout-if-style-set
}
\context {
\consists "Episema_engraver"
%% Set default head for notes outside of \[ \].
- \override NoteHead #'style = #'vaticana.punctum
+ \override NoteHead.style = #'vaticana.punctum
%% Put some space before and after divisiones.
%% FIXME: This does not seem to show any effect.
- \override Script #'padding = #0.5
+ \override Script.padding = #0.5
%% There are no beams in Gregorian Chant notation.
autoBeaming = ##f
%% We can not remove Bar_engraver; otherwise clefs and custodes will
%% not show up any more among other line breaking issues.
%% Instead, we make the grob transparent.
- \override BarLine #'transparent = ##t
+ \override BarLine.transparent = ##t
- \override StaffSymbol #'line-count = #4
- \override StaffSymbol #'thickness = #0.6
+ \override StaffSymbol.line-count = #4
+ \override StaffSymbol.thickness = #0.6
%% FIXME: unit on StaffSymbol's width should be \linewidth.
- %% \override StaffSymbol #'width = #60.0
+ %% \override StaffSymbol.width = #60.0
%% Choose vaticana do clef on 3rd line as default.
clefGlyph = #"clefs.vaticana.do"
middleCPosition = #1
middleCClefPosition = #1
clefPosition = #1
- clefOctavation = #0
+ clefTransposition = #0
%% Select vaticana style font.
- \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
- \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
- \override Custos #'style = #'vaticana
- \override Custos #'neutral-position = #3
- \override Custos #'neutral-direction = #DOWN
- \override Dots #'style = #'vaticana
+ \override KeySignature.glyph-name-alist = #alteration-vaticana-glyph-name-alist
+ \override Accidental.glyph-name-alist = #alteration-vaticana-glyph-name-alist
+ \override Custos.style = #'vaticana
+ \override Custos.neutral-position = #3
+ \override Custos.neutral-direction = #DOWN
+ \override Dots.style = #'vaticana
}
\context {
%% other ligature engraver would cause a "Junking event: `LigatureEvent'"
%% warning for every "\[" and "\]". Therefore, we make the grob
%% transparent instead.
- \override LigatureBracket #'transparent = ##t
+ \override LigatureBracket.transparent = ##t
%% Put some space before and after divisiones.
%% FIXME: This does not seem to show any effect.
- \override Script #'padding = #0.5
+ \override Script.padding = #0.5
%% There are no beams in Gregorian Chant notation.
autoBeaming = ##f
-
}
\context {
%% We can not remove Bar_engraver; otherwise clefs and custodes will
%% not show up any more among other line breaking issues.
%% Instead, we make the grob transparent.
- \override BarLine #'transparent = ##t
+ \override BarLine.transparent = ##t
}
\context {
\consists "Mensural_ligature_engraver"
%% Set default head for notes outside of \[ \].
- \override NoteHead #'style = #'mensural
- \override Rest #'style = #'mensural
- \override Flag #'style = #'mensural
+ \override NoteHead.style = #'mensural
+ \override Rest.style = #'mensural
+ \override Flag.style = #'mensural
%% There are no beams in mensural notation.
autoBeaming = ##f
%% We can not remove Bar_engraver; otherwise clefs and custodes will
%% not show up any more among other line breaking issues.
%% Instead, we make the grob transparent.
- \override BarLine #'transparent = ##t
+ \override BarLine.transparent = ##t
- \override StaffSymbol #'thickness = #0.6
+ \override StaffSymbol.thickness = #0.6
%% FIXME: unit on StaffSymbol's width should be \linewidth.
- %% \override StaffSymbol #'width = #60.0
+ %% \override StaffSymbol.width = #60.0
%% Choose mensural g clef on 2nd line as default.
clefGlyph = #"clefs.mensural.g"
middleCClefPosition = #-6
middleCPosition = #-6
clefPosition = #-2
- clefOctavation = #0
+ clefTransposition = #0
%% Select mensural style font.
- \override TimeSignature #'style = #'mensural
- \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
- \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
- \override Custos #'style = #'mensural
- \override Custos #'neutral-position = #3
- \override Custos #'neutral-direction = #DOWN
+ \override TimeSignature.style = #'mensural
+ \override KeySignature.glyph-name-alist = #alteration-mensural-glyph-name-alist
+ \override Accidental.glyph-name-alist = #alteration-mensural-glyph-name-alist
+ \override Custos.style = #'mensural
+ \override Custos.neutral-position = #3
+ \override Custos.neutral-direction = #DOWN
%% Accidentals are valid only once (same as
- %% \accidentalStyle "forget")
+ %% \accidentalStyle forget)
extraNatural = ##f
autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
autoCautionaries = #'()
\consists "Mensural_ligature_engraver"
%% Set glyph styles.
- \override NoteHead #'style = #'petrucci
- \override Rest #'style = #'mensural
+ \override NoteHead.style = #'petrucci
+ \override Rest.style = #'mensural
- % Thickens and shortens stems.
- \override Stem #'thickness = #1.7
- \override Stem #'length = #5
+ %% Thickens and shortens stems.
+ \override Stem.thickness = #1.7
+ \override Stem.length = #5
%% There are no beams in Petrucci notation.
autoBeaming = ##f
\consists "Custos_engraver"
- \override StaffSymbol #'thickness = #1.3
+ \override StaffSymbol.thickness = #1.3
%% Choose Petrucci g clef on 2nd line as default.
clefGlyph = #"clefs.petrucci.g"
middleCClefPosition = #-6
middleCPosition = #-6
clefPosition = #-2
- clefOctavation = #0
+ clefTransposition = #0
- \override Custos #'style = #'mensural
- \override Custos #'neutral-position = #3
- \override Custos #'neutral-direction = #DOWN
+ \override Custos.style = #'mensural
+ \override Custos.neutral-position = #3
+ \override Custos.neutral-direction = #DOWN
%% Accidentals are valid only once (if the following note is different)
extraNatural = ##f
}
\context {
- \Voice
- \name "KievanVoice"
- \alias "Voice"
- \description "Same as @code{Voice} context, except that it is
+ \Voice
+ \name "KievanVoice"
+ \alias "Voice"
+ \description "Same as @code{Voice} context, except that it is
accommodated for typesetting a piece in Kievan style."
- %% Set glyph styles.
- \override NoteHead #'style = #'kievan
- \override Rest #'style = #'mensural
- \override Accidental #'glyph-name-alist = #alteration-kievan-glyph-name-alist
- \override Dots #'style = #'kievan
- \override Slur #'stencil = ##f
+ \remove "Ligature_bracket_engraver"
+ \consists "Kievan_ligature_engraver"
- %% There are beams in Kievan notation, but they are invoked manually
- autoBeaming = ##f
+ %% Set glyph styles.
+ \override NoteHead.style = #'kievan
+ \override Stem.X-offset = #stem::kievan-offset-callback
+ \override Stem.stencil = ##f
+ \override Flag.stencil = ##f
+ \override Rest.style = #'mensural
+ \override Accidental.glyph-name-alist = #alteration-kievan-glyph-name-alist
+ \override Dots.style = #'kievan
+ \override Slur.stencil = ##f
+ \override Stem.length = #0.0
+ \override Beam.positions = #beam::get-kievan-positions
+ \override Beam.quantized-positions = #beam::get-kievan-quantized-positions
+ \override NoteHead.duration-log = #note-head::calc-kievan-duration-log
+
+ %% There are beams in Kievan notation, but they are invoked manually
+ autoBeaming = ##f
}
\context {
- \Staff
- \name "KievanStaff"
- \alias "Staff"
- \denies "Voice"
- \defaultchild "KievanVoice"
- \accepts "KievanVoice"
- \description "Same as @code{Staff} context, except that it is
+ \Staff
+ \name "KievanStaff"
+ \alias "Staff"
+ \denies "Voice"
+ \defaultchild "KievanVoice"
+ \accepts "KievanVoice"
+ \description "Same as @code{Staff} context, except that it is
accommodated for typesetting a piece in Kievan style."
- \remove "Time_signature_engraver"
-
- %% Choose Kievan tsefaut clef
- clefGlyph = #"clefs.kievan.do"
- middleCClefPosition = #0
- middleCPosition = #0
- clefPosition = #0
- clefOctavation = #0
-
- %% Accidentals are valid only once (if the following note is different)
- extraNatural = ##f
- autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
- ,neo-modern-accidental-rule)
- autoCautionaries = #'()
- printKeyCancellation = ##f
+ \remove "Time_signature_engraver"
+
+ %% Choose Kievan tsefaut clef
+ clefGlyph = #"clefs.kievan.do"
+ middleCClefPosition = #0
+ middleCPosition = #0
+ clefPosition = #0
+ clefTransposition = #0
+
+ %% Accidentals are valid only once (if the following note is different)
+ extraNatural = ##f
+ autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave 0)
+ ,neo-modern-accidental-rule)
+ autoCautionaries = #'()
+ printKeyCancellation = ##f
}
projects / lilypond.git / blobdiff