idstring "SMPF"
get FILES long
set BLOCK_SIZE short 0x800

goto BLOCK_SIZE
for FILE = 0 < FILES
    get ID short
    putarray 0 -1 ID
next FILE
savepos BASE_OFF
math BASE_OFF x BLOCK_SIZE
goto BASE_OFF

for FILE = 0 < FILES
    get OFFSET long
    get SIZE long
    math OFFSET * BLOCK_SIZE
    putarray 1 -1 OFFSET
	putarray 2 -1 SIZE
next FILE

for FILE = 0 < FILES
    getarray ID 0 FILE
    getarray OFFSET 1 FILE
    getarray DATA_SIZE 2 FILE
    goto OFFSET
    GetDString CHECK1 4 # Magic on .at3, Decompressed size on .lix
    if  CHECK1 == "RIFF"
        string EXT = ".at3"
    else
        get CHECK2 long # Compress size on .lix
        get CHECK3 byte
        if CHECK3 == 0x78 # zlib
            string EXT = ".lix"
        else
            string EXT = ".bin"
        endif
    endif
    String NAME p "%d%s" ID EXT
    log NAME OFFSET DATA_SIZE
next FILE