X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fchords.ly;h=d92f586bd7cc7caf487d28f2e7ef9a0f7a9cc7a0;hb=d765f3af45be51f15da55cf570a4b172200e1035;hp=8fc784cb40520c87bba05d4fb436e17cc6c831d8;hpb=9b40d66187029df3dca86fc5ecc65f64db315a48;p=lilypond.git diff --git a/input/test/chords.ly b/input/test/chords.ly index 8fc784cb40..d92f586bd7 100644 --- a/input/test/chords.ly +++ b/input/test/chords.ly @@ -1,4 +1,5 @@ -\version "1.3.93"; +\version "1.5.68" + %{ Would this be acceptable/good enough/convenient for entry? @@ -7,21 +8,22 @@ Would this be acceptable/good enough/convenient for entry? C# cis Cb ces - Cm; Cmin c:3-; c:m; c:min - Caug c:5+; c:aug; - Cdim c:3-.5-; c:dim - Cmaj7 c:7+; c:maj + Cm Cmin c:3- c:m c:min + Caug c:5+ c:aug + Cdim c:3-.5- c:dim + Cmaj7 c:7+ c:maj C7 c:7 - Csus; Csus4 c:4; c:sus + Csus Csus4 c:4 c:sus %} -scales = \notes \transpose c'' \chords{ +% used to be quarter notes here. Why? --hwn +scales = \notes \transpose c'' \chords{ % - c1:m c:min c4:dim c:aug c:sus c:maj - c1:6 c4:7 c:9 c:11 c:13 + c1:m c:min c:dim c:aug c:sus c:maj + c1:6 c:7 c:9 c:11 c:13 c:m7 c:m.sus c:m7.sus - c4:dim7 c:dim9 c2:7^5 + c:dim7 c:dim9 c2:7^5 c:13^5.7.9.11 % c1:7^5 c:13^5 c1 g d a e b fis @@ -32,26 +34,26 @@ scales = \notes \transpose c'' \chords{ c\breve c\longa } -keys = \notes{ +keys = \notes{ s1 s1 s1 s1 s1 s1 s1 - \key g \major; s1 - \key d \major; s1 - \key a \major; s1 - \key e \major; s1 - \key b \major; s1 - \key fis \major; s1 - \key c \major; s1 - \key f \major; s1 - \key bes \major; s1 - \key es \major; s1 - \key as \major; s1 - \key des \major; s1 - \key ges \major; s1 - \key c \major; s1*2 - \key c \major; s1*6 + \key g \major s1 + \key d \major s1 + \key a \major s1 + \key e \major s1 + \key b \major s1 + \key fis \major s1 + \key c \major s1 + \key f \major s1 + \key bes \major s1 + \key es \major s1 + \key as \major s1 + \key des \major s1 + \key ges \major s1 + \key c \major s1*2 + \key c \major s1*6 } \score{ @@ -59,4 +61,10 @@ keys = \notes{ \context ChordNames \scales \context Staff < \scales \keys > > + \paper{ + \translator { + \ChordNamesContext + ChordName \override #'word-space = #1 + } + } }