From a2770298f040307f8dd59c7a88d7e40d37faec14 Mon Sep 17 00:00:00 2001
From: Elias Fleckenstein <eliasfleckenstein@web.de>
Date: Fri, 6 Aug 2021 19:19:23 +0200
Subject: Add source code

---
 intervals.lua | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 intervals.lua

(limited to 'intervals.lua')

diff --git a/intervals.lua b/intervals.lua
new file mode 100644
index 0000000..72a0cc7
--- /dev/null
+++ b/intervals.lua
@@ -0,0 +1,33 @@
+lua_async.intervals = {
+	pool = {},
+	last_id = 0,
+}
+
+function setInterval(callback, ms, ...)
+	local id = lua_async.intervals.last_id + 1
+	lua_async.intervals.last_id = id
+	local step_time = (ms or 0) / 1000
+	lua_async.intervals.pool[id] = {
+		time_left = step_time,
+		step_time = step_time,
+		callback = callback,
+		args = {...},
+	}
+	return id
+end
+
+function clearInterval(id)
+	lua_async.intervals.pool[id] = nil
+end
+
+function lua_async.intervals.step(dtime)
+	for id, interval in pairs(lua_async.intervals.pool) do
+		interval.time_left = timeout.time_left - dtime
+
+		if interval.time_left <= 0 then
+			interval.callback(unpack(interval.args))
+			interval.time_left = interval.step_time
+		end
+	end
+end
+
-- 
cgit v1.2.3