FPUTX

(GIN Macro)

Defined in: CHCHCOORMAC2

Used in: BSQ867, BSTS867, PROFLAG83

FPUTX.mac.txt

 5LPL ...#MAC  FPUTX 
 5LPY ...#STR  %A,2  
 5LQ= ...      LDX   2  %A   
 5LQJ ...      JBS      M1FPUTX,,ICTSW   
 5LQW ...      ENRINGD  CHAINADD(2),K3   
 5LR8 ...      BRN      M2FPUTX  
 5LR? ...M1FPUTX 
 5LRB ...      LDX   0  ACRIT(2) 
 5LRF ...      STO   2  GEN6     [KEEP AS FPUT O'WRITES  
 5LRJ ...      STO   0  GEN5 
 5LRM ...      STOZ     ACRIT(2)     [FIDDLE TO GMEL 0   
 5LRQ ...      FPUT  
 5LRT ...      LDX   0  GEN5 
 5LRY ...      SMO      GEN6 
 5LS3 ...      STO   0  ACRIT       [BACK TO NORMAL  
 5LS6 ...M2FPUTX 
 5LSD ...#NOR