API tools faq
paste
davedumas0

opencomputers_exporer_thingy.lua

davedumas0
Apr 12th, 2022
1,665
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 29.25 KB | None | 0 0
raw download clone embed print report
  1.  
  2. --------------------------
  3. --required function libs
  4. --------------------------
  5.  
  6.  
  7. local os = require("os")
  8. local computer = require("computer")
  9. local term = require("term")
  10. local colors = require("colors")
  11. local filesystem = require("filesystem")
  12. local component = require("component")
  13. local keyboard = require("keyboard")
  14. local event = require("event")
  15. local gpu = component.gpu
  16. local redstone = component.redstone
  17. local event = require("event")
  18.  
  19.  line = 7
  20.  devicesList = {}
  21.  panel_A_Selection = 1
  22.  panel_A_Selection_Value = ""
  23.  location = "nothing"
  24.  name = "nothing"
  25.  debuginfo = true
  26.  lever_1_state = true
  27.  lever_2_state = true
  28.  
  29.  tab = 1
  30. --------------------------
  31. --======================--
  32. --------------------------
  33.  
  34.  
  35. colors_white = 0xffffff
  36. colors_orange = 0xff6600
  37. colors_magenta = 0xff00ff
  38. colors_lightblue = 0x0099ff
  39. colors_yellow = 0xffff00
  40. colors_lime = 0x00ff00
  41. colors_pink = 0xff3399
  42. colors_gray = 0x737373
  43. colors_silver = 0xc0c0c0
  44. colors_cyan = 0x169c9d
  45. colors_purple = 0x8932b7
  46. colors_blue = 0x3c44a9
  47. colors_brown = 0x825432
  48. colors_green = 0x5d7c15
  49. colors_red = 0xb02e26
  50. colors_black = 0x000000
  51.  
  52.  
  53.  
  54. componentsList = {}
  55.  
  56. --------------------------
  57. -------MY functions-------
  58. --------------------------
  59.  
  60. function getListOfConnenctedDevices(Fvar1)
  61.  
  62.  if Fvar1 == true then
  63.   devicesList = component.list()
  64.   componentsList = {}
  65.     for _, v in pairs(devicesList) do
  66.       table.insert(componentsList, v)
  67.     end
  68.   Fvar1 = false
  69.  end
  70.   return componentsList
  71. end
  72.  
  73. function getAvailableFuctions(device)
  74.   availableFunctions = {}
  75.     for _, v in pairs(device) do
  76.       table.insert(availableFunctions, v)
  77.     end
  78.  
  79.  return availableFunctions
  80. end
  81.  
  82.  
  83. function drawLine (posX, posY, length, highth, line_color)
  84.   gpu.setBackground(line_color)
  85.  
  86.   gpu.fill(posX, posY, length, highth, " ")
  87. end
  88.  
  89. function drawText (X, Y, text, color_txt, color_bg)
  90.  term.setCursor(X, Y)
  91.  gpu.setBackground(color_bg)
  92.  
  93.  gpu.setForeground(color_txt, false)
  94.  term.write(tostring(text))
  95.  gpu.setBackground(colors_black)
  96. end
  97.  
  98. function drawButton (name, label, x, y, hight, func, txt_color, bttn_color, enabled)
  99.  length = #label+2
  100.   if not enabled then
  101.      drawLine(x, y, length, hight, colors_gray)
  102.      drawText(x, y, label, colors_white, colors_gray)  
  103.   end
  104.   if enabled then
  105.     drawLine(x, y, length, hight, bttn_color)
  106.     drawText(x+1,y+hight/2, label, colors_white, bttn_color)
  107.    if touchX ~= nil or touchY ~= nil then
  108.     if (touchX >= x) and (touchX <= x + length-1)  and (touchY >= y) and (touchY <= y + hight-1) then
  109.       func()
  110.     end
  111.    end
  112.   end
  113. end
  114.  
  115. function drawTinybutton (x, y, func, bttn_color, enabled)
  116.   if not enabled then
  117.      drawLine(x, y, 2, 1, colors_gray)
  118.   end
  119.   if enabled then
  120.     drawLine(x, y, 2, 1, bttn_color)
  121.    if touchX ~= nil or touchY ~= nil then
  122.     if (touchX >= x) and (touchX <= x + 2)  and (touchY >= y) and (touchY <= y + 1) then
  123.       func()
  124.     end
  125.    end
  126.   end
  127. end
  128.  
  129. function drawLever(posX, posY, color)
  130.   drawLine(posX+2, posY, 2, 1, colors_silver)
  131.   drawLine(posX, posY, 2, 4, colors_silver)
  132.   drawLine(posX+4, posY, 2, 4, colors_silver)
  133.   drawLine(posX+2, posY+3, 2, 1, colors_silver)
  134.  
  135.   if lever_1_state == true then
  136.    drawLine(posX+2, posY+1, 2, 1, color)
  137.    drawTinybutton(posX+2, posY+2, tinyButton_1_Var, colors_gray, true)
  138.   else
  139.    drawLine(posX+2, posY+2, 2, 1, colors_brown)
  140.    drawTinybutton(posX+2, posY+1, tinyButton_1_Var, colors_gray, true)
  141.   end
  142.   gpu.setBackground(colors_black)
  143. end
  144.  
  145. function drawLever_2(posX, posY, color)
  146.  
  147.   drawLine(posX+2, posY, 2, 1, colors_silver)
  148.   drawLine(posX, posY, 2, 4, colors_silver)
  149.   drawLine(posX+4, posY, 2, 4, colors_silver)
  150.   drawLine(posX+2, posY+3, 2, 1, colors_silver)
  151.  
  152.   if lever_2_state == true then
  153.    drawLine(posX+2, posY+1, 2, 1, color)
  154.    drawTinybutton(posX+2, posY+2, tinyButton_2_Var, colors_gray, true)
  155.   else
  156.    drawLine(posX+2, posY+2, 2, 1, colors_brown)
  157.    drawTinybutton(posX+2, posY+1, tinyButton_2_Var, colors_gray, true)
  158.   end
  159.   gpu.setBackground(colors_black)
  160. end
  161.  
  162. function touchCheck()
  163. location, name, touchX, touchY = event.pull(0.1, "touch")
  164. end
  165.  
  166.  
  167.  
  168. --**********************--
  169. --**********GUI*********--
  170. --**********************--
  171.  
  172.  
  173. function drawScreenBorder ()
  174. --gets screen resolution (usualy 160 x 60)
  175.   resX, resY = gpu.getResolution()
  176.   if tab == 1 then
  177. --top
  178.    drawLine(1, 1, resX, 1, colors_blue)
  179. --left side
  180.     drawLine(1, 1, 2, resY-6, colors_blue)
  181. --right side
  182.      drawLine(resX-1, 1, 2, resY-6, colors_blue)
  183. --bottom
  184.     drawLine(3, resY-5, resX-2, 1, colors_blue)
  185. --tab 1
  186.     drawLine(1, resY-5, 2, 5, colors_blue)
  187.      drawLine(1, resY, 13, 1, colors_blue)
  188.       drawLine(12, resY-5, 2, 5, colors_blue)
  189. --tab 2
  190.     drawLine(1+13, resY-4, 2, 4, colors_green)
  191.      drawLine(1+13, resY, 13, 1, colors_green)
  192.       drawLine(12+13, resY-4, 2, 4, colors_green)
  193.     gpu.setBackground(colors_black)
  194.   end
  195.   if tab == 2 then
  196. --top
  197.    drawLine(1, 1, resX, 1, colors_green)
  198. --left side
  199.     drawLine(1, 1, 2, resY-5, colors_green)
  200. --right side
  201.      drawLine(resX-1, 1, 2, resY-5, colors_green)
  202. --bottom
  203.     drawLine(3, resY-5, resX, 1, colors_green)
  204. --tab 1
  205.     drawLine(1, resY-4, 2, 4, colors_blue)
  206.      drawLine(1, resY, 13, 1, colors_blue)
  207.       drawLine(12, resY-4, 2, 4, colors_blue)
  208. --tab 2
  209.     drawLine(1+13, resY-4, 2, 4, colors_green)
  210.      drawLine(1+13, resY, 13, 1, colors_green)
  211.       drawLine(12+13, resY-4, 2, 4, colors_green)
  212.     gpu.setBackground(colors_black)
  213.   end
  214.    drawButton("tab 1", " TAB 1 ", 3, resY-4, 4, tab_1, colors_white, colors_blue, true)
  215.    drawButton("tab 1", " TAB 2 ", 3+13, resY-4, 4, tab_2, colors_white, colors_green, true)
  216. --reset background to black
  217.   gpu.setBackground(colors_black)
  218. end
  219.  
  220. function drawDebugWindow (posX, posY, length, hight)
  221.  if debuginfo == true then
  222.    drawLine(posX-2, posY-1, length+4, 1, colors_orange)
  223.    drawLine(posX-2, posY, 2, hight+1, colors_orange)
  224.    drawLine(posX+length, posY, 2, hight+1, colors_orange)
  225.    drawLine(posX-2, posY+hight, length+4, 1, colors_orange)
  226.    drawLine(posX, posY, length, hight, colors_cyan)
  227.  
  228.     drawText(posX+1, posY+2, "selection value "..panel_A_Selection_Value, colors_white, colors_black)
  229.     drawText(posX+1, posY+3, "componentsList "..panel_A_Selection..": "..tostring(componentsList[panel_A_Selection]), colors_white, colors_black)
  230.  
  231.     drawText(posX+1, posY+1, "current selection: "..tostring(panel_A_Selection).." LINE:"..line, colors_white, colors_black)
  232.    
  233.  end
  234. end
  235.  
  236. --**********************--
  237. --***button funtions****--
  238. --**********************--
  239.  
  240. function navigatePanel_A_UP ()
  241.  if panel_A_Selection ==1 then
  242.   panel_A_Selection =  12
  243.  else
  244.   panel_A_Selection = panel_A_Selection - 1
  245.  end
  246.  
  247. end
  248.  
  249. function navigatePanel_A_DN ()
  250.  if panel_A_Selection ==12 then
  251.   panel_A_Selection =  1
  252.  else
  253.   panel_A_Selection = panel_A_Selection + 1
  254.  end
  255. end
  256.  
  257. function tinyButton_1_Var()
  258.   lever_1_state = not lever_1_state
  259. end
  260.  
  261. function tinyButton_2_Var()
  262.   lever_2_state = not lever_2_state
  263. end
  264.  
  265. function tab_1 ()
  266.  tab = 1
  267. end
  268. function tab_2 ()
  269.  tab = 2
  270. end
  271.  
  272. --**********************--
  273. --***button funtions****--
  274. --**********************--
  275.  
  276. function drawPanel_A (posX, posY)
  277. --header
  278.   drawText(posX+2, posY-1, "connected devices", colors_white, colors_black)
  279. --header
  280.  
  281. --border
  282.  --top line
  283.   drawLine(posX, posY, 2, 16, colors_silver)
  284.  --left side line
  285.    drawLine(posX, posY, 20, 1, colors_silver)
  286.  --right side line
  287.     drawLine(posX+20, posY, 2, 16, colors_silver)
  288.  --bottom line
  289.      drawLine(posX+2, posY+15, 18, 1, colors_silver)
  290. --border
  291.  
  292. --panel 18 x 14
  293.  
  294.   if panel_A_Selection == 1 then
  295.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  296.    
  297.       drawLine(posX+2, posY+2, 18, 1, colors_blue)
  298.       drawText(posX+2, posY+2, componentsList[1], colors_white, colors_blue)
  299.      
  300.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  301.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  302.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  303.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  304.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  305.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  306.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  307.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  308.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  309.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  310.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  311.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  312.    
  313.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  314.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  315.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  316.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  317.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  318.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  319.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  320.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  321.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  322.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  323.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  324.   elseif panel_A_Selection == 2 then
  325.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  326.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  327.    
  328.       drawLine(posX+2, posY+3, 18, 1, colors_blue)
  329.       drawText(posX+2, posY+3, componentsList[2], colors_white, colors_blue)
  330.      
  331.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  332.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  333.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  334.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  335.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  336.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  337.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  338.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  339.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  340.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  341.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  342.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  343.      
  344.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  345.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  346.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  347.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  348.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  349.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  350.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  351.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  352.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  353.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  354.   elseif panel_A_Selection == 3 then
  355.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  356.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  357.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  358.    
  359.       drawLine(posX+2, posY+4, 18, 1, colors_blue)
  360.       drawText(posX+2, posY+4, componentsList[3], colors_white, colors_blue)
  361.      
  362.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  363.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  364.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  365.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  366.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  367.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  368.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  369.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  370.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  371.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  372.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  373.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  374.  
  375.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  376.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  377.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  378.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  379.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  380.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  381.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  382.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  383.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  384.   elseif panel_A_Selection == 4 then
  385.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  386.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  387.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  388.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  389.    
  390.       drawLine(posX+2, posY+5, 18, 1, colors_blue)
  391.       drawText(posX+2, posY+5, componentsList[4], colors_white, colors_blue)
  392.      
  393.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  394.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  395.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  396.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  397.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  398.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  399.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  400.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  401.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  402.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  403.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  404.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  405.      
  406.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  407.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  408.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  409.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  410.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  411.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  412.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  413.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  414.   elseif panel_A_Selection == 5 then
  415.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  416.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  417.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  418.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  419.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  420.    
  421.       drawLine(posX+2, posY+6, 18, 1, colors_blue)
  422.       drawText(posX+2, posY+6, componentsList[5], colors_white, colors_blue)
  423.      
  424.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  425.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  426.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  427.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  428.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  429.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  430.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  431.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  432.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  433.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  434.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  435.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  436.  
  437.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  438.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  439.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  440.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  441.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  442.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  443.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  444.   elseif panel_A_Selection == 6 then
  445.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  446.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  447.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  448.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  449.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  450.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  451.       drawLine(posX+2, posY+7, 18, 1, colors_blue)
  452.       drawText(posX+2, posY+7, componentsList[6], colors_white, colors_blue)
  453.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  454.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  455.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  456.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  457.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  458.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  459.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  460.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  461.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  462.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  463.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  464.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  465.  
  466.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  467.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  468.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  469.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  470.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  471.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  472.   elseif panel_A_Selection == 7 then
  473.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  474.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  475.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  476.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  477.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  478.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  479.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  480.    
  481.       drawLine(posX+2, posY+8, 18, 1, colors_blue)
  482.       drawText(posX+2, posY+8, componentsList[7], colors_white, colors_blue)
  483.      
  484.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  485.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  486.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  487.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  488.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  489.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  490.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  491.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  492.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  493.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  494.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  495.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  496.  
  497.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  498.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  499.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  500.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  501.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  502.   elseif panel_A_Selection == 8 then
  503.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  504.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  505.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  506.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  507.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  508.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  509.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  510.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  511.    
  512.       drawLine(posX+2, posY+9, 18, 1, colors_blue)
  513.       drawText(posX+2, posY+9, componentsList[8], colors_white, colors_blue)
  514.      
  515.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  516.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  517.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  518.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  519.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  520.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  521.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  522.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  523.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  524.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  525.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  526.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  527.  
  528.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  529.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  530.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  531.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  532.   elseif panel_A_Selection == 9 then
  533.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  534.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  535.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  536.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  537.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  538.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  539.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  540.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  541.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  542.    
  543.       drawLine(posX+2, posY+10, 18, 1, colors_blue)
  544.       drawText(posX+2, posY+10, componentsList[9], colors_white, colors_blue)
  545.      
  546.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  547.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  548.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  549.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  550.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  551.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  552.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  553.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  554.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  555.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  556.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  557.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  558.  
  559.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  560.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  561.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  562.   elseif panel_A_Selection == 10 then
  563.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  564.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  565.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  566.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  567.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  568.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  569.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  570.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  571.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  572.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  573.    
  574.       drawLine(posX+2, posY+11, 18, 1, colors_blue)
  575.       drawText(posX+2, posY+11, componentsList[10], colors_white, colors_blue)
  576.      
  577.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  578.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  579.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  580.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  581.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  582.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  583.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  584.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  585.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  586.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  587.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  588.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  589.  
  590.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  591.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  592.   elseif panel_A_Selection == 11 then
  593.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  594.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  595.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  596.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  597.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  598.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  599.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  600.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  601.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  602.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  603.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  604.    
  605.       drawLine(posX+2, posY+12, 18, 1, colors_blue)
  606.       drawText(posX+2, posY+12, componentsList[11], colors_white, colors_blue)
  607.      
  608.     drawLine(posX+2, posY+13, 18, 1, colors_white)
  609.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  610.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  611.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  612.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  613.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  614.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  615.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  616.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  617.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  618.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  619.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  620.  
  621.       drawText(posX+2, posY+13, componentsList[12], colors_black, colors_white)
  622.   elseif panel_A_Selection == 12 then
  623.     drawLine(posX+2, posY+1, 18, 1, colors_white)
  624.     drawLine(posX+2, posY+2, 18, 1, colors_white)
  625.     drawLine(posX+2, posY+3, 18, 1, colors_white)
  626.     drawLine(posX+2, posY+4, 18, 1, colors_white)
  627.     drawLine(posX+2, posY+5, 18, 1, colors_white)
  628.     drawLine(posX+2, posY+6, 18, 1, colors_white)
  629.     drawLine(posX+2, posY+7, 18, 1, colors_white)
  630.     drawLine(posX+2, posY+8, 18, 1, colors_white)
  631.     drawLine(posX+2, posY+9, 18, 1, colors_white)
  632.     drawLine(posX+2, posY+10, 18, 1, colors_white)
  633.     drawLine(posX+2, posY+11, 18, 1, colors_white)
  634.     drawLine(posX+2, posY+12, 18, 1, colors_white)
  635.    
  636.       drawLine(posX+2, posY+13, 18, 1, colors_blue)
  637.       drawText(posX+2, posY+13, componentsList[12], colors_white, colors_blue)
  638.      
  639.     drawLine(posX+2, posY+14, 18, 1, colors_white)
  640.       drawText(posX+2, posY+2, componentsList[1], colors_black, colors_white)
  641.       drawText(posX+2, posY+3, componentsList[2], colors_black, colors_white)
  642.       drawText(posX+2, posY+4, componentsList[3], colors_black, colors_white)
  643.       drawText(posX+2, posY+5, componentsList[4], colors_black, colors_white)
  644.       drawText(posX+2, posY+6, componentsList[5], colors_black, colors_white)
  645.       drawText(posX+2, posY+7, componentsList[6], colors_black, colors_white)
  646.       drawText(posX+2, posY+8, componentsList[7], colors_black, colors_white)
  647.       drawText(posX+2, posY+9, componentsList[8], colors_black, colors_white)
  648.       drawText(posX+2, posY+10, componentsList[9], colors_black, colors_white)
  649.       drawText(posX+2, posY+11, componentsList[10], colors_black, colors_white)
  650.       drawText(posX+2, posY+12, componentsList[11], colors_black, colors_white)
  651.  
  652.  
  653.   end
  654.  
  655.  
  656.   drawButton("navPanel_A_UP", "UP", posX+23, posY+5, 3, navigatePanel_A_UP, colors_white, colors_brown, true)
  657.   drawButton("navPanel_A_UP_DN", "DN", posX+23, posY+10, 3, navigatePanel_A_DN, colors_white, colors_brown, true)
  658.  
  659.    gpu.setBackground(colors_black)
  660. --panel 18 x 14
  661. end
  662.  
  663.  
  664. function drawPanel_B (posX, posY)
  665.  
  666. --header
  667.   drawText(posX+2, posY-1, "current running programs", colors_white, colors_black)
  668. --header
  669.  
  670. --border
  671.  --top line
  672.   drawLine(posX, posY, 60, 1, colors_silver)
  673.  --left side line
  674.   drawLine(posX, posY, 2, 16, colors_silver)
  675.  --right side line
  676.     drawLine(posX+58, posY+1, 2, 14, colors_silver)
  677.  --bottom line
  678.      drawLine(posX, posY+15, 60, 1, colors_silver)
  679. --border
  680.  
  681. --panel 18 x 14
  682.    drawLine(posX+2, posY+1, 56, 14, colors_white)
  683.    gpu.setBackground(colors_black)
  684. --panel 18 x 14
  685. end
  686.  
  687. --------------------------
  688. --======================--
  689. --------------------------
  690.  
  691.  
  692. function populatePanel_A(posX, posY)
  693.  
  694. end
  695.  
  696.  
  697.  
  698. --**********************--
  699. --**********GUI*********--
  700. --**********************--
  701.  
  702. --term.clear()
  703. getListOfConnenctedDevices(true)
  704.  
  705. -- this runs basicly every tick
  706.  
  707. while true do
  708. --clears the screen so to not overlap things IE render stuff under stuff
  709.   term.clear()
  710. --draws the screen border with some logic to make the tabs work (line 165 - line 210, drawScreenBorder())
  711.   drawScreenBorder(colors_blue)
  712. --draws whats to be in tab 1
  713.      if tab == 1 then
  714.        drawPanel_A(8, 5)
  715.        drawPanel_B(8, 25)
  716.        drawDebugWindow(110, 5, 38, 8)
  717.        populatePanel_A(8, 5)
  718.      end
  719. --draws whats to be in tab 2
  720.      if tab == 2 then
  721.       drawDebugWindow(110, 5, 38, 8)
  722.      end
  723. --checks for a touch event and sets variables accordingly
  724.   touchCheck()
  725. --this makes sure you can "inturupt" program with a key push
  726.   os.sleep(0.0)
  727. end
  728.  
  729.  
  730. ------------------------------------------------
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!