Sonic Pi source code
(without personal random seed)
------------------------------


set_mixer_control! hpf: 35
set_mixer_control! amp: 0.8
duree_intro = 4
duree_tranche = 29
duree_morceau = duree_tranche * 8
duree_outro = 12

continuer = true

in_thread do

while continuer == true
sleep 1
if beat > duree_intro + duree_morceau
continuer = false
print "fin du morceau !"
end
end
end

with_fx :reverb, mix: 0.3, room: 0.35 do
with_fx :echo, decay: 4.5 do |echooo|
with_fx :flanger, mix: 0.4 do
with_fx :whammy, mix: 1 do
in_thread do
sleep 0.8
while continuer == true
use_synth :hollow
play 29 + rrand_i(0,5), attack: 2.2, release: 12.8, amp: [0,0.03].choose, pan: rrand(-0.1, 0.1)
play 35 + rrand_i(0,5), attack: 2.3, release: 12.7, amp: [0,0.03].choose, pan: rrand(-0.1, 0.1)
play 41 + rrand_i(0,5), attack: 2.4, release: 12.6, amp: [0,0.03].choose, pan: rrand(-0.1, 0.1)
play 47 + rrand_i(0,5), attack: 2.5, release: 12.5, amp: [0,0.03].choose, pan: rrand(-0.1, 0.1)
play 53 + rrand_i(0,5), attack: 2.6, release: 12.4, amp: [0,0.03].choose, pan: rrand(-0.1, 0.1)
play 59 + rrand_i(0,5), attack: 2.7, release: 12.3, amp: [0,0.03].choose, pan: rrand(-0.1, 0.1)
play 65 + rrand_i(0,5), attack: 2.8, release: 12.2, amp: [0,0.03].choose, pan: rrand(-0.1, 0.1)
sleep 6 + rrand(0, 21.5)
control echooo, decay: rrand(1.5, 5.5)
end
end
end
end
end
end

with_fx :reverb, mix: 0.3, room: 0.2 do
with_fx :echo, decay: 1.1, decay_slide: 7.5 do |ek|
with_fx :flanger, mix: 0.4, mix_slide: 4 do |flg|
with_fx :whammy, mix: 0.8 do
in_thread do
use_synth :square
c = play 24, attack: duree_intro, sustain: duree_morceau, release: duree_outro, amp: 0.01, note_slide: 6.5, amp_slide: 8.5

sleep duree_intro + 1
while continuer == true
control c, note: rrand_i(23,24)
control c, amp: rrand(0, 0.03)
control ek, decay: rrand(0.2, 2)
control flg, mix: rrand(0.3, 0.5)
sleep rrand_i(9.6, 24)
end
end
end
end
end
end

with_fx :reverb, mix: 0.2, room: 0.4 do
with_fx :slicer, mix: 0.5 do |slicy|
with_fx :flanger, mix: 0.5 do |flangy|
with_fx :whammy, mix: 1 do
in_thread do
sleep duree_intro * 2
while continuer == true
sample :bd_gas, beat_stretch: rrand(0.3, 1.45), amp: rrand(0.02, 0.1)
sleep 0.05
sample :bd_tek, beat_stretch: rrand(0.3, 1.45), rate: -1, amp: rrand(0.04, 0.1)
sleep 0.05
sample :loop_industrial, beat_stretch: rrand(0.3, 1.45), rate: -1, amp: rrand(0.04, 0.1)
sleep 0.05
sample :bass_dnb_f, beat_stretch: rrand(0.3, 1.45), rate: -1, amp: rrand(0.03, 0.1)
sleep rrand(0.35, 1.65)
control slicy, mix: rrand(0.15, 0.95)
control flangy, mix: rrand(0.15, 0.95)
end
end
end
end
end
end

with_fx :reverb, mix: 0.2, room: 0.4 do
with_fx :slicer, mix: 0.5 do |slicy|
with_fx :flanger, mix: 0.5 do |flangy|
with_fx :whammy, mix: 1 do
in_thread do
sleep duree_tranche * 3
while continuer == true
sample :bd_boom, beat_stretch: rrand(0.3, 1.45), amp: rrand(0.02, 0.2)
sleep 0.05
sample :bd_klub, beat_stretch: rrand(0.3, 1.45), rate: -1, amp: rrand(0.04, 0.2)
sleep 0.05
sample :elec_blip2, beat_stretch: rrand(0.3, 1.45), rate: -1, amp: rrand(0.03, 0.2)
sleep rrand(0.35, 2.65)
control slicy, mix: rrand(0.15, 0.95)
control flangy, mix: rrand(0.15, 0.95)
end
end
end
end
end
end

with_fx :reverb, mix: 0.2, room: 0.4 do
with_fx :slicer, mix: 0.5 do |slicy|
with_fx :flanger, mix: 0.5 do |flangy|
with_fx :whammy, mix: 1 do
in_thread do
sleep duree_tranche * 5
while continuer == true
sample :drum_tom_lo_soft, beat_stretch: rrand(0.3, 1.45), amp: rrand(0.02, 0.25)
sleep 0.05
sample :bd_zum, beat_stretch: rrand(0.3, 1.45), rate: -1, amp: rrand(0.04, 0.25)
sleep 0.05
sample :loop_garzul, beat_stretch: rrand(0.3, 1.45), rate: -1, amp: rrand(0.03, 0.25)
sleep rrand(0.35, 3.65)
control slicy, mix: rrand(0.15, 0.95)
control flangy, mix: rrand(0.15, 0.95)
end
end
end
end
end
end