* scm/double-plus-new-chord-name.scm (ignatzek-chord-names):

[lilypond.git] / input / scarlatti-test.ly

diff --git a/input/scarlatti-test.ly b/input/scarlatti-test.ly
index 988f0f92ad489444c48870f89291fcc8b0bca424..1c3a228fbe3cc772a1cddf0d65e0a695ae4eeca4 100644 (file)
--- a/input/scarlatti-test.ly
+++ b/input/scarlatti-test.ly
@@ -1,5 +1,9 @@
+\version "1.7.6"
 %K000.ly LilyPond 1.2.16
-
+\header {
+title="John's Scarlatti quotes"
+composer = "Domenico Scarlatti"
+}
 
 
 \include "scarlatti-properties.ly"
@@ -8,11 +12,11 @@
 \paper {
 \translator{\VoiceContext
   %% huh?
-  %%beamAutoBegin=0;
-  autoBeamSettings \override #'(end 1 8 * *) = #(make-moment 3 8)
-  autoBeamSettings \override #'(end 1 16 * *) = #(make-moment 3 8)
-  autoBeamSettings \override #'(end 1 24 * *) = #(make-moment 1 8)
-  autoBeamSettings \override #'(end 1 32 * *) = #(make-moment 1 8)
+  %%beamAutoBegin=0
+  autoBeamSettings \override #'(end 1 8 * *) = #(ly:make-moment 3 8)
+  autoBeamSettings \override #'(end 1 16 * *) = #(ly:make-moment 3 8)
+  autoBeamSettings \override #'(end 1 24 * *) = #(ly:make-moment 1 8)
+  autoBeamSettings \override #'(end 1 32 * *) = #(ly:make-moment 1 8)
 }
 }
 
@@ -29,22 +33,22 @@ ls={\property Voice.forceHorizontalShift="-0.6"}
 sls={\property Voice.forceHorizontalShift="-0.22"}
 rs={\property Voice.forceHorizontalShift="0.6"}
 srs={\property Voice.forceHorizontalShift="0.22"}
-ab={\property Voice.noAutoBeaming=##f}
-xb={\property Voice.noAutoBeaming=##t}
+ab={\property Voice.autoBeaming = ##t}
+xb={\property Voice.autoBeaming = ##f}
 %}
 
 
 \score{
 \context PianoStaff \notes<
 \context Staff=up<
-  \key d \major ;
-\time 3/8;
-\clef treble;
+  \key d \major 
+\time 3/8
+\clef treble
 \autochange Staff
 \context Voice=va< \zs
 \su
 \context Thread=ta{ \n
-\rh \sm[\times 2/3{a'32_"John's Scarlatti quotes" d'' fis''}\n a''16]a'8 g'~
+\rh \sm[\times 2/3{a'32 d'' fis''}\n a''16]a'8 g'~
 %a2
 g'8 _"1 Aug 2000" \times 2/3{a'16 b' cis'' d'' fis'' g''}|
 %a3
@@ -54,8 +58,8 @@ a'8 s \lh d''|
 %a5
 s8 \rh fis'' s|
 %a6
-a''32 s fis'' s d'' s a' s d' s a s \bar "||";
-\key f \major; 
+a''32 s fis'' s d'' s a' s d' s a s \bar "||"
+\key f \major 
 %a7
 r16 a' f'8. d'16~
 %a8
@@ -63,8 +67,8 @@ d'16 g' e'8. cis'16|
 %a9
 r16 a' f'8. d'16~
 %a10
-d'16 g' e'8. cis'16 \bar "||";
-\key d \major;
+d'16 g' e'8. cis'16 \bar "||"
+\key d \major
 %a11
 r16 fis' d'8. g'16~
 %a12
@@ -116,8 +120,8 @@ s8 gis''4|
 %a35
 s32 e' cis' a s a' e' cis' s cis'' a' e'|
 %a36
-\lh a'32 \rh[e'' cis'' a']\lh cis'' \rh[a'' e'' cis'']\lh a' \rh[a cis' e']\bar "||";
-\time 6/8;
+\lh a'32 \rh[e'' cis'' a']\lh cis'' \rh[a'' e'' cis'']\lh a' \rh[a cis' e']\bar "||"
+\time 6/8
 %a37
 gis''8 a'' gis'' a'' gis'' a''|
 }
@@ -337,9 +341,9 @@ s4.*6
 }>
 >
 \context Staff=down<
-\clef bass;
-\key d \major;
+\clef bass
+\key d \major
 s4.*38
->>
+> >
 }