My QuickBMS scripts [AlphaTwentyThree]

April 11, 20251 yr

Localization

This topic was archived here:

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

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Tue Jun 05, 2018 4:40 pm (35625)

Hello everybody,

it's time to get my QuickBMS scripts out there. As many of you might know, a large collection of scripts can be found on XeNTaX but to be honest, I like it better here.

I'll post single scripts in single posts as attachments and keep a list in the first post here. I hope this will get some Google results.

Have fun.

Greetings, AlphaTwentyThree

Script list

Code:

Common archives
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p68443 - 998 Studios - *.cat, *.kgb, *.v2k (music archives only)
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72212#p72212 - Curve Studios Limited - *.pak
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35698 - Electronic Arts (console) - *.mus extractor
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69164#p69164 - Electronic Arts - *.sdh/*.sdt pairs
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72049#p72049 - Tt Fusion Ltd. - *.fmv audio extractor
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68789#p68789 - Wii games - *.bin decompressor
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35700 - Wwise sound engine - AKPK ident   bnk/txt - extractor/parser
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68466#p68466 - Xbox sound archives - *.xwb - extractor/converter


Stream processing
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p68463 - Electronic Arts (console) - *.mpc/*.mad/*.vp6 demultiplexer
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35701 - Gamecube VID movies - audio extractor
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72055#p72055 - Gust Co. - gdv.dat/*.gvd
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68812#p68812 - Humongous Entertainment Inc. - add wave header
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69359#p68692 - channel-split ss2 mono to single stereo file
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68684#p68684 - *.ss2 re-interleave (PS2 ADPCM)
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72090#p72090 - wave format scanner (RIFF/RIFX)


PC
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35628 - Broken Sword: Secrets of the Ark (PC) - *.pak
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69388#p69388 - Elder Scrolls III, The: Morrowind (PC) - *.bsa
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69164#p69164 - Harry Potter and the Half-Blood Prince - *.sdh/*.sdt pairs

GC
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35823 - Army Men: Sarge's War (GC) - *.sti/*.stm
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35696 - Call of Duty: Big Red One (PS2, GC, Xbox) -  *.gcv, *.psv, *.xbv audio extractor
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69359#p69359 - Lemony Snicket's A Series of Unfortunate Events (GC, PS2, Xbox) - streams.res

PS
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p68446 - Oddworld: Abe's Oddysee (PSX) - *.lvl

PS2
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35789 - Army Men: Sarge's War (PS2) -  *.msh/*.msb
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35696 - Call of Duty: Big Red One (PS2, GC, Xbox) -  *.gcv, *.psv, *.xbv audio extractor
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69359#p69359 - Lemony Snicket's A Series of Unfortunate Events (GC, PS2, Xbox) - streams.res
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68543#p68543 - The Punisher (PS2) - *.peg
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68539#p68539 - The Punisher (PS2) - *.vpp

PS3
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68610#p68610 - Godfather II, The (PS3/X360) - *.viv
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69164#p69164 - Harry Potter and the Half-Blood Prince - *.sdh/*.sdt pairs

PSP
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72102#p72102 - Adventures to Go! (PSP) - data.dat
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72103#p72103 - After Burner: Black Falcon (PSP) - *.bag
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72136#p72136 - Arthur and the Invisibles (PSP) - *.kpp
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72139#p72139 - Asterix & Obelix XXL 2: Mission Wifix (PSP) - *.pak
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72012#p72012 - Astonishia Story 2/Crimson Gem Saga (PSP) - asto2.dat
https://zenhax.com/viewtopic.php?f=17&&t=7982p=72045#p72045 - Astonishia Story 2/Crimson Gem Saga (PSP) - *.evp/*.bvp
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72178#p72178 - Astro Boy: The Video Game (PSP) - FILE1/FILE2/FILE3
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72165#p72165 - Battle Dodge Ball 3 (PSP) - def_arc.irarc/.irlst
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72166#p72166 - The Bigs/The Bigs 2 (PSP) - *.big
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72184#p72184 - The Bigs/The Bigs 2 (PSP) - *.bcv
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72204#p72204 - Blitz: Overtime (PSP) - *.ms2/*.ms4
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72160#p72160 - Blood Bowl (PSP) - *.cat
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72179#p72179 - Brian Lara 2007 Pressure Play (PSP) - *.tar
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72181#p72181 - Brunswick Pro Bowling (PSP) - *.wad
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72014#p72014 - Burnout: Dominator (PSP) - *.fxp
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72206#p72206 - Bounty Hounds (PSP) - *.xpk
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72215#p72215 - Buzz! Concurso Universal (PSP) - *.flz
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72057#p72057 - Mahou Shoujo Lyrical Nanoha A's Portable DLCs (PSP) - main archives
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35724 - XI Coliseum (PSP) - *.arc

PS Vita
https://zenhax.com/viewtopic.php?f=17&t=7982&p=71979#p71979 - Disney Infinity 2.0 (PS Vita) - main archive
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72041#p72041 - DJMax Dechnika Tune (PS Vita) - *.pak
https://zenhax.com/viewtopic.php?f=17&t=7982&p=72093#p72093 - Imperial Navy Love Affection~Meiji Yokosuka March [???????~????????](PS Vita) - *.hpac, *.hph, *.hgtc

Xbox
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35828 - Army Men: Sarge's War (Xbox) - *.sbr
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35696 - Call of Duty: Big Red One (PS2, GC, Xbox) -  *.gcv, *.psv, *.xbv audio extractor
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69359#p69359 - Lemony Snicket's A Series of Unfortunate Events (GC, PS2, Xbox) - streams.res

Xbox 360
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68463#p35697 - Deus Ex: Human Revolution (Xbox 360) - *.mul
https://zenhax.com/viewtopic.php?f=17&t=7982&p=68610#p68610 - Godfather II, The (PS3/X360) - *.viv
https://zenhax.com/viewtopic.php?f=17&t=7982&p=69164#p69164 - Harry Potter and the Half-Blood Prince - *.sdh/*.sdt pairs

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Tue Jun 05, 2018 4:41 pm (35628)

Broken Sword: Secrets of the Ark (PC) - *.PAK

Code:

# game: Secrets of the Ark (PC, 2007)
# file types: *.pak
#
# script for QuickBMS http://quickbms.aluigi.org
# written by AlphaTwentyThree of Zenhax

idstring "EmPackFi"
goto 0xc
get DATASTART long
get FILES long
get UNK long # 4
for i = 1 <= FILES
   savepos GO
   get NAMEOFF long
   get SIZE long
   get OFFSET long
   xmath GO "GO   NAMEOFF"
   savepos MYOFF
   goto GO
   get NAME string
   goto MYOFF
   log NAME OFFSET SIZE
next i

sota_pak_EmPackFi.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Thu Jun 07, 2018 9:05 am (35696)

Call of Duty: Big Red One (PS2, GC, Xbox) - *.gcv, *.psv, *.xbv movies audio extractor

Code:

# game: Call of Duty: Big Red One (2005)
# file types: *.gcv, *.psv, *.xbv
# script type: demultiplexer
#
# written 2015-10-06 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

idstring "AFMV"
get SIZE long # file size
get VIDSIZE long # video data
get AUDSIZE long # audio data
putVarChr MEMORY_FILE SIZE 0
log MEMORY_FILE 0 0
putVarChr MEMORY_FILE2 SIZE 0
log MEMORY_FILE2 0 0
get NAME basename
string PNAME p= "%s.palette" NAME
log PNAME 0x10 0x80 # palette?
goto 0x90
for
   get BLOCKSIZE long
   get AUD_ID long
   getDstring DATA BLOCKSIZE
   if AUD_ID == 0x80
      putDstring DATA BLOCKSIZE MEMORY_FILE
   else
      putDstring DATA BLOCKSIZE MEMORY_FILE2
   endif
   savepos TEST
   if TEST >= SIZE
      break
   endif
next

get EXT extension
if EXT == "PSV"
   callfunction PS2 1
elif EXT == "xbv"
   callfunction XBOX 1
else
   string ANAME p= "%s.aud" NAME
   get SIZE asize MEMORY_FILE
   log ANAME 0 SIZE MEMORY_FILE
endif
   
get SIZE asize MEMORY_FILE2
if SIZE != 0
   if EXT == "PSV"
      string VNAME p= "%s.m2v" NAME
   else
      string VNAME p= "%s.vid" NAME
   endif
   log VNAME 0 SIZE MEMORY_FILE2
endif

startfunction PS2
   get SIZE asize MEMORY_FILE
   set MSIZE SIZE
   math MSIZE  = 0x38
   putVarChr MEMORY_FILE3 MSIZE 0
   log MEMORY_FILE3 0 0
   set MEMORY_FILE3 binary "\x53\x53\x68\x64\x18\x00\x00\x00\x10\x00\x00\x00\xb0\x36\x00\x00\x02\x00\x00\x00\xc0\x2f\x00\x00\xff\xff\xff\xff\xff\xff\xff\xff\x53\x53\x62\x64\x00\xe8\x11\x00"
   append
   log MEMORY_FILE3 0 SIZE MEMORY_FILE
   append
   
   putVarChr MEMORY_FILE3 0xc 44100 long
   putVarChr MEMORY_FILE3 0x10 2 byte
   putVarChr MEMORY_FILE3 0x14 0x400 long
   putVarChr MEMORY_FILE3 0x24 SIZE long
   string ANAME p= "%s.ss2" NAME
   get SIZE asize MEMORY_FILE3
   log ANAME 0 SIZE MEMORY_FILE3
endfunction

startfunction XBOX
   get SIZE asize MEMORY_FILE
   set MEMORY_FILE3 binary "\x52\x49\x46\x46\x18\x51\xa3\x0\x57\x41\x56\x45\x66\x6d\x74\x20\x14\x0\x0\x0\x69\x0\x2\x0\x44\xac\x0\x0\xcc\xc1\x0\x0\x48\x0\x4\x0\x2\x0\x40\x0\x64\x61\x74\x61\xf0\x50\xa3\x0"
   set RIFFSIZE SIZE
   math RIFFSIZE  = 0x28
   set CH 2
   set FREQ 44100
   putVarChr MEMORY_FILE3 0x04 RIFFSIZE long
   putVarChr MEMORY_FILE3 0x16 CH byte
   putVarChr MEMORY_FILE3 0x18 FREQ long
   set VAR1 0x3073
   math VAR1 *= CH
   if FREQ == 48000
      math VAR1 *= 44100
   else
      math VAR1 *= FREQ
   endif
   math VAR1 /= 22050
   putVarChr MEMORY_FILE3 0x1c VAR1 long   
   set VAR2 0x24
   math VAR2 *= CH
   putVarChr MEMORY_FILE3 0x20 VAR2 short
   putVarChr MEMORY_FILE3 0x2c SIZE long
   append
   log MEMORY_FILE3 OFFSET SIZE MEMORY_FILE
   append
   string ANAME p= "%s.lwav" NAME
   get SIZE asize MEMORY_FILE3
   log ANAME 0 SIZE MEMORY_FILE3
endfunction

cod_bro.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Thu Jun 07, 2018 9:11 am (35697)

Deus Ex: Human Revolution (X360) - *.mul

Both scripts correspond to a number of *.mul files. Just try which one works.

Script 1:

Code:

# game: Deus Ex: Human Revolution
# platform: Xbox 360
# file type: *.mul
# program needed: xma_parse (http://www.hcs64.com/vgm_ripping.html)
# script type: extractor (script 1)

# (c) by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

endian big
get FREQ long
get UNK long
get UNK long
get LAYERS long
get FSIZE asize
putVarChr MEMORY_FILE FSIZE 0
log MEMORY_FILE 0 0
for l = 0 < LAYERS
   putVarChr MEMORY_FILE FSIZE 0
   log MEMORY_FILE 0 0
   putVarChr MEMORY_FILE2 FSIZE 0
   log MEMORY_FILE2 0 0
   putVarChr MEMORY_FILE3 FSIZE 0
   log MEMORY_FILE3 0 0
   set OFFSET 0x800
   set EXTRA 0x10
   do
      goto OFFSET
      getDstring DUMMY EXTRA
      set EXTRA 0
      get SIZE long
      if SIZE > FSIZE # use the second script for these
         cleanexit
      endif
      get LAYER long
      get UNK longlong
      savepos OFFSET
      if LAYER == l
         append
         log MEMORY_FILE OFFSET SIZE
         append
      endif
      if LAYER == LAYERS # for the start of each cycle
         set EXTRA 0x10
      endif
      math OFFSET  = SIZE
   while OFFSET < FSIZE
   endian little
   get SIZE asize MEMORY_FILE
   if SIZE != 0
      callfunction parse 1
      callfunction getXMACH 1
      get NAME basename
      xmath k "l   1"
      string NAME p= "%s_%d.xma" NAME k
      callfunction XMA 1
   endif
   endian big
next l

startfunction parse
   endian little # just to be sure ;)
   set FUNCCALL string "xma_parse.exe #INPUT# -r #OUTPUT#"
   comtype EXECUTE FUNCCALL
   log MEMORY_FILE2 0 0
   clog MEMORY_FILE2 0 SIZE SIZE MEMORY_FILE # from mem [to temp] to mem2 (mem stays)
   encryption "" ""
endfunction

startfunction getXMACH # inside MEMORY_FILE!
   goto 7 MEMORY_FILE2
   get IDENT byte MEMORY_FILE2
   if IDENT == 1
      set CH 2
   elif IDENT == 3
      set CH 1
   elif IDENT == 0 # e.g. from multichannel stream
      set CH 2
   else
      print "ERROR: Not able to auto-determine channel count! Aborting all operations."
      cleanexit
   endif
endfunction

startfunction XMA # variant of standard function (mem2 to mem3)
   get MSIZE asize MEMORY_FILE2
   set RIFFSIZE MSIZE
   math RIFFSIZE  = 0x34
   set PRESIZE RIFFSIZE # pre-alloc
   math PRESIZE  = 0x38
   putVarChr MEMORY_FILE3 PRESIZE 0
   log MEMORY_FILE3 0 0
   set MEMORY_FILE3 binary "\x52\x49\x46\x46\xb8\x59\xa7\x00\x57\x41\x56\x45\x66\x6d\x74\x20\x20\x00\x00\x00\x65\x01\x10\x00\xd6\x10\x00\x00\x01\x00\x00\x03\xe3\x9a\x00\x00\x80\xbb\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x02\x02\x00\x64\x61\x74\x61\x00\x58\xa7\x00"
   putVarChr MEMORY_FILE3 0x04 RIFFSIZE long
   putVarChr MEMORY_FILE3 0x24 FREQ long
   putVarChr MEMORY_FILE3 0x31 CH byte
   putVarChr MEMORY_FILE3 0x38 MSIZE long
   append
   log MEMORY_FILE3 0 MSIZE MEMORY_FILE2
   append
   get M3_SIZE asize MEMORY_FILE3
   log NAME 0 M3_SIZE MEMORY_FILE3
endfunction

Script 2:

Code:

# game: Deus Ex: Human Revolution
# platform: Xbox 360
# file type: *.mul
# program needed: xma_parse (http://www.hcs64.com/vgm_ripping.html)
# script type: extractor (script 2)

# (c) by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

endian big
goto 0
get FREQ long
set OFFSET 0x800
get FSIZE asize
putVarChr MEMORY_FILE FSIZE 0
putVarChr MEMORY_FILE2 FSIZE 0
log MEMORY_FILE 0 0
log MEMORY_FILE2 0 0
do
   goto OFFSET
   get IDENT long
   get SIZE long # block size
   math SIZE x= 0x10 # for some cases
   get DUMMY longlong
   savepos OFFSET
   if IDENT == 0 # audio block
      append
      log MEMORY_FILE OFFSET SIZE
      append
   endif
   math OFFSET  = SIZE
while OFFSET < FSIZE
get FSIZE asize MEMORY_FILE
putVarChr MEMORY_FILE2 FSIZE 0
putVarChr MEMORY_FILE3 FSIZE 0
putVarChr MEMORY_FILE4 FSIZE 0
log MEMORY_FILE2 0 0
log MEMORY_FILE3 0 0
log MEMORY_FILE4 0 0
set OFFSET 0
do
   goto OFFSET MEMORY_FILE
   get SIZE long MEMORY_FILE
   get IDENT long MEMORY_FILE
   get DUMMY longlong MEMORY_FILE
   savepos OFFSET MEMORY_FILE
   append
   if IDENT == 0
      log MEMORY_FILE3 OFFSET SIZE MEMORY_FILE
   elif IDENT == 1
      log MEMORY_FILE4 OFFSET SIZE MEMORY_FILE
   endif
   append
   math OFFSET  = SIZE
while OFFSET < FSIZE
endian little
set CH 1
set BLOCKSIZE 0x8000

get SIZE asize MEMORY_FILE3
log MEMORY_FILE 0 0
append
log MEMORY_FILE 0 SIZE MEMORY_FILE3
append
callfunction parse 1
log MEMORY_FILE3 0 0 # clear now for header
get NAME basename
string NAME  = "_1.xma"
callfunction XMA 1

get SIZE asize MEMORY_FILE4
if SIZE != 0
   log MEMORY_FILE 0 0
   log MEMORY_FILE2 0 0
   append
   log MEMORY_FILE 0 SIZE MEMORY_FILE4
   append
   callfunction parse 1
   log MEMORY_FILE3 0 0 # clear now for header
   get NAME basename
   string NAME  = "_2.xma"
   callfunction XMA 1
endif

startfunction parse
   endian little # just to be sure ;)
   set FUNCCALL string "xma_parse.exe #INPUT# -r #OUTPUT#"
   comtype EXECUTE FUNCCALL
   log MEMORY_FILE2 0 0
   clog MEMORY_FILE2 0 SIZE SIZE MEMORY_FILE # from mem [to temp] to mem2 (mem stays)
   encryption "" ""
endfunction

startfunction XMA # variant of standard function (mem2 to mem3)
   get MSIZE asize MEMORY_FILE2
   set RIFFSIZE MSIZE
   math RIFFSIZE  = 0x34
   set PRESIZE RIFFSIZE # pre-alloc
   math PRESIZE  = 0x38
   putVarChr MEMORY_FILE3 PRESIZE 0
   log MEMORY_FILE3 0 0
   set MEMORY_FILE3 binary "\x52\x49\x46\x46\xb8\x59\xa7\x00\x57\x41\x56\x45\x66\x6d\x74\x20\x20\x00\x00\x00\x65\x01\x10\x00\xd6\x10\x00\x00\x01\x00\x00\x03\xe3\x9a\x00\x00\x80\xbb\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x02\x02\x00\x64\x61\x74\x61\x00\x58\xa7\x00"
   putVarChr MEMORY_FILE3 0x04 RIFFSIZE long
   putVarChr MEMORY_FILE3 0x24 FREQ long
   putVarChr MEMORY_FILE3 0x31 CH byte
   putVarChr MEMORY_FILE3 0x38 MSIZE long
   append
   log MEMORY_FILE3 0 MSIZE MEMORY_FILE2
   append
   get M3_SIZE asize MEMORY_FILE3
   log NAME 0 M3_SIZE MEMORY_FILE3
endfunction

dehr_2.bms

dehr_1.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Thu Jun 07, 2018 9:14 am (35698)

Electronic Arts (console versions) - *.mus (archive)

Code:

# game: various EA console games
# file type: *.mus (archive)
# script type: extractor
#
# written by AlphaTwentyThree of ZenHax
# script for QuickBMS http://quickbms.aluigi.org

endian big
get BNAME basename
goto 0xc
get FILES long
xmath FILES "(FILES - 8) / 0xc"
goto 0x8
set STOP 0
for i = 0 <= FILES
   get IDX short
   get DUMMY short
   get HEADERPOS long
   get OFFSET long
   savepos MYOFF
   get DUMMY longlong
   get SIZE long
   if SIZE == 0
      get SIZE asize
      set STOP 1
   endif
   math SIZE -= OFFSET
   goto HEADERPOS
   get INFO long
   goto MYOFF
   xmath PRESIZE "SIZE   0x20"
   putVarChr MEMORY_FILE PRESIZE 0
   log MEMORY_FILE 0 0
   set MEMORY_FILE binary "\x03\x00\x00\x02\x8A\xEB\x02\x00\x20\x00\x00\x00\x00\x00\x00\x00\x04\x04\xBB\x80\x60\x8C\x2A\x00\x00\x00\x00\x00\x00\x00\x00\x00"
   putVarChr MEMORY_FILE 0x10 INFO long
   putVarChr MEMORY_FILE 0x14 SIZE long
   append
   log MEMORY_FILE OFFSET SIZE
   append
   string NAME p= "%s_%i.xas" BNAME IDX
   log NAME 0 PRESIZE MEMORY_FILE
   if STOP == 1
      cleanexit
   endif
next i

ea_xas.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Thu Jun 07, 2018 9:34 am (35700)

Wwise sound engine

file types: archives with AKPK identifier and *.bnk / *.txt and soundbanks.xml
script type: extractor / parser

Second script is for extraction, first script for name parsing.
To parse, keep all extracted files in the same folder as the *.txt and soundbanks.xml. Priority in parsing is always the soundbanks.xml. You can parse again with the txt files afterwards. After parsing, ALWAYS check with Anti-Twin (or similar) if there are files without name (which still have their IDX).

PARTLY REDUNDANT DUE TO Wwiser!!! (https://github.com/bnnm/wwiser)

Code:

# file types: Wwise sound engine AKPK and BNK archives
# script type: extractor
# note 1: all files extracted as *.wem
# note 2: after extraction, parse with script
# for the soundbanks.xml or *.txt (if available)
#
# (c) by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get BNAME basename
getDstring IDENT 4
if IDENT == "AKPK"
   callfunction AKPK 1
elif IDENT == "1KCP" # The Saboteur (PC)
   callfunction AKPK 1
elif IDENT == "BKHD"
   callfunction BKHD 1
else
   print "Error: no valid Wwise sound pack"
   cleanexit
endif

startfunction AKPK
   set PC 0
   endian big
   get SIZE_HEADER long # data start offset
   get TEST long
   get FSIZE asize
   if TEST != 1
      reverselong SIZE_HEADER
      endian little
      set PC 1
   endif
   get BNAME basename
   string BNAME  = " "

   goto 0xc
   get IDENT long
   set FOLDER_NAMES 1
   if IDENT == 0xc6
      set NBIAS 0x18
   elif IDENT == 0x14
      set NBIAS 0x1c
      set PC 1
   else
      set NBIAS 0x1c # also in PC versions
   endif
   goto NBIAS
   get NUM_FOLDERS long
   if NUM_FOLDERS > 10
      math NBIAS -= 4
      goto NBIAS
      get NUM_FOLDERS long
   endif
   savepos MYOFF
   set INFO NUM_FOLDERS
   math INFO *= 8
   math INFO  = MYOFF # = start of names, will hold offset to jump to for TOC
   set ALLNAMES 0 # for ceil after names

   for i = 0 < NUM_FOLDERS
      goto MYOFF
      get OFF_NAME_FOLDER long
      math OFF_NAME_FOLDER  = NBIAS
      get ID_FOLDER long
      savepos MYOFF
      goto OFF_NAME_FOLDER
      if PC == 0
         get NAME_FOLDER string
      else
         callfunction getPCstring 1
      endif
         strlen LENGTH NAME_FOLDER
         math ALLNAMES  = LENGTH
         math ALLNAMES  = 1
      string NAME_FOLDER  = "/"
      string NAME_FOLDER  = BNAME
      putArray 0 ID_FOLDER NAME_FOLDER
   next i
   if PC == 1
      math ALLNAMES *= 2
      math INFO  = ALLNAMES
   else
      savepos INFO
      math INFO x= 4
   endif
   goto INFO
   set RUNS 1
   callfunction extract 1
   cleanexit
endfunction

startfunction BKHD
   get TEST short
   set REV 0
   if TEST == 0
      set REV 1
      endian big
   endif
   goto 4
   get SIZE_HEADER long
   savepos MYOFF
   math MYOFF  = SIZE_HEADER
   get FSIZE asize
   if MYOFF == FSIZE
      print "bnk is empty"
      cleanexit
   endif
   goto MYOFF
   idstring "DIDX"
   get SIZE_DIDX long
   set FILES SIZE_DIDX
   math FILES /= 0xc
   set BIAS MYOFF # complete header
   math BIAS  = SIZE_DIDX
   math BIAS  = 16
   get BNAME basename
   for i = 1 <= FILES
      get DIDX long
      get OFFSET long
      math OFFSET  = BIAS
      get SIZE long
      set NAME DIDX
      string NAME p= "%s.wem" DIDX EXT
      log NAME OFFSET SIZE
   next i
endfunction

startfunction getPCstring
   set NAME_FOLDER ""
   for s = 0
      get CHAR byte
      get NULL byte
      putVarChr NAME_FOLDER s CHAR
      if CHAR == 0
         break
      endif
   next s
endfunction
   
startfunction extract
   savepos INFO
   get NUM_FILES long
   if NUM_FILES == 0
      if RUNS == 1
         get NUM_FILES long
      else
         cleanexit
      endif
   endif
   print "extracting %NUM_FILES% files (number at offset %INFO%)"
   for i = 1 <= NUM_FILES
      get NAME_CRC long
      get MULTI long # in certain cases only
      get SIZE long
      if SIZE == 0
         get SIZE long
      endif
      get OFFSET long
      get ID_FOLDER long
      if OFFSET == 0
         set OFFSET ID_FOLDER
         get ID_FOLDER long
      endif
      #string NAME_CRC p= "0xx" NAME_CRC      
      if MULTI != 0
         math OFFSET *= MULTI
      endif
      savepos MYOFF
      if PC == 0
         endian big
      endif
      string NAME_CRC  = ".wem"
      log NAME_CRC OFFSET SIZE
   next i
   math RUNS  = 1
   callfunction extract 1
endfunction

Code:

# file types: Wwise *.txt with same name as *.bnk files or soundbanks.xml
# script type: parser
# note 1: all *.wem files must be in the same folder as this script and the txt
# note 2: script will maintain the original folder structure
#
# (c) by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get EXT extension
if EXT == "txt"
   callfunction bnk_txt 1
elif EXT == "xml"
   callfunction soundbanks 1
else
   print "script only for txt and xml"
endif

startfunction bnk_txt
   callfunction getARRAYSIZE 1
   print "columns: %COLUMNS%, lines: %LINES%, %EMPTY% of which are empty"
   xmath LINES "LINES - EMPTY"
   goto 0
   set ARRAYLINE 0
   for i = 0 <= LINES
      set HEADERLINE 0
      for j = 0 < COLUMNS
         set NEWENTRY 0
         getCT FIELD string 0x09
         #print "(%i%, %j%): %FIELD%"
         if FIELD == "ID" # check for every line in case structure changes
            set C1 j
            set HEADERLINE 1 # don't enter data
         elif FIELD == "Wwise Object Path"
            set C2 j
            set HEADERLINE 1
         endif
         if HEADERLINE == 0
            if j == C1
               putArray 0 ARRAYLINE FIELD
               set NEWENTRY 1
               #print "enter ID %FIELD% at line %ARRAYLINE%"
            elif j == C2
               #print "enter path %FIELD% at line %ARRAYLINE%"
               putArray 1 ARRAYLINE FIELD
               set NEWENTRY 1
            endif
         endif
      next j
      getCT FIELD string 0x0d
      #print "(%i%, %j%): %FIELD%"
      get DUMMY byte
      if NEWENTRY == 1
         math ARRAYLINE  = 1
      endif
      #print "line %i%: %NEWENTRY%"
   next i
   #print "entries: %ARRAYLINE%"

   for i = 0 < ARRAYLINE
      getArray IDX 0 i
      getArray NAME 1 i
      string NAME  = ".wem"
      string IDX  = ".wem"
      open FDSE IDX 1 EXIST
      if EXIST == 1
         get SIZE asize 1
         log NAME 0 SIZE 1
      endif
   next i
endfunction

startfunction getARRAYSIZE
   FindLoc SEARCHLINEEND string \x0d\x0a 0 ""
   getDstring FIRSTLINE SEARCHLINEEND
   strlen LENGTH FIRSTLINE
   set COLUMNS 0
   for i = 0 < LENGTH
      getVarChr TEST FIRSTLINE i byte
      if TEST == 0x09
         math COLUMNS  = 1
      endif
   next i
   set LINES 0
   set LINEEND 0
   
   set EMPTY 0
   for
      goto LINEEND
      savepos MYOFF
      FindLoc LINEEND string \x0d\x0a 0 ""
      if LINEEND == ""
         break
      endif
      xmath TEST "LINEEND - MYOFF"
      math LINES  = 1
      if TEST == 0
         print "line %LINES% is empty"
         math EMPTY  = 1
      endif
      math LINEEND  = 2
   next
   goto -4
   get TEST long
   if TEST == 0x0a0d0a0d
      math LINES -= 1
   endif
endfunction

startfunction soundbanks
   for i = 1
      FindLoc SEARCH string "      if SEARCH == ""
         cleanexit
      endif
      goto SEARCH
      getDstring DUMMY 10
      getCT DIDX string 0x22
      string DIDX  = ".wem"
      getDstring TEST 3 # sometimes the file id tag is empty
      if TEST != " />"
         math SEARCH  = 12
         goto SEARCH
         FindLoc SEARCH string "" 0 ""
         goto SEARCH
         getDstring DUMMY 6
         getCT FNAME string 0x3c
         string FNAME -= 13
         open FDSE DIDX 1 EXIST
         if EXIST == 1
            get SIZE asize 1
            log MEMORY_FILE 0 0
            log MEMORY_FILE 0 SIZE 1
            string FNAME  = ".wem"
            log FNAME 0 SIZE MEMORY_FILE
         endif
      endif
      math SEARCH  = 10
      goto SEARCH
   next i
endfunction

Wwise_parse.bms

Wwise.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Thu Jun 07, 2018 9:41 am (35701)

GameCube *.VID movies - audio extractor

Code:

# Audio extractor for *.vid movies (VID1 identifier)
#
# tested with:
# 007: Everything or Nothing (GameCube)
# Gun (GameCube)
# Tony Hawk's American Wasteland (GameCube)
#
# script for QuickBMS http://quickbms.aluigi.org
# written by AlphaTwentyThree of Zenhax

log MEMORY_FILE 0 0
endian big
idstring "VID1"
goto 0
getDstring DATA 0x2c
putDstring DATA 0x2c MEMORY_FILE
goto 0x24
get SIZE long
math SIZE -= 0x20
append
putVarChr MEMORY_FILE 0x24 SIZE long
append
get ZERO long
savepos MYOFF
idstring "VIDH"
get VHSIZE long
goto MYOFF
getDstring DATA VHSIZE
savepos MYOFF
getDstring AUDH 4
if AUDH != "AUDH"
   cleanexit
endif
get SIZE long
math SIZE  = 0x14
goto MYOFF
getDstring DATA SIZE
putDstring DATA SIZE MEMORY_FILE
get FSIZE asize

for
   savepos OFFSET
   getDstring IDENT 4
   get SIZE long
   goto OFFSET
   if IDENT == "FRAM"
      getDstring DATA 0x20
      putDstring DATA 0x20 MEMORY_FILE
      savepos OFFSET
      getDstring IDENT 4
      get SIZE long
   endif
   goto OFFSET
   getDstring DATA SIZE
   if   IDENT == "AUDD"
      putDstring DATA SIZE MEMORY_FILE
   endif
   savepos OFFSET
   if OFFSET == FSIZE || IDENT == ""
      # get SIZE asize MEMORY_FILE
      # get NAME basename
      # string NAME  = ".raw"
      # log NAME 0 SIZE MEMORY_FILE
      callfunction corr_fram 1
   endif
next

startfunction corr_fram
   get MSIZE asize MEMORY_FILE
   goto 0x20 MEMORY_FILE
   savepos MYOFF MEMORY_FILE
   getDstring IDENT 4 MEMORY_FILE
   get SIZE long MEMORY_FILE
   goto MYOFF MEMORY_FILE
   math MYOFF  = SIZE
   goto MYOFF MEMORY_FILE
   set GO MYOFF
   for
      goto GO MEMORY_FILE
      getDstring IDENT 4 MEMORY_FILE
      if IDENT != "FRAM"
         print "no FRAM at %GO%"
         cleanexit
      endif
      savepos WRITE_TO MEMORY_FILE
      get FRAM_SIZE long MEMORY_FILE
      xmath GO "WRITE_TO   0x1c"
      if GO >= MSIZE
         xmath SIZE "WRITE_TO - 4"
         callfunction wrapup 1
      endif
      goto GO MEMORY_FILE
      getDstring IDENT 4 MEMORY_FILE
      if IDENT == "FRAM" # last two empty FRAMs
         savepos SIZE MEMORY_FILE
         math SIZE -= 0x24
         callfunction wrapup 1
      endif
      get AUDD_SIZE long MEMORY_FILE
      xmath FRAM_SIZE "AUDD_SIZE   0x20"
      putVarChr MEMORY_FILE WRITE_TO FRAM_SIZE long
      savepos MYOFF MEMORY_FILE
      xmath GO "MYOFF - 0x28   FRAM_SIZE"
      if GO >= MSIZE
         get SIZE asize MEMORY_FILE
         callfunction wrapup 1
      endif
   next
endfunction

startfunction wrapup
   get NAME basename
   string NAME  = ".logg"
   log NAME 0 SIZE MEMORY_FILE
   cleanexit
endfunction

VID1_audio_extract.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Fri Jun 08, 2018 9:30 am (35724)

XI Coliseum (PSP) - *.arc (WpX identifier)

Code:

# game: XI Coliseum (PSP)
# file type: *.arc (WpX identifier)
# script type: extractor
#
# script for QuickBMS http://quickbms.aluigi.org
# written by AlphaTwentyThree of Zenhax


idstring WpX
goto 8
get SIZE long
get ZSIZE long
set OFFSET 0x800
if SIZE == ZSIZE
   log MEMORY_FILE OFFSET SIZE
else
   comtype zlib
   clog MEMORY_FILE OFFSET SIZE ZSIZE
endif


idstring MEMORY_FILE "WILL"
get ZERO long MEMORY_FILE
get UNK long MEMORY_FILE
get FILES long MEMORY_FILE
for i = 1 <= FILES
   get NAMEOFF long MEMORY_FILE
   get OFFSET long MEMORY_FILE
   get SIZE long MEMORY_FILE
   get ZERO long MEMORY_FILE
   savepos MYOFF MEMORY_FILE
   goto NAMEOFF MEMORY_FILE
   get NAME string MEMORY_FILE
   goto MYOFF MEMORY_FILE
   log NAME OFFSET SIZE MEMORY_FILE
next i

arc_WpX.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Mon Jun 11, 2018 4:12 pm (35789)

Army Men: Sarge's War (PS2) - *.msh/*.msb pairs

Code:

# game: Army Men: Sarge's War (PS2)
# file type: *.msh/*.msb pairs
# script type: extractor
# note: ss2 mono headers are automatically added
#
# script for QuickBMS http://quickbms.aluigi.org
# written by AlphaTwentyThree of Zenhax

open FDDE MSH 0
open FDDE MSB 1
goto 0x8 0
get FILES long 0
get BNAME basename
for i = 1 <= FILES
   get SIZE long 0
   get ZERO long 0
   get OFFSET long 0
   get FREQ long 0
   string NAME p= "%s_%i.ss2" BNAME i
   set CH 1
   set INTERLEAVE 0x10
   callfunction SS2 1
next i

startfunction SS2
   endian little
   set MSIZE SIZE
   math MSIZE  = 0x38
   putVarChr MEMORY_FILE MSIZE 0
   log MEMORY_FILE 0 0
   set MEMORY_FILE binary "\x53\x53\x68\x64\x18\x00\x00\x00\x10\x00\x00\x00\xb0\x36\x00\x00\x02\x00\x00\x00\xc0\x2f\x00\x00\xff\xff\xff\xff\xff\xff\xff\xff\x53\x53\x62\x64\x00\xe8\x11\x00"
   append
   log MEMORY_FILE OFFSET SIZE 1
   append
   
   putVarChr MEMORY_FILE 0xc FREQ long
   putVarChr MEMORY_FILE 0x10 CH byte
   putVarChr MEMORY_FILE 0x14 INTERLEAVE long
   putVarChr MEMORY_FILE 0x24 SIZE long
   get SIZE asize MEMORY_FILE
   log NAME 0 SIZE MEMORY_FILE
endfunction

AMSW_PS2_msh_msb.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Tue Jun 12, 2018 1:46 pm (35823)

Army Men: Sarge's War (GC) - *.sti/*.stm

Code:

# game: Army Men: Sarge's War (GameCube)
# file type: *.sti/*.stm pairs
# script type: extractor
# note 1: genh headers are automatically added
# note 2: format is big endian PCM
#
# script for QuickBMS http://quickbms.aluigi.org
# written by AlphaTwentyThree of Zenhax

open FDDE sti 0
open FDDE stm 1
endian big
goto 8 0
get FILES long 0
get UNK long 0
get BNAME basename
for i = 1 <= FILES
   get CRC long 0
   getDstring DUMMY 0xc 0
   get OFFSET long 0
   get SIZE long 0
   get DUMMY longlong 0
   get FREQ long 0
   getDstring DUMMY 0x30 0
   set CH 1
   xmath SAMPLES "SIZE / 4"
   string NAME p= "%s_%i_0xx.genh" BNAME i CRC
   callfunction GENH 1
   endian big
next i

startfunction GENH
   endian little
   log MEMORY_FILE 0 0
   putVarChr MEMORY_FILE 0 0x484e4547 long
   putVarChr MEMORY_FILE 4 CH long
   putVarChr MEMORY_FILE 0xc FREQ long
   putVarChr MEMORY_FILE 0x10 0xffffffff long
   putVarChr MEMORY_FILE 0x14 0xffffffff long
   putVarChr MEMORY_FILE 0x18 3 long
   putVarChr MEMORY_FILE 0x1c 0x60 long
   putVarChr MEMORY_FILE 0x20 0x60 long
   putVarChr MEMORY_FILE 0x40 SAMPLES long
   putVarChr MEMORY_FILE 0x50 SIZE long
   putVarChr MEMORY_FILE 0x5f 0 byte
   append
   log MEMORY_FILE OFFSET SIZE 1
   append
   get SIZE asize MEMORY_FILE
   log NAME 0 SIZE MEMORY_FILE
endfunction

AMSW_GC_sti_stm.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Tue Jun 12, 2018 2:48 pm (35828)

Army Men: Sarge's War (Xbox)

note: Xbox ADPCM headers get automatically added (playable with vgmstream)

Code:

# game: Army Men: Sarge's War (Xbox)
# file type: *.sbr
# script type: extractor
# note: Xbox ADPCM headers get automatically added
#      (playable with vgmstream)
#
# script for QuickBMS http://quickbms.aluigi.org
# written by AlphaTwentyThree of Zenhax

get SIZE asize
if SIZE < 0x50
   cleanexit
endif

get BASE_HEADER_SIZE long
get HEADER_SIZE long
get DATA_START long
get DATA_SIZE long
get NUMB1 long
get NUMB2 long
get FILES long
get OFF_SECT2 long
get OFF_SECT1 long
get OFF_SECT3 long

get BNAME basename

# for i = 1 <= NUMB1 # sect 1
   # get CRC long
   # get IDENT long # if file is written
   # get IDX long
   # get ZERO long
   # get UNK1 long
   # getDstring ZERO 0xc
   # get UNK2 long
   # get UNK3 long
   # get UNK4 long
   # get UNK5 long
   # get UNK6 long
# next i

goto OFF_SECT2

for i = 1 <= FILES # sect2
   get OFFSET long
   math OFFSET  = DATA_START
   get SIZE long
   get ZERO long
   get UNK long
   savepos MYOFF
   goto OFFSET
   get CODEC short
   get CH short
   get FREQ long
   math OFFSET  = 0x14
   math SIZE -= 0x14
   string NAME p= "%s_sfx_%i.lwav" BNAME i
   callfunction XADP 1
   goto MYOFF
next i

 for i = 1 <= NUMB2 # sect3
   get OFFSET long
   math OFFSET  = DATA_START
   get SIZE long
   get ZERO longlong
   get CODEC short
   get CH short
   get FREQ long
   get COEFF1 long
   get INTERLEAVE short
   get BITS short
   get COEFF2 long
   string NAME p= "%s_mus_%i.lwav" BNAME i
   callfunction XADP 1
 next i

startfunction XADP
   set MEMORY_FILE binary "\x52\x49\x46\x46\x18\x51\xa3\x0\x57\x41\x56\x45\x66\x6d\x74\x20\x14\x0\x0\x0\x69\x0\x2\x0\x44\xac\x0\x0\xcc\xc1\x0\x0\x48\x0\x4\x0\x2\x0\x40\x0\x64\x61\x74\x61\xf0\x50\xa3\x0"
   set RIFFSIZE SIZE
   math RIFFSIZE  = 0x28
   putVarChr MEMORY_FILE 0x04 RIFFSIZE long
   putVarChr MEMORY_FILE 0x16 CH byte
   putVarChr MEMORY_FILE 0x18 FREQ long
   set VAR1 0x3073
   math VAR1 *= CH
   if FREQ == 48000
      math VAR1 *= 44100
   else
      math VAR1 *= FREQ
   endif
   math VAR1 /= 22050
   putVarChr MEMORY_FILE 0x1c VAR1 long   
   set VAR2 0x24
   math VAR2 *= CH
   putVarChr MEMORY_FILE 0x20 VAR2 short
   putVarChr MEMORY_FILE 0x2c SIZE long
   append
   log MEMORY_FILE OFFSET SIZE
   append
   get SIZE asize MEMORY_FILE
   log NAME 0 SIZE MEMORY_FILE
endfunction

AMSW_Xbox_sbr.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Thu Dec 23, 2021 1:49 pm (68443)

998 Studios
(https://www.mobygames.com/company/989-studios)

CAT extractor

Code:

# 989 Studios *.cat extractor

# (c) 2021-12-21 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get SIZE asize
math SIZE -= 0xc
goto SIZE
get IDENT long
get FILES long
get UNK long
get BNAME basename
set OFFSET 0

for i = 1 <= FILES
   goto OFFSET
   get SIZE long
   get BIAS long
   math SIZE  = BIAS
   string NAME P "%BNAME%_%i%.v2k"
   log NAME OFFSET SIZE
   math OFFSET  = SIZE
   goto OFFSET
   do
      get TEST byte
   while TEST == 0
   if TEST == 0xcd
      do
         get TEST byte
      while TEST == 0xcd
   endif
   savepos OFFSET
   math OFFSET -= 1
next i

KGB extractor

Code:

# 989 Studios *.kgb extractor

# (c) 2021-12-21 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

idstring "KGB"
goto 0x4
get FILES byte
set CD 0
goto 0x8
get TEST byte
if TEST == 0xcd
   set CD 1
endif
goto 0xc
set OFFSET 0x800
for i = 0 < FILES
   getDstring NAME 0xc
   get PRES byte
   get UNK threebyte
   get SIZE long
   get TOFFSET long
   if CD == 1
      savepos MYOFF
      log NAME OFFSET SIZE
      math OFFSET  = SIZE
      goto OFFSET
      do
         get TEST byte
      while TEST == 0xcb
      savepos OFFSET
      math OFFSET -= 1
      goto MYOFF
   else
      log NAME TOFFSET SIZE
   endif
next i

V2K to ss2 converter (-> vgmstream)

Code:

# 989 Studios *.v2k to *.ss2 converter

# (c) 2021-12-21 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get SIZE long
get CHECK long
if CHECK == 0x1000
   set FREQ 44100
else
   set FREQ 22050
endif
set OFFSET 0x800
get NAME basename
string NAME  = ".ss2"
set CH 1
set INTERLEAVE 0x10

   set MEMORY_FILE binary "\x53\x53\x68\x64\x18\x00\x00\x00\x10\x00\x00\x00\xb0\x36\x00\x00\x02\x00\x00\x00\xc0\x2f\x00\x00\xff\xff\xff\xff\xff\xff\xff\xff\x53\x53\x62\x64\x00\xe8\x11\x00"
   append
   log MEMORY_FILE OFFSET SIZE
   append
   putVarChr MEMORY_FILE 0x24 SIZE long
   putVarChr MEMORY_FILE 0xc FREQ long
   putVarChr MEMORY_FILE 0x14 INTERLEAVE long
   putVarChr MEMORY_FILE 0x10 CH byte
   get SIZE asize MEMORY_FILE
   log NAME 0 SIZE MEMORY_FILE

989_V2K.bms

989_KGB.bms

989_CAT.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Thu Dec 23, 2021 5:59 pm (68446)

Oddworld: Abe's Oddysee (Playstation)

Code:

# game Oddworld: Abe's Oddysee (Playstation)
# format: *.LVL
# script type: extractor

# (c) 2021-12-32 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get DATASTART long
goto 0x10
get FILES long
goto 0x20
for i = 0 < FILES
   getDstring NAME 0xc
   get OFFSET long
   math OFFSET *= 0x800
   get UNK long
   get SIZE long
   log NAME OFFSET SIZE
next i

Abe's Oddysee PSX LVL.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Sat Dec 25, 2021 5:06 am (68463)

Electronic Arts - *.MPC/*.MAD/*.VP6 movies demuxer

Code:

# EA Games *.MPC/*.MAD movies demultiplexer

# (c) 2021-12-25 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get FSIZE asize
putVarChr MEMORY_FILE FSIZE 0
log MEMORY_FILE 0 0
putVarChr MEMORY_FILE2 FSIZE 0
log MEMORY_FILE2 0 0
set OFFSET 0
for i = 1
   goto OFFSET
   getDstring IDENT 2
   getDstring TEMP 2
   get SIZE long
   goto OFFSET
   getDstring DATA SIZE
   if IDENT == "SC"
      putDstring DATA SIZE MEMORY_FILE
   else
      putDstring DATA SIZE MEMORY_FILE2
   endif
   math OFFSET  = SIZE
   if OFFSET == FSIZE
      break
   endif
next i
get SIZE asize MEMORY_FILE
get NAME basename
string NAME  = ".sng"
log NAME 0 SIZE MEMORY_FILE

get SIZE asize MEMORY_FILE2
get NAME basename
string NAME  = ".mov"
log NAME 0 SIZE MEMORY_FILE2

!EA_demux.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Sat Dec 25, 2021 8:20 am (68466)

XWB/XSB pairs

procedure:
- move all files to the folder with the *.xwb files
- run batch file
- convert resulting *.xwb files (separate folder for each main xwb) to *.wav with script (still in beta mode - offset needs to be adjusted for every main container)

note: the names inside the XSB files don't correspond to the streams correctly.
note2: I've also attached the Xbox ADPCM codec below - right clock on the INF file and choose "Install". You can play the resulting wav files with every audio player afterwards.

Code:

# CRI xwb extractor
#
# (c) 2021-12-25 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

idstring "WBND"
set FREQ 44100
set CH 2
get SIZE asize
set OFFSET 0x800
math SIZE -= OFFSET


set MEMORY_FILE binary "\x52\x49\x46\x46\x18\x51\xa3\x0\x57\x41\x56\x45\x66\x6d\x74\x20\x14\x0\x0\x0\x69\x0\x2\x0\x44\xac\x0\x0\xcc\xc1\x0\x0\x48\x0\x4\x0\x2\x0\x40\x0\x64\x61\x74\x61\xf0\x50\xa3\x0"
   xmath RIFFSIZE "SIZE   0x28"
   putVarChr MEMORY_FILE 0x04 RIFFSIZE long
   putVarChr MEMORY_FILE 0x16 CH byte
   putVarChr MEMORY_FILE 0x18 FREQ long
   set VAR1 0x3073
   math VAR1 *= CH
   if FREQ == 48000
      math VAR1 *= 44100
   else
      math VAR1 *= FREQ
   endif
   math VAR1 /= 22050
   putVarChr MEMORY_FILE 0x1c VAR1 long   
   set VAR2 0x24
   math VAR2 *= CH
   putVarChr MEMORY_FILE 0x20 VAR2 short
   putVarChr MEMORY_FILE 0x2c SIZE long
   append
   log MEMORY_FILE OFFSET SIZE
   append
   get NAME basename
   string NAME  = ".wav"
   get SIZE asize MEMORY_FILE
   log NAME 0 SIZE MEMORY_FILE

xwb_process.7z

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Wed Dec 29, 2021 8:54 am (68539)

The Punisher (PS2)

note: in case Luigi's script doesn't work, here's one that works on the rest of the files. Won't work on "MUSIC.VPP" or "VOICES.VPP", only the other files.

Code:

# The Punisher (PS2)
# *.vpp extractor

# (c) 2021-12-29 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get UNK long
get VER long
get ENTRIES Long
get UNK long
get FILE_TABLE long
goto FILE_TABLE
xmath DATA_START "FILE_TABLE  (ENTRIES * 0x20)"
get FNAME basename

for a = 1 <= ENTRIES

   getDstring NAME 0x18
   get SIZE1 long
   get SIZE2 long
   string NAME P "%FNAME%\%NAME%"
   xmath DATA_START "((DATA_START/0x800) 1)*0x800"
   if SIZE1 == SIZE2
      log NAME DATA_START SIZE2
   else
      clog NAME DATA_START SIZE2 SIZE1
   endif
   math DATA_START   SIZE2
next a

punisher_ps2_vpp.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Wed Dec 29, 2021 12:59 pm (68543)

The Punisher (PS2)

Code:

# The Punisher (PS2)
# *.peg extractor

# (c) 2021-12-29 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

idstring "GEKV"
get VER long
get SIZE_TABLE long
goto 0x10
get FILES long
goto 0x20
get BNAME basename
for i = 0 < FILES
   get OFFSET long
   get UNK1 long
   get UNK2 long
   get UNK3 long
   getDstring NAME 0x18
   get SIZE long
   get UNK4 long
   string NAME P "%BNAME%\%NAME%"
   log NAME OFFSET SIZE
next i

punisher_ps2_peg.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Sun Jan 02, 2022 2:49 pm (68610)

The Godfather II (PS3, X360)

notes:
- no names given, only the CRC, so that's what you'll find in the names
- some file endings obviously aren't correct but if anyone wants to correct them, send me a note

Code:

# *.VIV archives from "The Godfather II"
# (c) 2022-01-02 by AlphaTwentyThree of ZenHAX
#
# script for QuickBMS http://quickbms.aluigi.org

endian big
idstring "BIG"
get VER byte
get FSIZE long
get FILES long
get HSIZE long
get BNAME basename
for i = 0 < FILES

    get OFFSET long
    get SIZE long
   get CRC long
   if SIZE != 0
      savepos TMP
      goto OFFSET
      getDstring EXT 3
      if EXT == "SCH"
         set EXT "vp6"
      elif EXT == "MVh"
         set EXT "vp6"
      elif EXT == "ols"
         set EXT "gf2"
      else
         goto OFFSET
         get TYPE byte
         if TYPE == 3
            set EXT "exa.snu"
         endif
      endif
      goto TMP
      string NAME p "%s_0xx.%s" BNAME CRC EXT
      log NAME OFFSET SIZE
   endif
next i

ea_big4_var.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Wed Jan 05, 2022 7:08 am (68684)

PS2 ADPCM *.ss2 0x10 byte re-interleave

vgmstream somehow still doesn't play ss2 streams with incomplete last blocks correctly. This script will re-interleave those streams to ones that can be played correctly.
My old script in the "other" forum had some major problems, so please only use this one!
Very important script!

Code:

# re-interleaves *.ss2 files with 0x10 bytes interleave
#
# (c) 2022-01-05 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

idstring "SShd"
goto 0xc
get FREQ long
get CH long
if CH == 1
   cleanexit
endif
goto 0x14
get INTERLEAVE long
set OFFSET 0x28
get STREAMSIZE asize
math STREAMSIZE -= OFFSET
xmath BLOCKS "STREAMSIZE / (INTERLEAVE * 2)" # cycles
xmath TEST "STREAMSIZE % (INTERLEAVE * 2)"
if TEST != 0
   xmath RES "TEST / 2" # single last block
else
   set REST 0
endif
callfunction deinterleave 1
callfunction reinterleave 1
callfunction addSS2header 1
get SIZE asize MEMORY_FILE4
get NAME basename
string NAME  = "_0x10.ss2"
log NAME 0 SIZE MEMORY_FILE4

startfunction deinterleave
   xmath PSIZE "STREAMSIZE/2"
   putVarchr MEMORY_FILE SSIZE 0
   putVarchr MEMORY_FILE2 SSIZE 0
   log MEMORY_FILE 0 0
   log MEMORY_FILE2 0 0
   goto OFFSET
   for k = 0 < BLOCKS
      getDstring DATA INTERLEAVE
      putDstring DATA INTERLEAVE MEMORY_FILE
      getDstring DATA INTERLEAVE
      putDstring DATA INTERLEAVE MEMORY_FILE2
   next k
   getDstring DATA RES
   putDstring DATA RES MEMORY_FILE
   getDstring DATA RES
   putDstring DATA RES MEMORY_FILE2
   get SIZE asize MEMORY_FILE
endfunction

startfunction reinterleave
   putVarChr MEMORY_FILE3 STREAMSIZE 0
   log MEMORY_FILE3 0 0
   get SIZE1 asize MEMORY_FILE
   get SIZE2 asize MEMORY_FILE2
   xmath CYC "(SIZE1 / 0x10)"
   set OFFSET 0
   for i = 0 < CYC
      goto OFFSET MEMORY_FILE
      getDstring DATA 0x10 MEMORY_FILE
      putDstring DATA 0x10 MEMORY_FILE3
      goto OFFSET MEMORY_FILE2
      getDstring DATA 0x10 MEMORY_FILE2
      putDstring DATA 0x10 MEMORY_FILE3
      math OFFSET  = 0x10
   next i
   get SIZE asize MEMORY_FILE3
endfunction

startfunction addSS2header
   set MEMORY_FILE4 binary "\x53\x53\x68\x64\x18\x00\x00\x00\x10\x00\x00\x00\xb0\x36\x00\x00\x02\x00\x00\x00\xc0\x2f\x00\x00\xff\xff\xff\xff\xff\xff\xff\xff\x53\x53\x62\x64\x00\xe8\x11\x00"
   get SIZE asize MEMORY_FILE3
   do
      math SIZE -= 0x20
      goto SIZE MEMORY_FILE3
      get TEST long MEMORY_FILE3
   while TEST == 0
   math SIZE  = 0x20
   do
      math SIZE -= 0x20
      goto SIZE MEMORY_FILE3
      get TEST long MEMORY_FILE3
   while TEST == 0xc
   math SIZE  = 0x20
   append
   log MEMORY_FILE4 0 SIZE MEMORY_FILE3
   append
   putVarChr MEMORY_FILE4 0xc FREQ long
   putVarChr MEMORY_FILE4 0x10 CH byte
   set INTERLEAVE 0x10
   putVarChr MEMORY_FILE4 0x14 INTERLEAVE long
   putVarChr MEMORY_FILE4 0x24 SIZE long
endfunction

ss2_re-interleave.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Wed Jan 05, 2022 7:24 am (68685)

Volition Inc.

note: all files stemming from *.vmu streams need to be re-interleaved with my script in order to be played correctly!

Code:

# Volition games - audio converter
# files commonly inside *.vpp archives
#
# (c) 2022-01-05 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get EXT extension
set INTERLEAVE 0x4000
if EXT == "vmu"
   set FREQ 22050
   set CH 2
elif EXT == "vse"
   set FREQ 44100
   set CH 1
else
   print "wrong format"
   cleanexit
endif
get SIZE asize
set OFFSET 0
get NAME basename
string NAME  = ".ss2"
callfunction SS2 1

startfunction SS2
   set MEMORY_FILE binary "\x53\x53\x68\x64\x18\x00\x00\x00\x10\x00\x00\x00\xb0\x36\x00\x00\x02\x00\x00\x00\xc0\x2f\x00\x00\xff\xff\xff\xff\xff\xff\xff\xff\x53\x53\x62\x64\x00\xe8\x11\x00"
   append
   log MEMORY_FILE OFFSET SIZE
   append
   putVarChr MEMORY_FILE 0x24 SIZE long
   putVarChr MEMORY_FILE 0xc FREQ long
   putVarChr MEMORY_FILE 0x14 INTERLEAVE long
   putVarChr MEMORY_FILE 0x10 CH byte
   get SIZE asize MEMORY_FILE
   log NAME 0 SIZE MEMORY_FILE
endfunction

volition_ps2_audio.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Wed Jan 05, 2022 11:34 am (68692)

SS2 mono to stereo

format: 2x *.ss2 (PS2 ADPCM), mono
script type: join left and right channel to stereo file
note 1: channels must be given as l/r or L/R at end of base name
note 2: files are played correctly, no re-interleave needed

Code:

# Channel joiner for *.ss2 files
# accepted formats:
# [name]l.ss2/[name]r.ss2
# [name]L.ss2/[name]R.ss2
# note : resulting files are played correctly
#
# (c) 2022-01-05 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

get NAME basename
get EXT extension
if EXT != "ss2"
   print "Error: source files are not ss2! Aborting..."
   cleanexit
endif
string NAME -= 1
string L p "%sl.%s" NAME EXT
string R p "%sr.%s" NAME EXT
open FDSE L 0 S
if S == 0
   string L p "%sL.%s" NAME EXT
   string R p "%sR.%s" NAME EXT
   open FDSE L 0
endif
open FDSE R 1
get SIZEL asize 0
get SIZER asize 1
if SIZEL != SIZER
   print "Error: channels have different sizes! Aborting..."
   cleanexit
endif
goto 0x10 0
get CH byte
if CH != 1
   print "Error: source files are not mono! Aborting..."
   cleanexit
endif
goto 0xc 0
get FREQ long
xmath INTERLEAVE  "SIZEL - 0x28"
xmath PSIZE "SIZEL   SIZER - 0x28" # minus one header
xmath SIZE "SIZEL-0x28"

putVarChr MEMORY_FILE PSIZE 0
log MEMORY_FILE 0 0
   set MEMORY_FILE binary "\x53\x53\x68\x64\x18\x00\x00\x00\x10\x00\x00\x00\xb0\x36\x00\x00\x02\x00\x00\x00\xc0\x2f\x00\x00\xff\xff\xff\xff\xff\xff\xff\xff\x53\x53\x62\x64\x00\xe8\x11\x00"
   append
   log MEMORY_FILE 0x28 SIZE 0
   log MEMORY_FILE 0x28 SIZE 1
   append
   xmath SIZE "2*SIZEL-0x28"
   putVarChr MEMORY_FILE 0x24 SIZE long
   putVarChr MEMORY_FILE 0xc FREQ long
   putVarChr MEMORY_FILE 0x14 INTERLEAVE long
   putVarChr MEMORY_FILE 0x10 2 byte
   get SIZE asize MEMORY_FILE
   string NAME p "%s.ss2" NAME
   log NAME 0 SIZE MEMORY_FILE

ss2_join_channels.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Fri Jan 07, 2022 7:17 am (68789)

Wii *.bin extractor

Code:

# Wii *.bin extractor (banner.bin/icon.bin etc.)

# (c) 2022-01-07 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

comtype LZ77WII_RAW10
idstring "IMD5"
endian big
get SIZE asize
math SIZE -= 0x28
set OFFSET 0x28
goto 0x24
get TYPE byte
if TYPE == 0x10
   endian little
endif
get ZSIZE long
get NAME basename
putVarChr MEMORY_FILE ZSIZE 0
log MEMORY_FILE 0 0
clog MEMORY_FILE OFFSET SIZE ZSIZE
get TYPE long MEMORY_FILE
if TYPE == 0x2d38aa55
   string NAME  = ".u-8"
else
   string NAME  = ".decomp"
endif
log NAME 0 ZSIZE MEMORY_FILE

wii_bin.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Sat Jan 08, 2022 4:44 am (68812)

Humongous Entertainment Inc.
(https://www.mobygames.com/company/humon ... inment-inc)

script type: add wave header
function: add an appropriate header to the files found in (\SOUND)\DIGI\SDAT that Luigi's Humongous script (http://aluigi.altervista.org/bms/humongous.bms) extracts. All files are PCM, 8 bit mono, 11025 Hz. Of course you could also import the raw streams into an audio editor with the according settings but this was is much faster.

Code:

# add a wave pcm header to any data and write to disk
# input variables: SIZE, OFFSET, FREQ, CH, BITS, BLOCKALIGN, CODEC, NAME (or set to "")
# (c) 2012-10-16 by AlphaTwentyThree of XeNTaX

get SIZE asize
set OFFSET 0
set CODEC 1
set FREQ 11025
set CH 1
set BITS 8
set BLOCKALIGN 1
set NAME ""
callfunction PCM 1

startfunction PCM
   endian little
   set PRE SIZE
   math PRE  = 0x2c
   putVarChr MEMORY_FILE PRE 0
   log MEMORY_FILE 0 0
   set MEMORY_FILE binary "\x52\x49\x46\x46\x20\xC0\xB1\x00\x57\x41\x56\x45\x66\x6D\x74\x20\x10\x00\x00\x00\x01\x00\x02\x00\x44\xAC\x00\x00\x10\xB1\x02\x00\x04\x00\x10\x00\x64\x61\x74\x61\xFC\xBF\xB1\x00"
   append
   log MEMORY_FILE OFFSET SIZE
   append
   set RIFFSIZE SIZE
   math RIFFSIZE  = 36
   set AVGBYTES FREQ
   if CODEC != 2
      math AVGBYTES *= BLOCKALIGN
   endif
   
   putvarchr MEMORY_FILE 0x04 RIFFSIZE long
   putvarchr MEMORY_FILE 0x14 CODEC short          # wFormatTag: Microsoft PCM Format (0x0001)
   putvarchr MEMORY_FILE 0x16 CH short   # wChannels
   putvarchr MEMORY_FILE 0x18 FREQ short   # dwSamplesPerSec
   putvarchr MEMORY_FILE 0x1c AVGBYTES long    # dwAvgBytesPerSec
   putvarchr MEMORY_FILE 0x20 BLOCKALIGN short # wBlockAlign
   putvarchr MEMORY_FILE 0x22 BITS short       # wBitsPerSample
   putvarchr MEMORY_FILE 0x28 SIZE long
   if NAME == ""
      get NAME basename
      if CODEC == 2
         string NAME  = ".lwav"
      else
         string NAME  = ".wav"
      endif
   endif
   get SIZE asize MEMORY_FILE
   log NAME 0 SIZE MEMORY_FILE
endfunction

wave_header.bms

April 11, 20251 yr

Author
Localization

AlphaTwentyThree, posted Tue Jan 18, 2022 3:29 pm (69164)

EA *.sdh/*.sdt

Code:

# EA *.sdh/*.sdt pairs
# tested on: 
# Harry Potter an the the Half-Blood Prince (PS3, Xbox360, PS2)

# (c) 2022-01-18 by AlphaTwentyThree of Zenhax
# script for QuickBMS http://quickbms.aluigi.org

open FDDE sdh 0
open FDDE sdt 1
get BNAME basename 0
getDstring TEST 4 1
if TEST == "SCHl"
   callfunction SNG 1
else
   if TEST == "ADAT"
      set XAS 1
   endif
   callfunction EALayer3 1
endif


startfunction SNG
   get FILES long 0
   for i = 1 <= FILES
      get OFFSET long 0
      get SIZE long 0
      get CRC long 0
      string NAME p "%s_%d_0xx.sng" BNAME i CRC
      log NAME OFFSET SIZE 1
   next i
endfunction

startfunction EALayer3
   endian big
   get FILES long 0
   savepos OFF 0
   for i = 1 <= FILES
      goto OFF 0
      get OFFSET long 0
      get D1 long 0
      get CRC long 0
      get D2 long 0
      get D3 long 0
      savepos OFF 0
      if i != FILES
         get SIZE long 0
      else
         get SIZE asize 1
      endif
      math SIZE -= OFFSET
      if XAS == 1
         goto OFFSET 1
         get DUMMY longlong 1
         get HSIZE long 1
         savepos MOFF 1
         xmath MOFF "MOFF   HSIZE"
         goto MOFF 1
         do
            get TEST long 1
         while TEST == 0
         savepos MOFF 1
         math MOFF -= 4
         xmath HSIZE "MOFF - OFFSET"
         math OFFSET  = HSIZE
         math SIZE -= HSIZE
      endif
      xmath PSIZE "SIZE   0x20"
      putVarChr MEMORY_FILE PSIZE 0
      log MEMORY_FILE 0 0
      if XAS != 1
         set MEMORY_FILE binary "\x03\x00\x00\x02\x00\x00\x00\x00\x20\x00\x00\x00\x00\x00\x00\x00\x05\x04\xAC\x44\x40\x28\xA5\x8E\x00\x78\x65\x00\x66\x6D\x74\x20"
      else
         set MEMORY_FILE binary "\x03\x00\x00\x02\x00\x00\x4C\x1E\x20\x00\x00\x00\x00\x00\x00\x00\x04\x04\xBB\x80\x40\x0E\x45\xA7\x00\x00\x00\x00\x00\x00\x00\x00"
      endif
      putVarChr MEMORY_FILE 0x10 D2 long
      putVarChr MEMORY_FILE 0x14 D3 long
      append
      log MEMORY_FILE OFFSET SIZE 1
      append
      string NAME p "%s_%d_0xx.exa.snu" BNAME i CRC
      log NAME 0 PSIZE MEMORY_FILE
   next i
endfunction

hp_sdh_sdt.bms

My QuickBMS scripts [AlphaTwentyThree]

Featured Replies

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Account

Navigation

Search

Configure browser push notifications

Chrome (Android)

Chrome (Desktop)

Safari (iOS 16.4+)

Safari (macOS)

Edge (Android)

Edge (Desktop)

Firefox (Android)

Firefox (Desktop)