loadup = function()
			shell.run("pastebin","get","pFHeia96","touchpoint")
			os.loadAPI("touchpoint")
end

loadup()

local t1 = touchpoint.new("top")
local t2 = touchpoint.new("top")
local t3 = touchpoint.new("top")
local t4 = touchpoint.new("top")
local t5 = touchpoint.new("top")
local t6 = touchpoint.new("top")
local interface = peripheral.wrap("left")
local chest = peripheral.wrap("front")
local glassesBridge = peripheral.wrap("right")
local xLeftMin = 2
local xLeftMax = 31
local xRightMin = 55
local xRightMax = 70
local yRow1Min = 2
local yRow1Max = yRow1Min + 2
local yRow2Min = yRow1Min + 3
local yRow2Max = yRow2Min + 2
local yRow3Min = yRow2Min + 3
local yRow3Max = yRow3Min + 2
local yRow4Min = yRow3Min + 3
local yRow4Max = yRow4Min + 2
local yRow5Min = yRow4Min + 3
local yRow5Max = yRow5Min + 2
local yRow6Min = yRow5Min + 3
local yRow6Max = yRow6Min + 2
local yRow7Min = yRow6Min + 3
local yRow7Max = yRow7Min + 2
local xBackMin = 60
local xBackMax = 67
local yBackMin = 22
local yBackMax = 24


local t

function emptytext()
end

function mainMenu()
			t = t1
end

function circlesMenu()
			t = t2
end

function attunedStoneMenu()
	t = t3
end

function otcFamiliarMenu()
	t = t4
end

function necromanticStoneMenu()
	t = t5
end

function riteOfChargingPlayer()
	t = t6
end





function orderItem(ID,DMG,amount)
	local fingerprint = {id=ID,dmg = DMG}
	itemBasic = interface.getItemDetail(fingerprint).basic()

	if(itemBasic.qty == 0) then
		interface.requestCrafting(itemBasic,amount)
		sleep(3)
		interface.exportItem(fingerprint,6,amount)
		chest.pullItem(4,1)
	else
		interface.exportItem(fingerprint,6,amount)
		chest.pullItem(4,1)
	end

end

function orderAttunedStoneCharged()
	orderItem("witchery:ingredient",10,1)
	orderItem("minecraft:glowstone_dust",0,1)
	orderItem("minecraft:redstone",0,1)
	orderItem("witchery:ingredient",18,1)
	orderItem("witchery:ingredient",16,1)
end

function orderOTCFamiliar()
	orderItem("witchery:ingredient",37,1)
	orderItem("witchery:ingredient",36,1)
	orderItem("witchery:ingredient",34,1)
	orderItem("minecraft:diamond",0,1)
	orderItem("witchery:ingredient",80,1)
end

function orderNecromancyStone()
	orderItem("witchery:ingredient",10,1)
	orderItem("minecraft:bone",0,1)
	orderItem("minecraft:rotten_flesh",0,1)
	orderItem("witchery:ingredient",18,1)
	orderItem("minecraft:iron_sword",0,1)
	orderItem("witchery:ingredient",66,1)
end

function orderRiteOfChargingPlayer()
	orderItem("minecraft:potion",8193,1)
end

do
t1:add("Circles",circlesMenu,xLeftMin,2,xLeftMax,4)

t2:add("Attuned Stone(Charged)",attunedStoneMenu,xLeftMin,2,xLeftMax,4)
t2:add("Owl, Toad, Cat Familiar",otcFamiliarMenu,xLeftMin,6,xLeftMax,8)
t2:add("Necromantic Stone",necromanticStoneMenu,xLeftMin,10,xLeftMax,12)
t2:add("Charge Player",riteOfChargingPlayer,xLeftMin,14,xLeftMax,16)
t2:add("Back",mainMenu,xBackMin,yBackMin,xBackMax,yBackMax)

t3:add("Materials",emptytext,xLeftMin,yRow1Min,xLeftMax,yRow1Max)
t3:add("Attuned Stone",emptytext,xLeftMin,yRow2Min,xLeftMax,yRow2Max)
t3:add("Glowstone Dust",emptytext,xLeftMin,yRow3Min,xLeftMax,yRow3Max)
t3:add("Redstone",emptytext,xLeftMin,yRow4Min,xLeftMax,yRow4Max)
t3:add("Wood Ash",emptytext,xLeftMin,yRow5Min,xLeftMax,yRow5Max)
t3:add("Quicklime",emptytext,xLeftMin,yRow6Min,xLeftMax,yRow6Max)
t3:add("Circle",emptytext,xRightMin,yRow1Min,xRightMax,yRow1Max)
t3:add("7x7 & 11x11",emptytext,xRightMin,yRow2Min,xRightMax,yRow2Max)
t3:add("White & White",emptytext,xRightMin,yRow3Min,xRightMax,yRow3Max)
t3:add("Order Materials",orderAttunedStoneCharged,xRightMin,yRow4Min+1,xRightMax,yRow4Max+1)
t3:add("Back",circlesMenu,xBackMin,yBackMin,xBackMax,yBackMax)

t4:add("Materials",emptytext,xLeftMin,yRow1Min,xLeftMax,yRow1Max)
t4:add("Tear of the Goddess",emptytext,xLeftMin,yRow2Min,xLeftMax,yRow2Max)
t4:add("Odour of Purity",emptytext,xLeftMin,yRow3Min,xLeftMax,yRow3Max)
t4:add("Whiff of Magic",emptytext,xLeftMin,yRow4Min,xLeftMax,yRow4Max)
t4:add("Diamond",emptytext,xLeftMin,yRow5Min,xLeftMax,yRow5Max)
t4:add("Demonic Blood",emptytext,xLeftMin,yRow6Min,xLeftMax,yRow6Max)
t4:add("Circle",emptytext,xRightMin,yRow1Min,xRightMax,yRow1Max)
t4:add("11x11",emptytext,xRightMin,yRow2Min,xRightMax,yRow2Max)
t4:add("White",emptytext,xRightMin,yRow3Min,xRightMax,yRow3Max)
t4:add("Order Materials",orderOTCFamiliar,xRightMin,yRow4Min+1,xRightMax,yRow4Max+1)
t4:add("Back",circlesMenu,xBackMin,yBackMin,xBackMax,yBackMax)

t5:add("Materials",emptytext,xLeftMin,yRow1Min,xLeftMax,yRow1Max)
t5:add("Attuned Stone",emptytext,xLeftMin,yRow2Min,xLeftMax,yRow2Max)
t5:add("Bone",emptytext,xLeftMin,yRow3Min,xLeftMax,yRow3Max)
t5:add("Rotten Flesh",emptytext,xLeftMin,yRow4Min,xLeftMax,yRow4Max)
t5:add("Wood Ash",emptytext,xLeftMin,yRow5Min,xLeftMax,yRow5Max)
t5:add("Iron Sword",emptytext,xLeftMin,yRow6Min,xLeftMax,yRow6Max)
t5:add("Spectral Dust",emptytext,xLeftMin,yRow7Min,xLeftMax,yRow7Max)
t5:add("Circle",emptytext,xRightMin,yRow1Min,xRightMax,yRow1Max)
t5:add("7x7",emptytext,xRightMin,yRow2Min,xRightMax,yRow2Max)
t5:add("White",emptytext,xRightMin,yRow3Min,xRightMax,yRow3Max)
t5:add("Order Materials",orderNecromancticStone,xRightMin,yRow4Min+1,xRightMax,yRow4Max+1)
t5:add("Back",circlesMenu,xBackMin,yBackMin,xBackMax,yBackMax)

t6:add("Materials",emptytext,xLeftMin,yRow1Min,xLeftMax,yRow1Max)
t6:add("Potion of Regeneration(0:45)",emptytext,xLeftMin,yRow2Min,xLeftMax,yRow2Max)
t6:add("Circle",emptytext,xRightMin,yRow1Min,xRightMax,yRow1Max)
t6:add("7x7 & 11x11",emptytext,xRightMin,yRow2Min,xRightMax,yRow2Max)
t6:add("White & White",emptytext,xRightMin,yRow3Min,xRightMax,yRow3Max)
t6:add("Order Materials",orderAttunedStoneCharged,xRightMin,yRow4Min+1,xRightMax,yRow4Max+1)
t6:add("Back",circlesMenu,xBackMin,yBackMin,xBackMax,xBackMax)



end

mainMenu()
while true do
	t:draw()
	local event,p1 = t:handleEvents(os.pullEvent())
	if event == "button_click" then
		t.buttonList[p1].func()
	end
end