techno: break_me+funkiano

parent 069ff109
...@@ -8,12 +8,6 @@ d1 ...@@ -8,12 +8,6 @@ d1
-- $ fast "<0!4 1!4 4!8 4!3 2 4!2 [8 4] 4>" -- $ fast "<0!4 1!4 4!8 4!3 2 4!2 [8 4] 4>"
$ s "[jazz,techno]" $ s "[jazz,techno]"
# gain 0.8 # gain 0.8
d2 $ loopAt 2 $ "break:1"
# cut 2
# gain 0.8
d2 d2
$ someCyclesBy "<0!8 1!8>" (# speed "<0.75!3 0.5 0.75!2 0.5!2>") $ someCyclesBy "<0!8 1!8>" (# speed "<0.75!3 0.5 0.75!2 0.5!2>")
$ mask "t f t f t <f!3 t> t t" $ mask "t f t f t <f!3 t> t t"
...@@ -21,15 +15,21 @@ d2 ...@@ -21,15 +15,21 @@ d2
$ "fbonus:2" $ "fbonus:2"
# gain 0.7 # gain 0.7
# cut 2 # cut 2
d3 -- snares synchro
$ sometimesBy "0!3 1" (stut "<2 3 4>" 1 "<e!3 s>")
$ "s s s t" # "sn" # n "20" # note ("0 0 0 -12") # gain 0.8
d7 d7
$ ((|* gain 0.8) . (# lpq "0.75") . (# room 0.4)) $ whenmod 16 8 (superimpose (
(|* gain 0.8)
. (# lpq 0.75)
. (# room 0.4)
. (# legato 0.2)
))
-- $ fast "<0!8 1!3 2 1!7 2>" -- $ fast "<0!8 1!3 2 1!7 2>"
$ "~ cp" $ "~ cp"
# gain 1 # gain 1
# lpf 2000 # lpf 2000
# note (12) # note 6
d5 d5
-- $ whenmod 16 10 (mask "t(<2!4 1!2>,4)") -- $ whenmod 16 10 (mask "t(<2!4 1!2>,4)")
$ someCyclesBy "<0!32 1!96>" ( -- L'action $ someCyclesBy "<0!32 1!96>" ( -- L'action
...@@ -43,6 +43,10 @@ d5 ...@@ -43,6 +43,10 @@ d5
# cut 1 # cut 1
# gain 0.75 # gain 0.75
d2 -- snares synchro once -- TODO?
$ sometimesBy "0!3 1" (stut "<2 3 4>" 1 "<e!3 s>") -- $ mask "<f!28 t!36>"
$ "s s s t" # "sn" # n "20" # note ("0 0 0 -12") # gain 0.8 $ note (scale "aeolian" (
"d(3,8) ds" + "<c5'maj c5'maj <c5'min a4'maj> a4'min>")
)
# "FMRhodes1"
# gain 0.85
...@@ -11,12 +11,11 @@ do ...@@ -11,12 +11,11 @@ do
solo 5 -- Théorie du naufrage solo 5 -- Théorie du naufrage
solo 6 -- Glitches solo 6 -- Glitches
setcps (110/60/4) setcps (110/60/4)
d1 -- KICK TODO VARIATIONS d1 -- KICK
$ whenmod 16 10 (slow 2)
$ superimpose ((# "glitch") . (|* gain 0.9)) $ superimpose ((# "glitch") . (|* gain 0.9))
$ whenmod 4 2 (fast 2) $ "k k k <k k [~ k] k*2>" # "jazz"
$ every 2 (fast 2) # gain 0.8
$ fast 2 $ "jazz"
# gain 0.6
d2 d2
$ juxBy "<<0.2 0.8> 0.5>" (rev . (hurry 2)) $ juxBy "<<0.2 0.8> 0.5>" (rev . (hurry 2))
$ note (stack [ $ note (stack [
...@@ -37,6 +36,7 @@ do ...@@ -37,6 +36,7 @@ do
# gain (slow 32 $ range 0.5 0.65 saw) # gain (slow 32 $ range 0.5 0.65 saw)
# legato 1 # legato 1
# room 0.5 # sz 0.8 # room 0.5 # sz 0.8
# pan (slow 4 $ "<0.5 0.6>")
d4 d4
$ whenmod 4 3 (often (striate 4)) $ whenmod 4 3 (often (striate 4))
$ slice 2 ("<0!4 1!4>") $ slice 2 ("<0!4 1!4>")
...@@ -46,6 +46,7 @@ do ...@@ -46,6 +46,7 @@ do
# room (slow 32 $ range 0 0.6 sine) # room (slow 32 $ range 0 0.6 sine)
# sz 0.5 # sz 0.5
# cut 4 # cut 4
# pan (slow 4 $ "<0.2 0.4>")
d5 -- Macron : le naufrage d5 -- Macron : le naufrage
$ every 4 (# waveloss 0) $ every 4 (# waveloss 0)
$ ply "<1!4 1 1 2 1 1 2 2 1!5>" $ ply "<1!4 1 1 2 1 1 2 2 1!5>"
...@@ -54,7 +55,7 @@ do ...@@ -54,7 +55,7 @@ do
$ slice 3 "2" $ slice 3 "2"
$ s "macron:8/2" $ s "macron:8/2"
# begin "<0.1!4 0!4 0.5!3 0.8!5>" # begin "<0.1!4 0!4 0.5!3 0.8!5>"
# waveloss (slow 16 $ range 30 50 sine) # waveloss (slow 16 $ range 20 30 sine)
# gain 0 # gain 0
# cut 5 # cut 5
d6 d6
...@@ -63,6 +64,5 @@ do ...@@ -63,6 +64,5 @@ do
scale "major" "<0 2 4 12>" + (run 4) scale "major" "<0 2 4 12>" + (run 4)
) # gain 0.7 ) # gain 0.7
once $ s "fguitar:36"
once $ s "fbass:35"
# gain 0.75 # cut 42 # gain 0.75 # cut 42
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