|
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: 30182 (0x75e6)
Notes: pts_type(SC)
Names: »DRLT01.SC«
└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
└─⟦this⟧ »M:DEMO/DRLT01.SC«
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
└─⟦this⟧ »M:DENJ/DRLT01.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »M:DENJ/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 0 * * 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 1 * * 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 0 * * 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 0 * * * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 0 * 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…10f0 Head {h00=0x0010, h01=0x0050, text=»LOGING EQU 0«, t00=0x000a, t01=0x0142}
0x10f0…10fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0156}
0x10fa…1132 Head {h00=0x0034, h01=0x0050, text=»* THIS DRIVER HANDLES ONE OR UP TO FOUR LOCAL«, t00=0x000a, t01=0x0160}
0x1132…1164 Head {h00=0x002e, h01=0x0050, text=»* CHANNELS BY SETTING X:B TO 1,2,3 OR 4«, t00=0x000b, t01=0x0008}
0x1164…116e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003a}
0x116e…1180 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000b, t01=0x0044}
0x1180…1194 Head {h00=0x0010, h01=0x0050, text=»LOCHAN EQU 1«, t00=0x000b, t01=0x0056}
0x1194…119e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x006a}
0x119e…11da Head {h00=0x0038, h01=0x0050, text=»* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND «, t00=0x000b, t01=0x0074}
0x11da…1212 Head {h00=0x0034, h01=0x0050, text=»* UNDEFINED CONTROL CHARACTERS ARE UPDATED IN«, t00=0x000b, t01=0x00b0}
0x1212…124e Head {h00=0x0038, h01=0x0050, text=»* THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM «, t00=0x000b, t01=0x00e8}
0x124e…1276 Head {h00=0x0024, h01=0x0050, text=»* DRIVER BY SETTING X:C = 0. «, t00=0x000b, t01=0x0124}
0x1276…1280 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014c}
0x1280…1292 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x000b, t01=0x0156}
0x1292…12a6 Head {h00=0x0010, h01=0x0050, text=»ACKMUL EQU 0«, t00=0x000b, t01=0x0168}
0x12a6…12b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017c}
0x12b0…12ec Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:D = 1 A SOFTWARE TIME OUT HANDLING«, t00=0x000b, t01=0x0186}
0x12ec…132c Head {h00=0x003c, h01=0x0050, text=»* MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED«, t00=0x000c, t01=0x0032}
0x132c…1348 Head {h00=0x0018, h01=0x0050, text=»* IN THE DRIVER. «, t00=0x000c, t01=0x0072}
0x1348…1388 Head {h00=0x003c, h01=0x0050, text=»* AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE «, t00=0x000c, t01=0x008e}
0x1388…13b6 Head {h00=0x002a, h01=0x0050, text=»* TIME OUT OCCURS IS ALSO INCLUDED.«, t00=0x000c, t01=0x00ce}
0x13b6…13c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fc}
0x13c0…13d2 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x000c, t01=0x0106}
0x13d2…13e6 Head {h00=0x0010, h01=0x0050, text=»SOFTIM EQU 0«, t00=0x000c, t01=0x0118}
0x13e6…13f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x012c}
0x13f0…13fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0136}
0x13fa…1404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0140}
0x1404…140e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x014a}
0x140e…1448 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000c, t01=0x0154}
0x1448…147a Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000c, t01=0x018e}
0x147a…1484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0030}
0x1484…1498 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000d, t01=0x003a}
0x1498…14a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x004e}
0x14a2…14b0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0058}
0x14b0…14b8 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0066}
0x14b8…14c0 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x006e}
0x14c0…14d4 Head {h00=0x0010, h01=0x0050, text=»RECHAN EQU 0«, t00=0x000d, t01=0x0076}
0x14d4…14e8 Head {h00=0x0010, h01=0x0050, text=»REMFC EQU 0 «, t00=0x000d, t01=0x008a}
0x14e8…14fc Head {h00=0x0010, h01=0x0050, text=»CWTRT1 EQU *«, t00=0x000d, t01=0x009e}
0x14fc…1510 Head {h00=0x0010, h01=0x0050, text=»CWTRT2 EQU *«, t00=0x000d, t01=0x00b2}
0x1510…1524 Head {h00=0x0010, h01=0x0050, text=»CWTRT3 EQU *«, t00=0x000d, t01=0x00c6}
0x1524…1538 Head {h00=0x0010, h01=0x0050, text=»CWTRT4 EQU *«, t00=0x000d, t01=0x00da}
0x1538…154c Head {h00=0x0010, h01=0x0050, text=»CWTRT5 EQU *«, t00=0x000d, t01=0x00ee}
0x154c…1560 Head {h00=0x0010, h01=0x0050, text=»CWTRT6 EQU *«, t00=0x000d, t01=0x0102}
0x1560…1574 Head {h00=0x0010, h01=0x0050, text=»CWTRT7 EQU *«, t00=0x000d, t01=0x0116}
0x1574…1588 Head {h00=0x0010, h01=0x0050, text=»CWTRT8 EQU *«, t00=0x000d, t01=0x012a}
0x1588…159c Head {h00=0x0010, h01=0x0050, text=»DWREMU EQU *«, t00=0x000d, t01=0x013e}
0x159c…15aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0152}
0x15aa…15b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0160}
0x15b4…15be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016a}
0x15be…15fc Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x000d, t01=0x0174}
0x15fc…163a Head {h00=0x003a, h01=0x0050, text=»* C W T L T 1 * «, t00=0x000e, t01=0x0022}
0x163a…1678 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x000e, t01=0x0060}
0x1678…1682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009e}
0x1682…16ba Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1«, t00=0x000e, t01=0x00a8}
0x16ba…16c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e0}
0x16c4…16ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ea}
0x16ce…16f0 Head {h00=0x001e, h01=0x0050, text=»DWA1 EQU /03 DEVICEADDRESS«, t00=0x000e, t01=0x00f4}
0x16f0…16fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0116}
0x16fa…171a Head {h00=0x001c, h01=0x0050, text=»CWTLT1 EQU * TABLE ENTRY«, t00=0x000e, t01=0x0120}
0x171a…174e Head {h00=0x0030, h01=0x0050, text=»CWTLDW EQU *-CWTLT1 LAST OUTPUT DWT-ADDRESS «, t00=0x000e, t01=0x0140}
0x174e…175e Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x000e, t01=0x0174}
0x175e…177a Head {h00=0x0018, h01=0x0050, text=»CWTLOW EQU *-CWTLT1 «, t00=0x000e, t01=0x0184}
0x177a…179a Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x000f, t01=0x0010}
0x179a…17c8 Head {h00=0x002a, h01=0x0050, text=»CWTITA EQU *-CWTLT1 ADDRESS TO INTLT1 «, t00=0x000f, t01=0x0030}
0x17c8…17dc Head {h00=0x0010, h01=0x0050, text=» DATA INTLT1«, t00=0x000f, t01=0x005e}
0x17dc…17fc Head {h00=0x001c, h01=0x0050, text=»CWTINR EQU *-CWTLT1 INR «, t00=0x000f, t01=0x0072}
0x17fc…1812 Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x000f, t01=0x0092}
0x1812…1832 Head {h00=0x001c, h01=0x0050, text=»CWTOTR EQU *-CWTLT1 OTR «, t00=0x000f, t01=0x00a8}
0x1832…1848 Head {h00=0x0012, h01=0x0050, text=» OTR A2,0,DWA1«, t00=0x000f, t01=0x00c8}
0x1848…186e Head {h00=0x0022, h01=0x0050, text=»CWTCIS EQU *-CWTLT1 CIO-START «, t00=0x000f, t01=0x00de}
0x186e…1884 Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DWA1«, t00=0x000f, t01=0x0104}
0x1884…18a0 Head {h00=0x0018, h01=0x0050, text=»CWTRTC EQU *-CWTLT1 «, t00=0x000f, t01=0x011a}
0x18a0…18c6 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x000f, t01=0x0136}
0x18c6…18ee Head {h00=0x0024, h01=0x0050, text=»CWTEQ EQU *-CWTLT1 END OF QUEUE «, t00=0x000f, t01=0x015c}
0x18ee…18fe Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x000f, t01=0x0184}
0x18fe…191a (16, 0, 400) Head {h00=0x0018, h01=0x0050, text=»CWTADD EQU *-CWTLT1 «, t00=0x0010, t01=0x0004}
0x191a…1924 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0020}
0x1924…193a Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0010, t01=0x002a}
0x193a…1944 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0040}
0x1944…1964 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0010, t01=0x004a}
0x1964…198c Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0010, t01=0x006a}
0x198c…19bc Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR «, t00=0x0010, t01=0x0092}
0x19bc…19d8 Head {h00=0x0018, h01=0x0050, text=»ACKTIM EQU *-CWTLT1 «, t00=0x0010, t01=0x00c2}
0x19d8…1a04 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0010, t01=0x00de}
0x1a04…1a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x010a}
0x1a0e…1a1a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0114}
0x1a1a…1a28 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0120}
0x1a28…1a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012e}
0x1a32…1a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0138}
0x1a3c…1a7a Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0010, t01=0x0142}
0x1a7a…1ab8 Head {h00=0x003a, h01=0x0050, text=»* C W T L T 2 * «, t00=0x0010, t01=0x0180}
0x1ab8…1af6 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0011, t01=0x002e}
0x1af6…1b00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006c}
0x1b00…1b38 Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2«, t00=0x0011, t01=0x0076}
0x1b38…1b42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ae}
0x1b42…1b56 Head {h00=0x0010, h01=0x0050, text=»CWTLT2 EQU *«, t00=0x0011, t01=0x00b8}
0x1b56…1b60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00cc}
0x1b60…1b76 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0011, t01=0x00d6}
0x1b76…1b9a Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0011, t01=0x00ec}
0x1b9a…1ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0110}
0x1ba4…1bcc Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0011, t01=0x011a}
0x1bcc…1bec Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0011, t01=0x0142}
0x1bec…1c10 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0011, t01=0x0162}
0x1c10…1c2a Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0011, t01=0x0186}
0x1c2a…1c44 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0012, t01=0x0010}
0x1c44…1c64 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0012, t01=0x002a}
0x1c64…1c8a Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0012, t01=0x004a}
0x1c8a…1ca6 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0012, t01=0x0070}
0x1ca6…1cb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x008c}
0x1cb0…1cc6 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0012, t01=0x0096}
0x1cc6…1cd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ac}
0x1cd0…1cf0 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0012, t01=0x00b6}
0x1cf0…1d18 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0012, t01=0x00d6}
0x1d18…1d48 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0012, t01=0x00fe}
0x1d48…1d74 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0012, t01=0x012e}
0x1d74…1d7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x015a}
0x1d7e…1d8a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0164}
0x1d8a…1d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0170}
0x1d94…1daa Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0012, t01=0x017a}
0x1daa…1db4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0190}
0x1db4…1dc2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x000a}
0x1dc2…1dce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0018}
0x1dce…1de4 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0013, t01=0x0024}
0x1de4…1e08 Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0013, t01=0x003a}
0x1e08…1e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x005e}
0x1e12…1e3a Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0013, t01=0x0068}
0x1e3a…1e5a Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0013, t01=0x0090}
0x1e5a…1e7e Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0013, t01=0x00b0}
0x1e7e…1e98 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0013, t01=0x00d4}
0x1e98…1eb2 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0013, t01=0x00ee}
0x1eb2…1ed2 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0013, t01=0x0108}
0x1ed2…1ef8 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0013, t01=0x0128}
0x1ef8…1f14 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0013, t01=0x014e}
0x1f14…1f1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x016a}
0x1f1e…1f34 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0013, t01=0x0174}
0x1f34…1f3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018a}
0x1f3e…1f5e (20, 0, 400) Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0014, t01=0x0004}
0x1f5e…1f86 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0014, t01=0x0024}
0x1f86…1fb6 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0014, t01=0x004c}
0x1fb6…1fe2 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0014, t01=0x007c}
0x1fe2…1fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a8}
0x1fec…1ff8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00b2}
0x1ff8…2002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00be}
0x2002…200c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00c8}
0x200c…2018 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00d2}
0x2018…202e Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0014, t01=0x00de}
0x202e…2038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f4}
0x2038…2042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00fe}
0x2042…207c Head {h00=0x0036, h01=0x0050, text=»* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.2«, t00=0x0014, t01=0x0108}
0x207c…2086 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0142}
0x2086…20aa Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0014, t01=0x014c}
0x20aa…20b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0170}
0x20b4…20dc Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0014, t01=0x017a}
0x20dc…20fc Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0015, t01=0x0012}
0x20fc…2120 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0015, t01=0x0032}
0x2120…213a Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0015, t01=0x0056}
0x213a…2154 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0015, t01=0x0070}
0x2154…2174 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0015, t01=0x008a}
0x2174…219a Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0015, t01=0x00aa}
0x219a…21b6 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0015, t01=0x00d0}
0x21b6…21c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ec}
0x21c0…21d6 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0015, t01=0x00f6}
0x21d6…21e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010c}
0x21e0…2200 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0015, t01=0x0116}
0x2200…2228 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0015, t01=0x0136}
0x2228…2258 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0015, t01=0x015e}
0x2258…2284 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0015, t01=0x018e}
0x2284…228e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x002a}
0x228e…229a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0034}
0x229a…22a8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0040}
0x22a8…22b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x004e}
0x22b2…22bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0058}
0x22bc…22f6 Head {h00=0x0036, h01=0x0050, text=»* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3«, t00=0x0016, t01=0x0062}
0x22f6…2300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009c}
0x2300…2314 Head {h00=0x0010, h01=0x0050, text=»CWTLT3 EQU *«, t00=0x0016, t01=0x00a6}
0x2314…232a Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0016, t01=0x00ba}
0x232a…234e Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x0016, t01=0x00d0}
0x234e…2358 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f4}
0x2358…2380 Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0016, t01=0x00fe}
0x2380…23a0 Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0016, t01=0x0126}
0x23a0…23c4 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x0016, t01=0x0146}
0x23c4…23de Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x0016, t01=0x016a}
0x23de…23f8 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x0016, t01=0x0184}
0x23f8…2418 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x0017, t01=0x000e}
0x2418…243e Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0017, t01=0x002e}
0x243e…245a Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0017, t01=0x0054}
0x245a…2464 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0070}
0x2464…247a Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0017, t01=0x007a}
0x247a…2484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0090}
0x2484…24a4 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0017, t01=0x009a}
0x24a4…24cc Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0017, t01=0x00ba}
0x24cc…24fc Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0017, t01=0x00e2}
0x24fc…2528 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0017, t01=0x0112}
0x2528…2532 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x013e}
0x2532…253e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0148}
0x253e…2548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0154}
0x2548…2552 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x015e}
0x2552…2568 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0017, t01=0x0168}
0x2568…258c Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x0017, t01=0x017e}
0x258c…2596 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0012}
0x2596…25be Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0018, t01=0x001c}
0x25be…25de Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0018, t01=0x0044}
0x25de…2602 Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x0018, t01=0x0064}
0x2602…261c Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x0018, t01=0x0088}
0x261c…2636 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x0018, t01=0x00a2}
0x2636…2656 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x0018, t01=0x00bc}
0x2656…267c Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0018, t01=0x00dc}
0x267c…2698 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0018, t01=0x0102}
0x2698…26a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x011e}
0x26a2…26b8 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0018, t01=0x0128}
0x26b8…26c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x013e}
0x26c2…26e2 Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0018, t01=0x0148}
0x26e2…270a Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0018, t01=0x0168}
0x270a…273a Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0018, t01=0x0190}
0x273a…2766 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0019, t01=0x0030}
0x2766…2770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x005c}
0x2770…277c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0066}
0x277c…278a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0072}
0x278a…2794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0080}
0x2794…27cc Head {h00=0x0034, h01=0x0050, text=»* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4«, t00=0x0019, t01=0x008a}
0x27cc…27d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00c2}
0x27d6…27ea Head {h00=0x0010, h01=0x0050, text=»CWTLT4 EQU *«, t00=0x0019, t01=0x00cc}
0x27ea…27f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e0}
0x27f4…27fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ea}
0x27fe…2814 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0019, t01=0x00f4}
0x2814…2838 Head {h00=0x0020, h01=0x0050, text=»DWA4 EQU /33 DEVICE ADDRESS «, t00=0x0019, t01=0x010a}
0x2838…2842 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x012e}
0x2842…286a Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0019, t01=0x0138}
0x286a…288a Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0019, t01=0x0160}
0x288a…28ae Head {h00=0x0020, h01=0x0050, text=» DATA INTLT4 INTERRUPT TABLE«, t00=0x0019, t01=0x0180}
0x28ae…28c8 Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA4 INR«, t00=0x001a, t01=0x0014}
0x28c8…28e2 Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA4 OTR«, t00=0x001a, t01=0x002e}
0x28e2…2902 Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA4 CIO-START«, t00=0x001a, t01=0x0048}
0x2902…2928 Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x001a, t01=0x0068}
0x2928…2944 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x001a, t01=0x008e}
0x2944…294e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00aa}
0x294e…2964 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x001a, t01=0x00b4}
0x2964…296e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ca}
0x296e…298e Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x001a, t01=0x00d4}
0x298e…29b6 Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x001a, t01=0x00f4}
0x29b6…29e6 Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x001a, t01=0x011c}
0x29e6…2a12 Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x001a, t01=0x014c}
0x2a12…2a1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0178}
0x2a1c…2a28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0182}
0x2a28…2a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x018e}
0x2a32…2a40 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0008}
0x2a40…2a4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0016}
0x2a4a…2a80 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001b, t01=0x0020}
0x2a80…2ab6 Head {h00=0x0032, h01=0x0050, text=»* C H T A B *«, t00=0x001b, t01=0x0056}
0x2ab6…2aec Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001b, t01=0x008c}
0x2aec…2af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00c2}
0x2af6…2b30 Head {h00=0x0036, h01=0x0050, text=»* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK «, t00=0x001b, t01=0x00cc}
0x2b30…2b6c Head {h00=0x0038, h01=0x0050, text=»* TABLES CWT TO CHANNEL UNITS FOR LOCAL AND REMOTE«, t00=0x001b, t01=0x0106}
0x2b6c…2b82 Head {h00=0x0012, h01=0x0050, text=»* TERMINALS.«, t00=0x001b, t01=0x0142}
0x2b82…2b8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0158}
0x2b8c…2b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0162}
0x2b96…2baa Head {h00=0x0010, h01=0x0050, text=»CHTAB EQU * «, t00=0x001b, t01=0x016c}
0x2baa…2bce Head {h00=0x0020, h01=0x0050, text=» DATA CHTABE-* TABLE LENGTH «, t00=0x001b, t01=0x0180}
0x2bce…2be4 Head {h00=0x0012, h01=0x0050, text=» DATA CWTLT1 «, t00=0x001c, t01=0x0014}
0x2be4…2bf8 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT2«, t00=0x001c, t01=0x002a}
0x2bf8…2c0e Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x001c, t01=0x003e}
0x2c0e…2c22 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001c, t01=0x0054}
0x2c22…2c2e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0068}
0x2c2e…2c44 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x001c, t01=0x0074}
0x2c44…2c58 Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001c, t01=0x008a}
0x2c58…2c6c Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT4«, t00=0x001c, t01=0x009e}
0x2c6c…2c78 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00b2}
0x2c78…2c9a Head {h00=0x001e, h01=0x0050, text=»CHTABE EQU * END OF TABLE «, t00=0x001c, t01=0x00be}
0x2c9a…2ca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00e0}
0x2ca4…2cae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ea}
0x2cae…2cb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00f4}
0x2cb8…2cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00fe}
0x2cc2…2ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0108}
0x2ccc…2cda Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0112}
0x2cda…2ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0120}
0x2ce4…2cfa Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001c, t01=0x012a}
0x2cfa…2d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0140}
0x2d04…2d26 Head {h00=0x001e, h01=0x0050, text=»* C H L T 1 / C H L T 2 «, t00=0x001c, t01=0x014a}
0x2d26…2d58 Head {h00=0x002e, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER FOR CHLT«, t00=0x001c, t01=0x016c}
0x2d58…2d62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x000e}
0x2d62…2d78 Head {h00=0x0012, h01=0x0050, text=»* C H L T 1 «, t00=0x001d, t01=0x0018}
0x2d78…2d98 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT1«, t00=0x001d, t01=0x002e}
0x2d98…2da2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x004e}
0x2da2…2dae Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0058}
0x2dae…2dc4 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x001d, t01=0x0064}
0x2dc4…2dd8 Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x001d, t01=0x007a}
0x2dd8…2dec Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x001d, t01=0x008e}
0x2dec…2df8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00a2}
0x2df8…2e0e Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001d, t01=0x00ae}
0x2e0e…2e22 Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x001d, t01=0x00c4}
0x2e22…2e4a Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001d, t01=0x00d8}
0x2e4a…2e60 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001d, t01=0x0100}
0x2e60…2e8a Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001d, t01=0x0116}
0x2e8a…2e96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0140}
0x2e96…2ea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x014c}
0x2ea0…2eb6 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001d, t01=0x0156}
0x2eb6…2ecc Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001d, t01=0x016c}
0x2ecc…2ef2 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001d, t01=0x0182}
0x2ef2…2efe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0018}
0x2efe…2f08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0024}
0x2f08…2f1e Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001e, t01=0x002e}
0x2f1e…2f50 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 «, t00=0x001e, t01=0x0044}
0x2f50…2f62 Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x001e, t01=0x0076}
0x2f62…2f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0088}
0x2f6c…2f82 Head {h00=0x0012, h01=0x0050, text=»* C H L T 2 «, t00=0x001e, t01=0x0092}
0x2f82…2fa2 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT2«, t00=0x001e, t01=0x00a8}
0x2fa2…2fac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00c8}
0x2fac…2fc0 Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x001e, t01=0x00d2}
0x2fc0…2fe8 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001e, t01=0x00e6}
0x2fe8…2ffe Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001e, t01=0x010e}
0x2ffe…3028 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001e, t01=0x0124}
0x3028…3034 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x014e}
0x3034…303e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x015a}
0x303e…3054 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001e, t01=0x0164}
0x3054…306a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001e, t01=0x017a}
0x306a…3090 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001e, t01=0x0190}
0x3090…309c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0026}
0x309c…30a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0032}
0x30a6…30bc Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001f, t01=0x003c}
0x30bc…30ee Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 «, t00=0x001f, t01=0x0052}
0x30ee…30fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0084}
0x30fa…3110 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x001f, t01=0x0090}
0x3110…3144 Head {h00=0x0030, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION «, t00=0x001f, t01=0x00a6}
0x3144…314e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00da}
0x314e…315a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00e4}
0x315a…3164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00f0}
0x3164…317a Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x001f, t01=0x00fa}
0x317a…318c Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x001f, t01=0x0110}
0x318c…3196 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0122}
0x3196…31ac Head {h00=0x0012, h01=0x0050, text=»* C H L T 3 «, t00=0x001f, t01=0x012c}
0x31ac…31cc Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT3«, t00=0x001f, t01=0x0142}
0x31cc…31d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0162}
0x31d6…31ea Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x001f, t01=0x016c}
0x31ea…31fe Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x001f, t01=0x0180}
0x31fe…3226 (32, 0, 400) Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0020, t01=0x0004}
0x3226…323c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x002c}
0x323c…3266 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0020, t01=0x0042}
0x3266…3272 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x006c}
0x3272…327c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0078}
0x327c…3292 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0020, t01=0x0082}
0x3292…32a8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0020, t01=0x0098}
0x32a8…32ce Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0020, t01=0x00ae}
0x32ce…32da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00d4}
0x32da…32e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00e0}
0x32e4…32fa Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0020, t01=0x00ea}
0x32fa…332c Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0020, t01=0x0100}
0x332c…3354 Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0020, t01=0x0132}
0x3354…335e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x015a}
0x335e…336a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0164}
0x336a…3380 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0020, t01=0x0170}
0x3380…3392 Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0020, t01=0x0186}
0x3392…339c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0008}
0x339c…33a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0012}
0x33a6…33bc Head {h00=0x0012, h01=0x0050, text=»* C H L T 2 «, t00=0x0021, t01=0x001c}
0x33bc…33dc Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT3«, t00=0x0021, t01=0x0032}
0x33dc…33e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0052}
0x33e6…33fa Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0021, t01=0x005c}
0x33fa…3422 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0021, t01=0x0070}
0x3422…3438 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0021, t01=0x0098}
0x3438…3462 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0021, t01=0x00ae}
0x3462…346e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00d8}
0x346e…3478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00e4}
0x3478…348e Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0021, t01=0x00ee}
0x348e…34a4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0021, t01=0x0104}
0x34a4…34ca Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0021, t01=0x011a}
0x34ca…34d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0140}
0x34d6…34e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x014c}
0x34e0…34f6 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0021, t01=0x0156}
0x34f6…3528 Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0021, t01=0x016c}
0x3528…353a Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0022, t01=0x000e}
0x353a…3550 Head {h00=0x0012, h01=0x0050, text=»* C H L T 4 «, t00=0x0022, t01=0x0020}
0x3550…3570 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT FROM CHLT4«, t00=0x0022, t01=0x0036}
0x3570…357a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0056}
0x357a…358e Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0022, t01=0x0060}
0x358e…35b6 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0022, t01=0x0074}
0x35b6…35cc Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0022, t01=0x009c}
0x35cc…35f6 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0022, t01=0x00b2}
0x35f6…3602 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00dc}
0x3602…360c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00e8}
0x360c…3622 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0022, t01=0x00f2}
0x3622…3638 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0022, t01=0x0108}
0x3638…365e Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0022, t01=0x011e}
0x365e…366a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0144}
0x366a…3674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0150}
0x3674…368a Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0022, t01=0x015a}
0x368a…36bc Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT4 SET CWT-ADDRESS FOR CHLT4 «, t00=0x0022, t01=0x0170}
0x36bc…36e4 Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0023, t01=0x0012}
0x36e4…36f0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x003a}
0x36f0…36fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0046}
0x36fa…3710 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0023, t01=0x0050}
0x3710…371a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0066}
0x371a…3724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0070}
0x3724…373a Head {h00=0x0012, h01=0x0050, text=»* C H L T 1«, t00=0x0023, t01=0x007a}
0x373a…3744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0090}
0x3744…3766 Head {h00=0x001e, h01=0x0050, text=»* INTERRUPT FROM CHLT1 «, t00=0x0023, t01=0x009a}
0x3766…3770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00bc}
0x3770…3784 Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x0023, t01=0x00c6}
0x3784…3798 Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x0023, t01=0x00da}
0x3798…37ac Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0023, t01=0x00ee}
0x37ac…37c0 Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0023, t01=0x0102}
0x37c0…37d6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0023, t01=0x0116}
0x37d6…3800 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0023, t01=0x012c}
0x3800…380c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0156}
0x380c…3816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0162}
0x3816…382c Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0023, t01=0x016c}
0x382c…3842 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0023, t01=0x0182}
0x3842…3868 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0024, t01=0x0008}
0x3868…3874 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x002e}
0x3874…387e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x003a}
0x387e…3894 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0024, t01=0x0044}
0x3894…38bc Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0024, t01=0x005a}
0x38bc…38e4 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0024, t01=0x0082}
0x38e4…38fa Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x0024, t01=0x00aa}
0x38fa…3904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00c0}
0x3904…3910 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00ca}
0x3910…391a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d6}
0x391a…3930 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0024, t01=0x00e0}
0x3930…3962 Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG ** LOGG OF INPUT CHARACTER **«, t00=0x0024, t01=0x00f6}
0x3962…396e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0128}
0x396e…397c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0134}
0x397c…3986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0142}
0x3986…3990 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x014c}
0x3990…39be Head {h00=0x002a, h01=0x0050, text=»* DETERMINE LINE- AND DEVICE NUMBER «, t00=0x0024, t01=0x0156}
0x39be…39c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0184}
0x39c8…39ec Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0024, t01=0x018e}
0x39ec…3a10 Head {h00=0x0020, h01=0x0050, text=» LDR A3,A2 INPUT WORD IN A3 «, t00=0x0025, t01=0x0022}
0x3a10…3a22 Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x0025, t01=0x0046}
0x3a22…3a34 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0025, t01=0x0058}
0x3a34…3a5c Head {h00=0x0024, h01=0x0050, text=» ANK A3,/E 2 * LINE NUMBER IN A3«, t00=0x0025, t01=0x006a}
0x3a5c…3a6e Head {h00=0x000e, h01=0x0050, text=» SRL A4,3 «, t00=0x0025, t01=0x0092}
0x3a6e…3a98 Head {h00=0x0026, h01=0x0050, text=» ANK A4,/E 2 * DEVICE NUMBER IN A4«, t00=0x0025, t01=0x00a4}
0x3a98…3aca Head {h00=0x002e, h01=0x0050, text=» ABL(NE) CLT100 INPUT IS A DATA CHARACTER «, t00=0x0025, t01=0x00ce}
0x3aca…3ade Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0025, t01=0x0100}
0x3ade…3afa Head {h00=0x0018, h01=0x0050, text=» SUK A2,3 POWER ON ?«, t00=0x0025, t01=0x0114}
0x3afa…3b10 Head {h00=0x0012, h01=0x0050, text=» RF(E) CHPOWO «, t00=0x0025, t01=0x0130}
0x3b10…3b2a Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 NAK ? =3«, t00=0x0025, t01=0x0146}
0x3b2a…3b44 Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLT035 =3 «, t00=0x0025, t01=0x0160}
0x3b44…3b60 Head {h00=0x0018, h01=0x0050, text=»CLT015 EQU * =7(=3)«, t00=0x0025, t01=0x017a}
0x3b60…3b6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0008}
0x3b6a…3b74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0012}
0x3b74…3ba8 Head {h00=0x0030, h01=0x0050, text=»* CHECK QUEUE AND SEND IF SOMETHING THERE«, t00=0x0026, t01=0x001c}
0x3ba8…3bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0050}
0x3bb2…3bdc Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A5 LAST OUTPUT DWT IN A7 «, t00=0x0026, t01=0x005a}
0x3bdc…3bfe Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0026, t01=0x0084}
0x3bfe…3c22 Head {h00=0x0020, h01=0x0050, text=» LD A6,CWTEQ,A5 OUTPUT QUEUE«, t00=0x0026, t01=0x00a6}
0x3c22…3c38 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT020 «, t00=0x0026, t01=0x00ca}
0x3c38…3c54 Head {h00=0x0018, h01=0x0050, text=» STR A2,A15 SAVE A2 «, t00=0x0026, t01=0x00e0}
0x3c54…3c7c Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTOTQ,A6 GET QUEUE LINK «, t00=0x0026, t01=0x00fc}
0x3c7c…3ca4 Head {h00=0x0024, h01=0x0050, text=» ST A2,CWTEQ,A5 STORE IT IN CWT «, t00=0x0026, t01=0x0124}
0x3ca4…3cca Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOCH,A6 GET CHARACTER«, t00=0x0026, t01=0x014c}
0x3cca…3cf0 Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0026, t01=0x0172}
0x3cf0…3d0e Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 RELOAD A2«, t00=0x0027, t01=0x0008}
0x3d0e…3d1c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0026}
0x3d1c…3d26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0034}
0x3d26…3d30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x003e}
0x3d30…3d66 Head {h00=0x0032, h01=0x0050, text=»* CHECK CONTROL CHARACTER AND UPDATE ERROR-«, t00=0x0027, t01=0x0048}
0x3d66…3d9c Head {h00=0x0032, h01=0x0050, text=»* ACKUMULATORS IF NAK, RETRANSMISSION FAULT«, t00=0x0027, t01=0x007e}
0x3d9c…3dc8 Head {h00=0x0028, h01=0x0050, text=»* OR UNDEFINED CONTROL CHARACTER «, t00=0x0027, t01=0x00b4}
0x3dc8…3dd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00e0}
0x3dd2…3de6 Head {h00=0x0010, h01=0x0050, text=»CLT020 EQU *«, t00=0x0027, t01=0x00ea}
0x3de6…3e08 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A7 GET LAST OUTPUT«, t00=0x0027, t01=0x00fe}
0x3e08…3e1e Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT062 «, t00=0x0027, t01=0x0120}
0x3e1e…3e38 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 ACK ? =3«, t00=0x0027, t01=0x0136}
0x3e38…3e4e Head {h00=0x0012, h01=0x0050, text=» RF(Z) CLT040 «, t00=0x0027, t01=0x0150}
0x3e4e…3e6a Head {h00=0x0018, h01=0x0050, text=» ADK A2,7 TIME-OUT ?«, t00=0x0027, t01=0x0166}
0x3e6a…3e80 Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT028 «, t00=0x0027, t01=0x0182}
0x3e80…3e9c Head {h00=0x0018, h01=0x0050, text=» SUK A2,5 7 NAK ? =3«, t00=0x0028, t01=0x0008}
0x3e9c…3eb6 Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLT032 =3 «, t00=0x0028, t01=0x0024}
0x3eb6…3ec0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x003e}
0x3ec0…3ed6 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0028, t01=0x0048}
0x3ed6…3ee0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x005e}
0x3ee0…3eee Head {h00=0x000a, h01=0x0050, text=» =1«, t00=0x0028, t01=0x0068}
0x3eee…3efc Head {h00=0x000a, h01=0x0050, text=» =1«, t00=0x0028, t01=0x0076}
0x3efc…3f0e Head {h00=0x000e, h01=0x0050, text=» LDK A7,2 «, t00=0x0028, t01=0x0084}
0x3f0e…3f36 Head {h00=0x0024, h01=0x0050, text=» SUK A2,/16 RETRANSMISSION FAULT«, t00=0x0028, t01=0x0096}
0x3f36…3f4c Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT025 «, t00=0x0028, t01=0x00be}
0x3f4c…3f72 Head {h00=0x0022, h01=0x0050, text=» ADK A7,2 UNDEFINED INTERRUPT «, t00=0x0028, t01=0x00d4}
0x3f72…3f8a Head {h00=0x0014, h01=0x0050, text=»CLT025 ADR A7,A5«, t00=0x0028, t01=0x00fa}
0x3f8a…3fbe Head {h00=0x0030, h01=0x0050, text=» IM CWTADD,A7 INCREMENT ACKUMULATOR FOR THIS«, t00=0x0028, t01=0x0112}
0x3fbe…3fda Head {h00=0x0018, h01=0x0050, text=» TYPE OF INTERRUPT«, t00=0x0028, t01=0x0146}
0x3fda…3fe4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0162}
0x3fe4…3ff0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x016c}
0x3ff0…3ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0178}
0x3ffa…4008 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0182}
0x4008…4012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0190}
0x4012…401c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x000a}
0x401c…4050 Head {h00=0x0030, h01=0x0050, text=»* NAK, TIME-OUT, RETRANSMISSION FAULT OR «, t00=0x0029, t01=0x0014}
0x4050…4078 Head {h00=0x0024, h01=0x0050, text=»* UNDEFINED CONTROL CHARACTER«, t00=0x0029, t01=0x0048}
0x4078…4082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0070}
0x4082…40c0 Head {h00=0x003a, h01=0x0050, text=»* CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE«, t00=0x0029, t01=0x007a}
0x40c0…40f8 Head {h00=0x0034, h01=0x0050, text=»* ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH «, t00=0x0029, t01=0x00b8}
0x40f8…411a Head {h00=0x001e, h01=0x0050, text=»* MESSAGE NOT OPERABLE.«, t00=0x0029, t01=0x00f0}
0x411a…4124 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0112}
0x4124…4138 Head {h00=0x0010, h01=0x0050, text=»CLT028 EQU *«, t00=0x0029, t01=0x011c}
0x4138…416a Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/3000 ECHO MODE AND RECOVERY BIT «, t00=0x0029, t01=0x0130}
0x416a…41a0 Head {h00=0x0032, h01=0x0050, text=» AN A2,DWTST,A6 AT LEAST ONE OF THE BITS SET ?«, t00=0x0029, t01=0x0162}
0x41a0…41b6 Head {h00=0x0012, h01=0x0050, text=» RF(NE) CLT032«, t00=0x002a, t01=0x0008}
0x41b6…41ea Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE «, t00=0x002a, t01=0x001e}
0x41ea…421a Head {h00=0x002c, h01=0x0050, text=» XRS A2,DWTST,A6 SET BIT IN STATUS WORD «, t00=0x002a, t01=0x0052}
0x421a…424e Head {h00=0x0030, h01=0x0050, text=»CLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE «, t00=0x002a, t01=0x0082}
0x424e…4264 Head {h00=0x0012, h01=0x0050, text=» LDK A4,1 =1 «, t00=0x002a, t01=0x00b6}
0x4264…4276 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x002a, t01=0x00cc}
0x4276…4288 Head {h00=0x000e, h01=0x0050, text=» RF CPO025«, t00=0x002a, t01=0x00de}
0x4288…42ba Head {h00=0x002e, h01=0x0050, text=»CLT032 LDK A1,NOERR INDICATE NOT OPERABLE «, t00=0x002a, t01=0x00f0}
0x42ba…42e6 Head {h00=0x0028, h01=0x0050, text=» CM CWTRTC,A5 CLEAR RETRY COUNTER =1«, t00=0x002a, t01=0x0122}
0x42e6…42fa Head {h00=0x0010, h01=0x0050, text=» ABL CLT110 «, t00=0x002a, t01=0x014e}
0x42fa…4308 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0162}
0x4308…4312 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0170}
0x4312…431c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x017a}
0x431c…432e Head {h00=0x000e, h01=0x0050, text=»* N A K«, t00=0x002a, t01=0x0184}
0x432e…4338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0008}
0x4338…437e Head {h00=0x0042, h01=0x0050, text=»* ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. «, t00=0x002b, t01=0x0012}
0x437e…43c4 Head {h00=0x0042, h01=0x0050, text=»* LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER «, t00=0x002b, t01=0x0058}
0x43c4…4408 Head {h00=0x0040, h01=0x0050, text=»* UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT«, t00=0x002b, t01=0x009e}
0x4408…4438 Head {h00=0x002c, h01=0x0050, text=»* OPERABLE IS SENT TO DEVICE DRIVER. «, t00=0x002b, t01=0x00e2}
0x4438…4442 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0112}
0x4442…4456 Head {h00=0x0010, h01=0x0050, text=»CLT035 EQU *«, t00=0x002b, t01=0x011c}
0x4456…446c Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x002b, t01=0x0130}
0x446c…4476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0146}
0x4476…44a4 Head {h00=0x002a, h01=0x0050, text=» IM CWTADD,A5 UPDATE ERROR ACKUMULATOR«, t00=0x002b, t01=0x0150}
0x44a4…44b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x017e}
0x44b0…44ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x018a}
0x44ba…44f0 (44, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER«, t00=0x002c, t01=0x0004}
0x44f0…4514 Head {h00=0x0020, h01=0x0050, text=» LD A4,CWTRTC,A5 GET COUNTER«, t00=0x002c, t01=0x003a}
0x4514…4534 Head {h00=0x001c, h01=0x0050, text=» SUK A4,7 SEVEN TIMES ? «, t00=0x002c, t01=0x005e}
0x4534…4552 Head {h00=0x001a, h01=0x0050, text=» RB(E) CLT015 =7(=3) «, t00=0x002c, t01=0x007e}
0x4552…4580 Head {h00=0x002a, h01=0x0050, text=» LD A2,CWTLOW,A5 GET LAST OUTPUT WORD «, t00=0x002c, t01=0x009c}
0x4580…4592 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x002c, t01=0x00ca}
0x4592…45c0 Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x002c, t01=0x00dc}
0x45c0…45ce Head {h00=0x000a, h01=0x0050, text=» =3«, t00=0x002c, t01=0x010a}
0x45ce…45e4 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x002c, t01=0x0118}
0x45e4…4616 Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG ** LOGG OUTPUT CHARACTER **«, t00=0x002c, t01=0x012e}
0x4616…4622 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0160}
0x4622…4630 Head {h00=0x000a, h01=0x0050, text=» =3«, t00=0x002c, t01=0x016c}
0x4630…4642 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x002c, t01=0x017a}
0x4642…4650 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x018c}
0x4650…465a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x000a}
0x465a…4664 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0014}
0x4664…4684 Head {h00=0x001c, h01=0x0050, text=»* ACK DATA = 07 «, t00=0x002d, t01=0x001e}
0x4684…468e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x003e}
0x468e…46c4 Head {h00=0x0032, h01=0x0050, text=»* SIMULATE DATA REQUEST IF RETURN CODE FROM«, t00=0x002d, t01=0x0048}
0x46c4…46f6 Head {h00=0x002e, h01=0x0050, text=»* CHLT OR DEVICE WITHOUT DATA REQUEST, «, t00=0x002d, t01=0x007e}
0x46f6…4718 Head {h00=0x001e, h01=0x0050, text=»* ELSE GO TO DISPATCHER«, t00=0x002d, t01=0x00b0}
0x4718…4722 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00d2}
0x4722…4736 Head {h00=0x0010, h01=0x0050, text=»CLT040 EQU *«, t00=0x002d, t01=0x00dc}
0x4736…474c Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x002d, t01=0x00f0}
0x474c…4786 Head {h00=0x0036, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT IN STATUS WORD«, t00=0x002d, t01=0x0106}
0x4786…4798 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002d, t01=0x0140}
0x4798…47d0 Head {h00=0x0034, h01=0x0050, text=» RF(NZ) CLT110 RETURN CODE,SIMULATE DATA REQUEST«, t00=0x002d, t01=0x0152}
0x47d0…4800 Head {h00=0x002c, h01=0x0050, text=» LDR* A7,A6 DEVICE WITHOUT DATA REQUEST?«, t00=0x002d, t01=0x018a}
0x4800…4830 Head {h00=0x002c, h01=0x0050, text=» RF(N) CLT110 YES. SIMULATE DATA REQUEST«, t00=0x002e, t01=0x002a}
0x4830…483a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x005a}
0x483a…4850 Head {h00=0x0012, h01=0x0050, text=» IFF SOFTIM=1 «, t00=0x002e, t01=0x0064}
0x4850…485a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x007a}
0x485a…486e Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x002e, t01=0x0084}
0x486e…487e Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002e, t01=0x0098}
0x487e…4888 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00a8}
0x4888…4894 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x00b2}
0x4894…489e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00be}
0x489e…48a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c8}
0x48a8…48be Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x002e, t01=0x00d2}
0x48be…48c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00e8}
0x48c8…48d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00f2}
0x48d6…48e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0100}
0x48e0…48ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010a}
0x48ea…4906 Head {h00=0x0018, h01=0x0050, text=»* PRINTER TIMING «, t00=0x002e, t01=0x0114}
0x4906…4910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0130}
0x4910…491c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002e, t01=0x013a}
0x491c…492a Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x002e, t01=0x0146}
0x492a…4938 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x002e, t01=0x0154}
0x4938…4946 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x002e, t01=0x0162}
0x4946…4974 Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTTP,A6 ADDRESS TO TIMER BLOCK«, t00=0x002e, t01=0x0170}
0x4974…498a Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT060 «, t00=0x002f, t01=0x000e}
0x498a…4994 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0024}
0x4994…49ae Head {h00=0x0016, h01=0x0050, text=»* RESTART TIMER«, t00=0x002f, t01=0x002e}
0x49ae…49b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0048}
0x49b8…49de Head {h00=0x0022, h01=0x0050, text=» LDKL A3,-DRQTIM RESTART TIMER«, t00=0x002f, t01=0x0052}
0x49de…49f6 Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x002f, t01=0x0078}
0x49f6…4a06 Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002f, t01=0x0090}
0x4a06…4a10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00a0}
0x4a10…4a28 Head {h00=0x0014, h01=0x0050, text=»* START TIMER«, t00=0x002f, t01=0x00aa}
0x4a28…4a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00c2}
0x4a32…4a54 Head {h00=0x001e, h01=0x0050, text=»CLT060 LDR A1,A6 PARAMETER«, t00=0x002f, t01=0x00cc}
0x4a54…4a78 Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTTP TIMER POINTER«, t00=0x002f, t01=0x00ee}
0x4a78…4aa0 Head {h00=0x0024, h01=0x0050, text=» ADR A4,A6 ADD WITH DWT-ADDRESS «, t00=0x002f, t01=0x0112}
0x4aa0…4ac6 Head {h00=0x0022, h01=0x0050, text=» CF A15,SETIMP GET TIMER BLOCK«, t00=0x002f, t01=0x013a}
0x4ac6…4b08 Head {h00=0x003e, h01=0x0050, text=» DATA DRQTUT,DRQTIM ADDRESS TO TIME-OUT ROUTINE AND DELAY «, t00=0x002f, t01=0x0160}
0x4b08…4b1c Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x0030, t01=0x0012}
0x4b1c…4b2c Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0030, t01=0x0026}
0x4b2c…4b34 Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0036}
0x4b34…4b42 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x003e}
0x4b42…4b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x004c}
0x4b4c…4b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0056}
0x4b56…4b7a Head {h00=0x0020, h01=0x0050, text=»* RESET TIMER IF STARTED «, t00=0x0030, t01=0x0060}
0x4b7a…4b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0084}
0x4b84…4b92 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x008e}
0x4b92…4ba0 Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x009c}
0x4ba0…4bae Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x00aa}
0x4bae…4bbc Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x00b8}
0x4bbc…4bca Head {h00=0x000a, h01=0x0050, text=» =4«, t00=0x0030, t01=0x00c6}
0x4bca…4bd8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x00d4}
0x4bd8…4be2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00e2}
0x4be2…4c1c Head {h00=0x0036, h01=0x0050, text=»* TIME-OUT ROUTINE HANDLING MISSING INTERRUPTS «, t00=0x0030, t01=0x00ec}
0x4c1c…4c36 Head {h00=0x0016, h01=0x0050, text=»* FROM PRINTERS«, t00=0x0030, t01=0x0126}
0x4c36…4c40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0140}
0x4c40…4c54 Head {h00=0x0010, h01=0x0050, text=»DRQTUT EQU *«, t00=0x0030, t01=0x014a}
0x4c54…4c76 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0030, t01=0x015e}
0x4c76…4ca8 Head {h00=0x002e, h01=0x0050, text=» CM DWTTP,A6 RESET POINTER TO TIMER BLOCK «, t00=0x0030, t01=0x0180}
0x4ca8…4cc0 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x0031, t01=0x0022}
0x4cc0…4cde Head {h00=0x001a, h01=0x0050, text=» SLL A3,2 ECHO MODE ? «, t00=0x0031, t01=0x003a}
0x4cde…4cf8 Head {h00=0x0016, h01=0x0050, text=» RF(N) CLT110 YES «, t00=0x0031, t01=0x0058}
0x4cf8…4d02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0072}
0x4d02…4d18 Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0031, t01=0x007c}
0x4d18…4d2e Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0031, t01=0x0092}
0x4d2e…4d38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00a8}
0x4d38…4d5e Head {h00=0x0022, h01=0x0050, text=» LDR* A5,A6 CHANNEL PARAMETER «, t00=0x0031, t01=0x00b2}
0x4d5e…4d70 Head {h00=0x000e, h01=0x0050, text=» ANK A5,/F«, t00=0x0031, t01=0x00d8}
0x4d70…4d8c Head {h00=0x0018, h01=0x0050, text=» SLL A5,1 2 * INDEX «, t00=0x0031, t01=0x00ea}
0x4d8c…4db8 Head {h00=0x0028, h01=0x0050, text=» ADK A5,2 JUST TO AVOID TABLE LENGTH«, t00=0x0031, t01=0x0106}
0x4db8…4de0 Head {h00=0x0024, h01=0x0050, text=» LD A5,CHTAB,A5 GET CWT-ADDRESS «, t00=0x0031, t01=0x0132}
0x4de0…4e0c Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0031, t01=0x015a}
0x4e0c…4e16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0186}
0x4e16…4e22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0190}
0x4e22…4e38 Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0032, t01=0x000c}
0x4e38…4e4e Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0032, t01=0x0022}
0x4e4e…4e64 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0032, t01=0x0038}
0x4e64…4e6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x004e}
0x4e6e…4e96 Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0032, t01=0x0058}
0x4e96…4ec2 Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0032, t01=0x0080}
0x4ec2…4ecc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00ac}
0x4ecc…4ed8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x00b6}
0x4ed8…4eee Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0032, t01=0x00c2}
0x4eee…4ef8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d8}
0x4ef8…4f20 Head {h00=0x0024, h01=0x0050, text=» LD A7,DWTOR,A6 TEST ORDER ? =2 «, t00=0x0032, t01=0x00e2}
0x4f20…4f44 Head {h00=0x0020, h01=0x0050, text=» ANK A7,/FE 00 OR 01 =9(=2) «, t00=0x0032, t01=0x010a}
0x4f44…4f7a Head {h00=0x0032, h01=0x0050, text=» RB(E) CLT032 YES, GO TO DEV. INT. HANDLER =2 «, t00=0x0032, t01=0x012e}
0x4f7a…4faa Head {h00=0x002c, h01=0x0050, text=» RB CLT030 NO, EXECUTE DEV. RECOVERY =2 «, t00=0x0032, t01=0x0164}
0x4faa…4fb4 (51, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0004}
0x4fb4…4fc0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x000e}
0x4fc0…4fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x001a}
0x4fca…4fd8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0024}
0x4fd8…4fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0032}
0x4fe2…5004 Head {h00=0x001e, h01=0x0050, text=»* POWER ON DATA = 03 «, t00=0x0033, t01=0x003c}
0x5004…500e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x005e}
0x500e…5048 Head {h00=0x0036, h01=0x0050, text=»* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE«, t00=0x0033, t01=0x0068}
0x5048…5082 Head {h00=0x0036, h01=0x0050, text=»* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL«, t00=0x0033, t01=0x00a2}
0x5082…50aa Head {h00=0x0024, h01=0x0050, text=»* UNIT OR THOSE IN ECHO MODE.«, t00=0x0033, t01=0x00dc}
0x50aa…50b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0104}
0x50b4…50be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x010e}
0x50be…50e8 Head {h00=0x0026, h01=0x0050, text=»* ON EXIT TO RECOVERY ROUTINE:«, t00=0x0033, t01=0x0118}
0x50e8…50f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0142}
0x50f2…5118 Head {h00=0x0022, h01=0x0050, text=»* A5 = STACKBASE 2 IN DWT «, t00=0x0033, t01=0x014c}
0x5118…5136 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0033, t01=0x0172}
0x5136…514e Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER«, t00=0x0033, t01=0x0190}
0x514e…5158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0018}
0x5158…516c Head {h00=0x0010, h01=0x0050, text=»CHPOWO EQU *«, t00=0x0034, t01=0x0022}
0x516c…5182 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETLIN«, t00=0x0034, t01=0x0036}
0x5182…51aa Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A5 GET LAST OUTPUT DWT «, t00=0x0034, t01=0x004c}
0x51aa…51dc Head {h00=0x002e, h01=0x0050, text=» CM CWTRTC,A5 RESET RETRANSMISSION COUNTER«, t00=0x0034, t01=0x0074}
0x51dc…51ee Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0034, t01=0x00a6}
0x51ee…5210 Head {h00=0x001e, h01=0x0050, text=» LDR A3,A6 DEVICE COUNTER «, t00=0x0034, t01=0x00b8}
0x5210…5232 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A8 ADDRESS POINTER«, t00=0x0034, t01=0x00da}
0x5232…525a Head {h00=0x0024, h01=0x0050, text=» RF(Z) EXIT EXIT IF NOT DEFINED «, t00=0x0034, t01=0x00fc}
0x525a…5272 Head {h00=0x0014, h01=0x0050, text=»CPO020 ADK A1,2 «, t00=0x0034, t01=0x0124}
0x5272…5296 Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT-ADDRESS «, t00=0x0034, t01=0x013c}
0x5296…52b2 Head {h00=0x0018, h01=0x0050, text=» RF(E) CPO030 NO DWT«, t00=0x0034, t01=0x0160}
0x52b2…52c4 Head {h00=0x000e, h01=0x0050, text=» SRC A6,1 «, t00=0x0034, t01=0x017c}
0x52c4…52da Head {h00=0x0012, h01=0x0050, text=» RF(N) CPO030 «, t00=0x0034, t01=0x018e}
0x52da…52ec Head {h00=0x000e, h01=0x0050, text=» SLC A6,1 «, t00=0x0035, t01=0x0014}
0x52ec…5312 Head {h00=0x0022, h01=0x0050, text=» LCR A7,A6 LEFT BYTE OF DWTCHP«, t00=0x0035, t01=0x0026}
0x5312…5332 Head {h00=0x001c, h01=0x0050, text=» ANK A7,1 INPUT DEVICE ?«, t00=0x0035, t01=0x004c}
0x5332…534c Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO025 YES«, t00=0x0035, t01=0x006c}
0x534c…5362 Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x0035, t01=0x0086}
0x5362…538e Head {h00=0x0028, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT «, t00=0x0035, t01=0x009c}
0x538e…53a6 Head {h00=0x0014, h01=0x0050, text=» LC A7,DWTST,A6 «, t00=0x0035, t01=0x00c8}
0x53a6…53c6 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/20 ECHO MODE ? «, t00=0x0035, t01=0x00e0}
0x53c6…53e0 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO030 YES«, t00=0x0035, t01=0x0100}
0x53e0…5416 Head {h00=0x0032, h01=0x0050, text=» CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER ?«, t00=0x0035, t01=0x011a}
0x5416…5430 Head {h00=0x0016, h01=0x0050, text=» RF(E) CPO030 YES «, t00=0x0035, t01=0x0150}
0x5430…546c Head {h00=0x0038, h01=0x0050, text=»CPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESSBLOCK IN A7«, t00=0x0035, t01=0x016a}
0x546c…549e Head {h00=0x002e, h01=0x0050, text=» LD A7,RECADR,A7 ADDRESS TO RECOVERY IN A7«, t00=0x0036, t01=0x0016}
0x549e…54c0 Head {h00=0x001e, h01=0x0050, text=» RF(E) CPO030 NO RECOVERY «, t00=0x0036, t01=0x0048}
0x54c0…54e2 Head {h00=0x001e, h01=0x0050, text=» LDKL A5,DWTSB2 STACKBASE «, t00=0x0036, t01=0x006a}
0x54e2…54f4 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0036, t01=0x008c}
0x54f4…5500 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0036, t01=0x009e}
0x5500…552a Head {h00=0x0026, h01=0x0050, text=» CFR A15,A7 GO TO RECOVERY ROUTINE«, t00=0x0036, t01=0x00aa}
0x552a…5556 Head {h00=0x0028, h01=0x0050, text=»CPO030 SUK A3,2 ALL DEVICES THREATED«, t00=0x0036, t01=0x00d4}
0x5556…555e Head {h00=0x0004, h01=0x0050, t00=0x0036, t01=0x0100}
0x555e…5582 Head {h00=0x0020, h01=0x0050, text=» RB(NE) CPO020 NO TAKE NEXT «, t00=0x0036, t01=0x0108}
0x5582…5598 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0036, t01=0x012c}
0x5598…55a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0142}
0x55a6…55b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0150}
0x55b0…55ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x015a}
0x55ba…55d4 Head {h00=0x0016, h01=0x0050, text=»* DATA-REQUEST«, t00=0x0036, t01=0x0164}
0x55d4…55de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x017e}
0x55de…560a Head {h00=0x0028, h01=0x0050, text=»CLT100 CF A15,GETLIN GET DWT-ADDRESS«, t00=0x0036, t01=0x0188}
0x560a…562e Head {h00=0x0020, h01=0x0050, text=» SUR A6,A4 VALID INTERRUPT ?«, t00=0x0037, t01=0x0024}
0x562e…5642 Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0037, t01=0x0048}
0x5642…5654 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0037, t01=0x005c}
0x5654…5678 Head {h00=0x0020, h01=0x0050, text=» RB(Z) EXIT EXIT NOT DEFINED«, t00=0x0037, t01=0x006e}
0x5678…5694 Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A8 GET DWT «, t00=0x0037, t01=0x0092}
0x5694…56a8 Head {h00=0x0010, h01=0x0050, text=» RB(E) EXIT «, t00=0x0037, t01=0x00ae}
0x56a8…56be Head {h00=0x0012, h01=0x0050, text=» ANKL A6,/FFFE«, t00=0x0037, t01=0x00c2}
0x56be…56f0 Head {h00=0x002e, h01=0x0050, text=» LCR A7,A6 LEFT BYTE IN CHANNEL PARAMETER «, t00=0x0037, t01=0x00d8}
0x56f0…570e Head {h00=0x001a, h01=0x0050, text=» ANK A7,1 DATA INPUT ?«, t00=0x0037, t01=0x010a}
0x570e…5728 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CLT110 YES«, t00=0x0037, t01=0x0128}
0x5728…5752 Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A6 GET CHANNEL PARAMETER «, t00=0x0037, t01=0x0142}
0x5752…5766 Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0037, t01=0x016c}
0x5766…5794 Head {h00=0x002a, h01=0x0050, text=»CLT110 LD A7,DWTOR,A6 SET ORDER IN A7 «, t00=0x0037, t01=0x0180}
0x5794…57a8 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0038, t01=0x001e}
0x57a8…57d6 Head {h00=0x002a, h01=0x0050, text=» LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8«, t00=0x0038, t01=0x0032}
0x57d6…57ec Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0038, t01=0x0060}
0x57ec…581a Head {h00=0x002a, h01=0x0050, text=» LC A3,DWTOCH,A6 GET LAST CHARACTER =4«, t00=0x0038, t01=0x0076}
0x581a…5832 Head {h00=0x0014, h01=0x0050, text=» ANK A3,/7F =4 «, t00=0x0038, t01=0x00a4}
0x5832…5860 Head {h00=0x002a, h01=0x0050, text=» SUK A3,DUMMSP SPECIAL DUMMY=ETX ? =4 «, t00=0x0038, t01=0x00bc}
0x5860…587c Head {h00=0x0018, h01=0x0050, text=» RF(NE) CLT120 NO =4«, t00=0x0038, t01=0x00ea}
0x587c…58a4 Head {h00=0x0024, h01=0x0050, text=» LDR* A3,A6 CHANNEL PARAMETER =9«, t00=0x0038, t01=0x0106}
0x58a4…58d8 Head {h00=0x0030, h01=0x0050, text=» RF(N) CLT120 DEVICE WITHOUT DATA REQUEST =9«, t00=0x0038, t01=0x012e}
0x58d8…5902 Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTTP,A6 TIMER RUNNING ? =4«, t00=0x0038, t01=0x0162}
0x5902…591e Head {h00=0x0018, h01=0x0050, text=» RF(E) CLT120 NO =4 «, t00=0x0038, t01=0x018c}
0x591e…5930 Head {h00=0x000e, h01=0x0050, text=» INH =4 «, t00=0x0039, t01=0x0018}
0x5930…5954 Head {h00=0x0020, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER =4«, t00=0x0039, t01=0x002a}
0x5954…598a Head {h00=0x0032, h01=0x0050, text=» CM DWTTP,A6 RESET ADDRESS POINTER TO TIMER =4«, t00=0x0039, t01=0x004e}
0x598a…59a2 Head {h00=0x0014, h01=0x0050, text=»CLT120 EQU * =4«, t00=0x0039, t01=0x0084}
0x59a2…59ae Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x009c}
0x59ae…59e6 Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 «, t00=0x0039, t01=0x00a8}
0x59e6…59f2 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0039, t01=0x00e0}
0x59f2…5a20 Head {h00=0x002a, h01=0x0050, text=» ABI INTADR,A3 GO TO INTERRUPT HANDLER«, t00=0x0039, t01=0x00ec}
0x5a20…5a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x011a}
0x5a2a…5a6c Head {h00=0x003e, h01=0x0050, text=»* THE FOLLOWING REGISTER VAULES ARE VALID WHEN ENTERING «, t00=0x0039, t01=0x0124}
0x5a6c…5aa0 Head {h00=0x0030, h01=0x0050, text=»* THE DEVICE DEPENDANT INTERRUPT HANDLER:-«, t00=0x0039, t01=0x0166}
0x5aa0…5aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x000a}
0x5aaa…5ad6 Head {h00=0x0028, h01=0x0050, text=»* A1 = ERROR CODE (A1=0 NOERROR)«, t00=0x003a, t01=0x0014}
0x5ad6…5b1c Head {h00=0x0042, h01=0x0050, text=»* (A1=1 NOT OPERABLE , HARDWARE TIME-OUT) «, t00=0x003a, t01=0x0040}
0x5b1c…5b38 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x003a, t01=0x0086}
0x5b38…5b42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00a2}
0x5b42…5b58 Head {h00=0x0012, h01=0x0050, text=»* A7 = ORDER«, t00=0x003a, t01=0x00ac}
0x5b58…5b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00c2}
0x5b62…5b7e Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x003a, t01=0x00cc}
0x5b7e…5b8c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x00e8}
0x5b8c…5b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00f6}
0x5b96…5bae Head {h00=0x0014, h01=0x0050, text=»* G E T L I N «, t00=0x003a, t01=0x0100}
0x5bae…5bb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0118}
0x5bb8…5bfa Head {h00=0x003e, h01=0x0050, text=»* SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE 'INTLTX' «, t00=0x003a, t01=0x0122}
0x5bfa…5c2a Head {h00=0x002c, h01=0x0050, text=»* FOR A GIVEN LINE- AND DEVICE NUMBER «, t00=0x003a, t01=0x0164}
0x5c2a…5c34 (59, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0004}
0x5c34…5c4a Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:-«, t00=0x003b, t01=0x000e}
0x5c4a…5c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0024}
0x5c54…5c74 Head {h00=0x001c, h01=0x0050, text=»* A3 = LINE NUMBER * 2«, t00=0x003b, t01=0x002e}
0x5c74…5c96 Head {h00=0x001e, h01=0x0050, text=»* A4 = DEVICE NUMBER * 2«, t00=0x003b, t01=0x004e}
0x5c96…5ca0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0070}
0x5ca0…5cb6 Head {h00=0x0012, h01=0x0050, text=»* ON EXIT:- «, t00=0x003b, t01=0x007a}
0x5cb6…5cc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0090}
0x5cc0…5cfa Head {h00=0x0036, h01=0x0050, text=»* A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE «, t00=0x003b, t01=0x009a}
0x5cfa…5d3a Head {h00=0x003c, h01=0x0050, text=»* A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FOUND «, t00=0x003b, t01=0x00d4}
0x5d3a…5d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0114}
0x5d44…5d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x011e}
0x5d4e…5d62 Head {h00=0x0010, h01=0x0050, text=»GETLIN EQU *«, t00=0x003b, t01=0x0128}
0x5d62…5d96 Head {h00=0x0030, h01=0x0050, text=» LD* A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE«, t00=0x003b, t01=0x013c}
0x5d96…5db0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) GTL010 =5 «, t00=0x003b, t01=0x0170}
0x5db0…5dd4 Head {h00=0x0020, h01=0x0050, text=» ADR A8,A3 POSITION IN TABLE«, t00=0x003b, t01=0x018a}
0x5dd4…5e04 Head {h00=0x002c, h01=0x0050, text=» LDR* A8,A8 ADDRESS TO TERMINAL SECTION «, t00=0x003c, t01=0x001e}
0x5e04…5e30 Head {h00=0x0028, h01=0x0050, text=» RF(Z) GTL010 RETURN IF NOT DEFINED «, t00=0x003c, t01=0x004e}
0x5e30…5e50 Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A8 GET ID-WORD «, t00=0x003c, t01=0x007a}
0x5e50…5e80 Head {h00=0x002c, h01=0x0050, text=» ANK A6,/FF TWO TIMES NUMBER OF DEVICES «, t00=0x003c, t01=0x009a}
0x5e80…5eb8 Head {h00=0x0034, h01=0x0050, text=» ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION«, t00=0x003c, t01=0x00ca}
0x5eb8…5ecc Head {h00=0x0010, h01=0x0050, text=»GTL010 EQU *«, t00=0x003c, t01=0x0102}
0x5ecc…5ef8 Head {h00=0x0028, h01=0x0050, text=»RTNA15 ADKL A15,2 RETURN AND ENABLE «, t00=0x003c, t01=0x0116}
0x5ef8…5f04 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x003c, t01=0x0142}
0x5f04…5f18 Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x003c, t01=0x014e}
0x5f18…5f26 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0162}
0x5f26…5f30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0170}
0x5f30…5f48 Head {h00=0x0014, h01=0x0050, text=»* O U T L R T «, t00=0x003c, t01=0x017a}
0x5f48…5f52 (61, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0004}
0x5f52…5f90 Head {h00=0x003a, h01=0x0050, text=»* SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT.«, t00=0x003d, t01=0x000e}
0x5f90…5f9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x004c}
0x5f9a…5fda Head {h00=0x003c, h01=0x0050, text=»* CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL «, t00=0x003d, t01=0x0056}
0x5fda…6016 Head {h00=0x0038, h01=0x0050, text=»* UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A«, t00=0x003d, t01=0x0096}
0x6016…6038 Head {h00=0x001e, h01=0x0050, text=»* OUTPUT QUEUE THREAD.«, t00=0x003d, t01=0x00d2}
0x6038…6042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00f4}
0x6042…605a Head {h00=0x0014, h01=0x0050, text=»* ON ENTRY: «, t00=0x003d, t01=0x00fe}
0x605a…6064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0116}
0x6064…6096 Head {h00=0x002e, h01=0x0050, text=»* A2 = OUTPUT CHARACTER IN RIGHT BYTE «, t00=0x003d, t01=0x0120}
0x6096…60b4 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x003d, t01=0x0152}
0x60b4…60be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0170}
0x60be…60d2 Head {h00=0x0010, h01=0x0050, text=»OUTLRT EQU *«, t00=0x003d, t01=0x017a}
0x60d2…60dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x018e}
0x60dc…60f2 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x003e, t01=0x0008}
0x60f2…60fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x001e}
0x60fc…6122 Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETER «, t00=0x003e, t01=0x0028}
0x6122…6142 Head {h00=0x001c, h01=0x0050, text=» ANK A1,/F CHANNEL INDEX«, t00=0x003e, t01=0x004e}
0x6142…6154 Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x003e, t01=0x006e}
0x6154…6166 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x003e, t01=0x0080}
0x6166…6194 Head {h00=0x002a, h01=0x0050, text=» LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 «, t00=0x003e, t01=0x0092}
0x6194…619e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00c0}
0x619e…61aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x00ca}
0x61aa…61b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00d6}
0x61b4…61be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00e0}
0x61be…61d4 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x003e, t01=0x00ea}
0x61d4…61de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0100}
0x61de…61f6 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,CWTLT1 «, t00=0x003e, t01=0x010a}
0x61f6…6200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0122}
0x6200…620c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x012c}
0x620c…6216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0138}
0x6216…6236 Head {h00=0x001c, h01=0x0050, text=» INH INHIBIT INTERRUPT «, t00=0x003e, t01=0x0142}
0x6236…6258 Head {h00=0x001e, h01=0x0050, text=» LDR* A4,A1 IS UNIT FREE ?«, t00=0x003e, t01=0x0162}
0x6258…6272 Head {h00=0x0016, h01=0x0050, text=» RF(E) OUL050 YES «, t00=0x003e, t01=0x0184}
0x6272…6280 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x000e}
0x6280…628a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x001c}
0x628a…62a4 Head {h00=0x0016, h01=0x0050, text=»* QUEUE OUTPUT «, t00=0x003f, t01=0x0026}
0x62a4…62ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0040}
0x62ae…62d8 Head {h00=0x0026, h01=0x0050, text=»OUL005 LD A4,CWTEQ,A1 OUTPUT QUEUE«, t00=0x003f, t01=0x004a}
0x62d8…62ee Head {h00=0x0012, h01=0x0050, text=» RF(E) OUL020 «, t00=0x003f, t01=0x0074}
0x62ee…6306 Head {h00=0x0014, h01=0x0050, text=»OUL010 CWR A6,A4«, t00=0x003f, t01=0x008a}
0x6306…6338 Head {h00=0x002e, h01=0x0050, text=» RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE«, t00=0x003f, t01=0x00a2}
0x6338…6350 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTOTQ,A4«, t00=0x003f, t01=0x00d4}
0x6350…637a Head {h00=0x0026, h01=0x0050, text=» RF(E) OUL030 END OF THREAD FOUND «, t00=0x003f, t01=0x00ec}
0x637a…639e Head {h00=0x0020, h01=0x0050, text=» LDR A4,A3 FOLLOW THE THREAD«, t00=0x003f, t01=0x0116}
0x639e…63b0 Head {h00=0x000e, h01=0x0050, text=» RB OUL010«, t00=0x003f, t01=0x013a}
0x63b0…63d8 Head {h00=0x0024, h01=0x0050, text=»OUL020 ST A6,CWTEQ,A1 QUEUE DWT «, t00=0x003f, t01=0x014c}
0x63d8…63ea Head {h00=0x000e, h01=0x0050, text=» RF OUL040«, t00=0x003f, t01=0x0174}
0x63ea…6412 Head {h00=0x0024, h01=0x0050, text=»OUL030 ST A6,DWTOTQ,A4 QUEUE DWT«, t00=0x003f, t01=0x0186}
0x6412…6440 Head {h00=0x002a, h01=0x0050, text=»OUL040 CM DWTOTQ,A6 SET END OF THREAD «, t00=0x0040, t01=0x001e}
0x6440…6452 Head {h00=0x000e, h01=0x0050, text=» RF OUL060«, t00=0x0040, t01=0x004c}
0x6452…6460 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0040, t01=0x005e}
0x6460…646a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x006c}
0x646a…6486 Head {h00=0x0018, h01=0x0050, text=»* SEND CHARACTER «, t00=0x0040, t01=0x0076}
0x6486…6490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0092}
0x6490…64c0 Head {h00=0x002c, h01=0x0050, text=»OUL050 LDR* A3,A6 GET CHANNEL PARAMETERS«, t00=0x0040, t01=0x009c}
0x64c0…64d6 Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/7F00«, t00=0x0040, t01=0x00cc}
0x64d6…64ea Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0040, t01=0x00e2}
0x64ea…64fc Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x0040, t01=0x00f6}
0x64fc…6510 Head {h00=0x0010, h01=0x0050, text=»OUL055 EQU *«, t00=0x0040, t01=0x0108}
0x6510…653e Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x0040, t01=0x011c}
0x653e…6554 Head {h00=0x0012, h01=0x0050, text=» RB(NA) OUL005«, t00=0x0040, t01=0x014a}
0x6554…657c Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 STORE LAST DWT IN CWT«, t00=0x0040, t01=0x0160}
0x657c…6592 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0040, t01=0x0188}
0x6592…65c6 Head {h00=0x0030, h01=0x0050, text=» CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** «, t00=0x0041, t01=0x000e}
0x65c6…65d2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0042}
0x65d2…660a Head {h00=0x0034, h01=0x0050, text=» ST A2,CWTLOW,A1 STORE LAST OUTPUT IN CWT =6(=3)«, t00=0x0041, t01=0x004e}
0x660a…6646 Head {h00=0x0038, h01=0x0050, text=»OUL060 SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT«, t00=0x0041, t01=0x0086}
0x6646…665a Head {h00=0x0010, h01=0x0050, text=»OUL070 EQU *«, t00=0x0041, t01=0x00c2}
0x665a…6670 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0041, t01=0x00d6}
0x6670…669c Head {h00=0x0028, h01=0x0050, text=» ABL IHRET8 RESTORE A1-A8 AND RETURN«, t00=0x0041, t01=0x00ec}
0x669c…66a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0118}
0x66a8…66b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0124}
0x66b2…66c8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0041, t01=0x012e}
0x66c8…66f6 Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0041, t01=0x0144}
0x66f6…6708 Head {h00=0x000e, h01=0x0050, text=» INH =9 «, t00=0x0041, t01=0x0172}
0x6708…673a Head {h00=0x002e, h01=0x0050, text=» ADKL A15,2 ...ADJUST STACK POINTER... =9 «, t00=0x0041, t01=0x0184}
0x673a…675e Head {h00=0x0020, h01=0x0050, text=» LDR* P,A15 ...AND RETURN =9«, t00=0x0042, t01=0x0026}
0x675e…676a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x004a}
0x676a…6774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0056}
0x6774…6782 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0060}
0x6782…678c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x006e}
0x678c…67a4 Head {h00=0x0014, h01=0x0050, text=»* C H L T O N «, t00=0x0042, t01=0x0078}
0x67a4…67ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0090}
0x67ae…67f0 Head {h00=0x003e, h01=0x0050, text=»* SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY«, t00=0x0042, t01=0x009a}
0x67f0…6834 Head {h00=0x0040, h01=0x0050, text=»* CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' «, t00=0x0042, t01=0x00dc}
0x6834…683e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0120}
0x683e…6852 Head {h00=0x0010, h01=0x0050, text=»CHLTON EQU *«, t00=0x0042, t01=0x012a}
0x6852…685c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x013e}
0x685c…6872 Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0042, t01=0x0148}
0x6872…687c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x015e}
0x687c…6890 Head {h00=0x0010, h01=0x0050, text=» LD A1,CHTAB«, t00=0x0042, t01=0x0168}
0x6890…68b6 Head {h00=0x0022, h01=0x0050, text=»CON010 SUK A1,2 ALL TREATED ? «, t00=0x0042, t01=0x017c}
0x68b6…68da Head {h00=0x0020, h01=0x0050, text=» RF(NZ) CON020 NO TAKE NEXT «, t00=0x0043, t01=0x0012}
0x68da…68fc Head {h00=0x001e, h01=0x0050, text=» ABL RTNA15 RETURN AND ENB«, t00=0x0043, t01=0x0036}
0x68fc…692a Head {h00=0x002a, h01=0x0050, text=»CON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS«, t00=0x0043, t01=0x0058}
0x692a…6940 Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0043, t01=0x0086}
0x6940…6968 Head {h00=0x0024, h01=0x0050, text=» EX CWTCIS,A5 EXECUTE CIO-START «, t00=0x0043, t01=0x009c}
0x6968…6988 Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A5 GET LAST DWT«, t00=0x0043, t01=0x00c4}
0x6988…699e Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0043, t01=0x00e4}
0x699e…69c0 Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0043, t01=0x00fa}
0x69c0…69d2 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0043, t01=0x011c}
0x69d2…69f8 Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0043, t01=0x012e}
0x69f8…6a0a Head {h00=0x000e, h01=0x0050, text=» RB CON010«, t00=0x0043, t01=0x0154}
0x6a0a…6a14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0166}
0x6a14…6a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0170}
0x6a1e…6a2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x017a}
0x6a2a…6a34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0186}
0x6a34…6a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0190}
0x6a3e…6a54 Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0044, t01=0x000a}
0x6a54…6a5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0020}
0x6a5e…6a7e Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA1 CIO-START«, t00=0x0044, t01=0x002a}
0x6a7e…6aa0 Head {h00=0x001e, h01=0x0050, text=» LD A6,CWTLT1 GET LAST DWT«, t00=0x0044, t01=0x004a}
0x6aa0…6ab6 Head {h00=0x0012, h01=0x0050, text=» RF(Z) CON010 «, t00=0x0044, t01=0x006c}
0x6ab6…6ada Head {h00=0x0020, h01=0x0050, text=» CM CWTLT1 RESET LAST OUTPUT«, t00=0x0044, t01=0x0082}
0x6ada…6aec Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0044, t01=0x00a6}
0x6aec…6b12 Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0044, t01=0x00b8}
0x6b12…6b3a Head {h00=0x0024, h01=0x0050, text=»CON010 ABL RTNA15 RETURN AND ENB«, t00=0x0044, t01=0x00de}
0x6b3a…6b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0106}
0x6b44…6b50 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0110}
0x6b50…6b5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x011c}
0x6b5a…6b68 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x0126}
0x6b68…6b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0134}
0x6b72…6b7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x013e}
0x6b7c…6b90 Head {h00=0x0010, h01=0x0050, text=»* L O G G «, t00=0x0044, t01=0x0148}
0x6b90…6b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x015c}
0x6b9a…6bd6 Head {h00=0x0038, h01=0x0050, text=»* IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT AND «, t00=0x0044, t01=0x0166}
0x6bd6…6bfe Head {h00=0x0024, h01=0x0050, text=»* OUTPUT CHARACTER ARE LOGGED «, t00=0x0045, t01=0x0012}
0x6bfe…6c08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x003a}
0x6c08…6c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0044}
0x6c12…6c1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x004e}
0x6c1c…6c32 Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0045, t01=0x0058}
0x6c32…6c3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x006e}
0x6c3c…6c54 Head {h00=0x0014, h01=0x0050, text=»LOGG STR A1,A15 «, t00=0x0045, t01=0x0078}
0x6c54…6c68 Head {h00=0x0010, h01=0x0050, text=» LD A1,POINT«, t00=0x0045, t01=0x0090}
0x6c68…6c7a Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0045, t01=0x00a4}
0x6c7a…6ca4 Head {h00=0x0026, h01=0x0050, text=» CWK A1,BUFE BUFE IS MAX LOGG AREA«, t00=0x0045, t01=0x00b6}
0x6ca4…6cb6 Head {h00=0x000e, h01=0x0050, text=» RF(NE) L1«, t00=0x0045, t01=0x00e0}
0x6cb6…6ce2 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,BUF SET FIRST LOGG ADDRESS «, t00=0x0045, t01=0x00f2}
0x6ce2…6cf8 Head {h00=0x0012, h01=0x0050, text=»L1 ST A1,POINT«, t00=0x0045, t01=0x011e}
0x6cf8…6d2a Head {h00=0x002e, h01=0x0050, text=» STR A2,A1 LOGG OF INR OR OTR INSTRUCTION «, t00=0x0045, t01=0x0134}
0x6d2a…6d3e Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0045, t01=0x0166}
0x6d3e…6d52 Head {h00=0x0010, h01=0x0050, text=» ADKL A15,2 «, t00=0x0045, t01=0x017a}
0x6d52…6d6c Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0045, t01=0x018e}
0x6d6c…6d76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0018}
0x6d76…6d80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0022}
0x6d80…6da4 Head {h00=0x0020, h01=0x0050, text=»POINT DATA BUF LOGG POINTER «, t00=0x0046, t01=0x002c}
0x6da4…6dae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0050}
0x6dae…6dca Head {h00=0x0018, h01=0x0050, text=»BUF RES 63 LOGG AREA«, t00=0x0046, t01=0x005a}
0x6dca…6ddc Head {h00=0x000e, h01=0x0050, text=»BUFE EQU *«, t00=0x0046, t01=0x0076}
0x6ddc…6de6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0088}
0x6de6…6df2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0092}
0x6df2…6dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x009e}
0x6dfc…6e08 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0046, t01=0x00a8}
0x6e08…6e0c Head {h00=0x4004, h01=0x0000}
0x6e0c…6e10 00 46 00 b4 ┆ F ┆
0x6e10…6e18 (71, 1, 8) 20 04 00 00 00 47 00 04 ┆ G ┆
0x6e18…6e68 (72, 0, 400) 00 0e 00 50 5c 52 42 5c 45 43 44 59 32 30 00 48 00 04 00 08 00 50 5c 58 49 46 00 48 00 16 00 2a 00 50 45 43 44 59 36 30 5c 4c 44 52 5c 41 33 2c 41 34 5c 53 41 56 45 20 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 00 48 00 22 00 36 00 50 ┆ P RB ECDY20 H P XIF H * PECDY60 LDR A3,A4 SAVE POSITION COUNTER H " 6 P┆
0x6e68…6eb8 5c 4c 44 5c 41 34 2c 44 57 54 41 50 2c 41 36 5c 47 45 54 20 48 45 41 44 20 4c 49 4e 45 2d 41 4e 44 2d 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 00 48 00 50 00 1c 00 50 5c 43 46 5c 41 35 2c 43 55 52 50 4f 53 5c 53 45 54 20 43 55 52 53 ┆ LD A4,DWTAP,A6 GET HEAD LINE-AND-POSITION COUNTER H P P CF A5,CURPOS SET CURS┆
0x6eb8…6f08 4f 52 00 48 00 8a 00 1e 00 50 5c 4c 44 52 5c 41 34 2c 41 33 5c 47 45 54 20 50 4f 53 20 43 4f 55 4e 54 45 52 00 48 00 aa 00 20 00 50 5c 41 44 4b 5c 41 34 2c 31 5c 55 50 44 41 54 45 20 50 4f 53 20 43 4f 55 4e 54 45 52 00 48 00 cc 00 10 00 50 ┆OR H P LDR A4,A3 GET POS COUNTER H P ADK A4,1 UPDATE POS COUNTER H P┆
0x6f08…6f58 5c 4c 44 4b 5c 41 33 2c 2f 32 30 20 00 48 00 f0 00 1e 00 50 5c 43 46 5c 41 35 2c 46 41 53 54 45 52 5c 46 41 53 54 20 4f 55 54 50 55 54 20 00 48 01 04 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 30 20 00 48 01 26 00 2a 00 50 5c 53 43 5c 41 32 2c 44 ┆ LDK A3,/20 H P CF A5,FASTER FAST OUTPUT H P LDK A2,0 H & * P SC A2,D┆
0x6f58…6fa8 57 54 42 43 2c 41 36 5c 52 45 53 45 54 20 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 00 48 01 38 00 0e 00 50 5c 52 42 5c 45 43 44 59 32 30 00 48 01 66 00 0a 00 50 5c 45 4a 45 43 54 00 48 01 78 00 06 00 50 2a 20 00 48 01 86 00 06 00 50 ┆WTBC,A6 RESET POSITION COUNTER H 8 P RB ECDY20 H f P EJECT H x P* H P┆
0x6fa8…6ff8 (73, 0, 400) 2a 20 00 48 01 90 00 30 00 50 2a 20 20 20 20 42 41 43 43 41 4e 20 3d 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 50 4f 53 49 54 49 4f 4e 20 43 55 52 53 4f 52 20 00 49 00 0a 00 30 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 41 54 20 54 ┆* H 0 P* BACCAN = SUBROUTINE TO POSITION CURSOR I 0 P* AT T┆
0x6ff8…7048 48 45 20 50 4c 41 43 45 20 42 45 46 4f 52 45 20 52 45 51 55 45 53 54 20 49 46 00 49 00 3e 00 30 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4c 45 41 52 20 4f 52 20 42 41 43 4b 57 41 52 44 53 20 4f 4e 45 20 53 54 45 50 20 49 46 00 49 ┆HE PLACE BEFORE REQUEST IF I > 0 P* CLEAR OR BACKWARDS ONE STEP IF I┆
0x7048…7098 00 72 00 1c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 42 41 43 4b 53 50 41 43 45 2e 00 49 00 a6 00 06 00 50 2a 20 00 49 00 c6 00 10 00 50 42 41 43 43 41 4e 5c 45 51 55 5c 2a 00 49 00 d0 00 0e 00 50 5c 4c 44 52 5c 41 33 2c 41 34 00 49 ┆ r P* BACKSPACE. I P* I PBACCAN EQU * I P LDR A3,A4 I┆
0x7098…70e8 00 e4 00 28 00 50 5c 4c 43 5c 41 32 2c 44 57 54 42 43 2c 41 36 5c 47 45 54 20 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 00 49 00 f6 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 46 46 20 00 49 01 22 00 2e 00 50 5c 41 44 5c 41 32 2c 44 57 54 ┆ ( P LC A2,DWTBC,A6 GET POSITION COUNTER I P ANK A2,/FF I " . P AD A2,DWT┆
0x70e8…7138 41 50 2c 41 36 5c 41 44 44 20 48 45 41 44 20 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 20 00 49 01 36 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 46 46 20 00 49 01 68 00 22 00 50 5c 43 43 5c 41 32 2c 44 57 54 50 4f 53 2c 41 36 5c 4c 41 53 ┆AP,A6 ADD HEAD POSITION COUNTER I 6 P ANK A2,/FF I h " P CC A2,DWTPOS,A6 LAS┆
0x7138…7188 (74, 0, 400) 54 20 50 4f 53 49 54 49 4f 4e 00 49 01 7c 00 16 00 50 5c 52 46 28 4e 50 29 5c 42 41 43 41 31 30 5c 4e 4f 20 00 4a 00 12 00 24 00 50 5c 4c 44 4b 5c 41 32 2c 53 50 41 43 45 5c 44 45 53 54 52 55 43 54 49 56 45 20 53 50 41 43 45 20 00 4a 00 2c ┆T POSITION I | P RF(NP) BACA10 NO J $ P LDK A2,SPACE DESTRUCTIVE SPACE J ,┆
0x7188…71d8 00 0e 00 50 5c 52 46 5c 42 41 43 41 32 30 00 4a 00 54 00 22 00 50 42 41 43 41 31 30 5c 4c 44 4b 5c 41 32 2c 42 41 43 4b 53 50 5c 42 41 43 4b 53 50 41 43 45 00 4a 00 66 00 16 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 00 4a ┆ P RF BACA20 J T " PBACA10 LDK A2,BACKSP BACKSPACE J f P CF A5,OUTPUT SEND J┆
0x71d8…7228 00 8c 00 24 00 50 5c 4c 44 4b 5c 41 32 2c 53 50 41 43 45 5c 44 45 53 54 52 55 43 54 49 56 45 20 53 50 41 43 45 20 00 4a 00 a6 00 16 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 00 4a 00 ce 00 1c 00 50 5c 4c 44 4b 5c 41 32 2c ┆ $ P LDK A2,SPACE DESTRUCTIVE SPACE J P CF A5,OUTPUT SEND J P LDK A2,┆
0x7228…7278 42 41 43 4b 53 50 5c 42 41 43 4b 53 50 41 43 45 00 4a 00 e8 00 1c 00 50 42 41 43 41 32 30 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 00 4a 01 08 00 0e 00 50 5c 53 55 4b 5c 41 34 2c 31 20 00 4a 01 28 00 12 00 50 5c 52 42 28 4e 45 ┆BACKSP BACKSPACE J PBACA20 CF A5,OUTPUT SEND J P SUK A4,1 J ( P RB(NE┆
0x7278…72c8 29 5c 42 41 43 41 31 30 00 4a 01 3a 00 1e 00 50 5c 4e 47 52 5c 41 33 2c 41 33 5c 4e 45 47 41 54 45 20 52 45 47 49 53 54 45 52 00 4a 01 50 00 2c 00 50 5c 41 44 53 5c 41 33 2c 44 57 54 53 54 2c 41 36 5c 55 50 44 41 54 45 20 50 4f 53 49 54 49 ┆) BACA10 J : P NGR A3,A3 NEGATE REGISTER J P , P ADS A3,DWTST,A6 UPDATE POSITI┆
0x72c8…7318 (75, 0, 400) 4f 4e 20 43 4f 55 4e 54 45 52 00 4a 01 72 00 0c 00 50 5c 52 54 4e 5c 41 35 20 00 4b 00 12 00 0a 00 50 5c 45 4a 45 43 54 00 4b 00 22 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 ┆ON COUNTER J r P RTN A5 K P EJECT K " 4 P********************************┆
0x7318…7368 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 4b 00 30 00 34 00 50 2a 20 20 20 43 48 45 43 4b 20 3d 20 53 55 42 52 4f 55 54 49 4e 20 54 4f 20 43 48 45 43 4b 20 55 53 45 52 20 42 55 46 46 45 52 20 49 4e 20 2a 20 00 4b 00 68 00 34 00 50 ┆*************** K 0 4 P* CHECK = SUBROUTIN TO CHECK USER BUFFER IN * K h 4 P┆
0x7368…73b8 2a 20 20 20 20 20 20 20 20 20 20 20 4f 52 44 45 52 20 54 4f 20 47 45 54 20 41 20 52 45 41 53 4f 4e 20 46 4f 52 20 55 53 49 4e 47 20 20 20 2a 20 00 4b 00 a0 00 34 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 27 46 41 53 54 20 4f 55 54 50 55 54 ┆* ORDER TO GET A REASON FOR USING * K 4 P* 'FAST OUTPUT┆
0x73b8…7408 20 46 41 43 49 4c 49 54 59 27 20 4f 4e 20 36 33 34 34 20 20 20 20 2a 20 00 4b 00 d8 00 34 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 44 20 36 33 38 36 20 20 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 ┆ FACILITY' ON 6344 * K 4 P* AND 6386 *┆
0x7408…7458 00 4b 01 10 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 4b 01 48 00 10 00 50 43 48 45 43 4b 5c 45 51 55 5c 2a 20 00 4b 01 80 ┆ K 4 P*********************************************** K H PCHECK EQU * K ┆
0x7458…74a8 (76, 0, 398) 00 06 00 50 2a 20 00 4c 00 04 00 06 00 50 2a 20 00 4c 00 0e 00 10 00 50 5c 4c 44 5c 41 31 2c 34 2c 41 38 20 00 4c 00 18 00 1e 00 50 5c 53 55 52 5c 41 31 2c 41 33 5c 45 4e 44 20 4f 46 20 42 55 46 46 45 52 3f 20 00 4c 00 2c 00 18 00 50 5c 41 ┆ P* L P* L P LD A1,4,A8 L P SUR A1,A3 END OF BUFFER? L , P A┆
0x74a8…74f8 42 4c 28 4e 50 29 5c 41 43 44 59 37 35 5c 59 45 53 21 00 4c 00 4e 00 2c 00 50 5c 4c 44 52 5c 41 37 2c 41 32 5c 53 41 56 45 20 43 48 45 52 20 54 4f 20 53 45 4e 44 20 28 41 4e 44 20 43 48 45 43 4b 29 00 4c 00 6a 00 28 00 50 5c 4c 44 52 5c 41 ┆BL(NP) ACDY75 YES! L N , P LDR A7,A2 SAVE CHER TO SEND (AND CHECK) L j ( P LDR A┆
0x74f8…7548 32 2c 41 34 5c 53 41 56 45 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 2b 49 4e 44 45 58 00 4c 00 9a 00 1c 00 50 5c 4c 44 4b 5c 41 34 2c 31 5c 52 45 53 45 54 20 43 4f 55 4e 54 45 52 20 00 4c 00 c6 00 24 00 50 4e 45 58 54 5c 41 44 4b 5c 41 ┆2,A4 SAVE BUFFER ADDRESS+INDEX L P LDK A4,1 RESET COUNTER L $ PNEXT ADK A┆
0x7548…7598 34 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 43 4f 55 4e 54 45 52 20 00 4c 00 e6 00 1c 00 50 5c 53 55 4b 5c 41 31 2c 31 5c 45 4e 44 20 4f 46 20 42 55 46 46 45 52 3f 00 4c 01 0e 00 14 00 50 5c 52 46 28 4e 50 29 5c 4f 55 54 5c 59 45 53 21 00 4c ┆4,1 INCREMENT COUNTER L P SUK A1,1 END OF BUFFER? L P RF(NP) OUT YES! L┆
0x7598…75e6 01 2e 00 20 00 50 5c 41 44 4b 5c 41 32 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 00 4c 01 46 00 24 00 50 5c 43 43 52 5c 41 37 2c 41 32 5c 43 48 41 52 20 45 51 55 20 54 4f 20 50 52 45 56 49 55 53 3f 20 00 4c 01 6a ┆ . P ADK A2,1 INCREMENT POINTER L F $ P CCR A7,A2 CHAR EQU TO PREVIUS? L j┆