]> git.donarmstrong.com Git - lilypond.git/blob - ly/predefined-guitar-fretboards.ly
fbdb0c790bec86279f166e3378b696cfd0b7d98a
[lilypond.git] / ly / predefined-guitar-fretboards.ly
1 %%%% This file is part of LilyPond, the GNU music typesetter.
2 %%%%
3 %%%% Copyright (C) 2008--2012 Carl D. Sorensen <c_sorensen@byu.edu>
4 %%%%
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.
9 %%%%
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.
14 %%%%
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/>.
17
18 % chord definitions require default pitchnames
19 \languageSaveAndChange #default-language
20
21 \include "predefined-guitar-ninth-fretboards.ly"
22
23 %%%  Add basic chordshapes
24
25 \version "2.16.0"
26
27 \addChordShape #'f #guitar-tuning #"1-1-(;3-3;3-4;2-2;1-1;1-1-);"
28 \addChordShape #'f:m #guitar-tuning #"1-1-(;3-3;3-4;1-1;1-1;1-1-);"
29 \addChordShape #'f:7 #guitar-tuning #"1-1-(;3-3;1-1;2-2;1-1;1-1-);"
30 \addChordShape #'f:m7 #guitar-tuning #"1-1-(;3-3;1-1;1-1;1-1;1-1-);"
31 \addChordShape #'bes #guitar-tuning #"x;1-1-(;3-2;3-3;3-4;1-1-);"
32 \addChordShape #'bes:m #guitar-tuning #"x;1-1-(;3-3;3-4;2-2;1-1-);"
33 \addChordShape #'bes:dim #guitar-tuning #"x;1-1;2-2;3-4;2-3;x;"
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:dim7 #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 #'d:dim #guitar-tuning #"x;x;3-3;1-1-(;3-4;1-1-);"
41 \addChordShape #'ees:dim7 #guitar-tuning #"x;x;1-1;2-3;1-2;2-4;"
42
43 %%%  Add predefined chords
44
45 % definitions of predefined diagrams below here
46
47 %%%%  c chords
48 %
49 \storePredefinedDiagram #default-fret-table \chordmode {c}
50                         #guitar-tuning
51                         #"x;3-3;2-2;o;1-1;o;"
52 \storePredefinedDiagram #default-fret-table \chordmode {c:m}
53                         #guitar-tuning
54                         #(offset-fret 2 (chord-shape 'bes:m guitar-tuning))
55 \storePredefinedDiagram #default-fret-table \chordmode {c:aug}
56                         #guitar-tuning
57                         #(chord-shape 'c:aug guitar-tuning)
58 \storePredefinedDiagram #default-fret-table \chordmode {c:dim}
59                         #guitar-tuning
60                         #(offset-fret 2 (chord-shape 'bes:dim guitar-tuning))
61 \storePredefinedDiagram #default-fret-table \chordmode {c:dim7}
62                         #guitar-tuning
63                         #(chord-shape 'c:dim7 guitar-tuning)
64 \storePredefinedDiagram #default-fret-table \chordmode {c:7}
65                         #guitar-tuning
66                         #"o;3-3;2-2;3-4;1-1;o;"
67 \storePredefinedDiagram #default-fret-table \chordmode {c:maj7}
68                         #guitar-tuning
69                         #"x;3-3;2-2;o;o;o;"
70 \storePredefinedDiagram #default-fret-table \chordmode {c:m7}
71                         #guitar-tuning
72                         #(offset-fret 2 (chord-shape 'bes:m7 guitar-tuning))
73
74 %%%%  cis chords
75 %
76 \storePredefinedDiagram #default-fret-table \chordmode {cis}
77                         #guitar-tuning
78                         #(chord-shape 'cis guitar-tuning)
79 \storePredefinedDiagram #default-fret-table \chordmode {cis:m}
80                         #guitar-tuning
81                         #"x;x;2-2;1-1;2-3;o;"
82 \storePredefinedDiagram #default-fret-table \chordmode {cis:aug}
83                         #guitar-tuning
84                         #"x;4-4;3-3;2-1;2-2;x;"
85 \storePredefinedDiagram #default-fret-table \chordmode {cis:dim}
86                         #guitar-tuning
87                         #"x;x;2-3;o;2-4;o;"
88 \storePredefinedDiagram #default-fret-table \chordmode {cis:dim7}
89                         #guitar-tuning
90                         #(offset-fret 1 (chord-shape 'c:dim7 guitar-tuning))
91 \storePredefinedDiagram #default-fret-table \chordmode {cis:7}
92                         #guitar-tuning
93                         #"x;x;3-2;4-3;2-1;4-4;"
94 \storePredefinedDiagram #default-fret-table \chordmode {cis:maj7}
95                         #guitar-tuning
96                         #"x;4-4;3-3;1-1-(;1-1;1-1-);"
97 \storePredefinedDiagram #default-fret-table \chordmode {cis:m7}
98                         #guitar-tuning
99                         #"x;4-4;2-2;1-1;o;o;"
100
101 %%%%  des chords
102 %
103 \storePredefinedDiagram #default-fret-table \chordmode {des}
104                         #guitar-tuning
105                         #"x;x;3-3;1-1-(;2-2;1-1-);"
106 \storePredefinedDiagram #default-fret-table \chordmode {des:m}
107                         #guitar-tuning
108                         #"x;x;2-2;1-1;2-3;o;"
109 \storePredefinedDiagram #default-fret-table \chordmode {des:aug}
110                         #guitar-tuning
111                         #"x;4-4;3-3;2-1;2-2;x;"
112 \storePredefinedDiagram #default-fret-table \chordmode {des:dim}
113                         #guitar-tuning
114                         #"x;x;2-3;o;2-4;o;"
115 \storePredefinedDiagram #default-fret-table \chordmode {des:dim7}
116                         #guitar-tuning
117                         #(offset-fret 1 (chord-shape 'c:dim7 guitar-tuning))
118 \storePredefinedDiagram #default-fret-table \chordmode {des:7}
119                         #guitar-tuning
120                         #"x;x;3-2;4-3;2-1;4-4;"
121 \storePredefinedDiagram #default-fret-table \chordmode {des:maj7}
122                         #guitar-tuning
123                         #"x;4-4;3-3;1-1-(;1-1;1-1-);"
124 \storePredefinedDiagram #default-fret-table \chordmode {des:m7}
125                         #guitar-tuning
126                         #"x;4-4;2-2;1-1;o;o;"
127
128 %%%%  d chords
129 %
130 \storePredefinedDiagram #default-fret-table \chordmode {d}
131                         #guitar-tuning
132                         #"x;x;o;2-1;3-3;2-2;"
133 \storePredefinedDiagram #default-fret-table \chordmode {d:m}
134                         #guitar-tuning
135                         #"x;x;o;2-2;3-3;1-1;"
136 \storePredefinedDiagram #default-fret-table \chordmode {d:aug}
137                         #guitar-tuning
138                         #"x;x;o;3-2;3-3;2-1;"
139 \storePredefinedDiagram #default-fret-table \chordmode {d:dim}
140                         #guitar-tuning
141                         #"x;x;o;1-1-(;3-3;1-1-);"
142 \storePredefinedDiagram #default-fret-table \chordmode {d:dim7}
143                         #guitar-tuning
144                         #"x;x;o;1-1;o;1-2;"
145 \storePredefinedDiagram #default-fret-table \chordmode {d:7}
146                         #guitar-tuning
147                         #"x;x;o;2-2;1-1;2-3;"
148 \storePredefinedDiagram #default-fret-table \chordmode {d:maj7}
149                         #guitar-tuning
150                         #"x;x;o;2-1;2-2;2-3;"
151 \storePredefinedDiagram #default-fret-table \chordmode {d:m7}
152                         #guitar-tuning
153                         #"x;x;o;2-2;1-1-(;1-1-);"
154
155 %%%%  dis chords
156 %
157 \storePredefinedDiagram #default-fret-table \chordmode {dis}
158                         #guitar-tuning
159                         #(offset-fret 2 (chord-shape 'cis guitar-tuning))
160 \storePredefinedDiagram #default-fret-table \chordmode {dis:m}
161                         #guitar-tuning
162                         #"x;x;4-3;3-2;4-4;1-1;"
163 \storePredefinedDiagram #default-fret-table \chordmode {dis:aug}
164                         #guitar-tuning
165                         #"3-3;2-2;1-1;o;o;3-4;"
166 \storePredefinedDiagram #default-fret-table \chordmode {dis:dim}
167                         #guitar-tuning
168                         #(offset-fret 1 (chord-shape 'd:dim guitar-tuning))
169 \storePredefinedDiagram #default-fret-table \chordmode {dis:dim7}
170                         #guitar-tuning
171                         #(chord-shape 'ees:dim7 guitar-tuning)
172 \storePredefinedDiagram #default-fret-table \chordmode {dis:7}
173                         #guitar-tuning
174                         #"x;x;1-1;3-3;2-2;3-4;"
175 \storePredefinedDiagram #default-fret-table \chordmode {dis:maj7}
176                         #guitar-tuning
177                         #"x;x;1-1;3-2;3-3;3-4;"
178 \storePredefinedDiagram #default-fret-table \chordmode {dis:m7}
179                         #guitar-tuning
180                         #"x;x;1-1;3-2;2-3;2-4;"
181
182 %%%%  ees chords
183 %
184 \storePredefinedDiagram #default-fret-table \chordmode {ees}
185                         #guitar-tuning
186                         #(offset-fret 2 (chord-shape 'cis guitar-tuning))
187 \storePredefinedDiagram #default-fret-table \chordmode {ees:m}
188                         #guitar-tuning
189                         #"x;x;4-3;3-2;4-4;1-1;"
190 \storePredefinedDiagram #default-fret-table \chordmode {ees:aug}
191                         #guitar-tuning
192                         #"3-3;2-2;1-1;o;o;3-4;"
193 \storePredefinedDiagram #default-fret-table \chordmode {ees:dim}
194                         #guitar-tuning
195                         #(offset-fret 1 (chord-shape 'd:dim guitar-tuning))
196 \storePredefinedDiagram #default-fret-table \chordmode {ees:dim7}
197                         #guitar-tuning
198                         #(chord-shape 'ees:dim7 guitar-tuning)
199 \storePredefinedDiagram #default-fret-table \chordmode {ees:7}
200                         #guitar-tuning
201                         #"x;x;1-1;3-3;2-2;3-4;"
202 \storePredefinedDiagram #default-fret-table \chordmode {ees:maj7}
203                         #guitar-tuning
204                         #"x;x;1-1;3-2;3-3;3-4;"
205 \storePredefinedDiagram #default-fret-table \chordmode {ees:m7}
206                         #guitar-tuning
207                         #"x;x;1-1;3-2;2-3;2-4;"
208
209 %%%%  e chords
210 %
211 \storePredefinedDiagram #default-fret-table \chordmode {e}
212                         #guitar-tuning
213                         #"o;2-2;2-3;1-1;o;o;"
214 \storePredefinedDiagram #default-fret-table \chordmode {e:m}
215                         #guitar-tuning
216                         #"o;2-2;2-3;o;o;o;"
217 \storePredefinedDiagram #default-fret-table \chordmode {e:aug}
218                         #guitar-tuning
219                         #"o;3-3;2-2;1-1;x;x;"
220 \storePredefinedDiagram #default-fret-table \chordmode {e:dim}
221                         #guitar-tuning
222                         #(offset-fret 2 (chord-shape 'd:dim guitar-tuning))
223 \storePredefinedDiagram #default-fret-table \chordmode {e:dim7}
224                         #guitar-tuning
225                         #(offset-fret 1 (chord-shape 'ees:dim7 guitar-tuning))
226 \storePredefinedDiagram #default-fret-table \chordmode {e:7}
227                         #guitar-tuning
228                         #"o;2-2;o;1-1;o;o;"
229 \storePredefinedDiagram #default-fret-table \chordmode {e:maj7}
230                         #guitar-tuning
231                         #"o;2-3;1-1;1-2;o;x;"
232 \storePredefinedDiagram #default-fret-table \chordmode {e:m7}
233                         #guitar-tuning
234                         #"o;2-2;o;o;o;o;"
235
236 %%%%  f chords
237 %
238 \storePredefinedDiagram #default-fret-table \chordmode {f}
239                         #guitar-tuning
240                         #(chord-shape 'f guitar-tuning)
241 \storePredefinedDiagram #default-fret-table \chordmode {f:m}
242                         #guitar-tuning
243                         #(chord-shape 'f:m guitar-tuning)
244 \storePredefinedDiagram #default-fret-table \chordmode {f:aug}
245                         #guitar-tuning
246                         #"x;x;1-1;4-3;4-4;3-2;"
247 \storePredefinedDiagram #default-fret-table \chordmode {f:dim}
248                         #guitar-tuning
249                         #(offset-fret 3 (chord-shape 'd:dim guitar-tuning))
250 \storePredefinedDiagram #default-fret-table \chordmode {f:dim7}
251                         #guitar-tuning
252                         #"x;x;o;1-1;o;1-2;"
253 \storePredefinedDiagram #default-fret-table \chordmode {f:7}
254                         #guitar-tuning
255                         #(chord-shape 'f:7 guitar-tuning)
256 \storePredefinedDiagram #default-fret-table \chordmode {f:maj7}
257                         #guitar-tuning
258                         #"x;x;3-3;2-2;1-1;o;"
259 \storePredefinedDiagram #default-fret-table \chordmode {f:m7}
260                         #guitar-tuning
261                         #(chord-shape 'f:m7 guitar-tuning)
262
263 %%%%  fis chords
264 %
265 \storePredefinedDiagram #default-fret-table \chordmode {fis}
266                         #guitar-tuning
267                         #(offset-fret 1 (chord-shape 'f guitar-tuning))
268 \storePredefinedDiagram #default-fret-table \chordmode {fis:m}
269                         #guitar-tuning
270                         #(offset-fret 1 (chord-shape 'f:m guitar-tuning))
271 \storePredefinedDiagram #default-fret-table \chordmode {fis:aug}
272                         #guitar-tuning
273                         #"2-2;1-1;o;3-4-(;3-4-);2-3;"
274 \storePredefinedDiagram #default-fret-table \chordmode {fis:dim}
275                         #guitar-tuning
276                         #(offset-fret 4 (chord-shape 'd:dim guitar-tuning))
277 \storePredefinedDiagram #default-fret-table \chordmode {fis:dim7}
278                         #guitar-tuning
279                         #(chord-shape 'ees:dim7 guitar-tuning)
280 \storePredefinedDiagram #default-fret-table \chordmode {fis:7}
281                         #guitar-tuning
282                         #(offset-fret 1 (chord-shape 'f:7 guitar-tuning))
283 \storePredefinedDiagram #default-fret-table \chordmode {fis:maj7}
284                         #guitar-tuning
285                         #"x;x;4-4;3-3;2-2;1-1;"
286 \storePredefinedDiagram #default-fret-table \chordmode {fis:m7}
287                         #guitar-tuning
288                         #(offset-fret 1 (chord-shape 'f:m7 guitar-tuning))
289
290 %%%%  ges chords
291 %
292 \storePredefinedDiagram #default-fret-table \chordmode {ges}
293                         #guitar-tuning
294                         #(offset-fret 1 (chord-shape 'f guitar-tuning))
295 \storePredefinedDiagram #default-fret-table \chordmode {ges:m}
296                         #guitar-tuning
297                         #(offset-fret 1 (chord-shape 'f:m guitar-tuning))
298 \storePredefinedDiagram #default-fret-table \chordmode {ges:aug}
299                         #guitar-tuning
300                         #"2-2;1-1;o;3-4-(;3-4-);2-3;"
301 \storePredefinedDiagram #default-fret-table \chordmode {ges:dim}
302                         #guitar-tuning
303                         #(offset-fret 4 (chord-shape 'd:dim guitar-tuning))
304 \storePredefinedDiagram #default-fret-table \chordmode {ges:dim7}
305                         #guitar-tuning
306                         #(chord-shape 'ees:dim7 guitar-tuning)
307 \storePredefinedDiagram #default-fret-table \chordmode {ges:7}
308                         #guitar-tuning
309                         #(offset-fret 1 (chord-shape 'f:7 guitar-tuning))
310 \storePredefinedDiagram #default-fret-table \chordmode {ges:maj7}
311                         #guitar-tuning
312                         #"x;x;4-4;3-3;2-2;1-1;"
313 \storePredefinedDiagram #default-fret-table \chordmode {ges:m7}
314                         #guitar-tuning
315                         #(offset-fret 1 (chord-shape 'f:m7 guitar-tuning))
316
317 %%%%  g chords
318 %
319 \storePredefinedDiagram #default-fret-table \chordmode {g}
320                         #guitar-tuning
321                         #"3-2;2-1;o;o;o;3-3;"
322 \storePredefinedDiagram #default-fret-table \chordmode {g:m}
323                         #guitar-tuning
324                         #(offset-fret 2 (chord-shape 'f:m guitar-tuning))
325 \storePredefinedDiagram #default-fret-table \chordmode {g:aug}
326                         #guitar-tuning
327                         #"x;x;5-1;8-3;8-4;7-2;"
328 \storePredefinedDiagram #default-fret-table \chordmode {g:dim}
329                         #guitar-tuning
330                         #(offset-fret 5 (chord-shape 'd:dim guitar-tuning))
331 \storePredefinedDiagram #default-fret-table \chordmode {g:dim7}
332                         #guitar-tuning
333                         #(offset-fret 1 (chord-shape 'ees:dim7 guitar-tuning))
334 \storePredefinedDiagram #default-fret-table \chordmode {g:7}
335                         #guitar-tuning
336                         #"3-3;2-2;o;o;o;1-1;"
337 \storePredefinedDiagram #default-fret-table \chordmode {g:maj7}
338                         #guitar-tuning
339                         #"x;x;5-4;4-3;3-2;2-1;"
340 \storePredefinedDiagram #default-fret-table \chordmode {g:m7}
341                         #guitar-tuning
342                         #(offset-fret 2 (chord-shape 'f:m7 guitar-tuning))
343
344 %%%%  gis chords
345 %
346 \storePredefinedDiagram #default-fret-table \chordmode {gis}
347                         #guitar-tuning
348                         #(offset-fret 3 (chord-shape 'f guitar-tuning))
349 \storePredefinedDiagram #default-fret-table \chordmode {gis:m}
350                         #guitar-tuning
351                         #(offset-fret 3 (chord-shape 'f:m guitar-tuning))
352 \storePredefinedDiagram #default-fret-table \chordmode {gis:aug}
353                         #guitar-tuning
354                         #"o;3-4;2-3;1-1;1-2;o;"
355 \storePredefinedDiagram #default-fret-table \chordmode {gis:dim}
356                         #guitar-tuning
357                         #(offset-fret 6 (chord-shape 'd:dim guitar-tuning))
358 \storePredefinedDiagram #default-fret-table \chordmode {gis:dim7}
359                         #guitar-tuning
360                         #"x;x;o;1-1;o;1-2;"
361 \storePredefinedDiagram #default-fret-table \chordmode {gis:7}
362                         #guitar-tuning
363                         #(offset-fret 3 (chord-shape 'f:7 guitar-tuning))
364 \storePredefinedDiagram #default-fret-table \chordmode {gis:maj7}
365                         #guitar-tuning
366                         #"x;x;1-1-(;1-1;1-1-);3-3;"
367 \storePredefinedDiagram #default-fret-table \chordmode {gis:m7}
368                         #guitar-tuning
369                         #(offset-fret 3 (chord-shape 'f:m7 guitar-tuning))
370
371 %%%%  aes chords
372 %
373 \storePredefinedDiagram #default-fret-table \chordmode {aes}
374                         #guitar-tuning
375                         #(offset-fret 3 (chord-shape 'f guitar-tuning))
376 \storePredefinedDiagram #default-fret-table \chordmode {aes:m}
377                         #guitar-tuning
378                         #(offset-fret 3 (chord-shape 'f:m guitar-tuning))
379 \storePredefinedDiagram #default-fret-table \chordmode {aes:aug}
380                         #guitar-tuning
381                         #"o;3-4;2-3;1-1;1-2;o;"
382 \storePredefinedDiagram #default-fret-table \chordmode {aes:dim}
383                         #guitar-tuning
384                         #(offset-fret 6 (chord-shape 'd:dim guitar-tuning))
385 \storePredefinedDiagram #default-fret-table \chordmode {aes:dim7}
386                         #guitar-tuning
387                         #"x;x;o;1-1;o;1-2;"
388 \storePredefinedDiagram #default-fret-table \chordmode {aes:7}
389                         #guitar-tuning
390                         #(offset-fret 3 (chord-shape 'f:7 guitar-tuning))
391 \storePredefinedDiagram #default-fret-table \chordmode {aes:maj7}
392                         #guitar-tuning
393                         #"x;x;1-1-(;1-1;1-1-);3-3;"
394 \storePredefinedDiagram #default-fret-table \chordmode {aes:m7}
395                         #guitar-tuning
396                         #(offset-fret 3 (chord-shape 'f:m7 guitar-tuning))
397
398 %%%%  a chords
399 %
400 \storePredefinedDiagram #default-fret-table \chordmode {a}
401                         #guitar-tuning
402                         #"x;o;2-1;2-2;2-3;o;"
403 \storePredefinedDiagram #default-fret-table \chordmode {a:m}
404                         #guitar-tuning
405                         #"x;o;2-2;2-3;1-1;o;"
406 \storePredefinedDiagram #default-fret-table \chordmode {a:aug}
407                         #guitar-tuning
408                         #"x;o;3-4;2-2;2-3;1-1;"
409 \storePredefinedDiagram #default-fret-table \chordmode {a:dim}
410                         #guitar-tuning
411                         #"x;o;1-1;2-2;1-3;x;"
412 \storePredefinedDiagram #default-fret-table \chordmode {a:dim7}
413                         #guitar-tuning
414                         #(chord-shape 'ees:dim7 guitar-tuning)
415 \storePredefinedDiagram #default-fret-table \chordmode {a:7}
416                         #guitar-tuning
417                         #"x;o;2-1;o;2-3;o;"
418 \storePredefinedDiagram #default-fret-table \chordmode {a:maj7}
419                         #guitar-tuning
420                         #"x;o;2-2;1-1;2-3;o;"
421 \storePredefinedDiagram #default-fret-table \chordmode {a:m7}
422                         #guitar-tuning
423                         #"x;o;2-2;o;1-1;o;"
424
425 %%%%  ais chords
426 %
427 \storePredefinedDiagram #default-fret-table \chordmode {ais}
428                         #guitar-tuning
429                         #(chord-shape 'bes guitar-tuning)
430 \storePredefinedDiagram #default-fret-table \chordmode {ais:m}
431                         #guitar-tuning
432                         #(chord-shape 'bes:m guitar-tuning)
433 \storePredefinedDiagram #default-fret-table \chordmode {ais:aug}
434                         #guitar-tuning
435                         #"2-2;1-1;o;3-4-(;3-4-);2-3;"
436 \storePredefinedDiagram #default-fret-table \chordmode {ais:dim}
437                         #guitar-tuning
438                         #(chord-shape 'bes:dim guitar-tuning)
439 \storePredefinedDiagram #default-fret-table \chordmode {ais:dim7}
440                         #guitar-tuning
441                         #(offset-fret 1 (chord-shape 'ees:dim7 guitar-tuning))
442 \storePredefinedDiagram #default-fret-table \chordmode {ais:7}
443                         #guitar-tuning
444                         #(chord-shape 'bes:7 guitar-tuning)
445 \storePredefinedDiagram #default-fret-table \chordmode {ais:maj7}
446                         #guitar-tuning
447                         #"x;1-1;3-3;2-2;3-4;x;"
448 \storePredefinedDiagram #default-fret-table \chordmode {ais:m7}
449                         #guitar-tuning
450                         #(chord-shape 'bes:m7 guitar-tuning)
451
452 %%%%  bes chords
453 %
454 \storePredefinedDiagram #default-fret-table \chordmode {bes}
455                         #guitar-tuning
456                         #(chord-shape 'bes guitar-tuning)
457 \storePredefinedDiagram #default-fret-table \chordmode {bes:m}
458                         #guitar-tuning
459                         #(chord-shape 'bes:m guitar-tuning)
460 \storePredefinedDiagram #default-fret-table \chordmode {bes:aug}
461                         #guitar-tuning
462                         #"2-2;1-1;o;3-4-(;3-4-);2-3;"
463 \storePredefinedDiagram #default-fret-table \chordmode {bes:dim}
464                         #guitar-tuning
465                         #(chord-shape 'bes:dim guitar-tuning)
466 \storePredefinedDiagram #default-fret-table \chordmode {bes:dim7}
467                         #guitar-tuning
468                         #(offset-fret 1 (chord-shape 'ees:dim7 guitar-tuning))
469 \storePredefinedDiagram #default-fret-table \chordmode {bes:7}
470                         #guitar-tuning
471                         #(chord-shape 'bes:7 guitar-tuning)
472 \storePredefinedDiagram #default-fret-table \chordmode {bes:maj7}
473                         #guitar-tuning
474                         #"x;1-1;3-3;2-2;3-4;x;"
475 \storePredefinedDiagram #default-fret-table \chordmode {bes:m7}
476                         #guitar-tuning
477                         #(chord-shape 'bes:m7 guitar-tuning)
478
479 %%%%  b chords
480 %
481 \storePredefinedDiagram #default-fret-table \chordmode {b}
482                         #guitar-tuning
483                         #(offset-fret 1 (chord-shape 'bes guitar-tuning))
484 \storePredefinedDiagram #default-fret-table \chordmode {b:m}
485                         #guitar-tuning
486                         #(offset-fret 1 (chord-shape 'bes:m guitar-tuning))
487 \storePredefinedDiagram #default-fret-table \chordmode {b:aug}
488                         #guitar-tuning
489                         #"x;3-2;2-1;o;o;x;"
490 \storePredefinedDiagram #default-fret-table \chordmode {b:dim}
491                         #guitar-tuning
492                         #(offset-fret 1 (chord-shape 'bes:dim guitar-tuning))
493 \storePredefinedDiagram #default-fret-table \chordmode {b:dim7}
494                         #guitar-tuning
495                         #"x;x;o;1-1;o;1-2;"
496 \storePredefinedDiagram #default-fret-table \chordmode {b:7}
497                         #guitar-tuning
498                         #(offset-fret 1 (chord-shape 'bes:7 guitar-tuning))
499 \storePredefinedDiagram #default-fret-table \chordmode {b:maj7}
500                         #guitar-tuning
501                         #"x;2-1;4-3;3-2;4-4;x;"
502 \storePredefinedDiagram #default-fret-table \chordmode {b:m7}
503                         #guitar-tuning
504                         #(offset-fret 1 (chord-shape 'bes:m7 guitar-tuning))
505
506 \languageRestore