Unverified Commit 86abcb21 by PLN

live: Before changing breakbass

parent 7c619d62
...@@ -31,18 +31,18 @@ setcps (120/60/4) ...@@ -31,18 +31,18 @@ setcps (120/60/4)
-- resetCycles -- resetCycles
d1 $ g d1 $ g
-- $ mask "<f!4 t!16 t!3 f f!4 t f!2 t!2>" -- $ mask "<f!4 t!16 t!3 f f!4 t f!2 t!2>"
$ novaOn "^42" (<| "k k k k") $ novaOn "^42" (<| "k k k <k!2 k*2 [~ k]>")
$ novaOff "^42" (<| "k . ~ k ~ ~") $ novaOff "^42" (<| "k . ~ k ~ ~")
$ "[reverbkick,kick:5,kick:9]" $ "[reverbkick,kick:5,kick:9]"
# gM' 0 1 "^78" # gM' 0 1 "^78"
d2 $ g d2 $ g
$ novaOn "^75" (<| "k*8")
$ whenmod 32 24 (slow 2) $ whenmod 32 24 (slow 2)
$ "~ s ~ s*<1 2 1 1>" $ "~ s ~ s*<1 2 1 1>"
# "snare:21" # "snare:21"
# gM' 0 1.1 "^79" # gM' 0 1.1 "^79"
# note (range "-4" 6 "^51") # note (range "-4" 12 "^51")
d3 d3 $ g
$ g
$ novaOn ("^76") (slice 8 (run 8) . (loopAt 1) . (>| "breaks165")) $ novaOn ("^76") (slice 8 (run 8) . (loopAt 1) . (>| "breaks165"))
$ "d*[8!3 <[8 . 8 4] [16 <4 16>]>]" $ "d*[8!3 <[8 . 8 4] [16 <4 16>]>]"
# "drum:2" # "drum:2"
...@@ -58,9 +58,8 @@ d4 $ g ...@@ -58,9 +58,8 @@ d4 $ g
# gM' 0.35 1.1 "^81" # gM' 0.35 1.1 "^81"
# crush (range 10 3.13 "^53") # crush (range 10 3.13 "^53")
# legato 0.85 # legato 0.85
d5 d5 $ g
$ sometimesBy "<[f t!3]!1 t!7 f!24>" (# silence) $ sometimesBy "<[f t!3]!1 t!7 f!24>" (# silence)
$ g
$ whenmod 4 3 (slice 4 "0 1 2 2") $ whenmod 4 3 (slice 4 "0 1 2 2")
$ every' 4 2 (slice 4 "0 1 0 1") $ every' 4 2 (slice 4 "0 1 0 1")
$ whenmod 16 8 (chop 16) $ whenmod 16 8 (chop 16)
...@@ -68,19 +67,18 @@ d5 ...@@ -68,19 +67,18 @@ d5
# room 0.4 # room 0.4
# gM' 0 0.65 "^82" # gM' 0 0.65 "^82"
# cut 5 # cut 5
d6 d6 $ g
$ g
$ degradeBy (1 - "1 ^55!7") $ degradeBy (1 - "1 ^55!7")
$ novaOn "^59" (superimpose (|+ note 12))
$ juxBy 0.8 (rev . chop 2) $ juxBy 0.8 (rev . chop 2)
$ superimpose (|+ note 12)
$ note (scale "lydian" "<1!3 4> . [1 2] <1 4 4 4>") $ note (scale "lydian" "<1!3 4> . [1 2] <1 4 4 4>")
# "FMRhodes2" # "FMRhodes2"
# octave 4 # octave 4
# gM' 0.3 0.75 "^83" # gM' 0.3 0.85 "^83"
d7 d7
$ mask "<f!24 t!8>" $ mask "<f!24 t!8>"
$ "~ clap" $ "~ clap"
# gM' 0 1 "^55" # gM' 0 1 "^84"
# dry 0.99 # room 0 # dry 0.99 # room 0
# note (-2) # note (-2)
d8 d8
...@@ -88,18 +86,19 @@ d8 ...@@ -88,18 +86,19 @@ d8
$ mask "<f!32 t!32>" $ mask "<f!32 t!32>"
$ slice 8 ("~ <0 0 1 <1 2>>") $ "methbass:2" $ slice 8 ("~ <0 0 1 <1 2>>") $ "methbass:2"
# pan 0.8 # room 0.2 # pan 0.8 # room 0.2
# gain ((range 0 1.3 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine)) # gain ((range 0 1.5 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine))
d9 d9 $ g
$ "<[~ ~ ~ w] w(3,8) w(5,8)>" $ "<[~ ~ ~ w] w(3,8) w(5,8)>"
# "wobble:1" # "wobble:1"
# gain ((range 0 1.5 "^56" * "^77") * (slow 16 $ range 0.6 0.9 saw)) # gain ((range 0 1.5 "^56" * "^77") * (slow 16 $ range 0.6 0.9 saw))
# hpf 200
# pan 0.8 # pan 0.8
# room 0.2 # room 0.2
# cut 21 # cut 21
do do
setcps (120/60/4) setcps (120/60/4)
d1 d1
...@@ -204,3 +203,5 @@ d5 ...@@ -204,3 +203,5 @@ d5
$ "c*<1 <<2 4> [8 4]>>" # "choir:3" $ "c*<1 <<2 4> [8 4]>>" # "choir:3"
# gain 1 # gain 1
# cut 5 # cut 5
d10 $ ""
...@@ -32,7 +32,7 @@ setcps (160/60/4) ...@@ -32,7 +32,7 @@ setcps (160/60/4)
d1 $ g d1 $ g
-- $ mask "<f!4 t!16 t!3 f f!4 t f!2 t!2>" -- $ mask "<f!4 t!16 t!3 f f!4 t f!2 t!2>"
$ novaOn "^42" (<| "k k k k") $ novaOn "^42" (<| "k k k k")
$ novaOff "^42" (<| "k . ~ k ~ ~") -- $ novaOff "^42" (<| "k . ~ k ~ ~")
$ "[reverbkick,kick:5,kick:9]" $ "[reverbkick,kick:5,kick:9]"
# gM' 0 1 "^78" # gM' 0 1 "^78"
d2 $ g d2 $ g
......
...@@ -14,9 +14,9 @@ let gM a = (gM' 0.2 0.8 a) -- gain Modéré doux ...@@ -14,9 +14,9 @@ let gM a = (gM' 0.2 0.8 a) -- gain Modéré doux
let gLPF = (# lpf (min 10000 ((range 200 20000 ("^49"))))) let gLPF = (# lpf (min 10000 ((range 200 20000 ("^49")))))
let gHPF = (# hpf (max 0 (min 7500 ((range "-7500" 7500 ("^49")))))) let gHPF = (# hpf (max 0 (min 7500 ((range "-7500" 7500 ("^49"))))))
let gDJF = (gLPF . gHPF) let gDJF = (gLPF . gHPF)
let novaOn ch pat = (sometimesBy ch pat) let novaOn ch pat = (someCyclesBy ch pat)
let novaOff ch pat = sometimesBy (1 - ch) (pat) let novaOff ch pat = someCyclesBy (1 - ch) (pat)
let novaIf ch patIf patElse = (sometimesBy ch (>| patIf) patElse) let novaIf ch patIf patElse = (someCyclesBy ch (>| patIf) patElse)
-- endregion Nova Utils -- endregion Nova Utils
let gDelayD = (# delay (range 0 5 "^13")) let gDelayD = (# delay (range 0 5 "^13"))
let gDelayFB = (# delayfb (range 0 0.9 "^14")) let gDelayFB = (# delayfb (range 0 0.9 "^14"))
...@@ -25,19 +25,18 @@ let gSize = (|+ size (min 0 (range "-0.5" 0.5 "^29"))) ...@@ -25,19 +25,18 @@ let gSize = (|+ size (min 0 (range "-0.5" 0.5 "^29")))
let gDelay = (gDelayD . gDelayFB . (# delayt 0.25) . (# orbit 2)) let gDelay = (gDelayD . gDelayFB . (# delayt 0.25) . (# orbit 2))
let g = (gDJF . gRoom) let g = (gDJF . gRoom)
let chords = "<d3'min d3'maj>" let chords = "<d3'min d3'maj>"
setcps (165/60/4) -- keep it between 110-190 BPM. You won't be sorry you did. setcps (165/60/4)
-- resetCycles
let modIndex = pF "modIndex" -- 0.2 let modIndex = pF "modIndex" -- 0.2
let mel = "4(<1 2>,2) 5*[1|2|4] 6 7" let mel = "4(<1 2>,2) 5*[1|2|4] 6 7"
resetCycles -- resetCycles
d1 $ g d1 $ g
$ mask "<f!24 t!104>" $ novaOn "^41" (mask "<f!24 t!104>")
-- $ mask "f" -- $ mask "f"
$ "k . ~ k ~ ~" $ "k . ~ k ~ ~"
# "[jazz,tech:5]" # "[jazz,tech:5]"
# gM' 0 2 "^78" # gM' 0 2 "^78"
d2 $ g -- Snare d2 $ g -- Snare
$ mask "<f!24 t!104>" $ novaOn "^41" (mask "<f!24 t!104>")
-- $ mask "f" -- $ mask "f"
-- $ fast 2 -- $ fast 2
$ novaOn ("^43") --BOUTON NASSIM $ novaOn ("^43") --BOUTON NASSIM
...@@ -51,7 +50,7 @@ d2 $ g -- Snare ...@@ -51,7 +50,7 @@ d2 $ g -- Snare
# gM' 0 1.8 "^79" # gM' 0 1.8 "^79"
# pan 0.6 # pan 0.6
d5 $ g -- Hats d5 $ g -- Hats
$ mask "<f!16 t!16>" $ novaOn "^41" (mask "<f!16 t!16>")
$ novaOn "^44" (fast 2) $ novaOn "^44" (fast 2)
$ novaOn "^76" (slow 2) $ novaOn "^76" (slow 2)
$ slow 2 $ slow 2
...@@ -59,14 +58,14 @@ d5 $ g -- Hats ...@@ -59,14 +58,14 @@ d5 $ g -- Hats
# pan 0.6 # pan 0.6
# gM' 0 2.5 "^80" # gM' 0 2.5 "^80"
d3 $ g -- BASSLINE d3 $ g -- BASSLINE
$ mask "<f!8 t!120>" $ novaOn "^41" (mask "<f!8 t!120>")
$ loopAt 2 $ loopAt 2
$ note (scale "aeolian" $ mel) $ note (scale "aeolian" $ mel)
# crush (range 16 5 "^53")
# "bassWarsaw" # "bassWarsaw"
# pan 0.2 # pan 0.2
# octave 2 # octave 2
# cut 3 # cut 3
# crush (range 16 5 "^53")
# gM' 0.8 1.8 "^81" # gM' 0.8 1.8 "^81"
d4 $ g d4 $ g
$ whenmod 16 8 (fast 2 . rev) $ whenmod 16 8 (fast 2 . rev)
...@@ -77,7 +76,7 @@ d4 $ g ...@@ -77,7 +76,7 @@ d4 $ g
# gM' 0 1.8 ("^82" * (range 1 0.9 "^54")) # gM' 0 1.8 ("^82" * (range 1 0.9 "^54"))
d6 $ g -- ABS BASS! d6 $ g -- ABS BASS!
-- $ mask "<f!16 t!16>" -- $ mask "<f!16 t!16>"
$ mask "t*4 . <[t f t f] <f [f t]>>" $ novaOn "^41" (mask "t*4 . <[t f t f] <f [f t]>>")
$ "abstract:1" # cut 6 $ "abstract:1" # cut 6
# gain (range 0.2 0.95 "^84") # gain (range 0.2 0.95 "^84")
d7 d7
......
do do
let gF = 1.5 let gF = 1.5
let gG a = (gain (gF * a)) -- gain Global let gG a = (gain (gF * a)) -- gain Global
...@@ -36,7 +35,8 @@ d2 -- moineau! ...@@ -36,7 +35,8 @@ d2 -- moineau!
# gR 0 2 "^78" # gR 0 2 "^78"
# pan 0.3 # pan 0.3
d3 $ g -- nass d3 $ g -- nass
$ struct "~ t ~ <t!4 [t . <~ t> <~ ~ t t>]!4>" $ novaOn "^75" (struct "t(5,8)")
$ novaOff "^75" (struct "t(3,8)")
$ "nass" $ "nass"
# speed (range 0.5 1.5 "^31") # speed (range 0.5 1.5 "^31")
# attack (range 0.125 0.5 "^51") # attack (range 0.125 0.5 "^51")
......
...@@ -72,7 +72,7 @@ d8 $ g ...@@ -72,7 +72,7 @@ d8 $ g
) )
. superimpose ( . superimpose (
arp "up" arp "up"
. (|+ note 12) . (|+ note "[12,-12]")
. (|* gain 0.9) . (|* gain 0.9)
. (|- pan 0.25) . (|- pan 0.25)
)) ))
......
...@@ -42,8 +42,8 @@ d8 $ g -- Hats ...@@ -42,8 +42,8 @@ d8 $ g -- Hats
# pan (slow 16 $ range 0.4 0.6 saw) # pan (slow 16 $ range 0.4 0.6 saw)
# gM' 0 1.35 "^80" # gM' 0 1.35 "^80"
d4 -- RESONANT BASSLINE d4 -- RESONANT BASSLINE
$ (# lpq (range 0 0.8 "^53")) -- $ (# lpq (range 0 0.8 "^53"))
$ (# lpf (slow 32 $ min 10000 (range 500 15000 sine))) -- $ (# lpf (slow 32 $ min 10000 (range 500 15000 sine)))
$ g $ g
$ novaOn "^81" (slow "2 . 2 <1!3 0.5>") $ novaOn "^81" (slow "2 . 2 <1!3 0.5>")
$ whenmod 16 12 ( $ whenmod 16 12 (
...@@ -72,4 +72,4 @@ d7 $ g -- Fill drums ...@@ -72,4 +72,4 @@ d7 $ g -- Fill drums
$ "ffills:7" $ "ffills:7"
# cut 7 # cut 7
# pan 0.6 # pan 0.6
# gM' 0 0.9 "^80" # gM' 0 1.5 "^83"
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment