-- region Part 1 Breakbeato-bass do d1 -- BREAKBEAT! $ s "jazz(2,4)" # lpf 1000 -- $ superimpose ( -- const -- $ s "k(<1!7 3>,8) . k(<1 3 5>,8)" -- # s "reverbkick" -- # gain 0.5 -- ) -- $ loopAt 2 -- 4 slowdown -- $ slice 4 "0? 1*2 3(3,8) ~" -- $ s "break:1" # gain 0.5 d2 $ fast "<4!2 8 16>" $ s "ifdrums:1" # gain 0.5 # sz 0.5 # room 0.5 d5 $ note ("<0>" + "[0,<12 12?>](<3!3 5 3!3 5 3!3 5 8 10 5>,16)" ) # s "bass3" # gain 0.55 -- $ whenmod 32 16 (degradeBy "0 0.5!7 0") $ superimpose ( (arp "up") . (|+ note 24) . (# gain 0.35) -- . (# crush (slow 16 $ range 0.75 8 sine)) ) $ s "t(<4!2 5!2>,<4!2 8!2>)" # note ("<c3'min c3'maj c3'min7 c3'maj>") # s "supersaw" # voice 0.01 # gain 0.3 -- endregion -- Techno tambourino piano do setcps 0.45 solo 1 -- Kick unsolo 2 -- Drums gretsch contretemps chaloupé solo 3 -- Drumroll aigu unsolo 4 -- Piano fou unsolo 5 -- Bass guitar 80s unsolo 6 -- Noise solo 7 -- Birds d1 -- $ whenmod 32 28 (slow 4) -- $ whenmod 8 7 (slow 2) -- $ s "k k k [<k!3 k?> <~ k?>]" $ whenmod 8 7 (>| n "0*4") $ s "k . k(<1 3!2 5>,8)" # s "jazz" # gain (slow 128 $ range 0.35 0.6 cosine) d2 $ n "1 . [[2,2](<4!3 3 4>,8)]" # s "gretsch" # gain (slow 30 $ range 0.4 0.8 sine) d3 $ often (jux rev) $ fast "<4!3 <8 [16 8]>> <8!3 16>" $ s "gretsch:3" # gain (slow 16 $ range 0.3 0.5 saw) # room 0.6 # sz 0.9 d4 $ rev $ superimpose (arp "[updown,downup?]" . (stut "<2 3 4>" 0.8 0.125) . (|+ note 12) . (|* velocity 1.1) ) $ note ("<g3'maj!3 g3'min g3'maj!2 g3'min g3'maj>") # s "superpiano" # velocity (slow 100 $ range 0.15 0.35 tri) d5 -- Guitare synth 80s flamboyant $ note (scale "hexMajor6" "[g4(<3 5 3 3 5 3 3 5>,8)]" -- + "[1 3 <1!4 <6 8 6 6>!4>]*4" + (whenmod 8 4 rev $ "[0 <5 3 2 -2>]") ) # s "supersaw" # voice 0.01 # gain (slow 80 $ range 0.25 0.45 sine) # hpf 500 # hpq 0.4 d6 $ "glitch:2/4" # speed (range 0.1 0.5 perlin) # begin 0.1 # gain (slow 16 $ range 0.5 0.7 saw) d7 -- Background birds $ often (stut 4 0.75 0.5) $ s "birds/4" # n (irand 7) # note (-2) # gain 0.45 # speed (range 0.5 1.5 rand)