% lilypond 1.6.x
\version "1.6.9"
tune = \notes{ \key g \mixolydian   b'4    b'8    b'8    b'4.    b'8    b'2.      b'4    }
words = \lyrics  {
Me me and none but me, dart }
#(define (fret-letter-tablature-format string tuning pitch)
   (make-string 1 (integer->char
    (+ (char->integer #\a)
    (- (pitch-semitones pitch)
       (list-ref tuning (- string 1)))))))
tablature =         \notes {
%
%lutes are tuned g c f a d g
    \property TabStaff.stringTunings =  #'(7 0 -7 -15 -22 -29)
%let's not print the stems here
\property TabStaff.Stem \override #'transparent = ##t
%or the dots
\property TabStaff.Dots \override #'transparent = ##t
%use letters instead of numbers for the fret names
\property TabStaff.tablatureFormat = #fret-letter-tablature-format
% put the letters in the spaces and not on the lines
\property TabStaff.TabNoteHead \override #'extra-offset = #'(0 . .5)
%and only print barlines when they're explicitly specified
\property Score.defaultBarType="empty"
%print an old looking C
    \property TabStaff.TimeSignature \override #'style = #'neo_mensural
%don't squish the time signature against the left edge
    \property TabStaff.TimeSignature \override #'extra-offset = #'(2 . 0)

    <g'4\1 c'4\2 g4\3 b,4\4> <g'8\1 c'8\2 g8\3 b,8\4>  <g'8\1 c'8\2 g8\3 b,8\4>
<g'4.\1 c'4.\2 g4.\3 b,4.\4> <g'8\1 c'8\2 g8\3 b,8\4> <g'2.\1 c'2.\2 g2.\3 b,2.\4> <g'4\1 c'4\2 g4\3 b,4\4> 
\bar "|"         }
tabstems = \notes { 
\property Voice.NoteHead \override #'transparent = ##t
<c16  s4> <c32 s8> s8 <c16. s4.> <c32 s8><c8. s2.> <c16 s4>}


\score { 
  \context StaffGroup <

\addlyrics
\context Staff <\tune>
\context Lyrics <\words>

\context  TabStems="1" <\tabstems>
\context TabStaff< \tablature>

>
	 \paper {
	     \translator {
	\type "Engraver_group_engraver"
	\name TabStems 
	\consists "Output_property_engraver"	
	

	\consists "Font_size_engraver"

%	\consists "Repeat_engraver"
	\consists "Volta_engraver"
	\consists "Separating_line_group_engraver"	
	SeparatingGroupSpanner \override #'spacing-procedure
	  =  #Separating_group_spanner::set_spacing_rods_and_seqs
	\consists "Dot_column_engraver"

	\consists "Collision_engraver"
	\consists "Rest_collision_engraver"
	\consists "Accidental_engraver"
	\consists "Piano_pedal_engraver"
	\consists "Instrument_name_engraver"
	\consists "Grob_pq_engraver"
	\consists "Forbid_line_break_engraver"
	\consists "Pitch_squash_engraver"
	\consistsend "Axis_group_engraver"

	minimumVerticalExtent = #'(-6 . 6)
	extraVerticalExtent = ##f
	verticalExtent = ##f 
	localKeySignature = #'()

	% explicitly set instrument, so we don't get 
	% weird effects when doing instrument names for
	% piano staves

	instrument = ##f
	instr = ##f
	  
	\accepts "Voice"
}
    \translator {
      \ScoreContext
      \accepts TabStems
    }
    \translator {
      \StaffGroupContext
      \accepts TabStems
    }

	     \translator { \TabStaffContext
			   \remove Clef_engraver
			   }
	 }


     }