This topic was archived here:

https://web.archive.org/web/20230000000000fw_/https://www.zenhax.com/viewtopic.php?t=16936

y2keeth, posted Mon May 30, 2022 4:22 am (71736)

---

Code:

# Drakan
#
# The archive uses lot of compressed data in each file,
# so the script tries to dump directly the decompressed
# data instead of the file "as-is"

math DUMP_ORIGINAL_FILES = 0

comtype zlib_noerror

idstring "SRSC"
get DUMMY byte
get DUMMY byte
get OFFSET long
get FILES short

goto OFFSET
for i = 0 < FILES
    get TYPE byte
    get TYPE2 byte
    get DUMMY long
    get OFFSET long
    get SIZE long

    if DUMP_ORIGINAL_FILES != 0
        log "" OFFSET SIZE
    else
        math SKIP_BYTES = 0
        if TYPE == 0x40
            math SKIP_BYTES = 0x0 # skip bytes 0 for extract textures with correct headers
        elif TYPE == 2
            if TYPE2 == 3
                callfunction SKIP_BYTES_TYPE_2 1
            endif
        endif

        math OFFSET   SKIP_BYTES
        math SIZE   - SKIP_BYTES
        clog "" OFFSET SIZE SIZE
    endif
next i

startfunction SKIP_BYTES_TYPE_2
    savepos TMP_OFF
    goto OFFSET
    callfunction GET_NAME 1
    get DUMMY long
    get CHANNELS short
    get BITS short
    get FREQUENCY long
    getdstring DUMMY 0xc
    get TMP_SIZE long
    get TMP_ZIP long
    get TMP_ZSIZE long
    savepos SKIP_BYTES
    math SKIP_BYTES - OFFSET
    goto TMP_OFF
endfunction

startfunction GET_NAME
    get NAMESZ short
    getdstring NAME NAMESZ
endfunction

from this post
https://zenhax.com/viewtopic.php?t=15158

for the suffering tdu
I just get .dat files when i extracted it with quick bms.
If i extract a different way I get dds and tga's