startup

rednet.open("bottom")
while true do
   event,id,msg = os.pullEvent()
   if(msg=="open") then
     redstone.setAnalogOutput("top",15)
   end
   if msg == "close" then
     redstone.setAnalogOutput("top",0)
   end
end