Kookster-Teleporter

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

teleporter = false
modem = false
enable = "bottom"
running = false
myChannel = 408
monitorChannel = 409

for a,b in pairs(rs.getSides()) do
    if peripheral.getType(b) == 'modem' then
        print("Found modem on " .. b .. ", attaching to " .. myChannel)
        print("Hold CTRL-T for one second to stop, CTRL-R to reboot and update.")
        modem = peripheral.wrap(b)
        modem.open(myChannel)
    elseif (peripheral.getType(b) == 'jakj_redstoneinmotion_carriagetranslocatorentity') then
        print("Found teleporter on " .. b .. ".")
        teleporter = b
    end
end

running = teleporter ~= false and modem ~= false

while running == true do
    local event, modemSide, senderChannel, replyChannel, message, senderDistance = os.pullEvent("modem_message")
    print("Got message " .. message)

    if message == "teleport" then
        print("Beginning teleport...")
        rs.setOutput(teleporter, true)
        sleep(0.1)
        rs.setOutput(teleporter, false)
    elseif message == "enable" then
        print("Enabling...")
        rs.setOutput(enable, true)
    elseif message == "disable" then
        print("Disabling...")
        rs.setOutput(enable, false)
    end
end