Directory of image this file is from
This file as a plain text file
ZERO NOHSPT <
06400 0000 PTP, 0
06401 7320 CLA CLL CML
06402 4234 JMS PSETUP
06403 1711 PTPLP, TAD I PTPCA
06404 4303 JMS PTPPCH
06405 3312 DCA PTR
06406 2311 ISZ PTPCA
06407 7700 PT7700, 7700
06410 1711 TAD I PTPCA
06411 4303 JMS PTPPCH
06412 7112 CLL RTR
06413 7012 RTR
06414 1312 TAD PTR
06415 7012 RTR
06416 7012 RTR
06417 4303 JMS PTPPCH
06420 2311 PTPEND, ISZ PTPCA
06421 0070 PT70, 70
06422 6031 KSF
06423 5273 JMP PTPISZ
06424 6034 PTPKRS, KRS
06425 0362 AND PTP177
06426 1376 TAD PTPM3
06427 7640 SZA CLA
06430 5273 JMP PTPISZ
06431 6203 PTPCIF, CDF CIF 0
06432 5633 JMP I .+1
06433 7600 7600
06434 0000 PSETUP, 0
06435 6214 RDF
06436 1231 TAD PTPCIF
06437 3301 DCA PTPXIT
06440 1600 TAD I PTP
06441 0221 AND PT70
06442 1373 TAD PCDF
06443 3260 DCA PTPCDF
06444 7010 RAR
06445 1600 TAD I PTP
06446 2200 ISZ PTP
06447 7510 SPA
06450 5371 JMP PTPERR
06451 0207 AND PT7700
06452 7040 CMA
06453 3375 DCA PTPWC
06454 1600 TAD I PTP
06455 2200 ISZ PTP
06456 3311 DCA PTPCA
06457 1600 TAD I PTP
------
*7000 PAL8-V7 PAGE 18-1
06460 0000 PTPCDF, 0
6460 PTPEOF=PTPCDF
06461 7650 SNA CLA
06462 7430 SZL
06463 5224 JMP PTPKRS
06464 1361 TAD PTP336
06465 6046 TLS
06466 6031 KSF
06467 5266 JMP .-1
06470 4343 JMS PTRGCH
06471 6032 6032
06472 5224 JMP PTPKRS
06473 2375 PTPISZ, ISZ PTPWC
06474 5634 JMP I PSETUP
06475 1260 PTPRTN, TAD PTPEOF
06476 7640 SZA CLA
06477 2200 ISZ PTP
06500 2200 ISZ PTP
06501 7402 PTPXIT, HLT
06502 5600 JMP I PTP
06503 0000 PTPPCH, 0
06504 6026 PLS
06505 6021 PSF
06506 5305 JMP .-1
06507 0340 AND PT7400
06510 5703 JMP I PTPPCH
06511 0000 PTPCA, 0
06512 0000 PTR, 0
06513 7300 CLA CLL
06514 1312 TAD PTR
06515 3200 DCA PTP
06516 4234 JMS PSETUP
06517 4343 PTRLP, JMS PTRGCH
06520 3711 DCA I PTPCA
06521 4343 JMS PTRGCH
06522 3303 DCA PTPPCH
06523 4343 JMS PTRGCH
06524 7006 RTL
06525 7006 RTL
06526 0340 AND PT7400
06527 1711 TAD I PTPCA
06530 3711 DCA I PTPCA
06531 1312 TAD PTR
06532 7012 RTR
06533 7012 RTR
06534 7010 RAR
06535 0340 AND PT7400
06536 1303 TAD PTPPCH
06537 2311 ISZ PTPCA
06540 7400 PT7400, 7400
06541 3711 DCA I PTPCA
06542 5220 JMP PTPEND
06543 0000 PTRGCH, 0
06544 1260 TAD PTPEOF
06545 7650 SNA CLA
------
*7000 PAL8-V7 PAGE 18-2
06546 5354 JMP PTRBF0
06547 6014 RFC
06550 3260 DCA PTPEOF
06551 2260 PTTIME, ISZ PTPEOF
06552 5356 JMP PGCHLP
06553 1360 TAD PTP232
06554 3312 PTRBF0, DCA PTR
06555 5366 JMP PTRXX
06556 1374 PGCHLP, TAD PTPTMP
06557 3312 DCA PTR
06560 0232 PTP232, 232
06561 0336 PTP336, 336
06562 0177 PTP177, 177
06563 6011 RSF
06564 5351 JMP PTTIME
06565 6012 RRB
06566 3374 PTRXX, DCA PTPTMP
06567 1312 TAD PTR
06570 5743 JMP I PTRGCH
06571 7330 PTPERR, CLA CLL CML RAR
06572 5277 JMP PTPXIT-2
06573 6201 PCDF, CDF 0
06574 0000 PTPTMP, 0
06575 0000 PTPWC, 0
06576 7775 PTPM3, -3
>
IFNZRO NOHSPT <IFZERO LIST <XLIST>>
------
*7000 PAL8-V7 PAGE 19
IFZERO NOHSPT+LIST <XLIST>
------
PAL8-V7 PAGE 20
IC
US
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
IC
06577 0000 B$$BB$$BB$$BL*U*
6607 *6607
NOPUNCH
7607 *7607
ENPUNCH
IFZERO RF08+DF32+LIST <XLIST>
------
PAL8-V7 PAGE 21
IFZERO DECTAPE+LIST <XLIST>
IFNZRO DECTAPE <
07607 0000 SHNDLR, 0
07610 7346 CLA CLL CMA RTL
07611 3350 DCA SYSCNT
07612 6214 RDF
07613 1335 TAD SCIF
07614 3333 DCA SFIELD
07615 1607 TAD I SHNDLR
07616 3351 DCA SFUN
07617 2207 ISZ SHNDLR
07620 7240 CLA CMA
07621 1607 TAD I SHNDLR
07622 3352 DCA SLOC
07623 2207 ISZ SHNDLR
07624 1340 STRY, TAD S410
07625 6766 DTCA DTXA
07626 6774 DTLB
07627 7344 CLA CMA CLL RAL
07630 3355 DCA SCA
07631 1351 TAD SFUN
07632 7012 RTR
07633 7012 RTR
07634 7006 SERR, RTL
07635 7004 RAL
07636 7600 S7600, 7600
07637 1337 TAD S200
07640 7430 SC, SZL
07641 1336 TAD S400
07642 6764 DTXA
07643 6773 DTSF DTRB
07644 5243 JMP .-1
07645 7510 SPA
07646 5234 JMP SERR
07647 6761 DTRA
07650 7006 RTL
07651 7046 CMA RTL
07652 7620 SNL CLA
07653 7026 CML RTL
07654 1376 TAD SBLOCK
07655 7040 CMA
07656 1607 TAD I SHNDLR
07657 1607 TAD I SHNDLR
07660 1347 TAD SOFSET
07661 1347 TAD SOFSET
07662 7040 CMA
07663 7640 SZA CLA
07664 5240 JMP SC
07665 7420 SNL
07666 5241 JMP SC+1
------
PAL8-V7 PAGE 21-1
07667 1352 TAD SLOC
07670 3355 DCA SCA
07671 1351 TAD SFUN
07672 6774 DTLB
07673 1351 TAD SFUN
07674 7104 CLL RAL
07675 0236 AND S7600
07676 3353 DCA SBLKCT
07677 7004 RAL
IFNZRO .-7700 <NZERR>
07700 7410 SKP
07701 7402 HLT
07702 7001 IAC
07703 7126 CLL CML RTL
07704 7006 RTL
07705 6764 SL, DTXA
07706 1236 TAD S7600
07707 3354 DCA SWC
07710 6773 DTSF DTRB
07711 5310 JMP .-1
07712 7120 CLL CML
07713 7710 SPA CLA
07714 5323 JMP SERR2
07715 1353 TAD SBLKCT
07716 1236 TAD S7600
07717 7450 SNA
07720 5326 JMP SOVER
07721 3353 DCA SBLKCT
07722 5305 JMP SL
07723 2350 SERR2, ISZ SYSCNT
07724 5224 JMP STRY
07725 7410 SKP
07726 2207 SOVER, ISZ SHNDLR
07727 2207 ISZ SHNDLR
07730 1337 TAD S200
07731 6764 DTXA
07732 7010 RAR
07733 7402 SFIELD, HLT
07734 5607 JMP I SHNDLR
07735 6202 SCIF, CIF 0
07736 0400 S400, 400
07737 0200 S200, 200
07740 0410 S410, 410
7753 SBLKCT=7753
7750 SYSCNT=7750
7751 SFUN=7751
7752 SLOC=7752
7754 SWC=7754
7755 SCA=7755
>
IFZERO DECTAPE+LIST <XLIST>
------
PAL8-V7 PAGE 22
IFZERO RK8+LIST <XLIST>
------
PAL8-V7 PAGE 23
IFZERO LINCSYS+LIST <XLIST>
------
PAL8-V7 PAGE 24