From 34f1287c06d1b94361844a07be4090e6762b90e6 Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Fri, 7 May 2021 19:48:14 +0200 Subject: [PATCH] chore: Save --- backlog.md | 11 +++++++++++ live/fusion/elephunk.tidal | 73 ------------------------------------------------------------------------- live/midi/nova/breaks/slower.tidal | 2 +- live/midi/nova/fusion/elephunk.tidal | 73 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/lofi/new_dust.tidal | 21 ++++++++++++--------- live/midi/nova/lounge/cbow.tidal | 28 ++++++++++++++-------------- live/mood/fight/sage.tidal | 47 +++++++++++++++++++++++++++++++++++++++++++++++ notes.md | 1 - study/discord/code-talk.tidal | 5 +++++ 9 files changed, 163 insertions(+), 98 deletions(-) delete mode 100644 live/fusion/elephunk.tidal create mode 100644 live/midi/nova/fusion/elephunk.tidal create mode 100644 live/mood/fight/sage.tidal create mode 100644 study/discord/code-talk.tidal diff --git a/backlog.md b/backlog.md index 7666075..dc0c292 100644 --- a/backlog.md +++ b/backlog.md @@ -4,13 +4,18 @@ # Coop -- Nina(s) with Raph -- Stupefaction with Raph +-- HarderCrime with raph -- Breakbass with Nass -- Prepabass with Nass # Work in progress +- Louge/Michael: Techno PianoShards + SynthChoir - HelloFi: intro to Lofi :) - Disco/High: Techno -> HiNRJ Disco 8) +- CLAV CALASH! Worth recording ou nova :D + +- Elephunk: Reprise Smells like Funk, bon potentiel, late :( ## Worksheet - Jazz noise: basis for jazzy drums / hip instru @@ -24,8 +29,14 @@ ## MIDI +-- Zelda Main theme: Good DNB! +-- Hoover Sepia: Nostalgic hoovotechno? +-- Last One: Nostalgic chill cello-techno :) + - Dark Money: bonne impro midi lofi beat - New Dust: impro lofi base Psychedelic Jazz +- CBOW: Decouverte Vio +- Michael: Break/techno louge - Breaks: diff --git a/live/fusion/elephunk.tidal b/live/fusion/elephunk.tidal deleted file mode 100644 index 7c281a6..0000000 --- a/live/fusion/elephunk.tidal +++ /dev/null @@ -1,73 +0,0 @@ -do --- resetCycles --- setcps (92/60/4) -let gain p = gain (1.5 * p) -let gFadeIntro = someCyclesBy "" (|* gain (slow 8 $ range 0 1 saw)) -let patFunk = "ds gf f " -let gDJF = whenmod 32 24 (# djf (slow 8 $ range 0.5 0.15 saw)) -let gPont = whenmod 64 32 (mask "") -let g = (gDJF) -d1 $ g $ gFadeIntro $ gPont - $ mask "" - $ "[bd,jazz]*4" # room 0.1 - # gain 0.45 -d2 $ g $ gFadeIntro $ gPont $ mask "" - $ "~ c ~ c" # "[clap]" # gain 0.4 -d3 $ g $ gPont - -- $ mask "" - $ ( - mask "t . t t(2,4)" - . sometimesBy "0 . <0 1>" (ply "2 . [2|1]*4")) - $ "gretsch:4*16" - # pan 0.25 - # gain (0.35 + 0.1 * (segment 8 perlin)) -d4 $ g - $ mask "" - $ note patFunk - # "bass3" - # pan 0.2 - # gain 0.5 -d5 $ g - $ whenmod 8 4 (juxBy 0.8 (mask "f t" . ply 2)) - $ note patFunk - # "pluck" - # room 0.6 - # sz 0.8 - # gain 0.35 -d6 $ g -- Final guitare rita - $ whenmod 64 48 (# gain 0.25) - $ slice 16 "0 . 1 <~ 1 2>" - $ loopAt 6 - $ "rita:0" - # gain 0 - # cut 6 - # hpf 400 -d7 -- Bonus breaks - $ mask ",16)!16 t!3 [t f t f] t!28>" - $ slice 8 "0 1*<1!5 2!3> 2 3 . 0 .. <<3 1>!4 7!3 3>" - $ "breaks165" - # pan 0.75 - # cut 7 - # gain (slow 8 $ range 0.35 0.45 saw) - # room 0.2 - # hpf 100 -d8 $ g -- Organic madness - $ mask "" - $ sometimesBy (slow 4 saw) (ply 2) - $ chop 4 - $ someCyclesBy "<0!32 1!4 0!28>" (|* gain (slow 4 $ range 0.5 1 saw)) - -- $ mask "" - $ "forgan:14" - # lpf 1000 - # gain 0.3 * "<1!7 0.95 0.9!7 0.85>" - # cut 8 -d10 -- F-U-N-K - $ mask "" - $ degradeBy "0 <0.5 0.45 0.35 0.3 0.25 0.2 0.15>!7 <1!3 0>" - $ whenmod 64 48 (swing "<6!8 [3 4]!8>") - $ someCyclesBy "<1!48 0!16>" (ply "<1 <2 [4 2]>>") - $ n "5 20 13 10" - # "alphabet" - # release 0.8 - # gain (slow 32 $ range 0.2 0.34 cosine) - # pan "<0.1!4 0.9!4>" diff --git a/live/midi/nova/breaks/slower.tidal b/live/midi/nova/breaks/slower.tidal index 244b151..8f9ce80 100644 --- a/live/midi/nova/breaks/slower.tidal +++ b/live/midi/nova/breaks/slower.tidal @@ -1,4 +1,4 @@ -wimport Sound.Tidal.ParVagues.Control +import Sound.Tidal.ParVagues.Control setcps (80/60/4) diff --git a/live/midi/nova/fusion/elephunk.tidal b/live/midi/nova/fusion/elephunk.tidal new file mode 100644 index 0000000..cb64e09 --- /dev/null +++ b/live/midi/nova/fusion/elephunk.tidal @@ -0,0 +1,73 @@ +do +-- resetCycles +-- setcps (92/60/4) +let gain p = gain (1.5 * p) +let gFadeIntro = someCyclesBy "" (|* gain (slow 8 $ range 0 1 saw)) +let patFunk = "ds gf f " +let gDJF = whenmod 32 24 (# djf (slow 8 $ range 0.5 0.15 saw)) +let gPont = whenmod 64 32 (mask "") +let g = (gDJF) +d1 $ g $ gFadeIntro $ gPont + $ mask "" + $ "[bd,jazz]*4" # room 0.1 + # gain 0.45 +d2 $ g $ gFadeIntro $ gPont $ mask "" + $ "~ c ~ c" # "[clap]" # gain 0.4 +d3 $ g $ gPont + -- $ mask "" + $ ( + mask "t . t t(2,4)" + . sometimesBy "0 . <0 1>" (ply "2 . [2|1]*4")) + $ "gretsch:4*16" + # pan 0.25 + # gain (0.35 + 0.1 * (segment 8 perlin)) +d4 $ g + $ mask "" + $ note patFunk + # "bass3" + # pan 0.2 + # gain 0.5 +d5 $ g + $ whenmod 8 4 (juxBy 0.8 (mask "f t" . ply 2)) + $ note patFunk + # "pluck" + # room 0.6 + # sz 0.8 + # gain 0.35 +d6 $ g -- Final guitare rita + $ whenmod 64 48 (# gain 0.25) + $ slice 16 "0 . 1 <~ 1 2>" + $ loopAt 6 + $ "rita:0" + # gain 0 + # cut 6 + # hpf 400 +d7 -- Bonus breaks + $ mask ",16)!16 t!3 [t f t f] t!28>" + $ slice 8 "0 1*<1!5 2!3> 2 3 . 0 .. <<3 1>!4 7!3 3>" + $ "breaks165" + # pan 0.75 + # cut 7 + # gain (slow 8 $ range 0.35 0.45 saw) + # room 0.2 + # hpf 100 +d8 $ g -- Organic madness + $ mask "" + -- $ sometimesBy (slow 4 saw) (ply 2) + $ chop 4 + $ someCyclesBy "<0!32 1!4 0!28>" (|* gain (slow 4 $ range 0.5 1 saw)) + -- $ mask "" + $ "forgan:14" + # lpf 1000 + # gain 0.3 * "<1!7 0.95 0.9!7 0.85>" + # cut 8 +d10 -- F-U-N-K + $ mask "" + $ degradeBy "0 <0.5 0.45 0.35 0.3 0.25 0.2 0.15>!7 <1!3 0>" + $ whenmod 64 48 (swing "<6!8 [3 4]!8>") + $ someCyclesBy "<1!48 0!16>" (ply "<1 <2 [4 2]>>") + $ n "5 20 13 10" + # "alphabet" + # release 0.8 + # gain (slow 32 $ range 0.2 0.34 cosine) + # pan "<0.1!4 0.9!4>" diff --git a/live/midi/nova/lofi/new_dust.tidal b/live/midi/nova/lofi/new_dust.tidal index 206fa8c..d790675 100644 --- a/live/midi/nova/lofi/new_dust.tidal +++ b/live/midi/nova/lofi/new_dust.tidal @@ -8,8 +8,10 @@ let whenNotIntro pat = someCyclesBy "" pat let whenBrk pat = whenmod 16 10 pat let whenNotBrk pat = someCyclesBy "" pat let whenBrkLPF = whenBrk (# lpf "<400 200 100 50 0 0>") -let gDJF = midiDJF "^49" 200 9800 0 1000 -let g = (gDJF) +let gDJF = (# djfbus 1 (range 0.05 0.95 "^49")) +let gLPQ = (# lpqbus 2 (range 0.01 0.5 "^29")) +let gHPQ = (# hpqbus 3 (range 0.01 0.5 "^30")) +let g = gDJF . gLPQ . gHPQ let prog = "" let att = pF "att" let dec = pF "dec" @@ -24,10 +26,11 @@ d1 $ g -- Kick -- . (# attack 0.5) -- . (# release 0.5) -- ) - $ "k ~ <~ ~ k ~> k . k k(<1!4 <5 3>!12>,8)" - # "jazz" + $ midiOn "^41" (<| "k k k k k k k [ k*<1!7 2>]") + $ midiOff "^41" (<| "k ~ <~ ~ k ~> k . k k(<1!4 <5 3>!12>,8)") + $ "jazz" # attack 0.5 - # midiG' "^78" 0 3 + # midiG' "^78" 0 1.7 # cut 1 d2 $ g -- Contretemps snare $ whenBrkLPF @@ -77,14 +80,14 @@ d4 $ g -- Lead nostalgia gauche # midiG' "^81" 0 1.5 d5 $ g -- Infectious Bassline $ whenmod 16 8 (degradeBy "[0 0.5!3]*2") - $ ply "[1 2]*<4 4 2 4>" + $ midiOn "^58" (ply "[1 2]*<4 4 2 4>") $ note (fast 8 (often rev "") - - 12 + - 24 ) - # legato 2 + # cut 5 # "bassWarsaw" # width "^34" - # crush (range 16 2.5 "^54") -- Manual crush enabler + # crush (range 16 2.5 "^54") # midiG' "^82" 0 1 # room 0.2 d7 -- TOYS diff --git a/live/midi/nova/lounge/cbow.tidal b/live/midi/nova/lounge/cbow.tidal index 59c0a0c..bfbdf02 100644 --- a/live/midi/nova/lounge/cbow.tidal +++ b/live/midi/nova/lounge/cbow.tidal @@ -16,13 +16,13 @@ d1 $ gDJF $ g $ midiOff "^41" (mask "") $ midiOn "^41" (<| "k k k ") $ midiOff "^41" (<| "k [~!6 ] . k*2 ~") - $ "[jazz,bd]" + $ "[jazz,kick:14]" # midiG' "^78" 0 1 d2 $ gDJF $ g $ fast "<0!4 0 [0 1] 1 1 0 [0 1] 1 1 [1 2] 1 2 4>" $ "~ s ~ s" # "h2ogmsn:6" - # midiG' "^79" 0 1 + # midiG' "^79" 0 1.7 d6 $ g $ midiOn "^44" (slow 2) @@ -33,7 +33,17 @@ d6 whenmod 4 3 (2 -) "0 . 2 0" ) - # midiG' "^80" 0 1.6 + # midiG' "^80" 0 1.2 +d5 $ g -- Breakbeat + $ midiOn "^76" (fast "<2!3 4>") + $ midiOff "^44" (slow "<4 2>") + $ sometimesBy "^32" rev + $ someCyclesBy (0.9 * "^52") (scramble "1 4") + $ slice 8 "0 1 <0 2 6 2> <1 3 7 3>" + $ loopAt 2 + $ "fbreak100" + # cut 5 + # midiG' "^80" 0 1.2 d3 $ g -- Bass $ gDJF $ midiOn "^57" (euclid "<1 <1 [1 2] 5> 3 5>" 8) @@ -60,16 +70,6 @@ d4 $ g # cut 4 # room 0.2 # midiG' "^82" 0 0.8 -d5 $ g -- Breakbeat - $ midiOn "^76" (fast "<2!3 4>") - $ midiOff "^44" (slow "<4 2>") - $ sometimesBy "^32" rev - $ someCyclesBy (0.9 * "^52") (scramble "1 4") - $ slice 8 "0 1 <0 2 6 2> <1 3 7 3>" - $ loopAt 2 - $ "fbreak100" - # cut 5 - # midiG' "^80" 0 0.8 d8 $ g -- Angels $ midiOff "^59" (mask "") $ note "<[c . ~!3 <~ >] a4>" @@ -79,7 +79,7 @@ d8 $ g -- Angels d10 $ (# lpf 2000) $ g $ "~ cp" - # midiG' "^83" 0 1.6 + # midiG' "^84" 0 1.6 d4 $ whenmod 32 16 (jux rev) diff --git a/live/mood/fight/sage.tidal b/live/mood/fight/sage.tidal new file mode 100644 index 0000000..f25ea07 --- /dev/null +++ b/live/mood/fight/sage.tidal @@ -0,0 +1,47 @@ +do +setcps 0.5 +-- let gPont = (whenmod 64 32 (# djf (max 0.5 (slow 16 $ range 0.9 0.5 saw)))) +let gDJF = (whenmod 32 24 (# djf (slow 8 $ range 2 0.1 saw))) +let nofight = (slow 4) +let fight = id +let g = gDJF . fight +d1 $ g + $ "k k k k*<1 2 1 1>" # "jazz" # room 0.5 # dry 1 # gain 0.7 +d2 $ g + $ mask "" + $ someCyclesBy (slow 8 saw) (fast 2) + $ someCyclesBy (slow 8 sine) (ply 2 ) + $ n "10 <11!4 10!3 11>" # "amencutup" # gain 0.5 +d10 + $ "hh*[<4 4 8 12> <6!7 16>]" + # gain 0.6 +d3 $ g $ note ( + "0 . ~ ~ ~ <~!3 1>" + ) # "cpluck" # n ("<0!14 3 3 4!14 7 7 8!10 7 4 3 2 1 0>") + # cut 3 + # gain 0.6 + # pan 0.4 + # room 0.2 +d4 + $ g + $ note ("[0|1](<5!3 [5 8]>,8,2)" - 12) + # "cpluck:5" # cut 4 + # pan 0.6 + # gain 0.6 +d5 + $ whenmod 4 3 (superimpose ( + (# cut 41) + . (|+ note 12) + . (<| "s*<4 4 4 <8 [8 4]>>") + )) + $ "cbow" + # cut 5 + # pan 0.2 + # gain 0.3 +d6 + $ degradeBy ("0 0.9!7" * (slow 32 $ isaw)) + $ note (scale "aeolian" ("0 1 2 <3!8 4!8> <4!8 3!4 4 4 5 6>")) + # "cbow:8" + # gain (slow 16 $ range 0.4 0.6 saw) + # cut 6 + # pan (slow 16 $ range 0.7 0.9 saw) diff --git a/notes.md b/notes.md index d08535d..878278d 100644 --- a/notes.md +++ b/notes.md @@ -2,7 +2,6 @@ ## Novation - -- Controls: >1A 2A 3A 4A 5A 6A 7A 8A UP DOWN `13 14 15 16 17 18 19 20 104 105` diff --git a/study/discord/code-talk.tidal b/study/discord/code-talk.tidal new file mode 100644 index 0000000..77d8cc3 --- /dev/null +++ b/study/discord/code-talk.tidal @@ -0,0 +1,5 @@ +-- 2020-04-30 +-- TODO Try spin: a layering up with panning +-- TODO Try sew +-- TODO Try weave 16 (pan saw) "pattern" +-- TODO try floor and quantize, both to round stuff -- libgit2 0.27.0