f = loadstring(GET)()

db = sqlite3.open('banco.s3db')
db:exec("delete from ingresso_pendente;")
db:close()


function unescape (s)
    --[[s = string.gsub(s, "%%252B", " ")]]--
    s = string.gsub(s, "%%(%x%x)", function (h)
          return string.char(tonumber(h, 16))
        end)
    s = string.gsub (s, "+", " ")
    return s
end


if (f["SOMENTE_LIMPA"]=="1") then
        echo ("<CONSOLE>")
        echo ("<BR>   Transacao<BR>   Limpa<BR><BR>   Pressione VERDE<BR>   para continuar.")
        echo ("</CONSOLE>")
        echo ("<GET TYPE=ANYKEY>")

        echo("<data name=lua.out destination=parser>")
        echo("     dofile(\"init.lua\")")
        echo("</data>")
else
    if (f["TELA"]=="0") then
            echo ("<CONSOLE>")
            echo ("<BR>   Ultimo ingresso<BR>   Computado<BR><BR>   Pressione VERDE<BR>   para continuar.")
            echo ("</CONSOLE>")
            echo ("<GET TYPE=ANYKEY>")

            echo("<data name=lua.out destination=parser>")
            echo("     dofile(\"init.lua\")")
            echo("</data>")
    else
            for key, value in pairs(f) do
              echo ("<GET TYPE=HIDDEN NAME=" .. key .. " VALUE=" .. string.gsub(unescape(value), "%s+", "+") .. ">")
            end
            echo ("<post>")
    end
end