Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ComType pkware
- Endian little
- Set NumsData SHORT 0
- Set Offset LONG 0 'Offset Used for Data Table.
- Set OffsetToDATA LONG 0 'Offset Used for getting uncompressed size and real data offset.
- Set DataOffset LONG 0 'Fake Offset from Data Table
- Set DataREALOffset LONG 0 'REAL Offset from OffsetToDATA (+4)
- Set DataCMPSize LONG 0 'Compressed Size from DATA Table
- Set DataREALCMPSize LONG 0 'REAL Compressed Size from DATA Table (-4)
- Set DataSize LONG 0 'Uncompressed Size from DATA.
- 'Set DATA_NAME String ""
- Set Test Byte 0 'Used for testing which offset the DATA Table begins.
- Get EXT EXTENSION
- 'Offset 0x32 if "RICKBO"; Offset 0xB4 if "Memory".
- Get Test Byte
- If Test == 0x4D 'If it's a M
- GoTo 0xa1
- Math Offset += 0xa1
- Elif Test == 0x52 'If it's a R
- GoTo 0x1f
- Math Offset += 0x1f
- EndIf
- Get NumsData SHORT
- Math Offset += 23
- GoTo Offset
- For i = 1 <= NumsData
- Get DataOffset Long 0
- Get DataCMPSize Long 0
- Math Offset += 8
- GetDString DATANAME 15 0
- Math Offset += 15
- Math Offset += 4
- If EXT == ""
- Math DataOffset += 4
- EndIf
- If DATANAME == "E_BOW126"
- Math DataOffset += 34
- EndIf
- If DATANAME == "E_BOW127"
- Math DataOffset += 11
- EndIf
- Set OffsetToDATA DataOffset
- GoTo OffsetToDATA
- Get DataSize Long
- Set DataREALOffset DataOffset
- Set DataREALCMPSize DataCMPSize
- Math DataREALOffset += 4
- Math DataREALCMPSize -= 4
- If DataSize <= 500000
- If DATANAME <> "CONTROL_S"
- CLog DATANAME DataREALOffset DataREALCMPSize DataSize
- EndIf
- If DATANAME == "ALABELS_S"
- Log DATANAME DataOffset DataCMPSize
- EndIf
- Else
- Log DATANAME DataOffset DataCMPSize
- EndIf
- Math DataOffset += DataCMPSize
- GoTo Offset
- Next
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement