once $ s "bogdan:10" # gain 0.9 # begin 0.5 # end 0.75 do solo 1 -- DNB solo 2 -- Comete solo 3 -- Alerte pont 16/24 solo 4 -- Nappes regulieres, pont: part en echo solo 5 -- Hihats noise sec solo 6 do unsolo 1 -- DNB unsolo 2 -- Comete unsolo 3 -- Alerte pont 16/24 unsolo 4 -- Nappes regulieres, pont: part en echo unsolo 5 -- Hihats noise sec unsolo 6 -- Meth DNB: J'ai toujours préféré ta cuisine maison <3 do setcps (165/60/4) let gDNB = 0.45 let gCom = 0.55 let gAlert = 0.25 let gNappes = "<0.8 0.9 1.0 0.9>" let gHats = 0.45 let gGuit = 1.4 let melody = "<<0 <2 4>>!2>" -- Rythme DNB d1 -- $ whenmod 24 18 (# gain 0) -- $ whenmod 24 17 (|- gain 0.05) -- $ whenmod 24 16 (|- gain 0.05) $ fix (# s "sn:5") (s "s") $ fix (# s "[kick:1]") (s "k") $ superimpose (# s "bd") $ every 4 ( sometimesBy "0 0.25" (fast 2)) -- Double s(1,4) $ s "k ~ s ~ ~ k s <~!3 s>" # gain gDNB # pan 0.3 -- Lead: Comete! d2 -- $ whenmod 24 16 (|> gain 0) $ "methbass:10" # gain (slow 60 $ range (gCom - 0.15) gCom sine) # note (slow 2 $ "<0 0 8 [8 10]>") -- Alerte! d3 $ whenmod 24 16 (|+ gain 0.05) $ whenmod 24 14 (|+ gain 0.1) $ whenmod 24 15 (# gain gAlert) $ chop 2 $ s "~ methbass:4/2" # note ("<0 -2>!2") # gain 0 -- Nappes intenses d4 $ whenmod 24 20 (# gain (gNappes / 2)) $ whenmod 24 16 (# silence) $ euclid ("2*<1 2 4 2>") 8 $ s "abstract:0" # note ("<0 -2>!4") # gain gNappes # cut 4 # release 4 -- Longueur echo pont 24 d5 -- noise hihat! -- $ whenmod 24 16 (hurry "[1|2]") $ sometimes (# n 6) $ "abstract:5(<[1|3|5] <4 [1|8]>>,8)" # cut 5 # room 0.2 # dry 2 # note (-4) # gain (slow 20 $ range (gHats - 0.2) gHats sine) # pan (slow 16 $ 1 - sine / 2) -- Bacasable d6 -- Guitare ploink insecte $ sometimes (fast 2) $ someCycles (slow 2) $ arp "<down downup up updown>" $ note (scale "aeolian" "c4'maj") # s "abstract:11" # cut 7 # gain gGuit # end 0.1 # pan (slow 16 $ sine / 2)