# TARC Berwick Saga idstring "TARC" get FILES long get NAMES_OFF long get ZERO long savepos TMP xmath OFFSET "TMP + (FILES * (4 + 4 + 4))" for i = 0 < FILES get DUMMY1 long get SIZE long get DUMMY3 long savepos TMP goto NAMES_OFF get NAME string savepos NAMES_OFF goto TMP math OFFSET x 16 log NAME OFFSET SIZE math OFFSET + SIZE next i