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

**Defined in:** [[george:source:DUMP-MACROS|DUMP-MACROS]]

**Used in:** [[george:source:DEAD867|DEAD867]], [[george:source:RENAMAG864|RENAMAG864]], [[george:source:RETURN867|RETURN867]]

<code - TSININC.mac.txt>
 D^Y9 ...[??? TSININC SECT FILE FGN 73 DOC   
 D^Y= ...[   
 D^^2 ...[   
 D^^R ...[      THIS MACRO CHECKS TO SEE IF A SPECIFIED  
 F22J ...[      TSN IS IN INCINDEX   
 F23* ...#MAC  TSININC   
 F246 ...      LDX   2  FX2  
 F24X ...#STR  %C
 F25N ...(   
 F26F ...      LDN   0  %C   
 F27= ...      STO   0  ACOMMUNE1(2) 
 F283 ...)   
 F28S ...#STR  %C
 F29K ...#SKI
 F2=B ...      STOZ     ACOMMUNE1(2) 
 F2?7 ...      STO   %B ACOMMUNE2(2) 
 F2?Y ...      DOWN     DTSUBSA,3
 F2#P ...      BRN      %A   
 F2*G ...#NOR
</code>