Skip to content

T
Tidal
Commit c01d8fd6 by PLN (Algolia)
Options

Cafe glace

parent bf4a3a5f
Showing with 1881 additions and 118 deletions
PatchBay_Perf.xml
<!DOCTYPE patchbay> <!DOCTYPE patchbay>
<patchbay name="PatchBay_Perf" version="0.9.7"> <patchbay name="PatchBay_Perf" version="0.9.8">
<output-sockets> <output-sockets>
<socket name="Built-in Audio Analog Stereo" exclusive="off" client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio"> <socket name="Built-in Audio Analog Stereo" exclusive="off" client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio">
<plug>capture_FL</plug> <plug>capture_FL</plug>
...@@ -155,18 +155,18 @@ ...@@ -155,18 +155,18 @@
</input-sockets> </input-sockets>
<slots/> <slots/>
<cables> <cables>
<cable input="SuperCollider" output="Built-in Audio Analog Stereo" type="jack-audio"/> <cable output="Built-in Audio Analog Stereo" input="SuperCollider" type="jack-audio"/>
<cable input="ardour 4" output="Built-in Audio Analog Stereo" type="jack-audio"/> <cable output="Built-in Audio Analog Stereo" input="ardour 4" type="jack-audio"/>
<cable input="ardour 2" output="SuperCollider" type="jack-audio"/> <cable output="SuperCollider" input="ardour 2" type="jack-audio"/>
<cable input="Built-in Audio Analog Stereo 2" output="ardour 2" type="jack-audio"/> <cable output="ardour 2" input="Built-in Audio Analog Stereo 2" type="jack-audio"/>
<cable input="ardour 3" output="ardour 3" type="jack-audio"/> <cable output="ardour 3" input="ardour 3" type="jack-audio"/>
<cable input="ardour 2" output="Midi-Bridge 2" type="jack-midi"/> <cable output="Midi-Bridge 2" input="ardour 2" type="jack-midi"/>
<cable input="aseqdump" output="Midi Through" type="alsa-midi"/> <cable output="Midi Through" input="aseqdump" type="alsa-midi"/>
<cable input="SuperCollider 3" output="Midi Through" type="alsa-midi"/> <cable output="Midi Through" input="SuperCollider 3" type="alsa-midi"/>
<cable input="PipeWire-RT-Event" output="Midi Through" type="alsa-midi"/> <cable output="Midi Through" input="PipeWire-RT-Event" type="alsa-midi"/>
<cable input="SuperCollider 2" output="Launch Control XL" type="alsa-midi"/> <cable output="Launch Control XL" input="SuperCollider 2" type="alsa-midi"/>
<cable input="Midi Through" output="Launch Control XL" type="alsa-midi"/> <cable output="Launch Control XL" input="Midi Through" type="alsa-midi"/>
<cable input="PipeWire-RT-Event" output="Launch Control XL" type="alsa-midi"/> <cable output="Launch Control XL" input="PipeWire-RT-Event" type="alsa-midi"/>
</cables> </cables>
</patchbay> </patchbay>
PatchBay_Perf5.1.xml 0 → 100644
<!DOCTYPE patchbay>
<patchbay name="PatchBay_Perf5" version="0.9.8">
<output-sockets>
<socket client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio" name="Built-in Audio Analog Stereo" exclusive="off">
<plug>capture_FL</plug>
<plug>capture_FR</plug>
</socket>
<socket client="SuperCollider" type="jack-audio" name="SuperCollider" exclusive="off">
<plug>out_1</plug>
<plug>out_2</plug>
</socket>
<socket client="ardour" type="jack-audio" name="ardour" exclusive="off">
<plug>auditioner\/audio_out\ 2</plug>
<plug>auditioner\/audio_out\ 1</plug>
<plug>Tidal\/audio_out\ 1</plug>
<plug>Tidal\/audio_out\ 2</plug>
<plug>Master\/audio_out\ 1</plug>
<plug>Click\/audio_out\ 2</plug>
<plug>Click\/audio_out\ 1</plug>
<plug>LTC\-Out</plug>
<plug>Master\/audio_out\ 2</plug>
</socket>
<socket client="Built\-in\ Audio\ Analog\ Stereo\ Monitor" type="jack-audio" name="Built-in Audio Analog Stereo Monitor" exclusive="off">
<plug>monitor_FL</plug>
<plug>monitor_FR</plug>
</socket>
<socket client="ardour" type="jack-audio" name="ardour 2" exclusive="off">
<plug>auditioner\/audio_out\ 2</plug>
<plug>auditioner\/audio_out\ 1</plug>
<plug>Master\/audio_out\ 1</plug>
<plug>Master\/audio_out\ 2</plug>
</socket>
<socket client="ardour" type="jack-audio" name="ardour 3" exclusive="off">
<plug>Tidal\/audio_out\ 1</plug>
<plug>Tidal\/audio_out\ 2</plug>
</socket>
<socket client="Midi\-Bridge" type="jack-midi" name="Midi-Bridge" exclusive="off">
<plug>Midi\ Through\:\(capture_0\)\ Midi\ Through\ Port\-0</plug>
<plug>Launch\ Control\ XL\:\(capture_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\:\(capture_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>SuperCollider\:\(capture_5\)\ out0</plug>
<plug>SuperCollider\:\(capture_6\)\ out1</plug>
<plug>SuperCollider\:\(capture_7\)\ out2</plug>
</socket>
<socket client="ardour" type="jack-midi" name="ardour" exclusive="off">
<plug>MIDI\ Clock\ out</plug>
<plug>MTC\ out</plug>
<plug>x\-virtual\-keyboard</plug>
<plug>Scene\ out</plug>
<plug>MMC\ out</plug>
</socket>
<socket client="Midi\-Bridge" type="jack-midi" name="Midi-Bridge 2" exclusive="off">
<plug>Launch\ Control\ XL\:\(capture_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\:\(capture_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="Midi\ Through" type="alsa-midi" name="Midi Through" exclusive="off">
<plug>Midi\ Through\ Port\-0</plug>
</socket>
<socket client="Launch\ Control\ XL" type="alsa-midi" name="Launch Control XL" exclusive="off">
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="SuperCollider" type="alsa-midi" name="SuperCollider" exclusive="off">
<plug>out0</plug>
<plug>out1</plug>
<plug>out2</plug>
</socket>
</output-sockets>
<input-sockets>
<socket client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio" name="Built-in Audio Analog Stereo" exclusive="off">
<plug>playback_FL</plug>
<plug>playback_FR</plug>
</socket>
<socket client="SuperCollider" type="jack-audio" name="SuperCollider" exclusive="off">
<plug>in_1</plug>
<plug>in_2</plug>
</socket>
<socket client="ardour" type="jack-audio" name="ardour" exclusive="off">
<plug>physical_audio_input_monitor_enable</plug>
<plug>LTC\ in</plug>
<plug>SC\ Tidal\/ACE\ Compressor\ \(stereo\)\ 1\/audio_in\ 1</plug>
<plug>Tidal\/audio_in\ 2</plug>
<plug>Tidal\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
<plug>Master\/audio_in\ 1</plug>
</socket>
<socket client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio" name="Built-in Audio Analog Stereo 2" exclusive="off">
<plug>playback_FR</plug>
<plug>playback_FL</plug>
<plug>playback_FL</plug>
<plug>playback_FR</plug>
</socket>
<socket client="ardour" type="jack-audio" name="ardour 2" exclusive="off">
<plug>Tidal\/audio_in\ 1</plug>
<plug>Tidal\/audio_in\ 2</plug>
</socket>
<socket client="ardour" type="jack-audio" name="ardour 3" exclusive="off">
<plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
</socket>
<socket client="ardour" type="jack-audio" name="ardour 4" exclusive="off">
<plug>physical_audio_input_monitor_enable</plug>
<plug>physical_audio_input_monitor_enable</plug>
</socket>
<socket client="Midi\-Bridge" type="jack-midi" name="Midi-Bridge" exclusive="off">
<plug>Midi\ Through\:\(playback_0\)\ Midi\ Through\ Port\-0</plug>
<plug>Launch\ Control\ XL\:\(playback_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\:\(playback_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>SuperCollider\:\(playback_0\)\ in0</plug>
<plug>SuperCollider\:\(playback_1\)\ in1</plug>
<plug>SuperCollider\:\(playback_2\)\ in2</plug>
<plug>SuperCollider\:\(playback_3\)\ in3</plug>
<plug>SuperCollider\:\(playback_4\)\ in4</plug>
<plug>aseqdump\:\(playback_0\)\ aseqdump</plug>
</socket>
<socket client="ardour" type="jack-midi" name="ardour" exclusive="off">
<plug>physical_midi_input_monitor_enable</plug>
<plug>MIDI\ Clock\ in</plug>
<plug>MTC\ in</plug>
<plug>Scene\ in</plug>
<plug>MMC\ in</plug>
</socket>
<socket client="ardour" type="jack-midi" name="ardour 2" exclusive="off">
<plug>physical_midi_input_monitor_enable</plug>
<plug>physical_midi_input_monitor_enable</plug>
</socket>
<socket client="Midi\ Through" type="alsa-midi" name="Midi Through" exclusive="off">
<plug>Midi\ Through\ Port\-0</plug>
</socket>
<socket client="Launch\ Control\ XL" type="alsa-midi" name="Launch Control XL" exclusive="off">
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="SuperCollider" type="alsa-midi" name="SuperCollider" exclusive="off">
<plug>in0</plug>
<plug>in1</plug>
<plug>in2</plug>
<plug>in3</plug>
<plug>in4</plug>
</socket>
<socket client="aseqdump" type="alsa-midi" name="aseqdump" exclusive="off">
<plug>aseqdump</plug>
</socket>
<socket client="SuperCollider" type="alsa-midi" name="SuperCollider 2" exclusive="off">
<plug>in3</plug>
<plug>in4</plug>
</socket>
<socket client="PipeWire\-RT\-Event" type="alsa-midi" name="PipeWire-RT-Event" exclusive="off">
<plug>input</plug>
<plug>input</plug>
</socket>
<socket client="SuperCollider" type="alsa-midi" name="SuperCollider 3" exclusive="off">
<plug>in2</plug>
</socket>
</input-sockets>
<slots/>
<cables>
<cable input="SuperCollider" type="jack-audio" output="Built-in Audio Analog Stereo"/>
<cable input="ardour 4" type="jack-audio" output="Built-in Audio Analog Stereo"/>
<cable input="ardour 2" type="jack-audio" output="SuperCollider"/>
<cable input="Built-in Audio Analog Stereo 2" type="jack-audio" output="ardour 2"/>
<cable input="ardour 3" type="jack-audio" output="ardour 3"/>
<cable input="ardour 2" type="jack-midi" output="Midi-Bridge 2"/>
<cable input="aseqdump" type="alsa-midi" output="Midi Through"/>
<cable input="SuperCollider 3" type="alsa-midi" output="Midi Through"/>
<cable input="PipeWire-RT-Event" type="alsa-midi" output="Midi Through"/>
<cable input="SuperCollider 2" type="alsa-midi" output="Launch Control XL"/>
<cable input="Midi Through" type="alsa-midi" output="Launch Control XL"/>
<cable input="PipeWire-RT-Event" type="alsa-midi" output="Launch Control XL"/>
</cables>
</patchbay>
live/collab/please_die/concombre.tidal deleted 100644 → 0
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/raph/ambiance.tidal 0 → 100644
resetCycles
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 gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
setcps (105/60/4)
do
-- d1 $ gF1 $ gM1 $ "kick:5"
-- d1 $ gF1 $ gM1 $ "kick:5"
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k <k [<~ k> k*<1 4>]>")
-- $ midiOn "^42" (<| "k k(<3 [3 5]>,8)")
$ "kick:5"
d2 $ gF1 $ gM1
$ "~ cp"
# "rampleP5:15"
d3 $ gF1 $ gM1
$ "hh(5,8)"
# "rampleP5:16"
# cut 3
d4 $ gF2 $ gM1
$ "90s_synatm:9"
# cut 4
d5 $ gF3 $ gM1 -- Semi-basse
$ superimpose (("h" ~>)
. (|+ note 12)
. (# cut 51))
$ note ("<gs4!0 f4 f4 gs4 f4 f4 f4 ef4 f4>")
# "90s_synatm:3"
# cut 5
# gain 0.65
# pan 0.3
-- 0 4 0 1 0 2 0 3
d10 $ gF3 $ note "f/4" -- Anges des intertubes
# "90s_glassatm:2"
-- # crushbus 101 (range 16 2.5 (perlin))
# roombus 102 (slow 4 $ range 0.4 0.65 (perlin)) # sz 0.8
# legato 2
# pan 0.7
# cut 10
d4 $ gF2 $ gM1 -- Bass electrique
$ note (scale "aeolian" (
"3"
+ "<~!16 0!16> <4 1 <2 5> <3 6>>"
))
# "90s_synatm:9"
# att 0.2
# rel 2
# room 0.4 # dry 1.2 # sz 0.5
# octersubbus 42 (range 0 4 "^33")
# crushbus 41 (range 16 2.3 "^53")
# cut 4
live/collab/raph/jeudrill.tidal 0 → 100644
resetCycles
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 gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
setcps (140/60/4)
-- d1 $ gF1 $ gM2
d1 $ gF1 $ gMute2
$ midiOff "^42" (<| "<k [~!7 k*<1 2>]>")
$ midiOn "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
$ "[kick:5]"
# room 0.2 # dry 1.1
# cut 1
d2 $ gF1 $ gM1
$ someCyclesBy "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>")
$ someCyclesBy "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>")
$ "[snare:24,snare:51]"
# gain "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>"
d3 $ gF1 $ gM1 $ "h(3,8) h(<3 <5 [5 <1 <8 [8 16]>>]>>,8)"
# drumFrom "rolandtr909" "hh" # cut 3 # gain 0.6 # legato 0.25
d9 $ mask "<f!3 t>"
-- $ (0.1 ~>)
$ "bogdan_grime:3"
# end "<0.42!3 0.66>"
# delay "<0!3 0.7>"
# delayt "h"
# delayfb 0
# speed 0.85
# room 0.4
# gain 1.2
d8 $ gF1 $ gM1 -- Come on breaks!
$ chop 8
$ midiOn "^56" (loopAt 2 . (# n "<61>"))
$ midiOn "^92" (ply 4)
$ midiOn "^36" ((# n "19")) -- Pure COMEON!
-- $ midiOn "^56" ((# n "23")) -- Raise COMEON!
$ midiOff "^60" (mask "t(4,8)")
$ loopAt 2
$ "jungle_breaks:26"
# cut 8
# gain 0.6
d4 $ gF2 $ gMute3 -- Bassline aqualgorithmique
$ slow 2 $ note (
-- "<0!8 0(3,8)!8> 0" + "<d4!3 a3> <fs4 e4 d4 b3>"
"<<fs <[fs@15 e] [fs@14 cs e]>> b4>"
-- "c g"
- 12
+ 2
)
# "giorgio_syn:1"
-- # "bassWarsaw"
# cut 4
# pan 0.3
# room 0.4
# octersubsub 0
# crushbus 41 (range 16 3.5 "^53")
# octersubsubbus 42 (range 0 2 "^33")
# gain 0.8
d5 $ gM3 $ gF3
$ midiOff "^58" (mask "t(<4 <2 4>>,4) t(<3!7 5>,8)")
$ juxBy 0.4 rev
$ note ("<[b4 [~ d5]. [fs5@3 fs5]] [e5 fs5 e5 fs5. [d5@3 fs5]]>")
# "marimba1"
# att (range 0.8 0.2 "^34")
# rel 1
# triode 00
-- # delay 0 # delayfb 0.8 # delayt 0.25
# pan 0.9
# gain 2
# room 0.3
d10 $ gF2 -- Menace
$ note "<b3 ~ ~ [~!7 c4]>"
# "90s_synatm:10"
# room 0.3 # sz 0.8
# gain 0.65
# att 0.10
# rel 10
# legato 2
# cut 9
d7 $ gM2 $ gF2
-- $ ply 2
$ midiOn "^59" (# speed "-0.25")
$ midiOn "^91" (struct "t*<8!3 [8 4]>")
$ someCyclesBy "^19" (slice 4 "<<0 <1 2>>!8 <3 3 3*2 3*<4 8>>!8>")
$ chop 16
$ loopAt 4 $ "meth_bass:18" # cut 7 # gain 0.6
-- # octersubsubbus 73 (range 0 8 "^19")
-- # octersubbus 72 (range 0 4 "^35")
-- # octerbus 71 (range 0 1.7 "^55")
# crushbus 71 (range 16 1.7 "^55")
# panbus 72 (range 0.2 0.8 (fast "<2!4 4!4>" sine))
d4 $ note (("<d>"))
# "90s_matrix:0"
# cut 4
-- # orbit 4
once $ note "b" # "superpiano"
90s_matrix:0
d8 $ "jungle_breaks"
live/collab/raph/permanence.tidal
...@@ -24,8 +24,9 @@ d2 $ gF1 $ gM1 ...@@ -24,8 +24,9 @@ d2 $ gF1 $ gM1
# pan 0.25 # pan 0.25
-- # lpf 3000 -- # lpf 3000
d3 $ gF1 $ gM1 d3 $ gF1 $ gM1
$ midiOn "^76" (ply 2)
$ sometimesBy "0 <0.5!3 2>" (mask "t(<12!3 2>,16)") $ sometimesBy "0 <0.5!3 2>" (mask "t(<12!3 2>,16)")
$ midiOff "^44" ((mask "t(<8!3 [8!3 4]>,16,2)")) $ midiOff ("^44"+"^76") ((mask "t(<8!3 [8!3 4]>,16,2)"))
$ "hh:8*16" $ "hh:8*16"
|* gain "1 1 0.95 1 0.96 1 0.975 1.1" |* gain "1 1 0.95 1 0.96 1 0.975 1.1"
# gain 1.8 # gain 1.8
...@@ -41,7 +42,7 @@ d4 $ gF2 ...@@ -41,7 +42,7 @@ d4 $ gF2
# octersubbus 42 (range 0 1.5 "^17") # octersubbus 42 (range 0 1.5 "^17")
# squizbus 42 (range 0 1.5 "^33") # squizbus 42 (range 0 1.5 "^33")
# crushbus 41 (range 16 2.5 "^53") # crushbus 41 (range 16 2.5 "^53")
d5 $ gF3 $ gM3 d5 $ gF3 $ gMute3
$ midiOff "^58" (slice 4 "<0 0 0 0 1 1 1 <1 2>>*<4!7 8>") $ midiOff "^58" (slice 4 "<0 0 0 0 1 1 1 <1 2>>*<4!7 8>")
$ midiOn "^58" ( $ midiOn "^58" (
slice 4 "<0 1 2 3> <0 1 0 3>*<1 2 1 4>" . slice 4 "<0 1 2 3> <0 1 0 3>*<1 2 1 4>" .
...@@ -58,13 +59,14 @@ d5 $ gF3 $ gM3 ...@@ -58,13 +59,14 @@ d5 $ gF3 $ gM3
# pan 0.66 # pan 0.66
d7 $ gM3 $ gF3 d7 $ gM3 $ gF3
$ n ("<0 0 0 ~>" + "<41!10 42 42>") # "fsynth" $ n ("<0 0 0 ~>" + "<41!10 42 42>") # "fsynth"
-- # crushbus 71 (range 16 2.5 "^55") # crushbus 72 (range 16 2.05 "^35")
# octersubbus 71 (range 0 2.5 "^55") # octersubbus 71 (range 0 3 "^55")
# octersubsubbus 73 (range 0 3 "^55")
# cut 7 # cut 7
d8 $ gF1 $ gM1 d8 $ gF1 $ gM1
$ midiOn "^20" (loopAt 4)
$ loopAt 2
$ chop 8 $ chop 8
$ loopAt 2
$ midiOn "^20" (loopAt 4)
$ midiOn "^92" (ply "<2!3 [4!3 8]>") $ midiOn "^92" (ply "<2!3 [4!3 8]>")
$ midiOn "^36" (# "jungle_breaks:55") $ midiOn "^36" (# "jungle_breaks:55")
$ midiOn "^56" (# "jungle_breaks:45") $ midiOn "^56" (# "jungle_breaks:45")
......
live/collab/stevie/aime_la_jungle.tidal 0 → 100644
once $ "nujazz_beats120"
-- It's a nuday
-- It's a new sample
resetCycles
do
setcps(140/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 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k <k k(3,8) k [k k*2]>")
$ midiOff "^42" (<| "k . ~ k ~ ~")
$ "[jazz,kick:5]"
d2 $ gF1 $ gM1 $ "~ ~ ~ <~ s> . s" # "snare:4"
d3 $ gF1 $ gM1 $ "d(<3!12 2!4>,8) d(<3!3 5>,8)" # "ho" # gain 0.8 # att 0.1 # rel 2
d4 $ gF2 $ gM3 $ note "<b2 d3 cs3 fs3>" # "bassWarsaw"
# crushbus 41 (range 16 3.6 "^53")
d8 $ gF1 $ gM1 -- JazzyBelle JazzyBreak
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
-- $ slice 4 "0 1*<1 2 4> 2? 3*<1!3 2>"
$ chop 16
$ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:51"))
$ midiOn "^56" (loopAt 4 . (# "jungle_breaks:44"))
$ loopAt 1
$ "jungle_breaks:36"
-- $ n "<0!4 1!3 0 2!4 3!3 <2 3>>"
-- # "nujazz_beats120"
# pan 0.26
# gain 1.1
# octersub 0
# octersubsub 0
# cut 8
live/collab/val/soir_noir.tidal 0 → 100644
resetCycles
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 gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
setcps (120/60/4)
d1 $ gF1 $ gMute2
$ midiOff "^42" (<| "<k [~!7 k*<1 2>]>")
$ midiOn "^42" (<| "k k <k!3 [k*2 ~]> k")
$ "kick:5"
-- # room 0.2 # dry 1.1
-- # gain "<1 0.8>"
-- # cut 1
d2 $ gF1 $ gM1
$ "~ <rampleO10:2!3 cp>"
-- $ someCyclesBy "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>")
-- $ someCyclesBy "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>")
-- $ "[snare:24,snare:51]"
-- # gain "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>"
-- d3 $ gF1 $ gM1 $ "h(3,8) h(<3 <5 [5 <1 <8 [8 16]>>]>>,8)"
-- # drumFrom "rolandtr909" "hh" # cut 3 # gain 0.6 # legato 0.25
d3
$ midiOn "^44" (stut 4 "0.8" "e")
$ n ("~ 1 ~ 2 ~ 2 ~ <1!3 2>") # "rampleS24" # cut 3
d4 $ gF2 $ gMute2 $ note (
"b4(<3 5 3 [3 5]>,8) <a5 <ef5 a4>>(<1!3 3>,8,<0 1>)"
- 24
-- - 1
)
# "bassWarsaw"
# rel 0.4
-- # octersubbus 41 (range 0 2 "^53")
-- # crushbus 42 (range 16 2 "^33")
# att 0.2
d4 $ gF2 $ gM1 -- BASSE SIMPLE
$ note "~ b ~ b ~ b ~ [c b]"
# octave 4
# n ("<1!4 2!4>")
# "rampleU4"
-- # crushbus 42 (range 16 2 "^33")
# cut 4
d7 $ gF2
$ midiOn "^89" (ply "<1 2> <2!3 4 4!3 8>")
$ slice 8 ("[0 1 2 3]*2" + "<0!4 3!4>")
-- $ loopAt 8
$ n "<3!3 4>"
# octave "<4 [4 4 <4 [5|4]> 4] 4 <4 [4|3]>>"
# "rampleU8"
# cut 7
d5 -- ARPEGIATEUR
-- $ mask "t(8,16)"
$ arp "<up down updown downup>"
$ fast (4/3)
$ note (
"[c3 b3]" + "c'min'4"
+ 4
)
# n ("<0 1 2>")
# "rampleS53"
-- # legato 0.25
-- # att 0.12
# rel (range 0.19 0.02 (perlin))
# pan 0.4
# gain 1.2
-- d9 $ mask "<f!3 t>"
-- -- $ (0.1 ~>)
-- $ "bogdan_grime:3"
-- # end "<0.42!3 0.66>"
-- # delay "<0!3 0.7>"
-- # delayt "h"
-- # delayfb 0
-- # speed 0.85
-- # room 0.4
-- # gain 1.2
d8 $ gF1 $ gM1 -- Come on breaks!
$ chop 8
$ midiOn "^56" (loopAt (2/3) . (# n "<74>"))
$ midiOn "^92" (ply 4)
$ midiOn "^36" (loopAt (2/3) . (# n "19")) -- Pure COMEON!
-- $ midiOn "^56" ((# n "23")) -- Raise COMEON!
$ midiOff "^60" (mask "t(4,8)")
$ loopAt 2
$ "jungle_breaks:26"
# cut 8
# gain 0.8
-- d4 $ gF2 $ gMute3 -- Bassline aqualgorithmique
-- $ note (
-- "<0!8 0(3,8)!8> 0" + "<d4!3 a3> <fs4 e4 d4 b3>"
-- - 12)
-- -- # "90s_matrix:0"
-- # "bassWarsaw"
-- # cut 4
-- # pan 0.3
-- # room 0.4
-- # octersubsub 0
-- # crushbus 41 (range 16 3.5 "^53")
-- # octersubsubbus 42 (range 0 2 "^33")
-- # gain 0.8
-- d5 $ gM3 $ gF3
-- $ juxBy 0.4 rev
-- $ note ("<[b4 [~ d5]. [fs5@3 fs5]] [e5 fs5 e5 fs5. [d5@3 fs5]]>")
-- # "marimba1"
-- # att 0.8
-- # rel 1
-- # pan 0.9
-- # gain 3
-- # room 0.3
d10 $ gF2 -- Menace
$ note "<b3 ~ ~ [~!7 c4]>"
# "90s_synatm:10"
# room 0.3 # sz 0.8
# gain 0.65
# att 0.10
# rel 10
# legato 2
# cut 9
-- d7 $ gM2 $ gF2
-- $ ply 2
-- $ midiOn "^91" (struct "t*<8!3 [8 4]>")
-- $ someCyclesBy "^19" (slice 4 "<<0 <1 2>>!8 <3 3 3*2 3*<4 8>>!8>")
-- $ chop 16
-- $ loopAt 4 $ "meth_bass:18" # cut 7 # gain 0.6
-- -- # octersubsubbus 73 (range 0 8 "^19")
-- -- # octersubbus 72 (range 0 4 "^35")
-- -- # octerbus 71 (range 0 1.7 "^55")
-- # crushbus 71 (range 16 1.7 "^55")
-- # panbus 72 (range 0.2 0.8 (fast "<2!4 4!4>" sine))
live/midi/nova/ambient/ambient_chaos.tidal 0 → 100644
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 gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
let prog1 = "<b3 fs3 a3 e3>"
let prog2 = "<b2 d3 e3 <cf3 a2 cf3 <f3 fs3>>>"
-- DEBUG: Prog avec un copier coller sale
let prog = "<b3 fs3 a3 e3 b3 fs3 a3 e3 b3 fs3 a3 e3 b3 fs3 a3 e3 b2 d3 e3 cf3 b2 d3 e3 a2 b2 d3 e3 cf3 b2 d3 e3 <f3 fs3>>"
let prog = prog2
let prog = prog1
do
setcps(125/60/4)
d12 $ gM3 $ gF3 -- PIANO DE DEBUGGING
$ struct "<t(3,8)!11 t>"
$ note (prog + 5 - 12)
# "FMRhodes1"
# gain 1
# velocity 2
-- # room 0.3 # sz ("0.2 0.4 0.6")
d1 $ gF1 $ gMute2 -- KICK PLEIN
-- $ fix ((# att 0.05) . (# lpf 4500) . (# gain 0.9)) "rampleR1:0"
$ midiOn "^42" (<| "k k k <k!3 <k*2 [k*2 k] [k ~ k] [k*4]>>")
$ midiOff "^42" (<| "k")
$ "[rampleR1:0]"
d2 $ gF1 $ gM1
$ midiOn "^42" (whenmod 64 8 (<| "~ s ~ s"))
$ midiOff "^42" (<| "~ s")
$ "snare:36"
# lpf 4000
d3 $ gF1
$ "~ hh ~ h*<1!4 2!3 1> ~ h ~ h*<1 2 1 [8 4]>"
# "rampleS33:6"
d6 $ gF1 $ gM1-- La neige eternelle
$ struct "~ <~ t(<1 <2 3>>,8)>"
$ slow 16
$ slice 16 (run 16)
$ "drums_nes:13" # cut 3
# pan (slow 16 $ range 0.9 0.3 saw)
d4 $ gF2 $ gM3 -- La gravite, inevitable
$ note (prog
+ "[0 ~ <2 <-1 2>> ~ 0] <3!3 5>(1,2,<0!4 1!4>)"
+ 0
)
# "bassWarsaw"
# octersubbus 41 (range 0 1.4 "^53")
# cut 4
# pan 0.3
d5 $ gF3 $ gM3 -- La lumiere, partout
$ midiOn "^58" (chop 8)
$ midiOff "^58" (chop 2)
$ midiOn "^90" (ply "2 <2 4>")
$ note prog
# "90s_glassatm:0"
# cut 5
# pan 0.8
# octerbus 51 (range 0.01 1.99 "^54")
d7 $ gF1 $ gM1 -- Les inevitables trolls
$ fix ((|* gain 0.8) . (|- note 4) . (# "rampleR0:3")) "r0bd1"
$ fix (# "rampleR0:2") "r0bd"
$ fix ((# "90s_megafx") . (# cut 81) . (|* gain 1.1)) "fx"
$ stack ["r0bd@7 <~!0 r0bd1!8>","~ fx:78"]
# gain 0.5
d8 $ gF1 $ gM1
-- $ ply "1 2"
$ midiOn "^56" (# n "4")
$ midiOn "^60" (slice 16 (run "<[8!3 4]!3 <4 [4 <8 16>]>>"))
$ midiOn "^92" (ply 2)
$ chop 16
$ loopAt 2
$ "jungle_breaks:30"
# gain 0.6
once $ note "b4"
# "bassWarsaw"
# cut 1
# lpf 4000
# gain 0.5
# room 0.2 # sz 0.8
live/midi/nova/ambient/contre_visite.tidal
-- Contre Visite
-- Un deuxième regard n'est jamais de trop.
do do
-- TRIGGER INTRO :) -- TRIGGER INTRO :)
-- resetCycles -- resetCycles
...@@ -9,19 +6,22 @@ let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine))) ...@@ -9,19 +6,22 @@ let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine)))
let gF = 1.01 let gF = 1.01
let f1 = (# djfbus 1 (range 0.05 0.95 "^49")) let f1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let f2 = (# djfbus 2 (range 0.05 0.95 "^50")) let f2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let f3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMute = (midiOn "^73" (mask "f*16")) let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16")) let gMute2 = (midiOn "^74" (mask "f*16"))
let maskLoops = (mask "<t!4 [t!3 f]>" . mask "<t!14 f [f!3 t]>") let maskLoops = (mask "<t!4 [t!3 f]>" . mask "<t!14 f [f!3 t]>")
setcps (90/60/4) setcps (90/60/4)
d1 $ f1 $ gMute2 d1
$ f1 $ gMute2
-- $ kCrush -- $ kCrush
$ midiOn "^42" (struct "t t t <t!2 [<~ t> <t t?>]>") $ midiOn "^42" (struct "t t t <t!2 [<~ t> <t t?>]>")
$ midiOff "^42" (struct "t . <~!4 t(<3!3 1>,8,<<0 3 <3 0> 0>>)!12>") $ midiOff "^42" (struct "t . <~!4 t(<3!3 1>,8,<<0 3 <3 0> 0>>)!12>")
-- $ mask "<f!32 f!8 t!16 t f!6 [t f] t!64>" -- $ mask "<f!32 f!8 t!16 t f!6 [t f] t!64>"
-- $ "[808bd:6,kick:8]" -- $ "[808bd:6,kick:8]"
$ fix ((# hpf 500) . (|* gain 0.7)) "kick:5"
$ "[jazz,kick:5]" $ "[jazz,kick:5]"
# room 0 -- # room 0
# midiG' "^78" 0 1.3 -- # midiG' "^78" 0 1.3
d2 $ f1 $ gMute d2 $ f1 $ gMute
$ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32 $ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32
$ midiOff "^75" maskLoops $ midiOff "^75" maskLoops
...@@ -35,10 +35,15 @@ d2 $ f1 $ gMute ...@@ -35,10 +35,15 @@ d2 $ f1 $ gMute
# pan 0.4 # pan 0.4
# cut 2 # cut 2
# speed (range "-0.25" 2.25 "^51") # speed (range "-0.25" 2.25 "^51")
# midiG' "^79" 0 1.3 -- # midiG' "^79" 0 1.3
d11 $ f1 $ gMute -- Snare <3 chak reverb phantome
$ struct "[~ t]*2"
$ "[snare:34,cp]"
# lpf 2000
-- # midiG' "^14" 0 1.8
d3 $ f1 $ gMute -- Sidekick, doubtful, yet hardworking hats d3 $ f1 $ gMute -- Sidekick, doubtful, yet hardworking hats
$ midiOn "^76" (ply "[4 <1 2>]*<4!3 8>") $ midiOn "^76" (ply "[4 <1 2>]*<4!3 8>")
$ mask "<t(<1!3 3>,4)!4 t(2,8)!8 [<t!3 [t f]>]!52>" -- Intro / break/32 -- $ mask "<t(<1!3 3>,4)!4 t(2,8)!8 [<t!3 [t f]>]!52>" -- Intro / break/32
$ maskLoops $ maskLoops
$ someCyclesBy "<0.6 1>" (stut "<2 3 4>" 0.5 "s") $ someCyclesBy "<0.6 1>" (stut "<2 3 4>" 0.5 "s")
$ sometimesBy (0.1 * "[0 <0 0.5> 0 <1!3 2>]!4") (# silence) $ sometimesBy (0.1 * "[0 <0 0.5> 0 <1!3 2>]!4") (# silence)
...@@ -47,8 +52,11 @@ d3 $ f1 $ gMute -- Sidekick, doubtful, yet hardworking hats ...@@ -47,8 +52,11 @@ d3 $ f1 $ gMute -- Sidekick, doubtful, yet hardworking hats
# "h2ogmhh" # "h2ogmhh"
# pan 0.6 # pan 0.6
# room 0.2 # room 0.2
# midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 1.3 -- # midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 1.3
d4 $ f2 -- Atmospheric synth: aerial questions # gain (0.8 + 0.08 * (slow 2 perlin))
d4 $ f3 -- Atmospheric synth: aerial questions
$ midiOn "^89" (|+ note "<2 2 4 <4 12>>")
$ midiOn "^57" (chop "<[16@3 32] [32@3 64]>")
$ "90s_synatm:8/4" $ "90s_synatm:8/4"
# cut 4 # cut 4
# room 0.8 # room 0.8
...@@ -57,7 +65,7 @@ d4 $ f2 -- Atmospheric synth: aerial questions ...@@ -57,7 +65,7 @@ d4 $ f2 -- Atmospheric synth: aerial questions
# pan 0.45 # pan 0.45
# crushbus 42 (range 16 3.4 "^53") # crushbus 42 (range 16 3.4 "^53")
# legato 2 # legato 2
# midiG' "^81" 0 1.2 -- # midiG' "^81" 0 1.5
d5 $ f2 -- Synth: ELECTRONIC ANSWERS d5 $ f2 -- Synth: ELECTRONIC ANSWERS
-- $ mask "<f!32 t!96>" -- Intro -- $ mask "<f!32 t!96>" -- Intro
$ midiOn "^90" (ply "1 <1!3 [0 1 <2 0> <0 2>]> <2!3 [[2 0] 1]> <1 2>" .slice 16 ("<0 1 2 3>*8" + "<0!4 4!4>")) $ midiOn "^90" (ply "1 <1!3 [0 1 <2 0> <0 2>]> <2!3 [[2 0] 1]> <1 2>" .slice 16 ("<0 1 2 3>*8" + "<0!4 4!4>"))
...@@ -70,7 +78,7 @@ d5 $ f2 -- Synth: ELECTRONIC ANSWERS ...@@ -70,7 +78,7 @@ d5 $ f2 -- Synth: ELECTRONIC ANSWERS
# panbus 51 (range 0.8 0.65 saw) # panbus 51 (range 0.8 0.65 saw)
# crushbus 52 (range 16 2.85 "^54") # crushbus 52 (range 16 2.85 "^54")
# midiG' "^82" 0 2 # midiG' "^82" 0 2
d6 $ f2 -- High lead: Winds of truth d7 $ f3 -- High lead: Winds of truth
$ juxBy 0.5 ((# cut 61) . rev) -- Jux rev <3 $ juxBy 0.5 ((# cut 61) . rev) -- Jux rev <3
$ whenmod 8 6 (swing "<4 2>") $ whenmod 8 6 (swing "<4 2>")
$ whenmod 32 8 (superimpose ( -- Echos of doubts $ whenmod 32 8 (superimpose ( -- Echos of doubts
...@@ -83,19 +91,12 @@ d6 $ f2 -- High lead: Winds of truth ...@@ -83,19 +91,12 @@ d6 $ f2 -- High lead: Winds of truth
)) ))
$ note (scale "aeolian" "<0!3 [0@6 <4 -1>@2]> 2") $ note (scale "aeolian" "<0!3 [0@6 <4 -1>@2]> 2")
# "90s_synatm:18" # "90s_synatm:18"
# pan 0.9
# room 0.4 # sz 0.8 # room 0.4 # sz 0.8
# crushbus 62 (range 16 2.25 "^55")
# midiG' "^83" 0 1.2
# dry 0.1 # dry 0.1
# pan "^19" # cut 7
# cut 6 # crushbus 62 (range 16 2.25 "^55")
d7 $ f1 -- Snare <3 chak reverb phantome # panbus 63 (range 0.05 0.95 "^19")
$ struct "[~ t]*2" d8 $ f1 $ gMute2 -- Breaks divins
$ "[snare:34,cp]"
# lpf 2000
# midiG' "^14" 0 1.8
d8 $ f1 -- Breaks divins
$ midiOn "^92" (off "e" id) $ midiOn "^92" (off "e" id)
$ midiOn "^60" (mask "[f t]") $ midiOn "^60" (mask "[f t]")
$ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81)) $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81))
...@@ -152,4 +153,4 @@ d10 $ f1 -- RANDOM FOREST NOISES ...@@ -152,4 +153,4 @@ d10 $ f1 -- RANDOM FOREST NOISES
once $ "fx_gameboy:3" # gain 0.8 # cut 10 once $ "fx_gameboy:3" # gain 0.8 # cut 10
once $ "bassWarsaw" # freq 82 # gain 1.2 # cut 3 once $ "bassWarsaw" # freq 82 # gain 1.2 # cut 3
live/midi/nova/ambient/prestance.tidal
...@@ -15,7 +15,7 @@ d1 $ gF1 $ gM ...@@ -15,7 +15,7 @@ d1 $ gF1 $ gM
$ midiOn "^42" (<| "k k k k*<1!7 2>") $ midiOn "^42" (<| "k k k k*<1!7 2>")
$ midiOff "^42" (<| "k . k(<0!3 1 0 1 3 3>,8,<0!3 6>)") $ midiOff "^42" (<| "k . k(<0!3 1 0 1 3 3>,8,<0!3 6>)")
$ "[jazz,808bd:3]" $ "[jazz,808bd:3]"
# midiG' "^78" 0 1.4 -- # midiG' "^78" 0 1.4
d2 $ gF1 d2 $ gF1
$ midiOn "^43" (<| "~ c ~ c*<1!3 2>") $ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
$ midiOff "^43" (<| "~ <~ c>") $ midiOff "^43" (<| "~ <~ c>")
......
live/midi/nova/beatober/oct_glitchs_sauvages.tidal 0 → 100644
-- 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 gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gM2 $ gF1 -- KICK SOUTENANT
$ midiOn "^42" (<| "k k k <k!3 [<~ k> k]>")
$ fix ((# lpf 4000) . (# drumFrom "rolandtr909" "bd:4")) "909bd"
$ "[jazz,909bd]"
d2 $ gM1 $ gF1 -- Snare glitch+perc
$ 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"
$ "~ glitch"
# begin 0.02
# end 0.35
# pan 0.8
d3 $ gM1 $ 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
|* gain (range 0.85 1 (fast 4 sine + (slow 2 perlin)))
d6 $ gM1 $ gF1
$ "~ rampleS0"
# n "<6!6 7 7>"
# pan 0.8
d8 $ gM1 $ gF1
$ midiOn "^92" (ply 2)
$ whenmod 4 3 (ply 2)
$ chop 8
$ midiOn "^56" (# n 43)
$ loopAt 2
$ "jungle_breaks:18"
# cut 8
d4 $ gM3 $ 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>"
# gain 0.8
d5$ gM3 $ 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))
-- 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/dnb/drums_I_presume.tidal 0 → 100644
do
-- resetCycles
setcps (74/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
d1 $ fast 2
$ gF1 $ gM2
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ midiOn "^42" (<| "k k k <k <[k k*2] [k*2 k]>>")
$ superimpose ((|* gain "^30") .(# "tek_kick:3"))
$ "[jazz,rampleA0:1]"
d2 $ gM1 $ gF1
$ "~ s ~ s*<1!3 2>"
# "snare:40"
# note "-4"
# lpf 3000
d3 $ gM1 $ gF1
$ "drum:2*[[24 <8 12 16 24> 32 16 32 16 32 8] 8]"
d4 $ gM3 $ gF2
$ midiOn "^89" (ply 2)
$ note ("<e3 <b2 fs3 a3 b3>>" + "0 . <5 -4>([3 <1 <3 5>>],8)")
# "bassWarsaw"
# crushbus 41 (range 16 5 "^53")
# cut 4 # gain 0.8
d5
$ midiOn "^58" (rev)
$ fast 2
$ note ("<b3 c4 cs4 c4>" )
# crushbus 51 (range 16 3.5 "^54")
# "FMRhodes2"
d8 $ gF1 $ gM1
$ loopAt 1
$ chop 8
$ midiOn "^56" (# n 52)
$ midiOff "^56" (slice 4 "<[0 1]!3 [0 1 2 3]>")
$ "jungle_breaks:65"
# gain 0.8
# lpf 4000
d9 $ gF3
$ fix (>| "bond:9") "d"
$ fix (>| "bond:8") "c"
$ fix ((# end "<0.5 1>") . (>| "bond:7")) "just_a_drink"
$ fix (>| "bond:6") "2martinis"
$ "<~ ~ ~ just_a_drink ~ ~ <2martinis d> ~>"
# cut 9
# gain 0.8
d10 $ gM3 $ gF3
$ slice 8 "<0!3 [2 3]>"
$ "bond:1"
# cut 9
d11 $ gF3 $ gM3
$ "bond:11"
# cut 11
# gain 1
live/midi/nova/dnb/force_motrice.tidal 0 → 100644
-- Atelier de force motrice
do
-- resetCycles
setcps (125/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
d1
$ gF1 $ gM2
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ midiOn "^42" (<| "k k k k")
$ superimpose ((|* gain "^30") .(# "tek_kick:3"))
$ "[kick:4]"
d2 $ gM1 $ gF1
$ midiOff "^43" (mask "<t!16 f!16>")
$ "~ s ~ s*<1!3 2>"
# "rampleM8:8" # note "-4"
d3 $ gM1 $ gF1
-- $ midiOn "^44" (mask "t([16 <16 [32 64]>],64)" . chop 16 . ply 4)
$ "hh(3,8) hh(<3!3 5>,8)"
# "rampleM8:4"
# gain (fast 8 $ range 0.85 0.95 perlin)
d4 $ gM2 $ gF2 $ loopAt 4
$ "nujazz_bass125:1"
# cut 4
# octersub (slow 32 $ range 0 0.9 sine)
# room (slow 32 $ range 0.2 0.8 cosine)
# crushbus 41 (range 16 2.5 "^53")
# dry 1.3
# sz (slow 8 $ range 0.7 0.1 sine)
d5 $ gM3 $ gF2
$ midiOn "^58" (off 0.125 id . rev)
$ note ("[g@2 ~!4 <f ~ as5 c6>]" - 12)
# crushbus 51 (range 16 2.5 "^54")
# "FMRhodes1"
d7 $ gM3 $ gF3
$ midiOn "^59" (struct "<t(3,8)!3 [t(3,8) t(<3!3 5>,8)]>")
$ note ("<c g <ef!3 as> f>"
-- - 12
)
# pan 0.9
# room 0.4
# "giorgio_syn:22"
# crushbus 71 (range 12 3.4 "^55")
# cut 7
# gain 0.7
d8 $ gM1 $ gF1
$ midiOn "^92" (iter "1 <1 4>")
$ midiOn "^36" ((|* gain 0.9) . loopAt 2 . (# "jungle_breaks:16"))
$ midiOn "^56" ((|* gain 0.9) . loopAt 0.5 . (# "jungle_breaks:36"))
$ chop 16
$ loopAt 2
$ "break:2"
# gain 0.8
d10
$ n "<~ ~ 27 ~ ~ ~ ~ <29 21>>"
# "jungle_vocals"
# cut 10
# gain 0.48
# room 0.4
d11 $ gF3 $ gM3
$ whenmod 64 0 (superimpose (
(stut 4 0.75 "e")
. (# n 3)
. (|* gain 0.9)
. (# cut 110)))
$ note "<c5 <g4!8 ef5!8> <bf4 bf4 bf4 ds4> <ef4 ef4 ef4 d4>>"
# "cbow:2"
# cut 11
d6 $ gM3 $ gF2 $ note
(
"<g4 c4 ds4 <ds4 f4>>"
- 5 -- calage
+ 24
)
# "meth_bass:3"
# cut 6
# gain 0.8
live/midi/nova/fusion/coworking.tidal 0 → 100644
do
setcps (100/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
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k*<1 2>" )
$ midiOff "^42" (<| "k . k(<3!3 5>,8,<0!6 3 3>)" )
$ "[jazz]"
d2 $ gF1 $ gM1
$ midiOff "^43" (<| "~ ~ ~ sn")
$ midiOn "^43" (<| "~ s ~ s")
$ "[snare:21]"
# gain 0.7
d3 $ gF1 $ gM1 $ "dr*[8 8 8 <4 4 8 16>]"
# "hh:7" # legato 0.25 # cut 3
|* gain (range 0.95 1.1 (fast 2 perlin))
d4
$ arp "up" $ note ("[e5 e5 <e5 f5 a5 c6>] <a4!7 a5>@3" + 3.6)
# "jungle_bass:4"
# begin 0.35
# lpf 5000
# cut 4
d5 $ gM3 $ gF3
-- $ someCyclesBy "0.2" (mask "t(3,8)")
-- $ arp "up"
$ note ("<[<a@3 [a c4]> [gs <a!3 ds> gs]] e>"
+ "[0,12]"
|+| "0 12 0 12*<1!3 2>"
)
# "marimba1"
# gain 1.2
# pan 0.6
# room 0.8 # sz (slow 16 $ range 0.8 0.2 saw)
# legato 0.5
# octerbus 51 (range 0 0.8 "^54")
-- # velocity 0.8
d8 $ gF3 $ gM1
$ chop 16
-- $ midiOn "60" (ply 2)
$ loopAt 2
$ "break:4"
# pan 0.2
# gain 0.8
a bf c ds e f gs
live/midi/nova/nujazz/cafe_chaud.tidal 0 → 100644
resetCycles
do
setcps(120/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 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
-- $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57"
$ "house:0" -- TODO: Meilleur kick?
-- # cut 1
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOff "^44" (slow 2)
$ arp "up"
$ midiOn "^76" (ply 2)
-- $ "d(<8 10 12 <14 [16 32 [16 <16 32>]]>>,16,1)" -- FIXME IRREGULIER
$ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
-- # "[h2ogmsn:14]"
# "[rampleS57:2]"
# note (-12 + "3.5" + "e6")
-- # cut 3
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# pan 0.3
d4 $ gF2 $ gM3 -- TODO: Varier basse?
$ midiOn "^89" (ply "2 <2!3 4>")
$ midiOn "^57" (slice 4 (fast "<8!3 16>" "<0 1 2 3>"))
$ midiOff "^57" (slice 4 (fast 1 "<0!3 <1 3>>"))
$ loopAt 4
$ "nujazz_bass120:4"
# cut 4
# crushbus 41 (range 16 4 "^53")
d5 $ gF3 $ gM3
$ chop 8
$ loopAt 4
$ "nujazz_keys120"
# n (slow 4 "<5 6 7 8>")
# gain 1.2
# cut 5
d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?!
-- $ striate 16
-- $ chop 16
$ loopAt 4
$ slice 4 "0 <0!3 1> <0!3 2> 3"
$ "meth_bass:4"
# cut 6
# crush 8
# lpf (slow 16 $ range 4000 400 sine)
# gain 0.4
d8 $ gF1 $ gM1 -- Break populaire
$ midiOn "^92" (ply 2)
$ chop 8
$ loopAt 2
$ midiOn "^36" (loopAt "1 <1 0.5>" . (# "jungle_breaks:6"))
$ midiOn "^56" (# "jungle_breaks:24")
$ "jungle_breaks:53"
# gain 0.5
# pan "0.68 0.42 0.42 0.68"
d7 $ gF1 $ gM1 -- SECOND BREAK!!?!
$ midiOn "^91" (ply 2)
$ midiOn "^55" (loopAt 1 . (|> "jungle_breaks:19"))
$ midiOn "^59" (slice 8 (run "8 <8!3 16>"))
$ chop 8
$ loopAt 2
$ "jungle_breaks:22"
# pan "0.8 0.2"
live/midi/nova/nujazz/cafe_glace.tidal 0 → 100644
once $ "nujazz_beats120"
-- It's a nuday
-- It's a new sample
resetCycles
do
setcps(125/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 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
$ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[kick:5,tech:5,jazz]"
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ "[cp]"
# gain 0.9
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2)
$ midiOn "^76" (ply 2)
$ "drum:2*[<6!3 12> <6 [8 <12 24>]>]"
# "h2ogmsn:12"
# cut 3
# legato (range 0.28 1 sine)
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# room 0.14 # sz 0.4 # dry 1
# pan "<0.7!16 0.3!16>"
-- # pan 0.8
d4 $ gM3 $ gF2 $ chop 8 $ loopAt 4
$ "nujazz_bass125:1"
# cut 4
# pan 0.55
# room 0.3
# crushbus 41 (range 12 4.5 "^53")
d5 $ gM3 $ gF3
$ chop 8
$ loopAt 2
$ "nujazz_keys125" # n "<56 56 57 56 58!4 59 59 56 59>"
# cut 5
# pan 0.6
d7 $ gM3 $ gF3
$ chop 8
$ loopAt 2
$ "nujazz_keys125" # n "<66!4 67!4>"
# cut 7
# octerbus 71 (range 0 0.5 "^55")
# pan 0.1
d12 $ gM3 $ gF3
$ slice 4 "<<[0 1 2 3] [0 1 0 1 2 3 2 3]> [0 1 2 3]>"
$ chop 8
$ loopAt 2 $ "nujazz_keys125:44"
# cut 5
# gain 0.8
# pan 0.7
# room 0.2
d11 $ gM3 $ gF3
-- $ (0.5 <~)
$ loopAt 2
$ "nujazz_keys125"
# n "<4!3 5>"
# cut 5
# roombus 110 (slow 16 $ range 0 0.9 saw)
# lpfbus 112 (slow 32 $ range 12000 500 sine)
# att 0.02
# rel 7
# gain 0.9
d8 $ gM1 $ gF1
-- Transforms over samples
$ midiOn "^60" (iter "1 4") -- Split
$ midiOn "^92" (fast 2) -- Multi
$ chop 16
$ loopAt 2
-- Sample selection
$ midiOn "^36" (# n 33)
$ midiOn "^56" (loopAt 1 . (# "break:7"))
$ "jungle_breaks:20"
# cut 8
# pan "<0.3!16 0.7!16>"
# gain 0.78
d10 $ gM3 $ gF3
$ superimpose (
mask "<f!16 t!16>"
. arp "<up [up down]>"
. (|+ note "c'maj'4") . (|* gain 0.75))
$ note ("<c5 g4 <ef4!2 bf4!2> <c4 f4>>" + "0(3,8) 0(3,8)"
-- - 12
)
# "[FMRhodes1]"
# modIndex 1
# room 0.2
# pan 0.45
# gain 1.2
live/midi/nova/nujazz/cafe_tiede.tidal 0 → 100644
resetCycles
do
setcps(120/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 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
-- $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57"
$ "house:0" -- TODO: Meilleur kick?
-- # cut 1
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOff "^44" (slow 2)
$ arp "up"
$ midiOn "^76" (ply 2)
-- $ "d(<8 10 12 <14 [16 32 [16 <16 32>]]>>,16,1)" -- FIXME IRREGULIER
$ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
-- # "[h2ogmsn:14]"
# "[rampleS57:2]"
# note (-12 + "3.5" + "e6")
-- # cut 3
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# pan 0.3
d4 $ gF2 $ gM3
$ note ("e3 <b2!3 <ef3 g3>>" |+| "[0 ~ ~ 0 ~ ~ 0 ~] [0 ~ ~ 0 ~ <~ 0> 0 <~!3 0>]")
# crushbus 41 (range 16 4 "^53")
# "bassWarsaw"
d11 $ gF2 $ gM3
$ chop 16
$ loopAt 2
$ "nujazz_bass120"
# n "<33!64 34!64>"
# pan 0.3
# cut 4
# att 0.06 # rel 2
# crushbus 41 (range 16 3 (slow 16 $ perlin))
d5 $ gF3 $ gM3 -- Piano guide premier
$ "nujazz_keys120"
# n "<61!24 60!8>"
# pan 0.8
# roombus 51 (range 0.1 1.4 "^54")
# lpfbus 52 (range 10000 400 "^54")
# cut 5
# gain 0.9
d10 $ gF3 $ gM3
$ someCyclesBy "<1!32 0!32>" (|+ note "<e g bf b>")
$ someCyclesBy "<0!32 1!32>" (|+ note "<e b bf g>")
$ note (
"[0 12 0(<1!3 <3 [3 1]>>,5)]"
+ "[0,12]"
- 12
)
# cut 10
# "cpluck:4"
d7 $ gF1 $ gM1 -- SECOND BREAK!!?!
$ midiOn "^91" (ply 2)
$ midiOn "^55" (loopAt 1 . (|> "jungle_breaks:19"))
$ midiOn "^59" (slice 8 (run "8 <8!3 16>"))
$ chop 8
$ loopAt 2
$ "jungle_breaks:22"
# pan "0.8 0.2"
d8 $ gF1 $ gM1 -- Le Beat, Nu
$ midiOn "^60" (slice 8 $ run 16)
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 16
$ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:6"))
$ midiOn "^56" (# "jungle_breaks:24")
$ loopAt 4
$ n "<10!8 11!8 12!8 10!8>"
# pan "0.2 0.8 0.2 0.8"
# "nujazz_beats120"
-- # pan 0.26
-- # gain 0.9
-- # octersub 1.2
-- # octersubsub 2
# cut 8
# gain 0.9
live/midi/nova/nujazz/josh_nu.tidal 0 → 100644
once $ "nujazz_beats120"
-- It's a nuday
-- It's a new sample
resetCycles
do
setcps(125/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 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
$ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[kick:5,tech:5,jazz]"
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2)
$ midiOn "^76" (ply 2)
-- $ (0.125 ~>) -- decalage
-- $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
-- $ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>")
-- $ "d*<8 [8 [16 <8 16> 16 <8 4 <16 32>>]]>"
$ sometimesBy "0!3 <0 0.5>" (# n 12)
$ sometimesBy "0!3 <0.1 0>" (# n 13)
$ "d*[4 2]"
# "h2ogmsn:14"
# cut 3
# legato (range 0.28 1 sine)
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# room 0.14 # sz 0.4 # dry 1
# pan 0.8
d4 $ loopAt 4
$ "nujazz_bass125:1"
# cut 4
d6 $ gF1 $ gM1 -- Highest hats
$ (0.125 ~>) -- decalage
$ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
$ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>")
$ "hh:7"
# cut 3
# gain (0.7 * (range 0.75 1.1 (fast 4 perlin)))
# legato (range 1.1 0.25 (fast 4 perlin))
# room 0.4 # sz 0.4
# pan 0.8
d4 $ gF2 $ gM3 --
$ midiOn "^57" ((off "0.125" (
(|+| note "0 <7 12>") . (|- pan 0.1) . (# cut 41)
)))
$ midiOn "^89" (ply "<4!3 8>")
$ note ("<[a4@4 c5 <c5 d5 c5 fs4>] a4>"
+ "[0,12]"
- 36
)
# "bassWarsaw"
# cut 4
# gain 1.1
# pan 0.3
# octersub 0.5
# octerbus 41 "^53"
# squizbus 42 "^33"
d5 $ gF3 $ gM3 -- Piano guide premier
$ midiOn "^58" (juxBy 0.9 ( -- Piano reflet second
mask "<<f t> [<f t> t]>" .
(# begin 0.5)
. rev
. (|+ note 12)
. (|+ pan 0.2)
. (|* gain 0.87)
. (# cut 55))
)
$ slice 4 "<0 1 2 3 0 1 2 3 1 2 1 3 1 2 1 <~ 3>>"
$ "nujazz_keys120"
# n "<54!16 53!16>"
# pan 0.8
# freezebus 51 (range 0 0.7 "^34")
# cut 5
# gain 0.9
d7 $ gF2 $ gM3 -- Guitare egaree
$ midiOn "^59" (ply 2)
$ midiOn "^91" (ply 2)
$ chop 4
$ n "<0!3 1 0!3 1 3!3 4 3!3 5 6!3 7 6 6 7 7 6 7!3 7!4>"
-- $ n "<>"
# "nujazz_wahwah125"
# cut 7
# pan 0.8
# room 0.24 # sz 0.5 # dry 0.5
# octersubbus 71 (range 0 2 "^55")
# octersubsubbus 72 (range 0 3 "^55")
# gain 1
d8 $ gF1 $ gM1 -- JazzyBelle JazzyBreak
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 16
$ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:24"))
$ midiOn "^56" (# "jungle_breaks:24")
$ loopAt 4
$ n "<0!4 1!3 0 2!4 3!3 <2 3>>"
# "nujazz_beats120"
# pan 0.26
# gain 0.7
# octersub 1.2
# octersubsub 2
# cut 8
d10 $ gF3 -- Pads
$ whenmod 64 132 ( -- ELECTRIFICATION
# octerbus 101 (slow 32 $ range 0.1 1.9 cosine)
)
$ n "<47 <48!3 46>>"
# cut 10
# "nujazz_keys120"
# room 0.5 # sz 0.8 # dry 0.5
# pan 0.4
# gain 0.75
d9 $ gM3 $ gF3 -- La chorale du jugement
$ jux rev
$ note "<[a4@3 <c5 f5>] e5 [<d5!3 f5>] <a5!3 c6>>"
# "moogBass"
# chorus 0.2
# gain 0.5
# att 0.3
# rel 2
# room 0.8
# sz 0.8
# pan 0.8
once $ "jungle_vocals:28" # cut 6
live/midi/nova/nujazz/nu_dans_la_boue.tidal 0 → 100644
once $ "nujazz_beats120"
resetCycles
do
setcps(120/60/4)
let gMask = (midiOn "^41" (mask "t f f [<f t> t]"))
let gMask1 = (midiOn ("^41" -"^42")(mask "t f f [<f t> 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 $ gF1 $ gMask1 . gMute2
-- $ fix ((# hpf 150) . (|* gain 1.05)) "jazz"
$ fix ((# lpf 1250) . (|* gain 1.3)) "kick:5"
$ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[kick:5,tech:5,jazz]"
# gain 1.1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ "[cp:1,rampleM1:10]"
# gain 0.6
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^76" (ply 2)
-- $ (0.125 ~>) -- decalage
-- $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
-- $ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>")
$ "d*<8 [8 [16 <8 16> 16 <8 4 <16 32>>]]>" # "drum:2"
# cut 3
# legato (range 0.28 1 sine)
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# room 0.14 # sz 0.4 # dry 1
# pan 0.8
d4 $ gF2 $ gM3 -- Questions basses
$ midiOn "^89" (slice 8 "<[0 0 0 3] [4 4 4 7]>")
$ midiOn ("^57"-"^89") (slice 8 "<[0 1 2 3]!4 [4 5 6 7]!4>")
$ midiOff ("^57"+"^89") (slice 8 "<[0 1 2 3] [4 5 6 7]>")
$ "nujazz_bass120:16" -- "Bass_D_2"
# octersub 0.5
# octerbus 41 "^53"
# crushbus 42 (range 16 4.5 "^33")
# lpfbus 43 (range 10000 4000 "^33")
# room 0.4 # sz 0.5 # dry 1.1
# cut 4
# pan 0.6
d5 $ gF3 $ gM3 -- Side guitar
$ midiOn "^89" (ply "<2!3 4>" . (|+ note "<2 1>"))
$ midiOn ("^57"-"^89") (|+ note "<1!4 2!4>")
$ midiOff ("^57"+"^89") (|+ note "<2 1>")
$ chop 4
$ "nujazz_guitar120:1"
# cut 5
d9 $ gF3 $ gM3 -- Ambiance garantie
$ chop 8
$ "nujazz_keys120/4" # n "<25!4 26!3 <26 27>>"
# cut 9
# pan 0.3
# gain 0.8
# room 0.4
d6 $ gF1 $ gM1 -- Highest hats
-- $ (0.125 ~>) -- decalage
-- $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
$ whenmod 64 8 (struct "{t(<3 <5 6 7>>,8),t*4}")
$ "hh:7"
# cut 3
# gain (0.7 * (range 0.75 1.1 (fast 4 perlin)))
# legato (range 1.1 0.25 (fast 4 perlin))
# room 0.4 # sz 0.4
# pan 0.2
d7 $ gM3 $ gF2
$ midiOn "^91" (ply "<2!4 1!3> <2 4>")
$ chop 8
$ whenmod 16 8 (whenmod 4 3 (ply "<2 4>") . chop 8)
$ "meth_bass:19"
# end 0.5
# begin "<0!4 0.2!4>"
# cut 7
# room 0.4
# lpf 5000
# octer 0
# octersubsub 0
-- # note "<0!4 2!4>"
# gain 0.6
d8 $ gF1 $ gM1
$ midiOn "^92" (ply "<2!4 1!3> <2 4>")
$ somecyclesBy (slow 16 $ range 0.89 0.1 saw) (midiOff "^92" (mask "t f . t(3,8)"))
$ iter "1 4 2 1"
$ chop 16
$ loopAt 2
$ "jungle_breaks:42"
# gain 0.6
# pan (slow 8 $ range 0.8 0.55 saw)
d10 $ ""
-- d5 $ gF3 $ gM3 -- Piano guide premier
-- $ midiOn "^58" (juxBy 0.9 ( -- Piano reflet second
-- mask "<<f t> [<f t> t]>" .
-- (# begin 0.5)
-- . rev
-- . (|+ note 12)
-- . (|+ pan 0.2)
-- . (|* gain 0.87)
-- . (# cut 55))
-- )
-- $ slice 4 "<0 1 2 3 0 1 2 3 1 2 1 3 1 2 1 <~ 3>>"
-- $ "nujazz_keys120"
-- # n "<54!16 53!16>"
-- # pan 0.3
-- # cut 5
-- # gain 0.9
-- d7 $ gF2 $ gM3 -- Guitare egaree
-- $ midiOn "^59" (ply 2)
-- $ midiOn "^91" (ply 2)
-- $ chop 4
-- $ n "<0!3 1 0!3 1 3!3 4 3!3 5 6!3 7 6 6 7 7 6 7!3 7!4>"
-- -- $ n "<>"
-- # "nujazz_wahwah125"
-- # cut 7
-- # pan 0.8
-- # room 0.4
-- # octersubbus 71 (range 0 2 "^55")
-- # octersubsubbus 72 (range 0 3 "^55")
-- # gain 0.6
-- d8 $ gF1 $ gM1 -- JazzyBelle JazzyBreak
-- $ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
-- $ chop 16
-- $ loopAt 4
-- $ n "<0!4 1!3 0 2!4 3!3 <2 3>>"
-- # "nujazz_beats120"
-- # pan 0.26
-- # gain 0.7
-- # cut 8
-- d10 $ gF3 -- Pads
-- $ whenmod 64 132 ( -- ELECTRIFICATION
-- # octerbus 101 (slow 32 $ range 0.1 1.9 cosine)
-- )
-- $ n "<47 <48!3 46>>"
-- # cut 10
-- # "nujazz_keys120"
-- # room 0.5 # sz 0.8 # dry 0.5
-- # pan 0.4
-- # gain 0.55
-- d9 $ gM3 $ gF3
-- $ jux rev
-- $ note "<[a4@3 <c5 f5>] e5 [<d5!3 f5>] <a5!3 c6>>"
-- # "moogBass"
-- # chorus 0.2
-- # gain 0.5
-- # att 0.3
-- # rel 2
-- # room 0.8
-- # sz 0.8
-- # pan 0.8
once $ "jungle_vocals:28" # cut 6
live/midi/nova/nujazz/salut_nu.tidal 0 → 100644
once $ "nujazz_beats120"
-- It's a nuday
-- It's a new sample
resetCycles
do
setcps(120/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 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
$ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[kick:5,tech:5,jazz]"
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2)
$ midiOn "^76" (ply 2)
-- $ (0.125 ~>) -- decalage
-- $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
-- $ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>")
-- $ "d*<8 [8 [16 <8 16> 16 <8 4 <16 32>>]]>"
$ sometimesBy "0!3 <0 0.5>" (# n 12)
$ sometimesBy "0!3 <0.1 0>" (# n 13)
$ "d*[4 2]"
# "h2ogmsn:14"
# cut 3
# legato (range 0.28 1 sine)
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# room 0.14 # sz 0.4 # dry 1
# pan 0.8
d6 $ gF1 $ gM1 -- Highest hats
$ (0.125 ~>) -- decalage
$ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
$ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>")
$ "hh:7"
# cut 3
# gain (0.7 * (range 0.75 1.1 (fast 4 perlin)))
# legato (range 1.1 0.25 (fast 4 perlin))
# room 0.4 # sz 0.4
# pan 0.8
d4 $ gF2 $ gM3 --
$ midiOn "^57" ((off "0.125" (
(|+| note "0 <7 12>") . (|- pan 0.1) . (# cut 41)
)))
$ midiOn "^89" (ply "<4!3 8>")
$ note ("<[a4@4 c5 <c5 d5 c5 fs4>] a4>"
+ "[0,12]"
- 36
)
# "bassWarsaw"
# cut 4
# gain 1.1
# pan 0.3
# octersub 0.5
# octerbus 41 "^53"
# squizbus 42 "^33"
d5 $ gF3 $ gM3 -- Piano guide premier
$ midiOn "^58" (juxBy 0.9 ( -- Piano reflet second
mask "<<f t> [<f t> t]>" .
(# begin 0.5)
. rev
. (|+ note 12)
. (|+ pan 0.2)
. (|* gain 0.87)
. (# cut 55))
)
$ slice 4 "<0 1 2 3 0 1 2 3 1 2 1 3 1 2 1 <~ 3>>"
$ "nujazz_keys120"
# n "<54!16 53!16>"
# pan 0.8
# freezebus 51 (range 0 0.7 "^34")
# cut 5
# gain 0.9
d7 $ gF2 $ gM3 -- Guitare egaree
$ midiOn "^59" (ply 2)
$ midiOn "^91" (ply 2)
$ chop 4
$ n "<0!3 1 0!3 1 3!3 4 3!3 5 6!3 7 6 6 7 7 6 7!3 7!4>"
-- $ n "<>"
# "nujazz_wahwah125"
# cut 7
# pan 0.8
# room 0.24 # sz 0.5 # dry 0.5
# octersubbus 71 (range 0 2 "^55")
# octersubsubbus 72 (range 0 3 "^55")
# gain 1
d8 $ gF1 $ gM1 -- JazzyBelle JazzyBreak
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 16
$ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:24"))
$ midiOn "^56" (# "jungle_breaks:24")
$ loopAt 4
$ n "<0!4 1!3 0 2!4 3!3 <2 3>>"
# "nujazz_beats120"
# pan 0.26
# gain 0.7
# octersub 1.2
# octersubsub 2
# cut 8
d10 $ gF3 -- Pads
$ whenmod 64 132 ( -- ELECTRIFICATION
# octerbus 101 (slow 32 $ range 0.1 1.9 cosine)
)
$ n "<47 <48!3 46>>"
# cut 10
# "nujazz_keys120"
# room 0.5 # sz 0.8 # dry 0.5
# pan 0.4
# gain 0.75
d9 $ gM3 $ gF3 -- La chorale du jugement
$ jux rev
$ note "<[a4@3 <c5 f5>] e5 [<d5!3 f5>] <a5!3 c6>>"
# "moogBass"
# chorus 0.2
# gain 0.5
# att 0.3
# rel 2
# room 0.8
# sz 0.8
# pan 0.8
once $ "jungle_vocals:28" # cut 6
live/mood/sad/infiltrations.tidal 0 → 100644
once $ "dr"
-- INFILTRATIONS
-- Chemin de moindre pente
-- L'eau coule toujours vers le bas
-- Tension, reaction, detente
-- Mais dans la suite logique quelque-chose ne va pas
-- La larme qui coule, elle merite de tomber
-- Le nuage qui deborde ne demande qu'a percer
-- Le ruisseau qui s'egare peut toujours diverger
-- Le ruminement hagard un jour va s'arreter
-- Et pourtant nous sommes tous fait d'eau
-- Rinces, trempes, et pourtant ravis
-- Sois comme l'eau, mon ami
-- Sois comme l'eau, mon ami
do
setcps (80/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
d1 $ gF1 $ gM2
$ superimpose ((|* gain (1.3 * "^30")) . (# "hardkick:2"))
$ midiOn "^42" (<| "k k k <k <k*2 [~ k*<1 [4 2]>]>>")
$ "kick:5"
# lpf 200
d2 $ gF1 $ gM1
$ midiOn "^75" (ply 4)
$ midiOn "^43" (<| "~ s*<1!7 2> ~ s*<1!3 2>")
$ midiOff "^43" (<| "~ s")
$ whenmod 4 3 (superimpose (("<e s>" <~) . (|* gain 0.9)))
$ "[snare:2,snare:10]"
# octer 0.1
# octersub 0.2
# octersubsub 0.8
# pan 0.25
-- # lpf 3000
d3 $ gF1 $ gM1
$ often (ply "[1 2] <2!3 [2 4]>")
$ "hh(3,8) hh(3,8)"
# octer 0.8
# room 0.4
|* gain "1 1 0.95 1 0.96 1 0.975 1.1"
d4 $ gF2 $ gM3 $ note (
"<e gs e <ef <fs gs4>>>"
- 24
)
# "bassWarsaw"
# octersubbus 42 (range 0 1.5 "^17")
# squizbus 42 (range 0 2.5 "^33")
# crushbus 41 (range 16 2.5 "^53")
# room 0.3 # sz 0.6 # dry 0.5
d5 $ gF3 $ gM3 $ note (
"<e gs e <ef <fs gs4>>>"
|+| "<0 [0 12 0]> 7@2 <0!3 <12 -12>>"
-- + 12
)
# "giorgio_syn:24"
# legato 2
# squiz (slow 16 $ range 0 (range 0 4 "^54") saw)
# gain 0.8
# pan (slow 8 $ range 0.8 0.6 saw)
# cut 5
d8 $ gF1 $ gM1
$ midiOn "^20" (loopAt 4)
$ midiOn "^36" (# "jungle_breaks:14")
$ midiOn "^56" (# "jungle_breaks:15")
$ midiOn "^92" (ply "<2!3 [4!3 8]>")
$ chop 8
$ loopAt 2
$ midiOn "^60" (slice 8 (run "<4!3 2>"))
$ "jungle_breaks:12"
# cut 8
# pan "0.8 0.2 0.8 [0.2 0.8]*2"
releases/code_nu.md 0 → 100644
# Code nu
> Nu-jazz focus
Invoque l'ete
Cafe chaud
Cafe tiede
Cafe glace
Nu dans la boue?
Salut Nu
releases/glitchs_and_friends.md 0 → 100644
# GLITCHS AND FRIENDS
> Name in progress
Oct4 - Glitchs sauvages
Contre Visite
**Nuit agitee** [trop fort]
Bain bouillant
Nouveau soleil
_Permanence_
Haunted house
About time
AtaRight
Empreinte du numerique
Burn this book
Force Motrice [DNB Nassim]
study/chords/lofi.tidal
...@@ -20,6 +20,7 @@ do ...@@ -20,6 +20,7 @@ do
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
d1 d1
-- $ slow 4 -- Helper: slow down -- $ slow 4 -- Helper: slow down
#
$ note ( $ note (
-- midiOn "^43" (arp "up") -- Helper: arpegiate every other chord -- midiOn "^43" (arp "up") -- Helper: arpegiate every other chord
-- [8 LoFi Chord Progs](https://blog.landr.com/lofi-chord-progressions/) -- [8 LoFi Chord Progs](https://blog.landr.com/lofi-chord-progressions/)
...@@ -31,7 +32,7 @@ d1 ...@@ -31,7 +32,7 @@ d1
-- "<[a,c6,e6,g6,b6,d7] [fs,a,c6,d6,fs6,a6,c7] [f,a,c6,e6,f6,a6,c7] [c,e,g,b,e6,g6,b6]>" -- "<[a,c6,e6,g6,b6,d7] [fs,a,c6,d6,fs6,a6,c7] [f,a,c6,e6,f6,a6,c7] [c,e,g,b,e6,g6,b6]>"
-- --
-- # Cmin11,Fmin9,Cmin11,G7#5 - Enthusiasm -- # Cmin11,Fmin9,Cmin11,G7#5 - Enthusiasm
-- "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>" "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>"
-- --
-- # Ebmaj9,Abmaj13 - ???(3:34) - Very uplfting -- # Ebmaj9,Abmaj13 - ???(3:34) - Very uplfting
-- "<[f,gs,c,ef,g6,bf6] [ef,g,bf,d6,f6,as6]>" -- "<[f,gs,c,ef,g6,bf6] [ef,g,bf,d6,f6,as6]>"
......
study/samples/blues_elmo.tidal deleted 100644 → 0
do
setcps (120/60/4)
d1 $ "k(1,4)" # "cpu" # gain 0.8
d2 $ "~ sn ~ sn" # "snare:32"
d3 $ fast "4" $ "drum:2"
once
$ "blues_elmore:4"
# cut 4 # gain 0.8
study/samples/disparition_elmo.tidal 0 → 100644
do
setcps (125/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
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k")
$ midiOff "^42" (<| "k . [k*<1 2 <1 2> <1 <4 [4 2]>>>] ~")
$ "jazz"
d2 $ gF1 $ gM1
$ "~ s ~ s*2" # "<rampleM12:3!3 rampleM12:2>" # note "<-0.5!3 -4.5>"
# gain 0.8
d3 $ gF1 $ gM1 $ "hh(<3!3 <3 5 7 1>>,8) hh(<3!3 5>,8)"
# "h2ogmhh"
# gain 0.8
d4 $ gF2 $ gM3 -- Blues "Fenbass" bassline
$ sometimesBy (1 - "^17") (# n "7")
$ midiOn "^89" (ply "2 4")
$ midiOn "^57" ( -- SLICING MACHINE
slice 16 ("<0 4 8 12>"
+ "<[0 1 2 3]!8 [<0 3 1 <3 2>>*8]!8>"))
-- $ chop 16
$ "nujazz_bass125:6"
# crushbus 41 (range 16 4 "^53")
# roombus 42 (range 0 0.4 "^33")
# pan 0.4
# cut 4
d5 $ gF3 $ gM3 -- Pixelated love
$ swing 16
$ arp "up"
-- Shape of my pixel hearts )
$ whenmod 64 8 (|+| note "0 12 0 <12!8 [12 24 12 0 12]!4 [12 0 12 -12 0]!3 [[12 24]*8]>")
$ note (
"<g a bf <c6!3 d6>>" -- Gamme
- 12 -- Octave
)
# "FMRhodes1" # cut 5
# roombus 52 (range 0 0.4 "^34")
# modIndex "^54"
# pan 0.7
d10
$ off 0.5 ((# n 6) . (|* gain 0.35) . (|+ pan 0.1))
$ note (
"<g4 <a4 bf4 a4 ef4>>"
-- + "0 0 0 0"
)
# "cbow:1"
-- # cut 10
-- # att 0.5
-- # rel 2
# legato 0.8
# gain 0.5
d11 $ gF3 $ gM3
$ note ("~ 0 ~ 0" + "<d4 <[d4 ef4] <[ef4 d4] [g4 fs4]>>>" +3)
# "daft"
# end 0.05
# gain 0.7
# room 0.8 # sz 0.8 # dry 1.9
d8
$ chop 4
$ loopAt 2
$ "jungle_breaks:45"
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment