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