Commit a1e860a1 by PLN (Algolia)

chore: save before claude

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