# 230704 1825 Exploring new hihat sampes in Sonic pi v4_4
# Saved 230704 1825
with_fx :reverb, room: 0.4 do
with_fx :flanger, mix: 0 do |flanger|
live_loop :new_hihat_samples do
tick
/ fx /
fl = [0,0,0,0.2,0.4].choose
control flanger, mix: fl
/ bass /
use_synth :saw
use_synth_defaults release: [0.1,0.1,0.3].look, cutoff: [60,90,110].choose
kn = 16
n = :c2+knit(0,kn,-2,kn).look+0
bass = 1 # 1
bass = knit(1,64-16+8, 0,16-8).look
case bass
when 0
when 1
play [n,n,n,n,n+12].look
when 2
play [n,n,n,n,n+12, nil,nil, nil,nil,nil].look
end
/ top melody /
topmel = 2
topmel = knit(0,32, 1,32, 2,32).look
case topmel
when 0
when 1
play [n,n,n,n,n+12].look+[0,3,-2].look+12+12, pan: rdist(0.5)
when 2
play [n,n,n,n,n+12].look+[0,3,7,-2].choose+12+12, pan: rdist(0.75)
end
# kick 4/4
sample :bd_haus, cutoff: 90, amp: 1 if spread(1,4).look
# new hihats 96-115
sample rrand_i(96,115), rpitch: [0,12].choose #if spread(3,5).look
# rythm generator on hihats and extra kick
rythm = knit(1,16*3, 2,16).look
# rythm = 1 #1
case rythm
when 1
sleep [0.25, 0.25,0.125,0.125].look
when 2
sleep [0.25, 0.25,0.125,0.125].look
sample :bd_haus, cutoff: 100, amp: 1 if spread(1,5).look
when 3
sample :bd_haus, cutoff: 90, amp: 1 if spread(1,5).look
sleep 0.25
when 4
sleep 0.125
end
end
end #end_reverb
end #end_krush
1 Like