Tekkit Newb Rank

-- Tekkit Newb Rank Program 0-0-1
-- Works with: Advanced Computer & Monitor
-- Environment Tested: Minecraft 1.6.4 Computer Craft version 1.5
-- Modified By RC-Scorpionfien, Created By Lyqyd
-- Requires TouchPoint API to work, download at pastebin.com/pFHeia96
-- Download this file >> http://www.pastebin.com/6anDmXCC

--Loads the API, straightforward
os.loadAPI("touchpoint")

--Newb Rank

--establish "pages" of buttons
local page1 = touchpoint.new("top")

--one variable to put each page into in order to simplify switching
local t

--Button Functions

function doNothing()
    sleep(1)
end

function rcCom()
   page1:flash("Commands")
   sleep(1)
   shell.run("ncommand")

function rcMain()
    page1:flash("Main")
    sleep(1)
	shell.run("main")
end

function rcRanks()
    page1:flash("Ranks")
	sleep(1)
	shell.run("ranks")
end

---Main Menu
function mainTable()
    t = page1
end

function secTable()
    t = page2
end

--Set Up Pages
do
   page1:add("--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--", doNothing, 1, 1, 60, 1, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("  _______  ______  _  __ _  __ _____  _______   ", doNothing, 1, 2, 60, 2, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add(" |__   __||  ____|| |/ /| |/ /|_   _||__   __|  ", doNothing, 1, 3, 60, 3, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("    | |   | |__   | ' / | ' /   | |     | |     ", doNothing, 1, 4, 60, 4, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("    | |   |  __|  |  <  |  <    | |     | |     ", doNothing, 1, 5, 60, 5, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("    | |   | |____ | . \\ | . \\  _| |_    | |     ", doNothing, 1, 6, 60, 6, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("    |_|   |______||_|\\_\\|_|\\_\\|_____|   |_|     ", doNothing, 1, 7, 60, 7, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("--''--''--''--''--''--''--''--''--''--''--''--''--''--''--''--''--", doNothing, 1, 8, 60, 8, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("RC-Tekkit", doNothing, 1, 9, 60, 9, colors.black, colors.black, colors.magenta, colors.magenta)
   page1:add("....................", doNothing, 1, 10, 60, 10, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("Rank", doNothing, 1, 11, 60, 11, colors.black, colors,black, colors.white, colors.white)
   page1:add("Newb", doNothing, 4, 12, 60, 12, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("Access to the Following:", doNothing, 1, 14, 25, 14, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("Ability to Set up to 3 Homes --/sethome [name]", doNothing, 1, 16, 47, 16, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("Start with 250 Claim Blocks", doNothing, 1, 17, 28, 17, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("Access to /kit newb", doNothing, 1, 18, 20, 18, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
   page1:add("Commands", rcCom, 4, 22, 10, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
   page1:add("Main", rcMain, 14, 22, 20, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
   page1:add("Ranks", rcRanks, 24, 22, 30, 23, colors.black, colors.lime, colors.white, colors.black)

end

--Starts with the main Table, then checks for buttons clicked, toggles them, and runs the program it has with my modified t:run2()
mainTable()
while true do
    t:draw()
    -- local event, p1, p2, p3 = os.pullEvent() ---monitor_touch, side, xpos, ypos
    local event, p1 = t:handleEvents(os.pullEvent())   ---button_click, name
    if event == "button_click" then
        --remove toggling and simplify button running
        t.buttonList[p1].func()
    end
end