e

AceVM/init

@@ -39,6 +39,13 @@ function string.split(str, delim, maxResultCountOrNil)
     return rv
 end
 
+function _VG.sleep(nTime)
+    local timer = os.startTimer(nTime or 0)
+    repeat
+        local _, param = coroutine.yield("timer")
+    until param == timer
+end
+
 INTERNAL_DISKS={}
 INTERNAL_SCREENS={}
 INTERNAL_NET={}
@@ -52,7 +59,7 @@ function addEventRaw(...)
 end
 
 function newComponent(type, object)
-    local id = tostring(#INTERNAL_COMPONENT_REGESTRY+1)
+    local id = #INTERNAL_COMPONENT_REGESTRY+1
     INTERNAL_COMPONENT_REGESTRY[id] = {type=type, object=object}
     addEventRaw("componentAdded", type, object)
     return {
@@ -73,19 +80,23 @@ function _VG.component.list()
     local i = 0
     return function()
         i=i+1
-        return INTERNAL_COMPONENT_REGESTRY[tostring(i)].type, INTERNAL_COMPONENT_REGESTRY[tostring(i)].object
+        if INTERNAL_COMPONENT_REGESTRY[i] then
+            return INTERNAL_COMPONENT_REGESTRY[i]["type"], INTERNAL_COMPONENT_REGESTRY[i]["object"]
+        else
+            return
+        end
     end
 end
 
 function _VG.component.getFirst(type)
     local object={}
     for i,v in pairs(INTERNAL_COMPONENT_REGESTRY) do
-        if INTERNAL_COMPONENT_REGESTRY[tostring(i)].type == type then
-            object=INTERNAL_COMPONENT_REGESTRY[tostring(i)]
+        if INTERNAL_COMPONENT_REGESTRY[i].type == type then
+            object=INTERNAL_COMPONENT_REGESTRY[i]
             break
         end
     end
-    return object.object
+    return object["object"]
 end
 
 for i,v in ipairs(fs.list("/AceVM/components/")) do
@@ -99,4 +110,31 @@ local file=fs.open("/computers/0/bios.lua","r")
 local bios=file.readAll()
 file.close()
 file=nil
-load(bios,"@bios",nil,_VG)()
+local func = load(bios,"@bios",nil,_VG)
+if not func then error("BIOS ERR") end
+local BIOS_CORO = coroutine.create(func)
+debug.sethook(BIOS_CORO, function() coroutine.yield("CC:TWEAKED", "CORO_TIMEOUT") end, "l", 20)
+while true do
+    local ret = {coroutine.resume(BIOS_CORO)}
+    if ret[1] == false then
+        os.shutdown()
+    end
+    local timer = os.startTimer(0)
+    local exit = false
+    repeat
+        local event = {coroutine.yield()}
+        if event[1] == "timer" and event[2] == timer then
+            exit=true
+        elseif event[1]=="timer"or nil then
+        elseif event[1]=="key" then
+            addEventRaw("keyPressed", 1, event[2])
+            if akeys[event[2]] then
+                addEventRaw("keyTyped", 1, keys[event[2]])
+            end
+        elseif event[1]=="char" then
+            addEventRaw("keyTyped", 1, event[2])
+        elseif event[1]=="key_up" then
+            addEventRaw("keyReleased", 1, event[2])
+        end
+    until exit
+end