FDLM: Repeat

parent d42ddb37
<!DOCTYPE patchbay> <!DOCTYPE patchbay>
<patchbay name="PatchBay_Perf" version="0.9.7"> <patchbay version="0.9.7" name="PatchBay_Perf">
<output-sockets> <output-sockets>
<socket exclusive="off" name="Built-in Audio Analog Stereo" client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio"> <socket client="Built\-in\ Audio\ Analog\ Stereo" exclusive="off" type="jack-audio" name="Built-in Audio Analog Stereo">
<plug>capture_FL</plug> <plug>capture_FL</plug>
<plug>capture_FR</plug> <plug>capture_FR</plug>
</socket> </socket>
<socket exclusive="off" name="SuperCollider" client="SuperCollider" type="jack-audio"> <socket client="SuperCollider" exclusive="off" type="jack-audio" name="SuperCollider">
<plug>out_1</plug> <plug>out_1</plug>
<plug>out_2</plug> <plug>out_2</plug>
</socket> </socket>
<socket exclusive="off" name="ardour" client="ardour" type="jack-audio"> <socket client="ardour" exclusive="off" type="jack-audio" name="ardour">
<plug>auditioner\/audio_out\ 2</plug> <plug>auditioner\/audio_out\ 2</plug>
<plug>auditioner\/audio_out\ 1</plug> <plug>auditioner\/audio_out\ 1</plug>
<plug>Tidal\/audio_out\ 1</plug> <plug>Tidal\/audio_out\ 1</plug>
...@@ -20,21 +20,21 @@ ...@@ -20,21 +20,21 @@
<plug>LTC\-Out</plug> <plug>LTC\-Out</plug>
<plug>Master\/audio_out\ 2</plug> <plug>Master\/audio_out\ 2</plug>
</socket> </socket>
<socket exclusive="off" name="Built-in Audio Analog Stereo Monitor" client="Built\-in\ Audio\ Analog\ Stereo\ Monitor" type="jack-audio"> <socket client="Built\-in\ Audio\ Analog\ Stereo\ Monitor" exclusive="off" type="jack-audio" name="Built-in Audio Analog Stereo Monitor">
<plug>monitor_FL</plug> <plug>monitor_FL</plug>
<plug>monitor_FR</plug> <plug>monitor_FR</plug>
</socket> </socket>
<socket exclusive="off" name="ardour 2" client="ardour" type="jack-audio"> <socket client="ardour" exclusive="off" type="jack-audio" name="ardour 2">
<plug>auditioner\/audio_out\ 2</plug> <plug>auditioner\/audio_out\ 2</plug>
<plug>auditioner\/audio_out\ 1</plug> <plug>auditioner\/audio_out\ 1</plug>
<plug>Master\/audio_out\ 1</plug> <plug>Master\/audio_out\ 1</plug>
<plug>Master\/audio_out\ 2</plug> <plug>Master\/audio_out\ 2</plug>
</socket> </socket>
<socket exclusive="off" name="ardour 3" client="ardour" type="jack-audio"> <socket client="ardour" exclusive="off" type="jack-audio" name="ardour 3">
<plug>Tidal\/audio_out\ 1</plug> <plug>Tidal\/audio_out\ 1</plug>
<plug>Tidal\/audio_out\ 2</plug> <plug>Tidal\/audio_out\ 2</plug>
</socket> </socket>
<socket exclusive="off" name="Midi-Bridge" client="Midi\-Bridge" type="jack-midi"> <socket client="Midi\-Bridge" exclusive="off" type="jack-midi" name="Midi-Bridge">
<plug>Midi\ Through\:\(capture_0\)\ Midi\ Through\ Port\-0</plug> <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_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\:\(capture_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug> <plug>Launch\ Control\ XL\:\(capture_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
...@@ -42,40 +42,40 @@ ...@@ -42,40 +42,40 @@
<plug>SuperCollider\:\(capture_6\)\ out1</plug> <plug>SuperCollider\:\(capture_6\)\ out1</plug>
<plug>SuperCollider\:\(capture_7\)\ out2</plug> <plug>SuperCollider\:\(capture_7\)\ out2</plug>
</socket> </socket>
<socket exclusive="off" name="ardour" client="ardour" type="jack-midi"> <socket client="ardour" exclusive="off" type="jack-midi" name="ardour">
<plug>MIDI\ Clock\ out</plug> <plug>MIDI\ Clock\ out</plug>
<plug>MTC\ out</plug> <plug>MTC\ out</plug>
<plug>x\-virtual\-keyboard</plug> <plug>x\-virtual\-keyboard</plug>
<plug>Scene\ out</plug> <plug>Scene\ out</plug>
<plug>MMC\ out</plug> <plug>MMC\ out</plug>
</socket> </socket>
<socket exclusive="off" name="Midi-Bridge 2" client="Midi\-Bridge" type="jack-midi"> <socket client="Midi\-Bridge" exclusive="off" type="jack-midi" name="Midi-Bridge 2">
<plug>Launch\ Control\ XL\:\(capture_0\)\ Launch\ Control\ XL\ Launch\ Contro</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>Launch\ Control\ XL\:\(capture_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
</socket> </socket>
<socket exclusive="off" name="Midi Through" client="Midi\ Through" type="alsa-midi"> <socket client="Midi\ Through" exclusive="off" type="alsa-midi" name="Midi Through">
<plug>Midi\ Through\ Port\-0</plug> <plug>Midi\ Through\ Port\-0</plug>
</socket> </socket>
<socket exclusive="off" name="Launch Control XL" client="Launch\ Control\ XL" type="alsa-midi"> <socket client="Launch\ Control\ XL" exclusive="off" type="alsa-midi" name="Launch Control XL">
<plug>Launch\ Control\ XL\ Launch\ Contro</plug> <plug>Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ Launch\ Contro</plug> <plug>Launch\ Control\ XL\ Launch\ Contro</plug>
</socket> </socket>
<socket exclusive="off" name="SuperCollider" client="SuperCollider" type="alsa-midi"> <socket client="SuperCollider" exclusive="off" type="alsa-midi" name="SuperCollider">
<plug>out0</plug> <plug>out0</plug>
<plug>out1</plug> <plug>out1</plug>
<plug>out2</plug> <plug>out2</plug>
</socket> </socket>
</output-sockets> </output-sockets>
<input-sockets> <input-sockets>
<socket exclusive="off" name="Built-in Audio Analog Stereo" client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio"> <socket client="Built\-in\ Audio\ Analog\ Stereo" exclusive="off" type="jack-audio" name="Built-in Audio Analog Stereo">
<plug>playback_FL</plug> <plug>playback_FL</plug>
<plug>playback_FR</plug> <plug>playback_FR</plug>
</socket> </socket>
<socket exclusive="off" name="SuperCollider" client="SuperCollider" type="jack-audio"> <socket client="SuperCollider" exclusive="off" type="jack-audio" name="SuperCollider">
<plug>in_1</plug> <plug>in_1</plug>
<plug>in_2</plug> <plug>in_2</plug>
</socket> </socket>
<socket exclusive="off" name="ardour" client="ardour" type="jack-audio"> <socket client="ardour" exclusive="off" type="jack-audio" name="ardour">
<plug>physical_audio_input_monitor_enable</plug> <plug>physical_audio_input_monitor_enable</plug>
<plug>LTC\ in</plug> <plug>LTC\ in</plug>
<plug>SC\ Tidal\/ACE\ Compressor\ \(stereo\)\ 1\/audio_in\ 1</plug> <plug>SC\ Tidal\/ACE\ Compressor\ \(stereo\)\ 1\/audio_in\ 1</plug>
...@@ -84,25 +84,25 @@ ...@@ -84,25 +84,25 @@
<plug>Master\/audio_in\ 2</plug> <plug>Master\/audio_in\ 2</plug>
<plug>Master\/audio_in\ 1</plug> <plug>Master\/audio_in\ 1</plug>
</socket> </socket>
<socket exclusive="off" name="Built-in Audio Analog Stereo 2" client="Built\-in\ Audio\ Analog\ Stereo" type="jack-audio"> <socket client="Built\-in\ Audio\ Analog\ Stereo" exclusive="off" type="jack-audio" name="Built-in Audio Analog Stereo 2">
<plug>playback_FR</plug> <plug>playback_FR</plug>
<plug>playback_FL</plug> <plug>playback_FL</plug>
<plug>playback_FL</plug> <plug>playback_FL</plug>
<plug>playback_FR</plug> <plug>playback_FR</plug>
</socket> </socket>
<socket exclusive="off" name="ardour 2" client="ardour" type="jack-audio"> <socket client="ardour" exclusive="off" type="jack-audio" name="ardour 2">
<plug>Tidal\/audio_in\ 1</plug> <plug>Tidal\/audio_in\ 1</plug>
<plug>Tidal\/audio_in\ 2</plug> <plug>Tidal\/audio_in\ 2</plug>
</socket> </socket>
<socket exclusive="off" name="ardour 3" client="ardour" type="jack-audio"> <socket client="ardour" exclusive="off" type="jack-audio" name="ardour 3">
<plug>Master\/audio_in\ 1</plug> <plug>Master\/audio_in\ 1</plug>
<plug>Master\/audio_in\ 2</plug> <plug>Master\/audio_in\ 2</plug>
</socket> </socket>
<socket exclusive="off" name="ardour 4" client="ardour" type="jack-audio"> <socket client="ardour" exclusive="off" type="jack-audio" name="ardour 4">
<plug>physical_audio_input_monitor_enable</plug> <plug>physical_audio_input_monitor_enable</plug>
<plug>physical_audio_input_monitor_enable</plug> <plug>physical_audio_input_monitor_enable</plug>
</socket> </socket>
<socket exclusive="off" name="Midi-Bridge" client="Midi\-Bridge" type="jack-midi"> <socket client="Midi\-Bridge" exclusive="off" type="jack-midi" name="Midi-Bridge">
<plug>Midi\ Through\:\(playback_0\)\ Midi\ Through\ Port\-0</plug> <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_0\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\:\(playback_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug> <plug>Launch\ Control\ XL\:\(playback_1\)\ Launch\ Control\ XL\ Launch\ Contro</plug>
...@@ -113,43 +113,43 @@ ...@@ -113,43 +113,43 @@
<plug>SuperCollider\:\(playback_4\)\ in4</plug> <plug>SuperCollider\:\(playback_4\)\ in4</plug>
<plug>aseqdump\:\(playback_0\)\ aseqdump</plug> <plug>aseqdump\:\(playback_0\)\ aseqdump</plug>
</socket> </socket>
<socket exclusive="off" name="ardour" client="ardour" type="jack-midi"> <socket client="ardour" exclusive="off" type="jack-midi" name="ardour">
<plug>physical_midi_input_monitor_enable</plug> <plug>physical_midi_input_monitor_enable</plug>
<plug>MIDI\ Clock\ in</plug> <plug>MIDI\ Clock\ in</plug>
<plug>MTC\ in</plug> <plug>MTC\ in</plug>
<plug>Scene\ in</plug> <plug>Scene\ in</plug>
<plug>MMC\ in</plug> <plug>MMC\ in</plug>
</socket> </socket>
<socket exclusive="off" name="ardour 2" client="ardour" type="jack-midi"> <socket client="ardour" exclusive="off" type="jack-midi" name="ardour 2">
<plug>physical_midi_input_monitor_enable</plug> <plug>physical_midi_input_monitor_enable</plug>
<plug>physical_midi_input_monitor_enable</plug> <plug>physical_midi_input_monitor_enable</plug>
</socket> </socket>
<socket exclusive="off" name="Midi Through" client="Midi\ Through" type="alsa-midi"> <socket client="Midi\ Through" exclusive="off" type="alsa-midi" name="Midi Through">
<plug>Midi\ Through\ Port\-0</plug> <plug>Midi\ Through\ Port\-0</plug>
</socket> </socket>
<socket exclusive="off" name="Launch Control XL" client="Launch\ Control\ XL" type="alsa-midi"> <socket client="Launch\ Control\ XL" exclusive="off" type="alsa-midi" name="Launch Control XL">
<plug>Launch\ Control\ XL\ Launch\ Contro</plug> <plug>Launch\ Control\ XL\ Launch\ Contro</plug>
<plug>Launch\ Control\ XL\ Launch\ Contro</plug> <plug>Launch\ Control\ XL\ Launch\ Contro</plug>
</socket> </socket>
<socket exclusive="off" name="SuperCollider" client="SuperCollider" type="alsa-midi"> <socket client="SuperCollider" exclusive="off" type="alsa-midi" name="SuperCollider">
<plug>in0</plug> <plug>in0</plug>
<plug>in1</plug> <plug>in1</plug>
<plug>in2</plug> <plug>in2</plug>
<plug>in3</plug> <plug>in3</plug>
<plug>in4</plug> <plug>in4</plug>
</socket> </socket>
<socket exclusive="off" name="aseqdump" client="aseqdump" type="alsa-midi"> <socket client="aseqdump" exclusive="off" type="alsa-midi" name="aseqdump">
<plug>aseqdump</plug> <plug>aseqdump</plug>
</socket> </socket>
<socket exclusive="off" name="SuperCollider 2" client="SuperCollider" type="alsa-midi"> <socket client="SuperCollider" exclusive="off" type="alsa-midi" name="SuperCollider 2">
<plug>in3</plug> <plug>in3</plug>
<plug>in4</plug> <plug>in4</plug>
</socket> </socket>
<socket exclusive="off" name="PipeWire-RT-Event" client="PipeWire\-RT\-Event" type="alsa-midi"> <socket client="PipeWire\-RT\-Event" exclusive="off" type="alsa-midi" name="PipeWire-RT-Event">
<plug>input</plug> <plug>input</plug>
<plug>input</plug> <plug>input</plug>
</socket> </socket>
<socket exclusive="off" name="SuperCollider 3" client="SuperCollider" type="alsa-midi"> <socket client="SuperCollider" exclusive="off" type="alsa-midi" name="SuperCollider 3">
<plug>in2</plug> <plug>in2</plug>
</socket> </socket>
</input-sockets> </input-sockets>
...@@ -167,7 +167,6 @@ ...@@ -167,7 +167,6 @@
<cable output="Launch Control XL" input="SuperCollider 2" 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="Midi Through" type="alsa-midi"/>
<cable output="Launch Control XL" input="PipeWire-RT-Event" type="alsa-midi"/> <cable output="Launch Control XL" input="PipeWire-RT-Event" type="alsa-midi"/>
<cable output="SuperCollider" input="PipeWire-RT-Event" type="jack-audio"/>
</cables> </cables>
</patchbay> </patchbay>
...@@ -391,21 +391,22 @@ La voix de l'Ordre: Monotonal drone <> breakbeat ...@@ -391,21 +391,22 @@ La voix de l'Ordre: Monotonal drone <> breakbeat
## Live Algolia FDLM2022 :metal: ## Live Algolia FDLM2022 :metal:
### TODO: ### TODO:
- [x] Confirme la tracklist - [x] Confirme la tracklist
- [x] Verifie chaque instrument - [x] Verifie chaque instrument
- [ ] Pratique ;) - [x] Pratique ;)
- Improve setup: - Improve setup:
- [x] Fix compressor - [x] Fix compressor
- [ ] Enjoy <3
### AlgoRythms ### AlgoRythms
- Jolene
- Lady - Lady
- Toxic - Toxic
- ???
- ???
### Tracklist ### Tracklist
- Intro: We call it AlgoRave 👨‍💻 - Intro: We call it AlgoRave 👨‍💻
......
...@@ -9,14 +9,28 @@ ...@@ -9,14 +9,28 @@
Music LiveCoding with TidalCycles Music LiveCoding with TidalCycles
-- L'interprete c'est l'Ordinateur -- L'interprete c'est l'Ordinateur
once $ "ircam:1" # cut 1 # gain 0.9
-- Le medium, c'est du code -- Le medium, c'est du code
once $ "ircam:1" # cut 1
do
let g1 = whenmod 32 24 (# djfbus 1 ((slow 8 $ range 0.5 0.1 saw)))
let g2 = whenmod 64 32 (# djfbus 2 ((slow 32 $ range 0.5 0.9 saw)))
let g = g1 . g2
d1 $ g $ "k . k(<1 3 3 <5 8>>,8)" # "kick:5" # gain 1.2
d2 $ g $ fast 2 $ "~ snare:20" # gain 1.2
d3 $ g $ fast "<1 [2|1] [2|4] 4>" $ "dr*<8 4 8 16>" # gain 0.9
d4 $ g $ slice 2 "<0!3 1>" $ "fpiano:8" # gain 1.2
# cut 4
do do
let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.05 saw))) -- Les effets aussi :) let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.05 saw))) -- Les effets aussi :)
setcps (80/60/4) -- Le BPM ausso setcps (80/60/4) -- Le BPM aussi
d1 $ g $ "kick:5" -- Le kick aussi d1 $ g $ "kick:5" -- Le kick aussi
d2 $ g d2 $ g
$ loopAt 2 $ loopAt 2
......
...@@ -27,7 +27,7 @@ d3 $ g ...@@ -27,7 +27,7 @@ d3 $ g
# midiG' "^80" 0 1 # midiG' "^80" 0 1
-- Jolene v1: Nice but how about we sampling proper drums? -- Jolene v1: Nice but how about we sample proper drums?
do do
setcps (105/60/4) setcps (105/60/4)
d1 $ "ifdrums:0*4" # gain 0.65 d1 $ "ifdrums:0*4" # gain 0.65
......
...@@ -2,15 +2,17 @@ d1 $ slow 17 $ n (run 17) # "cbow" # gain 0.8 # cut 1 ...@@ -2,15 +2,17 @@ d1 $ slow 17 $ n (run 17) # "cbow" # gain 0.8 # cut 1
once $ "dr" once $ "dr"
resetCycles resetCycles
______ ____ ______ ______ ____ ______
.~ ~. | ~. .~ ~. `. .' .~ ~. | ~. .~ ~. `. .'
| |____.'_ | | `. .' | |____.'_ | | `. .'
| | ~. | | `. . .' | | ~. | | `. . .'
`.______.' |_______.' `.______.' `.' `.' `.______.' |_______.' `.______.' `.' `.'
--- CBOW: Cello, bowed <3
do do
let chord = "d4'min7'4" let chord = "d4'min7'4"
let gF = midiDJF "^49" 200 9800 0 2000 -- let gF = (midiDJF "^49" 200 9800 0 2000)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gLeslie = ((# leslie "^29") . (# lsize (range 0 2.5 "^30")) .(# lrate 6.7)) let gLeslie = ((# leslie "^29") . (# lsize (range 0 2.5 "^30")) .(# lrate 6.7))
let gDJF = (whenmod 32 24 (# lpf (max 200 (slow 16 $ range 5000 0 sine)))) let gDJF = (whenmod 32 24 (# lpf (max 200 (slow 16 $ range 5000 0 sine))))
let g = gF let g = gF
...@@ -27,7 +29,7 @@ d2 $ gDJF $ g -- Snare prog ...@@ -27,7 +29,7 @@ d2 $ gDJF $ g -- Snare prog
# midiG' "^79" 0 1.1 # midiG' "^79" 0 1.1
d5 $ g -- Breakbeat d5 $ g -- Breakbeat
$ midiOn "^76" (ply "<2!3 [4 <4 1>]>") $ midiOn "^76" (ply "<2!3 [4 <4 1>]>")
-- $ midiOn "^44" (slow "<4 2>") $ midiOn "^44" (slow "<4 2>")
$ sometimesBy "^32" (ply "<4 [4|2] 2 <1!3 4>>") $ sometimesBy "^32" (ply "<4 [4|2] 2 <1!3 4>>")
$ someCyclesBy (0.9 * "^52") (scramble "1 4") $ someCyclesBy (0.9 * "^52") (scramble "1 4")
$ chop 8 $ chop 8
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
do do
-- TRIGGER INTRO :) -- TRIGGER INTRO :)
-- resetCycles -- resetCycles
once $ "90s_synatm:8" # gain 0.94 # panbus 41 (range 0.2 0.5 saw) # room 0.4 # sz 0.94 -- once $ "90s_synatm:8" # gain 0.94 # panbus 41 (range 0.2 0.5 saw) # room 0.4 # sz 0.94
let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine))) let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine)))
let gF = 1.01 let gF = 1.01
let f1 = (# djfbus 1 (range 0.05 0.95 "^49")) let f1 = (# djfbus 1 (range 0.05 0.95 "^49"))
...@@ -86,7 +86,7 @@ d6 -- High lead: Winds of truth ...@@ -86,7 +86,7 @@ d6 -- High lead: Winds of truth
# pan 0.9 # pan 0.9
# room 0.4 # sz 0.8 # room 0.4 # sz 0.8
# crushbus 62 (range 16 2.25 "^55") # crushbus 62 (range 16 2.25 "^55")
# midiG' "^83" 0 1 # midiG' "^83" 0 1.2
# dry 0.1 # dry 0.1
# pan "^19" # pan "^19"
# cut 6 # cut 6
...@@ -110,7 +110,7 @@ d10 $ f1 -- RANDOM FOREST NOISES ...@@ -110,7 +110,7 @@ d10 $ f1 -- RANDOM FOREST NOISES
. (# "amencutup") . (# "amencutup")
. (# pan 0.88) . (# pan 0.88)
. (# midiG' "^15" 0 1.25) . (# midiG' "^15" 0 1.25)
) "n3" -- amen excerpt ) "n3" -- amen break excerpt
$ fix ( $ fix (
(# "gretsch:10") (# "gretsch:10")
. (struct "t*3 ~ . t*<1!3 2> t*<1 3>") . (struct "t*3 ~ . t*<1!3 2> t*<1 3>")
......
...@@ -17,16 +17,17 @@ d1 $ g ...@@ -17,16 +17,17 @@ d1 $ g
$ "jazz" $ "jazz"
# midiG' "^78" 0 1.3 # midiG' "^78" 0 1.3
d2 $ g d2 $ g
$ "~ s" # "[sn:40]" # lpf 3000 $ midiOn "^43" (fast "<1!3 2 2 2 4 <8 [8 4]>>")
# midiG' "^79" 0 1.8 $ "~ s" # "[sn:40,snare:20]"
# note "<-2!3 -4>" # note "<-2!3 -4>"
# midiG' "^79" 0 1.8
d3 $ g d3 $ g
$ midiOn "^76" (fast 2) $ midiOn "^76" (fast 2)
$ midiOff "^44" (slow "2!3 <1 <2 [4 1]>>") $ midiOff "^44" (slow "2!3 <1 <2 [4 1]>>")
$ "d*[8 . 8 <8 [16 <8 16>]>]" # "electro1:0" $ "d*[8 . 8 <8 [16 <8 16>]>]" # "electro1:0"
# midiG' "^80" 0 (1.6 * "1.2 1!6 <1 1 1.1 <1.2 1>>")
# room 0.3 # room 0.3
# dry 0.95 # dry 0.95
# midiG' "^80" 0 (1.6 * "1.2 1!6 <1 1 1.1 <1.2 1>>")
d4 -- Break bonus banane d4 -- Break bonus banane
$ g $ g
$ midiOn "^92" (ply "2!3 1 2!3 <2 4>") $ midiOn "^92" (ply "2!3 1 2!3 <2 4>")
...@@ -39,7 +40,7 @@ d4 -- Break bonus banane ...@@ -39,7 +40,7 @@ d4 -- Break bonus banane
$ "break:3" $ "break:3"
# cut 4 # cut 4
# midiG' "^84" 0 1.3 # midiG' "^84" 0 1.3
d5 $ g $ gPont2 d5 $ g $ gPont2 -- BASSLINE BoomRang!
-- $ whenmod 64 32 (# crushbus 41 (range 16 2.5 (slow 32 saw))) -- $ whenmod 64 32 (# crushbus 41 (range 16 2.5 (slow 32 saw)))
$ slice 2 "<0!3 1>" $ slice 2 "<0!3 1>"
$ "fbass:51" $ "fbass:51"
...@@ -63,6 +64,7 @@ d7 $ g -- Back solar mandoline ...@@ -63,6 +64,7 @@ d7 $ g -- Back solar mandoline
# midiG' "^83" 0 1.3 # midiG' "^83" 0 1.3
d6 -- RHODES FOLIE <33 d6 -- RHODES FOLIE <33
$ g $ g
$ midiOn "^58" (off "h")
$ mask "t(<[12!3 16] [12!3 8] <12 12 8 16> <4!3 [4 <8 16>]>>,16)" $ mask "t(<[12!3 16] [12!3 8] <12 12 8 16> <4!3 [4 <8 16>]>>,16)"
$ swing (1 + ("0 2" * "^58") + (2 * "^90")) $ swing (1 + ("0 2" * "^58") + (2 * "^90"))
$ note ("d4/2" + scale "<augmented!6 diminished2!2>" (run 16)) $ note ("d4/2" + scale "<augmented!6 diminished2!2>" (run 16))
......
-- Solar - breakbeat nostalgic playground -- Solar - breakbeat nostalgic playground
-- TODO: Ajoute une basse !
once $ "dr" # gain
do do
setcps (110/60/4) setcps (110/60/4)
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
let gDJF1 = (# djfbus 1 (range 0.02 0.98 "^49")) let gDJF1 = (# djfbus 1 (range 0.02 0.98 "^49"))
let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^50")) let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let mBreak = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
let g1 = (gDJF1) let g1 = (gDJF1)
let g2 = (gDJF2) let g2 = (gDJF2)
let mBreak = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
let mDegrade = (midiOn "^73" (chop 4)) let mDegrade = (midiOn "^73" (chop 4))
let m = mBreak . mDegrade let m = mBreak . mDegrade
d1 $ g1 $ m -- d1 $ g1 $ m --
......
...@@ -46,7 +46,7 @@ d3 $ g1-- Running Hats ...@@ -46,7 +46,7 @@ d3 $ g1-- Running Hats
# note (range "-12" 12 "^52") # note (range "-12" 12 "^52")
# dry (slow 4 $ range 0 2 perlin) # dry (slow 4 $ range 0 2 perlin)
# pan 0.6 # pan 0.6
# cut 3 # cut 344
d4 $ g1 -- Resolute Bass d4 $ g1 -- Resolute Bass
-- $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin))) -- $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin)))
$ midiOn "^89" ( -- Glitch vary end $ midiOn "^89" ( -- Glitch vary end
......
...@@ -69,7 +69,7 @@ d4 $ g1 -- BASSLINE VOLTAIQUE ...@@ -69,7 +69,7 @@ d4 $ g1 -- BASSLINE VOLTAIQUE
# crushbus 43 (range 16 2 ("^53" - 0.1 * (fast 4 perlin))) # crushbus 43 (range 16 2 ("^53" - 0.1 * (fast 4 perlin)))
# room 0.2 # room 0.2
d5 $ g2 -- BLUES RUN d5 $ g2 -- BLUES RUN
$ degradeBy (range 0.95 0.05 ("^18!15 1")) $ someCyclesBy (range 0.95 0.05 ("^18!15 1")) (mask "t(3,8)")
$ slice 16 (run 16) $ slice 16 (run 16)
$ midiOn "^58" (striate 2) $ midiOn "^58" (striate 2)
$ superimpose (# modIndex (range 0 96 "^34")) $ superimpose (# modIndex (range 0 96 "^34"))
......
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