Logger.lua

local component = require("component")
local modem = component.modem
local io = require("io")
local event = require("event")
local fs = require("filesystem")

ports, msgs = ...

for prt = 1,ports do
modem.open(prt)
end

n = tonumber(msgs)
h = fs.open("Log.txt", "a")
while n > 0 do
local _, _, from, port, _, message = event.pull("modem_message")
print("Got a message from " .. from .. " on port " .. port .. ": " .. tostring(message))
h:write("Got a message from " .. from .. " on port " .. port .. ": " .. tostring(message) .. "\n")
n = n - 1
end

for prtc = 1,ports do
modem.close(prtc)
end

h:close()

print("Saved logs to Logs.txt.")