TPserv

--be sure to update your script with the computer IDs of the computers connected to your teleporters.
--password protected floor has been disabled.

term.clear()
term.setCursorPos(1,1)

rednet.open("right") -- select modem side

breakpass = "asdf"
passServ = 80
passfloor = "false"

function send()
   rednet.send(y, "correct")
   rednet.send(first, "true")
   rednet.send(second, "true")
   rednet.send(third, "true")
   rednet.send(four, "true")
   rednet.send(76, j)
   os.sleep(2)
   rednet.broadcast("false")
end

while true do
  first = 39 --ENTER COMPUTER ID
  second = 37 --ENTER COMPUTER ID
  third = 41 --ENTER COMPUTER ID
  four = 55 --ENTER COMPUTER ID
  j = "false"
  y, x = rednet.receive()
  if x == "break" then
    rednet.send(y, "breakpass")
    a, b = rednet.receive()
      if b == breakpass then
        rednet.send(y, "true")
      else
        rednet.send(y, "false")
      end
    --end
  elseif x == passfloor then
    rednet.send(y, "pass")
    a, b = rednet.receive()
    rednet.send(passServ, "passReqA")
    k, i = rednet.receive()
    rednet.send(passServ, b)
    k, i = rednet.receive()
    if i == "true" and k == passServ then
      rednet.send(y, "true")
      second = 0
      send()
    else
       rednet.send(y, "false")
    end
  elseif x == "1" then
    first = 0
    send()
  elseif x == "2" then
    second = 0
    send()
  elseif x == "3" then
    third = 0    cb = 0
    j = "true"
    send()
  elseif x == "4" then
    four = 0
    send()
  else
    rednet.send(y, "error")
  end
end