Commit eb9221de by PLN (Algolia)

feat: cosmicfest prep

PLN's set work for CosmicFest, plus one new track and three mechanical fixes
found by the pre-gig gate.

His edits, across 23 tracks: the ^43/^44 -> ^41 control migration continued by
hand (37857225 retired gMask and freed ^41 for d1's gate), and real musical work
alongside it — a `resetCycles` head on rose_rouge, new `octersubbus` and
`squizbus` sends, a `slow 2 $ ply 2` rework of rose_rouge's ^54 line,
gain/lpf/room adjustments, and sample swaps (`n "74"` -> `n "25"` on the Savoy
break). New track: live/midi/nova/techno/livecode_parade.tidal.

Three fixes from the gate, none of which move a control number, so nothing
changes under his hands:

* mute map — d10 in something_about_drums declared gM2; the authored map
  (tools/lcxl_grid.py) puts d4-d12 on gM3. fix-mute-roles.py --apply, then
  re-run to confirm it converged to 0.
* crushbus 101 in ouais_je_funk was shared by d9 and d10, with DIFFERENT ranges
  (16->1.5 and 16->6) landing on one bus instance — last event wins, so the
  knob turned for one orbit was heard on the other. d9 moved to its own 91 per
  the <orbit><slot> convention.
* crushbus 41 in ghosts_in_the_toilets was shared by d4 and d7 the same way.
  d7 moved to 71.

pvlint goes 4 errors -> 0 on the setlist.

NOT included, deliberately: the remaining 20 column moves (ghosts 10,
something_about_drums 7, perfect 2, the_revolution 1). PLN: "migration i
unfinishe dgrrr lets not finish it before set for now." Renumbering which
physical knob does what in four tracks he plays tomorrow is a muscle-memory
change, not a safety fix, and two of the moves cannot resolve mechanically
anyway (one overflow -> gSel, one FIXME with no slot). gig-up stays honestly
red on `surface grid intact` until it is finished after the gig.
parent cb5a625a
...@@ -8,8 +8,8 @@ setcps (120/60/4) ...@@ -8,8 +8,8 @@ setcps (120/60/4)
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
-- $ mask "t t t f" -- $ mask "t t t f"
$ midiOn "^42" (struct "t t t*<1!6 2 1> t*<1!7 2>") $ midiOn "^41" (struct "t t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>") $ midiOff "^41" (struct "t . ~ t ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [ $ stack [
"kick" # lpf 10000 # cut 1, "kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3 "rumble" |* gain 1.3
...@@ -21,8 +21,8 @@ d1 $ gF1 $ gM1 ...@@ -21,8 +21,8 @@ d1 $ gF1 $ gM1
# gain 1.4 # gain 1.4
# cps ((range 60 180 "^29")/60/4) # cps ((range 60 180 "^29")/60/4)
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^43" (<|"~ s ~ s*<1 2>") $ midiOn "^42" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s") $ midiOff "^42" (<| "~ s")
$ "[snare:24]" $ "[snare:24]"
# gain 1.4 # gain 1.4
d3 $ gF1 $ gM2 -- Cymbales sol d3 $ gF1 $ gM2 -- Cymbales sol
...@@ -58,7 +58,7 @@ d5 $ gF3 $ gM3 -- Piano nostalgique, temps inexorable ...@@ -58,7 +58,7 @@ d5 $ gF3 $ gM3 -- Piano nostalgique, temps inexorable
# crushbus 51 (range 16 2.7 "^54") # crushbus 51 (range 16 2.7 "^54")
# room 0.4 # room 0.4
# gain 1.3 # gain 1.3
d6 $ gF1 $ gM3 $ chop 8 -- Je t'avais oublie toi <3 d6 $ gF1 $ gM2 $ chop 8 -- Je t'avais oublie toi <3
$ loopAt 1 $ loopAt 1
-- Je t'oublie trop souvent :( -- Je t'oublie trop souvent :(
$ "breaks165" $ "breaks165"
...@@ -87,7 +87,7 @@ d11 $ gM3 $ gF3-- Intro doux piano ...@@ -87,7 +87,7 @@ d11 $ gM3 $ gF3-- Intro doux piano
$ "nujazz_keys120:35/4" $ "nujazz_keys120:35/4"
# cut 11 # cut 11
# room 0.7 # sz 0.7 # dry 1 # room 0.7 # sz 0.7 # dry 1
# delaybus 111 "^30" # delaybus 111 "^30"
# delayt ("<2!3 3>"/3) # delayt ("<2!3 3>"/3)
# delayfb 0.5 # delayfb 0.5
# gain 1.3 # gain 1.3
......
...@@ -64,7 +64,7 @@ d7 $ gF2 $ gM3 -- ACID BASS TODO REWORK WITH RAPH ...@@ -64,7 +64,7 @@ d7 $ gF2 $ gM3 -- ACID BASS TODO REWORK WITH RAPH
-- , -- ,
"" ""
] ]
# crushbus 41 (range 16 1 "^53") # crushbus 71 (range 16 1 "^53")
-- # legato 1 -- # legato 1
# legato (range 0.39 0.7 (1 - "^17")) # legato (range 0.39 0.7 (1 - "^17"))
>| note ("[e gs e fs gs e fs e]*2" >| note ("[e gs e fs gs e fs e]*2"
......
...@@ -4,8 +4,8 @@ do ...@@ -4,8 +4,8 @@ do
-- resetCycles -- resetCycles
setcps(124/60/4) setcps(124/60/4)
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>") $ midiOn "^41" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k . ~ <~!4 k!12> ~ ~") $ midiOff "^41" (<| "k . ~ <~!4 k!12> ~ ~")
$ fix ((# lpf 1400)) "kick:4" $ fix ((# lpf 1400)) "kick:4"
-- $ "[techno:0,kick:4]" -- $ "[techno:0,kick:4]"
$ "jazz" $ "jazz"
...@@ -13,8 +13,8 @@ d1 $ gF1 $ gM1 ...@@ -13,8 +13,8 @@ d1 $ gF1 $ gM1
# room 0.2 # room 0.2
# dry 1 # dry 1
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^43" (<| "~ c ~ c*<1!3 2>") $ midiOn "^42" (<| "~ c ~ c*<1!3 2>")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>") $ midiOff "^42" (<| "~ . ~ c*<1!3 <2!3 4>>")
-- $ "[rampleM2:12,rampleD3:1,rampleD4:1]" -- $ "[rampleM2:12,rampleD3:1,rampleD4:1]"
$ "[snare:10,snare:20]" $ "[snare:10,snare:20]"
-- # note "-4" -- # note "-4"
...@@ -24,8 +24,8 @@ d2 $ gF1 $ gM2 ...@@ -24,8 +24,8 @@ d2 $ gF1 $ gM2
# rel (slow 16 $ range 0.6 0.2 saw) # rel (slow 16 $ range 0.6 0.2 saw)
d3 $ gF1 $ gM2 -- Highest hats d3 $ gF1 $ gM2 -- Highest hats
$ whenmod 32 16 (swingBy (slow 16 $ range 0.08 0.01 saw) 4) $ whenmod 32 16 (swingBy (slow 16 $ range 0.08 0.01 saw) 4)
$ midiOn "^44" (off "s" id) $ midiOn "^43" (off "s" id)
$ midiOn "^76" (ply "<2!2 4 8>") $ midiOn "^75" (ply "<2!2 4 8>")
$ fix (# legato 0.25) "rampleD2:3" $ fix (# legato 0.25) "rampleD2:3"
$ "~ h ~ h ~ h*<1 2> ~ h*<1!3 2>" $ "~ h ~ h ~ h*<1 2> ~ h*<1!3 2>"
# "rampleD2:2!6 <rampleD2:2!3 rampleD2:3> rampleD2:3" # "rampleD2:2!6 <rampleD2:2!3 rampleD2:3> rampleD2:3"
......
...@@ -28,11 +28,10 @@ d3 $ gF1 $ gM2 -- OH/CY: Subtle offbeat hats, ^44 morphs to cymbal shimmer ...@@ -28,11 +28,10 @@ d3 $ gF1 $ gM2 -- OH/CY: Subtle offbeat hats, ^44 morphs to cymbal shimmer
-- (|* gain 0.94) . (# legato 0.2) . (# "h2ogmcy:1") . (# hpf 5000) -- (|* gain 0.94) . (# legato 0.2) . (# "h2ogmcy:1") . (# hpf 5000)
-- ) -- )
-- -- $ midiOff "^44" (mask "t(3,8)") -- OFF: sparse euclidean (subtle) -- -- $ midiOff "^44" (mask "t(3,8)") -- OFF: sparse euclidean (subtle)
$ sometimesBy "^31" (ply "<2!3 [2 4]>") -- ^32: roll probability
$ "~ h ~ h ~ h ~ <h!3 h*2>" -- offbeat pattern with flourish $ "~ h ~ h ~ h ~ <h!3 h*2>" -- offbeat pattern with flourish
# "h2ogmhh" # "h2ogmhh"
# n "~ 3 ~ 2 ~ 4 ~ <3!3 [3 6]>" -- varying openness per hit # n "~ 3 ~ 2 ~ 4 ~ <3!3 [3 6]>" -- varying openness per hit
# legato (range 0.05 0.9 "^18") -- ^52: tightness # legato (range 0.05 0.9 "^31") -- ^52: tightness
# cut "~ 3 ~ 3 ~ 3 ~ <3!3 [3 0]>" -- last hit: cut 0 = rings over bar boundary # cut "~ 3 ~ 3 ~ 3 ~ <3!3 [3 0]>" -- last hit: cut 0 = rings over bar boundary
# room (slow 32 $ range 0.2 0.45 saw) -- 32-bar: space grows (NOT dry!) # room (slow 32 $ range 0.2 0.45 saw) -- 32-bar: space grows (NOT dry!)
# sz (slow 32 $ range 0.1 0.3 saw) -- 32-bar: tail lengthens # sz (slow 32 $ range 0.1 0.3 saw) -- 32-bar: tail lengthens
...@@ -63,7 +62,7 @@ d4 $ gF2 $ gM3 -- BASS (the FIXME): D minor, grounded in measured key (corr=0.90 ...@@ -63,7 +62,7 @@ d4 $ gF2 $ gM3 -- BASS (the FIXME): D minor, grounded in measured key (corr=0.90
-- # lpf (range 300 1800 "^32") # resonance 0.2 -- # lpf (range 300 1800 "^32") # resonance 0.2
-- |* gain ("1@5 0.94 0.98 0.92" * 1.15) -- |* gain ("1@5 0.94 0.98 0.92" * 1.15)
d4 $ gF2 $ gM3 -- Claude's Gesture d4 $ gF2 $ gM3 -- Claude's Gesture
$ midiOn "^45" (# crush 6) -- $ (off 0.5 id)
$ (0.125 <~) $ (0.125 <~)
-- midiOn/midiOff take a FUNCTION (BootTidal:391 — someCyclesBy), so the note -- midiOn/midiOff take a FUNCTION (BootTidal:391 — someCyclesBy), so the note
-- pattern goes in a LEFT section of `#`: note supplies the rhythm, bassWarsaw -- pattern goes in a LEFT section of `#`: note supplies the rhythm, bassWarsaw
...@@ -98,9 +97,9 @@ d5 $ gF3 $ gM3 -- Piano Desirable show ...@@ -98,9 +97,9 @@ d5 $ gF3 $ gM3 -- Piano Desirable show
# delayt 1 # delayfb 0.3 # delayt 1 # delayfb 0.3
# gain 1.3 # gain 1.3
d9 $ gF2 $ gM3 -- Announcing SYNTH d9 $ gF2 $ gM3 -- Announcing SYNTH
$ superimpose ( -- $ superimpose (
((|* gain (range 0 1.5 "^17"))) . -- A5 = d9's effect (was ^19, shared with d7 below) -- ((|* gain (range 0 1.5 "^17"))) . -- A5 = d9's effect (was ^19, shared with `d7` below)
(# n 5) . (# cut 91)) -- (# n 5) . (# cut 91))
$ "desire_synth/2" # "desire" $ "desire_synth/2" # "desire"
# n "<0>" # n "<0>"
# cut 9 -- SYNTH # cut 9 -- SYNTH
...@@ -113,6 +112,7 @@ d7 $ gF3 $ gM3 -- Voices FIXME order of voices? not sure which is what atm ahah ...@@ -113,6 +112,7 @@ d7 $ gF3 $ gM3 -- Voices FIXME order of voices? not sure which is what atm ahah
$ fix ((6/8) ~>) (n 6) $ fix ((6/8) ~>) (n 6)
$ fix ((1/8) ~>) (n 9) $ fix ((1/8) ~>) (n 9)
$ fix ((5/8) <~) (n "[11,12]") $ fix ((5/8) <~) (n "[11,12]")
$ fix ((5/8) <~) (n "10")
$ slow 2 $ slow 2
-- FIXME(#54) the one-knob link is gone: ^19 used to drive this NANANA *and* d9's gain -- FIXME(#54) the one-knob link is gone: ^19 used to drive this NANANA *and* d9's gain
-- swell together. d9 now has its own A5 (^17), so they are two gestures. Parked, not -- swell together. d9 now has its own A5 (^17), so they are two gestures. Parked, not
......
...@@ -3,16 +3,16 @@ do ...@@ -3,16 +3,16 @@ do
setcps (140/60/4) setcps (140/60/4)
-- d1 $ gF1 $ gM2 -- d1 $ gF1 $ gM2
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
-- $ midiOff "^42" (<| "<k [~!7 k*<1 2>]>") -- $ midiOff "^41" (<| "<k [~!7 k*<1 2>]>")
$ midiOff "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>") $ midiOff "^41" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
$ midiOn "^42" (<| "k k . k <k [~ k] k k*2>") $ midiOn "^41" (<| "k k . k <k [~ k] k k*2>")
$ "[kick:5,clubkick]" $ "[kick:5,clubkick]"
# room 0.2 # dry 1.1 # room 0.2 # dry 1.1
# lpf 3000 -- TODO Sound design this kick <3 # lpf 3000 -- TODO Sound design this kick <3
# cut 1 # cut 1
# gain 1.6 # gain 1.6
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^43" (fast 2) $ midiOn "^42" (fast 2)
$ someCyclesBy "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>") $ someCyclesBy "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>")
$ someCyclesBy "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>") $ someCyclesBy "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>")
$ "[snare:24,snare:51]" $ "[snare:24,snare:51]"
...@@ -26,7 +26,7 @@ d3 $ gF1 $ gM2 ...@@ -26,7 +26,7 @@ d3 $ gF1 $ gM2
# pan "0.2 0.8" # pan "0.2 0.8"
# drumFrom "rolandtr909" "hh:2" # cut 3 # drumFrom "rolandtr909" "hh:2" # cut 3
# gain 1.3 # gain 1.3
# legato (range 0.05 0.9 "^32") # legato (range 0.05 0.9 "^31")
d9 -- Bogdan the Grime sample provider d9 -- Bogdan the Grime sample provider
$ whenmod 16 12 ( -- I'm from Cardiff! $ whenmod 16 12 ( -- I'm from Cardiff!
(# "bogdan_grime:1") . (# begin "<0!3 0.25>") . (# end "<0.5!3 0.25>") (# "bogdan_grime:1") . (# begin "<0!3 0.25>") . (# end "<0.5!3 0.25>")
......
...@@ -25,7 +25,7 @@ d3 $ gF1 $ gM2 ...@@ -25,7 +25,7 @@ d3 $ gF1 $ gM2
# sz 0.4 # sz 0.4
d4 $ gF2 $ gM3 d4 $ gF2 $ gM3
$ midiOn "^44" (struct "t . t(<1 3 5>,8)") $ midiOn "^44" (struct "t . t(<1 3 5>,8)")
$ midiOn "^76" (struct "t . t(<1 3 5>,8)") $ midiOn "^76" (struct "t*16")
$ midiOff "^76" (struct "<t!3 t*[<4 8> [8 <8 16>]]>") $ midiOff "^76" (struct "<t!3 t*[<4 8> [8 <8 16>]]>")
$ note ( $ note (
"<bf2 bf2 bf2 [bf2@7 cs3]>" "<bf2 bf2 bf2 [bf2@7 cs3]>"
...@@ -39,6 +39,7 @@ d4 $ gF2 $ gM3 ...@@ -39,6 +39,7 @@ d4 $ gF2 $ gM3
# octerbus 42 (range 0 1.85 "^52") # octerbus 42 (range 0 1.85 "^52")
# room 0.2 # dry 1.2 # sz 0.7 # room 0.2 # dry 1.2 # sz 0.7
# gain 1.4 # gain 1.4
# cut 4
d5 $ gF3 $ gM3 -- LE PIMENT BRESILIEN d5 $ gF3 $ gM3 -- LE PIMENT BRESILIEN
$ midiOn "^89" (ply "<4!3 8>") $ midiOn "^89" (ply "<4!3 8>")
$ midiOn "^57" (striate "2" . chop 8) $ midiOn "^57" (striate "2" . chop 8)
...@@ -68,14 +69,14 @@ d7 $ gF3 $ gM3 ...@@ -68,14 +69,14 @@ d7 $ gF3 $ gM3
# modIndex (range 0 16 "^35") # modIndex (range 0 16 "^35")
# octersubbus 71 (range 0 2 "^55") # octersubbus 71 (range 0 2 "^55")
-- # cut 9 -- # cut 9
d10 $ gF3 $ gM3 -- Menace d9 $ gF3 $ gM3 -- Menace
$ note "<bf3 ~ ~ <~ <[~!7 b3] [f4 cs4 c4 cs4 f4 cs4 c4 cs4]>>>" $ note "<bf3 ~ ~ <~ <[~!7 b3] [f4 cs4 c4 cs4 f4 cs4 c4 cs4]>>>"
# "90s_synatm:10" # "90s_synatm:10"
# room 0.3 # sz 0.8 # room 0.3 # sz 0.8
# gain 2 # gain 2
# att 0.10 # att 0.10
# rel 10 # rel 10
# crushbus 101 (range 16 3.5 "^18") -- A6 = d10's effect (was ^14, now Ardour's d10 LEVEL) # crushbus 101 (range 16 3.5 "^17") -- A6 = d10's effect (was ^14, now Ardour's d10 LEVEL)
# legato 2 # legato 2
# octersub 1 # octersub 1
# cut 9 # cut 9
......
...@@ -4,27 +4,27 @@ setcps (170/60/4) ...@@ -4,27 +4,27 @@ setcps (170/60/4)
-- let gMute = (midiOn "^73" (mask "f*16")) -- let gMute = (midiOn "^73" (mask "f*16"))
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
d1 $ gF1 $ gM1 -- Kick d1 $ gF1 $ gM1 -- Kick
$ midiOn "^42" (<| "k k k k*<1!3 2>") $ midiOn "^41" (<| "k k k k*<1!3 2>")
$ midiOff "^42" (<| "k . ~ k ~ ~ ") $ midiOff "^41" (<| "k . ~ k ~ ~ ")
$ "[kick:4]" $ "[kick:4]"
# gain 1.2 # gain 1.2
d2 $ gF1 $ gM2 -- Snare melancolie fromagere d2 $ gF1 $ gM2 -- Snare melancolie fromagere
$ midiOff "^43" (<| "~ <s s <s!3 ~> <~!7 [~ s]>>") $ midiOff "^42" (<| "~ <s s <s!3 ~> <~!7 [~ s]>>")
$ midiOn "^43" (<| "~ s ~ s*<1!3 2>") $ midiOn "^42" (<| "~ s ~ s*<1!3 2>")
$ "[snare:39]" $ "[snare:39]"
# gain 1.45 # gain 1.45
d3 $ gF1 $ gM2 d3 $ gF1 $ gM2
$ midiOn "^44" (ply 2) $ midiOn "^43" (ply 2)
$ midiOn "^76" (ply 2) $ midiOn "^75" (ply 2)
$ "d*[16 <12 <16 [12 24]>> . 8]" # "dr" $ "d*[16 <12 <16 [12 24]>> . 8]" # "dr"
# gain 1.2 # gain 1.2
-- # midiG' "^80" 0 1 -- # midiG' "^80" 0 1
# room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw) # room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw)
d4 $ gF2 $ gM3 d4 $ gF2 $ gM3
$ fix (|* gain (range 1 0.5 ("^17" + "^35"))) "vec1_acid:11" $ fix (|* gain (range 1 0.5 ("^17" + "^35"))) "vec1_acid:11"
$ midiOn "^89" (struct "t(<3!3 [<3 8> <5!3 16>]>,8)") $ midiOn "^76" (struct "t(<3!3 [<3 8> <5!3 16>]>,8)")
$ superimpose ((|* gain "^17") . (# n 10) . (# legato 0.8)) $ superimpose ((|* gain "^16") . (# n 10) . (# legato 0.8))
$ superimpose ((|* gain "^33") . (# n 12) $ superimpose ((|* gain "^32") . (# n 12)
-- . (# cut 41) -- . (# cut 41)
) )
$ note ("d*<3 4 3 2> . ds ds df" $ note ("d*<3 4 3 2> . ds ds df"
...@@ -32,7 +32,7 @@ d4 $ gF2 $ gM3 ...@@ -32,7 +32,7 @@ d4 $ gF2 $ gM3
) )
# "vec1_acid:11" # "vec1_acid:11"
# room 0.5 # sz 0.5 # room 0.5 # sz 0.5
# crushbus 41 (range 16 1.5 "^53") # crushbus 41 (range 16 3.5 "^52")
-- d5 $ gF3 $ gM3 -- d5 $ gF3 $ gM3
d5 $ gF3 $ gM3 d5 $ gF3 $ gM3
$ superimpose ((# hpf 500) . (ply "<1!3 <2 4>>") $ superimpose ((# hpf 500) . (ply "<1!3 <2 4>>")
......
...@@ -15,6 +15,7 @@ d1 $ gF1 $ gM1 ...@@ -15,6 +15,7 @@ d1 $ gF1 $ gM1
# octersubsub 1.2 # octersubsub 1.2
# gain 2 # gain 2
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ whenmod 16 12 (fast "<2!2 4 [4 8]>")
$ midiOn "^42" (fast 2 . (<| "~ c ~ c*<1!7 <2 [4 2]>>")) $ midiOn "^42" (fast 2 . (<| "~ c ~ c*<1!7 <2 [4 2]>>"))
$ midiOff "^42" (<| "~ . ~ c") $ midiOff "^42" (<| "~ . ~ c")
$ "vec1_claps:18" $ "vec1_claps:18"
......
...@@ -12,7 +12,7 @@ d1 $ gF1 $ gM1 ...@@ -12,7 +12,7 @@ d1 $ gF1 $ gM1
-- $ fix ((# lpf 150) . (|* gain 0.93)) "kick:5" -- $ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
$ midiOn "^41" (<| "k k k <k <k*2 [k k k ~]>>") $ midiOn "^41" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOff "^41" (<| "k . ~ k ~ ~") $ midiOff "^41" (<| "k . ~ k ~ ~")
$ "[jazz]" $ "[kick:4]"
# gain 1.4 # gain 1.4
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^42" (<| "~ c ~ c*<1!3 <2 [2 4]>>") $ midiOn "^42" (<| "~ c ~ c*<1!3 <2 [2 4]>>")
......
...@@ -4,14 +4,14 @@ setcps (160/60/4) ...@@ -4,14 +4,14 @@ setcps (160/60/4)
-- let gMute = (midiOn "^73" (mask "f*16")) -- let gMute = (midiOn "^73" (mask "f*16"))
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
d1 $ gF1 $ gM1 -- Kick d1 $ gF1 $ gM1 -- Kick
$ midiOff "^42" (<| "k . ~ k ~ ~ ") $ midiOff "^41" (<| "k . ~ k ~ ~ ")
$ midiOn "^42" (<| "k k k <k <k*2 [~ k]>>") $ midiOn "^41" (<| "k k k <k <k*2 [~ k]>>")
$ "[bskick,jazz]" $ "[bskick,jazz]"
# gain 1.2 # gain 1.2
# gain 1.8 # gain 1.8
d2 $ gF1 $ gM2 -- Snare melancolie fromagere d2 $ gF1 $ gM2 -- Snare melancolie fromagere
$ midiOff "^43" (<| "~ <s s <s!3 ~> <~!7 [~ s]>>") $ midiOff "^42" (<| "~ <s s <s!3 ~> <~!7 [~ s]>>")
$ midiOn "^43" (<| "~ s ~ s*<1!3 2>") $ midiOn "^42" (<| "~ s ~ s*<1!3 2>")
$ "[drumtraks:9]" $ "[drumtraks:9]"
# gain 1.45 # gain 1.45
d3 $ gF1 $ gM2 d3 $ gF1 $ gM2
...@@ -79,8 +79,8 @@ d5 $ gF2 $ gM3 $ slow 2 -- V2 -- TODO : Feedback: reverb? un peu creux? ...@@ -79,8 +79,8 @@ d5 $ gF2 $ gM3 $ slow 2 -- V2 -- TODO : Feedback: reverb? un peu creux?
# room 0.4 # room 0.4
# gain 1.7 # gain 1.7
d8 $ gF1 $ gM2 d8 $ gF1 $ gM2
$ midiOn "^92" (ply "2 <2!3 4>")
$ midiOff "^60" (mask "f(4,8)" . chop 8) $ midiOff "^60" (mask "f(4,8)" . chop 8)
$ midiOn "^92" (ply 4)
$ midiOn "^36" (# "jungle_breaks:45") $ midiOn "^36" (# "jungle_breaks:45")
$ midiOn "^56" (# "jungle_breaks:30") $ midiOn "^56" (# "jungle_breaks:30")
$ iter "1 <1!4 4!4>" $ iter "1 <1!4 4!4>"
...@@ -96,8 +96,9 @@ d9 -- Alright Paris <3 ...@@ -96,8 +96,9 @@ d9 -- Alright Paris <3
# "movie_paris:14" # "movie_paris:14"
# cut 9 # cut 9
# gain 1.3 # gain 1.3
d10 d10 $ gF1 $ gM3
$ mask"<f!7 t>" $ mask"<f!3 t>"
$ "h2ogmcy:3" $ "h2ogmcy:3"
# gain 1.3 # room 0.4 # sz 0.8
once $ note "c5" # "superpiano" once $ note "c5" # "superpiano"
do do
-- resetCycles resetCycles
setcps (114/60/4) setcps (114/60/4)
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
$ sometimesBy "^29" (fast 2) $ sometimesBy "^29" (fast 2)
$ midiOn "^41" (<| "k k k k*2") $ midiOn "^41" (<| "k k k k*2")
$ midiOff "^41" (<| "k . k(3,8)") $ midiOff "^41" (<| "k . k(3,8)")
$ stack [ -- $ stack [
"kick:5" # gain 1.4 # lpf 200, -- character (KICK16, click+body) -- "kick:5" # gain 1.4 # lpf 200, -- character (KICK16, click+body)
"bd:5" # gain 1.0 # lpf 90 # hpf 25 -- sub thump (90% sub @ 43Hz) -- "bd:5" # gain 1.0 # lpf 90 # hpf 25 -- sub thump (90% sub @ 43Hz)
] -- ]
$ "jazz"
-- alt punchier replacement: "hardkick:5" (sub + 9% mid click, distorted) -- alt punchier replacement: "hardkick:5" (sub + 9% mid click, distorted)
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^42" (<| "~ <s!4 [~ s] s s s*2> ~ <s [s s*<1 2>]>") $ midiOn "^42" (<| "~ <s!4 [~ s] s s s*2> ~ <s [s s*<1 2>]>")
...@@ -34,6 +35,7 @@ d3 $ gF1 $ gM2 ...@@ -34,6 +35,7 @@ d3 $ gF1 $ gM2
# s "h2ogmhh" # s "h2ogmhh"
# gain 1.4 # gain 1.4
d4 $ gF2 $ gM3 d4 $ gF2 $ gM3
$ midiOn "^76" (striate "2 4")
$ midiOn "^44" (# n 3) $ midiOn "^44" (# n 3)
$ midiOff "^44" ( -- MONTEE $ midiOff "^44" ( -- MONTEE
whenmod 16 12 (# n "<[1 2] 2*2>")) whenmod 16 12 (# n "<[1 2] 2*2>"))
...@@ -42,8 +44,8 @@ d4 $ gF2 $ gM3 ...@@ -42,8 +44,8 @@ d4 $ gF2 $ gM3
# gain 1.4 # gain 1.4
-- # room 0.3 # sz 0.3 -- # room 0.3 # sz 0.3
-- # delay 0.6 # delayt 0.01 # delayfb 0.2 -- # delay 0.6 # delayt 0.01 # delayfb 0.2
# crushbus 41 (range 16 3.5 "^32") # crushbus 41 (range 16 3.5 "^52")
# bandf (range 50 1200 "^52") -- # bandf (range 50 1200 "^52")
d5 $ gF3 $ gM3 d5 $ gF3 $ gM3
$ slow 2 -- Adjusted to Sugar rhytm <3 $ slow 2 -- Adjusted to Sugar rhytm <3
$ midiOn "^89" (ply "<4!3 8>" . (# begin "0 <0 0.25> 0.5 0.5")) $ midiOn "^89" (ply "<4!3 8>" . (# begin "0 <0 0.25> 0.5 0.5"))
......
...@@ -39,13 +39,13 @@ d4 $ gF2 $ gM3 -- La Funky Bass ...@@ -39,13 +39,13 @@ d4 $ gF2 $ gM3 -- La Funky Bass
# octersubbus 42 (range 0 1.5 "^32") -- B4, PLN's ask: "32 a octersub maybe?" # octersubbus 42 (range 0 1.5 "^32") -- B4, PLN's ask: "32 a octersub maybe?"
# crushbus 41 (range 16 3.5 "^52") -- C4, PLN's ask: "d4 52 a crush?" # crushbus 41 (range 16 3.5 "^52") -- C4, PLN's ask: "d4 52 a crush?"
# gain 1.3 # gain 1.3
d9 $ gF3 $ gM3 d9 $ gF3 $ gM3 -- SynMenace
$ midiOn "^20" (superimpose ( $ midiOn "^20" (superimpose (
(# n "2") . (# cut 91) . (# room 0) . (|* gain 0.9)) (# n "2") . (# cut 91) . (# room 0) . (|* gain 0.9))
) )
$ note ("<b b b g>@7 <cs6!3 fs6>" - 12) $ note ("<b b b g>@7 <cs6!3 fs6>" - 12)
# "moog" # cut 9 # "moog" # cut 9
# crushbus 91 (range 16 1.5 "^19") # crushbus 91 (range 16 1.5 "^18")
# pan 0.8 # pan 0.8
d5 $ gF3 $ gM3 d5 $ gF3 $ gM3
$ midiOn "^89" (superimpose (("s" ~>) . (|+ note 12))) $ midiOn "^89" (superimpose (("s" ~>) . (|+ note 12)))
...@@ -77,21 +77,13 @@ d8 $ gF1 $ gM2 $ dMask -- BYOB: Bring your own Breaks ...@@ -77,21 +77,13 @@ d8 $ gF1 $ gM2 $ dMask -- BYOB: Bring your own Breaks
$ chop 4 $ chop 4
$ loopAt 1 $ "jungle_breaks:78" $ loopAt 1 $ "jungle_breaks:78"
# gain 1.4 # gain 1.4
d10 $ gF3 $ gM3 -- SynMenace -- #33: was `gF3 $ gF3`, so NOTHING could mute d10. d10 $ gF3 $ gM3
-- PLN 2026-08-02: "d10 scale up is shitty... the scale climb is irritating".
-- It was `iter "1 4"` over a stepwise run 0 1 2 3 3 4 5 6 — a SCALE, and a
-- scale played straight is an exercise, not a hook. Rewritten as a MOTIF:
-- leaps and rests instead of steps, so the ear hears a phrase repeat with
-- variation rather than a ladder.
-- SAFE AGAINST d4/d5 by construction: degrees 0/2/3/4/6 of A mixolydian are
-- A C# D E G — the notes of A7 plus the fourth. d5's acid line (b4 a4 g4 fs4
-- d5 cs5) and d11's arpeggio already live there, so nothing can clash.
$ whenmod 16 12 (fast 2 . (|+ note 12)) -- last 4 of every 16: an octave up, doubled $ whenmod 16 12 (fast 2 . (|+ note 12)) -- last 4 of every 16: an octave up, doubled
$ note ((scale "mixolydian" $ note ((scale "mixolydian"
"[~ 4] <6 4> [~ 0] <2 [3 2]> . [~ 4] <6 [4 6]> [~ 2] <0 ~>" "[~ 4] <6 4> [~ 0] <2 [3 2]> . [~ 4] <6 [4 6]> [~ 2] <0 ~>"
) + "a4") ) + "a4")
# s "giorgio_syn:5" # s "giorgio_syn:5"
# cut 10 # cut 9
# gain 1.4 # gain 1.4
# room 0.4 # sz 0.3 # dry 0.8 # room 0.4 # sz 0.3 # dry 0.8
-- TODO: FIND FRIENDS 10-12 -- TODO: FIND FRIENDS 10-12
......
...@@ -117,8 +117,7 @@ d12 ...@@ -117,8 +117,7 @@ d12
$ gF3 $ gM3 -- THE SLEEPWALKER $ gF3 $ gM3 -- THE SLEEPWALKER
$ slice 4 "<0 1 2 3>" $ slice 4 "<0 1 2 3>"
$ n (slow 8 $ "<18 19 20 21 22 23 24 24>") $ n (slow 8 $ "<18 19 20 21 22 23 24 24>")
# "take5" # cut 12 -- was `cut 11`, i.e. THE FLUTIST's group: the two voices # "take5" # cut 12
-- were truncating each other instead of layering. PV004.
# room 0.3 # sz 0.5 # dry 0.2 # room 0.3 # sz 0.5 # dry 0.2
# pan 0.2 # pan 0.2
# gain 1.3 # gain 1.3
......
...@@ -5,15 +5,15 @@ setcps(120/60/4) ...@@ -5,15 +5,15 @@ setcps(120/60/4)
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5" $ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
-- $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>") -- $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>") $ midiOn "^41" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]") $ midiOff "^41" (<| "k ~ ~ [<~!3 [~ k]> <~ k*<1!7 2>>]")
-- $ fix (|* gain 0.85) "rampleS57" -- $ fix (|* gain 0.85) "rampleS57"
$ "[house:0,kick:5]" -- TODO: Meilleur kick? $ "[house:0,kick:5]" -- TODO: Meilleur kick?
-- # cut 1 -- # cut 1
# gain 1.1 # gain 1.1
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^43" (<| "~ c ~ c*<1!3 <1 <2 4>>>") $ midiOn "^42" (<| "~ c ~ c*<1!3 <1 <2 4>>>")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>") $ midiOff "^42" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[cp:1,rampleM1:10]" $ "[cp:1,rampleM1:10]"
# gain 1.3 # gain 1.3
# pan 0.6 # pan 0.6
...@@ -49,7 +49,7 @@ d5 $ gF3 $ gM3 -- Piano guide premier ...@@ -49,7 +49,7 @@ d5 $ gF3 $ gM3 -- Piano guide premier
# lpfbus 52 (range 10000 400 "^54") # lpfbus 52 (range 10000 400 "^54")
# cut 5 # cut 5
# gain 1.3 # gain 1.3
d11 $ gF2 $ gM3 -- Plucked doubts d11 $ gF2 $ gM3 -- Doubting bass
$ chop 16 $ chop 16
$ loopAt 2 $ loopAt 2
$ "nujazz_bass120" $ "nujazz_bass120"
...@@ -58,7 +58,9 @@ d11 $ gF2 $ gM3 -- Plucked doubts ...@@ -58,7 +58,9 @@ d11 $ gF2 $ gM3 -- Plucked doubts
# cut 4 # cut 4
# att 0.06 # rel 2 # att 0.06 # rel 2
# crushbus 41 (range 16 3 (slow 16 $ perlin)) # crushbus 41 (range 16 3 (slow 16 $ perlin))
d10 $ gF3 $ gM3 d6 $ gF3 $ gM3 -- Plucking doubts
$ midiOn ("^58"-"^90") (stut 4 0.6 "q")
$ midiOn "^90" (stut 8 0.6 "q")
$ someCyclesBy "<1!32 0!32>" (|+ note "<e g bf b>") $ someCyclesBy "<1!32 0!32>" (|+ note "<e g bf b>")
$ someCyclesBy "<0!32 1!32>" (|+ note "<e b bf g>") $ someCyclesBy "<0!32 1!32>" (|+ note "<e b bf g>")
$ note ( $ note (
...@@ -66,9 +68,11 @@ d10 $ gF3 $ gM3 ...@@ -66,9 +68,11 @@ d10 $ gF3 $ gM3
+ "[0,12]" + "[0,12]"
- 12 - 12
) )
# cut 10 -- # cut 10
# "cpluck:4" # "cpluck:4"
d7 $ gF1 $ gM3 -- SECOND BREAK!!?! # octersubbus 62 (range 0 3 "^34")
# crushbus 61 (range 16 3 "^54")
d7 $ gF1 $ gM2 -- SECOND BREAK!!?!
$ midiOn "^91" (ply 2) $ midiOn "^91" (ply 2)
$ chop 8 $ chop 8
$ midiOn "^55" (loopAt 1 . (|> "jungle_breaks:19")) $ midiOn "^55" (loopAt 1 . (|> "jungle_breaks:19"))
......
...@@ -5,23 +5,23 @@ setcps(120/60/4) ...@@ -5,23 +5,23 @@ setcps(120/60/4)
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5" $ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
-- $ midiOn "^42" (<| "k k sk <k <k*2 [k k k ~]>>") -- $ midiOn "^42" (<| "k k sk <k <k*2 [k k k ~]>>")
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>") $ midiOn "^41" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k . ~ k ~ ~") $ midiOff "^41" (<| "k . ~ k ~ ~")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]") -- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57" -- $ fix (|* gain 0.85) "rampleS57"
$ "[house:0,kick:5]" -- TODO: Meilleur kick? $ "[house:0,kick:5]" -- TODO: Meilleur kick?
-- # cut 1 -- # cut 1
# gain 1 # gain 1
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^43" (<| "~ c ~ c") $ midiOn "^42" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>") $ midiOff "^42" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[snare:40,rampleM1:10]" $ "[snare:40,rampleM1:10]"
# gain 1.3 # gain 1.3
# pan 0.6 # pan 0.6
# room 0.4 # dry 0.95 # sz 0.1 # room 0.4 # dry 0.95 # sz 0.1
# lpf 4650 # lpf 4650
d3 $ gF1 $ gM2 -- Highest hats d3 $ gF1 $ gM2 -- Highest hats
$ midiOff "^44" (slow "<2!7 [4 2] 4!7 [2 4]>") $ midiOff "^43" (slow "<2!7 [4 2] 4!7 [2 4]>")
$ arp "up" $ arp "up"
$ midiOn "^76" (ply 2) $ midiOn "^76" (ply 2)
$ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :) $ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
...@@ -51,7 +51,7 @@ d5 $ gF3 $ gM3 -- NuJazz Keys ...@@ -51,7 +51,7 @@ d5 $ gF3 $ gM3 -- NuJazz Keys
# cut 5 # cut 5
# crushbus 51 (range 16 6.4 "^54") # crushbus 51 (range 16 6.4 "^54")
# octerbus 52 (range 0 0.7 "^34") # octerbus 52 (range 0 0.7 "^34")
d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?! d6 $ gF1 $ gM3 -- UN GLITCH DANS MON CAFE!!?!
-- $ striate 16 -- $ striate 16
-- $ chop 16 -- $ chop 16
$ loopAt 0.25 $ loopAt 0.25
......
...@@ -4,13 +4,13 @@ do ...@@ -4,13 +4,13 @@ do
setcps(125/60/4) setcps(125/60/4)
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5" $ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
$ midiOn "^42" (<| "k k k <k <k*2 [k <k ~> k ~]>>") $ midiOn "^41" (<| "k k k <k <k*2 [k <k ~> k ~]>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]") $ midiOff "^41" (<| "k ~ ~ [~ <~ k>]")
$ "[kick:5,tech:5,jazz]" $ "[kick:5,tech:5,jazz]"
# gain 1 # gain 1
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ midiOn "^43" (<| "~ c ~ c*<1!3 2>") $ midiOn "^42" (<| "~ c ~ c*<1!3 2>")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~") $ midiOff "^42" (<| "~ . c*<1!3 <2!3 4>> ~")
-- $ fix ((|* gain 0.8) . (# room 0)) "cp" -- $ fix ((|* gain 0.8) . (# room 0)) "cp"
$ "[h2ogmcp]" $ "[h2ogmcp]"
# att 0 # att 0
...@@ -37,7 +37,7 @@ d4 $ gM3 $ gF2 ...@@ -37,7 +37,7 @@ d4 $ gM3 $ gF2
# cut 4 # cut 4
# pan 0.55 # pan 0.55
# room 0.3 # room 0.3
# crushbus 41 (range 12 4.5 "^53") # crushbus 41 (range 12 4.5 "^52")
# gain 1.4 # gain 1.4
d5 $ gM3 $ gF3 d5 $ gM3 $ gF3
$ chop 8 $ chop 8
......
resetCycles
-- LE JAZZ C'EST QUOI??? -- LE JAZZ C'EST QUOI???
do do
setcps (118/60/4) setcps (118/60/4)
...@@ -39,6 +41,7 @@ d4 $ gF2 $ gM3 ...@@ -39,6 +41,7 @@ d4 $ gF2 $ gM3
# room 0.4 # cut 4 # room 0.4 # cut 4
# crushbus 41 (range 16 2.5 "^52") # crushbus 41 (range 16 2.5 "^52")
# octerbus 42 (range 0 0.95 "^32") # octerbus 42 (range 0 0.95 "^32")
# octersubbus 43 (range 0 1.5 "^32")
d5 $ gF3 $ gM3 -- Ton son est rose d5 $ gF3 $ gM3 -- Ton son est rose
$ midiOn "^89" (ply "4 4 4 <4 8>") $ midiOn "^89" (ply "4 4 4 <4 8>")
$ slow 2 $ slow 2
...@@ -54,7 +57,7 @@ d5 $ gF3 $ gM3 -- Ton son est rose ...@@ -54,7 +57,7 @@ d5 $ gF3 $ gM3 -- Ton son est rose
d6 $ gF3 $ gM3 -- Jorja too, she wants _you_ d6 $ gF3 $ gM3 -- Jorja too, she wants _you_
$ midiOff "^58" (mask "<f f f t>") $ midiOff "^58" (mask "<f f f t>")
$ midiOn "^54" (>| n "<40 41>") $ midiOn "^54" (>| n "<40 41>")
$ midiOff "^54" (>| n "<40 40 40 41 42 43 43 44 45 ~ 45 ~>") $ midiOff "^54" (>| n (slow 2 $ ply 2 $ "<40 40 40 41 42 43 43 44 45 ~ 45 ~>"))
$ "rose" $ "rose"
# room 0.4 # room 0.4
# cut 6 # gain 1.4 # cut 6 # gain 1.4
...@@ -100,13 +103,15 @@ d12 $ gF3 $ gM3 -- LE JAZZ C'EST DU PIANO ...@@ -100,13 +103,15 @@ d12 $ gF3 $ gM3 -- LE JAZZ C'EST DU PIANO
$ "rose:37" $ "rose:37"
# cut 12 # cut 12
# room 0.4 # room 0.4
# gain 1.4 # gain 1.6
# octersub 0.6
# pan 0.8 # pan 0.8
-- TODO : Legato granulaire periodique ? # lpf 4000
# squizbus 121 ("^20")
d8 $ gF1 $ gM2 d8 $ gF1 $ gM2
$ midiOn "^92" (ply "1 <2!3 4>") $ midiOn "^92" (ply "1 <2!3 4>")
$ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask $ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
$ midiOn ("^36" - "^56") (loopAt 2 . (# n "74")) -- Savoy 8/8 Break $ midiOn ("^36" - "^56") (loopAt 2 . (# n "25")) -- Savoy 8/8 Break
$ midiOn "^56" (loopAt 2 . (# n "23")) -- Raise COMEON! $ midiOn "^56" (loopAt 2 . (# n "23")) -- Raise COMEON!
$ chop 16 $ chop 16
$ loopAt 1 $ loopAt 1
......
...@@ -23,7 +23,7 @@ d3 $ gF1 $ gM2 ...@@ -23,7 +23,7 @@ d3 $ gF1 $ gM2
$ "~ h ~ h ~ h*<1!3 2> ~ h*<1 [1|2]>" $ "~ h ~ h ~ h*<1!3 2> ~ h*<1 [1|2]>"
# "h2ogmhh" # n "<0!4 1!3 2>" # "h2ogmhh" # n "<0!4 1!3 2>"
# att (range 0.2 1 "^31") # att (range 0.2 1 "^31")
# gain (1.4 * (range 0.9 1.2 perlin)) # gain (1.8 * (range 0.9 1.2 perlin))
d4 $ gF2 $ gM3 d4 $ gF2 $ gM3
$ midiOn "^76" (ply 4) -- HIGHER $ midiOn "^76" (ply 4) -- HIGHER
$ chop 8 $ chop 8
......
-- MI! e gs a b c d ef tension e resolution -- MI! e gs a b c d ef tension e resolution
do do
-- resetCycles resetCycles
setcps (124/60/4) setcps (124/60/4)
d1 $ gF1 $ gM1 d1 $ gF1 $ gM1
$ midiOn "^29" (# "kick:4") $ midiOn "^29" (# "kick:4")
......
...@@ -11,9 +11,11 @@ d1 $ gF1 $ gM1 ...@@ -11,9 +11,11 @@ d1 $ gF1 $ gM1
# lpf 4000 # lpf 4000
# gain 1.3 # gain 1.3
d2 $ gF1 $ gM2 d2 $ gF1 $ gM2
$ "~ s . ~ s" # "snare:5" $ "~ s . ~ s"
# "snare:5"
# gain 1.3
d3 $ gF1 $ gM2 d3 $ gF1 $ gM2
$ ("e" ~>) -- $ ("e" ~>)
$ chop 8 $ chop 8
$ loopAt 2 $ loopAt 2
$ "hammer:0" $ "hammer:0"
...@@ -43,11 +45,11 @@ d5 $ gF3 $ gM3 ...@@ -43,11 +45,11 @@ d5 $ gF3 $ gM3
# cut 5 # cut 5
# room 0.4 # sz 0.6 # dry 1.1 # room 0.4 # sz 0.6 # dry 1.1
# octersub 1.4 # octersub 1.4
d5 $ gF3 $ gM3 d7 $ gF3 $ gM3
$ midiOn "^57" (>| n "<~ ~ 8 ~>") $ midiOn "^57" (>| n "<~ ~ 8 ~>")
$ n "<<3 4 5 <6 7>> ~ <3 ~> ~>" $ n "<<3 4 5 <6 7>> ~ <3 ~> ~>"
# "superfreak" # "superfreak"
# cut 5 # cut 7
# gain 1.4 # gain 1.4
# room 0.4 # sz 0.4 # dry 1.1 # room 0.4 # sz 0.4 # dry 1.1
d9 $ gF3 $ gM3 $ "~ ~ ~ <h ~ <~ h> ~>" # "hammer:3" # cut 9 d9 $ gF3 $ gM3 $ "~ ~ ~ <h ~ <~ h> ~>" # "hammer:3" # cut 9
......
...@@ -15,16 +15,16 @@ let sus = pF "sus" ...@@ -15,16 +15,16 @@ let sus = pF "sus"
let cutoff = pF "cutoff" let cutoff = pF "cutoff"
d1 $ gF $ gM1 d1 $ gF $ gM1
$ fix (|* gain 0.9)"kick:4" $ fix (|* gain 0.9)"kick:4"
$ midiOn "^42" (struct "t t t t") -- Le Run $ midiOn "^41" (struct "t t t t") -- Le Run
$ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente $ midiOff "^41" (struct "~ <t!3 ~>") -- L'attente
$ "[techno:0,808bd:2,909,kick:4]" $ "[techno:0,808bd:2,909,kick:4]"
# rel 0.5 # rel 0.5
# att 0.015 # att 0.015
# lpf 4000 # lpf 4000
# gain 1.5 # gain 1.5
d2 $ gF $ gMute -- Clap timer d2 $ gF $ gMute -- Clap timer
$ midiOn "^43" ((|* gain "0 1 0.8 1") . (<| "~ c <~!3 [~ c]> c")) $ midiOn "^42" ((|* gain "0 1 0.8 1") . (<| "~ c <~!3 [~ c]> c"))
$ midiOff "^43" ((|* gain "1 0.8") . (<| "c . ~ ~ ~ <~!3 c>")) $ midiOff "^42" ((|* gain "1 0.8") . (<| "c . ~ ~ ~ <~!3 c>"))
$ drumFrom "[sakatadpm48,rolandr8]" "cp" $ drumFrom "[sakatadpm48,rolandr8]" "cp"
# lpf 2000 # lpf 2000
# gain 1.6 # gain 1.6
...@@ -130,5 +130,3 @@ d9 $ gF3 -- Nano-angels chorus of machines ...@@ -130,5 +130,3 @@ d9 $ gF3 -- Nano-angels chorus of machines
# pan 0.64 # pan 0.64
# cut 10 # cut 10
# gain 1.5 # gain 1.5
bf g bf <bf a>
do
setcps (130/60/4)
d1 $ gF1 $ gM1
$ midiOn "^41" (<| "k k k <<k [~ k]> <k*2 k*[4 2]>>")
$ midiOff "^41" (<| "k . k(<3 [3 5] [5 3] [8 5]>,8)")
$ "[jazz]"
# gain 1.3
d2 $ gF1 $ gM2
$ midiOn "^42" (<| "~ c ~ c*<1 2 1 [4 2]>")
$ midiOff "^42" (
<| "~ ~ ~ cp*<1!3 <1!4 2!3 [4 . 1 4]>>"
)
$ "vec1_claps:10"
-- # room 0.13
-- # sz 0.04
-- # lpf 1400
# gain 1.3
d3 $ gF1 $ gM2 -- TODO Ouvre plus ces hats <3
$ "~ h ~ h ~ h ~ h*<1 2 1 [1|0]>"
# "h2ogmhh"
# room 0.3
# legato (slow 16 $ range 0.2 0.8 saw)
d4 $ gF2 $ gM3
$ midiOn "^44" (off 0.5 id)
$ midiOn "^76" (ply "4 4 8 <8 [8 16]>")
$ "<low_love ~>" # "love_parade:2"
# room 0.4 # gain 1.3 # octersub 1.2
# crushbus 41 (range 16 2.5 "^52")
d5 $ gF3 $ gM3 -- L'AMOUR se PARADE
$ midiOn "^57" (slice 4 "<0 1 2 3>")
$ midiOn "^89" (ply "<2 2 4 <4 8>>")
$ loopAt 2
$ n "<<0 1>>" # "love_parade"
# cut 5
# octerbus 51 (range 0 0.95 "^53")
# octersubbus 52 (range 0 1.95 "^33")
# pan 0.7
d6 $ gF3 $ gM3 -- Double Amour
$ midiOn "^58" (slice 4 "<0 1 2 3>")
$ midiOn "^90" (ply "<2 2 4 <4 8>>")
$ loopAt 2
$ n "<<3 4>>" # "love_parade"
# cut 6
# octerbus 61 (range 0 0.95 "^54")
# octersubbus 62 (range 0 1.95 "^34")
# pan 0.3
# gain 1.5
d8 $ gF1 $ gM2 -- The Right Breaks :tm:
$ midiOn "^92" (ply "<2 2 2 <4 8>>")
$ midiOff "^60" (mask "t(8,16,1)" . chop 8)
$ chop 8
$ fix (loopAt 2) (n 155)
$ loopAt 2
$ midiOn "^36" (loopAt "0.5" . (# n "<135!3 [<135 155> 155]>"))
$ midiOn "^56" (# n 152)
$ "jungle_breaks:74"
# cut 8
# gain 1.5
do do
-- resetCycles -- resetCycles
setcps (89/60/4) setcps (89/60/4)
d1 $ fast 2 d1 $ gF1 $ gM1 -- Kick de
$ gF1 $ gM1 $ fast 2
-- $ midiOff "^42" (<| "<k [~!7 k*<1 2>]>")# $ midiOff "^41" (<| "k . ~ k ~ ~ ")
$ midiOn "^29" (# "jazz:0") $ midiOn "^41" (<| "k k k <k <k*2 [~ k]>>")
$ midiOff "^41" (<| "k . ~ k ~ ~") $ "[bskick,jazz]"
$ midiOn "^41" (<| "k k . k <k [~ k] k k*2>") # gain 1.2
$ "[popkick:2,kick:5]" # gain 1.8
# lpf 300 -- TODO Sound design this kick <3
-- # cut 1 -- # cut 1
-- PLN 2026-08-02: "definitely the kicks too saturate". Measured, not guessed. -- PLN 2026-08-02: "definitely the kicks too saturate". Measured, not guessed.
-- SuperDirt amplitude is gain^4, so `gain 2` is +24.1 dB — and this line stacks -- SuperDirt amplitude is gain^4, so `gain 2` is +24.1 dB — and this line stacks
...@@ -73,7 +72,7 @@ d6 $ gF3 $ gM3 -- ignite ...@@ -73,7 +72,7 @@ d6 $ gF3 $ gM3 -- ignite
# dry 1.3 # sz 0.8 # room 0.4 # dry 1.3 # sz 0.8 # room 0.4
# pan "0.7!3 <0.6 0.4>" # pan "0.7!3 <0.6 0.4>"
# room 0.7 # sz 0.8 # room 0.7 # sz 0.8
d8 $ gF1 $ gM2 d8 $ gF1 $ gM2 -- The Right Breaks :tm:
$ midiOn "^92" (ply "<2 2 2 <4 8>>") $ midiOn "^92" (ply "<2 2 2 <4 8>>")
$ midiOff "^60" (mask "t(8,16,1)" . chop 8) $ midiOff "^60" (mask "t(8,16,1)" . chop 8)
$ chop 8 $ chop 8
...@@ -83,11 +82,12 @@ d8 $ gF1 $ gM2 ...@@ -83,11 +82,12 @@ d8 $ gF1 $ gM2
$ midiOn "^56" (# n 152) $ midiOn "^56" (# n 152)
$ "jungle_breaks:74" $ "jungle_breaks:74"
# cut 8 # cut 8
# gain 1.3 # gain 1.5
d10 $ gM3 d10 $ gM3
$ mask "<f!4 t f!3>" $ mask "<f!4 t f!3>"
$ loopAt 4 $ "risers:8" # gain 1 $ loopAt 4 $ "risers:8" # gain 1
# cut 10 # cut 10
# room 0.3 # sz 0.6
-- # lpf 4000 -- # lpf 4000
-- TODO: BANGER LEAD SIDEKICK! Can we add more of 18 19 effects to it, e.g. on 19 could -- TODO: BANGER LEAD SIDEKICK! Can we add more of 18 19 effects to it, e.g. on 19 could
-- hit more notes, on 17 sound could change, tbh it works so well, other notes or chords -- hit more notes, on 17 sound could change, tbh it works so well, other notes or chords
......
...@@ -25,6 +25,7 @@ d4 -- CRIMINAL BASSLINE ...@@ -25,6 +25,7 @@ d4 -- CRIMINAL BASSLINE
$ gF2 $ gM3 $ gF2 $ gM3
$ chop 4 $ chop 4
$ midiOn "^76" (ply "<[2 <2 [4 2]>]!3 [2 4]>") $ midiOn "^76" (ply "<[2 <2 [4 2]>]!3 [2 4]>")
$ midiOn "^44" (chop 4)
$ slice 4 "<0 1 2 3>" $ slice 4 "<0 1 2 3>"
-- $ chop 4 -- $ chop 4
$ "crimewave" $ "crimewave"
...@@ -35,6 +36,7 @@ d4 -- CRIMINAL BASSLINE ...@@ -35,6 +36,7 @@ d4 -- CRIMINAL BASSLINE
# octersubbus 42 (range 0 2.13 "^52") # octersubbus 42 (range 0 2.13 "^52")
# room 0.3 # sz 0.3 # dry 1.13 # room 0.3 # sz 0.3 # dry 1.13
d5 $ gM3 $ gF3 -- THIS SYNTH IS A CRIME <3 d5 $ gM3 $ gF3 -- THIS SYNTH IS A CRIME <3
$ midiOn "^89" (struct "t(8,8)" . chop 2)
$ slice 16 (slow 4 $ run 16) $ slice 16 (slow 4 $ run 16)
$ midiOn "^57" (-- LZRTAG CRIMINAL TAKEOVER <3 <3 $ midiOn "^57" (-- LZRTAG CRIMINAL TAKEOVER <3 <3
("e" ~>) . ("e" ~>) .
......
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