(GIN Macro)
Defined in: MACS PW
Used in: ASSOC867, ATTRIBUT867
6C79 # CREATES AN APERI,ASSOCS0 BLOCK IF ONE NOT THERE 6C7Q # 6C8? #MAC MOPASAT 6C8S HUNTW 1,APERI,ASSOCS0 6C9* BPZ 1 MCN10 6C9W LDN %A 1 6C=C HUNTW 1,APERI,ASSOCS 6C=Y BNG 1 MCN11 6C?F ADX %A ALOGLEN(1) 6C#2 MCN11 SETUPCORE %A,1,APERI,ASSOCS0 6C#H SBN %A 1 6C*4 LDX 0 JSOURCE3(2) 6C*K SMO %A 6CB6 STO 0 A1(1) 6CBM BZE %A MCN10 6CC8 MHUNTW 2,APERI,ASSOCS 6CCP LDN 0 A1(2) 6CD= LDN 1 A1(1) 6CDR SMO %A 6CF# MOVE 0 0 6CFT MCN10 6CGB #NOR