screenblank works with the new rc system now, rejoyce

このコミットが含まれているのは:
Izaya 2020-03-26 17:43:22 +11:00
コミット 67de47ebd4
1個のファイルの変更19行の追加15行の削除

ファイルの表示

@ -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