X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Ffret-diagram.ly;h=6935693edf4dec4a5f9c1fc6b7e5c350d5a29d19;hb=169a91c8514e3dcea29d1aa01653a684fb60457d;hp=630fcc7f80f586769676c84453c84bafbd16e097;hpb=06b1da466f99f6c4a01ee6a3e611d25bd5359d4c;p=lilypond.git diff --git a/input/test/fret-diagram.ly b/input/test/fret-diagram.ly index 630fcc7f80..6935693edf 100644 --- a/input/test/fret-diagram.ly +++ b/input/test/fret-diagram.ly @@ -3,25 +3,25 @@ texidoc = "Frets are supported as markup commands." } -\version "2.3.17" +\version "2.10.0" \score { << - \chords {d2. d d s fis fis fis s c c c} + \chords {d2 d d s fis fis fis s c c c} - \context Voice=mel { + \new Voice = "mel" { % simple D chord - d'2. ^\markup \fret-diagram-verbose #'((mute 6) (mute 5) (open 4) (place-fret 3 2) (place-fret 2 3) (place-fret 1 2)) + d'2 ^\markup \fret-diagram-verbose #'((mute 6) (mute 5) (open 4) (place-fret 3 2) (place-fret 2 3) (place-fret 1 2)) d' ^\markup \fret-diagram #"6-x;5-x;4-o;3-2;2-3;1-2;" d' ^\markup \fret-diagram-terse #"x;x;o;2;3;2;" - r + r \break % fis major chord, 3/4 size, fingering labeled below string fis' ^\markup \override #'(size . 0.75) {\override #'(finger-code . below-string){\fret-diagram-verbose #'((place-fret 6 2 1) (barre 6 1 2) (place-fret 5 4 3) (place-fret 4 4 4) (place-fret 3 3 2) (place-fret 2 2 1) (place-fret 1 2 1))}} fis' ^\markup \override #'(finger-code . below-string) {\fret-diagram #"s:0.75;c:6-1-2;6-2-1;5-4-3;4-4-4;3-3-2;2-2-1;1-2-1;"} fis' ^\markup \override #'(size . 0.75) {\override #'(finger-code . below-string){\fret-diagram-terse #"2-1-(;4-3;4-4;3-2;2-1;2-1-);"}} - r + r \break % c major barre chord, fingering labeled on frets c' ^\markup \override #'(dot-color . white) { @@ -32,7 +32,7 @@ \override #'(finger-code . in-dot) { \override #'(dot-color . white) { \fret-diagram-terse #"x;3-1-(;5-2;5-3;5-4;3-1-);"}}} - r + r \break % c major scale using open strings c' ^\markup \fret-diagram-verbose #'((mute 6) (place-fret 5 3) (open 4) (place-fret 4 2) (place-fret 4 3) (open 3) (place-fret 3 2) (open 2) (place-fret 2 1) (mute 1)) @@ -43,10 +43,11 @@ c' ^\markup \fret-diagram-verbose #'((mute 6) (place-fret 5 3) (place-fret 5 5) (place-fret 4 2) (place-fret 4 3) (place-fret 4 5) (place-fret 3 2) (place-fret 3 4) (place-fret 3 5) (mute 2) (mute 1)) c' ^\markup \fret-diagram #'"6-x;5-3;5-5;4-2;4-3;4-5;3-2;3-4;3-5;2-x;1-x;" c' ^\markup \fret-diagram-terse #'"x;3 5;2 3 5;2 4 5;x;x;" + \break % g major scale, no open strings, two octaves on six strings, white dots g' ^\markup \override #'(dot-color . white) {\fret-diagram-terse #'"3 5;2 3 5;2 4 5;2 4 5;3 5;2 3;" } - } + r r r} >> - \paper{ raggedright = ##t } + \layout{ ragged-right = ##f } }