MESCHAPS [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

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

**Defined in:** [[george:source:CHCHCOORMAC2|CHCHCOORMAC2]]

**Used in:** [[george:source:CHTAB|CHTAB]]

<code - MESCHAPS.mac.txt>
 2BDD ...[??? MESCHAPS SECT CENT FGN 32 DOC  
 2BN=    #   
 2C7W    #MAC  MESCHAPS  
 2CMG    #SKI  %A
 2D76    (   
 2DLQ    #OPT  KMESSX=0? 
 2F6B    #SKI  KMESSX-0? 
 2FL2    ! KMESSX IS WRONG   
 2G5L                   +0   
 2GK=    #DEF  20?=%A
 2H4W          MESCHAPS 0,A,B,C,D,E,F,G,H,I,J,A,B,C,D,E,F,G,H,I  
 2HJG    #EXI
 2J46    )   
 2JHQ          CHAPENT  MESS%B   
 2K3B    #DEF  20?=20?-1 
 2KH2    #EXI  20?   
 2L2L    #STR  %C,J  
 2LG=          MESCHAPS 0,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T  
 2L^W    #STR  %C,J  
 2MFG    #SKI
 2M^6          MESCHAPS 0,%DJ,%DA,%DB,%DC,%DD,%DE,%DF,%DG,%DH,%DI,J,%E,%F,%G,%H,-
 2NDQ    %I,%J,%K,%L 
 2NYB    #NOR
</code>