Commit a1e860a1 by PLN (Algolia)

chore: save before claude

parent 9ad43e8f
...@@ -32,7 +32,7 @@ do ...@@ -32,7 +32,7 @@ do
d4 -- COMETE d4 -- COMETE
$ mask "<f!8 t!8 [f t]!8>" $ mask "<f!8 t!8 [f t]!8>"
$ s "m(<3!3 <5 1>>,8)" $ s "m(<3!3 <5 1>>,8)"
# s "methbass:3" # s "meth_bass:3"
# lpf (slow 16 $ range 200 5000 isaw) # lpf (slow 16 $ range 200 5000 isaw)
# begin (slow 8 $ "<0 0.25 0.75>") # begin (slow 8 $ "<0 0.25 0.75>")
# end 0.85 # end 0.85
......
...@@ -41,7 +41,7 @@ do ...@@ -41,7 +41,7 @@ do
-- Lead: Comete! -- Lead: Comete!
d2 d2
-- $ whenmod 24 16 (|> gain 0) -- $ whenmod 24 16 (|> gain 0)
$ "methbass:10" $ "meth_bass:10"
# gain (slow 60 $ range (gCom - 0.15) gCom sine) # gain (slow 60 $ range (gCom - 0.15) gCom sine)
# note (slow 2 $ "<0 0 8 [8 10]>") # note (slow 2 $ "<0 0 8 [8 10]>")
-- Alerte! -- Alerte!
......
...@@ -50,7 +50,7 @@ do ...@@ -50,7 +50,7 @@ do
$ note (scale "major" ( $ note (scale "major" (
"<0!4 -2!2 0!2>" "<0!4 -2!2 0!2>"
-- "0" -- "0"
)) # "methbass:3" # gain 0.6 )) # "meth_bass:3" # gain 0.6
# begin 0.7 # end 0.8 # legato 2 # begin 0.7 # end 0.8 # legato 2
# cut 8 # lpf 200 # cut 8 # lpf 200
......
setcps 0.5 setcps 0.5
once $ s "methbass" # n 6 once $ s "meth_bass" # n 6
d1 $ fast 4 $ s "kick:5" # lpf 200 # gain 0.8 d1 $ fast 4 $ s "kick:5" # lpf 200 # gain 0.8
......
...@@ -15,21 +15,24 @@ ...@@ -15,21 +15,24 @@
-- there too, or delete it here. -- there too, or delete it here.
-- ===================================================================== -- =====================================================================
-- #21 — SAFE global filters (gF). The footgun: `djfbus` is NOT a -- #21, #48 — SAFE-AT-CENTRE bidirectional DJ filters (gF). Corrected
-- registered SuperDirt effect, and the fader CC rests at 0 → the old -- 2026-07-27 mid-rehearsal: these three knobs (C1/C2/C3, CC49/50/51)
-- gF1/2/3 sent an extreme value into a missing bus → sound muted with -- are DJ-mixer-style filters — centre = no filtering, sweep down =
-- no way back. Fix: use CORE params (hpf/lpf, always available) mapped -- low-pass closing in (subbass only), sweep up = high-pass climbing
-- so REST (fader down = 0) == BYPASS. Untouched = no effect, ever. -- (superhigh only). The 2026-07-25 fix made rest(0)=bypass but only as
-- Push a fader up → the filter sweeps in. Cannot mute you. -- two separate one-directional controls; this makes each knob its own
-- full bidirectional sweep, safe AT THE CENTRE instead of at 0 (an
-- untouched knob's rest position ≈ centre detent, so this is still the
-- same "untouched = no effect, ever" guarantee from #21, just recentred).
-- ===================================================================== -- =====================================================================
:{ :{
let gHPF ch = (# hpf (range 20 8000 ch)) -- fader up ⇒ high-pass climbs; rest(0)=hpf 20 ≈ open let gDJF ch = (# lpf (range 180 20000 (fmap (\v -> 1 - 2 * max 0 (0.5 - v)) ch))
gLPF ch = (# lpf (range 20000 180 ch)) -- fader up ⇒ low-pass closes; rest(0)=lpf 20k ≈ open # hpf (range 20 8000 (fmap (\v -> 2 * max 0 (v - 0.5)) ch)))
gF1 = gHPF "^49" -- CC49 fader = high-pass build (tension riser) gF1 = gDJF "^49" -- knob C1 = DJ filter (centre=open, left=lpf/subbass, right=hpf/superhigh)
gF2 = gLPF "^50" -- CC50 fader = low-pass sweep (muffle/drop) gF2 = gDJF "^50" -- knob C2 = DJ filter, same shape
gF3 = id -- CC51 spare, held safe (id = never touches sound) gF3 = gDJF "^51" -- knob C3 = DJ filter, same shape
:} :}
-- try: d1 $ gF1 $ sound "bd*4" then sweep fader 49 — no dropout at rest. -- try: d1 $ gF1 $ sound "bd*4" then sweep knob 49 both ways — bypass at centre.
-- (Old broken form was: gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) — do not use.) -- (Old broken form was: gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) — do not use.)
......
...@@ -75,7 +75,7 @@ d5 $ g ...@@ -75,7 +75,7 @@ d5 $ g
once once
$ "methbass:2" $ "meth_bass:2"
# speed "0.90" # speed "0.90"
# gain (slow 8 $ range 0.85 0.95 sine) # gain (slow 8 $ range 0.85 0.95 sine)
# cut 1 # cut 1
...@@ -121,7 +121,7 @@ d7 ...@@ -121,7 +121,7 @@ d7
d8 d8
$ g $ g
$ mask "<f!32 t!32>" $ mask "<f!32 t!32>"
$ slice 8 ("~ <0 0 1 <1 2>>") $ "methbass:2" $ slice 8 ("~ <0 0 1 <1 2>>") $ "meth_bass:2"
# pan 0.8 # room 0.2 # pan 0.8 # room 0.2
# gain ((range 0 1.5 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine)) # gain ((range 0 1.5 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine))
d9 $ g d9 $ g
...@@ -135,7 +135,7 @@ d9 $ g ...@@ -135,7 +135,7 @@ d9 $ g
once $ "ffills:0" # gain 0.8 once $ "ffills:0" # gain 0.8
once $ "methbass" # gain 0.85 # cut 1 once $ "meth_bass" # gain 0.85 # cut 1
......
...@@ -46,7 +46,7 @@ d3 ...@@ -46,7 +46,7 @@ d3
$ g $ g
$ novaOn "^44" (chop 16) $ novaOn "^44" (chop 16)
$ slow (slow 2 "<1 2 2 4 4 8 8 8>") $ slow (slow 2 "<1 2 2 4 4 8 8 8>")
$ "methbass:2" $ "meth_bass:2"
# cut 1 # cut 1
# gM' 0.3 1 "^80" # gM' 0.3 1 "^80"
d4 d4
...@@ -69,9 +69,9 @@ d7 $ g ...@@ -69,9 +69,9 @@ d7 $ g
# note (-2) # note (-2)
-- region SANDBOX -- region SANDBOX
once $ "methbass:3" # cut 1 # gain 0.8 -- Comete once $ "meth_bass:3" # cut 1 # gain 0.8 -- Comete
once $ "methbass:4" # cut 1 # gain 0 -- ALERTE once $ "meth_bass:4" # cut 1 # gain 0 -- ALERTE
d3 d3
$ g $ g
...@@ -103,7 +103,7 @@ d5 ...@@ -103,7 +103,7 @@ d5
d8 d8
$ g $ g
$ mask "<f!32 t!32>" $ mask "<f!32 t!32>"
$ slice 8 ("~ <0 0 1 <1 2>>") $ "methbass:2" $ slice 8 ("~ <0 0 1 <1 2>>") $ "meth_bass:2"
# pan 0.8 # room 0.2 # pan 0.8 # room 0.2
# gain ((range 0 1.3 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine)) # gain ((range 0 1.3 "^56"* "^77") * (slow 16 $ range 0.45 0.65 sine))
d9 d9
......
...@@ -75,7 +75,7 @@ do ...@@ -75,7 +75,7 @@ do
once once
$ "methbass" $ "meth_bass"
# speed 0.20 # speed 0.20
# gain 0.65 # gain 0.65
# cut 21 # cut 21
......
once $ "methbass:2" # cut 1 # gain 1 -- JUMP once $ "meth_bass:2" # cut 1 # gain 1 -- JUMP
once $ "methbass:3" # cut 1 # gain 0 -- Comete once $ "meth_bass:3" # cut 1 # gain 0 -- Comete
once $ "methbass:4" # cut 1 # gain 0 -- ALERTE once $ "meth_bass:4" # cut 1 # gain 0 -- ALERTE
resetCycles resetCycles
......
...@@ -76,7 +76,7 @@ d2 ...@@ -76,7 +76,7 @@ d2
# detune 0.02 -- slight detune for thickness # detune 0.02 -- slight detune for thickness
-- Map Launch Control knobs to key parameters -- Map Launch Control knobs to key parameters
d1 $ n "c3 ef3 g3 bf3" d1 $ n "c3 ef3 g3 bf3"
# s "gfunkLead" # s "gfunk_lead"
# cutoff (cc 1 * 3000 + 500) -- Knob 1: Filter cutoff # cutoff (cc 1 * 3000 + 500) -- Knob 1: Filter cutoff
# resonance (cc 2 * 0.6 + 0.1) -- Knob 2: Resonance # resonance (cc 2 * 0.6 + 0.1) -- Knob 2: Resonance
# lagLev (cc 3 * 0.15 + 0.01) -- Knob 3: Portamento time # lagLev (cc 3 * 0.15 + 0.01) -- Knob 3: Portamento time
......
...@@ -52,6 +52,7 @@ d5 $ gF3 $ gM3 -- GUITARE DU DJ ...@@ -52,6 +52,7 @@ d5 $ gF3 $ gM3 -- GUITARE DU DJ
$ slow "<1 2 ~ <2 ~>>" $ n "9" $ slow "<1 2 ~ <2 ~>>" $ n "9"
# "diams_dj" # "diams_dj"
# cut 5 # gain 1.5 # cut 5 # gain 1.5
# octerbus 52 (range 0 0.95 "^34")
# crushbus 51 (range 16 4.5 "^54") # crushbus 51 (range 16 4.5 "^54")
-- # room 0.3 # sz 0.6 # dry 0.4 -- # room 0.3 # sz 0.6 # dry 0.4
-- # octer 0.8 # octersub 1.2 -- # octer 0.8 # octersub 1.2
......
...@@ -28,9 +28,9 @@ $ s "bassWarsaw" ...@@ -28,9 +28,9 @@ $ s "bassWarsaw"
d5 d5
$ chop 8 $ chop 8
$ s "methbass:2" $ s "meth_bass:2"
# speed "<2!3 4>" # speed "<2!3 4>"
# cut 5 # cut 5
# gain 0.8 # gain 0.8
d6 $ s "~ ~ s ~" # s "methbass:10" d6 $ s "~ ~ s ~" # s "meth_bass:10"
...@@ -85,7 +85,7 @@ do ...@@ -85,7 +85,7 @@ do
# gain 0.85 # gain 0.85
d6 -- Comete d6 -- Comete
$ slice 8 "1!7 4" $ slice 8 "1!7 4"
$ s "methbass:3" # cut 6 $ s "meth_bass:3" # cut 6
# gain 0.55 # gain 0.55
-- # djf fGlob -- # djf fGlob
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment