-\version "2.12.0"
+%%%% This file is part of LilyPond, the GNU music typesetter.
+%%%%
+%%%% Copyright (C) 1996--2011 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.14.0"
\context {
\name "Global"
\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 "Output_property_engraver"
+ \consists "Hara_kiri_engraver"
\consists "Separating_line_group_engraver"
\consists "Font_size_engraver"
\consists "Instrument_name_engraver"
- predefinedDiagramTable = #fretboard-table
+ %% explicitly set instrument, so it is not inherited from the parent
+ instrumentName = #'()
+ shortInstrumentName = #'()
+
+ predefinedDiagramTable = #default-fret-table
+ handleNegativeFrets = #'recalculate
}
\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 "Beam_collision_engraver"
\consists "Grob_pq_engraver"
\consists "Rest_collision_engraver"
\consists "Accidental_engraver"
\consists "Piano_pedal_engraver"
\consists "Piano_pedal_align_engraver"
\consists "Instrument_name_engraver"
- \consists "String_number_engraver"
\consists "Axis_group_engraver"
\consists "Figured_bass_engraver"
\consists "Figured_bass_position_engraver"
\consists "Script_row_engraver"
+ \consists "Cue_clef_engraver"
localKeySignature = #'()
createSpacing = ##t
- ignoreFiguredBassRest = ##t
- \override VerticalAxisGroup #'minimum-Y-extent = #'(-4 . 4)
-
- %% explicitly set instrument, so we don't get
+ ignoreFiguredBassRest = ##f
+
+ %% 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 "Instrument_name_engraver"
\consists "System_start_delimiter_engraver"
systemStartDelimiter = #'SystemStartBracket
+ %% explicitly set instrument, so it is not inherited from the parent
+ instrumentName = #'()
+ shortInstrumentName = #'()
vocalName = #'()
shortVocalName = #'()
\accepts "PianoStaff"
\accepts "Lyrics"
\accepts "ChordNames"
+ \accepts "FiguredBass"
\accepts "ChoirStaff"
\accepts "StaffGroup"
\defaultchild "Staff"
\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 BarLine #'bar-extent = #'(-2 . 2)
\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"
+
+ %% explicitly set instrument, so it is not inherited from the parent
+ instrumentName = #'()
+ shortInstrumentName = #'()
+
\accepts "Voice"
\accepts "CueVoice"
\defaultchild "Voice"
You have to instantiate this explicitly if you want to have
multiple voices on the same staff."
- localKeySignature = #'()
\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"
-
+ \consists "Footnote_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 "Double_percent_repeat_engraver"
\consists "Percent_repeat_engraver"
\consists "Slash_repeat_engraver"
\consists "Part_combine_engraver"
\consists "Tuplet_engraver"
\consists "Grace_engraver"
\consists "Instrument_switch_engraver"
- \consists "Skip_event_swallow_translator"
}
\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 {
\remove "Fingering_engraver"
\remove "Cluster_spanner_engraver"
-
- \consists "Skip_event_swallow_translator"
}
\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."
+ \consists "Instrument_name_engraver"
\consists "Span_bar_engraver"
\consists "Span_arpeggio_engraver"
\consists "System_start_delimiter_engraver"
+ \consists "Vertical_align_engraver"
systemStartDelimiter = #'SystemStartBrace
+ topLevelAlignment = ##f
+ %% explicitly set instrument, so it is not inherited from the parent
+ instrumentName = #'()
+ shortInstrumentName = #'()
\defaultchild "Staff"
\accepts "Staff"
+ \accepts "RhythmicStaff"
+ \accepts "DrumStaff"
+ \accepts "TabStaff"
+ \accepts "Lyrics"
\accepts "FiguredBass"
+ \accepts "Dynamics"
+ \accepts "ChordNames"
}
\context{
\name "PianoStaff"
\alias "GrandStaff"
- \description "Just like @code{GrandStaff} but with support for
-instrument names at the start of each system."
+ \description "Just like @code{GrandStaff}, but the staves are only removed
+together, never separately."
+
+ \consists "Vertical_align_engraver"
+ \consists "Keep_alive_together_engraver"
+ topLevelAlignment = ##f
- \consists "Instrument_name_engraver"
-
instrumentName = #'()
shortInstrumentName = #'()
}
\type "Engraver_group"
\name "StaffGroup"
+ \consists "Vertical_align_engraver"
+ topLevelAlignment = ##f
+
+ \consists "Instrument_name_engraver"
\consists "Span_bar_engraver"
\consists "Span_arpeggio_engraver"
- \consists "Output_property_engraver"
+ \consists "Output_property_engraver"
systemStartDelimiter = #'SystemStartBracket
+ %% explicitly set instrument, so it is not inherited from the parent
+ instrumentName = #'()
+ shortInstrumentName = #'()
\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 "Text_spanner_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 =
+ #'((basic-distance . 5)
+ (padding . 0.5))
+ \override TextScript #'font-shape = #'italic
+ \override DynamicLineSpanner #'Y-offset = #0
+
+ \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"
\consists "Stanza_number_engraver"
\consists "Instrument_name_engraver"
- \consists "Skip_event_swallow_translator"
\consists "Font_size_engraver"
\consists "Hara_kiri_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 #'keep-fixed-while-stretching = ##t
- \override SeparationItem #'padding = #0.2
+ \override VerticalAxisGroup #'staff-affinity = #UP
+ \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
+ #'((basic-distance . 5.5)
+ (padding . 0.5)
+ (stretchability . 1))
+ \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
%% sync with define-grobs.scm ;
%% make sure that barlines aren't collapsed, when
%% Bar_engraver is there.
- \override BarLine #'bar-size = #0.1
-
+ \override BarLine #'bar-extent = #'(-0.05 . 0.05)
+
}
\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
+ \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 =
+ #'((basic-distance . 5.5)
+ (padding . 0.5)
+ (stretchability . 1))
+ \override VerticalAxisGroup
+ #'nonstaff-unrelatedstaff-spacing #'padding = 1.5
-
- \consists "Rest_swallow_translator"
- \consists "Skip_event_swallow_translator"
\consists "Tie_engraver"
\consists "Note_name_engraver"
\consists "Separating_line_group_engraver"
\type "Engraver_group"
\name ChordNames
\description "Typesets chord names."
-
- \consists "Rest_swallow_translator"
- \consists "Output_property_engraver"
+
+ \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 #'nonstaff-relatedstaff-spacing #'padding = #0.5
+ \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'padding = #0.5
}
-RemoveEmptyStaffContext= \context {
- \Staff
+RemoveEmptyStaves = \with {
\remove "Axis_group_engraver"
+ % If RemoveEmptyStaves is called twice, two
+ % Hara_kiri_engravers would be added, which leads to a
+ % warning.
+ % This code makes sure that no previous Hara_kiri_engraver
+ % is left before adding a new one.
+ \remove "Hara_kiri_engraver"
\consists "Hara_kiri_engraver"
- \override Beam #'auto-knee-gap = #'()
\override VerticalAxisGroup #'remove-empty = ##t
}
-AncientRemoveEmptyStaffContext = \context {
-%% why not add by default?
-
- \RemoveEmptyStaffContext
- \accepts "VaticanaVoice"
- \accepts "GregorianTranscriptionVoice"
- \accepts "MensuralVoice"
-}
\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
@code{\layout} block) is processed."
\consists "Paper_column_engraver"
- \consists "Vertically_spaced_contexts_engraver"
\consists "Repeat_acknowledge_engraver"
\consists "Staff_collecting_engraver"
\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"
noteToFretFunction = #determine-frets
+ predefinedDiagramTable = ##f
soloText = #"Solo"
soloIIText = #"Solo II"
aDueText = #"a2"
printPartCombineTexts = ##t
+ partCombineTextsOnNote = ##t
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
+ explicitCueClefVisibility = #end-of-line-invisible
explicitKeySignatureVisibility = #all-visible
implicitTimeSignatureVisibility = #end-of-line-invisible
-
+
repeatCountVisibility = #all-repeat-counts-visible
-
- autoBeamSettings = #default-auto-beam-settings
+
+ 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)))))
autoBeaming = ##t
autoBeamCheck = #default-auto-beam-check
+
scriptDefinitions = #default-script-alist
pedalSustainStrings = #'("Ped." "*Ped." "*")
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 = #`(
(6 . ,FLAT) (2 . ,FLAT) (5 . ,FLAT ) (1 . ,FLAT) (4 . ,FLAT) (0 . ,FLAT) (3 . ,FLAT)
(3 . ,SHARP) (0 . ,SHARP) (4 . ,SHARP) (1 . ,SHARP) (5 . ,SHARP) (2 . ,SHARP) (6 . ,SHARP)
(6 . ,DOUBLE-FLAT) (2 . ,DOUBLE-FLAT) (5 . ,DOUBLE-FLAT ) (1 . ,DOUBLE-FLAT) (4 . ,DOUBLE-FLAT) (0 . ,DOUBLE-FLAT) (3 . ,DOUBLE-FLAT)
- (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
+ (3 . ,DOUBLE-SHARP) (0 . ,DOUBLE-SHARP) (4 . ,DOUBLE-SHARP) (1 . ,DOUBLE-SHARP) (5 . ,DOUBLE-SHARP) (2 . ,DOUBLE-SHARP) (6 . ,DOUBLE-SHARP)
)
barCheckSynchronize = ##f
-
+
%% chord names:
chordNameFunction = #ignatzek-chord-names
majorSevenSymbol = #whiteTriangleMarkup
+ chordNameLowercaseMinor = ##f
chordNameSeparator = #(make-simple-markup "/")
chordNameExceptions = #ignatzekExceptions
chordNoteNamer = #'()
chordPrefixSpacer = #0
chordNameExceptionsFull = #fullJazzExceptions
chordNameExceptionsPartial = #partialJazzExceptions
-
+ noChordSymbol = #(make-simple-markup "N.C.")
bassStaffProperties = #'((assign clefGlyph "clefs.F")
(assign clefPosition 2)
stringOneTopmost = ##t
highStringOne = ##t
-%% One may change the strings tuning as following :
-%% The lenght of the list must be equal to the number of string
+%% 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
(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 = #'(
- rhythmic-grob-interface
+ bass-figure-interface
+ chord-name-interface
+ cluster-beacon-interface
+ fret-diagram-interface
+ lyric-syllable-interface
+ note-head-interface
+ tab-note-head-interface
lyric-interface
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 = #'(
+ % \quoteDuring is supposed to quote everything, cueDuring only the essentials
+ quotedEventTypes = #'(StreamEvent)
+ quotedCueEventTypes = #'(
note-event
rest-event
tie-event
tuplet-span-event)
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"
- \consists "Skip_event_swallow_translator"
\consists "Separating_line_group_engraver"
\consists "Hara_kiri_engraver"
\override VerticalAxisGroup #'remove-empty = ##t
\override VerticalAxisGroup #'remove-first = ##t
- \override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 2)
+ \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"
- \consists "Swallow_engraver"
\description "Silently discards all musical information given to this
context."
}
\name "TabVoice"
\alias "Voice"
\consists "Tab_note_heads_engraver"
- \consists "Tab_harmonic_engraver"
-
+ \consists "Tab_tie_follow_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
+ %% 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
-
- \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 StemTremolo #'stencil = ##f
+ \override Dots #'stencil = ##f
+ \override Rest #'stencil = ##f
+ \override MultiMeasureRest #'stencil = ##f
+ \override MultiMeasureRestNumber #'transparent = ##t
+ \override MultiMeasureRestText #'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
+ \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))
- \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
+ %% 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
+ %% Change string if note results in negative fret number
+ handleNegativeFrets = #'recalculate
}
-%% 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"
\remove "Stem_engraver"
\remove "Ligature_bracket_engraver"
\consists "Vaticana_ligature_engraver"
+ \remove "Text_spanner_engraver"
+ \consists "Episema_engraver"
%% Set default head for notes outside of \[ \].
\override NoteHead #'style = #'vaticana.punctum
%% There are no beams in Gregorian Chant notation.
autoBeaming = ##f
-
- %% Prepare TextSpanner for \episem{Initium|Finis} use.
- %%
- %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
- %% required to force the articulation signs being placed vertically
- %% tightly to the correpsonding note heads.
- %%
- \override TextSpanner #'style = #'line
- \override TextSpanner #'padding = #-0.1
}
\context {
\Voice
\name "GregorianTranscriptionVoice"
\alias "Voice"
+ \consists "Episema_engraver"
%% Removing ligature bracket engraver without replacing it by some
%% other ligature engraver would cause a "Junking event: `LigatureEvent'"
%% There are no beams in Gregorian Chant notation.
autoBeaming = ##f
- %% Prepare TextSpanner for \episem{Initium|Finis} use.
- %%
- %% N.B.: dash-fraction MUST be unset; otherwise, TextSpanner will
- %% always produce dashed lines, regardless of the style property.
- %%
- %% FIXME: The line @code{\override TextSpanner #'padding = #-0.1} is
- %% required to force the articulation signs being placed vertically
- %% tightly to the correpsonding note heads.
- %%
- \override TextSpanner #'dash-fraction = #'()
- \override TextSpanner #'style = #'line
- \override TextSpanner #'padding = #-0.1
}
\context {
}
-RemoveEmptyRhythmicStaffContext= \context {
+%% Keep the old definitions in here for compatibility (they erase previous
+%% settings to the corresponding context!).
+%% For new scores, one should simply insert the \RemoveEmptyStaves settings
+%% into the desired context. That's just as easy, requires only one line more
+%% (the \*Staff), but preserves previous context mods.
+%% TODO: DEPRECATED_2.13.17, remove at some point in the future
+RemoveEmptyStaffContext = \context {
+ \Staff
+ \RemoveEmptyStaves
+}
+
+AncientRemoveEmptyStaffContext = \context {
+ \VaticanaStaff
+ \RemoveEmptyStaves
+}
+
+RemoveEmptyDrumStaffContext = \context {
+ \DrumStaff
+ \RemoveEmptyStaves
+}
+
+RemoveEmptyRhythmicStaffContext = \context {
\RhythmicStaff
- \remove "Axis_group_engraver"
- \override VerticalAxisGroup #'remove-empty = ##t
- \consists "Hara_kiri_engraver"
+ \RemoveEmptyStaves
+}
+
+RemoveEmptyTabStaffContext = \context {
+ \TabStaff
+ \RemoveEmptyStaves
}
projects / lilypond.git / blobdiff