TESTCODE

(GIN Macro)

Defined in: MACS SPC

Used in: ENGAGE867, LISTINTC865, TIDYREAD850

TESTCODE.mac.txt

 JGQQ    #MAC  TESTCODE  
 JH=B    #STR  %A
 JHQ2          SMO      %A   
 JJ9L    #STR  %A
 JJP=    #SKI
 JK8W          SMO      CPPTR(2) 
 JKNG          LDX   1  JADDP
 JL86    #STR  READER,%B 
 JLMQ          LDX   0  APCODET(1)   
 JM7B    #STR  READER,%B 
 JMM2    #SKI
 JN6L          LDX   0  APCODE(1)
 JNL=          LDX   1  FX1  
 JP5W          BZE   0  %C   
 JPKG          BRN      %D   
 JQ56    #NOR