mon = peripheral.wrap("back")

function detect()
event, side, x,y = os.pullEvent("monitor_touch")

affichage(colors.red)

rs.setBundledOutput("top",8192)
os.sleep(3.7)
rs.setBundledOutput("top",0)
rs.setBundledOutput("top",34)
os.sleep(3.7)
rs.setBundledOutput("top",0)
rs.setBundledOutput("top",1)

affichage(colors.green)
end

function affichage(color)
mon.setBackgroundColor(color)
mon.clear()
end

while true do
detect()
os.sleep(0.1)
end