chord_list_old = [
  chord(:D4,:minor),
  chord(:A4,:major),
  chord(:D4,:minor),
  chord(:c4,:major),
  chord(:F4,:major),
  chord(:c4,:major),
  chord(:D4,:minor),
  chord(:A4,:major)
]

chord_list_short = [
  chord(:C,:major7),
  chord(:F,:major7),
  chord(:G,"7")
]

chord_list_sad = [
  chord(:B, :minor7),
  chord(:G, :major7),
  chord(:D, :major7),
  chord(:A, "7")
]
use_bpm 160
loop_size = 4

def chord_progression(chord_list, duration:, amp_choice: [1],  release: 1)
  for c in chord_list
    play_chord c, amp: amp_choice.choose, release: release
    sleep duration
  end
end

use_synth :dtri
live_loop :dtri_loop do
  loop_size.times do
    chord_progression chord_list_short, duration: 1, release: 0.8
  end
  loop_size.times do
    chord_progression chord_list_sad, duration: 1, release: 0.6
  end
  sleep 1
end

use_synth :piano
live_loop :piano_loop do
  (loop_size*4).times do
    chord_progression chord_list_short, duration: 0.25, amp_choice: [1, 1, 0]
  end
  (loop_size*4 + 1).times do
    chord_progression chord_list_sad, duration: 0.25, amp_choice: [1.2, 0, 0]
  end
end

sleep 4.5

live_loop :kickdrum do
  sample :bd_haus, amp: 1.3
  sleep 2
end

sleep 1

sample :drum_roll, amp: 2

sleep 3

live_loop :hihat do
  sample :drum_cymbal_soft, amp: 0.4
  sleep 0.5
end

sleep 5

live_loop :snare do
  sleep 1
  sample :drum_snare_soft, amp: 1.3
  sleep 1
end