input/test/tab-staff.ly

   1 \version "1.5.68"
   2
   3
   4
   5 %{
   6
   7 Kludge for half-assed tab notation (you need to fill the numbers
   8 yourself.)
   9
  10 %}
  11
  12 bla =  \notes \relative c' { <c4 e g>  <c4. e g> <c8 f a> <c4 f a> <c1 e g> }
  13
  14 \score { \notes
  15 <
  16   \context Voice = BLA \bla
  17   \context TabStaff \context Thread \bla
  18 >
  19
  20 \paper {
  21  \translator {
  22   \StaffContext
  23   \name TabStaff
  24   StaffSymbol \override #'line-count = #6
  25   \remove "Clef_engraver"
  26   \remove "Time_signature_engraver"
  27   \consists "Pitch_squash_engraver"
  28    NoteHead \override #'transparent = ##t
  29    Stem \override #'transparent = ##t
  30    NoteHead \override #'staff-position = #-6
  31    Dots \override #'transparent = ##t
  32    squashedPosition = #-4
  33    Stem \override #'length = #12
  34 }
  35 \translator {
  36 \ScoreContext
  37 \accepts TabStaff
  38 }
  39 }
  40 }