JMP INIT4 YES,INVALID LDA TEMP7 NO,TRYING TO ADA M4 USE MODULE#>3? SSA JMP INIT7 NO,OK INIT4 EQU * CLB YES,INVALID LDA TEMP0 LOAD BAD ENTRY HLT53 HLT 53B JMP CONF+1 TRY AGAIN CONF2 EQU * LDA TEMP7 ADA M3 TRYING TO USE SSA MODULE #<3? JMP CONF3 YES,INVALID LDA TEMP7 NO ADA M16 TRYING TO USE SSA MODULE #>15(OCTAL)? JMP INIT7 NO,OK CONF3 EQU * CLB YES,INVALID LDA TEMP0 LOAD BAD ENTRY HLT52 HLT 52B JMP CONF+1 TRY AGAIN INIT7 EQU * LDA TEMP0 STORE CURRENT AND MASK6 CONTROL STORE ALF MODULE # STA MOD LDA IOTAB STA TEMP0 INIT3 EQU * LDA TEMP0 FORM LDB A,I SELECT LDA B,I CODE AND MASK4 INTO IOR SC APPLICABLE STA B,I I/O LDB TEMP0 INSTRUCTIONS INB STB TEMP0 CPB IOEND RSS JMP INIT3 JMP CONF,I HED ERROR AND MESSAGE TABLES,WORK BUFFER * * * ERROR TABLE * * ORG 4000B ERTAB DEF *+1 NOP HEADING DEF E001+1 E001 DEF E002+1 E002 DEF E003+1 E003 DEF E004+1 E0XX XX=STEP #(4 THRU 16) DEF E005+1 E0YY YY=STEP #(17 THRU 22) NOP H030 DEF E007+1 E0ZZ ZZ=STEP #(17 THRU 22) NOP PASS COUNT MESSAGE NOP H031 DEF E010+1 E016 * * * MESSAGE TABLE * * TABLE DEF *+1 DEF MSG0 DEF MSG1 DEF MSG2 DEF MSG3 MS4 DEF MSG4 DEF MSG5 DEF MSG6 DEF MSG7 DEF MSG8 DEF MSG9 DEF MSG10 * * * WORK AREA FOR MESSAGE PARAMETERS * * OCTA1 BSS 1 OCTA2 BSS 2 OCTA3 BSS 3 HED 2100 MICROCODE MODIFICATION TABLE * * * 2100 MICROCODE MODIFICATION TABLE * * MI00A OCT 377 JMP *+16 MI00B OCT 27420 OCT 777 JMP TSTM1 OCT 27430 OCT 1377 JMP TSTM2 OCT 27540 OCT 1777 JMP FORM OCT 27775 OCT 2377 JMP FORM OCT 27775 OCT 2777 JMP LOOP OCT 27700 OCT 3375 JMP *+256 OCT 37406 OCT 3775 JMP *+256 OCT 37407 OCT 4375 JMP *+256 OCT 37410 OCT 4775 JMP *+256 OCT 37411 OCT 5375 JMP *+256 OCT 37412 OCT 5777 JMP *+512 OCT 37413 OCT 6377 JMP *+512 OCT 37414 OCT 6777 JMP *+512 OCT 37415 OCT 7377 JMP *+512 OCT 37416 OCT 7777 JMP *+512 OCT 37417 OCT 40377 JMP GOOF OCT 27640 OCT 40777 JMP TSTM3 OCT 27600 OCT 41377 JMP GOOF OCT 27640 OCT 41777 JMP GOOF OCT 27640 OCT 42377 JMP GOOF OCT 27640 OCT 42777 JMP GOOF OCT 27640 OCT 43377 JMP TSTM3 OCT 27600 OCT 43777 JMP GOOF OCT 27640 OCT 44377 JMP TSTM3 OCT 27600 OCT 44777 JMP GOOF OCT 27640 OCT 45377 JMP GOOF OCT 27640 OCT 45777 JMP GOOF OCT 27640 OCT 46377 JMP GOOF OCT 27640 OCT 46777 JMP TSTM3 OCT 27600 OCT 47377 JMP GOOF OCT 27640 OCT 47777 JMP TSTM3 OCT 27600 OCT 176755 FORM ADR IOR S1 OCT 173777 OCT 177367 S1 JMP SJMP OCT 27500 HED 21XX MICROCODE MODIFICATION TABLE * * * 21XX MICROCODE MODIFICATION TABLE * * MX00A OCT 320 JMP UNCD TSTM1 OCT 62030 OCT 720 JMP UNCD TSTM2 OCT 64030 OCT 1320 JMP UNCD GOOF OCT 74030 OCT 1720 JMP UNCD GOOF OCT 74030 OCT 2320 JMP UNCD GOOF OCT 74030 OCT 2720 JMP UNCD GOOF OCT 74030 OCT 3320 JMP UNCD GOOF OCT 74030 OCT 3720 JMP UNCD GOOF OCT 74030 OCT 4320 JMP UNCD TSTM3 OCT 77230 OCT 4720 JMP UNCD GOOF OCT 74030 OCT 5320 JMP UNCD GOOF OCT 74030 OCT 5720 JMP UNCD GOOF OCT 74030 OCT 6320 JMP UNCD GOOF OCT 74030 OCT 6720 JMP UNCD GOOF OCT 74030 OCT 7320 JMP UNCD LOOP OCT 70030 OCT 7720 JMP UNCD TSTM3 OCT 77230 X375A OCT 176720 JMP CNDX TBZ OUT OCT 77771 HED MESSAGES * * * MESSAGES * * SUP MSG0 OCT 6412 ASC 11,12908 WCS DIAGNOSTIC / MSG1 ASC 11,E001 IO BUS NOT CLEAR/ MSG2 ASC 09,E002 NO DMA FLAG / MSG3 ASC 08,E003 NO DMA INT/ MSG4 ASC 01,E0 PM4AA BSS 1 ASC 08, BAD COMPARISON OCT 6412 ASC 12,MODULE DATA DATA OCT 6412 ASC 14,ADDRESS READ WRITTEN OCT 6412 OCT 6412 PM4A BSS 3 OCT 20040 PM4B BSS 5 OCT 20040 PM4C BSS 5 PM4CE ASC 01, / MSG5 ASC 01,E0 PM5 BSS 1 ASC 04, NO MAC/ MSG6 OCT 6412 ASC 04,H030 MOD PM6A BSS 1 ASC 02,,TST PM6B BSS 1 ASC 03,,STEP PM6C BSS 1 ASC 01, / MSG7 ASC 01,E0 PM7 BSS 1 ASC 05, BAD MAC / MSG8 ASC 03,PASS PM8 BSS 3 PM8A ASC 01, / MSG9 ASC 05,H031 MAC= PM9A BSS 3 OCT 6412 ASC 02, A= PM9B BSS 3 ASC 06, SHOULD BE= PM9C BSS 3 OCT 6412 ASC 02, B= PM9D BSS 3 ASC 06, SHOULD BE= PM9E BSS 3 ASC 01, / MSG10 ASC 09,E016 DMA NOT COMP/ HED 2100 DIAGNOSTIC MICROCODE AREA * * * 2100 MICROPROGRAM AREA * * X2100 EQU * MA000 OCT 377 JMP *+16 OCT 27420 MA001 OCT 777 JMP TSTM1 OCT 27430 MA002 OCT 1377 JMP TSTM2 OCT 27540 MA003 OCT 1777 JMP FORM OCT 27775 MA004 OCT 2377 JMP FORM OCT 27775 MA005 OCT 2777 JMP LOOP OCT 27700 MA006 OCT 3375 JMP *+256 OCT 37406 MA007 OCT 3775 JMP *+256 OCT 37407 MA010 OCT 4375 JMP *+256 OCT 37410 MA011 OCT 4775 JMP *+256 OCT 37411 MA012 OCT 5375 JMP *+256 OCT 37412 MA013 OCT 5777 JMP *+512 OCT 37413 MA014 OCT 6377 JMP *+512 OCT 37414 MA015 OCT 6777 JMP *+512 OCT 37415 MA016 OCT 7377 JMP *+512 OCT 37416 MA017 OCT 7777 JMP *+512 OCT 37417 MA020 OCT 10377 CJMP OUT OCT 47730 MA021 OCT 10771 CR IOR A 0 OCT 177000 MA022 OCT 11373 CL IOR A 0 OCT 177000 MA023 OCT 11777 CJMP 0 OCT 47730 MA024 OCT 12371 CR IOR B 0 OCT 176400 MA025 OCT 12773 CL IOR B 0 OCT 176400 MA026 OCT 13377 IOR EOP OCT 177775 MA027 OCT 13777 IOR OCT 177777 MA030 OCT 14377 TSTM1 IOR EOP OCT 177775 MA031 OCT 14777 IOR OCT 177777 MA032 OCT 15377 IOR OCT 177777 OCT 15777 IOR OCT 177777 OCT 16377 IOR OCT 177777 OCT 16777 IOR OCT 177777 OCT 17377 IOR OCT 177777 OCT 17777 IOR OCT 177777 OCT 20377 IOR OCT 177777 OCT 20777 IOR OCT 177777 OCT 21377 IOR OCT 177777 OCT 21777 IOR OCT 177777 OCT 22377 IOR OCT 177777 OCT 22777 IOR OCT 177777 OCT 23377 IOR OCT 177777 OCT 23777 IOR OCT 177777 OCT 24377 IOR OCT 177777 OCT 24777 IOR OCT 177777 OCT 25377 IOR OCT 177777 OCT 25777 IOR OCT 177777 OCT 26377 IOR OCT 177777 OCT 26777 IOR OCT 177777 OCT 27377 IOR OCT 177777 OCT 27777 IOR OCT 177777 OCT 30377 IOR OCT 177777 OCT 30777 IOR OCT 177777 OCT 31377 IOR OCT 177777 OCT 31777 IOR OCT 177777 OCT 32377 IOR OCT 177777 OCT 32777 IOR OCT 177777 OCT 33377 IOR OCT 177777 OCT 33777 IOR OCT 177777 MA070 OCT 34377 CJMP OUT OCT 47730 MA071 OCT 34771 CR IOR A 0 OCT 177000 MA072 OCT 35373 CL IOR A 0 OCT 177000 MA073 OCT 35777 CJMP OUT OCT 47730 MA074 OCT 36371 CR IOR B 0 OCT 176400 MA075 OCT 36773 CL IOR B 0 OCT 176400 MA076 OCT 37377 IOR EOP OCT 177775 MA077 OCT 37777 IOR OCT 177777 MA100 OCT 40377 JMP GOOF OCT 27640 MA101 OCT 40777 JMP TSTM3 OCT 27600 MA102 OCT 41377 JMP GOOF OCT 27640 MA103 OCT 41777 JMP GOOF OCT 27640 MA104 OCT 42377 JMP GOOF OCT 27640 MA105 OCT 42777 JMP GOOF OCT 27640 MA106 OCT 43377 JMP TSTM3 OCT 27600 MA107 OCT 43777 JMP GOOF OCT 27640 MA110 OCT 44377 JMP TSTM3 OCT 27600 MA111 OCT 44777 JMP GOOF OCT 27640 MA112 OCT 45377 JMP GOOF OCT 27640 MA113 OCT 45777 JMP GOOF OCT 27640 MA114 OCT 46377 JMP GOOF OCT 27640 MA115 OCT 46777 JMP TSTM3 OCT 27600 MA116 OCT 47377 JMP GOOF OCT 27640 MA117 OCT 47777 JMP TSTM3 OCT 27600 OCT 50377 IOR OCT 177777 OCT 50777 IOR OCT 177777 OCT 51377 IOR OCT 177777 OCT 51777 IOR OCT 177777 OCT 52377 IOR OCT 177777 OCT 52777 IOR OCT 177777 OCT 53377 IOR OCT 177777 OCT 53777 IOR OCT 177777 MA130 OCT 54377 CJMP OUT OCT 47730 MA131 OCT 54771 CR IOR A 0 OCT 177000 MA132 OCT 55373 CL IOR A 0 OCT 177000 MA133 OCT 55777 CJMP OUT OCT 47730 MA134 OCT 56371 CR IOR B 0 OCT 176400 MA135 OCT 56773 CL IOR B 0 OCT 176400 MA136 OCT 57377 IOR EOP OCT 177775 MA137 OCT 57777 IOR OCT 177777 MA140 OCT 60371 TSTM2 CR IOR A 0 OCT 177000 MA141 OCT 60774 P INC P EOP OCT 114375 MA142 OCT 61377 IOR OCT 177777 OCT 61777 IOR OCT 177777 OCT 62377 IOR OCT 177777 OCT 62777 IOR OCT 177777 OCT 63377 IOR OCT 177777 OCT 63777 IOR OCT 177777 OCT 64377 IOR OCT 177777 OCT 64777 IOR OCT 177777 OCT 65377 IOR OCT 177777 OCT 65777 IOR OCT 177777 OCT 66377 IOR OCT 177777 OCT 66777 IOR OCT 177777 OCT 67377 IOR OCT 177777 OCT 67777 IOR OCT 177777 OCT 70377 IOR OCT 177777 OCT 70777 IOR OCT 177777 OCT 71377 IOR OCT 177777 OCT 71777 IOR OCT 177777 OCT 72377 IOR OCT 177777 OCT 72777 IOR OCT 177777 OCT 73377 IOR OCT 177777 MA167 OCT 73777 IOR OCT 177777 MA170 OCT 74377 CJMP OUT OCT 47730 MA171 OCT 74771 CR IOR A 0 OCT 177000 MA172 OCT 75373 CL IOR A 0 OCT 177000 MA173 OCT 75777 CJMP OUT OCT 47730 MA174 OCT 76371 CR IOR B 0 OCT 176400 MA175 OCT 76773 CR IOR B 0 OCT 176400 MA176 OCT 77377 IOR EOP OCT 177775 MA177 OCT 77777 IOR OCT 177777 MA200 OCT 100010 TSTM3 A RRS AND S1 OCT 143777 MA201 OCT 100466 B S1 AND A OCT 147377 MA202 OCT 101054 B ADR AND B EOP OCT 146775 MA203 OCT 101774 P INC P OCT 114377 OCT 102377 IOR OCT 177777 OCT 102777 IOR OCT 177777 OCT 103377 IOR OCT 177777 OCT 103777 IOR OCT 177777 OCT 104377 IOR OCT 177777 OCT 104777 IOR OCT 177777 OCT 105377 IOR OCT 177777 OCT 105777 IOR OCT 177777 OCT 106377 IOR OCT 177777 OCT 106777 IOR OCT 177777 OCT 107377 IOR OCT 177777 OCT 107777 IOR OCT 177777 OCT 110377 IOR OCT 177777 OCT 110777 IOR OCT 177777 OCT 111377 IOR OCT 177777 OCT 111777 IOR OCT 177777 OCT 112377 IOR OCT 177777 OCT 112777 IOR OCT 177777 OCT 113377 IOR OCT 177777 OCT 113777 IOR OCT 177777 MA230 OCT 114377 CJMP OUT OCT 47730 MA231 OCT 114771 CR IOR A 0 OCT 177000 MA232 OCT 115373 CL IOR A 0 OCT 177000 MA233 OCT 115777 CJMP OUT OCT 47730 MA234 OCT 116371 CR IOR B 0 OCT 176400 MA235 OCT 116773 CL IOR B 0 OCT 176400 MA236 OCT 117377 IOR EOP OCT 177775 MA237 OCT 117777 IOR OCT 177777 MA240 OCT 120371 GOOF CR IOR S1 252 OCT 173652 MA241 OCT 120773 CL IOR A 252 OCT 177252 MA242 OCT 121027 A S1 IOR A OCT 177377 MA243 OCT 121437 A IOR B EOP OCT 176775 MA244 OCT 122374 P INC P OCT 114377 OCT 122777 IOR OCT 177777