client

os.pullEvent = os.pullEventRaw

local file = fs.open(".server", "r")

if file == nil then
   print("No server configured")
   return
end

local server = tonumber(file.readLine())
file.close()

local sid
local user = "Guest"
local modem = peripheral.find("modem")
local event, side, sChannel, id, data, dist
local _id = os.getComputerID()
local admin = false

local function debug(msg)
   modem.transmit(2, os.getComputerID(), msg)
end

local function idRNG()
   modem.close(_id)
   _id = math.random(50000, 55000)
   modem.open(_id)
end

local function receive()
   debug("Listening on " .. _id)
   event, side, sChannel, id, data, dist = os.pullEvent("modem_message")
end

local function send(to, msg)
   idRNG()
   modem.transmit(to, _id, msg)
   debug("Sending " .. msg .. " to " .. to .. " from " .. _id)
   receive()
end

local function start()
   debug("Starting execution")
   while true do
      term.setBackgroundColor(8)
      term.setTextColor(16)
      term.clear()
      term.setCursorPos(1, 1)
      print("Welcome, " .. user)
      if sid ~= nil then
         term.setCursorPos(3, 4)
         print("[Logout]")
         term.setCursorPos(3, 6)
         print("[Balance]")
         term.setCursorPos(3, 8)
         print("[Transfer]")
      else
         term.setCursorPos(3, 4)
         print("[Login]")
         term.setCursorPos(3, 6)
         print("[Create Account]")
      end
      event, button, x, y = os.pullEvent("mouse_click")
      if x >= 3 and x <= 10 and y == 4 and sid == nil then
         debug("Login")
         send(server, "login")
         debug("Sent login")
         term.clear()
         term.setCursorPos(3, 4)
         write("User: ")
         user = read()
         term.setCursorPos(3, 5)
         write("Pass: ")
         pass = read("*")
         debug("Sending " .. user .. ":" .. pass .. " to " .. id)
         send(id, user .. ":" .. pass)
         debug("Sent user and pass")
         debug("Listening for return")
         debug("Got return: " .. data .. " from " .. id)
         if data:find("Login Successful") and data:find(":") then
            if data:find(":", data:find(":") + 1) then
               admin = true
            else
               admin = false
            end
            print(admin)
            sid = data:sub(data:find(":") + 1)
            print(data:sub(0, data:find(":") - 1))
         else
            user = "Guest"
         end
         term.setCursorPos(3, 2)
         sleep(1)
      elseif x >= 3 and x <= 10 and y == 4 and sid ~= nil then
         user = "Guest"
         send(server, "logout")
         send(id, sid)
         sid = nil
         print(data)
         sleep(1)
      elseif x >= 3 and x <= 11 and y == 6 and sid ~= nil then
         send(server, "balance")
         send(id, sid)
         term.clear()
         term.setCursorPos(1, 1)
         print("Balance is $" .. data)
         os.pullEvent("mouse_click")
      elseif x >= 3 and x <= 12 and y == 8 and sid ~= nil then
         send(server, "transfer")
         term.clear()
         term.setCursorPos(3, 4)
         write("Amount: $")
         amt = read()
         term.setCursorPos(3, 6)
         write("To User: ")
         user2 = read()
         send(id, sid .. ":" .. user2 .. ":" .. amt)
         term.setCursorPos(3, 2)
         print(data)
         os.pullEvent("mouse_click")
      elseif x >= 3 and x <= 18 and y == 6 and sid == nil then
         term.clear()
         term.setCursorPos(3, 4)
         write("Username: ")
         user = read()
         term.clear()
         term.setCursorPos(3, 4)
         write("Password: ")
         pass = read("*")
         term.clear()
         send(id, "create")
         send(id, user .. ":" .. pass)
         user = "Guest"
         term.setCursorPos(3, 4)
         print(data)
         os.pullEvent("mouse_click")
      end
   end
end

start()