STA HSCNT STA BCCNT STA CRCNT STA ECODE * ***** MAKE CR READY * LIA03 LIA *-* AND MSK01 CLB CPA STS00 LDB ERC90 CPA STS01 LDB ERC91 CPA STS02 LDB ERC92 CPA STS03 JMP DRD10 CPA STS06 JMP DRD10 LDA 1B SZB,RSS LDA ERC93 JMP DMARD,I * * ***** SET UP READ * DRD10 CLB LDA DMACW OTA DMACC LDA IWADD CCE RAL,ERA CLC DMAAC OTA DMAAC LDA ECCNT STC DMAAC OTA DMAAC OTB05 OTB *-* STC DMACC,C SCC02 STC *-*,C * ***** MONITOR READ * DRD11 SFC DMACC 2T 1T+1C JMP DRD31 SFS01 SFS *-* JMP *+2 SFS02 SFS *-* JMP *+2 SFS03 SFS *-* JMP *+2 2T 1T+1C JMP DRD12 CR OFF LIA DMAAC 2T 1T+1C CPA DMACT 2T 2T JMP *+8 2T 1T+1C LDA IWPTR,I 3T 3T SSA,RSS 2T 1T+1C JMP DRD94 LDA OLT01,I 4T 5T-1C LDA TTM09,I 9T 9T ADB P0002 2T 2T JSB DWLOG LOG IN DATA WORD CLE 2T 1T+1C LDA 1B 2T 2T ADA READT 2T 2T SEZ 2T 1T+1C JMP DRD99 READ TIMED OUT LDA OLT10,I 4T 14T-10C LDA OLT01,I 4T 5T-1C LDA TTM04,I 4T 4T ADB P0004 2T 2T JMP DRD11 2T 1T+1C * 30T 30T * * *****PROCESS CARD READER FLAG * * DRD12 SFC DMACC 2T 1T+1C JMP DRD30 LIA DMAAC 2T 1T+1C CPA DMACT 2T 2T JMP *+2 2T 1T+1C JMP DRD98 UP TO DATE ERROR CPA ECCNT 2T 2T JMP DRD13 2T 1T+1C JMP DRD14 PARRALLEL TO ABOVE * ***** PROCESS CR FLAG ON 1ST WORD * LIA04 EQU * DRD13 LIA *-* 2T 1T+1C AND MSK01 2T 2T CPA STS03 2T 2T JMP DRD61 LDA 0B 2T 2T JMP DRD15 2T 1T+1C * ***** PROCESS CR FLAG ON SUBSEQUENT WORD * LIA05 EQU * DRD14 LIA *-* 2T 1T+1C AND MSK01 2T 2T CPA STS04 2T 2T JMP DRD71 CPA STS06 2T 2T JMP DRD75 JMP DRD15 2T 1T+1C * ***** PROCESS NON-DMA DATA WORD * DRD15 STF DMACC 2T 1T+1C LIA06 LIA *-* 2T 1T+1C STA IWPTR,I 3T 3T JSB DWLOG 2T 1T+1C (SIMULATED) LDA CYCNT 2T 2T ADA N0001 2T 2T STA CYCNT 2T 2T LDA IWPTR 2T 2T CCE 2T 1T+1C RAL,ERA 2T 1T+1C CLC DMAAC 2T 1T+1C OTA DMAAC 2T 1T+1C LIA DMAAC 2T 1T+1C ADA P0001 2T 2T SZA,RSS 2T 1T+1C JMP DRD16 STC DMAAC 2T 1T+1C OTA DMAAC 2T 1T+1C LDA CRCNT 2T 2T ADA P0001 2T 2T STA CRCNT 2T 2T CLF01 CLF *-* STC DMACC,C 2T 1T+1C LDA OLT10,I 4T 14T-10C LDA OLT10,I 4T 14T-10C LDA OLT03,I 4T 7T-3C LDA TTM11,I 11T 11T ADB P0010 2T 2T JMP DRD11 2T 1T+1C * ***** PROCESS NON DMA WORD NEXT TO LAST * DRD16 LDA OLT09,I 4T 13T-9C LDA TTM08,I 8T 8T ADB P0003 2T 2T JMP DRD34 2T 1T+1C * 100T 100T * * ****** PROCESS DMA OFF CONDITION * * DRD30 LDA OLT04,I 4T 8T-4C LDA TTM06,I 6T 6T ADB P0002 2T 2T * 20T 20T * * * DRD31 LIA DMAAC 2T 1T+1C SZA 2T 1T+1C JMP DRD97 CPA DMACT 2T 2T JMP *+5 2T 1T+1C ADA N0001 CPA DMACT JMP *+4 JMP DRD98 LDA TTM04,I 4T 4T CCA,RSS 2T 1T+1C CLA ADA IWPTR 2T 2T LDA 0B,I 3T 3T SSA,RSS 2T 1T+1C JMP DRD95 * * * SFS04 EQU * DRD32 SFS *-* 2T 1T+1C JMP *+2 SFS05 SFS *-* 2T 1T+1C JMP *+2 JMP DRD33 LDA OLT04,I 4T 8T-4C LDA TTM06,I 6T 6T ADB P0002 2T 2T JMP DRD32 2T 1T+1C * ***** RESET DMA IF EXTRA CHARACTERS * LIA07 EQU * DRD33 LIA *-* 2T 1T+1C AND MSK01 2T 2T CPA STS04 2T 2T JMP DRD71 CPA STS06 2T 2T JMP DRD75 LIA08 EQU * LIA *-* 2T 1T+1C STA IWPTR,I 3T 3T JSB DWLOG 2T 1T+1C (SIMULATED) LDA CRCNT 2T 2T ADA P0001 2T 2T STA CRCNT 2T 2T * * * DRD34 LDA FLCNT ADA N0128 SSA 2T 1T+1C JMP DRD96 LDA EXCNT 2T 2T STC DMAAC 2T 1T+1C OTA DMAAC 2T 1T+1C CLF02 CLF *-* 2T 1T+1C STC DMACC,C 2T 1T+1C LDA OLT10,I 4T 14T-10C LDA OLT08,I 4T 12T-8C LDA 0B 2T 2T ADB P0008 2T 2T JMP DRD11 2T 1T+1C * * ***** SUBROUTINE TO LOG IN DATA WORD FROM DMA * * DWLOG NOP LDA IWPTR,I 3T 3T XOR RWPTR,I 3T 3T STA SCRW1 2T 2T CPA NZERO 2T 2T JMP *+3 LDA P0001 2T 2T JMP *+2 2T 1T+1C LDA NZERO ADA BWCNT 2T 2T STA BWCNT 2T 2T LDA SCRW1 2T 2T AND MSK01 2T 2T CPA NZERO 2T 2T JMP *+3 LDA P0001 2T 2T JMP *+2 2T 1T+1C LDA NZERO ADA BSCNT 2T 2T STA BSCNT 2T 2T LDA SCRW1 2T 2T AND MSK01 2T 2T CPA STS02 2T 2T JMP *+3 LDA NZERO 2T 2T JMP *+2 2T 1T+1C LDA P0001 ADA HSCNT 2T 2T STA HSCNT 2T 2T LDA SCRW1 2T 2T AND MSK03 2T 2T CPA NZERO 2T 2T JMP *+3 LDA P0001 2T 2T JMP *+2 2T 2T LDA NZERO ADA BCCNT 2T 2T STA BCCNT 2T 2T * 60T 56T+4C * * LDA CYCNT 2T 2T ADA P0001 2T 2T CPA P0010 2T 2T JMP *+3 2T 1T+1C LDA TTM04,I JMP *+3 ADB P0001 2T 2T LDA NZERO 2T 2T STA CYCNT 2T 2T * 14T 13T+1C * * LDA IWPTR 2T 2T ADA P0001 2T 2T STA IWPTR 2T 2T LDA RWPTR 2T 2T ADA P0001 2T 2T STA RWPTR 2T 2T LDA FLCNT 2T 2T ADA P0001 2T 2T STA FLCNT 2T 2T LDA DMACT 2T 2T ADA P0001 2T 2T STA DMACT 2T 2T * 20T 20T * * LDA OLT05,I 4T 9T-5C LDA TTM07,I 7T 7T ADB P0011 2T 2T JMP DWLOG,I 3T 2T+1C * 16T 16T-4C * * TOTAL 112T 111T+1C * * UNCORRECTED(JSB=JMP) 2T 1T+1C * * * ***** ERROR CODE PROCESSING * * ***** PICK FAIL DRD61 LDA ERC80 JMP DMARD,I * ***** EOD PROCESSING * DRD71 STF DMACC LIA09 LIA *-* STA IWPTR,I JSB DWLOG ADB N0011 LDA CRCNT ADA P0001 STA CRCNT LDA BWCNT CPA HSCNT JMP *+3 LDA BWCNT JMP *+3 LDA BCCNT STA BWCNT SZA JMP *+3 LDA ERC02 JMP DRD72 LDA ERC03 JMP DMARD,I * ***** EOC PROCESSING * DRD75 STF DMACC LIA10 LIA *-* STA IWPTR,I JSB DWLOG ADB N0011 LDA CRCNT ADA P0001 STA CRCNT LDA BWCNT SZA LDA ERC01 JMP DRD72 * ***** READ TIMED OUT * DRD99 LDA ERC99 JMP DMARD,I * ***** UP TO DATE ERROR * DRD98 LDA ERC98 * ***** REPORT DMA HARDWARE PROBLEM * DRD97 LDA ERC97 JMP DMARD,I * ***** REPORT MORE THAN 128 WORDS FOR READ * DRD96 LDA ERC96 JMP DMARD,I * ***** SRQ ERROR WITH DMA ON * DRD94 STF DMACC CLC DMACC * ***** SRQ ERROR WITH DMA OFF * CLC03 EQU * DRD95 CLC *-* LDA ERC95 JMP DMARD,I * SAVCD OCT 0 * DRD72 STA SAVCD SAVE CODE LDA CRCNT CPA FLCNT CRCNT=FLCNT? JMP *+2 YES, CHANGE ERROR CODE JMP *+3 NO, RESTORE ERROR CODE LDA ERC70 JMP DMARD,I LDA SAVCD JMP DMARD,I * HED I/O INSTRUCTION TABLE * CDSTG OCT 102100 STF DEC -3 DEF STF01 DEF STF02 DEF STF03 OCT 000100 SFC DEC -5 DEF SFC01 DEF SFC02 DEF SFC03 DEF SFC04 DEF SFC05 OCT 000100 SFS DEC -12 DEF SFS01 DEF SFS02 DEF SFS03 DEF SFS04 DEF SFS05 DEF SFS06 DEF SFS07 DEF SFS08 DEF SFS09 DEF SFS10 DEF SFS11 DEF SFS12 OCT 000200 LIA DEC -13 DEF LIA01 DEF LIA02 DEF LIA03 DEF LIA04 DEF LIA05 DEF LIA06 DEF LIA07 DEF LIA08 DEF LIA09 DEF LIA10 DEF LIA11 DEF LIA12 DEF LIA13 OCT 000100 OTA DEC -3 DEF OTA01 DEF OTA02 DEF OTA03 OCT 000100 STC DEC -2 DEF STC01 DEF STC02 OCT 000200 CLF DEC -7 DEF CLF01 DEF CLF02 DEF CLF03 DEF CLF04 DEF CLF05 DEF CLF06 DEF CLF07 OCT 000400 LCA DEC -2 DEF LCA01 DEF LCA02 OCT 000200 SCC DEC -4 DEF SCC01 DEF SCC02 DEF SCC03 DEF SCC04 OCT 002700 OTB DEC -4 DEF OTB01 DEF OTB02 DEF OTB03 DEF OTB04 OCT 000100 CLC DEC -3 DEF CLC01 DEF CLC02 DEF CLC03 OCT 000000 * HED TEST POINTER TABLE TEST1 DEF ANN01 DEF INP01 DEF TST01 DEF ER001 DEF ER201 DEF ER301 DEF ER401 DEF ER501 DEF ER601 DEF ER701 DEF ER801 DEF ER901 DEF E1001 DEF E1101 DEF E1201 DEF E1301 DEF E1401 DEF E1501 TEST2 DEF ANN02 DEF INP02 DEF TST02 DEF ER101 DEF ER202 DEF ER302 DEF ER402 TEST3 DEF ANN03 DEF INP03 DEF TST03 DEF ER101 DEF ER202 DEF ER302 DEF ER402 TEST4 DEF ANN04 DEF INP04 DEF TST04 DEF ER101 DEF ER202 DEF ER302 DEF ER402 TEST5 DEF ANN05 DEF INP05 DEF TST05 DEF ER101 DEF ER202 DEF ER302 DEF ER402 TEST6 DEF ANN06 DEF INP02 DEF TST06 DEF ER101 DEF ER202 DEF ER302 DEF ER402 DEF ER206 DEF ER306 DEF ER406 DEF ER506 DEF ER606 TEST7 DEF ANN07 DEF INP07 DEF TST07 DEF ER101 DEF ER207 DEF ER307 TEST9 DEF ANN08 DEF ER402 DEF TST09 DEF ER108 DEF ER208 DEF ER308 TEST8 DEF ANN09 DEF INP09 DEF TST08 DEF ER101 DEF ER209 HED MESSAGES * * ANN01 ASC 13,TEST 1. INTERFACE CHECK./ INP01 ASC 24,REMOVE MARK READER'S CONNECTOR FROM INTERFACE./ ER001 ASC 22,TEST OKAY. REPLACE MARK READER'S CONNECTOR./ ER101 ASC 6,TEST OKAY./ ER201 ASC 15,SFS AND SFC GIVE SAME RESULT./ ER301 ASC 11,FLAG NOT SET BY STF./ ER401 ASC 13,FLAG NOT CLEARED BY CLF./ ER501 ASC 14,CLC DOES NOT CLEAR CONTROL./ ER601 ASC 13,STC DOES NOT SET CONTROL./ ER701 ASC 13,PRESET DOES NOT SET FLAG./ ER801 ASC 16,PRESET DOES NOT CLEAR CONTROL./ ER901 ASC 22,PRESET DOES NOT SET FLAG OR CLEAR CONTROL./ E1001 ASC 22,CONTENTS OF CENTRAL INTERRUPT REGISTER BAD./ E1101 ASC 17,DEVICE COMMAND DOES NOT SET FLAG./ E1201 ASC 8,BITS STUCK ON./ E1301 ASC 8,BITS STUCK OFF./ E1401 ASC 10,STATUS BITS LATCH./ E1501 ASC 9,DATA BITS FLOAT./ AIOT1 ASC 12,PRESS (EXTERNAL) PRESET/ AIOT2 ASC 12,INSTALL TEST CONNECTOR/ ANN02 ASC 19,TEST 2. READ CLOCK-AFTER-DATA CHECK:/ INP02 ASC 14,PLACE 40-50 CLOCK-AFTER-DATA ASC 16, CARDS IN HOPPER (02760-9067)./ ER202 ASC 11,LAST CARD IN DECK HAD ER302 ASC 6,BAD WORDS./ ER402 ASC 1,_ ANN03 ASC 17,TEST 3. READ CLOCK-ON-DATA CHECK:/ INP03 ASC 16,PLACE 40-50 CLOCK-ON-DATA CARDS ASC 13,IN HOPPER (09869-90130)./ ANN04 ASC 24,TEST 4. (OPTION 3) READ 40 COL. NO CLOCK CHECK:/ INP04 ASC 14,PLACE 40-50 40-COL.-NO-CLOCK ASC 16, CARDS IN HOPPER (09869-90120)./ ANN05 ASC 24,TEST 5. (OPTION 3) READ 80 COL. NO CLOCK CHECK:/ INP05 ASC 14,PLACE 40-50 80-COL.-NO-CLOCK ASC 16, CARDS IN HOPPER (07261-90140)./ ANN06 ASC 15,TEST 6. READ USING DMA CHECK:/ ER206 ASC 12,DMA LOG NOT UP TO DATE./ ER306 ASC 11,DMA HARDWARE PROBLEM./ ER406 ASC 15,MORE THAN 128 WORDS IN READ./ ER506 ASC 21,DMA CANNOT OPERATE WITH THIS SELECT CODE./ ER606 ASC 14,SRQ DETECTED WHEN BIT 15=0./ ANN07 ASC 25,TEST 7. (OPTION 2) SELECT HOPPER CAPACITY CHECK:/ INP07 ASC 22,PLACE 40-50 OF ANY TYPE OF CARDS IN HOPPER./ HOPHD ASC 12,HOPPER HOLDS # CARDS./ ER207 ASC 10,COUNT IS TOO SMALL./ ER307 ASC 10,COUNT IS TOO LARGE./ ANN09 ASC 13,TEST 8. PICK FAIL CHECK./ INP09 ASC 22,PLACE 40-50 OF ANY TYPE OF CARDS IN HOPPER. OCT 006412 ASC 17,FORCE PICK FAIL BY HOLDING CARDS./ ER209 ASC 12,THERE WAS NO PICK FAIL./ ANN08 ASC 18,TEST 9. (OPTION 4) LISTEN FOR BELL./ ER108 ASC 15,IF BELL HONKS ALL TESTS OKAY./ ER208 ASC 17,IF BELL HONKS TEST OKAY, HOWEVER, ROPER OCT 0 ASC 15, ERRORS DETECTED BEFORE BELL./ TIMES ASC 12,READ TIME: # MILLISEC./ ER308 ASC 13,IF BELL HONKS TEST OKAY./ AFLCM ASC 9,BAD FLAG COUNT: # ACRLF ASC 1,/ STM01 ASC 14,CK POWER, HOPPER, STACKER./ STM02 ASC 10,SELECT HOPPER FULL./ STM03 ASC 7,PRESS READY./ STM04 ASC 6,PICK FAIL./ STM05 ASC 11,ILLEGAL READY STATUS./ STM06 ASC 14,READ EXCEEDED TIME ALLOWED./ MHEAD ASC 6,DATA WORDS _* CMES1 ASC 13,WITH ANY TYPE OF ERRORS:#/ CMES2 ASC 13,WITH ANY BAD STATUS: #/ CMES3 ASC 13,WITH BAD HOPPERS STATUS:#/ CMES4 ASC 13,WITH BAD CHARACTERS: #/ CMES5 ASC 13,TRANSFERRED WITHOUT DMA:#/ HED COMPARISON FILES * COMPARISON FILES: * * TEST 3. CLOCK ON DATA * TEST 4. 40 COLUMN NO CLOCK ACFL1 OCT 160010 OCT 162041 OCT 160020 OCT 160040 OCT 160100 OCT 160200 OCT 160400 OCT 161000 OCT 162000 OCT 164000 OCT 160000 OCT 164000 OCT 162000 OCT 162041 OCT 161000 OCT 160400 OCT 160200 OCT 160100 OCT 160040 OCT 160020 OCT 160010 OCT 160010 OCT 160000 OCT 160010 OCT 160201 OCT 160000 OCT 160020 OCT 160000 OCT 160002 OCT 160010 OCT 160201 OCT 160002 OCT 160020 OCT 160000 OCT 160000 OCT 160000 OCT 160002 OCT 160010 OCT 160004 OCT 160004 OCT 060000 * * TEST 2. CLOCK AFTER DATA ACFL2 OCT 167777 OCT 160000 OCT 160001 OCT 160002 OCT 160004 OCT 160010 OCT 160020 OCT 160040 OCT 160100 OCT 160200 OCT 160400 OCT 161000 OCT 162000 OCT 164000 OCT 167776 OCT 167775 OCT 167773 OCT 167767 OCT 167757 OCT 167737 OCT 167677 OCT 167577 OCT 167377 OCT 166777 OCT 165777 OCT 163777 OCT 162525 OCT 165252 OCT 162525 OCT 165252 OCT 162525 OCT 165252 OCT 162525 OCT 165252 OCT 162525 OCT 165252 OCT 162525 OCT 165252 OCT 162525 OCT 165252 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 060000 * * TEST 5. 80 COLUMN NO CLOCK. ACFL4 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 164001 OCT 160002 OCT 160004 OCT 160010 OCT 160020 OCT 160040 OCT 160100 OCT 160200 OCT 160400 OCT 161000 OCT 162000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 160000 OCT 164001 OCT 060000 ADAFL BSS 200B SLIST BSS 30B END