diff --git a/link_samples_all.txt b/link_samples_all.txt new file mode 100644 index 0000000..01bbbf8 --- /dev/null +++ b/link_samples_all.txt @@ -0,0 +1,67 @@ +: 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 diff --git a/live/ambient/wild_coffee.tidal b/live/ambient/wild_coffee.tidal new file mode 100644 index 0000000..523adb4 --- /dev/null +++ b/live/ambient/wild_coffee.tidal @@ -0,0 +1,117 @@ +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 . > >")) +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 ") + $ midiOn ("^42" - "^41") (<| ",8)>") + $ midiOff ("^41" + "^42") (<| "") + $ "[techno:0,808bd:2,909,kick:4]" + # lpf 200 + # midiG' "^78" 0 1.2 +d2 $ gF1 $ gMute2 -- Snare décalé + $ "~ . < 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 "") + # 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 @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 "" + # "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" diff --git a/live/boeuf/algorythm/season2/blues_wednesday.tidal b/live/boeuf/algorythm/season2/blues_wednesday.tidal new file mode 100644 index 0000000..a37f60d --- /dev/null +++ b/live/boeuf/algorythm/season2/blues_wednesday.tidal @@ -0,0 +1,58 @@ + +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" + $ "" # "[jazz,cpu]" # gain 1 +d2 +-- $ gDJF + -- $ mask "" + $ 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 "" + $ 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 diff --git a/live/boeuf/algorythm/season2/come_together.tidal b/live/boeuf/algorythm/season2/come_together.tidal new file mode 100644 index 0000000..7ff1369 --- /dev/null +++ b/live/boeuf/algorythm/season2/come_together.tidal @@ -0,0 +1,19 @@ +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 diff --git a/live/boeuf/biarritz/morning_glory.tidal b/live/boeuf/biarritz/morning_glory.tidal new file mode 100644 index 0000000..e7f3b9a --- /dev/null +++ b/live/boeuf/biarritz/morning_glory.tidal @@ -0,0 +1,45 @@ +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 . > >")) +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 "" + $ "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 "") + ) + $ 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 diff --git a/live/boeuf/canard_breake.tidal b/live/boeuf/canard_breake.tidal new file mode 100644 index 0000000..ebf8159 --- /dev/null +++ b/live/boeuf/canard_breake.tidal @@ -0,0 +1,114 @@ +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 . > >")) +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 "" + $ fix ((|* gain 0.8) . (# att 0.05) . (# rel 1)) ("kick") + $ fix ((|* gain 0.95) + . (# att 0.25) . (# rel 1) + ) ("reverbkick") + $ midiOn "^41" (<| "k 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 ~ >>" # "[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 ~]!0 [f ~ f g ~ ~]!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 "" + "<[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 diff --git a/live/boeuf/samedi_canard.tidal b/live/boeuf/samedi_canard.tidal new file mode 100644 index 0000000..2105cf6 --- /dev/null +++ b/live/boeuf/samedi_canard.tidal @@ -0,0 +1,41 @@ +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 . > >")) +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 diff --git a/live/boeuf/viteuf/blues.tidal b/live/boeuf/viteuf/blues.tidal new file mode 100644 index 0000000..ccdb4ff --- /dev/null +++ b/live/boeuf/viteuf/blues.tidal @@ -0,0 +1,56 @@ +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 . > >")) +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 + $ "" # "giorgio_syn" + # gain 0.4 + + +once $ "90s_synatm" # gain 2 + + + +d1 $ "k ~ ~ ~" # "kick" diff --git a/live/collab/etienne/concombre.tidal b/live/collab/etienne/concombre.tidal new file mode 100644 index 0000000..1897311 --- /dev/null +++ b/live/collab/etienne/concombre.tidal @@ -0,0 +1,63 @@ +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]>") + $ 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 "" $ "") + -- $ note (arp "" $ "<>") + # "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 diff --git a/live/collab/josh/oct_18_rainy_day.tidal b/live/collab/josh/oct_18_rainy_day.tidal new file mode 100644 index 0000000..6d32fe1 --- /dev/null +++ b/live/collab/josh/oct_18_rainy_day.tidal @@ -0,0 +1,141 @@ + +-- Intro: only the leads +-- Work snare in, then bass +-- +-- + +do +setcps (114/60/4) +let gMask = (midiOn "^41" (mask "t . > >")) +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 $ (">" + "[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 (">" + - 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 ~ " + # "snare:34" + # hpf 7000 + # midiG' "^80" 0 1.5 diff --git a/live/midi/nova/ambient/prestance.tidal b/live/midi/nova/ambient/prestance.tidal new file mode 100644 index 0000000..c75c608 --- /dev/null +++ b/live/midi/nova/ambient/prestance.tidal @@ -0,0 +1,78 @@ + +-- 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 . > >")) +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 @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 >] >" + # "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 "" + $ note praxis + # "bassWarsaw" + # modIndex 5 + # crushbus 61 (range 16 2 "^56") + # midiG' "^17" 0 1.4 + # pan 0.3 +d7 $ gF3 $ gM2 + $ mask "" + $ note (praxis + 36) + # "prophet5pwmStrings" + # pan 0.9 + # midiG' "^18" 0 1.4 +d8 $ gF3 $ gM2 + -- $ mask "" + $ 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] [~ @7]>" + + 12 + ) + # "meth_bass" + # crushbus 91 (range 16 2.5 "^55") + # midiG' "^83" 0 1 + # cut 9 +d10 + $ mask "" + $ "jungle_pads:4@2" + # cut 10 + # midiG' "^13" 0 1 diff --git a/live/midi/nova/beatober/oct_15_midoct.tidal b/live/midi/nova/beatober/oct_15_midoct.tidal new file mode 100644 index 0000000..62819b5 --- /dev/null +++ b/live/midi/nova/beatober/oct_15_midoct.tidal @@ -0,0 +1,61 @@ + +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 [~ <~ >]!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] []" -- 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 "" + $ 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 diff --git a/live/midi/nova/beatober/oct_4.tidal b/live/midi/nova/beatober/oct_4.tidal new file mode 100644 index 0000000..4524b3a --- /dev/null +++ b/live/midi/nova/beatober/oct_4.tidal @@ -0,0 +1,116 @@ +-- 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 . > >")) +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]>") + $ 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 ] 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 @2 >@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" + $ "[<~ ~ ~ >,<~!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" diff --git a/live/midi/nova/beatober/oct_5.tidal b/live/midi/nova/beatober/oct_5.tidal new file mode 100644 index 0000000..6e216ac --- /dev/null +++ b/live/midi/nova/beatober/oct_5.tidal @@ -0,0 +1,87 @@ +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 . > >")) +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 "" + # "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 "< t f>" (off "e" ((|+ pan 0.1) . (|* gain 0.75) . (|+ note 7))) + $ note ("0(3,8,1)" |+ " @2>") + # "FMRhodes1" + # pan 0.8 + # room 0.2 + # midiG' "^82" 0 1.9 +d6 $ gF3 + $ mask "<[t . 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 ") + # 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)" + "< [e ] 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 diff --git a/live/midi/nova/breaks/code_secret.tidal b/live/midi/nova/breaks/code_secret.tidal new file mode 100644 index 0000000..1ac2d06 --- /dev/null +++ b/live/midi/nova/breaks/code_secret.tidal @@ -0,0 +1,58 @@ +-- 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 . > >")) +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 "" + $ "~ s" # "snare:40" + # midiG' "^79" 0 1.4 + # pan 0.8 +d3 $ gF1 $ "~ h ~ h ~ 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 diff --git a/live/midi/nova/breaks/monday_fairy.tidal b/live/midi/nova/breaks/monday_fairy.tidal new file mode 100644 index 0000000..42acbb2 --- /dev/null +++ b/live/midi/nova/breaks/monday_fairy.tidal @@ -0,0 +1,119 @@ +-- 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 . > >")) +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 "" + $ 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 ( + "]>>" -- 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 ">" + # "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 ">/2" + # "jungle_pads:9" + # legato 2 + # cut 6 + # midiG' "^20" 0 0.6 diff --git a/live/midi/nova/punk/punk_teng.tidal b/live/midi/nova/punk/punk_teng.tidal new file mode 100644 index 0000000..36d10d8 --- /dev/null +++ b/live/midi/nova/punk/punk_teng.tidal @@ -0,0 +1,37 @@ + +-- 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 . > >")) +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*<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 diff --git a/live/midi/nova/techno/around_the_bass.tidal b/live/midi/nova/techno/around_the_bass.tidal new file mode 100644 index 0000000..51099c2 --- /dev/null +++ b/live/midi/nova/techno/around_the_bass.tidal @@ -0,0 +1,57 @@ +-- 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 . > >")) +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 diff --git a/live/midi/nova/techno/ete_a_mauerpark.tidal b/live/midi/nova/techno/ete_a_mauerpark.tidal index 2805c78..1246e92 100644 --- a/live/midi/nova/techno/ete_a_mauerpark.tidal +++ b/live/midi/nova/techno/ete_a_mauerpark.tidal @@ -1,4 +1,6 @@ --- 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 . > >")) 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 "~ ") -- 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 " 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] [ 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 "" (mask "t f!15". (# legato 2)) + -- $ sometimesBy "^18" (bite 4 "[0, [~ 2]]") + -- $ someCyclesBy "" (mask "t f!15". (# legato 2)) -- $ (0.125 <~) -- Calage :) -- $ someCyclesBy "^17" ( -- (mask " f t@14") . (|* room 1.2) @@ -84,28 +89,29 @@ d6 $ gF3 $ gMute2 -- Leads reponse $ swing (1/3) $ note ( " 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") diff --git a/live/midi/nova/techno/industry/no_panic.tidal b/live/midi/nova/techno/industry/no_panic.tidal new file mode 100644 index 0000000..fb20ac9 --- /dev/null +++ b/live/midi/nova/techno/industry/no_panic.tidal @@ -0,0 +1,71 @@ + +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 . > >")) +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 >" + # "[jazz,kick:4,kick:7]" + # midiG' "^78" 0 1 +d2 $ gM $ gF1 -- Snare be there + -- $ mask "" + $ 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" "" + # 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] [<~ >]>" + # "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 diff --git a/live/midi/nova/techno/love_of_techno.tidal b/live/midi/nova/techno/love_of_techno.tidal new file mode 100644 index 0000000..41c0252 --- /dev/null +++ b/live/midi/nova/techno/love_of_techno.tidal @@ -0,0 +1,23 @@ +-- Love of Tecno will tear us apart +do +let loveTears = "< [fs4@2 g4 fs4@2 e4 d4@2] [b3@7 ] a3>" +setcps (148/60/4) +d1 $ "" # "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!12" + $ rev + -- $ mask "" + $ note (loveTears + + "[24]") + # "[FMRhodes2]" + # gain 1.2 + # room 0.4 # sz 0.4 + # pan 0.3 diff --git a/live/midi/nova/techno/the_good_bass.tidal b/live/midi/nova/techno/the_good_bass.tidal new file mode 100644 index 0000000..0f8dfe3 --- /dev/null +++ b/live/midi/nova/techno/the_good_bass.tidal @@ -0,0 +1,51 @@ + +-- 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 . > >")) +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 diff --git a/live/midi/nova/techno/tour_du_ciel.tidal b/live/midi/nova/techno/tour_du_ciel.tidal new file mode 100644 index 0000000..cc47d8e --- /dev/null +++ b/live/midi/nova/techno/tour_du_ciel.tidal @@ -0,0 +1,56 @@ +-- 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] @2>" +let lineTourDeFrance2 = "<[g3@2 c4 d4 g4@3 e4] [g4 a4 d4 e4 g4@2 c5@2] @2>" +d1 $ g + $ "]!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 "" + $ whenmod 4 2 (>| note lineTourDeFrance2) + $ note (lineTourDeFrance1) + # "bassWarsaw" + # lpf 500 + # pan 0.1 +d5 $ g + $ mask "" + $ 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 "" + $ mask ",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 diff --git a/live/midi/nova/techno/trn/no_time_to_die.tidal b/live/midi/nova/techno/trn/no_time_to_die.tidal new file mode 100644 index 0000000..303d406 --- /dev/null +++ b/live/midi/nova/techno/trn/no_time_to_die.tidal @@ -0,0 +1,81 @@ + +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 . > >")) +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 $ "" diff --git a/study/samples/breaksploration.tidal b/study/samples/breaksploration.tidal new file mode 100644 index 0000000..26be303 --- /dev/null +++ b/study/samples/breaksploration.tidal @@ -0,0 +1,18 @@ + + + + +-- 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 diff --git a/study/samples/drum_machines.tidal b/study/samples/drum_machines.tidal new file mode 100644 index 0000000..c7204ef --- /dev/null +++ b/study/samples/drum_machines.tidal @@ -0,0 +1,40 @@ +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 "" [ + s "[~perc]*2" # note 7 + ,s "bd:4(3,8)" + ,s "~[cp,sd]" + ,s "hh*8" +] + + +-- EXPLORATION + +once $ drumMachine "" diff --git a/study/samples/methlab.tidal b/study/samples/methlab.tidal new file mode 100644 index 0000000..82bb361 --- /dev/null +++ b/study/samples/methlab.tidal @@ -0,0 +1,48 @@ +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 . > >")) +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 ~ ~ ]>" + $ 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 diff --git a/test.tidal b/test.tidal new file mode 100644 index 0000000..9283522 --- /dev/null +++ b/test.tidal @@ -0,0 +1,43 @@ +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> ~ ]>>" + # "rampleA2:23" + # midiG' "^80" 0 1.2 + +-- DRUM MACHINES +once $ drumFrom "rolandtr808" "[hh:1]"