XeNTaX

Code: Select all

IDString "toc\x01"
Open FDSE "chunks.big.w32" 1
Open FDSE "chunks.toc.names.w32" 2
ComType unzip_dynamic
Get FILES long
Get DUMMY longlong
Get DUMMY long 2
Math NAMES_BASE_OFFSET = FILES
Math NAMES_BASE_OFFSET *= 12
Math NAMES_BASE_OFFSET += 4
Math FN_OFFSET1 = NAMES_BASE_OFFSET
For I = 0 < FILES
 Get FILEID long
 Get OFFSET longlong
 Get SIZE1 long
 Get ZSIZE1 long
 Get SIZE2 long
 Get ZSIZE2 long
 Math OFFSET *= 0x10
 
 Get FN_OFFSET2 long 2
 Math FN_OFFSET2 += NAMES_BASE_OFFSET
 Math FN_OFFSET2 -= FN_OFFSET1
 Get HDR_SIZE1 long 2
 Get HDR_SIZE2 long 2
 SavePos FN_POS 2
 GoTo FN_OFFSET1 2
 GetDString CHUNK_NAME FN_OFFSET2 2
 Math FN_OFFSET1 += FN_OFFSET2
 GoTo FN_POS 2

 String NAME p= "%s.stream1" CHUNK_NAME
 If ZSIZE1 == 0
  Log NAME OFFSET SIZE1 1
  Math OFFSET += SIZE1
 Else
  GoTo OFFSET 1
  Get CHUNKS long 1
  If CHUNKS != 1
  For J = 2 <= CHUNKS
   Get CHUNK_SIZE long 1
   Math ZSIZE1 += CHUNK_SIZE
  Next J
  EndIf
  Math HDR_SIZE1 -= ZSIZE1
  Math HDR_SIZE1 n HDR_SIZE1
  Math BLOCK_OFFSET = HDR_SIZE1
  Math END = OFFSET
  Math END += ZSIZE1
  CallFunction UnpackChunk
  #Log NAME OFFSET ZSIZE1 1
  Log NAME 0 SIZE1 MEMORY_FILE
  Math OFFSET += ZSIZE1
 EndIf

 String NAME p= "%s.stream2" CHUNK_NAME
 If ZSIZE2 == 0
  Log NAME OFFSET SIZE2 1
 Else
  GoTo OFFSET 1
  Get CHUNKS long 1
  If CHUNKS != 1
  For J = 2 <= CHUNKS
   Get CHUNK_SIZE long 1
   Math ZSIZE2 += CHUNK_SIZE
  Next J
  EndIf
  Math HDR_SIZE2 -= ZSIZE2
  Math HDR_SIZE2 n HDR_SIZE2
  Math BLOCK_OFFSET = HDR_SIZE2
  Math END = OFFSET
  Math END += ZSIZE2
  CallFunction UnpackChunk
  #Log NAME OFFSET ZSIZE2 1
  Log NAME 0 SIZE2 MEMORY_FILE
 EndIf
Next I

################################
StartFunction UnpackChunk
 Log MEMORY_FILE 0 0
 Append
 GoTo OFFSET 1
 Math BLOCK_OFFSET += OFFSET
 Math CHUNKS *= 4
 GoTo CHUNKS 1 SEEK_CUR
 Do
  Get BLOCK_SIZE short 1
  CLog MEMORY_FILE BLOCK_OFFSET BLOCK_SIZE BLOCK_SIZE 1
  Math BLOCK_OFFSET += BLOCK_SIZE
  Math BLOCK_OFFSET x= 0x10
 While BLOCK_OFFSET < END
 Append
EndFunction UnpackChunk
################################

Code: Select all

Error: incomplete input file number 2, can't read 4 bytes.
       anyway don't worry, it's possible that the BMS script has been written
       to exit in this way if it's reached the end of the archive so check it
       or contact its author or verify that all the files have been extracted


Note that if both the scripts and your files are correct then it's possible
that the script needs a newer version of QuickBMS, in which case download it:

  http://aluigi.org/quickbms