OSDN Git Service

[1] Updated.
[ierope/bitcalc.git] / music / hotel_pacific / music.ly
1 rehearsal = {\r
2  \override Score.RehearsalMark #'padding = #2.0\r
3  \override Score.MetronomeMark #'padding = #5.0\r
4  \time 4/4 \tempo 4=150\r
5  \mark \markup{\box "Intro"}\r
6  s1*16 \bar "||" \break\r
7  \mark \markup{\box "C1-A"}\r
8  s1*16 \bar "||"\r
9  s1*16 \bar "||" \break\r
10  \mark \markup{\box "C1-B"}\r
11  s1*8 \bar "||" \break\r
12  \mark \markup{\box "C1-C"}\r
13  s1*16 \bar "||" \break\r
14  s1*8  \bar "||" \break\r
15  \mark \markup{\box "C2-A"}\r
16  s1*16 \bar "||" \break\r
17  \mark \markup{\box "Interlude"}\r
18  s1*16 \bar "||" \break\r
19  \mark \markup{\box "C2-B"}\r
20  s1*8 \bar "||" \break\r
21  \mark \markup{\box "C2-C"}\r
22  s1*16 \bar "||" \break\r
23  s1*5  \bar "||" \break\r
24  \mark \markup{\box "C3-C"}\r
25  s1*16 \bar "||" \break\r
26  s1*8  \bar "||" \break\r
27  \mark \markup{\box "Outro"}\r
28  s1*16  \bar ".|" \break\r
29 }\r
30 \r
31 % intro riff\r
32 \parallelMusic #'(riffa riffb riffc riffd) {\r
33  %----------------------------------------\r
34  % Meas 1-2\r
35  %----------------------------------------\r
36  % Em D6\r
37  c''8-- b' r b' r b' r b' c''-- b' r b' r b' r b'|\r
38  e'8--  e' r e' r e' r e' e'--  d' r d' r d' r d'|\r
39  a8--   g  r g  r g  r g  g--   fs r fs r fs r fs|\r
40  c8--   b, r b, r b, r b, c--   b, r b, r b, r b,|\r
41 \r
42  %----------------------------------------\r
43  % Meas 3-4\r
44  %----------------------------------------\r
45  %C B7\r
46  c''8-- b' r a' r g' r a' g'4 r8 fs'8~ fs'4 r |\r
47  e'8--  d' r c' r b  r c' b4  r8 a8~   a4   r |\r
48  a8--   g  r fs r e  r fs e4  r8 ds8~  ds4  r |\r
49  c8--   b, r a, r g, r a, g,4 r8 fs,8~ fs,4 r |\r
50 }\r
51 \r
52 % tata\r
53 \parallelMusic #'(tataa tatab tatac tatad) {\r
54  %----------------------------------------\r
55  % Meas 1-2\r
56  %----------------------------------------\r
57  r2 r8 e'-. e'-. e'-. r2 r8 e'16 e' r e' e'8-. |\r
58  r2 r8 b-.  b-.  b-.  r2 r8 b16  b  r b  b8-.  |\r
59  r2 r8 e-.  e-.  e-.  r2 r8 e16  e  r e  e8-.  |\r
60  r2 r8 b,-. b,-. b,-. r2 r8 b,16 b, r b, b,8-. |\r
61 }\r
62 \r
63 \r
64 % to Sabi\r
65 \parallelMusic #'(tosabia tosabib tosabic tosabid) {\r
66  %----------------------------------------\r
67  % Meas 1-2\r
68  %----------------------------------------\r
69  cs'1 ds'8-- b  r b~  b  a  g  fs  |\r
70  cs'1 ds'8-- b  r b~  b  a  g  fs  |\r
71  cs1  ds8--  b, r b,~ b, a, g, fs, |\r
72  cs1  ds8--  b, r b,~ b, a, g, fs, |\r
73 }\r
74 \r
75 % sabi\r
76 \parallelMusic #'(sabia sabib sabic sabid) {\r
77  %----------------------------------------\r
78  % Meas 1-2\r
79  %----------------------------------------\r
80  % Em\r
81  r2 r8 e'-. e'-. e'-. r2 r8 e'16 e' r e' e'8-. |\r
82  r2 r8 b-.  b-.  b-.  r2 r8 b16  b  r b  b8-.  |\r
83  r2 r8 g-.  g-.  g-.  r2 r8 g16  g  r g  g8-.  |\r
84  r2 r8 e-.  e-.  e-.  r2 r8 e16  e  r e  e8-.  |\r
85 \r
86  %----------------------------------------\r
87  % Meas 3-4\r
88  %----------------------------------------\r
89  % B7\r
90  r2 r8 ds'-. ds'-. ds'-. r2 r8 ds'16 ds' r ds' ds'8-. |\r
91  r2 r8 a-.   a-.   a-.   r2 r8 a16   a   r a   a8-.   |\r
92  r2 r8 fs-.  fs-.  fs-.  r2 r8 fs16  fs  r fs  fs8-.  |\r
93  r2 r8 ds-.  ds-.  ds-.  r2 r8 ds16  ds  r ds  ds8-.  |\r
94 \r
95  %----------------------------------------\r
96  % Meas 5-8\r
97  %----------------------------------------\r
98  % Em E7 Am\r
99  e'1 d' c' e'2 r2 |\r
100  b1  gs a  c'2 r2 |\r
101  g1  e  e  a2  r2 |\r
102  e1  d  c  e2  r2 |\r
103 \r
104  %----------------------------------------\r
105  % Meas 9-10\r
106  %----------------------------------------\r
107  % B7                            Em\r
108  r8 ds'-. ds'4-. r8 ds'-. ds'4-. r8 e'-. e'-. e'-. e'4-. r4 |\r
109  r8 fs-.  fs4-.  r8 fs-.  fs4-.  r8 g-.  g-.  g-.  g4-.  r4 |\r
110  r8 ds-.  ds4-.  r8 ds-.  ds4-.  r8 e-.  e-.  e-.  e4-.  r4 |\r
111  r8 a,-.  a,4-.  r8 a,-.  a,4-.  r8 b,-. b,-. b,-. b,4-. r4 |\r
112 \r
113  %----------------------------------------\r
114  % Meas 11-12\r
115  %----------------------------------------\r
116  % D7                            G                      E7\r
117  r8 fs'-. fs'4-. r8 fs'-. fs'4-. r8 g'-. g'-. g'-. g'-. gs'4.-- |\r
118  r8 a-.   a4-.   r8 a-.   a4-.   r8 b-.  b-.  b-.  b-.  d'4.--  |\r
119  r8 fs-.  fs4-.  r8 fs-.  fs4-.  r8 g-.  g-.  g-.  g-.  gs4.--  |\r
120  r8 c-.   c4-.   r8 c-.   c4-.   r8 d-.  d-.  d-.  d-.  e4.--   |\r
121 \r
122  %----------------------------------------\r
123  % Meas 13-16\r
124  %----------------------------------------\r
125  % Am        Em F#7 B7\r
126  a'8-- r8 r2. r1 e'1 fs'2 r2 |\r
127  e'8-- r8 r2. r1 as1 b2   r2 |\r
128  a8--  r8 r2. r1 fs1 fs2  r2 |\r
129  e8--  r8 r2. r1 cs1 ds2  r2 |\r
130 }\r
131 \r
132 % interlude\r
133 \parallelMusic #'(inta intb intc intd) {\r
134  %----------------------------------------\r
135  % Meas 1-6\r
136  %----------------------------------------\r
137  % C7 E7         C7   E7          C7   E7\r
138  g'1 fs'8 r8 r2. c''1 b'8  r8 r2. e''1 ds''8 r8 r2. |\r
139  bf1 a8   r8 r2. e'1  ds'8 r8 r2. g'1  fs'8  r8 r2. |\r
140  e1  ds8  r8 r2. g1   fs8  r8 r2. bf1  a8    r8 r2. |\r
141  g,1 fs,8 r8 r2. bf,1 a,8  r8 r2. e1   ds8   r8 r2. |\r
142 \r
143  %----------------------------------------\r
144  % Meas 7-8\r
145  %----------------------------------------\r
146  e'8-- g' r a' r as' r b' r d'' r d'' e''4 r4 |\r
147  e8--  g  r a  r as  r b  r d'  r d'  e'4  r4 |\r
148  b,8-- d  r e  r f   r fs r a   r a   b4   r4 |\r
149  e,8-- g, r a, r as, r b, r d   r d   e4   r4 |\r
150 }\r
151 \r
152 horna = { \key e \minor \transpose c c'\r
153           { \riffa \riffa \tataa \tataa \tataa \tosabia\r
154             R1*16 R1*16 R1*6 \tosabia\r
155             \sabia \riffa \riffa R1*15 r4 b'16 c'' d'' ds'' e''8 r4.\r
156             \tataa \tataa \tataa \tataa \inta\r
157             R1*6 \tosabia\r
158             \sabia R1*4 r2. r8 b'8\r
159             \sabia } }\r
160 hornb = { \key e \minor \transpose c c'\r
161           { \riffb \riffb \tatab \tatab \tatab \tosabib\r
162             R1*16 R1*16 R1*6 \tosabib\r
163             \sabib \riffb \riffb R1*15 r4 b16 c' d' ds' e'8 r4.\r
164             \tatab \tatab \tatab \tatab \intb\r
165             R1*6 \tosabib\r
166             \sabib R1*4 r2. r8 e'8\r
167             \sabib } }\r
168 hornc = { \key e \minor \transpose c c'\r
169           { \riffc \riffc \tatac \tatac \tatac \tosabic\r
170             R1*16 R1*16 R1*6 \tosabic\r
171             \sabic \riffc \riffc R1*15 r4 b,16 c d ds e8 r4.\r
172             \tatac \tatac \tatac \tatac \intc\r
173             R1*6 \tosabic\r
174             \sabic R1*4 r2. r8 g8\r
175             \sabic } }\r
176 hornd = { \key e \minor \transpose c c'\r
177           { \riffd \riffd \tatad \tatad \tatad \tosabid\r
178             R1*16 R1*16 R1*6 \tosabid\r
179             \sabid \riffd \riffd R1*15 r4 b,16 c d ds e8 r4.\r
180             \tatad \tatad \tatad \tatad \intd\r
181             R1*6 \tosabid\r
182             \sabid R1*4 r2. r8 b,8\r
183             \sabid } }\r