[Lua] gemOS install

shell.run("pastebin", "get", "q761nqii","/os/api/tom")
shell.run("pastebin", "get", "igXUE29e","/os/api/button")
os.loadAPI("/os/api/tom")
os.loadAPI("/os/api/button")
tom.gui()
tom.header("Do you wish to")
tom.centre("install gemOS?")
buty = 6
button.makeButton(buty, "YES")
buty = buty + 2
button.makeButton(buty, "NO")
local opt = button.selectButton(6,2)
  if opt == 1 then
    tom.gui()
    tom.header("Enter unique label")
    tom.newl("")
    local lab = read()
    shell.run("label", "set", lab)
    tom.gui()
    tom.header("Please create first user:")
    tom.newl("")
    local name = read()
    tom.gui()
    tom.header("Please enter")
	tom.centre("a password:")
    tom.newl("")
    local passwd = read()
    tom.gui()
    tom.header("Generating new user file")
    fs.makeDir("/os/.users")
    fpath = ("/os/.users/" .. name)
    local fuse = fs.open(fpath,"w")
    fuse.write(passwd)
    sleep(1)
    tom.gui()
    tom.header("User file created, installing gemOS")
    shell.run("pastebin", "get", "6AHrNpfW", "clc")
    shell.run("pastebin", "get", "LjMsFYju", "/os/term")
    shell.run("pastebin", "get", "QjkpmgZD", "/os/.menu")
    shell.run("pastebin", "get", "gJWsdXJq", "startup")
    shell.run("pastebin", "get", "6EhE7rZ2", "/os/progms")
    shell.run("pastebin", "get", "nFCN3FjE", "/os/shut")
    shell.run("pastebin", "get", "SfHY9j9i", "back")
    fs.makeDir("prog")
    sleep(2)
    tom.gui()
    tom.header("gemOS installed")
    tom.centre("Rebooting")
    sleep(3)
    os.reboot()
  elseif opt == 2 then
    tom.centre("Ok, rebooting")
    sleep(1)
    os.reboot()
  end