Commit e957b75e by PLN (Algolia)

Live Lyon + Perplexity + MedievalCore+ Secret

parent a776c49e
......@@ -65,6 +65,7 @@ d5 $ gF3 $ gM3 -- Baba hums
# rel 4
# room 0.5 # dry 0.8 # sz 0.8
# legato 2
# gain 1.2
d6 $ gF2 $ gM2
$ whenmod 32 16 (slice 8 "<[~ 0 ~ 1 ~ 2 ~ 3]!3 [0 1 2 3]*<2 [2 4]>>")
$ note ("<b bf gs@2>" - "f")
......
-- /home/pln/Downloads/PerfectSunriseLoop.gif
do
-- resetCycles
setcps (120/60/4)
......@@ -20,6 +21,7 @@ d1 $ gF1 $ gM2
""
]
# "[techno:1,jazz]"
# gain 1.4
# cps ((range 60 180 "^29")/60/4)
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
......@@ -57,12 +59,12 @@ d6 $ gF1 $ gM1 $ chop 8
$ loopAt 1
$ "breaks165"
# cut 6
d8 $ gF1 $ gM1
d8 $ gF1 $ gM1 -- Break multi-facette, assez complexe, comme chacun d'entre nous
$ midiOn "^60" (mask "t(4,8,<1!3 0>)" . chop 8)
$ midiOn "^36" (slice 4 ("0 <1 1 [2 3] 1>") . (# "jungle_breaks:130"))
$ chop 8
$ midiOn "^36" (id . (loopAt 0.5 . (# "jungle_breaks:130")))
$ midiOn "^92" (mask "t(16,32)" . ply "2 2 <4 8 16 16> 2")
$ midiOn "^56" (# n 12)
$ midiOn "^56" (loopAt 2 . (# n 12))
$ chop 16
$ loopAt 2
$ "jungle_breaks:1" # cut 8
d9 $ gF3 $ gM3
......@@ -79,4 +81,8 @@ d11 $ gM3 $ gF3-- Intro doux piano
$ chop 8
$ "nujazz_keys120:35/4"
# cut 11
# room 0.7 # sz 0.7 # dry 1
# delaybus 111 "^30"
# delayt ("<2!3 3>"/3)
# delayfb 0.5
# gain 1.3
-- BLUE GOLD - SUNS OF GOLD LIVECODING REMIX
-- Original by Leifur James :pray:
do
resetCycles
setcps(124/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
......
do
resetCycles
-- resetCycles
setcps (142/60/4)
let modIndex = pF "modIndex"
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
......
......@@ -16,11 +16,11 @@ d1 $ gF4 $ gMute2
(# n 14)
. (|* gain (range 0 1 "^30"))
) -- SALE
$ "k k k <k k*2 k [~ k*<1 1 <1 2> <2 4>>]>"
# "[jazz]"
# note ("<2!4 -4!4>") -- Calage
$ "k k*2 k <k k*2 k*<4 2 4 1> [~ k*<1 1 <1 <2 [4 2]>> <2 4>>]>"
# "[jazz,hardkick_rha:5]"
# note ("<0!4 -4!4>") -- Calage
-- # n "<14!3 15 <14 15>>" -- SALE
# gain 1
# gain 1.8
d2 $ gF1 $ gM1 $ "~ s ~ [s*<1!3 2> ~]"
# "[cp]"
# gain 1.4
......@@ -37,6 +37,7 @@ d8 $ gF1 $ gM1
$ "jungle_breaks:11"
# cut 8
# room 0.4 # dry 1.1
# gain 1.5
d4 $ gF2 $ gM3 -- Incroyable melodie mega chargee explosive
$ midiOn "^89" (ply 4)
$ midiOn "^57" (mask "t([<2!4 4!4 8!4 16!4> 2],16)"
......
do
setcps (125/60/4)
let gManual = (# djf 0.98)
-- let gProg = (whenmod 64 48 (# djf (slow 16 $ range 0.5 0.95 saw)))
let g = gManual
d1 $ g
$ "k k k <k k*2 k [k*2 k]>"
-- $ "k k(<3 [3 5]>,8)"
# "[jazz,kick:5]"
# bandf 400
# gain 1.5
-- # att 0.1 # rel 2
d2 $ g $ "~ s " # "snare:30" # gain 1.2 # lpf 3000 # att 0.12 # rel 2 # pan 0.7
d3 $ g $ "dr(<3!3 5>,8)" # delay 0.03 # delayt 0.125 # hpf 5000
d4
$ superimpose (|+| note "[0 12]*4")
$ note ("<f d e@2>/2" - 12) # "moog"
# crushbus 41 (fast 8 (range 12 "<8!3 <4 3>>" sine))
# room 0.4 # sz 0.4
d5 $ g $ n (slow 4 $ "<0 1 2 3>") # "nujazz_keys125" # cut 4 # room 0.4
# gain 0.8
d6 $ g
$ jux (chop 4 . (rev) . (# cut 61))
$ "nujazz_bass125/2"
# n "41"
# cut 6
# octersub 0.5
-- # gain (slow 32 $ range 0.5 1.1 saw)
# pan 0.3
# room 0.2 # sz 0.4
d8 $ g $ loopAt 2
-- $ jux (rev . (# cut 81))
-- $ slice 4 "0 1*<1 2 4> 2(<3 5>,8) <3 [3 0]>"
$ slice 16 "0 1 ~ ~ ~ 15"
$ loopAt 2 $ "jungle_breaks:69"
# cut 8
-- # octer 0.8
-- # octersub 0.38
# gain 1.4
once $ "dr"
......@@ -11,78 +11,38 @@ let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let maskLoops = (mask "<t!4 [t!3 f]>" . mask "<t!14 f [f!3 t]>")
setcps (90/60/4)
d1
$ f1 $ gMute2
-- $ kCrush
d1 $ f1 $ gMute2
$ midiOn "^42" (struct "t t t <t!2 [<~ t> <t t?>]>")
$ midiOff "^42" (struct "t . <~!4 t(<3!3 1>,8,<<0 3 <3 0> 0>>)!12>")
-- $ mask "<f!32 f!8 t!16 t f!6 [t f] t!64>"
-- $ "[808bd:6,kick:8]"
$ fix ((# hpf 500) . (|* gain 0.7)) "kick:5"
$ "[jazz,kick:5]"
-- # room 0
# gain 1.3
d2 $ f1 $ gMute2
$ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32
$ midiOff "^75" maskLoops
$ midiOn "^75" (ply "2 <2!3 4>")
$ midiOff "^75" maskLoops $ midiOn "^75" (ply "2 <2!3 4>")
$ midiOn "^43" (slice 4 (run 8))
$ mask "<t [t!6 f t] t t t!4>" -- Degrade mid-loop!
$ iter "1 <1!4 4 4 4 2>"
$ loopAt 2
$ slice 8 (run 8)
$ "break:20"
# pan 0.4
# cut 2
# speed (range "-0.25" 2.25 "^31")
-- # midiG' "^79" 0 1.3
$ iter "1 <1!4 4 4 4 2>" $ loopAt 2$ slice 8 (run 8)
$ "break:20" # pan 0.4 # cut 2 # speed (range "-0.25" 2.25 "^31")
d11 $ f1 $ gMute -- Snare <3 chak reverb phantome
$ struct "[~ t]*2"
$ "[snare:34,cp]"
# lpf 2000
-- # midiG' "^14" 0 1.8
$ struct "~ t ~ <t!3 ~>" $ "[snare:34,cp]" # lpf 2000
d3 $ f1 $ gMute -- Sidekick, doubtful, yet hardworking hats
$ midiOn "^76" (ply "[4 <1 2>]*<4!3 8>")
-- $ mask "<t(<1!3 3>,4)!4 t(2,8)!8 [<t!3 [t f]>]!52>" -- Intro / break/32
$ maskLoops
$ midiOn "^76" (ply "[4 <1 2>]*<4!3 8>") $ maskLoops
$ someCyclesBy "<0.6 1>" (stut "<2 3 4>" 0.5 "s")
$ sometimesBy (0.1 * "[0 <0 0.5> 0 <1!3 2>]!4") (# silence)
$ ply "<1!8 <2 <2 [2 2 4 2]!7> <2!4 4!4> <4!2 [4 4 8 4] [4 8 <8 4> 4]!3 4>>>"
$ "hh*4"
# "h2ogmhh"
# pan 0.6
# room 0.2
-- # midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 1.3
# gain (0.8 + 0.08 * (slow 2 perlin))
$ "hh*4" # "h2ogmhh" # pan 0.6 # room 0.2 # gain (0.8 + 0.08 * (slow 2 perlin))
d4 $ f3 -- Atmospheric synth: aerial questions
$ midiOn "^89" (|+ note "<2 2 4 <4 12>>")
$ midiOn "^57" (chop "<[16@3 32] [32@3 64]>")
$ "90s_synatm:8/4"
# cut 4
# room 0.8
# legato 4
# dry 1
# pan 0.45
-- # crushbus 42 (range 16 3.4 "^53")
$ midiOn "^89" (|+ note "<2 2 4 <4 12>>") $ midiOn "^57" (chop "<[16@3 32] [32@3 64]>")
$ "90s_synatm:8/4" # cut 4 # room 0.8 # legato 4 # dry 1 # pan 0.45
# legato 2
-- # midiG' "^81" 0 1.5
d5 $ f2 -- Synth: ELECTRONIC ANSWERS
-- $ mask "<f!32 t!96>" -- Intro
$ midiOn "^90" (ply "1 <1!3 [0 1 <2 0> <0 2>]> <2!3 [[2 0] 1]> <1 2>" .slice 16 ("<0 1 2 3>*8" + "<0!4 4!4>"))
$ midiOn "^58" (chop "<4 8 16 [32 64 . 128]>")
$ "90s_synatm:14/4"
# cut 5
# room 0.85
# sz 0.8
# pan 0.43
# dry 1
# delayfb 0.25
# delayt 0.25
# delay 0.8
# panbus 51 (range 0.8 0.65 saw)
# crushbus 52 (range 16 2.85 "^54")
# octersubbus 53 (range 0 1.85 "^34")
# gain 1.5
$ "90s_synatm:14/4" # cut 5 # room 0.85 # sz 0.8 # pan 0.43 # dry 1
# delayfb 0.25 # delayt 0.25 # delay 0.8
# panbus 51 (range 0.8 0.65 saw) # crushbus 52 (range 16 2.85 "^54")
# octersubbus 53 (range 0 1.85 "^34") # gain 1.5
d7 $ f3 -- High lead: Winds of truth
$ juxBy 0.5 ((# cut 61) . rev) -- Jux rev <3
$ whenmod 8 6 (swing "<4 2>")
......
-- url: "/home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif"
-- /home/pln/Work/Web/www/next/public/images/parvagues/bg_live.gif
do
-- resetCycles
setcps (120/60/4)
......@@ -11,32 +13,39 @@ let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k*2")
$ midiOff "^42" (<| "k . ~ k ~ ~")
-- $ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
$ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
-- $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 400)) "kick:4"
$ "[808bd:1,808bd:2,jazz,kick:4]"
# gain 1.4
$ "[jazz,kick:4]"
# gain 1.1
d2 $ gF1 $ gM1
$ midiOff "^43" (<| "~ cp")
$ midiOn "^43" (<| "~ cp ~ cp*<1!3 <2 [4 2]>>")
$ "vec1_snare:9"
$ midiOff "^43" (<| "~ . s@3 <~ s*<1 <2 [4 2]>>>")
$ midiOn "^43" (<| "~ s ~ <s!3 s*<2 [4 2]>>")
$ fix (# lpf 4000) "snare:30"
$ "[snare:30]"
# lpf 2800
# gain 1.4
# gain 1.1
# cut 2
d3 $ gF1 $ gM1
$ "~ h ~ h ~ h*<1 2 1 <1 [4 2]>> ~ h*<1!7 <2 4>>"
# "h2ogmhh:3" # room 0.2
$ "~ h ~ h ~ h*<1 2 1 <1 [4 2]>> ~ h*<1 <1 1 0 2> 1 <2 4>>"
# "hh"
# att (slow 32 $ range 0.4 0.04 saw)
# rel 2
# room 0.2 # dry 1.3
# gain 1.4
d4 $ gF2 $ gM3
$ someCyclesBy "^17" (degradeBy (1 - "1 0 1 <0!4 1!4> 1 0 1 <0 1 1 <1 0>>"))
$ midiOn "^57" (sometimesBy 0.5 ((|- note 12) . (# cut 41)))
$ midiOn "^89" (ply 2)
-- $ note ("d3" + scale "mixolydian" ("[<0!12 3!4> <4!12 6!4>]*4")) -- ORIGINAL
-- $ note ("d3" + scale "mixolydian" ("[<0!12 3!4> <4!12 6!4>]*4")) -- ORIGINAL.
$ note ("d3" + scale "mixolydian" ( -- NICE VARIATIONS
"[0 4 0 4 <0!3 2> 4 <0 2> 4]" + "<0!3 [4 6]*2!1>")
"[0 4 <0 [0 <5 6>] 0> 4 <0!3 2> 4 <0 2> 4]" + "<0!3 [4 6]*2!1>")
)
# "bassWarsaw"
-- # "bass3:3" |+ note 24
# octersubbus 41 (range 0 2.5 "^33")
# crushbus 42 (range 16 2.5 "^53")
# roombus 43 (range 0 0.5 "^33")
# gain 1.4
# gain 1.3
# pan 0.3
# cut 4
d5 $ gF3 $ gM3
$ midiOn "^90" (ply 2)
......@@ -48,14 +57,19 @@ d5 $ gF3 $ gM3
# room 0.4 # sz 0.8 # dry 1.1
-- # crushbus 51 (range 16 3.5 "^54")
d7 $ gF3 $ gM3
$ midiOn "^91" (ply "<2 4 8>")
$ midiOn "^91" (ply "<2 4 <8 [16 8]>>")
$ slow 4
$ midiOn "^55" (slow 4)
$ slice 16 (run 6)
$ chop 16
$ "airports" # cut 5 # speed 0.5
# gain 1.2
# room 0.4
# att 0.02
# rel 2
# freezebus 71 "^55"
# pan 0.8
d8 $ gF1 $ gM1
d8 $ gF1 $ gM1 -- BROKEN BEAT | BREAKS STACK
$ loopAt 2 $ chop 16
$ midiOn "^92" (ply 2)
$ midiOn "^60" ( -- Broken Beat!
......@@ -68,14 +82,17 @@ d11 $ gM3 $ gF3 $ slice 4 (slow 4 $ run 4) $ "airports:1"
# cut 11
# pan (slow 16 $ range 0 0.4 saw)
# lpf ("<6000 4500 3000 2000>")
d12 $ gM3 $ gF3 $ slice 16 (slow 8 $ run 16)
$ "airports:2"
d12 $ gM3 $ gF3 -- DRINK ME <3
-- $ slice 16 (slow 8 $ rev $ run 16)
$ (note "<d3 d3 <g3!3 fs3> <fs3!3 a4>>")
# "moogBass"
# cut 12
# pan (slow 16 $ range 1 0.6 saw)
# room 0.8 # dry 0.4
d10 -- FIXME Other RISER
$ chop 4
$ mask "<f!24 t!8>"
$ loopAt 4
-- $ mask "<f!24 t!8>"
$ loopAt 8
$ "risers:8"
# cut 10
# hpf 2000
......
......@@ -70,7 +70,7 @@ d5 $ gF3 -- Appel oiseau joyeux oiseau joyaux
d8 $ gF1 $ gM1
$ midiOn "^92" (ply "1 <2!3 4>")
$ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
$ midiOn "^36" ((# n "22")) -- Raise COMEON!
$ midiOn ("^36" - "^56") ((# n "22")) -- Hmmm Break
$ midiOn "^56" ((# n "23")) -- Raise COMEON!
$ chop 16
$ loopAt 2
......
......@@ -9,19 +9,24 @@ let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ "[jazz,kick:4]*4"
$ midiOff "^41" (<| "k k k k")
$ midiOn "^41" (<| "k k k k*<1 1 1 2>")
$ "[jazz,kick:4]"
d2 $ gF1 $ gM1 $ "~ cp ~ cp*<1!3 2>" # "snare:24" # gain 1.4
d3 $ gF1 $ gM1 $ "hh([12 <12 16 12 6>],16)" # "h2ogmhh"
d4 $ gF2 $ gM3
$ midiOn "^57" (mask "t(<4!3 <6 8>>,8,1)")
$ fast 2
$ note "<[e3 b3 g3 b3] [e3 a3 cs4 a3]>"
$ note ("<[e3 b3 g3 b3] [e3 a3 cs4 a3]>" - "[0,12]")
# "bassWarsaw"
# octersubbus 41 (range 0 2 "^53")
# crushbus 42 (range 16 2 "^33")
# cut 4
# octersubbus 41 (range 0 2 "^53")
# room 0.4 # sz 0.8
d5 $ gF3 $ gM3 $ note "<e!3 cs>@7 [d]" # "FMRhodes1"
d5 $ gF3 $ gM3 $ note ("<e!3 cs>@7 [<d d g d>]" - 12) # "FMRhodes1"
d7 $ gF3 $ gM3 $ note "<e3!3 cs2>@7 [d]" # "FMRhodes2"
d8 $ gF1 $ gM1 $ loopAt 2 $ chop 8
$ midiOn "^60" (splice 8 "1 4 3 7 4 5*2 [6 7] 7*2")
$ "jungle_breaks:45"
d1 $ "FMRhodes1" # note "e3"
-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
do
setcps (138/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [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
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k")
$ midiOff "^42" (<| "k . k(<3!3 [5 5 8 5]>,8)")
$ "[techno:0,808bd:2,909,kick:4]"
-- $ "jazz"
d2 $ gM1 -- Clap timer
$ midiOn "^43" ((|* gain "0 1 0.8 1") . (<| "~ c <~!3 [~ c]> c"))
$ midiOff "^43" ((|* gain "1 0.8") . (<| "c . ~ ~ ~ <~!3 c>"))
$ drumFrom "[sakatadpm48,rolandr8]" "cp"
# lpf 2000
# gain 1.2
d3 $ gF1 $ gMute
$ midiOff "^44" (mask "t([8 4 <4 <8 16>>],16)")
$ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]")
$ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh"
$ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]"
# n "0!3 <0!3 1>"
-- # midiG' "^80" 0 1.6
# gain 1.1
d4 $ gF2 $ gM3-- Basse Magie Noire Meta-Programmation. :sorcerer:
$ midiOn "^57" (struct "t(4,8,1)")
$ slow 4
$ midiOff "^89" (mask "t t t f")
$ note ("c3 <d3 [d3] d3 [d3@3 f3]> e3 <g3 b3 a3 c4>"
-- + "<0!8 <[<0!3 0@7> 3]!3 [0 9 12 0]>!8> <0!3 3 0 3 <3 7>> <0 12> 0"
) -- Variations majeures
# "bassWarsaw"
# crushbus 41 (range 16 5 "^53")
# octersubbus 42 (range 0 3 "^33")
# octerbus 43 (range 0 2 "^17")
# legato 2
# cut 4
# room 0.7
# sz 0.3 # dry 1.5
# gain 1.2
d5 $ gF2 $ gM3
$ slow 2
$ stack [
note ("c3(3,8) <d3 <d3*2 d3(3,8)>> e3([3 1 3],8) g3" + "<0!7 -2>" + 24) # "giorgio_syn:7"
# cut 51
# gain 0.7
# att 0.14 # rel 2
# legato 1.2
,
note "<c3 g2 a2 f2>" # s "FMRhodes1" # gain 1.0 # legato 1.5
]
# room 0.3 # size 0.5
# gain 1.2
d12 $ gF3 $ gM3
$ slow 4 $ ply 2
$ note "<[c4,e4,g4] [c4,f4,a4] [c4,e4,g4] [g3,b3,d4]>"
# "FMRhodes2"
# legato 2
# delaybus 51 (range 0 1 "^29") # delayt 1.125 # delayfb 0.8
# gain 1
# lpf (slow 16 $ range 800 2000 sine)
# room 0.4
d7 $ gF3 $ gM3 -- Lady Perplexity
-- $ whenmod 8 7 (# silence)
$ midiOn "^91" (ply "2 4 <8 8 4 16>")
$ midiOn "^59" (chop 4)
$ someCyclesBy "^19" (mask "t(3,8) t(<3 <5 8>>,8) t(<3 [<5 3> <3 5>]>,8) t(<3!3 5>,8)")
$ sometimesBy "^35" (juxBy 0.25 (loopAt 0.5 . (# cut 71) . (|* gain (slow 8 $ range 0.7 1 saw))))
$ sometimesBy "^55" (rev)
-- $ midiOff "^59" (chop 4)
$ chop 16
$ loopAt 8
$ "rhadamanthe_vocal:1"
# cut 7
# room 0.4 # sz 0.5 # dry 1.4
-- # pan (slow 16 $ range 0.9 0.6 saw)
# gain 1.2
d8 $ gF1 $ gM1
$ midiOn "^92" (slice 4 "0 1 2 3 0 1 3 3 1 3 1 2 0 1 3*2 3*2")
$ midiOff "^60" (mask "t(4,8,1)")
$ midiOn "^36" (loopAt 2 . (# "break:2"))
$ midiOn "^56" (loopAt 2 . (# "jungle_breaks:90"))
$ chop 16
$ loopAt 1 $ "jungle_breaks:2" # cut 8
# gain 1.3
# room 0.3 # dry 1.4 # sz 0.3
# lpf 5000
-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
do
setcps (80/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [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
d1 $ gF1 $ gM2
$ midiOn "^42" (fast 2 . (<| "k k k k*2"))
$ midiOff "^42" (<| "k*<1!7 2> ~ . ~ <~!7 [k*2 k]>")
$ "[jazz]" # room 0.2 # sz 0.3 # dry 1.4
# gain 1.3
d2 $ gF1 $ gM2
$ midiOn "^42" (fast 2)
$ "~ c ~ c*<1 <4 2 4 [8 4]>>"
# "cp" # lpf 4000
d3 $ gF1 $ gM1
$ "hh(3,8) hh(3,8)" # "h2ogmsn:4"
# delay 0.5 # delayt "<0.05 0.1 0.2 0.3 0.4>" # delayfb 0.8
-- $ "jazz"
d7 $ gF1 $ gM1
$ midiOn "^91" (ply "2 <2!2 <3 4> <4 8>>")
$ slice 4 "0 1 <2 ~ ~ 2*<2 4>> 3*<1!3 <2 [2 <4 8>]>>"
$ loopAt 1
$ "temptation:4"
# cut 8
# pan 0.3
d4 $ gF2 $ gM3 -- TEMPT MY BASS
$ midiOn "^89" (ply "2 <2!2 <3 4> <4 8>>")
$ midiOn "^57" (# n 3)
$ chop 8
$ loopAt 1
$ "temptation"
# n 2 # cut 4 # room 0.3 # sz 0.4
# crushbus 41 (range 12 3 "^53")
# octersubbus 42 (range 0 2 "^33")
d5 $ gF3 $ gM3
$ midiOn "^90" (ply "<4 [4 8]>")
$ midiOn "^58" (fast 4)
$ slice 8 "<0 0 1 1 2 2 3 3>/2"
$ "temptation:0"
# cut 5
# room 0.4 # sz 0.8
# crushbus 51 (range 12 3 "^54")
# octerbus 52 (range 0 1 "^34")
d8 $ gF1 $ gM1
$ midiOn "^92" (ply "2 <2!2 <3 4> <4 8>>")
$ loopAt 4
$ slice 4 "0 1 2 3*<1!3 8>"
$ chop 8
$ "jungle_breaks:12" # cut 8
# pan 0.8
d9 $ gF3 $ gM3 -- TEMPTATION VOICES
$ n "<7!8 8!8>/2"
# end "<0.8!8 1!8>"
# "temptation"
# cut 9
......@@ -25,7 +25,7 @@
do
resetCycles
-- resetCycles
setcps (99/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
......
......@@ -52,7 +52,7 @@ d3 $ gF1 $ gM1 -- Running Hats
# room (slow 8 $ range 0.2 0.45 saw)
# sz (slow 8 $ range 0.8 0.2 saw)
# dry (slow 4 $ range 0.8 1.2 perlin)
# note (range "-12" 12 "^52")
-- # note (range "-12" 12 "^52")
# pan 0.6
# cut 344
# gain 1.6
......
......@@ -62,7 +62,7 @@ d7 $ gM3 $ gF3
# cut 7
# gain 1.2
d8 $ gM1 $ gF1
$ midiOn "^60" (ply "1 <2 4>")
$ midiOn "^60" (mask "t(4,8,1)")
$ midiOn "^92" (iter "1 <1 4>")
$ midiOn "^36" ((|* gain 0.9) . loopAt 2 . (# "jungle_breaks:16"))
$ midiOn "^56" ((|* gain 0.9) . loopAt 0.5 . (# "jungle_breaks:36"))
......
......@@ -24,7 +24,7 @@ d1 $ gF1 $ gM2
-- $ "[kick:4]"
-- $ "[808bd:2,808bd:4]"
# lpf 5000
# gain 1
# gain 1.4
d2 $ gF1 $ gM
$ "~ sn <~ [~ sn]> sn*<1!3 2>"
-- # note "0 0 -1 0"
......@@ -49,6 +49,7 @@ d6 $ gF1 $ gM -- Hats closed legers
# room 0.3 # sz 0.13 # dry 1.1
# gain 1.2 * ("1 0.9 1 0.8 <0.9!3 1.05> 1")
d4 $ gF2 $ gMute3 $ chop 8 -- La super sunny bass on the other side of the sunny street
-- TODO: Plus sunny?
$ midiOn "^89" (mask "t(8,16)" . ply "<2!3 [2 4]>")
$ midiOff "^57" (mask "t(<4 [4 <2!3 [2 8]>]>,8)")
$ superimpose (
......@@ -92,7 +93,8 @@ d10
# cut 10
-- d11 $ gMute3
-- d7 $ gF3 $ gM3 $ note (
d7 $ gM3 $ gF2
d7 $ gM3 $ gF2 -- LA ACID BASS ARE YOU SUNNY NOW ?? <3
$ midiOn "^57" (superimpose ((|* gain 0.8) . (0.125 ~>) . (# note "0 <7!3 12>")))
$ midiOn "^91" (mask "t(16,32)" . ply 2)
$ arp "up"
$ note (
......@@ -107,7 +109,7 @@ d7 $ gM3 $ gF2
# width (range 0.5 0.98 "^35")
# crushbus 71 (range 16 3.5 "^55")
-- # filterRange 4
# room 0.3
# room 0.5
# pan 0.3
# sz 0.5
# gain 1.3
......@@ -126,3 +128,11 @@ d8 $ gF1 $ gM
$ "jungle_breaks:28" -- BREAKS LOVER <3
# room 0
# gain 1
d11 $ gM3 $ gF3-- Sunny doux piano c'est cadeau
$ gF3
$ (slice 2 "0*2")
-- . (# att 0.02) . (# sus 2) . (# rel 4) . (# legato 4)
$ chop 8
$ "nujazz_keys120:35/4"
# cut 11
# gain 1.3
......@@ -66,7 +66,7 @@ d4 $ gF2 $ gM3 --
)
# "bassWarsaw"
# cut 4
# gain 1.1
# gain 1.6
# pan 0.3
# octersub 0.5
# octerbus 41 "^53"
......
......@@ -20,7 +20,9 @@ d1 $ gF1 $ gM2
$ fix ((# att 0.02) . (# rel 0.5) . (# lpf 400)) "kick:4"
$ "[808bd:1,808bd:2,jazz,kick:4]"
d2 $ gF1 $ gM
$ "~ sn <~ [~ sn]> sn"
$ midiOn "^43" (<|"~ sn <~ [~ sn]> sn" )
$ midiOff "^43" (<| "~ s")
$ "sn"
# note "0 0 -1 0"
# legato "1 1 0.75 1"
# "[snare:40,snare:29]"
......
-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
-- L'Été a MauerPark <3
do
setcps (120/60/4)
......@@ -60,7 +61,7 @@ d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique
$ midiOn "^57" (rev)
$ midiOn "^89" (struct "t*<16 32>") -- Basse folle
$ (0.125 <~) -- Calage :)
$ someCyclesBy (1 - "^33") ( -- Pattern complet
$ someCyclesBy ("^33") ( -- Pattern complet
(mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
) --
$ fix ((midiOff "^57" (# silence)) . (|* gain 0.65) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5))
......@@ -73,7 +74,8 @@ d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique
# room 0.2
# pan 0.4
# crushbus 41 (range 16 2.5 "^53")
-- # midiG' "^81" 0 1.6
# gain 1.6
# cut 4
d5 $ gF3 $ gMute3 -- Leads reponse TODO moins carre?
$ midiOn "^90" (struct "t*<16 32>") -- Basse folle
$ midiOn "^58" (|+ note 12)
......@@ -132,7 +134,7 @@ d9 $ gF3 -- Nano-angels chorus of machines
# legato 2
# pan 0.64
# cut 10
# gain 1.2
# gain 1.5
......
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