use_synth :saw

clap = "<path>/clap.wav"

note_time = 0.22

define :strum do |note_a, note_b, time, repeats|
  repeats.times do
    play note_a
    sleep time
    play note_b
    sleep time
  end
end

define :main_base do |n|
  n.times do
    strum :C3, :C, note_time, 4

    strum :Ab2, :Ab3, note_time, 4

    strum :F2, :F, note_time, 2

    strum :C3, :C, note_time, 2

    strum :G2, :G3, note_time, 4
  end
end

define :melody do
  s = play 60, attack: 0.1, sustain: (note_time * 32) - 0.2, release: 0.1, note_slide: 0.25
  sleep note_time * 6
  control s, note: 65
  sleep note_time * 2
  control s, note: 67
  sleep note_time * 6
  control s, note: 72
  sleep note_time * 2
  control s, note: 70
  sleep note_time * 6
  control s, note: 65
  sleep note_time * 2
  control s, note: 67
  sleep note_time * 8
end

define :melody2 do
  s = play 60, attack: 0.1, sustain: (note_time * 32) - 0.2, release: 0.1, note_slide: 0.25
  sleep note_time * 6
  control s, note: 65
  sleep note_time * 2
  control s, note: 67
  sleep note_time * 6
  control s, note: 72
  sleep note_time * 2
  control s, note: 74
  sleep note_time * 6
  control s, note: 75
  sleep note_time * 2
  control s, note: 72
  sleep note_time * 8
end


#MUSIC

main_base 2

live_loop :flibble do
  sample :bd_haus, rate: 1
  sleep note_time * 2
end

main_base 1

live_loop :flibble do
  3.times do
    sample :bd_haus, rate: 1
    sleep note_time
    sample clap, rate: 1
    sleep note_time
  end

  sample :bd_haus, rate: 1
  sleep note_time
  sample :bd_haus, rate: 1
  sample clap, rate: 1
  sleep note_time
end

with_fx :flanger do
  main_base 2
end

live_loop :flibble do
  sample :bd_haus, rate: 1
  sleep note_time * 2
end

use_synth :supersaw

melody
melody

live_loop :flibble do
  3.times do
    sample :bd_haus, rate: 1
    sleep note_time
    sample clap, rate: 1
    sleep note_time
  end

  sample :bd_haus, rate: 1
  sleep note_time
  sample :bd_haus, rate: 1
  sample clap, rate: 1
  sleep note_time
end

melody2