GoTo 0x8 0 ;
Get filenumber Long 0 ;
Get start Long 0 ;
GoTo start 0 ;
Math file = filenumber ;
Math file *= 12 ;
GoTo file 0 SEEK_CUR ;
SavePos namestart 0 ;
GoTo start 0 ;
SavePos base 0 ;
For f = 1 To filenumber ;
GoTo base 0 ;
Get toname Long 0 ;
Get filestart Long 0 ;
Get filesize Long 0 ;
SavePos base 0 ;
GoTo namestart 0 ;
GoTo toname 0 SEEK_CUR ;
Get filename string 0 ;
GoTo filestart 0 ;
GoTo 0x10 0 SEEK_CUR ;
Get f2number Long 0 ;
GoTo filestart 0 ;
GoTo 0x1C 0 SEEK_CUR ;
SavePos tiger 0 ;
For g = 1 To f2number ;
GoTo tiger 0 ;
Get name2 Long 0 ;
Get start2 Long 0 ;
Get size2 Long 0 ;
Get notused Long 0 ;
SavePos tiger 0 ;
Math start2 += filestart ;
GoTo namestart 0 ;
GoTo toname 0 SEEK_CUR ;
Get filename string 0 ;
String filename += . ;
String filename += g ;
String filename += . ;
String filename += name2 ;
Log filename start2 size2 0 ;
Next g ;
Next f ;