-- start timers code

local timers = {}
local last_time = nil

function init_timers ()
  last_time = time()
end

function add_timer (name,
    length, step_fn, end_fn,
    start_paused)
  local timer = {
    length=length,
    elapsed=0,
    active=not start_paused,
    step_fn=step_fn,
    end_fn=end_fn
  }
  timers[name] = timer
  return timer
end

function update_timers ()
  local t = time()
  local dt = t - last_time
  last_time = t
  for name,timer in pairs(timers) do
    if timer.active then
      timer.elapsed += dt
      local elapsed = timer.elapsed
      local length = timer.length
      if elapsed < length then
        if timer.step_fn then
          timer.step_fn(dt,elapsed,length,timer)
        end  
      else
        if timer.end_fn then
          timer.end_fn(dt,elapsed,length,timer)
        end
        timer.active = false
      end
    end
  end
end

function pause_timer (name)
  local timer = timers[name]
  if (timer) timer.active = false
end

function resume_timer (name)
  local timer = timers[name]
  if (timer) timer.active = true
end

function restart_timer (name, start_paused)
  local timer = timers[name]
  if (not timer) return
  timer.elapsed = 0
  timer.active = not start_paused
end

-- end timers code

-- start app code

function _update ()
  update_timers()
end

function _init ()
  init_timers()

  local last_int = 0
  print(last_int)
  sfx(last_int)
  add_timer(
    "timer1",
    10,
    function (dt,elapsed,length)
      local i = flr(elapsed)
      if i > last_int then
        print(i)
        sfx(i)
        last_int = i
      end
    end,
    function ()
      print("done!")
      sfx(10)
    end
  )
end

-- end app code

local timers -- CRITICAL
-- this is a table that tracks your timers by name

local last_time -- CRITICAL
-- this is the last value of time() recorded.

function init_timers() -- CRITICAL
-- run this at the start of your _init() function to make sure
-- last_time is properly in-sync.

function add_timer (name, length, step_fn, end_fn, start_paused)  -- CRITICAL
-- use this function to track a new timer.
-- PARAMS:
-- * name:
--    You can use "timers[name]" to access your timer later on, if you need to.
--    type: string
--    required? Yes.
-- * length:
--    How many seconds your timer should last.
--    type: number
--    required? Yes.
-- * step_fn:
--    A callback that gets called each time update_timers() is run.
--    Receives (dt,elapsed,length,timer) as parameters.
--    type: function
--    required? No.
-- * end_fn:
--    A callback that gets called once after the timer has expired.
--    Receives (dt,elapsed,length,timer) as parameters.
--    type: function
--    required? No.
-- * start_paused:
--    If present and truthy, makes the timer initialize as inactive.
--    type: boolean
--    required? No.

function update_timers() -- CRITICAL
-- run this as part of your _update() function.

function pause_timer(name) -- OPTIONAL
-- synactic sugar equivalent to 'timers[name].active = false.'
-- leave out if you won't use this much or at all.
-- fails silently if timer doesn't exist.

function resume_timer(name) -- OPTIONAL
-- synactic sugar equivalent to 'timers[name].active = true.'
-- leave out if you won't use this much or at all.
-- fails silently if timer doesn't exist.

function restart_timer(name, start_paused) -- OPTIONAL
-- synactic sugar equivalent to 'timers[name].elapsed = 0;timers[name].active = not start_paused.'
-- leave out if you won't use this much or at all.
-- fails silently if timer doesn't exist.
-- PARAMS:
-- * name:
--    type: string
--    required? Yes.
-- * start_paused:
--    If present and truthy, sets the timer to inactive.
--    type: boolean
--    required? No.

function update_timers()
	for timer in all(timers) do
		if (timer.active) then
			timer.t_value=timer.t_value - 1
			if (timer.t_value==0) then
				 timer.acitve=false
					timer.toexecute=true
			end
		end
	end
end

function add_timer(name,t_start,t_repeat)
	add(timers, {
		name=name,
		active=false,
		t_start=t_start,
		t_value=t_start,
		t_repeat=t_repeat,
		t_toexecute=false
	})
end

function del_timer(name)
	 for timer in all(timers) do
 	if (timer.name == name) then
 			del(timers, timer)
 	end
 end
end

function start_timer(name)
 for timer in all(timers) do
 	if (timer.name == name) then
 		timer.active=true
 	end
 end
end

function stop_timer(name)
 for timer in all(timers) do
 	if (timer.name == name) then
 		timer.active=false
 	end
 end
end

function reset_timer(name)
 for timer in all(timers) do
 	if (timer.name == name) then
 	 timer.t_value = timer.t_start
 	end
 end
end

function check_timer(name)
	for timer in all(timers) do
  if ((timer.toexecute) and (timer.name==name)) then
 	  timer.toexecute = false
	   timer.t_value = timer.t_start
 	  if (timer.t_repeat == true) then
 	   timer.active = true
 	  else 
 	   timer.active = false
 	  end 
 		 return true

 	else 
 	  return false
 	end
	end
end

--add_timer("name","start value to countdown from", true/false for repeate)
add_timer("titel_hiscore",150,true);
start_timer("titel_hiscore")

function _update()
 update_timers()
 if (btnp(4)) then
  stop_timer("titel_hiscore") --stop timer before leaving to the game
  game_init(1) 
 end
 if (check_timer("titel_hiscore")) then
   --here goes the action when the timer fired
 end
end