]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/fret-diagrams-fingering.ly
Imported Upstream version 2.14.2
[lilypond.git] / input / regression / fret-diagrams-fingering.ly
1 \version "2.14.0"
2
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.
8
9 "
10 }
11
12 \layout { ragged-right = ##t }
13
14 <<
15   \chords {
16     c1 |
17     c1 |
18     c1 |
19     c1 |
20     c1 |
21     c1 |
22     c1
23   }
24
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))}
38
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))}
50
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))}
62
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))}
74
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))}
108  }
109 >>
110
111