UNOPCH

(GIN Macro)

Defined in: WORK-MACROS

Used in: COMPOST867, OPENEND865, OPENWORK866

UNOPCH.mac.txt

 655# ...[??? UNOPCH SECT FILE FGN 4 DOC 
 65*6    #MAC  UNOPCH
 65SQ          LDX   0  CTOPEN(%A)   
 66#B          SRL   0  12   
 66S2          ANDN  0  #5777
 67?L          BNZ   0  %B   
 67R=          LDCT  0  #200 
 68=W          ANDX  0  FINFC(%A)
 68QG          BNZ   0  %B   
 69=6    #NOR