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