# 231128 2004 Lots of layers and pingpong YT
# Saved 231128 2004
# https://youtu.be/KxGlOLOykvY
# https://in-thread.sonic-pi.net/t/lots-of-layers-and-pingpong/8407
with_fx :ping_pong, feedback: 0.75 do
live_loop :a1 do
tick
puts cu = line(40,120,steps: 10).look
use_synth :prophet
if cu<90 then
play :d2, cutoff: cu
else
use_synth :prophet
play :d2, cutoff: cu
use_synth :gnoise
play [:d2,:d4+[7,3,0].look], cutoff: cu, release: 0.1
end
use_synth :blade
play :a6+[0,-2,-4,3].choose+knit(0,32,-12,32).look, cutoff: line(120,60,steps: 10).look
sleep [0.25,0.25,0.5,1].choose*2
end
live_loop :a2 do
tick
n = :c4
play [n,n,n,n,n+2,n+2,n+2,n+2].look
sample :sn_generic, rpitch: 12 if spread(1,4).look
sleep 4
end
end
live_loop :a3 do
tick
sample :bd_haus, cutoff: line(60,90,steps: 64).look, amp: 2 if (spread(2,5)*3+spread(3,5)).look
sleep 0.25
end
with_fx :reverb, room: 0.7 do
live_loop :a4 do
tick
use_random_seed knit(1,64,10,64).look
use_synth :pluck
play scale(:d5, :minor_pentatonic).pick(3).look
sleep 0.25
end
end
1 Like