startup

while true do
 os.pullEvent("redstone")
 if redstone.getInput("right") then
   redstone.setOutput("top",true)
   sleep(2.0)
   while redstone.getInput("right") == true do
     sleep(0.1)
   end
   redstone.setOutput("top",false)
 end
end