practice: OPERATE&Noir

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 🔥

live/ambient/weird.tidal

 -- ç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"

live/hip/lofi/808_lessons.tidal

+resetCycles
+
 do
 setcps (80/60/4)
 d1
   -- $ mask "<f!4 t!12 f!3 t t!12 f!8 t!8 f f t!14>"
   $ 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

live/midi/nova/ambient/contre_visite.tidal

@@ -21,7 +21,7 @@ d1 $ f
   $ midiOff "^41" (<| "<k k ~ k> . ~ ~ ~ <~!3 k>")
   $ "[reverbkick,808bd:6]"
   # lpf 1000
-  # midiG' "^78" 0 1.2
+  # midiG' "^78" 0 1
 d2 $ f
   $ mask "<t(<1!3 3>,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

live/midi/nova/ambient/drone_aveugle.tidal

 -- 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>"
       -- "<d'maj11'8!3 [d'maj11'i'6]>"
   - 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"

live/midi/nova/dnb/meurice.tidal → live/midi/nova/dnb/alerte_verte.tidal

 import Sound.Tidal.ParVagues.Control
 
--- WIP Name: Alerte Verte
---
+-- Alerte Verte
 do
 setcps (160/60/4)
-let gDJF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+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))
-let g = (gDJF)
-d1
-  $ g
-  $ (|* gain "1!7 0.95")
-  $ midiOn ("^41"-"^42") (<| "k k k <k!3 k*2>")
-  $ midiOff ("^41"-"^42") (<| "b . ~ b ~ <~!3 b>")
-  $ midiOn "^42" (<| "k*2")
-  $ "[jazz,bd:2,kick:5]"
+d1 $ f1 -- KICK
+  $ midiOn "^41" (<| "k k k <k!3 k*2>") -- 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 -- Snare tchak!
-  $ g
+d2 $ f1 -- Snare tchak!
   $ g32Bridge
   $ whenmod 16 12 (struct "t*<4 4 8 16>")
   $ "~ s . ~ <~!4 s!12>"
@@ -26,8 +23,8 @@ d2 -- Snare tchak!
   # note (range "-7" 7 "^51")
   # room 0.8 # dry 0.99 # sz 0.2
   # midiG' "^79" 0 1.2
-d3 -- Running Hats
-  $ g
+d3 $ f1-- Running Hats
+  $ g32Bridge
   -- $ degradeBy ("1 0 0 1!13" - "^52")
   $ midiOn "^44" (slow 2)
   $ midiOn "^76" (fast 2)
@@ -39,13 +36,11 @@ d3 -- Running Hats
   # dry   (slow 4 $ range 0 2 perlin)
   # pan 0.6
   # cut 3
-d4 -- Resolute Bass
-  $ g
+d4 $ f1 -- Resolute Bass
   $ 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]]>"
-  ))
+    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"
@@ -54,20 +49,20 @@ d4 -- Resolute Bass
   # crushbus 41 (range 16 1.25 "^53")
   # midiG' "^81" 0 1.3
   # cut 4
-d6 -- Guitar A
-  $ g
+d6 -- Guitar A -- L'attente (18=0) TODO Rework?
+  $ f1
   $ mask "<f!3 t>"
   $ ("0.175" ~>) -- Calage
   $ whenmod 4 2 (slice 8 "0")
   $ slice 5 4
   $ segment 16
   $ "fguitar:24"
-  -- # pan 0.8
+  # 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
+d7 -- Guitar B -- Le run (18=127)
+  $ f1
   $ whenmod 4 3 (# silence)
   $ midiOn "^58" (
     (# n 27)
@@ -81,7 +76,7 @@ d7 -- Guitar B
   # lsize (1 + (slow 8 perlin * 2))
   # lrate 6.7
   # cut 71
-d8 -- Clave de l'été pitchable
+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")
@@ -89,29 +84,31 @@ d8 -- Clave de l'été pitchable
   # "[<808lc!6 808hc!2>,<~!4 808mc!4>]"
   # speed (range 0.5 2 "^55")
   # midiG' "^83" 0 1.5
-d9 $ g -- CLAPS!
-  $ midiOff "^60" (mask "<f!8 t!124>")
-  $ "~ cp"
+d9 $ f1 -- CLAPS!
+  $ midiOn "^60" (fast "<1 [1 4]> <1!3 4>")
+  $ "~ . [~ cp] <~!3 cp>"
   # midiG' "^84" 0 1.5
-d10 -- Nappes crushées indépendantes
-  $ midiOn "^92" (ply 4)
+d10 $ f2 -- Nappes crushées indépendantes
+  $ midiOn "^92" (chop 4)
   $ juxBy 0.9 (# cut 101)
   $ note (euclid "<5 3 6>" 6 $ "<e e <c c g> <e b>>")
   # "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?
+  # crushbus 10 (range 16 0.35 "^36")
+  # midiG' "^20" 0.2 1
+d11 $ f2 -- Sirene indépendante
   $ note ("<e e c e>/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")
+  # 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
 
 

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 <t!3 <[f t]!2 f [f t!3]>>"))
-d1
+d1 -- TODO: Improve kick. Sound? Rhythm?
   $ gF
   $ midiOn "^42" (mask "t(1,4)")
   -- $ mask "<f!4 t(1,2)!3 t!9>"
   $ fix (|* gain 0.9) ("kick")
   $ fix ((|* gain 0.75) . (# att 0.35) . (# rel 1)
     ) ("reverbkick")
-  $ midiOn "^41" (<| "k <k!4 ~ k!3> k <k [~ k] k [<k!4 ~!3 k> k]>")
-  $ midiOff "^41" (<| "k . ~ k ~ ~")
+  $ midiOn "^41" (<| "k <k!4 ~ k!3> k <k [~ k] k [<k!4 ~!3 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 ~ <s!3 <s*2 s*<1 2>>>" # "[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 <ef!3 f> ~]!0 [f ~ f g ~ <g!3 f> <gs!3 f> ~]!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>]>"))

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 <f!4 t!4> <f!2 t!6> 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 <k k k*2 [~ 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 "<a3'maj g3'maj a3'min d3'maj>"
   # 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) [<t!3 [~ t]> <t ~> <t t*2> <t*2 t t*2 t*2>]"
@@ -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

live/midi/nova/lounge/michael.tidal

@@ -16,7 +16,7 @@ d1 $ g
 d2 $ g
   $ whenmod 8 6 (ply "2 <2 4>")
   $ "~ s . ~ <s!7 ~> <~!7 s> <~!3 s>" # "snare:20"
-  # midiG "^79"
+  # midiG' "^79" 0 0.8
   # note (range "-12" 12 "^50")
 d3
   $ g

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
 

study/samples/noir.tidal

+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