Lots of layers and pingpong

# 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