]> git.donarmstrong.com Git - lilypond.git/blob - input/test/transposition.ly
This commit was manufactured by cvs2svn to create tag 'lilypond_2_1_17'.
[lilypond.git] / input / test / transposition.ly
1
2 \version "1.9.6"
3
4 \header{ texidoc = "@cindex Transposition
5 Transposition test file."
6 }
7
8
9
10 vOne =  \notes \relative c''{
11         \clef"violin"
12         \key d \major
13         \time 2/4 
14         d4 d |       
15         \key fis \major
16         fis4 fis |         
17         \key es \major
18         c4 c |
19 }
20
21 vTwo =  \notes \transpose c d { \vOne }
22
23 vThree =  \notes \relative c''{
24         \clef"violin"
25 %        keysignature fis cis
26         \property Staff.keySignature = #'((0 . 2)(3 . 2))
27         \time 2/4 
28         d4 d |       
29 %        keysignature bes es fis
30         \property Staff.keySignature = #'((3 . 2)(2 . -2)(6 . -2))
31         fis4 fis |         
32 %        keysignature fis cis gis dis ais eis
33         \property Staff.keySignature = #'((2 . -2)(5 . -2)(1 . 2)(4 . 2)(0 . 2)(3 . 2))
34         cis4 ais4 |
35 }
36
37
38 vFour =  \notes \transpose c d \vThree
39
40 \score {
41   \context StaffGroup <<
42          \new Staff \vOne
43          \new Staff \vTwo
44          \new Staff \vThree
45          \new Staff \vFour
46   >>
47         \paper { linewidth= 130.\mm raggedright = ##t }
48 }
49
50
51
52