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