do -- TRIGGER INTRO :) -- resetCycles -- once $ "90s_synatm:8" # gain 0.5 # panbus 41 (range 0.2 0.5 saw) # room 0.4 # sz 0.94 let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine))) let gF = 1.01 let f1 = (# djfbus 1 (range 0.05 0.95 "^49")) let f2 = (# djfbus 2 (range 0.05 0.95 "^50")) let f3 = (# djfbus 3 (range 0.05 0.95 "^51")) let gMute = (midiOn "^73" (mask "f*16")) let gMute2 = (midiOn "^74" (mask "f*16")) let maskLoops = (mask "<t!4 [t!3 f]>" . mask "<t!14 f [f!3 t]>") setcps (90/60/4) d1 $ f1 $ gMute2 -- $ kCrush $ midiOn "^42" (struct "t t t <t!2 [<~ t> <t t?>]>") $ midiOff "^42" (struct "t . <~!4 t(<3!3 1>,8,<<0 3 <3 0> 0>>)!12>") -- $ mask "<f!32 f!8 t!16 t f!6 [t f] t!64>" -- $ "[808bd:6,kick:8]" $ fix ((# hpf 500) . (|* gain 0.7)) "kick:5" $ "[jazz,kick:5]" -- # room 0 # gain 1.3 d2 $ f1 $ gMute $ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32 $ midiOff "^75" maskLoops $ midiOn "^75" (ply "2 <2!3 4>") $ midiOn "^43" (slice 4 (run 8)) $ mask "<t [t!6 f t] t t t!4>" -- Degrade mid-loop! $ iter "1 <1!4 4 4 4 2>" $ loopAt 2 $ slice 8 (run 8) $ "break:20" # pan 0.4 # cut 2 # speed (range "-0.25" 2.25 "^31") -- # midiG' "^79" 0 1.3 d11 $ f1 $ gMute -- Snare <3 chak reverb phantome $ struct "[~ t]*2" $ "[snare:34,cp]" # lpf 2000 -- # midiG' "^14" 0 1.8 d3 $ f1 $ gMute -- Sidekick, doubtful, yet hardworking hats $ midiOn "^76" (ply "[4 <1 2>]*<4!3 8>") -- $ mask "<t(<1!3 3>,4)!4 t(2,8)!8 [<t!3 [t f]>]!52>" -- Intro / break/32 $ maskLoops $ someCyclesBy "<0.6 1>" (stut "<2 3 4>" 0.5 "s") $ sometimesBy (0.1 * "[0 <0 0.5> 0 <1!3 2>]!4") (# silence) $ ply "<1!8 <2 <2 [2 2 4 2]!7> <2!4 4!4> <4!2 [4 4 8 4] [4 8 <8 4> 4]!3 4>>>" $ "hh*4" # "h2ogmhh" # pan 0.6 # room 0.2 -- # midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 1.3 # gain (0.8 + 0.08 * (slow 2 perlin)) d4 $ f3 -- Atmospheric synth: aerial questions $ midiOn "^89" (|+ note "<2 2 4 <4 12>>") $ midiOn "^57" (chop "<[16@3 32] [32@3 64]>") $ "90s_synatm:8/4" # cut 4 # room 0.8 # legato 4 # dry 1 # pan 0.45 # crushbus 42 (range 16 3.4 "^53") # legato 2 -- # midiG' "^81" 0 1.5 d5 $ f2 -- Synth: ELECTRONIC ANSWERS -- $ mask "<f!32 t!96>" -- Intro $ midiOn "^90" (ply "1 <1!3 [0 1 <2 0> <0 2>]> <2!3 [[2 0] 1]> <1 2>" .slice 16 ("<0 1 2 3>*8" + "<0!4 4!4>")) $ midiOn "^58" (chop "<4 8 16 [32 64 . 128]>") $ "90s_synatm:14/4" # cut 5 # room 0.65 # pan 0.43 # dry 1 # panbus 51 (range 0.8 0.65 saw) # crushbus 52 (range 16 2.85 "^54") # midiG' "^82" 0 2 d7 $ f3 -- High lead: Winds of truth $ juxBy 0.5 ((# cut 61) . rev) -- Jux rev <3 $ whenmod 8 6 (swing "<4 2>") $ whenmod 32 8 (superimpose ( -- Echos of doubts (arp "<up!3 down>") . (sometimesBy (range 0 "<0.25!3 <0.5 0.75>>" saw) (ply 2)) . (# pan 0.1) . (+| note "[12,19,<21 21 17 18>]") . (# cut 61) . (|* gain 0.6) )) $ note (scale "aeolian" "<0!3 [0@6 <4 -1>@2]> 2") # "90s_synatm:18" -- # room 0.4 # sz 0.8 # dry 0.1 # cut 7 # crushbus 62 (range 16 2.25 "^55") # panbus 63 (range 0.05 0.95 "^19") d8 $ f1 $ gMute2 -- Breaks divins $ midiOn "^92" (off "e" id) $ midiOn "^60" (mask "[f t]") $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81)) $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3")) $ loopAt 2 $ chop 8 $ "jungle_breaks:1" # cut 8 # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4" # midiG' "^84" 0 1.2 # pan 0.8 d10 $ f1 -- RANDOM FOREST NOISES $ fix ( -- kCrush . struct "t t t t t*<1 2> [<t!2 ~ t> <t!2 ~ t>] t t" . (# "[future:1,jazz]") . (# midiG' "^13" 0 1.8) ) ("n1") $ fix ( struct "[~ t]*2" . (# "[snare:34,cp]") . (# lpf 2000) . (# midiG' "^14" 0 1.8) ) "n2" -- tchak reverb phantome $ fix ( whenmod 32 16 (someCyclesBy (slow 16 $ saw) (iter 4 . ply "2 [2|1]")) . struct "t([3 <3!3 5>],8,<0!8 3!8>)" . (# n "<3!3 [3 2]>") . (# "amencutup") . (# pan 0.88) . (# midiG' "^15" 0 1.25) ) "n3" -- amen break excerpt $ fix ( (# "gretsch:10") . (struct "t*3 ~ . t*<1!3 2> t*<1 3>") . (# cut 104) -- . (# pan (range 0.5 0.9 perlin)) . (# midiG' "^16" 0 1.65) ) "n4" -- FX1 $ fix ( (# "[dr,drum:2]") . (slow "<1!24 2!8>") . (struct "t*[16!3 <16!3 [32 16 32 16]>]") -- . (# cut 105) . (# pan (range 0.02 0.25 perlin)) . (# midiG' "^17" 0 1.4) ) "n5" -- Drumroll $ "[n1,n2]" -- n4 # gain 1 once $ "fx_gameboy:3" # gain 0.8 # cut 10 once $ "bassWarsaw" # freq 82 # gain 1.2 # cut 3