forked from hkc/cc-stuff
67 lines
2.2 KiB
Lua
67 lines
2.2 KiB
Lua
|
local wlan = peripheral.find("modem", function(addr, modem)
|
||
|
|
return modem.isWireless()
|
||
|
|
end)
|
||
|
|
|
||
|
|
if not wlan then error("no wireless interface") end
|
||
|
|
|
||
|
|
wlan.open(9999)
|
||
|
|
|
||
|
|
local respondedTurtles = {}
|
||
|
|
local keyStates = {}
|
||
|
|
|
||
|
|
parallel.waitForAny(
|
||
|
|
function()
|
||
|
|
while true do
|
||
|
|
local ev, keycode, repeating = os.pullEvent()
|
||
|
|
if ev == "key" then keyStates[keycode] = true
|
||
|
|
elseif ev == "key_up" then keyStates[keycode] = false
|
||
|
|
end
|
||
|
|
|
||
|
|
if keycode == keys.up then
|
||
|
|
wlan.transmit(9999, 9999, { _ = "move", dir = "fwd", dig = keyStates[keys.leftShift] })
|
||
|
|
elseif keycode == keys.down then
|
||
|
|
wlan.transmit(9999, 9999, { _ = "move", dir = "bck" })
|
||
|
|
elseif keycode == keys.left then
|
||
|
|
wlan.transmit(9999, 9999, { _ = "move", dir = "rotl" })
|
||
|
|
elseif keycode == keys.right then
|
||
|
|
wlan.transmit(9999, 9999, { _ = "move", dir = "rotr" })
|
||
|
|
elseif keycode == keys.pageUp then
|
||
|
|
wlan.transmit(9999, 9999, { _ = "move", dir = "up", dig = keyStates[keys.leftShift] })
|
||
|
|
elseif keycode == keys.pageDown then
|
||
|
|
wlan.transmit(9999, 9999, { _ = "move", dir = "down", dig = keyStates[keys.leftShift] })
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end,
|
||
|
|
|
||
|
|
function()
|
||
|
|
while true do
|
||
|
|
local _, side, chan, rchan, data, dist = os.pullEvent("modem_message")
|
||
|
|
if chan == 9999 and rchan == chan then
|
||
|
|
if data._ == "WakeUp" then
|
||
|
|
respondedTurtles[data.from] = { true, "Hello!" }
|
||
|
|
elseif data._ == "Ack" then
|
||
|
|
respondedTurtles[data.from] = { true, "Got it" }
|
||
|
|
elseif data._ == "Error" then
|
||
|
|
respondedTurtles[data.from] = { false, data.error }
|
||
|
|
elseif data._ == "Result" then
|
||
|
|
respondedTurtles[data.from] = { true, data.out}
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end,
|
||
|
|
|
||
|
|
function()
|
||
|
|
while true do
|
||
|
|
os.pullEvent()
|
||
|
|
term.setCursorPos(1, 1)
|
||
|
|
for id, res in pairs(respondedTurtles) do
|
||
|
|
term.write(string.format("%5d => ", id))
|
||
|
|
term.setTextColor(res[1] and colors.green or colors.red)
|
||
|
|
term.write(res[1] and "[ OK ] " or "[FAIL] ")
|
||
|
|
term.write(tostring(res[2]))
|
||
|
|
term.setTextColor(colors.white)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
)
|