input/test/tab-staff.ly

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