installer

local codes = {
  ["walCrypt"] = "efeJSTH9",
  ["startup"] = "kNJ6sFHd"
}
local function get(name,code)
  if code then
    local r=http.get("http://www.pastebin.com/raw.php?i="..code)
    if not fs.exists(name) then
      error(name.." already exists")
    end
    local cont = {}
    local a = r.readLine()
    while a do
      local cont[#cont+1] = a
      local a = r.readLine()
    end
    local prog = fs.open(name,"w")
    for k,v in pairs(cont) do
      fs.writeLine(k)
    end
    prog.flush()
    prog.close()
    return true
  else
    error("No code?")
    return false
  end
end
term.clear()
print("Would you like to install walia6's login? y/n")
local a = true
while a do
  event,char = os.pullEvent("char")
  if string.upper(char) == "N" or string.upper(char) == "Y" then
    k=string.upper(char)
  end
end
if k == "Y" then
  for k,v in pairs(codes) do
    get(k,v)
  end
  os.loadAPI("walCrypt")
  print()
  write("Username: ")
  user = read()
  j=true
  while j do
    prin()
    write("Password: ")
    pass = read("*")
    write("Enter password again: ")
    if read("*") == pass then
      shell.run("mkdir users")
      f=fs.open("users/"..user,"w")
      f.writeLine(walCrypt.walCrypter(pass))
      f.flush()
      f.close()
      j=false
    else
      print("password do not match")
    end
  end
  os.reboot()
end