COMPMACMOON

(George Source)

COMPMACMOON.txt
229S ...[??? FIELDDEF SECT FILE FGN 9 DOC   
22FL    [     G MOON
22^=    #DEF BITMULT=32 
23DW
23YG    #MAC FIELDDEF   
24D6    #DEF %A=(%B-1)@L19+%D+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%-
24XQ    C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C[ 
25CB    #NOR
25M8 ...[??? BITDEFS SECT FILE FGN 9 DOC
25X2    #MAC  BITDEFS   
26BL    #STR  %C
26W=    #DEF        %C=%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A-
27*W    +%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%B[ 
27TG    #STR  %D%E%F%G%H%I%J%K%L%M%N%O%P%Q%R%S%T%U%V%W%X%Y%Z
28*6          BITDEFS  %A,%B+1,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,-
28SQ    %T,%U,%V,%W,%X,%Y,%Z           [
29#B    #NOR
29#W ...[??? FIELDALT SECT FILE FGN 11 DOC  
29*B ...#MAC FIELDALT   
29*W ...#ALT %A=(%B-1)@L19+%D+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%-
29BB ...C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C[ 
29BW ...#NOR
29CB ...[??? BITALTS SECT FILE FGN 11 DOC   
29CW ...#MAC  BITALTS   
29DB ...#STR  %C
29DW ...#ALT        %C=%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A-
29FB ...+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%B[ 
29FW ...#STR  %D%E%F%G%H%I%J%K%L%M%N%O%P%Q%R%S%T%U%V%W%X%Y%Z
29GB ...      BITALTS  %A,%B+1,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,-
29GW ...%T,%U,%V,%W,%X,%Y,%Z           [
29HB ...#NOR
29J8 ...[??? XYZ SECT FILE FGN 9 DOC
29S2    #MAC  XYZ   [DEFINES BITS IN NAME RECORD AND ENT BLOCK  
2=?L    #STR  %C
2=R=    (   
2?=W          BITDEFS  %A,%B,BE%C   
2?QG          BITDEFS  %A-A1,%B,BN%C
2#=6    )   
2#PQ    #STR  %D%E%F%G%H
2*9B          XYZ   %A,%B+1,%D,%E,%F,%G,%H  
2*P2    #NOR
2*YS ...[??? XY SECT FILE FGN 9 DOC 
2B8L    #MAC           XY   
2BN=    #DEF           %AN=%A-A1
2C7W    #STR           %B   
2CMG          XY       %B,%C,%D,%E,%F   
2D76    #NOR
2DBY ...[??? STRINGS SECT FILE FGN 9 DOC
2DLQ
2F6B    #              STRINGS  
2FL2    # GENERATES DEFINES FOR ITS LIST OF PARAMETERS SUCH THAT
2G5L    [ %B=%A, %C=%B+1, ETC   
2GK=    #MAC           STRINGS  
2H4W    #STR           %B   
2HJG    (   
2J46    #DEF           %B=%A
2JHQ          STRINGS  %B+1,%C,%D,%E,%F,%G,%H,%I,                              -
2K3B                   %J,%K,%L,%M,%N,%O,%P,%Q,%R,                             -
2KH2                   %S,%T,%U,%V,%W,%X,%Y,%Z [
2L2L    )   
2LG=    #NOR
2LQ4 ...[??? SEMAPHOR SECT FILE FGN 9 DOC   
2L^W
2MFG    #MAC           SEMAPHORE           [S,I1,I2,A CHAR  
2M^6    #DEF           %A=%B
2NDQ    #DEF           %A1=%C   
2NYB    #STR           %E   
2PD2    (   
2PXL    #DEF            %A2=#400:0+%D      [LONGSET B0 %A2 SET  
2QC=    #EXI
2QWW    )   
2RBG    #DEF           %A2=%D   
2RW6    #NOR
2S*Q
2STB
2T*2 ...[??? DEFPRIV SECT FILE FGN 9 DOC
2TSL ...#MAC  DEFPRIV   
2W#= ...#DEF  G%B=%A&GPAND^GPOR 
2WRW ...#SKI  G%B&GPAND>23-23   
2X?G ...!ILLEGAL PRIVILEGE  
2XR6 ...#SKI  G%B&GPAND<4-4 
2Y=Q ...!ILLEGAL PRIVILEGE  
2YQB ...#NOR
2^=2 ...[??? DEFSTABL SECT FILE FGN 9 DOC   
2^PL ...#   
329= ...#MAC  DEFSTABLE 
32NW ...#DEF  G%B=%A&GSAND^GSOR 
338G ...#NOR
33N6 ...[??? DEFTRANS SECT FILE FGN 9 DOC   
347Q ...#   
34MB ...#MAC  DEFTRANS  
3572 ...#DEF  G%B=%A&GTAND^GTOR 
35LL ...#NOR
^^^^ ...47757621001100000000