View difference between Paste ID: 7N4ZJ1Yr and nSYjeNki

 --# Made By HDR - @MartinRefseth #--
 --# Version 1.1 Remote Client #-
-local t = touchpoint.new()
+--# Thanks to Lyqyd for his Button API http://www.computercraft.info/forums2/index.php?/topic/14784-touchpoint-api/ #--
 os.loadAPI("touchpoint")
-function random()
+
 local page1 = touchpoint.new()
- rednet.send(2563,"Random")
+local page2 = touchpoint.new()
 local t
 local input = io.input()
 local id = nil
-t:add("Random", random, 2,3,12,5, colors.cyan, colors.lime, colors.orange, colors.orange)
+
-t:run()
+if fs.exists("id.txt") ~= true then
  mswrite = fs.open("id.txt", "w")
  term.clear()
  term.setCursorPos(1,1)
  term.setTextColor(colors.orange)
  term.setBackgroundColor(colors.gray)
  print("Enter"," "..os.getComputerID()," ","Into The Server")
  term.setCursorPos(1,2)
  term.write("Insert Server ID ")
  local idinput = read()
  idput = idinput
  mswrite.write(idput)
  mswrite.close()
 end
 
 function idCheck()
 fileHandler = io.open( "id.txt", "r" )
 content = fileHandler:read("*a")
 fileHandler:close()
 id = tonumber(content)
 end
 
 function pg1()
     page2:flash("Page 1")
     t = page1
 --#OverWrites Part Of Touchpoint API#--
     t.draw = function(self)
                 local old = term.redirect(self.mon)
                 term.setTextColor(colors.white)
                 term.setBackgroundColor(colors.gray)
                 term.clear()
                 term.setCursorPos(1,20)
                 term.setTextColor(colors.orange)
                 term.write("v1.0")
                 for name, buttonData in pairs(self.buttonList) do
                         if buttonData.active then
                                 term.setBackgroundColor(buttonData.activeColor)
                                 term.setTextColor(buttonData.activeText)
                         else
                                 term.setBackgroundColor(buttonData.inactiveColor)
                                 term.setTextColor(buttonData.inactiveText)
                         end
                         for i = buttonData.yMin, buttonData.yMax do
                                 term.setCursorPos(buttonData.xMin, i)
                                 term.write(buttonData.label[i - buttonData.yMin + 1])
                         end
                 end
                 if old then
                         term.redirect(old)
                 else
                         term.restore()
                 end
         end
 end
 
 function pg2()
     page1:flash("Page 2")
     t = page2
 --#OverWrites Part Of Touchpoint API#--
     t.draw = function(self)
                 local old = term.redirect(self.mon)
                 term.setTextColor(colors.white)
                 term.setBackgroundColor(colors.gray)
                 term.clear()
                 term.setCursorPos(23,20)
                 term.setTextColor(colors.orange)
                 term.write("v1.0")
                 for name, buttonData in pairs(self.buttonList) do
                         if buttonData.active then
                                 term.setBackgroundColor(buttonData.activeColor)
                                 term.setTextColor(buttonData.activeText)
                         else
                                 term.setBackgroundColor(buttonData.inactiveColor)
                                 term.setTextColor(buttonData.inactiveText)
                         end
                         for i = buttonData.yMin, buttonData.yMax do
                                 term.setCursorPos(buttonData.xMin, i)
                                 term.write(buttonData.label[i - buttonData.yMin + 1])
                         end
                 end
                 if old then
                         term.redirect(old)
                 else
                         term.restore()
                 end
         end
 end
 
 function main()
     t = page1
 --#OverWrites Part Of Touchpoint API#--
     t.draw = function(self)
                 local old = term.redirect(self.mon)
                 term.setTextColor(colors.white)
                 term.setBackgroundColor(colors.gray)
                 term.clear()
                 term.setCursorPos(1,20)
                 term.setTextColor(colors.orange)
                 term.write("v1.0")
                 for name, buttonData in pairs(self.buttonList) do
                         if buttonData.active then
                                 term.setBackgroundColor(buttonData.activeColor)
                                 term.setTextColor(buttonData.activeText)
                         else
                                 term.setBackgroundColor(buttonData.inactiveColor)
                                 term.setTextColor(buttonData.inactiveText)
                         end
                         for i = buttonData.yMin, buttonData.yMax do
                                 term.setCursorPos(buttonData.xMin, i)
                                 term.write(buttonData.label[i - buttonData.yMin + 1])
                         end
                 end
                 if old then
                         term.redirect(old)
                 else
                         term.restore()
                 end
         end
 end
 
 function Thir()
  t:flash("13")
  idCheck()
  rednet.send(id,"Thir")
 end
 
 function Cat()
  t:flash("Cat")
  idCheck()
  rednet.send(id,"Cat")
 end
 
 function Blocks()
  t:flash("Blocks")
  idCheck()
  rednet.send(id,"Blocks")
 end
 
 function Chirp()
  t:flash("Chirp")
  idCheck()
  rednet.send(id,"Chirp")
 end
 
 function Far()
  t:flash("Far")
  idCheck()
  rednet.send(id,"Far")
 end
 
 function Mall()
  t:flash("Mall")
  idCheck()
  rednet.send(id,"Mall")
 end
 
 function Mellohi()
  t:flash("Mellohi")
  idCheck()
  rednet.send(id,"Mellohi")
 end
 
 function Stal()
  t:flash("Stal")
  idCheck()
  rednet.send(id,"Stal")
 end
 
 function Strad()
  t:flash("Strad")
  idCheck()
  rednet.send(id,"Strad")
 end
 
 function Ward()
  t:flash("Ward")
  idCheck()
  rednet.send(id,"Ward")
 end
 
 function Elev()
  t:flash("11")
  idCheck()
  rednet.send(id,"Elev")
 end
 
 function Wait()
  t:flash("Wait")
  idCheck()
  rednet.send(id,"Wait")
 end
 
 function Question()
  t:flash("???")
  idCheck()
  rednet.send(id,"Question")
 end
 
 function GaiaOne()
  t:flash("Gaia 1")
  idCheck()
  rednet.send(id,"GaiaOne")
 end
 
 function GaiaTwo()
  t:flash("Gaia 2")
  idCheck()
  rednet.send(id,"GaiaTwo")
 end
 
 function Roop()
  t:flash("R-Loop")
  idCheck()
  rednet.send(id,"Roop")
 end
 
 function Slive()
  t:flash("S-Alive")
  idCheck()
  rednet.send(id,"Slive")
 end
 
 function WYG()
  t:flash("WYG")
  idCheck()
  rednet.send(id,"WYG")
 end
 
 function WDR()
  t:flash("Wanderer")
  idCheck()
  rednet.send(id,"WDR")
 end
 
 function Stop()
  t:flash("Stop")
  idCheck()
  rednet.send(id,"Stop")
 end
 
 function Reboot()
  t:flash("Reboot")
  idCheck()
  rednet.send(id,"Reboot")
  os.reboot()
 end
 
 function Random()
  t:flash("Random")
  idCheck()
  rednet.send(id,"Random")
 end
 
 do
  page1:add("13", Thir, 2,3,8,5, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Cat", Cat, 10,3,17,5, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Blocks", Blocks, 19,3,25,5, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Chirp", Chirp, 2,7,8,9, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Far", Far, 10,7,17,9, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Mall", Mall, 19,7,25,9, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Mellohi", Mellohi, 2,11,8,13, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Stal", Stal, 10,11,17,13, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Strad", Strad, 19,11,25,13, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Ward", Ward, 2,15,8,17, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("11", Elev, 10,15,17,17, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Wait", Wait, 19,15,25,17, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Stop", Stop, 10,1,17,1, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Reboot", Reboot, 19,1,26,1, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Random", Random, 1,1,8,1, colors.cyan, colors.lime, colors.orange, colors.orange)
  page1:add("Page 2", pg2, 19,20,26,20, colors.cyan, colors.lime, colors.orange, colors.orange)
 
  page2:add("Gaia 1", GaiaOne, 4,3,12,5, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("Gaia 2", GaiaTwo, 15,3,23,5, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("???", Question, 4,7,12,9, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("R-Loop", Roop, 15,7,23,9, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("S-Alive", Slive, 4,11,12,13, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("WYG", WYG, 15,11,23,13, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("Wanderer", WDR, 9,15,18,17, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("Page 1", pg1, 1,20,8,20, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("Stop", Stop, 10,1,17,1, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("Reboot", Reboot, 19,1,26,1, colors.cyan, colors.lime, colors.orange, colors.orange)
  page2:add("Random", Random, 1,1,8,1, colors.cyan, colors.lime, colors.orange, colors.orange)
 end
 
 main()
 while true do
     t:draw()
     local event, p1 = t:handleEvents(os.pullEvent())
     if event == "button_click" then
         t.buttonList[p1].func()
     end
 end