Quick jam while traveling YT

# 240915 2004 quick jam while traveling
# 240915 2004
# https://linktr.ee/relaxnow
# https://in-thread.sonic-pi.net/t/240915-1224-quick-jam-while-traveling/9204
# https://youtu.be/bvDbYaQED_s


set_volume! 2

live_loop :v1 do
  tick
  #set_volume! line(2,0,steps: 64).ramp.look # slow fade out
  ##set_volume! line(0,2,steps: 64).ramp.look
  sleep 0.25
end


define :s do |a,b|
  spread(a,b)
end

use_bpm 120

with_fx :reverb, room: 0.4 do
  live_loop :a1 do
    tick
    
    sample :bd_fat, amp: 1.5 if s(1,7).look
    sample :bd_fat if (s(4,7)*3+s(5,7)).look and (s(7,7)+s(0,7)).look
    sample :bd_fat, rpitch: 12+12+12 if s(3,7).rotate(2).look and (s(0,7*2)+s(7,7*2)).look
    
    sleep 0.25
  end
  
  live_loop :a2 do
    tick
    use_synth :noise
    use_synth_defaults release: [0.01,0.02,0.03].choose, amp: 0.25, cutoff: line(90,120, steps: 128).mirror.look
    play :c2 if s(11,13).look
    sleep 0.25
  end
  
  with_fx :krush do |krush|
    with_fx :level do |level|
      
      
      live_loop :a4 do
        tick
        control level, amp: line(0,0.7, steps: 7*8).mirror.look
        control krush, mix: [0,0.2,0.4].choose
        mid_mel = knit(1,7*8, 2,7*4, 0,7*8).look
        #mid_mel = 1
        case mid_mel
        when 0
        when 1
          use_synth :saw
          use_synth_defaults cutoff: 70, release: [0.1,0.2,0.3].choose-0.05
          play :c3+knit(0,7*4,1,7*4).look, amp: 1 if s(3*7,7*4).look
          play :c3+7+knit(0,7*4,1,7*4).look, amp: 1 if s(3*7,7*4).rotate(2).look
        when 2
          use_synth :saw
          use_synth_defaults cutoff: 90, release: [0.1,0.2,0.3].choose-0.05
          play :c3+knit(0,7*4,1,7*4).look, amp: 0.5 if s(3*7,7*4).look
          play :c3+7+knit(0,7*4,1,7*4).look, amp: 0.5 if s(3*7,7*4).rotate(2).look
        end
        
        sleep 0.25
      end
    end
  end
  
end
with_fx :reverb, room: 0.99 do
  live_loop :a3 do
    tick
    use_synth :saw
    use_synth_defaults cutoff: 70
    play :c1, amp: 2 if s(1,7*4).look
    
    high_mel = knit(0,7*8, 1,7*8, 2,7*8).look
    case high_mel
    when 0
    when 1
      puts "high_mel = 1"  if s(1,7*4).look
      use_synth :beep
      play :c5+knit(0,7*4, 1,7*4, 7,7*4, 5,7*4).look, amp: 0.125 if s(knit(1,7*2 ,2,7, 1,7).look,7*2).rotate(0).look
    when 2
      puts "high_mel = 2" if s(1,7*4).look
      use_synth :beep
      play :c5+knit(0,7*4, 1,7*4, 7,7*4, 5,7*4).look, amp: 0.125 if s(knit(1,7*2 ,2,7, 1,7).look,7*2).rotate(0).look
      play :c6+knit(-7,7*3,0,7).look, amp: 0.15 if s(1,7*4).rotate(7*2-1).look
    end
    sleep 0.25
  end
end
2 Likes

Very chill vibe. I like!

1 Like