1 % regression test for fret diagram markups
11 \override #'(string-count . 4) {
12 \override #'(dot-color . white) {
13 \fret-diagram #"4-2-2;3-1-1;2-o;1-o;"}}
15 % C major for guitar, barred on third fret
17 \override #'(number-type . roman-lower) { % lower-case roman numeral fret label
18 \override #'(size . 1.1) { % 110% of default size
19 \override #'(finger-code . below-string) { % string labels below strings
20 \override #'(barre-type . straight) { % straight barre
21 \fret-diagram-verbose #'((mute 6) (place-fret 5 3 1) (place-fret 4 5 2) (place-fret 3 5 3) (place-fret 2 5 4) (place-fret 1 3 1) (barre 5 1 3)) }}}}
22 % C major for guitar, barred on third fret
24 \override #'(number-type . arabic) { % lower-case roman numeral fret label
25 \override #'(dot-color . white) { % white dots
26 \override #'(finger-code . in-dot) { % string labels in dots
27 \override #'(barre-type . curved) { % straight barre
28 \fret-diagram-verbose #'((mute 6) (place-fret 5 3 1) (place-fret 4 5 2) (place-fret 3 5 3) (place-fret 2 5 4) (place-fret 1 3 1) (barre 5 1 3)) }}}}
29 % C major for guitar, barred on third fret
31 \override #'(number-type . roman-upper) { % upper-case roman numeral fret label
32 \override #'(label-dir . -1) { % label fret at left side of diagram
33 \override #'(finger-code . in-dot) { % string labels in dots
34 \override #'(barre-type . curved) { % curved barre
35 \fret-diagram-verbose #'((mute 6) (place-fret 5 3 1) (place-fret 4 5 2) (place-fret 3 5 3) (place-fret 2 5 4) (place-fret 1 3 1) (barre 5 1 3)) }}}}
40 \override #'(finger-code . below-string) {
41 \override #'(dot-radius . 0.35) {
42 \override #'(dot-position . 0.5) {
43 \override #'(fret-count . 5) {
44 \fret-diagram-terse #"x;x;o;2-1;3-2;2-3;" }}}}