blob: f55ec7b8e6ad72f081f8591d5219743d33c724c0 (
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
|
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 fis dis cis a fis } cis2 cis16 dis gis8 |
a16 d fis d fis gis a8 ~ a2 |
%% TODO: simplify + use more simple arpeggios
\tuplet 6/2 { cis8 a fis cis fis, dis }
cis16 fis, b dis a' cis fis gis a b cis d
<cis a>16 r8 <b gis>16 r8 a16 gis fis cis a fis cis4
}
%% 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.
}
keyboard = \new PianoStaff <<
\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 = #"oboe"
\keysMartaRekado
\set PianoStaff.midiInstrument = #"string ensemble 1"
\keysReprise
\set PianoStaff.midiInstrument = #"electric piano 2"
\keysFinal
}
>>
|