ImpType Standard ; Get VarType Long 0 ; Get RemainingSize Long 0 ; Get U1 Long 0 ; Get RelOff1 Long 0 ; SavePos COff 0 ; Math COff += RelOff1 ; GoTo COff 0 ; Get VarType Long 0 ; Get ResInfoSize Long 0 ; Get VarType Long 0 ; Get HeaderSize Long 0 ; SavePos COff 0 ; Get U2 Long 0 ; GetDString BINName 28 0 ; GetDString OriName 64 0 ; Set FP String . ; Get OriSize Long 0 ; Math COff += HeaderSize ; GoTo COff 0 ; Get VarType Long 0 ; Get TableSize Long 0 ; SavePos COff 0 ; Math COff += TableSize ; GoTo COff 0 ; Get VarType Long 0 ; Get ResInfoSize Long 0 ; Set FileNum Long ResInfoSize ; Math FileNum /= 24 ; For T = 1 To FileNum ; Get VarType Long 0 ; SavePos FOO 0 ; Get FO Long 0 ; SavePos FSO 0 ; Get FS Long 0 ; Get UCS Long 0 ; Get U3 Long 0 ; Get U4 Long 0 ; Set Name String OriName ; String Name += FP ; String Name += T ; Log Name FO FS #FOO FSO ; Next T ;