Redstone Cables

--# load the Touchpoint API
loadup = function()
	shell.run("pastebin", "get", "pFHeia96", "touchpoint")
	os.loadAPI("touchpoint")
	print("Touchpoint API Loaded")
	sleep(1)
	term.clear()
	term.setCursorPos(1,1)
end

loadup()

--# Redstone Cable Bug
function colours.subtract(cols, ...)
	for i = 1, #arg do
		if bit.band(cols, arg[i]) == arg[i] then
			cols = cols - arg[i]
		end
	end
	return cols
end
colors.subtract = colours.subtract

--# intialize a new button set on the top monitor
local t = touchpoint.new("top")

--# rs.setBundledOutput ORANGE.
function OrangeAction()
	t:toggleButton("Pump")
	rs.setBundledOutput("back", (colors.test(rs.getBundledOutput("back"), colors.orange) and colors.subtract(rs.getBundledOutput("back"), colors.orange) or colors.combine(rs.getBundledOutput("back"), colors.orange)))
end



--# rs.setBundledOutput GREY.
function GrayAction()
	t:toggleButton("Refinery")
	rs.setBundledOutput("back", (colors.test(rs.getBundledOutput("back"), colors.gray) and colors.subtract(rs.getBundledOutput("back"), colors.gray) or colors.combine(rs.getBundledOutput("back"), colors.gray)))
end

--# rs.setBundledOutput YELLOW.
function YellowAction()
	t:toggleButton("Central")
	rs.setBundledOutput("back", (colors.test(rs.getBundledOutput("back"), colors.yellow) and colors.subtract(rs.getBundledOutput("back"), colors.yellow) or colors.combine(rs.getBundledOutput("back"), colors.yellow)))
end


--# Main Function.
buttonLoads = function()
        t:add("Command Center", nil, 1, 1, 30, 3, colors.black, colors.black)
	t:add("Pump", OrangeAction, 4, 4, 16, 7, colors.red, colors.lime)
	t:add("Refinery", GrayAction, 18, 4, 30, 7, colors.red, colors.lime)
	t:add("Central",  YellowAction, 32, 4, 44, 7, colors.red, colors.lime)

	t:draw()
end

buttonLoads()
t:run()