From d3f7d0411f52886c2d195c27d9f5b1031bdfacc3 Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Mon, 22 Nov 2021 22:21:51 +0100 Subject: [PATCH] practice: OPERATE&Noir --- backlog.md | 23 ++++++++++++++++++++++- live/ambient/weird.tidal | 17 ++++++++--------- live/hip/lofi/808_lessons.tidal | 11 +++++++---- live/midi/nova/ambient/contre_visite.tidal | 6 +++--- live/midi/nova/ambient/drone_aveugle.tidal | 18 +++++++++++------- live/midi/nova/dnb/alerte_verte.tidal | 119 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/dnb/break_the_loop.tidal | 20 ++++++++++---------- live/midi/nova/dnb/meurice.tidal | 122 -------------------------------------------------------------------------------------------------------------------------- live/midi/nova/lounge/invoque_ete.tidal | 49 +++++++++++++++++++------------------------------ live/midi/nova/lounge/michael.tidal | 2 +- samples.txt | 139 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ study/samples/noir.tidal | 13 +++++++++++++ 12 files changed, 352 insertions(+), 187 deletions(-) create mode 100644 live/midi/nova/dnb/alerte_verte.tidal delete mode 100644 live/midi/nova/dnb/meurice.tidal create mode 100644 study/samples/noir.tidal diff --git a/backlog.md b/backlog.md index 0ee5fd3..68d205e 100644 --- a/backlog.md +++ b/backlog.md @@ -219,7 +219,28 @@ La voix de l'Ordre: Monotonal drone <> breakbeat ## Live OPERATE +### TODO +- [ ] Prepare tracklist +- [ ] Prepare tracks + - [ ] Contre-visite + - [ ] Break the loop + - [ ] Drone aveugle + - [x] Invoque été + - [x] Alerte Verte +- [ ] Repeat tracks + - [ ] Intro -> Contre-visite + - [ ] Contre-visite + - [ ] Drone aveugle + - [x] Invoque été + - [ ] Transition + - [ ] Alerte verte -> Outro + +### Tracklist + Intro Contre-visite Suite Drone Aveugle +-- Break the loop -Finish Meurice +-- TOP HATS 🎩 +Invoque été 🌅 +Finish Alerte Verte 🔥 diff --git a/live/ambient/weird.tidal b/live/ambient/weird.tidal index 5fcdbc0..10aae8c 100644 --- a/live/ambient/weird.tidal +++ b/live/ambient/weird.tidal @@ -1,18 +1,18 @@ -- ça tombe bien, j'avais un sample appelé 90s_weird, c'est l'occasion de l'écouter ! once $ "90s_weird:9" # cut 1 - # gain 0.5 + # gain 0.65 # gain 0.78 # room 0.5 # dry 0.8 # sz 0.8 -WEIRD <3 +-- WEIRD <3 do setcps (100/60/4) let g = (# djf (range 0.15 0.85 (slow 16 $ cosine))) --- let g = (# djf 0.5) -- FIXME MANUAL +let g = (# djf 0.355) -- FIXME MANUAL d1 $ g-- Les boucles c'est rigolo - $ sometimesBy (slow 4 $ range 0 0.8 sine) (# crush 9.5) + $ sometimesBy (slow 4 $ range 0 0.8 sine) (# crush 5) $ chop 16 $ loopAt 4 $ "90s_weird:9" @@ -28,7 +28,7 @@ d2 -- Mais il nous faut un cl1ck $ note ("0 [<2 ~ 2 2> <~ 2>] 0 2" - 36) # "90s_weird" # legato 0.03 - # gain 1.5 + # gain 1.8 # lpf 800 # room 1.8 # sz 0.8 # dry 1 # cut 2 @@ -50,7 +50,7 @@ d4 $ g -- ...mais je trouve cette compagnie fort agréable $ g $ slice 32 "10(<5!3 [5 <8 4>]>,8)" $ "90s_weird:9" - # gain 0.75 + # gain 0.5 # crushbus 41 (slow 16 $ range 8 3.9 saw) # room 0.2 # dry 1 # sz 0.8 # pan 0.3 @@ -60,7 +60,7 @@ d5 $ g -- MÊME LA CLOCK EST WEIRD -- $ chop 16 $ "90s_weird:9" # speed 8 - # gain 0.8 + # gain 0.58 # pan 0.9 # cut 5 d10 $ g -- Heureusement, tout n'est pas weird @@ -68,8 +68,7 @@ d10 $ g -- Heureusement, tout n'est pas weird $ loopAt 2 $ "break:16" # room 0 # dry 1 # sz 0 # delay 0 - # gain 0.85 - + # gain 0.75 -- WEEEEEIIIIIIIIRRRRRRDDDD once $ "90s_weird" diff --git a/live/hip/lofi/808_lessons.tidal b/live/hip/lofi/808_lessons.tidal index 9f6131d..218f4fc 100644 --- a/live/hip/lofi/808_lessons.tidal +++ b/live/hip/lofi/808_lessons.tidal @@ -1,12 +1,15 @@ +resetCycles + do setcps (80/60/4) d1 -- $ mask "" $ superimpose (# hpf 500) $ fix (|* gain 0.8) ("reverbkick") - $ "k . k(<1 <3 5>>,8)" + -- $ "k . k(<1 <3 5>>,8)" + $ "k . k(<5 5 3 5>,8)" # "[808bd:3,808bd:8,808bd:15,reverbkick]" - # gain 0.78 + # gain 0.99 # room 0.2 # dry 1 d2 @@ -73,13 +76,13 @@ d9 $ fix ( -- TODO SPARSER -- splice 8 ("[0@1.2 1@1.1 ~@0.05 2@1.1 ~@0.9 <~!3 <3@1.1 4@1.1>>]") splice 8 ("[0@1.2 1@1.1 ~@0.05 2@1.1 ~@0.9 <3 ~ 3 4>@1.1]") - . (|* gain 0.75) . (# squizbus 91 (segment 16 $ fast 4 $ range 0 "<1 2 4 6>" cosine)) + . (|* gain 0.85) . (# squizbus 91 (segment 16 $ fast 4 $ range 0 "<1 2 4 6>" cosine)) ) (n 2) -- Les circuits électroniques ont analysé un par un tous les sons -- $ n "<<0 1!3 2!4 3!4> <~!8 2!4 3!4>!3>" $ n "<[0@0.25 0] ~ ~ ~ 1 ~ 1 ~ 2!16>" -- SLICED STORY # "ircam" # cut 9 - # gain 0.8 + # gain 0.9 # room 0.14 # pan 0.3 # leslie 0.9 diff --git a/live/midi/nova/ambient/contre_visite.tidal b/live/midi/nova/ambient/contre_visite.tidal index 2c913ae..427ffca 100644 --- a/live/midi/nova/ambient/contre_visite.tidal +++ b/live/midi/nova/ambient/contre_visite.tidal @@ -21,7 +21,7 @@ d1 $ f $ midiOff "^41" (<| " . ~ ~ ~ <~!3 k>") $ "[reverbkick,808bd:6]" # lpf 1000 - # midiG' "^78" 0 1.2 + # midiG' "^78" 0 1 d2 $ f $ mask ",4)!4 t!28>" -- Intro / break/32 $ midiOff "^75" maskLoops @@ -63,7 +63,7 @@ d5 $ f -- Synth: ELECTRONIC ANSWERS # dry 1 # panbus 51 (range 0.8 0.5 saw) # crushbus 52 (range 16 2.85 "^54") - # midiG' "^82" 0 0.8 + # midiG' "^82" 0 1.3 d6 -- High lead: Winds of truth $ whenmod 8 6 (swing "<4 2>") $ whenmod 32 8 (superimpose ( -- Echos of doubts @@ -104,5 +104,5 @@ d10 $ f -- RANDOM FOREST NOISES . (struct "t*3 ~ . t*<1!3 2> t*<1 3>") . (# midiG "^16") ) "n4" -- FX1 - $ "[n1,n2,n3,n4]" + $ "[n1,n2,n3]" -- n4 # gain 0.8 diff --git a/live/midi/nova/ambient/drone_aveugle.tidal b/live/midi/nova/ambient/drone_aveugle.tidal index 5b9c158..9078008 100644 --- a/live/midi/nova/ambient/drone_aveugle.tidal +++ b/live/midi/nova/ambient/drone_aveugle.tidal @@ -1,5 +1,6 @@ -- Le DR0NE AVEUGLE --- +-- Intro weird superchip: is this even music? +-- Pont superchip crushed+plyed do let slide x = acceleratebus 01 (2**(x/12)) let g = (# djfbus 1 (range 0.05 0.95 "^49")) @@ -13,7 +14,7 @@ d1 $ g -- KICK d2 $ g -- Snare minitel -- $ midiOn "^43" (<| "~ s ~ s*<1!3 <[2 <2 2 4 4>] [4!3 16]>>") $ fix (ply "1 <1!3 <2 4>>" . (|* gain 0.9) . (# legato "<0.4!6 0.5!2>")) "glitch" - $ fix ((|* gain 0.85) . (# "clap:1")) "cp" + $ fix ((|* gain 0.85) . (# "realclaps:2")) "cp" $ fix (|* gain 0.8) "snare" $ midiOn "^43" (fast 2) $ "~ . [glitch:5,snare:11,<~!8 cp!24 cp!8 ~!8 cp!16>]" @@ -39,18 +40,19 @@ d4 -- Frequency-modulated hopes -- # lsizebus 44 (range 0.2 2 "^17") -- # lratebus 43 "^33" # midiG' "^81" 0 (0.75 - 0.2 * "^17") -d5 $ g2 -- BASSLINE - $ midiOff "^58" (slow 8) +d5 $ g2 -- BASSLINE FIXME REWORK TO BE HYPNOTIC & DANCING + $ midiOn "^58" (chop 4) $ arp "up" $ n (scale "aeolian" - "<0 <2 [<2 0> . ~ <~ 2> 4 2]>>" + -- "<0 <2 [<2 0> . ~ <~ 2> 4 2]>>" -- V1: Love the end Pattern + "<<[0] [0*4]> <[2 . ~!4 2] [2 2 4 2] 2 [<2 0> . ~ <~ 2> 4 2]>>" -- V1.1: Noisy :/ + "<0!8 [0,12]!24>" -- "" - 24) # s "superchip" # voicebus 51 (range 0.05 0.75 "^34") - # crushbus 52 (range 16 1.8 "^54") - # midiG' "^82" 0 (0.8 - 0.25 * "^54") + # crushbus 52 (range 16 1.2 "^54") + # midiG' "^82" 0 (0.8 - 0.1 * "^54") # room 0.4 # dry 1.02 # sz 0.8 @@ -68,6 +70,8 @@ d6 $ g2 -- Sirene apocalyptico-commerciale # panbus 63 (range 0.4 0.8 (sine - 2 * (fast "<2!3 4 4!3 0.25>" $ perlin))) d7 $ g -- Down Break + $ midiOn "^60" (chop 4) + $ midiOn "^92" (ply 4) $ slice 4 "0 1 <2 [2|1]> <1 2 3 7*<1 <2 4>>>" $ loopAt 2 $ "break:15" diff --git a/live/midi/nova/dnb/alerte_verte.tidal b/live/midi/nova/dnb/alerte_verte.tidal new file mode 100644 index 0000000..c587c0a --- /dev/null +++ b/live/midi/nova/dnb/alerte_verte.tidal @@ -0,0 +1,119 @@ +import Sound.Tidal.ParVagues.Control + +-- Alerte Verte +do +setcps (160/60/4) +let f1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let f2 = (# djfbus 2 (range 0.05 0.95 "^29")) +let g32Bridge = whenmod 64 32 (|* gain (slow 16 $ range 0.85 1.1 saw)) +d1 $ f1 -- KICK + $ midiOn "^41" (<| "k k k ") -- RUN! + $ midiOn "^42" (<| "b . ~ b ~ <~!3 b>") -- WAIT? + $ midiOff ("^41" + "^42") (<| "k*2") -- ST0P. + $ fix (|* gain 1.2) "kick:5" + $ "[jazz]" + # release 0.8 + # midiG' "^78" 0 1.2 +d2 $ f1 -- Snare tchak! + $ g32Bridge + $ whenmod 16 12 (struct "t*<4 4 8 16>") + $ "~ s . ~ <~!4 s!12>" + # "[snare:40,snare:22]" + # pan 0.55 + # note (range "-7" 7 "^51") + # room 0.8 # dry 0.99 # sz 0.2 + # midiG' "^79" 0 1.2 +d3 $ f1-- Running Hats + $ g32Bridge + -- $ degradeBy ("1 0 0 1!13" - "^52") + $ midiOn "^44" (slow 2) + $ midiOn "^76" (fast 2) + $ "hh*[8 . 8 <16 8 4 [4 8]>]" + -- # n "[0|0|0|0|1|1|3|3]*8" + # midiG' "^80" 0 (1.7 + (slow 4 perlin/4)) + # room (slow 8 $ range 0.2 0.45 saw) + # sz (slow 8 $ range 0.8 0.2 saw) + # dry (slow 4 $ range 0 2 perlin) + # pan 0.6 + # cut 3 +d4 $ f1 -- Resolute Bass + $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin))) + $ midiOn "^57" ( -- Glitch vary end + slice 8 "<[0 1 <2!3 1*2> <3!3 1*2>]!4 0*4!2 [0 1 0 1] [0 1 0 [0 1 2 3]]>" + ) + $ loopAt 4 + $ chop 16 + $ "fbass:25" + # pan 0.15 + # room 0.25 # sz 0.1 + # crushbus 41 (range 16 1.25 "^53") + # midiG' "^81" 0 1.3 + # cut 4 +d6 -- Guitar A -- L'attente (18=0) TODO Rework? + $ f1 + $ mask "" + $ ("0.175" ~>) -- Calage + $ whenmod 4 2 (slice 8 "0") + $ slice 5 4 + $ segment 16 + $ "fguitar:24" + # pan 0.8 + # crushbus 51 (range 10 3.5 "^54") + # midiG' "^82" 0 (1.2 * (range 1.4 0 "^18")) + # cut 6 +d7 -- Guitar B -- Le run (18=127) + $ f1 + $ whenmod 4 3 (# silence) + $ midiOn "^58" ( + (# n 27) + ) + $ midiOff "^58" (segment "<0.5!2 1 <2 4 8 [8 16]>>") + $ "fguitar" # n "<25!3 [25 26] 25!2 27!2 27!8>" + # pan 0.65 + # crushbus 71 (range 10 2 "^54") + # midiG' "^82" 0 (1.2 * (range 0 1.4 "^18")) + # leslie "^34" + # lsize (1 + (slow 8 perlin * 2)) + # lrate 6.7 + # cut 71 +d8 $ f1 -- Clave de l'été pitchable + $ midiOn "^59" (fast 2) + $ midiOn ("^91"-"^59") (fast 2) + $ (|* gain "0.75 1 1 1 0.75 1 1 1") + $ "d ~ ~ d d ~ d <~!3 d>" + # "[<808lc!6 808hc!2>,<~!4 808mc!4>]" + # speed (range 0.5 2 "^55") + # midiG' "^83" 0 1.5 +d9 $ f1 -- CLAPS! + $ midiOn "^60" (fast "<1 [1 4]> <1!3 4>") + $ "~ . [~ cp] <~!3 cp>" + # midiG' "^84" 0 1.5 +d10 $ f2 -- Nappes crushées indépendantes + $ midiOn "^92" (chop 4) + $ juxBy 0.9 (# cut 101) + $ note (euclid "<5 3 6>" 6 $ " >") + # "moog" + # cut 10 + # rel 1 + # crushbus 10 (range 16 0.35 "^36") + # midiG' "^20" 0.2 1 +d11 $ f2 -- Sirene indépendante + $ note ("/4") + # octave 3 + # legato 2 + # "supersiren" + # speed 0.2 + # crushbus 11 (range 10 0.515 "^35") + # ampbus 110 (range 0 0.9 "^19") + # pan "<0.2!16 0.8!16>" + # midiG' "^19" 0.5 0.9 + # room 0.4 # sz (slow 32 $ range 0.125 0.9 saw) + # dry (slow 32 $ range 0 2 perlin) + # cut 11 + + +d6 $ "seawolf:0/4" + # cut 6 + # gain 0.75 + +once $ "dr" # gain 1 diff --git a/live/midi/nova/dnb/break_the_loop.tidal b/live/midi/nova/dnb/break_the_loop.tidal index 4cb51e2..0b5edaa 100644 --- a/live/midi/nova/dnb/break_the_loop.tidal +++ b/live/midi/nova/dnb/break_the_loop.tidal @@ -5,31 +5,31 @@ let modIndex = pF "modIndex" let gF2 = (# djfbus 2 (range 0.05 0.95 "^29")) let gF = (# djfbus 1 (range 0.05 0.95 "^49")) let gM = (midiOn "^42" (mask "t >")) -d1 +d1 -- TODO: Improve kick. Sound? Rhythm? $ gF $ midiOn "^42" (mask "t(1,4)") -- $ mask "" $ fix (|* gain 0.9) ("kick") $ fix ((|* gain 0.75) . (# att 0.35) . (# rel 1) ) ("reverbkick") - $ midiOn "^41" (<| "k k k]>") - $ midiOff "^41" (<| "k . ~ k ~ ~") + $ midiOn "^41" (<| "k k k]>") -- Run & stumble + $ midiOff "^41" (<| "k . ~ k ~ ~") -- L'attente $ "jazz" # midiG' "^78" 0 1.3 -d2 $ gF $ gM +d2 $ gF $ gM -- Snare glitch high $ fix ((|* gain 0.9)) ("snare:40") $ "~ s ~ >>" # "[snare:31,snare:40]" # midiG' "^79" 0 1.2 # pan 0.46 # room 0.74 # sz 0.2 # dry 1 -d3 $ gF2 $ gM +d3 $ gF2 $ gM -- Breaks du Marathon $ midiOn "^76" (scramble (8 - 4 * "^44")) $ midiOn "^44" (slice 16 (run "8 . <8 8 <8 16> <16!3 [32 <32 16>]>>")) $ midiOff "^44" (slice 8 ("0 1 2 3 . 4 5 6 <7!3 6>")) $ loopAt 2 $ "break:15" # cut 2 - # pan "^16" + # pan 0.4 # speed (range 0 2 "^52") # midiG' "^80" 0 1.2 d4 -- BASSLINE BRULANTE @@ -50,12 +50,12 @@ d4 -- BASSLINE BRULANTE "<[<5@3 [5 4@2]> <<2 0> [2 0]>] <5 <0 [0 . 0 <0 7> 0]>>>" ) # "90s_synatm:9" - # pan "^17" + # pan (range 0.05 0.95 "^17") # room 0.5 # dry 0.2 # sz 0.8 - # crushbus 41 (range 10 1.9 "^53") + # crushbus 41 (range 16 1.9 "^53") # midiG' "^81" 0 0.99 # cut 4 -d5 $ gF2 $ gM +d5 $ gF2 $ gM -- Ritournelle Rhodes TODO: Variations mélodie? $ note ( "<[c ~ c d ~ d ~]!0 [f ~ f g ~ ~]!8>" - "<24!12 12!4>") @@ -64,7 +64,7 @@ d5 $ gF2 $ gM # modIndex (range 0 100 "^54") # crushbus 41 (range 10 4.5 "^34") # midiG' "^82" 0 1.2 -d6 $ gF2 +d6 $ gF2 -- Voices from the st0rm $ swingBy 0.125 8 $ midiOn "^59" (superimpose ( (>| note (scale "aeolian" "<7 [7@3 <5 9>]>")) diff --git a/live/midi/nova/dnb/meurice.tidal b/live/midi/nova/dnb/meurice.tidal deleted file mode 100644 index c1ccd97..0000000 --- a/live/midi/nova/dnb/meurice.tidal +++ /dev/null @@ -1,122 +0,0 @@ -import Sound.Tidal.ParVagues.Control - --- WIP Name: Alerte Verte --- -do -setcps (160/60/4) -let gDJF = (# djfbus 1 (range 0.05 0.95 "^49")) -let g32Bridge = whenmod 64 32 (|* gain (slow 16 $ range 0.85 1.1 saw)) -let g = (gDJF) -d1 - $ g - $ (|* gain "1!7 0.95") - $ midiOn ("^41"-"^42") (<| "k k k ") - $ midiOff ("^41"-"^42") (<| "b . ~ b ~ <~!3 b>") - $ midiOn "^42" (<| "k*2") - $ "[jazz,bd:2,kick:5]" - # release 0.8 - # midiG' "^78" 0 1.2 -d2 -- Snare tchak! - $ g - $ g32Bridge - $ whenmod 16 12 (struct "t*<4 4 8 16>") - $ "~ s . ~ <~!4 s!12>" - # "[snare:40,snare:22]" - # pan 0.55 - # note (range "-7" 7 "^51") - # room 0.8 # dry 0.99 # sz 0.2 - # midiG' "^79" 0 1.2 -d3 -- Running Hats - $ g - -- $ degradeBy ("1 0 0 1!13" - "^52") - $ midiOn "^44" (slow 2) - $ midiOn "^76" (fast 2) - $ "hh*[8 . 8 <16 8 4 [4 8]>]" - -- # n "[0|0|0|0|1|1|3|3]*8" - # midiG' "^80" 0 (1.7 + (slow 4 perlin/4)) - # room (slow 8 $ range 0.2 0.45 saw) - # sz (slow 8 $ range 0.8 0.2 saw) - # dry (slow 4 $ range 0 2 perlin) - # pan 0.6 - # cut 3 -d4 -- Resolute Bass - $ g - $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin))) - $ midiOn "^57" ( -- Glitch vary end - whenmod 32 0 (slice 8 - "<[0 1 <2!3 1*2> <3!3 1*2>]!4 0*4!2 [0 1 0 1] [0 1 0 [0 1 2 3]]>" - )) - $ loopAt 4 - $ chop 16 - $ "fbass:25" - # pan 0.15 - # room 0.25 # sz 0.1 - # crushbus 41 (range 16 1.25 "^53") - # midiG' "^81" 0 1.3 - # cut 4 -d6 -- Guitar A - $ g - $ mask "" - $ ("0.175" ~>) -- Calage - $ whenmod 4 2 (slice 8 "0") - $ slice 5 4 - $ segment 16 - $ "fguitar:24" - -- # pan 0.8 - # crushbus 51 (range 10 3.5 "^54") - # midiG' "^82" 0 (1.2 * (range 1.4 0 "^18")) - # cut 6 -d7 -- Guitar B - $ g - $ whenmod 4 3 (# silence) - $ midiOn "^58" ( - (# n 27) - ) - $ midiOff "^58" (segment "<0.5!2 1 <2 4 8 [8 16]>>") - $ "fguitar" # n "<25!3 [25 26] 25!2 27!2 27!8>" - # pan 0.65 - # crushbus 71 (range 10 2 "^54") - # midiG' "^82" 0 (1.2 * (range 0 1.4 "^18")) - # leslie "^34" - # lsize (1 + (slow 8 perlin * 2)) - # lrate 6.7 - # cut 71 -d8 -- Clave de l'été pitchable - $ midiOn "^59" (fast 2) - $ midiOn ("^91"-"^59") (fast 2) - $ (|* gain "0.75 1 1 1 0.75 1 1 1") - $ "d ~ ~ d d ~ d <~!3 d>" - # "[<808lc!6 808hc!2>,<~!4 808mc!4>]" - # speed (range 0.5 2 "^55") - # midiG' "^83" 0 1.5 -d9 $ g -- CLAPS! - $ midiOff "^60" (mask "") - $ "~ cp" - # midiG' "^84" 0 1.5 -d10 -- Nappes crushées indépendantes - $ midiOn "^92" (ply 4) - $ juxBy 0.9 (# cut 101) - $ note (euclid "<5 3 6>" 6 $ " >") - # "moog" - # cut 10 - # rel 1 - # djfbus 2 (range 0.05 0.95 "^29") - # crushbus 10 (range 16 1.5 "^36") - # midiG' "^56" 0.2 1 -d11 -- Sirene indépendante TODO Blend-in / Rework? - $ note ("/4") - # octave 3 - # legato 2 - # "supersiren" - # djfbus 11 (range 0.05 0.95 "^20") - # crushbus 11 (range 10 0.501 "^35") - # speed 0.2 - # ampbus 110 (range 0 0.5 "^19") - # cut 11 - - -d6 $ "seawolf:0/4" - # cut 6 - # gain 0.75 - -once $ "dr" # gain 1 diff --git a/live/midi/nova/lounge/invoque_ete.tidal b/live/midi/nova/lounge/invoque_ete.tidal index 4596001..537be0b 100644 --- a/live/midi/nova/lounge/invoque_ete.tidal +++ b/live/midi/nova/lounge/invoque_ete.tidal @@ -7,38 +7,36 @@ resetCycles do setcps (115/60/4) let gF = 1.5 -let gG a = (gain (gF * "^77" * a)) -- gain Global -let gM' l h a = (gG (range l h a)) -- gain Modéré -let gM a = (gM' 0.2 0.8 a) -- gain Modéré doux let mBreak = (midiOn "^41" (mask "t f . f t")) let m = mBreak let f1 = (# djfbus 1 (range 0.1 0.9 "^49")) let f2 = (# djfbus 2 (range 0.1 0.9 "^29")) d1 $ f1 $ m - -- $ midiOn ("^42" - "^41") (slow 4) + $ midiOn "^41" (slow 4) $ midiOn "^42" (<| "k k k ") $ midiOff "^42" (<| "k*2") - -- $ "[jazz,808bd:1,kick:5]" - $ "[jazz,808bd:1]" + $ "[jazz,kick:5]" # midiG' "^78" 0 1.5 d2 $ f1 $ m -- Clave de l'été $ midiOn "^43" (fast 2) $ midiOn ("^75"-"^43") (fast 2) $ (|* gain ("0.75 1 1 1 0.75 1 1 1" * 1.7)) $ "d ~ ~ d d ~ d <~!3 d>" - # "snare:22" # gM' 0 1.4 "^79" - # speed (range 0.5 1.5 "^51") + # "snare:22" + # midiG' "^79" 0 1.4 + # speed (range 0 2 "^51") d4 $ f1 $ m -- Mecano Course $ fast 4 $ midiOn "^76" (fast "<2!3 <4 [4 2]>>" . (# speed 1.2) . (>| "breaks165")) $ midiOn "^44" (slice 16 ("0*<1 2> 1 2 3*<2 1>") . (>| "breaks125")) -- $ midiOn "^76" (slice 8 "0 <1 ~> 7 3*<1 2 4 4>") - $ sometimesBy "0 ^32!7" (shuffle 8) + $ sometimesBy "0 ^32!7" (ply 4) $ someCyclesBy "^52" (iter 4) -- $ slice 8 "0 1 <2!3 0> <3!3 1 4 5 6 7>" "0 1 <2!3 0> <3!3 1>" $ chop 8 $ loopAt 2 $ "breaks125:3" - # gM' 0 1.3 "^80" + # midiG' "^80" 0 1.3 + # speed (range 0 2 "^16") # cut 4 d5 $ f1 $ m -- Bassline variable double piste $ loopAt 2 @@ -48,7 +46,7 @@ d5 $ f1 $ m -- Bassline variable double piste # pan 0.2 # room 0.2 # crushbus 51 (range 16 4.5 "^53") - # gM' 0.3 1.45 "^81" + # midiG' "^81" 0.3 1.45 # cut 4 d6 $ f2 $ m -- Douce guitare juxée $ chop 16 @@ -57,7 +55,7 @@ d6 $ f2 $ m -- Douce guitare juxée $ whenmod 8 4 (chop 4) $ loopAt 4 $ "fguitar" # n "<12!16 13!16>" - # gM' 0 1 "^82" + # midiG' "^82" 0 1 # release (range 2 0.15 "^34") # crushbus 61 (range 8 1.4 "^54") # pan 0.75 @@ -70,23 +68,27 @@ d7 $ f2 $ m $ "fpiano:13" # pan 0.45 # room 0.2 - # gM' 0 1.4 "^83" + # midiG' "^83" 0 1.4 # cut 7 -d8 $ f2 $ m +d8 $ f2 $ m -- Angels of moogland $ midiOn "^92" (|+ note 12) $ midiOn "^60" ( superimpose ( struct "t(5,8)" . arp "[down,up]" . (|+ note 12) - . (|* gain 1.2) . (|- pan 0.1) )) $ note "" # octave 4 # room 0.24 # "moogBass" - # midiG' "^84" 0 0.9 + # midiG' "^84" 0 1.3 + + +-- Sandbox + +-- TODO Manual scratcher? FIXME Too manual? d9 $ f1 $ m $ degradeBy (slow 16 $ range 0.8 0.2 saw) $ struct "t(3,8) [ ]" @@ -96,17 +98,4 @@ d9 $ f1 $ m ) $ "hh:3" # lpq (range 0 0.2 "^35") - # gM' 0 1.7 "^19" - -do -d1 $ "reverbkick" # gain 1.2 -d2 $ "~ cp*4" -d3 - $ "dr*3" - # gain 2 - # lpf 2000 - -once - $ "fbass:41" - # cut 1 - # gain 2 + # midiG' "^19" 0 1.7 diff --git a/live/midi/nova/lounge/michael.tidal b/live/midi/nova/lounge/michael.tidal index 05e5296..8332eee 100644 --- a/live/midi/nova/lounge/michael.tidal +++ b/live/midi/nova/lounge/michael.tidal @@ -16,7 +16,7 @@ d1 $ g d2 $ g $ whenmod 8 6 (ply "2 <2 4>") $ "~ s . ~ <~!7 s> <~!3 s>" # "snare:20" - # midiG "^79" + # midiG' "^79" 0 0.8 # note (range "-12" 12 "^50") d3 $ g diff --git a/samples.txt b/samples.txt index 5375f0a..f2d259d 100644 --- a/samples.txt +++ b/samples.txt @@ -26,6 +26,145 @@ yeah (31) bogdan (16) nass (3) +-- Noir samples +--- Selection +# S01 +Bilocation: weird, long digital wolf howl +Machine choir <3 +Smear machine noise? +# S02 +2 Feedback horns! +Gongs (Futur!) +# S03 +Bilocater: Great pad/singing! +# S04 +Dark angel 1 & 2: Long (32s!) angel minitel drone +# S05 +Draw Nine: 14s tubes 2x loop +Maqsuum: Breakbeats de l'enfer des machines +Overcode: Minitel heaven <3 +# S06 +Aura 03: Burnt bass criquet +Aura 04a: Criquet to bassline long +Aura 04b: Bassline to criquet +Bat Wings: Minitel doubts reinstated +Distorted Beat: Printer loop +# S08 +Drone Bass +Processed Rock +Investigator Hats (x3) +Psychic Beat 01 +Psychic Pad 01 & 02 <3 +Psychic Theme 1 & 2 +# S09 +Deep Ice 2 +Sub Vibrations +# S10 +Drifter: Ambient bliss +Phased pad: Bassish electric vibe +# S11 +Haunted Transmission (x3): WIRE N0ISE <3 +Radio Attack: More <3 +# S12 +Aetherial Drone: (LPF Drone) +Bass 1&2: Noisy basslines +Guitar Pulse: Guitar sine loop +Metal Device Beat: High highs machine break +Otherworld Chimes (x3): Melodies <3 +Otherworld CHoir: Rappel <3 +# S13 +Deep Choir <3 +Pure Tones <3 +Stone Tones <3 +Synth Ensemble <3 +# S15 +Chiller 1&2 +Electronic Signals +Ghost Bowl 01 * 02 +Ghost Encounter 01 / 02 +Strained Circuits + +-- Structure +noir_ambient +noir_bass [bass, bass, phased, bass, guitar] +noir_warp [smear, aura, sub, Aetherial] +noir_angels [gongs,biloc,overcode,bat,psychic,drifter, chiller] +noir_beats [, hats, .., beat] +noir_radio [transmission, radio, electronic signals, Strained circuits] +noir_choir [otherworl, choir, tones, ensemble, ghost*] + +. +├── noir_ambient +│   ├── Session 01 - Bilocation.wav +│   └── Session 03 - Bilocater.wav +├── noir_angels +│   ├── Session 02 - Feedback Horn 01.wav +│   ├── Session 02 - Feedback Horn 02.wav +│   ├── Session 02 - Gongs.wav +│   ├── Session 04 - Dark Angel 01.wav +│   ├── Session 04 - Dark Angel 02.wav +│   ├── Session 05 - Draw Nine.wav +│   ├── Session 05 - Overcode.wav +│   ├── Session 06 - Bat Wings.wav +│   ├── Session 08 - Psychic Pad 01.wav +│   ├── Session 08 - Psychic Pad 02.wav +│   ├── Session 08 - Psychic Theme 01.wav +│   ├── Session 08 - Psychic Theme 02.wav +│   ├── Session 10 - Drifter.wav +│   ├── Session 15 - Chiller 01.wav +│   ├── Session 15 - Chiller 02.wav +│   ├── Session 15 - Ghost Bowl 01.wav +│   ├── Session 15 - Ghost Bowl 02.wav +│   ├── Session 15 - Ghost Encounter 01.wav +│   └── Session 15 - Ghost Encounter 02.wav +├── noir_bass +│   ├── Session 08 - Drone Bass.wav +│   ├── Session 08 - Processed Rock Guitar.wav +│   ├── Session 10 - Phased Pad.wav +│   ├── Session 12 - Bass 01.wav +│   ├── Session 12 - Bass 02.wav +│   └── Session 12 - Guitar Pulse.wav +├── noir_beats +│   ├── Session 05 - Dogon Maqsuum Filtered Beat 01.wav +│   ├── Session 05 - Dogon Maqsuum Filtered Beat 02.wav +│   ├── Session 05 - Maqsuum Beat.wav +│   ├── Session 05 - Maqsuum Transgene Beat.wav +│   ├── Session 05 - Metal Maqsuum.wav +│   ├── Session 06 - Distorted Beat.wav +│   ├── Session 08 - Investigator Hats 01.wav +│   ├── Session 08 - Investigator Hats 02.wav +│   ├── Session 08 - Investigator Ride.wav +│   ├── Session 08 - Psychic Beat 01.wav +│   └── Session 12 - Metal Device Beat.wav +├── noir_choir +│   ├── Session 01 - Machine Choir.wav +│   ├── Session 12 - Otherworld Chime 01.wav +│   ├── Session 12 - Otherworld Chime 02.wav +│   ├── Session 12 - Otherworld Chime 03.wav +│   ├── Session 12 - Otherworld Choir.wav +│   ├── Session 13 - Deep Choir.wav +│   ├── Session 13 - Distorted Tones.wav +│   ├── Session 13 - Pure Tones.wav +│   ├── Session 13 - Stone Tones.wav +│   └── Session 13 - Synth Ensemble.wav +├── noir_radio +│   ├── Session 09 - Deep Ice 02.wav +│   ├── Session 11 - Haunted Transmission 01.wav +│   ├── Session 11 - Haunted Transmission 02.wav +│   ├── Session 11 - Haunted Transmission 03.wav +│   ├── Session 11 - Radio Attack.wav +│   ├── Session 15 - Electronic Signals.wav +│   └── Session 15 - Strained Circuits.wav +└── noir_warp + ├── Session 01 - Smear.wav + ├── Session 06 - Aura 03.wav + ├── Session 06 - Aura 04 a.wav + ├── Session 06 - Aura 04 b.wav + ├── Session 09 - Sub Vibrations.wav + └── Session 12 - Aetherial Drone.wav + + + -- scales --- minPent majPent ritusen egyptian kumai hirajoshi iwato chinese indian pelog prometheus scriabin gong shang jiao zhi yu whole wholetone augmented augmented2 hexMajor7 hexDorian hexPhrygian hexSus hexMajor6 hexAeolian major ionian dorian phrygian lydian mixolydian aeolian minor locrian harmonicMinor harmonicMajor melodicMinor melodicMinorDesc melodicMajor bartok hindu todi purvi marva bhairav ahirbhairav superLocrian romanianMinor hungarianMinor neapolitanMinor enigmatic spanish leadingWhole lydianMinor neapolitanMajor locrianMajor diminished octatonic diminished2 octatonic2 messiaen1 messiaen2 messiaen3 messiaen4 messiaen5 messiaen6 messiaen7 chromatic diff --git a/study/samples/noir.tidal b/study/samples/noir.tidal new file mode 100644 index 0000000..b8b55de --- /dev/null +++ b/study/samples/noir.tidal @@ -0,0 +1,13 @@ +do +d1 + $ loopAt 1 + $ "noir_beats:2" + # cut 1 +d2 + $ "noir_angels:3/4" # cut 2 # gain 0.48 +d3 + $ chop 2 + $ "noir_radio" + # n "2 <3 2>" + # cut 3 + # gain 0.7 -- libgit2 0.27.0