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

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

0179 * NOTE: THE WORD COUNT CONSISTS OF THE TOTAL NUMBER OF 0180 * WORDS ENCOUNTERED WHILE PUNCHING A BLOCK INCLUDING ALL 0181 * ZERO WORDS. 0182 * 0183 * 0184 * 0185 ************************************************************************ 0186 REL 0187 EXD ENTER EXTENDED MODE 0188 * LOAD A WITH DEVICE CODE 0189 00000 000013 EXA ENABLE EXTENDED ADDRESSING 0190 00001 0 04 00460 STA CODE SAVE DEVICE CODE 0191 00002 140040 BEGN CRA 0192 00003 000000 HLT ENTER FIRST ADDRESS 0193 00004 0 04 00444 STA FADD SAVE IT 0194 00005 140040 CRA 0195 00006 000000 HLT ENTER LAST ADDRESS 0196 00007 0 04 00445 STA LADD SAVE IT 0197 00010 0 02 00460 LDA CODE PICK UP DEVICE CODE 0198 00011 101400 SMI IS ASR-33 IN USE 0199 00012 0 01 00033 JMP TE35 NO. 0200 00013 140040 CRA 0201 00014 0 04 00461 STA PON 0202 00015 0 04 00462 STA RUB 0203 00016 0 02 00427 SOCP LDA EASR 0204 00017 0 04 00056 STA EPNC 0205 00020 0 02 00430 LDA PASR REPLACE OTA '2 WITH OTA '4 0206 00021 0 04 00412 SOTA STA TPON+2 SET OTA'S 0207 00022 0 04 00415 STA TPON+5 SET OTA'S 0208 00023 0 04 00131 STA BGBL+5 SET OTA'S 0209 00024 0 04 00271 STA XOF+2 SET OTA'S 0210 00025 0 04 00274 STA XOF+5 SET OTA'S 0211 00026 0 04 00071 STA LLOP+1 SET OTA'S 0212 00027 0 04 00363 STA OK+1 SET OTA'S 0213 00030 0 04 00375 STA P+2 SET OTA'S 0214 00031 0 04 00117 STA ORUB+1 SET OTA'S 0215 00032 0 01 00052 JMP CONT 0216 00033 0416 77 TE35 ALR 1 TEST FOR ASR-35 0217 00034 101400 SMI IS ASR-35 IN USE 0218 00035 0 01 00043 JMP HISP NO. 0219 00036 0 02 00473 LDA ='222 0220 00037 0 04 00461 STA PON INITIALIZE PUNCH 0221 00040 0 02 00472 LDA ='377 AND RUBOUT CODES 0222 00041 0 04 00462 STA RUB 0223 00042 0 01 00016 JMP SOCP 0224 00043 140040 HISP CRA HIGH SPEED PUNCH IN USE 0225 00044 0 04 00461 STA PON 0226 00045 0 04 00462 STA RUB 0227 00046 0 02 00431 LDA EBRP OCP '2 0228 00047 0 04 00056 STA EPNC