(GIN Macro)
Defined in: RING-MACROS
Used in: PERUSFIL84, READFILE84
4PLN ...[??? TESTLOOK SECT FILE FGN 20 DOC 4PWG #MAC TESTLOOK 4QB6 # AS ABOVE -J.IF SOMEONE GONE FOR LAST BLOCK 4QTQ LDEX 3 ARINGNO(%C) 4R*B SBN 3 1 4RT2 BZE 3 M3TESTLOOK 4S#L ADN 3 1 4SS= LDX 0 3 4T?W M4TESTLOOK 4TRG ADN %C FELLEN 4W?6 BCT 0 M4TESTLOOK 4WQQ M2TESTLOOK 4X=B SBN %C FELLEN 4XQ2 LDCT 0 #776 4Y9L ANDX 0 A1+FGENERAL1(%C) 4YP= BZE 0 M1TESTLOOK 4^8W LDX 0 FREADBLOCK+A1(%C) 4^NG BXU 0 FREADBLOCK(%A),M1TESTLOOK 5286 LDX 0 FGENERAL2+A1(%C) 52MQ ANDN 0 2 537B BNZ 0 %B 53M2 M1TESTLOOK 546L BCT 3 M2TESTLOOK 54L= M3TESTLOOK 555W #NOR