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