do -- resetCycles setcps (160/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 . ~ k ~ ~ ") $ "[bskick,jazz]" # gain 1.2 # gain 1.4 d2 $ gF1 $ gM1 -- Snare melancolie fromagere $ midiOff "^43" (<| "~ <s s <s!3 ~> <~!7 [~ s]>>") $ midiOn "^43" (<| "~ s ~ s*<1!3 2>") $ "[drumtraks:9]" # gain 1.45 d3 $ gF1 $ gM1 $ midiOn "^44" (ply 2) $ midiOn "^76" (ply 2) $ "d d d <d [<d ~> d]>" # "drum:2" # gain 0.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> ] - 12) # "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 d9 -- Alright Paris <3 FIXME SLOWER LOOPS $ mask "<f f t f>" $ "movie_paris:14" # begin "<0 0.2 0 0>" # end "<0.2 0.6 0.6 0.45>" -- 0.2 - 0.35 - 0.4 - 0.6 # cut 9 once $ note "c5" # "superpiano"