repo.or.cz
/
lilypond
/
mpolesky.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Debug: another iteration of Scheme debug aids
[lilypond/mpolesky.git]
/
Documentation
/
included
/
display-predefined-ukulele-fretboards.ly
blob
ef37518eebfc07bd6af62b24ed8c2d544e88966e
1
\version
"2.13.9"
2
\include
"predefined-ukulele-fretboards.ly"
3
4
5
mychords
=
\chordmode
{
6
c
1
c
:
m
c
:
aug
c
:
dim
c
:
7
c
:
maj
7
c
:
m
7
7
c
:
6
c
:
sus
2
c
:
sus
4
c
:
9
8
\break
9
}
10
11
chordsline
= {
12
\mychords
13
\transpose
c cis
{
14
\mychords
15
}
16
\transpose
c des
{
17
\mychords
18
}
19
\transpose
c d
{
20
\mychords
21
}
22
\transpose
c dis
{
23
\mychords
24
}
25
\transpose
c
ees
{
26
\mychords
27
}
28
\transpose
c e
{
29
\mychords
30
}
31
\transpose
c f
{
32
\mychords
33
}
34
\transpose
c fis
{
35
\mychords
36
}
37
\transpose
c ges
{
38
\mychords
39
}
40
\transpose
c g
{
41
\mychords
42
}
43
\transpose
c gis
{
44
\mychords
45
}
46
\transpose
c
aes
{
47
\mychords
48
}
49
\transpose
c a
{
50
\mychords
51
}
52
\transpose
c ais
{
53
\mychords
54
}
55
\transpose
c bes
{
56
\mychords
57
}
58
\transpose
c b
{
59
\mychords
60
}
61
}
62
63
<<
64
\context
ChordNames
{
65
\chordsline
66
}
67
\context
FretBoards
{
68
\set
stringTunings
= #
ukulele-tuning
69
\chordsline
70
}
71
\context
Staff
{
72
\chordsline
73
}
74
>>