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/>.
18 % chord definitions require default pitchnames
19 #(define prev-pitchnames pitchnames)
20 #(set! pitchnames default-language)
22 \include "predefined-guitar-ninth-fretboards.ly"
24 %%% Add basic chordshapes
28 \addChordShape #'f #guitar-tuning #"1-1-(;3-3;3-4;2-2;1-1;1-1-);"
29 \addChordShape #'f:m #guitar-tuning #"1-1-(;3-3;3-4;1-1;1-1;1-1-);"
30 \addChordShape #'f:7 #guitar-tuning #"1-1-(;3-3;1-1;2-2;1-1;1-1-);"
31 \addChordShape #'f:m7 #guitar-tuning #"1-1-(;3-3;1-1;1-1;1-1;1-1-);"
32 \addChordShape #'bes #guitar-tuning #"x;1-1-(;3-2;3-3;3-4;1-1-);"
33 \addChordShape #'bes:m #guitar-tuning #"x;1-1-(;3-3;3-4;2-2;1-1-);"
34 \addChordShape #'bes:m7 #guitar-tuning #"x;1-1-(;3-3;1-1;2-2;1-1-);"
35 \addChordShape #'bes:7 #guitar-tuning #"x;1-1-(;3-2;1-1;3-3;1-1-);"
36 \addChordShape #'bes:maj7 #guitar-tuning #"x;1-1;3-3;2-2;3-4;x;"
37 \addChordShape #'c:dim #guitar-tuning #"x;x;1-1;2-3;1-2;2-4;"
38 \addChordShape #'c:aug #guitar-tuning #"x;x;2-2;1-1-(;1-1-);4-4;"
39 \addChordShape #'cis #guitar-tuning #"x;x;3-3;1-1-(;2-2;1-1-);"
40 \addChordShape #'ees:dim #guitar-tuning #"x;x;1-1;2-3;1-2;2-4;"
41 \addChordShape #'a:dim #guitar-tuning #"x;x;1-1;2-3;1-2;2-4;"
43 %%% Add predefined chords
45 % definitions of predefined diagrams below here
49 \storePredefinedDiagram #default-fret-table \chordmode {c}
52 \storePredefinedDiagram #default-fret-table \chordmode {c:m}
54 #(offset-fret 2 (chord-shape 'bes:m guitar-tuning))
55 \storePredefinedDiagram #default-fret-table \chordmode {c:aug}
57 #(chord-shape 'c:aug guitar-tuning)
58 \storePredefinedDiagram #default-fret-table \chordmode {c:dim}
60 #(chord-shape 'c:dim guitar-tuning)
61 \storePredefinedDiagram #default-fret-table \chordmode {c:7}
63 #"o;3-3;2-2;3-4;1-1;o;"
64 \storePredefinedDiagram #default-fret-table \chordmode {c:maj7}
67 \storePredefinedDiagram #default-fret-table \chordmode {c:m7}
69 #(offset-fret 2 (chord-shape 'bes:m7 guitar-tuning))
73 \storePredefinedDiagram #default-fret-table \chordmode {cis}
75 #(chord-shape 'cis guitar-tuning)
76 \storePredefinedDiagram #default-fret-table \chordmode {cis:m}
79 \storePredefinedDiagram #default-fret-table \chordmode {cis:aug}
81 #"x;4-4;3-3;2-1;2-2;x;"
82 \storePredefinedDiagram #default-fret-table \chordmode {cis:dim}
84 #(offset-fret 1 (chord-shape 'c:dim guitar-tuning))
85 \storePredefinedDiagram #default-fret-table \chordmode {cis:7}
87 #"x;x;3-2;4-3;2-1;4-4;"
88 \storePredefinedDiagram #default-fret-table \chordmode {cis:maj7}
90 #"x;4-4;3-3;1-1-(;1-1;1-1-);"
91 \storePredefinedDiagram #default-fret-table \chordmode {cis:m7}
97 \storePredefinedDiagram #default-fret-table \chordmode {des}
99 #"x;x;3-3;1-1-(;2-2;1-1-);"
100 \storePredefinedDiagram #default-fret-table \chordmode {des:m}
102 #"x;x;2-2;1-1;2-3;o;"
103 \storePredefinedDiagram #default-fret-table \chordmode {des:aug}
105 #"x;4-4;3-3;2-1;2-2;x;"
106 \storePredefinedDiagram #default-fret-table \chordmode {des:dim}
108 #(offset-fret 1 (chord-shape 'c:dim guitar-tuning))
109 \storePredefinedDiagram #default-fret-table \chordmode {des:7}
111 #"x;x;3-2;4-3;2-1;4-4;"
112 \storePredefinedDiagram #default-fret-table \chordmode {des:maj7}
114 #"x;4-4;3-3;1-1-(;1-1;1-1-);"
115 \storePredefinedDiagram #default-fret-table \chordmode {des:m7}
117 #"x;4-4;2-2;1-1;o;o;"
121 \storePredefinedDiagram #default-fret-table \chordmode {d}
123 #"x;x;o;2-1;3-3;2-2;"
124 \storePredefinedDiagram #default-fret-table \chordmode {d:m}
126 #"x;x;o;2-2;3-3;1-1;"
127 \storePredefinedDiagram #default-fret-table \chordmode {d:aug}
129 #"x;x;o;3-2;3-3;2-1;"
130 \storePredefinedDiagram #default-fret-table \chordmode {d:dim}
133 \storePredefinedDiagram #default-fret-table \chordmode {d:7}
135 #"x;x;o;2-2;1-1;2-3;"
136 \storePredefinedDiagram #default-fret-table \chordmode {d:maj7}
138 #"x;x;o;2-1;2-2;2-3;"
139 \storePredefinedDiagram #default-fret-table \chordmode {d:m7}
141 #"x;x;o;2-2;1-1-(;1-1-);"
145 \storePredefinedDiagram #default-fret-table \chordmode {dis}
147 #(offset-fret 2 (chord-shape 'cis guitar-tuning))
148 \storePredefinedDiagram #default-fret-table \chordmode {dis:m}
150 #"x;x;4-3;3-2;4-4;1-1;"
151 \storePredefinedDiagram #default-fret-table \chordmode {dis:aug}
153 #"3-3;2-2;1-1;o;o;3-4"
154 \storePredefinedDiagram #default-fret-table \chordmode {dis:dim}
156 #(chord-shape 'ees:dim guitar-tuning)
157 \storePredefinedDiagram #default-fret-table \chordmode {dis:7}
159 #"x;x;1-1;3-3;2-2;3-4;"
160 \storePredefinedDiagram #default-fret-table \chordmode {dis:maj7}
162 #"x;x;1-1;3-2;3-3;3-4;"
163 \storePredefinedDiagram #default-fret-table \chordmode {dis:m7}
165 #"x;x;1-1;3-2;2-3;2-4;"
169 \storePredefinedDiagram #default-fret-table \chordmode {ees}
171 #(offset-fret 2 (chord-shape 'cis guitar-tuning))
172 \storePredefinedDiagram #default-fret-table \chordmode {ees:m}
174 #"x;x;4-3;3-2;4-4;1-1;"
175 \storePredefinedDiagram #default-fret-table \chordmode {ees:aug}
177 #"3-3;2-2;1-1;o;o;3-4"
178 \storePredefinedDiagram #default-fret-table \chordmode {ees:dim}
180 #(chord-shape 'ees:dim guitar-tuning)
181 \storePredefinedDiagram #default-fret-table \chordmode {ees:7}
183 #"x;x;1-1;3-3;2-2;3-4;"
184 \storePredefinedDiagram #default-fret-table \chordmode {ees:maj7}
186 #"x;x;1-1;3-2;3-3;3-4;"
187 \storePredefinedDiagram #default-fret-table \chordmode {ees:m7}
189 #"x;x;1-1;3-2;2-3;2-4;"
193 \storePredefinedDiagram #default-fret-table \chordmode {e}
195 #"o;2-2;2-3;1-1;o;o;"
196 \storePredefinedDiagram #default-fret-table \chordmode {e:m}
199 \storePredefinedDiagram #default-fret-table \chordmode {e:aug}
201 #"o;3-3;2-2;1-1;x;x;"
202 \storePredefinedDiagram #default-fret-table \chordmode {e:dim}
204 #(offset-fret 1 (chord-shape 'ees:dim guitar-tuning))
205 \storePredefinedDiagram #default-fret-table \chordmode {e:7}
208 \storePredefinedDiagram #default-fret-table \chordmode {e:maj7}
210 #"o;2-3;1-1;1-2;o;x;"
211 \storePredefinedDiagram #default-fret-table \chordmode {e:m7}
217 \storePredefinedDiagram #default-fret-table \chordmode {f}
219 #(chord-shape 'f guitar-tuning)
220 \storePredefinedDiagram #default-fret-table \chordmode {f:m}
222 #(chord-shape 'f:m guitar-tuning)
223 \storePredefinedDiagram #default-fret-table \chordmode {f:aug}
225 #"x;x;1-1;4-3;4-4;3-2;"
226 \storePredefinedDiagram #default-fret-table \chordmode {f:dim}
229 \storePredefinedDiagram #default-fret-table \chordmode {f:7}
231 #(chord-shape 'f:7 guitar-tuning)
232 \storePredefinedDiagram #default-fret-table \chordmode {f:maj7}
234 #"x;x;3-3;2-2;1-1;o;"
235 \storePredefinedDiagram #default-fret-table \chordmode {f:m7}
237 #(chord-shape 'f:m7 guitar-tuning)
241 \storePredefinedDiagram #default-fret-table \chordmode {fis}
243 #(offset-fret 1 (chord-shape 'f guitar-tuning))
244 \storePredefinedDiagram #default-fret-table \chordmode {fis:m}
246 #(offset-fret 1 (chord-shape 'f:m guitar-tuning))
247 \storePredefinedDiagram #default-fret-table \chordmode {fis:aug}
249 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
250 \storePredefinedDiagram #default-fret-table \chordmode {fis:dim}
252 #"x;x;1-1;2-3;1-2;2-4;"
253 \storePredefinedDiagram #default-fret-table \chordmode {fis:7}
255 #(offset-fret 1 (chord-shape 'f:7 guitar-tuning))
256 \storePredefinedDiagram #default-fret-table \chordmode {fis:maj7}
258 #"x;x;4-4;3-3;2-2;1-1;"
259 \storePredefinedDiagram #default-fret-table \chordmode {fis:m7}
261 #(offset-fret 1 (chord-shape 'f:m7 guitar-tuning))
265 \storePredefinedDiagram #default-fret-table \chordmode {ges}
267 #(offset-fret 1 (chord-shape 'f guitar-tuning))
268 \storePredefinedDiagram #default-fret-table \chordmode {ges:m}
270 #(offset-fret 1 (chord-shape 'f:m guitar-tuning))
271 \storePredefinedDiagram #default-fret-table \chordmode {ges:aug}
273 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
274 \storePredefinedDiagram #default-fret-table \chordmode {ges:dim}
276 #"x;x;1-1;2-3;1-2;2-4;"
277 \storePredefinedDiagram #default-fret-table \chordmode {ges:7}
279 #(offset-fret 1 (chord-shape 'f:7 guitar-tuning))
280 \storePredefinedDiagram #default-fret-table \chordmode {ges:maj7}
282 #"x;x;4-4;3-3;2-2;1-1;"
283 \storePredefinedDiagram #default-fret-table \chordmode {ges:m7}
285 #(offset-fret 1 (chord-shape 'f:m7 guitar-tuning))
289 \storePredefinedDiagram #default-fret-table \chordmode {g}
291 #"3-2;2-1;o;o;o;3-3;"
292 \storePredefinedDiagram #default-fret-table \chordmode {g:m}
294 #(offset-fret 2 (chord-shape 'f:m guitar-tuning))
295 \storePredefinedDiagram #default-fret-table \chordmode {g:aug}
297 #"x;x;5-1;8-3;8-4;7-2;"
298 \storePredefinedDiagram #default-fret-table \chordmode {g:dim}
300 #"x;x;5-2;6-4;5-3;3-1;"
301 \storePredefinedDiagram #default-fret-table \chordmode {g:7}
303 #"3-3;2-2;o;o;o;1-1;"
304 \storePredefinedDiagram #default-fret-table \chordmode {g:maj7}
306 #"x;x;5-4;4-3;3-2;2-1;"
307 \storePredefinedDiagram #default-fret-table \chordmode {g:m7}
309 #(offset-fret 2 (chord-shape 'f:m7 guitar-tuning))
313 \storePredefinedDiagram #default-fret-table \chordmode {gis}
315 #(offset-fret 3 (chord-shape 'f guitar-tuning))
316 \storePredefinedDiagram #default-fret-table \chordmode {gis:m}
318 #(offset-fret 3 (chord-shape 'f:m guitar-tuning))
319 \storePredefinedDiagram #default-fret-table \chordmode {gis:aug}
321 #"o;3-4;2-3;1-1;1-2;o;"
322 \storePredefinedDiagram #default-fret-table \chordmode {gis:dim}
325 \storePredefinedDiagram #default-fret-table \chordmode {gis:7}
327 #(offset-fret 3 (chord-shape 'f:7 guitar-tuning))
328 \storePredefinedDiagram #default-fret-table \chordmode {gis:maj7}
330 #"x;x;1-1-(;1-1;1-1-);3-3;"
331 \storePredefinedDiagram #default-fret-table \chordmode {gis:m7}
333 #(offset-fret 3 (chord-shape 'f:m7 guitar-tuning))
337 \storePredefinedDiagram #default-fret-table \chordmode {aes}
339 #(offset-fret 3 (chord-shape 'f guitar-tuning))
340 \storePredefinedDiagram #default-fret-table \chordmode {aes:m}
342 #(offset-fret 3 (chord-shape 'f:m guitar-tuning))
343 \storePredefinedDiagram #default-fret-table \chordmode {aes:aug}
345 #"o;3-4;2-3;1-1;1-2;o;"
346 \storePredefinedDiagram #default-fret-table \chordmode {aes:dim}
349 \storePredefinedDiagram #default-fret-table \chordmode {aes:7}
351 #(offset-fret 3 (chord-shape 'f:7 guitar-tuning))
352 \storePredefinedDiagram #default-fret-table \chordmode {aes:maj7}
354 #"x;x;1-1-(;1-1;1-1-);3-3;"
355 \storePredefinedDiagram #default-fret-table \chordmode {aes:m7}
357 #(offset-fret 3 (chord-shape 'f:m7 guitar-tuning))
361 \storePredefinedDiagram #default-fret-table \chordmode {a}
363 #"x;o;2-1;2-2;2-3;o;"
364 \storePredefinedDiagram #default-fret-table \chordmode {a:m}
366 #"x;o;2-2;2-3;1-1;o;"
367 \storePredefinedDiagram #default-fret-table \chordmode {a:aug}
369 #"x;o;3-4;2-2;2-3;1-1;"
370 \storePredefinedDiagram #default-fret-table \chordmode {a:dim}
372 #(chord-shape 'a:dim guitar-tuning)
373 \storePredefinedDiagram #default-fret-table \chordmode {a:7}
376 \storePredefinedDiagram #default-fret-table \chordmode {a:maj7}
378 #"x;o;2-2;1-1;2-3;o;"
379 \storePredefinedDiagram #default-fret-table \chordmode {a:m7}
385 \storePredefinedDiagram #default-fret-table \chordmode {ais}
387 #(chord-shape 'bes guitar-tuning)
388 \storePredefinedDiagram #default-fret-table \chordmode {ais:m}
390 #(chord-shape 'bes:m guitar-tuning)
391 \storePredefinedDiagram #default-fret-table \chordmode {ais:aug}
393 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
394 \storePredefinedDiagram #default-fret-table \chordmode {ais:dim}
396 #(offset-fret 1 (chord-shape 'a:dim guitar-tuning))
397 \storePredefinedDiagram #default-fret-table \chordmode {ais:7}
399 #(chord-shape 'bes:7 guitar-tuning)
400 \storePredefinedDiagram #default-fret-table \chordmode {ais:maj7}
402 #"x;1-1;3-3;2-2;3-4;x;"
403 \storePredefinedDiagram #default-fret-table \chordmode {ais:m7}
405 #(chord-shape 'bes:m7 guitar-tuning)
409 \storePredefinedDiagram #default-fret-table \chordmode {bes}
411 #(chord-shape 'bes guitar-tuning)
412 \storePredefinedDiagram #default-fret-table \chordmode {bes:m}
414 #(chord-shape 'bes:m guitar-tuning)
415 \storePredefinedDiagram #default-fret-table \chordmode {bes:aug}
417 #"2-2;1-1;o;3-4-(;3-4-);2-3;"
418 \storePredefinedDiagram #default-fret-table \chordmode {bes:dim}
420 #(offset-fret 1 (chord-shape 'a:dim guitar-tuning))
421 \storePredefinedDiagram #default-fret-table \chordmode {bes:7}
423 #(chord-shape 'bes:7 guitar-tuning)
424 \storePredefinedDiagram #default-fret-table \chordmode {bes:maj7}
426 #"x;1-1;3-3;2-2;3-4;x;"
427 \storePredefinedDiagram #default-fret-table \chordmode {bes:m7}
429 #(chord-shape 'bes:m7 guitar-tuning)
433 \storePredefinedDiagram #default-fret-table \chordmode {b}
435 #(offset-fret 1 (chord-shape 'bes guitar-tuning))
436 \storePredefinedDiagram #default-fret-table \chordmode {b:m}
438 #(offset-fret 1 (chord-shape 'bes:m guitar-tuning))
439 \storePredefinedDiagram #default-fret-table \chordmode {b:aug}
442 \storePredefinedDiagram #default-fret-table \chordmode {b:dim}
445 \storePredefinedDiagram #default-fret-table \chordmode {b:7}
447 #(offset-fret 1 (chord-shape 'bes:7 guitar-tuning))
448 \storePredefinedDiagram #default-fret-table \chordmode {b:maj7}
450 #"x;2-1;4-3;3-2;4-4;x;"
451 \storePredefinedDiagram #default-fret-table \chordmode {b:m7}
453 #(offset-fret 1 (chord-shape 'bes:m7 guitar-tuning))
455 #(set! pitchnames prev-pitchnames)