YT short samples with beautiful gverb train

Performances, Streams & Live Coding
1 



# 231001 0005 short samples with beautiful gverb YT train
# Saved 231001 0005
# https://youtu.be/ZpuMw4usRBA
# Created by https://linktr.ee/relaxnow



set_volume! 1

with_fx :gverb, room: 2 do # room: 2 (original), 1.5(transpose down), 100
  
  live_loop :a1 do
    tick
    
    / Array of short samples /
    #                  original    best
    #                0    1           2         3            4            5           6
    short_samples = [nil, :elec_tick, :hat_cab, :tabla_na_s, :tabla_dhec, :elec_plip, :elec_twip]
    note_root  = [nil, :c6-1,      :c6-1] #not done yet
    
    / Chosing sample to play /
    s = short_samples[1] # nice
    s = short_samples[2] # nice !
    #s = short_samples[6]  # 1-6
    #s = short_samples[rrand_i(1,6)]
    
    
    
    / Pattern /      # 1 or 0
    Pattern = 0
    #    Pattern = 1
    lk = 16*2
    #    Pattern = knit(0,lk, 1,lk).look
    
    case Pattern
    when 0
    when 1
      amplvl = 1.8 # original 1,   1.5 or 2 for lower volumen
      sample s, rpitch: [-24].choose, amp: [0,1,1,2].choose/amplvl if bools(1,0,0,0,0).look
      sample s, rpitch: [-12].choose, amp: [0,1,1,2].choose/amplvl if bools(1,0,0,0).look
      sample s, rpitch: [0,5,12].choose, amp: [0,1,1,2].choose/amplvl, pan: rdist(0.5)
      #sample s, finish: 0.08, rpitch: [0,5,12].choose+12, amp: [0,1,1,2].choose, pan: rdist(1)#, hpf: 90
    end
    
    / Soft ghostnotes /
    sample s, finish: 0.08, rpitch: [0,5,12].choose+12, amp: [0,1,1,2].choose, pan: rdist(1)#, hpf: 90
    
    / Kick with gverb /
    sample :bd_haus, cutoff: 90, finish: 0.4 if (bools(1,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0)+bools(1,0,1,0, 0,0,0,0, 0,0,0,0, 0,0,0,0)).look
    
    / Testing "Spark" for fun (I would like it to display bools pattern, but dont know how to do that) /
    spark (range 1, 25).shuffle if (bools(1,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0)+bools(1,0,1,0, 0,0,0,0, 0,0,0,0, 0,0,0,0)).look
    
    
    sleep 0.25
  end
  
end

/ Kick without gverb /
live_loop :kick do
  tick
  k = 16
  c = knit(75,k, 85,k, 95,k).mirror.look+knit(0,64,20,64).look
  amplvl = line(1,1.5,steps: 64).mirror.look
  sample :bd_haus, amp: [1.75,1.5,2].choose*amplvl, cutoff: c if (bools(1,0,0,1,0,0,0,1)+bools(1,0,1,1,0,1,0,1)).look
  sleep 0.25
end




/ Top melody with :beep and reverb /
with_fx :reverb, room: 0.94 do
  live_loop :top_melody do
    tick
    note_root  = [nil, :c6-1,      :c6-1] #not done
    n = note_root[2]
    q = 0.25
    
    /change here/ # 0-5  (need a stop/start to align since I havnt ajusted sleep sync values)
    riff = 0
    
    case riff
    when 0
      sleep 1
    when 1
      / Riff A/
      play [n, n-2,n-4].look
      sleep [4,4,4+4].look
    when 2 # works i think
      play  [n, n-2,n-4, n-7, n-5, n-4, n-2].look
      sleep [4, 4,  4+3, q,  q  , q,   q].look
    when 3 # full riff
      play  [n, n-2,n-4, nil, n-7, n-5, n-4, n-2].look
      sleep [4, 4,  4+2, q*2, q,   q  , q*2, q*2].look
      
    when 4
      / Riff B /
      play [n, n-2,n-4,n-5].look
      sleep [4,4,4,4].look
      
    when 5
      / Riff C /
      play  [n,n+3, n-2,n,   n-4,n-2, n-5,n-4,nil].look-12
      sleep [q,q*2, q,  q*2, q,  q*2, q,  q*2,5  ].look
    end
    
  end
end
2 Likes