Pasted

-- main.lua
 
--(( APIs ))--
 
os.loadAPI("util")
os.loadAPI("inv")
os.loadAPI("mail")
 
--(( Settings ))--
 
local rsOutput = "left"
-- seconds between each tick
local tickDelay = 5
-- seconds between each update
local updateWait = 1
 
--(( Variables ))--
 
--(( Functions ))--
 
local function handleDisk()
    local data = mail.readMail()
 
    if data.err then
        if data.err ~= "missing_item" then
            print(mail.err[data.err])
 
            inv.emptyDrive()
        end
    else
        mail.writeMail(data)
        inv.emptyDrive(inv.getDirection(data.sender))
    end
end
 
local function tickRedstone()
    rs.setOutput(rsOutput, os.clock() % tickDelay / tickDelay > 0.5)
end
 
local function update()
    handleDisk()
    tickRedstone()
end
 
--(( Mane program ))--
 
-- empty the printer just in case
pcall(mail.getPrinter().endPage)
inv.emptyDropper()
 
 
-- Main loop
while true do
    update()
    sleep(updateWait)
end
 
-- eof