release commit
[lilypond.git] / input / test / transposition.ly
blob79007d0df9569e44e69cd8196b9adb74a648c78d
2 \version "1.9.6"
4 \header{ texidoc = "@cindex Transposition
5 Transposition test file."
9 %{
10 Hi all,
12 I have extend Mats' patches to allow accidental transposition:
13 \keysignature bes es fis
14 = \transpose c' d =>>
15 \keysignature gis
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
22 Eric
24 - Note that transpose eses of fis-major = as-major
25 - Note also that key signatures specified with \property keySignature
26 are not transposed!
28 /Mats B, March 21, 2001
34 vOne = \notes \relative c''{
35 \clef"violin"
36 \key d \major
37 \time 2/4
38 d4 d |
39 \key fis \major
40 fis4 fis |
41 \key es \major
42 c4 c |
45 vTwo = \notes \transpose c d { \vOne }
47 vThree = \notes \relative c''{
48 \clef"violin"
49 % \keysignature fis cis
50 \property Staff.keySignature = #'((0 . 2)(3 . 2))
51 \time 2/4
52 d4 d |
53 % \keysignature bes es fis
54 \property Staff.keySignature = #'((3 . 2)(2 . -2)(6 . -2))
55 fis4 fis |
56 % \keysignature fis cis gis dis ais eis
57 \property Staff.keySignature = #'((2 . -2)(5 . -2)(1 . 2)(4 . 2)(0 . 2)(3 . 2))
58 cis4 ais4 |
61 vFour = \notes \transpose c d \vThree
63 \score {
64 \context StaffGroup <<
65 \new Staff \vOne
66 \new Staff \vTwo
67 \new Staff \vThree
68 \new Staff \vFour
70 \paper { linewidth= 130.\mm raggedright = ##t }