HUNT2OPT [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: HUNT2OPT)}}
====== HUNT2OPT ======
(GIN Macro)

**Defined in:** [[george:source:MACS_JIB|MACS JIB]]

**Used in:** [[george:source:ATTJOUNL861|ATTJOUNL861]], [[george:source:CONIPB8|CONIPB8]], [[george:source:COPYB867|COPYB867]], [[george:source:DETACH867|DETACH867]], [[george:source:GOTO867|GOTO867]], [[george:source:HARDIDF867|HARDIDF867]], [[george:source:IDFCLEAN867|IDFCLEAN867]], [[george:source:IDFPER867|IDFPER867]], [[george:source:INCMON865|INCMON865]], [[george:source:IPCONA864|IPCONA864]], [[george:source:IPCONB8|IPCONB8]], [[george:source:IPCONC8|IPCONC8]], [[george:source:IPCOND864|IPCOND864]], [[george:source:IPDBATCH867|IPDBATCH867]], [[george:source:IPQUAKE83|IPQUAKE83]], [[george:source:IPQUAKER865|IPQUAKER865]], [[george:source:LISTAST867|LISTAST867]], [[george:source:LOADERR70|LOADERR70]], [[george:source:LOADPROG865|LOADPROG865]], [[george:source:MTDUMP860|MTDUMP860]], [[george:source:NEWOWN865|NEWOWN865]], [[george:source:OPILLS70|OPILLS70]], [[george:source:PROSTART867|PROSTART867]], [[george:source:SETIDF867|SETIDF867]], [[george:source:SETPB867|SETPB867]], [[george:source:UNLOAD7|UNLOAD7]]

<code - HUNT2OPT.mac.txt>
 4BC# ...[??? HUNT2OPT SECT COMM FGN 25 DOC  
 4BM6    #MAC  HUNT2OPT  
 4C6Q    #STR  %D
 4CLB          LDX   %A %D   
 4D62    MHUNT2OP
 4DKL          LDX   %A FPTR(%A) 
 4F5=          LDX   0  ATYPE(%A)
 4FJW          TXL   0  CACT 
 4G4G          BCC      MHUNT2O  
 4GJ6          SRL   0  12   
 4H3Q          SBN   0  %B+%C
 4HHB          BNZ   0  MHUNT2OP 
 4J32          BRN      MHUNT2O1 
 4JGL    MHUNT2O 
 4K2=          LDX   %A GSIGN
 4KFW    MHUNT2O1
 4K^G    #NOR
</code>