diff options
Diffstat (limited to '04-white-noise-parts')
-rw-r--r-- | 04-white-noise-parts/bass.ly | 80 | ||||
-rw-r--r-- | 04-white-noise-parts/keys.ly | 70 | ||||
-rw-r--r-- | 04-white-noise-parts/stick.ly | 56 |
3 files changed, 206 insertions, 0 deletions
diff --git a/04-white-noise-parts/bass.ly b/04-white-noise-parts/bass.ly new file mode 100644 index 0000000..67ebc6e --- /dev/null +++ b/04-white-noise-parts/bass.ly @@ -0,0 +1,80 @@ +bassBeautyA = \relative fis,, { + d4. fis ~ fis4 | e4. gis a4 | + d,2. cis4 | fis1 | +} + +bassBeautyB = \relative fis,, { + d4. fis fis4 | e4. gis a4 | + d,4. d cis4 | fis8 fis fis fis cis' b a b | +} + +bassThemeWithoutEnd = \relative fis,, { + fis8 fis r4 e'8 fis fis, r4 fis8 | r8 fis r4 a'8 b fis, r8 a4 | + fis8 fis r4 e'8 fis fis, r4 fis8 | r8 fis r4 e'8 fis fis, e e r8 | + b8 b r4 e'8 fis b,, r4 b8 | r8 b r4 a''8 b b,, r8 cis4 | + d8 d r4 e'8 fis d r4 d,8 | +} + +bassTheme = \relative fis,, { + \bassThemeWithoutEnd + r8 d r4 d'8 d d, e e r8 | +} + +bassThunder = \relative fis,, { + fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e | + fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e | + fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e | + d-. d-. d-. d-. d-. d-. d-. d-. | +} + +bass = { + \set Staff.midiInstrument = #"electric bass (finger)" + \clef "bass_8" + \key fis \minor + + \relative fis,, { + \time 4/4 R1*4 \bassBeautyA + + \time 5/4 \repeat volta 2 \bassThemeWithoutEnd + \alternative { + { r8 d r4 d'8 d d, e e r8 | } + { r8 d r4 fis4 ~ fis2 | } + } + \whiteNoise + + \time 4/4 \bassThunder + + \time 5/4 \repeat volta 2 \bassTheme + \time 4/4 \bassThunder + + \time 5/4 \repeat volta 2 \bassTheme + \time 4/4 \repeat volta 2 \bassBeautyB + + %% TODO + %% solo + %% sweet and quiet + %% solo + + %% april? + \relative fis,, { + d,2 r8 e4. | fis2. r4 | + d2 e fis r8 gis a cis + d2 r8 e4 b8 cis2. r4 b2 + + r8 cis4 e,8 fis1 + d2 r8 e4. fis2. r4 fis8 e r4 e2 fis r8 gis a cis d2 r8 e4 b8 cis2. r4 b2 r8 cis4 e,8 fis1 fis8 r8*5 + } + + %{ + %% fast and weird + fis8 e fis a4 gis8 fis e + cis cis cis gis' cis b a16 b a8 + d, d d d d d d d + cis f b fis' b a gis a + fis cis fis b4 a8 gis a + cis b a b a gis fis gis + d b a gis fis gis a b + gis gis gis gis cis cis,4*80/960 r4*400/960 cis4 + %} + } +} diff --git a/04-white-noise-parts/keys.ly b/04-white-noise-parts/keys.ly new file mode 100644 index 0000000..6121bb6 --- /dev/null +++ b/04-white-noise-parts/keys.ly @@ -0,0 +1,70 @@ +keysIntro = \relative c' { + <d fis a>2 <cis fis a> <b e gis>1 + <d fis a> <cis fis a> + % \chordmode { + % d2 fis:m e1 + % d1 fis:m + % } +} + +keysPadWithoutEnd = \relative c' { + <cis fis a>2. ~ <cis fis a>2 ~ | <cis fis a>2. ~ <cis fis a>2 | + <b e gis>2. ~ <b e gis>2 ~ | <b e gis>2. ~ <b e gis>2 | + <b d fis>2. ~ <b d fis>2 ~ | <b d fis>2. ~ <b d fis>2 | + <a d fis>2. ~ <a d fis>2 ~ | + % \chordmode { + % fis4*10:m + % e4*10 + % b4*10:m + % d4*5 + % } +} + +keysPad = \relative c' { + <cis fis a>2. ~ <cis fis a>2 ~ | <cis fis a>2. ~ <cis fis a>2 | + <b e gis>2. ~ <b e gis>2 ~ | <b e gis>2. ~ <b e gis>2 | + <b d fis>2. ~ <b d fis>2 ~ | <b d fis>2. ~ <b d fis>2 | + <a d fis>2. ~ <a d fis>2 ~ | <a d fis>2. ~ <a d fis>2 | + % \chordmode { + % fis4*10:m + % e4*10 + % b4*10:m + % d4*10 + % } +} + +keysThunder = \relative c'' { + a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis | + a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis | + a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis | + d-. d-. d-. d-. d-. d-. d-. d-. | +} + +keyboard = { + \set Staff.midiInstrument = #"pad 8 (sweep)" + \set Staff.midiMinimumVolume = #0.4 + \set Staff.midiMaximumVolume = #0.6 + + \key fis \minor + \time 4/4 \repeat unfold 2 \keysIntro + \time 5/4 \repeat volta 2 \keysPadWithoutEnd + \alternative { + { + \relative c' { + <a d fis>2.\repeatTie ~ <a d fis>2 | + } + } + { + \relative c' { + <a d fis>2\repeatTie <cis fis a>2. | % TODO + } + } + } + + \whiteNoise + \time 4/4 \keysThunder + \time 5/4 \repeat volta 2 \keysPad + \time 4/4 \keysThunder + \time 5/4 \repeat volta 2 \keysPad +} + diff --git a/04-white-noise-parts/stick.ly b/04-white-noise-parts/stick.ly new file mode 100644 index 0000000..57344d0 --- /dev/null +++ b/04-white-noise-parts/stick.ly @@ -0,0 +1,56 @@ +%% TODO +stickThunder = \relative c'' { + a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis | + a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis | + a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis | + d-. d-. d-. d-. d-. d-. d-. d-. | +} + +%% TODO +stickTheme = \relative c { + fis'4. cis a' cis8*7 d2 + gis,4. e d' cis8*7 a4 gis + fis4. d gis a8*9 r4 + fis4. d gis e8*5 gis4 a4. r8 +} + +stick = { + \set Staff.midiInstrument = #"electric guitar (jazz)" + \key fis \minor + \time 4/4 { R1*8 } + %% silly but I have to mimick the repeats for the other voices to + %% make the notes line up. + \time 5/4 \repeat volta 2 { + r2. r2 | r2. r2 | r2. r2 | r2. r2 | + r2. r2 | r2. r2 | r2. r2 | + } + \alternative { + {r2. r2 | } + {r2. r2 | } + } + + \whiteNoise + \stickThunder + \repeat volta 2 \stickTheme + \stickThunder + \repeat volta 2 \stickTheme + + %% TODO: this is terrible and I would never play this + \relative c' { + <d a >2 + <cis fis, >2 <gis' fis, >2 + <a e, >2 d,1 cis + + <d a >2 + <cis fis, >2 <gis' fis, >2 + <a e, >2 d,1 cis + } + + %% TODO: move to keyboard? + \repeat unfold 4 \relative c'' { + d'8 a' d a e' a, d e,, + fis, cis' gis' a gis cis, fis, e + d' a' d a e' a, d e,, + fis cis' gis' a gis cis, fis, e + } +} |