Skip to content

T
Tidal
Commit c0f0edcc by PLN
Options

Merge branch 'feat-search' into 'master' 

Merge from feat search

See merge request !1
parents bf4a3a5f ebed78f3
Showing with 5133 additions and 856 deletions
BootTidal.hs
......@@ -101,6 +101,10 @@ let modIndex = pF "modIndex"
midiG' ch l h = _gainG (range l h ch) -- midiGain control
midiGdef = midiG' 1 0 1 -- midiGain default
midiG ch = midiG' ch 0 1 -- midiGain default
-- Global filters
gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
:}
:set prompt "tidal> "
......
PatchBay_MultiChannel.xml 0 → 100644
<!DOCTYPE patchbay>
<patchbay name="PatchBay_MultiChannel" version="0.9.12">
<output-sockets>
<socket client="SuperCollider" exclusive="off" name="SuperCollider" type="jack-audio">
<plug>out_1</plug>
<plug>out_2</plug>
<plug>out_3</plug>
<plug>out_4</plug>
<plug>out_5</plug>
<plug>out_6</plug>
<plug>out_7</plug>
<plug>out_8</plug>
<plug>out_9</plug>
<plug>out_10</plug>
<plug>out_11</plug>
<plug>out_12</plug>
<plug>out_13</plug>
<plug>out_14</plug>
<plug>out_15</plug>
<plug>out_16</plug>
<plug>out_17</plug>
<plug>out_18</plug>
<plug>out_19</plug>
<plug>out_20</plug>
<plug>out_21</plug>
<plug>out_22</plug>
<plug>out_23</plug>
<plug>out_24</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour" type="jack-audio">
<plug>LTC\-Out</plug>
<plug>Click\/audio_out\ 1</plug>
<plug>Click\/audio_out\ 2</plug>
<plug>Master\/audio_out\ 1</plug>
<plug>Master\/audio_out\ 2</plug>
<plug>Monitor\/audio_out\ 1</plug>
<plug>Monitor\/audio_out\ 2</plug>
<plug>Tidal\ 1\/audio_out\ 1</plug>
<plug>Tidal\ 1\/audio_out\ 2</plug>
<plug>Tidal\ 2\/audio_out\ 1</plug>
<plug>Tidal\ 2\/audio_out\ 2</plug>
<plug>Tidal\ 3\/audio_out\ 1</plug>
<plug>Tidal\ 3\/audio_out\ 2</plug>
<plug>Tidal\ 4\/audio_out\ 1</plug>
<plug>Tidal\ 4\/audio_out\ 2</plug>
<plug>Keys\/audio_out\ 1</plug>
<plug>Keys\/audio_out\ 2</plug>
<plug>Tidal\ 6\/audio_out\ 1</plug>
<plug>Tidal\ 6\/audio_out\ 2</plug>
<plug>Tidal\ 7\/audio_out\ 1</plug>
<plug>Tidal\ 7\/audio_out\ 2</plug>
<plug>Tidal\ 8\/audio_out\ 1</plug>
<plug>Tidal\ 8\/audio_out\ 2</plug>
<plug>Tidal\ 9\/audio_out\ 1</plug>
<plug>Tidal\ 9\/audio_out\ 2</plug>
<plug>Tidal\ 10\/audio_out\ 1</plug>
<plug>Tidal\ 10\/audio_out\ 2</plug>
<plug>Tidal\ 11\/audio_out\ 1</plug>
<plug>Tidal\ 11\/audio_out\ 2</plug>
<plug>Tidal\ 12\/audio_out\ 1</plug>
<plug>Tidal\ 12\/audio_out\ 2</plug>
<plug>Tidal\ 5\/audio_out\ 1</plug>
<plug>Tidal\ 5\/audio_out\ 2</plug>
<plug>Kick\/audio_out\ 1</plug>
<plug>Kick\/audio_out\ 2</plug>
<plug>send\ 1\/audio_send\ 1</plug>
<plug>send\ 1\/audio_send\ 2</plug>
<plug>send\ 2\/audio_send\ 1</plug>
<plug>send\ 2\/audio_send\ 2</plug>
<plug>Percs\/audio_out\ 1</plug>
<plug>Percs\/audio_out\ 2</plug>
<plug>Bass\/audio_out\ 1</plug>
<plug>Bass\/audio_out\ 2</plug>
<plug>Leads\/audio_out\ 1</plug>
<plug>Leads\/audio_out\ 2</plug>
<plug>Other\/audio_out\ 1</plug>
<plug>Other\/audio_out\ 2</plug>
<plug>auditioner\/audio_out\ 1</plug>
<plug>auditioner\/audio_out\ 2</plug>
</socket>
<socket client="Built\-in\ Audio\ Digital\ Stereo\ \(HDMI\)" exclusive="off" name="Built-in Audio Digital Stereo (HDMI)" type="jack-audio">
<plug>monitor_FL</plug>
<plug>monitor_FR</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour 2" type="jack-audio">
<plug>Master\/audio_out\ 1</plug>
<plug>Master\/audio_out\ 2</plug>
<plug>Tidal\ 1\/audio_out\ 1</plug>
<plug>Tidal\ 1\/audio_out\ 2</plug>
<plug>Tidal\ 2\/audio_out\ 1</plug>
<plug>Tidal\ 2\/audio_out\ 2</plug>
<plug>Tidal\ 3\/audio_out\ 1</plug>
<plug>Tidal\ 3\/audio_out\ 2</plug>
<plug>Tidal\ 4\/audio_out\ 1</plug>
<plug>Tidal\ 4\/audio_out\ 2</plug>
<plug>Keys\/audio_out\ 1</plug>
<plug>Keys\/audio_out\ 2</plug>
<plug>Tidal\ 6\/audio_out\ 1</plug>
<plug>Tidal\ 6\/audio_out\ 2</plug>
<plug>Tidal\ 7\/audio_out\ 1</plug>
<plug>Tidal\ 7\/audio_out\ 2</plug>
<plug>Tidal\ 8\/audio_out\ 1</plug>
<plug>Tidal\ 8\/audio_out\ 2</plug>
<plug>Tidal\ 9\/audio_out\ 1</plug>
<plug>Tidal\ 9\/audio_out\ 2</plug>
<plug>Tidal\ 10\/audio_out\ 1</plug>
<plug>Tidal\ 10\/audio_out\ 2</plug>
<plug>Tidal\ 5\/audio_out\ 1</plug>
<plug>Tidal\ 5\/audio_out\ 2</plug>
<plug>Kick\/audio_out\ 1</plug>
<plug>Kick\/audio_out\ 2</plug>
<plug>send\ 1\/audio_send\ 1</plug>
<plug>send\ 1\/audio_send\ 2</plug>
<plug>send\ 2\/audio_send\ 1</plug>
<plug>send\ 2\/audio_send\ 2</plug>
<plug>Percs\/audio_out\ 1</plug>
<plug>Percs\/audio_out\ 2</plug>
<plug>Bass\/audio_out\ 1</plug>
<plug>Bass\/audio_out\ 2</plug>
<plug>Leads\/audio_out\ 1</plug>
<plug>Leads\/audio_out\ 2</plug>
<plug>Other\/audio_out\ 1</plug>
<plug>Other\/audio_out\ 2</plug>
<plug>auditioner\/audio_out\ 1</plug>
<plug>auditioner\/audio_out\ 2</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour 3" type="jack-audio">
<plug>Monitor\/audio_out\ 1</plug>
<plug>Monitor\/audio_out\ 2</plug>
</socket>
<socket client="Midi\-Bridge" exclusive="off" name="Midi-Bridge" type="jack-midi">
<plug>Midi\ Through\:\(capture_0\)\ Midi\ Through\ Port\-0</plug>
<plug>SuperCollider\:\(capture_3\)\ out0</plug>
<plug>Launch\ Control\ XL\ 1\:\(capture_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ 1\:\(capture_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour" type="jack-midi">
<plug>MMC\ out</plug>
<plug>Scene\ out</plug>
<plug>x\-virtual\-keyboard</plug>
<plug>MTC\ out</plug>
<plug>MIDI\ Clock\ out</plug>
<plug>Keys\/midi_out\ 1</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour 2" type="jack-midi">
<plug>x\-virtual\-keyboard</plug>
</socket>
<socket client="Midi\-Bridge" exclusive="off" name="Midi-Bridge 2" type="jack-midi">
<plug>Midi\ Through\:\(capture_0\)\ Midi\ Through\ Port\-0</plug>
<plug>Launch\ Control\ XL\ 1\:\(capture_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ 1\:\(capture_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="Midi\ Through" exclusive="off" name="Midi Through" type="alsa-midi">
<plug>Midi\ Through\ Port\-0</plug>
</socket>
<socket client="Launch\ Control\ XL" exclusive="off" name="Launch Control XL" type="alsa-midi">
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="SuperCollider" exclusive="off" name="SuperCollider" type="alsa-midi">
<plug>out0</plug>
</socket>
</output-sockets>
<input-sockets>
<socket client="Built\-in\ Audio\ Digital\ Stereo\ \(HDMI\)" exclusive="off" name="Built-in Audio Digital Stereo (HDMI)" type="jack-audio">
<plug>playback_FL</plug>
<plug>playback_FR</plug>
</socket>
<socket client="SuperCollider" exclusive="off" name="SuperCollider" type="jack-audio">
<plug>in_1</plug>
<plug>in_2</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour" type="jack-audio">
<plug>physical_audio_input_monitor_enable</plug>
<plug>LTC\ in</plug>
<plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
<plug>Monitor\/audio_in\ 1</plug>
<plug>Monitor\/audio_in\ 2</plug>
<plug>Tidal\ 1\/audio_in\ 1</plug>
<plug>Tidal\ 1\/audio_in\ 2</plug>
<plug>Tidal\ 2\/audio_in\ 1</plug>
<plug>Tidal\ 2\/audio_in\ 2</plug>
<plug>Tidal\ 3\/audio_in\ 1</plug>
<plug>Tidal\ 3\/audio_in\ 2</plug>
<plug>Tidal\ 4\/audio_in\ 1</plug>
<plug>Tidal\ 4\/audio_in\ 2</plug>
<plug>Tidal\ 6\/audio_in\ 1</plug>
<plug>Tidal\ 6\/audio_in\ 2</plug>
<plug>Tidal\ 7\/audio_in\ 1</plug>
<plug>Tidal\ 7\/audio_in\ 2</plug>
<plug>Tidal\ 8\/audio_in\ 1</plug>
<plug>Tidal\ 8\/audio_in\ 2</plug>
<plug>Tidal\ 9\/audio_in\ 1</plug>
<plug>Tidal\ 9\/audio_in\ 2</plug>
<plug>Tidal\ 10\/audio_in\ 1</plug>
<plug>Tidal\ 10\/audio_in\ 2</plug>
<plug>Tidal\ 11\/audio_in\ 1</plug>
<plug>Tidal\ 11\/audio_in\ 2</plug>
<plug>Tidal\ 12\/audio_in\ 1</plug>
<plug>Tidal\ 12\/audio_in\ 2</plug>
<plug>Tidal\ 5\/audio_in\ 1</plug>
<plug>Tidal\ 5\/audio_in\ 2</plug>
<plug>Kick\/audio_in\ 1</plug>
<plug>Kick\/audio_in\ 2</plug>
<plug>Percs\/audio_in\ 1</plug>
<plug>Percs\/audio_in\ 2</plug>
<plug>SC\ Percs\/ACE\ Compressor\ \(stereo\)\ 43\/audio_in\ 1</plug>
<plug>Bass\/audio_in\ 1</plug>
<plug>Bass\/audio_in\ 2</plug>
<plug>SC\ Bass\/ACE\ Compressor\ \(stereo\)\ 41\/audio_in\ 1</plug>
<plug>Leads\/audio_in\ 1</plug>
<plug>Leads\/audio_in\ 2</plug>
<plug>Other\/audio_in\ 1</plug>
<plug>Other\/audio_in\ 2</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour 2" type="jack-audio">
<plug>Tidal\ 1\/audio_in\ 1</plug>
<plug>Tidal\ 1\/audio_in\ 2</plug>
<plug>Tidal\ 2\/audio_in\ 1</plug>
<plug>Tidal\ 2\/audio_in\ 2</plug>
<plug>Tidal\ 3\/audio_in\ 1</plug>
<plug>Tidal\ 3\/audio_in\ 2</plug>
<plug>Tidal\ 4\/audio_in\ 1</plug>
<plug>Tidal\ 4\/audio_in\ 2</plug>
<plug>Tidal\ 5\/audio_in\ 1</plug>
<plug>Tidal\ 5\/audio_in\ 2</plug>
<plug>Tidal\ 6\/audio_in\ 1</plug>
<plug>Tidal\ 6\/audio_in\ 2</plug>
<plug>Tidal\ 7\/audio_in\ 1</plug>
<plug>Tidal\ 7\/audio_in\ 2</plug>
<plug>Tidal\ 8\/audio_in\ 1</plug>
<plug>Tidal\ 8\/audio_in\ 2</plug>
<plug>Tidal\ 9\/audio_in\ 1</plug>
<plug>Tidal\ 9\/audio_in\ 2</plug>
<plug>Tidal\ 10\/audio_in\ 1</plug>
<plug>Tidal\ 10\/audio_in\ 2</plug>
<plug>Tidal\ 11\/audio_in\ 1</plug>
<plug>Tidal\ 11\/audio_in\ 2</plug>
<plug>Tidal\ 12\/audio_in\ 1</plug>
<plug>Tidal\ 12\/audio_in\ 2</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour 3" type="jack-audio">
<plug>Monitor\/audio_in\ 1</plug>
<plug>Monitor\/audio_in\ 2</plug>
<plug>Kick\/audio_in\ 1</plug>
<plug>Kick\/audio_in\ 2</plug>
<plug>Percs\/audio_in\ 1</plug>
<plug>Percs\/audio_in\ 2</plug>
<plug>Percs\/audio_in\ 1</plug>
<plug>Percs\/audio_in\ 2</plug>
<plug>Bass\/audio_in\ 1</plug>
<plug>Bass\/audio_in\ 2</plug>
<plug>Leads\/audio_in\ 1</plug>
<plug>Leads\/audio_in\ 2</plug>
<plug>Bass\/audio_in\ 1</plug>
<plug>Bass\/audio_in\ 2</plug>
<plug>Leads\/audio_in\ 1</plug>
<plug>Leads\/audio_in\ 2</plug>
<plug>Percs\/audio_in\ 1</plug>
<plug>Percs\/audio_in\ 2</plug>
<plug>Other\/audio_in\ 1</plug>
<plug>Other\/audio_in\ 2</plug>
<plug>Leads\/audio_in\ 1</plug>
<plug>Leads\/audio_in\ 2</plug>
<plug>Bass\/audio_in\ 1</plug>
<plug>Bass\/audio_in\ 2</plug>
<plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
<plug>SC\ Bass\/ACE\ Compressor\ \(stereo\)\ 41\/audio_in\ 1</plug>
<plug>SC\ Bass\/ACE\ Compressor\ \(stereo\)\ 41\/audio_in\ 1</plug>
<plug>SC\ Percs\/ACE\ Compressor\ \(stereo\)\ 43\/audio_in\ 1</plug>
<plug>SC\ Percs\/ACE\ Compressor\ \(stereo\)\ 43\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
<plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
<plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
<plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug>
<plug>Monitor\/audio_in\ 1</plug>
<plug>Monitor\/audio_in\ 2</plug>
</socket>
<socket client="Midi\-Bridge" exclusive="off" name="Midi-Bridge" type="jack-midi">
<plug>Midi\ Through\:\(playback_0\)\ Midi\ Through\ Port\-0</plug>
<plug>SuperCollider\:\(playback_0\)\ in0</plug>
<plug>SuperCollider\:\(playback_1\)\ in1</plug>
<plug>SuperCollider\:\(playback_2\)\ in2</plug>
<plug>Launch\ Control\ XL\ 1\:\(playback_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ 1\:\(playback_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour" type="jack-midi">
<plug>physical_midi_input_monitor_enable</plug>
<plug>MTC\ in</plug>
<plug>MIDI\ Clock\ in</plug>
<plug>MMC\ in</plug>
<plug>Scene\ in</plug>
<plug>Cue\ Control\ in</plug>
<plug>Keys\/midi_in\ 1</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour 2" type="jack-midi">
<plug>Keys\/midi_in\ 1</plug>
</socket>
<socket client="ardour" exclusive="off" name="ardour 3" type="jack-midi">
<plug>physical_midi_input_monitor_enable</plug>
<plug>physical_midi_input_monitor_enable</plug>
<plug>physical_midi_input_monitor_enable</plug>
</socket>
<socket client="Midi\ Through" exclusive="off" name="Midi Through" type="alsa-midi">
<plug>Midi\ Through\ Port\-0</plug>
</socket>
<socket client="Launch\ Control\ XL" exclusive="off" name="Launch Control XL" type="alsa-midi">
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ Launch\ Contro</plug>
</socket>
<socket client="SuperCollider" exclusive="off" name="SuperCollider" type="alsa-midi">
<plug>in0</plug>
<plug>in1</plug>
<plug>in2</plug>
</socket>
<socket client="SuperCollider" exclusive="off" name="SuperCollider 2" type="alsa-midi">
<plug>in2</plug>
</socket>
<socket client="PipeWire\-RT\-Event" exclusive="off" name="PipeWire-RT-Event" type="alsa-midi">
<plug>input</plug>
</socket>
</input-sockets>
<slots/>
<cables>
<cable input="ardour 2" output="SuperCollider" type="jack-audio"/>
<cable input="ardour 3" output="Midi-Bridge 2" type="jack-midi"/>
<cable input="SuperCollider 2" output="Midi Through" type="alsa-midi"/>
<cable input="PipeWire-RT-Event" output="Midi Through" type="alsa-midi"/>
<cable input="Midi Through" output="Launch Control XL" type="alsa-midi"/>
<cable input="PipeWire-RT-Event" output="Launch Control XL" type="alsa-midi"/>
</cables>
</patchbay>
PatchBay_Perf.xml
<!DOCTYPE patchbay>
<patchbay name="PatchBay_Perf" version="0.9.7">
<patchbay name="PatchBay_Perf" version="0.9.8">
<output-sockets>
<socket name="Built-in Audio Analog Stereo" exclusive="off" client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio">
<plug>capture_FL</plug>
......@@ -155,18 +155,18 @@
</input-sockets>
<slots/>
<cables>
<cable input="SuperCollider" output="Built-in Audio Analog Stereo" type="jack-audio"/>
<cable input="ardour 4" output="Built-in Audio Analog Stereo" type="jack-audio"/>
<cable input="ardour 2" output="SuperCollider" type="jack-audio"/>
<cable input="Built-in Audio Analog Stereo 2" output="ardour 2" type="jack-audio"/>
<cable input="ardour 3" output="ardour 3" type="jack-audio"/>
<cable input="ardour 2" output="Midi-Bridge 2" type="jack-midi"/>
<cable input="aseqdump" output="Midi Through" type="alsa-midi"/>
<cable input="SuperCollider 3" output="Midi Through" type="alsa-midi"/>
<cable input="PipeWire-RT-Event" output="Midi Through" type="alsa-midi"/>
<cable input="SuperCollider 2" output="Launch Control XL" type="alsa-midi"/>
<cable input="Midi Through" output="Launch Control XL" type="alsa-midi"/>
<cable input="PipeWire-RT-Event" output="Launch Control XL" type="alsa-midi"/>
<cable output="Built-in Audio Analog Stereo" input="SuperCollider" type="jack-audio"/>
<cable output="Built-in Audio Analog Stereo" input="ardour 4" type="jack-audio"/>
<cable output="SuperCollider" input="ardour 2" type="jack-audio"/>
<cable output="ardour 2" input="Built-in Audio Analog Stereo 2" type="jack-audio"/>
<cable output="ardour 3" input="ardour 3" type="jack-audio"/>
<cable output="Midi-Bridge 2" input="ardour 2" type="jack-midi"/>
<cable output="Midi Through" input="aseqdump" type="alsa-midi"/>
<cable output="Midi Through" input="SuperCollider 3" type="alsa-midi"/>
<cable output="Midi Through" input="PipeWire-RT-Event" type="alsa-midi"/>
<cable output="Launch Control XL" input="SuperCollider 2" type="alsa-midi"/>
<cable output="Launch Control XL" input="Midi Through" type="alsa-midi"/>
<cable output="Launch Control XL" input="PipeWire-RT-Event" type="alsa-midi"/>
</cables>
</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>
backlog.md
......@@ -2,6 +2,7 @@
-- It's About Time [Take1?]
-- Burn this book
-- SlowMo: Orchestrated, ready to record :)
-- Suns of Gold <3
# Study
......@@ -9,7 +10,14 @@
# Coop
## Val
soir noir
## BOGDAN
-- Bogdan arrive
## RAPH
-- Euphorie Solitaire
-- JeuDrill :)
- Ragga la hierarchie :D
- HAN!
- Rainbow Race !!!
......@@ -34,13 +42,52 @@
# Work in progress
## Beatober
- Oct4: Techno recorded once, peaufine :)
## `24Facons` to love music
### August August
-- Fabuleux 🎇
-- Le Bruit des Bots [WIP]
## July Not Sure If Fry
-- Nouveau Punk ✊
-- Blue Gold
-- Blue Burn
### June Summer of Bike Love
-- Suns of Gold
-- Golden Drum
-- Force Motrice
-- Bruler Franchement [WIP]
### Winter&Spring Cold Love
-- PERMANENCE
-- Trois Cafes :)
-- Disparition Elmo 🇬🇵
-- Infiltrations </3
-- Froid de Minuit ❄️❄️❄️
-- Infusion Basse 🍵
-- Qui sait ? 🌇 [Ambient][WIP]
-- Suns of Gold <3
## Nouvelle Epoque 23
### **December Celebrations**
-- Salut Nu
-- Nu dans la Boue
### November Rains
-- _Ambient Chaos_ <3 TODO: Add more leads :D
-- JeuDrill
### Beatober and other seasonal activities
- Oct4: Glitch Sauvages Techno recorded once, peaufine :)
- Oct5: DNB wobwob - manque leads/aigus?
- Oct29: Can I code it?
- BECAUSE it's There <33
- Nuit agitee ! Gameboy et breaks <3
## INDUSTRY
### INDUSTRY
-- No Panic!
-- **ABLETON**:
......@@ -48,7 +95,7 @@
- Punk Teng with raph!
- The Good Bass!
- Tour du ciel
- _Prestance_: Ambient wip
- _Prestance_: Ambient wip needs adjustment :)
-- **Sel Marin**: Nuit noire dans la mer noire, TODO varier bass
-- **_Bain bouillant_**: sub bass and jungle breaks :)
......@@ -676,14 +723,18 @@ Clameur? Brouillon?
## REPAIR MULTILINE
-- Reboot
-- Nouveau soleil
## Adapt to DAW, removing midiG calls
-- Oct4
-- Prestance
-- **Oct4 Glitch Sauvages**
-- About time
-- Toxic
-- Venons ensemble
## READY FOR MIX
-- Reboot
-- Premiere Grillade
-- Rainy day
......@@ -695,7 +746,145 @@ Clameur? Brouillon?
### **VELOCITE**
-- Bain bouillant
-- Acid RAIN
-- No Time to Die
-- No Time to Die?
-- Haunted house
-- _Finale_: **L'été a Mauerpark**
## Live Valentin <3
-- Bogdan
-- PERMANENCE
-- Blue Tuesday :))
-- Nouveau Soleil
-- dernier dimanche
...............................................................................
...............................................................................
...........................................''''................................
......................................''''''''''''.............................
..................................''''''''''''.................................
...................................'''................'........................
...................................''........''''''''''''''....................
.............................''''''''''''''''',,,,,,,,,,'''''''''..............
............................''''''''',,,,,,;;;;;;;;;;;;,,,,,,,''''''''''.......
.............................'''''''',,,,,,,;;;;;;;;;;;;,,,,,,,,,''''''........
............................'''''''',,,,,,,,;;,,,,,,,,,,,,,,'''''''''''........
.............................''''''''',,,,,,,;:solllllos:;,,,,,,,,,'''''''.....
...........................''''''',,,,,,;;:oooOO00000OOooos:;;;;,,,,''''''.....
.........................'''''',,,,;;;;;oooOOOOOO0000OOOOOoos:;;,,,,''''''.....
........................'''',,,,,;;;;;:sssSSSSSSSSSSSSSSSSsssss;;;,,,,'''''....
........................'''',,,,,;;;;:ooooOOOOOOOOOOOOOOOOoooooo;;;,,,,''''....
.........................'''',,,,,;;;ollllLLLLLLLLLLLLLLLLlllllo;,,,'''''......
...............................'''',,ssssSSSSSSSSSSSSSSSSSSSssss:''.'..........
..................................'',ttttTTTTTTTTTTTTTTTTTTTtttt:.'............
.................................'''':iiiiIIIIIIIIIIIIIIIIiiiiii,''............
..................................''',cdxxCCCCCCCCCCCCCCCCxxxxo:'.'............
....................................'',:eeEEEEEEEEEEEEEEEEeeee:'...............
.......................................';eeeeeeeeeeeeeeeeeee:,.................
.........................................',:eeeeeeeeeeeeee;,...................
.............................................',;;:::;;,,'......................
...............................................................................
...............................................................................
## TOPLAP SOLSTICE 23
-- Permanence 🫶🫶🫶🫶
-- Bain Bouillant 🤿 🤿
-- Haunted House 👻 👻
-- Salut nu 👋👋👋👋
# Mission H
-- My name is Bond, Drums Bond 🕵️
-- Bain Bouillant
-- Atelier de Force Motrice
-- Glitch Sauvages
-- _Cafe chaud_
-- _Cafe tiede_
-- Salut Nu <3
## TOPLAP 20 YEARS 🍪🎂🍪
- **Café Tiède** ☕☕☕
- **Force motrice** 💪💪💪
- **Café Glaçé** 🥃🥃🥃
- Nuit agitée 🌃🌃🌃
## Algolia FDLM2024
### Intro
- *Lendemain Divin* 🛏️
### 2022 throwback 🕵️
- *Contre Visite*
- *Nightly Repair* 🌆
- *Invoque l'Été* 🌇
### 2024 new thingies
- Venons Ensemble 🧑‍🧑‍🧒
- JeuDrill 🌠
- PERMANENCE ♾️♾️
- Force motrice 🌬️🌬️🌬️🌬️
- *Café Tiède* ☕🥃☕
- *Café Bouillant* ☕☕☕
- *Café Glaçé* 🥃🥃🥃
- *Salut Nu* 👋💛🧡💛👋
- *Nuit agitée* 🌃🎆🌃🎆🌃🎆🌃
- **MauerPark** 🎻🌇🌄🌇🌄🌇🥨
## Sur le Toit <3
-- *Fabuleux* 🎆
-- *Blue Gold* 🌠
-- *Haunted House*
-- Force Motrice
-- *Cafe Tiede*
-- Cafe Bouillant
-- Lendemain Divin (AddUp!)
-- Invoque l'été
-- Nuit agitée
-- L'été à MauerPark
-- Permanence :)
-- Encore: Blue Gold
...
## Opal <3🦉
⠀⠀⢀⣤⣾⣿⣿⣿⣿⣿⣶⣤⡀⢀⣤⣶⣿⣿⣿⣿⣿⣷⣤⡀⠀⠀
⠀⣰⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣆⠀
⢠⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡄
⢸⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡇
⠀⣿⣿🦉🦉🦉 OPAL 2024 🦉🦉🦉⣿⣿⣿⠀
⠀⠘⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⠃⠀
⠀⠀⠈⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠁⠀⠀
⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠉⠻⣿⣿⠟⠉⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠈⠁⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀
- _Intro_: *Fabuleux**
- Cafe Glacé
- Café **Bouillant**
- Cafe Tiède
- Force MOTRICE
- Alerte verte 💚
- Nouveau Punk
- Jeudrill
- Bain Bouillant
- **Haunted House**
- Blue Gold
- L'été à MauerPark
----
- _ _Bonus_ _: Contre Visite
- _Passation_: Lendemain Divin
copycat/bad_guy.tidal
......@@ -78,7 +78,7 @@ d3 -- Bassline: melodie cut sur la fin du verse
])
# "bass3"
# cut 3
# gain 1.2
# gain 2
d7 -- Claps
$ mask "t!3 <t!3 f>"
$ mask "<f!15 t t!24 f!4 t!6 t!24 f!4 t!6 f!4 t!6>" -- Orchestration
......@@ -186,7 +186,7 @@ d4 -- Brass voice
# "brass" # "moogBass" -- FIXME RESTORE BRASS SAMPLES!
# legato "<0.75!7 1>"
# room 0.2
# gain 0.8
# gain 0.6
d6 -- synth Chorus
$ note (cat [
"","","","","","","","", -- Intro
......
copycat/elastic_heart.tidal 0 → 100644
do
setcps (93/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 rootD = "[d3'maj'3]"
let rootA = "[a3,cs4,e4]"
let rootE = "[e3,gs3,b3]"
let rootFm = "[e3,gs3,b3]"
let verse = [rootD, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootFm]
let preChorus = [rootA, rootD]
let chorus = [rootD, rootFm, rootD, rootFm, rootD, rootD, rootD, rootD]
let song = [rootD, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootD, rootD, rootFm, rootD, rootFm, rootD, rootD, rootD, rootD, rootD, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootD, rootD, rootFm, rootD, rootFm, rootD, rootD, rootD, rootD]
let verseOff = [rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootD]
let preChorusOff = [rootE, rootE]
let chorusOff = [rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE]
let songOff = [rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE]
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k <k k*2 k <~ [~ k]>>")
$ midiOff "^42" (<| "k . ~ <~ k*<1 2 2 4>>")
$ "[clubkick:2,jazz,808bd:4]"
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ cp")
$ midiOff "^43" (<| "~ cp")
$ "clap:2"
# hpf 5000
d3 $ gF1 $ gM1
$ sometimesBy "0 . 0.1 <0.25 0.5 0.7 0.9>" (ply 2)
$ "hh*8" |* gain (range 0.6 0.9 perlin)
d4 $ gF2 $ gM3 -- BASSLINE COMPAGNONNE
$ struct "t(<2 [1|3|3|5]>,8) t(<3!3 5>,8,<0!3 1>)"
$ note (arp "<up!8 down!6 down <down downup updown up>>" $ cat song) -- Intro
# "bassWarsaw"
# octerbus 41 (range 0 1.5 "^53")
# room 0.2
d5 $ gF2 $ gM3
$ note (cat song) -- Main song
# "FMRhodes1"
# pan 0.3
d7 $ gF2 $ gM3
$ struct "t(1,2,1)" -- TODO Better structure
$ note (cat songOff + 12) -- Offbeat
# "FMRhodes2"
# pan 0.8
d8 $ gM1 $ gF1
$ midiOn "^60" (mask "t(<4 8>,<8 8 16 16>)")
$ midiOn "^92" (ply 2)
$ chop 16
$ loopAt 2
$ "jungle_breaks" # n "<42!3 41>"
# gain 0.8
# cut 8
once $ note "[a3,cs4,e4]" # "FMRhodes1" # orbit 3
once $ note "[e3,gs3,b3]" # "FMRhodes1" # orbit 3
once $ note "[fs3,a3,cs4]" # "FMRhodes1" # orbit 3
intro.md 0 → 100644
# Live: ParVagues @ Bazurto
> Tignes | Hiver 2023
⠀⠀⢀⣤⣾⣿⣿⣿⣿⣿⣶⣤⡀⢀⣤⣶⣿⣿⣿⣿⣿⣷⣤⡀⠀⠀
⠀⣰⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣆⠀
⢠⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡄
⢸⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡇
⠀⣿⣿⣿⣿⣿⣿ ParVagues ⣿⣿⣿⣿⣿⣿⠀
⠀⠘⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⠃⠀
⠀⠀⠈⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠁⠀⠀
⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠉⠻⣿⣿⠟⠉⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠈⠁⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀
lib-parvagues/src/Sound/Tidal/ParVagues/Control.tidal
......@@ -10,7 +10,8 @@
midiDJF ch lMin lMax hMin hMax = (_LPF lMin lMax ch) . (_HPF hMin hMax ch)
-- FIXME: Seems to cut some lows when lMin != 0
-- Midi gain control (faders)
midiGGlobal = "^77" * 1.9
midiGGlobal = "^77" * 1.3
_gainG ch = (gain (midiGGlobal * ch)) -- gain Global
midiG' ch l h = _gainG (range l h ch) -- midiGain control
midiGdef = midiG' 1 0 1 -- midiGain default
midiG ch = midiG' ch 0 1 -- midiGain default
link_samples.sh
......@@ -5,7 +5,6 @@
ln -s ~/Work/Sound/Samples/kanye .
ln -s ~/Work/Sound/Samples/* .
ln -s ~/Work/Sound/Samples/igor/out igor
ln -s ~/Work/Sound/Samples/poesie/poesie*
ln -s ~/Work/Sound/Samples/poesie/poesie* .
ln -s ~/Work/Sound/Samples/roots/bass rootsBass
ln -s ~/Work/Sound/Samples/roots/guitar rootsGuitar
......@@ -28,10 +27,211 @@ ln -s ~/Work/Sound/Samples/IRCAM/out ircam
ln -s ~/Work/Sound/Samples/latin
ln -s ~/Work/Sound/Samples/bossa
ln -s ~/Work/Sound/Samples/cyberspace/ .
ln -s ~/Work/Sound/Samples/90sArchive/output/giorgo_syn .
ln -s ~/Work/Sound/Samples/90sArchive/output/giorgio_syn .
ln -s ~/Work/Sound/Samples/90sArchive/output/blues/elmore/ blues_elmore
ln -s ~/Work/Sound/Samples/raph/jardindhiver/ raph_jardin
ln -s ~/Work/Sound/Samples/Tristram tristram
ln -s ~/Work/Sound/Samples/faith/ .
# TODO: Add links made on ArchPLN
ln -s ~/Work/Sound/Samples/MethLab/MethLab\ -\ Bass\ Pack meth_bass
ln -s ~/Work/Sound/Samples/samples-cello-plucked cpluck
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
ln -s ~/Work/Sound/Samples/come_together/come_* .
ln -s /home/pln/Work/Sound/Samples/samples-hydrogen-drums/h2o* .
# RAMPLE SAMPLES
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/A0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleA0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/A1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleA1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/A2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleA2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/A3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleA3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/A4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleA4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/A5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleA5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/A6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleA6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/B7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleB7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/C8 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleC8
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/D7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleD7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F8 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF8
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/F9 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleF9
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/J0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleJ0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/J1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleJ1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/J2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleJ2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/J3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleJ3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/J4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleJ4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/J5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleJ5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/K0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleK0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/K1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleK1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/K2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleK2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/K3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleK3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/K4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleK4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M10 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM10
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M11 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM11
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M12 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM12
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M13 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM13
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M14 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM14
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M8 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM8
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/M9 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleM9
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N8 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN8
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/N9 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleN9
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O10 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO10
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O11 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO11
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O8 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO8
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/O9 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleO9
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/P0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleP0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/P1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleP1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/P2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleP2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/P3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleP3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/P4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleP4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/P5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleP5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/P6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleP6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/R7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleR7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S10 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS10
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S11 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS11
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S12 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS12
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S13 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS13
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S14 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS14
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S15 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS15
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S16 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS16
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S17 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS17
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S18 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS18
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S19 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS19
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S20 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS20
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S21 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS21
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S22 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS22
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S23 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS23
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S24 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS24
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S25 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS25
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S26 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS26
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S27 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS27
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S28 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS28
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S29 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS29
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S30 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS30
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S31 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS31
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S32 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS32
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S33 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS33
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S34 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS34
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S35 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS35
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S36 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS36
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S37 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS37
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S38 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS38
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S39 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS39
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S40 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS40
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S41 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS41
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S42 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS42
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S43 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS43
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S44 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS44
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S45 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS45
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S46 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS46
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S47 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS47
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S48 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS48
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S49 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS49
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S50 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS50
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S51 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS51
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S52 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS52
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S53 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS53
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S54 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS54
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S55 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS55
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S56 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS56
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S57 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS57
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S58 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS58
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S59 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS59
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S60 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS60
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S61 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS61
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S62 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS62
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S63 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS63
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S64 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS64
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S65 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS65
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S66 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS66
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S67 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS67
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S8 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS8
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/S9 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleS9
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U0 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU0
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U1 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU1
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U2 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU2
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U3 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU3
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U4 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU4
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U5 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU5
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U6 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU6
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U7 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU7
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U8 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU8
ln -s /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rample/U9 /home/pln/.local/share/SuperCollider/downloaded-quarks/Dirt-Samples/rampleU9
ln -s /home/pln/Work/Sound/Samples/bogdan_grime .
ln -s /home/pln/Work/Sound/Samples/suns/suns* .
ln -s ~/Work/Sound/Samples/90sArchive/output/* .
ln -s ~/Work/Sound/Samples/90sArchive/output/nujazz/* .
# Jungle MethPack
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\
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\
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\
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\
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\
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\
live/boeuf/algorythm/fdlm2022/toxic.tidal
......@@ -12,23 +12,24 @@ d1 $ g
-- $ mask "<t!12 f!4>"
$ fix ((|* gain 0.9) . (# lpf 5000)) "kick"
$ "k ~ ~ k . ~ ~" # "[ifdrums,kick]"
# midiG' "^78" 0 1.3
-- # midiG' "^78" 0 1.3
# pan 0.4
d2 $ g
$ superimpose (const $ g
$ "~ ~ ~ ~ ~ <~!4 s!4> ~ <~!7 s>" # "snare:5" # pan 0.8
# midiG' "^79" 0 1)
-- # midiG' "^79" 0 1
)
$ mask "<f t!15>"
$ "~ s ~ <s!3 ~>"
# "[snare:10,drum:2]"
# midiG' "^79" 0 1
-- # midiG' "^79" 0 1
d3 $ g
$ midiOn "^76" (ply 2)
-- $ mask "<f!16 t!16>"
$ "hh*[8 8 8 <8!3 [16 8]>]"
# att 0.01 # rel 0.5 # cut 3 # hpf 5000
# midiG' "^80" 0 1.3
d7 $ gDJF
-- # midiG' "^80" 0 1.3
d4 $ gDJF
$ midiOn "^92" (ply 2)
$ note ("0*8" + "<b3 b3 d3 [cs3 bs2]>")-- BASS Riff
# "bassWarsaw"
......@@ -37,10 +38,10 @@ d7 $ gDJF
# sz 0.1
# cut 7
# crushbus 71 (range 16 1.5 "^53")
# midiG' "^81" 0 1
-- # midiG' "^81" 0 1
d8 $ gDJF -- CUE Toxic Theme
$ midiOff "^91" (mask "<f!7 t>")
$ midiOn "^59" (rev)
$ midiOff "^92" (mask "<f!7 t>")
$ midiOn "^60" (rev)
$ note ("fs7@4 cs7@4 d7@4 b7@4" + "[0,12]" - 24)
# "FMRhodes1"
# legato 4
......@@ -50,4 +51,4 @@ d8 $ gDJF -- CUE Toxic Theme
# rel 2
# sz 0.5
# pan 0.9
# midiG' "^83" 0 1.1
-- # midiG' "^83" 0 1.1
live/boeuf/algorythm/love23/something_about_us.tidal
do
setcps (92/60/4)
-- resetCycles
setcps (100/60/4)
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
-- let gMute = (midiOn "^73" (mask "f*16"))
let gM = gMask . gMute
let gM2 = gMask . gMute2
let modIndex = pF "modIndex"
let gF = gF1 . gF2
d1 $ gF1 -- Kick
$ midiOn "^42" (<| "k k k <k <k*2 [~ k]>>")
$ midiOff "^42" (<| "k ~ ~ <~ k> . <k ~>")
$ "jazz"
# midiG' "^78" 0 1.3
d1 $ gF1 $ gM2 -- Kick
$ midiOff "^42" (<| "k k k <k <k*2 [~ k]>>")
$ midiOn "^42" (<| "k ~ ~ <~ k> . <k ~>")
$ "[jazz,kick:5]"
-- # midiG' "^78" 0 1.3 -- FIXME Remove after unplugging direct SC->output line
# pan 0.8
d2 $ gF1
$ midiOn "^43" (<| "~ s ~ s*<1!4 2!3 1>")
$ midiOff "^43" (<| "~ ~ ~ k")
# gain 1.4
d2 $ gF1 $ gM
$ midiOff "^43" (<| "~ s ~ s*<1!4 2!3 1>")
$ midiOn "^43" (<| "~ ~ ~ k")
$ "[drumtraks:9]"
# midiG' "^79" 0 1.45
d3 $ gF1
-- # midiG' "^79" 0 1.45
d3 $ gF1 $ gM
$ midiOn "^44" (ply 2)
$ midiOn "^76" (ply 2)
$ "d d d <d [<d ~> d]>" # "drum:2"
# midiG' "^80" 0 1
# gain 0.8
-- # midiG' "^80" 0 1
# room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw)
d4 $ gF2 -- V2
-- $ superimpose ((arp "up") . (|+ note 12))
$ midiOn "^89" (stutWith 4 0.25 ((|* gain 0.85) . (# room 0)))
$ note (cat [
"[bf3, d4, f4, a4]", -- Bbmaj7
"[a3, c4, e4, g4]", -- Am7
"[d4, f4, a4, c5, <e5 e4>]", -- Dm9
"[g3, b4, d5, <f5 ~>]" -- <G7 G>
-- "[cs4, b4, d5, <f5 ~>]" -- <G7 G>
])
-- PARTITION ORIGINALE
-- "[bf3, d4, f4, a4]", -- Bbmaj7
-- "[a3, c4, e4, g4]", -- Am7
-- "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
-- "[g3, b4, d5, <f5 ~>]" -- <G7 G>
-- TRANSPOSE POUR SP <3
"[d4, fs5, a4, cs5]", -- Dmaj7
"[gs4, b4, cs5, es5]", -- Csm7
"<[fs4, a4, cs5, e5, gs5] [fs4, b5, cs5, e5, gs5]>", -- Fsm9/Fsm11
"[b4, d5, fs5, <a4 a5>]" -- <B7 B>
]
- 12
)
# "FMRhodes2"
-- |- note 12
|+ note 2 -- Adjust to C
# modIndex (range 0 2 "^53")
# midiG' "^81" 0 1.6
-- # midiG' "^81" 0 1.6
d5 $ note ("<[d3@1.25 e3@0.25 ~@0.75 f3@2 ~] [e3@1.25 f3@0.25 ~@0.75 g3@2 ~] [f3@1.25 g3@0.25 ~@0.75 a3@2 ~] [a3 g3 g3 f3 f3 d3 c3 d3]>")
# "bassWarsaw"
# cut 1
d8 $ gF1 $ gM
$ midiOn "^92" (ply 4)
$ iter "1 <1!4 4!4>"
$ chop 8
$ loopAt 2
$ "break:2"
-- # n 4
# cut 8
# gain 0.7
d10
$ (0.5 <~)
$ n "<1 2 3 4 5 6 7 8>"
# "numbers"
# crush 8
# hpf 1250
once $ "ho:5"
# gain 0.5
once $ "jungle_breaks:27" # cut 1
once $ note "a3" # "superpiano"
live/boeuf/algorythm/season2/blues_wednesday.tidal
......@@ -2,46 +2,92 @@
do
-- resetCycles
setcps (90/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"))
-- 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
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k <k k*2>")
$ midiOff "^42" (<| "k . k(3,8)")
$ fix ((|* gain 0.6) . (# hpf 200)) "jazz"
$ "<k!16 k*2!16 k*4!16 [k . k(3,8)]!16>" # "[jazz,cpu]" # gain 1
d2
-- $ gDJF
-- $ mask "<f!16 t!48>"
$ note ("~ ~ ~ <~ ~ -2 -2>. 0" - 8)
# "[snare:60,snare:21]"
# gain 0.46
-- $ "<k!16 k*2!16 k*4!16 [k . k(3,8)]!16>"
$ "[jazz,cpu]" # gain 1
-- # midiG' "^78" 0 1.5
d2 $ gF1 $ gM1
$ midiOff "^43" (<| note ("~ ~ ~ <~ ~ -2 -2>. 0" - 8))
$ midiOn "^43" (<| note ("~ 0 ~ 0"))
$ "[snare:60,snare:21,snare:51]"
# gain 0.56
# pan 0.3
-- # room 0.2 # dry 1.1 # sz 0.8
d8 $ gDJF
d3 $ gF1 $ gM1
$ midiOn "^44" (ply 2)
$ midiOn "^76" (ply 2)
$ "drum:2*[4 <4 <8 16>>]"
-- $ "drum:2*[6 12]"
# att 0.03
# rel 0.9
# pan 0.3
# gain 0.55
d3 $ gDJF
$ mask "<f!16 t!48>"
$ mask "t(<1 1 4 2 2 2 4 <2 4>>,4)"
$ chop 8 $ loopAt 1 $ "break:1"
# cut 4 # gain 0.4
# gain 0.85
d8 $ gF1 $ gM1
$ midiOn "^92" (ply 2)
$ chop 8
$ midiOn "^36" (loopAt 1 . (# "break:5"))
$ midiOn "^56" (loopAt 1 . (# "break:9"))
$ loopAt 2
$ "jungle_breaks:8"
# gain 0.8
# pan 0.7
d4
$ superimpose (|+| note "[0 0(<3!3 5>,8)]")
d4 $ gF2 $ gM3
$ midiOn "^57" (|+| note "0 <7 7 12 12>(3,8) 0 <7 12>([5 <3 2>],8)")
$ midiOn "^89" (superimpose (|+| note "[0 0(<3!3 5>,8)]"))
$ note (
cat blues + "[0]"
)
-- # "bass3:4"
-- # "modalMarimba" |+| note "0*4"
# "bassWarsaw" |- note 24
# octersubbus 41 (range 0 2 "^53")
# pan 0.3 # crush 16
-- # room 0.1
-- # voice 0.8
-- # cut 1
# gain 1.075
# lpf 300
d5 $ gF3 $ gM3
$ swing 4 -- TODO Replace with sampled guitar wahwah
$ arp "updown"
$ note (
cat (blues) + "c'maj'4"
+ 12
)
# "cpluck:2"
# pan 0.3
# cut 5
# gain 1.075
# lpf 300
d10 $ gF3 $ gM3
-- $ superimpose (|+| note "[0 0(<3!3 5>,8)]")
$ note (
cat blues + "[0*4]"
)
# "moogBass"
# pan 0.7 # crush 16
# cut 10
# 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)>"
......@@ -56,3 +102,6 @@ d5 $ gF3 $ note (
# crushbus 51 (range 16 3 "^54")
# "come_guitar:0"
# midiG' "^82" 0 1.7
once $ "cpluck:3"
live/boeuf/biarritz/blue_tuesday.tidal
resetCycles
once $ "dr"
do
setcps (90/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
......@@ -6,8 +10,10 @@ let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gLPF = whenmod 64 48 (# lpfbus 4 (slow 16 $ range 20000 200 saw))
let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw))
let chorus = pF "chorus"
......@@ -16,40 +22,43 @@ let dec = pF "dec"
let sus = pF "sus"
let cutoff = pF "cutoff"
let blues = ["c", "f", "c", "c", "f", "f", "c", "c","g", "f", "c", "c", "g", "f", "c", "g"]
d1 $ gF $ gMute
-- Do Fa Do Do
-- Fa Fa Do Do
-- Sol Fa Do Do
-- Sol Fa Do Sol
d1 $ gF $ gMute2
-- $ "k . ~ ~ <~!3 k> <~!2 k <~ k*2>>"
$ midiOn "^42" (<| "k k k <k <[~ k] k*2>>")
$ midiOff "^42" (<| "k . k(<3!3 5>,8)")
$ "k"
# "[cpu,jazz,808bd:3,808bd:2]"
# midiG' "^78" 0 1.9
-- # midiG' "^78" 0 1.9
# gain 1.8
d2 $ gF $ gMute
$ n "~ [40,39] ~ [42]*<1!3 <2 4>>" # "snare"
# midiG' "^79" 0 1.3
d3 $ gF $ gMute2
-- # midiG' "^79" 0 1.3
d3 $ gF $ gMute
$ midiOn "^76" (ply 2)
$ rarely (ply 2)
$ "drum:2*[8 <8 16>]" # gain 0.5
# midiG' "^80" 0 1.9
d9 $ gF
d8 $ gF $ gM
$ chop 16
$ midiOn "^36" ((# "break:18") . loopAt 2)
$ midiOn "^56" ((# "jungle_breaks:45") . loopAt 2)
$ midiOn "^60" (mask "f . f(3,8)" . chop 8)
$ midiOn "^92" (ply 2)
$ loopAt 2
$ slice 4 "0 <1!2 ~ 1> <2 ~> 3*<1!3 2>"
$ "break:9"
# cut 9
# midiG' "^84" 0 1.9
d4 $ gF2
# cut 8
# gain 1.2
d4 $ gF2 $ gMute3
$ midiOn "^89" (slice 4 "0 1 2 3*<2 <4 [4 8]>>")
$ midiOn "^57" (juxBy 0.2 (
-- ply "<2 4 [4 8] 8>" .
arp "pinkyup"
. (often (ply 2))
-- . (|* gain 0.8)
-- . (# pan 0.6)
-- . (# crush 16)
-- . (|+ note 12)
))
$ superimpose (|+ note "[0,7]")
$ note (
......@@ -60,118 +69,24 @@ d4 $ gF2
# pan 0.3
# room 0.1
# voice 0.8
# crushbus 41 (range 16 3 "^53")
# midiG' "^81" 0 1.3
d7 $ gF3 $ gM2 -- High Cello Dauphin
$ struct "t@2 t*<1 2 1 <4 1>> t*<1 2 4 8>"
$ midiOn "^59" (|- note 12)
$ note (
"<[g4 c ef@14] [<c g> ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>"
)
# "[cbow:3]"
# cut 7
# room 0.2
# 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)")
$ 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
$ midiOn "^89" (struct "t*<16 32>") -- Basse folle
$ (0.125 <~) -- Calage :)
$ someCyclesBy (1 - "^33") (
(mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
) --
$ fix ((midiOff "^57" (# silence)) . (|* gain 0.8) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5))
"bass2"
$ note (
"<[g4 c ef@14] [<c g> ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>"
- 24
)
# "[bass2:1,bassWarsaw]" -- TODO: Autre basse moins venere?
# room 0.2
# pan 0.4
# crushbus 41 (range 16 2.5 "^53")
# midiG' "^81" 0 1.6
d6 $ gF3 $ gMute2 -- Leads reponse
$ midiOn "^90" (struct "t*<16 32>") -- Basse folle
$ midiOn "^58" (|+ note 12)
$ sometimesBy "^18" (bite 4 "[0, [~ 2]]")
$ someCyclesBy "<f!3 t>" (mask "t f!15". (# legato 2))
-- $ (0.125 <~) -- Calage :)
-- $ someCyclesBy "^17" (
-- (mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
-- ) --
$ whenmod 32 24 (ply "2 <2!4 4!4>")
$ swing (1/3)
$ note (
"<ef4 g4 <ef g> d>"
+ "<0!0 [0 12]!0 [0(2,8), <12!3 -12>([<1 3> 3],8,3)]!32>"
+ "[0,<7 12 12 7>]"
- 12
)
# "FMRhodes1"
# crushbus 41 (range 16 1.3 "^53")
# octerbus 42 (range 0 1.3 "^33")
# gain 1
d9
$ note ("0(<3!3 <5 [5 3]>>,8)" + "c'maj'2" + (cat blues))
# "FMRhodes2"
# modIndex 0
# gain 1.3
d10 $ gM3 $ gF3 $ note ("c'maj'4" - 12 + cat blues) # "moogBass"
# pan 0.8
# room 0.2
# pan 0.33
# modIndex (range 0 16 "^34")
# crushbus 61 (range 16 2.5 "^54")
# midiG' "^82" 0 1.5
d8 $ gM $ gF3 -- 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 "^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
d10 $ gF3 -- Pads angéliques
$ sometimesBy "^19" (superimpose (
(# cut 101)
. (arp "up")
. (|+ note (
"<[0,0] [0,7] [0,9] [0,7,9,12]>"
))
. (|+ pan 0.1)
))
$ midiOff "^58" (mask "t([0 2],4)")
$ note (
slow 2 "<bf4 d5 <bf4 ef> [bf4 a4@3]>"
+ "[0,[0*<1 1 2 <2 1>> . 0 12*<1 2>]]"
)
# chorus (range 0 2 "^35")
# "moogBass" -- FIXME: Other synth?
# dec 0.2
# sus 1
# att (range 0.001 2 "^16")
# rel (range 0.2 10 "^17")
# roombus 101 (range 0 0.5 "^18")
# lesliebus 102 (range 0 2 "^19")
# chorus (range 0 2 "^29")
# sz 0.6 # dry 2
# midiG' "^20" 0 1.6
# legato 2
# pan 0.64
# cut 10
bf g bf <bf a>
# room 0.3 # dry 0.9
# pan 0.2
d11 -- DEBUG CUE Voice
$ ("0.125" <~)
$ off "h" ((|* gain 0.95) . (# pan 0.8))
$ "numbers"
# n "<1 2 3 4 5 6 7 8>"
# pan 0.3
live/collab/baba/oparoles.tidal 0 → 100644
once $ "paroles:2" # gain 1.2 # cut 2 # lpf 2000
do
-- resetCycles
setcps (115/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
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"))
let modIndex = pF "modIndex"
d1 $ gMute2 $ 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 t t t*<1!6 2 2>")
$ midiOff "^42" (<| "k . ~ <~!3 k> ~ ~")
$ "[jazz,kick:4]"
# gain 1.2
-- # midiG' "^78" 0 1.5
d2$ gMute1 $ gF1 -- snare contretemps variable
$ fix ((|* gain 0.8) . (# legato 0.05)) "cp"
$ midiOn "^43" (<| "~ cp ~ cp*<1 1 2 <1 2>>")
$ midiOff "^43" (<| "~ [cp*<1!3 <2 <4 [4 2]>>> ~]")
$ "[cp,snare:24]"
# pan 0.65
# legato 0.22
-- # midiG' "^79" 0 1.6
d3 $ gM1 $ gF1
$ "~ d ~ d ~ d ~ <d!12 [~ d]!3 [d d]>"
# "snare:34"
# hpf 7000
-- # midiG' "^80" 0 1.5]
d4 $ gF2 $ gMute3
$ midiOn "^89" (ply 8)
$ note "<b2 as2 gs2@2>"
# "bassWarsaw"
# gain 1.2 # cut 4
# crushbus 41 (range 16 4.5 "^53")
# octerbus 42 (range 0 1.2 "^33")
# octerbus 42 (range 0 1.2 "^33")
d5 $ gF3 $ gM3 -- Baba hums
-- $ midiOn "^58" ((# n 1) . ())
$ n "<1@2 2@2 3@2 4@2>"
# "paroles" # cut 5
# octersubbus 51 (range 0 2.5 "^54")
# lpf 3000
# legato 2
d8 $ gF1 $ gM1 $ chop 8 $ loopAt 1
$ midiOn "^56" ((loopAt 2) . (# "jungle_breaks:30")) -- Clochettes?
$ midiOn "^92" (ply 2)
$ midiOff "^60" (mask "f(4,8)")
$ chop 8
$ midiOn ("^92") ( -- Bouton Nassim <3
slice 16 "[0 .. 7] . <[0 .. 7]!3 [0 1 . [2 3]]>"
. loopAt 2 . (# "breaks165")
. (# room 0)
)
$ "jungle_breaks:20"
# gain 1.2
d9 $ gM3
$ fix (slow 2 . (# "jerome:0")
. (# begin "<0!6 0.5!2>")
. (# end "<<0.3!2 0!2> 0.5 0.9>")
) "bonsoir"
$ "[bonsoir]" # cut 9
d10 $ gM3 $ ply "<1!4 2!4>" $ "<jerome:4 ~>" # end "<0.5 <0.64 1>>" # cut 10 # octersub (slow 16 $ range 0.2 0.8 perlin)
d11 $ "jerome/4" # n "<5 5 7 8>" # gain 1.2 # cut 11 # lpf 4000
d12 $ "<~ ~ jerome ~>" # n "<1 2 3>" # gain 1.2 # cut 12 # lpf 4000
-- 5 7 8
once $ "jerome:3" # cut 8
live/collab/cookie/ccc.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
d1 $ gM2 $ gF1
$ midiOn "^42" (<| "k k k k*<1!3 2>")
$ midiOff "^42" (<| "k . <~!8 k!8 k(<3!3 [3 5]>,8)!16>")
$ "kick:5"
d2 $ gM1 $ gF1
$ fix (# lpf 2500) "h2ogmsn"
$ midiOff "^43" (slow 2)
$ "~ s ~ <s!3 s*[<4 4 2 4> <2!3 4>]>"
# "[db:11,h2ogmsn:12]"
# "[dr55:3]"
d3 $ gM2 $ gF1
$ midiOn "^76" (ply "2 <2 4>")
$ someCyclesBy "<0 0.4>" (jux $ swing 2)
$ "<hh(<3!3 [3 5]>,8)!3 [hh(3,8) hh(<3!3 5>,8)]>"
# "rampleA4:6" # gain 0.5
# room 0.2
# size 0.9
# dry 0.9
# pan (range 0.2 0.8 (slow 4 perlin))
d4 $ gM3 $ gF2
$ midiOn "^57" (>| note ("<d d <d g> <a d d a>>" - 2 - 12))
$ note ("d" - 2 - 12)
# "90s_synatm:2"
# crushbus 41 (range 12 1.4 "^53")
# octerbus 42 (range 0 1.4 "^33")
# cut 4
# room 0.4
# pan (slow 32 $ range 0.98 0.7 saw)
# gain 0.7
d5 $ gM3 $ gF2
$ fix (|* gain 0.7) (n 10)
$ note "<<d!16 g!16> <d!16 g!16> d g [a@3 <~ bf>]>"
# n "<5!24 10!8>" # "cbow"
# crushbus 51 (range 12 2.4 "^54")
# cut 5
# gain 0.6
d7 $ gM3 $ gF3 -- Keys of Paradise
$ midiOn "^91" (ply 2 . (# freeze 0.2))
$ slice 4 "<[0 1] [2 3*<1 4>] [0 1] [2 1(<1 3>,8)]>"
$ "nujazz_keys120:25/2"
# octersub (slow 32 $ range 0.2 1.2 (saw+perlin/2))
# cut 7
d8 $ gF1 $ gM1 -- Train break train wreck
$ chop 16
$ midiOff "^36" (loopAt 2)
$ midiOff "^56" (loopAt 2)
$ midiOn "^60" (loopAt 0.5)
$ midiOn "^92" (ply "2 1 4 <2 1>")
$ chop 4
$ loopAt 4
$ "jungle_breaks:45"
# cut 8
d10 $ gM3 $ gF3
$ note "<g3!3 a3>" # "90s_weird:1"
# cut 10 # gain 0.8
# pan (slow 4 "<0.2 0.42 0.68 0.8>")
d11 $ gF3 $ gM3
$ note ("0(3,8)" + "<g4!3 a4 g4!3 a4 d4!3 d4s d4!3 a4s>")
# "90s_synatm:13"
# cut 11
# gain 0.8
# pan (slow 4 (1-"<0.2 0.42 0.68 0.8>"))
# att 0.1
# rel 2
d9 $ gF3 $ gM3 -- Submarine electric wave
$ someCyclesBy "<0!6 0.5 1>" (# silence)
$ note ("<g4!3 a4 g4!3 a4 d4!3 d4s d4!3 a4s>")
# "90s_synatm:14"
# cut 9
# gain 0.8
# crushbus 91 (slow 16 $ range 16 4.5 (perlin - (slow 8 saw)))
# pan (slow 4 (1-"<0.2 0.42 0.68 0.8>"))
live/collab/mousquetaires/blue_burn.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
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k . ~ k ~ ~")
$ fix (|* gain 0.9) "kick:5"
$ "[h2ogmbd:1,kick:5]" -- TODO: Meilleur kick?
# gain 1.2
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "cp"
# gain 0.9
# pan 0.6
# note "-3"
-- # room 0.84 # dry 0.95 # sz 0.1
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 $ gM3 $ gF2
$ midiOn "^89" (superimpose (
(struct "t(8,16)") . (# legato 0.2). (# cut 41))
. (|* gain 0.8)
)
$ note "<<e!3 e4> <~ [~!7 <g g g a g a bf b>]>>"
# "moog"
# crushbus 41 (range 16 2.5 "^53")
# octerbus 42 "^33"
# cut 4 # gain 0.8
d5 $ gM3 $ gF3
$ midiOn "^90" (ply 2)
$ note (arp "down" "c'min'2" + "<<e!3 e4> <b3 [~!7 <g g g a g a bf b>]>>")
# "FMRhodes1"
# crushbus 52 (range 16 2.5 "^54")
# modIndex (range 0 2.5 "^34")
-- # cut 5
# pan 0.7
# gain 1.2
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:18"
# gain 0.85
# 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/collab/mousquetaires/blue_gold.tidal 0 → 100644
do
setcps(124/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 $ gMute2
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k . ~ <~!4 k!12> ~ ~")
$ fix ((# lpf 1400)) "kick:4"
$ "[techno:0,kick:4]"
# gain 2
# room 0.2
# dry 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
-- $ "[rampleM2:12,rampleD3:1,rampleD4:1]"
$ "[snare:10,snare:20]"
-- # note "-4"
# lpf 2000
# gain 1.5
# pan 0.6
# rel (slow 16 $ range 0.6 0.2 saw)
-- # note "-3"
-- # room 0.84 # dry 0.98 # sz 0.1
d3 $ gF1 $ gM1 -- Highest hats
-- $ juxBy 0.8 (id . (# cut 31))
$ whenmod 32 16 (swingBy (slow 16 $ range 0.08 0.01 saw) 4)
$ midiOn "^44" (off "s" id)
$ midiOn "^76" (ply "<2!2 4 8>")
$ fix (# legato 0.25) "rampleD2:3"
$ "~ h ~ h ~ h*<1 2> ~ h*<1!3 2>"
# "rampleD2:2!6 <rampleD2:2!3 rampleD2:3> rampleD2:3"
-- # n "<4 5 4 <5!3 6>>"
-- # note (-12 + "3.5" + "e6")
# cut 3
# gain (1.4 * (range 0.85 1.05 (fast 4 perlin)))
# room 0.2 # dry 0.99 # sz 0.25
d4 $ gF2 $ gMute3
$ midiOn "^89" (ply "2 <2 <4 8>>")
$ fast (4/3) -- Le fameux
$ midiOff "^57" -- L'attente
(sometimesBy "<1!3 [0 <0 1>]>" (mask "t(<5!3 <5 8>>,8) t(<5!3 5>,8)"))
$ ("e" ~>) -- Decalage
$ note ("<[fs4 <a5!2 gs!4 fs5!4 <[a6 gs6 fs6]!3 [fs6 gs6 a6]>>@3]*4>")
# "bassWarsaw" |- note 24
# pan 0.4
# crushbus 41 (range 16 3.5 "^53")
# octersubbus 42 (range 0 2 "^33")
# octerbus 43 (range 0 0.52 "^33")
# gain 2
# legato "[0.8 0.5]*4"
d5 $ gM3 $ gF3
$ midiOn "^90" (ply "2 <2 <4 8>>")
$ midiOn "^58" (slice 8 "<0 1 2 3>(<3 <5 [5 3]> <3!3 [1]> <8!3 [8 4]>>,8)")
$ midiOff "^58" (slice 8 "<0 1 2 3 4 5 6 7>")
$ "suns_keys" # n "<0 <1 2> 3 3>"
# pan 0.8
# room 0.8 # sz 0.5
# cut 5
# octerbus 51 (range 0 1 "^54")
d7 $ gM3 $ gF3
$ midiOn "^91" (ply "1 . 2 <2 <4 8>>")
$ slice 8 "0 0 0 <0 <1 2>>"
$ "suns_guitar:0/2"
# cut 7
# octersubbus 71 (range 0 1.9 "^35") -- BURN THIS GUITAR
# lpfbus 72 (range 10000 200 "^35")
# crushbus 73 (range 16 2.5 "^55") -- CRASH THIS GUITAR
# pan 0.2
# gain 1.1
d8 $ gF1 $ gM1
$ midiOn "^92" ( -- Bouton Nassim <3
slice 16 "[0 .. 7] . <[0 .. 7]!3 [0 1 . [2 3]]>"
. loopAt 0.5 . (# "breaks165")
-- . (# octer 0.4) . ( octersubsub 4)
. (# lpf 2500)
. (# room 0)
)
$ midiOff ("^60" + "^92") (ply "t(<4!3 <6 [4 <8 16>]>>,8,1)") -- TECHNOO
$ midiOn "^56" ((loopAt 1) . (# "jungle_breaks:60")) -- Clochettes?
$ chop 16
$ loopAt 2
$ "jungle_breaks:45"
# cut 8
# att 0.04
# rel 2
# gain 1.6
# hpf 1200
-- # room 0.52 # sz 0.04 # dry 1.01
d9 $ gF3 $ gMute3 -- Voice of the Father
$ someCyclesBy "<0!16 1!16>" (slice 10 "<5 5 <2 2 7 2> <7 4>>")
$ someCyclesBy "<1!16 0!16>" (slice 10 "<0 0 2 <4 5 5 4>>")
$ "suns_voice:0"
# octerbus 91 (slow 16 $ range 0.5 0.2 sine)
# hpf 1500
# cut 9
d10 -- CUES AND NOISES
$ fix (# lpf 2000) "rampleD5:3" -- Porte spaciale
$ fix ((# legato 4) . (# cut 101) . mask "<f!3 t>" . slow 8) "risers"
$ "[<~!3 rampleD5:3>,risers:5]"
# gain 1.2
-- # cut 10
d11 $ gM3 $ gF2 -- Flying triplet guitar
$ slice 8 ("<0 1 2 3>(3,8)")
$ "suns_guitar:2"
# cut 11
# room 0.8
# sz 0.5
# dry 1.2
# pan "<0.3!16 0.7!16>"
# legato 4
d12 $ gM3 $ gF3 -- Falling angel guitar
$ whenmod 16 8 (ply "<4 2 [4 2] [4 8]>")
$ slice 2 ("<0 1>")
$ "suns_guitar:1"
# cut 12
# pan "<0.7!16 0.3!16>"
# room 0.4
# sz 0.5
# hpf 1500
# dry 1.2
# gain 1.3
# legato 1.2
once
$ sound "suns_keys:0"
once $ "jazz"
setcps 0.25
d1 $ fastcat ["bd:0*2", "hh()", "dr*4", "[cp*<1 2> . ~]"]
-- # ""
# gain 1.8
-- # hpf 5000
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/bad_witch.tidal 0 → 100644
do
setcps (80/60/4)
-- let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMask = (midiOn "^41" (mask "f@2 f t [f f]@2 t f f f f f f t 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
d1 $ gF1 $ gMute2
$ fast 2
$ midiOn "^42" (<| "k*4")
$ midiOff "^42" (<| "k . ~!3 <~!3 k>")
$ "[kick:5,clubkick]"
# cut
1
d2 $ gF1 $ gM1
$ fast 2
$ midiOn "^43" (<|"~ s ~ s*<1 2>" )
$ midiOff "^43" (<| "~ s/2")
$ "rampleM9:4"
# gain 0.9
d3 $ gF1 $ gM1
$ fast 2
$ midiOn "^76" (fast 2)
$ superimpose ((# "hh") . (# cut 31) . (# pan 0.8))
$ "~ d ~ d ~ d ~ d*<1 <2 [4 2]>>"
# "rampleA4:9"
# cut 3
# pan 0.2
d4 $ gF2 $ gMute3
$ midiOn "^89" (ply "2 4")
$ note ("[c4@2 c5 ~ [bf4 c5]@2 ~ bf4 c5 bf4 g4 fs4 f4@4]" - 12)
# "bassWarsaw"
# cut 4
# room 0
# octersub 0.8
# gain 0.8
# pan 0.6
# crushbus 41 (range 16 2.5 "^53")
d9 $ "90s_matrix:0/4"
# cut 9
-- # room 0.4
# gain 0.9
# pan 0.1
# lpfbus 91 (slow 16 $ range 200 2000 saw)
d5 $ gF3 $ gM3
$ whenmod 8 7 (>| note "c@2 c ef@2 ef f g")
$ fast 4 $ note ("[c <c!3 f> c <g fs ef b4>]")
# "FMRhodes1"
# modIndex (range 0 64 "^54")
# pan 0.2
# gain 1.2
# room 0.2 # sz 0.9
# cut 5
|- note 12
d8 $ gF1 $ gM1
$ midiOn "^60" (ply 2)
$ midiOn "^92" (ply 2)
$ chop 16
$ midiOn "^36" (loopAt 4 . (# "jungle_breaks:24") . (|* gain 1.1)) -- Legerete orleanaise
$ midiOn "^56" ((# "jungle_breaks:45")) -- Legerete orleanaise
$ loopAt 1 $ "jungle_breaks:62" -- Poudreuse epaisse
# cut 8
once $ note "c@2 c ef@2 ef f g" #"FMRhodes1" # orbit 6
live/collab/raph/diable.tidal
......@@ -3,7 +3,8 @@ setcps (170/60/4)
let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.1 saw)))
d1 $ g
$ fix ((# att 1) . (# rel 2)) "kick"
$ "[jazz,bd,kick:5]*4" # gain 1
$ "[jazz,bd,kick:5]*4"
# gain 1.2
d2 $ g
$ note "~ 0 . <~ <[~ -2]!3 ~>> 0"
# "snare:4" # lpf 2000
......
live/collab/raph/dub_a_trois.tidal 0 → 100644
do
setcps (80/60/4)
-- let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMask = (midiOn "^41" (mask "f@2 f t [f f]@2 t f f f f f f t 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
d1 $ gF1 $ gMute2
$ midiOn "^42" (<| "k k k <k k*2 k [~ k]>")
$ midiOff "^42" (<| "k ~ ~ <~!3 k>. k ~ <~ k> <k ~>")-- RubADub+adjustements
$ "[cpu,jazz]"
# lpf 5000
d2 $ gF1 $ gM1
$ "~ s ~ s*2" # "snare:44"
d3 $ gF1 $ gM1
$ "drum:2*[16 <16 [16 8] 8 [16 32]>]"
d4 $ gF2 $ gM3
$ midiOn "^89" (struct "t*8")
-- $ superimpose (ma) . (# cut 41))
$ note ("<c!4 ef ef g g> <c!4 ef ef g g>@3 . ~!7 <~ <b3 d3>>" - 1)
# "bass3:2"
# cut 4
# crushbus 41 (range 16 2.5 "^53")
d5 $ gF3 $ gM3
$ (|+| note (arp "up" "~ 0 ~ 0" + (slow 2 "<g4 as4 c4 <d4 ds4>>") + 6))
$ slice 16 ("0")
$ "rootsGuitar:7"
# lpf 2000
# room 0.4 # dry 1.2
# cut 5
d8 $ gF1 $ gMute
$ midiOn "^56" (loopAt 0.5 . (# "jungle_breaks:45") . (|* gain 0.8))
$ midiOn "^92" (ply "<2!3 4>")
$ loopAt 4
$ chop 16
$ "<trance_loops:0!3 trance_loops:4>"
-- # n "<0!3 4>"
# cut 8
once $ "rootsGuitar:7"
do
-- resetCycles
-- once $ note "a3" # "bassWarsaw" # pan 0.35 # cut 6 # gain 0.4 # room 0.8 -- IntroBass Base
once
$ (0.125 ~>) -- Bien calé!
-- $ mask "<f!16 t!48>" -- Intro/64
$ whenmod 4 3 (slow "<2 4>") -- Break-ish
$ mask "<t(1,4)!4 t(2,4)!4 t!8 t(<4!3 3>,4,<0!3 1>)!16>" -- Dégradé
$ chop 4
$ slice 4 "<0!3 1>"
$ loopAt 4
$ "rootsGuitar:7"
# room (slow 32 $ range 0.2 0.65 saw)
# dry 1
# sz 0.9
# pan (0.75 + 0.25 * (slow 8 perlin))
# gain (0.8 - 0.1 * perlin + 0.2 * (slow 16 $ saw))
# cut 5
live/collab/raph/jeudrill.tidal 0 → 100644
resetCycles
do
let gF1 = (# djfbus 1 (range 0.1 0.9 "^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,clubkick]"
# room 0.2 # dry 1.1
# cut 1
# gain 1.5
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)"
$ "h(3,8) h(3,8)" # pan "0.2 0.8"
# drumFrom "rolandtr909" "hh" # cut 3 # gain 0.9 # legato (range 0.05 0.9 "^32")
d9 -- Bogdan the Grime sample provider
$ whenmod 16 12 ( -- I'm from Cardiff!
(# "bogdan_grime:1") . (# begin "<0!3 0.25>") . (# end "<0.5!3 0.25>")
)
$ whenmod 16 8 ((# begin 0.66) . (# end 1)) -- Pints <3
$ end "<~ <0.42 <0.66 1>>>"
# "bogdan_grime:3"
-- # n 0 # begin 0 # end 1 # cut 9 -- FIXME DEBUG
# delay "<0 <0.7 0>>"
# delayt "h"
# delayfb 0
# speed 0.92
-- # room 0.4
# gain 1.2
d8 $ gF1 $ gM1 -- Come on breaks!
$ chop 8
$ midiOn "^92" (ply 4)
$ midiOn "^36" (loopAt 2 . (# n "<61>")) --
$ midiOn "^56" ((# 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.9
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.7
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
# squizbus 51 (range 0 2.5 "^54")
-- # delay 0 # delayfb 0.8 # delayt 0.25
# pan 0.9
# gain 3
# room 0.3
d10 $ gF2 -- Menace
$ note "<b3 ~ ~ <[~!7 c4] [~!5 c4 ef4 <c4 fs4>]>>"
# "90s_synatm:10"
# room 0.3 # sz 0.8
# gain 1
# 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))
once $ "bogdan_grime:1" # cut 9
90s_matrix:0
d8 $ "jungle_breaks"
live/collab/raph/nouveau_punk.tidal 0 → 100644
-- Nouvelle vague; NOUVEAU PUNK
do
setcps (155/60/4)
let gMask = (midiOn "^41" (mask "t f(3,8) t f(<5 3 3 1>,8)"))
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 $ gMute2 -- Kick resolu
$ midiOn "^42" (<| "t t t*<1!3 2> <t t*2 t t*4>")
$ midiOff "^42" (<| "t . ~ t ~ ~")
$ "[rampleA0:1,jazz]"
# gain 1.6
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ s ~ <s s*2 s [~ s]>")
$ midiOff "^43" (<| "~ s ~ s*<1!4 2 2 4 8>")
$ "snare:32"
# gain 1.1
d3 $ gF1 $ gM1
$ midiOn "^76" (ply 2)
$ "dr*<8!3 16>"
# "h2ogmhh" # cut 3
# gain 0.85
d8 $ gF1 $ gM1 $ chop 16 -- Breaks-in-a-box' (patent pending)
$ loopAt 1
$ midiOn "^92" (# "breaks165") -- BOUTON NASSIM <3
-- $ midiOn ("^36" - "^56" - "^89") (loopAt 2 . (# n 45))
$ midiOn ("^56" - "^92") (loopAt 4 . (# n 44))
$ "jungle_breaks:79" -- Arguably not very drum-n-bass
d4 $ gF2 $ gMute3 -- Ligne directrice: P-U-N-K
$ midiOn "^89" (ply 2)
$ midiOn "^57" (chop 2)
$ chop 4
$ "punk:0/4"
# cut 4
# gain 0.9
# legato (range 0.42 1 "^33")
# crushbus 41 (range 16 1.5 "^53")
# room 0.2 # dry 1.9 # sz 0.6
d5 $ gF2 $ gMute3
$ midiOn "^90" (ply "2 <1 4>")
$ midiOn "^58" (
chop "<4 4 8 16>"
. (# legato 0.5) . (# room 0.3) . (# sz 0.7))
$ note "<e c d b4>"
# "90s_synatm:9"
# crushbus 52 (range 16 3.5 "^54")
# octersubbus 51 (range 0 4 "^54")
# octerbus 53 (range 0 1 "^34")
# cut 5
# pan 0.7
d9 $ gF3 $ gMute3 -- Violoncelle Manouche punko-magique
-- $ chop "<4 4 8 16>"
$ struct "t(<3!3 5>,8,<0!7 1>)"
$ note (
"<e g a <b4 b4>>" + (arp "up" "[0,<7 7 9 7>,12]")
)
# "cpluck:2"
# cut 9
# legato 0.5
# pan 0.2
d11 $ gF3 $ gMute3 -- Anges melodiques
-- $ struct "t([5 <3!3 5>],8)"
$ note "<e <a a e6 e6> <g c6 a6 c6> b5>"
# "moogBass"
# att 0.1
# rel 1
# gain 1.2
# room 0.7
d10 $ gM3 -- Decoration/riser
$ fix (
(loopAt 8) . gMute . gMute2
. mask "<f!8 t!8>"
. (# gain 0.9)
. (# speed 0.125)
. (# cut 102)
) "risers" -- Riser occasionnel
-- $ fix (mask "<f!3 t f!4 f!3 t f!3 t t!3 f t!2 f f t f!3 t!4>"
-- . (# cut 101)
-- ) "suns_voice" -- Could add sample
$ stack ["risers:19/2"]
# room 0.2
-- e c d b
once $ "cbow"
live/collab/raph/permanence.tidal
......@@ -8,10 +8,10 @@ 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
$ "[techno:0,808bd:2,909,kick:4]"
# lpf 1200
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^75" (ply 4)
$ midiOn "^43" (<| "~ s*<1!7 2> ~ s*<1!3 2>")
......@@ -24,8 +24,9 @@ d2 $ gF1 $ gM1
# pan 0.25
-- # lpf 3000
d3 $ gF1 $ gM1
$ midiOn "^76" (ply 2)
$ 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"
|* gain "1 1 0.95 1 0.96 1 0.975 1.1"
# gain 1.8
......@@ -41,7 +42,8 @@ d4 $ gF2
# octersubbus 42 (range 0 1.5 "^17")
# squizbus 42 (range 0 1.5 "^33")
# crushbus 41 (range 16 2.5 "^53")
d5 $ gF3 $ gM3
# gain 1
d5 $ gF3 $ gMute3
$ midiOff "^58" (slice 4 "<0 0 0 0 1 1 1 <1 2>>*<4!7 8>")
$ midiOn "^58" (
slice 4 "<0 1 2 3> <0 1 0 3>*<1 2 1 4>" .
......@@ -58,14 +60,15 @@ d5 $ gF3 $ gM3
# pan 0.66
d7 $ gM3 $ gF3
$ n ("<0 0 0 ~>" + "<41!10 42 42>") # "fsynth"
-- # crushbus 71 (range 16 2.5 "^55")
# octersubbus 71 (range 0 2.5 "^55")
# crushbus 72 (range 16 2.05 "^35")
# octersubbus 71 (range 0 3 "^55")
# octersubsubbus 73 (range 0 3 "^55")
# cut 7
d8 $ gF1 $ gM1
$ midiOn "^20" (loopAt 4)
$ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
$ chop 16
$ loopAt 2
$ chop 8
$ midiOn "^92" (ply "<2!3 [4!3 8]>")
$ midiOn "^92" (ply "<2!3 [4!3 2]>")
$ midiOn "^36" (# "jungle_breaks:55")
$ midiOn "^56" (# "jungle_breaks:45")
$ "jungle_breaks:1"
......
live/collab/raph/ragga_la_hierarchie.tidal
......@@ -42,7 +42,7 @@ d4 $ gF2 -- Meth == Crash
# room 0.2 # sz 0.3 # dry 1.1
# midiG' "^83" 0 1.2
d5 $ gF2 -- Prendre l'acid bus pour trouver du boulot
$ midiOn "^57" (id)
$ midiOn "^57" (id) show
$ midiOff "^57" (slice 8 "0 0 <~!8 0!8> 0*<1!8 2!8>" )
$ loopAt 16
$ chop 8
......
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/fusion/sel_marin.tidal
......@@ -39,6 +39,7 @@ d4 $ gF2 -- Baleine sur la défensive
-- TODO: seconde voix
# "[bassWarsaw,supersaw]"
# midiG' "^81" 0 0.8
# octerbus 41 (range 0 0.85 "^53")
# crushbus 41 (range 16 3.5 "^53")
# room 0.3 # sz 0.4 # dry 1.1
# pan 0.4
......
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
-- TRIGGER INTRO :)
-- resetCycles
......@@ -9,19 +6,22 @@ let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine)))
let gF = 1.01
let f1 = (# djfbus 1 (range 0.05 0.95 "^49"))
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 gMute2 = (midiOn "^74" (mask "f*16"))
let maskLoops = (mask "<t!4 [t!3 f]>" . mask "<t!14 f [f!3 t]>")
setcps (90/60/4)
d1 $ f1 $ gMute2
d1
$ f1 $ gMute2
-- $ kCrush
$ 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>")
-- $ mask "<f!32 f!8 t!16 t f!6 [t f] t!64>"
-- $ "[808bd:6,kick:8]"
$ fix ((# hpf 500) . (|* gain 0.7)) "kick:5"
$ "[jazz,kick:5]"
# room 0
# midiG' "^78" 0 1.3
-- # room 0
# gain 1.3
d2 $ f1 $ gMute
$ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32
$ midiOff "^75" maskLoops
......@@ -34,11 +34,16 @@ d2 $ f1 $ gMute
$ "break:20"
# pan 0.4
# cut 2
# speed (range "-0.25" 2.25 "^51")
# midiG' "^79" 0 1.3
# speed (range "-0.25" 2.25 "^31")
-- # 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
$ 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
$ someCyclesBy "<0.6 1>" (stut "<2 3 4>" 0.5 "s")
$ 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
# "h2ogmhh"
# pan 0.6
# room 0.2
# midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 1.3
d4 $ f2 -- Atmospheric synth: aerial questions
-- # midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 1.3
# 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"
# cut 4
# room 0.8
......@@ -57,7 +65,7 @@ d4 $ f2 -- Atmospheric synth: aerial questions
# pan 0.45
# crushbus 42 (range 16 3.4 "^53")
# legato 2
# midiG' "^81" 0 1.2
-- # midiG' "^81" 0 1.5
d5 $ f2 -- Synth: ELECTRONIC ANSWERS
-- $ 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>"))
......@@ -69,8 +77,9 @@ d5 $ f2 -- Synth: ELECTRONIC ANSWERS
# dry 1
# panbus 51 (range 0.8 0.65 saw)
# crushbus 52 (range 16 2.85 "^54")
# octersubbus 53 (range 0 1.85 "^34")
# 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
$ whenmod 8 6 (swing "<4 2>")
$ whenmod 32 8 (superimpose ( -- Echos of doubts
......@@ -83,19 +92,12 @@ d6 $ f2 -- High lead: Winds of truth
))
$ note (scale "aeolian" "<0!3 [0@6 <4 -1>@2]> 2")
# "90s_synatm:18"
# pan 0.9
# room 0.4 # sz 0.8
# crushbus 62 (range 16 2.25 "^55")
# midiG' "^83" 0 1.2
-- # room 0.4 # sz 0.8
# dry 0.1
# pan "^19"
# cut 6
d7 $ f1 -- Snare <3 chak reverb phantome
$ struct "[~ t]*2"
$ "[snare:34,cp]"
# lpf 2000
# midiG' "^14" 0 1.8
d8 $ f1 -- Breaks divins
# cut 7
# crushbus 62 (range 16 2.25 "^55")
# panbus 63 (range 0.05 0.95 "^19")
d8 $ f1 $ gMute2 -- Breaks divins
$ midiOn "^92" (off "e" id)
$ midiOn "^60" (mask "[f t]")
$ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81))
......@@ -152,4 +154,4 @@ d10 $ f1 -- RANDOM FOREST NOISES
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/empreinte_du_numerique.tidal
......@@ -7,46 +7,37 @@
-- (__((__((___()()()------------------------' |0111|
-- EMPREINTE DU NUM3R1QU3
do
let gLPF = ((# djfbus 1 (slow 8 $ range 0.2 0.5 saw)))
let gHPF = ((# djfbus 2 (slow 8 $ range 0.5 0.85 saw)))
let gPont2 = (someCyclesBy "<0!32 1!16 0!16>" gHPF)
let gPont1 = (whenmod 32 24 gLPF)
let g = (# djfbus 1 (range 0.05 0.95 "^49"))
-- let gLPF = ((# djfbus 1 (slow 8 $ range 0.2 0.5 saw)))
-- let gHPF = ((# djfbus 2 (slow 8 $ range 0.5 0.85 saw)))
-- let gPont2 = (someCyclesBy "<0!32 1!16 0!16>" gHPF)
-- let gPont1 = (whenmod 32 24 gLPF)
let modIndex = pF "modIndex"
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gM = gMask . gMute
let 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
setcps (110/60/4)
d1 $ g $ gMute -- Kick
d1 $ gF1 $ gM2 $ gMute -- Kick
$ midiOn "^42" (<| "k k k <k k*2>")
$ midiOff "^42" (<| "k ~ <~ k> k . ~ ~ <~ k> ~")
$ "[jazz,808bd:6]"
# midiG' "^78" 0 1.5
d2 $ g $ gM --
# gain 1.5
d2 $ gF1 $ gM1 --
$ midiOn "^43" (fast "<1!3 2 2 2 4 <8 [8 4]>>")
$ "~ s" # "[sn:40,snare:20]"
# note "<-2!3 -4>"
# midiG' "^79" 0 1.8
d3 $ g $ gMute
$ "~ s" # "[db:12]"
-- # note "<-2!3 -4>"
# gain 1.4
d3 $ gF1 $ gMute
$ midiOn "^76" (fast 2)
$ midiOff "^44" (slow "2!3 <1 <2 [4 1]>>")
$ "d*[8 . 8 <8 [16 <8 16>]>]" # "electro1:0"
# room 0.3
# dry 0.95
# midiG' "^80" 0 (1.6 * "1.2 1!6 <1 1 1.1 <1.2 1>>")
d6 -- Break bonus banane
$ g
$ midiOn "^92" (ply "2!3 1 2!3 <2 4>")
$ midiOn "^60" ( -- Aerial mask
mask "t <f t> <f f t f> <t t f t> f <f t> <f!3 t> t"
)
-- $ sometimesBy ("0 1!7" * "^56") (iter "<4!3 8>")
$ chop 16
$ loopAt 2
$ "break:3"
# cut 6
# midiG' "^84" 0 1.6
d4 $ g $ gPont2 -- BASSLINE BoomRang!
|* gain "1.2 1!6 <1 1 1.1 <1.2 1>>"
d4 $ gF2 $ gM3 -- BASSLINE BoomRang!
$ midiOn "^57" (# n "50")
$ midiOn "^89" (ply "2 4" . chop "2 <2 4>")
-- $ whenmod 64 32 (# crushbus 41 (range 16 2.5 (slow 32 saw)))
......@@ -61,9 +52,19 @@ d4 $ g $ gPont2 -- BASSLINE BoomRang!
# pan 0.3
# crushbus 53 (range 10 1.61 "^53")
# midiG' "^81" 0 1.4
d7 $ g -- Back solar mandoline
d8 $ gF1 $ gM1 -- Break bonus banane
$ midiOn "^92" (ply "2!3 1 2!3 <2 4>")
$ midiOn "^60" ( -- Aerial mask
mask "t <f t> <f f t f> <t t f t> f <f t> <f!3 t> t"
)
-- $ sometimesBy ("0 1!7" * "^56") (iter "<4!3 8>")
$ chop 16
$ loopAt 2
$ "break:3"
# cut 6
d7 $ gF3 $ gM3 -- Back solar mandoline
$ midiOn "^59" (off "s" (|+ note "<7 9 5 <7 12>>"))
$ midiOn "^91" (off "e" (|+ note 12))
-- $ midiOn "^91" (off "e" (|+ note 12))
$ superimpose (|+| note "<[0 12 0]!3 [0 12 0 12]>")
$ note "<d <d a> <gf> c>"
# "supermandolin"
......@@ -71,8 +72,7 @@ d7 $ g -- Back solar mandoline
# room (range 0 0.3 "^55")
# crushbus 71 (range 10 3.61 "^55")
# midiG' "^83" 0 1.5
d6 -- RHODES FOLIE <33
$ g
d5 $ gF2 $ gM3 -- RHODES FOLIE <33
$ midiOn "^58" (off "e" id)
$ midiOn "^90" (jux rev)
$ mask "t(<[12!3 16] [12!3 8] <12 12 8 16> <4!3 [4 <8 16>]>>,16)"
......@@ -83,4 +83,3 @@ d6 -- RHODES FOLIE <33
# pan 0.7
# crushbus 61 (range 10 4.4 "^54")
# modIndex (range "-0.1" 100 "^34")
# midiG' "^82" 0 1.3
live/midi/nova/ambient/froid_de_minuit.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 -- Kick solide 4/4 disponible
-- $ 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>]")
$ "[kick:4]"
d2 $ gF1 $ gM1 -- Snare fantomatique
$ midiOn "^43" (<| "~ s ~ s")
$ midiOff "^43" (<| "~ s")
$ "[cp:1,rampleM1:10]"
# room 0.1 # sz 0.5 # dry 0.9
d3 $ gF1 $ gM1 -- Highest hats
$ midiOff "^44" (slow 2)
$ midiOn "^76" (fast 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.8 1.25 (fast 2 perlin)))
# pan 0.3
d6 $ gF1 $ gM1 $ "hh(3,8) hh(<3!6 5 <5 [5 8]>>,8)"
# "rampleS57:1" # "<hh:2 [hh:2 hh:3*<1!3 4>]>" # cut 6
# gain 0.9 # cut 3
d4 $ gM3 $ gF2 -- Major Ambient Bassline au rapport
$ midiOn "^89" (ply "<8!8 [16 <8 16>]!8> <8 16>")
$ midiOn "^57" (juxBy 0.2 (
("h" ~>)
. swing 2
-- . rarely (off "e" id)
. arp "<up!2 <updown!2 downup updown> up>"
. (|+ note "[0,12]") . (# cut 4) . (|+ pan 0.5)
. (# "FMRhodes1")
))
$ superimpose ( -- Little Angels
(0.5 ~>)
. (|+ note "[7,-12]")
. (|* gain 0.8)
. (# rel 2))
$ note ("<b3 d3 e3 g3>/2")
# "bassWarsaw"
# crushbus 41 (range 16 3.5 "^53")
# squizbus 42 (range 0 1.5 "^33")
# octerbus 43 (range 0 1 "^17")
# octersubbus 44 (range 0 1 "^17")
# att 0.25 # rel 4
# pan 0.2 # room 0
d5 $ gF3 $ gM3 -- Guitare contetemps FIXME Pas convaincante
$ n "~ <0 0 4 [3(3,8),4([1 3],8,2)] 8 8 10 [14 4 14(3,8)]>"
# crushbus 51 (range 16 5 "^54")
# room 0.4 # att 0.4 # rel 0.252 # legato 0.4
# "nujazz_guitar"
d9 $ gF3 $ gM3 $ "wind:0" -- Vent de minuit originel
# speed (slow 16 $ range 0.12 0.34 perlin)
# roombus 91 (fast 4 $ range 0 0.4 sine)
d7 $ gM1 $ gF1 $ loopAt 2 -- Break de secours
$ midiOn "^91" (ply 8)
$ whenmod 4 2 (ply "1 <1 2>" . rev)
$ slice 4 (run 4)
$ "jungle_breaks:48" # gain 0.8
d8 $ gM1 $ gF1 -- Break horloger
$ midiOn "^92" (ply "2!3 <2 4>")
$ someCyclesBy (1-"^36") (mask "t(<3 3 5 [3 8]>,8)")
$ midiOff "^60" (mask "t(<1 <0!3 1>>,4)")
$ chop 8
$ "jungle_breaks:2"
# cut 8
# speed (range 0.125 4 "^56")
d10 -- Choir of moog major voices
$ ply "<1!8 2!8 4!16>"
$ arp "pinkydown"
$ "moogBass"
# note "<b3'maj'2 d3'maj'2 e3'maj'2 g3'maj'2>/2"
# cut 5
# room 0.2
# gain 0.6
# pan (slow 32 $ range 0.9 0.1 saw)
d11 -- CBOW friendo
$ whenmod 32 0 ( -- Triste souvenir du soleil
(|- note 12) . sometimesBy "0 1!3" rev)
-- $ ply "<1!8 2!8 4!16>"
$ rolledBy "<1.33!3 1.4>"
$ "cbow:3"
# note ("<b'maj'8 d'maj'8 e'maj'8 g3'maj'16>/2" - 12)
# cut 5
# room 0.2
# gain 0.6
# pan (slow 32 $ range 0.9 0.1 saw)
live/midi/nova/ambient/prestance.tidal
......@@ -15,11 +15,11 @@ 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
-- # midiG' "^78" 0 1.4
d2 $ gF1
$ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
$ midiOff "^43" (<| "~ <~ c>")
$ "cp"
$ "snare:40"
# note "-4"
# midiG' "^79" 0 1.8
d3 $ gF1 $ gM
......
live/midi/nova/ambient/snow_white.tidal 0 → 100644
do
setcps (80/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF $ gMute
$ midiOn "^42" (<| "k k k <k [<~ k?> k]>")
$ midiOff "^42" (<| "k . ~ k ~ <~!7 k>")
$ "[techno:0,808bd:2,909,kick:4]"
# gain 0.9
d4 $ gF3 $ gMask -- La pluie d'étoiles
$ slow 4
$ slice 16 (run 4 + "<0 3 7 11>")
$ loopAt 16
$ "synth_nes:0"
# pan 0.2
# cut 4
d5 $ gF3 $ gMask -- La pluie d'étoiles
$ slow 4
$ slice 16 (run 4 + "<0 3 7 11>")
$ loopAt 8
$ "synth_nes:0"
# pan 0.8
# cut 5
# hpfbus 51 (range 0 8000 "^34")
# midiG' "^82" 0 0.9
d8 $ gF $ gMask
$ midiOn "^20" (loopAt 2 . (# "jungle_breaks:11"))
$ midiOn "^36" (loopAt 2 . (# "jungle_breaks:38"))
-- $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41)))
$ sometimesBy "^56" (iter 4)
$ midiOn "^92" (ply "<1 [2 <2 4>]>")
$ midiOn "^60" (ply 2)
$ chop 8
$ loopAt 1
$ "breaks165"
# cut 4
# pan 0.7
# midiG' "^84" 0 1.2
d2 $ gF $ gM -- Snare FOU
$ superimpose (# lpf 5300) -- Double bass
$ midiOn "^75" (<| "[<~!3 s> s]*<4!3 8>")
$ midiOn ("^43" - "^75") (<| "~ s ~ <s s*<1!7 2> s s*2>")
$ midiOff ("^43"- "^75") (<| "~ s")
$ "[sn:25,gretsch:4]"
# note (range "-4" 4 "^51")
# gain 0.7
d3 $ gF $ gM
$ midiOn "^44" (ply "1 2 1 <2 <1 4>>")
$ midiOn "^76" (ply 2)
$ ply "1 . 1 <<2 1> [<4 [4 2]> 1]>"
$ "dr:2*8"
# gain 0.8
-- # midiG' "^80" 0 1.2
# pan (0.3 - 0.2 * perlin)
d4 $ gF2 $ gMask
$ midiOff "^57" (midiOn "^89" (ply "<4!3 [4 8]>"))
-- $ midiOn "^57" (midiOn "^89" (slice 4 (run 8)) . chop 8)
-- $ midiOn ("^89" - "^57") (fast "2" . slice 16 ("[0 1 2 3]*<4 8>" + (slow 2 "<0 4 8 12>")))
-- $ midiOff "^57" (midiOn 1 (slice 16 (("[0 1 2 3]*<2!8 4!8>" + "<0 12 0 8>"))))
-- $ midiOff "^89" (chop 16)
$ chop 4
$ loopAt 4
$ midiOn "^57" (# "bass_gameboy:5") -- Sad truth pattern
$ "bass_gameboy"
# cut 4
# gain 0.9
d6 $ gF3 $ gMask -- La corne de l'espoir
$ whenmod 8 6 (juxBy 0.8 (rev . (# cut 61)))
$ slice 8 ("<0 0 1 <[1 1] [2 <~ 2> 3 <~ 3>]>>")
$ loopAt 2
$ "synth_atari:5"
# cut 6
# gain 0.8
# midiG' "^83" 0 0.9
d7
$ superimpose (|+ note "[0,7]")
$ note "<fs3 b4 a4 cs5 fs4 e4 d4 cs5 fs3 b4 a4 cs5 fs4 b5 a5 cs6>"
# "moogBass"
# octer 0
# octerbus 72 (range 0 1 "^35")
# roombus 71 (range 0.3 1.2 "^55") # dry 1.8 # sz 0.7
# gain 0.8
d8 $ gF $ gMask
$ midiOn "^20" (loopAt 2 . (# "jungle_breaks:11"))
$ midiOn "^36" (loopAt 2 . (# "jungle_breaks:38"))
-- $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41)))
$ sometimesBy "^56" (iter 4)
$ midiOn "^92" (ply "<1 [2 <2 4>]>")
$ midiOn "^60" (ply 2)
$ chop 8
$ loopAt 1
$ "breaks165"
# cut 4
# pan 0.7
# midiG' "^84" 0 1.2
live/midi/nova/beatober/oct_16_haunted_house.tidal
......@@ -2,28 +2,28 @@ do
-- resetCycles
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 gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM1 = gMask . gMute1
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"))
let modIndex = pF "modIndex"
d1 $ gM2 $ gF1 -- Kick solide
d1 $ gMute2 $ 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 t t t*<1!6 2 2>")
$ midiOff "^42" (<| "k . ~ <~!3 k> ~ ~")
$ "[jazz,kick:4]"
# gain 1.2
-- # midiG' "^78" 0 1.5
d2
$ gM1 $ gF1 -- snare contretemps variable
d2$ gMute1 $ gF1 -- snare contretemps variable
$ fix ((|* gain 0.8) . (# legato 0.05)) "cp"
$ midiOn "^43" (<| "~ cp ~ cp*<1 1 2 <1 2>>")
$ midiOff "^43" (<| "~ cp")
$ midiOff "^43" (<| "~ [cp*<1!3 <2 <4 [4 2]>>> ~]")
$ "[cp,snare:24]"
# pan 0.65
# legato 0.22
......@@ -36,18 +36,19 @@ d3 $ gM1 $ gF1
d4 -- Basse convaincante
$ gM3 $ gF2
$ whenmod 64 32 (# drybus 41 (slow 32 $ range 1.9 1 saw))
-- $ midiOn "^89" (ply "<[4@5 2 4 2] 1>")
$ midiOn "^89" (ply "<[4@5 2 4 2] 1>")
$ midiOn "^57" (segment "<4 [4 <8 8 16 16>]>")
$ someCyclesBy (1 - "^17") (struct "<t [t t]>")
$ rarely (ply "1@5 1 <1!3 2> [<1 2> <1 1 1 2>]")
$ note "<c3 c3 c3 c3 gs2 gs2 b2 b2>@5 ef3 d3 <ef3!4 c3!3 b2>"
# "bassWarsaw"
# room 0.32 # sz 0.1
# room 0.2 # sz 0.1
# crushbus 42 (range 16 4 "^53")
# relbus 43 (range 2 0.02 "^33") # att 0.22
-- # midiG' "^81" 0 1.5
-- # midiG' "^81" 0 1.d
# gain 1.4
# pan 0.4
|* gain "1@5 0.95 0.98 0.95"
|* gain ("1@5 0.95 0.98 0.95" * 1.1 )
d5 $ gF3 -- Appel oiseau joyeux oiseau joyaux
$ midiOn "^58" ( -- Oiseau de nuit
rev . (|+ note "<<0 0 [0 -7] [0 -7]>!3 [0!3 -12]>")
......@@ -65,16 +66,17 @@ d5 $ gF3 -- Appel oiseau joyeux oiseau joyaux
# delayfb 0.25
# pan 0.7
-- # midiG' "^82" 0 1.5
d8
$ gF1
d8 $ gF1 $ gM1
$ midiOn "^92" (ply "1 <2!3 4>")
$ midiOff "^60" (mask "t(4,8,1)")
$ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
$ midiOn "^36" ((# n "22")) -- Raise COMEON!
$ midiOn "^56" ((# n "23")) -- Raise COMEON!
$ chop 16
$ loopAt 2
$ "jungle_breaks:45"
# cut 8
-- # midiG' "^84" 0 1.5
d6 $ gF1 -- HAWKS
# gain 1.5
d6 $ gF1 $ gM1 -- HAWKS
-- $ mask "<f!16 t!16>"
$ "~ [s s*2] ~ [s <~!3 s>]"
# "armora:1"
......@@ -88,7 +90,8 @@ d6 $ gF1 -- HAWKS
-- # room 0
-- # midiG' "^31" 0 1.5
d7
$ gM2 $ gF3 -- High carillon!
$ gM3 $ gF3 -- High carillon!
$ midiOn "^91" (off "[e,s]" (ply "<1 2>") . (# legato "e"))
$ midiOn "^59" ( -- Basse reponse
superimpose ((0.125 <~) . (|* gain 1.2) . (# note "<c4!4 cs4!4>") . (# pan 0.45))
)
......@@ -98,8 +101,10 @@ d7
)
# "808hc:2"
# pan 0.85
-- # midiG' "^83" 0 1.5
# gain 0.8
# octerbus 71 (range 0 0.5 "^55")
# octersubbus 72 (range 0 1.4 "^55")
# room 0.2 # dry 1.08 # sz 0.3
# gain 1.4
d9 $ gF3 -- Pads atmospheriques
$ off 0.25 ((# pan 0.8) . (# cut 91))
$ note ("<c4 c4 c4 c4 gs3 gs3 b3 b3>"
......@@ -109,7 +114,7 @@ d9 $ gF3 -- Pads atmospheriques
# cut 9 # legato 2
-- # midiG' "^20" 0 1.4
# pan 0.4
# gain 1
# gain 1.4
# room 0.4
d10
$ mask "<f!16 t!16 t!96>"
......
live/midi/nova/beatober/oct_29_can_i_code_it.tidal
......@@ -11,11 +11,12 @@ let gM = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gM2 $ gF1
$ midiOn "^42" (<| "k k k [k*2 <k [~ k]>]")
$ midiOn "^42" (fast 2 . (<| "k k k <k [k*2 <k [~ k]>]>"))
$ midiOff "^42" (<| "k . k(<3 [3 <5 4 5 8>]>,8)")
$ "[jazz, kick:5,808bd:2]"
# gain 0.8
d2 $ gM $ gF1
$ midiOff "^43" (mask "f t")
$ fix (# lpf 200) "snare:15"
$ "~ s [~!3 <~!3 s ~ s ~ s>] s*<1!7 2>"
# note "0 0 -2 0"
......@@ -26,9 +27,10 @@ d3 $ gM $ gF1
$ midiOn "^76" (mask "t(<24 32 32 24>,32)" . ply "1 2 1 2")
$ midiOn "^44" (ply 2)
$ "d*8"
# note 3
# drumFrom "mpc1000" "sd:4"
# note "8"
# drumFrom "mpc1000" "[sd:4,sd:5]"
# pan 0.2
# gain 0.9
|* gain (fast 2 $ segment 16 $ range 0.85 1.1 perlin)
d4 $ gMute3 $ gF2 -- Can I?
$ slow 2
......@@ -72,7 +74,7 @@ d5 $ gF3 $ gM3 -- BURNING IT
d8 $ gM $ gF3
$ (# pan "0.13@3 0.87")
$ midiOn "^92" (ply "2 <2!3 4>")
$ midiOn "^36" (chop 16 . loopAt 0.25 . (|> "jungle_breaks:1"))
$ midiOn "^36" (chop 16 . (|* gain 0.85) . loopAt 0.25 . (|> "jungle_breaks:1"))
$ midiOff "^36" (slice 16 ("<0 2 2 0> <1 3 3 1> <2 6> <3 <7 3>>"))
-- $ slice 16 (run 16)
$ loopAt 4
......@@ -81,14 +83,22 @@ d8 $ gM $ gF3
# rel 2
# cut 8
# orbit 7
d7 $ gM $ gF1
$ loopAt 4
$ chop 8
$ n "<0!4 5!4>!3 <0 4>"
# "drums_gameboy"
d7 $ gF2 -- Mono Maniaque
$ midiOn "^91" (stut 4 0.9 0.125)
$ midiOn "^59" (off 0.5 id)
$ note (
-- "[~. a4 [b4 <e5 e4>] ~ ~ ]"
"[~ . d4@2 e4 <a4 <a3 b3>> <~!3 a3> ~ ~ ~ ]"
-4 -- Calage
)
# "fmono:3"
# cut 7
# pan 0.2
# end 0.05
# orbit 6
# room 0.3 # sz 0.9 # dry 2
# gain 0.65
# pan 0.7
# crushbus 71 (range 14 2.5 "^55")
d9 $ gF3 $ n "<64!3 65>/4"
# "90s_megafx:64"
# cut 9
......
live/midi/nova/beatober/oct_4.tidal → live/midi/nova/beatober/oct_glitchs_sauvages.tidal
......@@ -9,38 +9,45 @@ let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gM = gMask . gMute
let 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]"
# midiG' "^78" 0 1.9
d2 $ gF1
d2 $ gM1 $ gF1 -- Snare glitch+perc
$ midiOn "^43" (struct "~ t ~ t*<1!3 2>")
$ midiOff "^43" (struct "~ t")
$ 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"
$ "glitch"
# begin 0.02
# end 0.35
# pan 0.8
# midiG' "^79" 0 1.9
d3 $ gF1 -- Hats reguliers mais varies
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
# midiG' "^80" 0 1.9
|* gain (range 0.85 1 (fast 4 sine + (slow 2 perlin)))
d8
$ gF1
d6 $ gM1 $ gF1
$ "~ rampleS0"
# n "<6!6 7 7>"
# pan 0.8
# midiG' "^79" 0 0.9
d4 $ gF2 -- MATRIX BASS
d8 $ gM1 $ gF1
$ midiOn "^92" (ply 2)
$ whenmod 4 3 (ply 2)
$ chop 16
$ midiOn "^36" (loopAt 2 . (# n 40))
$ midiOn "^56" (loopAt 1 . (# n 40))
$ 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]")
......@@ -53,22 +60,27 @@ d4 $ gF2 -- MATRIX BASS
# 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"
# gain 0.8
d5 $ gM3 $ gF2 -- ACID bassline
$ midiOn "^90" ( -- Echoes of future
superimpose ((# cut 51) . superimpose ((# cut 52) . (|+ note 12))
. (|+ note "[12,<~!8 24!8>]")
. (|* gain 0.9) . (# room 0.2) . (# sz 0.9)) . (# cut 51))
$ 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"
$ 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")
# distortbus 52 (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)"
-- # midiG' "^82" 0 1.9
d7 $ gF3 $ gM3
$ midiOn "^91" (|- note "c'maj'2")
$ note (
(slow 8 $ "<[<f4 as5>]!2 [<ef3!2 [ef4!3 f4] f4>]!2>")
+ "0([3 <3!3 5>],8) . 0(<3!7 [3 5]>,8)"
)
# "superfork"
# room (slow 16 $ range 0 0.2 saw)
......@@ -76,7 +88,6 @@ d7 $ gF3 $ note (
# 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 (
......@@ -96,7 +107,7 @@ d10 -- RISE!
. (# sz 0.8)
. (# cut 82)) "r2"
$ "[<~ ~ ~ <r1!3 ~>>,<~!24 ~!8 r2 ~!7>]"
# midiG' "^20" 0 1.3
-- # midiG' "^20" 0 1.3
-- risers:3 annonce
-- risers:4
......
live/midi/nova/boombap/chemise_a_carreaux.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
$ midiOn "^42" (<| "k k k k*<1 1 1 2>")
$ midiOff "^42" ((<| "<k(3,8) [k k k k ~]>") . superimpose (# "kick:5"))
$ "[jazz,house]"
# gain 1.2
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[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([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
# "[rampleS57:2]"
# note (-12 + "3.5" + "e6")
-- # cut 3
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# pan 0.3
d4
$ loopAt 2
$ midiOn "^33" (chop 2)
$ midiOn "^89" (chop 8)
$ midiOn "^57" (slice 4 "4 3 2 1")
$ chop 8
$ "nujazz_bass120:18"
# crushbus 41 (range 16 4.5 "^53")
# room 0.3
# cut 4
# octer 0.9
# octersub 0.5
d5 $ n "<10 10 11 10 10 12 11 12 11 12 12 11 11 12 12 13>" # "nujazz_guitar120" # cut 5
# crushbus 51 (range 16 4.5 "^54")
# hpfbus 51 (range 0 1500 "^54")
d7
$ slice 4 "0 [~ 1] 2 <2 3>"
$ chop 16
$ loopAt 2
$ "jungle_breaks:19" # cut 7
d8 $ gF1 $ gM1 -- BREAK THIS FLOOR
$ 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" (loopAt 0.5 . (# "jungle_breaks:45")) -- ORLEANAISE
$ loopAt 4
$ "nujazz_beats120:2"
# pan "0.2 0.8 0.2 0.8"
-- FIXME GRAVEYARDDD
live/midi/nova/breaks/acid_rain.tidal
......@@ -2,15 +2,20 @@ do
setcps (100/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM = gMask . gMute
d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r...
$ midiOn "^42" (<| "k k k <k!3 k*2 k k ~ [~ k]>")
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gM2 $ gF -- Tradition never disappoints: 4 on the fl00r...
$ midiOn "^42" (<| "k k k <k <k*2 [k*2 k]>>")
$ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
$ "[kick:5,808bd:4,kick:4]"
# gain 1.2
d2
d2 $ gM
$ gF
$ midiOn "^43" (<| "~ c ~ c*[1 <1 <4 <1 4>>>]" )
$ midiOff "^43" (<| "~ <c!7 ~>" )
......@@ -19,45 +24,45 @@ d2
# note "-2"
# room (slow 8 $ range 0.2 0.6 saw) # dry 1
# gain 1.3
d3 $ gF $ gMute
d3 $ gF $ gM
$ midiOn "^76" (ply "2 4")
$ midiOn "^44" (off (0.5- 0.125) id)
$ "~ h ~ h ~ h*<1 <1!4 2!4> 1 2> ~ h*<1!6 2 <2 4>>"
# "hh"
# panbus 31 ((range 0.3 0.7 (whenmod 8 6 rev $ saw)))
# midiG' "^80" 0 1.4
# gain 1.4
# room 0.3
# dry 1.1
d4 $ gF2 -- Piano solo lover sunset
$ midiOn "^57" (-- Sunset echoes
off 0.5 ((sometimes (juxBy 0.8 (off "[0.125,0.25]" (|+ note 12) . (|* gain 0.6))))
. mask "<t [f t]> t(3,8)"
)
. (|+ note 12) . (|+ pan 0.1) . (|* gain 0.8))
$ midiOff ("^57" + "^89") (mask "t f")
$ note (arp "up" ("<g <g6 df6>>" + "{0,[0 7]([3 5],8)}")
+ "[0,12]"
- 36)
# "FMRhodes1"
# crushbus 41 (range 16 2.25 "^53")
# modIndex (range 0 16 "^33")
# room 0.4
d5 $ gF2 -- Jump aboard the BASIC BUS
-- $ sometimesBy (1 - "^19") (mask "t(1, 8)")
$ midiOn "^90" (chop "<8!3 16>")
$ midiOn "^58" (jux rev)
d4 $ gM3 $ gF2 -- Malediction acide
$ someCyclesBy (1 - "^17") (mask "t(3, 8)" . chop 8)
$ midiOn "^89" (chop "<8!3 16>")
$ midiOn "^57" (jux ((# cut 41) . rev))
$ midiOff "^41" (
whenmod 32 8 (superimpose (("q" ~>) . (|* gain 0.93)))
)
$ chop 32
$ chop 8
$ loopAt 8
$ "synth_commodore" # n "1"
# crushbus 61 (range 16 2.25 "^54")
# roombus 63 (range 0 0.5 "^34")
# cut 5
# crushbus 41 (range 16 2.25 "^53")
# roombus 43 (range 0 0.5 "^33")
# cut 4
# gain 1.2
# panbus 64 (range "<0.13!16 0.87!16>" "<0.87!16 0.13!16>" (slow 16 saw))
-- # pan 0.8
d5 $ gF3 -- Piano solo lover sunset
$ midiOn "^58" (-- Sunset echoes
off 0.5 ((someCyclesBy 0.1 (juxBy 0.8 (off "[0.125,0.25]" (|+ note 12) . (|* gain 0.6))))
. mask "<t [f t]> t(3,8)"
)
. (|+ note 12) . (|+ pan 0.1) . (|* gain 0.8))
$ midiOff ("^58" + "^90") (mask "t f")
$ note (arp "up" ("<g <g6 df6>>" + "{0,[0 7]([3 5],8)}")
+ "[0,12]"
- 36)
# "FMRhodes1"
# crushbus 41 (range 16 2.25 "^54")
# modIndex (range 0 16 "^34")
# room 0.4
d7 $ gF2 -- Nice organs you got there
$ slice 8 "[5(3,8) <6 6 3 <2 7>>]"
$ loopAt 2
......@@ -67,7 +72,7 @@ d7 $ gF2 -- Nice organs you got there
# gain 1.4
# pan (slow 16 $ range 0.5 0.2 saw)
d8 $ gF $ gM
$ midiOn "^60" (loopAt 4 . (# "drums_nes:7"))
$ midiOn "^60" (loopAt 4 . (|* gain 0.9) . (# "drums_nes:7"))
$ midiOn "^92" (ply 2)
$ slice 4 "0 1 2 3 0*<1 1 2 1> 1 2 3*<1!4 2 2 2 [4 1]>"
$ striate "1 <1 <2 [0 1]>>"
......
live/midi/nova/breaks/bain_bouillant.tidal
......@@ -3,41 +3,42 @@ setcps (128/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 gDelay = (# delaybus 4 (range 0 0.5 "^13")) . (# delayfb 0.7) . (# delayt 0.5)
let gDelay = id
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gM = gMask . gMute
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
-- let gDJF1 = someCyclesBy "<0!30 2!2>" (# djfbus 4 (slow 2 $ range 0.5 0.1 saw))
-- let gDJF2 = someCyclesBy "<1!8 0!24>" (# djfbus 4 (slow 8 $ range 0.1 0.5 saw))
-- let gDJF = gDJF1 . gDJF2
let gM3 = gMask . gMute3
let gO = (# octersubbus 5 (range 0 1 "^29")) . (# octerbus 6 (range 0 1.2 "^29"))
let gDJF = id
let gOcter = id
d1 $ gF1 $ gM2 -- Kick
$ midiOn "^42" (<| "k k k <k!7 [<k ~> k]>")
$ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
$ fix ((# att 0.02) . (# rel 0.5) . (# lpf 5000)) "kick:4"
$ midiOn "^42" ((<| "k k k <k!7 [<k ~> k]>"))
$ midiOff "^42" (
(<| "<k!24 ~!8> ~ ~ <~!3 k> . ~ <~!7 k> ~ ~")
-- (<| "<k!24 ~!8> ~ ~ <~!3 k> . ~ <~!7 k> ~ ~")
(<| "k . ~ k ~ <~ k>")
)
$ fix ((|* gain 0.9) . (# lpf 5000)) "rampleA0"
$ "[rampleA0:3,jazz]"
$ "[jazz,kick:4]"
-- $ "[rampleA0:3,jazz]"
# gain 1.2
-- # midiG' "^78" 0 1.5
d2 $ gF1 $ gM
$ "~ s ~ s"
# "[rampleA0:11,rampleA2:11]" -- Basic snare
# gain 1.2
d3 $ gF1 $ gM $ gDelay -- Contretemps
-- $ midiOn "^76" (slow 2)
-- $ midiOff "^44" (slow 2)
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ s ~ s*<1 1 2 <1 4>>")
$ midiOff "^43" (<| "~ s ~ s*<1 2 <1 2> 1>")
$ "[rampleA0:11,rampleA2:11]" -- Basic snare
# note "-5"
# gain 0.9
d3 $ gF1 $ gM1 -- Contretemps
$ midiOn "^76" (slow 2)
$ midiOff "^44" (slow 2)
$ "~ h ~ h ~ h ~ h*<1 2 2 <1 2>>"
-- $ "~ h ~ <~!4 h!28> ~ <~!3 h ~!3 h h!8> ~ <h ~ h ~ h!3 <h*2 [~ h*<1 2>]>>"
-- $ "~ h ~ <~!4 h!28> ~ <~!3 h ~!3 h h!8> ~ <h ~ h ~ h!3 <h*2 [~ h*<1 2>]>>"
# "[snare:38]"
# room 0
# gain 1.2
d4 $ gO $ gF2 -- SUBSUB INFRABASS
# gain 0.9
d4 $ gO $ gF2 $ gM3 -- SUBSUB INFRABASS
$ midiOn "^57" (struct "t*8 t(<3!3 5>,8)")
$ midiOn "^89" (stut 4 0.9 "e")
-- $ juxBy 0.8 (
-- (# crushbus 41 (slow 16 $ range 12 2.5 saw))
-- . (# lpfbus 41 (slow 16 $ range 10000 2000 saw))
......@@ -46,17 +47,19 @@ d4 $ gO $ gF2 -- SUBSUB INFRABASS
# "jungbass:3"
# lpf 2000
# cut 4
# crushbus 41 (range 16 2 "^53")
# pan 0.8
# gain 2
d5 $ gO $ gF2 -- Basse appel important
# crushbus 41 (range 12 2 "^53")
-- # octersubsubbus 42 (range 0 1.2 "^33")
# pan 0.65
# gain 1.2
d5
$ gO $ gM3 $ gF2 -- Basse appel important
$ note "<fs3 [fs3@7 b3] [fs3@7 g3] [fs3@5 g3 fs3 d2] [b2@7 d2] [b2@7 d2] [b2@7 gs2] [b2 . b2 d3 <fs3 g3>]>"
# "giorgio_syn:0"
-- # midiG' "^81" 0 1.5
# pan 0.32
# pan 0.351
# lpfbus 52 (range 400 4000 "^34")
# distortbus 51 (range 0 1.2 "^54")
# cut 7
# gain 1.5
# gain 1.4
d7 $ gO $ gF3 -- guitare salvatrice
-- $ mask "<f!32 t!32>"
$ slice 16 "0*[4 <4 4 1 1 4 4 1 4 1 1 4 4> 4 <1!3 4>]"
......@@ -64,17 +67,18 @@ d7 $ gO $ gF3 -- guitare salvatrice
$ loopAt 2
$ "fguitar:55"
# cut 7
# gain 1.2
d6 $ gO $ gM $ gF1 -- Rim drums
# gain 0.9
d6 $ gO $ gM1 $ gF1 -- Rim drums
$ fix ((|* gain (1.2 + 0.1 * perlin))) (n 18)
$ n (stack [
"~ ~ ~ <~!7 <13 14 15 16 17>>", -- Cy
"<~!0 18([<1 3> <1 <3!3 5>>],8)!16> 18(<1 1 3 1>,8)"
"<~!0 18([<2 3> <1 <3!3 5>>],8)!16> 18(<1 1 3 1>,8)"
])
# "h2ogmhh:1"
|* gain (range 0.8 1 perlin)
# gain 1.5
d8 $ gM2 $ gF1 -- BOOM BOOM THE BREAKS
d8 $ gM1 $ gF1 -- BOOM BOOM THE BREAKS
$ midiOn "^92" (ply 2)
$ fix (|* gain 0.8) ("jungle_breaks:24")
$ whenmod 8 7 (slice 4 "0 3 2*<1 2> 1*<1 2 4 4>")
$ midiOn "^36" ((# n "19")) -- Pure COMEON!
......@@ -84,23 +88,18 @@ d8 $ gM2 $ gF1 -- BOOM BOOM THE BREAKS
$ "jungle_breaks:24"
# gain 1.2
d9 $ gF3
$ "jungle_pads:22/4"
$ ply "1 2 <1 <2 4 8 2>> <<2 1 4 <1 4>> 1>"
$ chop 8
$ "jungle_pads:24/4"
# note (2 + (slow 2 $ "<0 -5>"))
# cut 9
-- # midiG' "^19" 0 1
d10 $ gF1 -- NOISES
$ fix (|* gain (slow 32 $ range 1 0.3 saw)) "giorgio_syn"
# gain 0.8
# lpf 5000
d10 $ gF1 -- CONSTRUCTION NOISES
-- $ fix (|* gain (slow 32 $ range 1 0.3 saw)) "giorgio_syn"
$ (stack [
"<~!16 giorgio_syn:52!16>/2"
"<~!0 giorgio_syn:52!16>/2"
])
# note (slow 2 "<0 <-4.5 -7>>")
# cut 10
d11 $ gF2 -- Le Météore (TODO: Variations? Autre sample de meteore?)
$ slice 4 "0 1 2*<1!7 8> 3*<1!3 2>"
$ "meth_bass:0/2"
# note "c"
# midiG' "^17" 0 1
# pan 0.35
# crushbus 91 (range 16 2.5 "^53")
# cut 11
# gain 0.6
live/midi/nova/breaks/break_the_rentree.tidal
......@@ -61,7 +61,7 @@ d6 $ gF2 -- Programmatic bass
# cut 6
# gain 0.6
# room 0.4
# midiG' "^81" 0 0.8
# midiG' "^81" 0 1.3
# crushbus 61 (range 16 4 "^53")
# room "<0.35!3 0.7>"
d5 $ gF2 -- Le rythme de la rentree
......
live/midi/nova/breaks/code_secret.tidal
......@@ -7,7 +7,7 @@
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 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"))
......@@ -16,25 +16,30 @@ let gM = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
setcps (93/60/4)
d1 $ gF1
d1 $ gF1 $ gMute2
$ 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
-- # midiG' "^78" 0 1.5
d2 $ gF1 $ gM
-- $ mask "<f!8 t!24>"
$ "~ s" # "snare:40"
# midiG' "^79" 0 1.4
-- # midiG' "^79" 0 1.4
# pan 0.8
d3 $ gF1 $ "~ h ~ h ~ h ~ [<h!2 ~ h> h*<1!7 2>]"
d3 $ gF1 $ gM
$ "~ h ~ h ~ h ~ [<h!2 ~ h> h*<1!7 2>]"
# "hh" # pan 0.8
# midiG' "^80" 0 1.4
d4 $ gF2
-- # midiG' "^80" 0 1.4
d4 $ gF2 $ gMute3
$ note "<[e2,b2] [e2,c3] [e2,cs3] [e3,c3]>"
# "moogBass"
# chorus 0
# pan 0.1
# midiG' "^81" 0 1.8
# crushbus 41 (range 16 2.5 "^53")
d10
$ note ("<b4 c4 cs4 c4>" + 12)
# "moogBass"
d5 $ gF3
$ midiOn "^58" (ply "<[4 2] 4 [4 8] [4 <[8 4] <16 [16 4]>>]>")
-- $ arpeggiate
......@@ -42,17 +47,18 @@ d5 $ gF3
"<[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"
+ "12"
)
# modIndex (range 0 4.5 "^34")
# crushbus 51 (range 16 4.5 "^54")
# "FMRhodes2"
# "marimba1"
# pan 0.8
# midiG' "^82" 0 1.4
d8 $ gF3
# gain 1.2
d8 $ gM $ gF1
$ midiOn "^92" (ply 4)
$ slice 4 "0 1 2 3*<1 2 4 8>"
$ loopAt 4
$ midiOff "^56" (slice 4 "0 1 2 3*<1 2 4 8>")
$ loopAt 4 $ chop 16
$ midiOn "^56" (loopAt 0.25 . (>| "breaks165"))
$ "trance_loops:0"
# cut 8
# midiG' "^84" 0 1.8
-- # midiG' "^84" 0 1.8
live/midi/nova/breaks/its_about_time.tidal
......@@ -6,6 +6,8 @@ once
# gain 0.9 # cut 13 -- Spooky intro!
-- # gain 0
once $ "dr"
-- (.ParVagues ----- L1VE.)
-- T""""""""""""""""""""T
-- |.;....,..........;..|
......@@ -58,7 +60,7 @@ d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r...
$ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
$ "[kick:5,808bd:4,kick:4]"
# midiG' "^78" 0 1.5
d2 $ gM $ gF -- Break "80s' Apocalypse in a Box™"
d2 $ gM $ gF -- Break "80s' Apocalypse in a Box"
$ midiOn "^44" (fast "1 2")
$ midiOn "^76" -- L'Esprit de Nassim
(
......@@ -111,7 +113,8 @@ d6 $ gF3 -- Jump aboard the BASIC BUS
# midiG' "^83" 0 1.4
# panbus 64 (range 0.13 0.87 (slow 16 saw))
# cut 6
d8 $ gM $ gF3 -- Breaks divins -- TODO Rework?
d8
-- $ gM $ gF3 -- Breaks divins -- TODO Rework?
$ midiOn "^92" (off "e" id)
$ midiOff "^60" (mask "[f t]")
$ someCyclesBy "^36" (loopAt 1 . chop 16 . (# "jungle_breaks:21"))
......
live/midi/nova/breaks/nuit_agitee.tidal
-- BASS GAMEBOY
d f Arc
-- NUIT AGITEEE
-- d f Arc
do
-- resetCycles
......@@ -15,7 +13,7 @@ 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"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let scale = getScale (scaleTable ++ [("gameboy", [1,2,4,5,7,9,11])])
-- once $ note (scale "gameboy" (run 8)) # "superpiano" # gain 2
d1 $ gM2 $ gF1
......@@ -25,13 +23,16 @@ d1 $ gM2 $ gF1
$ "[jazz,kick:4]"
d2 $ gM1 $ gF1
$ "~ <~!8 s!56> <s!8 ~!56> <~!8 s!56>"
# "[sn:20,snare:8]" # rel 0.4 # note "-12" # gain 1.3
# "[sn:20,snare:8]" # rel 0.4 # note "-12"
# gain 1
d3 $ gM1 $ gF1
$ midiOff "^44" (mask "[~ [t . <~!3 t> ~!3 ]]*4")
$ midiOn "^76" (ply 2)
$ n ("~ 0*<1 1 2 1> ~ 0*<1 2 <1 2> 2> ~ <0!32 0*<1!4 2 4!3>!32> ~ <1!16 1*<1 1 2 1 4 1 2 <4 8>>!16>")
# "amencutup"
# cut 3
# panbus 31 "^52"
|* gain (fast 8 $ range 0.9 1.1 perlin)
d6 $ gF1 $ gM1
$ someCyclesBy "<f!3 t f f t t>" (superimpose ((|- note 1) . (|* gain 0.9) . (0.125 <~)))
$ "<~ cp>"
......@@ -39,27 +40,28 @@ d6 $ gF1 $ gM1
# room 0.4 # dry 1.1 # sz 0.5
# lpf 2000
# gain 1.1
d4 $ gF2
d4 $ gF2 $ gMute3
$ midiOn "^89" (slow "<4!12 8!4>" . striate "<4!12 8!4>")
$ midiOn "^57" (slow "<1!12 [1 2]!3 [2 4]>" . mask "<t!6 [<t f> [<t f> f]] [t f]>" . (stut "<4!12 2 2 4 8>" 0.7 "<e!12 e e s s>") . mask "t(2,16)")
$ midiOn "^17" (mask "t(4,16)")
-- $ midiOn "^17" (mask "t(4,16)")
$ loopAt 8
$ chop 64
$ "bass_commodore:7"
# cut 4
# crushbus 41 (range 8 0.81 "^53")
# octersubbus 42 (range 0 7 "^33")
# lesliebus 43 (range 0 2 "^29")
-- # lesliebus 43 (range 0 2 "^29")
# lsize 2.2
# lrate (slow 4 $ range 0.2 0.8 sine)
-- # distortbus 41 (range 0 5 "^53")
# gain (0.8 - 0.1 * "^33" - 0.1 * "^29")
# room "<0.3!12 0.35 0.4 0.48 0.6>"
d5 $ gF3 $ gM3
$ someCyclesBy "^34" ((|- note 12) . (stut 4 0.5 "e"))
$ midiOn "^58" (superimpose (
(|- note 12) . (# cut 51) . (# pan 0.2))
)
$ whenmod 32 24 (off "e" ((|* gain 1.1) . (|+ pan 0.12) . (|+ note "<12!3 24>")))
$ whenmod 32 24 (off "e" ((|* gain 0.95) . (|+ pan 0.12) . (|+ note "<12!3 24>")))
$ note (scale "gameboy" (
"<1(3,8) [1(3,8), <~ [~!7 2]>] 0(3,8) <0!3 -2>(3,8)>"
+ "<<0 0 2 2> <0 0 2 2> <0 7 7 9> <0 0 9 9>>"
......@@ -70,36 +72,45 @@ d5 $ gF3 $ gM3
# pan 0.85
# modIndex 0.3
# legato 2
# gain 1.5
d9 $ gF2 $ arp "up"
# gain 1.2
d7 $ silence -- FIXME add d7, maybe arps/moog?
d9 $ gF2 $ gM3 -- Essouflement amoureux
$ arp "up"
$ note (
"<a a g5 g5> ~ <~!24 d6!7 d5> <a a g g> ~ <~!12 d6!4> <a a g g> <~!16 d6!16>"
- 2.5 -- "calage"
-- "<a a g5 g5> ~ <~!24 d6!7 d5> <a a g g> ~ <~!12 d6!4> <a a g g> <~!16 d6!16>"
"<a a g5 e5> ~ <~!0 d6!3 d5> <a a g5 cs6> ~ ~ ~ ~"
-- "c8'maj'4"
+ 4
+ 12
-- - 2.5 -- "calage"
)
# att 0.05
# rel 2
# "jungbass:1" # cut 9
# room 0.8 # dry 1.4 # sz 0.9
d10 $ gF3 $ note (slow 2 $ ("<[a5, d6] [g5, <e6 <cs6 [cs6 a5]>>]>"))
# room 0.3 # dry 1.4 # sz 0.9
d10 $ gF3 -- Angels of constance
$ note (slow 2 $ ("<[a5, d6] [g5, <e6 <cs6 [cs6 a5]>>]>"))
# "moogBass"
# room 0.2
# pan 0.7
d11 $ gF3 $ gM3
d11 $ gF3 $ gMute3
$ note ("<d d e cs d d e cs f f g e f f g a>"
+ "0(<3!3 [3 <5 6>]>,8)"
+ 12
)
# "cpluck:3"
# room 0.8
# gain 0.65
# gain 0.85
# cut 11
d8 $ gM1 $ gF1
$ midiOn "^92" (ply "1 <2 4 8> 2 <2 [4 8]>")
$ midiOff "^60" (mask (slow 4 "t(<2 4 [4 8 4] 8>,16)"))
-- $ slice 8 "<~!7 0> 1 <~!6 2 2> 3 <~!4 4!4> 5 <~ 6 ~ ~ 6 ~ 6 6> 7"
$ midiOn "^36" ((# n "8"))
$ midiOn "^36" ((# n "18"))
$ midiOn "^56" ((# n "6"))
$ loopAt 2 $ chop 32
$ loopAt 2
$ chop 32
$ "jungle_breaks:1"
# lpf 5000
-- # lpf 5000
# cut 8
# gain 0.9
live/midi/nova/dnb/alerte_verte.tidal
......@@ -5,102 +5,110 @@ resetCycles
-- Alerte Verte
do
setcps (160/60/4)
let g1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let g2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let 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 g32Bridge = whenmod 64 32 (|* gain (slow 16 $ range 0.85 1.1 saw))
let gM = (midiOn "^73" (mask "f*16"))
d1 $ g1 $ gM -- KICK
d1 $ gF1 $ gMute2 -- KICK
$ midiOn "^74" (fast 2)
$ midiOn "^41" (<| "k k k <k [~ k] k k*2>") -- RUN!
$ midiOn "^42" (<| "b . ~ b ~ <~!3 b>") -- WAIT?
$ midiOff ("^41" + "^42") (<| "k*2") -- ST0P.
$ fix (|* gain 0.9) "kick:5"
$ "[jazz,kick:5]"
$ midiOn "^42" (<| "k k k <k [~ k] k k*2>") -- RUN!
$ midiOff "^42" (<| "b . ~ b ~ <~!3 b>") -- WAIT?
-- $ midiOff ("^41" + "^42") (<| "k*2") -- ST0P.
-- $ fix ((# lpf 6000) . (|* gain 0.9)) "techno:0"
$ fix ((# lpf 800) . (|* gain 0.85)) "kick:4"
$ "[techno:0,kick:4]"
# release 0.8
# midiG' "^78" 0 1.5
d2 $ g1 $ gM -- Snare tchak!
d2 $ gF1 $ gM1 -- Snare tchak!
$ midiOn "^43" (ply 2)
$ midiOn "^75" --BOUTON NASSIM
(
whenmod 8 7 (ply "1 . 2") .
slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") .
(loopAt 1) .
(# "breaks165") . (# cut 2)
. (|* gain 1.1)
)
$ midiOff "^75" ( -- NassOff
(<| "~ s . ~ <~ ~ s ~ s!3 ~ s s ~ s s ~ s s ~ s s s>")
. whenmod 16 12 (struct "t*<4 4 8 16>") -- Snare Rush
)
$ "[snare:40,snare:22]"
$ whenmod 16 12 (struct "t*<4 4 8 16>") -- Snare Rush
$ "~ s . ~ <~ ~ s ~ s!3 ~ s s ~ s s ~ s s ~ s s s>"
# "[snare:40,snare:22]"
# pan 0.55
# note (range "-7" 7 "^51")
# note (range "-7" 7 "^31")
# room 0.8 # dry 0.99 # sz 0.2
# midiG' "^79" 0 1.2
d3 $ g1 $ gM -- Running Hats
-- # midiG' "^79" 0 1.2
d3 $ gF1 $ gM1 -- Running Hats
$ g32Bridge
$ midiOn "^44" (slow 2)
$ midiOn "^76" (fast 2)
$ "hh*[8 . 8 <16 8 4 [4 8]>]"
-- # n "[0|0|0|0|1|1|3|3]*8"
# midiG' "^80" 0 (1.7 + (slow 4 perlin/4))
|* gain (range 0.8 1.2 perlin)
# room (slow 8 $ range 0.2 0.45 saw)
# sz (slow 8 $ range 0.8 0.2 saw)
# note (range "-12" 12 "^52")
# dry (slow 4 $ range 0 2 perlin)
# pan 0.6
# cut 344
d4 $ g2 -- Resolute Bass
# gain 1.2
d4 $ gF2 $ gMute3 -- Resolute Bass
$ superimpose ((# octer 0.7) . (|* gain (0.9 * "^33")) . (# cut 41))
-- $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin)))
$ midiOn "^89" ( -- Glitch vary end
slice 8 "<[0 1 <2!3 1*2> <3!3 1*2>]!4 0*4!2 [0 1 0 1] [0 1 0 [0 1 2 3]]>"
. (# legato "<1!7 [1@3 0.25]>")
)
$ midiOn "^57" (rev . slice 8 "0 [1 0] 2 <3 0 3 3*4>") -- La morale à l'envers
$ loopAt 4
$ chop 16
$ "fbass:25"
# pan 0.15
-- # room 0.125 # sz 0.1 # dry 1
# pan 0.45
# cut 4
# crushbus 41 (range 16 1.25 "^53")
# midiG' "^81" 0 2
-- # cut 4
d6 -- Guitar A -- L'attente (18=0) TODO Rework?
$ g2
$ mask "<f!3 t>"
$ ("0.175" ~>) -- Calage
$ whenmod 4 2 (slice 8 "0")
$ slice 5 4
$ segment 16
$ "fguitar:24"
d5 $ gF3 $ gM3-- Guitar A/B - La surprise et l'attente
$ fix (
mask "<f!7 <t f>>"
. ("0.175" ~>) -- Calage
. (whenmod 4 2 (slice 8 "0"))
. slice 5 4
-- . segment 16
. (# "fguitar:24")
) "guitarA"
$ fix (
whenmod 4 3 (# silence)
. midiOn "^90" (# n "25")
. midiOn "^58" ( (# n 27))
. midiOff "^58" (segment "<0.5!2 1 <2 4 8 [8 16]>>")
. (# "fguitar")
. (# n "<25!3 [25 26] 25!2 27!2 27!8>")
. (# pan 0.65)
. (# leslie "^34")
. (# lsize (1 + (slow 16 perlin * 2)))
. (# crushbus 71 (range 10 2 "^54"))
. (# lrate 6.7)
-- . (# cut 61)
) "guitarB"
$ "[guitarA,guitarB]"
# pan 0.8
# crushbus 51 (range 10 3.5 "^54")
# midiG' "^82" 0 (1 * (range 1.2 0.5 "^18"))
# cut 6
d7 -- Guitar B -- Le run (18=127)
$ g2
$ whenmod 4 3 (# silence)
$ midiOn "^90" (# n "25")
$ midiOn "^58" (
(# n 27)
)
$ midiOff "^58" (segment "<0.5!2 1 <2 4 8 [8 16]>>")
$ "fguitar" # n "<25!3 [25 26] 25!2 27!2 27!8>"
# pan 0.65
# crushbus 71 (range 10 2 "^54")
# midiG' "^82" 0 (1 * (range 0 1.4 "^18"))
# leslie "^34"
# lsize (1 + (slow 8 perlin * 2))
# lrate 6.7
# cut 71
d8 $ g1 -- Clave de l'été pitchable
# cut 5
d7 $ gF3 $ gMute3 -- Clave de l'été pitchable
$ midiOn "^59" (fast 2)
$ midiOn ("^91" - "^59") (fast 2)
$ (|* gain "0.75 1 1 1 0.75 1 1 1")
$ "d ~ ~ d d ~ d <~!3 d>"
# "[<808lc!6 808hc!2>,<~!4 808mc!4>]"
# speed (range 0 2 "^55")
# midiG' "^83" 0 1.8
d10 $ g2 -- Nappes crushées indépendantes
# gain 1.7
d8 $ gF1 $ gM1 -- I WANT THEM DRUMS
$ midiOn "^92" --BOUTON NASSIM
(
chop 16 .
(loopAt 0.5) .
(# "breaks165")
-- . (# cut 2)
. (|* gain 1.1)
)
$ loopAt 2
$ midiOff "^60" (mask "t(4,8,1)")
$ chop 8
$ "jungle_breaks:45" # cut 8
# hpf 5000
d9 $ gF3 $ gM3 -- Nappes crushées indépendantes
$ midiOn "^92" (ply "<2 4 [8 16 [4|6|4]!6]>")
-- $ superimpose ((|- note 12) . (# cut 101))
$ note (euclid "<5 3 6>" 6
......@@ -109,24 +117,24 @@ d10 $ g2 -- Nappes crushées indépendantes
# cut 10
# rel 1
# pan 0.85
# crushbus 100 (range 16 0.35 "^36")
# midiG' "^20" 0.2 1.5
d11 $ g2 -- Sirene indépendante
# crushbus 100 (range 16 0.35 "^19")
# lpf 2000
-- # midiG' "^20" 0.2 1.5
d10 $ gF3 $ gM3 -- Sirene indépendante
$ note ("<e e c e>/4")
# octave 3
# legato 2
# "supersiren"
# speed 0.2
# crushbus 110 (range 10 0.1 "^35")
# ampbus 111 (range 0 0.8 "^19")
# crushbus 110 (range 10 0.1 "^29")
# ampbus 111 (range 0 0.8 "^30")
# pan "<0.2!16 0.8!16>"
# midiG' "^19" 0 1
# room 0.4 # sz (slow 32 $ range 0.125 0.9 saw)
# dry (slow 32 $ range 0 2 perlin)
# cut 11
d9 $ g1 -- CLAPS!
$ "~ c ~ <c!3 c*2>" # "cp"
# midiG' "^84" 0 1.5
# cut 10
d6 $ gF1 $ gM1 -- CLAPS!
$ "~ c ~ <c!3 <c*2 [c c*2]>>" # "cp"
-- # midiG' "^84" 0 1.5
d6 $ "seawolf:0/4"
......
live/midi/nova/dnb/bruler_franchement.tidal 0 → 100644
-- euphorie solitaire
-- FIXME NAMING: NOT EUPHORIE
do
-- resetCycles
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
d1 -- Kick premier`
$ gF1 $ gM2
-- $ midiOn "^42" (off "e" (# "jazz:0"))
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ midiOn "^42" (<| "k k k <k <[~ k] k*2>>")
-- $ fix ((# att 0.5) . (# legato 0.5) . (|- note 6 show )) ("tek_kick:3")
$ "[kick:4]"
# room 0.2 # sz 0.8 # dry 1.1
d2 $ gM1 $ gF1 -- Snare second
-- $ fix (# lpf 4000) "snare"
$ midiOff "^43" (mask "<t!16 f!16>")
$ fix ((|* gain 1.1) . (|- note 2)) ("ab:11")
$ "~ s ~ s*<1!3 2>"
# "[<ab:10!3 ab:11>]"
d3 $ gM1 $ gF1
$ midiOn "^76" (ply 2)
-- $ midiOn "^44" (mask "t([16 <16 [32 64]>],64)" . chop 16 . ply 4)
$ "dr*[8 [<8 <16 [16 <8 32> 16]>>]]"
# "dr" # "h2ogmhh:2"
# gain (fast 8 $ range 0.85 0.95 perlin)
d4 $ gF2 $ gM3
$ midiOn "^89" (ply "8 <4 16>")
$ slice 8 "<7 6>"
$ "meth_bass:0"
# cut 4
# octersubbus 41 (range 0 2 "^33")
# crushbus 42 (range 16 0.85 "^53")
|- note 0.5
# gain 0.6
# room 0.3 # sz 0.5 # dry 0.9
d5 -- Melancolie solitaire
$ midiOn "^58" ( superimpose (
(+ note "12")
. stut 4 0.9 "<e!12 q!4>"
. (# pan 0.3)
. (|* gain 0.8)
. mask "t(1,8) t(1,8) t(1,8) t(1,8)")
)
$ slow 2
$ note (
-- Montee: "<a5 g5 f5 e5 f5 e5 d5 a4>"
-- Descente: "<d5 e5 f5 g5 d5 e5 g5 a5>"
(fast 4
"<a5 g5 f5 e5 f5 e5 d5 a4 a5 g5 f5 e5 f5 e5 d5 a4 d5 e5 f5 g5 d5 e5 g5 a5 d5 e5 f5 g5 d5 e5 g5 a5>" - 12
)
+| "0(3,8) 0(3,8,<0!7 1>) 0(3,8) <0(3,8) 0>")
# "FMRhodes1"
# pan 0.7
# modIndex (range 0 5 "^54")
# gain 1.2
d6 $ gF2 $ gM3
-- $ slice 4 "0 1 2 3"
$ whenmod 4 3 (|- note "0 <4 6>")
$ slice 4 "2 <3!1 <1 1>>"
$ "meth_bass:0"
# cut 6
# pan 0.8
|* gain "0.85 1.1"
# room 0.2
# gain 0.5
# octersubbus 61 (range 0 1 "^30")
-- TODO Make d7 the new d9 and another lead in d7
d7 $ gF3 $ gM3
$ note ("<d g f a>" + "[0,7]" - 12)
# "moogBass"
# pan 0.3
# room 0.2
d8 $ gF1 $ gM1 -- BREAK THAT SHIT
$ midiOn "^60" (slice 8 $ run 16)
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 8
$ midiOn "^36" (loopAt 1 . (# "jungle_breaks:72")) -- Sables mouvants
$ midiOn "^56" (loopAt 1 . (# "jungle_breaks:19")) -- Break sable noir
$ loopAt 2
$ "jungle_breaks:22" -- Sable blanc
# lpf 4000
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 -- Kick premier`
$ gF1 $ gMute2
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ midiOn "^42" (<| "k k k k")
$ superimpose ((|* gain "^30") .(# "tek_kick:3"))
$ "[kick:4]"
# lpf 5000
# gain 0.9
d2 $ gM1 $ gF1 -- Snare second
$ fix (# lpf 4000) "snare"
$ midiOff "^43" (mask "<t!16 f!16>")
$ "~ s ~ s*<1!3 2>"
# "[rampleM8:8,snare:45]"
# note "-2"
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 $ gMute3 $ gF2 $ chop 16 $ loopAt 4
$ midiOn "^89" (slice 4 "2*2 ")
$ "nujazz_bass125:1"
# cut 4
# octersub (slow 32 $ range 0 0.9 sine)
-- # room (slow 32 $ range 0.2 0.8 cosine)
-- # dry 1.3
# pan 0.3
# crushbus 41 (range 16 4 "^53")
# octerbus 42 (range 0 0.94 "^33")
# gain 1.2
-- # sz (slow 8 $ range 0.7 0.1 sine)
d5 $ gM3 $ gF3
$ midiOn "^58" (off 0.125 id . rev)
$ note ("[g@2 ~!4 <f ~ as5 c6>]" - 12)
# crushbus 51 (range 16 5 "^54")
# modIndex (range 0 2 "^34")
# "FMRhodes1"
# gain 1.2
-- # room 0.2
-- # legato 0.25
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 "^60" (ply "1 <2 4>")
$ 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
$ slice 8 (slow 8 $ run 8)
$ loopAt 2
$ "risers:16"
-- # end 0.8
# att 0.04
# rel 4
# room 0.8
# cut 10
d9
$ n "<~ ~ 27 ~ ~ ~ ~ <29 21>>"
# "jungle_vocals"
# cut 9
# gain 0.6
# room 0.4
d11 $ gF3 $ gM3
$ whenmod 64 32 (superimpose (
(stut 4 0.65 "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.5
live/midi/nova/dnb/golden_drum.tidal 0 → 100644
do
setcps (160/60/4)
let gMask = (midiOn "^41" (mask "t f(3,8) t f(<5 3 3 1>,8)"))
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 $ gMute2 -- Kick resolu
$ midiOn "^42" (<| "k*4")
$ midiOff "^42" (<| "k . ~ k ~ ~")
$ "[rampleA2:0]"
d2 $ gF1 $ gM1
$ midiOn "^43" (struct "~ t ~ <t <t*2 [~ t]>>")
$ midiOff "^43" (struct "~ ~ t ~")
-- $ fix (|+ note 2) "snare"
$ "[rampleA2:10]"
# lpf 2000
# rel 0.35
d3 $ gF1 $ gM1 -- Scintillement de claquements de doigts
$ whenmod 8 6 (superimpose ((# n "13") . (# room 0.4) . (|* gain 1.1)))
$ midiOn "^44" (off "<e!4 s!4>" ((|* gain 0.8) . (# hpf 5000)))
$ "~ <~!4 c!4> ~ c ~ <~!3 c ~ c!3> ~ <~!4 c!4>"
# "rampleC5:15"
# hpf 5000
# att 0.0
# rel 0.2
# dry 1
# room 0.2
d7 $ gF2 $ gM3 -- Piano magique guide eternel
$ midiOn "^91" (ply 8)
$ slice 8 (slow 4 $ run 4 + "<0!16 4!16>")
$ "suns_keys"
# n (slow 4 $ "<0 1 2 3>")
# crushbus 71 (range 16 3.3 "^55")
# lesliebus 72 (range 0 1 "^35") # lrate 0.92 # lsize 3.9
# pan 0.7
# cut 7
# gain 0.8
d5 $ gM3 $ gF3
$ midiOn "^58" (superimpose (
arp "<up!4 down!4>"
. someCyclesBy "<0.2!3 0.6 0.2!3 0.6 0.6!3 0.2 0.8!3 0.2>" (mask "t(3,8)")
. (|+ note "[17,24,12,0]"))
. (|* gain 0.7)
. (# pan 0.8)
)
$ note (
"<[fs3@2 gs3] <a3!1 ff3 a3 cs3>>"
+ (arp "up" "c'min'2")
)
# "FMRhodes1"
# modIndex (range 0 5 "^54")
# pan 0.4
# room 0.4
# dry 1.52
# sz 0.7
# gain 1.2
d6 $ gM3 $ gF2
$ midiOn "^89" (striate 2)
$ chop 8
$ "meth_bass:3"
# note ("<<a cs6> fs>"
+ "7" -- calage
- 12)
# cut 6
# gain 0.5
# room 0.3
# pan 0.35
d9 $ gM3 $ gF3
$ mask "t(<1!4 2!4 8!4 2 1 8 8 8 8 2 8 8 1 2 8 8!8>,8)"
$ swingBy "q" 4
$ superimpose ((|+| note ("[0 7 12 <0 0 7 <0 12>>]" + 12)) . (# cut 91))
$ note ("<c fs4 <a4 [a4@3 b4]> fs4>" - 12)
# "moogBass"
# cut 9
# lpf 3000
# chorus (range 0 1.8 "^20")
# room 0.4
# gain 0.5
d8 $ gF1 $ gM1 -- Drums of Love <3
$ chop 16
$ loopAt 2
$ midiOn "^92" (loopAt 0.5 . (# "breaks165")) -- BOUTON NASSIM <3
$ midiOn ("^36" - "^92") (loopAt 2 . (# "jungle_breaks:1"))
$ "jungle_breaks:6"
# gain 0.9
# cut 8
d10
$ someCyclesBy "<1>" (superimpose (
(|+ note 12)
. (0.5 ~>)
. (stut 4 1 0.25)
. (# cut 101) . (# att 0.8) . (# rel 2)
))
$ "suns_voice:2/4"
# crushbus 101 (slow 16 $ range 516 5.5 perlin)
# cut 10
fs gs a x3 fs gs c fs gs g
-- GRAVEYARD FROM STOLEN BITS OF SUNS OF GOOOOOLD
d11 $ gF3 -- Angels of deception
$ slow 2
-- $ mask "<[f f t] t!3>"
-- $ mask "<[f f t] t!3>"
$ struct "t(<3 5>,8) ~"
$ note ("[gs3 g3 fs3] ~" + 12 + "[0,<12!2 7!2>]")
-- $ note "<fs3>"
# "moogBass"
# legato 4
# modIndex (slow 16 $ range 0 5 perlin)
# room 0.4
# att 0.24
# rel 2
# gain 0.8
d12 $ gF2 $ gM3 -- Devils of delusion
$ someCyclesBy (slow 16 $ range 0 0.8 saw) (ply "1 2!6 <2 1>")
$ slow 2
$ struct "t(<3 5>,8) t(5,8)"
-- $ superimpose ((|+ note "<12!2 7!2>") . (# cut 121))
$ note ("[cs d fs] <~!4 [fs [d cs6] ~]!12>")
-- $ note "0"
# "moog:1"
# legato 0.8
# pan 0.8
# room 0.2
# crushbus 121 (slow 4 $ range 16 3.5 perlin)
# cut 12
# gain 0.9
d8 $ gF1 $ gM1
$ midiOn "^36" (loopAt 0.25 . iter "<1!8 [1 4]!4 4>" . (# "breaks165"))
$ midiOn "^56" (struct "t([<4 4 5 4> <4 5 5 8>],8,1)" . (>| n "44 45"))
$ midiOn "^60" (loopAt 0.5)
$ midiOn "^92" (ply "1 2 <1 2> <2 4>")
$ midiOn "^92" (# "breaks165") -- BOUTON NASSIM <3
$ chop 16
$ loopAt 4
$ "jungle_breaks:45"
d6
-- $ loopAt 8
$ chop "4 8"
$ note "<[fs,a,cs] [gs,c,ds] [g,b,d] [fs,a,cs]>"
# "giorgio_syn:43"
-- # cut 6
# pan 0.8
-- # crushbus 61 (range 16 4.5 "^31")
-- # hpfbus 62 (range 0 1500 "^31")
# gain 0.65
d7 $ gF3 $ gMute3 -- La guitare d'Icare
$ midiOn "^91"(ply 2)
$ midiOn "^59" (# n 1)
$ fix (|* gain 0.8) (n "1")
$ loopAt 2
$ superimpose ((# lpf 2500) . (# cut 71))
$ chop 8 $ "suns_guitar:0"
-- # n "<0!4 2!3 3 2!3 3 3!3 <2 3>>"
# n "<0 0 0 1 0 1 0 1 2 2 2 3 2 3 0 3>"
# crushbus 71 (range 16 8.5 "^55")
# lpfbus 72 (range 20000 5000 "^55")
-- # octerbus 73 (range 0 1 "^35")
# hpf 1200
# cut 7
# gain 0.9
d9 $ gF3 $ gMute3 -- VOICES OF SUNS
$ midiOn "^17" ((>| n "<2 ~>") . (|* gain 1.1))
$ whenmod 64 48 (# n 3)
$ slice 2 "<0 <0 1> <0 0 [1 0] 1> 1>/2"
$ "suns_voice:0"
# end "<0.1 0.3 1 1>"
# n "<0!8 1 [1 0] [1 0 0 1] 1 1 [0 1] [1 0 1 1] [1 1 0 1]>"
# hpfbus 91 (range 0 5500 "^19")
# crushbus 92 (range 16 4.5 "^18")
# roombus 93 (range 0.1 0.9 "^18") # sz 0.9
# cut 7
# pan (slow 32 $ sine)
d10 -- Decoration
$ fix (
(loopAt 4) . gMute . gMute2
. mask "<f!24 t!8>"
. (# gain 0.8)
. (# speed 0.5)
. (# cut 102)
) "risers" -- Riser occasionnel
$ fix (mask "<f!3 t f!4 f!3 t f!3 t t!3 f t!2 f f t f!3 t!4>"
. (# cut 101)
. (# gain 0.2)
. (# pan "<<0.2!3 [0.2|0.7]> <0.8!3 [0.8|0.3]>>")
. (# speed "<0!24 -1!8>")
) "suns_voice" -- Whisper
$ stack ["risers:19/2", "suns_voice:2"]
# room 0.2
live/midi/nova/dnb/nouveau_soleil.tidal
do
setcps (110/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
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 gM = gMask . gMute
d1 $ gF $ gMute
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 $ gMute2
$ midiOn "^42" (<| "k k k <k [<~ k?> k]>")
$ midiOff "^42" (<| "k . ~ k ~ <~!7 k>")
$ "[techno:0,808bd:2,909,kick:4]"
-- $ "[jazz,kick:4]"
# midiG' "^78" 0 1.2
d2 $ gF $ gM -- Snare FOU
# gain 0.9
d2 $ gF1 $ gM1 -- Snare FOU
$ superimpose (# lpf 5300) -- Double bass
$ midiOn "^75" (<| "[<~!3 s> s]*<4!3 8>")
$ midiOn ("^43" - "^75") (<| "~ s ~ <s s*<1!7 2> s s*2>")
$ midiOff ("^43"- "^75") (<| "~ s")
$ "[sn:25,gretsch:4]"
# note (range "-4" 4 "^51")
# lpf 5300
# midiG' "^79" 0 1.2
d3 $ gF $ gM
# note (range "-4" 4 "^51") show
# gain 0.7
d3 $ gF1 $ gM1
$ midiOn "^44" (ply "1 2 1 <2 <1 4>>")
$ midiOn "^76" (ply 2)
$ ply "1 . 1 <<2 1> [<4 [4 2]> 1]>"
$ "dr:2*8"
# midiG' "^80" 0 1.2
# gain 0.8
-- # midiG' "^80" 0 1.2
# pan (0.3 - 0.2 * perlin)
d4 $ gF2 $ gMask
$ midiOn "^89" (ply "<4!3 [4 8]>")
$ chop 16
d4 $ gF2 $ gM3
$ midiOff "^57" (midiOn "^89" (ply "<4!3 [4 8]>"))
-- $ midiOn "^57" (midiOn "^89" (slice 4 (run 8)) . chop 8)
-- $ midiOn ("^89" - "^57") (fast "2" . slice 16 ("[0 1 2 3]*<4 8>" + (slow 2 "<0 4 8 12>")))
-- $ midiOff "^57" (midiOn 1 (slice 16 (("[0 1 2 3]*<2!8 4!8>" + "<0 12 0 8>"))))
-- $ midiOff "^89" (chop 16)
$ chop 4
$ loopAt 4
$ midiOn "^57" (# "bass_gameboy:5")
$ midiOn "^57" (# "bass_gameboy:5") -- Sad truth pattern
$ "bass_gameboy"
# cut 4
# midiG' "^81" 0 1.2
d5 $ gF3 $ gMask -- La pluie d'étoiles
# gain 0.9
d5 $ gF3 $ gM3 -- La pluie d'étoiles
$ whenmod 64 32 (off "q" ((|+ note 12) . (# pan 0.8)))
$ whenmod 32 16 (off "e" ((|+ note 9) . (|+ pan 0.1)))
$ whenmod 16 8 (off "h" ((|+ note 12) . (# pan 0.8)))
......@@ -44,19 +52,26 @@ d5 $ gF3 $ gMask -- La pluie d'étoiles
$ "synth_gameboy:5"
# pan 0.2
# hpfbus 51 (range 0 8000 "^34")
# midiG' "^82" 0 0.9
d6 $ gF3 $ gMask -- La corne de l'espoir
# gain 0.9
d6 $ gF3 $ gM3 -- La corne de l'espoir
$ whenmod 8 6 (juxBy 0.8 (rev . (# cut 61)))
$ slice 8 ("<0 0 1 <[1 1] [2 <~ 2> 3 <~ 3>]>>")
$ loopAt 2
$ "synth_atari:5"
# cut 6
# gain 0.8
# midiG' "^83" 0 0.9
d8 $ gF $ gMask
d7 $ gF2 $ gM3
$ superimpose (|+ note "[0,7]")
$ note "<fs3 b4 a4 cs5 fs4 e4 d4 cs5 fs3 b4 a4 cs5 fs4 b5 a5 cs6>"
# "moogBass"
# octer 0
# octerbus 72 (range 0 1 "^35")
# roombus 71 (range 0.3 1.2 "^55") # dry 1.8 # sz 0.7
# gain 0.8
d8 $ gF1 $ gM1
$ midiOn "^20" (loopAt 2 . (# "jungle_breaks:11"))
$ midiOn "^36" (loopAt 2 . (# "jungle_breaks:38"))
$ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41)))
-- $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41)))
$ sometimesBy "^56" (iter 4)
$ midiOn "^92" (ply "<1 [2 <2 4>]>")
$ midiOn "^60" (ply 2)
......@@ -65,4 +80,4 @@ d8 $ gF $ gMask
$ "breaks165"
# cut 4
# pan 0.7
# midiG' "^84" 0 1.2
# gain 1.2
live/midi/nova/dnb/venons_ensemble.tidal
do
setcps (85/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM = gMask . gMute
let gM2 = gMask . gMute2
d1 $ gF $ gMute2 -- Kick variable
$ midiOn "^75" (fast 2)
let gM3 = gMask . gMute3
d1 $ gF1 $ gMute2 -- Kick variable
$ midiOn "^76" (fast 2)
$ midiOn "^42" (struct "t t t <t!3 t*2 t!3 t*2>") -- COME FOR THE KICK
-- $ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
$ midiOff "^42" (fast 2 . struct "t . ~ t ~ ~")
$ fix (|* gain 0.8) "kick:4"
$ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif!
$ fix (|* gain 0.9) "kick:4"
-- $ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif!
-- $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable
-- $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb
# midiG' "^78" 0 1
d2 $ gF $ gMute $ fast 2 -- Snare dnb assorti
$ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb
# gain 1.3
d2 $ gF1 $ gMute $ fast 2 -- Snare dnb assorti
$ midiOn "^42" ( -- STAY FOR THE SNARE
(<| "~ cp ~ cp*<1!3 2 1 2 1 2 1 2 2 2 1 2 1 2 2 2 1 2>")
. (# "[snare:57,909:2]")
......@@ -31,16 +33,14 @@ d2 $ gF $ gMute $ fast 2 -- Snare dnb assorti
# room 0
# note "-2"
# legato 0.5
# midiG' "^79" 0 1.2
d3 $ gF $ gMute2
d3 $ gF1 $ gMute2
$ midiOn "^44" (ply "1 2")
$ midiOn "^76" (ply "<2 [2 4]>")
$ 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>"
# pan 0.35
# midiG' "^80" 0 1
d4 $ gF2 -- COME WITH THE BASS
d4 $ gF2 $ gMute3 -- COME WITH THE BASS
$ superimpose (const $ gF2
$ whenmod 16 8 (rev . chop 4)
$ n "[19 <21!3 <20 22>>]"
......@@ -61,9 +61,9 @@ d4 $ gF2 -- COME WITH THE BASS
# room 0
# dry (slow 64 $ range 0.2 2.8 cosine)
# sz 0.035
# octer 0.4
# pan 0.2
# midiG' "^81" 0 1
d5 $ gM2 $ gF3 -- Sky's guitar
d5 $ gM3 $ gF3 -- Sky's guitar
$ midiOn "^90" (ply "2 <2 <4 8>>")
$ midiOn "^58" (>| n "<3 ~ 3 ~>")
$ n ("<0!3 [0 1] 0!3 [0 1] 0!3 [0 1] 2!4>")
......@@ -73,41 +73,37 @@ d5 $ gM2 $ gF3 -- Sky's guitar
-- # speed 1.25
# room 0.2 # sz 0.3 # dry 1.2
# crushbus 51 (range 16 5.5 "^54")
# midiG' "^82" 0 1.3
d6 $ gM2 $ gF3 -- Sky's companion
# gain 1.3
d11 $ gM3 $ gF3 -- Sky's companion
$ midiOn "^58" (mask "f")
-- $ mask "<f!8 t!24>"
$ slice 8 ("0 1*<1!3 8> 2*<1 2> 3*<1 1 4 16>" + "<0 4>")
$ "come_guitar"
# n "3"
# cut 6
# cut 11
# pan 0.9
# midiG' ("^82" * "^34") 0 0.8
d7 $ gF3 -- together yeah!
$ midiOn "^91" (>| n "~ ~ ~ 11")
$ someCyclesBy ("^35" - "^59") (>| n "<0 1 2 3 4 5 6 7>/2")
$ midiOn ("^59" - "^91") (>| n "<[~ ~ ~ <8 8 9 10>]>") -- COME <3
$ midiOff ("^59" + "^91" + "^35")-- YEAH
$ midiOn "^91" (>| n "~ ~ ~ 11") -- Shew
$ someCyclesBy ("^35" - "^91") (>| n "<0 1 2 3 4 5 6 7>/2") -- Buildup
$ midiOn ("^59" - "^91") (>| n "<[~ ~ ~ <8 8 9 10>]>") -- Reponse: COME <3
$ midiOff ("^59" + "^91" + "^35") -- Default: YEAH
(>| n "~ ~ ~ <~!3 <13 <14 17> <15 18> <16 19>>>")
$ "come_voice"
# crushbus 71 (range 16 "<5 10>" "^55")
# hpfbus 72 (range 0 3500 "^55")
# cut 7
# midiG' "^83" 0 0.8
d8 $ gM $ gF -- Angel Breaks
d8 $ gM $ gF1 -- Angel Breaks
$ midiOn "^92" (ply "<2 2 4 8>")
$ midiOn "^60" (mask "f <t t f t>")
$ chop 8
$ someCyclesBy "^20" ((loopAt 1) . (# n 7))
$ someCyclesBy "^36" (# n 70)
-- $ someCyclesBy "^20" ((loopAt 1) . (# "break:15"))
$ someCyclesBy "^36" ((loopAt 1) . (# n 30))
$ someCyclesBy "^56" (slice 8 "0 1 2 3 4 5 6 7" . (loopAt 0.5) . (# n 4))
-- $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3"))
$ loopAt 2
$ "jungle_breaks:1"
# cut 8
# pan "[<0.35!3 0.65> <0.65!3 0.35>]*4"
# midiG' "^84" 0 1
d10 $ loopAt 2 $ fast 2 $ "<~!6 risers ~>"
# cut 10
# midiG' "^13" 0 0.7
# lpf 5000
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/fusion/qui_sait.tidal 0 → 100644
do
-- resetCycles
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
d1 $ gF1 $ gM2
$ midiOn "^42" (struct "t t t <t!3 t*2 t t [~ t] t>")
$ "[techno:0,kick:4]"
d2 $ gF1 $ gM1 $ "~ h2ogmcp:1"
# room 0.2 # dry 1.1 # sz 0.1
d3 $ gF1 $ gM1
$ midiOn "^44" (fast 2)
$ "hh(<3!3 5>,8,<0!6 1 2>)"
d4 $ gF2 $ gM3 -- Basse Fantome
$ superimpose ((|- note 24) . (|* gain 0.8) . (# "bassWarsaw") . (# cut 41) . (# crush 16))
$ note ("<[a3@2 e4@3] [b3@2 d4@3] [c4@2 e4@3] [<b3 f4>@7 g3]>" + "12")
# "wobble"
# room 0.4 # sz 0.8
# pan 0.3
# gain 1.9
# crushbus 41 (range 16 4 "^53")
# octersubbus 42 (range 0 2 "^33")
d5 $ gF3 $ gM3 -- LASER SALVATEUR
$ midiOn "^90" (slice 4 (run "<4!3 8>. <4 8> <4 8 8 16>"))
$ chop 4
$ "synth_atari/4"
# n "<23!0 <24 25 24 23>!16>"
# n 23
# cut 4
# room 0.5
# dry 1.5
# sz 0.6
# pan 0.8
# octersubbus 51 (range 0 2 "^34")
# octersubsubbus 52 (range 0 1.2 "^34")
# crushbus 53 (range 16 2 "^54")
# att 0.2 # rel 3.2
d8 $ gF1 $ gM1
$ midiOn "^56" (loopAt 4)
-- $ midiOn "^92" (ply "2 <2 4 4 [16 . 8 4]>")
$ midiOn "^92" (ply "<2 4> <4 8>")
$ chop 8
$ loopAt 2
$ "jungle_breaks:45"
# gain 0.8
d9
$ chop 8
$ "90s_synatm:0/4"
# room (slow 16 $ range 0.2 0.8 sine) # sz 0.5
# crush (segment 8 $ range 14 5.2 (slow 8 perlin))
# att 2
# rel 10
# cut 9
d10
$ gF3 $ gM3
$ someCyclesBy "<0!32 1!32>" (>| note ("<c5 b4 a4 e4>" - "g"))
$ someCyclesBy "<1!32 0!32>" (>| note ("<c4(<1!8 <3!3 [3 <5 8>]>!24>,8) <d4!4 f4!4> e4 <c4 f4 c4 a4>>" - "g"))
$ "90s_synatm:5"
# cut 10
# room 0.4
live/midi/nova/grunge/le_bruit_des_bots.tidal 0 → 100644
once $ note ("c e g" + "24" - 6) # "jungbass:2" # cut 1
do
setcps (82/60/4)
let gMask = (midiOn "^41" (mask "t f(3,8) t f(<5 3 3 1>,8)"))
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 $ "jazz*4"
d2 $ gF1 $ gM1 $ "~ <sn cp> ~ <sn cp*<0 1 1 2>>"
d3 $ "hh*[8 16]"
d4 $ gF2 $ gM3
$ midiOn "^89" (ply 4)
$ midiOn "^57" (superimpose (
struct "t(3,8) t(<1 3 5 <3 [5 8]>>,8)"
. arp "up" . (|+| note "c'minor'3")))
$ ("q" <~)
$ note (slow 2 $ "<bf5 d6> b5@3 d6 <fs5 g5 fs5 bf5>@3")
# "bassWarsaw" |- note 36
-- # "jungbass:2" |- note 6 -- TODO sound design
# cut 4
# pan 0.8
# squizbus 41 (range 0 8 "^53")
# octersubbus 42 (range 0 1 "^33")
# legato 2 # lpf 4000
# gain 1.4
d5 $ gF3 $ gM3
$ slice 4 ("<0!0 0(<3 [3 5]>,8)!8>")
$ note "<b fs b <g fs5>>"
-- |+ note "0 <4 0 3 2>"
# "90s_synatm:3"
# cut 5
d8 $ gF1 $ gM1 -- UNAVOIDABLE 90s BReak
$ loopAt 0.5
$ slice 4 "0 <1 <~!4 1!4>> 2*<1!4 2!4 2 2 4 4> <1!3 3>*<1!4 1 1 2 2>"
-- $ chop 8
$ "breaks165"
d9 $ gF3 -- Winds of change
$ note "<b fs b g>"
# "90s_synatm:0"
# room 0.2 # sz 0.8 # dry 0.5
# lpf 2000
# cut 9
live/midi/nova/lofi/lendemain_divin.tidal
once $ "bassWarsaw" # gain 2
-- Lendemain Divin
do
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
......@@ -8,23 +6,28 @@ let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
setcps (95/60/4)
d1 $ gMute
$ fix (|* gain 0.9) "kick:5"
d1 $ gMute2 $ gF1
$ fix (|* gain 0.9) "kick:6"
$ midiOn "^42" (<| "k <~!8 k!56> . <~!4 k!28> k*<1!3 2>")
$ midiOff "^42" (<| "k . ~ ~ ~ <~ k ~ [~ k]>")
$ "[jazz,808bd:3]"
# midiG' "^78" 0 1.5
d2 $ gMute2 $ gF1
-- $ "[techno:0,808bd:2,909,kick:6]"
$ "[jazz,kick:4]"
# lpf 6000
# gain 1.5
d2 $ gMute $ gF1
$ midiOn "^43" (fast 2)
$ midiOn "^75" (# "cp")
$ "~ s*<1!3 2>"
# "[snare:32,snare:40]"
# lpf 2000
# midiG' "^79" 0 1.4
d3 $ gF1 $ gMute2
$ "~ s*<1!3 <2 4>>"
# "[snare:32]"
# note "-4"
-- # lpf 2000
# gain 1
d3 $ gF1 $ gMute
$ midiOn "^76" (ply 2)
$ midiOn "^44" (struct "t*[16!3 <8 [8 <16 32>]>]")
-- $ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]")
......@@ -36,9 +39,12 @@ d3 $ gF1 $ gMute2
# att (slow 16 $ range 0.001 0.04 cosine)
# rel 0.4
# room 0.2 # dry 0.9
# midiG' "^80" 0 1.3
# gain 1.05
d4 $ gF2 -- Basse complainte
$ midiOn "^89" ((ply "8 <16 [16 8]>") . (# room "0 0.4") . (# sz "1 1.2"))
$ midiOn "^89" ((ply "8 <16 [16 8]>")
-- . (# room "0 0.4")
-- . (# sz "1 1.2")
. (# cut 4))
-- $ note "[c3,ef3,g3,as3,d4,f4]"
-- Bassline habituelle
$ midiOff "^57" (
......@@ -51,67 +57,22 @@ d4 $ gF2 -- Basse complainte
# crushbus 41 (range 16 2.5 "^53")
# room 0.2
# cut "41 42 43 44"
# midiG' "^81" 0 1.42
d6 $ gF3
# gain 1.42
d7 $ gMute3 $ gF3
$ n "<0 0 <6 5> 0 1 1 2 7>"
# "come_guitar" # cut 6
# crushbus 61 (range 16 2.5 "^54")
# midiG' "^82" 0 1
d8 $ gM2 $ gF3
# crushbus 61 (range 16 2.5 "^55")
# lpfbus 62 (range 10000 7500 "^55")
# room 0.3
d8 $ gM $ gF3
$ midiOn "^92" (ply "<4 4 8 16>")
$ midiOn "^20" (loopAt 4 . (# n 11)) -- Submarine break
$ midiOn "^36" (# "jungle_breaks:45") -- House Orleanaise
$ midiOn "^56" (mask "t [t t <t f> <t!3 f>]" . loopAt 1 . (# n 16) . (# lpf 2500)) -- Jumper's break
$ slice 8 "0 1 2 3*<1 2>"
$ loopAt 2
-- $ midiOn "^36" (# n 1)
$ "jungle_breaks:13"
# midiG' "^84" 0 1.2
# cut 8
d7 $ gF3
$ ("h" ~>)
$ slice 4 (ply 4 $ slow 4 $ "<0 1 2 3>")
$ "shiloh:14"
# cut 7
# gain 0.7
# midiG' "^83" 0 1.2
d7
$ slice 4 ("<<0 1 2 3>/4>")
$ fast 8
$ "shiloh:14/8"
# cut 7
# gain 0.8
# room "[0.5!3 <0.5 0.9>]" # dry 1.2 # sz 0.5
once $ "dr"
d1 $ gF $ gMute2 -- Kick variable
$ midiOn "^75" (fast 2)
$ midiOn "^42" (struct "t t t <t!3 t*2 t!3 t*2>") -- COME FOR THE KICK
-- $ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
$ midiOff "^42" (fast 2 . struct "t . ~ t ~ ~")
$ fix (|* gain 0.8) "kick:4"
$ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif!
-- $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable
-- $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb
# midiG' "^78" 0 1
d2 $ gF $ gMute $ fast 2 -- Snare dnb assorti
$ midiOn "^42" ( -- STAY FOR THE SNARE
(<| "~ cp ~ cp*<1!3 2 1 2 1 2 1 2 2 2 1 2 1 2 2 2 1 2>")
. (# "[snare:57,909:2]")
)
$ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
$ midiOff ("^43"+"^42") (<| "~ <~!4 c ~!3> ~ c*<1!7 2>")
$ fix (|* gain 0.8) "snare"
$ "[snare:40,bssnare:3]"
# pan 0.6
# room 0
# note "-2"
# legato 0.5
# gain 1.2
# cut 8
live/midi/nova/lofi/pour_une_hypothese.tidal 0 → 100644
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"))
let prog = "<c g f c>"
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>> ~")
$ fix ((|* gain 0.8) . (# room 0)) "cp"
$ "[cp]" # room 0.4 # sz 0.5 # dry 1.2
# gain 0.7
-- # 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.48 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
$ midiOn "^57" (superimpose ( -- Arp up!
struct "t*<4 8>" .
(|+| note (arp "down" "[0,<5 7>,9, 12]")) . (# cut 41))
)
$ midiOn "^89" (ply "2 <4 8>")
-- $ chop 8
$ loopAt 4
$ note (prog - 36 + "0(3,8) 0(<3 5>,8,<0!6 2!2>)")
# "bassWarsaw"
# cut 4
# legato 4
# pan 0.35
# room 0.3
# crushbus 41 (range 12 4.5 "^53")
d5 $ gM3 $ gF3
$ someCyclesBy (slow 8 $ range 0.1 1 saw) (degradeBy "0 1!6 0.5")
$ swingBy ("<1!3 <2 1>>"/3) 4
$ note (prog - 12 + arp "pinkyup" "c'min'4")
# "FMRhodes2"
# cut 4
# legato 4
# pan 0.35
# room 0.3
# modIndex (range 0 50 "^54")
d7 $ gF3 -- Anges du Minitel
$ midiOn "^91" (chop 8)
$ swingBy ("<1!3 2>"/3) 4
$ stut (slow 16 "<0 1 2 3>") 0.75 "e"
$ note ((slow 4 prog) + arp "up" "<c'min'3!3 c>@3 ~")
# pan 0.2
# room 0.4
# "moogBass"
# gain 0.8
d10 $ gF3 $ gM3 -- Anges du Minitel
$ note ((slow 4 prog) + arp "up" "c'min'3(<3 3 <5 3> 5>,8) ~")
# "moogBass"
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
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
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/lofi/premiere_grillade.tidal
......@@ -12,7 +12,7 @@ d1 $ gF $ gMute
$ midiOn "^42" (struct "t t t <t!3 <t*2 t*[4 2]>>")
$ midiOff "^42" (struct "t*[<1!4 [8 <8 4>]!4> . 2] . ~ ~ ~ <~!3 t>")
$ "[808bd:13,jazz]" -- 11
# midiG' "^78" 0 1.42
-- # midiG' "^78" 0 1.42
-- # room 0.2 # sz 0.2
-- # dry 0.99
d2 $ gF $ gM -- Snare clockwork
......@@ -59,7 +59,7 @@ d4 $ gF3 -- LoFi Girl at the piano!
# pan 0.8
# midiG' "^82" 0 1.5
d5 $ gF2 -- Bassline langoureuse
$ midiOn "^89" (chop 8)
$ midiOn "^89" (mask "t(4,8) t(<4 8>,8)" . chop 8)
$ note (
-- "<[c,e,g,b] [c,e,g,bf] [c,ef,g,bf] [c,e,g,b]>"
"<[c,c(3,8)] [g,[~ f6],g*4] [bf,bf(3,8)] c4>" + "0"
......
live/midi/nova/lofi/reboot.tidal
......@@ -17,14 +17,13 @@ d1 $ g -- Kick
$ midiOn "^41" (<| "k*4 . [k k] <k k*2 k [~ k]>")
$ midiOff "^41" (<| "k . k(<3 <5!3 [5 8]>>,8,<0!5 3 0 3>)")
$ "[reverbkick,jazz]"
# midiG' "^78" 0 1.1
d2 $ g -- Contretemps snare
$ whenBrkLPF
$ "~ s ~ <~!4 s!12>"
# "snare" # n "[40,52]"
# note (-4)
# midiG' "^79" 0 1.1
d3 $ g -- Drumroll fantôme
# gain 0.8
d3 $ g -- Drumroll fantome
$ whenBrk (slow "<2 2 4 4 8 8 16 16>")
$ midiOn "^44" (fast "4 2")
$ "d*<4 4 8 [4 . <4 16> 16]>" # "[drum:2,cpu:2]"
......@@ -35,17 +34,17 @@ d4 $ g -- A slice of bass
$ slice 4 "<0 0 [0 1] 3 0*2 [0 1] [3 2] [3*2 3*<2 4>]>"
-- $ slice 4 "<0!8 1!8 2!8 3!8>*<1!4 2 1 2 4>"
$ "fbass:8"
# midiG' "^81" 0 1.4
# gain 0.7
# crushbus 41 (range 8 2.9 "^53")
# room 0.2
# pan 0.2
# cut 4
d5 $ g -- Climbing guitar
$ superimpose (
$ whenmod 64 32 (superimpose (
slice 4 "0*<1 2 1 <2 4>>" .
(# cut 51) . (|+ note 12)
. (|* gain (range 0.5 1.5 "^34"))
)
))
$ slice 4 (
(whenmod 8 4 (fast 4)) $
"<0 1 2 3>"
......@@ -53,7 +52,7 @@ d5 $ g -- Climbing guitar
$ "fguitar:11"
# cut 5
# pan 0.4
# midiG' "^82" 0 1
# gain 0.5
# crushbus 51 (range 8 1.9 "^54")
d6 $ g -- Glitchy piano!
$ whenmod 8 4 (someCyclesBy "0 1 . <0 0.25 0.5 1>" rev)
......@@ -62,15 +61,20 @@ d6 $ g -- Glitchy piano!
$ "fpiano:11"
# cut 6
# pan 0.4
# midiG' "^83" 0 1
-- # midiG' "^83" 0 1
d7 $ g -- Sirene
$ note (
slow 8
$ arpeggiate
$ "d3'min'4" + "<0!8 12!8>"
$ "d2'min'4" + "<0!8 12!8>"
)
# "supersiren"
# room 0.3 # sz 0.6
# midiG' "^84" 0 0.7
# gain 0.5
# crushbus 71 (range 8 0.9 "^56")
# cut 7
d8 $ loopAt 2
$ "break:12"
# gain 0.8
"11" -- Hello :)ô --
live/midi/nova/lounge/fabuleux.tidal 0 → 100644
resetCycles
do
setcps (93/60/4)
let gMask = (midiOn "^41" (mask "t f(3,8) t f(<5 3 3 1>,8)"))
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
-- Bm A G D
-- vi V IV I
let prog = "<[d,fs,b4] [cs,e,a4] [d,g,b4] <[d,fs,a4] [d,a4,fs5]>>"
let progMin = "<[d,b4] [cs,a4] [d,b4] <[d,a4] [d,fs5]>>"
d1 $ gF1 $ gMute2 -- Kick resolu
$ midiOn "^42" (<| "k k k k")
$ midiOff "^42" (<| "k . ~!3 k*<1!3 4>")
$ "[jazz,rampleA0:1]"
# lpf 2000
# att 0.02
# rel 2
# gain 1.4
d2 $ gF1 $ gM1
$ "<[~ s]!16 [~ s*<1!7 4> ~ s*<1!3 <2 4>>]!16>"
# "snare:59"
# hpf 5000
# rel 0.35
d3 $ gF1 $ gM1
$ midiOn "^76" (off "e" id)
$ "hh(3,8) hh(<3!3 <[5] [3 5]>>,8)" # "hh:8" -- Christmas bath
# gain 1.4
d4 $ gF2 $ gM3
$ midiOn "^89" (struct "t([<8 16> <16 [16 32]>],8)")
$ note ("[0,7(<3 5 [5 3] <3 [3 5]>>,8,1)]" + "<d b4 g4 fs4>" - 24)
# "bassWarsaw"
# gain 0.8
# crushbus 41 (range 16 2.5 "^53")
# octersubbus 42 (range 0 2.5 "^33")
# room 0.3
d5 $ gF3 $ gM3
$ midiOn "^90" ( -- Sparkling echoes
(whenmod 4 3 (off "s" ((|* gain 0.9) . (|+ note 12))))
. (off "e" ((|+ note 12))))
$ midiOn "^58" (|+| note "0 12")
$ note ("<0(3,8)!3 0(3,8)*2>" + prog)
# "FMRhodes2"
# modIndex (range 0 16 "^54")
d7 $ gF3
$ midiOff "^59" (>| n "~ <~ <1 2>> ~ ~") -- Intro Fabuleux
$ midiOn "^91" (ply 8)
$ someCyclesBy "<0!32 1!32>" (>| n "<7 <8 [8 <12 13>]> 11 <12 13>>") -- Promesse/engagement/pari
$ someCyclesBy "<0!16 1!16 32!0>" ((>| n "<7*<1 <2 [4 2]>> <~ 8> <~!2 9(<1 <2 3>>,8)!2> <~!3 10>>")) -- Promesse/emouvant/douce
$ someCyclesBy "<0!8 1!8 0!16 32!0>" ((>| n "<~ 3 ~ ~> <3!3 <4 5>>")) --
$ someCyclesBy "<1!8 0!8 1!8 0!8 32!0>" (>| n "<0 1 0 <4 6>>") -- Fab/Bonheur/Genial
$ "aoc_fr"
# cut 7
# octerbus 71 (range 0 0.9 "^55")
# gain 1.2
# room 0.4 # sz 0.8 # dry 1
d8 $ gF1 $ gM1
$ chop 8
$ midiOn "^60" (ply "<4 <2 [2 8]>>")
$ midiOn "^92" (ply "2!3 <2 4>")
$ midiOn "^36" ((>| "jungle_breaks:24"))
$ midiOn "^56" ((>| "jungle_breaks:25"))
$ loopAt 2
$ "break:3"
# cut 8
# gain 0.8
d9 $ gF2 $ gM3-- Choeur des fans d'AOC
$ note (progMin |+| "0 <~!4 0 12 <0 -5> 12>" - "<0!16 12!16>")
# "moogBass"
# legato 2
# gain 0.8
d10 $ gF3 $ gMute3 -- Sous-marin risque de noyade
$ "feelfx:0"
# note ("<d5 <cs5 a4> <d5!3 g5> fs5>"
+ 1 -- Calage
)
# cut 12
# hpf 500
live/midi/nova/lounge/invoque_ete.tidal
......@@ -5,70 +5,51 @@ resetCycles
-- Il ne viendra pas tout seul ;)
do
setcps (115/60/4)
let gF = 1.5
let mBreak = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
let mMute = (midiOn "^73" (mask "f*16"))
let m = mBreak
let f1 = (# djfbus 1 (range 0.1 0.9 "^49"))
let f2 = (# djfbus 2 (range 0.1 0.9 "^50"))
let f3 = (# djfbus 3 (range 0.1 0.9 "^29"))
d1 $ f1 $ m $ mMute
$ midiOn "^41" (slow 4)
let gMask = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> 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
d1 $ gM1 $ gF1
$ midiOn "^42" (<| "k k k <k k k*2 [~ k]>")
$ midiOff "^42" (<| "k*2")
$ "[jazz,kick:5]"
# midiG' "^78" 0 1.2
d2 $ f1 $ m $ mMute -- Clave de l'été
d2 $ gM1 $ gF1 -- Clave de l'été
$ midiOn "^43" (fast 2)
$ midiOn ("^75"-"^43") (fast 2)
$ (|* gain ("0.75 1 1 1 0.75 1 1 1" * 1.7))
$ (|* gain ("0.75 1 1 1 0.75 1 1 1"))
$ "d ~ ~ d d ~ d <~!3 d>"
-- $ "d"
# "[snare:22,sn:4]"
# midiG' "^79" 0 0.71
# speed (range 0 2 "^51")
d8 $ f1 $ m -- Mecano Course
-- $ fast "<<4 2> 4!7 2!4 2 2 4 8>"
$ sometimesBy "0 ^32!7" (ply 4)
$ someCyclesBy "^52" (iter 4)
$ midiOn "^76" (slice 8 (run 8) . chop 16 . (|* speed 2) . (>| "breaks165"))
$ midiOn "^44" (slice 16 ("0*<1 2> 1 2 3*<2 1>"))
-- $ midiOn "^76" (slice 8 "0 <1 ~> 7 3*<1 2 4 4>")
-- $ slice 8 "0 1 <2!3 0> <3!3 1 4 5 6 7>" "0 1 <2!3 0> <3!3 1>"
-- $ chop 8
$ loopAt 2
$ "breaks125:3"
# midiG' "^80" 0 1.3
-- # speed (range 0 2 "^16")
# cut 8
-- d8 $ f1
-- $ midiOn "^76" --BOUTON NASSIM
-- (
-- -- whenmod 8 7 (ply "1 . 2") .
-- -- slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") .
-- (loopAt 1) .
-- (# "breaks165") . (# cut 2)
-- . (|* gain 1.1)
-- )
-- $ midiOn ("^44") (ply 2)
-- $ m
-- $ "h(3,8) . h(5,8)"
-- # "hh" -- TODO CHOOSE OR REMOVE
-- # midiG' "^80" 0 1.4
d4 $ f2 $ m -- Bassline variable double piste
# speed (range 0 2 "^31")
# gain 0.8
d3 $ gF1 $ gM1 -- L'inoubliable drumroll
$ fix (
mask "<f!24 t!3 f t t [t f] t>"
. (|* gain (slow 16 $ range 0.6 1.2 sine))
. someCyclesBy "0 0.2 0.4 0.4 0.2 0" (|* gain 0.8)
. struct "t(3,8) t(3,8)"
)
"electro1"
$ "dr*[[8 8 <8 <16 [16 32]>> 8] <8!3 [16 <16 32 [16 8] [16 32]>]>]"
# "[drum:2,electro1:2]"
# gain 0.8
d4 $ gF2 $ gM3 -- Bassline variable double piste
$ loopAt 2
$ slice 8 (run "<4!4 8 8 [4 8 4] [8 4 8]>")
$ midiOn ("^57" + "^89") (# n 14)
$ "fbass:13"
# pan 0.2
-- # room 0.2
# crushbus 51 (range 16 4.5 "^53")
# midiG' "^81" 0 1.4
# roombus 52 (range 0 0.8 "^33") # sz 0.5
# gain 1
# cut 4
d6 $ f3 $ m -- Douce guitare juxée
d5 $ gF3 $ gM3 -- Douce guitare juxée
$ chop 16
$ midiOn "^18" (juxBy 0.85 ((# cut 31) . rev . (|* gain 0.93)))
$ whenmod 16 12 (rev)
-- $ whenmod 32 16 (juxBy 0.85 ((# cut 31) . rev . (|* gain 0.93)))
-- $ whenmod 16 12 (rev)
$ whenmod 8 4 (chop 4)
$ loopAt 4
$ midiOn "^58" (# n 13)
......@@ -76,20 +57,29 @@ d6 $ f3 $ m -- Douce guitare juxée
# release (range 2 0.15 "^34")
# crushbus 61 (range 16 1.4 "^54")
# pan 0.8
# midiG' "^82" 0 1.2
# room 0.2 # dry 1
# cut 3
d7 $ f3 $ m
# gain 0.9
d7 $ gF3 $ gMute3
$ loopAt 4
$ mask "t(<4 8 12 16>,16)"
$ slice 16 (run 16)
$ midiOn "^59" (slice 16 (run "<16!8 32!4 [32 <8 [8 32]>]!4>"))
$ midiOff "^59" (slice 16 (run 16))
$ "fpiano:13"
# pan 0.45
# midiG' "^83" 0 1.4
# cut 7
d12 $ f3 $ m -- Angels of moogland
$ midiOn "^92" ((|* gain 0.85) .(|+ note 24))
$ midiOn "^60" (
d8 $ gF1 $ gM1 -- Mecano Course Break
-- $ fast "<<4 2> 4!7 2!4 2 2 4 8>"
$ midiOn "^36" (|> "jungle_breaks:42")
$ midiOn "^60" (slice 16 ("0*<1 2> 1 2 3*<2 1>"))
$ midiOn "^92" (slice 8 (run 16) . chop 16 . (|* speed 2) . (>| "breaks165"))
$ loopAt 2
$ "breaks125:3"
# gain 0.8
# cut 8
d9 $ gF3 $ gMute3 -- Angels of moogland
$ midiOn "^16" ((|* gain 0.85) .(|+ note 24))
$ midiOn "^17" (
superimpose (
struct "t(5,8)"
. arp "[down,up]"
......@@ -101,10 +91,11 @@ d12 $ f3 $ m -- Angels of moogland
# room 0.24
# "moogBass"
# pan 0.4
# crushbus 81 (range 16 1.4 "^56") -- Even an angel can fall in love
# midiG' "^84" 0 1.3
-- d12 $ "808mc(5,8)" # note "g3"
-- # gain 1.2
# crushbus 91 (range 16 1.4 "^19") -- Even an angel can fall in love
# roombus 92 (range 0 1.4 "^18") -- Love can expand faraway
-- # octersubbus 93 (range 0 2 "^17") -- Love can expand faraway
# fshift "<0!4 1!4>"
# fshiftnote "-5"
-- Sandbox
......
live/midi/nova/lounge/suns_of_gold.tidal 0 → 100644
once $ "FMRhodes1"
fs ds
do
setcps (94/60/4)
let gMask = (midiOn "^41" (mask "t f(3,8) t f(<5 3 3 1>,8)"))
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 $ gMute2 -- Kick resolu
$ midiOn "^42" (<| "k*4")
$ midiOff "^42" (<| "<k [k ~ ~ <k [k k k ~]>]>")
$ "[clubkick,jazz]"
d2 $ gF1 $ gM1
$ midiOn "^43" (struct "~ t ~ t")
$ midiOff "^43" (struct "~ ~ t ~")
$ fix (|+ note 2) "snare"
$ "[dr55,snare:24]"
# rel 0.35
d3 $ gF1 $ gM1 -- Scintillement de claquements de doigts
$ midiOn "^44" (off "<e!4 s!4>" ((|* gain 0.8) . (# hpf 5000)))
$ "~ <~!4 c!4> ~ c ~ <~!3 c ~ c!3> ~ <~!4 c!4>"
# "rampleC5:14"
# hpf 5000
# att 0.0
# rel 0.2
# room 0
d4 $ gF2 $ gM3 -- Piano magique guide eternel TODO SPLIT BASS and piano d5
$ midiOn "^57" (const $ gF2 $ gM3 $ slow 2-- ARTIFICIAL BASSLINE <3
$ midiOn "^89" (ply "2 4")
$ note ("[b,fs6]@1.5 [a,e6]@1.5 [[<fs!3 fs6>, cs6](3,8) [<fs!3 fs6>, cs6](<1 3 3 5>,8)]@3"
- 24)
# crushbus 41 (range 16 3.5 "^53")
# room 0.2
# "bassWarsaw"
# gain 0.7
)
$ midiOff "^57" (# cut 4)
$ midiOn "^89" ((ply "2 <4 1 2 4> <2 4 4 2> <2 2 4 8>") . (# room 0))
$ loopAt 8
$ chop 16
$ "suns_keys"
# n (slow 4 $ "<0 1 2 3>")
# crushbus 41 (range 16 2.5 "^53")
# lesliebus 42 (range 0 1 "^33") # lrate 0.92 # lsize 1.9
-- # lsizebus 43 (range 0.8 1.8 "^33")
# pan 0.3
# gain 1.0
d11 $ gF3 -- Angels of deception
$ slow 2
-- $ mask "<[f f t] t!3>"
-- $ mask "<[f f t] t!3>"
$ struct "t(<3 5>,8) ~"
$ note ("[gs3 g3 fs3] ~" + 12 + "[0,<12!2 7!2>]")
-- $ note "<fs3>"
# "moogBass"
# legato 4
# modIndex (slow 16 $ range 0 5 perlin)
# room 0.4
# att 0.24
# rel 2
# gain 0.8
d12 $ gF2 $ gM3 -- Devils of delusion
$ someCyclesBy (slow 16 $ range 0 0.8 saw) (ply "1 2!6 <2 1>")
$ slow 2
$ struct "t(<3 5>,8) t(5,8)"
-- $ superimpose ((|+ note "<12!2 7!2>") . (# cut 121))
$ note ("[cs d fs] <~!4 [fs [d cs6] ~]!12>")
-- $ note "0"
# "moog:1"
# legato 0.8
# pan 0.8
# room 0.2
# crushbus 121 (slow 4 $ range 16 3.5 perlin)
# cut 12
# gain 0.9
d8 $ gF1 $ gM1
$ midiOn "^36" (loopAt 0.25 . iter "<1!8 [1 4]!4 4>" . (# "breaks165"))
$ midiOn "^56" (struct "t([<4 4 5 4> <4 5 5 8>],8,1)" . (>| n "44 45"))
$ midiOn "^60" (loopAt 0.5)
$ midiOn "^92" (ply "1 2 <1 2> <2 4>")
$ chop 16
$ loopAt 4
$ "jungle_breaks:45"
d6
-- $ loopAt 8
$ chop "4 8"
$ note "<[fs,a,cs] [gs,c,ds] [g,b,d] [fs,a,cs]>"
# "giorgio_syn:43"
-- # cut 6
# pan 0.8
-- # crushbus 61 (range 16 4.5 "^31")
-- # hpfbus 62 (range 0 1500 "^31")
# gain 0.65
d7 $ gF3 $ gMute3 -- La guitare d'Icare
$ midiOn "^91"(ply 2)
$ midiOn "^59" (# n 1)
$ fix (|* gain 0.8) (n "1")
$ loopAt 2
$ superimpose ((# lpf 2500) . (# cut 71))
$ chop 8 $ "suns_guitar:0"
-- # n "<0!4 2!3 3 2!3 3 3!3 <2 3>>"
# n "<0 0 0 1 0 1 0 1 2 2 2 3 2 3 0 3>"
# crushbus 71 (range 16 8.5 "^55")
# lpfbus 72 (range 20000 5000 "^55")
-- # octerbus 73 (range 0 1 "^35")
# hpf 1200
# cut 7
# gain 0.9
d9 $ gF3 $ gMute3 -- VOICES OF SUNS
$ midiOn "^17" ((>| n "<2 ~>") . (|* gain 1.1))
$ whenmod 64 48 (# n 3)
$ slice 2 "<0 <0 1> <0 0 [1 0] 1> 1>/2"
$ "suns_voice:0"
# end "<0.1 0.3 1 1>"
# n "<0!8 1 [1 0] [1 0 0 1] 1 1 [0 1] [1 0 1 1] [1 1 0 1]>"
# hpfbus 91 (range 0 5500 "^19")
# crushbus 92 (range 16 4.5 "^18")
# roombus 93 (range 0.1 0.9 "^18") # sz 0.9
# cut 7
# pan (slow 32 $ sine)
d10 -- Decoration
$ fix (
(loopAt 4) . gMute . gMute2
. mask "<f!24 t!8>"
. (# gain 0.8)
. (# speed 0.5)
. (# cut 102)
) "risers" -- Riser occasionnel
$ fix (mask "<f!3 t f!4 f!3 t f!3 t t!3 f t!2 f f t f!3 t!4>"
. (# cut 101)
. (# gain 0.2)
. (# pan "<<0.2!3 [0.2|0.7]> <0.8!3 [0.8|0.3]>>")
. (# speed "<0!24 -1!8>")
) "suns_voice" -- Whisper
$ stack ["risers:19/2", "suns_voice:2"]
# room 0.2
live/midi/nova/nujazz/cafe_bouillant.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*<1!3 <1 <2 4>>>")
$ 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
$ midiOn "^89" (off "e" (|+ note 12))
$ note ("e3 <b2!3 <ef3 g3>>" |+| "[0 ~ ~ 0 ~ ~ 0 ~] [0 ~ ~ 0 ~ <~ 0> 0 <~!3 0>]")
# crushbus 41 (range 16 3.4 "^53")
# roombus 42 (range 0 0.4 "^33")
# "bassWarsaw"
d5 $ gF3 $ gM3 -- Piano guide premier
$ midiOn "^58" (slice 4 "<2 ~> <1 <2 [2 1]>>" . (# n 60))
$ midiOn "^90" (slice 4 "2(3,8,<0!3 1>) 1(<0 1 3 [3 5]>,8)" . (# n 60))
$ "nujazz_keys120"
# n "<61!24 60!8>"
# pan 0.8
# roombus 51 (range 0.1 0.94 "^54")
# lpfbus 52 (range 10000 400 "^54")
# cut 5
# gain 0.8
d11 $ gF2 $ gM3 -- Plucked doubts
$ 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))
d10 $ gF3 $ gMute3
$ 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)
$ chop 8
$ midiOn "^55" (loopAt 1 . (|> "jungle_breaks:19"))
$ midiOn "^59" (slice 8 (run "8 <8!3 16>"))
$ loopAt 2
$ "jungle_breaks:22"
# pan "0.8 0.2"
d8 $ gF1 $ gM1 -- Le Beat, Nu
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 16
$ midiOn "^60" (mask "f(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/cafe_glace.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 ~ ~")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57"
$ "[house:0,kick:5]" -- TODO: Meilleur kick?
-- # cut 1
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[snare:40,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([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
# "[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
$ midiOn "^58" ((# freeze 0.2))
$ midiOn "^90" (chop "4 <2 4 4 8>")
$ chop 8
$ loopAt 4
$ "nujazz_keys120"
# n (slow 4 "<5 6 7 8>")
# gain 1.4
# cut 5
# crushbus 51 (range 16 6.4 "^54")
# octerbus 52 (range 0 0.7 "^34")
d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?!
-- $ striate 16
-- $ chop 16
$ loopAt 0.25
$ slice 4 "0 <0!3 1> <0!3 2> 3"
$ "meth_bass" # n "<10!3 [<10 11> 11] 9!24>"
# cut 6
# crush 8
# lpf (slow 32 $ range 4000 400 sine)
# gain 0.86
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.85
# 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_tiede.tidal 0 → 100644
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*<1!3 2>")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
-- $ fix ((|* gain 0.8) . (# room 0)) "cp"
$ "[h2ogmcp]"
# att 0
# rel 0.0385
# gain 1.4
-- # lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2)
-- $ midiOn "^76" ((ply 2) . (# pan "0.2 0.8 0.2 0.8"))
$ "drum:2*[<6!3 12> <6 [8 <12 24>]>]"
# "h2ogmsn:12"
# cut 3
# legato (range 0.48 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
$ midiOn "^57" (slice 4 "<0 1 2 3>*4")
$ midiOn "^89" (ply "2 <4 8>")
$ 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
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 1.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
d8 $ gM1 $ gF1
-- Transforms over samples
$ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
$ 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/infusion_basse.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
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[jazz,house]"
d2 $ gF1 $ gM1 -- Surprise fourth fast snare
$ 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
$ whenmod 32 16 (# legato "<h!4 q!4 e!6 s!2>")
$ midiOn "^89" (off "e" (|+ note 12))
$ note "<[e3@3 b2@2] [a3@3 e3@2] [f3@3 <c3 c4>@2] <[d3@3 b2@2] [b2@3 f3@2]>>"
# "bassWarsaw"
# crushbus 41 (range 16 2 "^53")
# octerbus 42 (range 0 1.92 "^33")
# pan 0.4
# room 0.4 # sz 0.4
-- e b...a e4! f3 c4.. d3 b3
d5 $ gMute3 $ gF3
$ midiOn "^58" (# n "12")
$ midiOn "^90" (superimpose ((# cut 51) . (|* gain 0.8) . ply 8 . chop 8))
$ n "<10!3 11 10!3 11 10!3 11 10!3 11>"
# "nujazz_guitar120"
# cut 5
# pan 0.56
# room 0.9 # sz 0.3
# dry (range 0.1 1.9 "^34")
# crushbus 51 (range 16 2 "^54")
d8 $ gF1 $ gM1
-- $ midiOn "^60" (mask "t(8,16)")
$ chop 16
$ midiOn "^92" (ply "<2!3 [2 4]>")
$ midiOn "^36" (loopAt 0.5 . (# n "50"))
$ midiOn "^56" (loopAt 2 . (# n "<0!3 1 0 0 1 1>"))
$ loopAt 2 $ "jungle_breaks:60"
# gain 0.8
# pan 0.7
d10 $ gM3 $ gF3
$ mask "[t!3 f!2]"
$ superimpose (|+ note 12)
$ arp "<up!3 down>"
$ note (
"<[e3@3 b3@2] [a3@3 e4@2] [f3@3 c4@2] <[d3@3 b3@2] [b2@3 f3@2]>>"
+ "[0 12 <0!2 7 0> <12 24>]*4"
+ 0)
# "moogBass"
# legato 1
# gain 0.5
# room 0.9 # sz 0.8 # dry 0.4
# pan (slow 4 $ range 0.05 0.33 saw)
d11 $ gM3 $ gF3
$ superimpose (|+ note 12)
-- $ arp "<pinkyup>"
$ note (
"<[b3@7 e3] [e4@7 a3] [c4@7 d4] <[b3@7 d3] [f3 b2]>>"
-- + "[0 12 <0!2 7 0> <12 24>]*4"
+ 12)
# "moogBass"
# legato 1
-- # gain 0.5
# room 0.9 # sz 0.8 # dry 0.4
# pan (slow 4 $ range 0.95 0.66 saw)
d3 $ "hh*8"
-- TODO KILL GRAVEYARD
d4 $ gF2 $ gM3
$ note ("e3 <b2!3 <ef3 g3>>" |+| "[0 ~ ~ 0 ~ ~ 0 ~] [0 ~ ~ 0 ~ <~ 0> 0 <~!3 0>]")
# crushbus 41 (range 16 3.4 "^53")
# roombus 42 (range 0 0.4 "^33")
# "bassWarsaw"
d5 $ gF3 $ gM3 -- Piano guide premier
$ "nujazz_keys120"
# n "<61!24 60!8>"
# pan 0.8
# roombus 51 (range 0.1 0.94 "^54")
# lpfbus 52 (range 10000 400 "^54")
# cut 5
# gain 0.9
d11 $ gF2 $ gM3 -- Plucked doubts
$ 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))
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/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 $ gMute3 -- 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 1.2
# lpf 2650
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.124 # sz 0.25 # dry 0.5
# octersubbus 71 (range 0 2 "^55")
# octersubsubbus 72 (range 0 3 "^55")
# gain 1.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/techno/around_the_bass.tidal
......@@ -16,12 +16,12 @@ 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
# gain 0.75
d2 $ gF1 $ gM
$ whenmod 32 24 (fast "<2!3 [<2 4> 4]>")
$ "~ [cp,snare:24]"
# pan 0.7
# midiG' "^79" 0 1.4
# gain 0.7
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>]"
......@@ -37,15 +37,16 @@ d4 $ gF2 $ gM
# octave 4
# crushbus 41 (range 16 2.5 "^53")
# octersubbus 42 (range 0 4 "^33")
# room 0.4
-- # delayfb 0.8 # delayt 0.25
# midiG' "^81" 0 1.4
# gain 0.7
# 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
# "FMRhodes1" # modIndex 2.85
# pan 0.7
d8 $ gF3
$ midiOn "^20" (# n "20")
$ midiOn "^92" ((# pan 0.4) . (# n "19"))
......@@ -54,4 +55,4 @@ d8 $ gF3
$ loopAt 2 $ chop 8
$ n "24" # "jungle_breaks"
# pan 0.55
# midiG' "^84" 0 1.8
# gain 0.9
live/midi/nova/techno/belle_pluie.tidal 0 → 100644
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
d1 $ gF1 $ gM2
$ fix (|* gain (0.9 * "^30")) "clubkick"
$ "k k k k*<1 <2 [4 2]>>"
# "[clubkick:0,rampleM1]"
# room 0.3
# dry 1.05
# sz 0.75
# lpf 2000
# gain 1.5
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ s*<1!8 2!3 1 2!3 1> ~ s*<1!3 2>")
$ midiOff "^43" (<| "<s*<1 2> ~> ~!3")
$ "snare:40"
# note "-2"
-- # room 0.4 # dry 0.9
# lpf 2400
-- # legato 0.25
d3 $ gF1 $ gM1
$ midiOff "^44" (mask "t f")
-- $ someCyclesBy 1 (|+ note "0!3 <0 4> 0!3 <4!6 -10!2>")
-- $ "dr*[8!3 <8 <16!3 [8 16]>>]"
$ "~ h ~ h ~ h*<1!6 2 2> ~ h*<1 <2 [4 2]>>"
-- # "rampleD2:3"
# "808cy:10"
# legato "<0.4!3 0.1>"
# cut 3
d4 $ gF2 $ gM3
$ midiOn "^89" (>| note "[e e <g b> e e e <a c7*<1 2 2 4>> e]")
$ midiOn "^57" (stutWith 8 "e" ((|+ note ("0 12 0 12")) . (|* gain 0.95)))
-- $ someCyclesBy (1 - "^33") (mask "t . t(3,8,1)")
$ midiOff "^89" (>| note ("<<[e e g e]!2 [a a g e]!2> ~ <~!4 [a a g e]!4> ~> . ~" - 0))
$ "bass1:10"
# cut 4
# room 0.2
# octerbus 41 (range 0 1 "^33")
# crushbus 42 (range 16 3.5 "^53")
# att 0.23
# pan 0.4
# rel 2
d5 $ gF3 $ gM3
$ midiOn "^58" (ply 2)
$ midiOn "^90" (slice 4 "0 1 2 3 <[0 1 2 3] [0 3]>")
$ chop 8
$ loopAt 4
$ "nujazz_guitar120"
# n "<11>"
# crushbus 51 (range 16 3.5 "^54")
# cut 5
d7 $ gF3 $ gM3 -- La pluie <3
$ midiOn "^59" (|+| note "0 12 0 <12!4 [12 0 12]!4 [0 7 12 0]!8>")
$ superimpose (struct "t(<3!3 [3 5]>,8)" . (|+| note (arp "<down!3 up>" "<c'maj'3!3 c'maj'4>")))
$ note ("<e c b4 <e4 d4>>")
# "moogBass"
# ampbus 71 (range 0.05 0.7 "^83")
# chorus 0.1
# dec 0.9
# rel (slow 8 $ range 0.1 0.4 saw)
# gain 0.9
# room 0.4 # dry 1.2 # sz (slow 8 $ range 0.8 0.2 saw)
d8 $ gF1 $ gM1
$ midiOn "^92" (const $ chop 8 $ whenmod 4 3 (ply "1 . 2 [4 2]") $ loopAt 1 $ "breaks165")
$ midiOff ("^36" + "^92") (slice 8 "~ 1 ~ 3 3*<0 <1 2 <4 [8 2]>>> 5 <~!3 6> 7")
$ midiOn "^36" (loopAt 0.5 . (# n 56) . (# lpf 5000)) -- Morning Mimosa
$ midiOn "^56" (# n 46) -- Low Bass WallRide
$ loopAt 2
$ chop 16
$ "jungle_breaks:45" -- Douceur Orleanaise
-- # cut 8
-- # gain 0.8
d9 $ gF3 $ gM3 -- BROOOOO
$ slice 3 "~ <0!6 1 1> ~ <0 0 0 1>"
$ "bogdan:3"
# cut 9
# gain 1.2
# legato "<0.4!4 0.2!3 0.4 0.2!6 1 1>"
# room 0.4 # dry 0.5 # sz 0.26
d10 -- Atmosphere Humide
$ chop 16
$ note "e2"
# "90s_glassatm:2"
# cut 10
d11 $ gF3 -- Marimba electrique
-- $ mask "<f!16 t!16 f!32 t!32 t!16 f!16>"
$ whenmod 16 12 rev
$ note ("<~ [e <g e> a <b bf>]> . ~" - 12)
# "marimba1"
# gain 1
# ampbus 110 (range 0.05 0.7 "^14")
# octersub "<0!16 0.5!16>"
-- # amp 4
d12 $ gF2 -- ECLAIR ORAGEUX
-- $ whenmod 16 12 (|>| note ("<[e3@3 a3 fs3@2] f3>" + 12))
$ note "<[d4 d4 [d4 e4] ~ e4 ~ ~ ~] <~!3 g4>>" -- DANCE!
# "giorgio_syn:0"
# pan 0.9
# room 0.4
# dry 0.8 # sz 0.7
# gain 0.85
# lpf 4000
# cut 12
live/midi/nova/techno/ete_a_mauerpark.tidal
-- L'Été a MauerPark
-- L'Été a MauerPark <3
do
setcps (120/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
......@@ -25,9 +23,8 @@ d1 $ gF $ gMute2
$ midiOn "^42" (struct "t t t t") -- Le Run
$ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
$ "[techno:0,808bd:2,909,kick:4]"
# rel 0.5
# att 0.015
# rel 0.125
# room 0
# lpf 4000
# gain 1.1
-- # midiG' "^78" 0 1.9
......@@ -51,6 +48,7 @@ d7 $ gF3 $ gM3 -- High Cello Dauphin
# pan 0.9
# crushbus 71 (range 16 2.5 "^55")
-- # midiG' "^83" 0 1.2
# gain 0.7
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>]>]")
......@@ -58,11 +56,12 @@ d3 $ gF $ gMute
$ "~ 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
# gain 1.1
d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique
$ midiOn "^57" (rev)
$ midiOn "^89" (struct "t*<16 32>") -- Basse folle
$ (0.125 <~) -- Calage :)
$ someCyclesBy (1 - "^33") (
$ someCyclesBy (1 - "^33") ( -- Pattern complet
(mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
) --
$ fix ((midiOff "^57" (# silence)) . (|* gain 0.65) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5))
......@@ -76,41 +75,38 @@ d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique
# pan 0.4
# crushbus 41 (range 16 2.5 "^53")
-- # midiG' "^81" 0 1.6
d5 $ gF3 $ gMute2 -- Leads reponse
d5 $ gF3 $ gMute3 -- Leads reponse TODO moins carre?
$ midiOn "^90" (struct "t*<16 32>") -- Basse folle
$ midiOn "^58" (|+ note 12)
-- $ sometimesBy "^18" (bite 4 "[0, [~ 2]]")
-- $ someCyclesBy "<f!3 t>" (mask "t f!15". (# legato 2))
-- $ (0.125 <~) -- Calage :)
-- $ someCyclesBy "^17" (
-- (mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
-- ) --
$ whenmod 32 24 (ply "2 <2!4 4!4>")
$ swing (1/3)
-- $ whenmod 32 24 (ply "2 <2!4 4!4>")
$ arp "<up!6 down downup>"
$ note (
"<ef4 g4 <ef g> d>"
"<ef4 g4 <ef g> d>" + "c'maj'4"
- 12
)
# "FMRhodes1"
# legato 2
# room 0.2
# pan 0.33
# modIndex (range 0.1 16 "^34")
# crushbus 51 (range 16 2.5 "^54")
# crushbus 51 (range 16 3.5 "^54")
-- # midiG' "^82" 0 1.5
d8 $ gM $ gF -- Breaks divins
$ midiOn "^92" (off "e" id)
$ midiOn "^60" (mask "[f t]")
$ someCyclesBy "^36" (loopAt 2
. mask "t(16,16,0)"
. chop 16
. (# n 83))
$ midiOff "^60" (("e" ~>) . mask "t(<4 [4!3 8]>,16)")
$ chop 16
$ someCyclesBy "^36" (loopAt 1 . (# n 34))
$ 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"
# gain 0.7
# gain 1
d9 $ gF3 -- Nano-angels chorus of machines
$ sometimesBy "^19" (superimpose (
(# cut 101)
......@@ -125,18 +121,20 @@ d9 $ gF3 -- Nano-angels chorus of machines
slow 2 "<bf4 d5 <bf4 ef> [bf4 a4@3]>"
+ "[0,[0*<1 1 2 <2 1>> . 0 12*<1 2>]]"
)
# chorus (range 0 2 "^35")
# "moogBass"
# dec 0.2
# sus 1
# att (range 0.001 2 "^16")
# rel (range 0.2 10 "^17")
# roombus 101 (range 0 0.5 "^18")
# lesliebus 102 (range 0 2 "^19")
# room 0.2
# lesliebus 102 (range 0 2 "^18")
# chorus (range 0 2 "^19")
# sz 0.6 # dry 2
# legato 2
# pan 0.64
# cut 10
# gain 1.2
......
live/midi/nova/techno/panda_rouge.tidal
......@@ -125,6 +125,7 @@ d8 $ gF $ gM
$ loopAt 2
$ chop 16
$ midiOn "^36" (# n "48")
$ midiOn "^56" (# n "28")
$ n "<40!3 [40 42]>"
# "jungle_breaks"
# cut 8
......
live/midi/nova/techno/the_good_bass.tidal
......@@ -13,12 +13,11 @@ 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
# gain 0.7
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>]"
......@@ -27,20 +26,19 @@ d3 $ gF1
# 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
# gain 0.9
# pan 0.3
d5
d5 -- FIXME WORKS WITH AROUND NOT GOOD
$ 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
-- # 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>>"))
......@@ -48,4 +46,3 @@ d8 $ gF3
$ loopAt 2 $ chop 8
$ n "20" # "jungle_breaks"
# pan 0.55
# midiG' "^84" 0 1.8
live/midi/nova/techno/trn/no_time_to_die.tidal
......@@ -17,7 +17,7 @@ d1 $ gF1 $ gM2
$ midiOff "^42" (<| "t(<3!3 <5 [5 <8 [16 10]>]>>, 8)")
$ "[jazz,electrn:8]"
-- # midiG' "^78" 0 1
d2 $ gM
d2 $ gF1 $ gM
$ midiOn "^43" (# note "-24")
$ "~ ~ cp*<1!3 2> <~!7 cp>" # "clap"
# note "-0"
......
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 # dry 1.1
|* 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"
# octerbus 43 (range 0 1.5 "^17")
# squizbus 42 (range 0 2.5 "^33")
# crushbus 41 (range 16 3.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
# squizbus 51 (slow 16 $ range 0 (range 0 4 "^54") saw)
# crushbus 52 (range 16 2.5 "^53")
# gain 0.8
# pan (slow 8 $ range 0.8 0.6 saw)
# cut 5
d8 $ gF1 $ gM1
$ chop 16
$ midiOn "^20" (loopAt 4)
$ midiOff "^20" (loopAt 1)
$ midiOn "^36" (# "jungle_breaks:14")
$ midiOn "^56" (# "jungle_breaks:15")
$ midiOn "^92" (ply "<2!3 [4!3 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"
# gain 0.7
live/techno/nightly_repair.tidal
......@@ -4,61 +4,41 @@ do
setcps (90/60/4)
let scale = getScale (scaleTable ++ [("blues",[0, 3, 5, 6, 7, 10])])
let modIndex = pF "modIndex"
let gDJF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gLPQ = (# lpqbus 3 (range 0 0.95 "^13"))
let gHPQ = (# hpqbus 4 (range 0 0.95 "^14"))
let g1 = (gDJF1 . gLPQ . gHPQ)
let g2 = (gDJF2 . gLPQ . gHPQ)
d1 $ g1 -- Le pouvoir de voler
$ midiOn "^74" (fast 2)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gMute2 $ gF1 -- Le pouvoir de voler
$ midiOn "^42" (<| "k k*<1!3 2> k <k k*2>")
$ midiOff "^42" (<| "k . k(3,8)")
$ fix (|* gain 1) "808bd"
$ fix ((|* gain 0.8)) "909"
$ "[jazz,909,808bd:4]"
# midiG' "^78" 0 1.4
d2 -- Every superhero needs a clap
# gain 1.4
d2 $ gM1 $ gF1 -- Every superhero needs a clap
$ midiOn "^43" (fast 2)
$ g1
$ superimpose (
(# "clap:1")
. (|* gain (slow 16 $ range 0.5 0.8 saw))
)
$ "~ cp"
# note (-2)
# midiG' "^79" 0 1.1
d3 $ g1 -- Gretsch frappe ton os pour le renforcer
# "h2ogmcp"
-- # note (-2)
# gain 1.1
d3 $ gM1 $ gF1 -- Gretsch frappe ton os pour le renforcer
$ midiOn "^76" (fast "2")
$ midiOn "^44" (fast "1 2")
$ sometimesBy "^52" (ply "1 2 1 2")
$ fix ((|* gain 0.86) . (# n "[4|5]")) "gretsch"
$ "~ h ~ h ~ h ~ h*<1 2>" # "[hh,gretsch]"
# midiG' "^80" 0 1.75
d9 $ g2 -- G0dz1ll4
$ midiOn "^60" (off 1 (
(|+ pan 0.3)
. (# cut 91)
. (|+| note "[0|12]*8")
. (|* gain 0.9)
. (# squizbus 92 (range 0 10 perlin))
))
$ "90s_matrix:1/4"
# cut 9
# gain 0.55
# crushbus 9 (slow 16 $ 16 * (1 - "^56") + (range 2.6 2 (perlin)))
# roombus 91 (slow 16 $ range 0 0.82 perlin)
# dry 2
# sz 0.9
# pan 0.7
# midiG' "^84" 0 1.2
d4 $ g1 -- BASSLINE VOLTAIQUE
-- # midiG' "^80" 0 1.75
d4 $ gMute3 $ gF2 -- BASSLINE VOLTAIQUE
$ midiOn "^57" ((|+ note 12) . (# legato 4))
$ note ("<bf g bf g bf g bf c c!4 g bf c6@2>" - 24)
-- $ note ("c6")
# "90s_matrix:3"
# cut 4
# pan 0.3
# midiG' "^81" 0 1.3
# gain 1
# lesliebus 41 (range "-1" 1 "^17")
# lrate (slow 4 $ "<[0.7 1.2!3] 2.4 4.8 6.7>")
# lpf 5000
......@@ -66,7 +46,7 @@ d4 $ g1 -- BASSLINE VOLTAIQUE
# crushbus 43 (range 16 2 ("^53" - 0.1 * (fast 4 perlin)))
# lpfbus 44 (range 12000 200 "^53")
# room 0.2
d5 $ g2 -- BLUES RUN
d5 $ gM3 $ gF3 -- BLUES RUN
$ someCyclesBy (range 0.95 0.05 ("^18!15 1")) (mask "t(3,8)")
$ slice 16 (run 16)
$ midiOn "^58" (striate 2)
......@@ -81,10 +61,26 @@ d5 $ g2 -- BLUES RUN
)
# "FMRhodes1"
# crushbus 5 (range 16 4.2 "^54")
# midiG' "^82" 0 1.85
# gain 1.85
-- # pan (slow 8 $ range 0.5 1 (saw - (slow 2 perlin)))
# pan (slow 16 $ range 1 0.8 saw)
d7 $ gM3 $ gF2 -- G0dz1ll4
$ midiOn "^59" (off 1 (
(|+ pan 0.3)
. (# cut 91)
. (|+| note "[0|12]*8")
. (|* gain 0.9)
. (# squizbus 92 (range 0 10 perlin))
))
$ "90s_matrix:1/4"
# cut 9
# gain 0.55
# crushbus 9 (range 16 2.5 "^55")
# roombus 91 (slow 16 $ range 0 0.82 perlin)
# dry 2
# sz 0.9
# pan 0.7
# gain 1.2
let scale = getScale (scaleTable ++ [("blues",["c", "ef", "f", "fs", "g", "bf"])])
......
live/techno/noir/lavabo_noir.tidal
resetCycles
-- DARK TECHNO LAVABO
......
releases/code_nu.md 0 → 100644
# Code nu
> Nu-jazz focus
**Salut Nu**
Cafe bouillant
Cafe tiede+
Cafe glace
Infusion Basse
Invoque l'ete
Disparition d'Elmo
Nu dans la boue?
releases/glitchs_and_friends.md 0 → 100644
# GLITCHS AND FRIENDS
> Name in progress
Oct4 - **Glitchs sauvages**
Contre Visite
**Nuit agitee** [trop fort]
_Permanence_
**Haunted house**
About time
AtaRight
Empreinte du numerique
Burn this book
## WORK WITH NASS <#
Bain bouillant
Nouveau soleil
Force Motrice [DNB Nassim]
start_and_midi.scd
......@@ -67,7 +67,7 @@ This is an example startup file. You can load it from your startup file
s.options.numBuffers = 1024 * 256; // increase this if you need to load more samples
// Increased from 8192 * 32
s.options.memSize = 8192 * 32; // increase this if you get "alloc failed" messages
s.options.numWireBufs = 64; // increase if "exceeded number of wire buffer" messages
s.options.numWireBufs = 128; // increase if "exceeded number of wire buffer" messages
s.options.maxNodes = 1024 * 32; // increase this if you are getting drop outs and the message "too many nodes"
s.options.numOutputBusChannels = 12; // set this to your hardware output channel size, if necessary
s.options.numOutputBusChannels = 24; // MULTICHANNEL SETUP
......@@ -103,7 +103,7 @@ s.waitForBoot {
//~dirt.start(57120, 0 ! 12); // start listening on port 57120, create two busses each sending audio to channel 0
~dirt.start(57120, [0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24]); // start listening on port 57120, MULTICHANNEL - ALSO UPDATE NUMOUTPUT
// ~dirt.soundLibrary.addMIDI(\midi, ~midiOut); // Connect `midi` synth to iO4
//~dirt.soundLibrary.addMIDI(\midi, ~midiOut); // Connect `midi` synth to iO4
//~looper = TidalLooper(~dirt); // Start TidalLooper on top :)
// ~looper.linput = 1;
......
study/chords/lofi.tidal
......@@ -20,6 +20,7 @@ do
let modIndex = pF "modIndex"
d1
-- $ slow 4 -- Helper: slow down
#
$ note (
-- midiOn "^43" (arp "up") -- Helper: arpegiate every other chord
-- [8 LoFi Chord Progs](https://blog.landr.com/lofi-chord-progressions/)
......@@ -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]>"
--
-- # 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
-- "<[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 <2 2 4 8>")
$ 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
-- $ midiOn "^58" ()
$ 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 0 12]*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 $ gF1 $ gM1 -- Break danse orleanaise
$ chop 16
$ midiOn "^92" (ply "<2 [2!3 <4 8>]>")
$ midiOn "^36" (loopAt 2 . (# n "<44!7 [44 48]>"))
$ midiOn "^56" (loopAt 2 . (# "jungle_breaks:48"))
$ loopAt 2
$ "jungle_breaks:45"
test.tidal
......@@ -17,6 +17,7 @@ $ "electrn:8"
--
-- # crush 4.5
d1 $ "bd"
once $ note "c@2 [c c]@1 ds g" # "giorgio_syn:6" # cut 1
......
tidal-worksheets deleted 120000 → 0
study/tidal-worksheets
\ No newline at end of file
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