sessions: mood, techno 4-4

backlog.md

@@ -10,6 +10,10 @@ Beats.tidal: various background beats, hip/techno
 - Cyprès Poudreux - Break dusty cypress + guitars, too much cypress
 - BruitHiver: grand froid cosmic noise
 
+--Dubmini: mini minor midi dub basis
+
+-- Kumai nights: Techno kawai nocturne
+
 ## Lessons
 
 - Reread building up
@@ -24,27 +28,35 @@ Beats.tidal: various background beats, hip/techno
 
 <!-- endregion -->
 
-- BAILAR: Marcia danse pour moi!
+- BAILAR: Marcia danse pour moi! Accompagne Clavinet bass ou lead
 
 - Crapeau HipPo: Clav sur rythme hip-hop manuel
 - Break britafuninnique: boucle hip hop breatbeat piano attend un lead
 - Marche vertige: vertige vibration attend drum militaire
 
-- Wake the Funk: WIP techno funk résolue + hats
-
-- Morning flowers: breakbeat bassline funky
 
 - [Hardcore] Noise in the wires
 - [Transe] Tentative (Didgeri) Doo
+-- [Trans/techno] Interesting barrels needs a lead
+
 
 
+-- BUBULLE! Comment t'ais-je oublié ?
 
 - Le naufrage! Funkpiano 110BPM
 
+- Wake the Funk: WIP techno funk attend résolue + hats
+
 - Vertige expérientiel : Techno progressive+ résolue bass laggy+ forks
 - Cuba space program: Techno-clave + vibraphone, bonne montée attends drop!
 
+### Techno 4 Temps, 4 Stems:
+-- Detroit: various tentatives
+-- La Vibe
 
+### Mood
+-- ToneDown: Techno numérico-mélancolique résolvable
+-- Afternoon: Chill breakbeat evening sunset
 
 ## Copycat
 - 44 More
@@ -58,3 +70,7 @@ Beats.tidal: various background beats, hip/techno
 ## Prod
 -- Good morning Minneapolis: time to finish
 -- Chaude civ: Breakbeat bassline diphonique
+
+## Record :)
+
+- Morning flowers: breakbeat bassline funky + MIDI Jazzy éventuel :)

blocks/drums.tidal

@@ -101,3 +101,15 @@ $ fast 2
 $ n ("0 . 0 0 0 . 0 . 0 <0 ~> <0 ~> . 0 . 0 . <0 ~>" + "2 [2|3] 2 [2 3]")
 # s "electro1" # gain 1.3
 # room 0.2
+
+-- Rythme de l'été
+do
+setcps (130/60/4)
+d1
+  $ fast 2
+  $ fix (# "sn:1") ("sn")
+  $ fix (# "jazz") ("k")
+  -- $ "[k ~ <~!7 k> k] [<k!7 [~ k]> . k]"
+  $ "k ~ <~!3 sn> sn . k sn"
+  # gain 0.7
+-- d2 $ "hh*8" # gain 0.6

live/mood/fight/clav_clash.tidal

+do
+setcps (60/60/4)
+resetCycles
+d1 -- Kick chaloupé
+  $ mask "<f!8 t!56>"
+  $ whenmod 32 24 (# djf (slow 8 $ range 0.5 1 isaw))
+  $ "k . k(<5 3 5 [4 8]>,8)"
+  # "[reverbkick,jazz]"
+  # gain 0.6
+d3 -- Drumroll léger
+  $ sometimesBy "<0!3 1 0 1!3 0!120>" (stut "<4!3 3>" 0.5 "s")
+  $ someCyclesBy "<0.2!3 0.5>" (fast 2)
+  $ fast "<1!4 2 2 4 [8 16]>" "drum:2" # gain 0.8
+d4 -- Clav clash kalash!
+  $ sometimesBy "<1!8 0!120>" (|* gain (slow 16 $ range 0.25 1 saw))
+  $ whenmod 64 48 (scramble 4 . chop 4)
+  $ whenmod 32 24 (# djf (slow 8 $ range 0.1 0.5 saw))
+  $ loopAt 2
+  $ "fclav"
+  # n 10
+  # gain 0.5
+  # cut 4
+d5 -- Cymbales noise
+  $ sometimesBy "<1!16 0!112>" (|* gain (slow 16 $ saw))
+  $ whenmod 64 48 (
+    # legato "<0.5 0.65 0.75 0.85 0.9 0.95>"
+  )
+  $ whenmod 32 24 (# djf (slow 8 $ range 1 0.5 saw))
+  $ fast "<16!3 <4 8>>"
+  $ "808cy"
+  # n "<1!3 4>"
+  # cut 5
+  # attack "[1 <0.2 0.4 0.5 0.8>]*8"
+  # gain (slow 32 $ range 0.4 0.5 sine)
+d6 -- Nappes Rhodes
+  $ note ("<e3 [g3'maj7'2 f3'min'2] e3 <b3'min7'2 b3'maj7'2>>")
+  # "FMRhodes1"
+  # pan 0.2
+  # gain 0.8
+d7 -- LEAD PIANO!
+  $ mask "<f!4 [t f!3]!4 t!56>"
+  $ whenmod 64 48 (
+    euclid (slow 2 $ "<1 2 3 3 4 5 5 8>") 8
+    . (# crush "<16 14 10 9>")
+    )
+  $ off ("q" + "<0!8 s!8>") (
+    |+ note "<c!16 <c c'maj'2 c'maj'3>!16>"
+  )
+  $ whenmod 32 16 (sometimesBy "f 0.8" (scramble 2))
+  $ arp "<up!3 down>"
+  $ note ("<e g e b>" + "c'majPent'4 c'minPent'4")
+  # "superpiano"
+  # velocity (slow 256 $ range 0.25 0.55 cosine)
+  # pan 0.6
+  # legato 2 # room 0.1

live/mood/soothing/tone_down.tidal

 -- DIGITAL DREAMS OF MINITEL REVIVAL
 -- Techno numérico-mélancolique résolvable
 do
+resetCycles
 setcps (60/60/4)
 let mel = "c <f d'min'2> <d <c'min d'maj>> <af <e'maj'2 e'min'2 af'maj'2>> <g!12 c5!4>@4"
 d1 -- BEAT
-  $ slow 2-- TODO Resolve :)
+  -- $ slow 2-- TODO Resolve :)
   $ whenmod 64 32 (# djf (slow 32 $ range 0.5 0 isaw))
   $ fast 2 $ (<| "k k k <k <k k*2 k [~ k]>>") -- TECHNO <3
   $ "jazz" # gain 0.5
 d2 -- Drums résolus
-  $ slow 2 $ (|* gain 0.85) -- TODO Resolve :)
+  -- $ slow 2 $ (|* gain 0.85) -- TODO Resolve :)
   $ whenmod 4 2 (often (mask "t [<t t?>!7 t]"))
   $ whenmod 64 32 (# djf (slow 32 $ range 0.5 1 saw))
   $ superimpose (
@@ -21,7 +22,7 @@ d2 -- Drums résolus
   # "[snare:20,glitch:0]"
   # gain (slow 16 $ range 0.3 0.45 saw)
 d4 -- Cymbales fantômes
-  $ ((|* gain 0.8) . (# room 0.4))-- TODO Resolve :)
+  -- $ ((|* gain 0.8) . (# room 0.4))-- TODO Resolve :)
   $ rarely ((swing 2 . (|* gain 0.75)))
   $ juxBy 0.9 ((|* gain 0.9) . (|+ room 0.4))
   $ sometimesBy "<t!8 f!32 t!16>" (mask "<f!7 t>")
@@ -52,7 +53,7 @@ d5 -- Rhodes nappes
   # pan 0.4
   # legato 2
 d6 -- Rhodes lead folie minitel
-  $ degradeBy "0 0.95!7" . (|* gain 0.8)
+  -- $ degradeBy "0 0.95!7" . (|* gain 0.8) -- TODO Resolve :)
   $ sometimesBy "<t!8 f!56>" (degradeBy "t f [f t] f")
   $ scramble 8
   $ ply 4

live/mood/tired/afternoon.tidal

+do
+resetCycles
+setcps (60/60/4)
+let mel = "<e3 [g3 <a3 f3>] e3 b3>"
+let prog = "<e3 [g3'maj7'2 f3'min'2] e3 <b3'min7'2 b3'maj7'2>>"
+d1 -- BEAT + Snares
+  $ fix (
+    whenmod 4 3 (ply "2 4")
+    . fast "<1!4 2!10 4 [4 8]>"
+    . (# n "[3,11]")
+    . (# gain 0.75)
+    ) ("snare")
+  $ "jazz(<1!3 <3 5>>,8) snare" # gain 0.7
+d2 -- BREAK
+  $ whenmod 32 16 (# djf (slow 32 (cosine + 0.5)))
+  $ slice 8 (
+    fast "<8 [8 16] 8 [16 <8 4>]>"
+    -- "<0!4 [0 1]!4 <0 1 2 3 4 5 6 7>!4>"
+    "<0 2 0 7 5 5 0 7>"
+    )
+  $ loopAt 2
+  $ "break:3"
+  # gain 0.65
+  # cut 2
+d6 -- Nappes Rhodes
+  $ note prog
+  # "FMRhodes1"
+  # pan 0.2
+  # gain 0.9
+d7 -- Hello PWM
+  $ note (mel - 12)
+  # "superpwm"
+  # semitone "<7!3 5>" -- 2nd Oscillator quinte/quarte
+  # accelerate "<0!7 <6 12>>"
+  # rate "<1!5 2 4 <1 4>>"
+  # resonance (slow 32 $ range 0.2 0.6 sine)
+  # gain (slow 128 $ range 0.5 0.65 saw)

live/remix/kanye_fly.tidal

@@ -105,7 +105,7 @@ do
     $ "[jazz,techno]"
     # gain 0.8
   d2
-    $ jux rev
+    $ juxBy 0.25 rev
     -- $ sometimesBy "<t!8 f!80>" (slow 4 . (|* gain (slow 8 saw)))
     $ "hh(<5!4 3 3 5 3>,8) ho"
     # n "0 <0 0 1 2 3 4 5 6>"
@@ -133,3 +133,40 @@ do
     # cut 4
 
     -- delay / delaytime / delayfeedback / cutoff / resonance / room / size
+-- endregion
+
+-- region Fly again [spleeter]
+do
+setcps (100/60/4)
+resetCycles
+d1
+  $ superimpose (const $ "jazz*4" # gain 0.8)
+  $ whenmod 4 2 (often (slow 2))
+  $ n "11*[8 <8!3 <4 16>>]"
+  # "gretsch"
+  # gain 0.8
+d2
+  $ slice 32 (
+    "1*<1 1 4 1 4 4 4 8 [4 1] 4 4 8 4>"
+  )
+  $ "kanye:1"
+  # cut 2
+  # gain 1.1
+d3
+  $ juxBy 0.25 (
+    ply 2
+    . (|+ note 12)
+    . (|* gain (slow 4 $ range 0.45 1 saw))
+  )
+  $ slice 16 ("<0 <1 2>>")
+  -- $ slice 64 ("0*4" + cat [0, "[0 1]*<1 <2 4>>"])
+  $ "kanye:2" # cut 3 # gain 0.65
+d4
+  $ mask "<f!8 t!8>"
+  $ slow "1 <1 2 4 0.5 0.5>"
+  $ chop "8 <16 4 16 1>"
+  $ "kanye:3"
+  # cut 3
+  # pan 0.2
+  # gain 0.6
+-- endregion

live/techno/4stems/_template.tidal

+do
+setcps (120/60/4)
+d1 $ ""
+d2 $ ""
+d3 $ ""
+d4 $ ""

live/techno/4stems/detroit_outer_space.tidal

+do
+resetCycles
+setcps (120/60/4)
+d1 $ mask "<t!28 f!3 [f!3 t]>" $ "[kick:5,bd]*4" # gain 0.65
+d2
+  $ degradeBy (slow 32 $ range 0 0.8 cosine)
+  $ sometimesBy "<t!6 f f>" (superimpose (# "glitch"))
+  $ "[~ dr]*4" # gain 0.7
+d3
+  $ degradeBy (slow 32 $ range 0 0.8 (sine + 0.25))
+  $ "hh*<16!3 [16!3 4]>" # gain 0.55
+d4
+  $ degradeBy (slow 32 $ range 0 0.8 sine)
+  $ superimpose (mask "t f!3" . (|- note 24))
+  $ sometimesBy "0 <0.5!3 1>" rev
+  $ slice 8 (run 16)
+  $ note (scale "minPent" $ ("<e!3 b>" + run 8 - 12))
+  # "supercomparator"
+  # gain (slow 64 $ range 0.65 0.6 sine)
+  # pan (range 0.6 0.9 perlin)
+d5
+  $ mask "<t!32 f!3 [f!3 t] t!28>"
+  $ note (scale "minPent" $ "<e!3 <b a>>"
+  - 24
+  )
+  # "superpwm"
+  # legato 2
+  # gain "<0.7!3 0.65>"
+  # pan 0.3
+  # room 0.1
+
+-- PWN Maniac
+do
+d1 -- 4, the four
+  $ whenmod 16 12 (fast "<2 2 1 [0.5 1]>")
+  $ "jazz*4" # gain 0.5
+d2 -- Claps graves contretemps
+  $ whenmod 8 7 (fast "<2!3 4>")
+  $ "~ cp"
+  # lpf 2000
+  # gain 0.8
+d3 -- LEAD BASS
+  $ whenmod 16 8 (euclid "<5!3 <3 8>>" 8)
+  $ note "<g!3 <ef <d d6>>>"
+  # "superpwm"
+  # octave 2
+  # resonance 0.25
+  # semitone "<7!3 12>"
+  # legato (slow 64 $ range 0.75 1 sine)
+  # gain 0.65
+d4
+  $ fast 4
+  $ "hh*<1!4 2 2 [2 4 2] [4 8]>"
+  # gain 0.45
+  # cut 4
+
+-- NOISE
+do
+d1 $ "jazz*4" # gain 0.8
+d2 $ "[glitch:2]*8" # gain 0.6
+d3
+  $ note ("b3'sevenSus2'2")
+  # "superchip/4"
+  # legato 2
+  # slide (0)
+  # pitch2 4
+  # pitch3 (-12)
+  # gain 0.5

live/techno/4stems/la_vibe.tidal

+-- La vibe: techno basse vibratoire
+do
+setcps (120/60/4)
+let gDjf = (whenmod 64 32 (# djf (slow 32 $ range 0 0.5 saw)))
+d1
+  $ gDjf
+  $ mask "<[t f!3]!4 [t f t f]!4 t!24 f!4 t f!3 [t f]!4 t!24>"
+  $ fast 4 $ "jazz" # gain 0.65
+d2
+  $ gDjf
+  $ "~ . <cp!7 cp*2> ~"
+  # gain (slow 16 $ range 0.5 0.8 saw)
+  # lpf 2000
+d3 -- Bass marche nocturne
+  $ sometimesBy "<0!16 1!16 0!3 1 0 0 1 0 0!3 1 1!3 0 1!16>"
+  ( -- La Vibe
+    juxBy 0.25 (
+    (|+ note 12)
+    . (# room 0.1) . (# sz 0.1)
+    . scramble 4
+    . ply 4
+  ))
+  $ note ("c [~ f] . c <c <g b4>>")
+  # octave 2
+  # legato 1
+  # "superpwm"
+  # gain (slow 32 $ range 0.45 0.65 cosine)
+  # pan 0.4
+  # room 0.2 # size 0.3
+d4
+  $ often (stut 4 0.9 "<q e s>")
+  $ mask "t . <t t? f t> t"
+  $ "hh*[4 <8 <4 16>>]"
+  # gain (slow 32 $ range 0.65 0.9 sine)
+  # pan (slow 32 $ range 0.4 0.8 sine)
+  # cut 4

study/20201104.tidal

+-- https://gist.github.com/cleary/4a70f56ec2a4e484759816ba13790167
+setcps 0.5
+
+d1 $ slow 4 $ n "c1" # s "superpwm" # legato 7 # gain "1.15" # room 0.2 # size 0.2
+
+d2 $ plyWith 3 (# squiz 4 ) $ n "g5/4" # s  "superpwm" # hpf 8000 # room 0.2 # sz 0.2 # orbit 0
+
+d3 $ every 16 (# attack 0.4) $ rarely (struct "t/6" . (# up "e'minor7")) $ slow 4 $ n "c5" # s "superfm"
+
+d4 $ rarely (jux rev) $ slow 8 $ n (arp "down" "g7'dom7/3") # s "superchip"
+    # accelerate (choose [-1, -0.5, 0.25, -1, 0, 0, 0])
+    # hpf 6000
+    # gain 0.7
+
+d4 silence
+
+xfade 5 silence
+
+d5 $ slow 4
+  -- $ struct ("t(3,8)*4")
+  $ n "g2" # s "supercomparator" # gain 1.2
+
+-- that'll do, thanks for listening