jiba tab

[lilypond.git] / ly / engraver-init.ly

diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly
index 4c75541b06319a754c3211dc80486c2ecc640242..aeed2f96e55f6193f06d3d2915ca81e6611a5b55 100644 (file)
--- a/ly/engraver-init.ly
+++ b/ly/engraver-init.ly
@@ -1,4 +1,4 @@
-\version "1.5.33"
+\version "1.5.49"
 
 %
 % setup for Request->Element conversion. Guru-only
@@ -27,7 +27,7 @@ StaffContext=\translator {
        \consists "Staff_symbol_engraver"
        \consists "Collision_engraver"
        \consists "Rest_collision_engraver"
-       \consists "New_accidental_engraver"
+       \consists "Accidental_engraver"
        \consists "Piano_pedal_engraver"
        \consists "Instrument_name_engraver"
        \consists "Grob_pq_engraver"
@@ -223,7 +223,7 @@ InnerStaffGroupContext= \translator {
        \accepts "RhythmicStaff"
        \accepts "GrandStaff"
        \accepts "PianoStaff"
-       
+       \accepts "TabStaff"     
        \accepts "Lyrics"
        \accepts "ChordNames"
 }
@@ -347,6 +347,7 @@ ScoreContext = \translator {
        \consists "Span_arpeggio_engraver"
 
        \accepts "Staff"
+       \accepts "TabStaff"
        \accepts "StaffContainer"
        \accepts "StaffGroup"
        \accepts "RhythmicStaff"        
@@ -442,3 +443,37 @@ FiguredBassContext = \translator {
        \consists "Figured_bass_engraver"       
        \consistsend "Axis_group_engraver"
 }
+
+TabVoiceContext =   \translator {
+      \VoiceContext
+      \name "TabVoice"
+      \denies "Thread"
+      \consists "Tab_note_heads_engraver"
+}
+
+TabStaffContext = \translator {
+      \StaffContext
+      \alias "Staff"
+      \name "TabStaff"
+      \denies "Voice"
+      \accepts "TabVoice"
+      
+      % 6 strings
+      StaffSymbol \override #'line-count  = #6
+      StaffSymbol \override #'staff-space = #1.5
+      
+      % One may change the strings tuning as following :
+      % The lenght of the list must be equal to the number of string
+      %TabNoteHead \override #'string-tunings = #'(10 10 10 10 10 10)
+      
+      % Special "TAB" clef
+      clefGlyph = #"clefs-tab"
+      clefPosition = #0
+      
+      % Don't draw stems over the tabature figures !
+      Stem \override #'avoid-note-head = ##t
+      
+      % No accidental in tablature !
+      Accidental  = \turnOff 
+}
+