Chore: forgotten files, link samples, init midi

link_samples_all.txt

+: 1697047490:0;ln -s ~/configs/antigen.zsh .
+: 1697047549:0;ln -s ~/configs/.funcs .
+: 1697224679:0;ln -s ~/Work/Sound/Samples/trance_*
+: 1697224696:0;ln -s ~/Work/Sound/Samples/trance_* .
+: 1697224710:0;ln -s ~/Work/Sound/Samples/simmons .
+: 1697224724:0;ln -s ~/Work/Sound/Samples/electrn .
+: 1697224729:0;ln -s ~/Work/Sound/Samples/weird_dialogs .
+: 1697224739:0;ln -s ~/Work/Sound/Samples/indian_tab .
+: 1697804175:0;ls ~/Work/Sound/Samples/90sArchive/output | xargs -I {} "echo ln -s {}."
+: 1697804184:0;ls ~/Work/Sound/Samples/90sArchive/output | xargs -I {} echo "ln -s {}"
+: 1697804187:0;ls ~/Work/Sound/Samples/90sArchive/output | xargs -I {} echo "ln -s {} ."
+: 1697804196:0;ls ~/Work/Sound/Samples/90sArchive/output | xargs -I {} echo "ln -s ~/Work/Sound/Samples/90sArchive/output/{} ."
+: 1697804200:0;[200~ln -s ~/Work/Sound/Samples/90sArchive/output/90s_megafx .
+: 1697804202:0;ln -s ~/Work/Sound/Samples/90sArchive/output/90s_megafx .
+: 1697804216:0;ls ~/Work/Sound/Samples/90sArchive/output | xargs -I {} echo "ln -s ~/Work/Sound/Samples/90sArchive/output/{} ."
+: 1697804222:0;ls ~/Work/Sound/Samples/90sArchive/output | xargs -I {} "ln -s ~/Work/Sound/Samples/90sArchive/output/{} ."
+: 1697804228:0;ls ~/Work/Sound/Samples/90sArchive/output | xargs -I {} ln -s ~/Work/Sound/Samples/90sArchive/output/{} .
+: 1697804546:0;find  ~/Work/Sound/Samples/rample -type d | xargs -I {} echo "ln -s {} ."
+: 1697804689:0;find * -type d | xargs -I {} echo "ln -s "
+: 1697804691:0;find * -type d | xargs -I {} echo "ln -s {}"
+: 1697804698:0;find * -type d | xargs -I {} echo "ln -s {}"
+: 1697804715:0;find /home/pln/Work/Sound/Samples/rample/* -type d | xargs -I {} echo "ln -s {}"
+: 1697804722:0;find * -type d | xargs -I {} echo "ln -s {}"
+: 1697804730:0;find * -type d | xargs -I {} echo "ln -s /home/pln/Work/Sound/Samples/rample/{} rample{}"
+: 1697804746:0;find * -type d | xargs -I {} echo "ln -s /home/pln/Work/Sound/Samples/rample/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample{}"
+: 1697804762:0;echo 'find * -type d | xargs -I {} echo "ln -s /home/pln/Work/Sound/Samples/rample/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample{}"' >> link_rample.sh
+: 1697804848:0;find * -type d | xargs -I {} echo "ln -s /home/pln/Work/Sound/Samples/rample/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample{}"
+: 1697804851:0;ln -s /home/pln/Work/Sound/Samples/rample/U9 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU9\
+: 1697804883:0;echo 'find * -type d | xargs -I {} ln -s /home/pln/Work/Sound/Samples/rample/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample{}' >> link_rample.sh
+: 1697804893:0;echo 'find * -type d | xargs -I {} ln -s /home/pln/Work/Sound/Samples/rample/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample{}' > link_rample.sh
+: 1697819924:0;find * -type d | xargs -I {} echo "ln -s /home/pln/Work/Sound/Samples/rample/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample{}"
+: 1697819931:0;find * -type d | xargs -I {} echo "ln -s /home/pln/Work/Sound/Samples/rample/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample{}"
+: 1697819959:0;find * -type d | xargs -I {} echo "ln -s /home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}"
+: 1697819968:0;ln -s /home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/Bass /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/Bass\
+: 1697819982:0;ln -s "/home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/Bass" /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/jungle_bass\
+: 1697820007:0;ln -s "/home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/Breaks" /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/jungle_breaks\
+: 1697820056:0;ln -s "/home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/FX" /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/jungle_fx\
+: 1697820062:0;ln -s "/home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/Pads" /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/jungle_pads\
+: 1697820077:0;ln -s "/home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/Riffs, Arps & Hits" /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/jungle_riffs\
+: 1697820089:0;ln -s "/home/pln/Work/Sound/Samples/MethLab/BluMarTen - Jungle Jungle - 1989 to 1999/Vocals" /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/jungle_vocals\
+: 1697820114:0;find * -type d | xargs -I {} echo "ln -s {}"
+: 1697820147:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{}
+: 1697820158:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{}
+: 1697820165:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} pwd
+: 1697820178:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples
+: 1697820182:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697820199:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697820209:0;find * -type d | grep "gameboy" | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697820223:0;find * -type d | grep "gameboy" | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697820233:0;find * -type d | grep "gameboy" | xargs -I {} ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697820248:0;find * -type d | grep "commodore" | xargs -I {} ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697820253:0;find * -type d | grep "nes" | xargs -I {} ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697820263:0;find * -type d | grep "atari" | xargs -I {} ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821294:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/90sArchive/output/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821342:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/samples-hydrogen-drums/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821346:0;ln -s /home/pln/Work/Sound/Samples/samples-hydrogen-drums/h2ogmmt /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/h2ogmmt\
+: 1697821361:0;find * -type d | xargs -I {} ln -s /home/pln/Work/Sound/Samples/samples-hydrogen-drums/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821704:0;find * -type d | xargs -I {} ln -s /home/pln/Work/Sound/Samples/samples-hydrogen-drums/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821718:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/samples-hydrogen-drums/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821727:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/samples-hydrogen-drums/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821737:0;find * -type d | xargs -I {} echo ln -s /home/pln/Work/Sound/Samples/come_together/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1697821742:0;find * -type d | xargs -I {} ln -s /home/pln/Work/Sound/Samples/come_together/{} /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/{}
+: 1698244440:0;ln -s /home/pln/Work/Sound/Samples/MethLab/MethLab\ -\ Bass\ Pack/ /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/meth_bass\
+: 1698244451:0;grip "ln -s"
+: 1698244465:0;grip "ln -s" 
+: 1698244477:0;cat ~/.histfile | grep "ln -s"
+: 1698244501:0;cat ~/.histfile | grep "ln -s" >> link_samples_all.sh

live/ambient/wild_coffee.tidal

+do
+setcps (90/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^13" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let gLPF = whenmod     64 48 (# lpfbus 4 (slow 16 $ range 20000 200  saw))
+let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw))
+let chorus = pF "chorus"
+let lagamount = pF "lagamount"
+let dec = pF "dec"
+let sus = pF "sus"
+let cutoff = pF "cutoff"
+d1 $ gF1 $ gMute -- la Conviction
+  $ midiOn "^41" (<| "k k k <k!3 k*2>")
+  $ midiOn ("^42" - "^41") (<| "<k k(<3!3 [3 5]>,8)>")
+  $ midiOff ("^41" + "^42") (<| "<k ~>")
+  $ "[techno:0,808bd:2,909,kick:4]"
+  # lpf 200
+  # midiG' "^78" 0 1.2
+d2 $ gF1 $ gMute2 -- Snare décalé
+  $ "~ . <<s [s*2 ~ .  s]> s!2 [s . ~ s*2]>"
+  # "[clap:1,snare:48]"
+  # lpf 5000
+  # midiG' "^79" 0 1.2
+  # pan 0.4
+d3 $ gF1 $ gM -- La Pluie
+  $ midiOn "^44" (striate "2 <2 16> . 4 <8 <16 [2 1]>>")
+  $ midiOn "^76" (ply "<2 4>")
+  $ chop 16
+  $ loopAt 2
+  $ "jungle_breaks:0"
+  # room 0.2
+  # pan 0.9
+  # cut 3
+  # midiG' "^80" 0 1.2
+d5 $ gF2 -- La Basse intention
+  $ sometimesBy "^13" (# note "c")
+  $ midiOn "^89" (ply "<8 16 [16 32] [32 64]>")
+  $ "90s_matrix:0"
+  # note (slow 2 "<gs f g c gs f g c gs f g c c g f gs>")
+  # cut 5
+  # panbus 52 (slow 16 $ range 0.6 0.95 saw)
+  # crushbus 51 (range 16 2.5 "^53")
+  # midiG' "^81" 0 1.2
+d6 $ gF3 -- La Basse Réputation
+  $ sometimesBy "^13" (# note "c")
+  $ midiOn "^58" (>| note "<[c ef g@6] [gs c6 ef6@6] [ds6 g6 b6@6] [ef6 g6 c6@6]>")
+  $ midiOff "^58" (>| note "<[gs c6 ef6@6]!2 [f gs <c5 c6>@6]!2 [g d6 f6@6]!2 [c6 ef6 g6@6]!2>")
+  $ "bassWarsaw"
+  # octave 2
+  # chorus 0
+  # crushbus 61 (range 16 2.5 "^54")
+  # midiG' "^82" 0 1.2
+  # pan 0.3
+  # cut 6
+  # room 0.4
+d7 $ gF3 -- Les anges arpèges
+  $ superimpose ((|+ note 12) . (|* gain 0.8) . (|+ pan 0.2))
+  $ sometimesBy (1 - "^35") (# note "<[c, ef, gs]!2 [gs, c, f]!2 [d, g, b]!2 [ef, g, c]!2>")
+  $ note "<[c ef gs]*<4 [4 8]>!2 [gs c f]*4!2 [d g b]*<4 [4 8 4]>!2 [ef g c]*[4 8]!2>"
+  # "moogBass"
+  # octave 4
+  # pan 0.85
+  # room 0.4
+  # dry (slow 64 $ range 0.5 1.9 sine)
+  # crushbus 71 (range 16 2.5 "^55")
+  # midiG' "^83" 0 0.8
+  # legato 1.25
+d8 $ gF1 $ gM2 -- La Course
+  $ sometimesBy "^56" (iter 4)
+  $ midiOn "^92" ((ply "<2 [2|4]>") . chop "<8!3 16>")
+  $ midiOn "^60" (chop 4 . (# "jungle_breaks:17"))
+  $ midiOff "^60" (
+    splice 16 (run "8 [<16 8> <16 8 8 16>] 8 <16 <8 8 8 4 8 16 8 <16 32>>>")
+  )
+  $ loopAt 2
+  $ "jungle_breaks:12"
+  # pan 0.7
+  # cut 8
+  # midiG' "^84" 0 0.8
+d9 $ gF2 $ gM2 -- La Brulure
+  $ sometimesBy "^13" (# note "c")
+  $ midiOn "^92" (ply "2 <4 8>")
+  $ midiOn "^60" (slice 4 "0 1 2 3*<1 2 <4 8> <4 16>>")
+  $ chop 16
+  $ slow 2
+  $ note "<gs f g c>"
+  # "meth_bass:3"
+  # room 0.7 # dry 1 # sz 0.2
+  # octersubsub (slow 16 $ range 0 1.4 saw)
+  # octersub (slow 16 $ range 0 1.4 saw)
+  # lpf (slow 16 $ range 4000 400 saw)
+  # pan 0.2
+  # midiG' "^20" 0 0.8
+  # cut 9
+
+once
+  # gain 0.6
+  # cut 9
+
+-- Keys to PARADISE:
+-- gs c ef
+-- f gs c
+-- g a d
+-- c ef g
+
+-- Backdoors:
+-- c ef gs
+-- gs c f
+-- d g b
+-- ef g c
+once $ "junl"

live/boeuf/algorythm/season2/blues_wednesday.tidal

+
+do
+-- resetCycles
+setcps (90/60/4)
+-- Modified blues to add a seventh with bflat
+let blues = ["c", "f", "c", "c", "f", "f", "c", "c", "g", "f", "c", "c", "g", "f", "bf", "c"]
+let gDJF = (# djfbus 1 (slow 32 $ range 0.2 0.8 saw))
+let gDJF = id
+d1 $ gDJF
+  $ fix ((|* gain 0.6) . (# hpf 200)) "jazz"
+  $ "<k!16 k*2!16 k*4!16 [k . k(3,8)]!16>" # "[jazz,cpu]" # gain 1
+d2
+-- $ gDJF
+  -- $ mask "<f!16 t!48>"
+  $ note ("~ ~ ~ <~ ~ -2 -2>. 0" - 8)
+  # "[snare:60,snare:21]"
+  # gain 0.46
+  # pan 0.3
+  -- # room 0.2 # dry 1.1 # sz 0.8
+d8 $ gDJF
+  $ "drum:2*[4 <4 <8 16>>]"
+  # pan 0.3
+  # gain 0.55
+d3 $ gDJF
+  $ mask "<f!16 t!48>"
+  $ mask "t(<1 1 4 2 2 2 4 <2 4>>,4)"
+  $ chop 8 $ loopAt 1 $ "break:1"
+  # cut 4 # gain 0.4
+  # pan 0.7
+d4
+  $ superimpose (|+| note "[0 0(<3!3 5>,8)]")
+  $ note (
+    cat blues + "[0]"
+  )
+  -- # "bass3:4"
+  -- # "modalMarimba" |+| note "0*4"
+  # "bassWarsaw" |- note 24
+  # pan 0.3 # crush 16
+  -- # room 0.1
+  -- # voice 0.8
+  -- # cut 1
+  # gain 0.75
+  # lpf 300
+
+-- TODO Recover this guitar and make it midi-agnostic
+d5 $ gF3 $ note (
+  "<0 [0, [~@3 <2 0 0 2>@3 0@2]] [0@4 0@2] 0([1 3],8)>"
+  -- TODO: Pk pas la reecrire offbeat plutot que onbeat
+  -- "0(5,8)"
+  |+| cat blues
+  - 3.25 -- Decalage au do
+  -- + 12
+  )
+  # cut 51
+  # room 0
+  # crushbus 51 (range 16 3 "^54")
+  # "come_guitar:0"
+  # midiG' "^82" 0 1.7

live/boeuf/algorythm/season2/come_together.tidal

+do
+setcps (83/60/4)
+d1
+  $ off "e" ((|* gain 0.85)) $ "k" -- Intro
+  -- $ "k*4" -- Full
+  # "[808bd]" # gain 1.5
+  # note "-2"
+  # att 0.01 # rel 2
+d2
+  $ "~ s" -- Intro
+  -- $ "~ s ~ s" -- Full
+  # "snare:30"
+  # gain 0.8
+d3
+  $ "~ <~ drums>"
+  # "come_drums:1"
+  # gain 0.75
+
+once $ "come_drums:1" # gain 1.8 # cut 1

live/boeuf/biarritz/morning_glory.tidal

+do
+setcps (80/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+d1 $ gF
+  $ midiOn "^42" (<| "k k k k")
+  $ "jazz"
+  # midiG' "^78" 0 1.9
+d3 $ gF
+  $ midiOn "^42" (<| "~ k ~ k*<1 2>")
+  $ midiOff "^42" (<| "~ k")
+  $ "hh"
+  # midiG' "^79" 0 1.9
+d5 $ gF2 $ mask "<t t t f>"
+  $ "90s_synatm:8"
+  # room 0.4
+  # cut 5
+  # midiG' "^81" 0 1
+  # crushbus 51 (range 16 2.5 "^53")
+  # pan 0.35
+  # room (range 0.2 0.8 (slow 8 saw))
+d6 $ gF3
+  $ note (scale "aeolian" "<0!8 -2 -2 -2 -3>")
+  # "FMRhodes1"
+  # midiG' "^82" 0 1.9
+d7 $ gF3
+  $ superimpose (struct "t . t(3,8)" . (arp "thumbup") .
+    (|+ note "<c'maj'4!3 c'min'4>")
+  )
+  $ note (scale "aeolian" "<0!8 -2 -2 -2 -3>")
+  # "FMRhodes2"
+  # midiG' "^83" 0 1.9
+d8 $ gF $ chop 8
+  $ midiOn "^60" (loopAt 1)
+  $ midiOff "^60" (loopAt 2)
+  -- $ loopAt 2
+  $ "fbreak80"
+  # midiG' "^84" 0 1.9
+  # cut 8

live/boeuf/canard_breake.tidal

+do
+setcps (165/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+-- let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM =  gMute
+let gM2 = gMute2
+let gO = (# octerbus 4 (range 0 2 "^29"))
+let modIndex = pF "modIndex"
+d1
+  $ gF1
+  $ midiOn "^74" (fast 2)
+  $ midiOn ("^42" - "^41") (mask "t(1,4)")
+  -- $ mask "<f!4 t(1,2)!3 t!9>"
+  $ fix ((|* gain 0.8) . (# att 0.05) . (# rel 1)) ("kick")
+  $ fix ((|* gain 0.95)
+  . (# att 0.25) . (# rel 1)
+    ) ("reverbkick")
+  $ midiOn "^41" (<| "k <k!4 ~ k!3> k <k [~ k] k [<k!4 ~!3 k> k]>") -- Run & stumble
+  $ midiOff "^41" (<| "k . ~ k ~ ~") -- L'attente
+  $ "[jazz,reverbkick,kick:5]"
+  # midiG' "^78" 0 1.5
+d2 $ gF1 $ gM -- Snare glitch high
+  $ midiOn "^75" (ply "<2 [2 <4 <2 4>>]>")
+  $ fix ((|* gain 0.9)) ("snare:40")
+  $ "~ s ~ <s!3 <s*2 <s s*2>>>" # "[snare:31,snare:40]"
+  # note (range "-12" 12 "^51")
+  # pan 0.46
+  # room 0.74 # sz 0.2 # dry 1
+  # midiG' "^79" 0 1.2
+d3 $ gF3 $ gO
+  $ loopAt 1 $ "breaks165"
+  # midiG' "^80" 0 1.2
+
+d3 $ gF $ gM -- Breaks du Marathon
+  $ midiOn "^76" (scramble (8 - 4 * "^44"))
+  $ midiOn "^44" (slice 16 (run "8 . <8 8 <8 16> <16!3 [32 <32 16>]>>"))
+  $ midiOff "^44" (slice 8 ("0 1 2 3 . 4 5 6 <7!3 6>"))
+  $ loopAt 2
+  $ "break:15"
+  # cut 2
+  # pan 0.4
+  # speed (range 0 2 "^52")
+  # midiG' "^80" 0 1.5
+
+
+d4 -- BASSLINE BRULANTE
+  $ gF
+  $ midiOn "^53" (-- Trigger: DATA BURN
+     (
+      (# cut 42) . (|* gain 0.85) .
+      (# squizbus 41 (range 200 0 "^53"))
+      )
+  )
+  $ midiOn "^57" ( -- Ritournelle
+    midiOn "^89" (ply "2 2 4 <2 4 <4 4 8 4> <2 4>>")
+    . (+| note (scale "aeolian" (arp "converge" $
+    "[0 <2!4 1!2 2!2> 0 <0!3 4>]"
+    -- "<5@3 [5 4@2]> <<2 0> [2 0]>"
+    )))
+    . (# cut 41)
+    . (|* gain 0.95)
+  )
+  $ slow 2 -- 5/2
+  $ note (scale "aeolian"
+  "<[<5@3 [5 4@2]> <<2 0> [2 0]>] <5 <0 [0 . 0 <0 7> 0]>>>"
+  )
+  # "90s_synatm:9"
+  # pan 0.15
+-- # room 0.5 # dry 0.2 # sz 0.8
+  # lratebus 43 (range 0.6 6.7 "^33")
+  # lesliebus 42 (range 0 1 "^17")
+  # lsize (slow 8 $ range 2 6 saw)
+  # midiG' "^81" 0 (1.5 - 0.3 * "^17" - 0.25 * "^53")
+  # crushbus 41 (range 10 4.5 "^53")
+  # cut 4
+d5 $ gF2 $ gM -- Ritournelle Rhodes
+  $ midiOn "^58" (off "q" (|+ note 12) . (|* gain 0.85))
+  $ note (
+    "<[c ~ c d ~ d <ef!3 f> ~]!0 [f ~ f g ~ <g!3 f> <gs!3 f> ~]!8>"
+  - "<24!12 12!4>")
+  # "FMRhodes1"
+  # modIndex (range 0 100 "^54")
+  -- # crushbus 51 (range 10 4.5 "^34")
+  # midiG' "^82" 0 2
+d6 $ gF2 -- Voices from the st0rm
+  $ midiOn "^91" ((# cut 6) . slow 8)
+  $ swingBy 0.125 8
+  $ midiOn "^59" (superimpose ( -- Resolution chant
+    (>| note (scale "aeolian" "<7 [7@3 <5 9>]>"))
+    . (# cut 61)
+    . (# legato 1.2)
+    . (|+ pan 0.1)
+    ))
+  $ note (scale "aeolian" (arp "<up downup down updown>"
+  "<[2,7,2,<0!3 <7 14>>]!8 [1,5,2,7,<10!2 9 8 8 8 9 10>]!8>"
+  ))
+  # "90s_matrix:3"
+  # cut 6 # gain 0.4
+  # squizbus 61 (range 0 4 "^55")
+  # room 0.42 # dry 1 # sz 0.8
+  # pan 0.6
+  # midiG' "^83" 0 2
+d8 -- Ominous drumroll
+  $ fix (|* gain 0.9) "dr"
+  $ midiOn "^60" (slow 2)
+  $ midiOn "^92" (ply "[2 1]*8")
+  $ "d*<4!3 2 4!3 8 <16!3 8>!16>" # "[dr,drum:2]"
+  # midiG' "^84" 0 1.2
+  # room 0.8 # dry 1
+  |- note 4

live/boeuf/samedi_canard.tidal

+once $ "jazz"
+
+do
+setcps (120/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+-- let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM =  gMute
+let gM2 = gMute2
+let gO = (# octerbus 4 (range 0 2 "^29"))
+d1 $ gM $ gF1
+  $ midiOn "^42" (<| "k k k k*<1!3 2>")
+  $ midiOff "^42" (<| "k . k(<3!3 5>,8,<0!3 4>)")
+  $ "[jazz,rampleA0:2]"
+  # midiG' "^78" 0 1.6
+d2 $ gM $ gF2
+  $ midiOn "^75" (fast 2)
+  $ midiOff "^43" (slow 2)
+  $ fix (# note "-2") "cp"
+  $ fix (|* gain 0.8) "rampleR6"
+  $ "~ cp ~ cp"
+  # "[cp,rampleR6:11,<~!3 rampleR6:12>]"
+  # midiG' "^79" 0 1.5
+d3 $ gM $ gO $ gF3
+  $ "~ h ~ h ~ h*<1 1 1 2> ~ h"
+  # "h2ogmhh:2"
+  |* gain (range 1 0.8 (fast 2 perlin))
+  # midiG' "^80" 0 1.5
+d8 $ gF3 $ gM
+  $ midiOn "^60" (iter "1 4")
+  $ midiOn "^92" (ply "2 <2!3 <4 8>>")
+  $ midiOn "^56" (splice 4 "0 1*2 <2 ~> 3(3,8)")
+  $ midiOn "^56" ((# "break:2"))
+  $ midiOn "^36" ((# "jungle_breaks:20"))
+  $ loopAt 2
+  $ chop 16
+  $ "jungle_breaks:47"
+  # midiG' "^84" 0 1.5

live/boeuf/viteuf/blues.tidal

+once $ "dr"
+
+do
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+setcps (120/60/4)
+d1 $ gF1 $ gM2
+  $ midiOn "^42" (<| "k k k k*<1 2>")
+  $ midiOff "^42" (<| "k*<1!4 2!4> . k(<1 3 3 <5 [3 <1 5>]>>,8)")
+  $ "[cpu,jazz,808bd:3,808bd:2]"
+  # gain 0.9
+d2 $ gM $ gF2
+  $ midiOn "^43" (<| "~ s ~ s")
+  $ midiOff "^43" (<| "~ s")
+  $ "snare:39"
+  -- # note "-2"
+  # gain 1
+  # att 0.02 # rel 0.9
+d3 $ gF1 $ gMute2
+  $ midiOff "^44" (mask "t([8 4 <4 <8 16>>],16)")
+  $ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]")
+  $ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh"
+  $ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]"
+  # n "0!3 <0!3 1>"
+  -- # midiG' "^80" 0 1.6
+d8 $ gF1 $ gM
+  $ midiOff "^60" (struct "t(<4>,8)" . segment 8)
+  $ whenmod 16 8 (iter 8)
+  $ midiOn "^56" (loopAt 2 . (# n "40"))
+  $ loopAt 2
+  $ midiOn "^92" (ply 8)
+  -- $ slice 16 (run 8)
+  $ chop 8
+  $ "jungle_breaks:8"
+  # speed (range 0.5 1.5 "^56")
+  # cut 8
+  # gain 0.8
+
+once
+  $ "<c a d e>" # "giorgio_syn"
+  # gain 0.4
+
+
+once $ "90s_synatm" # gain 2
+
+
+
+d1 $ "k ~ ~ ~" # "kick"

live/collab/etienne/concombre.tidal

+do
+setcps (120/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.2 0.8 "^50"))
+let gM = midiOn "^73" (mask "f*16")
+d1 $ gF $ gM
+  $ (|* midiG' "^78" 0 1.4)
+  $ superimpose (const $ "~ s ~ s*<1 2 1 [1|2]>" # "snare:24" # gain 1.3 # note (8))
+  $ fix (|* gain 0.9) "jazz"
+  $ fix (|* gain 1.2) "kick:5"
+  $ midiOn "^42" (<| "k k k <k [<~ k> k]>")
+  $ midiOff "^42" (<| "k ~ [~ k] <~!3 k>")
+  $ "[kick:5,jazz]"
+d2 $ gF $ gM
+  $ midiOn "^43" (fast 2)
+  $ "~ s ~ s"
+-- $ "~ ~ s ~"
+-- $ "~ ~ ~ ~ s ~ ~ ~"
+  # "snare:24" # gain 1.3
+  # midiG' "^79" 0 1.5
+d3 $ gF $ gM
+  $ ply "2!3 1"
+  $ "dr*8"
+  # crushbus 51 (range 16 2.5 "^53")
+  # midiG' "^80" 0 1.5
+d5 $ gF2 $ gM
+  $ chop 8
+  $ "90s_matrix:3"
+  # crushbus 51 (range 16 2.5 "^53")
+  # sz 0.9
+  # room 0.3
+  # cut 5
+  # midiG' "^81" 0 1.2
+d7 $ gF2
+  $ midiOn "^57" (off "e" (mask "t!7 f"))
+  -- $ struct "t*4"
+  $ note (arp "<up down>" $ "<c3'nine'5!2 g3'min7'5!2>")
+  -- $ note (arp "<up up>" $ "<>")
+  # "bassWarsaw"
+  # crushbus 71 (range 16 2.5 "^54")
+  # midiG' "^82" 0 1.8
+d6 $ gF2 $ gM
+  $ midiOn "^57" (ply "4 8")
+  $ "90s_matrix:0"
+  # crushbus 61 (range 16 2.5 "^55")
+  # sz 0.9
+  # cut 6
+  # midiG' "^83" 0 2
+d8 $ gF2
+  $ struct "t*16"
+  -- $ superimpose (|+| note "[0 12]")
+  $ arp "up"
+  $ note ("a3'min'4" + "[0,<12!3 24>]")
+  # "acidOto3092"
+  # crushbus 81 (range 16 3.5 "^56")
+  # rel 2
+  # midiG' "^84" 0 2
+d9 $ gF -- Breaks silence pesant.
+  $ slice 8 "<0 1 2 3> . <~!4 5 6 7>"
+  $ loopAt 4
+  $ "drums_atari:15"
+  # midiG' "^20" 0 2
+  # cut 9

live/collab/josh/oct_18_rainy_day.tidal

+
+-- Intro: only the leads
+-- Work snare in, then bass
+--
+--
+
+do
+setcps (114/60/4)
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+d1 $ gM2 $ gF1 -- Kick solide
+  $ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
+  $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 5000)) "kick:4"
+  $ midiOn "^42" (struct "t*4")
+  $ midiOff "^42" (<| "k ")
+  $ "[jazz,kick:4,909]"
+  -- # midiG' "^78" 0 1.2
+  # gain 1.2
+d2 $ gM1 $ gF1
+  $ "~ s . ~ <~!4 s ~ ~ s> s ~" # "snare:38"
+  # pan 0.65
+  # room 0.8 # sz 0.8 # dry 1
+  -- # midiG' "^79" 0 1.5
+  # gain 1.5
+d3 $ gM1 $ gF1
+  $ "[~ d ~ d ~ d*<2!2 1 2> ~ d]"
+  # "electrn:4"
+  # hpf 7000
+  -- # midiG' "^80" 0 1.6
+  # gain 1.6
+d4 $ gF2
+  $ midiOn "^89" (ply "<4 8>" . slow 2)
+  $ midiOff "^57" (mask "f(4,8,1)")
+  $ note ((slow 2 $ ("<e3 e3 b3 <b3 b3 a3 a3>>" + "[0,0(4,8,1)*2]"))
+    -- "<[d,f,a,c6,e6,g6] [ef, gf, bf, df6,f6,af6]>"
+    )
+  # crushbus 41 (range 16 2.5 "^53")
+  # "bassWarsaw"
+  # pan 0.25
+  -- # midiG' "^81" 0 1.5
+  # gain 1.5
+d5 $ gM3 $ gF3
+  $ midiOn "^58" (mask "t(<1 2>,4)")
+ -- c e d b / c a d b / a c b g    / c a g b
+  $ note ("<[c@2 e@2 d@1 b4@3]!2 [c@2 a4@2 d@1 b4@3]!2 [a4@2 c@2 b4@1 g4@3]!2 [c@2 a4@2 c@1 b4@3]!2>" - 3)
+  # att 0.8
+  # rel 2
+  # "superfork"
+  # pan (slow 16 $ range 0.95 0.65 saw)
+  # hpf 300
+  -- # velocity 0.45
+  -- # midiG' "^82" 0 2.5
+  # gain 2.5
+  # crushbus 51 (range 16 4.5 "^54")
+  # roombus  52 (range 0 0.5 "^54") # sz 0.5 # dry 1.3
+d8 $ gF1
+  $ midiOn "^92" (ply "1 <2 4 4 8>")
+  $ chop 16
+  $ loopAt 2 $ "break:18"
+  # cut 8
+  # pan 0.8
+    -- # midiG' "^84" 0 1.4
+d9 $ gF2 -- Pads atmospheriques
+  $ off 0.25 ((# pan 0.8) . (# cut 91))
+  $ note ("<e4 e4 b4 <b4 b4 a4 a4>>"
+  - 12
+  -9 -- calage
+  )
+  # "trance_pads:7"
+  # cut 9 # legato 2
+  -- # midiG' "^20" 0 1
+  # pan 0.2
+  # room 0.4
+
+
+
+
+
+
+
+
+once
+  $ note "c@2 e@2 d@1 b4@3"
+  -- $ note "c e d b4"
+  # "[FMRhodes1,FMRhodes2]"
+  # modIndex 0.5
+  # room 0.2 # dry 1 # sz 0.5
+
+once
+  $ note ("c@2 e@2 d@1 b4@3" - 3)
+  # "trance_amb:3"
+  -- # start 0.01
+  # legato 0.25
+  # att 0.05
+  # rel 0.2
+  # cut 5
+  -- # hpf 500
+  -- # room 0.1
+  -- # dry 0.9
+
+
+
+
+-- Fundamental C
+-- First loops on B
+-- Eventually resolved in A
+
+d5 $ gF1
+  $ "trance_syn:10"
+  # midiG' "^82" 0 1.1
+  # cut 5
+
+do
+-- resetCycles
+setcps (120/60/4)
+  $ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
+  $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 5000)) "kick:4"
+  $ midiOn "^42" (struct "t*4")
+  $ midiOff "^42" (<| "k . ~ <~!3 k> ~ ~")
+  $ "[jazz,kick:4]" # lpf 3000
+  # midiG' "^78" 0 1.5
+d2 $ gM1 $ gF1 -- snare contretemps variable
+  $ midiOn "^43" (<| "~ cp ~ cp")
+  $ midiOff "^43" (<| "~ cp")
+  $ "[cp]"
+  # pan 0.65
+  # legato 0.22
+  # midiG' "^79" 0 1.5
+d3 $ gM1 $ gF1
+  $ "~ d ~ d ~ d ~ <d!12 [~ d]!3 [d d]>"
+  # "snare:34"
+  # hpf 7000
+  # midiG' "^80" 0 1.5

live/midi/nova/ambient/prestance.tidal

+
+-- Prestance
+do
+setcps (134/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let praxis = "<[~ d5 d4 e4 g4 a4 b4 d4] [e4 g4 a4 b4 <e4 g4>@4]>"
+d1 $ gF1 $ gM
+  $ midiOn "^42" (<| "k k k k*<1!7 2>")
+  $ midiOff "^42" (<| "k . k(<0!3 1 0 1 3 3>,8,<0!3 6>)")
+  $ "[jazz,808bd:3]"
+  # midiG' "^78" 0 1.4
+d2 $ gF1
+  $ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
+  $ midiOff "^43" (<| "~ <~ c>")
+  $ "cp"
+  # note "-4"
+  # midiG' "^79" 0 1.8
+d3 $ gF1 $ gM
+  $ midiOn "^76" (loopAt 2 . (>| "jungle_breaks:35"))
+  $ midiOn "^44" (off 0.5 (ply "<1!3 2>"))
+  -- $ chop 8
+  $ midiOff "^76" (slice 8 "<0 1 2 3 [0 1] [1 2] [1 2] [1 2]>")
+  $ loopAt 2
+  $ "break:20"
+  # midiG' "^80" 0 1.4
+d4 $ gF2 $ gM2 $ note "<[a2@2 ~ ~ a2 b2 ~ <~!1 <b2 e2>>] <e2 g2>>"
+  # "FMRhodes1" # cut 4
+  # modIndex 5
+  # room 0.2
+  # delay 0.8
+  # delayfb "<0.1!3 0.65>"
+  # delayt 0.125
+  # crushbus 41 (range 16 2.5 "^53")
+  # midiG' "^81" 0 1.6
+d6 $ gF3 $ gM2
+  -- $ mask "<f!12 t!4>"
+  $ note praxis
+  # "bassWarsaw"
+  # modIndex 5
+  # crushbus 61 (range 16 2 "^56")
+  # midiG' "^17" 0 1.4
+  # pan 0.3
+d7 $ gF3 $ gM2
+  $ mask "<t(10,16)!8 f(10,16)!8>"
+  $ note (praxis + 36)
+  # "prophet5pwmStrings"
+  # pan 0.9
+  # midiG' "^18" 0 1.4
+d8 $ gF3 $ gM2
+  -- $ mask "<f(10,16)!8 t(10,16)!8>"
+  $ juxBy 0.3 (mask "t(3,8) . t(12,16)" . (|+ note 12))
+  $ note (rev praxis)
+  # "moogBass"
+  # modIndex 5
+  # pan 0.9
+  # midiG' "^19" 0 1
+d9 $ gF2
+  $ n "14 <13 14 14 13>"
+  # note (
+    "<[~ d4@7] [~ <e4 g4>@7]>"
+    + 12
+  )
+  # "meth_bass"
+  # crushbus 91 (range 16 2.5 "^55")
+  # midiG' "^83" 0 1
+  # cut 9
+d10
+  $ mask "<f!14 t f>"
+  $ "jungle_pads:4@2"
+  # cut 10
+  # midiG' "^13" 0 1

live/midi/nova/beatober/oct_15_midoct.tidal

+
+do
+setcps (90/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+d1 $ gF1
+  $ "k [~!3 k] <~!2 k ~> <~!8 [~ <~ <k k*2>>]!24>" -- Swing Groove
+  -- $ "k ~ k ~" -- Classic Boom-Bap
+  # "[808bd,808bd:4]"
+  # pan 0.3
+  # midiG' "^78" 0 1.5
+d2 $ gF1 -- BREAKBEAT
+  $ mask "[f t!3] [t!3 f] [<t!2 f t> t] [<t!8 [t f]>]" -- Mask Swing Groove
+  -- $ someCyclesBy "^31" (juxBy 0.8 ((# cut 81) . rev))
+  $ slice 4 "0 1*<1!3 2> 2*<1 2> 3*<1 <1 2 [4 2] [8 4]>>"
+  $ chop 16
+  $ loopAt 2
+  $ "break:2"
+  -- # speed (range 0 2 "^51")
+  # cut 8
+  # midiG' "^79" 0 1.5
+d3 $ gF1 -- Hats swing constantes
+  $ someCyclesBy "<0!32 1!32>" (ply "1 1 1 [<1 1 2 <1 <4 2>>> <2 1 1 <2 4>>]")
+  $ someCyclesBy "<1!32 0!32>" ((ply "1!3 [<1 1 2 <1 2>> 2 <1 2>]") .(off 0.125 id) . (swing 4))
+  $ "h*8"
+  # "electrn:4"
+  # cut 3
+  # pan 0.2
+  # midiG' "^80" 0 1
+d4 $ gF2
+  $ whenmod 8 7 (ply "2 <2 4>")
+  $ slice 4 "0 <~!4 1 ~ 1 ~ 1 2 1 2 [1 2] [1 3] [2 3] [1 2 2 3]>"
+  $ "fbass:12"
+  # room 0.4
+  # sz 0.5
+  # cut 4
+  # crushbus 41 (range 16 2.5 "^53")
+  # midiG' "^81" 0 1
+d10 $ gF3
+  $ slice 4 "<0!4 ~!12> ~ <~ <2 2?>> <~!32 3*<[1]!8 1 2 2 4 4 2 4 4>!32>"
+  $ "weird_dialogs:1"
+  # cut 10
+  # att 0
+  # rel 2.9
+  # midiG' "^20" 0 1.8
+  # pan 0.8
+d9 $ gF3
+  -- $ mask "<t!4 f!4 t!24>"
+  $ chop 4
+  $ "weird_dialogs:25"
+  # cut 9
+  # pan "<0.2 0.8>"
+  # crushbus 91 (slow 16 $ range 16 3.5 saw)
+  # midiG' "^19" 0 1.8
+  |* gain (0.8 + (range 0 0.28 saw))
+
+
+  c g  show
+
+  cs gs

live/midi/nova/beatober/oct_4.tidal

+-- Octobre Jaune
+resetCycles
+
+do
+setcps (117/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+d1 $ gM2 $ gF1 -- KICK SOUTENANT
+  $ midiOn "^42" (<| "k k k <k!3 [<~ k> k]>")
+  $ fix ((# lpf 4000) . (# drumFrom "rolandtr909" "bd:4")) "909bd"
+  $ "[jazz,909bd]"
+  # midiG' "^78" 0 1.9
+d2 $ gF1
+  $ fix (whenmod 4 3 (ply "4 [4 <1 2>]") . (|* gain 0.8) . (# rel 0.1)) "clap"
+  $ fix ((# n 2) . (# pan 0.2) . (# note "-24")) "glitch"
+  $ whenmod 32 0 (superimpose ((# "clap")))
+  $ "~ glitch"
+  # begin 0.02
+  # end 0.35
+  # pan 0.8
+  # midiG' "^79" 0 1.9
+d3 $ gF1 -- Hats reguliers mais varies 
+  $ midiOn "^44" (ply 2)
+  $ midiOn "^76" (struct "t(3,8). t(5,8)")
+  $ someCyclesBy "<1!8 0!56>" (mask "f . t f")
+  $ "~ h ~ h ~ h*<1!7 2> ~ h"
+  # drumFrom "rolandtr909" "hh:2"
+  # hpf 5000
+  # midiG' "^80" 0 1.9
+  |* gain (range 0.85 1 (fast 4 sine + (slow 2 perlin)))
+d8
+  $ gF1
+  $ "~ rampleS0"
+  # n "<6!6 7 7>"
+  # pan 0.8
+  # midiG' "^79" 0 0.9
+d4 $ gF2 -- MATRIX BASS
+  $ slow 2
+  $ midiOn "^57" (# freeze 0.1)
+  $ midiOn "^89" (slice 8 "0*[8 16]")
+  $ note "<[f@3 <cs!3 [cs ds]>] c>"
+  # "90s_matrix:0"
+  # cut 4
+  # tremoloratebus 41 (range 0 (slow 4 "<2 4 8 16>") "^53")
+  # tremolodepthbus 42 (range 0 0.9 "^53")
+  # combbus 43 (range 0 0.5 "^17")
+  # ampbus 44 (range 1 1.25 "^17")
+  # distortbus 45 (range 0 0.5 "^33")
+  # pan "<0.8!32 0.2!32>"
+  # midiG' "^81" 0 2.4
+d5 $ gF2 -- ACID bassline
+  -- $ note "f@2 f e@2 e ef2"
+  $ midiOn "^58" (# freezebus 51 0.1)
+  $ note (
+    "f@2 f <gs!2 gf!2>@2 <gs!2 g!2> <g!2 gs <gs gs5>>@2"
+    - 12
+    )
+  # distortbus 51 (range 0 2.5 "^54")
+  # "90s_matrix:4"
+  # pan "<0.2!32 0.8!32>"
+  -- # octave 3
+  # cut 5
+  # midiG' "^82" 0 1.9
+d7 $ gF3 $ note (
+  "0([3 <3!3 5>],8) . c(<3!7 [3 5]>,8)"
+  )
+  # "superfork"
+  # room (slow 16 $ range 0 0.2 saw)
+  # delay (slow 32 $ range 0 0.5 saw)
+  # octersubbus 71 (range 0 2 "^55")
+  # octersubsubbus 72 (range 0 2 "^55")
+  # pan (slow 16 $ (saw + 0.2 * perlin))
+  # midiG' "^83" 0 1.9
+-- c bf g
+d10 -- RISE!
+  $ fix (
+    loopAt 4
+    . (# "risers:4")
+    . (# pan 0.2)
+    . (# room 0.4)
+    -- . (# gain 0)
+    . (# cut 81)) "r1"
+  $ fix (-- laser rise
+    loopAt 8
+    . (# "risers:11")
+    . (|* gain 0.9)
+    . (# pan 0.9)
+    . (# room 0.4)
+    . (# drybus 82 (slow 4 $ range 0.5 1.2 saw))
+    . (# sz 0.8)
+    . (# cut 82)) "r2"
+  $ "[<~ ~ ~ <r1!3 ~>>,<~!24 ~!8 r2 ~!7>]"
+  # midiG' "^20" 0 1.3
+
+-- risers:3 annonce
+-- risers:4
+once $ "risers:11"
+  # gain 0.7
+  # end 0.85
+  # cut 9
+
+once $ "rampleS0:6" # cut 4
+
+once
+  $ fix (# drumFrom "rolandtr909" "cp:1") "cp"
+  $ "[psr:1,cp]" # gain 0.8
+
+  ef-f. f-e e-es.. es-e-es-f......
+
+once $ drumFrom "rolandtr808" "bd:4"

live/midi/nova/beatober/oct_5.tidal

+do
+-- resetCycles
+setcps (165/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let gDJF = (whenmod 64 32 (# djfbus 1 (slow 16 $ range 0.01 0.45 saw)))
+let gDJF = id
+d1 $ gDJF $ gM2 $ gF1 -- KICK SOUTENANT
+  $ midiOn "^42" (<| "k . ~ k ~ ~")
+  $ fix ((# drumFrom "rolandtr909" "bd:3")) "909bd"
+  $ "[jazz,909bd]"
+  # midiG' "^78" 0 1.9
+d2 $ gDJF $ gF1 $ gM
+  $ fix (whenmod 4 3 (ply "4 [4 <1 2>]") . (|* gain 0.8) . (# rel 0.1)) "clap"
+  $ fix ((# n 2) . (# pan 0.2) . (# note "-24")) "glitch"
+  $ fix ((|* gain 0.85) . (# note "-2")) "snare"
+  $ whenmod 32 0 (superimpose ((# "snare:22")))
+  $ "~ s ~ s*<1!3 2>"
+  # "glitch"
+  # begin 0.02
+  # end 0.15
+  # pan 0.8
+  # midiG' "^79" 0 1.9
+d3 $ gDJF $ gM $ gF1
+  $ midiOn "^76" (mask "t(16,32)" . ply 2 . off "e" id)
+  $ "~ h ~ h*<1!3 2> ~ h ~ h"
+  # "h2ogmhh"
+  # attbus 31 (range 0.2 0.05 "^52")
+  # midiG' "^80" 0 1.9
+  |* gain (range 0.85 1 (fast 2 perlin))
+d4 $ gF2
+  $ note "<d4 e4 a3@2>"
+  # "90s_matrix:3"
+  # cut 4
+  # pan 0.2
+  # crushbus 51 (range 16 2.5 "^53")
+  # triodebus 52 (range 0 4 "^33")
+  # midiG' "^81" 0 2
+d5 $ gDJF $ gF1
+  $ whenmod 8 7 (# delay 0.6)
+  $ someCyclesBy "<<f t? t t> t f>" (off "e" ((|+ pan 0.1) . (|* gain 0.75) . (|+ note 7)))
+  $ note ("0(3,8,1)" |+ "<e <c d f c  c f a c > <a4!4 d!3 a4>@2>")
+  # "FMRhodes1"
+  # pan 0.8
+  # room 0.2
+  # midiG' "^82" 0 1.9
+d6 $ gF3
+  $ mask "<[t <t f>. f]!8 [t . f t]!8 t!16>"
+  $ whenmod 64 32 (
+    fix (|* gain (slow 32 $ range 0.15 1 saw)) "cpluck:4"
+    . fix (|* gain (slow 32 $ range 0.5 1 saw)) "cpluck:6"
+    )
+  $ fix (|* gain (slow 32 $ range 0 1 cosine)) "cpluck:5"
+  $ fix (|* gain (slow 32 $ range 0.5 0 sine)) "cpluck:6"
+  $ note ("e@2 c@2 e <f g c b4>")
+  # hbrickbus 61 (range 0 0.4 "^55")
+  # "[cpluck:4,cpluck:5,cpluck:6]"
+  # rel 2
+  # pan 0.2
+  # att 0.01
+  # midiG' "^82" 0 1.3
+d7 $ gF3
+  $ note ("0(<3!2 [3 5] <3 5>>,8)" + "<<d!3 g> [e <e f>] a4@2>")
+  # "moog:1"
+  # pan (slow 16 $ range 1 0.7 saw)
+  # gain 0.7
+  # room 0.4
+  # delay (slow 8 $ range 0.5 0.5 saw)
+  # delayt (1/8)
+  # delayfb (slow 16 $ range 0.1 0.8 saw)
+  # cut 7
+  # crushbus 71 (range 16 2.4 "^55")
+  # lpf 4000
+  # midiG' "^83" 0 1.3
+d8 $ gM $ gF1
+  $ midiOn "^92" (ply 2)
+  $ slice 8 (run "8 . <8!6 4 [4 8]> <8 8 16 <16 32>>")
+  $ loopAt 2
+  $ "jungle_breaks:20"
+  # cut 8
+  # midiG' "^84" 0 1.9

live/midi/nova/breaks/code_secret.tidal

+-- CODESECRET
+-- E B E G B
+-- E C E G C
+-- E C#E G C#
+-- E C E G C
+-- CODESECRET
+do
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+setcps (93/60/4)
+d1 $ gF1
+  $ midiOn "^42" (<| "k k k k")
+  $ midiOff "^42" (<| "k ~ ~ <~ k> . ~ k ~ <~!3 k*<1 2>>")
+  $ fix ((# att 0.1) . (# rel 10)) "wobble"
+  $ "[jazz,808bd:4,wobble]"
+  # midiG' "^78" 0 1.5
+d2 $ gF1
+-- $ mask "<f!8 t!24>"
+  $ "~ s" # "snare:40"
+  # midiG' "^79" 0 1.4
+  # pan 0.8
+d3 $ gF1 $ "~ h ~ h ~ h ~ [<h!2 ~ h> h*<1!7 2>]"
+  # "hh" # pan 0.8
+  # midiG' "^80" 0 1.4
+d4 $ gF2
+  $ note "<[e2,b2] [e2,c3] [e2,cs3] [e3,c3]>"
+  # "moogBass"
+  # pan 0.1
+  # midiG' "^81" 0 1.8
+d5 $ gF3
+  $ midiOn "^58" (ply "<[4 2] 4 [4 8] [4 <[8 4] <16 [16 4]>>]>")
+  -- $ arpeggiate
+  $ note ( -- TODO ADD CLIMB?
+    "<[e4,g4,b4] [e4,g4,c5] [e4,g4,cs5] [e4,g4,c5]>"
+    |+| "<[~!3 0]!8 [~ 0 ~ 0]!8 [~ 0 ~ 0*2]!8 [~ 0 ~ ?]!8>"
+    + (slow 4 "<0 <12 24>>")
+    -- + "12"
+  )
+  # modIndex (range 0 4.5 "^34")
+  # crushbus 51 (range 16 4.5 "^54")
+  # "FMRhodes2"
+  # pan 0.8
+  # midiG' "^82" 0 1.4
+d8 $ gF3
+  $ midiOn "^92" (ply 4)
+  $ slice 4 "0 1 2 3*<1 2 4 8>"
+  $ loopAt 4
+  $ "trance_loops:0"
+  # cut 8
+  # midiG' "^84" 0 1.8

live/midi/nova/breaks/monday_fairy.tidal

+-- Monday fairy
+do
+setcps (120/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let maskDrum  = "t(5,8) . t(9,16)"
+let maskDrumI = "f(5,8) . f(9,16)"
+d1 $ gF1 $ gMute2
+  $ midiOn  "^42" (<| "k k k k")
+  $ midiOff "^42" (<| "k . k(3,8)")
+  $ "[techno:0,808bd:2,jazz]"
+  # midiG' "^78" 0 1
+d2 $ gF1 $ gM
+  $ midiOn "^43" (<| "~ c ~ c")
+  $ midiOff "^43" (<| "~ c")
+  $ "cp"
+  # midiG' "^79" 0 1
+d3 $ gF1 $ gM
+  $ mask "<f!8 t!24>"
+  $ midiOn "^44" (const -- JIUUUUUUNGLE
+    $ midiOn "^76" (# n 70)
+    $ sometimesBy "^52" (ply "<2 <4 [4 8]>>")
+    $ loopAt 4
+    $ chop 8
+    $ "jungle_breaks:10"
+    # midiG' "^80" 0 1
+  )
+  $ "~ h ~ h*<1 1 2 1> ~ h ~ h*<1 2>"
+  # "808cy" # n "<7!12 [7,8] [7,9] [7,10] [7,1]>"
+  # legato 1
+  # room 0.1 # dry 1.1
+  # midiG' "^80" 0 1
+d4 $ gF2 -- the bassy fright
+  $ fix (|* gain 0.8) "bass2"
+  $ note "<0 2 5 <7 8>>(<3 [3 5] 3 <3 5>>,8)"
+  # "[bass2:4,bass3:0]"
+  # att "<0.25 0.2 0.15 <0.125!3 0.5>>"
+  # rel 10
+  # lpf 200
+  # room 0.4
+  # sz 0.8
+  # midiG' ("^81" - 0.35 * "^53") 0 1.2
+  # distortbus 41 (range 0 1 "^53") -- FIXME: Meileur effet
+  # lpfbus   42 (range 4000 500 "^53")
+  # roombus  43 (range 0.4 0.14 "^53")
+d5 $ gF3 -- The starry night
+  $ whenmod 64 32 (superimpose ( -- Star rain
+    (|+| note "0 12 0 <12 24>")
+    . slice 4 "0 1 2 3 0 1 2 3*4"
+    . (ply 2)
+    . fast 2
+    ))
+  $ note (
+    "<e5 a4 c5 <[d5 <d5 e5>]>>" -- Mélodie
+    -- + 2 -- Calage
+    + "0([3 5],8, [0 <6 0>])" -- Structure
+  )
+  # "organTonewheel4"
+  # midiG' "^82" 0 0.8
+  # room 0.4
+  # sz 0.8
+  # pan 0.7
+d7 $ gM $ gF1
+  $ midiOn "^59" (mask (cat [maskDrumI,maskDrumI,maskDrumI,maskDrum]))
+  $ slice 4 "0 <1!8 0 0 0 1 0 1 0 1*2> 2 <3*<1 2 4 8> 3*<2 4 8 16> 3 [~ 3*<1 2>]>"
+  $ "break:1"
+  # cut 1
+  # midiG' "^83" 0 1
+d8 $ gM $ gF1
+  $ midiOn "^92" (struct "t . t(<3 <5 [5 8]>>,8)")
+  $ midiOn "^60" (ply "<[4 2 2 4] [4 8 4]> <8 8 16 [16 32]>")
+  $ midiOn ("^59" - "^60") (mask (cat [maskDrum,maskDrum,maskDrum,maskDrumI]))
+  $ chop 16 $ loopAt 4
+  $ "break:3"
+  # midiG' "^84" 0 1
+  # cut 2
+d12 $ gF3 -- Vocals with delay :sunglasses:
+  $ whenmod 128 (128-16) (# n "<~ <37 38>>") -- Help me!
+  $ whenmod 128 32 (# n "<~ <5 4>>") -- Mutters
+  $ n "<~ <50!3 [50@1 51@2]>>" -- Ways to die / souls
+  # "jungle_vocals"
+  # cut 12
+  # delay (slow 16 $ range 0.1 0.8 perlin)
+  # delayfb 0.8 # delaytime "<0.25!3 0.5>"
+  # midiG' "^17" 0 0.48
+d9 $ gF3 -- Ambiance: verre entier
+  $ note "<a3@2 <c4@2 [c4@3 d4]>>"
+  # "90s_glassatm"
+  # cut 9
+  # pan 0.2
+  # midiG' "^18" 0 0.45
+d10 $ gF1 -- Ambiance: JUNGLE NOISES
+  $ fix (
+    (ply "<1 [1 [2 [4 [8 16]]]]>")
+    . (# "jungle_fx:13")
+    . (|* gain 0.8)
+    ) "j3"
+  $ fix (# "jungle_fx:14") "j2"
+  $ fix (# "jungle_fx:8") "j1"
+  $ stack [
+  "<~!7 j1>",
+  "<~!8 j3 j3 ~!3>",
+  "<~!12 j2 ~!4>"
+  ]
+  # cut 10
+  # midiG' "^19" 0 0.5
+d11 -- Nappes background
+  -- $ (0.125 ~>)
+  $ note "<e4 <d4 [d4 c4]>>/2"
+  # "jungle_pads:9"
+  # legato 2
+  # cut 6
+  # midiG' "^20" 0 0.6

live/midi/nova/punk/punk_teng.tidal

+
+-- The Punk Bass
+do
+setcps (82/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let lineTeng = "cs d d d cs d d d cs d d d g ~ fs ~"
+d1 $ gF1 $ gM
+  $ midiOn "^42" ((<| "k k k k k k <k <~ k*2>> k*<1 2 2 2>") . (# "[jazz:0]"))
+  $ midiOff "^42" (<| "k . <~!4 k!4 k(3,8)!8>")
+  $ "[rootsDrums:0,rootsDrums:4]"
+  -- $ "[techno,jazz,kick:5]*4"
+  # midiG' "^78" 0 1.5
+d3 $ gF1 $ gM
+  $ "[~ drum:2]*8"
+  # midiG' "^80" 0 1.5
+d4 $ gF2 $ gM2
+  $ midiOff "^57" ((slow 2) . ( # room 0.5))
+  $ note (lineTeng)
+  # "rootsBass"
+  # crushbus 41 (range 16 2.5 "^53")
+  # end 0.35 # room 0.3
+  # legato 2 # gain 1.9 # cut 1
+  # midiG' "^81" 0 1.5
+d8 $ gF1
+  $ midiOn "^92" (ply "1 2")
+  $ midiOn "^60" (slice 16 (run "<16!8 [16 8]!7 [8 16]> <16!3 <32 [8 32]>>") )
+  $ chop 8
+  $ (someCyclesBy "^20" (# n "21"))
+  $ "jungle_breaks:33"
+  # midiG' "^84" 0 1.5

live/midi/nova/techno/around_the_bass.tidal

+-- Around the Bass
+do
+setcps (120/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let lineGoodLife = "b3 ~ ~ b3 ~ ~ b3 ~     ~ fs3 ~ ~ fs3 ~ ~ a3           ~ a3 ~ a3 ~ ~ e3 ~       ~ e3 ~ e3 b3 ~ b3 ~"
+let lineAround0 = "~ ~ ~ ~ a4 ~ ~ ~ a4 ~ ~ ~ a4 ~ b4 c5"
+let lineAround1 = "~ ~ ~ ~ c5 ~ ~ ~ c5 ~ ~ ~ c5 ~ d5 e5"
+let lineAround2 = "~ ~ ~ ~ e5 ~ ~ ~ e5 ~ ~ ~ e5 ~ ~ ~"
+let lineAround3 = "fs5 ~ e5 ~ d5 ~ c5 ~ b4 ~ a4 ~ g4@3 a4"
+d1 $ gF1 $ gM2
+  $ "[techno,jazz,kick:5]*4"
+  # midiG' "^78" 0 1.5
+d2 $ gF1 $ gM
+  $ whenmod 32 24 (fast "<2!3 [<2 4> 4]>")
+  $ "~ [cp,snare:24]"
+  # pan 0.7
+  # midiG' "^79" 0 1.4
+d3 $ gF1 $ gM
+  $ sometimesBy (slow 16 $ range 0 0.5 saw) (mask "t(3,8) t(5,8)")
+  $ "hh*[16 16 16 <8!2 16 12>]"
+  # midiG' "^80" 0 1.6
+  # room 0.2 # dry 1
+  # pan (0.4 + 0.2 * (slow 4 perlin))
+d4 $ gF2 $ gM
+  -- $ note (slow 2 $ lineGoodLife) # "bassWarsaw"
+  $ midiOn "^89" (|+ note "c'minPent'2")
+  $ midiOn "^57" (<| note lineAround3)
+  $ midiOff "^57" (<| note (cat [lineAround0, lineAround1, lineAround2, lineAround3]))
+  $ "bassWarsaw"
+  # octave 4
+  # crushbus 41 (range 16 2.5 "^53")
+  # octersubbus 42 (range 0 4 "^33")
+  -- # delayfb 0.8 # delayt 0.25
+  # midiG' "^81" 0 1.4
+  # pan 0.3
+d5
+  $ midiOn "^90" (sometimesBy "0 1" rev)
+  $ midiOn "^58" (struct "t(<3!3 <5 2>>,<8!7 4>) . t(<5!7 <8 16>>,8)" . arp "pinkyup")
+  $ note ("<[a4,c4,e4] [c4,e4,g4] [e4,g4,b4] [d4,fs4,g4]>")
+  # "moogBass"
+  # midiG' "^82" 0 1.6
+d8 $ gF3
+  $ midiOn "^20" (# n "20")
+  $ midiOn "^92" ((# pan 0.4) . (# n "19"))
+  $ sometimesBy "^56" (slice 4 ("0 <1 <1*2 ~> ~ 1> <2 ~> 3*<1 <2 4>>"))
+  -- $ whenmod 4 3 (slice 4 ("0 1 2 3*4"))
+  $ loopAt 2 $ chop 8
+  $ n "24" # "jungle_breaks"
+  # pan 0.55
+  # midiG' "^84" 0 1.8

live/midi/nova/techno/ete_a_mauerpark.tidal

--- L'Ete a MauerPark
+-- L'Été a MauerPark
+
+
 do
 setcps (120/60/4)
 let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
@@ -7,8 +9,10 @@ let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
 let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
 let gMute = (midiOn "^73" (mask "f*16"))
 let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
 let gM = gMask . gMute
 let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
 let gLPF = whenmod     64 48 (# lpfbus 4 (slow 16 $ range 20000 200  saw))
 let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw))
 let chorus = pF "chorus"
@@ -16,17 +20,16 @@ let lagamount = pF "lagamount"
 let dec = pF "dec"
 let sus = pF "sus"
 let cutoff = pF "cutoff"
-d1 $ gF $ gMute
-  -- $ midiOn "^74" (fast 2)
+d1 $ gF $ gMute2
   $ fix (|* gain 0.9)"kick:4"
   $ midiOn  "^42" (struct "t t t t") -- Le Run
   $ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
-  -- $ midiOff "^42" (struct "t . ~ t ~ ~")
   $ "[techno:0,808bd:2,909,kick:4]"
   # att 0.015
   # rel 0.125
   # room 0
   # lpf 4000
+  # gain 1.1
   -- # midiG' "^78" 0 1.9
 d2 $ gF $ gMute -- Clap timer
   $ midiOn "^43" ((|* gain "0 1 0.8 1") . (<| "~ c <~!3 [~ c]> c"))
@@ -34,7 +37,8 @@ d2 $ gF $ gMute -- Clap timer
   $ drumFrom "[sakatadpm48,rolandr8]" "cp"
   # lpf 2000
   -- # midiG' "^79" 0 1.9
-d7 $ gF3 $ gM2 -- High Cello Dauphin
+d7 $ gF3 $ gM3 -- High Cello Dauphin
+  $ midiOn "^91" (ply 2)
   $ midiOn (1 - "^35") (struct "t . f")
   $ struct "t@2 t*<1 2 1 <4 1>> t*<1 2 4 8>"
   $ midiOn "^59" (|- note 12)
@@ -47,35 +51,36 @@ d7 $ gF3 $ gM2 -- High Cello Dauphin
   # pan 0.9
   # crushbus 71 (range 16 2.5 "^55")
   -- # midiG' "^83" 0 1.2
-d3 $ gF $ gMute2
-  $ midiOn "^44" (mask "t([8 4 <4 <8 16>>],16)")
+d3 $ gF $ gMute
+  $ midiOff "^44" (mask "t([8 4 <4 <8 16>>],16)")
   $ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]")
   $ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh"
   $ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]"
   # n "0!3 <0!3 1>"
   -- # midiG' "^80" 0 1.6
-d4 $ gF2 $ slow 2 -- Basse Germanique
+d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique
+  $ midiOn "^57" (rev)
   $ midiOn "^89" (struct "t*<16 32>") -- Basse folle
   $ (0.125 <~) -- Calage :)
   $ someCyclesBy (1 - "^33") (
     (mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
     ) --
-  $ fix ((midiOff "^57" (# silence)) . (|* gain 0.8) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5))
+  $ fix ((midiOff "^57" (# silence)) . (|* gain 0.65) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5))
   "bass2"
   $ note (
     "<[g4 c ef@14] [<c g> ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>"
     - 24
     )
-  # "[bass2:1,bassWarsaw]" -- TODO: Autre basse moins venere?
+  # "[bass2:1,bassWarsaw]"
   # room 0.2
   # pan 0.4
   # crushbus 41 (range 16 2.5 "^53")
   -- # midiG' "^81" 0 1.6
-d6 $ gF3 $ gMute2 -- Leads reponse
+d5 $ gF3 $ gMute2 -- Leads reponse
   $ midiOn "^90" (struct "t*<16 32>") -- Basse folle
   $ midiOn "^58" (|+ note 12)
-  $ sometimesBy "^18" (bite 4 "[0, [~ 2]]")
-  $ someCyclesBy "<f!3 t>" (mask "t f!15". (# legato 2))
+  -- $ sometimesBy "^18" (bite 4 "[0, [~ 2]]")
+  -- $ someCyclesBy "<f!3 t>" (mask "t f!15". (# legato 2))
   -- $ (0.125 <~) -- Calage :)
   -- $ someCyclesBy "^17" (
     -- (mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
@@ -84,28 +89,29 @@ d6 $ gF3 $ gMute2 -- Leads reponse
   $ swing (1/3)
   $ note (
     "<ef4 g4 <ef g> d>"
-    + "<0!0 [0 12]!0 [0(2,8), <12!3 -12>([<1 3> 3],8,3)]!32>"
-    + "[0,<7 12 12 7>]"
     - 12
     )
   # "FMRhodes1"
   # room 0.2
   # pan 0.33
-  # modIndex (range 0 16 "^34")
-  # crushbus 61 (range 16 2.5 "^54")
+  # modIndex (range 0.1 16 "^34")
+  # crushbus 51 (range 16 2.5 "^54")
   -- # midiG' "^82" 0 1.5
-d8 $ gM $ gF3 -- Breaks divins
+d8 $ gM $ gF -- Breaks divins
   $ midiOn "^92" (off "e" id)
   $ midiOn "^60" (mask "[f t]")
-  $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81))
+  $ someCyclesBy "^36" (loopAt 2
+      . mask "t(16,16,0)"
+      . chop 16
+      . (# n 83))
   $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3"))
   $ loopAt 2
   $ chop 8
   $ "jungle_breaks:1"
   # cut 8
   # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4"
-  # midiG' "^84" 0 1.4
-d9 $ gF3
+  # gain 0.7
+d9 $ gF3 -- Nano-angels chorus of machines
   $ sometimesBy "^19" (superimpose (
     (# cut 101)
     . (arp "up")
@@ -120,7 +126,7 @@ d9 $ gF3
     + "[0,[0*<1 1 2 <2 1>> .  0 12*<1 2>]]"
     )
   # chorus (range 0 2 "^35")
-  # "moogBass" -- FIXME: Other synth?
+  # "moogBass"
   # dec 0.2
   # sus 1
   # att (range 0.001 2 "^16")

live/midi/nova/techno/industry/no_panic.tidal

+
+do
+setcps (125/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^13" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let position = pF "position"
+let decaycoeff = pF "decaycoeff"
+let slope = pF "slope"
+d1 $ gM2 $ gF1 $ "k k k <k!3 <k*2 [~ k]>>"
+  # "[jazz,kick:4,kick:7]"
+  # midiG' "^78" 0 1
+d2 $ gM $ gF1 -- Snare be there
+  -- $ mask "<f!16 t!48>"
+  $ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
+  $ midiOff "^43" (<| "~ <~!3 [~ c]> . c" )
+  $ "[cp,h2ogmsn:1]"
+  # lpf 4000 # note "-2"
+  # room 0.4 #  sz 0.3 # dry 1.0
+  # midiG' "^79" 0 1.4
+d3 $ gM $ gF1 -- Runnin' ones
+  $ "h*[<8 [8 4 8]> <8!3 16>]"
+  # drumFrom "rolandtr808" "<oh [oh!6 oh:1 oh:2]>"
+  # midiG' "^80" 0 1.4
+  # pan 0.43
+d4 $ gF2 $ gM2 -- SICK BURN
+  $ midiOn "^89" ((ply "<[8 16] [16 <16!2 32!2>]>") . (# legato 0.25). (# room 0) . (# cut 4))
+  $ superimpose (
+    (# crushbus 42 (range 16 2 "^53"))
+    . (# cut 41)
+  )
+  $ loopAt 2 $ slice 2 "<0 1>"
+  $ "bass_commodore:3/2"
+  -- # lpfbus 41 (range 20000 200 "^33")
+  # cut 4
+  # room 0.8 # dry 1
+  # pan 0.03
+  # midiG' "^81" 0 1.4
+d5 $ gM $ gF3
+  $ whenmod 64 16 ((|+ note "<0 0 0 <4 4 -1 -2>>") . ply 4)
+  $ "90s_matrix:1/4"
+  # pan 0.97
+  # room 0.2
+  -- # cru
+  # midiG' "^20" 0 1.4
+d7 $ gF3 -- Marimba à la mode
+  $ note "<[gs ~ ef gs gs ~ ef gs ~ ef gs ~ ef@2 ~ e] [<~ <gs5 gs4>>]>"
+  # "modalMarimba"
+  # cut 7
+  # pan 0.9
+  # att 0.5
+  # rel 2
+  # position (range 0.96 0.414 "^54") -- 0.414
+  # decaycoeff (range 0 4 "^34")
+  # midiG' "^82" 0 1.4
+  # amp (range 0 1.3 ("^82" - 0.2 * "^54"))
+d8 $ gF1 $ gM -- Break the dance || Dance the break
+  $ midiOn "^92" (ply "<2!3 <4 8>>")
+  $ whenmod 8 7 (striate "1!3 [4 8]")
+  $ whenmod 4 3 (rev)
+  $ loopAt 4
+  $ chop 16
+  $ "jungle_breaks:10"
+  # pan 0.59
+  # midiG' "^84" 0 1.4
+  # cut 8

live/midi/nova/techno/love_of_techno.tidal

+-- Love of Tecno will tear us apart
+do
+let loveTears = "<<e4!3 [e4 fs4 e4@6]> [fs4@2 g4 fs4@2 e4 d4@2] [b3@7 <d4 fs3>] a3>"
+setcps (148/60/4)
+d1 $ "<k!7 [k k*2] [k*4]!8>" # "jazz"
+d2 $ fast "<1!7 [1 4] 2!3 [2 4] 2!3 4>" "~ snare:55"
+d3 $ "[~ hh]*4"
+d4
+  $ note (loveTears
+    + "[0,12]")
+  # "[FMRhodes1]"
+  # gain 1.4
+  # pan 0.8
+d5
+  $ mask "<t!4 f!4> t!12"
+  $ rev
+  -- $ mask "<f!8 t!8>"
+  $ note (loveTears
+    + "[24]")
+  # "[FMRhodes2]"
+  # gain 1.2
+  # room 0.4 # sz 0.4
+  # pan 0.3

live/midi/nova/techno/the_good_bass.tidal

+
+-- The Good Bass
+do
+setcps (120/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let lineGoodLife = "b3 ~ ~ b3 ~ ~ b3 ~     ~ fs3 ~ ~ fs3 ~ ~ a3           ~ a3 ~ a3 ~ ~ e3 ~       ~ e3 ~ e3 b3 ~ b3 ~"
+d1 $ gF1
+  $ "[techno,jazz,kick:5]*4"
+  # midiG' "^78" 0 1.5
+d2 $ gF1
+  $ whenmod 32 24 (fast "<2!3 [<2 4> 4]>")
+  $ "~ [cp,snare:24]"
+  # pan 0.7
+  # midiG' "^79" 0 1.4
+d3 $ gF1
+  $ sometimesBy (slow 16 $ range 0 0.5 saw) (mask "t(3,8) t(5,8)")
+  $ "hh*[16 16 16 <8!2 16 12>]"
+  # midiG' "^80" 0 1.6
+  # room 0.2 # dry 1
+  # pan (0.4 + 0.2 * (slow 4 perlin))
+d4 $ gF2
+  $ midiOn "^89" (|+ note "c'minPent'2")
+  -- $ midiOn "^57" (<| note lineAround3)
+  $ note (slow 2 $ lineGoodLife) # "bassWarsaw"
+  # octave 4
+  # crushbus 41 (range 16 2.5 "^53")
+  # octersubbus 42 (range 0 4 "^33")
+  -- # delayfb 0.8 # delayt 0.25
+  # midiG' "^81" 0 1.8
+  # pan 0.3
+d5
+  $ midiOn "^90" (sometimesBy "0 1" rev)
+  $ midiOn "^58" (struct "t(<3!3 <5 2>>,<8!7 4>) . t(<5!7 <8 16>>,8)" . arp "pinkyup")
+  $ note ("<[a4,c4,e4] [c4,e4,g4] [e4,g4,b4] [d4,fs4,g4]>")
+  # "moogBass"
+  # midiG' "^82" 0 1.6
+d8 $ gF3
+  $ midiOn "^92" ((# pan 0.4) . (# n "19"))
+  $ sometimesBy "^56" (slice 4 ("0 <1 <1*2 ~> ~ 1> <2 ~> 3*<1 <2 4>>"))
+  -- $ whenmod 4 3 (slice 4 ("0 1 2 3*4"))
+  $ loopAt 2 $ chop 8
+  $ n "20" # "jungle_breaks"
+  # pan 0.55
+  # midiG' "^84" 0 1.8

live/midi/nova/techno/tour_du_ciel.tidal

+-- Fais-donc le tour du ciel
+do
+-- resetCycles
+setcps (134/60/4)
+let gDJF1 = (someCyclesBy "<1!16 0!48>" (# djfbus 1 (slow 16 $ range 0.15 0.5 saw)))
+let gDJF2 = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.2 saw)))
+let gDJF3 = (whenmod 64 32 (# djfbus 2 (slow 16 $ range 0.5 0.8 saw)))
+let g = gDJF1 . gDJF2 . gDJF3
+let lineTourDeFrance1 = "<[f3@2 bf3 c4 f4@3 d4] [f4 g4 c4 d4 f4@2 bf4@2] <af4 c5>@2>"
+let lineTourDeFrance2 = "<[g3@2 c4 d4 g4@3 e4] [g4 a4 d4 e4 g4@2 c5@2] <bf4 [bf4@2 ef5 c5@13]>@2>"
+d1 $ g
+  $ "<k!8 [k k k <k [~ k] k k*2>]!24>"
+  # "jazz"
+  # gain 1.05
+d2 $ g $ "~ <~!7 s!25>"
+  # "[snare:45,cpu:3]"
+  # note ("<0!3 <-2 -4>>")
+  # gain (0.85 * "<1!7 <0.9 1.1!3>>")
+d3 $ g $ "dr*[4!3 <8 <16 [16 <8 32>]>>]"
+  # gain (slow 16 $ range 0.5 0.8 sine)
+d4 $ g
+  $ mask "<t(1,4)!4 t!28>"
+  $ whenmod 4 2 (>| note lineTourDeFrance2)
+  $ note (lineTourDeFrance1)
+  # "bassWarsaw"
+  # lpf 500
+  # pan 0.1
+d5 $ g
+  $ mask "<f!8 t!24 f!16 t!16>"
+  $ whenmod 4 2 (>| note lineTourDeFrance2)
+  $ note (lineTourDeFrance1
+    |+| "[0 7 12 0]*2")
+  # "FMRhodes1"
+  # pan 0.9
+  # room 0.5 # sz 0.8
+  # lpf 5000
+  # gain 1.3
+  # cut 4
+d8 $ g
+  $ mask "<f!16 t!16>"
+  $ mask "<t(<3!4 5!3 8>,8) t(<1 3 1 5 1 3 8 8>,8)>"
+  -- $ chop 16
+  $ slice 4 "<0!8 [0 1 2 3]!8 [0 1 2 3 0 1*<1 2> 2*<1 1 2 2> 3*<1!3 4>]!16>"
+  $ loopAt 4
+  $ "jungle_breaks:30"
+  # gain (slow 8 $ range 0.6 0.85 saw)
+  # cut 8
+d7 $ g
+  $ fix (|* gain 0.9) "jungle_fx:19" -- Horn
+  $ fix (|* gain 0.8) "jungle_fx:33" -- Detroit
+  $ stack [
+  "<~!7 jungle_riffs:19>",
+  "<~!2 jungle_riffs:33 ~>"
+  ]
+  # panbus 71 (slow 32 $ range 0.8 0.2 sine)
+  # gain 0.6

live/midi/nova/techno/trn/no_time_to_die.tidal

+
+do
+setcps (123/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM2
+  -- $ someCyclesBy
+  $ midiOn "^42" (<| "t*4")
+  $ midiOff "^42" (<| "t(<3!3 <5 [5 <8 [16 10]>]>>, 8)")
+  $ "[jazz,electrn:8]"
+  -- # midiG' "^78" 0 1
+d2 $ gM
+  $ midiOn "^43" (# note "-24")
+  $ "~ ~ cp*<1!3 2> <~!7 cp>" # "clap"
+  # note "-0"
+  # att 0.01 # rel 0.2
+  # room "<0!8 0.1!8 0.2!8 0.3!8>" # dry "<0.99!7 0.95>"
+  # lpf 5000
+  -- # midiG' "^79" 0 1.4
+  # gain 1.4
+d3  $ gF1 $ gM
+  $ midiOn "^76" (ply "<2!3 4>")
+  $ "~ h ~ h ~ h ~ h"
+  # "electrn:4"
+  # pan 0.9
+  -- # midiG' "^80" 0 1.8
+  # gain 1.8
+d4 $ gF2 -- Maladive boucle
+  -- $ superimpose ((# lpf 2000) . (# cut 41))
+  $ midiOn "^57" (((# freeze 0.4) . chop 4 . (# note "<0 0 2 -2>")))
+  $ midiOn "^57" (# crushbus 44 (range 16 1.6 "^53"))
+  $ midiOff "^57" ((chop 16) . (# octerbus 41 (range 0 1.8 "^53")))
+  $ "trance_syn:0/4"
+  -- # octersubbus 42 (range 0 2 "^33")
+  -- # octersubsubbus 43 (range 0 2 "^17")
+  -- # midiG' "^81" 0 1
+  # cut 4
+  # pan 0.1
+d8 $ gF1 $ gM3 --  rythmique tribale
+  $ midiOn "^60" (iter "<1!8 4!4>" . chop 8)
+  $ midiOn "^92" (ply "<4!3 [8 4 . <16 32 64>]>")
+  $ chop 4
+  $ loopAt 4
+  $ "trance_loops:4"
+  # cut 8
+  # room 0.9
+  # dry (slow 16 $ range 0.99 0.8 saw)
+  # lpf (slow 32 $ range 8000 4000 saw)
+  -- # midiG' "^84" 0 2
+  # gain 2
+d9 $ gF3 $ gM3 -- Harpe magique intro
+  $ chop 4
+  $ loopAt 4
+  $ n "10"
+  # "trance_amb"
+  # cut 9
+  # pan 0.8
+  # lpf 4000
+  # room 0.4 # sz 0.9 # dry 1
+  -- # midiG' "^83" 0 1.5
+
+
+
+d4 -- BassBubbles
+  $ midiOn "^89" (chop 16)
+  $ loopAt 4
+  $ fix ((# cut 41) . (# pan 0.2)) (n "[0,2]")
+  $ fix ((# cut 42) . (# pan 0.4) . (loopAt 2)) (n "[1,3]")
+  $ midiOn "^57" (# n "[2,3]")
+  $ "trance_bass" # n "[0,1]" -- 2
+  # midiG' "^81" 0 1
+
+once $ ""

study/samples/breaksploration.tidal

+
+
+
+
+-- Extra Breaks
+-- break:0 UseMe        slow long  chaleureux
+-- break:1 SesameStreet fast short sec
+-- break:2 DoinTheDo    mid  med   retenue tambours
+-- break:3 FunkyDrummer mid  med   groovy lourd
+
+--
+once
+  -- $ slice 4 "0 <1!8 0 0 0 1 0 1 0 1*2> 2 <3*<1 2 4 8> 3*<2 4 8 16> 3 [~ 3*<1 2>]>"
+  $ "break:3"
+  -- # pan (sine)
+  # gain 0.5
+  -- # pan 0
+  # cut 1

study/samples/drum_machines.tidal

+do
+
+let drumMachine name ps = stack
+                    (map (\ x ->
+                        (# s (name ++| (extractS "s" (x)))) $ x
+                        ) ps)
+    drumFrom name drum = s (name ++| drum)
+    drumM = drumMachine
+    drumF = drumFrom
+
+d1 $ drumMachine "sergemodular" [
+    s "[~perc]*2" # note 7
+    ,s "bd:4(3,8)"
+    ,s "~[cp,sd]"
+    ,s "hh*8"
+]
+
+once  $ "dr"
+
+
+
+do
+ let dm = "linn9000"
+ d1 $ drumFrom dm "bd*2"
+
+ d1 $ drumFrom "linn9000" "bd*2"
+
+
+
+d1 $ drumMachine "<bossdr220 rolandtr808>" [
+    s "[~perc]*2" # note 7
+    ,s "bd:4(3,8)"
+    ,s "~[cp,sd]"
+    ,s "hh*8"
+]
+
+
+-- EXPLORATION
+
+once $ drumMachine ""

study/samples/methlab.tidal

+do
+setcps (85/60/4)
+let g1 = (# djfbus 1 (range 0.05 0.95 "^49"))
+let g2 = (# djfbus 2 "^50")
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let modIndex = pF "modIndex"
+d1 $ g1 $ gMute
+  $ midiOn "^42" (<| "k . ~ k ~ ~")
+  $ midiOff "^42" ( -- JuxGhost
+    juxBy 0.4 ((sometimesBy "0 1" (rev . (|* gain 0.8)))))
+  $ midiOff "^42" (<| "k . k(<3!7 [<3 8> 5]>,8,<0!3 1>)")
+  $ "jazz"
+  # midiG' "^78" 0 1.4
+d2 $ g1 $ gM
+  -- $ "~ s ~ s ~ <s [~ s]> ~ <s [s ~ s <~ s>]>"
+  $ midiOn "^43"  (<| "~ s ~ s*<1!3 2>")
+  $ midiOff "^43" (<| "~ s")
+  $ "meth_snare:2"
+  # midiG' "^79" 0 1.4
+d3 $ g1 $ gM $ loopAt 2 $ "jungle_breaks"
+  # pan 0.2
+  # midiG' "^84" 0 1.4
+d4 $ g1 $ gM
+  $ fix (|* gain 0.9) "dr"
+  $ "h*4 h*<4 [2 <2 4>]> h*<4 4 2 4> h*<3!3 12>"
+  # "[jungle,dr]"
+  # midiG' "^80" 0 1.4
+d5 $ g2 $ gM
+  $ whenmod 64 0 ( -- Délire
+    (whenmod 4 3 (ply "1 4" . slice 4 (run 2))) .
+    (# pan "<0.8 0.8 0.2 0.8>")
+  )
+  $ "jungle_vocals:0"
+  # att 0.05
+  # rel 10
+  # pan 0.8
+  # cut 5
+  # gain 0.5
+  # midiG' "^83" 0 0.6
+d6
+  $ slice 8 "4 <[<4 5 4 [4 5]> <5!7 1>] [4 2 <4!3 3> <2!3 3>]> "
+  $ "fepiano:18"
+  # hpf 2500
+  # rel 0.9
+  # midiG' "^82" 0 1.4
+  # pan 0.8

test.tidal

+d1 $ "dr*8" # gain 3
+
+once $ loopAt 1 $ "break:3" # gain 0.64
+  # lpf 2000
+
+once $
+-- "bassWarsaw"
+"FMRhodes1"
+# note "[g3'min'4]" # gain 1.2
+
+d1
+-- $ midiOn "^42" (<| "t*4")
+-- $ midiOff "^42" (<| "t(<3!3 5>, 8)")
+$ "electrn:8"
+-- # midiG' "^78" 0 1
+
+--
+-- # crush 4.5
+
+
+
+once $ note "c@2 [c c]@1 ds g" # "giorgio_syn:6" # cut 1
+
+
+once $ "rampleR4" # gain 0.8
+
+-- H2O SAMPLES
+once $ "h2ogmhh"
+
+-- MethLab BASS
+once $ "meth_bass:4" # cut 4
+
+
+d3
+  -- $ gF1 $ gM $ gDelay -- Contretemps
+$ midiOn "^76" (slow 2)
+$ midiOff "^44" (slow 2)
+  $ "~ h ~ <~!4 h!28> ~ <~!3 h ~!3 h h!8> ~ <h ~ h ~ h!3 <h*2 [~ h*<1 2>]>>"
+  # "rampleA2:23"
+  # midiG' "^80" 0 1.2
+
+-- DRUM MACHINES
+once $ drumFrom "rolandtr808" "[hh:1]"