From 2dd4a90104fbba78ab104ebcfbac68bf408540c3 Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Thu, 9 Sep 2021 23:08:39 +0200 Subject: [PATCH] update: Rhadamanthe --- live/hardcore/manoir_rhadamanthe.tidal | 90 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/hip/lofi/sete_et_match.tidal | 84 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/breaks/solar.tidal | 2 ++ live/midi/nova/party/80s_neon.tidal | 3 +++ 4 files changed, 179 insertions(+) create mode 100644 live/hardcore/manoir_rhadamanthe.tidal create mode 100644 live/hip/lofi/sete_et_match.tidal diff --git a/live/hardcore/manoir_rhadamanthe.tidal b/live/hardcore/manoir_rhadamanthe.tidal new file mode 100644 index 0000000..5d9a526 --- /dev/null +++ b/live/hardcore/manoir_rhadamanthe.tidal @@ -0,0 +1,90 @@ +do +resetCycles +once $ "igor:4" # cut 7 # gain 0.6 +setcps (150/60/4) +let gF = whenmod 64 48 (# djfbus 1 (slow 16 $ range 0.5 0.05 saw)) +d1 $ gF + $ mask "" + $ "k*4" + # "[bd,jazz]" + # lpf 200 + # att 0 + # rel 0.7 + # room 2.7 + # sz 0.2 + # dry 1 + # gain 0.7 + # crush 8 + # note "-2" +d2 $ gF -- Running hats + $ mask "" + $ someCyclesBy "<0!32 1!32>" (<| "h([<12!3 16> <6 8>],<12!3 8>)") + $ someCyclesBy "<1!32 0!32>" (<| "[~ h h <~!7 h>]*4") + $ "h2ogmhh" + # n "[0,1]" + # pan 0.4 + # dry 1 + # room 0.4 + # gain (slow 16 $ range 0.3 0.4 saw) +d4 -- BURNING MOOG + $ mask "" + $ whenmod 32 16 (off "h" ( + (# cut 41) + . (|+ note 12) + . (|* gain 0.75) + . (# leslie perlin) + . (# crush 5.10) + )) + $ someCyclesBy "<1!16 0.5!16 0!32>" (# delay 0) + $ note (scale "aeolian" ("<0 0 0 4> <1 2 3 1> . ~!3 <~ 2>")) + # "moog" + # legato 2 + # delay (slow 16 $ range 0.25 0.65 saw) + # delayfb (0.5 + 0.25 * perlin) + # delaytime (slow 4 $ "< >") + # gain (slow 16 $ range 0.37 0.5 (fast 4 $ cosine)) + # crushbus 40 (slow 32 $ range 16 5 (saw + 0.2 * perlin)) + # cut 4 +d5 -- Phantom Choirs + $ mask "" + $ note (scale "aeolian" "<0 <0 4>(3,3)> . <1 2 <3 5> 12>" + - 12 + ) + # "moogBass" + # gain 0.5 +d5 + $ mask "" + $ "[dr,drum:2](<4 <8 <12 16>>>,12)" + # gain 0.45 + # pan 0.8 +d10 -- Announcing cymbals + $ mask "!8 f!48>" + $ "h2ogmcy:3" + # cut 10 + # gain (slow 8 $ range 0.35 0.65 saw) + # hpf (slow 16 $ range 0 6500 saw) + + +-- Igor ressort - TODO rework +d9 + $ "igor:15" + # cut 7 + # gain 0.56 + # begin (0 + "<0 0.1 0.2 0.3>") + # end (0.02 + "<0 0.1 0.2 0.3>") + # att 0 + # rel 2 + + +once $ "moog:4" # cut 4 + +once $ "fbass:40" # cut 4 # gain 0.7 + + +d3 + $ "" + # "wobble" + # crush (slow 16 $ range 16 3.5 saw) + # gain 0.8 + # legato 2 + # pan 0.6 diff --git a/live/hip/lofi/sete_et_match.tidal b/live/hip/lofi/sete_et_match.tidal new file mode 100644 index 0000000..e087292 --- /dev/null +++ b/live/hip/lofi/sete_et_match.tidal @@ -0,0 +1,84 @@ +resetCycles + +once $ "dr" + +-- TODO: +-- Add lead - or use it to improvise? <3 +-- Add wind noises at transition points - or equivalent spacey sounds + +do +setcps (90/60/4) +let chords = "<[a,c,e,g,b,d] [d,fs,a,c] [f,a,c,e] [c,e,g,b]>" +-- TODO: Chords could vary a bit, try manual nostalgic vars +let chordsMin = "< [f] [c]>" -- TODO confirm/finish/validate +let gFilter = whenmod 32 24 (# djf (slow 8 (range 0.5 0.05 saw))) +let gFilter2 = whenmod 32 24 (# djf (slow 8 (range 0.45 0.75 saw))) +let g = gFilter +let g2 = gFilter2 +d1 $ g + $ mask "" -- First break + $ mask "" -- Post-filter break + $ mask "" -- Intro mask + $ "k*<1!8 2!24> . k*[<<3 1> 3!6 4> <8 3 8 <8 [8 4]>>]" + # "[bd:2,kick:5]" + # gain 0.8 + # legato 2 + # att 0.1 + # rel 0.8 +d2 $ g -- Aerian snare + $ mask "" -- First break + $ mask "" -- Snare mask + $ n "~ <~!3 [~ 10]>. 9" + # "sn" + # gain 0.8 + # lpf 1500 +d3 $ g2 + $ mask "" + $ "d*[<<4!4 [8 <4 8>]!4> 16!4> <16!3 8 16 16 8 8 16 16 8 16 16 8 16 16>]" + # "drum:2" + # pan 0.35 + # gain (slow 8 $ range 0.4 0.6 saw) +d5 $ g -- BREAKBEAT BUDDY + $ mask "" -- Post-filter break + $ mask "" + $ whenmod 16 8 ( + sometimesBy "0 0.2 . 0.75!3 0" + (ply "2 . [2|4]")) + $ chop 16 + $ loopAt 2 + $ "fbreak100" + # gain 0.69 + # pan 0.65 +d4 $ g2 + $ superimpose ((|* gain "0 0.79") . (|+ note 12)) -- Depth + $ whenmod 16 12 (someCyclesBy "0 1" rev) + $ note (chords + - 24 + ) + # "FMRhodes1" + # gain 0.75 + # room 0.4 +d6 $ g + $ mask "" + $ whenmod 64 48 (# crush (8 - (slow 16 $ range "-1.5" 2.5 perlin))) + $ note ("[0,<~!8 0(<1 <3 5>>,8)!8>] [0,12]" + |+ chordsMin + - 24 + ) + # "supersaw" + # voice 0.1 + # pan 0.3 + # hpf (range 0 500 perlin) + # gain 0.4 +d5 $ g -- BREAKBEAT BUDDY + $ mask "" -- First break + $ mask "" -- Post-filter break + $ mask "" + $ whenmod 16 8 ( + sometimesBy "0 0.2 . 0.75!3 0" + (ply "2 . [2|4]")) + $ chop 16 + $ loopAt 2 + $ "fbreak100" + # gain 0.69 + # pan 0.65 diff --git a/live/midi/nova/breaks/solar.tidal b/live/midi/nova/breaks/solar.tidal index cfb5bd4..20dfae8 100644 --- a/live/midi/nova/breaks/solar.tidal +++ b/live/midi/nova/breaks/solar.tidal @@ -73,6 +73,8 @@ d8 $ g2 # cut 8 # pan 0.8 + + once $ "cbow:3" # gain 0.57 # cut 21 -- TODO MOVE OR REMOVE diff --git a/live/midi/nova/party/80s_neon.tidal b/live/midi/nova/party/80s_neon.tidal index 7357222..2ecc161 100644 --- a/live/midi/nova/party/80s_neon.tidal +++ b/live/midi/nova/party/80s_neon.tidal @@ -1,5 +1,8 @@ -- Tentative SynthWave #2 +-- Docs: +-- https://recording-voice.com/how-to-make-synthwave/ +-- https://www.orpheusaudioacademy.com/synthwave-chords/ -- Noises pacman-like "tacscan:4" -- libgit2 0.27.0