Advertisement
Guest User

hive12.lua

a guest
Jul 1st, 2016
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.71 KB | None | 0 0
  1. --just hrere to force reloading the api so I don't have to reboot
  2. package.loaded.gml=nil
  3. package.loaded.gfxbuffer=nil
  4.  
  5. local gml=require("gml")
  6. local gfxbuffer=require("gfxbuffer")
  7. local component=require("component")
  8. local fs=require("filesystem")
  9. local buffer=gfxbuffer.create(gui)
  10. local term=require("shell")
  11. --local buffer,setBackground
  12. --local canvus=buffer(4,4,4,gui)
  13.  
  14. function starting()
  15.  gui=gml.create("center","center",30,10)
  16.  helloLabel=gui:addLabel("center",1,25,"Hive Array")
  17.  buttonClose=gui:addButton("center",6,10,1,"Close",gui.close)
  18.  buttonCheckData=gui:addButton("center",7,10,1,"check files", file_check)
  19.  
  20. end
  21.  
  22. function getData()
  23. buffer.flush()
  24.      createGUI = gml.create("center","center",30,10)
  25.      local newFilebutton = createGUI:addButton("center",5,10,1,"Create",newFile)
  26.      local noDataLable1= createGUI:addLabel("center",1,25, "It Seems you don't have any hive data!")
  27.      local noDataLable2= createGUI:addLabel("center",2,25, "Do you want to create new file?")
  28.      local createClose= createGUI:addButton("center",6,10,1,"close",createGUI.close)    
  29. term.clear()
  30.  createGUI:run()
  31.  gui:close()
  32.  
  33. end
  34.    
  35.    
  36.    
  37. function file_check()
  38.  
  39.  
  40.  local fileGUI=gml.create("center","center",30,10)
  41.   local hivecfg = fs.open("/usr/etc/hivedata.cfg", "r")
  42.  
  43.   if hivecfg ~= nil then
  44.  
  45.  
  46.   hasDataLabel=fileGUI:addLabel("center",3,25,"Data Found!")
  47.   hasDataButton=fileGUI:addButton("center",5,10,1,"Continue?",launchMain())
  48. gui:close()  
  49. fileGUI:run()
  50. -- gui:hidden(true)
  51.  
  52.   fileGUI:draw()
  53.  
  54.   else
  55.  term.clear()
  56.   helloLabel:hide()
  57.   gui:close()
  58.   --fileGUI:close()
  59.   getData()
  60.   fileGUI:close()
  61. end
  62.  
  63.  
  64. end
  65.  
  66.  
  67. function newFile()
  68. local confGUI=gml.create("center", "center",30, 10)
  69. newLabel= confGUI:addLabel("center", "center", 3, 10, "New file made!")
  70. launchButton= confGUI:addButton(-6, "center", 10, 1,"Continue",launchMain())
  71.   local hivewrite=fs.open("/usr/etc/hivedata.cfg", "w")
  72.   hivewrite:write("This is the Hive Array Database")
  73.   hivewrite:write("this is tamp data")
  74. --  fs.close()
  75.   file_check()
  76. --gui:draw()
  77. --gui:changeFocusTo(gui)
  78. end
  79.  
  80. function launchMain()
  81. local mainGUI=gml.create("center","center", 50,50)
  82.  
  83.  
  84. --gui:changeFocusTo(gui)
  85. --newlabel:hide()
  86.  --gui.continebutton:hide()
  87. local mainLable=mainGUI:addLabel("center",1,25, "This is the main Program")
  88. local mainClose=mainGUI:addButton("center",-2,10,1,"close",gui.close)
  89. --gui:close()
  90. mainGUI:run()
  91. mainGUI:draw()
  92. end
  93.  
  94.  
  95. --{
  96. function newListBox()
  97.   local infoGUI=gui.create("center", "center", 30, 50)
  98.   term.clear()
  99.   local infoLabel=infoGUI:addLabel("center", 1, infoFunctionsLabelWidth, "Functions explanation for ")
  100.   infoGUI:addButton("center",-1,12,2,"Close",infoGUI.close)
  101.   infoGUI:run()
  102.  
  103.   gui:draw()
  104. end
  105. --]
  106.  
  107. starting()
  108. --canvus.draw(10,10)
  109. gui:run()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement