|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 36466 (0x8e72)
Notes: pts_type(SC)
Names: »DRLT01.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/DRLT01.SC«
IDENT DRLT01 REL 9.2 79-11-16 870105040920 =8,TIMER RESET,TEST ORDER,INH-A15 REL 9.1 79-05-23 =7,CLT010 DUBLE DEF LABEL, RB - ABL PRR 9.1 79-05-14 =6,CWT ADRESS ERROR A5 - A1 PRR 9.1 79-04-25 =5,GETLIN CORRECTED REL 9.1 79-04-06 =1-4, GEN UPDATE TO 8.2+ STATUS REL 8.2 79-04-02 =4,TIMER RESET CORRECTED REL 8.2 79-03-22 =3,NAK HANDLING CORRECTED REL 8.2 79-03-16 =2,IMPROV. OF TEST ORDER REL 8.2 79-01-11 =1,DISPL.RECV,NAK ERROR,ERR. RETRYCNT REL 8.2 78-09-15 * * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRLT01 = DRIVER CHANNEL UNIT * FOR LOCAL TERMINALS * * * * * ********************************************* * * THIS IS THE CHANNEL UNIT DRIVER FOR LOCAL TERMINALS. * AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA * INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER * FOR ACTUAL DEVICE. * IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS * ARE CARRIED OUT. * * THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES:- * * - OUTLIN SEND ONE CHARACTER VIA CHLT * * - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM * * - GETCHR GET ONE CHARACTER FROM ECB-BUFFER * * CONTROL WORK TABLES FOR THE CHANNELS ARE * INCLUDED IN THE DRIVER. EJECT * * * * THE FOLLOWING FUNCTIONS ARE ALSO INCLUDED IN THE DRIVER:- * * - OUTPUT SEND ONE CHARACTER, SAVE A3-A5 AND RETURN TO DISPATCHER * * - STREG SAVE A3-A5 AND RETURN TO DISPATCHER * * - LDREG IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN * TO USER VIA A5 * * - LDREGE RESTORE A3-A5 AND RETURN TO USER VIA A5 * * * * NORMAL REGISTER USAGE IN THE DRIVER:- * * A1 = RETURN CODE * A2 = INPUT WORD * A3 = LINE NUMBER * 2 * A4 = DEVICE NUMBER * 2 * A5 = CWT-ADDRESS * A6 = DWT-ADDRESS * A7 = ORDER * A8 = ECB-ADDRESS * * * EJECT * *********** * ENTRIES * *********** * * ENTRY CHLT1 INTERRUPT FROM CHLT01 ENTRY CHLT2 INTERRUPT FROM CHLT2 ENTRY CHLT3 INTERRUPT FROM CHLT3 ENTRY CHLT4 INTERRUP FROM CHLT4 ENTRY OUTLIN SEND ONE CHARACTER ENTRY CHLTON START OF CHLT ENTRY OUTPUT SAVE REGISTERS, SEND CHAR. AND DISPATCH ENTRY LDREG RESTORE A3-A5 ANDRETURN ENTRY LDREGE WAY BACK FROM ECHO HANDLING ENTRY LDREGF RETURN ENTRY STREG SAVE REGISTERS A3-A5 IN DWT ENTRY GETCHR GET ONE CHARACTER FROM ECB-BUFFER ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS ENTRY REMFC DUMMY ENTRY ENTRY DWREMU DUMMY ENTRY ENTRY ECHRTN RETURN FROM ECHO ENTRY ECHO ECHO ROUTINE ENTRY ECHEND END OF ECHO * EJECT * ****************************************** * EXTERNAL TOSS MODULE ENTRIES * ****************************************** * * EXTRN SAVE8 SAVE REGISTERS A1-A8 EXTRN TDISP DISPATCHER EXTRN IHRET8 RESTORE A1-A8 EXTRN INTLT1 INTERRUPT TABLE EXTRN INTLT2 INTERRUPT TABLE EXTRN INTLT3 INTERRUPT TABLE EXTRN INTLT4 INTERRUPT TABLE EXTRN SETIME GET TIMER BLOCK EXTRN SETIMP GET TIMER BLOCK EXTRN INTSAV SAVE AREA LAST INTERRUPT EXTRN TENDIO * * *********************************** * DWT PARAMETERS * *********************************** EXTRN DWTST STATUS EXTRN DWTOR ORDER EXTRN DWTOCH LAST OUTPUT CHARACTER EXTRN DWTECB ECB-ADDRESS EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK EXTRN DWTWAT EXTRN DWTOTQ OUTPUT QUEUE EXTRN DWTA3 SAVE AREA A3 EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 EXTRN DWTSB2 STACK BASE 2 IN DWT EXTRN DWTTP TIMER POINTER EXTRN DWTECH ECHO DEVICE DWT EXTRN INTADR INTERRUPT ADDRESS DISPLACEMENT EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT EXTRN ECHADR ECHO ADDRESS DISPLACEMENT * EJECT * ************* * CONSTANTS * ************* * * NOERR EQU 1 RETURN CODE. NOT OPERABLE DUMMSP EQU /03 SPECIAL DUMMY DRQTIM EQU 30 * EJECT * ************************ * CONDITIONAL ASSEMBLY * ************************ * * A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER * MAY BE INCLUDED TO THE DRIVER BY SETTING X:A=1 * X:A EQU 1 LOGING EQU X:A * * THIS DRIVER HANDLES ONE OR UP TO FOUR LOCAL * CHANNELS BY SETTING X:B TO 1,2,3 OR 4 * X:B EQU 1 LOCHAN EQU X:B * * ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND * UNDEFINED CONTROL CHARACTERS ARE UPDATED IN * THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM * DRIVER BY SETTING X:C = 0. * X:C EQU 1 ACKMUL EQU X:C * * BY SETTING X:D = 1 A SOFTWARE TIME OUT HANDLING * MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED * IN THE DRIVER. * AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE * TIME OUT OCCURS IS ALSO INCLUDED. * X:D EQU 1 SOFTIM EQU X:D * * * ECHO FONCTION CAN BE EXCLODED * BY SETTING X:E = 0 X:E EQU 1 CECHO EQU X:E * * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * EJECT RECHAN EQU 0 REMFC EQU 0 CWTRT1 EQU * CWTRT2 EQU * CWTRT3 EQU * CWTRT4 EQU * CWTRT5 EQU * CWTRT6 EQU * CWTRT7 EQU * CWTRT8 EQU * DWREMU EQU * EJECT * * ***************************************************** * C W T L T 1 * ***************************************************** * * CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1 * * DWA1 EQU /03 DEVICEADDRESS * CWTLT1 EQU * TABLE ENTRY CWTLDW EQU *-CWTLT1 LAST OUTPUT DWT-ADDRESS DATA 0 CWTLOW EQU *-CWTLT1 DATA 0 LAST OUTPUT WORD CWTITA EQU *-CWTLT1 ADDRESS TO INTLT1 DATA INTLT1 CWTINR EQU *-CWTLT1 INR INR A2,0,DWA1 CWTOTR EQU *-CWTLT1 OTR OTR A2,0,DWA1 CWTCIS EQU *-CWTLT1 CIO-START CIO A2,1,DWA1 CWTRTC EQU *-CWTLT1 DATA 0 RETRANSMISSION COUNTER CWTEQ EQU *-CWTLT1 END OF QUEUE DATA 0 CWTADD EQU *-CWTLT1 * IFT ACKMUL=1 * DATA 0 NAK-ACKUMULATOR DATA 0 RETR. FAULT-ACKUMULATOR DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR ACKTIM EQU *-CWTLT1 DATA 0 PRINTER TIMEOUT ACKUMULATOR * XIF EJECT * * ***************************************************** * C W T L T 2 * ***************************************************** * * CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2 * CWTLT2 EQU * * IFT LOCHAN=2 DWA2 EQU /13 DEVICE ADDRESS * DATA 0 LAST OUTPUT DWT-ADDRESS DATA 0 LAST OUTPUT WORD DATA INTLT2 INTERRUPT TABLE INR A2,0,DWA2 INR OTR A2,0,DWA2 OTR CIO A2,1,DWA2 CIO-START DATA 0 RETRANSMISSION COUNTER DATA 0 END OF QUEUE * IFT ACKMUL=1 * DATA 0 NAK-ACKUMULATOR DATA 0 RETR. FAULT-ACKUMULATOR DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR DATA 0 PRINTER TIMEOUT ACKUMULATOR * XIF * IFT LOCHAN=2 * EJECT XIF IFT LOCHAN=3 DWA2 EQU /13 DEVICE ADDRESS * DATA 0 LAST OUTPUT DWT-ADDRESS DATA 0 LAST OUTPUT WORD DATA INTLT2 INTERRUPT TABLE INR A2,0,DWA2 INR OTR A2,0,DWA2 OTR CIO A2,1,DWA2 CIO-START DATA 0 RETRANSMISSION COUNTER DATA 0 END OF QUEUE * IFT ACKMUL=1 * DATA 0 NAK-ACKUMULATOR DATA 0 RETR. FAULT-ACKUMULATOR DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR DATA 0 PRINTER TIMEOUT ACKUMULATOR * XIF * * XIF IFT LOCHAN=4 * * * CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.2 * DWA2 EQU /13 DEVICE ADDRESS * DATA 0 LAST OUTPUT DWT-ADDRESS DATA 0 LAST OUTPUT WORD DATA INTLT2 INTERRUPT TABLE INR A2,0,DWA2 INR OTR A2,0,DWA2 OTR CIO A2,1,DWA2 CIO-START DATA 0 RETRANSMISSION COUNTER DATA 0 END OF QUEUE * IFT ACKMUL=1 * DATA 0 NAK-ACKUMULATOR DATA 0 RETR. FAULT-ACKUMULATOR DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR DATA 0 PRINTER TIMEOUT ACKUMULATOR * XIF EJECT * * * CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3 * CWTLT3 EQU * IFT LOCHAN=3 DWA3 EQU /23 DEVICE ADDRESS * DATA 0 LAST OUTPUT DWT-ADDRESS DATA 0 LAST OUTPUT WORD DATA INTLT3 INTERRUPT TABLE INR A2,0,DWA3 INR OTR A2,0,DWA3 OTR CIO A2,1,DWA3 CIO-START DATA 0 RETRANSMISSION COUNTER DATA 0 END OF QUEUE * IFT ACKMUL=1 * DATA 0 NAK-ACKUMULATOR DATA 0 RETR. FAULT-ACKUMULATOR DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR DATA 0 PRINTER TIMEOUT ACKUMULATOR * XIF * * IFT LOCHAN=4 DWA3 EQU /23 DEVICE ADDRESS * DATA 0 LAST OUTPUT DWT-ADDRESS DATA 0 LAST OUTPUT WORD DATA INTLT3 INTERRUPT TABLE INR A2,0,DWA3 INR OTR A2,0,DWA3 OTR CIO A2,1,DWA3 CIO-START DATA 0 RETRANSMISSION COUNTER DATA 0 END OF QUEUE * IFT ACKMUL=1 * DATA 0 NAK-ACKUMULATOR DATA 0 RETR. FAULT-ACKUMULATOR DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR DATA 0 PRINTER TIMEOUT ACKUMULATOR * XIF EJECT * * CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4 * CWTLT4 EQU * * * IFT LOCHAN=4 DWA4 EQU /33 DEVICE ADDRESS * DATA 0 LAST OUTPUT DWT-ADDRESS DATA 0 LAST OUTPUT WORD DATA INTLT4 INTERRUPT TABLE INR A2,0,DWA4 INR OTR A2,0,DWA4 OTR CIO A2,1,DWA4 CIO-START DATA 0 RETRANSMISSION COUNTER DATA 0 END OF QUEUE * IFT ACKMUL=1 * DATA 0 NAK-ACKUMULATOR DATA 0 RETR. FAULT-ACKUMULATOR DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR DATA 0 PRINTER TIMEOUT ACKUMULATOR * XIF * EJECT * ********************************************** * C H T A B * ********************************************** * * THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK * TABLES CWT TO CHANNEL UNITS FOR LOCAL AND REMOTE * TERMINALS. * * CHTAB EQU * DATA CHTABE-* TABLE LENGTH DATA CWTLT1 DATA CWTLT2 IFT LOCHAN=3 DATA CWTLT3 XIF IFT LOCHAN=4 DATA CWTLT3 DATA CWTLT4 XIF CHTABE EQU * END OF TABLE * * * * * EJECT * IFF LOCHAN=1 * * C H L T 1 / C H L T 2 * THIS IS THE INTERRUPT HANDLER FOR CHLT * * C H L T 1 * INTERRUPT FROM CHLT1 * XIF IFT LOCHAN=2 CHLT3 EQU * CHLT4 EQU * XIF IFF LOCHAN=1 CHLT1 EQU * ST P,INTSAV SAVE LAST INTERRUPT IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFF LOCHAN=1 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFF LOCHAN=1 LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 RF CLT010 * * C H L T 2 * INTERRUPT FROM CHLT2 * CHLT2 EQU * ST P,INTSAV SAVE LAST INTERRUPT IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFF LOCHAN=1 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFF LOCHAN=1 LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 XIF IFT LOCHAN=2 CLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION * XIF * IFT LOCHAN=3 RF CLT010 * * C H L T 3 * INTERRUPT FROM CHLT3 * CHLT3 EQU * CHLT4 EQU * ST P,INTSAV SAVE LAST INTERRUPT IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=3 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=3 LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 CLT010 EX CWTINR,A5 EXECUTE INR * XIF IFT LOCHAN=4 RF CLT010 * * * C H L T 2 * INTERRUPT FROM CHLT3 * CHLT3 EQU * ST P,INTSAV SAVE LAST INTERRUPT IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=4 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=4 LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 RF CLT010 * C H L T 4 * INTERRUPT FROM CHLT4 * CHLT4 EQU * ST P,INTSAV SAVE LAST INTERRUPT IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=4 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=4 LDKL A5,CWTLT4 SET CWT-ADDRESS FOR CHLT4 CLT010 EX CWTINR,A5 EXECUTE INR XIF * IFT LOCHAN=1 * * * C H L T 1 * * INTERRUPT FROM CHLT1 * CHLT1 EQU * CHLT2 EQU * CHLT3 EQU * CHLT4 EQU * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=1 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFT LOCHAN=1 LDKL A5,CWTLT1 GET CWT-ADDRESS ST P,INTSAV SAVE LAST INTERRUPT INR A2,0,DWA1 * XIF * IFT LOGING=1 CF A15,LOGG ** LOGG OF INPUT CHARACTER ** XIF EJECT * * * DETERMINE LINE- AND DEVICE NUMBER * LDK A1,0 RESET RETURN CODE LDR A3,A2 INPUT WORD IN A3 SRL A3,8 LDR A4,A3 ANK A3,/E 2 * LINE NUMBER IN A3 SRL A4,3 ANK A4,/E 2 * DEVICE NUMBER IN A4 ABL(NE) CLT100 INPUT IS A DATA CHARACTER ANK A2,/7F SUK A2,3 POWER ON ? RF(E) CHPOWO SUK A2,2 NAK ? =3 RF(Z) CLT035 =3 CLT015 EQU * =7(=3) * * * CHECK QUEUE AND SEND IF SOMETHING THERE * LDR* A7,A5 LAST OUTPUT DWT IN A7 CMR A5 RESET LAST OUTPUT LD A6,CWTEQ,A5 OUTPUT QUEUE RF(E) CLT020 STR A2,A15 SAVE A2 LD A2,DWTOTQ,A6 GET QUEUE LINK ST A2,CWTEQ,A5 STORE IT IN CWT LC A2,DWTOCH,A6 GET CHARACTER CF A15,OUTLIN SEND CHARACTER LDR* A2,A15 RELOAD A2 EJECT * * * CHECK CONTROL CHARACTER AND UPDATE ERROR- * ACKUMULATORS IF NAK, RETRANSMISSION FAULT * OR UNDEFINED CONTROL CHARACTER * CLT020 EQU * LDR A6,A7 GET LAST OUTPUT RF(E) CLT062 SUK A2,2 ACK ? =3 RF(Z) CLT040 ADK A2,7 TIME-OUT ? RF(E) CLT028 SUK A2,5 7 NAK ? =3 RF(Z) CLT032 =3 * IFT ACKMUL=1 * =1 =1 LDK A7,2 SUK A2,/16 RETRANSMISSION FAULT RF(E) CLT025 ADK A7,2 UNDEFINED INTERRUPT CLT025 ADR A7,A5 IM CWTADD,A7 INCREMENT ACKUMULATOR FOR THIS TYPE OF INTERRUPT * XIF * EJECT * * * NAK, TIME-OUT, RETRANSMISSION FAULT OR * UNDEFINED CONTROL CHARACTER * * CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE * ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH * MESSAGE NOT OPERABLE. * CLT028 EQU * LDKL A2,/3000 ECHO MODE AND RECOVERY BIT AN A2,DWTST,A6 AT LEAST ONE OF THE BITS SET ? RF(NE) CLT032 LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE XRS A2,DWTST,A6 SET BIT IN STATUS WORD CLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE LDK A4,1 =1 LDK A4,0 RF CPO025 CLT032 LDK A1,NOERR INDICATE NOT OPERABLE CM CWTRTC,A5 CLEAR RETRY COUNTER =1 ABL CLT110 EJECT * * * N A K * * ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. * LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER * UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT * OPERABLE IS SENT TO DEVICE DRIVER. * CLT035 EQU * IFT ACKMUL=1 * IM CWTADD,A5 UPDATE ERROR ACKUMULATOR XIF * IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER LD A4,CWTRTC,A5 GET COUNTER SUK A4,7 SEVEN TIMES ? RB(E) CLT015 =7(=3) LD A2,CWTLOW,A5 GET LAST OUTPUT WORD LDR A1,A5 EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION =3 IFT LOGING=1 CF A15,LOGG ** LOGG OUTPUT CHARACTER ** XIF =3 ABL TDISP EJECT * * * ACK DATA = 07 * * SIMULATE DATA REQUEST IF RETURN CODE FROM * CHLT OR DEVICE WITHOUT DATA REQUEST, * ELSE GO TO DISPATCHER * CLT040 EQU * LDKL A7,/EFFF ANS A7,DWTST,A6 RESET RECOVERY BIT IN STATUS WORD LDR A1,A1 RF(NZ) CLT110 RETURN CODE,SIMULATE DATA REQUEST LDR* A7,A6 DEVICE WITHOUT DATA REQUEST? RF(N) CLT110 YES. SIMULATE DATA REQUEST * IFF SOFTIM=1 * CLT062 EQU * RF EXIT * XIF * * IFT SOFTIM=1 * EJECT * * * PRINTER TIMING * INH =4 =4 =4 LD A3,DWTTP,A6 ADDRESS TO TIMER BLOCK RF(E) CLT060 * * RESTART TIMER * LDKL A3,-DRQTIM RESTART TIMER ST* A3,DWTTP,A6 RF EXIT * * START TIMER * CLT060 LDR A1,A6 PARAMETER LDKL A4,DWTTP TIMER POINTER ADR A4,A6 ADD WITH DWT-ADDRESS CF A15,SETIMP GET TIMER BLOCK DATA DRQTUT,DRQTIM ADDRESS TO TIME-OUT ROUTINE AND DELAY CLT062 EQU * RF EXIT EJECT * * * RESET TIMER IF STARTED * =4 =4 =4 =4 =4 EJECT * * TIME-OUT ROUTINE HANDLING MISSING INTERRUPTS * FROM PRINTERS * DRQTUT EQU * LDR A6,A1 GET DWT-ADDRESS CM DWTTP,A6 RESET POINTER TO TIMER BLOCK LD A3,DWTST,A6 SLL A3,2 ECHO MODE ? RF(N) CLT110 YES * IFT ACKMUL=1 IFF LOCHAN=1 * LDR* A5,A6 CHANNEL PARAMETER ANK A5,/F SLL A5,1 2 * INDEX ADK A5,2 JUST TO AVOID TABLE LENGTH LD A5,CHTAB,A5 GET CWT-ADDRESS IM ACKTIM,A5 INCREMENT ACKUMULATOR * XIF IFT SOFTIM=1 IFT ACKMUL=1 IFT LOCHAN=1 * LDKL A5,CWTLT1 GET CWT-ADDRESS IM ACKTIM,A5 INCREMENT ACKUMULATOR * XIF IFT SOFTIM=1 * LD A7,DWTOR,A6 TEST ORDER ? =2 ANK A7,/FE U =9(=2) RB(E) CLT032 YES, GO TO DEV. INT. HANDLER =2 RB CLT030 NO, EXECUTE DEV. RECOVERY =2 * XIF * EJECT * * POWER ON DATA = 03 * * RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE * ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL * UNIT OR THOSE IN ECHO MODE. * * * ON EXIT TO RECOVERY ROUTINE: * * A5 = STACKBASE 2 IN DWT * A6 = DWT-ADDRESS * A7 = ORDER * CHPOWO EQU * CF A15,GETLIN LDR* A2,A5 GET LAST OUTPUT DWT CM CWTRTC,A5 RESET RETRANSMISSION COUNTER LDK A4,0 LDR A3,A6 DEVICE COUNTER LDR A1,A8 ADDRESS POINTER RF(Z) EXIT EXIT IF NOT DEFINED CPO020 ADK A1,2 LDR* A6,A1 GET DWT-ADDRESS RF(E) CPO030 NO DWT SRC A6,1 RF(N) CPO030 SLC A6,1 LCR A7,A6 LEFT BYTE OF DWTCHP ANK A7,1 INPUT DEVICE ? RF(NE) CPO025 YES LDKL A7,/EFFF ANS A7,DWTST,A6 RESET RECOVERY BIT LC A7,DWTST,A6 ANK A7,/20 ECHO MODE ? RF(NE) CPO030 YES CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER ? RF(E) CPO030 YES CPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESSBLOCK IN A7 LD A7,RECADR,A7 ADDRESS TO RECOVERY IN A7 RF(E) CPO030 NO RECOVERY LDKL A5,DWTSB2 STACKBASE ADR A5,A6 INH CFR A15,A7 GO TO RECOVERY ROUTINE CPO030 SUK A3,2 ALL DEVICES THREATED RB(NE) CPO020 NO TAKE NEXT EXIT ABL TDISP EJECT * * * DATA-REQUEST * CLT100 CF A15,GETLIN GET DWT-ADDRESS SUR A6,A4 VALID INTERRUPT ? RB(N) EXIT LDR A8,A8 RB(Z) EXIT EXIT NOT DEFINED LDR* A6,A8 GET DWT RB(E) EXIT ANKL A6,/FFFE LCR A7,A6 LEFT BYTE IN CHANNEL PARAMETER ANK A7,1 DATA INPUT ? RF(NE) CLT110 YES LDR* A7,A6 GET CHANNEL PARAMETER RB(N) EXIT CLT110 LD A7,DWTOR,A6 SET ORDER IN A7 ANK A7,/FF LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8 IFT SOFTIM=1 LC A3,DWTOCH,A6 GET LAST CHARACTER =4 ANK A3,/7F =4 SUK A3,DUMMSP SPECIAL DUMMY=ETX ? =4 RF(NE) CLT120 NO =4 LDR* A3,A6 DEVICE WITHOUT DATA REQUEST ? =9 RF(N) CLT120 YES, DO NOT TOUCH TIMER POINTER =9 LD A3,DWTTP,A6 TIMER RUNNING ? =4 RF(E) CLT120 NO =4 INH =4 CM* DWTTP,A6 RESET TIMER =4 CM DWTTP,A6 RESET ADDRESS POINTER TO TIMER =4 CLT120 EQU * =4 XIF LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 ENB ABI INTADR,A3 GO TO INTERRUPT HANDLER * * THE FOLLOWING REGISTER VAULES ARE VALID WHEN ENTERING * THE DEVICE DEPENDANT INTERRUPT HANDLER:- * * A1 = ERROR CODE (A1=0 NOERROR) * (A1=1 NOT OPERABLE , HARDWARE TIME-OUT) * A6 = DWT-ADDRESS * * A7 = ORDER * * A8 = ECB-ADDRESS EJECT * * G E T L I N * * SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE 'INTLTX' * FOR A GIVEN LINE- AND DEVICE NUMBER * * ON ENTRY:- * * A3 = LINE NUMBER * 2 * A4 = DEVICE NUMBER * 2 * * ON EXIT:- * * A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE * A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FOUND * * GETLIN EQU * LD* A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE RF(Z) GTL010 =5 ADR A8,A3 POSITION IN TABLE LDR* A8,A8 ADDRESS TO TERMINAL SECTION RF(Z) GTL010 RETURN IF NOT DEFINED LDR* A6,A8 GET ID-WORD ANK A6,/FF TWO TIMES NUMBER OF DEVICES ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION GTL010 ABL RTNA15 RETURN AND ENB EJECT * * O U T L I N * * SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT. * * CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL * UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A * OUTPUT QUEUE THREAD. * * ON ENTRY: * * A2 = OUTPUT CHARACTER IN RIGHT BYTE * A6 = DWT-ADDRESS * OUTLIN EQU * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * * IFF LOCHAN=1 * LDR* A1,A6 CHANNEL PARAMETER ANK A1,/F CHANNEL INDEX SLL A1,1 ADK A1,2 LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 * XIF * * IFT LOCHAN=1 * LDKL A1,CWTLT1 * XIF * INH INHIBIT INTERRUPT LDR* A4,A1 IS UNIT FREE ? RF(E) OUL050 YES EJECT * * QUEUE OUTPUT * OUL005 LD A4,CWTEQ,A1 OUTPUT QUEUE RF(E) OUL020 OUL010 CWR A6,A4 RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE LD A3,DWTOTQ,A4 RF(E) OUL030 END OF THREAD FOUND LDR A4,A3 FOLLOW THE THREAD RB OUL010 OUL020 ST A6,CWTEQ,A1 QUEUE DWT RF OUL040 OUL030 ST A6,DWTOTQ,A4 QUEUE DWT OUL040 CM DWTOTQ,A6 SET END OF THREAD RF OUL060 EJECT * * SEND CHARACTER * OUL050 LDR* A3,A6 GET CHANNEL PARAMETERS ANKL A3,/7F00 ANK A2,/FF ORR A2,A3 OUL055 EQU * EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION RB(NA) OUL005 STR A6,A1 STORE LAST DWT IN CWT IFT LOGING=1 CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** XIF ST A2,CWTLOW,A1 STORE LAST OUTPUT IN CWT =6(=3) OUL060 SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT OUL070 EQU * IFT CPU852=1 ABL IHRET8 RESTORE A1-A8 AND RETURN XIF * IFT CPU852=0 MLR 8,A15 RESTORE A1-A8 FROM STACK... INH U =9 ADKL A15,2 ...AND =9 LDR* P,A15 RETURN =9 XIF * EJECT * * C H L T O N * * SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY * CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' * CHLTON EQU * * IFF LOCHAN=1 * LD A1,CHTAB CON010 SUK A1,2 ALL TREATED ? RF(NZ) CON020 NO TAKE NEXT ABL RTNA15 RETURN AND ENB CON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS RB(Z) CON010 EX CWTCIS,A5 EXECUTE CIO-START LDR* A6,A5 GET LAST DWT RB(Z) CON010 CMR A5 RESET LAST OUTPUT LDK A2,0 CF A15,OUTLIN SEND CHARACTER RB CON010 * * XIF * * IFT LOCHAN=1 * CIO A2,1,DWA1 CIO-START LD A6,CWTLT1 GET LAST DWT RF(Z) CON010 CM CWTLT1 RESET LAST OUTPUT LDK A2,0 CF A15,OUTLIN SEND CHARACTER CON010 ABL RTNA15 RETURN AND ENB * XIF * EJECT * * O U T P U T * * SEND ONE CHARACTER VIA 'OUTLIN' INDICATE INTERRUPTS * ALLOWED AND SAVE A3-A5 IN DWT. * * OUTPUT EQU * ANK A2,/FF LDR A1,A2 SUK A1,/82 STX ? RF(E) LDRE10 SUK A1,/15 ETB ? RF(E) LDRE10 CF A15,OUTLIN SEND ONE CHARACTER VIA CHANNEL UNIT * * * S T R E G * * INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT * * STREG EQU * INH LDKL A1,/100 ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED ST A3,DWTA3,A6 SAVE REGISTER A3 ST A4,DWTA4,A6 A4 ST A5,DWTA5,A6 A5 ABL EXIT =7 EJECT * * L D R E G * * IF INTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN * VIA A5. ELSE GO TO DISPATCHER. * * LDREG EQU * LD A3,DWTST,A6 ANKL A3,/100 ABL(Z) EXIT =4 XRS A3,DWTST,A6 * * * L D R E G E * * RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5 * * LDREGF EQU * LD A5,DWTA5,A6 A5 LDREGE EQU * LD A3,DWTA3,A6 RELOAD REGISTER A3 LD A4,DWTA4,A6 A4 LDRE10 LD A7,DWTOR,A6 GET ORDER ANK A7,/FF LD A8,DWTECB,A6 RTN A5 RETURN VIA A5-STACK EJECT * * * G E T C H R * * SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER * * ON ENTRY: * * A3 = BUFFER INDEX * A8 = ECB-ADDRESS * * ON EXIT: * * A2 = CHARACTER * A1 = 0 IF LAST CHARACTER ELSE # 0 * * IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH * * GETCHR EQU * LD A1,4,A8 REQUESTED LENGTH SUR A1,A3 RF(NP) GCH010 LAST CHARACTER REACHED LD A2,2,A8 GET BUFFER ADDRESS ADR A2,A3 LCR A2,A2 CHAR. TO A2 ANK A2,/FF ADK A3,1 INCREMENT BUFFER INDEX RF GCH020 GCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH GCH020 EQU * RTNA15 ADKL A15,2 RETURN AND ENABLE ENB LDR* P,A15 EJECT * * * L O G G * * IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT AND * OUTPUT CHARACTER ARE LOGGED * * * IFT LOGING=1 * LOGG STR A1,A15 LD A1,POINT ADK A1,2 CWK A1,BUFE BUFE IS MAX LOGG AREA RF(NE) L1 LDKL A1,BUF SET FIRST LOGG ADDRESS L1 ST A1,POINT STR A2,A1 LOGG OF INR OR OTR INSTRUCTION LDR* A1,A15 ADKL A15,2 LDR* P,A15 RETURN * * POINT DATA BUF LOGG POINTER * BUF RES 63 LOGG AREA BUFE EQU * * XIF EJECT * * * E C H O , E C H E N D * * SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, * ONE GENERAL AND ONE DEVICE-DEPENDENT * * PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, * LOAD STACKBASE AND FIND ADDRESS * TO DEVICE-DEPENDENT ECHO-ROUTINE * * PART TWO: ECHO ONE OR MORE CHARACTERS * CORRESPONDING TO ONE CHARACTER * TO BE STORED IN INPUT ECB-BUFFER * * * PART ONE FOLLOWS AND PART TWO CAN BE FOUND * IN THE DRIVER MODULE CORRESPONDING TO ECHO * OUTPUT DEVICE * * RESTRICTIONS IN DEVICE DEPENDENT ECHO DRIVER * * A7 MUST NOT BE DESTROYED * THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A * JUMP TO 'ECHRTN'. * ECHEND EQU * * IFT CECHO=1 * LDKL A7,/8000 INDICATE END I/O XIF ECHO EQU * IFT CECHO=1 ST A3,DWTA3,A6 SAVE A3-A5 IN DWT ST A4,DWTA4,A6 ST A5,DWTA5,A6 LD A1,DWTST,A6 STATUS SLL A1,2 RF(NN) RETUR NO ECHO REQUESTED LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE LDKL A5,DWTSB2 ADR A5,A6 STACKBASE-ADDRESS IN A5 LD A1,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK ABI ECHADR,A1 GO TO ECHO-ROUTINE DEVICE-DEPENDENT XIF ECHRTN EQU * IFT CECHO=1 LDR A7,A7 END? RF(NN) ERETUR NO CF A15,TENDIO END I/O OUTPUT DEVICE ERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE RETUR ABL LDREGF RELOAD A3-A5 AND RETURN VIA A5 * END
0x0000…0036 (0, 0, 398) Head {h00=0x0032, h01=0x0050, text=» IDENT DRLT01 REL 9.2 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…006a Head {h00=0x0028, h01=0x0050, text=» =8,TIMER RESET,TEST ORDER,INH-A15«, t00=0x0000, t01=0x0042}
0x006a…0086 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-05-23 «, t00=0x0000, t01=0x006e}
0x0086…00b4 Head {h00=0x002a, h01=0x0050, text=» =7,CLT010 DUBLE DEF LABEL, RB - ABL«, t00=0x0000, t01=0x008a}
0x00b4…00d0 Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 79-05-14 «, t00=0x0000, t01=0x00b8}
0x00d0…00f6 Head {h00=0x0022, h01=0x0050, text=» =6,CWT ADRESS ERROR A5 - A1«, t00=0x0000, t01=0x00d4}
0x00f6…0112 Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 79-04-25 «, t00=0x0000, t01=0x00fa}
0x0112…0130 Head {h00=0x001a, h01=0x0050, text=» =5,GETLIN CORRECTED«, t00=0x0000, t01=0x0116}
0x0130…014c Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-04-06 «, t00=0x0000, t01=0x0134}
0x014c…0176 Head {h00=0x0026, h01=0x0050, text=» =1-4, GEN UPDATE TO 8.2+ STATUS«, t00=0x0000, t01=0x0150}
0x0176…0192 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-04-02 «, t00=0x0000, t01=0x017a}
0x0192…01b6 Head {h00=0x0020, h01=0x0050, text=» =4,TIMER RESET CORRECTED «, t00=0x0001, t01=0x0008}
0x01b6…01d2 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-03-22 «, t00=0x0001, t01=0x002c}
0x01d2…01f6 Head {h00=0x0020, h01=0x0050, text=» =3,NAK HANDLING CORRECTED«, t00=0x0001, t01=0x0048}
0x01f6…0212 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-03-16 «, t00=0x0001, t01=0x006c}
0x0212…0236 Head {h00=0x0020, h01=0x0050, text=» =2,IMPROV. OF TEST ORDER «, t00=0x0001, t01=0x0088}
0x0236…0252 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-01-11 «, t00=0x0001, t01=0x00ac}
0x0252…0282 Head {h00=0x002c, h01=0x0050, text=» =1,DISPL.RECV,NAK ERROR,ERR. RETRYCNT«, t00=0x0001, t01=0x00c8}
0x0282…029e Head {h00=0x0018, h01=0x0050, text=» REL 8.2 78-09-15 «, t00=0x0001, t01=0x00f8}
0x029e…02a6 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0114}
0x02a6…02ae Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x011c}
0x02ae…02b6 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0124}
0x02b6…02c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012c}
0x02c0…02ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0136}
0x02ca…0304 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x0140}
0x0304…030e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017a}
0x030e…0336 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x0184}
0x0336…0340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0340…0368 Head {h00=0x0024, h01=0x0050, text=»* DRLT01 = DRIVER CHANNEL UNIT«, t00=0x0002, t01=0x0026}
0x0368…0390 Head {h00=0x0024, h01=0x0050, text=»* FOR LOCAL TERMINALS«, t00=0x0002, t01=0x004e}
0x0390…039a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0076}
0x039a…03a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0080}
0x03a4…03ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008a}
0x03ae…03b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0094}
0x03b8…03c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x009e}
0x03c2…03f8 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x00a8}
0x03f8…0402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00de}
0x0402…0442 Head {h00=0x003c, h01=0x0050, text=»* THIS IS THE CHANNEL UNIT DRIVER FOR LOCAL TERMINALS.«, t00=0x0002, t01=0x00e8}
0x0442…0488 Head {h00=0x0042, h01=0x0050, text=»* AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA«, t00=0x0002, t01=0x0128}
0x0488…04d0 Head {h00=0x0044, h01=0x0050, text=»* INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER «, t00=0x0002, t01=0x016e}
0x04d0…04ee Head {h00=0x001a, h01=0x0050, text=»* FOR ACTUAL DEVICE.«, t00=0x0003, t01=0x0026}
0x04ee…0536 Head {h00=0x0044, h01=0x0050, text=»* IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS«, t00=0x0003, t01=0x0044}
0x0536…0552 Head {h00=0x0018, h01=0x0050, text=»* ARE CARRIED OUT.«, t00=0x0003, t01=0x008c}
0x0552…055c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a8}
0x055c…059c Head {h00=0x003c, h01=0x0050, text=»* THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES:-«, t00=0x0003, t01=0x00b2}
0x059c…05a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f2}
0x05a6…05d8 Head {h00=0x002e, h01=0x0050, text=»* - OUTLIN SEND ONE CHARACTER VIA CHLT«, t00=0x0003, t01=0x00fc}
0x05d8…05e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x012e}
0x05e2…0622 Head {h00=0x003c, h01=0x0050, text=»* - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM«, t00=0x0003, t01=0x0138}
0x0622…062c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0178}
0x062c…0664 Head {h00=0x0034, h01=0x0050, text=»* - GETCHR GET ONE CHARACTER FROM ECB-BUFFER«, t00=0x0003, t01=0x0182}
0x0664…066e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002a}
0x066e…06a4 Head {h00=0x0032, h01=0x0050, text=»* CONTROL WORK TABLES FOR THE CHANNELS ARE «, t00=0x0004, t01=0x0034}
0x06a4…06c8 Head {h00=0x0020, h01=0x0050, text=»* INCLUDED IN THE DRIVER.«, t00=0x0004, t01=0x006a}
0x06c8…06d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x008e}
0x06d6…06e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x009c}
0x06e0…06ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a6}
0x06ea…06f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b0}
0x06f4…073a Head {h00=0x0042, h01=0x0050, text=»* THE FOLLOWING FUNCTIONS ARE ALSO INCLUDED IN THE DRIVER:- «, t00=0x0004, t01=0x00ba}
0x073a…0744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0100}
0x0744…0792 Head {h00=0x004a, h01=0x0050, text=»* - OUTPUT SEND ONE CHARACTER, SAVE A3-A5 AND RETURN TO DISPATCHER«, t00=0x0004, t01=0x010a}
0x0792…079c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0158}
0x079c…07d6 Head {h00=0x0036, h01=0x0050, text=»* - STREG SAVE A3-A5 AND RETURN TO DISPATCHER«, t00=0x0004, t01=0x0162}
0x07d6…07e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000c}
0x07e0…0828 Head {h00=0x0044, h01=0x0050, text=»* - LDREG IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN«, t00=0x0005, t01=0x0016}
0x0828…084e Head {h00=0x0022, h01=0x0050, text=»* TO USER VIA A5 «, t00=0x0005, t01=0x005e}
0x084e…0858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0084}
0x0858…0896 Head {h00=0x003a, h01=0x0050, text=»* - LDREGE RESTORE A3-A5 AND RETURN TO USER VIA A5«, t00=0x0005, t01=0x008e}
0x0896…08a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00cc}
0x08a0…08aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d6}
0x08aa…08b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e0}
0x08b4…08e6 Head {h00=0x002e, h01=0x0050, text=»* NORMAL REGISTER USAGE IN THE DRIVER:- «, t00=0x0005, t01=0x00ea}
0x08e6…08f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x011c}
0x08f0…090c Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE«, t00=0x0005, t01=0x0126}
0x090c…0928 Head {h00=0x0018, h01=0x0050, text=»* A2 = INPUT WORD «, t00=0x0005, t01=0x0142}
0x0928…0948 Head {h00=0x001c, h01=0x0050, text=»* A3 = LINE NUMBER * 2«, t00=0x0005, t01=0x015e}
0x0948…096a Head {h00=0x001e, h01=0x0050, text=»* A4 = DEVICE NUMBER * 2«, t00=0x0005, t01=0x017e}
0x096a…0986 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT-ADDRESS«, t00=0x0006, t01=0x0010}
0x0986…09a2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0006, t01=0x002c}
0x09a2…09b8 Head {h00=0x0012, h01=0x0050, text=»* A7 = ORDER«, t00=0x0006, t01=0x0048}
0x09b8…09d4 Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x0006, t01=0x005e}
0x09d4…09de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007a}
0x09de…09e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0084}
0x09e8…09f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008e}
0x09f2…0a00 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0098}
0x0a00…0a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a6}
0x0a0a…0a1e Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x00b0}
0x0a1e…0a32 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0006, t01=0x00c4}
0x0a32…0a46 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x00d8}
0x0a46…0a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ec}
0x0a50…0a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f6}
0x0a5a…0a84 Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT1 INTERRUPT FROM CHLT01«, t00=0x0006, t01=0x0100}
0x0a84…0aae Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT2 INTERRUPT FROM CHLT2 «, t00=0x0006, t01=0x012a}
0x0aae…0ad8 Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT3 INTERRUPT FROM CHLT3 «, t00=0x0006, t01=0x0154}
0x0ad8…0b00 Head {h00=0x0024, h01=0x0050, text=» ENTRY CHLT4 INTERRUP FROM CHLT4«, t00=0x0006, t01=0x017e}
0x0b00…0b28 Head {h00=0x0024, h01=0x0050, text=» ENTRY OUTLIN SEND ONE CHARACTER«, t00=0x0007, t01=0x0016}
0x0b28…0b4c Head {h00=0x0020, h01=0x0050, text=» ENTRY CHLTON START OF CHLT «, t00=0x0007, t01=0x003e}
0x0b4c…0b8a Head {h00=0x003a, h01=0x0050, text=» ENTRY OUTPUT SAVE REGISTERS, SEND CHAR. AND DISPATCH «, t00=0x0007, t01=0x0062}
0x0b8a…0bb6 Head {h00=0x0028, h01=0x0050, text=» ENTRY LDREG RESTORE A3-A5 ANDRETURN«, t00=0x0007, t01=0x00a0}
0x0bb6…0be8 Head {h00=0x002e, h01=0x0050, text=» ENTRY LDREGE WAY BACK FROM ECHO HANDLING «, t00=0x0007, t01=0x00cc}
0x0be8…0c04 Head {h00=0x0018, h01=0x0050, text=» ENTRY LDREGF RETURN«, t00=0x0007, t01=0x00fe}
0x0c04…0c34 Head {h00=0x002c, h01=0x0050, text=» ENTRY STREG SAVE REGISTERS A3-A5 IN DWT«, t00=0x0007, t01=0x011a}
0x0c34…0c6c Head {h00=0x0034, h01=0x0050, text=» ENTRY GETCHR GET ONE CHARACTER FROM ECB-BUFFER «, t00=0x0007, t01=0x014a}
0x0c6c…0ca0 Head {h00=0x0030, h01=0x0050, text=» ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS «, t00=0x0007, t01=0x0182}
0x0ca0…0cd4 Head {h00=0x0030, h01=0x0050, text=» ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS«, t00=0x0008, t01=0x0026}
0x0cd4…0cf4 Head {h00=0x001c, h01=0x0050, text=» ENTRY REMFC DUMMY ENTRY«, t00=0x0008, t01=0x005a}
0x0cf4…0d16 Head {h00=0x001e, h01=0x0050, text=» ENTRY DWREMU DUMMY ENTRY «, t00=0x0008, t01=0x007a}
0x0d16…0d3c Head {h00=0x0022, h01=0x0050, text=» ENTRY ECHRTN RETURN FROM ECHO«, t00=0x0008, t01=0x009c}
0x0d3c…0d5c Head {h00=0x001c, h01=0x0050, text=» ENTRY ECHO ECHO ROUTINE«, t00=0x0008, t01=0x00c2}
0x0d5c…0d7e Head {h00=0x001e, h01=0x0050, text=» ENTRY ECHEND END OF ECHO «, t00=0x0008, t01=0x00e2}
0x0d7e…0d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0104}
0x0d88…0d96 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x010e}
0x0d96…0da0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x011c}
0x0da0…0dd2 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0008, t01=0x0126}
0x0dd2…0e04 Head {h00=0x002e, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES *«, t00=0x0008, t01=0x0158}
0x0e04…0e36 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0008, t01=0x018a}
0x0e36…0e40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x002c}
0x0e40…0e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0036}
0x0e4a…0e74 Head {h00=0x0026, h01=0x0050, text=» EXTRN SAVE8 SAVE REGISTERS A1-A8 «, t00=0x0009, t01=0x0040}
0x0e74…0e94 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0009, t01=0x006a}
0x0e94…0eb8 Head {h00=0x0020, h01=0x0050, text=» EXTRN IHRET8 RESTORE A1-A8 «, t00=0x0009, t01=0x008a}
0x0eb8…0ede Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT1 INTERRUPT TABLE «, t00=0x0009, t01=0x00ae}
0x0ede…0f04 Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT2 INTERRUPT TABLE «, t00=0x0009, t01=0x00d4}
0x0f04…0f2a Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT3 INTERRUPT TABLE «, t00=0x0009, t01=0x00fa}
0x0f2a…0f50 Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT4 INTERRUPT TABLE «, t00=0x0009, t01=0x0120}
0x0f50…0f76 Head {h00=0x0022, h01=0x0050, text=» EXTRN SETIME GET TIMER BLOCK «, t00=0x0009, t01=0x0146}
0x0f76…0f9c Head {h00=0x0022, h01=0x0050, text=» EXTRN SETIMP GET TIMER BLOCK «, t00=0x0009, t01=0x016c}
0x0f9c…0fca (10, 0, 398) Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x000a, t01=0x0004}
0x0fca…0fe0 Head {h00=0x0012, h01=0x0050, text=» EXTRN TENDIO «, t00=0x000a, t01=0x0032}
0x0fe0…0fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0048}
0x0fea…0ff4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0052}
0x0ff4…1020 Head {h00=0x0028, h01=0x0050, text=»*********************************** «, t00=0x000a, t01=0x005c}
0x1020…104c Head {h00=0x0028, h01=0x0050, text=»* DWT PARAMETERS * «, t00=0x000a, t01=0x0088}
0x104c…1078 Head {h00=0x0028, h01=0x0050, text=»*********************************** «, t00=0x000a, t01=0x00b4}
0x1078…1094 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x000a, t01=0x00e0}
0x1094…10ae Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x000a, t01=0x00fc}
0x10ae…10da Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOCH LAST OUTPUT CHARACTER «, t00=0x000a, t01=0x0116}
0x10da…10fc Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x000a, t01=0x0142}
0x10fc…112a Head {h00=0x002a, h01=0x0050, text=» EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK«, t00=0x000a, t01=0x0164}
0x112a…1140 (11, 0, 400) Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTWAT «, t00=0x000b, t01=0x0004}
0x1140…1162 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTOTQ OUTPUT QUEUE«, t00=0x000b, t01=0x001a}
0x1162…1184 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x000b, t01=0x003c}
0x1184…11a6 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x000b, t01=0x005e}
0x11a6…11c8 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x000b, t01=0x0080}
0x11c8…11f2 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x000b, t01=0x00a2}
0x11f2…1214 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTP TIMER POINTER«, t00=0x000b, t01=0x00cc}
0x1214…123a Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTECH ECHO DEVICE DWT «, t00=0x000b, t01=0x00ee}
0x123a…126e Head {h00=0x0030, h01=0x0050, text=» EXTRN INTADR INTERRUPT ADDRESS DISPLACEMENT«, t00=0x000b, t01=0x0114}
0x126e…12a2 Head {h00=0x0030, h01=0x0050, text=» EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT «, t00=0x000b, t01=0x0148}
0x12a2…12d2 Head {h00=0x002c, h01=0x0050, text=» EXTRN ECHADR ECHO ADDRESS DISPLACEMENT «, t00=0x000b, t01=0x017c}
0x12d2…12dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001c}
0x12dc…12ea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0026}
0x12ea…12f2 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x0034}
0x12f2…12fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x003c}
0x12fc…1312 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000c, t01=0x0046}
0x1312…1328 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x000c, t01=0x005c}
0x1328…133e Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000c, t01=0x0072}
0x133e…1348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0088}
0x1348…1352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0092}
0x1352…1380 Head {h00=0x002a, h01=0x0050, text=»NOERR EQU 1 RETURN CODE. NOT OPERABLE «, t00=0x000c, t01=0x009c}
0x1380…13a4 Head {h00=0x0020, h01=0x0050, text=»DUMMSP EQU /03 SPECIAL DUMMY«, t00=0x000c, t01=0x00ca}
0x13a4…13ba Head {h00=0x0012, h01=0x0050, text=»DRQTIM EQU 30 «, t00=0x000c, t01=0x00ee}
0x13ba…13c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0104}
0x13c4…13d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x010e}
0x13d2…13dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x011c}
0x13dc…13fc Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x0126}
0x13fc…141c Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000c, t01=0x0146}
0x141c…143c Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x0166}
0x143c…1446 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0186}
0x1446…1486 Head {h00=0x003c, h01=0x0050, text=»* A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER «, t00=0x000c, t01=0x0190}
0x1486…14c2 Head {h00=0x0038, h01=0x0050, text=»* MAY BE INCLUDED TO THE DRIVER BY SETTING X:A=1 «, t00=0x000d, t01=0x0040}
0x14c2…14cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x007c}
0x14cc…14de Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000d, t01=0x0086}
0x14de…14f4 Head {h00=0x0012, h01=0x0050, text=»LOGING EQU X:A«, t00=0x000d, t01=0x0098}
0x14f4…14fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ae}
0x14fe…1536 Head {h00=0x0034, h01=0x0050, text=»* THIS DRIVER HANDLES ONE OR UP TO FOUR LOCAL«, t00=0x000d, t01=0x00b8}
0x1536…1568 Head {h00=0x002e, h01=0x0050, text=»* CHANNELS BY SETTING X:B TO 1,2,3 OR 4«, t00=0x000d, t01=0x00f0}
0x1568…1572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0122}
0x1572…1584 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000d, t01=0x012c}
0x1584…159a Head {h00=0x0012, h01=0x0050, text=»LOCHAN EQU X:B«, t00=0x000d, t01=0x013e}
0x159a…15a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0154}
0x15a4…15e0 Head {h00=0x0038, h01=0x0050, text=»* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND «, t00=0x000d, t01=0x015e}
0x15e0…1618 Head {h00=0x0034, h01=0x0050, text=»* UNDEFINED CONTROL CHARACTERS ARE UPDATED IN«, t00=0x000e, t01=0x000a}
0x1618…1654 Head {h00=0x0038, h01=0x0050, text=»* THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM «, t00=0x000e, t01=0x0042}
0x1654…167c Head {h00=0x0024, h01=0x0050, text=»* DRIVER BY SETTING X:C = 0. «, t00=0x000e, t01=0x007e}
0x167c…1686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a6}
0x1686…1698 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x000e, t01=0x00b0}
0x1698…16ae Head {h00=0x0012, h01=0x0050, text=»ACKMUL EQU X:C«, t00=0x000e, t01=0x00c2}
0x16ae…16b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d8}
0x16b8…16f4 Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:D = 1 A SOFTWARE TIME OUT HANDLING«, t00=0x000e, t01=0x00e2}
0x16f4…1734 Head {h00=0x003c, h01=0x0050, text=»* MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED«, t00=0x000e, t01=0x011e}
0x1734…1750 Head {h00=0x0018, h01=0x0050, text=»* IN THE DRIVER. «, t00=0x000e, t01=0x015e}
0x1750…1790 Head {h00=0x003c, h01=0x0050, text=»* AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE «, t00=0x000e, t01=0x017a}
0x1790…17be Head {h00=0x002a, h01=0x0050, text=»* TIME OUT OCCURS IS ALSO INCLUDED.«, t00=0x000f, t01=0x002a}
0x17be…17c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0058}
0x17c8…17da Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x000f, t01=0x0062}
0x17da…17f0 Head {h00=0x0012, h01=0x0050, text=»SOFTIM EQU X:D«, t00=0x000f, t01=0x0074}
0x17f0…17fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x008a}
0x17fa…1804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0094}
0x1804…1830 Head {h00=0x0028, h01=0x0050, text=»* ECHO FONCTION CAN BE EXCLODED «, t00=0x000f, t01=0x009e}
0x1830…1850 Head {h00=0x001c, h01=0x0050, text=»* BY SETTING X:E = 0«, t00=0x000f, t01=0x00ca}
0x1850…1862 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 1 «, t00=0x000f, t01=0x00ea}
0x1862…1878 Head {h00=0x0012, h01=0x0050, text=»CECHO EQU X:E «, t00=0x000f, t01=0x00fc}
0x1878…1882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0112}
0x1882…188c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x011c}
0x188c…1896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0126}
0x1896…18d0 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000f, t01=0x0130}
0x18d0…1902 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000f, t01=0x016a}
0x1902…190c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000c}
0x190c…1920 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0010, t01=0x0016}
0x1920…192a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002a}
0x192a…1938 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0034}
0x1938…1940 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0042}
0x1940…1948 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x004a}
0x1948…195c Head {h00=0x0010, h01=0x0050, text=»RECHAN EQU 0«, t00=0x0010, t01=0x0052}
0x195c…1970 Head {h00=0x0010, h01=0x0050, text=»REMFC EQU 0 «, t00=0x0010, t01=0x0066}
0x1970…1984 Head {h00=0x0010, h01=0x0050, text=»CWTRT1 EQU *«, t00=0x0010, t01=0x007a}
0x1984…1998 Head {h00=0x0010, h01=0x0050, text=»CWTRT2 EQU *«, t00=0x0010, t01=0x008e}
0x1998…19ac Head {h00=0x0010, h01=0x0050, text=»CWTRT3 EQU *«, t00=0x0010, t01=0x00a2}
0x19ac…19c0 Head {h00=0x0010, h01=0x0050, text=»CWTRT4 EQU *«, t00=0x0010, t01=0x00b6}
0x19c0…19d4 Head {h00=0x0010, h01=0x0050, text=»CWTRT5 EQU *«, t00=0x0010, t01=0x00ca}
0x19d4…19e8 Head {h00=0x0010, h01=0x0050, text=»CWTRT6 EQU *«, t00=0x0010, t01=0x00de}
0x19e8…19fc Head {h00=0x0010, h01=0x0050, text=»CWTRT7 EQU *«, t00=0x0010, t01=0x00f2}
0x19fc…1a10 Head {h00=0x0010, h01=0x0050, text=»CWTRT8 EQU *«, t00=0x0010, t01=0x0106}
0x1a10…1a24 Head {h00=0x0010, h01=0x0050, text=»DWREMU EQU *«, t00=0x0010, t01=0x011a}
0x1a24…1a32 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x012e}
0x1a32…1a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x013c}
0x1a3c…1a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0146}
0x1a46…1a84 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0010, t01=0x0150}
0x1a84…1ac2 Head {h00=0x003a, h01=0x0050, text=»* C W T L T 1 * «, t00=0x0010, t01=0x018e}
0x1ac2…1b00 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0011, t01=0x003c}
0x1b00…1b0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007a}
0x1b0a…1b42 Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1«, t00=0x0011, t01=0x0084}
0x1b42…1b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00bc}
0x1b4c…1b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00c6}
0x1b56…1b78 Head {h00=0x001e, h01=0x0050, text=»DWA1 EQU /03 DEVICEADDRESS«, t00=0x0011, t01=0x00d0}
0x1b78…1b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f2}
0x1b82…1ba2 Head {h00=0x001c, h01=0x0050, text=»CWTLT1 EQU * TABLE ENTRY«, t00=0x0011, t01=0x00fc}
0x1ba2…1bd6 Head {h00=0x0030, h01=0x0050, text=»CWTLDW EQU *-CWTLT1 LAST OUTPUT DWT-ADDRESS «, t00=0x0011, t01=0x011c}
0x1bd6…1be6 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0011, t01=0x0150}
0x1be6…1c02 Head {h00=0x0018, h01=0x0050, text=»CWTLOW EQU *-CWTLT1 «, t00=0x0011, t01=0x0160}
0x1c02…1c22 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0011, t01=0x017c}
0x1c22…1c50 Head {h00=0x002a, h01=0x0050, text=»CWTITA EQU *-CWTLT1 ADDRESS TO INTLT1 «, t00=0x0012, t01=0x000c}
0x1c50…1c64 Head {h00=0x0010, h01=0x0050, text=» DATA INTLT1«, t00=0x0012, t01=0x003a}
0x1c64…1c84 Head {h00=0x001c, h01=0x0050, text=»CWTINR EQU *-CWTLT1 INR «, t00=0x0012, t01=0x004e}
0x1c84…1c9a Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x0012, t01=0x006e}
0x1c9a…1cba Head {h00=0x001c, h01=0x0050, text=»CWTOTR EQU *-CWTLT1 OTR «, t00=0x0012, t01=0x0084}
0x1cba…1cd0 Head {h00=0x0012, h01=0x0050, text=» OTR A2,0,DWA1«, t00=0x0012, t01=0x00a4}
0x1cd0…1cf6 Head {h00=0x0022, h01=0x0050, text=»CWTCIS EQU *-CWTLT1 CIO-START «, t00=0x0012, t01=0x00ba}
0x1cf6…1d0c Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DWA1«, t00=0x0012, t01=0x00e0}
0x1d0c…1d28 Head {h00=0x0018, h01=0x0050, text=»CWTRTC EQU *-CWTLT1 «, t00=0x0012, t01=0x00f6}
0x1d28…1d4e Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0012, t01=0x0112}
0x1d4e…1d76 Head {h00=0x0024, h01=0x0050, text=»CWTEQ EQU *-CWTLT1 END OF QUEUE «, t00=0x0012, t01=0x0138}
0x1d76…1d86 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0012, t01=0x0160}
0x1d86…1da2 Head {h00=0x0018, h01=0x0050, text=»CWTADD EQU *-CWTLT1 «, t00=0x0012, t01=0x0170}
0x1da2…1dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x018c}
0x1dac…1dc2 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0013, t01=0x0008}
0x1dc2…1dcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x001e}
0x1dcc…1dec Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0013, t01=0x0028}
0x1dec…1e14 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0013, t01=0x0048}
0x1e14…1e44 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR «, t00=0x0013, t01=0x0070}
0x1e44…1e60 Head {h00=0x0018, h01=0x0050, text=»ACKTIM EQU *-CWTLT1 «, t00=0x0013, t01=0x00a0}
0x1e60…1e8c Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0013, t01=0x00bc}
0x1e8c…1e96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e8}
0x1e96…1ea2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00f2}
0x1ea2…1eb0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x00fe}
0x1eb0…1eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x010c}
0x1eba…1ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0116}
0x1ec4…1f02 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0013, t01=0x0120}
0x1f02…1f40 Head {h00=0x003a, h01=0x0050, text=»* C W T L T 2 * «, t00=0x0013, t01=0x015e}
0x1f40…1f7e Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0014, t01=0x000c}
0x1f7e…1f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x004a}
0x1f88…1fc0 Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2«, t00=0x0014, t01=0x0054}
0x1fc0…1fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x008c}
0x1fca…1fde Head {h00=0x0010, h01=0x0050, text=»CWTLT2 EQU *«, t00=0x0014, t01=0x0096}
0x1fde…1fe8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00aa}
0x1fe8…1ffe Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0014, t01=0x00b4}
0x1ffe…2022 Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0014, t01=0x00ca}
0x2022…202c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ee}
0x202c…2054 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0014, t01=0x00f8}
0x2054…2074 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0014, t01=0x0120}
0x2074…2098 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0014, t01=0x0140}
0x2098…20b2 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0014, t01=0x0164}
0x20b2…20cc Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0014, t01=0x017e}
0x20cc…20ec Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0015, t01=0x0008}
0x20ec…2112 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0015, t01=0x0028}
0x2112…212e Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0015, t01=0x004e}
0x212e…2138 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x006a}
0x2138…214e Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0015, t01=0x0074}
0x214e…2158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x008a}
0x2158…2178 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0015, t01=0x0094}
0x2178…21a0 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0015, t01=0x00b4}
0x21a0…21d0 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0015, t01=0x00dc}
0x21d0…21fc Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0015, t01=0x010c}
0x21fc…2206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0138}
0x2206…2212 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0142}
0x2212…221c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014e}
0x221c…2232 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0015, t01=0x0158}
0x2232…223c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x016e}
0x223c…224a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0178}
0x224a…2256 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0186}
0x2256…226c (22, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0016, t01=0x0004}
0x226c…2290 Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0016, t01=0x001a}
0x2290…229a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003e}
0x229a…22c2 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0016, t01=0x0048}
0x22c2…22e2 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0016, t01=0x0070}
0x22e2…2306 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0016, t01=0x0090}
0x2306…2320 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0016, t01=0x00b4}
0x2320…233a Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0016, t01=0x00ce}
0x233a…235a Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0016, t01=0x00e8}
0x235a…2380 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0016, t01=0x0108}
0x2380…239c Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0016, t01=0x012e}
0x239c…23a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x014a}
0x23a6…23bc Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0016, t01=0x0154}
0x23bc…23c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x016a}
0x23c6…23e6 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0016, t01=0x0174}
0x23e6…240e (23, 0, 400) Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0017, t01=0x0004}
0x240e…243e Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0017, t01=0x002c}
0x243e…246a Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0017, t01=0x005c}
0x246a…2474 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0088}
0x2474…2480 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0092}
0x2480…248a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x009e}
0x248a…2494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a8}
0x2494…24a0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00b2}
0x24a0…24b6 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0017, t01=0x00be}
0x24b6…24c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d4}
0x24c0…24ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00de}
0x24ca…2504 Head {h00=0x0036, h01=0x0050, text=»* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.2«, t00=0x0017, t01=0x00e8}
0x2504…250e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0122}
0x250e…2532 Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0017, t01=0x012c}
0x2532…253c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0150}
0x253c…2564 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0017, t01=0x015a}
0x2564…2584 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0017, t01=0x0182}
0x2584…25a8 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0018, t01=0x0012}
0x25a8…25c2 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0018, t01=0x0036}
0x25c2…25dc Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0018, t01=0x0050}
0x25dc…25fc Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0018, t01=0x006a}
0x25fc…2622 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0018, t01=0x008a}
0x2622…263e Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0018, t01=0x00b0}
0x263e…2648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00cc}
0x2648…265e Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0018, t01=0x00d6}
0x265e…2668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ec}
0x2668…2688 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0018, t01=0x00f6}
0x2688…26b0 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0018, t01=0x0116}
0x26b0…26e0 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0018, t01=0x013e}
0x26e0…270c Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0018, t01=0x016e}
0x270c…2716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x000a}
0x2716…2722 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0014}
0x2722…2730 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0020}
0x2730…273a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x002e}
0x273a…2744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0038}
0x2744…277e Head {h00=0x0036, h01=0x0050, text=»* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3«, t00=0x0019, t01=0x0042}
0x277e…2788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x007c}
0x2788…279c Head {h00=0x0010, h01=0x0050, text=»CWTLT3 EQU *«, t00=0x0019, t01=0x0086}
0x279c…27b2 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0019, t01=0x009a}
0x27b2…27d6 Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x0019, t01=0x00b0}
0x27d6…27e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00d4}
0x27e0…2808 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0019, t01=0x00de}
0x2808…2828 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0019, t01=0x0106}
0x2828…284c Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x0019, t01=0x0126}
0x284c…2866 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x0019, t01=0x014a}
0x2866…2880 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x0019, t01=0x0164}
0x2880…28a0 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x0019, t01=0x017e}
0x28a0…28c6 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x001a, t01=0x000e}
0x28c6…28e2 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x001a, t01=0x0034}
0x28e2…28ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0050}
0x28ec…2902 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x001a, t01=0x005a}
0x2902…290c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0070}
0x290c…292c Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x001a, t01=0x007a}
0x292c…2954 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x001a, t01=0x009a}
0x2954…2984 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x001a, t01=0x00c2}
0x2984…29b0 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x001a, t01=0x00f2}
0x29b0…29ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x011e}
0x29ba…29c6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0128}
0x29c6…29d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0134}
0x29d0…29da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x013e}
0x29da…29f0 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x001a, t01=0x0148}
0x29f0…2a14 Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x001a, t01=0x015e}
0x2a14…2a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0182}
0x2a1e…2a46 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x001a, t01=0x018c}
0x2a46…2a66 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x001b, t01=0x0024}
0x2a66…2a8a Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x001b, t01=0x0044}
0x2a8a…2aa4 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x001b, t01=0x0068}
0x2aa4…2abe Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x001b, t01=0x0082}
0x2abe…2ade Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x001b, t01=0x009c}
0x2ade…2b04 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x001b, t01=0x00bc}
0x2b04…2b20 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x001b, t01=0x00e2}
0x2b20…2b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00fe}
0x2b2a…2b40 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x001b, t01=0x0108}
0x2b40…2b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x011e}
0x2b4a…2b6a Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x001b, t01=0x0128}
0x2b6a…2b92 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x001b, t01=0x0148}
0x2b92…2bc2 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x001b, t01=0x0170}
0x2bc2…2bee Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x001c, t01=0x0010}
0x2bee…2bf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x003c}
0x2bf8…2c04 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0046}
0x2c04…2c12 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0052}
0x2c12…2c1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0060}
0x2c1c…2c54 Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4«, t00=0x001c, t01=0x006a}
0x2c54…2c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00a2}
0x2c5e…2c72 Head {h00=0x0010, h01=0x0050, text=»CWTLT4 EQU *«, t00=0x001c, t01=0x00ac}
0x2c72…2c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00c0}
0x2c7c…2c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ca}
0x2c86…2c9c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x001c, t01=0x00d4}
0x2c9c…2cc0 Head {h00=0x0020, h01=0x0050, text=»DWA4 EQU /33 DEVICE ADDRESS «, t00=0x001c, t01=0x00ea}
0x2cc0…2cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x010e}
0x2cca…2cf2 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x001c, t01=0x0118}
0x2cf2…2d12 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x001c, t01=0x0140}
0x2d12…2d36 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT4 INTERRUPT TABLE«, t00=0x001c, t01=0x0160}
0x2d36…2d50 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA4 INR«, t00=0x001c, t01=0x0184}
0x2d50…2d6a Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA4 OTR«, t00=0x001d, t01=0x000e}
0x2d6a…2d8a Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA4 CIO-START«, t00=0x001d, t01=0x0028}
0x2d8a…2db0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x001d, t01=0x0048}
0x2db0…2dcc Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x001d, t01=0x006e}
0x2dcc…2dd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x008a}
0x2dd6…2dec Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x001d, t01=0x0094}
0x2dec…2df6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00aa}
0x2df6…2e16 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x001d, t01=0x00b4}
0x2e16…2e3e Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x001d, t01=0x00d4}
0x2e3e…2e6e Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x001d, t01=0x00fc}
0x2e6e…2e9a Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x001d, t01=0x012c}
0x2e9a…2ea4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0158}
0x2ea4…2eb0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0162}
0x2eb0…2eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x016e}
0x2eba…2ec8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0178}
0x2ec8…2ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0186}
0x2ed2…2f08 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001d, t01=0x0190}
0x2f08…2f3e Head {h00=0x0032, h01=0x0050, text=»* C H T A B *«, t00=0x001e, t01=0x0036}
0x2f3e…2f74 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001e, t01=0x006c}
0x2f74…2f7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a2}
0x2f7e…2fb8 Head {h00=0x0036, h01=0x0050, text=»* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK «, t00=0x001e, t01=0x00ac}
0x2fb8…2ff4 Head {h00=0x0038, h01=0x0050, text=»* TABLES CWT TO CHANNEL UNITS FOR LOCAL AND REMOTE«, t00=0x001e, t01=0x00e6}
0x2ff4…300a Head {h00=0x0012, h01=0x0050, text=»* TERMINALS.«, t00=0x001e, t01=0x0122}
0x300a…3014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0138}
0x3014…301e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0142}
0x301e…3032 Head {h00=0x0010, h01=0x0050, text=»CHTAB EQU * «, t00=0x001e, t01=0x014c}
0x3032…3056 Head {h00=0x0020, h01=0x0050, text=» DATA CHTABE-* TABLE LENGTH «, t00=0x001e, t01=0x0160}
0x3056…306c Head {h00=0x0012, h01=0x0050, text=» DATA CWTLT1 «, t00=0x001e, t01=0x0184}
0x306c…3080 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT2«, t00=0x001f, t01=0x000a}
0x3080…3096 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x001f, t01=0x001e}
0x3096…30aa Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001f, t01=0x0034}
0x30aa…30b6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0048}
0x30b6…30cc Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x001f, t01=0x0054}
0x30cc…30e0 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001f, t01=0x006a}
0x30e0…30f4 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT4«, t00=0x001f, t01=0x007e}
0x30f4…3100 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0092}
0x3100…3122 Head {h00=0x001e, h01=0x0050, text=»CHTABE EQU * END OF TABLE «, t00=0x001f, t01=0x009e}
0x3122…312c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c0}
0x312c…3136 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ca}
0x3136…3140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00d4}
0x3140…314a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00de}
0x314a…3154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e8}
0x3154…3162 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x00f2}
0x3162…316c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0100}
0x316c…3182 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001f, t01=0x010a}
0x3182…318c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0120}
0x318c…31ae Head {h00=0x001e, h01=0x0050, text=»* C H L T 1 / C H L T 2 «, t00=0x001f, t01=0x012a}
0x31ae…31e0 Head {h00=0x002e, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER FOR CHLT«, t00=0x001f, t01=0x014c}
0x31e0…31ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x017e}
0x31ea…3200 Head {h00=0x0012, h01=0x0050, text=»* C H L T 1 «, t00=0x001f, t01=0x0188}
0x3200…3220 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT1«, t00=0x0020, t01=0x000e}
0x3220…322a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x002e}
0x322a…3236 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0038}
0x3236…324c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0020, t01=0x0044}
0x324c…3260 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0020, t01=0x005a}
0x3260…3274 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0020, t01=0x006e}
0x3274…3280 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0082}
0x3280…3296 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0020, t01=0x008e}
0x3296…32aa Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x0020, t01=0x00a4}
0x32aa…32d2 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0020, t01=0x00b8}
0x32d2…32e8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x00e0}
0x32e8…3312 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0020, t01=0x00f6}
0x3312…331e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0120}
0x331e…3328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x012c}
0x3328…333e Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0020, t01=0x0136}
0x333e…3354 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0020, t01=0x014c}
0x3354…337a Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0020, t01=0x0162}
0x337a…3386 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0188}
0x3386…3390 (33, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0004}
0x3390…33a6 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0021, t01=0x000e}
0x33a6…33d8 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 «, t00=0x0021, t01=0x0024}
0x33d8…33ea Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0021, t01=0x0056}
0x33ea…33f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0068}
0x33f4…340a Head {h00=0x0012, h01=0x0050, text=»* C H L T 2 «, t00=0x0021, t01=0x0072}
0x340a…342a Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT2«, t00=0x0021, t01=0x0088}
0x342a…3434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00a8}
0x3434…3448 Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x0021, t01=0x00b2}
0x3448…3470 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0021, t01=0x00c6}
0x3470…3486 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0021, t01=0x00ee}
0x3486…34b0 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0021, t01=0x0104}
0x34b0…34bc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x012e}
0x34bc…34c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x013a}
0x34c6…34dc Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0021, t01=0x0144}
0x34dc…34f2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0021, t01=0x015a}
0x34f2…3518 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0021, t01=0x0170}
0x3518…3524 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0008}
0x3524…352e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0014}
0x352e…3544 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0022, t01=0x001e}
0x3544…3576 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 «, t00=0x0022, t01=0x0034}
0x3576…3582 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0066}
0x3582…3598 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0022, t01=0x0072}
0x3598…35cc Head {h00=0x0030, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION «, t00=0x0022, t01=0x0088}
0x35cc…35d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00bc}
0x35d6…35e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00c6}
0x35e2…35ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00d2}
0x35ec…3602 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0022, t01=0x00dc}
0x3602…3614 Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0022, t01=0x00f2}
0x3614…361e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0104}
0x361e…3634 Head {h00=0x0012, h01=0x0050, text=»* C H L T 3 «, t00=0x0022, t01=0x010e}
0x3634…3654 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT3«, t00=0x0022, t01=0x0124}
0x3654…365e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0144}
0x365e…3672 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0022, t01=0x014e}
0x3672…3686 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0022, t01=0x0162}
0x3686…36ae Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0022, t01=0x0176}
0x36ae…36c4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0023, t01=0x000e}
0x36c4…36ee Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0023, t01=0x0024}
0x36ee…36fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x004e}
0x36fa…3704 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x005a}
0x3704…371a Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0023, t01=0x0064}
0x371a…3730 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0023, t01=0x007a}
0x3730…3756 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0023, t01=0x0090}
0x3756…3762 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x00b6}
0x3762…376c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c2}
0x376c…3782 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0023, t01=0x00cc}
0x3782…37b4 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0023, t01=0x00e2}
0x37b4…37dc Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0023, t01=0x0114}
0x37dc…37e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x013c}
0x37e6…37f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0146}
0x37f2…3808 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0023, t01=0x0152}
0x3808…381a Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0023, t01=0x0168}
0x381a…3824 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x017a}
0x3824…382e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0184}
0x382e…3844 Head {h00=0x0012, h01=0x0050, text=»* C H L T 2 «, t00=0x0023, t01=0x018e}
0x3844…3864 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT3«, t00=0x0024, t01=0x0014}
0x3864…386e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0034}
0x386e…3882 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0024, t01=0x003e}
0x3882…38aa Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0024, t01=0x0052}
0x38aa…38c0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0024, t01=0x007a}
0x38c0…38ea Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0024, t01=0x0090}
0x38ea…38f6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00ba}
0x38f6…3900 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00c6}
0x3900…3916 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0024, t01=0x00d0}
0x3916…392c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0024, t01=0x00e6}
0x392c…3952 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0024, t01=0x00fc}
0x3952…395e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0122}
0x395e…3968 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x012e}
0x3968…397e Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0024, t01=0x0138}
0x397e…39b0 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0024, t01=0x014e}
0x39b0…39c2 Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0024, t01=0x0180}
0x39c2…39d8 (37, 0, 400) Head {h00=0x0012, h01=0x0050, text=»* C H L T 4 «, t00=0x0025, t01=0x0004}
0x39d8…39f8 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT4«, t00=0x0025, t01=0x001a}
0x39f8…3a02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x003a}
0x3a02…3a16 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0025, t01=0x0044}
0x3a16…3a3e Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0025, t01=0x0058}
0x3a3e…3a54 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0025, t01=0x0080}
0x3a54…3a7e Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0025, t01=0x0096}
0x3a7e…3a8a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00c0}
0x3a8a…3a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00cc}
0x3a94…3aaa Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0025, t01=0x00d6}
0x3aaa…3ac0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0025, t01=0x00ec}
0x3ac0…3ae6 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0025, t01=0x0102}
0x3ae6…3af2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0128}
0x3af2…3afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0134}
0x3afc…3b12 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0025, t01=0x013e}
0x3b12…3b44 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT4 SET CWT-ADDRESS FOR CHLT4 «, t00=0x0025, t01=0x0154}
0x3b44…3b6c Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0025, t01=0x0186}
0x3b6c…3b78 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x001e}
0x3b78…3b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x002a}
0x3b82…3b98 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0026, t01=0x0034}
0x3b98…3ba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x004a}
0x3ba2…3bac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0054}
0x3bac…3bc2 Head {h00=0x0012, h01=0x0050, text=»* C H L T 1«, t00=0x0026, t01=0x005e}
0x3bc2…3bcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0074}
0x3bcc…3bee Head {h00=0x001e, h01=0x0050, text=»* INTERRUPT FROM CHLT1 «, t00=0x0026, t01=0x007e}
0x3bee…3bf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a0}
0x3bf8…3c0c Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x0026, t01=0x00aa}
0x3c0c…3c20 Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x0026, t01=0x00be}
0x3c20…3c34 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0026, t01=0x00d2}
0x3c34…3c48 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0026, t01=0x00e6}
0x3c48…3c5e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0026, t01=0x00fa}
0x3c5e…3c88 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0026, t01=0x0110}
0x3c88…3c94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x013a}
0x3c94…3c9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0146}
0x3c9e…3cb4 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0026, t01=0x0150}
0x3cb4…3cca Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0026, t01=0x0166}
0x3cca…3cf0 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0026, t01=0x017c}
0x3cf0…3cfc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0012}
0x3cfc…3d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x001e}
0x3d06…3d1c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0027, t01=0x0028}
0x3d1c…3d44 Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0027, t01=0x003e}
0x3d44…3d6c Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0027, t01=0x0066}
0x3d6c…3d82 Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x0027, t01=0x008e}
0x3d82…3d8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a4}
0x3d8c…3d98 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x00ae}
0x3d98…3da2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ba}
0x3da2…3db8 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0027, t01=0x00c4}
0x3db8…3dea Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG ** LOGG OF INPUT CHARACTER **«, t00=0x0027, t01=0x00da}
0x3dea…3df6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x010c}
0x3df6…3e04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0118}
0x3e04…3e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0126}
0x3e0e…3e18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0130}
0x3e18…3e46 Head {h00=0x002a, h01=0x0050, text=»* DETERMINE LINE- AND DEVICE NUMBER «, t00=0x0027, t01=0x013a}
0x3e46…3e50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0168}
0x3e50…3e74 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0027, t01=0x0172}
0x3e74…3e98 Head {h00=0x0020, h01=0x0050, text=» LDR A3,A2 INPUT WORD IN A3 «, t00=0x0028, t01=0x0008}
0x3e98…3eaa Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x0028, t01=0x002c}
0x3eaa…3ebc Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0028, t01=0x003e}
0x3ebc…3ee4 Head {h00=0x0024, h01=0x0050, text=» ANK A3,/E 2 * LINE NUMBER IN A3«, t00=0x0028, t01=0x0050}
0x3ee4…3ef6 Head {h00=0x000e, h01=0x0050, text=» SRL A4,3 «, t00=0x0028, t01=0x0078}
0x3ef6…3f20 Head {h00=0x0026, h01=0x0050, text=» ANK A4,/E 2 * DEVICE NUMBER IN A4«, t00=0x0028, t01=0x008a}
0x3f20…3f52 Head {h00=0x002e, h01=0x0050, text=» ABL(NE) CLT100 INPUT IS A DATA CHARACTER «, t00=0x0028, t01=0x00b4}
0x3f52…3f66 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0028, t01=0x00e6}
0x3f66…3f82 Head {h00=0x0018, h01=0x0050, text=» SUK A2,3 POWER ON ?«, t00=0x0028, t01=0x00fa}
0x3f82…3f98 Head {h00=0x0012, h01=0x0050, text=» RF(E) CHPOWO «, t00=0x0028, t01=0x0116}
0x3f98…3fb2 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 NAK ? =3«, t00=0x0028, t01=0x012c}
0x3fb2…3fcc Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLT035 =3 «, t00=0x0028, t01=0x0146}
0x3fcc…3fe8 Head {h00=0x0018, h01=0x0050, text=»CLT015 EQU * =7(=3)«, t00=0x0028, t01=0x0160}
0x3fe8…3ff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x017c}
0x3ff2…3ffc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0186}
0x3ffc…4030 Head {h00=0x0030, h01=0x0050, text=»* CHECK QUEUE AND SEND IF SOMETHING THERE«, t00=0x0028, t01=0x0190}
0x4030…403a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0034}
0x403a…4064 Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A5 LAST OUTPUT DWT IN A7 «, t00=0x0029, t01=0x003e}
0x4064…4086 Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0029, t01=0x0068}
0x4086…40aa Head {h00=0x0020, h01=0x0050, text=» LD A6,CWTEQ,A5 OUTPUT QUEUE«, t00=0x0029, t01=0x008a}
0x40aa…40c0 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT020 «, t00=0x0029, t01=0x00ae}
0x40c0…40dc Head {h00=0x0018, h01=0x0050, text=» STR A2,A15 SAVE A2 «, t00=0x0029, t01=0x00c4}
0x40dc…4104 Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTOTQ,A6 GET QUEUE LINK «, t00=0x0029, t01=0x00e0}
0x4104…412c Head {h00=0x0024, h01=0x0050, text=» ST A2,CWTEQ,A5 STORE IT IN CWT «, t00=0x0029, t01=0x0108}
0x412c…4152 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOCH,A6 GET CHARACTER«, t00=0x0029, t01=0x0130}
0x4152…4178 Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0029, t01=0x0156}
0x4178…4196 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 RELOAD A2«, t00=0x0029, t01=0x017c}
0x4196…41a4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x000a}
0x41a4…41ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0018}
0x41ae…41b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0022}
0x41b8…41ee Head {h00=0x0032, h01=0x0050, text=»* CHECK CONTROL CHARACTER AND UPDATE ERROR-«, t00=0x002a, t01=0x002c}
0x41ee…4224 Head {h00=0x0032, h01=0x0050, text=»* ACKUMULATORS IF NAK, RETRANSMISSION FAULT«, t00=0x002a, t01=0x0062}
0x4224…4250 Head {h00=0x0028, h01=0x0050, text=»* OR UNDEFINED CONTROL CHARACTER «, t00=0x002a, t01=0x0098}
0x4250…425a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00c4}
0x425a…426e Head {h00=0x0010, h01=0x0050, text=»CLT020 EQU *«, t00=0x002a, t01=0x00ce}
0x426e…4290 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A7 GET LAST OUTPUT«, t00=0x002a, t01=0x00e2}
0x4290…42a6 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT062 «, t00=0x002a, t01=0x0104}
0x42a6…42c0 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 ACK ? =3«, t00=0x002a, t01=0x011a}
0x42c0…42d6 Head {h00=0x0012, h01=0x0050, text=» RF(Z) CLT040 «, t00=0x002a, t01=0x0134}
0x42d6…42f2 Head {h00=0x0018, h01=0x0050, text=» ADK A2,7 TIME-OUT ?«, t00=0x002a, t01=0x014a}
0x42f2…4308 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT028 «, t00=0x002a, t01=0x0166}
0x4308…4324 Head {h00=0x0018, h01=0x0050, text=» SUK A2,5 7 NAK ? =3«, t00=0x002a, t01=0x017c}
0x4324…433e Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLT032 =3 «, t00=0x002b, t01=0x0008}
0x433e…4348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0022}
0x4348…435e Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x002b, t01=0x002c}
0x435e…4368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0042}
0x4368…4376 Head {h00=0x000a, h01=0x0050, text=» =1«, t00=0x002b, t01=0x004c}
0x4376…4384 Head {h00=0x000a, h01=0x0050, text=» =1«, t00=0x002b, t01=0x005a}
0x4384…4396 Head {h00=0x000e, h01=0x0050, text=» LDK A7,2 «, t00=0x002b, t01=0x0068}
0x4396…43be Head {h00=0x0024, h01=0x0050, text=» SUK A2,/16 RETRANSMISSION FAULT«, t00=0x002b, t01=0x007a}
0x43be…43d4 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT025 «, t00=0x002b, t01=0x00a2}
0x43d4…43fa Head {h00=0x0022, h01=0x0050, text=» ADK A7,2 UNDEFINED INTERRUPT «, t00=0x002b, t01=0x00b8}
0x43fa…4412 Head {h00=0x0014, h01=0x0050, text=»CLT025 ADR A7,A5«, t00=0x002b, t01=0x00de}
0x4412…4446 Head {h00=0x0030, h01=0x0050, text=» IM CWTADD,A7 INCREMENT ACKUMULATOR FOR THIS«, t00=0x002b, t01=0x00f6}
0x4446…4462 Head {h00=0x0018, h01=0x0050, text=» TYPE OF INTERRUPT«, t00=0x002b, t01=0x012a}
0x4462…446c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0146}
0x446c…4478 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0150}
0x4478…4482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x015c}
0x4482…4490 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0166}
0x4490…449a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0174}
0x449a…44a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x017e}
0x44a4…44d8 Head {h00=0x0030, h01=0x0050, text=»* NAK, TIME-OUT, RETRANSMISSION FAULT OR «, t00=0x002b, t01=0x0188}
0x44d8…4500 Head {h00=0x0024, h01=0x0050, text=»* UNDEFINED CONTROL CHARACTER«, t00=0x002c, t01=0x002c}
0x4500…450a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0054}
0x450a…4548 Head {h00=0x003a, h01=0x0050, text=»* CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE«, t00=0x002c, t01=0x005e}
0x4548…4580 Head {h00=0x0034, h01=0x0050, text=»* ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH «, t00=0x002c, t01=0x009c}
0x4580…45a2 Head {h00=0x001e, h01=0x0050, text=»* MESSAGE NOT OPERABLE.«, t00=0x002c, t01=0x00d4}
0x45a2…45ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00f6}
0x45ac…45c0 Head {h00=0x0010, h01=0x0050, text=»CLT028 EQU *«, t00=0x002c, t01=0x0100}
0x45c0…45f2 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/3000 ECHO MODE AND RECOVERY BIT «, t00=0x002c, t01=0x0114}
0x45f2…4628 Head {h00=0x0032, h01=0x0050, text=» AN A2,DWTST,A6 AT LEAST ONE OF THE BITS SET ?«, t00=0x002c, t01=0x0146}
0x4628…463e Head {h00=0x0012, h01=0x0050, text=» RF(NE) CLT032«, t00=0x002c, t01=0x017c}
0x463e…4672 (45, 0, 400) Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE «, t00=0x002d, t01=0x0004}
0x4672…46a2 Head {h00=0x002c, h01=0x0050, text=» XRS A2,DWTST,A6 SET BIT IN STATUS WORD «, t00=0x002d, t01=0x0038}
0x46a2…46d6 Head {h00=0x0030, h01=0x0050, text=»CLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE «, t00=0x002d, t01=0x0068}
0x46d6…46ec Head {h00=0x0012, h01=0x0050, text=» LDK A4,1 =1 «, t00=0x002d, t01=0x009c}
0x46ec…46fe Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x002d, t01=0x00b2}
0x46fe…4710 Head {h00=0x000e, h01=0x0050, text=» RF CPO025«, t00=0x002d, t01=0x00c4}
0x4710…4742 Head {h00=0x002e, h01=0x0050, text=»CLT032 LDK A1,NOERR INDICATE NOT OPERABLE «, t00=0x002d, t01=0x00d6}
0x4742…476e Head {h00=0x0028, h01=0x0050, text=» CM CWTRTC,A5 CLEAR RETRY COUNTER =1«, t00=0x002d, t01=0x0108}
0x476e…4782 Head {h00=0x0010, h01=0x0050, text=» ABL CLT110 «, t00=0x002d, t01=0x0134}
0x4782…4790 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0148}
0x4790…479a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0156}
0x479a…47a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0160}
0x47a4…47b6 Head {h00=0x000e, h01=0x0050, text=»* N A K«, t00=0x002d, t01=0x016a}
0x47b6…47c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x017c}
0x47c0…4806 Head {h00=0x0042, h01=0x0050, text=»* ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. «, t00=0x002d, t01=0x0186}
0x4806…484c Head {h00=0x0042, h01=0x0050, text=»* LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER «, t00=0x002e, t01=0x003c}
0x484c…4890 Head {h00=0x0040, h01=0x0050, text=»* UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT«, t00=0x002e, t01=0x0082}
0x4890…48c0 Head {h00=0x002c, h01=0x0050, text=»* OPERABLE IS SENT TO DEVICE DRIVER. «, t00=0x002e, t01=0x00c6}
0x48c0…48ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00f6}
0x48ca…48de Head {h00=0x0010, h01=0x0050, text=»CLT035 EQU *«, t00=0x002e, t01=0x0100}
0x48de…48f4 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x002e, t01=0x0114}
0x48f4…48fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x012a}
0x48fe…492c Head {h00=0x002a, h01=0x0050, text=» IM CWTADD,A5 UPDATE ERROR ACKUMULATOR«, t00=0x002e, t01=0x0134}
0x492c…4938 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0162}
0x4938…4942 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x016e}
0x4942…4978 Head {h00=0x0032, h01=0x0050, text=» IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER«, t00=0x002e, t01=0x0178}
0x4978…499c Head {h00=0x0020, h01=0x0050, text=» LD A4,CWTRTC,A5 GET COUNTER«, t00=0x002f, t01=0x001e}
0x499c…49bc Head {h00=0x001c, h01=0x0050, text=» SUK A4,7 SEVEN TIMES ? «, t00=0x002f, t01=0x0042}
0x49bc…49da Head {h00=0x001a, h01=0x0050, text=» RB(E) CLT015 =7(=3) «, t00=0x002f, t01=0x0062}
0x49da…4a08 Head {h00=0x002a, h01=0x0050, text=» LD A2,CWTLOW,A5 GET LAST OUTPUT WORD «, t00=0x002f, t01=0x0080}
0x4a08…4a1a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x002f, t01=0x00ae}
0x4a1a…4a48 Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x002f, t01=0x00c0}
0x4a48…4a56 Head {h00=0x000a, h01=0x0050, text=» =3«, t00=0x002f, t01=0x00ee}
0x4a56…4a6c Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x002f, t01=0x00fc}
0x4a6c…4a9e Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG ** LOGG OUTPUT CHARACTER **«, t00=0x002f, t01=0x0112}
0x4a9e…4aaa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0144}
0x4aaa…4ab8 Head {h00=0x000a, h01=0x0050, text=» =3«, t00=0x002f, t01=0x0150}
0x4ab8…4aca Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x002f, t01=0x015e}
0x4aca…4ad8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x0170}
0x4ad8…4ae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x017e}
0x4ae2…4aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0188}
0x4aec…4b0c (48, 0, 400) Head {h00=0x001c, h01=0x0050, text=»* ACK DATA = 07 «, t00=0x0030, t01=0x0004}
0x4b0c…4b16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0024}
0x4b16…4b4c Head {h00=0x0032, h01=0x0050, text=»* SIMULATE DATA REQUEST IF RETURN CODE FROM«, t00=0x0030, t01=0x002e}
0x4b4c…4b7e Head {h00=0x002e, h01=0x0050, text=»* CHLT OR DEVICE WITHOUT DATA REQUEST, «, t00=0x0030, t01=0x0064}
0x4b7e…4ba0 Head {h00=0x001e, h01=0x0050, text=»* ELSE GO TO DISPATCHER«, t00=0x0030, t01=0x0096}
0x4ba0…4baa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00b8}
0x4baa…4bbe Head {h00=0x0010, h01=0x0050, text=»CLT040 EQU *«, t00=0x0030, t01=0x00c2}
0x4bbe…4bd4 Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x0030, t01=0x00d6}
0x4bd4…4c0e Head {h00=0x0036, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT IN STATUS WORD«, t00=0x0030, t01=0x00ec}
0x4c0e…4c20 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0030, t01=0x0126}
0x4c20…4c58 Head {h00=0x0034, h01=0x0050, text=» RF(NZ) CLT110 RETURN CODE,SIMULATE DATA REQUEST«, t00=0x0030, t01=0x0138}
0x4c58…4c88 Head {h00=0x002c, h01=0x0050, text=» LDR* A7,A6 DEVICE WITHOUT DATA REQUEST?«, t00=0x0030, t01=0x0170}
0x4c88…4cb8 Head {h00=0x002c, h01=0x0050, text=» RF(N) CLT110 YES. SIMULATE DATA REQUEST«, t00=0x0031, t01=0x0010}
0x4cb8…4cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0040}
0x4cc2…4cd8 Head {h00=0x0012, h01=0x0050, text=» IFF SOFTIM=1 «, t00=0x0031, t01=0x004a}
0x4cd8…4ce2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0060}
0x4ce2…4cf6 Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x0031, t01=0x006a}
0x4cf6…4d06 Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0031, t01=0x007e}
0x4d06…4d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x008e}
0x4d10…4d1c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0098}
0x4d1c…4d26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00a4}
0x4d26…4d30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ae}
0x4d30…4d46 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0031, t01=0x00b8}
0x4d46…4d50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ce}
0x4d50…4d5e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x00d8}
0x4d5e…4d68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00e6}
0x4d68…4d72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00f0}
0x4d72…4d8e Head {h00=0x0018, h01=0x0050, text=»* PRINTER TIMING «, t00=0x0031, t01=0x00fa}
0x4d8e…4d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0116}
0x4d98…4da4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0031, t01=0x0120}
0x4da4…4db2 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0031, t01=0x012c}
0x4db2…4dc0 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0031, t01=0x013a}
0x4dc0…4dce Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0031, t01=0x0148}
0x4dce…4dfc Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTTP,A6 ADDRESS TO TIMER BLOCK«, t00=0x0031, t01=0x0156}
0x4dfc…4e12 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT060 «, t00=0x0031, t01=0x0184}
0x4e12…4e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x000a}
0x4e1c…4e36 Head {h00=0x0016, h01=0x0050, text=»* RESTART TIMER«, t00=0x0032, t01=0x0014}
0x4e36…4e40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x002e}
0x4e40…4e66 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,-DRQTIM RESTART TIMER«, t00=0x0032, t01=0x0038}
0x4e66…4e7e Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x0032, t01=0x005e}
0x4e7e…4e8e Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0032, t01=0x0076}
0x4e8e…4e98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0086}
0x4e98…4eb0 Head {h00=0x0014, h01=0x0050, text=»* START TIMER«, t00=0x0032, t01=0x0090}
0x4eb0…4eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00a8}
0x4eba…4edc Head {h00=0x001e, h01=0x0050, text=»CLT060 LDR A1,A6 PARAMETER«, t00=0x0032, t01=0x00b2}
0x4edc…4f00 Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTTP TIMER POINTER«, t00=0x0032, t01=0x00d4}
0x4f00…4f28 Head {h00=0x0024, h01=0x0050, text=» ADR A4,A6 ADD WITH DWT-ADDRESS «, t00=0x0032, t01=0x00f8}
0x4f28…4f4e Head {h00=0x0022, h01=0x0050, text=» CF A15,SETIMP GET TIMER BLOCK«, t00=0x0032, t01=0x0120}
0x4f4e…4f90 Head {h00=0x003e, h01=0x0050, text=» DATA DRQTUT,DRQTIM ADDRESS TO TIME-OUT ROUTINE AND DELAY «, t00=0x0032, t01=0x0146}
0x4f90…4fa4 Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x0032, t01=0x0188}
0x4fa4…4fb4 Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0033, t01=0x000c}
0x4fb4…4fbc Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x001c}
0x4fbc…4fca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0024}
0x4fca…4fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0032}
0x4fd4…4fde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x003c}
0x4fde…5002 Head {h00=0x0020, h01=0x0050, text=»* RESET TIMER IF STARTED «, t00=0x0033, t01=0x0046}
0x5002…500c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x006a}
0x500c…501a Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0033, t01=0x0074}
0x501a…5028 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0033, t01=0x0082}
0x5028…5036 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0033, t01=0x0090}
0x5036…5044 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0033, t01=0x009e}
0x5044…5052 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0033, t01=0x00ac}
0x5052…5060 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x00ba}
0x5060…506a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00c8}
0x506a…50a4 Head {h00=0x0036, h01=0x0050, text=»* TIME-OUT ROUTINE HANDLING MISSING INTERRUPTS «, t00=0x0033, t01=0x00d2}
0x50a4…50be Head {h00=0x0016, h01=0x0050, text=»* FROM PRINTERS«, t00=0x0033, t01=0x010c}
0x50be…50c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0126}
0x50c8…50dc Head {h00=0x0010, h01=0x0050, text=»DRQTUT EQU *«, t00=0x0033, t01=0x0130}
0x50dc…50fe Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0033, t01=0x0144}
0x50fe…5130 Head {h00=0x002e, h01=0x0050, text=» CM DWTTP,A6 RESET POINTER TO TIMER BLOCK «, t00=0x0033, t01=0x0166}
0x5130…5148 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x0034, t01=0x0008}
0x5148…5166 Head {h00=0x001a, h01=0x0050, text=» SLL A3,2 ECHO MODE ? «, t00=0x0034, t01=0x0020}
0x5166…5180 Head {h00=0x0016, h01=0x0050, text=» RF(N) CLT110 YES «, t00=0x0034, t01=0x003e}
0x5180…518a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0058}
0x518a…51a0 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0034, t01=0x0062}
0x51a0…51b6 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0034, t01=0x0078}
0x51b6…51c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x008e}
0x51c0…51e6 Head {h00=0x0022, h01=0x0050, text=» LDR* A5,A6 CHANNEL PARAMETER «, t00=0x0034, t01=0x0098}
0x51e6…51f8 Head {h00=0x000e, h01=0x0050, text=» ANK A5,/F«, t00=0x0034, t01=0x00be}
0x51f8…5214 Head {h00=0x0018, h01=0x0050, text=» SLL A5,1 2 * INDEX «, t00=0x0034, t01=0x00d0}
0x5214…5240 Head {h00=0x0028, h01=0x0050, text=» ADK A5,2 JUST TO AVOID TABLE LENGTH«, t00=0x0034, t01=0x00ec}
0x5240…5268 Head {h00=0x0024, h01=0x0050, text=» LD A5,CHTAB,A5 GET CWT-ADDRESS «, t00=0x0034, t01=0x0118}
0x5268…5294 Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0034, t01=0x0140}
0x5294…529e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x016c}
0x529e…52aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0176}
0x52aa…52c0 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0034, t01=0x0182}
0x52c0…52d6 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0035, t01=0x0008}
0x52d6…52ec Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0035, t01=0x001e}
0x52ec…52f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0034}
0x52f6…531e Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0035, t01=0x003e}
0x531e…534a Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0035, t01=0x0066}
0x534a…5354 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0092}
0x5354…5360 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x009c}
0x5360…5376 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0035, t01=0x00a8}
0x5376…5380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00be}
0x5380…53a8 Head {h00=0x0024, h01=0x0050, text=» LD A7,DWTOR,A6 TEST ORDER ? =2 «, t00=0x0035, t01=0x00c8}
0x53a8…53c4 Head {h00=0x0018, h01=0x0050, text=» ANK A7,/FE U =9(=2)«, t00=0x0035, t01=0x00f0}
0x53c4…53fa Head {h00=0x0032, h01=0x0050, text=» RB(E) CLT032 YES, GO TO DEV. INT. HANDLER =2 «, t00=0x0035, t01=0x010c}
0x53fa…542a Head {h00=0x002c, h01=0x0050, text=» RB CLT030 NO, EXECUTE DEV. RECOVERY =2 «, t00=0x0035, t01=0x0142}
0x542a…5434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0172}
0x5434…5440 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x017c}
0x5440…544a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0188}
0x544a…5458 (54, 0, 398) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0004}
0x5458…5462 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0012}
0x5462…5484 Head {h00=0x001e, h01=0x0050, text=»* POWER ON DATA = 03 «, t00=0x0036, t01=0x001c}
0x5484…548e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x003e}
0x548e…54c8 Head {h00=0x0036, h01=0x0050, text=»* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE«, t00=0x0036, t01=0x0048}
0x54c8…5502 Head {h00=0x0036, h01=0x0050, text=»* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL«, t00=0x0036, t01=0x0082}
0x5502…552a Head {h00=0x0024, h01=0x0050, text=»* UNIT OR THOSE IN ECHO MODE.«, t00=0x0036, t01=0x00bc}
0x552a…5534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00e4}
0x5534…553e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00ee}
0x553e…5568 Head {h00=0x0026, h01=0x0050, text=»* ON EXIT TO RECOVERY ROUTINE:«, t00=0x0036, t01=0x00f8}
0x5568…5572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0122}
0x5572…5598 Head {h00=0x0022, h01=0x0050, text=»* A5 = STACKBASE 2 IN DWT «, t00=0x0036, t01=0x012c}
0x5598…55b6 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0036, t01=0x0152}
0x55b6…55ce Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER«, t00=0x0036, t01=0x0170}
0x55ce…55d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0188}
0x55d8…55ec (55, 0, 400) Head {h00=0x0010, h01=0x0050, text=»CHPOWO EQU *«, t00=0x0037, t01=0x0004}
0x55ec…5602 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETLIN«, t00=0x0037, t01=0x0018}
0x5602…562a Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A5 GET LAST OUTPUT DWT «, t00=0x0037, t01=0x002e}
0x562a…565c Head {h00=0x002e, h01=0x0050, text=» CM CWTRTC,A5 RESET RETRANSMISSION COUNTER«, t00=0x0037, t01=0x0056}
0x565c…566e Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0037, t01=0x0088}
0x566e…5690 Head {h00=0x001e, h01=0x0050, text=» LDR A3,A6 DEVICE COUNTER «, t00=0x0037, t01=0x009a}
0x5690…56b2 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A8 ADDRESS POINTER«, t00=0x0037, t01=0x00bc}
0x56b2…56da Head {h00=0x0024, h01=0x0050, text=» RF(Z) EXIT EXIT IF NOT DEFINED «, t00=0x0037, t01=0x00de}
0x56da…56f2 Head {h00=0x0014, h01=0x0050, text=»CPO020 ADK A1,2 «, t00=0x0037, t01=0x0106}
0x56f2…5716 Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT-ADDRESS «, t00=0x0037, t01=0x011e}
0x5716…5732 Head {h00=0x0018, h01=0x0050, text=» RF(E) CPO030 NO DWT«, t00=0x0037, t01=0x0142}
0x5732…5744 Head {h00=0x000e, h01=0x0050, text=» SRC A6,1 «, t00=0x0037, t01=0x015e}
0x5744…575a Head {h00=0x0012, h01=0x0050, text=» RF(N) CPO030 «, t00=0x0037, t01=0x0170}
0x575a…576c Head {h00=0x000e, h01=0x0050, text=» SLC A6,1 «, t00=0x0037, t01=0x0186}
0x576c…5792 Head {h00=0x0022, h01=0x0050, text=» LCR A7,A6 LEFT BYTE OF DWTCHP«, t00=0x0038, t01=0x0008}
0x5792…57b2 Head {h00=0x001c, h01=0x0050, text=» ANK A7,1 INPUT DEVICE ?«, t00=0x0038, t01=0x002e}
0x57b2…57cc Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO025 YES«, t00=0x0038, t01=0x004e}
0x57cc…57e2 Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x0038, t01=0x0068}
0x57e2…580e Head {h00=0x0028, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT «, t00=0x0038, t01=0x007e}
0x580e…5826 Head {h00=0x0014, h01=0x0050, text=» LC A7,DWTST,A6 «, t00=0x0038, t01=0x00aa}
0x5826…5846 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/20 ECHO MODE ? «, t00=0x0038, t01=0x00c2}
0x5846…5860 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO030 YES«, t00=0x0038, t01=0x00e2}
0x5860…5896 Head {h00=0x0032, h01=0x0050, text=» CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER ?«, t00=0x0038, t01=0x00fc}
0x5896…58b0 Head {h00=0x0016, h01=0x0050, text=» RF(E) CPO030 YES «, t00=0x0038, t01=0x0132}
0x58b0…58ec Head {h00=0x0038, h01=0x0050, text=»CPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESSBLOCK IN A7«, t00=0x0038, t01=0x014c}
0x58ec…591e Head {h00=0x002e, h01=0x0050, text=» LD A7,RECADR,A7 ADDRESS TO RECOVERY IN A7«, t00=0x0038, t01=0x0188}
0x591e…5940 Head {h00=0x001e, h01=0x0050, text=» RF(E) CPO030 NO RECOVERY «, t00=0x0039, t01=0x002a}
0x5940…5962 Head {h00=0x001e, h01=0x0050, text=» LDKL A5,DWTSB2 STACKBASE «, t00=0x0039, t01=0x004c}
0x5962…5974 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0039, t01=0x006e}
0x5974…5980 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0039, t01=0x0080}
0x5980…59aa Head {h00=0x0026, h01=0x0050, text=» CFR A15,A7 GO TO RECOVERY ROUTINE«, t00=0x0039, t01=0x008c}
0x59aa…59d6 Head {h00=0x0028, h01=0x0050, text=»CPO030 SUK A3,2 ALL DEVICES THREATED«, t00=0x0039, t01=0x00b6}
0x59d6…59de Head {h00=0x0004, h01=0x0050, t00=0x0039, t01=0x00e2}
0x59de…5a02 Head {h00=0x0020, h01=0x0050, text=» RB(NE) CPO020 NO TAKE NEXT «, t00=0x0039, t01=0x00ea}
0x5a02…5a18 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0039, t01=0x010e}
0x5a18…5a26 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0124}
0x5a26…5a30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0132}
0x5a30…5a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x013c}
0x5a3a…5a54 Head {h00=0x0016, h01=0x0050, text=»* DATA-REQUEST«, t00=0x0039, t01=0x0146}
0x5a54…5a5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0160}
0x5a5e…5a8a Head {h00=0x0028, h01=0x0050, text=»CLT100 CF A15,GETLIN GET DWT-ADDRESS«, t00=0x0039, t01=0x016a}
0x5a8a…5aae Head {h00=0x0020, h01=0x0050, text=» SUR A6,A4 VALID INTERRUPT ?«, t00=0x003a, t01=0x0008}
0x5aae…5ac2 Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x003a, t01=0x002c}
0x5ac2…5ad4 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x003a, t01=0x0040}
0x5ad4…5af8 Head {h00=0x0020, h01=0x0050, text=» RB(Z) EXIT EXIT NOT DEFINED«, t00=0x003a, t01=0x0052}
0x5af8…5b14 Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A8 GET DWT «, t00=0x003a, t01=0x0076}
0x5b14…5b28 Head {h00=0x0010, h01=0x0050, text=» RB(E) EXIT «, t00=0x003a, t01=0x0092}
0x5b28…5b3e Head {h00=0x0012, h01=0x0050, text=» ANKL A6,/FFFE«, t00=0x003a, t01=0x00a6}
0x5b3e…5b70 Head {h00=0x002e, h01=0x0050, text=» LCR A7,A6 LEFT BYTE IN CHANNEL PARAMETER «, t00=0x003a, t01=0x00bc}
0x5b70…5b8e Head {h00=0x001a, h01=0x0050, text=» ANK A7,1 DATA INPUT ?«, t00=0x003a, t01=0x00ee}
0x5b8e…5ba8 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CLT110 YES«, t00=0x003a, t01=0x010c}
0x5ba8…5bd2 Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A6 GET CHANNEL PARAMETER «, t00=0x003a, t01=0x0126}
0x5bd2…5be6 Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x003a, t01=0x0150}
0x5be6…5c14 Head {h00=0x002a, h01=0x0050, text=»CLT110 LD A7,DWTOR,A6 SET ORDER IN A7 «, t00=0x003a, t01=0x0164}
0x5c14…5c28 (59, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x003b, t01=0x0004}
0x5c28…5c56 Head {h00=0x002a, h01=0x0050, text=» LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8«, t00=0x003b, t01=0x0018}
0x5c56…5c6c Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x003b, t01=0x0046}
0x5c6c…5c9a Head {h00=0x002a, h01=0x0050, text=» LC A3,DWTOCH,A6 GET LAST CHARACTER =4«, t00=0x003b, t01=0x005c}
0x5c9a…5cb2 Head {h00=0x0014, h01=0x0050, text=» ANK A3,/7F =4 «, t00=0x003b, t01=0x008a}
0x5cb2…5ce0 Head {h00=0x002a, h01=0x0050, text=» SUK A3,DUMMSP SPECIAL DUMMY=ETX ? =4 «, t00=0x003b, t01=0x00a2}
0x5ce0…5cfc Head {h00=0x0018, h01=0x0050, text=» RF(NE) CLT120 NO =4«, t00=0x003b, t01=0x00d0}
0x5cfc…5d30 Head {h00=0x0030, h01=0x0050, text=» LDR* A3,A6 DEVICE WITHOUT DATA REQUEST ? =9«, t00=0x003b, t01=0x00ec}
0x5d30…5d68 Head {h00=0x0034, h01=0x0050, text=» RF(N) CLT120 YES, DO NOT TOUCH TIMER POINTER =9«, t00=0x003b, t01=0x0120}
0x5d68…5d92 Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTTP,A6 TIMER RUNNING ? =4«, t00=0x003b, t01=0x0158}
0x5d92…5dae Head {h00=0x0018, h01=0x0050, text=» RF(E) CLT120 NO =4 «, t00=0x003b, t01=0x0182}
0x5dae…5dc0 Head {h00=0x000e, h01=0x0050, text=» INH =4 «, t00=0x003c, t01=0x000e}
0x5dc0…5de4 Head {h00=0x0020, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER =4«, t00=0x003c, t01=0x0020}
0x5de4…5e1a Head {h00=0x0032, h01=0x0050, text=» CM DWTTP,A6 RESET ADDRESS POINTER TO TIMER =4«, t00=0x003c, t01=0x0044}
0x5e1a…5e32 Head {h00=0x0014, h01=0x0050, text=»CLT120 EQU * =4«, t00=0x003c, t01=0x007a}
0x5e32…5e3e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0092}
0x5e3e…5e76 Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 «, t00=0x003c, t01=0x009e}
0x5e76…5e82 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x003c, t01=0x00d6}
0x5e82…5eb0 Head {h00=0x002a, h01=0x0050, text=» ABI INTADR,A3 GO TO INTERRUPT HANDLER«, t00=0x003c, t01=0x00e2}
0x5eb0…5eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0110}
0x5eba…5efc Head {h00=0x003e, h01=0x0050, text=»* THE FOLLOWING REGISTER VAULES ARE VALID WHEN ENTERING «, t00=0x003c, t01=0x011a}
0x5efc…5f30 Head {h00=0x0030, h01=0x0050, text=»* THE DEVICE DEPENDANT INTERRUPT HANDLER:-«, t00=0x003c, t01=0x015c}
0x5f30…5f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0190}
0x5f3a…5f66 Head {h00=0x0028, h01=0x0050, text=»* A1 = ERROR CODE (A1=0 NOERROR)«, t00=0x003d, t01=0x000a}
0x5f66…5fac Head {h00=0x0042, h01=0x0050, text=»* (A1=1 NOT OPERABLE , HARDWARE TIME-OUT) «, t00=0x003d, t01=0x0036}
0x5fac…5fc8 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x003d, t01=0x007c}
0x5fc8…5fd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0098}
0x5fd2…5fe8 Head {h00=0x0012, h01=0x0050, text=»* A7 = ORDER«, t00=0x003d, t01=0x00a2}
0x5fe8…5ff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00b8}
0x5ff2…600e Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x003d, t01=0x00c2}
0x600e…601c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x00de}
0x601c…6026 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00ec}
0x6026…603e Head {h00=0x0014, h01=0x0050, text=»* G E T L I N «, t00=0x003d, t01=0x00f6}
0x603e…6048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x010e}
0x6048…608a Head {h00=0x003e, h01=0x0050, text=»* SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE 'INTLTX' «, t00=0x003d, t01=0x0118}
0x608a…60ba Head {h00=0x002c, h01=0x0050, text=»* FOR A GIVEN LINE- AND DEVICE NUMBER «, t00=0x003d, t01=0x015a}
0x60ba…60c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x018a}
0x60c4…60da (62, 0, 400) Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:-«, t00=0x003e, t01=0x0004}
0x60da…60e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x001a}
0x60e4…6104 Head {h00=0x001c, h01=0x0050, text=»* A3 = LINE NUMBER * 2«, t00=0x003e, t01=0x0024}
0x6104…6126 Head {h00=0x001e, h01=0x0050, text=»* A4 = DEVICE NUMBER * 2«, t00=0x003e, t01=0x0044}
0x6126…6130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0066}
0x6130…6146 Head {h00=0x0012, h01=0x0050, text=»* ON EXIT:- «, t00=0x003e, t01=0x0070}
0x6146…6150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0086}
0x6150…618a Head {h00=0x0036, h01=0x0050, text=»* A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE «, t00=0x003e, t01=0x0090}
0x618a…61ca Head {h00=0x003c, h01=0x0050, text=»* A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FOUND «, t00=0x003e, t01=0x00ca}
0x61ca…61d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x010a}
0x61d4…61de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0114}
0x61de…61f2 Head {h00=0x0010, h01=0x0050, text=»GETLIN EQU *«, t00=0x003e, t01=0x011e}
0x61f2…6226 Head {h00=0x0030, h01=0x0050, text=» LD* A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE«, t00=0x003e, t01=0x0132}
0x6226…6240 Head {h00=0x0016, h01=0x0050, text=» RF(Z) GTL010 =5 «, t00=0x003e, t01=0x0166}
0x6240…6264 Head {h00=0x0020, h01=0x0050, text=» ADR A8,A3 POSITION IN TABLE«, t00=0x003e, t01=0x0180}
0x6264…6294 Head {h00=0x002c, h01=0x0050, text=» LDR* A8,A8 ADDRESS TO TERMINAL SECTION «, t00=0x003f, t01=0x0014}
0x6294…62c0 Head {h00=0x0028, h01=0x0050, text=» RF(Z) GTL010 RETURN IF NOT DEFINED «, t00=0x003f, t01=0x0044}
0x62c0…62e0 Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A8 GET ID-WORD «, t00=0x003f, t01=0x0070}
0x62e0…6310 Head {h00=0x002c, h01=0x0050, text=» ANK A6,/FF TWO TIMES NUMBER OF DEVICES «, t00=0x003f, t01=0x0090}
0x6310…6348 Head {h00=0x0034, h01=0x0050, text=» ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION«, t00=0x003f, t01=0x00c0}
0x6348…6370 Head {h00=0x0024, h01=0x0050, text=»GTL010 ABL RTNA15 RETURN AND ENB«, t00=0x003f, t01=0x00f8}
0x6370…637e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x0120}
0x637e…6388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x012e}
0x6388…63a0 Head {h00=0x0014, h01=0x0050, text=»* O U T L I N «, t00=0x003f, t01=0x0138}
0x63a0…63aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0150}
0x63aa…63e8 Head {h00=0x003a, h01=0x0050, text=»* SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT.«, t00=0x003f, t01=0x015a}
0x63e8…63f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0008}
0x63f2…6432 Head {h00=0x003c, h01=0x0050, text=»* CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL «, t00=0x0040, t01=0x0012}
0x6432…646e Head {h00=0x0038, h01=0x0050, text=»* UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A«, t00=0x0040, t01=0x0052}
0x646e…6490 Head {h00=0x001e, h01=0x0050, text=»* OUTPUT QUEUE THREAD.«, t00=0x0040, t01=0x008e}
0x6490…649a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00b0}
0x649a…64b2 Head {h00=0x0014, h01=0x0050, text=»* ON ENTRY: «, t00=0x0040, t01=0x00ba}
0x64b2…64bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00d2}
0x64bc…64ee Head {h00=0x002e, h01=0x0050, text=»* A2 = OUTPUT CHARACTER IN RIGHT BYTE «, t00=0x0040, t01=0x00dc}
0x64ee…650c Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0040, t01=0x010e}
0x650c…6516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x012c}
0x6516…652a Head {h00=0x0010, h01=0x0050, text=»OUTLIN EQU *«, t00=0x0040, t01=0x0136}
0x652a…6540 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0040, t01=0x014a}
0x6540…656a Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0040, t01=0x0160}
0x656a…6576 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x018a}
0x6576…6580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0008}
0x6580…6596 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0041, t01=0x0012}
0x6596…65bc Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0041, t01=0x0028}
0x65bc…65c8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x004e}
0x65c8…65d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x005a}
0x65d2…65dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0064}
0x65dc…65f2 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0041, t01=0x006e}
0x65f2…65fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0084}
0x65fc…6622 Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETER «, t00=0x0041, t01=0x008e}
0x6622…6642 Head {h00=0x001c, h01=0x0050, text=» ANK A1,/F CHANNEL INDEX«, t00=0x0041, t01=0x00b4}
0x6642…6654 Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0041, t01=0x00d4}
0x6654…6666 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0041, t01=0x00e6}
0x6666…6694 Head {h00=0x002a, h01=0x0050, text=» LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 «, t00=0x0041, t01=0x00f8}
0x6694…669e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0126}
0x669e…66aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0130}
0x66aa…66b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x013c}
0x66b4…66be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0146}
0x66be…66d4 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0041, t01=0x0150}
0x66d4…66de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0166}
0x66de…66f6 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,CWTLT1 «, t00=0x0041, t01=0x0170}
0x66f6…6700 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0188}
0x6700…670c (66, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0004}
0x670c…6716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0010}
0x6716…6736 Head {h00=0x001c, h01=0x0050, text=» INH INHIBIT INTERRUPT «, t00=0x0042, t01=0x001a}
0x6736…6758 Head {h00=0x001e, h01=0x0050, text=» LDR* A4,A1 IS UNIT FREE ?«, t00=0x0042, t01=0x003a}
0x6758…6772 Head {h00=0x0016, h01=0x0050, text=» RF(E) OUL050 YES «, t00=0x0042, t01=0x005c}
0x6772…6780 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0076}
0x6780…678a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0084}
0x678a…67a4 Head {h00=0x0016, h01=0x0050, text=»* QUEUE OUTPUT «, t00=0x0042, t01=0x008e}
0x67a4…67ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00a8}
0x67ae…67d8 Head {h00=0x0026, h01=0x0050, text=»OUL005 LD A4,CWTEQ,A1 OUTPUT QUEUE«, t00=0x0042, t01=0x00b2}
0x67d8…67ee Head {h00=0x0012, h01=0x0050, text=» RF(E) OUL020 «, t00=0x0042, t01=0x00dc}
0x67ee…6806 Head {h00=0x0014, h01=0x0050, text=»OUL010 CWR A6,A4«, t00=0x0042, t01=0x00f2}
0x6806…6838 Head {h00=0x002e, h01=0x0050, text=» RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE«, t00=0x0042, t01=0x010a}
0x6838…6850 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTOTQ,A4«, t00=0x0042, t01=0x013c}
0x6850…687a Head {h00=0x0026, h01=0x0050, text=» RF(E) OUL030 END OF THREAD FOUND «, t00=0x0042, t01=0x0154}
0x687a…689e Head {h00=0x0020, h01=0x0050, text=» LDR A4,A3 FOLLOW THE THREAD«, t00=0x0042, t01=0x017e}
0x689e…68b0 Head {h00=0x000e, h01=0x0050, text=» RB OUL010«, t00=0x0043, t01=0x0012}
0x68b0…68d8 Head {h00=0x0024, h01=0x0050, text=»OUL020 ST A6,CWTEQ,A1 QUEUE DWT «, t00=0x0043, t01=0x0024}
0x68d8…68ea Head {h00=0x000e, h01=0x0050, text=» RF OUL040«, t00=0x0043, t01=0x004c}
0x68ea…6912 Head {h00=0x0024, h01=0x0050, text=»OUL030 ST A6,DWTOTQ,A4 QUEUE DWT«, t00=0x0043, t01=0x005e}
0x6912…6940 Head {h00=0x002a, h01=0x0050, text=»OUL040 CM DWTOTQ,A6 SET END OF THREAD «, t00=0x0043, t01=0x0086}
0x6940…6952 Head {h00=0x000e, h01=0x0050, text=» RF OUL060«, t00=0x0043, t01=0x00b4}
0x6952…6960 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x00c6}
0x6960…696a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00d4}
0x696a…6986 Head {h00=0x0018, h01=0x0050, text=»* SEND CHARACTER «, t00=0x0043, t01=0x00de}
0x6986…6990 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00fa}
0x6990…69c0 Head {h00=0x002c, h01=0x0050, text=»OUL050 LDR* A3,A6 GET CHANNEL PARAMETERS«, t00=0x0043, t01=0x0104}
0x69c0…69d6 Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/7F00«, t00=0x0043, t01=0x0134}
0x69d6…69ea Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0043, t01=0x014a}
0x69ea…69fc Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x0043, t01=0x015e}
0x69fc…6a10 Head {h00=0x0010, h01=0x0050, text=»OUL055 EQU *«, t00=0x0043, t01=0x0170}
0x6a10…6a3e Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x0043, t01=0x0184}
0x6a3e…6a54 Head {h00=0x0012, h01=0x0050, text=» RB(NA) OUL005«, t00=0x0044, t01=0x0022}
0x6a54…6a7c Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 STORE LAST DWT IN CWT«, t00=0x0044, t01=0x0038}
0x6a7c…6a92 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0044, t01=0x0060}
0x6a92…6ac6 Head {h00=0x0030, h01=0x0050, text=» CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** «, t00=0x0044, t01=0x0076}
0x6ac6…6ad2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x00aa}
0x6ad2…6b0a Head {h00=0x0034, h01=0x0050, text=» ST A2,CWTLOW,A1 STORE LAST OUTPUT IN CWT =6(=3)«, t00=0x0044, t01=0x00b6}
0x6b0a…6b46 Head {h00=0x0038, h01=0x0050, text=»OUL060 SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT«, t00=0x0044, t01=0x00ee}
0x6b46…6b5a Head {h00=0x0010, h01=0x0050, text=»OUL070 EQU *«, t00=0x0044, t01=0x012a}
0x6b5a…6b70 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0044, t01=0x013e}
0x6b70…6b9c Head {h00=0x0028, h01=0x0050, text=» ABL IHRET8 RESTORE A1-A8 AND RETURN«, t00=0x0044, t01=0x0154}
0x6b9c…6ba8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0180}
0x6ba8…6bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x018c}
0x6bb2…6bc8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0045, t01=0x0008}
0x6bc8…6bf6 Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0045, t01=0x001e}
0x6bf6…6c08 Head {h00=0x000e, h01=0x0050, text=» INH U =9«, t00=0x0045, t01=0x004c}
0x6c08…6c26 Head {h00=0x001a, h01=0x0050, text=» ADKL A15,2 ...AND =9 «, t00=0x0045, t01=0x005e}
0x6c26…6c4a Head {h00=0x0020, h01=0x0050, text=» LDR* P,A15 RETURN =9«, t00=0x0045, t01=0x007c}
0x6c4a…6c56 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00a0}
0x6c56…6c60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ac}
0x6c60…6c6e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x00b6}
0x6c6e…6c78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c4}
0x6c78…6c90 Head {h00=0x0014, h01=0x0050, text=»* C H L T O N «, t00=0x0045, t01=0x00ce}
0x6c90…6c9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00e6}
0x6c9a…6cdc Head {h00=0x003e, h01=0x0050, text=»* SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY«, t00=0x0045, t01=0x00f0}
0x6cdc…6d20 Head {h00=0x0040, h01=0x0050, text=»* CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' «, t00=0x0045, t01=0x0132}
0x6d20…6d2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0176}
0x6d2a…6d3e Head {h00=0x0010, h01=0x0050, text=»CHLTON EQU *«, t00=0x0045, t01=0x0180}
0x6d3e…6d48 (70, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0004}
0x6d48…6d5e Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0046, t01=0x000e}
0x6d5e…6d68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0024}
0x6d68…6d7c Head {h00=0x0010, h01=0x0050, text=» LD A1,CHTAB«, t00=0x0046, t01=0x002e}
0x6d7c…6da2 Head {h00=0x0022, h01=0x0050, text=»CON010 SUK A1,2 ALL TREATED ? «, t00=0x0046, t01=0x0042}
0x6da2…6dc6 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) CON020 NO TAKE NEXT «, t00=0x0046, t01=0x0068}
0x6dc6…6de8 Head {h00=0x001e, h01=0x0050, text=» ABL RTNA15 RETURN AND ENB«, t00=0x0046, t01=0x008c}
0x6de8…6e16 Head {h00=0x002a, h01=0x0050, text=»CON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS«, t00=0x0046, t01=0x00ae}
0x6e16…6e2c Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0046, t01=0x00dc}
0x6e2c…6e54 Head {h00=0x0024, h01=0x0050, text=» EX CWTCIS,A5 EXECUTE CIO-START «, t00=0x0046, t01=0x00f2}
0x6e54…6e74 Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A5 GET LAST DWT«, t00=0x0046, t01=0x011a}
0x6e74…6e8a Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0046, t01=0x013a}
0x6e8a…6eac Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0046, t01=0x0150}
0x6eac…6ebe Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0046, t01=0x0172}
0x6ebe…6ee4 Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0046, t01=0x0184}
0x6ee4…6ef6 Head {h00=0x000e, h01=0x0050, text=» RB CON010«, t00=0x0047, t01=0x001a}
0x6ef6…6f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x002c}
0x6f00…6f0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0036}
0x6f0a…6f16 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0040}
0x6f16…6f20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x004c}
0x6f20…6f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0056}
0x6f2a…6f40 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0047, t01=0x0060}
0x6f40…6f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0076}
0x6f4a…6f6a Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA1 CIO-START«, t00=0x0047, t01=0x0080}
0x6f6a…6f8c Head {h00=0x001e, h01=0x0050, text=» LD A6,CWTLT1 GET LAST DWT«, t00=0x0047, t01=0x00a0}
0x6f8c…6fa2 Head {h00=0x0012, h01=0x0050, text=» RF(Z) CON010 «, t00=0x0047, t01=0x00c2}
0x6fa2…6fc6 Head {h00=0x0020, h01=0x0050, text=» CM CWTLT1 RESET LAST OUTPUT«, t00=0x0047, t01=0x00d8}
0x6fc6…6fd8 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0047, t01=0x00fc}
0x6fd8…6ffe Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0047, t01=0x010e}
0x6ffe…7026 Head {h00=0x0024, h01=0x0050, text=»CON010 ABL RTNA15 RETURN AND ENB«, t00=0x0047, t01=0x0134}
0x7026…7030 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x015c}
0x7030…703c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0166}
0x703c…7046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0172}
0x7046…7054 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x017c}
0x7054…705e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x018a}
0x705e…7076 (72, 0, 400) Head {h00=0x0014, h01=0x0050, text=»* O U T P U T «, t00=0x0048, t01=0x0004}
0x7076…7080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x001c}
0x7080…70c0 Head {h00=0x003c, h01=0x0050, text=»* SEND ONE CHARACTER VIA 'OUTLIN' INDICATE INTERRUPTS «, t00=0x0048, t01=0x0026}
0x70c0…70ea Head {h00=0x0026, h01=0x0050, text=»* ALLOWED AND SAVE A3-A5 IN DWT.«, t00=0x0048, t01=0x0066}
0x70ea…70f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0090}
0x70f4…70fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x009a}
0x70fe…7112 Head {h00=0x0010, h01=0x0050, text=»OUTPUT EQU *«, t00=0x0048, t01=0x00a4}
0x7112…7126 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0048, t01=0x00b8}
0x7126…7138 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0048, t01=0x00cc}
0x7138…7152 Head {h00=0x0016, h01=0x0050, text=» SUK A1,/82 STX ? «, t00=0x0048, t01=0x00de}
0x7152…7168 Head {h00=0x0012, h01=0x0050, text=» RF(E) LDRE10 «, t00=0x0048, t01=0x00f8}
0x7168…7182 Head {h00=0x0016, h01=0x0050, text=» SUK A1,/15 ETB ? «, t00=0x0048, t01=0x010e}
0x7182…7198 Head {h00=0x0012, h01=0x0050, text=» RF(E) LDRE10 «, t00=0x0048, t01=0x0128}
0x7198…71d2 Head {h00=0x0036, h01=0x0050, text=» CF A15,OUTLIN SEND ONE CHARACTER VIA CHANNEL UNIT«, t00=0x0048, t01=0x013e}
0x71d2…71dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0178}
0x71dc…71e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0182}
0x71e6…71fc Head {h00=0x0012, h01=0x0050, text=»* S T R E G «, t00=0x0048, t01=0x018c}
0x71fc…7206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0012}
0x7206…7244 Head {h00=0x003a, h01=0x0050, text=»* INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT «, t00=0x0049, t01=0x001c}
0x7244…724e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x005a}
0x724e…7258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0064}
0x7258…726c Head {h00=0x0010, h01=0x0050, text=»STREG EQU * «, t00=0x0049, t01=0x006e}
0x726c…7278 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0049, t01=0x0082}
0x7278…728e Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x0049, t01=0x008e}
0x728e…72c2 Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED«, t00=0x0049, t01=0x00a4}
0x72c2…72ea Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTA3,A6 SAVE REGISTER A3«, t00=0x0049, t01=0x00d8}
0x72ea…7312 Head {h00=0x0024, h01=0x0050, text=» ST A4,DWTA4,A6 A4«, t00=0x0049, t01=0x0100}
0x7312…733a Head {h00=0x0024, h01=0x0050, text=» ST A5,DWTA5,A6 A5«, t00=0x0049, t01=0x0128}
0x733a…7350 Head {h00=0x0012, h01=0x0050, text=» ABL EXIT =7 «, t00=0x0049, t01=0x0150}
0x7350…735e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0166}
0x735e…7368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0174}
0x7368…737e Head {h00=0x0012, h01=0x0050, text=»* L D R E G «, t00=0x0049, t01=0x017e}
0x737e…7388 (74, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0004}
0x7388…73ca Head {h00=0x003e, h01=0x0050, text=»* IF INTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN«, t00=0x004a, t01=0x000e}
0x73ca…73f4 Head {h00=0x0026, h01=0x0050, text=»* VIA A5. ELSE GO TO DISPATCHER.«, t00=0x004a, t01=0x0050}
0x73f4…73fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x007a}
0x73fe…7408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0084}
0x7408…741c Head {h00=0x0010, h01=0x0050, text=»LDREG EQU * «, t00=0x004a, t01=0x008e}
0x741c…7434 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x004a, t01=0x00a2}
0x7434…744a Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/100 «, t00=0x004a, t01=0x00ba}
0x744a…7462 Head {h00=0x0014, h01=0x0050, text=» ABL(Z) EXIT =4«, t00=0x004a, t01=0x00d0}
0x7462…747a Head {h00=0x0014, h01=0x0050, text=» XRS A3,DWTST,A6«, t00=0x004a, t01=0x00e8}
0x747a…7484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0100}
0x7484…748e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x010a}
0x748e…74a6 Head {h00=0x0014, h01=0x0050, text=»* L D R E G E «, t00=0x004a, t01=0x0114}
0x74a6…74b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x012c}
0x74b0…74ec Head {h00=0x0038, h01=0x0050, text=»* RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5«, t00=0x004a, t01=0x0136}
0x74ec…74f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0172}
0x74f6…7500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x017c}
0x7500…7514 Head {h00=0x0010, h01=0x0050, text=»LDREGF EQU *«, t00=0x004a, t01=0x0186}
0x7514…753e Head {h00=0x0026, h01=0x0050, text=» LD A5,DWTA5,A6 A5«, t00=0x004b, t01=0x000a}
0x753e…7552 Head {h00=0x0010, h01=0x0050, text=»LDREGE EQU *«, t00=0x004b, t01=0x0034}
0x7552…757c Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTA3,A6 RELOAD REGISTER A3«, t00=0x004b, t01=0x0048}
0x757c…75a6 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTA4,A6 A4«, t00=0x004b, t01=0x0072}
0x75a6…75ce Head {h00=0x0024, h01=0x0050, text=»LDRE10 LD A7,DWTOR,A6 GET ORDER «, t00=0x004b, t01=0x009c}
0x75ce…75e2 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x004b, t01=0x00c4}
0x75e2…75fa Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x004b, t01=0x00d8}
0x75fa…761e Head {h00=0x0020, h01=0x0050, text=» RTN A5 RETURN VIA A5-STACK «, t00=0x004b, t01=0x00f0}
0x761e…762c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x0114}
0x762c…7636 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0122}
0x7636…7640 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x012c}
0x7640…7658 Head {h00=0x0014, h01=0x0050, text=»* G E T C H R«, t00=0x004b, t01=0x0136}
0x7658…7662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x014e}
0x7662…769e Head {h00=0x0038, h01=0x0050, text=»* SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER«, t00=0x004b, t01=0x0158}
0x769e…76a8 (76, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0004}
0x76a8…76be Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x004c, t01=0x000e}
0x76be…76c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0024}
0x76c8…76e6 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x004c, t01=0x002e}
0x76e6…7704 Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB-ADDRESS «, t00=0x004c, t01=0x004c}
0x7704…770e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x006a}
0x770e…7724 Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x004c, t01=0x0074}
0x7724…772e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x008a}
0x772e…774a Head {h00=0x0018, h01=0x0050, text=»* A2 = CHARACTER «, t00=0x004c, t01=0x0094}
0x774a…7778 Head {h00=0x002a, h01=0x0050, text=»* A1 = 0 IF LAST CHARACTER ELSE # 0«, t00=0x004c, t01=0x00b0}
0x7778…7782 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00de}
0x7782…77d0 Head {h00=0x004a, h01=0x0050, text=»* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH«, t00=0x004c, t01=0x00e8}
0x77d0…77da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0136}
0x77da…77e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0140}
0x77e4…77f8 Head {h00=0x0010, h01=0x0050, text=»GETCHR EQU *«, t00=0x004c, t01=0x014a}
0x77f8…781c Head {h00=0x0020, h01=0x0050, text=» LD A1,4,A8 REQUESTED LENGTH«, t00=0x004c, t01=0x015e}
0x781c…782e Head {h00=0x000e, h01=0x0050, text=» SUR A1,A3«, t00=0x004c, t01=0x0182}
0x782e…785c (77, 0, 400) Head {h00=0x002a, h01=0x0050, text=» RF(NP) GCH010 LAST CHARACTER REACHED «, t00=0x004d, t01=0x0004}
0x785c…7882 Head {h00=0x0022, h01=0x0050, text=» LD A2,2,A8 GET BUFFER ADDRESS«, t00=0x004d, t01=0x0032}
0x7882…7894 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x004d, t01=0x0058}
0x7894…78b2 Head {h00=0x001a, h01=0x0050, text=» LCR A2,A2 CHAR. TO A2«, t00=0x004d, t01=0x006a}
0x78b2…78c6 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004d, t01=0x0088}
0x78c6…78ee Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x004d, t01=0x009c}
0x78ee…7900 Head {h00=0x000e, h01=0x0050, text=» RF GCH020«, t00=0x004d, t01=0x00c4}
0x7900…7930 Head {h00=0x002c, h01=0x0050, text=»GCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x004d, t01=0x00d6}
0x7930…7944 Head {h00=0x0010, h01=0x0050, text=»GCH020 EQU *«, t00=0x004d, t01=0x0106}
0x7944…7970 Head {h00=0x0028, h01=0x0050, text=»RTNA15 ADKL A15,2 RETURN AND ENABLE «, t00=0x004d, t01=0x011a}
0x7970…797c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x004d, t01=0x0146}
0x797c…7990 Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x004d, t01=0x0152}
0x7990…799e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x0166}
0x799e…79a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0174}
0x79a8…79b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x017e}
0x79b2…79c6 Head {h00=0x0010, h01=0x0050, text=»* L O G G «, t00=0x004d, t01=0x0188}
0x79c6…79d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x000c}
0x79d0…7a0c Head {h00=0x0038, h01=0x0050, text=»* IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT AND «, t00=0x004e, t01=0x0016}
0x7a0c…7a34 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT CHARACTER ARE LOGGED «, t00=0x004e, t01=0x0052}
0x7a34…7a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x007a}
0x7a3e…7a48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0084}
0x7a48…7a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x008e}
0x7a52…7a68 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x004e, t01=0x0098}
0x7a68…7a72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00ae}
0x7a72…7a8a Head {h00=0x0014, h01=0x0050, text=»LOGG STR A1,A15 «, t00=0x004e, t01=0x00b8}
0x7a8a…7a9e Head {h00=0x0010, h01=0x0050, text=» LD A1,POINT«, t00=0x004e, t01=0x00d0}
0x7a9e…7ab0 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x004e, t01=0x00e4}
0x7ab0…7ada Head {h00=0x0026, h01=0x0050, text=» CWK A1,BUFE BUFE IS MAX LOGG AREA«, t00=0x004e, t01=0x00f6}
0x7ada…7aec Head {h00=0x000e, h01=0x0050, text=» RF(NE) L1«, t00=0x004e, t01=0x0120}
0x7aec…7b18 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,BUF SET FIRST LOGG ADDRESS «, t00=0x004e, t01=0x0132}
0x7b18…7b2e Head {h00=0x0012, h01=0x0050, text=»L1 ST A1,POINT«, t00=0x004e, t01=0x015e}
0x7b2e…7b60 Head {h00=0x002e, h01=0x0050, text=» STR A2,A1 LOGG OF INR OR OTR INSTRUCTION «, t00=0x004e, t01=0x0174}
0x7b60…7b74 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x004f, t01=0x0016}
0x7b74…7b88 Head {h00=0x0010, h01=0x0050, text=» ADKL A15,2 «, t00=0x004f, t01=0x002a}
0x7b88…7ba2 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x004f, t01=0x003e}
0x7ba2…7bac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0058}
0x7bac…7bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0062}
0x7bb6…7bda Head {h00=0x0020, h01=0x0050, text=»POINT DATA BUF LOGG POINTER «, t00=0x004f, t01=0x006c}
0x7bda…7be4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0090}
0x7be4…7c00 Head {h00=0x0018, h01=0x0050, text=»BUF RES 63 LOGG AREA«, t00=0x004f, t01=0x009a}
0x7c00…7c12 Head {h00=0x000e, h01=0x0050, text=»BUFE EQU *«, t00=0x004f, t01=0x00b6}
0x7c12…7c1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00c8}
0x7c1c…7c28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x00d2}
0x7c28…7c36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x00de}
0x7c36…7c40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00ec}
0x7c40…7c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00f6}
0x7c4a…7c6c Head {h00=0x001e, h01=0x0050, text=»* E C H O , E C H E N D«, t00=0x004f, t01=0x0100}
0x7c6c…7c76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0122}
0x7c76…7cb6 Head {h00=0x003c, h01=0x0050, text=»* SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, «, t00=0x004f, t01=0x012c}
0x7cb6…7ce8 Head {h00=0x002e, h01=0x0050, text=»* ONE GENERAL AND ONE DEVICE-DEPENDENT «, t00=0x004f, t01=0x016c}
0x7ce8…7cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x000e}
0x7cf2…7d2a Head {h00=0x0034, h01=0x0050, text=»* PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, «, t00=0x0050, t01=0x0018}
0x7d2a…7d60 Head {h00=0x0032, h01=0x0050, text=»* LOAD STACKBASE AND FIND ADDRESS«, t00=0x0050, t01=0x0050}
0x7d60…7d98 Head {h00=0x0034, h01=0x0050, text=»* TO DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0050, t01=0x0086}
0x7d98…7da2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00be}
0x7da2…7dd4 Head {h00=0x002e, h01=0x0050, text=»* PART TWO: ECHO ONE OR MORE CHARACTERS«, t00=0x0050, t01=0x00c8}
0x7dd4…7e0a Head {h00=0x0032, h01=0x0050, text=»* CORRESPONDING TO ONE CHARACTER «, t00=0x0050, t01=0x00fa}
0x7e0a…7e42 Head {h00=0x0034, h01=0x0050, text=»* TO BE STORED IN INPUT ECB-BUFFER «, t00=0x0050, t01=0x0130}
0x7e42…7e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0168}
0x7e4c…7e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0172}
0x7e56…7e8e Head {h00=0x0034, h01=0x0050, text=»* PART ONE FOLLOWS AND PART TWO CAN BE FOUND «, t00=0x0050, t01=0x017c}
0x7e8e…7ec6 Head {h00=0x0034, h01=0x0050, text=»* IN THE DRIVER MODULE CORRESPONDING TO ECHO «, t00=0x0051, t01=0x0024}
0x7ec6…7ee0 Head {h00=0x0016, h01=0x0050, text=»* OUTPUT DEVICE«, t00=0x0051, t01=0x005c}
0x7ee0…7eea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0076}
0x7eea…7f24 Head {h00=0x0036, h01=0x0050, text=»* RESTRICTIONS IN DEVICE DEPENDENT ECHO DRIVER «, t00=0x0051, t01=0x0080}
0x7f24…7f2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ba}
0x7f2e…7f54 Head {h00=0x0022, h01=0x0050, text=»* A7 MUST NOT BE DESTROYED «, t00=0x0051, t01=0x00c4}
0x7f54…7f8e Head {h00=0x0036, h01=0x0050, text=»* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A «, t00=0x0051, t01=0x00ea}
0x7f8e…7fac Head {h00=0x001a, h01=0x0050, text=»* JUMP TO 'ECHRTN'.«, t00=0x0051, t01=0x0124}
0x7fac…7fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0142}
0x7fb6…7fca Head {h00=0x0010, h01=0x0050, text=»ECHEND EQU *«, t00=0x0051, t01=0x014c}
0x7fca…7fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0160}
0x7fd4…7fe8 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0051, t01=0x016a}
0x7fe8…7ff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x017e}
0x7ff2…801a Head {h00=0x0024, h01=0x0050, text=» LDKL A7,/8000 INDICATE END I/O «, t00=0x0051, t01=0x0188}
0x801a…8026 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0020}
0x8026…8038 Head {h00=0x000e, h01=0x0050, text=»ECHO EQU *«, t00=0x0052, t01=0x002c}
0x8038…804c Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0052, t01=0x003e}
0x804c…8076 Head {h00=0x0026, h01=0x0050, text=» ST A3,DWTA3,A6 SAVE A3-A5 IN DWT «, t00=0x0052, t01=0x0052}
0x8076…808e Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTA4,A6 «, t00=0x0052, t01=0x007c}
0x808e…80a6 Head {h00=0x0014, h01=0x0050, text=» ST A5,DWTA5,A6 «, t00=0x0052, t01=0x0094}
0x80a6…80c4 Head {h00=0x001a, h01=0x0050, text=» LD A1,DWTST,A6 STATUS«, t00=0x0052, t01=0x00ac}
0x80c4…80d6 Head {h00=0x000e, h01=0x0050, text=» SLL A1,2 «, t00=0x0052, t01=0x00ca}
0x80d6…80fe Head {h00=0x0024, h01=0x0050, text=» RF(NN) RETUR NO ECHO REQUESTED «, t00=0x0052, t01=0x00dc}
0x80fe…8132 Head {h00=0x0030, h01=0x0050, text=» LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE «, t00=0x0052, t01=0x0104}
0x8132…8168 Head {h00=0x0032, h01=0x0050, text=» LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE «, t00=0x0052, t01=0x0138}
0x8168…81a2 Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE «, t00=0x0052, t01=0x016e}
0x81a2…81ba Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x0053, t01=0x0018}
0x81ba…81e4 Head {h00=0x0026, h01=0x0050, text=» ADR A5,A6 STACKBASE-ADDRESS IN A5«, t00=0x0053, t01=0x0030}
0x81e4…8216 Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK «, t00=0x0053, t01=0x005a}
0x8216…8250 Head {h00=0x0036, h01=0x0050, text=» ABI ECHADR,A1 GO TO ECHO-ROUTINE DEVICE-DEPENDENT«, t00=0x0053, t01=0x008c}
0x8250…825c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x00c6}
0x825c…8270 Head {h00=0x0010, h01=0x0050, text=»ECHRTN EQU *«, t00=0x0053, t01=0x00d2}
0x8270…8284 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0053, t01=0x00e6}
0x8284…829c Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 END? «, t00=0x0053, t01=0x00fa}
0x829c…82b6 Head {h00=0x0016, h01=0x0050, text=» RF(NN) ERETUR NO «, t00=0x0053, t01=0x0112}
0x82b6…82e2 Head {h00=0x0028, h01=0x0050, text=» CF A15,TENDIO END I/O OUTPUT DEVICE«, t00=0x0053, t01=0x012c}
0x82e2…8324 Head {h00=0x003e, h01=0x0050, text=»ERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE «, t00=0x0053, t01=0x0158}
0x8324…835c Head {h00=0x0034, h01=0x0050, text=»RETUR ABL LDREGF RELOAD A3-A5 AND RETURN VIA A5 «, t00=0x0054, t01=0x000a}
0x835c…8366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0042}
0x8366…8372 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0054, t01=0x004c}
0x8372…8376 Head {h00=0x4004, h01=0x0000}
0x8376…837a 00 54 00 58 ┆ T X┆
0x837a…8382 (85, 1, 8) 20 04 00 00 00 55 00 04 ┆ U ┆
0x8382…83d2 (86, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5d 01 72 00 34 00 2f 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5e 00 1a 00 34 ┆ * ] r 4 /* * ^ 4┆
0x83d2…8422 00 2f 2a 20 20 45 4e 54 52 59 3a 20 20 41 39 20 2d 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20 2b 20 32 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5e 00 52 00 34 00 2f 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* ENTRY: A9 - BUFFER ADDRESS + 2 * ^ R 4 /* ┆
0x8422…8472 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5e 00 8a 00 34 00 2f 2a 20 20 20 20 20 20 20 20 20 41 31 31 20 2d 20 53 45 43 54 4f 52 20 4e 55 4d 42 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ^ 4 /* A11 - SECTOR NUMBER ┆
0x8472…84c2 2a 20 00 5e 00 c2 00 34 00 2f 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5e 00 fa 00 34 00 2f 2a 20 20 45 58 49 54 3a 20 20 20 20 20 20 ┆* ^ 4 /* * ^ 4 /* EXIT: ┆
0x84c2…8512 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5e 01 32 00 34 00 2f 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ^ 2 4 /* ┆
0x8512…8562 (87, 0, 400) 20 20 20 20 20 20 20 20 2a 20 00 5e 01 6a 00 34 00 2f 2a 20 20 20 57 4f 52 4b 20 52 45 47 49 53 54 45 52 53 3a 20 20 41 31 2c 41 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5f 00 12 00 34 00 2f 2a 20 20 20 20 20 ┆ * ^ j 4 /* WORK REGISTERS: A1,A2 * _ 4 /* ┆
0x8562…85b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5f 00 4a 00 34 00 2f 2a 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 20 20 45 52 52 4f 52 20 20 20 20 20 20 20 20 ┆ * _ J 4 /* SUBROUTINES: ERROR ┆
0x85b2…8602 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5f 00 82 00 34 00 2f 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 5f 00 ba 00 34 ┆ * _ 4 /* * _ 4┆
0x8602…8652 00 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 5f 00 f2 00 10 00 0b 52 44 53 45 43 5c 45 51 55 5c 2a 20 00 5f 01 2a 00 06 00 03 2a 20 ┆ /*********************************************** _ RDSEC EQU * _ * * ┆
0x8652…86a2 00 5f 01 3e 00 30 00 2c 2a 20 20 44 45 52 49 56 45 20 43 59 4c 49 4e 44 45 52 20 4e 55 4d 42 45 52 20 46 52 4f 4d 20 53 45 43 54 4f 52 20 4e 55 4d 42 45 52 00 5f 01 48 00 06 00 03 2a 20 00 5f 01 7c 00 22 00 1d 5c 4c 44 52 5c 41 31 2c 41 31 ┆ _ > 0 ,* DERIVE CYLINDER NUMBER FROM SECTOR NUMBER _ H * _ | " LDR A1,A1┆
0x86a2…86f2 (88, 0, 400) 31 5c 47 45 54 20 53 45 43 54 4f 52 20 4e 55 4d 42 45 52 20 00 5f 01 86 00 2a 00 26 5c 53 52 4c 5c 41 31 2c 35 5c 43 59 4c 49 4e 44 45 52 20 4e 55 4d 42 45 52 20 49 4e 20 42 49 54 53 20 34 2d 31 32 00 60 00 1c 00 0e 00 09 5c 53 4c 4c 5c 41 ┆1 GET SECTOR NUMBER _ * & SRL A1,5 CYLINDER NUMBER IN BITS 4-12 ` SLL A┆
0x86f2…8742 31 2c 33 20 00 60 00 4a 00 18 00 14 5c 4f 52 4b 5c 41 31 2c 32 5c 53 45 54 20 42 49 54 20 31 34 00 60 00 5c 00 06 00 03 2a 20 00 60 00 78 00 14 00 10 2a 20 20 53 45 45 4b 20 43 59 4c 49 4e 44 45 52 00 60 00 82 00 06 00 03 2a 20 00 60 00 9a ┆1,3 ` J ORK A1,2 SET BIT 14 ` * ` x * SEEK CYLINDER ` * ` ┆
0x8742…8792 00 22 00 1e 52 44 53 3a 31 30 5c 43 49 4f 5c 41 31 2c 31 2c 30 5c 53 45 45 4b 20 43 4f 4d 4d 41 4e 44 00 60 00 a4 00 24 00 1f 5c 52 42 28 4e 41 29 5c 2a 2d 32 5c 4c 4f 4f 50 20 55 4e 54 49 4c 20 41 43 43 45 50 54 45 44 20 00 60 00 ca 00 06 ┆ " RDS:10 CIO A1,1,0 SEEK COMMAND ` $ RB(NA) *-2 LOOP UNTIL ACCEPTED ` ┆
0x8792…87e2 00 50 2a 20 00 60 00 f2 00 14 00 50 2a 20 20 43 48 45 43 4b 20 53 54 41 54 55 53 20 00 60 00 fc 00 06 00 50 2a 20 00 60 01 14 00 20 00 50 52 44 53 3a 32 30 5c 53 53 54 5c 41 31 2c 30 5c 53 45 4e 53 45 20 53 54 41 54 55 53 00 60 01 1e 00 26 ┆ P* ` P* CHECK STATUS ` P* ` PRDS:20 SST A1,0 SENSE STATUS ` &┆
0x87e2…8832 00 50 5c 52 42 28 4e 41 29 5c 52 44 53 3a 32 30 5c 4c 4f 4f 50 20 55 4e 54 49 4c 20 41 43 43 45 50 54 45 44 00 60 01 42 00 06 00 03 2a 20 00 60 01 6c 00 26 00 21 2a 20 20 43 4f 4d 50 55 54 45 20 50 48 59 53 49 43 41 4c 20 53 45 43 54 4f 52 ┆ P RB(NA) RDS:20 LOOP UNTIL ACCEPTED ` B * ` l & !* COMPUTE PHYSICAL SECTOR┆
0x8832…8882 (89, 0, 400) 20 4e 55 4d 42 45 52 20 00 60 01 76 00 06 00 03 2a 20 00 61 00 10 00 28 00 23 52 44 53 3a 33 30 5c 4c 44 52 5c 41 32 2c 41 31 31 5c 47 45 54 20 53 45 43 54 4f 52 20 4e 55 4d 42 45 52 20 00 61 00 1a 00 1a 00 16 5c 41 4e 4b 5c 41 32 2c 2f 31 ┆ NUMBER ` v * a ( #RDS:30 LDR A2,A11 GET SECTOR NUMBER a ANK A2,/1┆
0x8882…88d2 30 5c 47 45 54 20 42 49 54 20 31 31 00 61 00 46 00 22 00 1d 5c 4c 44 52 5c 41 31 2c 41 31 31 5c 47 45 54 20 53 45 43 54 4f 52 20 4e 55 4d 42 45 52 20 00 61 00 64 00 0e 00 09 5c 53 4c 4c 5c 41 31 2c 31 20 00 61 00 8a 00 10 00 0b 5c 41 44 52 ┆0 GET BIT 11 a F " LDR A1,A11 GET SECTOR NUMBER a d SLL A1,1 a ADR┆
0x88d2…8922 5c 41 31 2c 41 31 31 20 00 61 00 9c 00 0e 00 0a 5c 41 4e 4b 5c 41 31 2c 2f 46 00 61 00 b0 00 0e 00 0a 5c 41 44 52 5c 41 31 2c 41 32 00 61 00 c2 00 0e 00 09 5c 53 4c 4c 5c 41 31 2c 32 20 00 61 00 d4 00 06 00 03 2a 20 00 61 00 e6 00 16 00 11 ┆ A1,A11 a ANK A1,/F a ADR A1,A2 a SLL A1,2 a * a ┆
0x8922…8972 2a 20 20 49 4e 49 54 20 4d 55 58 20 57 4f 52 44 53 20 00 61 00 f0 00 06 00 03 2a 20 00 61 01 0a 00 26 00 22 5c 4c 44 4b 4c 5c 41 32 2c 4d 55 58 43 43 5c 4c 4f 41 44 20 46 49 52 53 54 20 4d 55 58 20 57 4f 52 44 00 61 01 14 00 1c 00 17 52 44 ┆* INIT MUX WORDS a * a & " LDKL A2,MUXCC LOAD FIRST MUX WORD a RD┆
0x8972…89c2 53 3a 34 30 5c 57 45 52 5c 41 32 2c 2f 31 30 5c 57 52 49 54 45 20 00 61 01 3e 00 26 00 21 5c 4c 44 5c 41 32 2c 4d 58 42 55 46 5c 4c 4f 41 44 20 53 45 43 4f 4e 44 20 4d 55 58 20 57 4f 52 44 20 00 61 01 5e 00 1e 00 19 52 44 53 3a 35 30 5c 57 ┆S:40 WER A2,/10 WRITE a > & ! LD A2,MXBUF LOAD SECOND MUX WORD a ^ RDS:50 W┆
0x89c2…8a12 (90, 0, 400) 45 52 5c 41 32 2c 2f 31 30 2b 31 5c 57 52 49 54 45 20 00 61 01 88 00 22 00 1d 52 44 53 3a 36 30 5c 43 49 4f 5c 41 31 2c 31 2c 30 5c 52 45 41 44 20 53 45 43 54 4f 52 20 00 62 00 1a 00 26 00 22 5c 52 42 28 4e 41 29 5c 52 44 53 3a 36 30 5c 4c ┆ER A2,/10+1 WRITE a " RDS:60 CIO A1,1,0 READ SECTOR b & " RB(NA) RDS:60 L┆
0x8a12…8a62 4f 4f 50 20 55 4e 54 49 4c 20 41 43 43 45 50 54 45 44 00 62 00 40 00 1e 00 1a 52 44 53 3a 37 30 5c 53 53 54 5c 41 31 2c 30 5c 47 45 54 20 53 54 41 54 55 53 00 62 00 6a 00 26 00 22 5c 52 42 28 4e 41 29 5c 52 44 53 3a 37 30 5c 4c 4f 4f 50 20 ┆OOP UNTIL ACCEPTED b @ RDS:70 SST A1,0 GET STATUS b j & " RB(NA) RDS:70 LOOP ┆
0x8a62…8ab2 55 4e 54 49 4c 20 41 43 43 45 50 54 45 44 00 62 00 8c 00 24 00 20 5c 41 4e 4b 5c 41 31 2c 2f 31 46 5c 47 45 54 20 35 20 52 49 47 48 54 4d 4f 53 54 20 42 49 54 53 00 62 00 b6 00 2a 00 26 5c 52 42 28 4e 5a 29 5c 52 44 53 3a 33 30 5c 4c 4f 4f ┆UNTIL ACCEPTED b $ ANK A1,/1F GET 5 RIGHTMOST BITS b * & RB(NZ) RDS:30 LOO┆
0x8ab2…8b02 50 20 55 4e 54 49 4c 20 43 4f 52 52 45 43 54 20 52 45 41 44 00 62 00 de 00 28 00 24 5c 41 44 4b 4c 5c 41 31 31 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 53 45 43 54 4f 52 20 43 4f 55 4e 54 45 52 00 62 01 0c 00 0c 00 08 5c 52 54 4e 5c 41 31 34 ┆P UNTIL CORRECT READ b ( $ ADKL A11,1 INCREMENT SECTOR COUNTER b RTN A14┆
0x8b02…8b52 00 62 01 38 00 0a 00 06 5c 45 4a 45 43 54 00 62 01 48 00 34 00 30 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 62 01 56 00 34 00 30 2a 20 ┆ b 8 EJECT b H 4 0************************************************ b V 4 0* ┆
0x8b52…8ba2 (91, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 62 01 8e 00 34 00 30 2a 20 20 46 44 49 4e 49 54 20 2d 20 49 4e 49 54 49 41 4c 49 5a 45 20 46 4c 45 ┆ * b 4 0* FDINIT - INITIALIZE FLE┆
0x8ba2…8bf2 58 49 42 4c 45 20 44 49 53 43 20 20 20 20 20 20 20 20 20 20 20 2a 00 63 00 36 00 34 00 30 2a 20 20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 20 20 20 20 20 20 20 20 20 20 20 2a 00 63 ┆XIBLE DISC * c 6 4 0* ================================= * c┆
0x8bf2…8c42 00 6e 00 34 00 30 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 63 00 a6 00 34 00 30 2a 20 20 52 45 46 45 52 45 4e 43 45 44 20 49 4e 3a 20 ┆ n 4 0* * c 4 0* REFERENCED IN: ┆
0x8c42…8c92 53 59 53 4c 4f 44 2c 47 45 54 46 49 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 63 00 de 00 34 00 30 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SYSLOD,GETFIL * c 4 0* ┆
0x8c92…8ce2 20 20 20 20 20 2a 00 63 01 16 00 34 00 30 2a 20 20 45 4e 54 52 59 3a 20 20 41 31 20 2d 20 44 45 56 49 43 45 20 41 44 44 52 45 53 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 63 01 4e 00 34 00 30 2a 20 20 20 20 20 20 20 20 20 ┆ * c 4 0* ENTRY: A1 - DEVICE ADDRESS * c N 4 0* ┆
0x8ce2…8d32 (92, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 63 01 86 00 34 00 30 2a 20 20 45 58 49 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * c 4 0* EXIT: ┆
0x8d32…8d82 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 64 00 2e 00 34 00 30 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 64 00 66 00 34 00 30 2a 20 ┆ * d . 4 0* * d f 4 0* ┆
0x8d82…8dd2 20 57 4f 52 4b 20 52 45 47 49 53 54 45 52 53 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 64 00 9e 00 34 00 30 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ WORK REGISTERS: * d 4 0* ┆
0x8dd2…8e22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 64 00 d6 00 34 00 30 2a 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 64 ┆ * d 4 0* SUBROUTINES: * d┆
0x8e22…8e72 01 0e 00 34 00 30 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 64 01 46 00 34 00 30 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ 4 0* * d F 4 0******************┆