Re: Need help before I can ask the right question...

[Hugh Myers]

Here is what I've pieced together thus far:

%%%%%%%%%%
%%
%% s1.ly -- first scale from Diatonic Major and Minor Scales by Andres Segovia
%%
%%%%%%%%%%
\version "2.13.7"
\header {
  title = "Diatonic Major and Minor Scales"
  subtitle = "Scale 1"
  composer = "Andres Segovia"
  meter = "Practice each scale apoyando"
  piece = "seven times as indicated below"
}
\layout {
  \context {
    \Staff
    \remove "Time_signature_engraver"
  }
}
theScale = {
  c4-2 d-4 e-1 f-2
  g-4 a-1 b-3 c-1
  d-3 e-1 f-2 g-4
  a-1 b-3 c-4 b-3
  a-1 g-4 f-2 e-1
  d-1 c-3 b-1 a-3
  g-4 f-2 e-1 d-4
  c-2
  \bar ":|"
}
{
  \set Score.defaultBarType = ""
  <<
    \new StaffGroup
    <<
      \new Staff \relative c' {
        \theScale
      }
      \new TabStaff \relative c {
        \theScale
      }
    >>
  >>
}

This leaves only the information beneath the notes left out. I believe
the numbers shown above the notes represent fingering (although I'm
hardly sure[it at least matches the original].) The numbers and
spanning lines under the notes can't of course be fingering since that
would be impossible. Also before I forget, this is a practice exercise
for guitar...

On Sun, Dec 20, 2009 at 3:07 AM, Nick Payne <address@hidden> wrote:
> On 20/12/09 12:17, Hugh Myers wrote:
>>
>> In Segovia's 'Diatonic Major and Minor Scales', under the notes shown
>> for a given scale are marks beginning with a number surrounded by
>> parenthesis followed by a line vaguely parallel to the notes,
>> concluding with an uptick between a given pair of notes. What is this
>> called and how might I duplicate it in Lilypond?
>>
>
> You mean something like this?
>
> %%============================================
> \version "2.13.9"
>
> \paper {
>    #(set-paper-size "a4")
>    indent = 0\cm
> }
>
> string = #(define-music-function (parser location stringnum osp dirn shorten
> adjBreak adjEnd)
>    (string? number? number? pair? number? number?)
> #{
>    \once \override TextSpanner #'outside-staff-priority = #$osp
>    \once \override TextSpanner #'bound-details #'left #'text = \markup \bold
> { \teeny \concat { \circle { \finger $stringnum } " " } }
>    \once \override TextSpanner #'font-shape = #'upright
>    \once \override TextSpanner #'direction = #$dirn
>    \once \override TextSpanner #'dash-period = #0.8
>    \once \override TextSpanner #'dash-fraction = #0.6
>    \once \override TextSpanner #'thickness = #0.8
>    \once \override TextSpanner #'bound-details #'right #'text = \markup {
> \draw-line #(cons 0 (/ $dirn -2)) }
>    \once \override TextSpanner #'bound-details #'left #'stencil-align-dir-y
> = #CENTER
>    \once \override TextSpanner #'bound-details #'left #'padding = #(car
> $shorten)
>    \once \override TextSpanner #'bound-details #'right #'padding = #(cdr
> $shorten)
>    \once \override TextSpanner #'bound-details #'right-broken #'padding =
> #$adjEnd
>    \once \override TextSpanner #'bound-details #'left-broken #'X =
> #$adjBreak
>    \once \override TextSpanner #'bound-details #'left-broken #'text = ##f
>    \once \override TextSpanner #'bound-details #'right-broken #'text = ##f
> #})
>
> \score {
>    \relative c {
>        \clef "treble_8"
>        \override Fingering #'staff-padding = #'()
>        \set fingeringOrientations = #'(left)
>        \override Fingering #'add-stem-support = ##f
>        \string "6" #0 #UP #'(0 . -1) #1 #1 <f,-1>\startTextSpan <fis-2>
> <g-3> <gis-4>\stopTextSpan
>        \string "5" #0 #UP #'(0 . -1) #1 #1 <b-1>\startTextSpan <c-2> <cis-3>
> <d-4>\stopTextSpan
>        \string "4" #0 #UP #'(0 . -1) #1 #1 <f-1>\startTextSpan <fis-2> <g-3>
> <gis-4>\stopTextSpan
>        \string "3" #0 #DOWN #'(0 . -0.5) #1 #1 <b-1>\startTextSpan <c-2>
> <cis-3> <d-4>\stopTextSpan
>        \string "2" #0 #DOWN #'(0 . -0.5) #1 #1 <e-1>\startTextSpan <f-2>
> <fis-3> <g-4>\stopTextSpan
>        \string "1" #0 #DOWN #'(0 . -0.5) #1 #1 <b-1>\startTextSpan <c-2>
> <cis-3> <d-4> <c-1> <cis-2> <d-3> <dis-4>\stopTextSpan
>        \string "2" #0 #DOWN #'(0 . -0.5) #1 #1 <f,-1>\startTextSpan <fis-2>
> <g-3> <gis-4>\stopTextSpan
>        \string "3" #0 #DOWN #'(0 . -0.5) #1 #1 <c,-1>\startTextSpan <cis-2>
> <d-3> <dis-4>\stopTextSpan
>        \string "4" #0 #UP #'(0 . -1) #1 #1 <fis,-1>\startTextSpan <g-2>
> <gis-3> <a-4>\stopTextSpan
>        \string "5" #0 #UP #'(0 . -1) #1 #1 <c,-1>\startTextSpan <cis-2>
> <d-3> <dis-4>\stopTextSpan
>        \string "6" #0 #UP #'(0 . -1) #1 #1 <fis,-1>\startTextSpan <g-2>
> <gis-3> <a-4> <g-1> <gis-2> <a-3> <ais-4>\stopTextSpan
>        \string "5" #0 #UP #'(0 . -1) #1 #1 <cis-1>\startTextSpan <d-2>
> <dis-3> <e-4>\stopTextSpan_\markup\italic { etc. }
>    }
>    \layout {
>        \context {
>            \Staff
>                \remove "Bar_engraver"
>                \remove "Time_signature_engraver"
>        }
>    }
> }
> %%============================================
>
>
>
> _______________________________________________
> lilypond-user mailing list
> address@hidden
> http://lists.gnu.org/mailman/listinfo/lilypond-user
>
>