local inputSide = "bottom"
local passThroughSide = "top"
local monitorSide = "left"
local onMessage = "Laboratory active"
local offmessage = "Laboratory inactive"

local mon = peripheral.wrap(monitorSide)
if not mon then
  error("no monitor on expected side: "..monitorSide)
end
local event
mon.setCursorBlink(false)
while true do
  event = { os.pullEvent("redstone")}
  mon.clear()
  mon.setCursorPos(1,1)
  if redstone.getInput(inputSide) then
        mon.write(onMessage)
        redstone.setOutput(passThroughSide,true)
  else
   mon.write(offMessage)
        redstone.setOutput(passThroughSide,false)
  end
end