{{htmlmetatags>metatag-description:(ICL George 3 and George 4 source: MACROS CAFS)}} ====== MACROS CAFS ====== (George Source) 22FL ...# 22^= ...# 23DW ...# THIS FILE CONTAINS MACROS USED BY THE CAFS INTERFACE IN GEORGE 3 23YG ...# 24D6 ...# 24XQ ...[??? JCAFSBSY SECT BACK FGN 1 DOC 25CB ...#MAC JCAFSBSY 25X2 ... JFNZ %B,%A,BBFCAFSCT 26BL ...#NOR 26W= ...[??? JCAFSNBS SECT BACK FGN 1 DOC 27*W ...#MAC JCAFSNBS 27TG ... JFZ %B,%A,BBFCAFSCT 28*6 ...#NOR 28SQ ...[??? JCAFSDV SECT BACK FGN 1 DOC 29#B ...#MAC JCAFSDV 29S2 ...#STR %C 2=?L ...#STR 2=R= ...( 2?=W ... LDX 0 JPTI+CAFSTYPE 2?QG ... TXU 0 JPTI+CAFSTYPE+1 2#=6 ... BCC M1CAFSDV 2#PQ ...) 2*9B ... MODD LDX 0 JK52F+1,%A,CPPTR(2) 2*P2 ... ANDN 0 1 2B8L ... BNZ 0 %B 2BN= ...M1CAFSDV 2C7W ...#NOR 2CMG ...[??? JNCAFSDV SECT BACK FGN 1 DOC 2D76 ...#MAC JNCAFSDV 2DLQ ...#STR %C 2F6B ...#STR 2FL2 ...( 2G5L ... LDX 0 JPTI+CAFSTYPE 2GK= ... TXU 0 JPTI+CAFSTYPE+1 2H4W ... BCC %B 2HJG ...) 2J46 ... MODD LDX 0 JK52F+1,%A,CPPTR(2) 2JHQ ... ANDN 0 1 2K3B ... BZE 0 %B 2KH2 ...#NOR 2L2L ...[??? CAFSINFO SECT BACK FGN 1 DOC 2LG= ...#MAC CAFSINFO 2L^W ...#UNS CF%A 2MFG ...( 2M^6 ...#ACC %B 2NDQ ...( 2NYB ... LDX 0 %B 2PD2 ... SMO FX2 2PXL ... STO 0 ACOMMUNE2 2QC= ...) 2QWW ...#ACC %B 2RBG ...#SKI 2RW6 ...( 2S*Q ... SMO FX2 2STB ... STO %B ACOMMUNE2 2T*2 ...) 2TSL ... LDN 0 CF%A 2W#= ... SMO FX2 2WRW ... STO 0 ACOMMUNE1 2X?G ... DOWN CAFSINFO,1 2XR6 ...) 2Y=Q ...#UNS CF%A 2YQB ...#SKI 2^=2 ...! UNKNOWN EVENT TYPE - %A 2^PL ...#NOR 329= ...[??? JNCFENBU SECT BACK FGN 1 DOC 32NW ...#MAC JNCFENBU 338G ... LDCT 0 #300 33N6 ... MODD ANDX 0 CFRDBITMASK,%A,CPPTR(2) 347Q ... BZE 0 %B 34MB ...#NOR 3572 ...[??? CAFSPRIV SECT BACK FGN 1 DOC 35LL ...#MAC CAFSPRIV 366= ...#MEN CAFSPERI 36KW ...#TRA K50CAFSPERI 375G ... 8H%A 37K6 ...#END 384Q ...#NOR ^^^^ ...57706747000100000000