]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/incipit.ly
* scripts/convert-ly.py (FatalConversionError.conv): conversion
[lilypond.git] / input / test / incipit.ly
index d2057b2d7786def493734593c52ec7aed5208bdd..b430c7cbf1b98f3a38ad79862dd05914789656b6 100644 (file)
@@ -1,50 +1,65 @@
-%{
- Test of how to make an ``incipit'' to indicate scordatora 
- tuning of a violin part, using the clefStyle property.
- The two first bars of Biber's Rosary sonata III.
+\version "1.7.18"
+\header { texidoc = "@cindex Incipit
+This shows how to make an ``incipit'' to indicate scordatora 
+tuning of a violin part, using the clefStyle property.
+The two first bars of Biber's Rosary sonata III. " }
 
-   /Mats B
-%}
-
-\version "1.1.52";
+violinincipit =  \notes\relative c''{
+  \clef "french"
+  \time 2/2
+  \property Staff.TimeSignature \override #'style = #'old
+  a4. b8 c4 fis |
+%  <<b fis' b d>>1
+  \property Staff.TimeSignature \override #'style = #'C
+}
 
-incipit = \notes\relative c'{
-  <b1 fis' b d>
+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
 
   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 \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
+    }}
+  >
+       \paper { raggedright = ##t }
 }  
 
+%% new-chords-done %%