API tools faq
paste
Scorpionfien

Newb Rank Command

Scorpionfien
Jun 22nd, 2015
283
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.39 KB | None | 0 0
raw download clone embed print report
  1. -- Tekkit Newb Rank Program 0-0-1
  2. -- Works with: Advanced Computer & Monitor
  3. -- Environment Tested: Minecraft 1.6.4 Computer Craft version 1.5
  4. -- Modified By RC-Scorpionfien, Created By Lyqyd
  5. -- Requires TouchPoint API to work, download at pastebin.com/pFHeia96
  6. -- Download this file >> http://www.pastebin.com/6anDmXCC
  7.  
  8. --Loads the API, straightforward
  9. os.loadAPI("touchpoint")
  10.  
  11. --Newb Rank
  12.  
  13. --establish "pages" of buttons
  14. local page1 = touchpoint.new("top")
  15. local page2 = touchpoint.new("top")
  16.  
  17. --one variable to put each page into in order to simplify switching
  18. local t
  19.  
  20. --Button Functions
  21.  
  22. function doNothing()
  23. sleep(1)
  24. end
  25.  
  26. function rcMain()
  27. page1:flash("Main")
  28. sleep(1)
  29. shell.run("main")
  30. end
  31.  
  32. function rcBack()
  33. page1:flash("Back")
  34. sleep(1)
  35. shell.run("newb")
  36. end
  37.  
  38. function rcRanks()
  39. page1:flash("Ranks")
  40. sleep(1)
  41. shell.run("ranks")
  42. end
  43.  
  44. ---Main Menu
  45. function mainTable()
  46. t = page1
  47. end
  48.  
  49. function secTable()
  50. t = page2
  51. end
  52.  
  53. --Set Up Pages
  54. do
  55. page1:add("--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--", doNothing, 1, 1, 60, 1, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  56. page1:add(" _______ ______ _ __ _ __ _____ _______ ", doNothing, 1, 2, 60, 2, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  57. page1:add(" |__ __|| ____|| |/ /| |/ /|_ _||__ __| ", doNothing, 1, 3, 60, 3, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  58. page1:add(" | | | |__ | ' / | ' / | | | | ", doNothing, 1, 4, 60, 4, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  59. page1:add(" | | | __| | < | < | | | | ", doNothing, 1, 5, 60, 5, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  60. page1:add(" | | | |____ | . \\ | . \\ _| |_ | | ", doNothing, 1, 6, 60, 6, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  61. page1:add(" |_| |______||_|\\_\\|_|\\_\\|_____| |_| ", doNothing, 1, 7, 60, 7, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  62. page1:add("--''--''--''--''--''--''--''--''--''--''--''--''--''--''--''--''--", doNothing, 1, 8, 60, 8, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  63. page1:add("RC-Tekkit", doNothing, 1, 9, 60, 9, colors.black, colors.black, colors.magenta, colors.magenta)
  64. page1:add("....................", doNothing, 1, 10, 60, 10, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  65. page1:add("Rank", doNothing, 1, 11, 60, 11, colors.black, colors,black, colors.white, colors.white)
  66. page1:add("Newb Page 1 of 2", doNothing, 4, 12, 60, 12, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  67. page1:add("Access to the Following Commands:", doNothing, 1, 14, 35, 14, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  68. page1:add("/back --Returns You to Previous Location", doNothing, 4, 16, 46, 16, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  69. page1:add("/home --Teleports You to Your Set Home", doNothing, 4, 17, 43, 17, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  70. page1:add("/bal --View Your Current Money Balance", doNothing, 4, 18, 44, 18, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  71. page1:add("/baltop --View List of Top Balances", doNothing, 4, 19, 41, 19, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  72. page1:add("/pay --Pay Another Player", doNothing, 4, 20, 31, 20, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  73. page1:add("Back", rcBack, 4, 22, 10, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
  74. page1:add("Main", rcMain, 14, 22, 20, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
  75. page1:add("Ranks", rcRanks, 24, 22, 30, 23, colors.black, colors.lime, colors.white, colors.black)
  76. page1:add("Next", secTable, 34, 22, 40, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
  77.  
  78. page2:add("--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--", doNothing, 1, 1, 60, 1, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  79. page2:add(" _______ ______ _ __ _ __ _____ _______ ", doNothing, 1, 2, 60, 2, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  80. page2:add(" |__ __|| ____|| |/ /| |/ /|_ _||__ __| ", doNothing, 1, 3, 60, 3, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  81. page2:add(" | | | |__ | ' / | ' / | | | | ", doNothing, 1, 4, 60, 4, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  82. page2:add(" | | | __| | < | < | | | | ", doNothing, 1, 5, 60, 5, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  83. page2:add(" | | | |____ | . \\ | . \\ _| |_ | | ", doNothing, 1, 6, 60, 6, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  84. page2:add(" |_| |______||_|\\_\\|_|\\_\\|_____| |_| ", doNothing, 1, 7, 60, 7, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  85. page2:add("--''--''--''--''--''--''--''--''--''--''--''--''--''--''--''--''--", doNothing, 1, 8, 60, 8, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  86. page2:add("RC-Tekkit", doNothing, 1, 9, 60, 9, colors.black, colors.black, colors.magenta, colors.magenta)
  87. page2:add("....................", doNothing, 1, 10, 60, 10, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  88. page2:add("Rank", doNothing, 1, 11, 60, 11, colors.black, colors,black, colors.white, colors.white)
  89. page2:add("Newb Page 2 of 2", doNothing, 4, 12, 60, 12, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  90. page2:add("Access to the Following Commands:", doNothing, 1, 14, 35, 14, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  91. page2:add("/help --List of Available Commands", doNothing, 4, 16, 40, 16, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  92. page2:add("/msg --Send Another Player a Message", doNothing, 4, 17, 42, 17, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  93. page2:add("/tpa --Request to Teleport to Another Player", doNothing, 4, 18, 50, 18, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  94. page2:add("/sethome --Set Current Position as Home", doNothing, 4, 19, 45, 19, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  95. page2:add("/warp --Warp Specific Location", doNothing, 4, 20, 36, 20, colors.black, colors.black, colors.lightBlue, colors.lightBlue)
  96. page2:add("Prev", mainTable, 4, 22, 10, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
  97. page2:add("Back", rcBack, 14, 22, 20, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
  98. page2:add("Main", rcMain, 24, 22, 30, 23, colors.black, colors.lime, colors.lightBlue, colors.black)
  99. page2:add("Ranks", rcRanks, 34, 22, 40, 23, colors.black, colors.lime, colors.white, colors.black)
  100.  
  101. end
  102.  
  103. --Starts with the main Table, then checks for buttons clicked, toggles them, and runs the program it has with my modified t:run2()
  104. mainTable()
  105. while true do
  106. t:draw()
  107. -- local event, p1, p2, p3 = os.pullEvent() ---monitor_touch, side, xpos, ypos
  108. local event, p1 = t:handleEvents(os.pullEvent()) ---button_click, name
  109. if event == "button_click" then
  110. --remove toggling and simplify button running
  111. t.buttonList[p1].func()
  112. end
  113. end
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!