CHTRANX

(GIN Macro)

Defined in: MACROS EWDAS

Used in: ERASEX866, FLAW866

CHTRANX.mac.txt
 H^MW    #   
 J27G    [???                                CHTRANX 
 J2M6    #                                   ******* 
 J36Q    #MAC  CHTRANX                      [FLAWS TRANSFER CHECK MACRO  
 J3LB    #   
 J462    #STR  %E
 J55=    (   
 J5JW          LDX   0  %E   
 J64G          SRL   0  18   
 J6J6    )   
 J73Q    #STR  %E
 J7HB    #SKI
 J832          LDCH  0  ACOMMUNE9(2) 
 J8GL          LDX   1  %A   
 J92=          ANDN  1  #77  
 J9FW          SBN   1  EDS  
 J9^G          BNZ   1  MCHTRANX1
 J=F6          ANDN  0  #75  
 J=YQ    MCHTRANX1   
 J?DB    #SKI  K6EXOFILE>299-299 
 J?Y2    (   
 J#CL          LDX   2  0
 J#X=          SRC   2  6
 J*BW          BNG   2  MCHTRANX2
 J*WG          SLL   2  1
 JBB6          BPZ   2  MCHTRANX3
 JBTQ          BZE   1  MCHTRANX2
 JC*B          SLL   2  2
 JCT2          BNG   2  MCHTRANX3
 JD#L    MCHTRANX2   
 JDS=          GEOERR   1,PERIREPX   
 JF?W    MCHTRANX3   
 JFRG    )   
 JG?6          LDX   1  FX1  
 JGQQ          LDX   2  FX2  
 JH=B          BZE   0  MCHTRANX4
 JHQ2          SRC   0  1
 JJ9L          BNG   0  %D   
 JJP=          ANDN  0  6
 JK8W          BNZ   0  %B   
 JKNG          BRN      %C   
 JL86    MCHTRANX4   
 JLMQ    #NOR