function loadEncriptedFile(filePath)
    local hFile = fileOpen(filePath)
    if hFile then
        local buffer = ""
        local size = fileGetSize ( hFile )
        outputDebugString("Reading " .. filePath .. " bytes: 0/" .. size)
        while not fileIsEOF(hFile) do
            buffer = buffer .. fileRead(hFile, 26214400)
            outputDebugString("Reading " .. filePath .. " bytes: " .. #buffer .. "/" .. size)
        end
        fileClose(hFile)

        return buffer
    else
        outputConsole("Unable to open: " .. filePath)
    end
end