MIDI: fix regtest failure
[lilypond/patrick.git] / input / regression / fret-diagrams-fingering.ly
blobf2da8d4562cf3cdde447aca1f0bceaec5784b592
1 \version "2.12.0"
3 \header {
4 texidoc="
5 Finger labels can be added, either in dots or below strings.
6 Dot color can be changed globally or on a per-dot basis,
7 and fingering label font size can be adjusted.
12 \layout { ragged-right = ##t }
15 \chords {
16 c1 |
17 c1 |
18 c1 |
19 c1 |
20 c1 |
21 c1 |
25 \new Voice {
26 \textLengthOn
27 %% C major for guitar, verbose style
28 \override TextScript #'fret-diagram-details
29 #'finger-code = #'below-string
30 c'1 ^\markup {
31 \fret-diagram-verbose #'((mute 6)
32 (place-fret 5 3 1)
33 (place-fret 4 5 2)
34 (place-fret 3 5 3)
35 (place-fret 2 5 4)
36 (place-fret 1 3 1)
37 (barre 5 1 3))}
39 %% C major for guitar, verbose style
40 \override TextScript #'fret-diagram-details
41 #'string-label-font-mag = #0.4
42 c'1 ^\markup {
43 \fret-diagram-verbose #'((mute 6)
44 (place-fret 5 3 1)
45 (place-fret 4 5 2)
46 (place-fret 3 5 3)
47 (place-fret 2 5 4)
48 (place-fret 1 3 1)
49 (barre 5 1 3))}
51 %% C major for guitar, verbose style
52 \override TextScript #'fret-diagram-details
53 #'finger-code = #'in-dot
54 c' ^\markup {
55 \fret-diagram-verbose #'((mute 6)
56 (place-fret 5 3 1)
57 (place-fret 4 5 2)
58 (place-fret 3 5 3)
59 (place-fret 2 5 4)
60 (place-fret 1 3 1)
61 (barre 5 1 3))}
63 %% C major for guitar, verbose style
64 \once \override TextScript #'fret-diagram-details
65 #'dot-color = #'white
66 c' ^\markup {
67 \fret-diagram-verbose #'((mute 6)
68 (place-fret 5 3 1)
69 (place-fret 4 5 2)
70 (place-fret 3 5 3)
71 (place-fret 2 5 4)
72 (place-fret 1 3 1)
73 (barre 5 1 3))}
75 %% C major for guitar, verbose style
76 \once \override TextScript #'fret-diagram-details
77 #'dot-label-font-mag = #0.75
78 c'1 ^\markup {
79 \fret-diagram-verbose #'((mute 6)
80 (place-fret 5 3 1)
81 (place-fret 4 5 2)
82 (place-fret 3 5 3)
83 (place-fret 2 5 4)
84 (place-fret 1 3 1)
85 (barre 5 1 3))}
86 %% dot color inversion, white on black
87 \once \override TextScript #'fret-diagram-details
88 #'dot-color = #'black
89 c' ^\markup {
90 \fret-diagram-verbose #'((mute 6)
91 (place-fret 5 3 1 inverted)
92 (place-fret 4 5 2)
93 (place-fret 3 5 3 inverted)
94 (place-fret 2 5 4)
95 (place-fret 1 3 1)
96 (barre 5 1 3))}
97 %% dot color inversion, black on white
98 \once \override TextScript #'fret-diagram-details
99 #'dot-color = #'white
100 c' ^\markup {
101 \fret-diagram-verbose #'((mute 6)
102 (place-fret 5 3 1 inverted)
103 (place-fret 4 5 2)
104 (place-fret 3 5 3 inverted)
105 (place-fret 2 5 4)
106 (place-fret 1 3 1)
107 (barre 5 1 3))}