YT Evening jam in Sonic Pi with beep piano synth and reverb

Creations & Ideas
1 
# 230930 2347 Evening jam in Sonic Pi with beep piano synth and reverb YT
# Saved 230930 2347
# https://in-thread.sonic-pi.net/t/evening-jam-in-sonic-pi-with-beep-piano-synth-and-reverb/8157
# https://youtu.be/J5Ne76uOoPw
# Created by https://linktr.ee/relaxnow

set_volume! 1

with_fx :reverb, room: 0.8 do
  
  live_loop :mel1 do
    tick
    mel = 1
    case mel
    when 1
      play [:c4,:c4+7,:c4+3,:c4+10].look+12
      sleep [3].look
    when 2
      play [:c4,:c4+7,:c4+3,:c4+8, :c4+1].choose, amp: 1.5
      sleep [3,1,0.25].choose
    end
    
  end
  
  live_loop :mel2 do
    tick
    mel = 2
    case mel
    when 1
      play [:c4,:c4+7,:c4+3,:c4+10].choose
      sleep [3].look
    when 2
      play [:c4,:c4+7,:c4+3,:c4+8, :c4+1].choose, amp: 1.5
      sleep [3,1,0.25].choose
    end
    
  end
  
  
  
  live_loop :a1 do
    tick
    
    sample :bd_haus, cutoff: 80, amp: 4, finish: 0.7 if bools(1,0,0,0,0).look
    
    kick = 2
    case kick
    when 1
      sample :bd_ada, amp: 2 if bools(1,0,0,0, 0,1,0,1,0,0).look
    when 2
      sample :bd_ada, amp: 2 if bools(1,0,0,0, 1,1,0,0,0).look
    end
    s = :sn_generic
    
    snare =[1,2].choose
    case snare
    #use_sample_defaults finish: 0.01
    when 1
      sample :sn_dolf, finish: 0.02,amp: 2 if bools(1,0,0,0, 0,1,0,1,0,0).look
    when 2
      sample s, finish: 0.04,amp: 2 if bools(1,0,0,0, 1,1,0,0,0).look
    end
    
    
    k = 8
    bassnote = knit(0,k*3, 1,k, 3,k, 1,k).look
    case bassnote
    
    when 0
      bassn = 0
    when 1
      bassn = 1
    when 2
      bassn = 3
    when 3
      bassn = -2
    when 4
      bassn = -5
    end
    
    
    
    use_synth [:bass_foundation,:saw, :dsaw].choose
    use_synth [:bass_foundation,:saw].choose
    use_synth_defaults cutoff: 60+[0,10,20,30].choose
    #c = line(60,130,steps: 128).look
    #use_synth_defaults cutoff: c
    play :c2+bassn, release: [0.5, 0.01].choose, amp: 2
    use_synth :piano
    play :c4+3+0, release: [0.025,0.1, 0.01].choose
    
    sleep 0.25
  end
end
2 Likes