00f24350 309 padding used in hashing algorithms <0x80 0 ... 0> [..64]
0086a559 2269 DMC compression [32.le.16&]
Code: Select all
# -- WRS
# xentax.com
# .dho BMS script
get FSIZE asize
for
get BLOCKSIG long
if BLOCKSIG == 0x01797268 # hry\x1
get FLAGS long
get CTYPE short
get UNKNOWN long
get CRC32 long
get ZSIZE long
get SIZE long
get FNAMESIZE long
getdstring FNAME FNAMESIZE
if FILESIZE > 0
savepos POS
if CTYPE == 0
log FNAME POS ZSIZE
elif CTYPE == 8
comtype deflate
clog FNAME POS ZSIZE SIZE
else
print "Unknown compression type for '%FNAME%'"
cleanexit
endif
math POS += ZSIZE
goto POS
endif
elif BLOCKSIG == 0x04797268 # hry\x4
getdstring UNKNOWN 36
get FNAMESIZE long
get UNKNOWN short # should test this is always 0
getdstring FNAME FNAMESIZE
elif BLOCKSIG == 0x07797268 # hry\x7
getdstring UNKNOWN 24
else
print "unrecognised block header (%BLOCKSIG%)"
cleanexit
endif
savepos POS
if POS == FSIZE
cleanexit
endif
next
