command.lua

-----------------------Params
local bankServerID = 15
local modemSide = "top"
local diskSide = "right"
local adminPassword = "2048"

local text_error_noconnection = "Can't connect to server"
--------------------------
rednet.open(modemSide)

os.loadAPI("bankapi.lua")
bankapi.setBankServerID(bankServerID)

local function colorFromName(c)
    if (c == "white") then return colors.white
    elseif (c == "orange") then return colors.orange
    elseif (c == "magenta") then return colors.magenta
    elseif (c == "lightBlue") then return colors.lightBlue
    elseif (c == "yellow") then return colors.yellow
    elseif (c == "lime") then return colors.lime
    elseif (c == "pink") then return colors.pink
    elseif (c == "gray") then return colors.gray
    elseif (c == "lightGray") then return colors.lightGray
    elseif (c == "cyan") then return colors.cyan
    elseif (c == "purple") then return colors.purple
    elseif (c == "blue") then return colors.blue
    elseif (c == "brown") then return colors.brown
    elseif (c == "green") then return colors.green
    elseif (c == "red") then return colors.red
    elseif (c == "black") then return colors.black
    else return nil end
end

--------------------------

-- Password protection
local pass = ""
repeat
    term.setBackgroundColor(colors.black)
    term.setTextColor(colors.yellow)
    term.clear()
    local scrW, scrH = term.getSize()
    local title = "Mermegold"
    term.setCursorPos(scrW/2-string.len(title)/2, scrH/2)
    term.write(title)
    term.setCursorPos(scrW/2-string.len(title)/2, scrH/2+1)
    pass = read("*")
until (pass == adminPassword)

while true do -- Second while to allow the use of breaks as continues
while true do

    local command = bankapi.optionMenu("Mermegold", {
        [1] = {
        ["option"] = "new",
        ["text"] = "Crear nueva cuenta"},
        [2] = {
        ["option"] = "transaction",
        ["text"] =  "Realizar transacción"},
        [3] = {
        ["option"] = "balance",
        ["text"] =  "Consultar balance"},
        [4] = {
        ["option"] = "delete",
        ["text"] =  "Borrar cuenta"},
        [5] = {
        ["option"] = "log",
        ["text"] =  "Historial de transacciones"},
        [6] = {
        ["option"] = "assigncard",
        ["text"] =  "Asignar tarjeta"},
        [7] = {
        ["option"] = "logout",
        ["text"] =  "Salir"},
    })

    if (command == "new") then

        local steps = {"Nombre del usuario", "Color representativo"}
        local name = bankapi.inputTextScreen(steps, 1, 25)
        if (name == nil) then break end
        local color = bankapi.selectColorScreen(steps, 2)
        if (color == nil) then break end

        local success, message = bankapi.newAccount(name, 0, color)
        bankapi.responseScreen(message.success, message.response)

    elseif (command == "transaction") then
        local tempClientData = bankapi.getClientData()
        local steps = {"Cuenta a proveer los fondos", "Cuenta a recibir los fondos", "Monto a enviar", "Descripción de la transacción"}
        local from = bankapi.selectAccountScreen(steps, 1, 0, true)
        if (from == nil) then break end
        local to = bankapi.selectAccountScreen(steps, 2, from, true)
        if (to == nil) then break end
        local amount = bankapi.inputNumberScreen(steps, 3, tempClientData[from].balance)
        if (amount == nil) then break end
        local description = bankapi.inputTextScreen(steps, 4, 100)
        if (description == nil) then break end

        local success, message = bankapi.transaction(from, to, amount, description)
        bankapi.responseScreen(message.success, message.response)

    elseif (command == "delete") then
        local steps = {"Cuenta a eliminar"}
        local deletion = bankapi.selectAccountScreen(steps, 1, 0)
        if (deletion == nil) then break end

        local tempClientData = bankapi.getClientData()
        local accept = bankapi.confirmScreen({"¿Estas seguro que quieres borrar esta cuenta?"}, {
            ["Nombre"] = tempClientData[deletion].name,
            ["Clave"] = deletion,
            ["Balance"] = tempClientData[deletion].balance
        })
        if (not accept) then break end

        local success, message = bankapi.deleteAccount(deletion)
        bankapi.responseScreen(message.success, message.response)

    elseif (command == "log") then
        local tempClientData = bankapi.getClientData()
        local steps = {"Cuenta a consultar"}
        local account = bankapi.selectAccountScreen(steps, 1, 0)
        if (account == nil) then break end
        bankapi.transactionLogScreen(account)

    elseif (command == "balance") then

        local account = bankapi.selectAccountScreen({"Cuenta a consultar"}, 1, 0)
        if (account == nil) then break end
        bankapi.showBalance(account)

    elseif (command == "assigncard") then

        if (disk.isPresent(diskSide)) then
            local account = bankapi.selectAccountScreen({"Cuenta a asignar"}, 1, 0)
            if (account == nil) then break end
            local tempClientData = bankapi.getClientData()
            local name = tempClientData[account].name
            local f = fs.open("disk/mermegold.txt", "w")
            f.write(account)
            f.close()
            disk.setLabel(diskSide, "Mermegold | "..name)
            bankapi.successScreen("Tarjeta asignada a "..name)
        else
            bankapi.errorScreen("No hay disco")
        end

    elseif (command == "logout") then
        os.reboot()
    end
end
end