Get arcsize ASIZE 0 ;
Math arcsize -= 0x4 ;
GoTo arcsize 0 ;
Get tonametable Long 0 ;
GoTo tonametable 0 ;
GoTo 0x4 0 SEEK_CUR ;
Get jump Long 0 ;
SavePos nametable 0 ;
GoTo jump 0 SEEK_CUR ;
GoTo 0x4 0 SEEK_CUR ;
Get files Long 0 ;
SavePos base 0 ;
Math files /= 0x10 ;
For x = 1 To files ;
GoTo base 0 ;
Get null Long 0 ;
Get offset Long 0 ;
Get size Long 0 ;
Get toname Long 0 ;
SavePos base 0 ;
Math offset *= 0x800 ;
Math toname += nametable ;
GoTo toname 0 ;
Get name String 0 ;
Log name offset size 0 ;
Next x ;