# 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