Sonic Pi - Arpeggios

Improvisação baseada em sequências de notas presentes em acordes e/ou escalas musicais.

# Alexandre rANGEL 'discovering myself' v1
# www.quasecinema.org
# 13-Nov-2016
# Sonic Pi 2.11

set_recording_bit_depth! 32
use_bpm 45/1.5 #60, 45, 45/1.5=30, 45/2, 45/4, 45/8, 45/16
start = 0

with_fx :reverb, mix: 0.5 do
  with_fx :compressor, pre_amp: 1.5,
    thereshold: 0.5,
  slope_above: 2, slope_above: 0.7 do
    
    lfo = range(0.0, 1.0, 0.0045).mirror
    
    323.times do
      x = tick+start
      y = (ring 12,8,8,9,8,8,7)[x/48]
      
      with_fx :wobble, res: lfo[x], res_slide: 0.12,
      mix: ring(0.53,0,0.72,0)[x] * lfo[x]  do
        
        print x
        print lfo[x]
        
        use_synth (ring :chiplead, :chipbass)[x/48]
        play scale(:c,:spanish)[x], pan: -1 if (spread 3, y)[x]
        
        use_synth :piano
        play scale(:c,:spanish)[x], amp: rrand(1.8,2), pan: 1 if (spread 3, 8)[x] == false
        
      end
      
      sleep 0.125
      
    end #loop
    

  end
end