FTRANW

(GIN Macro)

Defined in: MACROS EWDAS

Used in:

FTRANW.mac.txt

 =M*2    #   
 =MSL    [???                                FTRANW  
 =N#=    #                                   ******  
 =NRW    #MAC  FTRANW
 =P?G    #   
 =PR6    #OPT  MFTRANW1=0
 =Q=Q    #SKI  MFTRANW1-1
 =QQB    (   
 =R=2    #FRE  MFTRANW1  
 =RPL    #DEF  MFTRANW1=1
 =S9=    MFTRANW2
 =SNW    #DEF  MFTRANW=MFTRANW2  
 =T8G          STO   0  EWK+2(3) 
 =TN6          LDX   0  EWK(3)   
 =W7Q          LDN   1  EBUF-A1(3)   
 =WMB    MFTRANW4
 =X72          LDX   1  A1(1)
 =XLL          BNZ   1  MFTRANW3 
 =Y6=          LDX   0  EWK+2(3) 
 =YKW          EXIT  0  0
 =^5G    MFTRANW3
 =^K6          TXU   0  A1+1(1)  
 ?24Q          BCS      MFTRANW4 
 ?2JB          LDX   0  EWK+2(3) 
 ?342          EXIT  0  1
 ?3HL    )   
 ?43=    #NOR