do setcps (120/60/4) -- resetCycles let gMask = (midiOn "^41" (mask "t!3 <t [[f <f t>] <t f>]>")) let gMute = (midiOn "^73" (mask "f*16")) let gMute2 = (midiOn "^74" (mask "f*16")) let gMute3 = (midiOn "^75" (mask "f*16")) let gF4 = (# djfbus 3 (range 0.05 0.95 "^29")) let gM1 = gMask . gMute let gM2 = gMask . gMute2 let gM3 = gMask . gMute3 d1 $ gF1 $ gMute2 $ midiOn "^42" (<| "k <k!6 ~ ~> <k!7 ~> <k k*2>") $ midiOff "^42" (<| "<k <~ [~!7 k]>>") $ "[reverbkick,808bd:4]" -- Profond # gain 1.8 # lpf 400 # octersub 2 # cut 1 d2 $ gF1 $ gM1 $ midiOn "^43" (<| "~ s ~ s*<1!3 2>") $ midiOff "^43" (<| "~ . <~ <s [s*2 . ~ <~ s>]>>") $ "[snare:70]" # note "-5" # gain 1.4 d3 $ gF1 $ gM1 -- Soft drumroll $ fix (|* gain (slow 16 $ range 1.2 0.6 perlin)) "h2ogmsn:1" $ "d*[8 <16 12 [16 12] [6 12]> <8!3 <12 16>>]" # "[h2ogmsn:1,h2ogmhh]" |* gain (range 1.1 0.95 (slow 4 perlin)) -- d4 $ "wobble" # cut 4 d6 $ gF1 $ gM1 $ "~ cy ~ cy*<<1!4 2!4> <1!4 2!4> 2 2> ~ cy ~ cy*<1!3 2>" # "h2ogmcy" # n (slow 4 "<0 1 2 3>") # cut 6 d4 $ gF2 $ gM2 -- BASSLINE SYNTH $ chop 2 $ superimpose ( ( # crushbus 41 (range 10 4.5 "^53") ) . (# hpf 500) . (# lpf 10000) ) $ slow 2 $ note ("<<ef [ef@7 <ef gs>]> <fs [fs@7 f]>>" - 12 ) # "giorgio_syn:0" # cut 4 # lpf 1500 # gain 1.4 # room 0.4 # sz 0.8 # octersub 2 # octersubsub 1 d5 $ gF3 $ gM3 $ midiOn "^58" (superimpose ( -- Echoes (# pan 0.8) . (0.25 ~>) . (|* gain "<0 1> 0.9 0.8 0.8") . (chop 4) . (|+ note 12) . (# cut 51))) $ n "<<2!4 3!4 4!6 5 5> ~ ~ ~>" # "jane_wang" # cut 5 # pan (slow 16 $ range 0.6 0.45 saw) # gain 1.5 # room 0.1 # sz 0.4 # dry 1.1 d7 $ note ("<ef ef <fs b5> bf5>" + "0 <7 7 9 12> 0" + 3 -- - 12 ) # "vec1_acid:0" # lpf 5000 # octersub 1.3 # octerbus 72 (range 0 1.8 "^35") # squizbus 71 (range 0 2 "^55") # cut 7 # room 0.4 # dry 1.1 d8 $ gF1 $ gM1 $ midiOn "^92" ( -- BREAK ME splice 4 "<0!3 [0 1] 0 0 [0 1] [0 1]*2> 1 2 3*<4 <2 8>>") $ midiOn "^56" (loopAt 0.5 . (# "break:15")) $ loopAt 2 $ chop 8 $ "jungle_breaks:101" # gain 1.2 d4 $ gF2 $ gM3 -- Cello bass $ midiOn "^89" (|+| note "[0 12 0]") $ midiOn "^57" (|+| note "0 0 <7 [7 9](3,8) 7 [7 9 12 7]> 0") $ juxBy 0.6 (|+| note ("7([3 1],8)")) $ note ("<[fs@7 <~ bf>] [fs@7 <~ cs>] <bf ef> <cs!3 bf>>") |* gain "<[1@7 0.9] 1 1 1>" # pan (slow 16 $ range 0.45 0.6 saw) # "cpluck" d12 $ gM3 $ gF3 $ note ( "<[~ cs ~ cs] [~ fs ~ fs] [~ bf ~ bf] [~ gs@3 ~ cs@2 [gs fs]]>" + "<0 0 0 [0 <0 12>]>" + "<0!14!8 12!8>" - 24 ) # "moogBass" # legato 2 # chorus 1.2 # cut 12 -- # tremdp 0.8 -- # tremr "<2 4 4 <8 16>>" # gain 1.2 d7 $ gF1 $ gM1 -- SCRATCH $ midiOn "^91" (ply "2 4 <8 8 4 16>") $ midiOn "^55" (# n 15) $ midiOn "^59" (# n 15) $ chop 16 $ loopAt 4 $ "scratch_long:12" # cut 7 # pan (slow 16 $ range 0.9 0.6 saw) # gain 1.2 d8 $ gF1 $ gM1 $ midiOn "^92" (ply 4) $ loopAt 2 $ chop 8 $ midiOn "^56" (>| "jungle_breaks:10") $ "jungle_breaks:11" # cut 8 # room 0.4 # dry 1.1 d10 $ gM3 $ gF3 $ fix (# begin 0.25) "movie_statue:36" $ stack [ -- I'VE GOT YOU SEVERAL TIMES mask "<f!24 t!8 f!16 t!16>" $ "movie_wine:15*<1 1 2 4>" # begin "<0!3 <<0.04 0.1> 0.25>>" # room 0.2 # sz 0.1 # end "<0.45!8 0.5!8>" # cut 101, -- ON MY MIND mask "<f!7 t>" "<[movie_statue:36 movie_statue:7]>" # gain 0.9, -- Young lady from China mask "<t!32 f!8 t!8 f!8>" $ mask "<f!3 t f!4>" $ "[movie_dead:0 movie_vitality:4]" # end "<0 0.25>", -- just a drift -- mask "<t!8 f!8>" $ "[movie_vitality:4]" # end "<0.1!2 0.05!2>" # gain 0.9 # room 0, -- Just a drift "<~!3 [movie_vitality:4]>" # end "<0.25>" # begin "<0.1>", -- WITHOUT CONTROL "" ] -- # rel 2 # att 0.1 # gain 1.3 # cut 101