Re: fret diagrams for scales and arpeggios - using finger numbers as intervals

[Jay Lee]

Jay Lee <jkllee <at> mac.com> writes:
 
> What I want to do is to change the in-dot finger-code to reflect not
 fingerings,
> but scale intervals in scale and arpeggio diagrams of the entire
 fretboard or
> part of a fretboard.

Here is the complete example:

\version "2.14.0"

#(define-public ukulele-tuning '(9 4 0 7))

\addChordShape  #'MajorTriad
                                #ukulele-tuning
                                #'(
                                (place-fret 4 1 5)
                                (place-fret 4 6 1)
                                (place-fret 4 10 3)
                                (place-fret 4 13 5)
                                (place-fret 3 1 1)
                                (place-fret 3 5 3)
                                (place-fret 3 8 5)
                                (place-fret 3 13 1)
                                (place-fret 2 1 3)
                                (place-fret 2 4 5)
                                (place-fret 2 9 1)
                                (place-fret 2 13 3)
                                (place-fret 2 16 5)
                                (place-fret 1 4 1)
                                (place-fret 1 8 3)
                                (place-fret 1 11 5)
                                (place-fret 1 16 1)
                                )

\storePredefinedDiagram #default-fret-table \chordmode { des'' }
                        #ukulele-tuning
                        #(chord-shape 'MajorTriad ukulele-tuning)

\addChordShape  #'MinorTriad
                                #ukulele-tuning
                                #'(
                                (place-fret 4 1 5)
                                (place-fret 4 6 1)
                                (place-fret 4 9 3)
                                (place-fret 4 13 5)
                                (place-fret 3 1 1)
                                (place-fret 3 4 3)
                                (place-fret 3 8 5)
                                (place-fret 3 13 1)
                                (place-fret 3 16 3)
                                (place-fret 2 4 5)
                                (place-fret 2 9 1)
                                (place-fret 2 12 3)
                                (place-fret 2 16 5)
                                (place-fret 1 4 1)
                                (place-fret 1 7 3)
                                (place-fret 1 11 5)
                                (place-fret 1 16 1)
                                )

\storePredefinedDiagram #default-fret-table \chordmode { des'':m }
                        #ukulele-tuning
                        #(chord-shape 'MinorTriad ukulele-tuning)

\addChordShape  #'DominantSeventh
                                #ukulele-tuning
                                #'(
                                (place-fret 4 1 5)
                                (place-fret 4 4 7)
                                (place-fret 4 6 1)
                                (place-fret 4 10 3)
                                (place-fret 4 13 5)
                                (place-fret 4 16 7)
                                (place-fret 3 1 1)
                                (place-fret 3 5 3)
                                (place-fret 3 8 5)
                                (place-fret 3 11 7)
                                (place-fret 3 13 1)
                                (place-fret 2 1 3)
                                (place-fret 2 4 5)
                                (place-fret 2 7 7)
                                (place-fret 2 9 1)
                                (place-fret 2 13 3)
                                (place-fret 2 16 5)
                                (place-fret 1 2 7)
                                (place-fret 1 4 1)
                                (place-fret 1 8 3)
                                (place-fret 1 11 5)
                                (place-fret 1 14 7)
                                (place-fret 1 16 1)
                                )

\storePredefinedDiagram #default-fret-table \chordmode { des'':7 }
                        #ukulele-tuning
                        #(chord-shape 'DominantSeventh ukulele-tuning)

mychords = \chordmode{
   des'' des'':m des'':7
}

<<
   \context FretBoards {
      \set stringTunings = #ukulele-tuning
         \override FretBoards.FretBoard
            #'size = #'7
         \override FretBoard
            #'(fret-diagram-details finger-code) = #'in-dot
         \override FretBoard
            #'(fret-diagram-details fret-count) = #'15
   \mychords
   }

   \lyrics {
      major minor seventh
   }
>>