Trailing-Edge
-
PDP-10 Archives
-
decuslib20-02
-
decus/20-0050/test5.dat
There are 2 other files named test5.dat in the archive. Click here to see a list.
TTL'/101/50TST
...TABLE TO TEST BUG FIX DEC 8, 1972
...DEF, STK AND PSH PREVIOUSLY REPORTED ERROR IF THE ITEM
...BEING DEFINED WAS PREVIOUSLY ONLY AN ADDRESS LABEL, BUT
...CORRECTLY DEFINED IT IF IT WAS INSTEAD PREVIOUSLY UNDEFINED.
...THIS TABLE TESTS THAT THE ADDITIONAL DEFINITION OF AN
...ADDRESS LABEL AS A CONSTANT IS MADE.
...
ADR1 LOC UADR1
ADR2 LOC UADR2
ADR3 LOC UADR3
ADR4 LOC UADR4
ADR5 LOC UADR5
...
ADR1=ADR1+111,UADR1=UADR1+222
DEF 33 ADR2,DEF 44 UADR2
STK 55 ADR3,STK 66 UADR3
PSH 777 ADR4,PSH 888 UADR4
ADR5=999 2WRD ADR5,UADR5=1000 2WRD UADR5
...
ADR1=11+2WRD ADR1,UADR1=22+2WRD UADR1
ADR2=ADR2 PFX-1 WRD(ADR2+1)333,UADR2=UADR2 PFX-1 WRD(UADR2+1)444
STK 555 ADR3,STK 666 UADR3
PSH 77 ADR4,PSH 88 UADR4
ADR5=99 2WRD ADR5,UADR5=100 2WRD UADR5
...
ADR1,UADR1,ADR2,UADR2,ADR3,UADR3,ADR4,UADR4,ADR5,UADR5
...
ADR UADR1 LOC ADR1
ADR UADR2 LOC ADR2
ADR UADR3 LOC ADR3
ADR UADR4 LOC ADR4
ADR UADR5 LOC ADR5
...
ADR1,UADR1,ADR2,UADR2,ADR3,UADR3,ADR4,UADR4,ADR5,UADR5
...
26,27,28,29,30
11,111,22,222,33,333,44,444,55,555,66,666,77,777,88,888,99,999
100,1000
1,2,3,4,5
11,111,22,222,33,333,44,444,55,555,66,666,77,777,88,888,99,999
100,1000
BLK
...TABLE TO TEST EXPANSION AND CONTRACTION
...OF SYMBOL DICTIONARY AFTER A RENAME
...DEC 12, 1972
EOD 201TST TTL'/102/
MASK=MSK ARG.ARG.ARG
1+LOC A*
B*=1
2+LOC C*
P*=MASK 13 14 15...RENAME TO M
3+LOC D*
E*=4
4+LOC F*
G*=MASK 7 8 9
5+LOC H*
5STK E* 6STK E*
6+LOC I*
R*=MASK 10 11 12...RENAME TO J
J*=.'/R*/
7+LOC K*
T*=MASK 19 20 21...RENAME TO R
8+LOC L*
M*=.'/P*/
9+LOC N*
2STK B* 3STK B*
10+LOC O*
P*=16
11+LOC Q*
R*=.'/T*/
12+LOC S*
V*=MASK 22 23 24
T*=.'/V*/
Z*=MASK 28 29 30...RENAME TO X
13+LOC U*
V*=MASK 25 26 27
14+LOC W*
X*=.'/Z*/
15+LOC Y*
17STK P* 18STK P*
Z*=MASK 31 32 33
...
16+LOC A*
17+LOC C* 2DUP
18+LOC D* 3DUP
19+LOC F* 4DUP
20+LOC H* 5DUP
21+LOC I* 6DUP
22+LOC K* 7DUP
23+LOC L* 8DUP
24+LOC N* 9DUP
25+LOC O* 10DUP
26+LOC Q* 11DUP
27+LOC S* 12DUP
28+LOC U* 13DUP
29+LOC W* 14DUP
30+LOC Y* 15DUP
A* B*
C* E*
D* G*
F* J*
H* M*
I* P*
K* R*
L* T*
N* V*
O* X*
Q* Z*
XAD A* H*,,,
N*
S* B*
XAD C* I*,,,
O*
U* E*
XAD D* K*,,,
Q*
W* G*
XAD F* L*,,,
S*
Y* J*
XAD U* W*,,,
Y*
M*
XSY G* J*
P*
XSY E* P*
R*
XSY B* M*
T*
XSY R* T*
V*
X*
XSY X* V*
Z*
137,141,145,149,153,157,161,165,169,173,177,181,185,189,193
152
156,156
160,160,160
164,164,164,164
168,168,168,168,168
172,172,172,172,172,172
176,176,176,176,176,176,176
180,180,180,180,180,180,180,180
184,184,184,184,184,184,184,184,184
188,188,188,188,188,188,188,188,188,188
192,192,192,192,192,192,192,192,192,192,192
196,196,196,196,196,196,196,196,196,196,196,196
200,200,200,200,200,200,200,200,200,200,200,200,200
204,204,204,204,204,204,204,204,204,204,204,204,204,204
208,208,208,208,208,208,208,208,208,208,208,208,208,208,208
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
BLK
...TABLE TO TEST EXPANSION AND CONTRACTION
...OF SYMBOL DICTIONARY AFTER A RENAME
...DEC 12, 1972
EOD 201TST TTL'/103/
MASK=MSK ARG.ARG.ARG
1+LOC A
BB=1
2+LOC CCC
PPPPPPPPPPPPPPPP=MASK 13 14 15...RENAME TO M
3+LOC DDDD
EEEEE=4
4+LOC FFFFFF
GGGGGGG=MASK 7 8 9
5+LOC HHHHHHHH
5STK EEEEE 6STK EEEEE
6+LOC IIIIIIIII
RRRRRRRRRRRRRRRRRR=MASK 10 11 12...RENAME TO J
JJJJJJJJJJ=.'/RRRRRRRRRRRRRRRRRR/
7+LOC KKKKKKKKKKK
TTTTTTTTTTTTTTTTTTTT=MASK 19 20 21...RENAME TO R
8+LOC LLLLLLLLLLLL
MMMMMMMMMMMMM=.'/PPPPPPPPPPPPPPPP/
9+LOC NNNNNNNNNNNNNN
2STK BB 3STK BB
10+LOC OOOOOOOOOOOOOOO
PPPPPPPPPPPPPPPP=16
11+LOC QQQQQQQQQQQQQQQQQ
RRRRRRRRRRRRRRRRRR=.'/TTTTTTTTTTTTTTTTTTTT/
12+LOC SSSSSSSSSSSSSSSSSSS
VVVVVVVVVVVVVVVVVVVVVV=MASK 22 23 24
TTTTTTTTTTTTTTTTTTTT=.'/VVVVVVVVVVVVVVVVVVVVVV/
ZZZZZZZZZZZZZZZZZZZZZZZZZZ=MASK 28 29 30...RENAME TO X
13+LOC UUUUUUUUUUUUUUUUUUUUU
VVVVVVVVVVVVVVVVVVVVVV=MASK 25 26 27
14+LOC WWWWWWWWWWWWWWWWWWWWWWW
XXXXXXXXXXXXXXXXXXXXXXXX=.'/ZZZZZZZZZZZZZZZZZZZZZZZZZZ/
15+LOC YYYYYYYYYYYYYYYYYYYYYYYYY
17STK PPPPPPPPPPPPPPPP 18STK PPPPPPPPPPPPPPPP
ZZZZZZZZZZZZZZZZZZZZZZZZZZ=MASK 31 32 33
...
16+LOC A
17+LOC CCC 2DUP
18+LOC DDDD 3DUP
19+LOC FFFFFF 4DUP
20+LOC HHHHHHHH 5DUP
21+LOC IIIIIIIII 6DUP
22+LOC KKKKKKKKKKK 7DUP
23+LOC LLLLLLLLLLLL 8DUP
24+LOC NNNNNNNNNNNNNN 9DUP
25+LOC OOOOOOOOOOOOOOO 10DUP
26+LOC QQQQQQQQQQQQQQQQQ 11DUP
27+LOC SSSSSSSSSSSSSSSSSSS 12DUP
28+LOC UUUUUUUUUUUUUUUUUUUUU 13DUP
29+LOC WWWWWWWWWWWWWWWWWWWWWWW 14DUP
30+LOC YYYYYYYYYYYYYYYYYYYYYYYYY 15DUP
A BB
CCC EEEEE
DDDD GGGGGGG
FFFFFF JJJJJJJJJJ
HHHHHHHH MMMMMMMMMMMMM
IIIIIIIII PPPPPPPPPPPPPPPP
KKKKKKKKKKK RRRRRRRRRRRRRRRRRR
LLLLLLLLLLLL TTTTTTTTTTTTTTTTTTTT
NNNNNNNNNNNNNN VVVVVVVVVVVVVVVVVVVVVV
OOOOOOOOOOOOOOO XXXXXXXXXXXXXXXXXXXXXXXX
QQQQQQQQQQQQQQQQQ ZZZZZZZZZZZZZZZZZZZZZZZZZZ
XAD A HHHHHHHH,,,
NNNNNNNNNNNNNN
SSSSSSSSSSSSSSSSSSS BB
XAD CCC IIIIIIIII,,,
OOOOOOOOOOOOOOO
UUUUUUUUUUUUUUUUUUUUU EEEEE
XAD DDDD KKKKKKKKKKK,,,
QQQQQQQQQQQQQQQQQ
WWWWWWWWWWWWWWWWWWWWWWW GGGGGGG
XAD FFFFFF LLLLLLLLLLLL,,,
SSSSSSSSSSSSSSSSSSS
YYYYYYYYYYYYYYYYYYYYYYYYY JJJJJJJJJJ
XAD UUUUUUUUUUUUUUUUUUUUU WWWWWWWWWWWWWWWWWWWWWWW,,,
YYYYYYYYYYYYYYYYYYYYYYYYY
MMMMMMMMMMMMM
XSY GGGGGGG JJJJJJJJJJ
PPPPPPPPPPPPPPPP
XSY EEEEE PPPPPPPPPPPPPPPP
RRRRRRRRRRRRRRRRRR
XSY BB MMMMMMMMMMMMM
TTTTTTTTTTTTTTTTTTTT
XSY RRRRRRRRRRRRRRRRRR TTTTTTTTTTTTTTTTTTTT
VVVVVVVVVVVVVVVVVVVVVV
XXXXXXXXXXXXXXXXXXXXXXXX
XSY XXXXXXXXXXXXXXXXXXXXXXXX VVVVVVVVVVVVVVVVVVVVVV
ZZZZZZZZZZZZZZZZZZZZZZZZZZ
137,141,145,149,153,157,161,165,169,173,177,181,185,189,193
152
156,156
160,160,160
164,164,164,164
168,168,168,168,168
172,172,172,172,172,172
176,176,176,176,176,176,176
180,180,180,180,180,180,180,180
184,184,184,184,184,184,184,184,184
188,188,188,188,188,188,188,188,188,188
192,192,192,192,192,192,192,192,192,192,192
196,196,196,196,196,196,196,196,196,196,196,196
200,200,200,200,200,200,200,200,200,200,200,200,200
204,204,204,204,204,204,204,204,204,204,204,204,204,204
208,208,208,208,208,208,208,208,208,208,208,208,208,208,208
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
BLK
...TABLE TO TEST EXPANSION AND CONTRACTION
...OF SYMBOL DICTIONARY AFTER A RENAME
...DEC 12, 1972
EOD 201TST TTL'/104/
MASK=MSK ARG.ARG.ARG
1+LOC AAAAAAAAAAAAAAAAAAAAAAAAAA
BBBBBBBBBBBBBBBBBBBBBBBBB=1
2+LOC CCCCCCCCCCCCCCCCCCCCCCCC
PPPPPPPPPPP=MASK 13 14 15...RENAME TO M
3+LOC DDDDDDDDDDDDDDDDDDDDDDD
EEEEEEEEEEEEEEEEEEEEEE=4
4+LOC FFFFFFFFFFFFFFFFFFFFF
GGGGGGGGGGGGGGGGGGGG=MASK 7 8 9
5+LOC HHHHHHHHHHHHHHHHHHH
5STK EEEEEEEEEEEEEEEEEEEEEE 6STK EEEEEEEEEEEEEEEEEEEEEE
6+LOC IIIIIIIIIIIIIIIIII
RRRRRRRRR=MASK 10 11 12...RENAME TO J
JJJJJJJJJJJJJJJJJ=.'/RRRRRRRRR/
7+LOC KKKKKKKKKKKKKKKK
TTTTTTT=MASK 19 20 21...RENAME TO R
8+LOC LLLLLLLLLLLLLLL
MMMMMMMMMMMMMM=.'/PPPPPPPPPPP/
9+LOC NNNNNNNNNNNNN
2STK BBBBBBBBBBBBBBBBBBBBBBBBB 3STK BBBBBBBBBBBBBBBBBBBBBBBBB
10+LOC OOOOOOOOOOOO
PPPPPPPPPPP=16
11+LOC QQQQQQQQQQ
RRRRRRRRR=.'/TTTTTTT/
12+LOC SSSSSSSS
VVVVV=MASK 22 23 24
TTTTTTT=.'/VVVVV/
Z=MASK 28 29 30...RENAME TO X
13+LOC UUUUUU
VVVVV=MASK 25 26 27
14+LOC WWWW
XXX=.'/Z/
15+LOC YY
17STK PPPPPPPPPPP 18STK PPPPPPPPPPP
Z=MASK 31 32 33
...
16+LOC AAAAAAAAAAAAAAAAAAAAAAAAAA
17+LOC CCCCCCCCCCCCCCCCCCCCCCCC 2DUP
18+LOC DDDDDDDDDDDDDDDDDDDDDDD 3DUP
19+LOC FFFFFFFFFFFFFFFFFFFFF 4DUP
20+LOC HHHHHHHHHHHHHHHHHHH 5DUP
21+LOC IIIIIIIIIIIIIIIIII 6DUP
22+LOC KKKKKKKKKKKKKKKK 7DUP
23+LOC LLLLLLLLLLLLLLL 8DUP
24+LOC NNNNNNNNNNNNN 9DUP
25+LOC OOOOOOOOOOOO 10DUP
26+LOC QQQQQQQQQQ 11DUP
27+LOC SSSSSSSS 12DUP
28+LOC UUUUUU 13DUP
29+LOC WWWW 14DUP
30+LOC YY 15DUP
AAAAAAAAAAAAAAAAAAAAAAAAAA BBBBBBBBBBBBBBBBBBBBBBBBB
CCCCCCCCCCCCCCCCCCCCCCCC EEEEEEEEEEEEEEEEEEEEEE
DDDDDDDDDDDDDDDDDDDDDDD GGGGGGGGGGGGGGGGGGGG
FFFFFFFFFFFFFFFFFFFFF JJJJJJJJJJJJJJJJJ
HHHHHHHHHHHHHHHHHHH MMMMMMMMMMMMMM
IIIIIIIIIIIIIIIIII PPPPPPPPPPP
KKKKKKKKKKKKKKKK RRRRRRRRR
LLLLLLLLLLLLLLL TTTTTTT
NNNNNNNNNNNNN VVVVV
OOOOOOOOOOOO XXX
QQQQQQQQQQ Z
XAD AAAAAAAAAAAAAAAAAAAAAAAAAA HHHHHHHHHHHHHHHHHHH,,,
NNNNNNNNNNNNN
SSSSSSSS BBBBBBBBBBBBBBBBBBBBBBBBB
XAD CCCCCCCCCCCCCCCCCCCCCCCC IIIIIIIIIIIIIIIIII,,,
OOOOOOOOOOOO
UUUUUU EEEEEEEEEEEEEEEEEEEEEE
XAD DDDDDDDDDDDDDDDDDDDDDDD KKKKKKKKKKKKKKKK,,,
QQQQQQQQQQ
WWWW GGGGGGGGGGGGGGGGGGGG
XAD FFFFFFFFFFFFFFFFFFFFF LLLLLLLLLLLLLLL,,,
SSSSSSSS
YY JJJJJJJJJJJJJJJJJ
XAD UUUUUU WWWW,,,
YY
MMMMMMMMMMMMMM
XSY GGGGGGGGGGGGGGGGGGGG JJJJJJJJJJJJJJJJJ
PPPPPPPPPPP
XSY EEEEEEEEEEEEEEEEEEEEEE PPPPPPPPPPP
RRRRRRRRR
XSY BBBBBBBBBBBBBBBBBBBBBBBBB MMMMMMMMMMMMMM
TTTTTTT
XSY RRRRRRRRR TTTTTTT
VVVVV
XXX
XSY XXX VVVVV
Z
137,141,145,149,153,157,161,165,169,173,177,181,185,189,193
152
156,156
160,160,160
164,164,164,164
168,168,168,168,168
172,172,172,172,172,172
176,176,176,176,176,176,176
180,180,180,180,180,180,180,180
184,184,184,184,184,184,184,184,184
188,188,188,188,188,188,188,188,188,188
192,192,192,192,192,192,192,192,192,192,192
196,196,196,196,196,196,196,196,196,196,196,196
200,200,200,200,200,200,200,200,200,200,200,200,200
204,204,204,204,204,204,204,204,204,204,204,204,204,204
208,208,208,208,208,208,208,208,208,208,208,208,208,208,208
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
BLK
33TST TTL'/105/
...TABLE TO TEST BUG FIX. DEC 12, 1972
...STATEMENT OF FORM
...A=MASK 1 2,MASK 3 4
...ASSEMBLED EXTRA ZERO VALUE BEFORE 3
...DUE TO NOT RESETTING IMOST AFTER THE
...DEFINITION.
MASK=MSK 2LFT ARG.1LFT ARG.
A=MASK 1 2 3,MASK 4 5 6
MASK2=MSK 3LFT ARG.2LFT ARG.
B=MASK 7 8 9,MASK2 10 11 12
C=13 2WRD 14 3WRD 15,MASK 16 17 18
A,B,C
TON MASK
AAA=.'/A/
19 20 21
EOD
BBB=.'/B/
22 23 24
XSY C
25 26 27,MSK AAA,BBB
16,10,6
80,44,12
64,34,18
4, 4, 3
28,16, 9
13,14,15
76,40,21
88,46,24
100,52,27
4, 4, 3
28,16, 9
BLK
24TST TTL'/106/
A=333 2WRD 444,B=.'/A/
STOP=.'/,/
CONTINUE=.'/,,,/STOP FOO=.CONTINUE
'/END/STOP END=.'/BLK/STOP,=555 STOP,,,=777
111 STOP 220 CONTINUE
+2 STOP B STOP,STOP 666 STOP,,,STOP,=.''/,/
MASK=MSK ARG.ARG.,PATTERN=.'/MASK/STOP 888,VALUE=CONTINUE
PATTERN 55 66 77,PATTERN 11 22 33,THIS=.'/VALUE/
44 STOP THIS,88
STRING='/,ONE 50 TWO 60 THREE 70 FOUR 80
W=WRD,XSY WRD,4WRD=3W,3WRD=4W,WRD=5
ONE=.''/1WRD/,TWO=.''/2WRD/,THREE=.'/4WRD/
FOUR=.'/3WRD/,ONE 10,WORD=.'/STRING/,ONE 20 CONTINUE
TWO 30 THREE 40 WORD
111,222,333,444,555,666,777,888
11,22,33,44,55,66,77,88
10,20,30,40,50,60,70,80 END
...TABLE TO TEST EXPANSION AND CONTRACTION
...OF SYMBOL DICTIONARY AFTER A RENAME
...DEC 12, 1972
201TST TTL'/107/
MASK=MSK ARG.ARG.ARG
1+LOC A*
B*=1
2+LOC C*
P*=MASK 13 14 15...RENAME TO M
3+LOC D*
E*=4
4+LOC F*
G*=MASK 7 8 9
5+LOC H*
5STK E* 6STK E*
6+LOC I*
R*=MASK 10 11 12...RENAME TO J
J*=.'/R*/
7+LOC K*
T*=MASK 19 20 21...RENAME TO R
8+LOC L*
M*=.'/P*/
9+LOC N*
2STK B* 3STK B*
10+LOC O*
P*=16
11+LOC Q*
R*=.'/T*/
12+LOC S*
V*=MASK 22 23 24
T*=.'/V*/
Z*=MASK 28 29 30...RENAME TO X
13+LOC U*
V*=MASK 25 26 27
14+LOC W*
X*=.'/Z*/
15+LOC Y*
17STK P* 18STK P*
Z*=MASK 31 32 33
...
16+LOC A*
17+LOC C* 2DUP
18+LOC D* 3DUP
19+LOC F* 4DUP
20+LOC H* 5DUP
21+LOC I* 6DUP
22+LOC K* 7DUP
23+LOC L* 8DUP
24+LOC N* 9DUP
25+LOC O* 10DUP
26+LOC Q* 11DUP
27+LOC S* 12DUP
28+LOC U* 13DUP
29+LOC W* 14DUP
30+LOC Y* 15DUP
A* B*
C* E*
D* G*
F* J*
H* M*
I* P*
K* R*
L* T*
N* V*
O* X*
Q* Z*
XAD A* H*,,,
N*
S* B*
XAD C* I*,,,
O*
U* E*
XAD D* K*,,,
Q*
W* G*
XAD F* L*,,,
S*
Y* J*
XAD U* W*,,,
Y*
M*
XSY G* J*
P*
XSY E* P*
R*
XSY B* M*
T*
XSY R* T*
V*
X*
XSY X* V*
Z*
137,141,145,149,153,157,161,165,169,173,177,181,185,189,193
152
156,156
160,160,160
164,164,164,164
168,168,168,168,168
172,172,172,172,172,172
176,176,176,176,176,176,176
180,180,180,180,180,180,180,180
184,184,184,184,184,184,184,184,184
188,188,188,188,188,188,188,188,188,188
192,192,192,192,192,192,192,192,192,192,192
196,196,196,196,196,196,196,196,196,196,196,196
200,200,200,200,200,200,200,200,200,200,200,200,200
204,204,204,204,204,204,204,204,204,204,204,204,204,204
208,208,208,208,208,208,208,208,208,208,208,208,208,208,208
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
BLK
...TABLE TO TEST EXPANSION AND CONTRACTION
...OF SYMBOL DICTIONARY AFTER A RENAME
...DEC 12, 1972
201TST TTL'/108/
MASK=MSK ARG.ARG.ARG
1+LOC A
BB=1
2+LOC CCC
PPPPPPPPPPPPPPPP=MASK 13 14 15...RENAME TO M
3+LOC DDDD
EEEEE=4
4+LOC FFFFFF
GGGGGGG=MASK 7 8 9
5+LOC HHHHHHHH
5STK EEEEE 6STK EEEEE
6+LOC IIIIIIIII
RRRRRRRRRRRRRRRRRR=MASK 10 11 12...RENAME TO J
JJJJJJJJJJ=.'/RRRRRRRRRRRRRRRRRR/
7+LOC KKKKKKKKKKK
TTTTTTTTTTTTTTTTTTTT=MASK 19 20 21...RENAME TO R
8+LOC LLLLLLLLLLLL
MMMMMMMMMMMMM=.'/PPPPPPPPPPPPPPPP/
9+LOC NNNNNNNNNNNNNN
2STK BB 3STK BB
10+LOC OOOOOOOOOOOOOOO
PPPPPPPPPPPPPPPP=16
11+LOC QQQQQQQQQQQQQQQQQ
RRRRRRRRRRRRRRRRRR=.'/TTTTTTTTTTTTTTTTTTTT/
12+LOC SSSSSSSSSSSSSSSSSSS
VVVVVVVVVVVVVVVVVVVVVV=MASK 22 23 24
TTTTTTTTTTTTTTTTTTTT=.'/VVVVVVVVVVVVVVVVVVVVVV/
ZZZZZZZZZZZZZZZZZZZZZZZZZZ=MASK 28 29 30...RENAME TO X
13+LOC UUUUUUUUUUUUUUUUUUUUU
VVVVVVVVVVVVVVVVVVVVVV=MASK 25 26 27
14+LOC WWWWWWWWWWWWWWWWWWWWWWW
XXXXXXXXXXXXXXXXXXXXXXXX=.'/ZZZZZZZZZZZZZZZZZZZZZZZZZZ/
15+LOC YYYYYYYYYYYYYYYYYYYYYYYYY
17STK PPPPPPPPPPPPPPPP 18STK PPPPPPPPPPPPPPPP
ZZZZZZZZZZZZZZZZZZZZZZZZZZ=MASK 31 32 33
...
16+LOC A
17+LOC CCC 2DUP
18+LOC DDDD 3DUP
19+LOC FFFFFF 4DUP
20+LOC HHHHHHHH 5DUP
21+LOC IIIIIIIII 6DUP
22+LOC KKKKKKKKKKK 7DUP
23+LOC LLLLLLLLLLLL 8DUP
24+LOC NNNNNNNNNNNNNN 9DUP
25+LOC OOOOOOOOOOOOOOO 10DUP
26+LOC QQQQQQQQQQQQQQQQQ 11DUP
27+LOC SSSSSSSSSSSSSSSSSSS 12DUP
28+LOC UUUUUUUUUUUUUUUUUUUUU 13DUP
29+LOC WWWWWWWWWWWWWWWWWWWWWWW 14DUP
30+LOC YYYYYYYYYYYYYYYYYYYYYYYYY 15DUP
A BB
CCC EEEEE
DDDD GGGGGGG
FFFFFF JJJJJJJJJJ
HHHHHHHH MMMMMMMMMMMMM
IIIIIIIII PPPPPPPPPPPPPPPP
KKKKKKKKKKK RRRRRRRRRRRRRRRRRR
LLLLLLLLLLLL TTTTTTTTTTTTTTTTTTTT
NNNNNNNNNNNNNN VVVVVVVVVVVVVVVVVVVVVV
OOOOOOOOOOOOOOO XXXXXXXXXXXXXXXXXXXXXXXX
QQQQQQQQQQQQQQQQQ ZZZZZZZZZZZZZZZZZZZZZZZZZZ
XAD A HHHHHHHH,,,
NNNNNNNNNNNNNN
SSSSSSSSSSSSSSSSSSS BB
XAD CCC IIIIIIIII,,,
OOOOOOOOOOOOOOO
UUUUUUUUUUUUUUUUUUUUU EEEEE
XAD DDDD KKKKKKKKKKK,,,
QQQQQQQQQQQQQQQQQ
WWWWWWWWWWWWWWWWWWWWWWW GGGGGGG
XAD FFFFFF LLLLLLLLLLLL,,,
SSSSSSSSSSSSSSSSSSS
YYYYYYYYYYYYYYYYYYYYYYYYY JJJJJJJJJJ
XAD UUUUUUUUUUUUUUUUUUUUU WWWWWWWWWWWWWWWWWWWWWWW,,,
YYYYYYYYYYYYYYYYYYYYYYYYY
MMMMMMMMMMMMM
XSY GGGGGGG JJJJJJJJJJ
PPPPPPPPPPPPPPPP
XSY EEEEE PPPPPPPPPPPPPPPP
RRRRRRRRRRRRRRRRRR
XSY BB MMMMMMMMMMMMM
TTTTTTTTTTTTTTTTTTTT
XSY RRRRRRRRRRRRRRRRRR TTTTTTTTTTTTTTTTTTTT
VVVVVVVVVVVVVVVVVVVVVV
XXXXXXXXXXXXXXXXXXXXXXXX
XSY XXXXXXXXXXXXXXXXXXXXXXXX VVVVVVVVVVVVVVVVVVVVVV
ZZZZZZZZZZZZZZZZZZZZZZZZZZ
137,141,145,149,153,157,161,165,169,173,177,181,185,189,193
152
156,156
160,160,160
164,164,164,164
168,168,168,168,168
172,172,172,172,172,172
176,176,176,176,176,176,176
180,180,180,180,180,180,180,180
184,184,184,184,184,184,184,184,184
188,188,188,188,188,188,188,188,188,188
192,192,192,192,192,192,192,192,192,192,192
196,196,196,196,196,196,196,196,196,196,196,196
200,200,200,200,200,200,200,200,200,200,200,200,200
204,204,204,204,204,204,204,204,204,204,204,204,204,204
208,208,208,208,208,208,208,208,208,208,208,208,208,208,208
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
BLK
...TABLE TO TEST EXPANSION AND CONTRACTION
...OF SYMBOL DICTIONARY AFTER A RENAME
...DEC 12, 1972
201TST TTL'/109/
MASK=MSK ARG.ARG.ARG
1+LOC AAAAAAAAAAAAAAAAAAAAAAAAAA
BBBBBBBBBBBBBBBBBBBBBBBBB=1
2+LOC CCCCCCCCCCCCCCCCCCCCCCCC
PPPPPPPPPPP=MASK 13 14 15...RENAME TO M
3+LOC DDDDDDDDDDDDDDDDDDDDDDD
EEEEEEEEEEEEEEEEEEEEEE=4
4+LOC FFFFFFFFFFFFFFFFFFFFF
GGGGGGGGGGGGGGGGGGGG=MASK 7 8 9
5+LOC HHHHHHHHHHHHHHHHHHH
5STK EEEEEEEEEEEEEEEEEEEEEE 6STK EEEEEEEEEEEEEEEEEEEEEE
6+LOC IIIIIIIIIIIIIIIIII
RRRRRRRRR=MASK 10 11 12...RENAME TO J
JJJJJJJJJJJJJJJJJ=.'/RRRRRRRRR/
7+LOC KKKKKKKKKKKKKKKK
TTTTTTT=MASK 19 20 21...RENAME TO R
8+LOC LLLLLLLLLLLLLLL
MMMMMMMMMMMMMM=.'/PPPPPPPPPPP/
9+LOC NNNNNNNNNNNNN
2STK BBBBBBBBBBBBBBBBBBBBBBBBB 3STK BBBBBBBBBBBBBBBBBBBBBBBBB
10+LOC OOOOOOOOOOOO
PPPPPPPPPPP=16
11+LOC QQQQQQQQQQ
RRRRRRRRR=.'/TTTTTTT/
12+LOC SSSSSSSS
VVVVV=MASK 22 23 24
TTTTTTT=.'/VVVVV/
Z=MASK 28 29 30...RENAME TO X
13+LOC UUUUUU
VVVVV=MASK 25 26 27
14+LOC WWWW
XXX=.'/Z/
15+LOC YY
17STK PPPPPPPPPPP 18STK PPPPPPPPPPP
Z=MASK 31 32 33
...
16+LOC AAAAAAAAAAAAAAAAAAAAAAAAAA
17+LOC CCCCCCCCCCCCCCCCCCCCCCCC 2DUP
18+LOC DDDDDDDDDDDDDDDDDDDDDDD 3DUP
19+LOC FFFFFFFFFFFFFFFFFFFFF 4DUP
20+LOC HHHHHHHHHHHHHHHHHHH 5DUP
21+LOC IIIIIIIIIIIIIIIIII 6DUP
22+LOC KKKKKKKKKKKKKKKK 7DUP
23+LOC LLLLLLLLLLLLLLL 8DUP
24+LOC NNNNNNNNNNNNN 9DUP
25+LOC OOOOOOOOOOOO 10DUP
26+LOC QQQQQQQQQQ 11DUP
27+LOC SSSSSSSS 12DUP
28+LOC UUUUUU 13DUP
29+LOC WWWW 14DUP
30+LOC YY 15DUP
AAAAAAAAAAAAAAAAAAAAAAAAAA BBBBBBBBBBBBBBBBBBBBBBBBB
CCCCCCCCCCCCCCCCCCCCCCCC EEEEEEEEEEEEEEEEEEEEEE
DDDDDDDDDDDDDDDDDDDDDDD GGGGGGGGGGGGGGGGGGGG
FFFFFFFFFFFFFFFFFFFFF JJJJJJJJJJJJJJJJJ
HHHHHHHHHHHHHHHHHHH MMMMMMMMMMMMMM
IIIIIIIIIIIIIIIIII PPPPPPPPPPP
KKKKKKKKKKKKKKKK RRRRRRRRR
LLLLLLLLLLLLLLL TTTTTTT
NNNNNNNNNNNNN VVVVV
OOOOOOOOOOOO XXX
QQQQQQQQQQ Z
XAD AAAAAAAAAAAAAAAAAAAAAAAAAA HHHHHHHHHHHHHHHHHHH,,,
NNNNNNNNNNNNN
SSSSSSSS BBBBBBBBBBBBBBBBBBBBBBBBB
XAD CCCCCCCCCCCCCCCCCCCCCCCC IIIIIIIIIIIIIIIIII,,,
OOOOOOOOOOOO
UUUUUU EEEEEEEEEEEEEEEEEEEEEE
XAD DDDDDDDDDDDDDDDDDDDDDDD KKKKKKKKKKKKKKKK,,,
QQQQQQQQQQ
WWWW GGGGGGGGGGGGGGGGGGGG
XAD FFFFFFFFFFFFFFFFFFFFF LLLLLLLLLLLLLLL,,,
SSSSSSSS
YY JJJJJJJJJJJJJJJJJ
XAD UUUUUU WWWW,,,
YY
MMMMMMMMMMMMMM
XSY GGGGGGGGGGGGGGGGGGGG JJJJJJJJJJJJJJJJJ
PPPPPPPPPPP
XSY EEEEEEEEEEEEEEEEEEEEEE PPPPPPPPPPP
RRRRRRRRR
XSY BBBBBBBBBBBBBBBBBBBBBBBBB MMMMMMMMMMMMMM
TTTTTTT
XSY RRRRRRRRR TTTTTTT
VVVVV
XXX
XSY XXX VVVVV
Z
137,141,145,149,153,157,161,165,169,173,177,181,185,189,193
152
156,156
160,160,160
164,164,164,164
168,168,168,168,168
172,172,172,172,172,172
176,176,176,176,176,176,176
180,180,180,180,180,180,180,180
184,184,184,184,184,184,184,184,184
188,188,188,188,188,188,188,188,188,188
192,192,192,192,192,192,192,192,192,192,192
196,196,196,196,196,196,196,196,196,196,196,196
200,200,200,200,200,200,200,200,200,200,200,200,200
204,204,204,204,204,204,204,204,204,204,204,204,204,204
208,208,208,208,208,208,208,208,208,208,208,208,208,208,208
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33
BLK
TTL'/110/TST 92
AAA='/1,2,/-1'/,3,4/-3'/,7,8/
B='/10,9,/-1'/,8,7/-3'/,4,3/
CCC=MSK 10SIZ ARG 1LFT ARG 2LFT ARG
D=MSK 10SIZ 2LFT ARG 1LFT ARG ARG
EEE=11 2WRD 22 3WRD 33
F=111 2WRD 222 3WRD 333
GGG='/,12,13/-3'/,16,17/
AAA A=.'/AAA/,5,6,9,10
B BBB=.'/B/,6,5,2,1
A,5,6,9,10
BBB,6,5,2,1
TON CCC
1 2 3
C=.'/CCC/
4 5 6,7 8 9
MSK D 1 2 3,456
TON D 7 8 9
DDD=.'/D/,2 3 4,5 6 7
MSK 891
C 3 4 5,DDD 3 4 5
TON C
6 7 8
C=MSK 8SIZ 2LFT ARG 1LFT ARG ARG
1 2 3,4 5 6
MSK
F,EEE
E=.'/EEE/
FFF=.'/F/,FFF,E
TON C
1 2 3,C=.'/C/,4 5 6,2 3 4
C=.'/DDD/,1 2 3,4 5 6
MSK
STOP=.'/,/,1 STOP 2 STOP 3
,=10 STOP 20 STOP,
,=.'/STOP/
G=.'/GGG/GGG,14,15,18,19
G,1,2,3,4
...
1,2,3,4,5,6,7,8,9,10
10,9,8,7,6,5,4,3,2,1
1,2,3,4,5,6,7,8,9,10
10,9,8,7,6,5,4,3,2,1
321,654,987,123,456,789
234,567,891,543,345,876
83,302,111,222,333,11,22,33
111,222,333,11,22,33,83,302,156
123,456,1,2,3,20,10,12,13,14
15,16,17,18,19,12,13,1,2,16,17,3,4
BLK
TTL'/111/EOD TST 92
AAA='/1,2,/-1'/,3,4/-3'/,7,8/
B='/10,9,/-1'/,8,7/-3'/,4,3/
CCC=MSK 10SIZ ARG 1LFT ARG 2LFT ARG
D=MSK 10SIZ 2LFT ARG 1LFT ARG ARG
EEE=11 2WRD 22 3WRD 33
F=111 2WRD 222 3WRD 333
GGG='/,12,13/-3'/,16,17/
AAA A=.'/AAA/,5,6,9,10
B BBB=.'/B/,6,5,2,1
A,5,6,9,10
BBB,6,5,2,1
TON CCC
1 2 3
C=.'/CCC/
4 5 6,7 8 9
MSK D 1 2 3,456
TON D 7 8 9
DDD=.'/D/,2 3 4,5 6 7
MSK 891
C 3 4 5,DDD 3 4 5
TON C
6 7 8
C=MSK 8SIZ 2LFT ARG 1LFT ARG ARG
1 2 3,4 5 6
MSK
F,EEE
E=.'/EEE/
FFF=.'/F/,FFF,E
TON C
1 2 3,C=.'/C/,4 5 6,2 3 4
C=.'/DDD/,1 2 3,4 5 6
MSK
STOP=.'/,/,1 STOP 2 STOP 3
,=10 STOP 20 STOP,
,=.'/STOP/
G=.'/GGG/GGG,14,15,18,19
G,1,2,3,4
...
1,2,3,4,5,6,7,8,9,10
10,9,8,7,6,5,4,3,2,1
1,2,3,4,5,6,7,8,9,10
10,9,8,7,6,5,4,3,2,1
321,654,987,123,456,789
234,567,891,543,345,876
83,302,111,222,333,11,22,33
111,222,333,11,22,33,83,302,156
123,456,1,2,3,20,10,12,13,14
15,16,17,18,19,12,13,1,2,16,17,3,4
BLK
...TABLE TO TEST PFX
...JAN 8, 1973
TTL'/112/42TST
CONSTANT*1=111 3WRD 333 5WRD 555
CONSTANT*2=2WRD 222 4WRD 444
ADR KNOWN*1 LOC UNKNOWN*1
ADR KNOWN*2 LOC UNKNOWN*2
ADR KNOWN*3 LOC UNKNOWN*3
ADR KNOWN*4 LOC UNKNOWN*4
DEF KNOWN*1 A
DEF KNOWN*2 B
DEF UNKNOWN*1 C
DEF UNKNOWN*2 D
DEF(KNOWN*1+23)E
DEF(KNOWN*2+25)F
DEF(UNKNOWN*1+27)G
DEF(UNKNOWN*2+29)H
KNOWN*1=KNOWN*1+31
KNOWN*1=PFX-1 WRD(KNOWN*1+1)33 KNOWN*1
KNOWN*2=PFX-1 WRD(KNOWN*2+1)35 KNOWN*2
KNOWN*2=KNOWN*2 PFX-1 WRD(KNOWN*2+1)37
UNKNOWN*1=UNKNOWN*1+39
UNKNOWN*1=UNKNOWN*1 PFX-1 WRD(UNKNOWN*1+1)41
UNKNOWN*2=PFX-1 WRD(UNKNOWN*2+1)43 UNKNOWN*2
UNKNOWN*2=UNKNOWN*2 PFX-1 WRD(UNKNOWN*2+1)45
DEF(2PFX CONSTANT*2+3PFX CONSTANT*1)KNOWN*3
PRECISION=PFX-1
DEF+(CONSTANT*1 4PFX CONSTANT*2)KNOWN*4
DEF PRECISION CONSTANT*1 UNKNOWN*3
DEF CONSTANT*2 UNKNOWN*4
H,G,F,E,D,C,B,A
ADR UNKNOWN*1 LOC KNOWN*1
ADR UNKNOWN*2 LOC KNOWN*2
ADR UNKNOWN*3 LOC KNOWN*3
ADR UNKNOWN*4 LOC KNOWN*4
LOC UNKNOWN*1
LOC UNKNOWN*2
LOC UNKNOWN*3
LOC UNKNOWN*4
KNOWN*1,KNOWN*2,KNOWN*3,KNOWN*4
UNKNOWN*1,UNKNOWN*2,UNKNOWN*3,UNKNOWN*4
10SIZ,RADIX=8WRD 10 10WRD 8
NO=2 3WRD 1 4WRD 3
MASK=MSK PFX-1 LFT NO ARG PFX 0 LFT NO ARG,,,
PFX 1 LFT NO ARG 3PFX LFT NO ARG
MASK 1 2 3 4 5
DEF NO I,47,I
MASK*2=MSK ARG(8PFX SRX RADIX 10+20)PFX 1 LFT NO ARG,,,
(10PFX SRX RADIX 10+20)PFX-1 LFT NO ARG
MASK*2 5
MASK*3=MSK ARG(PFX 10 SRX RADIX 10+20)1PFX LFT NO ARG,,,
(PFX 10 SRX RADIX 10+20)PFX-1 LFT NO ARG
4PFX MASK*3 6
NO=NO 1PFX WRD NO 3 0PFX WRD NO+3 PFX-1 WRD NO-2
FOO=WRD NO 11 PFX NO WRD NO 22 PFX NO WRD NO 33,,,
PFX NO WRD NO 44
55,FOO
13,14,15,16
29,27,25,23,0,0,0,0
1,2,3,4
13,14,15,16
31,33,35,37
555,777
39,41,43,45
5,444
12345,47,3
52430,63024,55,11,22,33,44 BLK
TTL'/113/TST 108
IFL(1-2),1,IFL END IFL-1,2 END IFL(1-2,3 END IFL(1-2 END 4 END
5,IFL(1+1),0 END 6,IFL END 7,IFL+1,0 END 8
9,IFL(-1+2,0 END 10,IFL(1+2 END 11
IFLE(1-2),12,IFLE END IFLE-1,13 END IFLE(1-2,14 END IFLE(1-2 END 15 END
IFLE(1-1),16,IFLE END IFLE+0,17 END IFLE(3-3,18 END IFLE(3-3 END 19 END
20,IFLE(1+1),0 END 21,IFLE END 22,IFLE+1,0 END 23
24,IFLE(-1+2,0 END 25,IFLE(1+2 END 26
27,IFE(1-3),0 END 28,IFE END 29,IFE-1,0 END 30
31,IFE(2-5,0 END 32,IFE(1-2 END 33
IFE(1-1),34,IFE END IFE+0,35 END IFE(3-3,36 END IFE(5-5 END 37 END
38,IFE(3-2),0 END 39,IFE END 40,IFE+1,0 END 41
42,IFE(-1+2,0 END 43,IFE(1+2 END 44
45,IFGE(1-2),0 END 46,IFGE END 47,IFGE-1,0 END 48
49,IFGE(2-6,0 END 50,IFGE(1-2 END 51
IFGE(5-5),52,IFGE END IFGE 0,53 END IFGE(4-4,54 END IFGE(7-7 END 55 END
IFGE(2-1),56,IFGE END IFGE+1,57 END IFGE(1+2,58 END IFGE(3-2 END 59 END
60,IFG(1-3),0 END 61,IFG END 62,IFG-1,0 END 63
64,IFG(3-6,0 END 65,IFG(1-6 END 66
67,IFG(3-3),0 END 68,IFG END 69,IFG 0,0 END 70
71,IFG(-1+1,0 END 72,IFG(1-1 END 73
IFG(2-1),74,IFG END IFG 1,75 END IFG(2-1,76 END IFG(2-1 END 77 END
IFN(1-2),78,IFN END IFN-1,79 END IFN(1-2,80 END IFN(1-2 END 81 END
82,IFN(1-1),0 END 83,IFN END 84,IFN 0,0 END 85
86,IFN(-1+1,0 END 87,IFN(1-1 END 88
IFN(1+2),89,IFN END IFN 1,90 END IFN(1+3,91 END IFN(1+2 END 92 END
93,IFA END 94,IFNA END 95,IFD END 96,IFU END 97
98,IFO END 99,IFNO END 100
101,IFA,0 END 102,IFNA,0 END 103,IFD,0 END 104,IFU,0 END 105
106,IFO,0 END 107,IFNO,0 END 108
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40
41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60
61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80
81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,100
101,102,103,104,105,106,107,108
BLK
TTL'/114/TST 72
6 DIL(9-5)(2-3)-1-1-2-1,7-DIL(6-4)(5-5)55 66 5
8-DIL(4-1)(1+5)55 66 77 5,20 DILE(5)(3-27)-16
44 DILE(2+1)(33-30-3)+5-44,10 DILE(7-5)(1+23)+44-4
27 DIE+(3 1)(2-55)+33-66-20,88 DIE(2+3)(3-2-1)-70-10
127 DIE(2)(33)+8-118,2+DIGE(33-29)(2-3)-33-66 8
2 DIGE(2+2)(44-20-24)+8+4-3,23 DIGE(1+1)(1+1)-11
99 DIG(4-2)(16-19)+2-86,16 DIG(1+2)(4-4)66 66 66+3-5
12 DIG(1+2)(16+2)+4-1,123 DIN(23-20)(-1-4)-100-7
123-DIN(23-20)+(3-3)+3+106,123 DIN(23-20)(1+4)-100-5
...
24 DIL 4(2-3)-1-1-2-1,25-DIL 2(5-5)55 66 5
26-DIL 3(1+5)55 66 77 5,38 DILE 5(3-27)-16
62 DILE 3(33-30-3)+5-44,28 DILE 2(1+23)+44-4
45 DIE 4(2-55)+33-66-20,106 DIE 5(3-2-1)-70-10
145 DIE 2(33)+8-118,20+DIGE 4(2-3)-33-66 8
20 DIGE 4(44-20-24)+8+4-3,41 DIGE 2(1+1)-11
117 DIG 2(16-19)+2-86,34 DIG 3(4-4)66 66 66+3-5
30 DIG 3(16+2)+4-1,141 DIN 3(-1-4)-100-7
141-DIN 3+(3-3)+3+106,141 DIN 3(1+4)-100-5
...
42 DIL(9-5)-1-1-1-2-1,43-DIL(6-4) 0 55 66 5
44-DIL(4-1)6 55 66 77 5,56 DILE(5)-24-16
80 DILE(2+1)0+5-44,46 DILE(7-5)+24+44-4
63 DIE+(3 1)-53+33-66-20,124 DIE(2+3)-0-70-10
163 DIE(2)33+8-118,38+DIGE(33-29)-1-33-66 8
38 DIGE(2+2)+0+8+4-3,59 DIGE(1+1)+2-11
135 DIG(4-2)-3+2-86,52 DIG(1+2)0 66 66 66+3-5
48 DIG(1+2)IOR 18+4-1,159 DIN(23-20)-5-100-7
159-DIN(23-20)+0+3+106,159 DIN(23-20)5-100-5
...
PUTIN56=-1'/+2,56/,PUTIN60=-1'/+2,60/
55,IFE PUTIN56(-2 END 57,IFN PUTIN56(-2 END 58
59,IFE PUTIN60(-2,61 END 62,IFN PUTIN60(-2,123 END 63
PUTIN65=-1'/0,65/,PUTIN69=-1'/0,69/
64,PUTIN65 IFE END 66,PUTIN65 IFN END 67
68,PUTIN69 IFE,70 END 71,PUTIN69 IFN,123 END 72
...
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40
41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60
61,62,63,64,65,66,67,68,69,70,71,72 BLK
TTL'/115/16TST
ONE=3WRD 1
TWO=2WRD 2 3WRD 0
MULT=2WRD 3 5WRD 1 4 WRD 3-2
2DIE 4PFX-MULT 5 +6
0PFX DIE MULT MULT 99 22 ...SKIP 99
DIE (MULT+2)(MULT-1) 22+11
66-DIE(3PFX MULT+6) MULT 99+88+22 ...SKIP 99+88+
DIE -MULT -MULT 99+ 55 ...SKIP 99+
DIE 2 TWO 33+33
2PFX DIE 2 TWO 99+77
1PFX DIE 2 TWO 44+44
DIE 2 ONE 44+55
0PFX DIE ONE ONE 222 111
IFE(ONE-1
122,IFE,10,10 END 133
IFN(ONE-1
10,20
IFE
10,20
END
10,20
IFE 0
10,20
END
10,20
END
144,IFN,END 155
IFE
10,20
END
166,177
END
11,22,33,44,55,66,77,88,99
111,122,133,144,155,166,177
BLK