View difference between Paste ID: HHy2m94W and VkYYSbR4

 fileName = "server"
 if(fs.exists(fileName) == true)then
     print("Installing BlueBank Server System")
     shell.run("rename "..fileName.." startup")
     sleep(5)
     os.reboot()
 end
 --[ Welcome to BlueBank made by TrumpetMiner v3.5
-side = "top" -- Rednet Modem sidem (End of Setup)
+
 --[ To Setup Your Server, Edit The Following
     -- Authorization Code
 authSet = 3
 function authF()
  authSet = authSet * 2 + 7
- print "BlueBank Server 3.0 Status: Online"
+
 
 
 
 server = nil    -- Admin ID#
 function getserver()
   local fname = "ServerID"
   if fs.exists(fname) then
 		file = fs.open(fname, "r")
 		server = tonumber(file.readAll())
 		file.close()
 		print("Server ID: "..server)
   else
 		print("No server configured")
 		print("This ID is: ".. os.getComputerID())
 		term.write("Server ID: ")
 		server = io.read()
 		file = fs.open(fname, "w")
 		file.write(server)
 		file.close()
 		server = tonumber(server)
   end
 end
 getserver()
 
 -- Determine where the modem is.
 print("Looking for modem,")
 if peripheral.isPresent("left") and peripheral.getType("left")=="modem" then
   side = "left"
 elseif peripheral.isPresent("right") and peripheral.getType("right")=="modem" then
   side = "right"
 elseif peripheral.isPresent("top") and peripheral.getType("top")=="modem" then
   side = "top"
 elseif peripheral.isPresent("back") and peripheral.getType("back")=="modem" then
   side = "back"
 elseif peripheral.isPresent("bottom") and peripheral.getType("bottom")=="modem" then
   side = "bottom"
 else
     print("No Modem Found")
     side = false
 end
 while side == false do
 
     sleep(5)
     shell.run("startup")
 
 end
 print("Modem found on "..side)
 rednet.open(side)
 -- Functions
 function drawStart()
  term.clear()
  cur(1,1)
  print ("BlueBank Server 3.0 Status: Online Server ID: " .. tonumber(server))
  print "--------------------------------------"
  cur(3,4)
  print("Current Auth Code > "..authSet)
  id, message = rednet.receive()
  if type(message) == "string" then
   if message == "Login" then
     login()
   elseif message == "Balance" then
     balance()
   elseif message == "Transfer" then
     transfer()
   elseif message == "Create" then
     create()
   elseif message == "Delete" then
     delete()
   elseif message == "Rename" then
     rename()
   elseif message == "Passcode" then
     passcode()
   elseif message == "Add" then
     add()
   elseif message == "Auth" then
     auth()
   else
    rednet.send(id,"Command Not Found")
    drawStart()
   end
  else
   rednet.send(id,"Data is Not String")
  end
 end
 function login()
  id, user = rednet.receive()
  id, pass = rednet.receive()
  if type(pass) == "string" then
   if type(user) == "string" then
    if fs.exists("user/"..user) == true then
      h = fs.open("user/"..user, "r")
      passReal = h.readAll()
      h.close()
      if pass == passReal then
        rednet.send(id,"Login Successful")
        drawStart()
      else
        rednet.send(id,"Password Incorrect")
        drawStart()
      end
    else
      rednet.send(id,"Unknown User")
      drawStart()
    end
   else
    rednet.send(id,"User Is Not String")
   end
  else
    rednet.send(id,"Password Is Not String")
  end
 end
 function balance()
  id, user = rednet.receive()
  if type(user) == "string" then
   h = fs.open("$/"..user, "r")
   bal = h.readAll()
   h.close()
   rednet.send(id,bal)
   drawStart()
  else
   rednet.send(id,"User is Not String")
  end
 end
 function transfer()
  id, user1 = rednet.receive()
  id, user2 = rednet.receive()
  id, am = rednet.receive()
  if type(user1) == "string" and type(user2) == "string" and type(am) == "string" then
    if fs.exists("user/"..user1) and fs.exists("user/"..user2)then
     h = fs.open("$/"..user1, "r")
     bal1 = h.readAll()
     h.close()
     if tonumber(bal1) >= tonumber(am) then
       h = fs.open("$/"..user2, "r")
       bal2 = h.readAll()
       h.close()
       bal1 = bal1 - am
       bal2 = bal2 + am
       h = fs.open("$/"..user1, "w")
       h.write(bal1)
       h.close()
       h = fs.open("$/"..user2, "w")
       h.write(bal2)
       h.close()
       rednet.send(id,"Funds Transfered")
       drawStart()
     elseif bal1 <= am then
       rednet.send(id,"Not Enough Funds")
       --term.setCursorPos(1,3)
       --print(user1)
       --print(user2)
       --print(bal1)
       --print(bal2)
       --print(am)
       drawStart()
     else
       rednet.send(id,"An Error Occurred")
       drawStart()
     end
   else
     rednet.send(id," User(s) Not Found")
     drawStart()
   end
  else
    rednet.send(id,"Data Is Not String")
  end
 end
 function create()
  id, user = rednet.receive()
  id, pass = rednet.receive()
  if type(user) == "string" and type(pass) then
   if fs.exists("user/"..user) then
     rednet.send(id,"User Exists")
   else
     h = fs.open("user/"..user,"w")
     h.write(pass)
     h.close()
     h = fs.open("$/"..user,"w")
     h.write("0")
     h.close()
     rednet.send(id,"Account Created")
     drawStart()
   end
  else
   rednet.send(id,"Data Is Not String")
  end
  drawStart()
 end
 function delete()
 end
 function rename()
 end
 function passcode()
 end
 function add()
  id, user = rednet.receive()
  id, amt = rednet.receive()
  id, auth1 = rednet.receive()
  if type(user) == "string" and type(amt) == "string" and type(auth1) == "string" then
   if tonumber(auth1) == authSet then
    if fs.exists("user/"..user) then
      h = fs.open("$/"..user, "r")
      bal = h.readAll()
      h.close()
      balNew = bal + amt
      h = fs.open("$/"..user, "w")
      h.write(balNew)
      h.close()
      rednet.send(id,"$"..amt.." Added to "..user)
      drawStart()
    else
      rednet.send(id,"No Such User")
      drawStart()
    end
   else
    rednet.send(id,"Authorization Code Not Accepted")
    drawStart()
   end
  else
   rednet.send(id,"Data Is Not String")
  end
 end
 function auth()
  authF()
  rednet.send(id,"New Auth Code Found")
  drawStart()
 end
 function cur(cX,cY)
  term.setCursorPos(cX,cY)
 end
 -- Program
 drawStart()