From efafcd5ca5d9ef7f6bfa1709a883d03b07962c1e Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Fri, 9 Feb 2024 19:45:02 +0100 Subject: [PATCH] Collab: Josh & algorythm --- live/boeuf/algorythm/fdlm2022/toxic.tidal | 19 ++++++++++--------- live/boeuf/algorythm/love23/something_about_us.tidal | 80 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-------------------- live/boeuf/algorythm/season2/blues_wednesday.tidal | 83 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------- live/midi/nova/nujazz/cafe_glace.tidal | 3 +-- live/midi/nova/nujazz/josh_nu.tidal | 143 ----------------------------------------------------------------------------------------------------------------------------------------------- 5 files changed, 137 insertions(+), 191 deletions(-) delete mode 100644 live/midi/nova/nujazz/josh_nu.tidal diff --git a/live/boeuf/algorythm/fdlm2022/toxic.tidal b/live/boeuf/algorythm/fdlm2022/toxic.tidal index 66a304a..49cd6aa 100644 --- a/live/boeuf/algorythm/fdlm2022/toxic.tidal +++ b/live/boeuf/algorythm/fdlm2022/toxic.tidal @@ -12,23 +12,24 @@ d1 $ g -- $ mask "" $ fix ((|* gain 0.9) . (# lpf 5000)) "kick" $ "k ~ ~ k . ~ ~" # "[ifdrums,kick]" - # midiG' "^78" 0 1.3 + -- # midiG' "^78" 0 1.3 # pan 0.4 d2 $ g $ superimpose (const $ g $ "~ ~ ~ ~ ~ <~!4 s!4> ~ <~!7 s>" # "snare:5" # pan 0.8 - # midiG' "^79" 0 1) + -- # midiG' "^79" 0 1 + ) $ mask "" $ "~ s ~ " # "[snare:10,drum:2]" - # midiG' "^79" 0 1 + -- # midiG' "^79" 0 1 d3 $ g $ midiOn "^76" (ply 2) -- $ mask "" $ "hh*[8 8 8 <8!3 [16 8]>]" # att 0.01 # rel 0.5 # cut 3 # hpf 5000 - # midiG' "^80" 0 1.3 -d7 $ gDJF + -- # midiG' "^80" 0 1.3 +d4 $ gDJF $ midiOn "^92" (ply 2) $ note ("0*8" + "")-- BASS Riff # "bassWarsaw" @@ -37,10 +38,10 @@ d7 $ gDJF # sz 0.1 # cut 7 # crushbus 71 (range 16 1.5 "^53") - # midiG' "^81" 0 1 + -- # midiG' "^81" 0 1 d8 $ gDJF -- CUE Toxic Theme - $ midiOff "^91" (mask "") - $ midiOn "^59" (rev) + $ midiOff "^92" (mask "") + $ midiOn "^60" (rev) $ note ("fs7@4 cs7@4 d7@4 b7@4" + "[0,12]" - 24) # "FMRhodes1" # legato 4 @@ -50,4 +51,4 @@ d8 $ gDJF -- CUE Toxic Theme # rel 2 # sz 0.5 # pan 0.9 - # midiG' "^83" 0 1.1 + -- # midiG' "^83" 0 1.1 diff --git a/live/boeuf/algorythm/love23/something_about_us.tidal b/live/boeuf/algorythm/love23/something_about_us.tidal index 0016b2c..5090eac 100644 --- a/live/boeuf/algorythm/love23/something_about_us.tidal +++ b/live/boeuf/algorythm/love23/something_about_us.tidal @@ -1,40 +1,80 @@ do -setcps (92/60/4) +-- resetCycles +setcps (100/60/4) let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) -let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) let gMask = (midiOn "^41" (mask "t . > >")) let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +-- let gMute = (midiOn "^73" (mask "f*16")) let gM = gMask . gMute +let gM2 = gMask . gMute2 let modIndex = pF "modIndex" let gF = gF1 . gF2 -d1 $ gF1 -- Kick - $ midiOn "^42" (<| "k k k >") - $ midiOff "^42" (<| "k ~ ~ <~ k> . ") - $ "jazz" - # midiG' "^78" 0 1.3 +d1 $ gF1 $ gM2 -- Kick + $ midiOff "^42" (<| "k k k >") + $ midiOn "^42" (<| "k ~ ~ <~ k> . ") + $ "[jazz,kick:5]" + -- # midiG' "^78" 0 1.3 -- FIXME Remove after unplugging direct SC->output line # pan 0.8 -d2 $ gF1 - $ midiOn "^43" (<| "~ s ~ s*<1!4 2!3 1>") - $ midiOff "^43" (<| "~ ~ ~ k") + # gain 1.4 +d2 $ gF1 $ gM + $ midiOff "^43" (<| "~ s ~ s*<1!4 2!3 1>") + $ midiOn "^43" (<| "~ ~ ~ k") $ "[drumtraks:9]" - # midiG' "^79" 0 1.45 -d3 $ gF1 + -- # midiG' "^79" 0 1.45 +d3 $ gF1 $ gM $ midiOn "^44" (ply 2) $ midiOn "^76" (ply 2) $ "d d d d]>" # "drum:2" - # midiG' "^80" 0 1 + # gain 0.8 + -- # midiG' "^80" 0 1 # room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw) d4 $ gF2 -- V2 + -- $ superimpose ((arp "up") . (|+ note 12)) $ midiOn "^89" (stutWith 4 0.25 ((|* gain 0.85) . (# room 0))) $ note (cat [ - "[bf3, d4, f4, a4]", -- Bbmaj7 - "[a3, c4, e4, g4]", -- Am7 - "[d4, f4, a4, c5, ]", -- Dm9 - "[g3, b4, d5, ]" -- - -- "[cs4, b4, d5, ]" -- - ]) + -- PARTITION ORIGINALE + -- "[bf3, d4, f4, a4]", -- Bbmaj7 + -- "[a3, c4, e4, g4]", -- Am7 + -- "[d4, f4, a4, c5, ]", -- Dm9 + -- "[g3, b4, d5, ]" -- + -- TRANSPOSE POUR SP <3 + "[d4, fs5, a4, cs5]", -- Dmaj7 + "[gs4, b4, cs5, es5]", -- Csm7 + "<[fs4, a4, cs5, e5, gs5] [fs4, b5, cs5, e5, gs5]>", -- Fsm9/Fsm11 + "[b4, d5, fs5, ]" -- + ] + - 12 + ) # "FMRhodes2" -- |- note 12 |+ note 2 -- Adjust to C # modIndex (range 0 2 "^53") - # midiG' "^81" 0 1.6 + -- # midiG' "^81" 0 1.6 +d5 $ note ("<[d3@1.25 e3@0.25 ~@0.75 f3@2 ~] [e3@1.25 f3@0.25 ~@0.75 g3@2 ~] [f3@1.25 g3@0.25 ~@0.75 a3@2 ~] [a3 g3 g3 f3 f3 d3 c3 d3]>") + # "bassWarsaw" + # cut 1 +d8 $ gF1 $ gM + $ midiOn "^92" (ply 4) + $ iter "1 <1!4 4!4>" + $ chop 8 + $ loopAt 2 + $ "break:2" + -- # n 4 + # cut 8 + # gain 0.7 +d10 + $ (0.5 <~) + $ n "<1 2 3 4 5 6 7 8>" + # "numbers" + # crush 8 + # hpf 1250 + +once $ "ho:5" + # gain 0.5 + +once $ "jungle_breaks:27" # cut 1 + + +once $ note "a3" # "superpiano" diff --git a/live/boeuf/algorythm/season2/blues_wednesday.tidal b/live/boeuf/algorythm/season2/blues_wednesday.tidal index a37f60d..8fb8d2f 100644 --- a/live/boeuf/algorythm/season2/blues_wednesday.tidal +++ b/live/boeuf/algorythm/season2/blues_wednesday.tidal @@ -2,46 +2,92 @@ do -- resetCycles setcps (90/60/4) +let gMask = (midiOn "^41" (mask "t . > >")) +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 +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) -- Modified blues to add a seventh with bflat let blues = ["c", "f", "c", "c", "f", "f", "c", "c", "g", "f", "c", "c", "g", "f", "bf", "c"] let gDJF = (# djfbus 1 (slow 32 $ range 0.2 0.8 saw)) let gDJF = id -d1 $ gDJF +d1 $ gF1 $ gM2 + $ midiOn "^42" (<| "k k k ") + $ midiOff "^42" (<| "k . k(3,8)") $ fix ((|* gain 0.6) . (# hpf 200)) "jazz" - $ "" # "[jazz,cpu]" # gain 1 -d2 --- $ gDJF - -- $ mask "" - $ note ("~ ~ ~ <~ ~ -2 -2>. 0" - 8) - # "[snare:60,snare:21]" - # gain 0.46 + -- $ "" + $ "[jazz,cpu]" # gain 1 + -- # midiG' "^78" 0 1.5 +d2 $ gF1 $ gM1 + $ midiOff "^43" (<| note ("~ ~ ~ <~ ~ -2 -2>. 0" - 8)) + $ midiOn "^43" (<| note ("~ 0 ~ 0")) + $ "[snare:60,snare:21,snare:51]" + # gain 0.56 # pan 0.3 -- # room 0.2 # dry 1.1 # sz 0.8 -d8 $ gDJF +d3 $ gF1 $ gM1 + $ midiOn "^44" (ply 2) + $ midiOn "^76" (ply 2) $ "drum:2*[4 <4 <8 16>>]" + -- $ "drum:2*[6 12]" + # att 0.03 + # rel 0.9 # pan 0.3 - # gain 0.55 -d3 $ gDJF - $ mask "" - $ mask "t(<1 1 4 2 2 2 4 <2 4>>,4)" - $ chop 8 $ loopAt 1 $ "break:1" - # cut 4 # gain 0.4 + # gain 0.85 +d8 $ gF1 $ gM1 + $ midiOn "^92" (ply 2) + $ chop 8 + $ midiOn "^36" (loopAt 1 . (# "break:5")) + $ midiOn "^56" (loopAt 1 . (# "break:9")) + $ loopAt 2 + $ "jungle_breaks:8" + # gain 0.8 # pan 0.7 -d4 - $ superimpose (|+| note "[0 0(<3!3 5>,8)]") +d4 $ gF2 $ gM3 + $ midiOn "^57" (|+| note "0 <7 7 12 12>(3,8) 0 <7 12>([5 <3 2>],8)") + $ midiOn "^89" (superimpose (|+| note "[0 0(<3!3 5>,8)]")) $ note ( cat blues + "[0]" ) -- # "bass3:4" -- # "modalMarimba" |+| note "0*4" # "bassWarsaw" |- note 24 + # octersubbus 41 (range 0 2 "^53") # pan 0.3 # crush 16 -- # room 0.1 -- # voice 0.8 -- # cut 1 + # gain 1.075 + # lpf 300 +d5 $ gF3 $ gM3 + $ swing 4 -- TODO Replace with sampled guitar wahwah + $ arp "updown" + $ note ( + cat (blues) + "c'maj'4" + + 12 + ) + # "cpluck:2" + # pan 0.3 + # cut 5 + # gain 1.075 + # lpf 300 +d10 $ gF3 $ gM3 + -- $ superimpose (|+| note "[0 0(<3!3 5>,8)]") + $ note ( + cat blues + "[0*4]" + ) + # "moogBass" + # pan 0.7 # crush 16 + # cut 10 # gain 0.75 # lpf 300 + -- TODO Recover this guitar and make it midi-agnostic d5 $ gF3 $ note ( "<0 [0, [~@3 <2 0 0 2>@3 0@2]] [0@4 0@2] 0([1 3],8)>" @@ -56,3 +102,6 @@ d5 $ gF3 $ note ( # crushbus 51 (range 16 3 "^54") # "come_guitar:0" # midiG' "^82" 0 1.7 + + +once $ "cpluck:3" diff --git a/live/midi/nova/nujazz/cafe_glace.tidal b/live/midi/nova/nujazz/cafe_glace.tidal index 49b1070..17f5189 100644 --- a/live/midi/nova/nujazz/cafe_glace.tidal +++ b/live/midi/nova/nujazz/cafe_glace.tidal @@ -3,9 +3,8 @@ once $ "nujazz_beats120" -- It's a nuday -- It's a new sample -resetCycles - do +resetCyclesm setcps(125/60/4) let gMask = (midiOn "^41" (mask "t . > >")) let gMute = (midiOn "^73" (mask "f*16")) diff --git a/live/midi/nova/nujazz/josh_nu.tidal b/live/midi/nova/nujazz/josh_nu.tidal deleted file mode 100644 index 3bb41ee..0000000 --- a/live/midi/nova/nujazz/josh_nu.tidal +++ /dev/null @@ -1,143 +0,0 @@ -once $ "nujazz_beats120" - --- It's a nuday --- It's a new sample - -resetCycles - -do -setcps(125/60/4) -let gMask = (midiOn "^41" (mask "t . > >")) -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 -let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) -let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) -let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) -d1 $ gF1 $ gM2 - $ fix ((# lpf 150) . (|* gain 0.93)) "kick:5" - $ midiOn "^42" (<| "k k k >") - $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]") - $ "[kick:5,tech:5,jazz]" - # gain 1 -d2 $ gF1 $ gM1 - $ midiOn "^43" (<| "~ c ~ c") - $ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~") - $ "[cp:1,rampleM1:10]" - # gain 0.9 - # lpf 4650 -d3 $ gF1 $ gM1 -- Highest hats - $ midiOn "^44" (ply 2) - $ midiOn "^76" (ply 2) - -- $ (0.125 ~>) -- decalage - -- $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2)) - -- $ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>") - -- $ "d*<8 [8 [16 <8 16> 16 <8 4 <16 32>>]]>" - $ sometimesBy "0!3 <0 0.5>" (# n 12) - $ sometimesBy "0!3 <0.1 0>" (# n 13) - $ "d*[4 2]" - # "h2ogmsn:14" - # cut 3 - # legato (range 0.28 1 sine) - # gain (0.7 * (range 0.85 1.05 (fast 4 perlin))) - # room 0.14 # sz 0.4 # dry 1 - # pan 0.8 -d4 $ loopAt 4 - $ "nujazz_bass125:1" - # cut 4 - -d6 $ gF1 $ gM1 -- Highest hats - $ (0.125 ~>) -- decalage - $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2)) - $ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>") - $ "hh:7" - # cut 3 - # gain (0.7 * (range 0.75 1.1 (fast 4 perlin))) - # legato (range 1.1 0.25 (fast 4 perlin)) - # room 0.4 # sz 0.4 - # pan 0.8 -d4 $ gF2 $ gM3 -- - $ midiOn "^57" ((off "0.125" ( - (|+| note "0 <7 12>") . (|- pan 0.1) . (# cut 41) - ))) - $ midiOn "^89" (ply "<4!3 8>") - $ note ("<[a4@4 c5 ] a4>" - + "[0,12]" - - 36 - ) - # "bassWarsaw" - # cut 4 - # gain 1.1 - # pan 0.3 - # octersub 0.5 - # octerbus 41 "^53" - # squizbus 42 "^33" -d5 $ gF3 $ gM3 -- Piano guide premier - $ midiOn "^58" (juxBy 0.9 ( -- Piano reflet second - mask "< [ t]>" . - (# begin 0.5) - . rev - . (|+ note 12) - . (|+ pan 0.2) - . (|* gain 0.87) - . (# cut 55)) - ) - $ slice 4 "<0 1 2 3 0 1 2 3 1 2 1 3 1 2 1 <~ 3>>" - $ "nujazz_keys120" - # n "<54!16 53!16>" - # pan 0.8 - # freezebus 51 (range 0 0.7 "^34") - # cut 5 - # gain 0.9 -d7 $ gF2 $ gM3 -- Guitare egaree - $ midiOn "^59" (ply 2) - $ midiOn "^91" (ply 2) - $ chop 4 - $ n "<0!3 1 0!3 1 3!3 4 3!3 5 6!3 7 6 6 7 7 6 7!3 7!4>" - -- $ n "<>" - # "nujazz_wahwah125" - # cut 7 - # pan 0.8 - # room 0.24 # sz 0.5 # dry 0.5 - # octersubbus 71 (range 0 2 "^55") - # octersubsubbus 72 (range 0 3 "^55") - # gain 1 -d8 $ gF1 $ gM1 -- JazzyBelle JazzyBreak - $ midiOn "^92" (ply "2 <2 <4 [4 8]>>") - $ chop 16 - $ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:24")) - $ midiOn "^56" (# "jungle_breaks:24") - $ loopAt 4 - $ n "<0!4 1!3 0 2!4 3!3 <2 3>>" - # "nujazz_beats120" - # pan 0.26 - # gain 0.7 - # octersub 1.2 - # octersubsub 2 - # cut 8 -d10 $ gF3 -- Pads - $ whenmod 64 132 ( -- ELECTRIFICATION - # octerbus 101 (slow 32 $ range 0.1 1.9 cosine) - ) - $ n "<47 <48!3 46>>" - # cut 10 - # "nujazz_keys120" - # room 0.5 # sz 0.8 # dry 0.5 - # pan 0.4 - # gain 0.75 -d9 $ gM3 $ gF3 -- La chorale du jugement - $ jux rev - $ note "<[a4@3 ] e5 [] >" - # "moogBass" - # chorus 0.2 - # gain 0.5 - # att 0.3 - # rel 2 - # room 0.8 - # sz 0.8 - # pan 0.8 - -once $ "jungle_vocals:28" # cut 6 -- libgit2 0.27.0