Ingrosso Grano CAE

function clear()
term.clear()
term.setCursorPos(1,1)
end

clear()
print("CONSORZIO AGRICOLO ECONOMICO")
print("")
print("Scaricare il treno e premere qualunque tasto quando tutti i vagoni sono stati scaricati")

os.pullEvent("key")


clear()

ben = peripheral.wrap("bottom")

ben.getAvailableItems()
i,j = os.pullEvent("available_items_return")


if j[1] == nil then
    print("Errore: non è stato scaricato materiale")
    print("")
    print("Premere un tasto qualsiasi per uscire")
    print("")
    os.pullEvent("key")
    sleep(1)
    os.reboot()
end


print("Inserire le credenziali del conto nPay")

 -- nomeutente
 term.setCursorPos(1, 9)
 term.write("Nome utente:")
 term.setCursorPos(15, 9)
 utenteAccettato = false
 conteggioErrori = 0
 while utenteAccettato == false do
     utente = read()
     checkuser = http.get("http://172.16.20.220/luanet/servlets/nebraskapay.php?auth=no&richiesta=verifica&utente="..utente).readAll()
     tabcheckuser = textutils.unserialize(checkuser)
     if tabcheckuser.stato == "OK" then
         term.setCursorPos(15, 9)
         term.write(utente)
         utenteAccettato = true
     else
         term.setCursorPos(15, 9)
         term.write("Utente errato!          ")
         sleep(2)
         term.setCursorPos(15, 9)
         term.write("                       ")
         term.setCursorPos(15, 9)
         conteggioErrori = conteggioErrori + 1
         if conteggioErrori > 2 then
             term.setCursorPos(15, 9)
             errore("Troppi tentativi di immissione errati    ")
         end
     end
 end
 term.setCursorPos(1, 11)
 term.write("Password:")
 term.setCursorPos(15, 11)

 conteggioErrori = 0
 passAccettata = false
 while passAccettata == false do
     password = read("#")
     checkuser = http.get(
                     "http://172.16.20.220/luanet/servlets/nebraskapay.php?auth=" ..
                         password .. "&richiesta=addebito&valore=0&utente=" ..
                         utente).readAll()
     risposta = textutils.unserialize(checkuser)
     if risposta.stato == "OK" then
         term.setCursorPos(15, 11)
         term.write("##############               ")
         passAccettata = true
     else
         term.setCursorPos(15, 11)
         term.write("Password errata!            ")
         conteggioErrori = conteggioErrori + 1
         sleep(2)
         term.setCursorPos(15, 11)
         term.write("                               ")
         term.setCursorPos(15, 11)
         if conteggioErrori > 2 then
             term.setCursorPos(15, 11)
             errore("Troppi tentativi di immissione errati")
         end
     end
 end

clear()
print("Pesatura grano in corso...")
print("")
sleep(1)
print("Totale versato: "..j[1][2].." pezzi di grano")
print("")

rest = http.get("http://172.16.20.220/luanet/servlets/ingrosso_grano.php?qta="..j[1][2].."&npay="..utente.."&auth=NYDBGJTI");
rest_all = rest.readAll()
rest.close()
t = textutils.unserialize(rest_all)

if t.stato == "KO" then
    clear()
    print("ERRORE IRREVERSIBILE\n\n")
    print(t.errore)
    print("\n\nPremere un tasto per riavviare")
    os.pullEvent("key")
    os.reboot()
end

ben.makeRequest(j[1][1], j[1][2])

print("Denaro versato sul conto: "..utente)
print("")
print("")
print("Grazie per aver scelto il Consorzio Agricolo Economico!")
sleep(15)
os.reboot()