blob: 38826945b814c34c7b7ae9a9d633c8f7b4628abe (
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
|
keysA = {
\repeat unfold 2 {
R1 | R1 | R1 |
} \alternative {
{ R1 |}
{ R1 |}
}
}
keysB = { R1 | R1 | R1 | R1 |}
keysTransition = \relative c' {
\repeat volta 2 {
<cis fis a>1 | <b e gis>1 |
<a d fis>1 | <a cis fis>1 |
}
%% TODO
\repeat volta 4 { R1 | R1 |}
}
keysThree = {
\time 6/8
\repeat unfold 2 { R2. | R2. |}
R2. | R2. | R2. |
\time 7/8 R8*7 |
}
keysMartaRekado = \relative c' {
\repeat unfold 2 {
\time 5/8
cis''16 a fis cis r cis8 fis a16 |
\time 7/8
gis8 e b e16 e8 fis16 r16 b,8 e16 |
} \alternative {
{ \time 2/4 cis8. a16 b a gis a |}
{ \time 2/4 cis8. a16 b a gis a |}
}
\time 3/4
d,16 a fis a fis' a
gis e b e gis b |
a fis d fis a cis
b gis e gis e' d |
%% TODE simplify
fis cis a gis a cis
b e e, a b cis |
%% TODO
\time 7/8
a a' fis cis cis d8 d8 r r8. |
}
keysReprise = \relative c' {
\time 4/4
\repeat unfold 2 {
<cis fis a cis>2 ~ <cis es a cis>2 |
<c f a d>4. ~ <cis fis a cis>8 ~ <cis fis a cis>2 |
<cis fis a fis'>2 ~ <cis es a fis'>2 |
<c f a d>4. ~ <cis fis a cis>8 ~ <cis fis a cis>2 |
}
}
keysFinal = \relative c' {
\ottava #-1
\repeat volta 4 {
\tuplet 6/2 { a'8\sustainOn fis dis cis a fis ~ } fis2 cis16\sustainOff dis gis8 |
a16 d fis d fis gis a8 ~ a2 |
%% TODO: simplify + use more simple arpeggios
\tuplet 6/2 { cis8 a fis dis cis fis, }
cis16 fis, b dis a' cis fis gis a b cis d
<cis a>16 r8 <b gis>16 r8 a16 gis fis\sustainOn cis a fis cis4\sustainOff
}
%% TODO: simplify more!
%% TODO: move these commented chords to stick?
%% <fis,, dis b>
b''16 a
fis dis b' fis dis fis dis b fis b fis dis b fis
%% <a, fis d>
d''4*1/6 a fis a fis d
fis d a d a
%% <e b a a,>
e'4*1/6 fis a cis a cis
e cis e fis gis16 a
%% <fis,, dis b>
b16 a
fis dis b' fis dis fis dis b fis b fis dis b fis
f8 b' r8 d16 f gis1.
}
\layout {
ragged-last = ##t
indent = 2\cm
short-indent = 1.5\cm
}
keyboard = \new PianoStaff \with {
instrumentName = #"Synthesizer"
shortInstrumentName = #"Synth"
pedalSustainStyle = #'bracket
}
<<
\new Staff \relative c' {
%% Intro
\time 4/4
R1*8
\repeat unfold 2 {
\key b \minor
\keysA
\key e \major
\keysB
}
\set PianoStaff.midiInstrument = #"choir aahs"
\key fis \minor
\keysTransition
\keysThree
\set PianoStaff.midiInstrument = #"lead 8 (bass+lead)"
\keysMartaRekado
\set PianoStaff.midiInstrument = #"string ensemble 1"
\keysReprise
\set PianoStaff.midiInstrument = #"electric piano 1"
\keysFinal
}
>>
|
