]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/incipit.ly
release: 1.5.9
[lilypond.git] / input / test / incipit.ly
index b2cf14733f6e0bb308e506eb8466076bb5bb6e0e..08193f588f12542bad2b75cf937a91b0b0f07432 100644 (file)
@@ -1,3 +1,4 @@
+\version "1.3.146"
 %{
  Test of how to make an ``incipit'' to indicate scordatora 
  tuning of a violin part, using the clefStyle property.
@@ -6,47 +7,62 @@
    /Mats B
 %}
 
-\version "1.3.42";
 
-incipit = \notes\relative c'{
-  <b1 fis' b d>
+
+violinincipit =  \notes\relative c''{
+  \clef "french"
+  \time 2/2
+  \property Staff.TimeSignature \override #'style = #'old
+  a4. b8 c4 fis |
+%  <b1 fis' b d>
+  \property Staff.TimeSignature \override #'style = #'C
+}
+
+bcincipit =  \notes\relative c{
+  \clef bass
+  \property Staff.TimeSignature \override #'style = #'old
+  b2. cis4 | 
+  \property Staff.TimeSignature \override #'style = #'C
 }
 
-violin = \notes\relative c''{
-  \specialkey \keysignature f' fis'' g' gis'';
-  \time 2/2;
+violin =  \notes\relative c''{
+% Key signatures with different alterations in different octaves
+% are broken since 1.3.58!
+%  \specialkey \keysignature f' fis'' g' gis''
+  \key d \major
+  \time 2/2
+  \clef treble
 
-  \key;
   a4. b8 c4 fis |
-  gis~ gis8 fis16^\trill ()e b8 c \context Staff<{\voiceone a d}{\voicetwo es,4}>|
+  gis~ gis8 fis16^\trill ()e b8 c \context Staff<{\voiceOne a d}{\voiceTwo es,4}>|
 }
 
 BC  = \notes\relative c{
-  \key d;
-  \time 2/2;
-  \clef "bass";
+  \key d \major
+  \time 2/2
+  \clef "bass"
 
- \key;
+ \key \default
   b2. cis4 | 
   d e fis g |
 }
 
 \score{
-  \notes{
-    \context Staff=violin
-    \property Staff.clefStyle = "transparent" 
-      \incipit 
-    < \context Staff=violin { 
-      \bar ".|"; \endincipit
-      \violin}
-      \context Staff=cb { \property Staff.clefStyle = "transparent" 
-      \bar ".|";  \endincipit 
-      \BC}>
-  }
-  \paper{
-    \translator{\StaffContext
-      timeSignatureStyle = "C";
-    }
-  }
+  <
+    \context Staff = violin {\notes{
+      \property Staff.Clef \override #'transparent = ##t
+      \violinincipit \bar ".|" 
+      \property Staff.Clef \revert #'transparent 
+      \endincipit
+      \violin
+    }}
+    \context Staff = BC{\notes{
+      \property Staff.Clef \override #'transparent = ##t
+      \bcincipit \bar ".|" 
+      \property Staff.Clef \revert #'transparent 
+      \endincipit
+      \BC
+    }}
+  >
 }