ClientCheck

local component = require("component")
local term = require("term")
local event = require("event")
local Data = component.data
local m = component.modem

local PortO = 123

m.open(PortO)

local _, _, from, port, _, Program = event.pull("modem_message")
    print("Starting ", Program)

    os.sleep(1)
    local _, _, from, port, _, ID = event.pull("modem_message")
    local File = io.open(ID, "r")
    local BalanceFile = File:read("*l")
    print(BalanceFile)
    local Pass = File:read("*l")
    print(Pass)
    local Decoded_Pass = Data.decode64(Pass)
    print("Decoded Pass is ", Decoded_Pass)

    os.sleep(2)
    local _, _, from, port, _, PassClient = event.pull("modem_message")

    if Decoded_Pass == PassClient then
        m.send(from,PortO,"True")
        os.sleep(1)
        term.clear()
        os.execute("ServerOn")

    elseif Decoded_Pass ~= PassClient then
        m.send(from,PortO,"False")
        os.sleep(1)
        term.clear()
        os.execute("ServerOn")
    end