song2: Longer crescendo.
[music/pretentious.git] / 02-song2 / music / bass.ly
1 bassA = \relative c {
2 \repeat unfold 2 {
3 b,8 a16 b8 a16 b4 r8 e,16 fis a8 |
4 b a16 b8 a16 b4 r8
5 \ottava #1 d''4\flageolet \ottava #0 |
6 b,,8 a16 b8 a16 e4 r8 e16 fis a8 |
7 } \alternative {
8 { g g16 g8 fis16 b,8 r8 d''16 r d e d8 |}
9 { g,, r16 a8 r16 d8 ~ d2 |}
10 }
11 }
12
13 %% key change!
14 bassB = \relative c {
15 cis,8 r16 cis8 r16 fis,4. fis4 |
16 a16 a8 a b16 e,4 e8 e fis' |
17 gis8. e fis8 fis,2 |
18 }
19
20 bassBWithHarmonic = \relative c {
21 \bassB
22 a,8. b8 r16 e,2
23 \ottava #1 d'''8\flageolet \ottava #0 |
24 }
25
26 bassBWithoutHarmonic = \relative c {
27 \bassB
28 a,8. b8 r16 e,2 f8 |
29 }
30
31 bassTransition = \relative fis,, {
32 \repeat volta 2 {
33 fis16 r8. fis16 r8 e16 fis fis fis8 r4 |
34 fis16 r8. fis16 r8 e16 fis fis e fis8 r8. |
35 fis16 r8. fis16 r8 e16 fis fis fis8 r4 |
36 fis16 r8. fis16 r8 e16 fis fis e fis8 r8. |
37 }
38
39 \repeat volta 4 {
40 r16 fis8 e16 fis8 e16 fis8 fis8 r16 r4 |
41 r16 fis8 e16 fis8 e16 fis16 r16 fis16 e4 r8 |
42 }
43 }
44
45 bassCrescendo = \relative fis,, {
46 \time 6/8
47 e16\ppppp\< fis8 fis8 fis16 e16 fis8 fis8 fis16 |
48 e16 fis8 fis8 fis16 e16 fis8 fis8 fis16 |
49 e16 fis8 fis8 fis16 e16 fis8 fis8 fis16 |
50 e16 fis8 fis8 fis16 e16 fis8 fis8 fis16 |
51 e16 fis8 fis8 fis16 e16 fis8 fis8 fis16 |
52 e16 fis8 fis8 fis16 e16 fis8 fis8 fis16 |
53 e16 fis8 fis8 fis16 e16 fis8 fis8 fis16 |
54 e16 fis8 fis8 fis16 e16 fis8 fis8 fis16\!\fff |
55 }
56
57 bassThree = \relative fis,, {
58 \time 6/8
59 \repeat volta 2 {
60 e16 fis8 fis fis16
61 fis16 gis8 gis gis16 |
62 gis16 a8 a r16
63 b,8 b b |
64 }
65
66 d'8. d8 d16 e8. e8 e16 |
67 r16 d r d r d e8. e16 fis e |
68 d8. d8 d16 e8. e8 e16 |
69 r16 cis8 cis r16 cis8 cis a16 b |
70 }
71
72 bassMartaRekado = \relative fis,, {
73 \time 5/8
74 fis8 fis fis fis fis |
75 \time 7/8
76 fis8 fis fis fis fis fis fis |
77 \time 2/4
78 fis8. r16 b a gis a |
79
80 \time 5/8
81 fis8 fis fis fis fis |
82 \time 7/8
83 fis8 fis fis fis fis fis fis |
84 \time 2/4
85 fis8. r16 b a gis a |
86
87 \time 3/4
88 d,8. d8 d16 e8. e8 e16 |
89 r16 d r d r d e8. e16 fis e |
90 fis16 fis8 fis fis16 fis fis8 fis fis16 |
91 \time 4/4
92 fis fis8 fis r d' d r r8. |
93 }
94
95 bassReprise = \relative fis,, {
96 \time 4/4
97 fis1 |
98 f'8. cis8 a16 fis'4. fis,8 a16 gis |
99 fis4. b4 a8 gis fis |
100 d' a e' fis fis, fis fis fis |
101
102 %% TODO: simplify
103 fis fis16 fis fis8 fis16 fis fis fis fis8 fis e' |
104 f8. cis8 a16 fis'4 fis,16 fis a' fis, b' cis |
105 fis,,8 fis16 fis fis8 b16 b b b b8 b16 b b b |
106 d d, d d' d, d fis' fis,
107 fis fis fis fis fis fis fis fis |
108 }
109
110 bassFinal = \relative fis,, {
111 \time 4/4
112 \repeat volta 4 {
113 fis8. fis16 r2 r16 fis16 e' fis |
114 f8. cis8 d16 fis,2 e'16 fis |
115 fis,8. r16 b2 r8 b16 cis |
116 d8. d8 e16 fis,2 r8 |
117 }
118
119 b16 r8 b16 r16 b b'4. b,16 a' b cis, |
120 d8 d d d16 a8. a8 a ais |
121 b16 r8 b16 r16 b b'4. b,16 a' b cis, |
122 f8 f' r8 f,16 c gis2 ~ |
123 gis1 |
124 }
125
126 bassMusic = {
127 \set Staff.midiInstrument = #"electric bass (finger)"
128 \set Staff.pedalSustainStyle = #'bracket
129 \set Staff.midiMinimumVolume = #1.0
130 \clef "bass_8"
131
132 %% Intro
133 \time 4/4
134 R1*8
135
136 \key b \minor
137 \bassA
138 \key e \major
139 \bassBWithHarmonic
140
141 \key b \minor
142 \bassA
143 \key e \major
144 \bassBWithoutHarmonic
145
146 \key fis \minor
147 \bassTransition
148 \bassCrescendo
149 \bassThree
150
151 \bassMartaRekado
152
153 \bassReprise
154 \bassFinal
155 }
156
157 bass = <<
158 \new Staff \with {
159 \RemoveEmptyStaves
160 } {
161 \bassMusic
162 }
163 \new TabStaff \with {
164 stringTunings = #bass-five-string-tuning
165 \RemoveEmptyStaves
166 } {
167 \override Stem #'transparent = ##t
168 \override Beam #'transparent = ##t
169 \bassMusic
170 }
171 >>