Bancomat

--BANCOMAT V2 copyright lego11
--VARIABILI
local lbl = "BN Credit"
local tabr = {}

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

function pinErrato()
clear()
print("Errore di verifica del PIN")
print("")
print("Premere un tasto per uscire")
os.pullEvent("key")
os.reboot()
end


function cartaNonValida()
clear()
print("Carta non valida o corrotta.")
print("")
print("Premere un tasto per uscire")
os.pullEvent("key")
os.reboot()
end

function cartaVuota()
clear()
print("Carta smagnetizzata o vuota.")
print("")
print("Premere un tasto per uscire")
os.pullEvent("key")
os.reboot()
end

function preleva()
tabr.t = tab.t
tabr.e = tab.e
tabr.p = tab.p
tabr.v = tostring(credito - prelievo)

ncr = textutils.serialize(tabr)

m.setInsertCardLight(true)
m.beginWrite(ncr,lbl)
os.pullEvent("mag_write_done")
m.setInsertCardLight(false)
end


m = peripheral.wrap("right")
lbl = "BN Credit"



clear()
print("Banco di NEBRASKA - Sistema BANCOMAT(R)")
print("")
print("Inserire la carta")
m.setInsertCardLight(true)
za,rawcarta = os.pullEvent("mag_swipe")
m.setInsertCardLight(false)

if rawcarta == nil then
cartaVuota()
end

tab = textutils.unserialize(rawcarta)

if type(tab) ~= "table" then
cartaNonValida()
end

if tab.t ~= "cc" then
cartaNonValida()
end

if tab.e ~= "BN" then
cartaNonValida()
end

if tab.p ~= "0000" then
print("")
print("Inserire il PIN e premere ENTER")
print("")
local pinUtente = read("#")
if pinUtente ~= tab.p then
pinErrato()
end
end

credito = tonumber(tab.v)
clear()
while true do
print("La carta ha una disponibilità di "..credito.." IC.")
print("")
print("Per favore scegliere un'opzione utilizzando i tasti numerici e confermare con ENTER:")
print("")
print("[1] Preleva   64 IC")
print("[2] Preleva  128 IC")
print("[3] Preleva  256 IC")
print("[4] Preleva  512 IC")
print("[5] Preleva 4096 IC")
print("[6] Cambia il PIN")
print("[7] Esci senza prelevare")
num=tonumber(read())
if num == 1 then
prelievo=64
if prelievo > credito then
clear()
print("Disponibilità insufficiente")
sleep(5)
os.reboot()
end
clear()
print("Inserire nuovamente la carta per confermare il prelievo")
preleva()
print("Ritirare il denaro")
print("")
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 64 IC")
redstone.setOutput("bottom", false)
print("")
print("Prelievo effettuato!")
print("")
print("Tra poco sarà possibile eseguire un'altra operazione.")
sleep(5)
os.reboot()

elseif num == 2 then

prelievo=128
if prelievo > credito then
clear()
print("Disponibilità insufficiente")
sleep(5)
os.reboot()
end
clear()
print("Inserire nuovamente la carta per confermare il prelievo")
preleva()
print("Ritirare il denaro")
print("")
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 64 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 128 IC")
redstone.setOutput("bottom", false)
print("")
print("Prelievo effettuato!")
print("")
print("Tra poco sarà possibile eseguire un'altra operazione.")
sleep(5)
os.reboot()

elseif num == 3 then

prelievo=256
if prelievo > credito then
clear()
print("Disponibilità insufficiente")
sleep(5)
os.reboot()
end
clear()
print("Inserire nuovamente la carta per confermare il prelievo")
preleva()
print("Ritirare il denaro")
print("")
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 64 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 128 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 192 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 256 IC")
redstone.setOutput("bottom", false)
print("")
print("Prelievo effettuato!")
print("")
print("Tra poco sarà possibile eseguire un'altra operazione.")

sleep(5)
os.reboot()

elseif num == 4 then

prelievo=512
if prelievo > credito then
clear()
print("Disponibilità insufficiente")
sleep(5)
os.reboot()
end
clear()
print("Inserire nuovamente la carta per confermare il prelievo")
preleva()
print("Ritirare il denaro")
print("")
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 64 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 128 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 192 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 256 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 320 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 384 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 448 IC")
redstone.setOutput("bottom", false)
sleep(0.25)
redstone.setOutput("bottom", true)
sleep(0.25)
print("Erogati 512 IC")
redstone.setOutput("bottom", false)
print("")
print("Prelievo effettuato!")
print("")
print("Tra poco sarà possibile eseguire un'altra operazione.")
sleep(5)
os.reboot()

elseif num == 5 then
prelievo=4096
erogati = 0
if prelievo > credito then
clear()
print("Disponibilità insufficiente")
sleep(5)
os.reboot()
end
clear()
print("Inserire nuovamente la carta per confermare il prelievo")
preleva()
print("Ritirare il denaro")
print("")
for i=prelievo,0,-64 do
redstone.setOutput("bottom", true)
sleep(0.25)
erogati = erogati + 64
print("Erogati "..erogati.." IC")
redstone.setOutput("bottom", false)
end
print("")
print("Prelievo effettuato!")
print("")
print("Tra poco sarà possibile eseguire un'altra operazione.")
sleep(5)
os.reboot()

elseif num == 6 then
clear()
print("Cambio PIN della carta di credito")
print("")
print("Nota: Impostare il PIN a '0000' per disabilitarlo")
print("")
print("Inserire il PIN e premere ENTER:")
tab.p = read("#")
clear()
print("Inserire la carta per confermare il cambiamento")
prelievo=0
preleva()
print("")
if tab.p == "0000" then
print("PIN disabilitato correttamente")
else
print("PIN cambiato correttamente")
end
print("")
print("Premere un tasto qualsiasi per ritorare al menu' principale")
os.pullEvent("key")
elseif num == 7 then clear() break end
clear()
sleep(2)
clear()
end
clear()
print("Tra poco sarà possibile eseguire un'altra operazione.")
sleep(1)
os.reboot()