define :m1 do
  play_pattern_timed [:c4,:a3,:e3,:c4,:a3,:ds3,:c4,:a3,:d3,:c3,:d3],[0.5,0.5,4,0.5,0.5,4,0.5,0.5,4,0.5,0.5], amp: 1.2
  sleep 4
  play_pattern_timed [:c3,:a2,:gs3,:c3,:a2,:g3,:c3,:a2,:fs3,:f3,:e3],[0.5,0.5,4,0.5,0.5,4, 0.5,0.5,4,0.5,0.5], amp: 1.2
  sleep 4
end

define :m2 do
  play_pattern_timed [:a2,:a2,:c3,:d3,:a2,:a2,:g2,:gs2],[1.5,1.5,1,1,1.5,1.5,1,1], sustain: 0.5, release: 0.5, amp: 1.2
end

live_loop :random_riff do
  with_fx :reverb do
    use_random_seed 10300
    use_synth :mod_beep
    s = [0.125, 0.25, 0.5].choose
    8.times do
      r = [0.125, 0.25, 1, 2].choose
      n = (scale :e3, :minor).choose
      co = rrand(20, 100)
      play n, release: r, cutoff: co, amp: 0.5
      sleep s
    end
  end

end
use_bpm 160
in_thread do
  sleep 1
  use_synth :blade
  2.times do
    m1
  end
  2. times do
    m1
  end
  2. times do
    m2
  end
end