song2: stick: Stereo-separate right and left hand.
[music/pretentious.git] / 02-song2 / parts / stick.ly
1 stickIntroLeft = \relative c {
2 \repeat unfold 2 {
3 <b a' d>8 r16 <b a' d>8 r16
4 <b gis' d'>4 b8 ~ <b gis' d'> b |
5 <b g' d'>8 r16 <b g' d'>8 r16
6 <b fis' d'>4 b8 ~ <b fis' d'>4 |
7
8 <b a' d>8 r16 <b a' d>8 r16
9 <b gis' d'>4 b8 ~ <b gis' d'> b |
10 <b g' d'>8 r16 <b g' d'>8 r16
11 <b fis' d'>8 ~ <b fis' d'>2 |
12 }
13 }
14
15 stickIntroRight = \relative c' {
16 %% TODO: make this solo more interesting
17 \repeat unfold 2 {
18 fis8. fis e4 r16 ais,16 b cis d gis, |
19 e'8. e d4 r4. |
20 fis8. fis e4 r4. |
21 d8. cis b4 r4. |
22 }
23 }
24
25 stickStanzaLeft = \relative c {
26 \repeat unfold 2 {
27 <b fis'>8 r16 <b fis'>8 r16
28 <b fis'>4 <b fis'>8 r <b fis'> |
29 <b g'>8 r16 <b g'>8 r16
30 <b fis'>4 <b fis'>8 ~ <b fis'>4 |
31
32 <b fis'>8 r16 <b fis'>8 r16
33 <e b>4 <e b>8 r <b fis'> |
34 } \alternative {
35 { <b g'>8 r16 <b g'>8 r16 <b fis'>2 r8 |}
36 %% TODO: find chords here
37 { g r16 a8 r16 d8 ~ d2 |}
38 }
39 }
40
41 stickStanzaRight = \relative c' {
42 \repeat unfold 2 {
43 <a d>8 r16 <a d>8 r16
44 <gis d'>4 r8 <gis d'> r |
45 <d' g>8 r16 <d g>8 r16
46 <d fis>4 r8 <d fis> r |
47
48 <a d>8 r16 <a d>8 r16
49 <gis d'>4 r8 <gis d'> r |
50 <d' g>8 r16 <d g>8 r16
51 <d fis>4. r4 |
52 }
53 }
54
55 %% TODO
56 stickBLeft = \transpose c d { \relative c {
57 <b fis'>8 r16 <b fis'>8 r16
58 <e b>4 <e b>8 r <e b> |
59 <g b d'>8 r16 <g b d'>8 r16
60 <d fis'>8 ~ <d fis'>2 |
61
62 <b fis'>8 r16 <b fis'>8 r16
63 <e b>4 <e b>8 r <b fis'> |
64 { g r16 a8 r16 d8 ~ d2 |}
65 }}
66
67 stickBRight = \relative c' {
68 <b e>8 r16 <b e>8 r16
69 <ais e'>4 r8 <ais e'> r |
70 a8. ~ <a e'>8 a16
71 gis4 r8 <gis e'> r |
72
73 <b e>8 r16 <b e>8 r16
74 <ais e'>4 r8 <ais e'> r |
75 <e' a>8 r16 <e a>8 r16
76 <e gis>4. r4 |
77 }
78
79 stickTransitionLeft = \relative c {
80 \repeat volta 2 {
81 R1 | R1 | R1 | R1 |
82 %% TODO: support chords
83 %%<cis fis a>1 | <b e gis>1 |
84 %%<a d fis>1 | <a cis fis>1 |
85 }
86 \repeat volta 4 {
87 r16 <fis cis'>8 <e b'>16 <fis cis'>8 <e b'>16
88 <fis cis'>8 <fis cis'>8 r16 r4 |
89 r16 <fis cis'>8 <e b'>16 <fis cis'>8 <e b'>16
90 <fis cis'>16 r16 <fis cis'>16 <e b'>4 r8 |
91 }
92 }
93
94 stickTransitionRight = \relative c' {
95 \repeat volta 2 {
96 <cis fis a>1 | <b e gis>1 |
97 <a d fis>1 | <a cis fis>1 |
98 }
99 \repeat volta 4 { R1 | R1 }
100 }
101
102
103
104 stick = \new PianoStaff <<
105 \set PianoStaff.midiInstrument = #"clav"
106 \set PianoStaff.pedalSustainStyle = #'bracket
107
108 \new Staff \relative c' {
109 \set Staff.midiPanPosition = #-0.5
110 \key b \minor
111 \clef "treble_8"
112
113 %% intro
114 \time 4/4
115 \stickIntroRight
116 \stickStanzaRight
117
118 \key e \major
119 \stickBRight
120
121 \key b \minor
122 \stickStanzaRight
123
124 \key e \major
125 \stickBRight
126
127 \key fis \minor
128 \stickTransitionRight
129 }
130
131 %% staff for left hand side
132 \new Staff \relative c {
133 \set Staff.midiPanPosition = #0.5
134 \key b \minor
135 \clef "bass"
136
137 %% intro
138 \time 4/4
139 \stickIntroLeft
140 \stickStanzaLeft
141
142 \key e \major
143 \stickBLeft
144
145 \key b \minor
146 \stickStanzaLeft
147
148 \key e \major
149 \stickBLeft
150
151 \key fis \minor
152 \stickTransitionLeft
153 }
154 >>
155