import std/os
import std/sequtils
import std/times

import ../semicongine

proc test1() =
  addSound("test1", sineSoundData(1000, 2, 44100))
  addSound("test2", sineSoundData(500, 2, 44100))

  let s1 = play("test1", loop = true)
  let s2 = play("test2", loop = true)

  let t0 = now()
  setLevel(0.5)
  while true:
    let runtime = (now() - t0).inMilliseconds()
    if runtime > 1500:
      setLevel(0.2)
    if runtime > 3000:
      stop(s2)
    if runtime > 6000:
      stop("")
    if runtime > 8000:
      break

proc test2() =
  let
    # notes
    c = sineSoundData(261.6256, 0.5, 44100)
    d = sineSoundData(293.6648, 0.5, 44100)
    e = sineSoundData(329.6276, 0.5, 44100)
    f = sineSoundData(349.2282, 0.5, 44100)
    g = sineSoundData(391.9954, 0.5, 44100)
    a = sineSoundData(440.0000, 0.5, 44100)
    b = sineSoundData(493.8833, 0.5, 44100)
    bb = sineSoundData(466.1638, 0.5, 44100)
    c2 = sineSoundData(523.2511, 0.5, 44100)
    d2 = sineSoundData(587.3295, 0.5, 44100)
    bbShort = sineSoundData(466.1638, 0.25, 44100)
    c2Short = sineSoundData(523.2511, 0.25, 44100)
    d2Short = sineSoundData(587.3295, 0.25, 44100)

    # song
    frerejaquesData = concat(
      f, g, a, f, f, g, a, f, a, bb, c2, c2, a, bb, c2, c2, c2Short, d2Short, c2Short,
      bbShort, a, f, c2Short, d2Short, c2Short, bbShort, a, f, f, c, f, f, f, c, f, f,
    )

  addSound("frerejaques", frerejaquesData)
  discard play("frerejaques")

  while isPlaying():
    sleep(1)

proc test3() =
  addSound("toccata et fugue", loadAudio("toccata_et_fugue.ogg"))
  addSound("ping", sineSoundData(500, 0.05, 44100))
  addTrack("effects")
  discard play("toccata et fugue")

when isMainModule:
  initEngine("Test audio")
  test1()
  stop()
  test2()
  stop()
  test3()

  while isPlaying():
    # on windows we re-open stdin and this will not work
    when defined(linux):
      discard play("ping", track = "effects", stopOtherSounds = true, level = 0.5)
      echo "Press q and enter to exit"
      if stdin.readLine() == "q":
        stop()
    elif defined(windows):
      sleep(1000)