OC-MultICE/modules/library/net.lua

25 lines
549 B
Lua

tM,nP,nID = {}, 4096, 1
for a,t in component.list("modem") do
table.insert(tM,component.proxy(a))
component.proxy(a).open(nP)
end
function ns(id,po,msg)
h("sendmsg",id,po,msg)
end
s("network daemon",function ()
print("Network daemon starting.\nNetwork ID: "..tostring(nID))
while true do
if ev[1] == "sendmsg" then
local eT = ev
for k,v in ipairs(tM) do
v.broadcast(nP,eT[2],nID,eT[3],eT[4])
end
elseif ev[1] == "modem_message" then
if ev[6] == nID then
h("net_msg",ev[7],ev[8],ev[9])
end
end
C.yield()
end
end)