01-song1: Start notation of song 1.
authorrekado <rekado@elephly.net>
Sat, 12 Mar 2016 12:48:05 +0000 (13:48 +0100)
committerrekado <rekado@elephly.net>
Sat, 12 Mar 2016 12:48:05 +0000 (13:48 +0100)
01-song1/01-song1.ly [new file with mode: 0644]
01-song1/Makefile [new file with mode: 0644]
01-song1/parts/stick.ly [new file with mode: 0644]

diff --git a/01-song1/01-song1.ly b/01-song1/01-song1.ly
new file mode 100644 (file)
index 0000000..86ee485
--- /dev/null
@@ -0,0 +1,44 @@
+\version "2.19.27"
+
+\header {
+  title = "Song 1"
+  composer = "The very pretentious elephlies"
+  arranger = "Ricardo Wurmus"
+  copyright = "2002--2016 Ricardo Wurmus"
+}
+
+\include "parts/stick.ly"
+
+AllMusic = <<
+  \new Staff = "grand stick" { \stick }
+>>
+
+%% Two scores are needed: one with unfolded repeats for MIDI and the
+%% other with regular repeats for notation.
+\score {
+  \unfoldRepeats {
+    <<
+      \AllMusic
+    >>
+  }
+  \midi { \tempo 4 = 180 }
+}
+
+\score {
+  \AllMusic
+  \layout {
+    \tempo 4 = 180
+    \context {
+      %% add the RemoveEmptyStaffContext that erases rest-only staves
+      \Staff \RemoveEmptyStaves
+    }
+    \context {
+      \Score
+      \numericTimeSignature
+      %% Remove all-rest staves also in the first system
+      \override VerticalAxisGroup.remove-first = ##t
+      %% If only one non-empty staff in a system exists, still print the starting bar
+      \override SystemStartBar.collapse-height = #1
+    }
+  }
+}
diff --git a/01-song1/Makefile b/01-song1/Makefile
new file mode 100644 (file)
index 0000000..dfbb399
--- /dev/null
@@ -0,0 +1,2 @@
+NAME = 01-song1
+include ../targets.mk
diff --git a/01-song1/parts/stick.ly b/01-song1/parts/stick.ly
new file mode 100644 (file)
index 0000000..1d9e2d0
--- /dev/null
@@ -0,0 +1,77 @@
+stickIntroLeft = \relative c {
+  b8  cis gis' r gis r gis b, ~ |
+  b8  cis gis' r gis r gis b, ~ |
+  b8  cis gis' r gis r gis r    |
+  e8  b' e, b' dis,8 b' dis, b' |
+
+  b,8 cis gis' r gis r gis b, ~ |
+  b8  cis gis' r gis r gis b, ~ |
+  b8  cis gis' r gis r gis r    |
+  <e b'>2 <dis b'> |
+}
+
+stickIntroRight = \relative c {
+  \repeat unfold 3 { <fis b dis>4 r8 <gis cis e>4 <gis cis e> r8 | }
+  <gis b e>2 <fis b dis> |
+  \repeat unfold 3 { <fis b dis>4 r8 <gis cis e>4 <gis cis e> r8 | }
+  a'8 gis fis e
+  dis16 e dis8 b4
+}
+
+stickALeft = \relative c' {
+  \time 2/4
+  cis8 r cis r | r r cis r | r r cis cis |
+  cis8 r cis r | r r cis r |
+  \time 6/8
+  r r cis r cis cis  |
+
+  \time 2/4
+  cis8 r cis r | r r cis r | r r cis r   |
+  \time 4/4
+  r8 cis cis r  cis cis r cis | cis r cis cis  r cis cis r |
+}
+
+stickARight = \relative c' {
+  \time 2/4
+  r4 r | <e gis>4 r8 <dis fis> | r <dis fis> r r |
+  r4 r | <e gis>4 r8 <dis fis> |
+  \time 6/8
+  r <dis fis> r <e gis> r r|
+
+  \time 2/4
+  r4 r | <e gis>4 r8 <dis fis> | r <dis fis> r r |
+  \time 4/4
+  <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
+}
+
+stick = \new PianoStaff <<
+  \set PianoStaff.midiInstrument = #"clav"
+  \set PianoStaff.pedalSustainStyle = #'bracket
+
+  \new Staff \relative c' {
+    \set Staff.midiPanPosition = #-0.7
+    \key cis \minor
+    \clef "treble_8"
+
+    %% intro
+    \time 4/4
+    \repeat volta 2 \stickIntroRight
+    \repeat volta 2 \stickARight
+  }
+
+  %% staff for left hand side
+  \new Staff \relative c  {
+    \set Staff.midiPanPosition = #0.7
+    \key cis \minor
+    \clef "bass"
+
+    %% intro
+    \time 4/4
+    \repeat volta 2 \stickIntroLeft
+    \repeat volta 2 \stickALeft
+  }
+>>
+
+%% Local Variables:
+%% compile-command: "make -C .."
+%% End: