]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/transposition.ly
* scm/define-grobs.scm (all-grob-descriptions): remove
[lilypond.git] / input / test / transposition.ly
index 4c72d50d1c92ceb94e44dc638c95659948a75d6f..79007d0df9569e44e69cd8196b9adb74a648c78d 100644 (file)
@@ -1,5 +1,5 @@
-#(ly:set-option 'old-relative)
-\version "1.9.0"
+
+\version "1.9.6"
 
 \header{ texidoc = "@cindex Transposition
 Transposition test file."
@@ -11,7 +11,7 @@ Hi all,
 
 I have extend Mats' patches to allow accidental transposition:
         \keysignature bes es fis
-               = \transpose c' d =>
+               = \transpose c' d =>>
         \keysignature gis
 
 As you can see in output =  the example file "test.ly" there are a few problems left:
@@ -47,26 +47,26 @@ vTwo =  \notes \transpose c d { \vOne }
 vThree =  \notes \relative c''{
         \clef"violin"
 %        \keysignature fis cis
-       \property Staff.keySignature = #'((0 . 1)(3 . 1))
+       \property Staff.keySignature = #'((0 . 2)(3 . 2))
         \time 2/4 
         d4 d |       
 %        \keysignature bes es fis
-       \property Staff.keySignature = #'((3 . 1)(2 . -1)(6 . -1))
+       \property Staff.keySignature = #'((3 . 2)(2 . -2)(6 . -2))
         fis4 fis |         
 %        \keysignature fis cis gis dis ais eis
-       \property Staff.keySignature = #'((2 . -1)(5 . -1)(1 . 1)(4 . 1)(0 . 1)(3 . 1))
+       \property Staff.keySignature = #'((2 . -2)(5 . -2)(1 . 2)(4 . 2)(0 . 2)(3 . 2))
         cis4 ais4 |
 }
 
 vFour =  \notes \transpose c d \vThree
 
 \score {
-  \context StaffGroup <
-         \context Staff=vOne \vOne
-         \context Staff=vTwo \vTwo
-         \context Staff=vThree \vThree
-         \context Staff=vFour \vFour
-  >
+  \context StaffGroup <<
+         \new Staff \vOne
+         \new Staff \vTwo
+         \new Staff \vThree
+         \new Staff \vFour
+  >>
         \paper { linewidth= 130.\mm raggedright = ##t }
 }