riddick_xcd2.bms

endian little

open FDSE "WAVEDATA" 0
open FDSE "WAVEINFO" 1

get FILESIZE asize

for OFFSET = 0x7D0 < FILESIZE
   # WAVEDATA
   goto OFFSET
   get DUMMY long
   get DUMMY long
   get SIZE long
   math SIZE += 0x24

   # WAVEINFO
   get DUMMY long 1 # global offset in xwc
   get WI_SIZE long 1 # file size
   if SIZE != WI_SIZE
      print "incorrect size vs WAVEINFO size"
      exit
   endif
   get STRING_SIZE long 1

   getdstring NAME STRING_SIZE 1
   xmath PAD " STRING_SIZE % 4 "
   if PAD > 0
     savepos CURRENT 1
     xmath CURRENT " CURRENT + 4 - PAD "
     goto CURRENT 1
   endif


   string NAME += ".xwc"

   log NAME OFFSET SIZE

   math OFFSET += SIZE
next