4 lsrtags
= "fretted-strings,tweaks-and-overrides"
5 texidoc
= "This snippet shows many possibilities for obtaining
6 and tweaking fret diagrams."
7 doctitle
= "Fret diagrams explained and developed"
19 % Set global properties of fret diagram
20 \override Voice
.TextScript
#'size
= #1.2
21 \override Voice
.TextScript
#'fret-diagram-details
#'finger-code
= #'below-string
22 \override Voice
.TextScript
#'fret-diagram-details
#'dot-color
= #'black
24 %% A chord for ukelele
26 \override #'(fret-diagram-details
. (
29 (finger-code
. in-dot
))) {
30 \fret-diagram
#"4-2-2;3-1-1;2-o;1-o;"
34 %% A chord for ukelele, with formatting defined in definition string
35 % 1.2 * size, 4 strings, 4 frets, fingerings below string
36 % dot radius .35 of fret spacing, dot position 0.55 of fret spacing
38 \override #'(fret-diagram-details
. (
40 (open-string
. "o"))) {
41 \fret-diagram
#"s:1.2;w:4;h:3;f:2;d:0.35;p:0.55;4-2-2;3-1-1;2-o;1-o;"
45 %% C major for guitar, barred on third fret
47 % roman fret label, finger labels below string, straight barre
49 % 110% of default size
50 \override #'(size
. 1.1) {
51 \override #'(fret-diagram-details
. (
52 (number-type
. roman-lower
)
53 (finger-code
. below-string
)
54 (barre-type
. straight
))) {
55 \fret-diagram-verbose
#'((mute
6)
66 %% C major for guitar, barred on third fret
69 % 110% of default size
70 \override #'(size
. 1.1) {
71 \override #'(fret-diagram-details
. (
72 (number-type
. arabic
)
73 (dot-label-font-mag
. 0.9)
74 (finger-code
. in-dot
)
75 (fret-label-font-mag
. 0.6)
76 (fret-label-vertical-offset
. 0)
79 (orientation
. landscape
)
80 (xo-font-magnification
. 0.4)
81 (xo-padding
. 0.3))) {
82 \fret-diagram-verbose
#'((mute
6)
95 \override #'(fret-diagram-details
. (
96 (finger-code
. below-string
)
100 \fret-diagram-terse
#"x;x;o;2-1;3-2;2-3;"