Sonic Pi day1 “tabla”

use_debug false
use_bpm 110

t1 = 0
t2 = 0

a = 0.125
b = 0.25
c = 0.375

live_loop :drums do
  s1 = ["tabla_tas1", "tabla_tas2", "tabla_ghe1", "tabla_ghe2", "tabla_ke1", "tabla_ke2"].choose
  s2 = ["tabla_tas1", "tabla_tas2", "tabla_ghe1", "tabla_ghe2", "tabla_ke1", "tabla_ke2"].choose
  
  t1 = [a, b, c].choose
  case t1
  when a
    t2 = c
  when b
    t2 = b
  else
    t2 = a
  end
  
  
  
  sample :drum_cymbal_closed
  sleep 0.25
  sample s2
  sleep 0.125
  sample s1
  sleep 0.125
  sample :tabla_ghe2
  sleep t1
  sample :tabla_tas2
  sleep t2
  sample :tabla_ke3
  sleep 0.25
  sample :tabla_ghe2
  sleep 0.25
  sample :tabla_tas1
  sleep t1
  sample :s2
  sleep t2
  
  print s1,s2
  print t1,t2
end


live_loop :kick do
  with_fx :eq, low:0.5, low_note:58, high:0.5 do
    15.times do
      sample :bd_fat, amp:4
      sleep 1
    end
    sample :bd_fat, amp:4
    sleep 0.77
    sample :bd_fat, amp:2
    sleep 0.23
    
  end
end



live_loop :pad do
  with_fx :reverb, mix:0.5, room:0.9 do
    sample :ambi_glass_hum, attack:0.3, release:2, amp:2
    sleep 8
    sample :ambi_glass_hum, amp:2, pitch:2,release:2
    sleep 7
    
    for i in 1..8
      sample :drum_tom_hi_soft, pan:i/8
      sleep 0.125
    end
    
    
    
  end
end



live_loop :drumloop do
  3.times do
    sample :ambi_glass_hum, beat_stretch: 2, start: 0, finish: 0.125
    sleep 0.5
    sample :ambi_glass_hum, beat_stretch: 8, start: 0, finish: 0.125
    sleep 0.5
    sample :ambi_glass_hum, beat_stretch: 8, start: 0.5, finish: 0.75
    sleep 1
    sample :ambi_glass_hum, beat_stretch: 4, start: 0.25, finish: 0.5
    sleep 1
    sample :ambi_glass_hum, beat_stretch: 4, start: 0.75, finish: 0.875
    sleep 0.5
    sample :loop_amen, beat_stretch:rrand(1,4), start:0.25, finish: 0.375
    sleep 0.5
    sample :ambi_glass_hum, beat_stretch: 2, start: 0, finish: 0.125
  end
  
  1.times do
    sleep 0.5
    sample :ambi_glass_hum, beat_stretch: 8, start: 0, finish: 0.125
    sleep 0.5
    sample :ambi_glass_hum, beat_stretch: 8, start: 0.5, finish: 0.75
    sleep 1
    sample :ambi_glass_hum, beat_stretch: 4, start: 0.25, finish: 0.5
    sleep 1
    sample :loop_breakbeat, beat_stretch: 4, start: 0.75, finish: 0.875
    sleep 0.5
    sample :loop_amen, beat_stretch:4, start:0.25, finish: 0.5
    sleep 0.25
    sample :loop_amen, beat_stretch:4, start:0.375, finish: 0.5
    sleep 0.25
  end
  
end

コメントを残す

CAPTCHA