Kookster-Telesender

--[[ startup
id="uVjjCYDh"
loadstring(http.get("http://pastebin.com/raw.php?i=" .. id).readAll())()
]]--

modem = false
monitor = false
myChannel = 409
teleporterChannel = 408

for a,b in pairs(rs.getSides()) do
    if peripheral.getType(b) == 'monitor' then
        print("Found monitor on " .. b .. ", using it.")
        monitor = peripheral.wrap(b)
    elseif peripheral.getType(b) == 'modem' then
        print("Found modem on " .. b .. ", attaching to " .. myChannel)
        modem = peripheral.wrap(b)
        modem.open(myChannel)
    end
end

if (monitor ~= false) then
    term.redirect(monitor)
end

fs.delete("teleport")
teleport = "print('Requesting teleport...')\n"
teleport = teleport .. "modem.transmit(teleporterChannel, myChannel, 'teleport')"
file = fs.open("teleport", "w")
file.write(teleport)
file.close()

print("Type 'teleport' to attempt a teleport!")