PAL-AP Rev.H

* NAME: (PAL-AP) DOC. 70180311000 REV.H PAGE 14

0616 00670 0 05 00765 ERA =2 0617 00671 0 04 00021 STA '21 0618 00672 0 05 00020 ERA '20 0619 00673 0406 77 ARR 1 0620 00674 0 04 00020 STA '20 0621 00675 140040 CRA 0622 00676 -0 04 00000 STA* 0 0623 00677 0 12 00025 IRS '25 ADD TO WORD COUNT 0624 00700 0 12 00000 IRS 0 0625 00701 0 12 00021 IRS '21 0626 00702 0 01 00676 JMP *-4 ADD TO WORD COUNT 0627 00703 0 01 00665 JMP DATA 0628 00704 0 00 00052 SWCH PZE '52 INITIALIZED NONZERO CONSTANT 0629 00705 0 10 00715 JST WORD 0630 00706 -0 04 00000 STA* 0 0631 00707 0 12 00000 IRS 0 0632 00710 0 12 00025 IRS '25 ADD TO WORD COUNT 0633 00711 0 05 00020 ERA '20 0634 00712 0406 77 ARR 1 0635 00713 0 04 00020 STA '20 0636 00714 -0 01 00704 JMP* SWCH 0637 00715 0 00 00052 WORD PZE '52 INITIALIZED NONZERO C 0638 00716 140040 CRA 0639 00717 0 04 00021 STA '21 0640 00720 0 10 00731 JST CHAR 0641 00721 0 10 00731 JST CHAR 0642 00722 0 10 00731 JST CHAR 0643 00723 0414 70 LGL 8 0644 00724 101400 SMI TEST FOR ZERO-COUNT WORD 0645 00725 0 12 00704 IRS SWCH 0646 00726 0 02 00021 LDA '21 0647 00727 0406 77 ARR 1 0648 00730 -0 01 00715 JMP* WORD 0649 00731 0 000052 CHAR DAC '52 FIRST TIME IN-RETURN VIA '52 0650 00732 0 02 00022 LDA '22 0651 00733 0414 70 LGL 8 0652 00734 100400 SPL 0653 00735 0 12 00021 IRS '21 0654 00736 0414 77 LGL 1 0655 00737 0 05 00764 ERA ='174000 0656 00740 101040 SNZ 0657 00741 0 02 00763 LDA ='171000 0658 00742 0 05 00762 ERA ='1000 0659 00743 101040 SNZ 0660 00744 0 02 00761 LDA ='167000 0661 00745 0 05 00770 ERA L1 0662 00746 101040 SNZ 0663 00747 0 02 00771 LDA L2 0664 00750 0 05 00762 ERA ='1000 0665 00751 101040 SNZ