BrainInstaller (OpenComputers)

-- BrainInstaller
-- used to download other programs by BrainGamer

local comp = require("component")
local term = require("term")
local computer = require("computer")
local gpu = comp.gpu

os.execute("pastebin get -f BD2FmWh7 /lib/BrainInstallerList.lua")
package.loaded.BrainInstallerList = nil
local list = require("BrainInstallerList")

local mX, mY = gpu.getResolution()
mX = mX/3
mY = mY/3
gpu.setResolution(mX,mY)

term.clear()
computer.beep(850,0.15)
computer.beep(1000,0.08)

::SELECT::

term.clear()
gpu.setBackground(0x111111)
gpu.fill(1,1,mX,mY," ")
gpu.setForeground(0xDD2222)
gpu.set((mX/2)-7,1,"BrainInstaller")
gpu.set((mX/3),3,"Install:")
term.setCursor((mX/3)+9,3)

local prog = term.read()
prog = prog:sub(1,-2)
prog = prog:lower()

local dl = list[prog]

if not list[prog] then
  gpu.set((mX/3),4,"Unknown")
  computer.beep(300,0.15)
  os.sleep(1)
  goto SELECT
else
    gpu.set((mX/3),4,"Downloading")
    computer.beep(900,0.08)
end

gpu.setForeground(0x111111)
term.setCursor(1,mY-2)
os.execute("pastebin get -f ".. dl.id .." ".. dl.file)
gpu.setForeground(0xDD2222)
gpu.set((mX/3),5,"Done")
computer.beep(950,0.08)

::AGAIN::
gpu.fill(1,6,mX,mY," ")
gpu.set((mX/3),6,"Again? [Y/N]")
term.setCursor((mX/3)+14,6)
local again = term.read()
again = again:sub(1,-2)
again = again:lower()

if again == "y" then
  computer.beep(900,0.05)
  goto SELECT
elseif again == "n" then

  package.loaded.BrainInstallerList = nil
  os.remove("/lib/BrainInstallerList.lua")
  computer.beep(900,0.05)
::REBOOT::

  gpu.set((mX/3),7,"Reboot? [Y/N]")
  term.setCursor((mX/3)+14,7)
  local reboot = term.read()
  reboot = reboot:sub(1,-2)
  reboot = reboot :lower()

  if reboot == "y" then
    for x=0,3 do
      os.sleep(1)
      gpu.set((mX/3),8,"Rebooting: ".. tostring(3-x))
      computer.beep(750,0.02)
    end
    computer.beep(900,0.05)
    computer.shutdown(true)
  elseif reboot == "n" then
    computer.beep(300,0.2)
    gpu.setBackground(0x000000)
    gpu.setForeground(0xFFFFFF)
    gpu.setResolution(mX*3,mY*3)
    term.clear()
  else
    gpu.fill(mX,7,mX,1," ")
    computer.beep(300,0.15)
    goto REBOOT
  end
else
  computer.beep(300,0.15)
  gpu.fill(mX,6,mX,1," ")
  goto AGAIN
end