|
|
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: 30188 (0x75ec)
Notes: pts_type(SC)
Names: »DRLT01.SC«
└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
└─⟦this⟧ »TOSSWORK/DRLT01.SC«
IDENT DRLT01 REL 10.0 80-03-14 870105041000 =9,RTN FROM OUTLRT IN INH MODE PRR 10.1 79-09-03 =8,UPDATE TO 10.1 STATUS 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:- * * - OUTLRT SEND ONE CHARACTER VIA CHLT * * - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM * * CONTROL WORK TABLES FOR THE CHANNELS ARE * INCLUDED IN THE DRIVER. EJECT * * * * 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 OUTLRT SEND ONE CHARACTER ENTRY CHLTON START OF CHLT ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS ENTRY REMFC DUMMY ENTRY ENTRY DWREMU DUMMY ENTRY * 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 OUTLIN SEND CHAR. VIA SWITCH MODULE * * *********************************** * DWT PARAMETERS * *********************************** EXTRN DWTST STATUS EXTRN DWTOR ORDER EXTRN DWTOCH LAST OUTPUT CHARACTER EXTRN DWTECB ECB-ADDRESS EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK EXTRN DWTOTQ OUTPUT QUEUE EXTRN DWTSB2 STACK BASE 2 IN DWT EXTRN DWTTP TIMER POINTER EXTRN INTADR INTERRUPT ADDRESS DISPLACEMENT EXTRN RECADR RECOVERY 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 * * * * * 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 00 OR 01 =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 CHANNEL PARAMETER =9 RF(N) CLT120 DEVICE WITHOUT DATA REQUEST =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 EQU * RTNA15 ADKL A15,2 RETURN AND ENABLE ENB LDR* P,A15 EJECT * * O U T L R T * * 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 * OUTLRT EQU * * 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 =9 ADKL A15,2 ...ADJUST STACK POINTER... =9 LDR* P,A15 ...AND 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 * * * 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 * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRLT01 REL 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0068 Head {h00=0x0026, h01=0x0050, text=» =9,RTN FROM OUTLRT IN INH MODE «, t00=0x0000, t01=0x0042}
0x0068…0084 Head {h00=0x0018, h01=0x0050, text=» PRR 10.1 79-09-03«, t00=0x0000, t01=0x006c}
0x0084…00a8 Head {h00=0x0020, h01=0x0050, text=» =8,UPDATE TO 10.1 STATUS «, t00=0x0000, t01=0x0088}
0x00a8…00c4 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-05-23 «, t00=0x0000, t01=0x00ac}
0x00c4…00f2 Head {h00=0x002a, h01=0x0050, text=» =7,CLT010 DUBLE DEF LABEL, RB - ABL«, t00=0x0000, t01=0x00c8}
0x00f2…010e Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 79-05-14 «, t00=0x0000, t01=0x00f6}
0x010e…0134 Head {h00=0x0022, h01=0x0050, text=» =6,CWT ADRESS ERROR A5 - A1«, t00=0x0000, t01=0x0112}
0x0134…0150 Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 79-04-25 «, t00=0x0000, t01=0x0138}
0x0150…016e Head {h00=0x001a, h01=0x0050, text=» =5,GETLIN CORRECTED«, t00=0x0000, t01=0x0154}
0x016e…018a Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-04-06 «, t00=0x0000, t01=0x0172}
0x018a…01b4 Head {h00=0x0026, h01=0x0050, text=» =1-4, GEN UPDATE TO 8.2+ STATUS«, t00=0x0000, t01=0x018e}
0x01b4…01d0 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-04-02 «, t00=0x0001, t01=0x0028}
0x01d0…01f4 Head {h00=0x0020, h01=0x0050, text=» =4,TIMER RESET CORRECTED «, t00=0x0001, t01=0x0044}
0x01f4…0210 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-03-22 «, t00=0x0001, t01=0x0068}
0x0210…0234 Head {h00=0x0020, h01=0x0050, text=» =3,NAK HANDLING CORRECTED«, t00=0x0001, t01=0x0084}
0x0234…0250 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-03-16 «, t00=0x0001, t01=0x00a8}
0x0250…0274 Head {h00=0x0020, h01=0x0050, text=» =2,IMPROV. OF TEST ORDER «, t00=0x0001, t01=0x00c4}
0x0274…0290 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-01-11 «, t00=0x0001, t01=0x00e8}
0x0290…02c0 Head {h00=0x002c, h01=0x0050, text=» =1,DISPL.RECV,NAK ERROR,ERR. RETRYCNT«, t00=0x0001, t01=0x0104}
0x02c0…02dc Head {h00=0x0018, h01=0x0050, text=» REL 8.2 78-09-15 «, t00=0x0001, t01=0x0134}
0x02dc…02e4 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0150}
0x02e4…02ec Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0158}
0x02ec…02f4 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0160}
0x02f4…02fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0168}
0x02fe…0308 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0172}
0x0308…0342 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x017c}
0x0342…034c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0026}
0x034c…0374 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x0030}
0x0374…037e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0058}
0x037e…03a6 Head {h00=0x0024, h01=0x0050, text=»* DRLT01 = DRIVER CHANNEL UNIT«, t00=0x0002, t01=0x0062}
0x03a6…03ce Head {h00=0x0024, h01=0x0050, text=»* FOR LOCAL TERMINALS«, t00=0x0002, t01=0x008a}
0x03ce…03d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b2}
0x03d8…03e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00bc}
0x03e2…03ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c6}
0x03ec…03f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d0}
0x03f6…0400 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00da}
0x0400…0436 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x00e4}
0x0436…0440 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011a}
0x0440…0480 Head {h00=0x003c, h01=0x0050, text=»* THIS IS THE CHANNEL UNIT DRIVER FOR LOCAL TERMINALS.«, t00=0x0002, t01=0x0124}
0x0480…04c6 Head {h00=0x0042, h01=0x0050, text=»* AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA«, t00=0x0002, t01=0x0164}
0x04c6…050e Head {h00=0x0044, h01=0x0050, text=»* INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER «, t00=0x0003, t01=0x001a}
0x050e…052c Head {h00=0x001a, h01=0x0050, text=»* FOR ACTUAL DEVICE.«, t00=0x0003, t01=0x0062}
0x052c…0574 Head {h00=0x0044, h01=0x0050, text=»* IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS«, t00=0x0003, t01=0x0080}
0x0574…0590 Head {h00=0x0018, h01=0x0050, text=»* ARE CARRIED OUT.«, t00=0x0003, t01=0x00c8}
0x0590…059a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e4}
0x059a…05da Head {h00=0x003c, h01=0x0050, text=»* THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES:-«, t00=0x0003, t01=0x00ee}
0x05da…05e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x012e}
0x05e4…0616 Head {h00=0x002e, h01=0x0050, text=»* - OUTLRT SEND ONE CHARACTER VIA CHLT«, t00=0x0003, t01=0x0138}
0x0616…0620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016a}
0x0620…0660 Head {h00=0x003c, h01=0x0050, text=»* - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM«, t00=0x0003, t01=0x0174}
0x0660…066a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0024}
0x066a…06a0 Head {h00=0x0032, h01=0x0050, text=»* CONTROL WORK TABLES FOR THE CHANNELS ARE «, t00=0x0004, t01=0x002e}
0x06a0…06c4 Head {h00=0x0020, h01=0x0050, text=»* INCLUDED IN THE DRIVER.«, t00=0x0004, t01=0x0064}
0x06c4…06d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0088}
0x06d2…06dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0096}
0x06dc…06e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a0}
0x06e6…06f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00aa}
0x06f0…0722 Head {h00=0x002e, h01=0x0050, text=»* NORMAL REGISTER USAGE IN THE DRIVER:- «, t00=0x0004, t01=0x00b4}
0x0722…072c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e6}
0x072c…0748 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE«, t00=0x0004, t01=0x00f0}
0x0748…0764 Head {h00=0x0018, h01=0x0050, text=»* A2 = INPUT WORD «, t00=0x0004, t01=0x010c}
0x0764…0784 Head {h00=0x001c, h01=0x0050, text=»* A3 = LINE NUMBER * 2«, t00=0x0004, t01=0x0128}
0x0784…07a6 Head {h00=0x001e, h01=0x0050, text=»* A4 = DEVICE NUMBER * 2«, t00=0x0004, t01=0x0148}
0x07a6…07c2 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT-ADDRESS«, t00=0x0004, t01=0x016a}
0x07c2…07de Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0004, t01=0x0186}
0x07de…07f4 Head {h00=0x0012, h01=0x0050, text=»* A7 = ORDER«, t00=0x0005, t01=0x0012}
0x07f4…0810 Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x0005, t01=0x0028}
0x0810…081a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0044}
0x081a…0824 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004e}
0x0824…082e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0058}
0x082e…083c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0062}
0x083c…0846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0070}
0x0846…085a Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0005, t01=0x007a}
0x085a…086e Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0005, t01=0x008e}
0x086e…0882 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0005, t01=0x00a2}
0x0882…088c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b6}
0x088c…0896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c0}
0x0896…08c0 Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT1 INTERRUPT FROM CHLT01«, t00=0x0005, t01=0x00ca}
0x08c0…08ea Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT2 INTERRUPT FROM CHLT2 «, t00=0x0005, t01=0x00f4}
0x08ea…0914 Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT3 INTERRUPT FROM CHLT3 «, t00=0x0005, t01=0x011e}
0x0914…093c Head {h00=0x0024, h01=0x0050, text=» ENTRY CHLT4 INTERRUP FROM CHLT4«, t00=0x0005, t01=0x0148}
0x093c…0964 Head {h00=0x0024, h01=0x0050, text=» ENTRY OUTLRT SEND ONE CHARACTER«, t00=0x0005, t01=0x0170}
0x0964…0988 Head {h00=0x0020, h01=0x0050, text=» ENTRY CHLTON START OF CHLT «, t00=0x0006, t01=0x0008}
0x0988…09bc Head {h00=0x0030, h01=0x0050, text=» ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS «, t00=0x0006, t01=0x002c}
0x09bc…09f0 Head {h00=0x0030, h01=0x0050, text=» ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS«, t00=0x0006, t01=0x0060}
0x09f0…0a10 Head {h00=0x001c, h01=0x0050, text=» ENTRY REMFC DUMMY ENTRY«, t00=0x0006, t01=0x0094}
0x0a10…0a32 Head {h00=0x001e, h01=0x0050, text=» ENTRY DWREMU DUMMY ENTRY «, t00=0x0006, t01=0x00b4}
0x0a32…0a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d6}
0x0a3c…0a4a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x00e0}
0x0a4a…0a54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ee}
0x0a54…0a86 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0006, t01=0x00f8}
0x0a86…0ab8 Head {h00=0x002e, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES *«, t00=0x0006, t01=0x012a}
0x0ab8…0aea Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0006, t01=0x015c}
0x0aea…0af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018e}
0x0af4…0afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0008}
0x0afe…0b28 Head {h00=0x0026, h01=0x0050, text=» EXTRN SAVE8 SAVE REGISTERS A1-A8 «, t00=0x0007, t01=0x0012}
0x0b28…0b48 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0007, t01=0x003c}
0x0b48…0b6c Head {h00=0x0020, h01=0x0050, text=» EXTRN IHRET8 RESTORE A1-A8 «, t00=0x0007, t01=0x005c}
0x0b6c…0b92 Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT1 INTERRUPT TABLE «, t00=0x0007, t01=0x0080}
0x0b92…0bb8 Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT2 INTERRUPT TABLE «, t00=0x0007, t01=0x00a6}
0x0bb8…0bde Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT3 INTERRUPT TABLE «, t00=0x0007, t01=0x00cc}
0x0bde…0c04 Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT4 INTERRUPT TABLE «, t00=0x0007, t01=0x00f2}
0x0c04…0c2a Head {h00=0x0022, h01=0x0050, text=» EXTRN SETIME GET TIMER BLOCK «, t00=0x0007, t01=0x0118}
0x0c2a…0c50 Head {h00=0x0022, h01=0x0050, text=» EXTRN SETIMP GET TIMER BLOCK «, t00=0x0007, t01=0x013e}
0x0c50…0c7e Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0007, t01=0x0164}
0x0c7e…0cb0 (8, 0, 400) Head {h00=0x002e, h01=0x0050, text=» EXTRN OUTLIN SEND CHAR. VIA SWITCH MODULE«, t00=0x0008, t01=0x0004}
0x0cb0…0cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cba…0cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0040}
0x0cc4…0cf0 Head {h00=0x0028, h01=0x0050, text=»*********************************** «, t00=0x0008, t01=0x004a}
0x0cf0…0d1c Head {h00=0x0028, h01=0x0050, text=»* DWT PARAMETERS * «, t00=0x0008, t01=0x0076}
0x0d1c…0d48 Head {h00=0x0028, h01=0x0050, text=»*********************************** «, t00=0x0008, t01=0x00a2}
0x0d48…0d64 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0008, t01=0x00ce}
0x0d64…0d7e Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0008, t01=0x00ea}
0x0d7e…0daa Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOCH LAST OUTPUT CHARACTER «, t00=0x0008, t01=0x0104}
0x0daa…0dcc Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0008, t01=0x0130}
0x0dcc…0dfa Head {h00=0x002a, h01=0x0050, text=» EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK«, t00=0x0008, t01=0x0152}
0x0dfa…0e1c Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTOTQ OUTPUT QUEUE«, t00=0x0008, t01=0x0180}
0x0e1c…0e46 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0009, t01=0x0012}
0x0e46…0e68 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTP TIMER POINTER«, t00=0x0009, t01=0x003c}
0x0e68…0e9c Head {h00=0x0030, h01=0x0050, text=» EXTRN INTADR INTERRUPT ADDRESS DISPLACEMENT«, t00=0x0009, t01=0x005e}
0x0e9c…0ed0 Head {h00=0x0030, h01=0x0050, text=» EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT «, t00=0x0009, t01=0x0092}
0x0ed0…0eda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00c6}
0x0eda…0ee8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00d0}
0x0ee8…0ef0 Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x00de}
0x0ef0…0efa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e6}
0x0efa…0f10 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x00f0}
0x0f10…0f26 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0009, t01=0x0106}
0x0f26…0f3c Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x011c}
0x0f3c…0f46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0132}
0x0f46…0f50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x013c}
0x0f50…0f7e Head {h00=0x002a, h01=0x0050, text=»NOERR EQU 1 RETURN CODE. NOT OPERABLE «, t00=0x0009, t01=0x0146}
0x0f7e…0fa2 Head {h00=0x0020, h01=0x0050, text=»DUMMSP EQU /03 SPECIAL DUMMY«, t00=0x0009, t01=0x0174}
0x0fa2…0fb8 Head {h00=0x0012, h01=0x0050, text=»DRQTIM EQU 30 «, t00=0x000a, t01=0x0008}
0x0fb8…0fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x001e}
0x0fc2…0fd0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0028}
0x0fd0…0fda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0036}
0x0fda…0ffa Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000a, t01=0x0040}
0x0ffa…101a Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000a, t01=0x0060}
0x101a…103a Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000a, t01=0x0080}
0x103a…1044 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a0}
0x1044…1084 Head {h00=0x003c, h01=0x0050, text=»* A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER «, t00=0x000a, t01=0x00aa}
0x1084…10c0 Head {h00=0x0038, h01=0x0050, text=»* MAY BE INCLUDED TO THE DRIVER BY SETTING X:A=1 «, t00=0x000a, t01=0x00ea}
0x10c0…10ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0126}
0x10ca…10dc Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000a, t01=0x0130}
0x10dc…10f2 Head {h00=0x0012, h01=0x0050, text=»LOGING EQU X:A«, t00=0x000a, t01=0x0142}
0x10f2…10fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0158}
0x10fc…1134 Head {h00=0x0034, h01=0x0050, text=»* THIS DRIVER HANDLES ONE OR UP TO FOUR LOCAL«, t00=0x000a, t01=0x0162}
0x1134…1166 Head {h00=0x002e, h01=0x0050, text=»* CHANNELS BY SETTING X:B TO 1,2,3 OR 4«, t00=0x000b, t01=0x000a}
0x1166…1170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003c}
0x1170…1182 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000b, t01=0x0046}
0x1182…1198 Head {h00=0x0012, h01=0x0050, text=»LOCHAN EQU X:B«, t00=0x000b, t01=0x0058}
0x1198…11a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x006e}
0x11a2…11de Head {h00=0x0038, h01=0x0050, text=»* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND «, t00=0x000b, t01=0x0078}
0x11de…1216 Head {h00=0x0034, h01=0x0050, text=»* UNDEFINED CONTROL CHARACTERS ARE UPDATED IN«, t00=0x000b, t01=0x00b4}
0x1216…1252 Head {h00=0x0038, h01=0x0050, text=»* THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM «, t00=0x000b, t01=0x00ec}
0x1252…127a Head {h00=0x0024, h01=0x0050, text=»* DRIVER BY SETTING X:C = 0. «, t00=0x000b, t01=0x0128}
0x127a…1284 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0150}
0x1284…1296 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x000b, t01=0x015a}
0x1296…12ac Head {h00=0x0012, h01=0x0050, text=»ACKMUL EQU X:C«, t00=0x000b, t01=0x016c}
0x12ac…12b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0182}
0x12b6…12f2 Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:D = 1 A SOFTWARE TIME OUT HANDLING«, t00=0x000b, t01=0x018c}
0x12f2…1332 Head {h00=0x003c, h01=0x0050, text=»* MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED«, t00=0x000c, t01=0x0038}
0x1332…134e Head {h00=0x0018, h01=0x0050, text=»* IN THE DRIVER. «, t00=0x000c, t01=0x0078}
0x134e…138e Head {h00=0x003c, h01=0x0050, text=»* AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE «, t00=0x000c, t01=0x0094}
0x138e…13bc Head {h00=0x002a, h01=0x0050, text=»* TIME OUT OCCURS IS ALSO INCLUDED.«, t00=0x000c, t01=0x00d4}
0x13bc…13c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0102}
0x13c6…13d8 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x000c, t01=0x010c}
0x13d8…13ee Head {h00=0x0012, h01=0x0050, text=»SOFTIM EQU X:D«, t00=0x000c, t01=0x011e}
0x13ee…13f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0134}
0x13f8…1402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013e}
0x1402…140c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0148}
0x140c…1416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0152}
0x1416…1450 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000c, t01=0x015c}
0x1450…1482 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x0008}
0x1482…148c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003a}
0x148c…14a0 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000d, t01=0x0044}
0x14a0…14aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0058}
0x14aa…14b8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0062}
0x14b8…14c0 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0070}
0x14c0…14c8 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0078}
0x14c8…14dc Head {h00=0x0010, h01=0x0050, text=»RECHAN EQU 0«, t00=0x000d, t01=0x0080}
0x14dc…14f0 Head {h00=0x0010, h01=0x0050, text=»REMFC EQU 0 «, t00=0x000d, t01=0x0094}
0x14f0…1504 Head {h00=0x0010, h01=0x0050, text=»CWTRT1 EQU *«, t00=0x000d, t01=0x00a8}
0x1504…1518 Head {h00=0x0010, h01=0x0050, text=»CWTRT2 EQU *«, t00=0x000d, t01=0x00bc}
0x1518…152c Head {h00=0x0010, h01=0x0050, text=»CWTRT3 EQU *«, t00=0x000d, t01=0x00d0}
0x152c…1540 Head {h00=0x0010, h01=0x0050, text=»CWTRT4 EQU *«, t00=0x000d, t01=0x00e4}
0x1540…1554 Head {h00=0x0010, h01=0x0050, text=»CWTRT5 EQU *«, t00=0x000d, t01=0x00f8}
0x1554…1568 Head {h00=0x0010, h01=0x0050, text=»CWTRT6 EQU *«, t00=0x000d, t01=0x010c}
0x1568…157c Head {h00=0x0010, h01=0x0050, text=»CWTRT7 EQU *«, t00=0x000d, t01=0x0120}
0x157c…1590 Head {h00=0x0010, h01=0x0050, text=»CWTRT8 EQU *«, t00=0x000d, t01=0x0134}
0x1590…15a4 Head {h00=0x0010, h01=0x0050, text=»DWREMU EQU *«, t00=0x000d, t01=0x0148}
0x15a4…15b2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x015c}
0x15b2…15bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016a}
0x15bc…15c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0174}
0x15c6…1604 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x000d, t01=0x017e}
0x1604…1642 Head {h00=0x003a, h01=0x0050, text=»* C W T L T 1 * «, t00=0x000e, t01=0x002c}
0x1642…1680 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x000e, t01=0x006a}
0x1680…168a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a8}
0x168a…16c2 Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1«, t00=0x000e, t01=0x00b2}
0x16c2…16cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ea}
0x16cc…16d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f4}
0x16d6…16f8 Head {h00=0x001e, h01=0x0050, text=»DWA1 EQU /03 DEVICEADDRESS«, t00=0x000e, t01=0x00fe}
0x16f8…1702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0120}
0x1702…1722 Head {h00=0x001c, h01=0x0050, text=»CWTLT1 EQU * TABLE ENTRY«, t00=0x000e, t01=0x012a}
0x1722…1756 Head {h00=0x0030, h01=0x0050, text=»CWTLDW EQU *-CWTLT1 LAST OUTPUT DWT-ADDRESS «, t00=0x000e, t01=0x014a}
0x1756…1766 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x000e, t01=0x017e}
0x1766…1782 Head {h00=0x0018, h01=0x0050, text=»CWTLOW EQU *-CWTLT1 «, t00=0x000e, t01=0x018e}
0x1782…17a2 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x000f, t01=0x001a}
0x17a2…17d0 Head {h00=0x002a, h01=0x0050, text=»CWTITA EQU *-CWTLT1 ADDRESS TO INTLT1 «, t00=0x000f, t01=0x003a}
0x17d0…17e4 Head {h00=0x0010, h01=0x0050, text=» DATA INTLT1«, t00=0x000f, t01=0x0068}
0x17e4…1804 Head {h00=0x001c, h01=0x0050, text=»CWTINR EQU *-CWTLT1 INR «, t00=0x000f, t01=0x007c}
0x1804…181a Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x000f, t01=0x009c}
0x181a…183a Head {h00=0x001c, h01=0x0050, text=»CWTOTR EQU *-CWTLT1 OTR «, t00=0x000f, t01=0x00b2}
0x183a…1850 Head {h00=0x0012, h01=0x0050, text=» OTR A2,0,DWA1«, t00=0x000f, t01=0x00d2}
0x1850…1876 Head {h00=0x0022, h01=0x0050, text=»CWTCIS EQU *-CWTLT1 CIO-START «, t00=0x000f, t01=0x00e8}
0x1876…188c Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DWA1«, t00=0x000f, t01=0x010e}
0x188c…18a8 Head {h00=0x0018, h01=0x0050, text=»CWTRTC EQU *-CWTLT1 «, t00=0x000f, t01=0x0124}
0x18a8…18ce Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x000f, t01=0x0140}
0x18ce…18f6 Head {h00=0x0024, h01=0x0050, text=»CWTEQ EQU *-CWTLT1 END OF QUEUE «, t00=0x000f, t01=0x0166}
0x18f6…1906 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x000f, t01=0x018e}
0x1906…1922 Head {h00=0x0018, h01=0x0050, text=»CWTADD EQU *-CWTLT1 «, t00=0x0010, t01=0x000e}
0x1922…192c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002a}
0x192c…1942 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0010, t01=0x0034}
0x1942…194c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x004a}
0x194c…196c Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0010, t01=0x0054}
0x196c…1994 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0010, t01=0x0074}
0x1994…19c4 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR «, t00=0x0010, t01=0x009c}
0x19c4…19e0 Head {h00=0x0018, h01=0x0050, text=»ACKTIM EQU *-CWTLT1 «, t00=0x0010, t01=0x00cc}
0x19e0…1a0c Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0010, t01=0x00e8}
0x1a0c…1a16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0114}
0x1a16…1a22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x011e}
0x1a22…1a30 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x012a}
0x1a30…1a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0138}
0x1a3a…1a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0142}
0x1a44…1a82 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0010, t01=0x014c}
0x1a82…1ac0 Head {h00=0x003a, h01=0x0050, text=»* C W T L T 2 * «, t00=0x0010, t01=0x018a}
0x1ac0…1afe Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0011, t01=0x0038}
0x1afe…1b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0076}
0x1b08…1b40 Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2«, t00=0x0011, t01=0x0080}
0x1b40…1b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b8}
0x1b4a…1b5e Head {h00=0x0010, h01=0x0050, text=»CWTLT2 EQU *«, t00=0x0011, t01=0x00c2}
0x1b5e…1b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d6}
0x1b68…1b7e Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0011, t01=0x00e0}
0x1b7e…1ba2 Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0011, t01=0x00f6}
0x1ba2…1bac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011a}
0x1bac…1bd4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0011, t01=0x0124}
0x1bd4…1bf4 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0011, t01=0x014c}
0x1bf4…1c18 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0011, t01=0x016c}
0x1c18…1c32 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0011, t01=0x0190}
0x1c32…1c4c Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0012, t01=0x001a}
0x1c4c…1c6c Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0012, t01=0x0034}
0x1c6c…1c92 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0012, t01=0x0054}
0x1c92…1cae Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0012, t01=0x007a}
0x1cae…1cb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0096}
0x1cb8…1cce Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0012, t01=0x00a0}
0x1cce…1cd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b6}
0x1cd8…1cf8 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0012, t01=0x00c0}
0x1cf8…1d20 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0012, t01=0x00e0}
0x1d20…1d50 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0012, t01=0x0108}
0x1d50…1d7c Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0012, t01=0x0138}
0x1d7c…1d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0164}
0x1d86…1d92 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x016e}
0x1d92…1d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x017a}
0x1d9c…1db2 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0012, t01=0x0184}
0x1db2…1dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000a}
0x1dbc…1dca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0014}
0x1dca…1dd6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0022}
0x1dd6…1dec Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0013, t01=0x002e}
0x1dec…1e10 Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0013, t01=0x0044}
0x1e10…1e1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0068}
0x1e1a…1e42 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0013, t01=0x0072}
0x1e42…1e62 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0013, t01=0x009a}
0x1e62…1e86 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0013, t01=0x00ba}
0x1e86…1ea0 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0013, t01=0x00de}
0x1ea0…1eba Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0013, t01=0x00f8}
0x1eba…1eda Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0013, t01=0x0112}
0x1eda…1f00 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0013, t01=0x0132}
0x1f00…1f1c Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0013, t01=0x0158}
0x1f1c…1f26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0174}
0x1f26…1f3c Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0013, t01=0x017e}
0x1f3c…1f46 (20, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0004}
0x1f46…1f66 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0014, t01=0x000e}
0x1f66…1f8e Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0014, t01=0x002e}
0x1f8e…1fbe Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0014, t01=0x0056}
0x1fbe…1fea Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0014, t01=0x0086}
0x1fea…1ff4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b2}
0x1ff4…2000 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00bc}
0x2000…200a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00c8}
0x200a…2014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00d2}
0x2014…2020 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00dc}
0x2020…2036 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0014, t01=0x00e8}
0x2036…2040 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00fe}
0x2040…204a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0108}
0x204a…2084 Head {h00=0x0036, h01=0x0050, text=»* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.2«, t00=0x0014, t01=0x0112}
0x2084…208e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x014c}
0x208e…20b2 Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0014, t01=0x0156}
0x20b2…20bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017a}
0x20bc…20e4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0014, t01=0x0184}
0x20e4…2104 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0015, t01=0x001c}
0x2104…2128 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0015, t01=0x003c}
0x2128…2142 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0015, t01=0x0060}
0x2142…215c Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0015, t01=0x007a}
0x215c…217c Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0015, t01=0x0094}
0x217c…21a2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0015, t01=0x00b4}
0x21a2…21be Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0015, t01=0x00da}
0x21be…21c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f6}
0x21c8…21de Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0015, t01=0x0100}
0x21de…21e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0116}
0x21e8…2208 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0015, t01=0x0120}
0x2208…2230 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0015, t01=0x0140}
0x2230…2260 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0015, t01=0x0168}
0x2260…228c Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0016, t01=0x0008}
0x228c…2296 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0034}
0x2296…22a2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x003e}
0x22a2…22b0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x004a}
0x22b0…22ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0058}
0x22ba…22c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0062}
0x22c4…22fe Head {h00=0x0036, h01=0x0050, text=»* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3«, t00=0x0016, t01=0x006c}
0x22fe…2308 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a6}
0x2308…231c Head {h00=0x0010, h01=0x0050, text=»CWTLT3 EQU *«, t00=0x0016, t01=0x00b0}
0x231c…2332 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0016, t01=0x00c4}
0x2332…2356 Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x0016, t01=0x00da}
0x2356…2360 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00fe}
0x2360…2388 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0016, t01=0x0108}
0x2388…23a8 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0016, t01=0x0130}
0x23a8…23cc Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x0016, t01=0x0150}
0x23cc…23e6 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x0016, t01=0x0174}
0x23e6…2400 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x0016, t01=0x018e}
0x2400…2420 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x0017, t01=0x0018}
0x2420…2446 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0017, t01=0x0038}
0x2446…2462 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0017, t01=0x005e}
0x2462…246c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x007a}
0x246c…2482 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0017, t01=0x0084}
0x2482…248c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x009a}
0x248c…24ac Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0017, t01=0x00a4}
0x24ac…24d4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0017, t01=0x00c4}
0x24d4…2504 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0017, t01=0x00ec}
0x2504…2530 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0017, t01=0x011c}
0x2530…253a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0148}
0x253a…2546 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0152}
0x2546…2550 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x015e}
0x2550…255a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0168}
0x255a…2570 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0017, t01=0x0172}
0x2570…2594 Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x0017, t01=0x0188}
0x2594…259e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x001c}
0x259e…25c6 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0018, t01=0x0026}
0x25c6…25e6 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0018, t01=0x004e}
0x25e6…260a Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x0018, t01=0x006e}
0x260a…2624 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x0018, t01=0x0092}
0x2624…263e Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x0018, t01=0x00ac}
0x263e…265e Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x0018, t01=0x00c6}
0x265e…2684 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0018, t01=0x00e6}
0x2684…26a0 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0018, t01=0x010c}
0x26a0…26aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0128}
0x26aa…26c0 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0018, t01=0x0132}
0x26c0…26ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0148}
0x26ca…26ea Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0018, t01=0x0152}
0x26ea…2712 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0018, t01=0x0172}
0x2712…2742 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0019, t01=0x000a}
0x2742…276e Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0019, t01=0x003a}
0x276e…2778 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0066}
0x2778…2784 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0070}
0x2784…2792 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x007c}
0x2792…279c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x008a}
0x279c…27d4 Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4«, t00=0x0019, t01=0x0094}
0x27d4…27de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00cc}
0x27de…27f2 Head {h00=0x0010, h01=0x0050, text=»CWTLT4 EQU *«, t00=0x0019, t01=0x00d6}
0x27f2…27fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ea}
0x27fc…2806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00f4}
0x2806…281c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0019, t01=0x00fe}
0x281c…2840 Head {h00=0x0020, h01=0x0050, text=»DWA4 EQU /33 DEVICE ADDRESS «, t00=0x0019, t01=0x0114}
0x2840…284a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0138}
0x284a…2872 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0019, t01=0x0142}
0x2872…2892 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0019, t01=0x016a}
0x2892…28b6 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT4 INTERRUPT TABLE«, t00=0x0019, t01=0x018a}
0x28b6…28d0 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA4 INR«, t00=0x001a, t01=0x001e}
0x28d0…28ea Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA4 OTR«, t00=0x001a, t01=0x0038}
0x28ea…290a Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA4 CIO-START«, t00=0x001a, t01=0x0052}
0x290a…2930 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x001a, t01=0x0072}
0x2930…294c Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x001a, t01=0x0098}
0x294c…2956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b4}
0x2956…296c Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x001a, t01=0x00be}
0x296c…2976 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d4}
0x2976…2996 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x001a, t01=0x00de}
0x2996…29be Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x001a, t01=0x00fe}
0x29be…29ee Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x001a, t01=0x0126}
0x29ee…2a1a Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x001a, t01=0x0156}
0x2a1a…2a24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0182}
0x2a24…2a30 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x018c}
0x2a30…2a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0008}
0x2a3a…2a48 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0012}
0x2a48…2a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0020}
0x2a52…2a88 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001b, t01=0x002a}
0x2a88…2abe Head {h00=0x0032, h01=0x0050, text=»* C H T A B *«, t00=0x001b, t01=0x0060}
0x2abe…2af4 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001b, t01=0x0096}
0x2af4…2afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00cc}
0x2afe…2b38 Head {h00=0x0036, h01=0x0050, text=»* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK «, t00=0x001b, t01=0x00d6}
0x2b38…2b74 Head {h00=0x0038, h01=0x0050, text=»* TABLES CWT TO CHANNEL UNITS FOR LOCAL AND REMOTE«, t00=0x001b, t01=0x0110}
0x2b74…2b8a Head {h00=0x0012, h01=0x0050, text=»* TERMINALS.«, t00=0x001b, t01=0x014c}
0x2b8a…2b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0162}
0x2b94…2b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x016c}
0x2b9e…2bb2 Head {h00=0x0010, h01=0x0050, text=»CHTAB EQU * «, t00=0x001b, t01=0x0176}
0x2bb2…2bd6 Head {h00=0x0020, h01=0x0050, text=» DATA CHTABE-* TABLE LENGTH «, t00=0x001b, t01=0x018a}
0x2bd6…2bec Head {h00=0x0012, h01=0x0050, text=» DATA CWTLT1 «, t00=0x001c, t01=0x001e}
0x2bec…2c00 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT2«, t00=0x001c, t01=0x0034}
0x2c00…2c16 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x001c, t01=0x0048}
0x2c16…2c2a Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001c, t01=0x005e}
0x2c2a…2c36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0072}
0x2c36…2c4c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x001c, t01=0x007e}
0x2c4c…2c60 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001c, t01=0x0094}
0x2c60…2c74 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT4«, t00=0x001c, t01=0x00a8}
0x2c74…2c80 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00bc}
0x2c80…2ca2 Head {h00=0x001e, h01=0x0050, text=»CHTABE EQU * END OF TABLE «, t00=0x001c, t01=0x00c8}
0x2ca2…2cac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ea}
0x2cac…2cb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00f4}
0x2cb6…2cc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00fe}
0x2cc0…2cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0108}
0x2cca…2cd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0112}
0x2cd4…2ce2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x011c}
0x2ce2…2cec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012a}
0x2cec…2d02 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001c, t01=0x0134}
0x2d02…2d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x014a}
0x2d0c…2d2e Head {h00=0x001e, h01=0x0050, text=»* C H L T 1 / C H L T 2 «, t00=0x001c, t01=0x0154}
0x2d2e…2d60 Head {h00=0x002e, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER FOR CHLT«, t00=0x001c, t01=0x0176}
0x2d60…2d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0018}
0x2d6a…2d80 Head {h00=0x0012, h01=0x0050, text=»* C H L T 1 «, t00=0x001d, t01=0x0022}
0x2d80…2da0 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT1«, t00=0x001d, t01=0x0038}
0x2da0…2daa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0058}
0x2daa…2db6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0062}
0x2db6…2dcc Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x001d, t01=0x006e}
0x2dcc…2de0 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x001d, t01=0x0084}
0x2de0…2df4 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x001d, t01=0x0098}
0x2df4…2e00 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00ac}
0x2e00…2e16 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001d, t01=0x00b8}
0x2e16…2e2a Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x001d, t01=0x00ce}
0x2e2a…2e52 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001d, t01=0x00e2}
0x2e52…2e68 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001d, t01=0x010a}
0x2e68…2e92 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001d, t01=0x0120}
0x2e92…2e9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x014a}
0x2e9e…2ea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0156}
0x2ea8…2ebe Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001d, t01=0x0160}
0x2ebe…2ed4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001d, t01=0x0176}
0x2ed4…2efa Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001d, t01=0x018c}
0x2efa…2f06 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0022}
0x2f06…2f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x002e}
0x2f10…2f26 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001e, t01=0x0038}
0x2f26…2f58 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 «, t00=0x001e, t01=0x004e}
0x2f58…2f6a Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x001e, t01=0x0080}
0x2f6a…2f74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0092}
0x2f74…2f8a Head {h00=0x0012, h01=0x0050, text=»* C H L T 2 «, t00=0x001e, t01=0x009c}
0x2f8a…2faa Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT2«, t00=0x001e, t01=0x00b2}
0x2faa…2fb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00d2}
0x2fb4…2fc8 Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x001e, t01=0x00dc}
0x2fc8…2ff0 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001e, t01=0x00f0}
0x2ff0…3006 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001e, t01=0x0118}
0x3006…3030 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001e, t01=0x012e}
0x3030…303c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0158}
0x303c…3046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0164}
0x3046…305c Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001e, t01=0x016e}
0x305c…3072 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001e, t01=0x0184}
0x3072…3098 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001f, t01=0x000a}
0x3098…30a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0030}
0x30a4…30ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x003c}
0x30ae…30c4 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001f, t01=0x0046}
0x30c4…30f6 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 «, t00=0x001f, t01=0x005c}
0x30f6…3102 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x008e}
0x3102…3118 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x001f, t01=0x009a}
0x3118…314c Head {h00=0x0030, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION «, t00=0x001f, t01=0x00b0}
0x314c…3156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e4}
0x3156…3162 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00ee}
0x3162…316c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fa}
0x316c…3182 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x001f, t01=0x0104}
0x3182…3194 Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x001f, t01=0x011a}
0x3194…319e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x012c}
0x319e…31b4 Head {h00=0x0012, h01=0x0050, text=»* C H L T 3 «, t00=0x001f, t01=0x0136}
0x31b4…31d4 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT3«, t00=0x001f, t01=0x014c}
0x31d4…31de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x016c}
0x31de…31f2 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x001f, t01=0x0176}
0x31f2…3206 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x001f, t01=0x018a}
0x3206…322e Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0020, t01=0x000e}
0x322e…3244 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x0036}
0x3244…326e Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0020, t01=0x004c}
0x326e…327a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0076}
0x327a…3284 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0082}
0x3284…329a Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0020, t01=0x008c}
0x329a…32b0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0020, t01=0x00a2}
0x32b0…32d6 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0020, t01=0x00b8}
0x32d6…32e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00de}
0x32e2…32ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ea}
0x32ec…3302 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0020, t01=0x00f4}
0x3302…3334 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0020, t01=0x010a}
0x3334…335c Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0020, t01=0x013c}
0x335c…3366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0164}
0x3366…3372 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x016e}
0x3372…3388 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0020, t01=0x017a}
0x3388…339a Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0020, t01=0x0190}
0x339a…33a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0012}
0x33a4…33ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x001c}
0x33ae…33c4 Head {h00=0x0012, h01=0x0050, text=»* C H L T 2 «, t00=0x0021, t01=0x0026}
0x33c4…33e4 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT3«, t00=0x0021, t01=0x003c}
0x33e4…33ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x005c}
0x33ee…3402 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0021, t01=0x0066}
0x3402…342a Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0021, t01=0x007a}
0x342a…3440 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0021, t01=0x00a2}
0x3440…346a Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0021, t01=0x00b8}
0x346a…3476 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00e2}
0x3476…3480 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ee}
0x3480…3496 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0021, t01=0x00f8}
0x3496…34ac Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0021, t01=0x010e}
0x34ac…34d2 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0021, t01=0x0124}
0x34d2…34de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x014a}
0x34de…34e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0156}
0x34e8…34fe Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0021, t01=0x0160}
0x34fe…3530 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0021, t01=0x0176}
0x3530…3542 Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0022, t01=0x0018}
0x3542…3558 Head {h00=0x0012, h01=0x0050, text=»* C H L T 4 «, t00=0x0022, t01=0x002a}
0x3558…3578 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT4«, t00=0x0022, t01=0x0040}
0x3578…3582 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0060}
0x3582…3596 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0022, t01=0x006a}
0x3596…35be Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0022, t01=0x007e}
0x35be…35d4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0022, t01=0x00a6}
0x35d4…35fe Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0022, t01=0x00bc}
0x35fe…360a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00e6}
0x360a…3614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00f2}
0x3614…362a Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0022, t01=0x00fc}
0x362a…3640 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0022, t01=0x0112}
0x3640…3666 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0022, t01=0x0128}
0x3666…3672 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x014e}
0x3672…367c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x015a}
0x367c…3692 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0022, t01=0x0164}
0x3692…36c4 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT4 SET CWT-ADDRESS FOR CHLT4 «, t00=0x0022, t01=0x017a}
0x36c4…36ec Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0023, t01=0x001c}
0x36ec…36f8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0044}
0x36f8…3702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0050}
0x3702…3718 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0023, t01=0x005a}
0x3718…3722 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0070}
0x3722…372c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x007a}
0x372c…3742 Head {h00=0x0012, h01=0x0050, text=»* C H L T 1«, t00=0x0023, t01=0x0084}
0x3742…374c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x009a}
0x374c…376e Head {h00=0x001e, h01=0x0050, text=»* INTERRUPT FROM CHLT1 «, t00=0x0023, t01=0x00a4}
0x376e…3778 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c6}
0x3778…378c Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x0023, t01=0x00d0}
0x378c…37a0 Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x0023, t01=0x00e4}
0x37a0…37b4 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0023, t01=0x00f8}
0x37b4…37c8 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0023, t01=0x010c}
0x37c8…37de Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0023, t01=0x0120}
0x37de…3808 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0023, t01=0x0136}
0x3808…3814 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0160}
0x3814…381e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x016c}
0x381e…3834 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0023, t01=0x0176}
0x3834…384a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0023, t01=0x018c}
0x384a…3870 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0024, t01=0x0012}
0x3870…387c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0038}
0x387c…3886 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0044}
0x3886…389c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0024, t01=0x004e}
0x389c…38c4 Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0024, t01=0x0064}
0x38c4…38ec Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0024, t01=0x008c}
0x38ec…3902 Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x0024, t01=0x00b4}
0x3902…390c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00ca}
0x390c…3918 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00d4}
0x3918…3922 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e0}
0x3922…3938 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0024, t01=0x00ea}
0x3938…396a Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG ** LOGG OF INPUT CHARACTER **«, t00=0x0024, t01=0x0100}
0x396a…3976 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0132}
0x3976…3984 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x013e}
0x3984…398e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x014c}
0x398e…3998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0156}
0x3998…39c6 Head {h00=0x002a, h01=0x0050, text=»* DETERMINE LINE- AND DEVICE NUMBER «, t00=0x0024, t01=0x0160}
0x39c6…39d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x018e}
0x39d0…39f4 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0025, t01=0x0008}
0x39f4…3a18 Head {h00=0x0020, h01=0x0050, text=» LDR A3,A2 INPUT WORD IN A3 «, t00=0x0025, t01=0x002c}
0x3a18…3a2a Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x0025, t01=0x0050}
0x3a2a…3a3c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0025, t01=0x0062}
0x3a3c…3a64 Head {h00=0x0024, h01=0x0050, text=» ANK A3,/E 2 * LINE NUMBER IN A3«, t00=0x0025, t01=0x0074}
0x3a64…3a76 Head {h00=0x000e, h01=0x0050, text=» SRL A4,3 «, t00=0x0025, t01=0x009c}
0x3a76…3aa0 Head {h00=0x0026, h01=0x0050, text=» ANK A4,/E 2 * DEVICE NUMBER IN A4«, t00=0x0025, t01=0x00ae}
0x3aa0…3ad2 Head {h00=0x002e, h01=0x0050, text=» ABL(NE) CLT100 INPUT IS A DATA CHARACTER «, t00=0x0025, t01=0x00d8}
0x3ad2…3ae6 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0025, t01=0x010a}
0x3ae6…3b02 Head {h00=0x0018, h01=0x0050, text=» SUK A2,3 POWER ON ?«, t00=0x0025, t01=0x011e}
0x3b02…3b18 Head {h00=0x0012, h01=0x0050, text=» RF(E) CHPOWO «, t00=0x0025, t01=0x013a}
0x3b18…3b32 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 NAK ? =3«, t00=0x0025, t01=0x0150}
0x3b32…3b4c Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLT035 =3 «, t00=0x0025, t01=0x016a}
0x3b4c…3b68 Head {h00=0x0018, h01=0x0050, text=»CLT015 EQU * =7(=3)«, t00=0x0025, t01=0x0184}
0x3b68…3b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0010}
0x3b72…3b7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x001a}
0x3b7c…3bb0 Head {h00=0x0030, h01=0x0050, text=»* CHECK QUEUE AND SEND IF SOMETHING THERE«, t00=0x0026, t01=0x0024}
0x3bb0…3bba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0058}
0x3bba…3be4 Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A5 LAST OUTPUT DWT IN A7 «, t00=0x0026, t01=0x0062}
0x3be4…3c06 Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0026, t01=0x008c}
0x3c06…3c2a Head {h00=0x0020, h01=0x0050, text=» LD A6,CWTEQ,A5 OUTPUT QUEUE«, t00=0x0026, t01=0x00ae}
0x3c2a…3c40 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT020 «, t00=0x0026, t01=0x00d2}
0x3c40…3c5c Head {h00=0x0018, h01=0x0050, text=» STR A2,A15 SAVE A2 «, t00=0x0026, t01=0x00e8}
0x3c5c…3c84 Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTOTQ,A6 GET QUEUE LINK «, t00=0x0026, t01=0x0104}
0x3c84…3cac Head {h00=0x0024, h01=0x0050, text=» ST A2,CWTEQ,A5 STORE IT IN CWT «, t00=0x0026, t01=0x012c}
0x3cac…3cd2 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOCH,A6 GET CHARACTER«, t00=0x0026, t01=0x0154}
0x3cd2…3cf8 Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0026, t01=0x017a}
0x3cf8…3d16 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 RELOAD A2«, t00=0x0027, t01=0x0010}
0x3d16…3d24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x002e}
0x3d24…3d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x003c}
0x3d2e…3d38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0046}
0x3d38…3d6e Head {h00=0x0032, h01=0x0050, text=»* CHECK CONTROL CHARACTER AND UPDATE ERROR-«, t00=0x0027, t01=0x0050}
0x3d6e…3da4 Head {h00=0x0032, h01=0x0050, text=»* ACKUMULATORS IF NAK, RETRANSMISSION FAULT«, t00=0x0027, t01=0x0086}
0x3da4…3dd0 Head {h00=0x0028, h01=0x0050, text=»* OR UNDEFINED CONTROL CHARACTER «, t00=0x0027, t01=0x00bc}
0x3dd0…3dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00e8}
0x3dda…3dee Head {h00=0x0010, h01=0x0050, text=»CLT020 EQU *«, t00=0x0027, t01=0x00f2}
0x3dee…3e10 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A7 GET LAST OUTPUT«, t00=0x0027, t01=0x0106}
0x3e10…3e26 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT062 «, t00=0x0027, t01=0x0128}
0x3e26…3e40 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 ACK ? =3«, t00=0x0027, t01=0x013e}
0x3e40…3e56 Head {h00=0x0012, h01=0x0050, text=» RF(Z) CLT040 «, t00=0x0027, t01=0x0158}
0x3e56…3e72 Head {h00=0x0018, h01=0x0050, text=» ADK A2,7 TIME-OUT ?«, t00=0x0027, t01=0x016e}
0x3e72…3e88 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT028 «, t00=0x0027, t01=0x018a}
0x3e88…3ea4 Head {h00=0x0018, h01=0x0050, text=» SUK A2,5 7 NAK ? =3«, t00=0x0028, t01=0x0010}
0x3ea4…3ebe Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLT032 =3 «, t00=0x0028, t01=0x002c}
0x3ebe…3ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0046}
0x3ec8…3ede Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0028, t01=0x0050}
0x3ede…3ee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0066}
0x3ee8…3ef6 Head {h00=0x000a, h01=0x0050, text=» =1«, t00=0x0028, t01=0x0070}
0x3ef6…3f04 Head {h00=0x000a, h01=0x0050, text=» =1«, t00=0x0028, t01=0x007e}
0x3f04…3f16 Head {h00=0x000e, h01=0x0050, text=» LDK A7,2 «, t00=0x0028, t01=0x008c}
0x3f16…3f3e Head {h00=0x0024, h01=0x0050, text=» SUK A2,/16 RETRANSMISSION FAULT«, t00=0x0028, t01=0x009e}
0x3f3e…3f54 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT025 «, t00=0x0028, t01=0x00c6}
0x3f54…3f7a Head {h00=0x0022, h01=0x0050, text=» ADK A7,2 UNDEFINED INTERRUPT «, t00=0x0028, t01=0x00dc}
0x3f7a…3f92 Head {h00=0x0014, h01=0x0050, text=»CLT025 ADR A7,A5«, t00=0x0028, t01=0x0102}
0x3f92…3fc6 Head {h00=0x0030, h01=0x0050, text=» IM CWTADD,A7 INCREMENT ACKUMULATOR FOR THIS«, t00=0x0028, t01=0x011a}
0x3fc6…3fe2 Head {h00=0x0018, h01=0x0050, text=» TYPE OF INTERRUPT«, t00=0x0028, t01=0x014e}
0x3fe2…3fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x016a}
0x3fec…3ff8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0174}
0x3ff8…4002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0180}
0x4002…4010 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x018a}
0x4010…401a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0008}
0x401a…4024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0012}
0x4024…4058 Head {h00=0x0030, h01=0x0050, text=»* NAK, TIME-OUT, RETRANSMISSION FAULT OR «, t00=0x0029, t01=0x001c}
0x4058…4080 Head {h00=0x0024, h01=0x0050, text=»* UNDEFINED CONTROL CHARACTER«, t00=0x0029, t01=0x0050}
0x4080…408a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0078}
0x408a…40c8 Head {h00=0x003a, h01=0x0050, text=»* CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE«, t00=0x0029, t01=0x0082}
0x40c8…4100 Head {h00=0x0034, h01=0x0050, text=»* ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH «, t00=0x0029, t01=0x00c0}
0x4100…4122 Head {h00=0x001e, h01=0x0050, text=»* MESSAGE NOT OPERABLE.«, t00=0x0029, t01=0x00f8}
0x4122…412c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x011a}
0x412c…4140 Head {h00=0x0010, h01=0x0050, text=»CLT028 EQU *«, t00=0x0029, t01=0x0124}
0x4140…4172 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/3000 ECHO MODE AND RECOVERY BIT «, t00=0x0029, t01=0x0138}
0x4172…41a8 Head {h00=0x0032, h01=0x0050, text=» AN A2,DWTST,A6 AT LEAST ONE OF THE BITS SET ?«, t00=0x0029, t01=0x016a}
0x41a8…41be Head {h00=0x0012, h01=0x0050, text=» RF(NE) CLT032«, t00=0x002a, t01=0x0010}
0x41be…41f2 Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE «, t00=0x002a, t01=0x0026}
0x41f2…4222 Head {h00=0x002c, h01=0x0050, text=» XRS A2,DWTST,A6 SET BIT IN STATUS WORD «, t00=0x002a, t01=0x005a}
0x4222…4256 Head {h00=0x0030, h01=0x0050, text=»CLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE «, t00=0x002a, t01=0x008a}
0x4256…426c Head {h00=0x0012, h01=0x0050, text=» LDK A4,1 =1 «, t00=0x002a, t01=0x00be}
0x426c…427e Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x002a, t01=0x00d4}
0x427e…4290 Head {h00=0x000e, h01=0x0050, text=» RF CPO025«, t00=0x002a, t01=0x00e6}
0x4290…42c2 Head {h00=0x002e, h01=0x0050, text=»CLT032 LDK A1,NOERR INDICATE NOT OPERABLE «, t00=0x002a, t01=0x00f8}
0x42c2…42ee Head {h00=0x0028, h01=0x0050, text=» CM CWTRTC,A5 CLEAR RETRY COUNTER =1«, t00=0x002a, t01=0x012a}
0x42ee…4302 Head {h00=0x0010, h01=0x0050, text=» ABL CLT110 «, t00=0x002a, t01=0x0156}
0x4302…4310 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x016a}
0x4310…431a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0178}
0x431a…4324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0182}
0x4324…4336 Head {h00=0x000e, h01=0x0050, text=»* N A K«, t00=0x002a, t01=0x018c}
0x4336…4340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x000e}
0x4340…4386 Head {h00=0x0042, h01=0x0050, text=»* ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. «, t00=0x002b, t01=0x0018}
0x4386…43cc Head {h00=0x0042, h01=0x0050, text=»* LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER «, t00=0x002b, t01=0x005e}
0x43cc…4410 Head {h00=0x0040, h01=0x0050, text=»* UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT«, t00=0x002b, t01=0x00a4}
0x4410…4440 Head {h00=0x002c, h01=0x0050, text=»* OPERABLE IS SENT TO DEVICE DRIVER. «, t00=0x002b, t01=0x00e8}
0x4440…444a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0118}
0x444a…445e Head {h00=0x0010, h01=0x0050, text=»CLT035 EQU *«, t00=0x002b, t01=0x0122}
0x445e…4474 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x002b, t01=0x0136}
0x4474…447e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x014c}
0x447e…44ac Head {h00=0x002a, h01=0x0050, text=» IM CWTADD,A5 UPDATE ERROR ACKUMULATOR«, t00=0x002b, t01=0x0156}
0x44ac…44b8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0184}
0x44b8…44c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0190}
0x44c2…44f8 Head {h00=0x0032, h01=0x0050, text=» IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER«, t00=0x002c, t01=0x000a}
0x44f8…451c Head {h00=0x0020, h01=0x0050, text=» LD A4,CWTRTC,A5 GET COUNTER«, t00=0x002c, t01=0x0040}
0x451c…453c Head {h00=0x001c, h01=0x0050, text=» SUK A4,7 SEVEN TIMES ? «, t00=0x002c, t01=0x0064}
0x453c…455a Head {h00=0x001a, h01=0x0050, text=» RB(E) CLT015 =7(=3) «, t00=0x002c, t01=0x0084}
0x455a…4588 Head {h00=0x002a, h01=0x0050, text=» LD A2,CWTLOW,A5 GET LAST OUTPUT WORD «, t00=0x002c, t01=0x00a2}
0x4588…459a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x002c, t01=0x00d0}
0x459a…45c8 Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x002c, t01=0x00e2}
0x45c8…45d6 Head {h00=0x000a, h01=0x0050, text=» =3«, t00=0x002c, t01=0x0110}
0x45d6…45ec Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x002c, t01=0x011e}
0x45ec…461e Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG ** LOGG OUTPUT CHARACTER **«, t00=0x002c, t01=0x0134}
0x461e…462a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0166}
0x462a…4638 Head {h00=0x000a, h01=0x0050, text=» =3«, t00=0x002c, t01=0x0172}
0x4638…464a Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x002c, t01=0x0180}
0x464a…4658 (45, 0, 398) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0004}
0x4658…4662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0012}
0x4662…466c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x001c}
0x466c…468c Head {h00=0x001c, h01=0x0050, text=»* ACK DATA = 07 «, t00=0x002d, t01=0x0026}
0x468c…4696 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0046}
0x4696…46cc Head {h00=0x0032, h01=0x0050, text=»* SIMULATE DATA REQUEST IF RETURN CODE FROM«, t00=0x002d, t01=0x0050}
0x46cc…46fe Head {h00=0x002e, h01=0x0050, text=»* CHLT OR DEVICE WITHOUT DATA REQUEST, «, t00=0x002d, t01=0x0086}
0x46fe…4720 Head {h00=0x001e, h01=0x0050, text=»* ELSE GO TO DISPATCHER«, t00=0x002d, t01=0x00b8}
0x4720…472a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00da}
0x472a…473e Head {h00=0x0010, h01=0x0050, text=»CLT040 EQU *«, t00=0x002d, t01=0x00e4}
0x473e…4754 Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x002d, t01=0x00f8}
0x4754…478e Head {h00=0x0036, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT IN STATUS WORD«, t00=0x002d, t01=0x010e}
0x478e…47a0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002d, t01=0x0148}
0x47a0…47d8 Head {h00=0x0034, h01=0x0050, text=» RF(NZ) CLT110 RETURN CODE,SIMULATE DATA REQUEST«, t00=0x002d, t01=0x015a}
0x47d8…4808 (46, 0, 400) Head {h00=0x002c, h01=0x0050, text=» LDR* A7,A6 DEVICE WITHOUT DATA REQUEST?«, t00=0x002e, t01=0x0004}
0x4808…4838 Head {h00=0x002c, h01=0x0050, text=» RF(N) CLT110 YES. SIMULATE DATA REQUEST«, t00=0x002e, t01=0x0034}
0x4838…4842 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0064}
0x4842…4858 Head {h00=0x0012, h01=0x0050, text=» IFF SOFTIM=1 «, t00=0x002e, t01=0x006e}
0x4858…4862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0084}
0x4862…4876 Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x002e, t01=0x008e}
0x4876…4886 Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002e, t01=0x00a2}
0x4886…4890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00b2}
0x4890…489c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x00bc}
0x489c…48a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c8}
0x48a6…48b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00d2}
0x48b0…48c6 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x002e, t01=0x00dc}
0x48c6…48d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00f2}
0x48d0…48de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00fc}
0x48de…48e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010a}
0x48e8…48f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0114}
0x48f2…490e Head {h00=0x0018, h01=0x0050, text=»* PRINTER TIMING «, t00=0x002e, t01=0x011e}
0x490e…4918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x013a}
0x4918…4924 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002e, t01=0x0144}
0x4924…4932 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x002e, t01=0x0150}
0x4932…4940 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x002e, t01=0x015e}
0x4940…494e Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x002e, t01=0x016c}
0x494e…497c Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTTP,A6 ADDRESS TO TIMER BLOCK«, t00=0x002e, t01=0x017a}
0x497c…4992 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT060 «, t00=0x002f, t01=0x0018}
0x4992…499c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x002e}
0x499c…49b6 Head {h00=0x0016, h01=0x0050, text=»* RESTART TIMER«, t00=0x002f, t01=0x0038}
0x49b6…49c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0052}
0x49c0…49e6 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,-DRQTIM RESTART TIMER«, t00=0x002f, t01=0x005c}
0x49e6…49fe Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x002f, t01=0x0082}
0x49fe…4a0e Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002f, t01=0x009a}
0x4a0e…4a18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00aa}
0x4a18…4a30 Head {h00=0x0014, h01=0x0050, text=»* START TIMER«, t00=0x002f, t01=0x00b4}
0x4a30…4a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00cc}
0x4a3a…4a5c Head {h00=0x001e, h01=0x0050, text=»CLT060 LDR A1,A6 PARAMETER«, t00=0x002f, t01=0x00d6}
0x4a5c…4a80 Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTTP TIMER POINTER«, t00=0x002f, t01=0x00f8}
0x4a80…4aa8 Head {h00=0x0024, h01=0x0050, text=» ADR A4,A6 ADD WITH DWT-ADDRESS «, t00=0x002f, t01=0x011c}
0x4aa8…4ace Head {h00=0x0022, h01=0x0050, text=» CF A15,SETIMP GET TIMER BLOCK«, t00=0x002f, t01=0x0144}
0x4ace…4b10 Head {h00=0x003e, h01=0x0050, text=» DATA DRQTUT,DRQTIM ADDRESS TO TIME-OUT ROUTINE AND DELAY «, t00=0x002f, t01=0x016a}
0x4b10…4b24 Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x0030, t01=0x001c}
0x4b24…4b34 Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0030, t01=0x0030}
0x4b34…4b3c Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0040}
0x4b3c…4b4a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0048}
0x4b4a…4b54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0056}
0x4b54…4b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0060}
0x4b5e…4b82 Head {h00=0x0020, h01=0x0050, text=»* RESET TIMER IF STARTED «, t00=0x0030, t01=0x006a}
0x4b82…4b8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x008e}
0x4b8c…4b9a Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x0098}
0x4b9a…4ba8 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x00a6}
0x4ba8…4bb6 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x00b4}
0x4bb6…4bc4 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x00c2}
0x4bc4…4bd2 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x00d0}
0x4bd2…4be0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x00de}
0x4be0…4bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00ec}
0x4bea…4c24 Head {h00=0x0036, h01=0x0050, text=»* TIME-OUT ROUTINE HANDLING MISSING INTERRUPTS «, t00=0x0030, t01=0x00f6}
0x4c24…4c3e Head {h00=0x0016, h01=0x0050, text=»* FROM PRINTERS«, t00=0x0030, t01=0x0130}
0x4c3e…4c48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x014a}
0x4c48…4c5c Head {h00=0x0010, h01=0x0050, text=»DRQTUT EQU *«, t00=0x0030, t01=0x0154}
0x4c5c…4c7e Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0030, t01=0x0168}
0x4c7e…4cb0 Head {h00=0x002e, h01=0x0050, text=» CM DWTTP,A6 RESET POINTER TO TIMER BLOCK «, t00=0x0030, t01=0x018a}
0x4cb0…4cc8 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x0031, t01=0x002c}
0x4cc8…4ce6 Head {h00=0x001a, h01=0x0050, text=» SLL A3,2 ECHO MODE ? «, t00=0x0031, t01=0x0044}
0x4ce6…4d00 Head {h00=0x0016, h01=0x0050, text=» RF(N) CLT110 YES «, t00=0x0031, t01=0x0062}
0x4d00…4d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x007c}
0x4d0a…4d20 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0031, t01=0x0086}
0x4d20…4d36 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0031, t01=0x009c}
0x4d36…4d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00b2}
0x4d40…4d66 Head {h00=0x0022, h01=0x0050, text=» LDR* A5,A6 CHANNEL PARAMETER «, t00=0x0031, t01=0x00bc}
0x4d66…4d78 Head {h00=0x000e, h01=0x0050, text=» ANK A5,/F«, t00=0x0031, t01=0x00e2}
0x4d78…4d94 Head {h00=0x0018, h01=0x0050, text=» SLL A5,1 2 * INDEX «, t00=0x0031, t01=0x00f4}
0x4d94…4dc0 Head {h00=0x0028, h01=0x0050, text=» ADK A5,2 JUST TO AVOID TABLE LENGTH«, t00=0x0031, t01=0x0110}
0x4dc0…4de8 Head {h00=0x0024, h01=0x0050, text=» LD A5,CHTAB,A5 GET CWT-ADDRESS «, t00=0x0031, t01=0x013c}
0x4de8…4e14 Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0031, t01=0x0164}
0x4e14…4e1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0190}
0x4e1e…4e2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x000a}
0x4e2a…4e40 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0032, t01=0x0016}
0x4e40…4e56 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0032, t01=0x002c}
0x4e56…4e6c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0032, t01=0x0042}
0x4e6c…4e76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0058}
0x4e76…4e9e Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0032, t01=0x0062}
0x4e9e…4eca Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0032, t01=0x008a}
0x4eca…4ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00b6}
0x4ed4…4ee0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x00c0}
0x4ee0…4ef6 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0032, t01=0x00cc}
0x4ef6…4f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00e2}
0x4f00…4f28 Head {h00=0x0024, h01=0x0050, text=» LD A7,DWTOR,A6 TEST ORDER ? =2 «, t00=0x0032, t01=0x00ec}
0x4f28…4f4c Head {h00=0x0020, h01=0x0050, text=» ANK A7,/FE 00 OR 01 =9(=2) «, t00=0x0032, t01=0x0114}
0x4f4c…4f82 Head {h00=0x0032, h01=0x0050, text=» RB(E) CLT032 YES, GO TO DEV. INT. HANDLER =2 «, t00=0x0032, t01=0x0138}
0x4f82…4fb2 Head {h00=0x002c, h01=0x0050, text=» RB CLT030 NO, EXECUTE DEV. RECOVERY =2 «, t00=0x0032, t01=0x016e}
0x4fb2…4fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x000e}
0x4fbc…4fc8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0018}
0x4fc8…4fd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0024}
0x4fd2…4fe0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x002e}
0x4fe0…4fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x003c}
0x4fea…500c Head {h00=0x001e, h01=0x0050, text=»* POWER ON DATA = 03 «, t00=0x0033, t01=0x0046}
0x500c…5016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0068}
0x5016…5050 Head {h00=0x0036, h01=0x0050, text=»* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE«, t00=0x0033, t01=0x0072}
0x5050…508a Head {h00=0x0036, h01=0x0050, text=»* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL«, t00=0x0033, t01=0x00ac}
0x508a…50b2 Head {h00=0x0024, h01=0x0050, text=»* UNIT OR THOSE IN ECHO MODE.«, t00=0x0033, t01=0x00e6}
0x50b2…50bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x010e}
0x50bc…50c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0118}
0x50c6…50f0 Head {h00=0x0026, h01=0x0050, text=»* ON EXIT TO RECOVERY ROUTINE:«, t00=0x0033, t01=0x0122}
0x50f0…50fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x014c}
0x50fa…5120 Head {h00=0x0022, h01=0x0050, text=»* A5 = STACKBASE 2 IN DWT «, t00=0x0033, t01=0x0156}
0x5120…513e Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0033, t01=0x017c}
0x513e…5156 Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER«, t00=0x0034, t01=0x000a}
0x5156…5160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0022}
0x5160…5174 Head {h00=0x0010, h01=0x0050, text=»CHPOWO EQU *«, t00=0x0034, t01=0x002c}
0x5174…518a Head {h00=0x0012, h01=0x0050, text=» CF A15,GETLIN«, t00=0x0034, t01=0x0040}
0x518a…51b2 Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A5 GET LAST OUTPUT DWT «, t00=0x0034, t01=0x0056}
0x51b2…51e4 Head {h00=0x002e, h01=0x0050, text=» CM CWTRTC,A5 RESET RETRANSMISSION COUNTER«, t00=0x0034, t01=0x007e}
0x51e4…51f6 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0034, t01=0x00b0}
0x51f6…5218 Head {h00=0x001e, h01=0x0050, text=» LDR A3,A6 DEVICE COUNTER «, t00=0x0034, t01=0x00c2}
0x5218…523a Head {h00=0x001e, h01=0x0050, text=» LDR A1,A8 ADDRESS POINTER«, t00=0x0034, t01=0x00e4}
0x523a…5262 Head {h00=0x0024, h01=0x0050, text=» RF(Z) EXIT EXIT IF NOT DEFINED «, t00=0x0034, t01=0x0106}
0x5262…527a Head {h00=0x0014, h01=0x0050, text=»CPO020 ADK A1,2 «, t00=0x0034, t01=0x012e}
0x527a…529e Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT-ADDRESS «, t00=0x0034, t01=0x0146}
0x529e…52ba Head {h00=0x0018, h01=0x0050, text=» RF(E) CPO030 NO DWT«, t00=0x0034, t01=0x016a}
0x52ba…52cc Head {h00=0x000e, h01=0x0050, text=» SRC A6,1 «, t00=0x0034, t01=0x0186}
0x52cc…52e2 Head {h00=0x0012, h01=0x0050, text=» RF(N) CPO030 «, t00=0x0035, t01=0x0008}
0x52e2…52f4 Head {h00=0x000e, h01=0x0050, text=» SLC A6,1 «, t00=0x0035, t01=0x001e}
0x52f4…531a Head {h00=0x0022, h01=0x0050, text=» LCR A7,A6 LEFT BYTE OF DWTCHP«, t00=0x0035, t01=0x0030}
0x531a…533a Head {h00=0x001c, h01=0x0050, text=» ANK A7,1 INPUT DEVICE ?«, t00=0x0035, t01=0x0056}
0x533a…5354 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO025 YES«, t00=0x0035, t01=0x0076}
0x5354…536a Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x0035, t01=0x0090}
0x536a…5396 Head {h00=0x0028, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT «, t00=0x0035, t01=0x00a6}
0x5396…53ae Head {h00=0x0014, h01=0x0050, text=» LC A7,DWTST,A6 «, t00=0x0035, t01=0x00d2}
0x53ae…53ce Head {h00=0x001c, h01=0x0050, text=» ANK A7,/20 ECHO MODE ? «, t00=0x0035, t01=0x00ea}
0x53ce…53e8 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO030 YES«, t00=0x0035, t01=0x010a}
0x53e8…541e Head {h00=0x0032, h01=0x0050, text=» CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER ?«, t00=0x0035, t01=0x0124}
0x541e…5438 Head {h00=0x0016, h01=0x0050, text=» RF(E) CPO030 YES «, t00=0x0035, t01=0x015a}
0x5438…5474 Head {h00=0x0038, h01=0x0050, text=»CPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESSBLOCK IN A7«, t00=0x0035, t01=0x0174}
0x5474…54a6 Head {h00=0x002e, h01=0x0050, text=» LD A7,RECADR,A7 ADDRESS TO RECOVERY IN A7«, t00=0x0036, t01=0x0020}
0x54a6…54c8 Head {h00=0x001e, h01=0x0050, text=» RF(E) CPO030 NO RECOVERY «, t00=0x0036, t01=0x0052}
0x54c8…54ea Head {h00=0x001e, h01=0x0050, text=» LDKL A5,DWTSB2 STACKBASE «, t00=0x0036, t01=0x0074}
0x54ea…54fc Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0036, t01=0x0096}
0x54fc…5508 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0036, t01=0x00a8}
0x5508…5532 Head {h00=0x0026, h01=0x0050, text=» CFR A15,A7 GO TO RECOVERY ROUTINE«, t00=0x0036, t01=0x00b4}
0x5532…555e Head {h00=0x0028, h01=0x0050, text=»CPO030 SUK A3,2 ALL DEVICES THREATED«, t00=0x0036, t01=0x00de}
0x555e…5566 Head {h00=0x0004, h01=0x0050, t00=0x0036, t01=0x010a}
0x5566…558a Head {h00=0x0020, h01=0x0050, text=» RB(NE) CPO020 NO TAKE NEXT «, t00=0x0036, t01=0x0112}
0x558a…55a0 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0036, t01=0x0136}
0x55a0…55ae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x014c}
0x55ae…55b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x015a}
0x55b8…55c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0164}
0x55c2…55dc Head {h00=0x0016, h01=0x0050, text=»* DATA-REQUEST«, t00=0x0036, t01=0x016e}
0x55dc…55e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0188}
0x55e6…5612 (55, 0, 400) Head {h00=0x0028, h01=0x0050, text=»CLT100 CF A15,GETLIN GET DWT-ADDRESS«, t00=0x0037, t01=0x0004}
0x5612…5636 Head {h00=0x0020, h01=0x0050, text=» SUR A6,A4 VALID INTERRUPT ?«, t00=0x0037, t01=0x0030}
0x5636…564a Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0037, t01=0x0054}
0x564a…565c Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0037, t01=0x0068}
0x565c…5680 Head {h00=0x0020, h01=0x0050, text=» RB(Z) EXIT EXIT NOT DEFINED«, t00=0x0037, t01=0x007a}
0x5680…569c Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A8 GET DWT «, t00=0x0037, t01=0x009e}
0x569c…56b0 Head {h00=0x0010, h01=0x0050, text=» RB(E) EXIT «, t00=0x0037, t01=0x00ba}
0x56b0…56c6 Head {h00=0x0012, h01=0x0050, text=» ANKL A6,/FFFE«, t00=0x0037, t01=0x00ce}
0x56c6…56f8 Head {h00=0x002e, h01=0x0050, text=» LCR A7,A6 LEFT BYTE IN CHANNEL PARAMETER «, t00=0x0037, t01=0x00e4}
0x56f8…5716 Head {h00=0x001a, h01=0x0050, text=» ANK A7,1 DATA INPUT ?«, t00=0x0037, t01=0x0116}
0x5716…5730 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CLT110 YES«, t00=0x0037, t01=0x0134}
0x5730…575a Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A6 GET CHANNEL PARAMETER «, t00=0x0037, t01=0x014e}
0x575a…576e Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0037, t01=0x0178}
0x576e…579c Head {h00=0x002a, h01=0x0050, text=»CLT110 LD A7,DWTOR,A6 SET ORDER IN A7 «, t00=0x0037, t01=0x018c}
0x579c…57b0 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0038, t01=0x002a}
0x57b0…57de Head {h00=0x002a, h01=0x0050, text=» LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8«, t00=0x0038, t01=0x003e}
0x57de…57f4 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0038, t01=0x006c}
0x57f4…5822 Head {h00=0x002a, h01=0x0050, text=» LC A3,DWTOCH,A6 GET LAST CHARACTER =4«, t00=0x0038, t01=0x0082}
0x5822…583a Head {h00=0x0014, h01=0x0050, text=» ANK A3,/7F =4 «, t00=0x0038, t01=0x00b0}
0x583a…5868 Head {h00=0x002a, h01=0x0050, text=» SUK A3,DUMMSP SPECIAL DUMMY=ETX ? =4 «, t00=0x0038, t01=0x00c8}
0x5868…5884 Head {h00=0x0018, h01=0x0050, text=» RF(NE) CLT120 NO =4«, t00=0x0038, t01=0x00f6}
0x5884…58ac Head {h00=0x0024, h01=0x0050, text=» LDR* A3,A6 CHANNEL PARAMETER =9«, t00=0x0038, t01=0x0112}
0x58ac…58e0 Head {h00=0x0030, h01=0x0050, text=» RF(N) CLT120 DEVICE WITHOUT DATA REQUEST =9«, t00=0x0038, t01=0x013a}
0x58e0…590a Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTTP,A6 TIMER RUNNING ? =4«, t00=0x0038, t01=0x016e}
0x590a…5926 Head {h00=0x0018, h01=0x0050, text=» RF(E) CLT120 NO =4 «, t00=0x0039, t01=0x0008}
0x5926…5938 Head {h00=0x000e, h01=0x0050, text=» INH =4 «, t00=0x0039, t01=0x0024}
0x5938…595c Head {h00=0x0020, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER =4«, t00=0x0039, t01=0x0036}
0x595c…5992 Head {h00=0x0032, h01=0x0050, text=» CM DWTTP,A6 RESET ADDRESS POINTER TO TIMER =4«, t00=0x0039, t01=0x005a}
0x5992…59aa Head {h00=0x0014, h01=0x0050, text=»CLT120 EQU * =4«, t00=0x0039, t01=0x0090}
0x59aa…59b6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x00a8}
0x59b6…59ee Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 «, t00=0x0039, t01=0x00b4}
0x59ee…59fa Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0039, t01=0x00ec}
0x59fa…5a28 Head {h00=0x002a, h01=0x0050, text=» ABI INTADR,A3 GO TO INTERRUPT HANDLER«, t00=0x0039, t01=0x00f8}
0x5a28…5a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0126}
0x5a32…5a74 Head {h00=0x003e, h01=0x0050, text=»* THE FOLLOWING REGISTER VAULES ARE VALID WHEN ENTERING «, t00=0x0039, t01=0x0130}
0x5a74…5aa8 Head {h00=0x0030, h01=0x0050, text=»* THE DEVICE DEPENDANT INTERRUPT HANDLER:-«, t00=0x0039, t01=0x0172}
0x5aa8…5ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0016}
0x5ab2…5ade Head {h00=0x0028, h01=0x0050, text=»* A1 = ERROR CODE (A1=0 NOERROR)«, t00=0x003a, t01=0x0020}
0x5ade…5b24 Head {h00=0x0042, h01=0x0050, text=»* (A1=1 NOT OPERABLE , HARDWARE TIME-OUT) «, t00=0x003a, t01=0x004c}
0x5b24…5b40 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x003a, t01=0x0092}
0x5b40…5b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00ae}
0x5b4a…5b60 Head {h00=0x0012, h01=0x0050, text=»* A7 = ORDER«, t00=0x003a, t01=0x00b8}
0x5b60…5b6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00ce}
0x5b6a…5b86 Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x003a, t01=0x00d8}
0x5b86…5b94 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x00f4}
0x5b94…5b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0102}
0x5b9e…5bb6 Head {h00=0x0014, h01=0x0050, text=»* G E T L I N «, t00=0x003a, t01=0x010c}
0x5bb6…5bc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0124}
0x5bc0…5c02 Head {h00=0x003e, h01=0x0050, text=»* SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE 'INTLTX' «, t00=0x003a, t01=0x012e}
0x5c02…5c32 Head {h00=0x002c, h01=0x0050, text=»* FOR A GIVEN LINE- AND DEVICE NUMBER «, t00=0x003a, t01=0x0170}
0x5c32…5c3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0010}
0x5c3c…5c52 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:-«, t00=0x003b, t01=0x001a}
0x5c52…5c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0030}
0x5c5c…5c7c Head {h00=0x001c, h01=0x0050, text=»* A3 = LINE NUMBER * 2«, t00=0x003b, t01=0x003a}
0x5c7c…5c9e Head {h00=0x001e, h01=0x0050, text=»* A4 = DEVICE NUMBER * 2«, t00=0x003b, t01=0x005a}
0x5c9e…5ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x007c}
0x5ca8…5cbe Head {h00=0x0012, h01=0x0050, text=»* ON EXIT:- «, t00=0x003b, t01=0x0086}
0x5cbe…5cc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x009c}
0x5cc8…5d02 Head {h00=0x0036, h01=0x0050, text=»* A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE «, t00=0x003b, t01=0x00a6}
0x5d02…5d42 Head {h00=0x003c, h01=0x0050, text=»* A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FOUND «, t00=0x003b, t01=0x00e0}
0x5d42…5d4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0120}
0x5d4c…5d56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x012a}
0x5d56…5d6a Head {h00=0x0010, h01=0x0050, text=»GETLIN EQU *«, t00=0x003b, t01=0x0134}
0x5d6a…5d9e Head {h00=0x0030, h01=0x0050, text=» LD* A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE«, t00=0x003b, t01=0x0148}
0x5d9e…5db8 Head {h00=0x0016, h01=0x0050, text=» RF(Z) GTL010 =5 «, t00=0x003b, t01=0x017c}
0x5db8…5ddc Head {h00=0x0020, h01=0x0050, text=» ADR A8,A3 POSITION IN TABLE«, t00=0x003c, t01=0x0008}
0x5ddc…5e0c Head {h00=0x002c, h01=0x0050, text=» LDR* A8,A8 ADDRESS TO TERMINAL SECTION «, t00=0x003c, t01=0x002c}
0x5e0c…5e38 Head {h00=0x0028, h01=0x0050, text=» RF(Z) GTL010 RETURN IF NOT DEFINED «, t00=0x003c, t01=0x005c}
0x5e38…5e58 Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A8 GET ID-WORD «, t00=0x003c, t01=0x0088}
0x5e58…5e88 Head {h00=0x002c, h01=0x0050, text=» ANK A6,/FF TWO TIMES NUMBER OF DEVICES «, t00=0x003c, t01=0x00a8}
0x5e88…5ec0 Head {h00=0x0034, h01=0x0050, text=» ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION«, t00=0x003c, t01=0x00d8}
0x5ec0…5ed4 Head {h00=0x0010, h01=0x0050, text=»GTL010 EQU *«, t00=0x003c, t01=0x0110}
0x5ed4…5f00 Head {h00=0x0028, h01=0x0050, text=»RTNA15 ADKL A15,2 RETURN AND ENABLE «, t00=0x003c, t01=0x0124}
0x5f00…5f0c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x003c, t01=0x0150}
0x5f0c…5f20 Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x003c, t01=0x015c}
0x5f20…5f2e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0170}
0x5f2e…5f38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x017e}
0x5f38…5f50 Head {h00=0x0014, h01=0x0050, text=»* O U T L R T «, t00=0x003c, t01=0x0188}
0x5f50…5f5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0010}
0x5f5a…5f98 Head {h00=0x003a, h01=0x0050, text=»* SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT.«, t00=0x003d, t01=0x001a}
0x5f98…5fa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0058}
0x5fa2…5fe2 Head {h00=0x003c, h01=0x0050, text=»* CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL «, t00=0x003d, t01=0x0062}
0x5fe2…601e Head {h00=0x0038, h01=0x0050, text=»* UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A«, t00=0x003d, t01=0x00a2}
0x601e…6040 Head {h00=0x001e, h01=0x0050, text=»* OUTPUT QUEUE THREAD.«, t00=0x003d, t01=0x00de}
0x6040…604a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0100}
0x604a…6062 Head {h00=0x0014, h01=0x0050, text=»* ON ENTRY: «, t00=0x003d, t01=0x010a}
0x6062…606c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0122}
0x606c…609e Head {h00=0x002e, h01=0x0050, text=»* A2 = OUTPUT CHARACTER IN RIGHT BYTE «, t00=0x003d, t01=0x012c}
0x609e…60bc Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x003d, t01=0x015e}
0x60bc…60c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x017c}
0x60c6…60da Head {h00=0x0010, h01=0x0050, text=»OUTLRT EQU *«, t00=0x003d, t01=0x0186}
0x60da…60e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x000a}
0x60e4…60fa Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x003e, t01=0x0014}
0x60fa…6104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x002a}
0x6104…612a Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETER «, t00=0x003e, t01=0x0034}
0x612a…614a Head {h00=0x001c, h01=0x0050, text=» ANK A1,/F CHANNEL INDEX«, t00=0x003e, t01=0x005a}
0x614a…615c Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x003e, t01=0x007a}
0x615c…616e Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x003e, t01=0x008c}
0x616e…619c Head {h00=0x002a, h01=0x0050, text=» LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 «, t00=0x003e, t01=0x009e}
0x619c…61a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00cc}
0x61a6…61b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x00d6}
0x61b2…61bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00e2}
0x61bc…61c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00ec}
0x61c6…61dc Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x003e, t01=0x00f6}
0x61dc…61e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x010c}
0x61e6…61fe Head {h00=0x0014, h01=0x0050, text=» LDKL A1,CWTLT1 «, t00=0x003e, t01=0x0116}
0x61fe…6208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x012e}
0x6208…6214 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0138}
0x6214…621e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0144}
0x621e…623e Head {h00=0x001c, h01=0x0050, text=» INH INHIBIT INTERRUPT «, t00=0x003e, t01=0x014e}
0x623e…6260 Head {h00=0x001e, h01=0x0050, text=» LDR* A4,A1 IS UNIT FREE ?«, t00=0x003e, t01=0x016e}
0x6260…627a Head {h00=0x0016, h01=0x0050, text=» RF(E) OUL050 YES «, t00=0x003e, t01=0x0190}
0x627a…6288 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x001a}
0x6288…6292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0028}
0x6292…62ac Head {h00=0x0016, h01=0x0050, text=»* QUEUE OUTPUT «, t00=0x003f, t01=0x0032}
0x62ac…62b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x004c}
0x62b6…62e0 Head {h00=0x0026, h01=0x0050, text=»OUL005 LD A4,CWTEQ,A1 OUTPUT QUEUE«, t00=0x003f, t01=0x0056}
0x62e0…62f6 Head {h00=0x0012, h01=0x0050, text=» RF(E) OUL020 «, t00=0x003f, t01=0x0080}
0x62f6…630e Head {h00=0x0014, h01=0x0050, text=»OUL010 CWR A6,A4«, t00=0x003f, t01=0x0096}
0x630e…6340 Head {h00=0x002e, h01=0x0050, text=» RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE«, t00=0x003f, t01=0x00ae}
0x6340…6358 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTOTQ,A4«, t00=0x003f, t01=0x00e0}
0x6358…6382 Head {h00=0x0026, h01=0x0050, text=» RF(E) OUL030 END OF THREAD FOUND «, t00=0x003f, t01=0x00f8}
0x6382…63a6 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A3 FOLLOW THE THREAD«, t00=0x003f, t01=0x0122}
0x63a6…63b8 Head {h00=0x000e, h01=0x0050, text=» RB OUL010«, t00=0x003f, t01=0x0146}
0x63b8…63e0 Head {h00=0x0024, h01=0x0050, text=»OUL020 ST A6,CWTEQ,A1 QUEUE DWT «, t00=0x003f, t01=0x0158}
0x63e0…63f2 Head {h00=0x000e, h01=0x0050, text=» RF OUL040«, t00=0x003f, t01=0x0180}
0x63f2…641a (64, 0, 398) Head {h00=0x0024, h01=0x0050, text=»OUL030 ST A6,DWTOTQ,A4 QUEUE DWT«, t00=0x0040, t01=0x0004}
0x641a…6448 Head {h00=0x002a, h01=0x0050, text=»OUL040 CM DWTOTQ,A6 SET END OF THREAD «, t00=0x0040, t01=0x002c}
0x6448…645a Head {h00=0x000e, h01=0x0050, text=» RF OUL060«, t00=0x0040, t01=0x005a}
0x645a…6468 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0040, t01=0x006c}
0x6468…6472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x007a}
0x6472…648e Head {h00=0x0018, h01=0x0050, text=»* SEND CHARACTER «, t00=0x0040, t01=0x0084}
0x648e…6498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00a0}
0x6498…64c8 Head {h00=0x002c, h01=0x0050, text=»OUL050 LDR* A3,A6 GET CHANNEL PARAMETERS«, t00=0x0040, t01=0x00aa}
0x64c8…64de Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/7F00«, t00=0x0040, t01=0x00da}
0x64de…64f2 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0040, t01=0x00f0}
0x64f2…6504 Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x0040, t01=0x0104}
0x6504…6518 Head {h00=0x0010, h01=0x0050, text=»OUL055 EQU *«, t00=0x0040, t01=0x0116}
0x6518…6546 Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x0040, t01=0x012a}
0x6546…655c Head {h00=0x0012, h01=0x0050, text=» RB(NA) OUL005«, t00=0x0040, t01=0x0158}
0x655c…6584 Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 STORE LAST DWT IN CWT«, t00=0x0040, t01=0x016e}
0x6584…659a Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0041, t01=0x0008}
0x659a…65ce Head {h00=0x0030, h01=0x0050, text=» CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** «, t00=0x0041, t01=0x001e}
0x65ce…65da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0052}
0x65da…6612 Head {h00=0x0034, h01=0x0050, text=» ST A2,CWTLOW,A1 STORE LAST OUTPUT IN CWT =6(=3)«, t00=0x0041, t01=0x005e}
0x6612…664e Head {h00=0x0038, h01=0x0050, text=»OUL060 SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT«, t00=0x0041, t01=0x0096}
0x664e…6662 Head {h00=0x0010, h01=0x0050, text=»OUL070 EQU *«, t00=0x0041, t01=0x00d2}
0x6662…6678 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0041, t01=0x00e6}
0x6678…66a4 Head {h00=0x0028, h01=0x0050, text=» ABL IHRET8 RESTORE A1-A8 AND RETURN«, t00=0x0041, t01=0x00fc}
0x66a4…66b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0128}
0x66b0…66ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0134}
0x66ba…66d0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0041, t01=0x013e}
0x66d0…66fe Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0041, t01=0x0154}
0x66fe…6710 Head {h00=0x000e, h01=0x0050, text=» INH =9 «, t00=0x0041, t01=0x0182}
0x6710…6742 (66, 0, 400) Head {h00=0x002e, h01=0x0050, text=» ADKL A15,2 ...ADJUST STACK POINTER... =9 «, t00=0x0042, t01=0x0004}
0x6742…6766 Head {h00=0x0020, h01=0x0050, text=» LDR* P,A15 ...AND RETURN =9«, t00=0x0042, t01=0x0036}
0x6766…6772 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x005a}
0x6772…677c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0066}
0x677c…678a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0070}
0x678a…6794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x007e}
0x6794…67ac Head {h00=0x0014, h01=0x0050, text=»* C H L T O N «, t00=0x0042, t01=0x0088}
0x67ac…67b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00a0}
0x67b6…67f8 Head {h00=0x003e, h01=0x0050, text=»* SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY«, t00=0x0042, t01=0x00aa}
0x67f8…683c Head {h00=0x0040, h01=0x0050, text=»* CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' «, t00=0x0042, t01=0x00ec}
0x683c…6846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0130}
0x6846…685a Head {h00=0x0010, h01=0x0050, text=»CHLTON EQU *«, t00=0x0042, t01=0x013a}
0x685a…6864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x014e}
0x6864…687a Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0042, t01=0x0158}
0x687a…6884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x016e}
0x6884…6898 Head {h00=0x0010, h01=0x0050, text=» LD A1,CHTAB«, t00=0x0042, t01=0x0178}
0x6898…68be Head {h00=0x0022, h01=0x0050, text=»CON010 SUK A1,2 ALL TREATED ? «, t00=0x0042, t01=0x018c}
0x68be…68e2 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) CON020 NO TAKE NEXT «, t00=0x0043, t01=0x0022}
0x68e2…6904 Head {h00=0x001e, h01=0x0050, text=» ABL RTNA15 RETURN AND ENB«, t00=0x0043, t01=0x0046}
0x6904…6932 Head {h00=0x002a, h01=0x0050, text=»CON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS«, t00=0x0043, t01=0x0068}
0x6932…6948 Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0043, t01=0x0096}
0x6948…6970 Head {h00=0x0024, h01=0x0050, text=» EX CWTCIS,A5 EXECUTE CIO-START «, t00=0x0043, t01=0x00ac}
0x6970…6990 Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A5 GET LAST DWT«, t00=0x0043, t01=0x00d4}
0x6990…69a6 Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0043, t01=0x00f4}
0x69a6…69c8 Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0043, t01=0x010a}
0x69c8…69da Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0043, t01=0x012c}
0x69da…6a00 Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0043, t01=0x013e}
0x6a00…6a12 Head {h00=0x000e, h01=0x0050, text=» RB CON010«, t00=0x0043, t01=0x0164}
0x6a12…6a1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0176}
0x6a1c…6a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0180}
0x6a26…6a32 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x018a}
0x6a32…6a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0008}
0x6a3c…6a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0012}
0x6a46…6a5c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0044, t01=0x001c}
0x6a5c…6a66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0032}
0x6a66…6a86 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA1 CIO-START«, t00=0x0044, t01=0x003c}
0x6a86…6aa8 Head {h00=0x001e, h01=0x0050, text=» LD A6,CWTLT1 GET LAST DWT«, t00=0x0044, t01=0x005c}
0x6aa8…6abe Head {h00=0x0012, h01=0x0050, text=» RF(Z) CON010 «, t00=0x0044, t01=0x007e}
0x6abe…6ae2 Head {h00=0x0020, h01=0x0050, text=» CM CWTLT1 RESET LAST OUTPUT«, t00=0x0044, t01=0x0094}
0x6ae2…6af4 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0044, t01=0x00b8}
0x6af4…6b1a Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0044, t01=0x00ca}
0x6b1a…6b42 Head {h00=0x0024, h01=0x0050, text=»CON010 ABL RTNA15 RETURN AND ENB«, t00=0x0044, t01=0x00f0}
0x6b42…6b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0118}
0x6b4c…6b58 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0122}
0x6b58…6b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x012e}
0x6b62…6b70 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x0138}
0x6b70…6b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0146}
0x6b7a…6b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0150}
0x6b84…6b98 Head {h00=0x0010, h01=0x0050, text=»* L O G G «, t00=0x0044, t01=0x015a}
0x6b98…6ba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x016e}
0x6ba2…6bde Head {h00=0x0038, h01=0x0050, text=»* IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT AND «, t00=0x0044, t01=0x0178}
0x6bde…6c06 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT CHARACTER ARE LOGGED «, t00=0x0045, t01=0x0024}
0x6c06…6c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x004c}
0x6c10…6c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0056}
0x6c1a…6c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0060}
0x6c24…6c3a Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0045, t01=0x006a}
0x6c3a…6c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0080}
0x6c44…6c5c Head {h00=0x0014, h01=0x0050, text=»LOGG STR A1,A15 «, t00=0x0045, t01=0x008a}
0x6c5c…6c70 Head {h00=0x0010, h01=0x0050, text=» LD A1,POINT«, t00=0x0045, t01=0x00a2}
0x6c70…6c82 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0045, t01=0x00b6}
0x6c82…6cac Head {h00=0x0026, h01=0x0050, text=» CWK A1,BUFE BUFE IS MAX LOGG AREA«, t00=0x0045, t01=0x00c8}
0x6cac…6cbe Head {h00=0x000e, h01=0x0050, text=» RF(NE) L1«, t00=0x0045, t01=0x00f2}
0x6cbe…6cea Head {h00=0x0028, h01=0x0050, text=» LDKL A1,BUF SET FIRST LOGG ADDRESS «, t00=0x0045, t01=0x0104}
0x6cea…6d00 Head {h00=0x0012, h01=0x0050, text=»L1 ST A1,POINT«, t00=0x0045, t01=0x0130}
0x6d00…6d32 Head {h00=0x002e, h01=0x0050, text=» STR A2,A1 LOGG OF INR OR OTR INSTRUCTION «, t00=0x0045, t01=0x0146}
0x6d32…6d46 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0045, t01=0x0178}
0x6d46…6d5a Head {h00=0x0010, h01=0x0050, text=» ADKL A15,2 «, t00=0x0045, t01=0x018c}
0x6d5a…6d74 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0046, t01=0x0010}
0x6d74…6d7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x002a}
0x6d7e…6d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0034}
0x6d88…6dac Head {h00=0x0020, h01=0x0050, text=»POINT DATA BUF LOGG POINTER «, t00=0x0046, t01=0x003e}
0x6dac…6db6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0062}
0x6db6…6dd2 Head {h00=0x0018, h01=0x0050, text=»BUF RES 63 LOGG AREA«, t00=0x0046, t01=0x006c}
0x6dd2…6de4 Head {h00=0x000e, h01=0x0050, text=»BUFE EQU *«, t00=0x0046, t01=0x0088}
0x6de4…6dee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x009a}
0x6dee…6dfa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x00a4}
0x6dfa…6e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00b0}
0x6e04…6e10 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0046, t01=0x00ba}
0x6e10…6e14 Head {h00=0x4004, h01=0x0000}
0x6e14…6e18 00 46 00 c6 ┆ F ┆
0x6e18…6e20 (71, 1, 8) 20 04 00 00 00 47 00 04 ┆ G ┆
0x6e20…6e70 (72, 0, 400) 53 45 43 54 4f 52 53 20 49 4e 20 49 4f 20 00 2f 01 7c 00 06 00 50 2a 20 00 30 00 16 00 12 00 50 5c 45 4a 45 43 54 5c 5c 44 52 44 55 30 31 00 30 00 20 00 06 00 50 2a 20 00 30 00 36 00 06 00 50 2a 20 00 30 00 40 00 0e 00 50 5c 49 46 54 5c 52 ┆SECTORS IN IO / | P* 0 P EJECT DRDU01 0 P* 0 6 P* 0 @ P IFT R┆
0x6e70…6ec0 41 57 3d 31 00 30 00 4a 00 1e 00 50 5c 4c 44 5c 41 37 2c 44 57 54 4f 52 2c 41 36 5c 47 45 54 20 4f 52 44 45 52 20 00 30 00 5c 00 10 00 50 5c 41 4e 4b 5c 41 37 2c 2f 46 46 20 00 30 00 7e 00 10 00 50 5c 53 55 4b 5c 41 37 2c 2f 31 35 20 00 30 ┆AW=1 0 J P LD A7,DWTOR,A6 GET ORDER 0 P ANK A7,/FF 0 ~ P SUK A7,/15 0┆
0x6ec0…6f10 00 92 00 06 00 50 2a 20 00 30 00 a6 00 12 00 50 5c 49 46 54 5c 56 45 52 53 41 33 3d 31 20 00 30 00 b0 00 26 00 50 5c 52 42 28 4e 5a 29 5c 52 57 3a 37 30 30 5c 4e 4f 54 20 50 48 59 53 49 43 41 4c 20 57 52 49 54 45 20 00 30 00 c6 00 08 00 50 ┆ P* 0 P IFT VERSA3=1 0 & P RB(NZ) RW:700 NOT PHYSICAL WRITE 0 P┆
0x6f10…6f60 5c 58 49 46 00 30 00 f0 00 06 00 50 2a 20 00 30 00 fc 00 12 00 50 5c 49 46 54 5c 56 45 52 53 41 33 3d 30 20 00 30 01 06 00 12 00 50 5c 49 46 54 5c 56 45 52 53 41 32 3d 31 20 00 30 01 1c 00 0e 00 50 5c 49 46 54 5c 52 41 57 3d 31 00 30 01 32 ┆ XIF 0 P* 0 P IFT VERSA3=0 0 P IFT VERSA2=1 0 P IFT RAW=1 0 2┆
0x6f60…6fb0 00 12 00 50 5c 52 46 28 4e 5a 29 5c 52 57 3a 39 30 35 00 30 01 44 00 08 00 50 5c 58 49 46 00 30 01 5a 00 06 00 50 2a 20 00 30 01 66 00 12 00 50 5c 49 46 54 5c 56 45 52 53 41 32 3d 31 20 00 30 01 70 00 0e 00 50 5c 49 46 54 5c 52 41 57 3d 31 ┆ P RF(NZ) RW:905 0 D P XIF 0 Z P* 0 f P IFT VERSA2=1 0 p P IFT RAW=1┆
0x6fb0…7000 (73, 0, 398) 00 30 01 86 00 2e 00 50 5c 43 4d 5c 45 43 42 45 4c 2c 41 38 5c 50 52 45 50 41 52 45 20 46 4f 52 20 52 45 41 44 20 41 46 54 45 52 20 57 52 49 54 45 20 00 31 00 08 00 14 00 50 5c 4c 44 5c 41 37 2c 44 57 54 53 45 49 2c 41 36 00 31 00 3a 00 10 ┆ 0 . P CM ECBEL,A8 PREPARE FOR READ AFTER WRITE 1 P LD A7,DWTSEI,A6 1 : ┆
0x7000…7050 00 50 5c 43 46 5c 41 35 2c 44 49 56 33 31 00 31 00 52 00 06 00 50 2a 20 00 31 00 66 00 12 00 50 5c 45 4a 45 43 54 5c 5c 44 52 44 55 30 31 00 31 00 70 00 06 00 50 2a 20 00 31 00 86 00 06 00 50 2a 20 00 31 00 90 00 10 00 50 52 57 3a 39 30 30 ┆ P CF A5,DIV31 1 R P* 1 f P EJECT DRDU01 1 p P* 1 P* 1 PRW:900┆
0x7050…70a0 5c 45 51 55 5c 2a 00 31 00 9a 00 12 00 50 5c 43 46 5c 41 35 2c 49 4f 52 4f 55 54 20 00 31 00 ae 00 20 00 50 5c 44 41 54 41 5c 2f 45 30 38 30 5c 52 45 41 44 20 41 46 54 45 52 20 57 52 49 54 45 00 31 00 c4 00 0e 00 50 5c 53 55 4b 5c 41 37 2c ┆ EQU * 1 P CF A5,IOROUT 1 P DATA /E080 READ AFTER WRITE 1 P SUK A7,┆
0x70a0…70f0 31 20 00 31 00 e8 00 12 00 50 5c 52 42 28 4e 5a 29 5c 52 57 3a 39 30 30 00 31 00 fa 00 08 00 50 5c 58 49 46 00 31 01 10 00 06 00 50 2a 20 00 31 01 1c 00 18 00 50 5c 49 46 54 5c 56 45 52 53 41 32 2b 56 45 52 53 41 33 3d 32 00 31 01 26 00 0e ┆1 1 P RB(NZ) RW:900 1 P XIF 1 P* 1 P IFT VERSA2+VERSA3=2 1 & ┆
0x70f0…713e 00 50 5c 52 42 5c 52 57 3a 37 30 30 00 31 01 42 00 08 00 50 5c 58 49 46 00 31 01 54 00 06 00 50 2a 20 00 31 01 60 00 12 00 50 5c 49 46 54 5c 56 45 52 53 41 33 3d 30 20 00 31 01 6a 00 12 00 50 5c 49 46 54 5c 56 45 52 53 41 32 3d 31 20 ┆ P RB RW:700 1 B P XIF 1 T P* 1 ` P IFT VERSA3=0 1 j P IFT VERSA2=1 ┆
0x713e…718e (74, 0, 400) 00 31 01 80 00 10 00 50 52 57 3a 39 30 35 5c 45 51 55 5c 2a 00 32 00 08 00 20 00 50 5c 4c 44 4b 5c 41 31 2c 30 5c 52 45 53 45 54 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 32 00 1c 00 10 00 50 5c 41 42 4c 5c 45 4e 44 3a 32 30 20 00 32 00 40 ┆ 1 PRW:905 EQU * 2 P LDK A1,0 RESET RETURN CODE 2 P ABL END:20 2 @┆
0x718e…71de 00 08 00 50 5c 58 49 46 00 32 00 54 00 06 00 50 2a 20 00 32 00 60 00 12 00 50 5c 45 4a 45 43 54 5c 5c 44 52 44 55 30 31 00 32 00 6a 00 06 00 50 2a 20 00 32 00 80 00 34 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ P XIF 2 T P* 2 ` P EJECT DRDU01 2 j P* 2 4 P**********************┆
0x71de…722e 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 32 00 8a 00 34 00 50 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 ┆************************* 2 4 P* ┆
0x722e…727e 2a 20 00 32 00 c2 00 34 00 50 2a 20 20 20 49 4f 52 4f 55 54 20 50 45 52 46 4f 52 4d 20 52 45 41 44 20 4f 52 20 57 52 49 54 45 20 41 4e 44 20 53 45 45 4b 20 20 20 20 20 2a 20 00 32 00 fa 00 34 00 50 2a 20 20 20 49 46 20 4e 45 43 45 53 53 41 ┆* 2 4 P* IOROUT PERFORM READ OR WRITE AND SEEK * 2 4 P* IF NECESSA┆
0x727e…72ce 52 59 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 32 01 32 00 34 00 50 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 ┆RY * 2 2 4 P* ┆
0x72ce…731e (75, 0, 400) 20 20 20 20 20 20 20 20 2a 20 00 32 01 6a 00 34 00 50 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 33 00 12 00 06 00 50 2a 20 00 33 00 4a ┆ * 2 j 4 P*********************************************** 3 P* 3 J┆
0x731e…736e 00 26 00 50 2a 20 20 20 49 4e 50 55 54 20 3a 20 4f 4e 45 20 44 41 54 41 20 57 4f 52 44 20 41 46 54 45 52 20 43 46 00 33 00 54 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 42 49 54 20 30 20 3a 49 4e 44 49 43 41 54 45 53 20 44 49 52 45 43 54 ┆ & P* INPUT : ONE DATA WORD AFTER CF 3 T * P* BIT 0 :INDICATES DIRECT┆
0x736e…73be 20 49 4f 20 00 33 00 7e 00 30 00 50 2a 20 20 20 20 20 20 20 20 20 20 42 49 54 20 31 20 3a 49 4e 44 49 43 41 54 45 53 20 52 45 41 44 20 41 46 54 45 52 20 57 52 49 54 45 00 33 00 ac 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 42 49 54 20 32 ┆ IO 3 ~ 0 P* BIT 1 :INDICATES READ AFTER WRITE 3 * P* BIT 2┆
0x73be…740e 20 3a 49 4e 44 49 43 41 54 45 53 20 46 4f 52 4d 41 54 20 41 32 20 00 33 00 e0 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 42 49 54 20 38 2d 31 31 3a 4e 55 4d 42 45 52 20 4f 46 20 57 4f 52 44 53 2f 31 36 00 33 01 0e 00 32 00 50 2a 20 20 20 ┆ :INDICATES FORMAT A2 3 * P* BIT 8-11:NUMBER OF WORDS/16 3 2 P* ┆
0x740e…745e 20 20 20 20 20 20 20 42 49 54 31 32 2d 31 35 3a 53 54 41 52 54 20 49 4e 20 44 52 49 56 45 52 20 42 55 46 46 45 52 2f 33 32 20 00 33 01 3c 00 3c 00 50 2a 20 20 20 41 46 54 45 52 20 53 45 45 4b 20 54 48 45 20 43 59 4c 49 4e 44 45 52 20 49 44 ┆ BIT12-15:START IN DRIVER BUFFER/32 3 < < P* AFTER SEEK THE CYLINDER ID┆
0x745e…74ae (76, 0, 398) 20 57 49 4c 4c 20 42 45 20 43 48 45 43 4b 45 44 20 42 59 20 41 20 52 45 41 44 00 33 01 72 00 40 00 50 2a 20 20 20 44 57 54 42 53 45 20 43 4f 4e 54 41 49 4e 53 20 54 48 45 20 50 52 45 53 45 4e 54 20 53 45 43 54 4f 52 20 49 4e 20 54 48 45 20 ┆ WILL BE CHECKED BY A READ 3 r @ P* DWTBSE CONTAINS THE PRESENT SECTOR IN THE ┆
0x74ae…74fe 44 52 49 56 45 52 20 42 55 46 46 45 52 20 00 34 00 22 00 26 00 50 2a 20 20 20 44 57 54 52 54 59 20 49 4e 44 49 43 41 54 45 53 20 52 45 54 52 49 45 53 20 44 4f 4e 45 20 00 34 00 66 00 48 00 50 2a 20 20 20 44 57 54 53 57 44 20 53 41 56 45 44 ┆DRIVER BUFFER 4 " & P* DWTRTY INDICATES RETRIES DONE 4 f H P* DWTSWD SAVED┆
0x74fe…754e 20 57 4f 52 44 20 46 52 4f 4d 20 55 53 45 52 20 42 55 46 46 45 52 20 57 48 45 4e 20 49 4f 20 4e 4f 54 20 56 49 41 20 44 52 49 56 45 52 20 42 55 46 46 45 52 00 34 00 90 00 06 00 50 2a 20 00 34 00 dc 00 10 00 50 49 4f 52 4f 55 54 5c 45 51 55 ┆ WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER 4 P* 4 PIOROUT EQU┆
0x754e…759e 5c 2a 00 34 00 e6 00 2a 00 50 5c 4c 44 52 2a 5c 41 33 2c 41 36 5c 47 45 54 20 50 48 59 53 49 43 41 4c 20 53 45 43 54 4f 52 20 4e 55 4d 42 45 52 00 34 00 fa 00 22 00 50 5c 53 52 4c 5c 41 33 2c 35 5c 47 45 54 20 43 59 4c 49 4e 44 45 52 20 4e ┆ * 4 * P LDR* A3,A6 GET PHYSICAL SECTOR NUMBER 4 " P SRL A3,5 GET CYLINDER N┆
0x759e…75ec 55 4d 42 45 52 20 00 34 01 28 00 06 00 50 2a 20 00 34 01 4e 00 18 00 50 5c 49 46 54 5c 56 45 52 53 41 32 2b 56 45 52 53 41 33 3d 32 00 34 01 58 00 1e 00 50 5c 4c 44 2a 5c 41 34 2c 34 2c 41 35 5c 47 45 54 20 44 41 54 41 20 57 4f 52 44 ┆UMBER 4 ( P* 4 N P IFT VERSA2+VERSA3=2 4 X P LD* A4,4,A5 GET DATA WORD┆