white noise: Create wrappers for each part.
authorrekado <rekado@elephly.net>
Fri, 2 Sep 2016 06:10:56 +0000 (08:10 +0200)
committerrekado <rekado@elephly.net>
Fri, 2 Sep 2016 06:10:56 +0000 (08:10 +0200)
04-white-noise/04-white-noise.ly
04-white-noise/music/stick.ly
04-white-noise/parts/bass.ly [new file with mode: 0644]
04-white-noise/parts/keys.ly [new file with mode: 0644]
04-white-noise/parts/stick.ly [new file with mode: 0644]

index 2a800c3995fd2f6ea9038a591998e7355a96862c..3462fa76efc3abcccdcf9bbe513a56aed0f05e30 100644 (file)
 \include "music/stick.ly"
 \include "music/click.ly"
 
+\layout {
+  ragged-last = ##t
+  indent = 2\cm
+  short-indent = 1.5\cm
+}
+
 AllMusic = <<
-  \new Staff = "keyboard"    { \keyboard }
-  \new Staff = "bass"        { \bass }
-  \new Staff = "grand stick" { \stick }
+  \new Staff = "keyboard"
+  \with {
+    instrumentName = #"Synthesizer"
+    shortInstrumentName = #"Synth"
+    pedalSustainStyle = #'bracket
+  } { \keyboard }
+  \new StaffGroup = "bass"
+  \with {
+    instrumentName = #"Bass"
+    shortInstrumentName = #"Bass"
+  } { \bass }
+  \new PianoStaff = "grand stick"
+  \with {
+    instrumentName = #"Grand Stick"
+    shortInstrumentName = #"Stick"
+    midiInstrument = #"clav"
+    pedalSustainStyle = #'bracket
+  } { \stick }
 >>
 
 %% Two scores are needed: one with unfolded repeats for MIDI and the
index 579d7330d970b5c60c65f3278ed8e0b603773d06..f7e86309a5bb9efecc5ab96dfbf12f4882c50835 100644 (file)
@@ -197,7 +197,7 @@ stickRight = {
   \repeat unfold 2 \stickShifterRight
 }
 
-stick = \new PianoStaff <<
+stick = <<
   \set PianoStaff.midiInstrument = #"electric guitar (jazz)"
   \set PianoStaff.pedalSustainStyle = #'bracket
 
diff --git a/04-white-noise/parts/bass.ly b/04-white-noise/parts/bass.ly
new file mode 100644 (file)
index 0000000..a56d445
--- /dev/null
@@ -0,0 +1,26 @@
+\version "2.19.27"
+
+\header {
+  title = "White Noise"
+  subtitle = "Bass"
+  composer = "The very pretentious elephlies"
+  copyright = \markup { \char ##x00A9 "2002—2016 Ricardo Wurmus" }
+}
+
+\include "../../settings.ly"
+\include "../music/common.ly"
+\include "../music/bass.ly"
+
+\score {
+  \compressMMRests { \bass }
+
+  \layout {
+    \tempo 4 = 120
+    indent = #0
+    short-indent = #0
+    \context {
+      \Score
+      \numericTimeSignature
+    }
+  }
+}
diff --git a/04-white-noise/parts/keys.ly b/04-white-noise/parts/keys.ly
new file mode 100644 (file)
index 0000000..797e17c
--- /dev/null
@@ -0,0 +1,29 @@
+\version "2.19.27"
+
+\header {
+  title = "White Noise"
+  subtitle = "Keyboard"
+  composer = "The very pretentious elephlies"
+  copyright = \markup { \char ##x00A9 "2002—2016 Ricardo Wurmus" }
+}
+
+\include "../../settings.ly"
+\include "../music/common.ly"
+\include "../music/keys.ly"
+
+\score {
+  \new PianoStaff = "keyboard" \with {
+    pedalSustainStyle = #'bracket
+  } {
+    \compressMMRests \keyboard
+  }
+  \layout {
+    \tempo 4 = 120
+    indent = #0
+    short-indent = #0
+    \context {
+      \Score
+      \numericTimeSignature
+    }
+  }
+}
diff --git a/04-white-noise/parts/stick.ly b/04-white-noise/parts/stick.ly
new file mode 100644 (file)
index 0000000..f74dfd8
--- /dev/null
@@ -0,0 +1,29 @@
+\version "2.19.27"
+
+\header {
+  title = "White Noise"
+  subtitle = "Grand Stick"
+  composer = "The very pretentious elephlies"
+  copyright = \markup { \char ##x00A9 "2002—2016 Ricardo Wurmus" }
+}
+
+\include "../../settings.ly"
+\include "../music/common.ly"
+\include "../music/stick.ly"
+
+\score {
+  \new PianoStaff = "grand stick" \with {
+    pedalSustainStyle = #'bracket
+  } {
+    \compressMMRests \stick
+  }
+  \layout {
+    \tempo 4 = 120
+    indent = #0
+    short-indent = #0
+    \context {
+      \Score
+      \numericTimeSignature
+    }
+  }
+}