sdcompress

local ipack = require "ipack"

local args = {...}
local infile = args[1]
local outfile = args[2]
local f=io.open(infile,"rb")
local g=io.open(outfile,"wb")
local a=f:read("*a")
f:close()
local f=io.open(outfile,"wb")
local n = string.byte(a:sub(1,1))+5
local i = 2
repeat
 print(n,i)
 print(a:sub(i,i+n),a:sub(i,i+n):len())
 s=ipack.decompress(a:sub(i,i+n),8,0)
 print(s)
 g:write(s)
 n=string.byte(a:sub(i+s:len(),i+s:len()))
 i=n+1+s:len()
until n == nil
f:close()