function toStr(c)
s=""
for b in string.gfind(c, ".") do
s=s..string.format("%02X ", string.byte(b))
end
return s
end
function toStr2(c)
s=""
for b in string.gfind(c, ".") do
s=s..string.format("%02X ", string.byte(b)):gsub(' ','')
end
return s
end
local btab={}
function btab:read_(a,b)
if b<a then return "" end
s=""
for i=a,b do s=s..btab[i] end
return s
end
local f = io.open("map/r.0.0.mcr", "rb")
file=f:read(1)
i=0
repeat
btab[i]=file
file=f:read(1)
i=i+1
until file==nil