workspace_three.spi

# thumping...

use_bpm 86



arpeggiate [4,2,1], :a3, :major_pentatonic, [0,3], 4

sleep 2


with_fx :echo, phase: 0.25, mix: 0.2 do
  live_loop :plips do
    sample :arovane_beat_a, onset: 2, beat_stretch: 1,  cutoff: 130, rate: 1.1 if (ring 1,1,1,1,1,0,1,1,1,0,1,0,1,1,0,0).tick == 1
    sleep 0.25
  end
end

live_loop :bass do
  #stop
  sync :plips
  sample :bd_boom, amp: 0.9 if (ring 1,0,1,0,0,0,0,0).tick == 1
  sleep 0.5
end

live_loop :riff do
  #stop
  sync :plips
  #use_synth :beep
  use_synth :piano
  use_octave -2
  use_synth_defaults sustain: 0, release: 0.3, amp: 0.8
  play (ring :g4,:g5,:g4,:g5,:fs5,:r,:e5,:fs5,:g5,:r,:fs5,:g5,:a5,:r,:r,:r).tick
  sleep 0.25
end

live_loop :chord do
  stop
  sync :riff
  use_synth :piano
  use_octave -2
  use_synth_defaults sustain: 0, release: 0.3, amp: 0.8
  play (ring :fs3,:fs4,:e4,:fs5,:cs5,:r,:e5,:cs5,:fs5,:r,:fs5,:cs5,:a5,:r,:r,:r).tick
  sleep 0.25
  
end

live_loop :chord2 do
  stop
  sync :chord
  use_synth :piano
  use_octave -2
  use_synth_defaults sustain: 0, release: 0.3, amp: 0.8
  play (ring :d3,:d4,:a4,:d5,:d5,:r,:e5,:cs5,:fs5,:r,:fs5,:d5,:a5,:r,:r,:r).tick
  sleep 0.125
  
end




# e.g. arpeggiate [4,2,3], :d3, :major, [0,1,2,3,4], 4