do -- resetCycles setcps (93/60/4) let gF1 = (# 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 gMute = (midiOn "^73" (mask "f*16")) let gMute2 = (midiOn "^74" (mask "f*16")) let gMute3 = (midiOn "^75" (mask "f*16")) -- let gMute = (midiOn "^73" (mask "f*16")) let gM1 = gMask . gMute let gM2 = gMask . gMute2 let gM3 = gMask . gMute3 let modIndex = pF "modIndex" d1 $ gF1 $ gM2 -- Kick $ midiOff "^42" (<| "k k k <k <k*2 [~ k]>>") $ midiOn "^42" (<| "k . ~ <~!2 k!2> ~ <~!3 k*<1 2>>") $ "[808bd:4,jazz]" # lpf 400 # gain 1.2 -- # gain 1.4 d2 $ gF1 $ gM1 -- Snare melancolie fromagere $ midiOff "^43" (<| "~ <s s <s!3 ~> <~!7 [~ s]>>") $ midiOn "^43" (<| "~ . s*<1!4 2!3 [4 2]> ~") $ "[rampleM12:3]" # gain 1.2 d3 $ gF1 $ gM1 $ midiOn "^44" (ply 2) $ midiOn "^76" (ply 2) $ "d d d <d [<d ~> d]>" # "drum:2" # gain 0.8 d4 $ gF2 $ gM3 $ note "<f3 c3 cs3 f3>" # crushbus 41 (range 16 3 "^53") # octerbus 42 (range 0 0.93 "^33") # octersubbus 43 (range 0 1.93 "^33") # "bassWarsaw" d5 $ gF3 $ gM3 $ note ("<[f4 [~ g4] [gs4 ~] as4 c5@4] [f5 [~ f5] . ef5 df5 c5@2] [bf4@3 bf4 . gs4 g4 f4@2] f4>" + 12) # "superfork" # room 0.3 d7 $ gF3 $ gM3 $ struct "t*[8 . <8!3 16>]" $ note ( "<[f4@3 g4 . gs4 as4 c5@2] [f5@3 f5 . ef5 df5 c5] [bf4@3 bf4 gs4 g4 f4] f4>" +"[0,12]" ) # "pluck" d8 $ gF1 $ gM1 $ chop 8 $ loopAt 1 $ midiOn "^60" (mask "f(4,8)" . chop 8) $ midiOn "^36" (loopAt 2 . (# "jungle_breaks:19") . (|* gain 1.2)) -- Pure COMEON! $ midiOn "^56" (# "jungle_breaks:20") $ midiOn "^92" ( -- Bouton Nassim <3 slice 8 (run 16) . loopAt 0.5 . (# "breaks165") -- . (# octer 0.4) . ( octersubsub 4) . (# lpf 2500) . (# room 0) ) $ "break:8" # cut 8 -- -- # midiG' "^80" 0 1 -- # room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw) -- d4 $ gF2 $ gM3 -- $ midiOn "^89" (ply 2) -- $ slow 2 -- $ note ( -- struct "t(3,8) t(3,8)" $ -- arp "converge" $ -- cat [ -- "[bf3, d4, f4, a4]", -- Bbmaj7 -- "[a3, c4, e4, g4]", -- Am7 -- "[d4, f4, a4, c5, <e5 e4>]", -- Dm9 -- "[g3, b4, d5, <f5 ~>]" -- <G7 G> -- ] - 12) -- # "bassWarsaw" -- # crushbus 41 (range 16 4 "^53") -- # room 0.2 -- # legato 0.5 -- # gain 1.4 -- d7 $ gF2 $ gM3 -- $ midiOn "^89" (ply 2) -- $ slow 2 -- $ note ( -- struct "t(3,8) [t(<3!3 5>,8)|t|t*2]" $ -- arp "up" $ -- cat [ -- "[bf3, d4, f4, a4]", -- Bbmaj7 -- "[a3, c4, e4, g4]", -- Am7 -- "[d4, f4, a4, c5, <e5 e4>]", -- Dm9 -- "[g3, b4, d5, <f5 ~>]" -- <G7 G> -- ]) -- # "moogBass" -- # cut 7 -- # room 0.2 -- # legato 0.5 -- # delay 0.7 -- # delayt 0.125 -- # delayfb 0.5 -- d5 $ gF2 $ gM3 $ slow 2 -- V2 -- -- $ superimpose ((arp "up") . (|+ note 12)) -- $ midiOn "^89" (stutWith 4 0.25 ((|* gain 0.85) . (# room 0))) -- $ note (cat [ -- -- PARTITION ORIGINALE -- "[bf3, d4, f4, a4]", -- Bbmaj7 -- "[a3, c4, e4, g4]", -- Am7 -- "[d4, f4, a4, c5, <e5 e4>]", -- Dm9 -- "[g3, b4, d5, <f5 ~>]" -- <G7 G> -- ] -- - 12 -- ) -- # "FMRhodes2" -- -- |- note 12 -- |+ note 2 -- Adjust to C -- # modIndex (range 0 2 "^54") -- # room 0.4 -- -- # midiG' "^81" 0 1.6 -- d8 $ gF1 $ gM1 -- $ midiOff "^60" (mask "f(4,8)" . chop 8) -- $ midiOn "^92" (ply 4) -- $ midiOn "^36" (# "jungle_breaks:45") -- $ midiOn "^56" (# "jungle_breaks:30") -- $ iter "1 <1!4 4!4>" -- $ chop 8 -- $ loopAt 2 -- $ "break:2" -- -- # n 4 -- # cut 8 -- # gain 0.7 C ASH R ULES E VERYTHING A ROUND M E