chore: Save

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:
 

live/midi/nova/breaks/slower.tidal

-wimport Sound.Tidal.ParVagues.Control
+import Sound.Tidal.ParVagues.Control
 
 setcps (80/60/4)
 

live/fusion/elephunk.tidal → live/midi/nova/fusion/elephunk.tidal

@@ -53,7 +53,7 @@ d7 -- Bonus breaks
   # hpf 100
 d8 $ g -- Organic madness
   $ mask "<f!7 t f!4 t f!19 t!3 f t!28>"
-  $ sometimesBy (slow 4 saw) (ply 2)
+  -- $ sometimesBy (slow 4 saw) (ply 2)
   $ chop 4
   $ someCyclesBy "<0!32 1!4 0!28>" (|* gain (slow 4 $ range 0.5 1 saw))
   -- $ mask "<f!32 t!32>"

live/midi/nova/lofi/new_dust.tidal

@@ -8,8 +8,10 @@ let whenNotIntro pat = someCyclesBy "<f!8 t!24>" pat
 let whenBrk      pat = whenmod 16 10 pat
 let whenNotBrk   pat = someCyclesBy "<t!10 f!6>" 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 =  "<e [a5,f] [e,gs5] ~>"
 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 ~> 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 "<e d c b4>")
-  - 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

live/midi/nova/lounge/cbow.tidal

@@ -16,13 +16,13 @@ d1 $ gDJF $ g
   $ midiOff "^41" (mask "<f f [t f] t t!28>")
   $ midiOn "^41"  (<| "k k k <k k*2 k [~ k]>")
   $ midiOff "^41" (<| "k [~!6 <k!3 ~>] . 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 "<f!32 t!32>")
   $ note "<[c . ~!3 <~ <d g4>>] 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)

live/mood/fight/sage.tidal

+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 "<f!8 t!24>"
+  $ 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)

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`

study/discord/code-talk.tidal

+-- 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