ComputerCraft Redstone Test

redstone.setBundledOutput("top", colors.blue)

function rsEvent()
	if(rs.testBundledInput("top",colors.white)) then
		redstone.setBundledOutput("top",0)
		sleep(3)
		redstone.setBundledOutput("top", colors.blue)
	end
end

function tick()
	timer1 = os.startTimer(5)
end

repeat
local event,p1 = os.pullEvent()
	if event == "redstone" then
		rsEvent()
	elseif event == "timer" then
		if p1 == timer1 then
			tick()
		end
	end
until event == "char" and p1 == "x"