aonce $ off 3 id $ off 2 id $ "90s_weird:0" # speed 0.3 -- TODO Slowly move to 0.5 # gain 0.9 # cut 13 -- Spooky intro! -- # gain 0 once $ "dr" -- (.ParVagues ----- L1VE.) -- T""""""""""""""""""""T -- |.;....,......a...;..| -- |;;:: . . . | -- l;;;:. : . .. ; -- `;;:::.: . . .' -- l;;:. .. . .: ; -- `;;::.. . . ; .' -- l;;:: . . / ; -- \;;:. . .,' / -- `\;:.. ..' .' -- `\;:.. ..' -- \;:. / -- l; f -- `;f' -- || -- ;l. -- ;: l -- / ; \ -- ,/ : `. -- ./' . : `. -- /' ,' : \ -- f / . : i -- ,' ; . : `. -- f ; . : . i -- .' : : . `. -- f , . ; : i -- | : ,/`. : | -- | ;,/;:. `. . | -- |___,/;;:. . .`._____| -- (For 0rbit.l0ve <3) -- """""""""""""""""""""" do -- resetCycles setcps (110/60/4) let gF = (# djfbus 1 (range 0.05 0.95 "^49")) let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>")) let gMute1 = (midiOn "^73" (mask "f*16")) let gMute2 = (midiOn "^74" (mask "f*16")) let gMute3 = (midiOn "^75" (mask "f*16")) let gM1 = gMask . gMute1 let gM2 = gMask . gMute2 let gM3 = gMask . gMute3 d1 $ gMute2 $ gF1 -- Tradition never disappoints: 4 on the fl00r... $ midiOn "^42" (<| "k k k <k k*2 k <k [<~ k> k]>>") $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not? $ "[808bd:4,kick:4]" -- FIXME DESIGN THIS KICK BETTER <3 # gain 1.5 d3 $ gM1 $ gF1 -- Break "80s' Apocalypse in a Box" $ midiOn "^44" (fast "1 2") $ midiOn "^76" -- L'Esprit de Nassim ( whenmod 8 7 (ply "1 . 2") . slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") . (loopAt "q") . (# "breaks165") . (# cut 2) . (|* gain 1.4) ) $ chop 8 $ loopAt 4 $ "drums_atari" # n "[29 29 <29 [29 28 29]> 28]" # cut 2 -- # midiG' "^80" 0 1 # pan 0.4 d2 $ gF1 $ gM1 -- Un peu d'encouragement? $ midiOn "^43" ((# "cp") . (|- note 2) . (# lpf 5000)) $ "~ clap" -- # midiG' "^79" 0 2 -- # gain 0.8 d4 $ gF2 $ gM3 -- BURN THE BASS WITCH $ midiOn "^57" (superimpose ( -- chain of wicked thoughts (|+ note ("<0 7 <9 5> <10 10 <10 7> 12>>")) . (|* gain "<1 1 1.05 1.1>") . (chop "8 . <8!3 16>") . (# cut 41))) $ midiOn "^89" ((0.125 ~>) . chop (slow 4 $ "[16 32 64 128]")) $ "synth/4" # "90s_synatm:9" # crushbus 41 (range 10 2.5 "^53") # room 0.3 # sz "<0.4!7 0.8>" # dry 1 # cut 4 -- # midiG' "^81" 0 1.4 d5 $ gM3 $ gF3 -- Ghosts from an easier time $ midiOn "^58" (struct "t*<2 1 1 <2 1>> t(<3 <<5 3> 1>>,8)" . arp "converge") $ note ("c'maj'4" + "<c!3 g g g [g, [~ c]] c>" - 12) # "90s_synatm:8/4" # cut 5 # crushbus 51 (range 16 2.5 "^54") -- # midiG' "^82" 0 1.1 d7 $ gF3 $ gM3 -- Jump aboard the BASIC BUS $ midiOn "^91" ( struct "t . t(<1 2 1 <1 [4 8]>>,8,1)") $ midiOff "^59" (loopAt 16) $ midiOn "^59" (loopAt 8) $ chop 8 $ "synth_commodore" # n "0" # crushbus 61 (range 20 2.25 "^55") # squizbus 62 (range 0 1.5 "^35") # roombus 63 (range 0 0.5 "^19") # gain 1.4 # panbus 64 (range 0.13 0.87 (slow 16 saw)) # cut 7 d8 $ gM1 $ gF1 -- Breaks divins -- TODO Rework $ midiOn ("^92") ( -- Bouton Nassim <3 slice 8 "[0 .. 3] . <[0 .. 3]!1 [0 1 . 3*2]>" . loopAt 0.5 . (# "breaks165") -- . (# octersub 2) ) $ midiOff "^60" (mask "[f t]") $ someCyclesBy "^36" (loopAt 1 . chop 16 . (# "jungle_breaks:21")) $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "jungle_breaks:40")) $ 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.8 d10 -- Ready playerm two $ mask "<f!3 t f!3 t f!3 t t!4>" $ slice 8 "0 <0!3 1>" $ loopAt 4 $ "fx_gameboy:5" # crushbus 101 (slow 32 $ range 1.8 0.61 saw) -- # midiG' "^20" 0 0.85 -- -- SANDBOX -- d7 $ gM -- Break from the past $ (# speed (range (-0.25) 2.25 "^56")) $ midiOn "^60" (often (ply 2)) $ midiOn "^92" (slice 8 "0 ~ ~ 3 . 4 <~ 5> 6 <~ 7*<1 2>>" . loopAt 2) $ chop 16 $ loopAt 4 $ "fbreak100" # n "<0!3 [0 4]>" # cut 7 # pan 0.8 # room 0.3 # dry 1 # midiG' "^84" 0 1.8 d6 $ gF2 -- BASIC BUS: Terminus $ midiOn "^59" (striate 2) $ midiOn "^91" ( struct "t . t(<1 2 1 <1 [4 8]>>,8,1)") $ chop 8 $ loopAt 16 $ "synth_commodore" # n "1" # lpf 5000 # crushbus 61 (range 20 2.25 "^55") # squizbus 62 (range 0 1.5 "^35") # roombus 63 (range 0 0.5 "^19") # midiG' "^83" 0 1.45 # panbus 64 (range 0.13 0.87 (slow 16 saw)) # cut 6