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

**Defined in:** [[george:source:MACROS_MSYS|MACROS MSYS]]

**Used in:** 

<code - ADDMESS.mac.txt>
 8S^S ...[??? ADDMESS SECT CENT FGN 56 DOC   
 8T9L    #   
 8TP=    #     HERE FOLLOWS ADDMESS                                 **** ADDMESS 
 8W8W    #     IT IS USED TO INTRODUCE (BY MEND) A SERIES OF 
 8WNG    #     MESSMON(A)'S FOR ADDITIONAL MESSAGES. 
 8X86    #     IT HAS NO PARAMETERS  
 8XMQ    #   
 8Y7B    #MAC  ADDMESS   
 8YM2    #OPT  ADDMESS=0 
 8^6L ...#SKI  ADDMESS&#37777777<1$1 
 8^L=    (   
 925W          MESSAGES 0
 92KG    #EXI
 9356    )   
 939X ...#STR  %A
 93BN ...#SKI
 93HF ...(   
 93N= ...#SKI  ADDMESS&#40000000 
 93T3 ...(   
 93^S ...      ADDMESS  X
 946K ...#EXI
 94?B ...)   
 94D7 ...)   
 94JY ...#ALT LMESSX%A=ADDMESS&#37777777 
 94PP ...#MEN  MESSX%A   
 94WG ...#DEF  23?=34?+K90MESSX%A]   
 953L    #TRA  2 
 95H= ...      SEGENTRY K1MESSX%A,XK1
 962W ...      SEGENTRY K2MESSX%A,XK2
 96GG ...      SEGENTRY K3MESSX%A,XK3
 9726 ...      SEGENTRY K4MESSX%A,XK4
 97FQ ...      SEGENTRY K5MESSX%A,XK5
 97^B ...      SEGENTRY K11MESSX%A,XK11  
 98F2 ...      SEGENTRY K12MESSX%A,XK12  
 98YL ...      SEGENTRY K90MESSX%A   
 99XW                   +TAB 
 9==? ...#DEF  MESSSTART=0?  
 9=JN ...#DEF  SEGNO=ADDMESS&#40000000<1*128 
 9=X6    #DEF  22?=1 
 9?BQ    #TRA 23?-1  
 9?WB    #DEF  20?=34?+0?]   
 9?XF ...#DEF  21?=0?
 9?^6 ...#SKI  (0?<900-0?)^(20?<65-20?)  
 9#2S ...(   
 9#3X ...#ALT  AKMESSXX=1
 9#53 ...      ADDEND
 9#7= ...#ALT  ADDMESS=#40000000 
 9#9F ...      ADDMESS  X
 9#?N ...)   
 9#B2    #NOR
</code>