[OUT-02
[AJH OCT 65
[ENTRY
$400
#6T STAi
0
LDA
0
BCLi
4000
STC 6A
JMP 6A
[NEXT
#6G LDAi
1
ADD p+2
STC p+1
#6A ADD 0
APO
JMP 6B
STAi
#6D 0
BCLi
7770
AZE
JMP p+5
BSEi
0010
SETi10
6T+1
STAi
#6I 0
CLR
ADD 6D
SCR 6
AZEi
ADD 6G+1
COM
STC 11
ADD 6D
SCR 3
BCLi
7770
ADAi
p+6003
STC p+1
JMP 0
JMP 6C
JMP 6H
JMP 6J
JMP 6X
JMP 6W
JMP 6E
JMP 6G
JMP 6G
[FINISH
#6B STC p+3
ADD 6C+1
JMP 6P
JMP 0
[EJECT
#6C LDAi
12
JMP 6P
XSKi11
JMP p-4
JMP 6G
[SPACES
#6H LDAi
14
JMP 6P
XSKi11
JMP p-4
JMP 6G
[OCTAL
#6J LDAi
1000
ADD 6I
STA
p+5
ADD 6F
STC p+24
SETi17
6Y-4000
LDA 10
ROL 3
STAi
0
BCLi
7770
STHi17
LDA
p-5
SROi
3567
JMP p-12
SETi17
6Y
SETi16
-4
JMP 6K
LDAi10
XSKi11
JMP p-25
JMP 6G
#6F 0020
[ALPHANUM
#6E SET 16
11
LDA 10
ROL 6
STA 10
LDA
6I
STA
p+3
STC p+10
SET 17
0
JMP 6K
LDHi17
LDA
17
STA
0
JMP 6G
[CHAR PRINT
#6K LDA
0
STC p+11
LDAi
3777
ADM
17
LDHi17
JMP 6P
XSKi16
JMP p-3
JMP 0
#6Y 0
0
0
0
1414
[DP DECIMAL
#6W LDAi
1000
ADD 6I
STA
p+5
ADD 6F
STA
p+4
STC p+13
LDA 10
STC 6L
LDAi10
STC 6R
JMP 6N
SETi16
-11
SETi17
6Y
JMP 6K
LDAi10
XSKi11
JMP p-14
JMP 6G
[SP DECIMAL
#6X LDAi
1000
ADD 6I
STA
p+3
ADD 6F
STC p+14
LDA 10
STA
6R
SCR 13
STC 6L
JMP 6N
SETi16
-6
SETi17
6Y+4001
JMP 6K
LDAi10
XSKi11
JMP p-15
JMP 6G
#6L 0
#6R 0
[OCT TO DEC
#6N LDA
0
STC 6O
STC 6Y
SETi17
6Y+4003
SETi16
-7
ADD 6L
STAi
#6S 0
APOi
JMP p+6
COM
STC 6L
ADD 6R
COM
STC 6R
#6U SETi15
-27
CLR
STC 6M
JMP 6Q
#6V JMP 6Q
ADD 6M
ROLi1
STAi
#6M 0
ADAi
-12
AZEi
COM
APO
JMP p+5
STC 6M
ADD 6G+1
ADM
6R
XSKi15
JMP 6V
LDA
6M
STH 17
LDAi
3777
ADM
17
XSKi16
JMP 6U
SETi17
6Y-4000
SETi16
-10
LDHi17
AZE
JMP p+7
ADD 6H+1
STH 17
XSKi16
JMP p-6
CLR
STH 17
LDA
6S
APOi
JMP p+10
LDAi
3777
ADM
17
LDAi
17
STH 17
#6O JMP 0
[DP ROL1
#6Q CLR
ADD 6R
ROLi1
STC 6R
ADD 6L
ROLi1
STC 6L
JMP 0
[PRINT
#6P ADAi
6Z+2000
STC p+3
ADD 0
STC p+15
ADD 0
BSEi
3400
ROL 2
STC p+15
SROi
3777
JMP p+11
LDA
p+10
SAEi
6153
JMP 0
LDAi
212
JMP p-16
LDAi
0
ROR1
STA
p-3
BCLi
7776
ATR
JMP p+4
SROi
3777
JMP p-2
SROi
3777
JMP p-5
SROi
2525
JMP p-10
SCR 17
SCR 17
JMP p-37
#6Z 260
261
262
263
264
265
266
267
270
271
215
377
240
246
247
255
253
257
243
0
301
302
303
304
305
306
307
310
311
312
313
314
315
316
317
320
321
322
323
324
325
326
327
330
331
332
275
245
254
256
244
333
212
251
337
336
273
276
274
252
242
335
272
277
207
[END