INSTPARA

(GIN Macro)

Used in: BSUNJAM867, CHTAB, INCEND865, INKS, PERFPASS864

INSTPARA.mac.txt

 8548 ...[??? INSTPARA SECT CENT FGN 2 DOC   
 85#2    #   
 85RL    #     MACRO TO DO THE SAME AS THE INSTPARA COMMAND  
 86?=    #     %A IS A BREAKIN LABEL 
 86QW    #     %B (NOT X0) IS A PTR TO A 3 WORD AREA CONTAINING THE NAME OF THE  
 87=G    #     IP SPACEFILLED
 87Q6    #     %C IS A WORD CONTAINING THE NEW VALUE OF THE IP   
 889Q    #     %D IS A LABEL TO BRANCH TO IF THE VALUE IS ILLEGAL
 88PB    #   
 8992    #MAC  INSTPARA  
 89NL    #STR  0,%C  
 8=8=          LDX   0  %C   
 8=MW          SMO   FX2 
 8?7G          STO   0  ACOMMUNE1
 8?M6          LDX   0  %B   
 8#6Q          SMO   FX2 
 8#LB          LDN   1  ACOMMUNE2
 8*62          MOVE  0  3
 8*KL          DOWN  INSTPARA,2  
 8B5=          BRN   %A  
 8BJW          BRN   %D  
 8C4G    #NOR