瀏覽代碼

screenblank works with the new rc system now, rejoyce

pull/1/head
XeonSquared 4 年之前
父節點
當前提交
67de47ebd4
共有 1 個檔案被更改,包括 19 行新增15 行删除
  1. +19
    -15
      service/screenblank.lua

+ 19
- 15
service/screenblank.lua 查看文件

@@ -1,21 +1,25 @@
local lastkey = computer.uptime()
local state = true
local delay = 60
while true do
tEv = {coroutine.yield()}
if tEv[1] == "key_down" then
lastkey = computer.uptime()
if not state then
for addr in component.list("screen") do
component.invoke(addr,"turnOn")
function start()
return os.spawn(function()
while true do
tEv = {coroutine.yield()}
if tEv[1] == "key_down" then
lastkey = computer.uptime()
if not state then
for addr in component.list("screen") do
component.invoke(addr,"turnOn")
end
state = true
end
end
if computer.uptime() > lastkey + delay and state then
for addr in component.list("screen") do
component.invoke(addr,"turnOff")
end
state = false
end
state = true
end
end
if computer.uptime() > lastkey + delay and state then
for addr in component.list("screen") do
component.invoke(addr,"turnOff")
end
state = false
end
end,"screenblank")
end

Loading…
取消
儲存