]> git.donarmstrong.com Git - lilypond.git/blob - input/test/chord-names-german.ly
9a53d50882d941313aee3a26a0bccca46dbde114
[lilypond.git] / input / test / chord-names-german.ly
1 \version "2.1.26"
2 \header  {
3     texidoc = "@cindex Chord Names German
4 The english naming of chords (default) can be changed to german 
5 (@code{\germanChords} replaces B and Bes to H and B) or semi-german 
6 (@code{\semiGermanChords} replaces B and Bes to H and Bb).
7
8 " }
9
10 scm = \chords {
11     c1/c cis/cis
12     % yeah, we get the idea. -hwn
13     
14     % cisis/cisis ces/ces ceses/ceses
15     b/b bis/bis bes/bes
16     % beses/beses
17
18 \score {
19 \notes <<
20     \context ChordNames { \scm }
21     \new ChordNames {
22         \set instrument = #"german"
23         \germanChords \scm }
24     \new ChordNames {
25         \set instrument = #"semi-german"
26         \semiGermanChords \scm }
27     \context Voice {  \scm } >>
28 \paper {
29     raggedright = ##t 
30     \translator {\ChordNamesContext \consists Instrument_name_engraver }}
31
32 }