rentMiningTurtle

os.loadAPI("ManualQuarry.lua")
os.pullEvent = os.pullEventRaw
serverID = 4
filename = "adminsuccess.txt"
cost = 200
print("Fuel Level: " .. turtle.getFuelLevel()/20000 .. "%")
print("Fuel Amount: " .. turtle.getFuelLevel())

function openPort()
    rednet.open("left")
end

function readAdminPassword()
    local file = fs.open(filename, "r")
    line = file.readLine()
    file.close()
    return line
end

function conductTransaction(username, password)
  message = "buy " .. username .. " " .. password .. " " .. cost
  rednet.send(serverID, message)
  id, value = rednet.receive(nil, 3)
  os.sleep(1)
  return value
end

function checkCredentials(username, password)
  message = "search " .. username .. " " .. password
  rednet.send(serverID, message)
  id, value = rednet.receive(nil, 3)
  os.sleep(1)
  return value
end

status, err = pcall(function() openPort() end)
if not status then
    turtle.select(1)
    turtle.equipLeft()
    status, err = pcall(function() openPort() end)
    if not status then
        print("Modem not found in first slot or left hand, stopping")
        os.shutdown()
    end
end

print("Mining Turtle Rental - $" .. cost)
print("Please Login to Rent")
print("Username: ")
username = read()
print("Password: ")
password = read("*")
if username == "admin" and password == readAdminPassword() then
    os.exit(1)
end
success = conductTransaction(username, password)
if success == nil then
    print("Transaction Connection to Server Failed")
    os.sleep(3)
    os.shutdown()
elseif success == "false" then
    print("Transaction Failed")
    print("Account Value: " .. checkCredentials(username, password))
    os.sleep(5)
    os.shutdown()
else
    print("Success!")
    turtle.equipLeft()
    print("Warning: Stopping the Turtle Will Complete Current Transaction (also the turtle will slightly break if it cannot break certain blocks in area)")
    ManualQuarry.mine()
    os.shutdown()
end