log MEMORY_FILE1 0 0 ;
log MEMORY_FILE2 0 0 ;
log MEMORY_FILE3 0 0 ;
ComType deflate ;
Get QT ASIZE 0 ;
For T = 0 < QT ;
GoTo found 0 ;
findloc OFFSET string "\x50\x4B\x03\x04\x00\x00\x00\x00\x08\x00\x00\x00\x00\x00\x00\x00\x00\x00" 0 0 ;
If OFFSET = 0 ;
Math T = QT ;
EndIF ;
If OFFSET != 0 ;
GoTo OFFSET 0 ;
GoTo 0x12 0 SEEK_CUR ;
Get zsize Long 0 ;
Get size Long 0 ;
Get null Long 0 ;
SavePos found 0 ;
Put found Long MEMORY_FILE1 ;
Put zsize Long MEMORY_FILE1 ;
Put size Long MEMORY_FILE1 ;
EndIF ;
Next T ;
Get mqa ASIZE MEMORY_FILE1 ;
Math mqa /= 12 ;
Math current = 0 ;
Math box = 0 ;
For y = 1 To mqa ;
Math bear = 0 ;
GoTo current MEMORY_FILE1 ;
Get offset Long MEMORY_FILE1 ;
Get zsize Long MEMORY_FILE1 ;
Get size Long MEMORY_FILE1 ;
SavePos current MEMORY_FILE1 ;
Append ;
CLog MEMORY_FILE2 offset zsize size 0 ;
Append ;
Next y ;
Get total ASIZE MEMORY_FILE2 ;
Get name FILENAME 0 ;
string name += .decompressed ;
Log name 0 total MEMORY_FILE2 ;