1 %%%% This file is part of LilyPond, the GNU music typesetter.
3 %%%% Copyright (C) 2008--2010 Carl D. Sorensen <c_sorensen@byu.edu>
5 %%%% LilyPond is free software: you can redistribute it and/or modify
6 %%%% it under the terms of the GNU General Public License as published by
7 %%%% the Free Software Foundation, either version 3 of the License, or
8 %%%% (at your option) any later version.
10 %%%% LilyPond is distributed in the hope that it will be useful,
11 %%%% but WITHOUT ANY WARRANTY; without even the implied warranty of
12 %%%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 %%%% GNU General Public License for more details.
15 %%%% You should have received a copy of the GNU General Public License
16 %%%% along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
19 \include "predefined-guitar-ninth-fretboards.ly"
21 %%% Add basic chordshapes
25 \addChordShape #'f #guitar-tuning
#"1-1-(;3-3;3-4;2-2;1-1;1-1-);"
26 \addChordShape #'f:m
#guitar-tuning
#"1-1-(;3-3;3-4;1-1;1-1;1-1-);"
27 \addChordShape #'f:7 #guitar-tuning
#"1-1-(;3-3;1-1;2-2;1-1;1-1-);"
28 \addChordShape #'f:m
7 #guitar-tuning
#"1-1-(;3-3;1-1;1-1;1-1;1-1-);"
29 \addChordShape #'bes #guitar-tuning
#"x;1-1-(;3-2;3-3;3-4;1-1-);"
30 \addChordShape #'bes:m
#guitar-tuning
#"x;1-1-(;3-3;3-4;2-2;1-1-);"
31 \addChordShape #'bes:m
7 #guitar-tuning
#"x;1-1-(;3-3;1-1;2-2;1-1-);"
32 \addChordShape #'bes:7 #guitar-tuning
#"x;1-1-(;3-2;1-1;3-3;1-1-);"
33 \addChordShape #'bes:maj
7 #guitar-tuning
#"x;1-1;3-3;2-2;3-4;x;"
34 \addChordShape #'c:dim
#guitar-tuning
#"x;x;1-1;2-3;1-2;2-4;"
35 \addChordShape #'c:aug
#guitar-tuning
#"x;x;2-2;1-1-(;1-1-);4-4;"
36 \addChordShape #'cis #guitar-tuning
#"x;x;3-3;1-1-(;2-2;1-1-);"
37 \addChordShape #'ees
:dim
#guitar-tuning
#"x;x;1-1;2-3;1-2;2-4;"
38 \addChordShape #'a:dim
#guitar-tuning
#"x;x;1-1;2-3;1-2;2-4;"
40 %%% Add predefined chords
42 % definitions of predefined diagrams below here
46 \storePredefinedDiagram \chordmode {c}
49 \storePredefinedDiagram \chordmode {c:m
}
51 #(offset-fret
2 (chord-shape
'bes:m guitar-tuning
))
52 \storePredefinedDiagram \chordmode {c:aug
}
54 #(chord-shape
'c:aug guitar-tuning
)
55 \storePredefinedDiagram \chordmode {c:dim
}
57 #(chord-shape
'c:dim guitar-tuning
)
58 \storePredefinedDiagram \chordmode {c:7}
60 #"o;3-3;2-2;3-4;1-1;o;"
61 \storePredefinedDiagram \chordmode {c:maj
7}
64 \storePredefinedDiagram \chordmode {c:m
7}
66 #(offset-fret
2 (chord-shape
'bes:m
7 guitar-tuning
))
70 \storePredefinedDiagram \chordmode {cis}
72 #(chord-shape
'cis guitar-tuning
)
73 \storePredefinedDiagram \chordmode {cis:m
}
76 \storePredefinedDiagram \chordmode {cis:aug
}
78 #"x;4-4;3-3;2-1;2-2;x;"
79 \storePredefinedDiagram \chordmode {cis:dim
}
81 #(offset-fret
1 (chord-shape
'c:dim guitar-tuning
))
82 \storePredefinedDiagram \chordmode {cis:7}
84 #"x;x;3-2;4-3;2-1;4-4;"
85 \storePredefinedDiagram \chordmode {cis:maj
7}
87 #"x;4-4;3-3;1-1-(;1-1;1-1-);"
88 \storePredefinedDiagram \chordmode {cis:m
7}
94 \storePredefinedDiagram \chordmode {des}
96 #"x;x;3-3;1-1-(;2-2;1-1-);"
97 \storePredefinedDiagram \chordmode {des:m
}
100 \storePredefinedDiagram \chordmode {des:aug
}
102 #"x;4-4;3-3;2-1;2-2;x;"
103 \storePredefinedDiagram \chordmode {des:dim
}
105 #(offset-fret
1 (chord-shape
'c:dim guitar-tuning
))
106 \storePredefinedDiagram \chordmode {des:7}
108 #"x;x;3-2;4-3;2-1;4-4;"
109 \storePredefinedDiagram \chordmode {des:maj
7}
111 #"x;4-4;3-3;1-1-(;1-1;1-1-);"
112 \storePredefinedDiagram \chordmode {des:m
7}
114 #"x;4-4;2-2;1-1;o;o;"
118 \storePredefinedDiagram \chordmode {d}
120 #"x;x;o;2-1;3-3;2-2;"
121 \storePredefinedDiagram \chordmode {d:m
}
123 #"x;x;o;2-2;3-3;1-1;"
124 \storePredefinedDiagram \chordmode {d:aug
}
126 #"x;x;o;3-2;3-3;2-1;"
127 \storePredefinedDiagram \chordmode {d:dim
}
130 \storePredefinedDiagram \chordmode {d:7}
132 #"x;x;o;2-2;1-1;2-3;"
133 \storePredefinedDiagram \chordmode {d:maj
7}
135 #"x;x;o;2-1;2-2;2-3;"
136 \storePredefinedDiagram \chordmode {d:m
7}
138 #"x;x;o;2-2;1-1-(;1-1-);"
142 \storePredefinedDiagram \chordmode {dis}
144 #(offset-fret
2 (chord-shape
'cis guitar-tuning
))
145 \storePredefinedDiagram \chordmode {dis:m
}
147 #"x;x;4-3;3-2;4-4;1-1;"
148 \storePredefinedDiagram \chordmode {dis:aug
}
150 #"3-3;2-2;1-1;o;o;3-4"
151 \storePredefinedDiagram \chordmode {dis:dim
}
153 #(chord-shape
'ees
:dim guitar-tuning
)
154 \storePredefinedDiagram \chordmode {dis:7}
156 #"x;x;1-1;3-3;2-2;3-4;"
157 \storePredefinedDiagram \chordmode {dis:maj
7}
159 #"x;x;1-1;3-2;3-3;3-4;"
160 \storePredefinedDiagram \chordmode {dis:m
7}
162 #"x;x;1-1;3-2;2-3;2-4;"
166 \storePredefinedDiagram \chordmode {ees
}
168 #(offset-fret
2 (chord-shape
'cis guitar-tuning
))
169 \storePredefinedDiagram \chordmode {ees
:m
}
171 #"x;x;4-3;3-2;4-4;1-1;"
172 \storePredefinedDiagram \chordmode {ees
:aug
}
174 #"3-3;2-2;1-1;o;o;3-4"
175 \storePredefinedDiagram \chordmode {ees
:dim
}
177 #(chord-shape
'ees
:dim guitar-tuning
)
178 \storePredefinedDiagram \chordmode {ees
:7}
180 #"x;x;1-1;3-3;2-2;3-4;"
181 \storePredefinedDiagram \chordmode {ees
:maj
7}
183 #"x;x;1-1;3-2;3-3;3-4;"
184 \storePredefinedDiagram \chordmode {ees
:m
7}
186 #"x;x;1-1;3-2;2-3;2-4;"
190 \storePredefinedDiagram \chordmode {e}
192 #"o;2-2;2-3;1-1;o;o;"
193 \storePredefinedDiagram \chordmode {e:m
}
196 \storePredefinedDiagram \chordmode {e:aug
}
198 #"o;3-3;2-2;1-1;x;x;"
199 \storePredefinedDiagram \chordmode {e:dim
}
201 #(offset-fret
1 (chord-shape
'ees
:dim guitar-tuning
))
202 \storePredefinedDiagram \chordmode {e:7}
205 \storePredefinedDiagram \chordmode {e:maj
7}
207 #"o;2-3;1-1;1-2;o;x;"
208 \storePredefinedDiagram \chordmode {e:m
7}
214 \storePredefinedDiagram \chordmode {f}
216 #(chord-shape
'f guitar-tuning
)
217 \storePredefinedDiagram \chordmode {f:m
}
219 #(chord-shape
'f:m guitar-tuning
)
220 \storePredefinedDiagram \chordmode {f:aug
}
222 #"x;x;1-1;4-3;4-4;3-2;"
223 \storePredefinedDiagram \chordmode {f:dim
}
226 \storePredefinedDiagram \chordmode {f:7}
228 #(chord-shape
'f:7 guitar-tuning
)
229 \storePredefinedDiagram \chordmode {f:maj
7}
231 #"x;x;3-3;2-2;1-1;o;"
232 \storePredefinedDiagram \chordmode {f:m
7}
234 #(chord-shape
'f:m
7 guitar-tuning
)
238 \storePredefinedDiagram \chordmode {fis}
240 #(offset-fret
1 (chord-shape
'f guitar-tuning
))
241 \storePredefinedDiagram \chordmode {fis:m
}
243 #(offset-fret
1 (chord-shape
'f:m guitar-tuning
))
244 \storePredefinedDiagram \chordmode {fis:aug
}
246 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
247 \storePredefinedDiagram \chordmode {fis:dim
}
249 #"x;x;1-1;2-3;1-2;2-4;"
250 \storePredefinedDiagram \chordmode {fis:7}
252 #(offset-fret
1 (chord-shape
'f:7 guitar-tuning
))
253 \storePredefinedDiagram \chordmode {fis:maj
7}
255 #"x;x;4-4;3-3;2-2;1-1;"
256 \storePredefinedDiagram \chordmode {fis:m
7}
258 #(offset-fret
1 (chord-shape
'f:m
7 guitar-tuning
))
262 \storePredefinedDiagram \chordmode {ges}
264 #(offset-fret
1 (chord-shape
'f guitar-tuning
))
265 \storePredefinedDiagram \chordmode {ges:m
}
267 #(offset-fret
1 (chord-shape
'f:m guitar-tuning
))
268 \storePredefinedDiagram \chordmode {ges:aug
}
270 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
271 \storePredefinedDiagram \chordmode {ges:dim
}
273 #"x;x;1-1;2-3;1-2;2-4;"
274 \storePredefinedDiagram \chordmode {ges:7}
276 #(offset-fret
1 (chord-shape
'f:7 guitar-tuning
))
277 \storePredefinedDiagram \chordmode {ges:maj
7}
279 #"x;x;4-4;3-3;2-2;1-1;"
280 \storePredefinedDiagram \chordmode {ges:m
7}
282 #(offset-fret
1 (chord-shape
'f:m
7 guitar-tuning
))
286 \storePredefinedDiagram \chordmode {g}
288 #"3-2;2-1;o;o;o;3-3;"
289 \storePredefinedDiagram \chordmode {g:m
}
291 #(offset-fret
2 (chord-shape
'f:m guitar-tuning
))
292 \storePredefinedDiagram \chordmode {g:aug
}
294 #"x;x;5-1;8-3;8-4;7-2;"
295 \storePredefinedDiagram \chordmode {g:dim
}
297 #"x;x;5-2;6-4;5-3;3-1;"
298 \storePredefinedDiagram \chordmode {g:7}
300 #"3-3;2-2;o;o;o;1-1;"
301 \storePredefinedDiagram \chordmode {g:maj
7}
303 #"x;x;5-4;4-3;3-2;2-1;"
304 \storePredefinedDiagram \chordmode {g:m
7}
306 #(offset-fret
2 (chord-shape
'f:m
7 guitar-tuning
))
310 \storePredefinedDiagram \chordmode {gis}
312 #(offset-fret
3 (chord-shape
'f guitar-tuning
))
313 \storePredefinedDiagram \chordmode {gis:m
}
315 #(offset-fret
3 (chord-shape
'f:m guitar-tuning
))
316 \storePredefinedDiagram \chordmode {gis:aug
}
318 #"o;3-4;2-3;1-1;1-2;o;"
319 \storePredefinedDiagram \chordmode {gis:dim
}
322 \storePredefinedDiagram \chordmode {gis:7}
324 #(offset-fret
3 (chord-shape
'f:7 guitar-tuning
))
325 \storePredefinedDiagram \chordmode {gis:maj
7}
327 #"x;x;1-1-(;1-1;1-1-);3-3;"
328 \storePredefinedDiagram \chordmode {gis:m
7}
330 #(offset-fret
3 (chord-shape
'f:m
7 guitar-tuning
))
334 \storePredefinedDiagram \chordmode {aes
}
336 #(offset-fret
3 (chord-shape
'f guitar-tuning
))
337 \storePredefinedDiagram \chordmode {aes
:m
}
339 #(offset-fret
3 (chord-shape
'f:m guitar-tuning
))
340 \storePredefinedDiagram \chordmode {aes
:aug
}
342 #"o;3-4;2-3;1-1;1-2;o;"
343 \storePredefinedDiagram \chordmode {aes
:dim
}
346 \storePredefinedDiagram \chordmode {aes
:7}
348 #(offset-fret
3 (chord-shape
'f:7 guitar-tuning
))
349 \storePredefinedDiagram \chordmode {aes
:maj
7}
351 #"x;x;1-1-(;1-1;1-1-);3-3;"
352 \storePredefinedDiagram \chordmode {aes
:m
7}
354 #(offset-fret
3 (chord-shape
'f:m
7 guitar-tuning
))
358 \storePredefinedDiagram \chordmode {a}
360 #"x;o;2-1;2-2;2-3;o;"
361 \storePredefinedDiagram \chordmode {a:m
}
363 #"x;o;2-2;2-3;1-1;o;"
364 \storePredefinedDiagram \chordmode {a:aug
}
366 #"x;o;3-4;2-2;2-3;1-1;"
367 \storePredefinedDiagram \chordmode {a:dim
}
369 #(chord-shape
'a:dim guitar-tuning
)
370 \storePredefinedDiagram \chordmode {a:7}
373 \storePredefinedDiagram \chordmode {a:maj
7}
375 #"x;o;2-2;1-1;2-3;o;"
376 \storePredefinedDiagram \chordmode {a:m
7}
382 \storePredefinedDiagram \chordmode {ais}
384 #(chord-shape
'bes guitar-tuning
)
385 \storePredefinedDiagram \chordmode {ais:m
}
387 #(chord-shape
'bes:m guitar-tuning
)
388 \storePredefinedDiagram \chordmode {ais:aug
}
390 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
391 \storePredefinedDiagram \chordmode {ais:dim
}
393 #(offset-fret
1 (chord-shape
'a:dim guitar-tuning
))
394 \storePredefinedDiagram \chordmode {ais:7}
396 #(chord-shape
'bes:7 guitar-tuning
)
397 \storePredefinedDiagram \chordmode {ais:maj
7}
399 #"x;1-1;3-3;2-2;3-4;x;"
400 \storePredefinedDiagram \chordmode {ais:m
7}
402 #(chord-shape
'bes:m
7 guitar-tuning
)
406 \storePredefinedDiagram \chordmode {bes}
408 #(chord-shape
'bes guitar-tuning
)
409 \storePredefinedDiagram \chordmode {bes:m
}
411 #(chord-shape
'bes:m guitar-tuning
)
412 \storePredefinedDiagram \chordmode {bes:aug
}
414 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
415 \storePredefinedDiagram \chordmode {bes:dim
}
417 #(offset-fret
1 (chord-shape
'a:dim guitar-tuning
))
418 \storePredefinedDiagram \chordmode {bes:7}
420 #(chord-shape
'bes:7 guitar-tuning
)
421 \storePredefinedDiagram \chordmode {bes:maj
7}
423 #"x;1-1;3-3;2-2;3-4;x;"
424 \storePredefinedDiagram \chordmode {bes:m
7}
426 #(chord-shape
'bes:m
7 guitar-tuning
)
430 \storePredefinedDiagram \chordmode {b}
432 #(offset-fret
1 (chord-shape
'bes guitar-tuning
))
433 \storePredefinedDiagram \chordmode {b:m
}
435 #(offset-fret
1 (chord-shape
'bes:m guitar-tuning
))
436 \storePredefinedDiagram \chordmode {b:aug
}
439 \storePredefinedDiagram \chordmode {b:dim
}
442 \storePredefinedDiagram \chordmode {b:7}
444 #(offset-fret
1 (chord-shape
'bes:7 guitar-tuning
))
445 \storePredefinedDiagram \chordmode {b:maj
7}
447 #"x;2-1;4-3;3-2;4-4;x;"
448 \storePredefinedDiagram \chordmode {b:m
7}
450 #(offset-fret
1 (chord-shape
'bes:m
7 guitar-tuning
))