idstring "TAFS" get SECTOIN long get FILE_VERSION long get FILES long get DIRACTORY_NAME long get DUMMY long get DUMMY long get DUMMY long get DUMMY long get DUMMY long get DUMMY long get DUMMY long get DUMMY long for i = 0 < FILES get CRC long get DUMMY long get SIZE long get OFFSET long math OFFSET -= 1040 string NAME p "%08x" CRC log NAME OFFSET SIZE next i