live: PSC

live/midi/nova/computer_riddim.tidal

@@ -14,7 +14,7 @@ let gM a = (gM' 0.2 0.8 a) -- gain Modéré doux
 let gLPF = (# lpf (min 10000 ((range 200 20000 ("^49")))))
 let gHPF = (# hpf (max 0 (min 7500 ((range "-7500" 7500 ("^49"))))))
 let gDJF = (gLPF . gHPF)
-let novaOn  ch pat = (someCyclesBy ch pat)
+let novaOn  ch pat = someCyclesBy ch pat
 let novaOff ch pat = someCyclesBy (1 - ch) pat
 -- endregion Nova Utils
 let gDelayD = (# delay (range 0 5 "^13"))

live/midi/nova/instruments/scratchomatic.tidal

@@ -18,7 +18,7 @@ d10 $ gAcc -- Kick
   $ "k(3,8) . <k k*2 [k . ~ k] <~ [~ k*4]>>" # "[jazz,hh:6]"
   # att 0.3 # sus 0.3
   # room 0.4 # dry 1.01 # sz 0.8
-  # gain 2.6
+  # gain 1.6
 d9 $ gAcc $ "drum:2*8" # gain 1
 d1 $ g -- Main
   $ struct "t(3,8) [<t!3 [~ t]> <t ~> <t t*2> <t*2 t t*2 t*2>]"

live/midi/nova/lounge/top_hats.tidal

@@ -9,11 +9,12 @@ let prog = ("<cs5!4 a4 a4 b4 gs4>")
 let chorus = pF "chorus"
 let mix = pF "mix"
 let modIndex = pF "modIndex" -- 0.2
-let gG a = (gain (1.3 * "^77" * a)) -- gain Global
+let gG a = (gain (1.2 * "^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 gDJF = midiDJF "^49" 200 10000 0 7500
 let g = (gDJF)
+setcps 0.5
 d1 $ g
   $ midiOn "^41" ( -- KICK RUN
     ((>| "[jazz,kick:5]*<4 4 4 [4!3 8] 4 4 2 <2 [2 8]>>") . (|* gain 0.5))
@@ -87,6 +88,7 @@ d6 $ g -- Guitar riffs
   # sz 0.9
   # gM' 0.4 1.5 "^81"
 d8 $ g
+  $ midiOn "^91" (ply 2)
   $ midiOn "^59" (
     (# lpf 2000)
     . (# crush (range 16 5 "^55"))

live/midi/nova/minneapolis.tidal

@@ -12,8 +12,6 @@
 -- G    Kick Sn    DrRoll   Bass    Piano  CP      Fire
 -- X    TCHN Stut  Wait/Run TCHN    XXX    XXX     XXX
 
-once $ "dr" # gain 0.8
-
 do
 -- region Nova Utils
 let gF = 1.3 -- gain factor
@@ -106,7 +104,8 @@ d5 $ g -- Basse + Sirene
       )
       - (0.125 * "^57") -- When TECHNOPHILE
       ))
-    . (# crush (range 10 3 "^33"))
+    . (# crush (range 10 3
+       "^33"))
     . (# room 0.5)
     . (# size 0.8)
   )
@@ -115,7 +114,7 @@ d5 $ g -- Basse + Sirene
     + melodyFirst
   )
   # s "supersaw"
-  # voice 0.02
+  # voice 0.15
   # crush (range 10 2 "^33")
   # gM' 0 0.8 ("^81" * (range 0.9 0.4 "^53")) -- Modulated 5C
   # pan (slow 10 $ range 0.6 0.8 sine)

live/midi/nova/party/funk_angel_frappe.tidal

@@ -52,7 +52,7 @@ d4 -- RESONANT BASSLINE
   )
   -- $ juxBy 0.8 (# crush (slow 16 $ range 16 5 isaw))
   $ note "b2!6 <bs2!3 <a2 g2>> b2" # "supersaw"
-  # accelerate ("<0!60 -0.1 -0.1 -0.2 -0.2>")
+  -- # accelerate ("<0!60 -0.1 -0.1 -0.2 -0.2>")
   # gM' 0 1 "^81"
   # crush (range 10 3 "^33")
   # room 0.5 # sz 0.8

live/midi/nova/party_hard.tidal

@@ -52,7 +52,7 @@ d4
     mask "t(1,4)"
     . arpeggiate
     . (# "superpwm")
-    . (|* gain 0.5)
+    . (|* gain 0.8)
     . (# pan 0.6)
     . (# crush 16)
     . (# voice 0.2)
@@ -98,7 +98,7 @@ d7
   $ whenmod 4 2 (superimpose ((# "clap") . (# lpf 4500) . (|* gain 0.8)))
   $ fast 2
   $ "~ cp"
-  # gM' 0 1.1 "^83"
+  # gM' 0 1.5 "^83"
   # room 0.2
   # dry 0.9
   # lpf 2000

live/pair/be_my_punk.tidal

 -- if Nina was a punk
 -- TODO trois couplets: Husband - ??? - All of your life
 do
--- resetCycles
+resetCycles
 setcps (80/60/4)
 d1 -- grosse caisse / caisse claire poum tchak
   $ fix (# s "[bd,808bd]") (s "k")
@@ -45,7 +45,7 @@ d4
     . (|* gain 0.85)
   )
   $ slice 2 "<0 0 1 1>"
-  $ "punk"
+  $ "punk" -- FIXME speed decalage swing seconde mesure
   # pan 0.8
   # gain 0.8
   # cut 4
@@ -58,7 +58,7 @@ d2 $ slice 8 (stack [
   "0 . 1(5,8)"
   ]) "breaks165:2" # gain 1.25
 d10
-  $ g
+  -- $ g
   $ whenmod 8 4 (scramble "<2 2 4 4>")
   $ slice 8 (run 4)
   $ "nina/4"