FPUTCHA

(GIN Macro)

Defined in: MACS SPC

Used in: ENGAGE867, IPCOND864, IPQUAKER865

FPUTCHA.mac.txt

 ?*RQ    #MAC  FPUTCHA   
 ?B?B          DSCA     %A,LDXC,2,CHADD  
 ?BR2          NGNC  0  0
 ?C=L          ANDS  0  0(2) 
 ?CQ=          LDX   0  0(2) 
 ?D9W          SBN   0  1
 ?DPG          BNZ   0  MCEND
 ?F96           SBN   2  CHAINADD
 ?FNQ          FPUT  
 ?G8B    MCEND   
 ?GN2          LDX   2  FX2  
 ?H7L          LDX   1  FX1  
 ?HM=    #NOR