Get size ASIZE 0 ;
GoTo 0x0 0 ;

Get test1 Short 0 ;
IF test1 = 0 ;
CleanExit ;
EndIF ;
Math det = test1 ;
Math det *= 8 ;
Math det += 4 ;
IF size > det ;
Math res1 = 0 ;
Else ;
Cleanexit ;
EndIF ;
Math det2 = test1 ;
Math det2 -= 1 ;
Math det2 *= 4 ;
Math det2 += 4 ;
IF size > det2 ;
Math res2 = 0 ;
Else ;
Cleanexit ;
EndIF ;
GoTo det2 0 ;
Get test2 Long 0 ;
SavePos namestart 0 ;
IF size > test2 ;
Math res3 = 0 ;
Else ;
Cleanexit ;
EndIF ;
GoTo det 0 ;
Padding 16 ;
SavePos test3 0 ;
GoTo 0x4 0 ;

SavePos start 0 ;
Get test4 Long 0 ;
IF test3 != test4 ;
Cleanexit ;
EndIF ;
Math allm1 = test1 ;
Math allm1 -= 1 ;
For X = 1 To allm1 ;
GoTo start 0 ;
Get f1 Long 0 ;
SavePos start 0 ;
Get f2 Long 0 ;
Math delta = f2 ;
Math delta -= f1 ;
GoTo namestart 0 ;
GetDString name 4 0 ;
GoTo namestart 0 ;
GoTo 4 0 SEEK_CUR ;
SavePos namestart 0 ;
string wolf = name ;
string name += / ;
string name += wolf ;
Log name f1 delta 0 ;
Next X ;
GoTo start 0 ;
Get f1 Long 0 ;
Math delta = size ;
Math delta -= f1 ;
GoTo namestart 0 ;
GetDString name 4 0 ;
string wolf = name ;
string name += / ;
string name += wolf ;
Log name f1 delta 0 ;