resetCycles do 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 gM1 = gMask . gMute let gM2 = gMask . gMute2 let gM3 = gMask . gMute3 let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>" setcps (105/60/4) do -- d1 $ gF1 $ gM1 $ "kick:5" -- d1 $ gF1 $ gM1 $ "kick:5" d1 $ gF1 $ gM2 $ midiOn "^42" (<| "k k k <k [<~ k> k*<1 4>]>") -- $ midiOn "^42" (<| "k k(<3 [3 5]>,8)") $ "kick:5" d2 $ gF1 $ gM1 $ "~ cp" # "rampleP5:15" d3 $ gF1 $ gM1 $ "hh(5,8)" # "rampleP5:16" # cut 3 d4 $ gF2 $ gM1 $ "90s_synatm:9" # cut 4 d5 $ gF3 $ gM1 -- Semi-basse $ superimpose (("h" ~>) . (|+ note 12) . (# cut 51)) $ note ("<gs4!0 f4 f4 gs4 f4 f4 f4 ef4 f4>") # "90s_synatm:3" # cut 5 # gain 0.65 # pan 0.3 -- 0 4 0 1 0 2 0 3 d10 $ gF3 $ note "f/4" -- Anges des intertubes # "90s_glassatm:2" -- # crushbus 101 (range 16 2.5 (perlin)) # roombus 102 (slow 4 $ range 0.4 0.65 (perlin)) # sz 0.8 # legato 2 # pan 0.7 # cut 10 d4 $ gF2 $ gM1 -- Bass electrique $ note (scale "aeolian" ( "3" + "<~!16 0!16> <4 1 <2 5> <3 6>>" )) # "90s_synatm:9" # att 0.2 # rel 2 # room 0.4 # dry 1.2 # sz 0.5 # octersubbus 42 (range 0 4 "^33") # crushbus 41 (range 16 2.3 "^53") # cut 4