-- Terminate

os.pullEvent = os.pullEvent

-- Varibles

pastebin = ""
nSelect = 1
item = ""
price = ""
page = 1
totalPages = 1

-- Functions
-- Clear

function clear()
term.clear()
term.setCursorPos(1,1)
end

-- cPrint

function cPrint(text)
local w, h = term.getSize()
local x, y = term.getCursorPos()
term.setCursorPos(math.ceil((w / 2) - (text:len() / 2)), y)
print(text)
end

-- Reload

function reload()
fs.delete("startup")
sleep(0.0001)
shell.run("pastebin","get",pastebin,"startup")
sleep(0.0001)
os.reboot()
end

-- Main Page

function mainPageLayout()
clear()
cPrint("Welcome to Badasspick's Shop")
cPrint("Please select a category for items")
cPrint("")
if nSelect == 1 then
cPrint("[ Industrial Craft ]")
cPrint(" BuildCraft ")
cPrint(" ComputerCraft ")
cPrint(" Equivalent Exchange ")
cPrint(" Red Power ")
cPrint(" Balkon's Weapon Mod ")
cPrint("")
cPrint(" Update Stock ")
elseif nSelect == 2 then
cPrint(" Industrial Craft ")
cPrint("[ BuildCraft ]")
cPrint(" ComputerCraft ")
cPrint(" Equivalent Exchange ")
cPrint(" Red Power ")
cPrint(" Balkon's Weapon Mod ")
cPrint("")
cPrint(" Update Stock ")
elseif nSelect == 3 then
cPrint(" Industrial Craft ")
cPrint(" BuildCraft ")
cPrint("[ ComputerCraft ]")
cPrint(" Equivalent Exchange ")
cPrint(" Red Power ")
cPrint(" Balkon's Weapon Mod ")
cPrint("")
cPrint(" Update Stock ")
elseif nSelect == 4 then
cPrint(" Industrial Craft ")
cPrint(" BuildCraft ")
cPrint(" ComputerCraft ")
cPrint("[ Equivalent Exchange ]")
cPrint(" Red Power ")
cPrint(" Balkon's Weapon Mod ")
cPrint("")
cPrint(" Update Stock ")
elseif nSelect == 5 then
cPrint(" Industrial Craft ")
cPrint(" BuildCraft ")
cPrint(" ComputerCraft ")
cPrint(" Equivalent Exchange ")
cPrint("[ Red Power ]")
cPrint(" Balkon's Weapon Mod ")
cPrint("")
cPrint(" Update Stock ")
elseif nSelect == 6 then
cPrint(" Industrial Craft ")
cPrint(" BuildCraft ")
cPrint(" ComputerCraft ")
cPrint(" Equivalent Exchange ")
cPrint(" Red Power ")
cPrint("[ Balkon's Weapon Mod ]")
cPrint("")
cPrint(" Update Stock ")
elseif nSelect == 7 then
cPrint(" Industrial Craft ")
cPrint(" BuildCraft ")
cPrint(" ComputerCraft ")
cPrint(" Equivalent Exchange ")
cPrint(" Red Power ")
cPrint(" Balkon's Weapon Mod ")
cPrint("")
cPrint("[ Update Stock ]")
end
end

-- Main Page

function mainPage()
while true do
clear()
mainPageLayout()
event, key = os.pullEvent("key")
if key == 200 and nSelect > 1 then
nSelect = nSelect-1
elseif key == 208 and nSelect < 7 then
nSelect = nSelect+1
elseif key == 28 and nSelect == 1 then
PageIC1()
elseif key == 28 and nSelect == 2 then
sleep(0.0000001)
nSelect = 1
sleep(0.0000001)
pageBC1()
elseif key == 28 and nSelect == 3 then
sleep(0.0000001)
nSelect = 1
sleep(0.0000001)
pageCC1()
elseif key == 28 and nSelect == 4 then
sleep(0.0000001)
nSelect = 1
sleep(0.0000001)
pageEE1()
elseif key == 28 and nSelect == 5 then
sleep(0.0000001)
nSelect = 1
sleep(0.0000001)
pageRP1()
elseif key == 28 and nSelect == 6 then
sleep(0.0000001)
nSelect = 1
sleep(0.0000001)
pageWM1()
elseif key == 28 and nSelect == 7 then
sleep(0.0000001)
nSelect = 1
sleep(0.0000001)
reload()
end
end

-- Main Item Info

function info()
clear()
cPrint("Badasspick's Store")
cPrint("Please select a item to find out the price")
cPrint("")
end

-- Page 1 of IC2 Page

function pageIC1()
clear()
info()
if nSelect == 1 then
cPrint("[ Machince Block ]")
cPrint(" Electronic Circuit ")
cPrint(" Copper Cables ")
cPrint(" Glass Fibre Cables ")
cPrint(" Advanced Machince Block ")
cPrint(" Advanced Electronic Circuit ")
cPrint(" Macerator ")
cPrint(" Electric Furnace ")
cPrint(" Compressor ")
cPrint(" Extractor ")
cPrint("")
cPrint(" Prev Page       Next Page ")
cPrint("Page "..page.."/"..totalPages)
elseif nSelect == 2 then
cPrint(" Machince Block ")
cPrint("[ Electronic Circuit ]")
cPrint(" Copper Cables ")
cPrint(" Glass Fibre Cables ")
cPrint(" Advanced Machince Block ")
cPrint(" Advanced Electronic Circuit ")
cPrint(" Macerator ")
cPrint(" Electric Furnace ")
cPrint(" Compressor ")
cPrint(" Extractor ")
cPrint("")
cPrint(" Prev Page        Next Page ")
cPrint("Page "..page.."/"..totalPages)
end
end

-- Page 1 of BuildCraft

function pageBC1()
cPrint("")
cPrint("In Progress")
end

-- Page 1 of Computercraft

function pageCC1()
cPrint("")
cPrint("In Progress")
end

-- Page 1 of EE

function pageEE1()
cPrint("")
cPrint("In Progress")
end

-- Page 1 of RP

function pageRP1()
cPrint("")
cPrint("In Progress")
end

-- Page 1 of Balkon's Weapon Mod

function pageWM1()
cPrint("")
cPrint("In Progress")
end

mainPage()