P2sample.lis

.  SOURCE CODE FOR THE XE VERSION OF THE SIC FAMILY OF COMPUTER
0    SUM       START   0                   
0    FIRST     LDX     #0                  52ffd
4              LDA     #0                  12ff6
4              +LDB    #TABLE2             693fee
4              BASE    TABLE2              
8    LOOP      ADD     TABLE,X             202780
c              ADD     TABLE2,X            202eec
10             TIX     COUNT               2f2008
14             JLT     LOOP                3b2ff1
14             +STA    TOTAL               f3ee6
18             RSUB                 
      4f2ecb
18   MYLIT     +LDA    =C'EOF'             33eaf
1b   COUNT     RESW    1                   
178b TABLE     RESW    2000                
2efb TABLE2    RESW    2000                
2efe TOTAL     RESW    1                   
2efe           END     FIRST