\consists "Font_size_engraver"
\consists "Separating_line_group_engraver"
- \consists "Dot_column_engraver"
\consists "Staff_collecting_engraver"
%% perhaps move to Voice context?
\consists "Breathing_sign_engraver"
\consists "Note_heads_engraver"
\consists "Dots_engraver"
+ \consists "Dot_column_engraver"
\consists "Rest_engraver"
\consists "Tweak_engraver"
\consists "Footnote_engraver"
\accepts "PetrucciStaff"
\accepts "StaffGroup"
\accepts "DrumStaff"
+ \accepts "KievanStaff"
\accepts "Lyrics"
\accepts "ChordNames"
\accepts "GrandStaff"
\accepts "NoteNames"
\accepts "FiguredBass"
-
noteToFretFunction = #determine-frets
predefinedDiagramTable = ##f
soloText = #"Solo"
beatStructure = #'(1 1 1 1)
beamExceptions = #'((end . (((1 . 8) . (4 4))
((1 . 12) . (3 3 3 3)))))
+ beamWholeMeasure = ##t
+ beamHalfMeasure = ##f
+
autoBeaming = ##t
autoBeamCheck = #default-auto-beam-check
\remove "Note_heads_engraver"
\remove "Fingering_engraver"
\remove "New_fingering_engraver"
+ \remove "Pitched_trill_engraver"
\description "Context for drawing notes in a Tab staff."
printKeyCancellation = ##f
}
+\context {
+ \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
+
+ %% There are beams in Kievan notation, but they are invoked manually
+ autoBeaming = ##f
+ \override Beam #'beam-thickness = #0.32
+ \override Beam #'length-fraction = #0.62
+}
+
+\context {
+ \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
+
+}
+
%% 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