O16-11T1

* 0500-001-6612 (016-11T1) CCD NO. 70180294000 REV. D PAGE 15

0700 01760 1 02 02566 LDA MDTB+224,1 (DLD) 0701 01761 000005 OCT 5 SGL 0702 01762 100400 SPL 0703 01763 0 01 02015 JMP NG1 0704 01764 000201 IAB 0705 01765 0 06 02706 ADD =1 0706 01766 000201 DV21 IAB 0707 01767 -0 17 01611 DIV* DVSD 0708 01770 0 11 01606 CAS QTNT 0709 01771 000000 HLT ERROR 0710 01772 0 01 01774 JMP *+2 0711 01773 000000 HLT ERROR 0712 01774 1 02 02566 LDA MDTB+224,1 0713 01775 100400 SPL 0714 01776 0 01 02020 JMP NG2 0715 01777 000201 IAB 0716 02000 0 11 02706 CAS =1 REMAINDER =+1 IF DIVIDEND WAS POSITIVE 0717 02001 000000 HLT ERROR 0718 02002 0 01 02004 JMP *+2 0719 02003 000000 HLT ERROR 0720 02004 100001 DV22 SRC 0721 02005 000000 HLT 0722 02006 0 02 01606 LDA QTNT 0723 02007 0 11 01601 CAS TOTL 0724 02010 0 01 02012 JMP *+2 0725 02011 0 01 02026 JMP DV3 0726 02012 0 06 01600 ADD CNST 0727 02013 0 04 01606 STA QTNT 0728 02014 0 01 02033 JMP DV4 0729 02015 000201 NG1 IAB 0730 02016 0 07 02706 SUB =1 0731 02017 0 01 01766 JMP DV21 0732 02020 000201 NG2 IAB 0733 02021 0 11 02704 CAS =-1 REMAINDER =-1 IF DIVIDEND WAS NEGATIVE 0734 02022 000000 HLT ERROR 0735 02023 0 01 02025 JMP *+2 0736 02024 000000 HLT ERROR 0737 02025 0 01 02004 JMP DV22 0738 02026 140040 DV3 CRA 0739 02027 0 04 01606 STA QTNT 0740 02030 0 02 01607 LDA DVSR 0741 02031 0 06 01600 ADD CNST 0742 02032 0 04 01607 STA DVSR 0743 02033 0 12 00000 DV4 IRS 0 0744 02034 0 12 00000 IRS 0 0745 02035 0 01 02037 JMP *+2 0746 02036 0 01 02046 JMP JLCK 0747 02037 0 12 01577 IRS T1 0748 02040 0 01 01757 JMP DV2 0749 02041 0 02 01613 LDA K2