changed source project

source/project/objects/Timer.lua

@@ -0,0 +1,65 @@
+local function Timer(name)
+    local objectType = "Timer"
+
+    local timer = 0
+    local savedRepeats = 0
+    local repeats = 0
+    local timerObj
+    local eventSystem = BasaltEvents()
+
+    local object = {
+        name = name,
+        getType = function(self)
+            return objectType
+        end;
+
+        getZIndex = function(self)
+            return 1
+        end;
+
+        getName = function(self)
+            return self.name
+        end;
+
+        setTime = function(self, _timer, _repeats)
+            timer = _timer or 0
+            savedRepeats = _repeats or 1
+            return self
+        end;
+
+        start = function(self)
+            repeats = savedRepeats
+            timerObj = os.startTimer(timer)
+            return self
+        end;
+
+        cancel = function(self)
+            if (timerObj ~= nil) then
+                os.cancelTimer(timerObj)
+            end
+            return self
+        end;
+
+        onCall = function(self, func)
+            eventSystem:registerEvent("timed_event", func)
+            return self
+        end;
+
+        eventHandler = function(self, event, tObj)
+            if (event == "timer") and (tObj == timerObj) then
+                eventSystem:sendEvent("timed_event", self)
+                if (repeats >= 1) then
+                    repeats = repeats - 1
+                    if (repeats >= 1) then
+                        timerObj = os.startTimer(timer)
+                    end
+                elseif (repeats == -1) then
+                    timerObj = os.startTimer(timer)
+                end
+            end
+        end;
+    }
+    object.__index = object
+
+    return object
+end