lilypond-0.0.33

diff --git a/input/wohltemperirt.ly b/input/wohltemperirt.ly
index c4c0f2455e849ea19787103f60baa2a997c47779..1038169bab11b74e0f4622c529e58da734f5bc66 100644 (file)
--- a/input/wohltemperirt.ly
+++ b/input/wohltemperirt.ly
@@ -8,9 +8,9 @@
 dux = music { $
        \clef \violin
        \duration { \last }
-       \stem{-1}
        
-        r8-"dux" ['c16 b] ['c8 g] [as 'c16 b] ['c8 'd] |
+        r8-"dux"       \stem{-1}
+       ['c16 b] ['c8 g] [as 'c16 b] ['c8 'd] |
        [g 'c16 b] ['c8 'd] [f16 g] as4 [g16 f] |
        [es 'c b a] [ g f es d] [c8 'es 'd 'c] |
        [bes a bes 'c] [fis g a fis] |
@@ -21,9 +21,10 @@ dux = music { $
 $}
 
 comes = music { $
-       r1 r1
-       \stem{1}
        \octave {'}
+       r1      \stem{1}
+ |
+       r1 |
        r8-"comes" [g16 fis] [g8 c] [es g16 f] [g8 a]|
        [d8 g16 fis] [g8 a] [c16 d] es4 [d16 c] |
        [`bes8 es16 d] [es8 `g8] [`as f16 es] [f8 `a] 
@@ -35,11 +36,16 @@ $}
 
 bassdux = music { $
        \clef \bass
-       r1 r r r r r
        \octave { }
+       r1 |
+       r |
+       r |
+       r |
+       r |
+       r |
        r8 [c16 B] [c8 G] [As c16 B] [c8 d] |
-       [G c16 B] [c8 d] [F16 G] As4 [G16 F] | $
-}
+       [G c16 B] [c8 d] [F16 G] As4 [G16 F] | 
+$}
 
 basstaf = staff { melodic
        music { bassdux }
@@ -58,5 +64,11 @@ score {
                grouping {2*2}
                key {$bes es as$}
        }
+       staff { midi music { dux } }
+       staff { midi music { comes } }
+       staff { midi music { bassdux } }
+       midi {
+               tempo 4:80
+       }
 }