{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: LFCHAIN)}}
====== LFCHAIN ======
(GIN Macro)

**Defined in:** [[george:source:MACROS_LEF|MACROS LEF]]

**Used in:** [[george:source:LISTEND867|LISTEND867]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LISTPARS867|LISTPARS867]], [[george:source:LISTPROC867|LISTPROC867]], [[george:source:WLC867|WLC867]], [[george:source:WLE862|WLE862]]

<code - LFCHAIN.mac.txt>
 6?Y4 ...[??? LFCHAIN SECT DEVT FGN 12 DOC   
 6#7W    #MAC  LFCHAIN   
 6#MG    [THIS MACRO CHAINS THE NEXT BLOCK OF TYPE %A,SUBTYPE %B 
 6*76    [IN THE CORRECT POSITION IN THE LFCHAIN 
 6*8T ...#UNS HWLSLCH
 6*=J ...(   
 6*#? ...      MHUNT    1,%A,%B  
 6*B2 ...      CHAIN    1,BLF+1  
 6*CP ...)   
 6*FD ...#UNS HWLSLCH
 6*H7 ...#SKI
 6*JW ...(   
 6*LQ    [X3 IS USED AS A CALLING ACCUMULATOR X7 DESTROYED   
 6B6B    [   
 6BL2    #OPT  M1LFCHAIN=1   
 6C5L    #STR  %B
 6CK=          MHUNT    1,%A,%B  
 6D4W    #STR  %B
 6DJG    #SKI
 6F46          MHUNT    1,%A 
 6FHQ          CALL  3  M2LFCHAIN
 6G3B    #SKI  M1LFCHAIN 
 6GH2    (   
 6H2L          BRN      M3LFCHAIN
 6HG=    M4LFCHAIN      #54000000
 6H^W    M5LFCHAIN      +GOUT+COMP   
 6JFG    M6LFCHAIN      +GOUT+INFO   
 6J^6    M16LFCHAIN     +GOUT+GKEY   
 6KDQ                   +GOUT+GUPDATE
 6KYB                   +GOUT+GABSNB 
 6LD2                   +FILE+FABSNB 
 6LXL    M7LFCHAIN      +M7LFCHAIN-M5LFCHAIN 
 6MC=    M8LFCHAIN      +M7LFCHAIN-M6LFCHAIN 
 6MWW    M17LFCHAIN     +M7LFCHAIN-M16LFCHAIN
 6NBG    M9LFCHAIN                          [S/R TO COMPARE BLOCK TYPE   
 6NW6          LDX   1  FX1                 [WITH TABLE.RELATIVE POINTER 
 6P*Q          LDX   2  M7LFCHAIN(1)        [IN X2   
 6PTB    M10LFCHAIN  
 6Q*2          LDX   0  ATYPE(3) 
 6QSL          SRL   0  12   
 6R#=          TXU   0  M5LFCHAIN(1) 
 6RRW          BCC      M11LFCHAIN   
 6S?G          ADN   1  1
 6SR6          BCT   2  M10LFCHAIN   
 6T=Q          GEOERR   1,NOWHERE
 6TQB    M11LFCHAIN  
 6W=2          EXIT  7  0
 6WPL    MLFCHAIN                           [ENTRY POINT 
 6X9=          LDX   2  FX2  
 6XNW          STO   3  ACOMMUNE1(2) 
 6Y8G          STO   1  ACOMMUNE3(2) 
 6YN6          LDX   3  1
 6^7Q          CALL  7  M9LFCHAIN
 6^MB          SMO      FX2  
 7272          STO   2  ACOMMUNE2           [TABLE POSITION OF BLOCK TYPE
 72LL          LDX   3  BLF                 [TO BE INSERTED  
 736=    M12LFCHAIN  
 73KW          LDN   0  BLF  
 745G          TXU   0  3
 74K6          BCC      M13LFCHAIN   
 754Q          CALL  7  M9LFCHAIN
 75JB          SMO      FX2  
 7642          TXL   2  ACOMMUNE2           [COMPARE BLOCK PRIORITIES
 76HL          BCS      M13LFCHAIN   
 773=          LDX   1  FX1  
 77GW          LDX   0  GMODE(3) 
 782G          LDX   3  FPTR(3)  
 78G6          TXU   2  M8LFCHAIN(1) 
 78^Q          BCC      M18LFCHAIN   
 79FB          TXU   2  M17LFCHAIN(1)
 79^2          BCS      M12LFCHAIN   
 7=DL    M18LFCHAIN  
 7=Y=          ANDX  0  M4LFCHAIN(1) 
 7?CW          ERX   0  GSIGN
 7?XG    M14LFCHAIN  
 7#C6          BPZ   0  M15LFCHAIN   
 7#WQ          LDX   3  FPTR(3)  
 7*BB    M15LFCHAIN  
 7*W2          SLL   0  1
 7B*L          BNZ   0  M14LFCHAIN   
 7BT=          BRN      M12LFCHAIN   
 7C#W    M13LFCHAIN  
 7CSG          LDX   3  BPTR(3)  
 7D#6          LDX   2  FX2  
 7DRQ          LDX   1  ACOMMUNE3(2) 
 7F?B          CHAIN    1,3  
 7FR2          LDX   3  ACOMMUNE1(2) 
 7G=L          EXIT  3  0
 7GQ=    M3LFCHAIN   
 7H9W    #FRE  M1LFCHAIN 
 7HPG    #DEF  M2LFCHAIN=MLFCHAIN
 7J96    #DEF  M1LFCHAIN=0   
 7JNQ    )   
 7JYJ ...)   
 7K8B    #NOR
</code>