Re: Tablature (Pedal Steel again) - Change lines

[Pierre Perol-Schneider]

2015-01-13 22:23 GMT+01:00 address@hidden <address@hidden>:

 

Since you are using the same notes for the normal Staff and the TabStaff the normal Staff will show the wrong notes. This since the pedals changes the string tuning
A raises the 5 string 1 tone, 8=g', 8A=a', and F raises string 4 ½ a tone, c'' = cis''

But of course! Sorry for that.
 

If you can figure out someway to make this automagically then... !!!!!

 

Hum, not easy to automate it but you can use tags : http://lilypond.org/doc/v2.19/Documentation/notation/different-editions-from-one-source.html#using-tags

So here you go:

\version "2.19.11"

pedF = \rightHandFinger \markup\normal-text\bold\fontsize #0 "F"
pedA = \rightHandFinger \markup\normal-text\bold\fontsize #0 "A"

\header {
  title="Pedal Steel Guitar - E9th"
}

PSGE-tuning = \stringTuning <
  c,,,% this tune's only to show one more string
  b, d e fis gis b e' gis' dis' fis'>
 

myNotes = \transpose c c' {
  %%\set TabStaff.minimumFret = #8
  \set TabStaff.restrainOpenStrings = ##t
  \tag myStaff { <e a cis'>2 }
  \tag myTab { <e\6 g\5\pedA c'\4\pedF >2 }
  e'4\4
  \repeat unfold 4 s2.
  \break
  \repeat unfold 5 s2.
  \bar "|."
}

\score {
  \new StaffGroup <<
    \new Staff
    \keepWithTag myStaff
      { \clef "G" \key a \major \time 3/4 \myNotes }
    \new TabStaff
      \keepWithTag myTab
      \myNotes
  >>
  \layout {
    \context {
      \Score
      \remove "System_start_delimiter_engraver"
    }
    \context {
      \StaffGroup
      \override SystemStartBracket.style = #'none
    }
    \context {
      \Staff
      \omit StringNumber
    }
    \context {
      \TabStaff
      stringTunings = \PSGE-tuning
      \override  Clef.stencil = #(lambda (grob)
         (grob-interpret-markup grob
           #{
             \markup
             \override #'(baseline-skip . 1.5)
             \concat {
               \hspace #-.8
               \with-dimensions #'(0 . 0) #'(0 . 0)
               \lower #7.5 \draw-line #'(0 . 15)
               \hspace #1
               \raise #6.2 \center-column \fontsize #-3  { 1 2 3 4 5 6 7 8 9 10 }
               \hspace #1
               \with-dimensions #'(0 . 0) #'(0 . 0)
               \lower #7.5 \draw-line #'(0 . 15)
             }
           #}))
    }
    \context {
      \TabVoice
      \override TabNoteHead.extra-offset = #'(0 . -.5)
      \override TabNoteHead.font-size = #-3
      \override TabNoteHead.whiteout = ##f
      \consists New_fingering_engraver
      \override StrokeFinger.side-axis = #0
      \override StrokeFinger.X-offset = #1.1
      \override StrokeFinger.Y-offset = #-.75
      \omit StringNumber
      \omit Fingering
    }
  }
}

Cheers,
Pierre

PS. beware that I missed the StrokeFinger.Y-offset setting in the previous code.