GoTo 0 0 ;
Get adj Long 0 ;
Get files Long 0 ;
Math fox = files ;
Math fox *= 0x10 ;
Math fox += 0x38 ;
Math namebase = fox ;
GoTo 0x38 0 ;
SavePos base 0 ;
For x = 1 To files ;
GoTo base 0 ;
Get toname Long 0 ;
Get offset Long 0 ;
Get size Long 0 ;
Get notused Long 0 ;
SavePos base 0 ;
Math toname += namebase ;
GoTo toname 0 ;
Get name String 0 ;
Math offset += adj ;
Log name offset size 0 ;
Next x ;