]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/fret-diagrams-dots.ly
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / input / regression / fret-diagrams-dots.ly
1 \version "2.19.8"
2
3 \header {
4   texidoc="
5 Dots indicating fingerings can be changed in location,
6 size, and coloring.
7 It is possible to parenthesize a single dot.  The color
8 of the paranthesis may be taken from dot or default.
9 A possible collision between parathesis and fret-label-
10 indication can be resolved by an override for
11 @code{fret-label-horizontal-offset} in @code{fret-diagram-details}.
12
13 "
14 }
15
16 \layout { ragged-right = ##t }
17
18 <<
19   \chords {
20     c1 |
21     c1 |
22     c1 |
23     c1 |
24     c1 |
25     c1
26   }
27
28   \new Voice {
29     \textLengthOn
30
31      %% C major for guitar,  verbose style
32     c'1 ^\markup {
33             \fret-diagram-verbose #'((mute 6)
34                                      (place-fret 5 3 1)
35                                      (place-fret 4 5 2)
36                                      (place-fret 3 5 3)
37                                      (place-fret 2 5 4)
38                                      (place-fret 1 3 1)
39                                      (barre 5 1 3))}
40
41      %% C major for guitar, verbose style
42     \override TextScript.fret-diagram-details.dot-radius = #0.3
43     c' ^\markup {
44             \fret-diagram-verbose #'((mute 6)
45                                      (place-fret 5 3 1)
46                                      (place-fret 4 5 2)
47                                      (place-fret 3 5 3)
48                                      (place-fret 2 5 4)
49                                      (place-fret 1 3 1)
50                                      (barre 5 1 3))}
51
52      %% C major for guitar, verbose style
53     \revert TextScript.fret-diagram-details.dot-radius
54     \once \override TextScript.fret-diagram-details.dot-color = #'white
55     c' ^\markup {
56             \fret-diagram-verbose #'((mute 6)
57                                      (place-fret 5 3 1)
58                                      (place-fret 4 5 2)
59                                      (place-fret 3 5 3)
60                                      (place-fret 2 5 4)
61                                      (place-fret 1 3 1)
62                                      (barre 5 1 3))}
63
64      %% C major for guitar,  verbose style
65     \once \override TextScript.fret-diagram-details.dot-position = #0.5
66     c'1 ^\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.size = #1.4
77     c'1 ^\markup {
78             \fret-diagram-verbose #'((mute 6)
79                                      (place-fret 5 3 1 blue)
80                                      (place-fret 4 5 2 red parenthesized)
81                                      (place-fret 3 5 3)
82                                      (place-fret 2 5 4 red)
83                                      (place-fret 1 3 1 blue parenthesized)
84                                      (barre 5 1 3))}
85
86      %% C major for guitar,  verbose style
87      %% larger size and dot-radius
88      %% different dot-colors
89      %% parenthesizing single dots, with different paren-color
90      %% horizontal moving fret-label-indication
91     \once \override TextScript.size = #1.5
92     \once \override TextScript.fret-diagram-details.dot-radius = #0.4
93     \once \override TextScript.fret-diagram-details.fret-label-horizontal-offset = #0.2
94     c'1 ^\markup {
95             \fret-diagram-verbose
96               #'((mute 6)
97                  (place-fret 5 3 1 blue)
98                  (place-fret 4 5 2 red parenthesized default-paren-color)
99                  (place-fret 3 5 3)
100                  (place-fret 2 5 4 red)
101                  (place-fret 1 3 1 blue parenthesized)
102                  (barre 5 1 3))}
103
104  }
105 >>