os.loadAPI("touchpoint")

local t = touchpoint.new("top")

t:add("lamp", nil, 2, 2, 14, 11, colors.red, colors.lime)

t:draw()

while true do
    local event, p1 = t:handleEvents(os.pullEvent()), output
    if event == "button_click" then
        t:toggleButton(p1)

        local color
        if p1 == "lamp" then
            color = colors.red
        end

        local test = redstone.testBundledInput("back", color)
        if test then
            output = bit.band(bit.bnot(color), redstone.getBundledOutput("back"))
        else
            output = bit.band(color, redstone.getBundledOutput("back"))
        end

        rs.setBundledOutput(p1, output)
    end
end