GoTo 0x4 0 ;
Get mult Long 0 ;
GoTo 0x10 0 ;
Get base Long 0 ;
Math base *= mult ;
GoTo 0x28 0 ;
Get namebase Long 0 ;
Math namebase *= mult ;
GoTo 0xc 0 ;
Get files Long 0 ;
For f = 1 To files ;
GoTo base 0 ;
Get fileoffset Long 0 ;
Get null Long 0 ;
Get filesize Long 0 ;
Get toname Long 0 ;
Get null Long 0 ;
Get null Long 0 ;
Get null Long 0 ;
Get null Long 0 ;
SavePos base 0 ;
Math toname += namebase ;
GoTo toname 0 ;
Get name String 0 ;
Math fileoffset *= mult ;
Log name fileoffset filesize 0 ;
Next f ;