[MC-CC] Elevator Client

myFloor = 0         -- Self floor number

rednet.open("back") -- Opening modem located at back

doorsOpened = true
maxLevel = 2
minLevel = 0
request = "null"    -- Global variable for requests

function callElevator()
 msg = tostring(myFloor)
 rednet.send(84,msg)
 os.sleep(10)
end

function moveDoors()
 if doorsOpened then
  for i = 1, 3 do
   rs.setBundledOutput("right", colors.blue)
   os.sleep(1)
   rs.setBundledOutput("right", colors.black)
   os.sleep(1)
  end
  doorsOpened = false
 else
  for i = 1, 3 do
   rs.setBundledOutput("right", colors.green)
   os.sleep(1)
   rs.setBundledOutput("right", colors.black)
   os.sleep(1)
  end
  doorsOpened = true
 end
end

function go()
 input = read()
 input = tonumber(input)
 if input > maxLevel then
  return
 elseif input < minLevel then
  return
 elseif rs.getInput("bottom") then
  msg = tostring(input)
  rednet.send(84,msg)
  moveDoors()
  while rs.getInput("bottom") do
   os.sleep(1)
  end
 else
  moveDoors()
  return
 end
end

while true do
 if rs.getInput("left") then
  callElevator()
 end
 if rs.getInput("bottom") then
  if doorsOpened == false then
   moveDoors()
  end
  go()
 end
 os.sleep(1)
end