View difference between Paste ID: aJ32C9X2 and UaDcT53f

 local maxw, maxh = term.getSize()
 
 mon = peripheral.wrap("top")
 mon.wirte("Ingrosso FIH - Scrap\nPrezzo: 40IC/stack")
 
 function creditoInsufficiente()
     clearRed()
     print("Credito insufficiente.")
     print("")
     print("Premere un tasto per uscire")
     os.pullEvent("key")
     os.reboot()
 end
 
 fnction inviaProd()
    local lol = 0
    repeat
     rs.setOutput("back", true),
     sleep(0.5)
     rs.setOutput("back", false)
     sleep(0.7)
     lol = lol + 1
   until lol = 9
 end
 
 function prodottoEsaurito()
     clearRed()
     print("Prodotto esaurito.")
     print("")
     print("Premere un tasto per uscire")
     os.pullEvent("key")
     os.reboot()
 end
 
 -- IMPLEMENTAZIONE DEL DRAWFILLEDBOX
 local function drawPixelInternal(xPos, yPos)
     term.setCursorPos(xPos, yPos)
     term.write(" ")
 end
 
 local tColourLookup = {}
 for n = 1, 16 do
     tColourLookup[string.byte("0123456789abcdef", n, n)] = 2 ^ (n - 1)
 end
 
 function drawFilledBox(startX, startY, endX, endY, nColour)
     if type(startX) ~= "number" or type(startX) ~= "number" or type(endX) ~=
         "number" or type(endY) ~= "number" or
         (nColour ~= nil and type(nColour) ~= "number") then
         error("Expected startX, startY, endX, endY, colour", 2)
     end
 
     startX = math.floor(startX)
     startY = math.floor(startY)
     endX = math.floor(endX)
     endY = math.floor(endY)
 
     if nColour then term.setBackgroundColor(nColour) end
     if startX == endX and startY == endY then
         drawPixelInternal(startX, startY)
         return
     end
 
     local minX = math.min(startX, endX)
     if minX == startX then
         minY = startY
         maxX = endX
         maxY = endY
     else
         minY = endY
         maxX = startX
         maxY = startY
     end
 
     for x = minX, maxX do for y = minY, maxY do drawPixelInternal(x, y) end end
 end
 
 function clear()
     sfondo(colors.black)
     term.clear()
     term.setCursorPos(1, 1)
 end
 
 function clearRed()
     sfondo(colors.red)
     term.clear()
     term.setCursorPos(1, 1)
 end
 
 function colore(sfumatura) term.setTextColour(sfumatura) end
 
 function sfondo(sfumaturaSfondo) term.setBackgroundColour(sfumaturaSfondo) end
 
 function fineColore() term.setTextColour(colours.white) end
 
 function fineSfondo() term.setBackgroundColour(colours.black) end
 
 function titolo(testo)
     drawFilledBox(1, 1, maxw, 1, colors.yellow)
     term.setCursorPos((maxw - #testo) / 2, 1)
     colore(colors.black)
     term.write(testo)
     sfondo(colors.blue)
 end
 
 function errore(errore)
     sfondo(colors.red)
     colore(colors.white)
     term.clear()
     term.setCursorPos(1, 1)
     titolo("Errore irreversibile")
     term.setCursorPos(1, 3)
     sfondo(colors.red)
     colore(colors.white)
     print(errore)
     print("\n\n\nAttendere qualche secondo...")
     os.sleep(5)
     os.reboot()
 end
 
 sfondo(colours.blue)
     term.clear()
     term.setCursorPos(1, 1)
     titolo("Pagamento rapido con Nebraska Pay")
     sfondo(colours.blue)
     colore(colors.white)
     print(
         "\n\nInserire i propri dati. Premere Enter per confermare i dati inseriti. \nSe i dati sono corretti, il campo diventerà verde. Se sono errati, il programma chiederà di reinserirli nuovamente.")
 
     -- nomeutente
     term.setCursorPos(1, 9)
     term.write("Nome utente:")
     term.setCursorPos(15, 9)
     fineColore()
     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)
             colore(colours.lime)
             term.write(utente)
             fineColore()
             utenteAccettato = true
         else
             term.setCursorPos(15, 9)
             colore(colours.red)
             term.write("Utente errato!          ")
             sleep(2)
             term.setCursorPos(15, 9)
             fineColore()
             term.write("                       ")
             term.setCursorPos(15, 9)
             conteggioErrori = conteggioErrori + 1
             if conteggioErrori > 2 then
                 term.setCursorPos(15, 9)
                 colore(colours.red)
                 errore("Troppi tentativi di immissione errati    ")
             end
         end
     end
     colore(colours.white)
     term.setCursorPos(1, 11)
     term.write("Password:")
     term.setCursorPos(15, 11)
     conteggioErrori = 0
     passAccettata = false
     while passAccettata == false do
         fineColore()
         password = read("#")
         colore(colours.black)
         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)
             colore(colours.lime)
             term.write("##############               ")
             fineColore()
             passAccettata = true
         else
             term.setCursorPos(15, 11)
             colore(colours.red)
             term.write("Password errata!            ")
             conteggioErrori = conteggioErrori + 1
-    titolo("HIGHLAND MINING             ")
+
             term.setCursorPos(15, 11)
             term.write("                               ")
             term.setCursorPos(15, 11)
-    term.write(" CHIUDI SESSIONE ")
+
                 term.setCursorPos(15, 11)
                 colore(colours.red)
                 errore("Troppi tentativi di immissione errati")
             end
         end
     end
-    p[1] = {"Pirite", 650, 664, 6, 1}
+
-    p[2] = {"Sfalerite", 50, 664, 8, 1}
+
-    p[3] = {"Neth. Gold", 30100, 3093, 2, 1}
+
-    p[4] = {"Neth. Iron", 2048, 3093, 3, 1}
+    titolo("FoxInves Holding - Ingrossi             ")
-	p[5] = {"Neth. Copper", 1960, 3093, 6, 1}
+
     sfondo(colors.red)
     term.setCursorPos(35, 1)
     term.write(" LOGOUT ")
     fineColore()
     fineSfondo()
     print("")
     print("\nProdotto           Prezzo")
     p = {}
     -- nome, prezzo, id, meta, colore cavo
     p[1] = {"Scrap", 45, 0, 0, 0}
     ypos = 4
     for k, v in pairs(p) do
         term.setCursorPos(1, ypos)
         term.write(v[1])
         term.setCursorPos(20, ypos)
         term.write(v[2])
         term.setCursorPos(30, ypos)
         if alt == false then
             sfondo(colors.lightBlue)
             alt = true
         else
             sfondo(colors.blue)
             alt = false
         end
         colore(colors.white)
         term.write(" Compra ")
         fineSfondo()
         fineColore()
         ypos = ypos + 1
     end
 
     while true do
 
         local event, par1, x, y = os.pullEvent("mouse_click")
         if event == "mouse_click" and y > 3 and y < 10 then
             prodotto = p[y - 3]
             break
         elseif event == "mouse_click" and y == 1 then
             os.reboot()
         end
         sleep(1)
     end
     clear()
 
     print(prodotto[1])
 
     if colors.test(redstone.getBundledInput("bottom"), prodotto[5]) == true then
         prodottoEsaurito()
     end
     term.clear()
     term.setCursorPos(1, 1)
     titolo("Paga con Nebraska Pay")
     sfondo(colours.black)
     colore(colors.white)
-    term.write("Highland Mining")
+
     if tonumber(risposta.saldo) >= tonumber(prodotto[2]) then
         prezzoAccettato = true
     else
         errore("Disponibilità insufficiente!")
     end
     term.setCursorPos(1, 3)
     term.write("Invio di ")
     term.write(prodotto[2])
     term.write(" IC a favore di ")
     term.write("FoxInvest Holding - Ingrossi")
-                                  prodotto[2] .. "&beneficiario=HighlandMining&causale=Merce%20ingrosso%20Dalmally")
+
     colore(colors.yellow)
     print("\n\nInvia il denaro           Annulla")
     while true do
         event, key, x, y = os.pullEvent()
         if event == "mouse_click" and x < 16 and y == 8 then
             inviaDenaro = http.get(
                               "http://172.16.20.220/luanet/servlets/nebraskapay.php?auth=" ..
                                   password .. "&utente=" .. utente ..
                                   "&richiesta=trasferimento&valore=" ..
                                   prodotto[2] .. "&beneficiario=HighlandMining")
                               .readAll()
             risultatoInvio = textutils.unserialize(inviaDenaro)
             if risultatoInvio.stato == "OK" then
-    titolo("Erogazione in corso")
+
             else
                 clear()
                 errore("Errore durante il pagamento")
-    print("\nATTENZIONE: IMPIANTO LOGISTIC LENTO, ATTENDERE")
+
         elseif event == "mouse_click" and x > 18 and y == 8 then
             errore("Pagamento annullato dall'utente.")
-    ben = peripheral.wrap("back")
+
-    ben.makeRequest(ben.getItemIdentifierIDFor(prodotto[3], prodotto[4]), 3456)
+
     clear()
     titolo("Stiamo erogando un vagone di Scrap!")
     fineSfondo()
     fineColore()
     print("\n\nErogazione di un vagone di " .. prodotto[1] .. " in corso...")
     print("\nATTENZIONE: In caso di mancata erogazione CONTATTARE IMMEDIATAMENTE FoxWorn3365!")
     sfondo(colors.red)
     colore(colors.white)
     inviaProd()
     sleep(10)
 end