]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/fret-diagrams-fingering.ly
Rerun scripts/auxiliar/update-with-convert-ly.sh
[lilypond.git] / input / regression / fret-diagrams-fingering.ly
1 \version "2.17.6"
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.finger-code = #'below-string
29     c'1 ^\markup {
30             \fret-diagram-verbose #'((mute 6)
31                                      (place-fret 5 3 1)
32                                      (place-fret 4 5 2)
33                                      (place-fret 3 5 3)
34                                      (place-fret 2 5 4)
35                                      (place-fret 1 3 1)
36                                      (barre 5 1 3))}
37
38      %% C major for guitar,  verbose style
39     \override TextScript.fret-diagram-details.string-label-font-mag = #0.4
40     c'1 ^\markup {
41             \fret-diagram-verbose #'((mute 6)
42                                      (place-fret 5 3 1)
43                                      (place-fret 4 5 2)
44                                      (place-fret 3 5 3)
45                                      (place-fret 2 5 4)
46                                      (place-fret 1 3 1)
47                                      (barre 5 1 3))}
48
49      %% C major for guitar, verbose style
50     \override TextScript.fret-diagram-details.finger-code = #'in-dot
51     c' ^\markup {
52             \fret-diagram-verbose #'((mute 6)
53                                      (place-fret 5 3 1)
54                                      (place-fret 4 5 2)
55                                      (place-fret 3 5 3)
56                                      (place-fret 2 5 4)
57                                      (place-fret 1 3 1)
58                                      (barre 5 1 3))}
59
60      %% C major for guitar, verbose style
61     \once \override TextScript.fret-diagram-details.dot-color = #'white
62     c' ^\markup {
63             \fret-diagram-verbose #'((mute 6)
64                                      (place-fret 5 3 1)
65                                      (place-fret 4 5 2)
66                                      (place-fret 3 5 3)
67                                      (place-fret 2 5 4)
68                                      (place-fret 1 3 1)
69                                      (barre 5 1 3))}
70
71      %% C major for guitar,  verbose style
72     \once \override TextScript.fret-diagram-details.dot-label-font-mag = #0.75
73     c'1 ^\markup {
74             \fret-diagram-verbose #'((mute 6)
75                                      (place-fret 5 3 1)
76                                      (place-fret 4 5 2)
77                                      (place-fret 3 5 3)
78                                      (place-fret 2 5 4)
79                                      (place-fret 1 3 1)
80                                      (barre 5 1 3))}
81     %% dot color inversion, white on black
82     \once \override TextScript.fret-diagram-details.dot-color = #'black
83     c' ^\markup {
84             \fret-diagram-verbose #'((mute 6)
85                                      (place-fret 5 3 1 inverted)
86                                      (place-fret 4 5 2)
87                                      (place-fret 3 5 3 inverted)
88                                      (place-fret 2 5 4)
89                                      (place-fret 1 3 1)
90                                      (barre 5 1 3))}
91     %% dot color inversion, black on white
92     \once \override TextScript.fret-diagram-details.dot-color = #'white
93     c' ^\markup {
94             \fret-diagram-verbose #'((mute 6)
95                                      (place-fret 5 3 1 inverted)
96                                      (place-fret 4 5 2)
97                                      (place-fret 3 5 3 inverted)
98                                      (place-fret 2 5 4)
99                                      (place-fret 1 3 1)
100                                      (barre 5 1 3))}
101  }
102 >>
103
104