receive.lua

local tArgs = { ... }
local filename
if (#tArgs == 1) then
    filename = tArgs[1]
else
    filename = "output.lua"
end

if (rednet.isOpen("right") == false) then
    rednet.open("right")
end

local dir = fs.getDir(shell.getRunningProgram())
local file = fs.open(dir.."/"..filename, "a")

print("Waiting...")

repeat
    local e, m = rednet.receive("p", 5)
    if m ~= "endfile" then
        file.writeLine(m)
    end
    if (e == nil) then
        print("Timeout")
        file.close()
        fs.delete(dir.."/"..filename)
    end
until m == "endfile" or e == nil