1 #(ly:set-option 'old-relative)
4 \header{ texidoc = "@cindex Transposition
5 Transposition test file."
12 I have extend Mats' patches to allow accidental transposition:
13 \keysignature bes es fis
17 As you can see in output = the example file "test.ly" there are a few problems left:
18 - key undo (already in the Todo)
19 - "wrong" transposition: e.g. \transpose c' d of fis-major = gis-major (better as-major?).
20 The solution gis=as etc. would concern both note and key transposistion
24 - Note that transpose eses of fis-major = as-major
25 - Note also that key signatures specified with \property keySignature
28 /Mats B, March 21, 2001
34 vOne = \notes \relative c''{
45 vTwo = \notes \transpose c d { \vOne }
47 vThree = \notes \relative c''{
49 % \keysignature fis cis
50 \property Staff.keySignature = #'((0 . 1)(3 . 1))
53 % \keysignature bes es fis
54 \property Staff.keySignature = #'((3 . 1)(2 . -1)(6 . -1))
56 % \keysignature fis cis gis dis ais eis
57 \property Staff.keySignature = #'((2 . -1)(5 . -1)(1 . 1)(4 . 1)(0 . 1)(3 . 1))
61 vFour = \notes \transpose c d \vThree
65 \context Staff=vOne \vOne
66 \context Staff=vTwo \vTwo
67 \context Staff=vThree \vThree
68 \context Staff=vFour \vFour
70 \paper { linewidth= 130.\mm raggedright = ##t }