From 86abcb21fa74f4da4f1503e83e18f7b0ec895123 Mon Sep 17 00:00:00 2001
From: PLN <pln@PLN-THINK-DEB>
Date: Sat, 6 Mar 2021 22:17:47 +0100
Subject: [PATCH] live: Before changing breakbass
---
live/midi/nova/dnb/BreakBass.tidal | 29 +++++++++++++++--------------
live/midi/nova/dnb/MethBass.tidal | 2 +-
live/midi/nova/dnb/prepabass.tidal | 23 +++++++++++------------
live/midi/nova/instruments/scratchomatic.tidal | 4 ++--
live/midi/nova/lounge/invoque_ete.tidal | 2 +-
live/midi/nova/party/funk_angel_frappe.tidal | 6 +++---
6 files changed, 33 insertions(+), 33 deletions(-)
diff --git a/live/midi/nova/dnb/BreakBass.tidal b/live/midi/nova/dnb/BreakBass.tidal
index c828bef..799d436 100644
--- a/live/midi/nova/dnb/BreakBass.tidal
+++ b/live/midi/nova/dnb/BreakBass.tidal
@@ -31,18 +31,18 @@ setcps (120/60/4)
-- resetCycles
d1 $ g
-- $ mask "<f!4 t!16 t!3 f f!4 t f!2 t!2>"
- $ novaOn "^42" (<| "k k k k")
+ $ novaOn "^42" (<| "k k k <k!2 k*2 [~ k]>")
$ novaOff "^42" (<| "k . ~ k ~ ~")
$ "[reverbkick,kick:5,kick:9]"
# gM' 0 1 "^78"
d2 $ g
+ $ novaOn "^75" (<| "k*8")
$ whenmod 32 24 (slow 2)
$ "~ s ~ s*<1 2 1 1>"
# "snare:21"
# gM' 0 1.1 "^79"
- # note (range "-4" 6 "^51")
-d3
- $ g
+ # note (range "-4" 12 "^51")
+d3 $ g
$ novaOn ("^76") (slice 8 (run 8) . (loopAt 1) . (>| "breaks165"))
$ "d*[8!3 <[8 . 8 4] [16 <4 16>]>]"
# "drum:2"
@@ -58,9 +58,8 @@ d4 $ g
# gM' 0.35 1.1 "^81"
# crush (range 10 3.13 "^53")
# legato 0.85
-d5
+d5 $ g
$ sometimesBy "<[f t!3]!1 t!7 f!24>" (# silence)
- $ g
$ whenmod 4 3 (slice 4 "0 1 2 2")
$ every' 4 2 (slice 4 "0 1 0 1")
$ whenmod 16 8 (chop 16)
@@ -68,19 +67,18 @@ d5
# room 0.4
# gM' 0 0.65 "^82"
# cut 5
-d6
- $ g
+d6 $ g
$ degradeBy (1 - "1 ^55!7")
+ $ novaOn "^59" (superimpose (|+ note 12))
$ juxBy 0.8 (rev . chop 2)
- $ superimpose (|+ note 12)
$ note (scale "lydian" "<1!3 4> . [1 2] <1 4 4 4>")
# "FMRhodes2"
# octave 4
- # gM' 0.3 0.75 "^83"
+ # gM' 0.3 0.85 "^83"
d7
$ mask "<f!24 t!8>"
$ "~ clap"
- # gM' 0 1 "^55"
+ # gM' 0 1 "^84"
# dry 0.99 # room 0
# note (-2)
d8
@@ -88,18 +86,19 @@ d8
$ mask "<f!32 t!32>"
$ slice 8 ("~ <0 0 1 <1 2>>") $ "methbass:2"
# pan 0.8 # room 0.2
- # gain ((range 0 1.3 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine))
-d9
+ # gain ((range 0 1.5 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine))
+d9 $ g
$ "<[~ ~ ~ w] w(3,8) w(5,8)>"
# "wobble:1"
# gain ((range 0 1.5 "^56" * "^77") * (slow 16 $ range 0.6 0.9 saw))
- # hpf 200
# pan 0.8
# room 0.2
# cut 21
+
+
do
setcps (120/60/4)
d1
@@ -204,3 +203,5 @@ d5
$ "c*<1 <<2 4> [8 4]>>" # "choir:3"
# gain 1
# cut 5
+
+d10 $ ""
diff --git a/live/midi/nova/dnb/MethBass.tidal b/live/midi/nova/dnb/MethBass.tidal
index e86a398..df1d070 100644
--- a/live/midi/nova/dnb/MethBass.tidal
+++ b/live/midi/nova/dnb/MethBass.tidal
@@ -32,7 +32,7 @@ setcps (160/60/4)
d1 $ g
-- $ mask "<f!4 t!16 t!3 f f!4 t f!2 t!2>"
$ novaOn "^42" (<| "k k k k")
- $ novaOff "^42" (<| "k . ~ k ~ ~")
+ -- $ novaOff "^42" (<| "k . ~ k ~ ~")
$ "[reverbkick,kick:5,kick:9]"
# gM' 0 1 "^78"
d2 $ g
diff --git a/live/midi/nova/dnb/prepabass.tidal b/live/midi/nova/dnb/prepabass.tidal
index c0a942c..0a64d92 100644
--- a/live/midi/nova/dnb/prepabass.tidal
+++ b/live/midi/nova/dnb/prepabass.tidal
@@ -14,9 +14,9 @@ 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 = (sometimesBy ch pat)
-let novaOff ch pat = sometimesBy (1 - ch) (pat)
-let novaIf ch patIf patElse = (sometimesBy ch (>| patIf) patElse)
+let novaOn ch pat = (someCyclesBy ch pat)
+let novaOff ch pat = someCyclesBy (1 - ch) (pat)
+let novaIf ch patIf patElse = (someCyclesBy ch (>| patIf) patElse)
-- endregion Nova Utils
let gDelayD = (# delay (range 0 5 "^13"))
let gDelayFB = (# delayfb (range 0 0.9 "^14"))
@@ -25,19 +25,18 @@ let gSize = (|+ size (min 0 (range "-0.5" 0.5 "^29")))
let gDelay = (gDelayD . gDelayFB . (# delayt 0.25) . (# orbit 2))
let g = (gDJF . gRoom)
let chords = "<d3'min d3'maj>"
-setcps (165/60/4) -- keep it between 110-190 BPM. You won't be sorry you did.
--- resetCycles
+setcps (165/60/4)
let modIndex = pF "modIndex" -- 0.2
let mel = "4(<1 2>,2) 5*[1|2|4] 6 7"
-resetCycles
+-- resetCycles
d1 $ g
- $ mask "<f!24 t!104>"
+ $ novaOn "^41" (mask "<f!24 t!104>")
-- $ mask "f"
$ "k . ~ k ~ ~"
# "[jazz,tech:5]"
# gM' 0 2 "^78"
d2 $ g -- Snare
- $ mask "<f!24 t!104>"
+ $ novaOn "^41" (mask "<f!24 t!104>")
-- $ mask "f"
-- $ fast 2
$ novaOn ("^43") --BOUTON NASSIM
@@ -51,7 +50,7 @@ d2 $ g -- Snare
# gM' 0 1.8 "^79"
# pan 0.6
d5 $ g -- Hats
- $ mask "<f!16 t!16>"
+ $ novaOn "^41" (mask "<f!16 t!16>")
$ novaOn "^44" (fast 2)
$ novaOn "^76" (slow 2)
$ slow 2
@@ -59,14 +58,14 @@ d5 $ g -- Hats
# pan 0.6
# gM' 0 2.5 "^80"
d3 $ g -- BASSLINE
- $ mask "<f!8 t!120>"
+ $ novaOn "^41" (mask "<f!8 t!120>")
$ loopAt 2
$ note (scale "aeolian" $ mel)
- # crush (range 16 5 "^53")
# "bassWarsaw"
# pan 0.2
# octave 2
# cut 3
+ # crush (range 16 5 "^53")
# gM' 0.8 1.8 "^81"
d4 $ g
$ whenmod 16 8 (fast 2 . rev)
@@ -77,7 +76,7 @@ d4 $ g
# gM' 0 1.8 ("^82" * (range 1 0.9 "^54"))
d6 $ g -- ABS BASS!
-- $ mask "<f!16 t!16>"
- $ mask "t*4 . <[t f t f] <f [f t]>>"
+ $ novaOn "^41" (mask "t*4 . <[t f t f] <f [f t]>>")
$ "abstract:1" # cut 6
# gain (range 0.2 0.95 "^84")
d7
diff --git a/live/midi/nova/instruments/scratchomatic.tidal b/live/midi/nova/instruments/scratchomatic.tidal
index 7d1710a..3c3fdaf 100644
--- a/live/midi/nova/instruments/scratchomatic.tidal
+++ b/live/midi/nova/instruments/scratchomatic.tidal
@@ -1,4 +1,3 @@
-
do
let gF = 1.5
let gG a = (gain (gF * a)) -- gain Global
@@ -36,7 +35,8 @@ d2 -- moineau!
# gR 0 2 "^78"
# pan 0.3
d3 $ g -- nass
- $ struct "~ t ~ <t!4 [t . <~ t> <~ ~ t t>]!4>"
+ $ novaOn "^75" (struct "t(5,8)")
+ $ novaOff "^75" (struct "t(3,8)")
$ "nass"
# speed (range 0.5 1.5 "^31")
# attack (range 0.125 0.5 "^51")
diff --git a/live/midi/nova/lounge/invoque_ete.tidal b/live/midi/nova/lounge/invoque_ete.tidal
index 3dcbde8..43b78ef 100644
--- a/live/midi/nova/lounge/invoque_ete.tidal
+++ b/live/midi/nova/lounge/invoque_ete.tidal
@@ -72,7 +72,7 @@ d8 $ g
)
. superimpose (
arp "up"
- . (|+ note 12)
+ . (|+ note "[12,-12]")
. (|* gain 0.9)
. (|- pan 0.25)
))
diff --git a/live/midi/nova/party/funk_angel_frappe.tidal b/live/midi/nova/party/funk_angel_frappe.tidal
index bca7117..d4a8a35 100644
--- a/live/midi/nova/party/funk_angel_frappe.tidal
+++ b/live/midi/nova/party/funk_angel_frappe.tidal
@@ -42,8 +42,8 @@ d8 $ g -- Hats
# pan (slow 16 $ range 0.4 0.6 saw)
# gM' 0 1.35 "^80"
d4 -- RESONANT BASSLINE
- $ (# lpq (range 0 0.8 "^53"))
- $ (# lpf (slow 32 $ min 10000 (range 500 15000 sine)))
+ -- $ (# lpq (range 0 0.8 "^53"))
+ -- $ (# lpf (slow 32 $ min 10000 (range 500 15000 sine)))
$ g
$ novaOn "^81" (slow "2 . 2 <1!3 0.5>")
$ whenmod 16 12 (
@@ -72,4 +72,4 @@ d7 $ g -- Fill drums
$ "ffills:7"
# cut 7
# pan 0.6
- # gM' 0 0.9 "^80"
+ # gM' 0 1.5 "^83"
--
libgit2 0.27.0