]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/key-clefs.ly
Issue 5148/2: three-sided-box snippet: use #:properties keyword
[lilypond.git] / input / regression / key-clefs.ly
index 8d68529ea1a232cfe803d1691492c18dacd32a3d..d4e224dc5dffb136ec9b0a6def7012961e3eda46 100644 (file)
@@ -1,15 +1,17 @@
 
-\version "2.10.0"
-\header { texidoc = "Each clef have own accidental placing rules. " }
+\version "2.19.21"
+\header { texidoc = "Each clef has its own accidental placing
+rules, which can be adjusted using @code{sharp-positions}
+and @code{flat-positions}." }
 
 #(set-global-staff-size 16)
 
 
-\relative cis' {
+\relative {
 
                                % \clef french % same as octaviated bass
   \clef violin
-  \key cis \major cis1  \key ces \major ces
+  \key cis \major cis'1  \key ces \major ces
   \clef soprano
   \key cis \major cis \key ces \major ces \break
   \clef mezzosoprano
   \key cis \major cis \key ces \major ces
   \clef bass
   \key cis \major cis \key ces \major  ces
+  \break R1
+  \override Score.RehearsalMark.self-alignment-X = #LEFT
+  \override Score.RehearsalMark.font-size = #0
+  \mark "B-sharp on top"
+  \override Staff.KeySignature.sharp-positions = #'(6 0 1 2 3 4 5)
+  \override Staff.KeyCancellation.sharp-positions = #'(6 0 1 2 3 4 5)
+  \key cis \major R
+  \mark "Flats throughout the staff"
+  \override Staff.KeySignature.flat-positions = #'((-5 . 5))
+  \override Staff.KeyCancellation.flat-positions = #'((-5 . 5))
+  \key ces \major R
+  \clef tenor
+  \key cis \major cis \break \key ces \major ces
+  \clef treble
+  \key cis \major cis \key ces \major ces
 }
 
-
-