]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/lsr/adding-drum-parts.ly
LSR: update.
[lilypond.git] / input / lsr / adding-drum-parts.ly
index 2e43f205b2ccb6b90b2ea8fda3db8d2a74a7e6ec..d00ab08965c7b719481cc9407f8f2c7730cc9a98 100644 (file)
@@ -12,34 +12,31 @@ clef symbol) and have noteheads according to the drum. You can easily
 attach an extra symbol to the drum, and restrict the number of lines. 
 " }
 % begin verbatim
-drh = \drummode { cymc4.^"crash" hhc16^"h.h." hh \repeat "unfold" 5 {hhc8 hho hhc8 hh16 hh} hhc4 r4 r2 }
-drl = \drummode {\repeat "unfold" 3 {bd4 sn8 bd bd4 << bd ss >> } bd8 tommh tommh bd toml toml bd tomfh16 tomfh }
-timb = \drummode { \repeat "unfold" 2 {timh4 ssh timl8 ssh r timh r4 ssh8 timl r4 cb8 cb} }
+drh = \drummode { cymc4.^"crash" hhc16^"h.h." hh hhc8 hho hhc8 hh16 hh hhc4 r4 r2 }
+drl = \drummode { bd4 sn8 bd bd4 << bd ss >>  bd8 tommh tommh bd toml toml bd tomfh16 tomfh }
+timb = \drummode { timh4 ssh timl8 ssh r timh r4 ssh8 timl r4 cb8 cb }
 
 \score {
-  \repeat "volta" 2 {
-    <<
-      \new DrumStaff \with {
-       drumStyleTable = #timbales-style
-       \override StaffSymbol #'line-count = #2
-       \override BarLine #'bar-size = #2
-      } <<
-       \set Staff.instrumentName = "timbales"
-       \timb
-      >>
-      \new DrumStaff <<
-       \set Staff.instrumentName = "drums"
-       \new DrumVoice {\stemUp \drh }
-       \new DrumVoice {\stemDown \drl }
-      >>
+  <<
+    \new DrumStaff \with {
+      drumStyleTable = #timbales-style
+      \override StaffSymbol #'line-count = #2
+      \override BarLine #'bar-size = #2
+    } <<
+      \set Staff.instrumentName = "timbales"
+      \timb
     >>
-  }
+    \new DrumStaff <<
+      \set Staff.instrumentName = "drums"
+      \new DrumVoice { \stemUp \drh }
+      \new DrumVoice { \stemDown \drl }
+    >>
+  >>
   \layout {}
   \midi {
     \context {
       \Score
       tempoWholesPerMinute = #(ly:make-moment 120 4)
-      }
     }
+  }
 }
-