|
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: 23598 (0x5c2e)
Notes: pts_type(SC)
Names: »DRKB01.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/DRKB01.SC«
IDENT DRKB01 REL 9.1 78-09-15 870105640912 * ******************************************* * * PHILIPS TERMINAL SYSTEM PTS * * DRKB01 = DRIVER KEYBOARD * * * * * * ******************************************* * * * THIS DRIVER HANDLES INPUT FROM NUMERIC * AND ALPHANUMERIC KEYBOARDS PTS 6231, * 6232, 6233, 6234, 6331,AND 6342 * CONNECTED TO CPU VIA CHLT OR CHRT. * * ONLY INPUT DATA FROM DEPRESSED KEYS * ARE HANDLED BY THE DRIVER. * * AN ECHO-DEVICE CAN BE ATTACHED TO EVERY * KEYBOARD WHERE RECEIVED CHARACTERS ARE * ECHOED. * * THE DRIVER CONSISTS OF FOLLOWING PARTS: * * A C K B : ACTIVATION PART * * I H K B : INTERRUPT HANDLER * * E C H O : ECHO HANDLER * * R C K B : RECOVERY ROUTINE * EJECT * * * THE FOLLOWING ORDERS ARE THREATED: * * ORDER 01: BASIC READ * ORDER 02: STANDARD READ * ORDER 03: NUMERIC READ * ORDER 04: RESET INPUT BUFFER * * * NORMAL REGISTER USAGE : * * REGISTER A1 : RETURN CODE * A2 : INPUT CHARACTER * A3 : BUFFER INDEX * A4 : WORK REGISTER * A5 : STACK BASE * A6 : DWT-ADDRESS * A7 : ORDER * A8 : ECB-ADDRESS * EJECT * * * SYSTEM ADAPTATION * * KEYBOARD TYPE MUST BE DEFINED IN FIRST WORD * IN DWT. BIT 10 IS RELEVANT FOR ALPHANUMERIC READ * AND BIT 11 FOR NUMERIC READ. * * BIT 10 = 0 FOR PTS 6231, 6233, 6234 * BIT 10 = 1 FOR PTS 6232, 6331 AND 6342 * BIT 11 = 0 FOR ALL KEYBOARDS BUT PTS 6342 AND 6234 * BIT 11 = 1 FOR PTS 6234,6342 * * CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, * MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED * IN DWT. * * DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE * DEFINED IN DWT. * * IF TIMING IS WANTED, TIMER POINTER * IN DWT MUST BE SET UNEQUAL TO ZERO. * STANDARD VALUE FOR TIME-OUT IS 30 SECONDS * SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * IS WANTED FOR A SYSTEM, INDICATOR * IN DRIVER MUST BE CHANGED. * * THE LENGTH OF THE CIRCULAR INPUT BUFFER IS * DEFINED IN DWT. STANDARD VALUE IS 7 CHARACTERS * NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL * DWT:S IN SYSTEM EJECT * * BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE * TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: * * -----ECHO-FUNCTION * -----STANDARD READ * -----TIME-OUT-FUNCTION * -----CODE CONVERSION VIA "8-BIT" SETTING * AND CONVERSION TABLES * BY MEANS OF CONDITIONAL ASSEMBLY IT IS ALSO * POSSIBLE TO GIVE A KEY THE MEANING OF TWO, * THREE OR MORE ZEROES. * * THE DRIVER IS PREPARED TO HANDLE THE SPECIAL * NORWAY-PROBLEM, WITH BETWEEN THEMSELVES * DEPENDENT KEYBOARDS CONNECTED TO THE SAME * SELECTOR UNIT. * BY ASSEMBLING THE DRIVER CONDITIONALLY THIS * FUNCTION IS INCLUDED. EJECT * * ************** * ENTRIES * ************** * ENTRY KBAD ADDRESS-BLOCK ENTRY EOQUEU QUEUE POINTER ROUTINE ENTRY DWTINQ,DWTUTQ QUEUE POINTERS * * * ********************************************** * EXTERNAL TOSS MODULE ENTRIES * ********************************************** * EXTRN DISIOE I/0 REQUEST ERROR EXTRN DISEND END I/O AND GO TO DISPATCHER EXTRN TENDIO END I/O EXTRN TDISP DISPATCHER ENTRY EXTRN LDREG LOAD REGISTERS A2,A3,A5,A7,A8 AND RETURN EXTRN STREG STORE REGISTERS AND GO TO DISPATCHER EXTRN LDREGE RETURN FROM ECHO HANDLING EXTRN LDREGF EXTRN SETIME SET TIME EXTRN SETIMP SET TIME EXTRN SAVE8 SAVE 8 REGISTERS EXTRN ECHRTN RETURN FROM ECHO EXTRN ECHO ECHO ROUTINE EXTRN ECHEND END OF ECHO EXTRN RTNA15 RETURN AND ENABLE * EJECT * ************************* * DWT PARAMETERS * ************************* * EXTRN DWTST STATUS EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK EXTRN DWTWAT SAVE INPUT DWT * *************** * CONSTANTS * *************** * OVMASK EQU /2 OVERFLOW IN INPUT BUFFER * X:F EQU 8 LENGTH OF CIRCULAR INPUT BUFFER DWTLNG EQU 30 NUMBER OF BYTES IN DECIMAL FORM * * TIME BEFORE TIME-OUT * TIME EQU 1200 TIME OUT CONSTANT * *************************** * DWT-DISPLACEMENT * *************************** * DWTBC EQU /3 DWTCON EQU /10 CONVERSION TABLE DWTA3 EQU /12 SAVE AREA FOR A3 DWTA4 EQU /14 SAVE AREA FOR A4 DWTA5 EQU /16 SAVE AREA FOR A5 DWTSB2 EQU /1E STACK BASE DWTTP EQU /20 TIMER POINTER DWTINQ EQU /28 POINTER TO FIRST PLACE IN QUEUE DWTUTQ EQU /2A POINTER TO LAST PLACE IN QUEUE DWTSQ EQU /2C START OF QUEUE DWTEQ EQU DWTSQ+DWTLNG END OF QUEUE * ***************************************** * SPECIAL KEYS DEFINED IN DWT * ***************************************** * KBBSP EQU /24 BACK-SPACE CHARACTER KBCLR EQU /25 CLEAR CHARACTER KBEOF EQU /26 EOR-CHARACTER KBMZ EQU /27 DOUBLE ZERO CHARACTER * EJECT * * **************************************** * CONDITIONAL ASSEMBLY * **************************************** * * TIME OUT FUNCTION MAY BE EXCLUDED BY * SETTING X:A = 0. * X:A EQU 0 CTIMUT EQU 1 * * ECHO FUNCTION MAY BE EXCLUDED BY * SETTING X:B = 0. * X:B EQU 1 CECHO EQU 1 * * STANDARD READ MAY BE EXCLUDED BY * SETTING X:C = 0. * X:C EQU 1 CSTAND EQU 1 * * DOUBLE ZERO MAY BE INCLUDED IN SYSTEM * BY SETTING X:D = 2. SETTING X:D * = 3 GIVES A THREE ZERO FUNCTION AND * X:D = 4 GIVES FOUR-ZERO FUNCTION AND SO ON * X:D = 0 EXCLUDES THE MULTIPLE ZERO FUNCTION * X:D EQU 2 CMULTZ EQU 2 * EJECT * * BY SETTING X:E = 1 FOLLOWING POWER OFF FUNCTION * CAN BE INCLUDED IN THE DRIVER. * IF THERE IS A READ REQUEST, THIS IS COMPLETED WITH -2 * SET IN THE CONTROL WORD OF ECB. IF NOT A POWER OFF FLAG * IS SET, CAUSING THE FIRST READ REQUEST AFTER POWER ON TO * BE COMPLETED WITH CONTROL WORD SET TO -2. * X:E EQU 0 POWOFF EQU 1 ** ** * BY SETTING X:G TO 1 THE CODE CONVERSION VIA * "8-BIT" SETTING AND CONVERSION TABLES IS * INCLUDED IN THE DRIVER. ** X:G EQU 0 CONVER EQU 1 * * * THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS * BY SETTING CREDIT = 1 * ORDER /04 IS THEN REPLACED BY ORDER /31 * BY SETTING CREDIT=1 THIS DRIVER INDEX THE EOR-KEYS * IN THE FOLOWING WAY: THE FIRST KEY IN THE EOR-KEY-TABLE * IS GIVEN INDEX =1, THE SECOND EOR-KEY IS GIVEN INDEX=1 * AND SO ON. (INDEX= 1,2,3,4,... ) * CONTROL WORD OF ECB IS SET TO ZERO INSTED OF -2 * * CREDIT EQU 1 * * BY SETTING NOLJE=1 THIS DRIVER IS PREPARED * TO HANDLE THE NORWAY-CASE WITH BETWEEN * THEMSELVES DEPENDENT KEYBOARDS ON THE * SAME SELECTOR UNIT. * NOLJE EQU 0 EJECT * * ************** * TABLES * ************** * KBAD EQU * DATA ACKB ACTIVATION DRIVER DATA IHKB INTERRUPT HANDLER * IFF POWOFF=1 * DATA 0 NO RECOVERY * XIF * * IFT POWOFF=1 * DATA RCKB RECOVERY ROUTINE EJECT * * * R C K B * * THIS IS THE RECOVERY ROUTINE FOR KEYBOARD * ENTERED FROM CHLT/CHRT DRIVER * RCKB EQU * CF A15,SAVE8 LD A3,DWTST,A6 BUSY ? RF(NN) RCKB10 LDKL A1,/200 ORS A1,DWTST,A6 INDICATE POWER OFF OCCURED ABL TDISP RCKB10 CF A5,LDREGE LOAD REGISTERS RF AKB202 * XIF * EJECT * * * A C K B * * ACTIVATION PART: * * CHECKS VALIDITY OF ORDERS AND EXAMINES * INPUT BUFFER TO SEE IF SOME QUEUED * TO THREAT. * * ACKB EQU * LDKL A1,/FEFF ANS A1,DWTST,A6 RESET INTERRUPTS ALLOWED FLAG LDK A1,0 LDK A3,0 START BUFFER INDEX LDR A4,A7 RF(NG) AKB100 ILLEGEAL ORDER IFT NOLJE=1 CWK A7,/37 SELECT KEYBOARD RF(E) AKBSEL XIF IFT CSTAND=0 SUK A4,2 RF(Z) AKB100 STANDARD READ NOT ALLOWED ADK A4,2 XIF SUK A4,4 IFT CREDIT=1 SUK A4,/2D RF(Z) CRE:10 SKIP INPUT BUFFER ADK A4,/2D CRE:10 EQU * XIF RF(Z) AKB110 ORDER 4 RF(N) AKB200 ORDER 1,2 OR 3 AKB100 ORKL A1,/8000 I/O REQUEST ERROR ABL ENDI10 EJECT * * * ORDER 4 RESET INPUT BUFFER * AKB110 LD A2,DWTINQ,A6 ORDER 4 SCR A1,A2 RESET OVERFLOW IF OCCURED ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE ABL ENDI05 END I/O IFT NOLJE=1 * * * ORDER 37 SELECT KEYBOARD * AKBSEL LDKL A2,/FF7F ANRS A2,A6 RESET ALLOW BITS IN DWTCHP ABL ENDI10 XIF EJECT * * * ORDER 1 2 3 * * AKB200 EQU * * IFT POWOFF=1 * LD A2,DWTST,A6 ANKL A2,/200 POWER OFF ? RF(E) AKB205 XRS A2,DWTST,A6 RESET BIT XIF AKB202 EQU * IFT CREDIT-POWOFF=-1 LDKL A1,-2 INDICATE POWER ON ST A1,10,A8 XIF IFT CREDIT+POWOFF=2 CM 10,A8 INDICATE POWER ON XIF IFT POWOFF=1 ABL AKB380 * XIF * AKB205 EQU * * IFT CTIMUT=1 * LDR* A1,A6 ANK A1,/40 TIMING ? RF(E) AKB210 NO TIMING FOR THIS DEVICE LD A4,DWTTP,A6 RF(E) AKBTIM LDKL A4,-TIME ST* A4,DWTTP,A6 RF AKB210 AKBTIM EQU * LDK A4,DWTTP TIMER POINTER ADR A4,A6 ADD DWT-ADDRESS LDR A1,A6 CF A15,SETIMP SET TIME DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT * XIF * AKB210 LD A2,4,A8 REQUESTED LENGTH AKB220 RF(E) AKB380 RESET A1 AND END I/O LDR A3,A3 FIRST TIME ? RF(NE) AKB240 NO LD A1,2,A8 BUFFER ADDRESS SUK A1,1 ADR A1,A2 ADDRESS IN BUFFER AKB230 SCR A3,A1 STORE CHARACTER SUK A1,1 NEXT CHAR. POSITION SUK A2,1 LAST ? RB(NE) AKB230 NO EJECT * * READ CHARACTER FROM INPUT BUFFER OR * WAIT FOR KEY-BOARD INTERRUPT * AKB240 EQU * LD A1,DWTUTQ,A6 LCR A2,A1 CHAR. TO A2 LDR A4,A2 XRK A4,/FF OVERFLOW ? RF(NE) AKB250 SCR A4,A1 RESET OVERFLOW MARK LDK A1,OVMASK OVERFLOW SET RF ENDIO AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? RF(NE) AKB260 CF A5,STREG NOTHING IN QUEUE IFT CTIMUT=1 LDR A1,A1 CHECK TIME OUT RETURN CODE RF(Z) AKB270 NO TIME-OUT RF ENDI05 END I/O AT TIME OUT XIF IFT CTIMUT=0 RF AKB270 XIF AKB260 CF A15,EOQUEU NEXT OUT QUEUE POINTER ST A1,DWTUTQ,A6 STORE NEW POINTER AKB270 LDR A4,A7 SUK A4,2 RF(NN) AKB310 ORDER 2 OR 3 EJECT * * * ORDER 1 BASIC READ * CF A15,STORE STORE CHARACTER IN ECB-BUFFER IFT CECHO=1 CF A5,ECHO ECHO INPUTTED CHARACTER XIF CW A3,4,A8 EFFECTIVE LENGTH = REQ. LENGTH? RB AKB220 EJECT * * * ORDER 2 OR 3 STANDARD AND NUMERIC READ * * CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE * * AKB310 LD A1,10,A8 KEY-TABLE ADDRESS RF(Z) AKB359 NO KEYTABLE LCR A4,A1 TABLE LENGTH IN A4 ANK A4,/FF ADR A1,A4 LAST PLACE IN KEY-TABLE ADK A1,1 AKB355 SUK A4,1 RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE SUK A1,1 NEXT KEY CCR A2,A1 EOR-CHARACTER? RB(NE) AKB355 NO IFT CREDIT=0 ADR A4,A4 YES DOUBLE INDEX XIF IFT CREDIT=1 ADK A4,1 INDEX STARTS AT ONE,INCR=1 XIF ST A4,10,A8 STORE INDEX IN CONTROLWORD AKB358 CF A15,STORE STORE CHARACTER RF AKB370 * * AKB359 CC A2,KBEOF,A6 STANDARD END OF RECORD KEY RB(E) AKB358 YES EJECT * * CHARACTER NOT FOUND IN KEY-TABLE. * CHECK CHARACTER CODE. * AKB360 EQU * CF A5,CHEK CHECK CHARACTER LDR* A4,A6 GET CHANNEL PARAMETER ANK A4,/20 SHIFT BIT 9 ? RF(E) AKB361 YES LDR A4,A2 CHARACTER RF AKB363 AKB361 EQU * LDR* A4,A6 ANK A4,/10 PTS 6234 ? RF(E) AKB362 LDR A4,A2 ANK A4,/80 RF(NE) AKB362 LDR A4,A2 RF AKB363 AKB362 EQU * LDR A4,A2 CHARACTER ANK A4,/BF RESET BIT 9 AKB363 EQU * IFF CMULTZ=0 CC A4,KBMZ,A6 MULTIPLE ZERO ? RF(E) KBMZ10 YES! XIF CC A4,KBCLR,A6 CLEAR? RF(E) KBCL10 CC A4,KBBSP,A6 BACKSPACE? RF(E) KBSP10 LDR A1,A1 RETURN CODE? RF(NE) AKB369 YES,STORE AND END I/O CF A15,STORE AKB365 EQU * IFT CECHO=1 CF A5,ECHO ECHOCHARACTER XIF CW A3,4,A8 LENGTH OVERFLOW? RB(L) AKB210 NO AKB368 LDK A1,8 SET RETURN CODE RF ENDIO AND END I/O AKB369 CF A15,STORE STORE CHARACTER IN ECB BUFFER RF ENDIO END I/O REQUEST EJECT * * * CHECK CODE OF END OF RECORD KEY * * AKB370 EQU * IFT CECHO=1 CF A5,CHEK CHECK CHARACTER ORK A2,/80 INDICATE END OF RECORD LDR A1,A1 RETURN CODE? RF(NE) AKB380 CF A5,ECHO ECHO CHARACTER * XIF * AKB380 LDK A1,0 RETURN CODE EJECT * * * THIS IS A COMMON END OF THE DRIVER * * SET EFFECTIVE LENGTH AND PERFORM END I/O * ON KEYBOARD AND ECHO-DEVICE * * ENDIO EQU * * IFT CTIMUT=1 INH LD A4,DWTTP,A6 RF(E) ENDI05 NO TIMING ON THIS DEVICE CM* DWTTP,A6 RESET TIMER CM DWTTP,A6 XIF * ENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ENDI10 EQU * * IFT CECHO=1 LDR A4,A1 SAVE A1 CF A5,ECHEND END I/O ON ECHO DEVICE LDR A1,A4 RESTORE A1 XIF * ABL DISEND END I/O ON KEYBOARD AND DISPATCH EJECT * * MULTIPLE ZERO * IFF CMULTZ=0 KBMZ10 EQU * LDK A4,CMULTZ LOAD NUMBER OF ZEROES KBMZ20 LDK A2,/30 ZERO TO STORE AND ECHO SUK A4,1 RB(L) AKB240 ALL DONE LDR A1,A4 SAVE A4 CF A15,STORE STORE ZOERO IN ECB-BUFFER LDR A4,A1 RESTORE A4 * IFT CECHO=1 * CF A5,ECHO ECHO ZERO XIF * * IFF CMULTZ=0 * CW A3,4,A8 LENGTH OVERFLOW ? RB(L) KBMZ20 NO KBMZ25 SUK A4,1 ANY MORE ZEROES TO STORE ? RB(L) AKB368 NO INH LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER SUR A1,A6 CWK A1,DWTSQ FIRST POSITION ? RF(NE) KBMZ30 NO LDK A1,DWTEQ GET LAST POSITION IN QUEUE ADR A1,A6 SUK A1,1 RF KBMZ40 KBMZ30 ADR A1,A6 GET PREIOUS POINTER POSITION SUK A1,1 KBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? RF(E) KBMZ90 NO NOT REALY. ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER LDK A2,/30 STORE ZERO IN CIRKULAR SCR A2,A1 INPUT BUFFER RB KBMZ25 ONCE MORE TIME !! KBMZ90 EQU * LDK A4,/FF INDICATE BUFFER OWERFLOW SCR A4,A1 ST A1,DWTUTQ,A6 UPPDATE POINTER LDK A1,/A SET RETURN CODE FOR BOTH RB ENDIO LENGTH AND THRUGHPUT ERRORS XIF * * CLEAR * KBCL10 LDK A3,0 RESET BUFFER INDEX LDK A2,/18 CHANGE CHARACTER-CODE RB AKB365 * * BACKSPACE * KBSP10 LDR A3,A3 FIRST CHARACTER? RF(Z) KBSP15 SUK A3,1 DECREMENT BUFFER INDEX LDK A2,/00 CLEAR ECB-BUFFER CF A15,STORE SUK A3,1 DECREMENT INDEX KBSP15 LDK A2,/8 CHANGE CHARACTER-CODE RB AKB365 EJECT * * C H E K * * * SUBROUTINE TO CHECK INPUT CHARACTER * * ON ENTRY: * * A2 = CHARACTER * A3 = BUFFER INDEX * A6 = DWT-ADDRESS * A7 = ORDER * * * ON EXIT: * * A1 = RETURN CODE * CHEK EQU * STR A2,A15 SAVE A2 ON STACK ANK A2,/FF LDR* A1,A6 CHANNEL PARAMETER * IFT CSTAND=1 * CWK A7,2 ORDER 2? RF(NE) CHEK05 NO ANK A1,/20 ORK A1,/5F 5F OR 7F AS UPPER LIMIT LDK A4,/20 LOWER LIMIT RF CHEK08 * XIF * CHEK05 ANK A1,/10 RF(NE) CHEK06 ANK A2,/3F RESET BIT 9 CHEK06 LDK A1,/39 UPPER LIMIT LDK A4,/30 LOWER LIMIT CHEK08 SUR A1,A2 RF(N) CHERRO CODE CHECK ERROR SUR A4,A2 RF(P) CHERRO CODE CHECK ERROR LDR* A1,A15 CHEK10 LDK A1,0 RETURN CODE CHEK20 RTN A5 * * * CODE CHECK ERROR * CHERRO LDK A1,4 SET RETURN CODE AND RETURN LDR* A2,A15 RELOAD CHARACTER RB CHEK20 EJECT * * * I H K B * * THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER * * IHKB EQU * IFT NOLJE=1 LDR* A3,A6 GET ALLOW BITS ANK A3,/C0 RF(E) IHNOL3 INPUT ALLOWED FROM BOTH KEYBOARDS LDK A4,1 ANK A3,/80 RF(E) IHNOL1 LDK A4,5 IHNOL1 LDR A3,A2 SRL A3,12 CWR A3,A4 RF(NE) EXIT IHNOL2 EQU * XIF * IFT CONVER=1 * LDR A4,A2 INPUT WORD SRL A4,11 DEVICE ADDRESS * 2 ANK A4,/E CC A4,DWTBC,A6 8-BIT SETTING ? RF(NE) IHKB03 LDR A3,A2 ANK A3,/3F SUK A3,/30 RF(N) IHKB01 SUK A3,/A RF(N) IHKB02 IHKB01 ORK A2,/80 RF IHKB04 IHKB02 ANKL A2,/FF3F RF IHKB04 IHKB03 LD A3,DWTCON,A6 CONVERSION TABLE ADDRESS RF(E) IHKB04 LDR A4,A2 ANK A4,/FF SRL A4,3 LINE INDEX ADR A3,A4 LDR* A3,A3 COLUMN TABLE ADDRESS RF(E) IHKB04 LDR A4,A2 ANK A4,/F ADR A3,A4 ADD ROW INDEX LCR A2,A3 GET CHARACTER IHKB04 EQU * * XIF * * IFT NOLJE=1 * LDR A3,A2 ANK A3,/3F SUK A3,/22 RF(Z) IHNOL6 SUK A3,1 RF(NZ) IHNOL8 RF IHNOL7 IHNOL6 ADK A2,7 IHNOL7 ANKL A2,/FF3F IHNOL8 EQU * * XIF * LD A3,DWTST,A6 I/O REQUEST? RF(N) IHKB10 SLL A3,7 INTERRUPTS ALLOWED? RF(NN) IHKB10 NO,STORE CHARACTER IN DWT-BUFFER * IFT CTIMUT=1 * LD A3,DWTTP,A6 RF(E) IHKB05 NO TIMING ON THIS DEVICE LDKL A3,-TIME RESTART TIME ST* A3,DWTTP,A6 * XIF * IHKB05 ABL LDREG RETURN TO READ ROUTINE IHKB10 LD A1,DWTINQ,A6 LCR A4,A1 XRK A4,/FF ALREADY OVERFLOW ? RF(E) EXIT YES LDR A3,A1 CF A15,EOQUEU GET NEXT QUEUE POINTER ADDRESS CW A1,DWTUTQ,A6 OVERFLOW? RF(NE) IHKB20 NO! ORK A2,/FF SET OVERFLOW BIT IN INPUT BUFFER RF IHKB30 IHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER IHKB30 SCR A2,A3 STORE CHARACTER IN INPUT BUFFER EXIT ABL TDISP IFT NOLJE=1 IHNOL3 LDR A3,A2 SRL A3,12 LDK A4,/40 SUK A3,1 RF(E) IHNOL4 LDK A4,/80 SUK A3,4 RB(NE) IHNOL2 IHNOL4 ORRS A4,A6 SET ALLOW BIT RB IHNOL2 XIF EJECT * * * A K B T U T * * THIS IS THE TIME-OUT ROUTINE * * IFT CTIMUT=1 * AKBTUT EQU * LDR A6,A1 GET DWT-ADDRESS CM DWTTP,A6 LD A1,DWTST,A6 RB(N) EXIT LDK A1,/40 SET RETURN CODE RB IHKB05 RESTORE REGISTERS AND END I/O * XIF EJECT * * STORE = SUBROUTINE TO STORE A CHARACTER IN * ECB-BUFFER AND INCREMENT BUFFER INDEX * * ON ENTRY: * * A2 = CHARACTER TO STORE * A3 = BUFFER INDEX * * STORE EQU * LD A4,2,A8 BUFFER ADDRESS ADR A4,A3 ADD BUFFER INDEX SCR A2,A4 STORE CHARACTER IN BUFFER ADK A3,1 INCREMENT BUFFER INDEX ANK A2,/7F RF EOQU20 RTN A15 AND ENB EJECT * * * EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER * * ON ENTRY: * * A1 = QUEUE POINTER * A6 = DWT-ADDRESS * * ON EXIT: * * A1 = NEW QUEUE POINTER EOQUEU EQU * INH ADK A1,1 SUR A1,A6 CWK A1,DWTEQ END OF QUEUE? RF(NE) EOQU10 LDK A1,DWTSQ SET QUEUE START ADDRESS EOQU10 ADR A1,A6 EOQU20 ABL RTNA15 RETURN AND ENABLE * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRKB01 REL 9.1 78-09-15 870105640912 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…007c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x004c}
0x007c…0086 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0080}
0x0086…00ae Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008a}
0x00ae…00b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b2}
0x00b8…00dc Head {h00=0x0020, h01=0x0050, text=»* DRKB01 = DRIVER KEYBOARD«, t00=0x0000, t01=0x00bc}
0x00dc…00e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e0}
0x00e6…00f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ea}
0x00f0…00fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f4}
0x00fa…0104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fe}
0x0104…010e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0108}
0x010e…0118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0112}
0x0118…014c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x011c}
0x014c…0156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0150}
0x0156…0160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015a}
0x0160…0194 Head {h00=0x0030, h01=0x0050, text=»* THIS DRIVER HANDLES INPUT FROM NUMERIC «, t00=0x0000, t01=0x0164}
0x0194…01c6 Head {h00=0x002e, h01=0x0050, text=»* AND ALPHANUMERIC KEYBOARDS PTS 6231, «, t00=0x0001, t01=0x0008}
0x01c6…01f2 Head {h00=0x0028, h01=0x0050, text=»* 6232, 6233, 6234, 6331,AND 6342«, t00=0x0001, t01=0x003a}
0x01f2…0222 Head {h00=0x002c, h01=0x0050, text=»* CONNECTED TO CPU VIA CHLT OR CHRT. «, t00=0x0001, t01=0x0066}
0x0222…022c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0096}
0x022c…025c Head {h00=0x002c, h01=0x0050, text=»* ONLY INPUT DATA FROM DEPRESSED KEYS«, t00=0x0001, t01=0x00a0}
0x025c…0284 Head {h00=0x0024, h01=0x0050, text=»* ARE HANDLED BY THE DRIVER. «, t00=0x0001, t01=0x00d0}
0x0284…028e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f8}
0x028e…02c2 Head {h00=0x0030, h01=0x0050, text=»* AN ECHO-DEVICE CAN BE ATTACHED TO EVERY«, t00=0x0001, t01=0x0102}
0x02c2…02f6 Head {h00=0x0030, h01=0x0050, text=»* KEYBOARD WHERE RECEIVED CHARACTERS ARE «, t00=0x0001, t01=0x0136}
0x02f6…030a Head {h00=0x0010, h01=0x0050, text=»* ECHOED.«, t00=0x0001, t01=0x016a}
0x030a…0314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017e}
0x0314…0348 Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0001, t01=0x0188}
0x0348…0352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002c}
0x0352…0378 Head {h00=0x0022, h01=0x0050, text=»* A C K B : ACTIVATION PART«, t00=0x0002, t01=0x0036}
0x0378…0382 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005c}
0x0382…03aa Head {h00=0x0024, h01=0x0050, text=»* I H K B : INTERRUPT HANDLER«, t00=0x0002, t01=0x0066}
0x03aa…03b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008e}
0x03b4…03d8 Head {h00=0x0020, h01=0x0050, text=»* E C H O : ECHO HANDLER «, t00=0x0002, t01=0x0098}
0x03d8…03e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00bc}
0x03e2…040a Head {h00=0x0024, h01=0x0050, text=»* R C K B : RECOVERY ROUTINE «, t00=0x0002, t01=0x00c6}
0x040a…0414 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ee}
0x0414…0422 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00f8}
0x0422…042c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0106}
0x042c…0436 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0110}
0x0436…0466 Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE THREATED: «, t00=0x0002, t01=0x011a}
0x0466…0470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014a}
0x0470…0492 Head {h00=0x001e, h01=0x0050, text=»* ORDER 01: BASIC READ «, t00=0x0002, t01=0x0154}
0x0492…04b6 Head {h00=0x0020, h01=0x0050, text=»* ORDER 02: STANDARD READ«, t00=0x0002, t01=0x0176}
0x04b6…04da Head {h00=0x0020, h01=0x0050, text=»* ORDER 03: NUMERIC READ «, t00=0x0003, t01=0x000a}
0x04da…0504 Head {h00=0x0026, h01=0x0050, text=»* ORDER 04: RESET INPUT BUFFER «, t00=0x0003, t01=0x002e}
0x0504…050e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0058}
0x050e…0518 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0062}
0x0518…053c Head {h00=0x0020, h01=0x0050, text=»* NORMAL REGISTER USAGE :«, t00=0x0003, t01=0x006c}
0x053c…0546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0090}
0x0546…056c Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 : RETURN CODE«, t00=0x0003, t01=0x009a}
0x056c…0596 Head {h00=0x0026, h01=0x0050, text=»* A2 : INPUT CHARACTER«, t00=0x0003, t01=0x00c0}
0x0596…05be Head {h00=0x0024, h01=0x0050, text=»* A3 : BUFFER INDEX «, t00=0x0003, t01=0x00ea}
0x05be…05e6 Head {h00=0x0024, h01=0x0050, text=»* A4 : WORK REGISTER«, t00=0x0003, t01=0x0112}
0x05e6…060c Head {h00=0x0022, h01=0x0050, text=»* A5 : STACK BASE «, t00=0x0003, t01=0x013a}
0x060c…0632 Head {h00=0x0022, h01=0x0050, text=»* A6 : DWT-ADDRESS«, t00=0x0003, t01=0x0160}
0x0632…0652 Head {h00=0x001c, h01=0x0050, text=»* A7 : ORDER«, t00=0x0003, t01=0x0186}
0x0652…0678 Head {h00=0x0022, h01=0x0050, text=»* A8 : ECB-ADDRESS«, t00=0x0004, t01=0x0016}
0x0678…0682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x003c}
0x0682…0690 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0046}
0x0690…069a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0054}
0x069a…06a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x005e}
0x06a4…06c2 Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION«, t00=0x0004, t01=0x0068}
0x06c2…06cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0086}
0x06cc…0704 Head {h00=0x0034, h01=0x0050, text=»* KEYBOARD TYPE MUST BE DEFINED IN FIRST WORD«, t00=0x0004, t01=0x0090}
0x0704…0742 Head {h00=0x003a, h01=0x0050, text=»* IN DWT. BIT 10 IS RELEVANT FOR ALPHANUMERIC READ «, t00=0x0004, t01=0x00c8}
0x0742…076c Head {h00=0x0026, h01=0x0050, text=»* AND BIT 11 FOR NUMERIC READ. «, t00=0x0004, t01=0x0106}
0x076c…0776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0130}
0x0776…07a6 Head {h00=0x002c, h01=0x0050, text=»* BIT 10 = 0 FOR PTS 6231, 6233, 6234«, t00=0x0004, t01=0x013a}
0x07a6…07da Head {h00=0x0030, h01=0x0050, text=»* BIT 10 = 1 FOR PTS 6232, 6331 AND 6342 «, t00=0x0004, t01=0x016a}
0x07da…081a Head {h00=0x003c, h01=0x0050, text=»* BIT 11 = 0 FOR ALL KEYBOARDS BUT PTS 6342 AND 6234 «, t00=0x0005, t01=0x000e}
0x081a…0844 Head {h00=0x0026, h01=0x0050, text=»* BIT 11 = 1 FOR PTS 6234,6342 «, t00=0x0005, t01=0x004e}
0x0844…084e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0078}
0x084e…088a Head {h00=0x0038, h01=0x0050, text=»* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, «, t00=0x0005, t01=0x0082}
0x088a…08c6 Head {h00=0x0038, h01=0x0050, text=»* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED «, t00=0x0005, t01=0x00be}
0x08c6…08da Head {h00=0x0010, h01=0x0050, text=»* IN DWT.«, t00=0x0005, t01=0x00fa}
0x08da…08e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010e}
0x08e4…091a Head {h00=0x0032, h01=0x0050, text=»* DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE«, t00=0x0005, t01=0x0118}
0x091a…0936 Head {h00=0x0018, h01=0x0050, text=»* DEFINED IN DWT.«, t00=0x0005, t01=0x014e}
0x0936…0940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016a}
0x0940…0970 Head {h00=0x002c, h01=0x0050, text=»* IF TIMING IS WANTED, TIMER POINTER «, t00=0x0005, t01=0x0174}
0x0970…09a0 Head {h00=0x002c, h01=0x0050, text=»* IN DWT MUST BE SET UNEQUAL TO ZERO.«, t00=0x0006, t01=0x0014}
0x09a0…09d6 Head {h00=0x0032, h01=0x0050, text=»* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS«, t00=0x0006, t01=0x0044}
0x09d6…0a0e Head {h00=0x0034, h01=0x0050, text=»* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE «, t00=0x0006, t01=0x007a}
0x0a0e…0a3c Head {h00=0x002a, h01=0x0050, text=»* IS WANTED FOR A SYSTEM, INDICATOR«, t00=0x0006, t01=0x00b2}
0x0a3c…0a64 Head {h00=0x0024, h01=0x0050, text=»* IN DRIVER MUST BE CHANGED. «, t00=0x0006, t01=0x00e0}
0x0a64…0a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0108}
0x0a6e…0aa6 Head {h00=0x0034, h01=0x0050, text=»* THE LENGTH OF THE CIRCULAR INPUT BUFFER IS «, t00=0x0006, t01=0x0112}
0x0aa6…0ae2 Head {h00=0x0038, h01=0x0050, text=»* DEFINED IN DWT. STANDARD VALUE IS 7 CHARACTERS «, t00=0x0006, t01=0x014a}
0x0ae2…0b1e Head {h00=0x0038, h01=0x0050, text=»* NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL «, t00=0x0006, t01=0x0186}
0x0b1e…0b3a Head {h00=0x0018, h01=0x0050, text=»* DWT:S IN SYSTEM«, t00=0x0007, t01=0x0032}
0x0b3a…0b48 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x004e}
0x0b48…0b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005c}
0x0b52…0b8e Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x0007, t01=0x0066}
0x0b8e…0bca Head {h00=0x0038, h01=0x0050, text=»* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS:«, t00=0x0007, t01=0x00a2}
0x0bca…0bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00de}
0x0bd4…0bf4 Head {h00=0x001c, h01=0x0050, text=»* -----ECHO-FUNCTION «, t00=0x0007, t01=0x00e8}
0x0bf4…0c14 Head {h00=0x001c, h01=0x0050, text=»* -----STANDARD READ «, t00=0x0007, t01=0x0108}
0x0c14…0c38 Head {h00=0x0020, h01=0x0050, text=»* -----TIME-OUT-FUNCTION «, t00=0x0007, t01=0x0128}
0x0c38…0c6e Head {h00=0x0032, h01=0x0050, text=»* -----CODE CONVERSION VIA "8-BIT" SETTING «, t00=0x0007, t01=0x014c}
0x0c6e…0c96 Head {h00=0x0024, h01=0x0050, text=»* AND CONVERSION TABLES «, t00=0x0007, t01=0x0182}
0x0c96…0cce Head {h00=0x0034, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS ALSO«, t00=0x0008, t01=0x001a}
0x0cce…0d06 Head {h00=0x0034, h01=0x0050, text=»* POSSIBLE TO GIVE A KEY THE MEANING OF TWO, «, t00=0x0008, t01=0x0052}
0x0d06…0d28 Head {h00=0x001e, h01=0x0050, text=»* THREE OR MORE ZEROES.«, t00=0x0008, t01=0x008a}
0x0d28…0d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ac}
0x0d32…0d6c Head {h00=0x0036, h01=0x0050, text=»* THE DRIVER IS PREPARED TO HANDLE THE SPECIAL «, t00=0x0008, t01=0x00b6}
0x0d6c…0da0 Head {h00=0x0030, h01=0x0050, text=»* NORWAY-PROBLEM, WITH BETWEEN THEMSELVES«, t00=0x0008, t01=0x00f0}
0x0da0…0dd6 Head {h00=0x0032, h01=0x0050, text=»* DEPENDENT KEYBOARDS CONNECTED TO THE SAME«, t00=0x0008, t01=0x0124}
0x0dd6…0df2 Head {h00=0x0018, h01=0x0050, text=»* SELECTOR UNIT. «, t00=0x0008, t01=0x015a}
0x0df2…0e2a Head {h00=0x0034, h01=0x0050, text=»* BY ASSEMBLING THE DRIVER CONDITIONALLY THIS«, t00=0x0008, t01=0x0176}
0x0e2a…0e4c Head {h00=0x001e, h01=0x0050, text=»* FUNCTION IS INCLUDED.«, t00=0x0009, t01=0x001e}
0x0e4c…0e5a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0040}
0x0e5a…0e64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x004e}
0x0e64…0e6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0058}
0x0e6e…0e84 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0009, t01=0x0062}
0x0e84…0e9a Head {h00=0x0012, h01=0x0050, text=»* ENTRIES *«, t00=0x0009, t01=0x0078}
0x0e9a…0eb0 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0009, t01=0x008e}
0x0eb0…0eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a4}
0x0eba…0edc Head {h00=0x001e, h01=0x0050, text=» ENTRY KBAD ADDRESS-BLOCK «, t00=0x0009, t01=0x00ae}
0x0edc…0f08 Head {h00=0x0028, h01=0x0050, text=» ENTRY EOQUEU QUEUE POINTER ROUTINE «, t00=0x0009, t01=0x00d0}
0x0f08…0f34 Head {h00=0x0028, h01=0x0050, text=» ENTRY DWTINQ,DWTUTQ QUEUE POINTERS «, t00=0x0009, t01=0x00fc}
0x0f34…0f3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0128}
0x0f3e…0f48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0132}
0x0f48…0f52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x013c}
0x0f52…0f88 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0009, t01=0x0146}
0x0f88…0fbe Head {h00=0x0032, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES *«, t00=0x0009, t01=0x017c}
0x0fbe…0ff4 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x000a, t01=0x0022}
0x0ff4…0ffe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0058}
0x0ffe…1026 Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/0 REQUEST ERROR «, t00=0x000a, t01=0x0062}
0x1026…1058 Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND END I/O AND GO TO DISPATCHER«, t00=0x000a, t01=0x008a}
0x1058…1076 Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x000a, t01=0x00bc}
0x1076…109c Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x000a, t01=0x00da}
0x109c…10da Head {h00=0x003a, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A2,A3,A5,A7,A8 AND RETURN «, t00=0x000a, t01=0x0100}
0x10da…1114 Head {h00=0x0036, h01=0x0050, text=» EXTRN STREG STORE REGISTERS AND GO TO DISPATCHER «, t00=0x000a, t01=0x013e}
0x1114…1144 Head {h00=0x002c, h01=0x0050, text=» EXTRN LDREGE RETURN FROM ECHO HANDLING «, t00=0x000a, t01=0x0178}
0x1144…115a Head {h00=0x0012, h01=0x0050, text=» EXTRN LDREGF «, t00=0x000b, t01=0x0018}
0x115a…1178 Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIME SET TIME«, t00=0x000b, t01=0x002e}
0x1178…1196 Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIMP SET TIME«, t00=0x000b, t01=0x004c}
0x1196…11bc Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x000b, t01=0x006a}
0x11bc…11e2 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECHRTN RETURN FROM ECHO«, t00=0x000b, t01=0x0090}
0x11e2…1202 Head {h00=0x001c, h01=0x0050, text=» EXTRN ECHO ECHO ROUTINE«, t00=0x000b, t01=0x00b6}
0x1202…1224 Head {h00=0x001e, h01=0x0050, text=» EXTRN ECHEND END OF ECHO «, t00=0x000b, t01=0x00d6}
0x1224…124c Head {h00=0x0024, h01=0x0050, text=» EXTRN RTNA15 RETURN AND ENABLE «, t00=0x000b, t01=0x00f8}
0x124c…1256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0120}
0x1256…1264 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x012a}
0x1264…126e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0138}
0x126e…1290 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x000b, t01=0x0142}
0x1290…12b2 Head {h00=0x001e, h01=0x0050, text=»* DWT PARAMETERS * «, t00=0x000b, t01=0x0164}
0x12b2…12d4 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x000b, t01=0x0186}
0x12d4…12de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0018}
0x12de…12fa Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x000c, t01=0x0022}
0x12fa…1328 Head {h00=0x002a, h01=0x0050, text=» EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK«, t00=0x000c, t01=0x003e}
0x1328…134c Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTWAT SAVE INPUT DWT«, t00=0x000c, t01=0x006c}
0x134c…1356 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0090}
0x1356…136e Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x000c, t01=0x009a}
0x136e…1386 Head {h00=0x0014, h01=0x0050, text=»* CONSTANTS * «, t00=0x000c, t01=0x00b2}
0x1386…139e Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x000c, t01=0x00ca}
0x139e…13a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e2}
0x13a8…13d6 Head {h00=0x002a, h01=0x0050, text=»OVMASK EQU /2 OVERFLOW IN INPUT BUFFER«, t00=0x000c, t01=0x00ec}
0x13d6…13e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x011a}
0x13e0…1412 Head {h00=0x002e, h01=0x0050, text=»X:F EQU 8 LENGTH OF CIRCULAR INPUT BUFFER «, t00=0x000c, t01=0x0124}
0x1412…1448 Head {h00=0x0032, h01=0x0050, text=»DWTLNG EQU 30 NUMBER OF BYTES IN DECIMAL FORM «, t00=0x000c, t01=0x0156}
0x1448…1452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018c}
0x1452…1474 Head {h00=0x001e, h01=0x0050, text=»* TIME BEFORE TIME-OUT «, t00=0x000d, t01=0x0008}
0x1474…147e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x002a}
0x147e…14a6 Head {h00=0x0024, h01=0x0050, text=»TIME EQU 1200 TIME OUT CONSTANT «, t00=0x000d, t01=0x0034}
0x14a6…14b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005c}
0x14b0…14d4 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x000d, t01=0x0066}
0x14d4…14f8 Head {h00=0x0020, h01=0x0050, text=»* DWT-DISPLACEMENT * «, t00=0x000d, t01=0x008a}
0x14f8…151c Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x000d, t01=0x00ae}
0x151c…1526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d2}
0x1526…153a Head {h00=0x0010, h01=0x0050, text=»DWTBC EQU /3«, t00=0x000d, t01=0x00dc}
0x153a…1562 Head {h00=0x0024, h01=0x0050, text=»DWTCON EQU /10 CONVERSION TABLE «, t00=0x000d, t01=0x00f0}
0x1562…1588 Head {h00=0x0022, h01=0x0050, text=»DWTA3 EQU /12 SAVE AREA FOR A3«, t00=0x000d, t01=0x0118}
0x1588…15ae Head {h00=0x0022, h01=0x0050, text=»DWTA4 EQU /14 SAVE AREA FOR A4«, t00=0x000d, t01=0x013e}
0x15ae…15d4 Head {h00=0x0022, h01=0x0050, text=»DWTA5 EQU /16 SAVE AREA FOR A5«, t00=0x000d, t01=0x0164}
0x15d4…15f6 Head {h00=0x001e, h01=0x0050, text=»DWTSB2 EQU /1E STACK BASE «, t00=0x000d, t01=0x018a}
0x15f6…161a Head {h00=0x0020, h01=0x0050, text=»DWTTP EQU /20 TIMER POINTER «, t00=0x000e, t01=0x001c}
0x161a…1650 Head {h00=0x0032, h01=0x0050, text=»DWTINQ EQU /28 POINTER TO FIRST PLACE IN QUEUE«, t00=0x000e, t01=0x0040}
0x1650…1686 Head {h00=0x0032, h01=0x0050, text=»DWTUTQ EQU /2A POINTER TO LAST PLACE IN QUEUE «, t00=0x000e, t01=0x0076}
0x1686…16aa Head {h00=0x0020, h01=0x0050, text=»DWTSQ EQU /2C START OF QUEUE«, t00=0x000e, t01=0x00ac}
0x16aa…16d6 Head {h00=0x0028, h01=0x0050, text=»DWTEQ EQU DWTSQ+DWTLNG END OF QUEUE «, t00=0x000e, t01=0x00d0}
0x16d6…16e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00fc}
0x16e0…1712 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000e, t01=0x0106}
0x1712…1744 Head {h00=0x002e, h01=0x0050, text=»* SPECIAL KEYS DEFINED IN DWT * «, t00=0x000e, t01=0x0138}
0x1744…1776 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000e, t01=0x016a}
0x1776…1780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x000c}
0x1780…17aa Head {h00=0x0026, h01=0x0050, text=»KBBSP EQU /24 BACK-SPACE CHARACTER«, t00=0x000f, t01=0x0016}
0x17aa…17d0 Head {h00=0x0022, h01=0x0050, text=»KBCLR EQU /25 CLEAR CHARACTER «, t00=0x000f, t01=0x0040}
0x17d0…17f4 Head {h00=0x0020, h01=0x0050, text=»KBEOF EQU /26 EOR-CHARACTER «, t00=0x000f, t01=0x0066}
0x17f4…181e Head {h00=0x0026, h01=0x0050, text=»KBMZ EQU /27 DOUBLE ZERO CHARACTER«, t00=0x000f, t01=0x008a}
0x181e…1828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b4}
0x1828…1836 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00be}
0x1836…1840 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00cc}
0x1840…184a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00d6}
0x184a…187a Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000f, t01=0x00e0}
0x187a…18aa Head {h00=0x002c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000f, t01=0x0110}
0x18aa…18da Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000f, t01=0x0140}
0x18da…18e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0170}
0x18e4…1916 Head {h00=0x002e, h01=0x0050, text=»* TIME OUT FUNCTION MAY BE EXCLUDED BY «, t00=0x000f, t01=0x017a}
0x1916…1934 Head {h00=0x001a, h01=0x0050, text=»* SETTING X:A = 0. «, t00=0x0010, t01=0x001c}
0x1934…193e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003a}
0x193e…1950 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0010, t01=0x0044}
0x1950…1964 Head {h00=0x0010, h01=0x0050, text=»CTIMUT EQU 1«, t00=0x0010, t01=0x0056}
0x1964…196e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006a}
0x196e…199c Head {h00=0x002a, h01=0x0050, text=»* ECHO FUNCTION MAY BE EXCLUDED BY «, t00=0x0010, t01=0x0074}
0x199c…19ba Head {h00=0x001a, h01=0x0050, text=»* SETTING X:B = 0. «, t00=0x0010, t01=0x00a2}
0x19ba…19c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c0}
0x19c4…19d6 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0010, t01=0x00ca}
0x19d6…19ea Head {h00=0x0010, h01=0x0050, text=»CECHO EQU 1 «, t00=0x0010, t01=0x00dc}
0x19ea…19f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f0}
0x19f4…1a22 Head {h00=0x002a, h01=0x0050, text=»* STANDARD READ MAY BE EXCLUDED BY «, t00=0x0010, t01=0x00fa}
0x1a22…1a40 Head {h00=0x001a, h01=0x0050, text=»* SETTING X:C = 0. «, t00=0x0010, t01=0x0128}
0x1a40…1a4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0146}
0x1a4a…1a5c Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x0010, t01=0x0150}
0x1a5c…1a70 Head {h00=0x0010, h01=0x0050, text=»CSTAND EQU 1«, t00=0x0010, t01=0x0162}
0x1a70…1a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0176}
0x1a7a…1aac Head {h00=0x002e, h01=0x0050, text=»* DOUBLE ZERO MAY BE INCLUDED IN SYSTEM«, t00=0x0010, t01=0x0180}
0x1aac…1ad8 Head {h00=0x0028, h01=0x0050, text=»* BY SETTING X:D = 2. SETTING X:D«, t00=0x0011, t01=0x0022}
0x1ad8…1b08 Head {h00=0x002c, h01=0x0050, text=»* = 3 GIVES A THREE ZERO FUNCTION AND«, t00=0x0011, t01=0x004e}
0x1b08…1b40 Head {h00=0x0034, h01=0x0050, text=»* X:D = 4 GIVES FOUR-ZERO FUNCTION AND SO ON «, t00=0x0011, t01=0x007e}
0x1b40…1b78 Head {h00=0x0034, h01=0x0050, text=»* X:D = 0 EXCLUDES THE MULTIPLE ZERO FUNCTION«, t00=0x0011, t01=0x00b6}
0x1b78…1b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ee}
0x1b82…1b94 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 2 «, t00=0x0011, t01=0x00f8}
0x1b94…1ba8 Head {h00=0x0010, h01=0x0050, text=»CMULTZ EQU 2«, t00=0x0011, t01=0x010a}
0x1ba8…1bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011e}
0x1bb2…1bc0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0128}
0x1bc0…1bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0136}
0x1bca…1c06 Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:E = 1 FOLLOWING POWER OFF FUNCTION«, t00=0x0011, t01=0x0140}
0x1c06…1c32 Head {h00=0x0028, h01=0x0050, text=»* CAN BE INCLUDED IN THE DRIVER. «, t00=0x0011, t01=0x017c}
0x1c32…1c74 Head {h00=0x003e, h01=0x0050, text=»* IF THERE IS A READ REQUEST, THIS IS COMPLETED WITH -2«, t00=0x0012, t01=0x0018}
0x1c74…1cb8 Head {h00=0x0040, h01=0x0050, text=»* SET IN THE CONTROL WORD OF ECB. IF NOT A POWER OFF FLAG«, t00=0x0012, t01=0x005a}
0x1cb8…1cfe Head {h00=0x0042, h01=0x0050, text=»* IS SET, CAUSING THE FIRST READ REQUEST AFTER POWER ON TO «, t00=0x0012, t01=0x009e}
0x1cfe…1d34 Head {h00=0x0032, h01=0x0050, text=»* BE COMPLETED WITH CONTROL WORD SET TO -2.«, t00=0x0012, t01=0x00e4}
0x1d34…1d3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011a}
0x1d3e…1d50 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x0012, t01=0x0124}
0x1d50…1d64 Head {h00=0x0010, h01=0x0050, text=»POWOFF EQU 1«, t00=0x0012, t01=0x0136}
0x1d64…1d6e Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0012, t01=0x014a}
0x1d6e…1d78 Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0012, t01=0x0154}
0x1d78…1db0 Head {h00=0x0034, h01=0x0050, text=»* BY SETTING X:G TO 1 THE CODE CONVERSION VIA«, t00=0x0012, t01=0x015e}
0x1db0…1de6 Head {h00=0x0032, h01=0x0050, text=»* "8-BIT" SETTING AND CONVERSION TABLES IS «, t00=0x0013, t01=0x0008}
0x1de6…1e0a Head {h00=0x0020, h01=0x0050, text=»* INCLUDED IN THE DRIVER.«, t00=0x0013, t01=0x003e}
0x1e0a…1e14 Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0013, t01=0x0062}
0x1e14…1e26 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x0013, t01=0x006c}
0x1e26…1e3a Head {h00=0x0010, h01=0x0050, text=»CONVER EQU 1«, t00=0x0013, t01=0x007e}
0x1e3a…1e42 Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0092}
0x1e42…1e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x009a}
0x1e4c…1e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a4}
0x1e56…1e92 Head {h00=0x0038, h01=0x0050, text=»* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS «, t00=0x0013, t01=0x00ae}
0x1e92…1eb4 Head {h00=0x001e, h01=0x0050, text=»* BY SETTING CREDIT = 1 «, t00=0x0013, t01=0x00ea}
0x1eb4…1ee8 Head {h00=0x0030, h01=0x0050, text=»* ORDER /04 IS THEN REPLACED BY ORDER /31 «, t00=0x0013, t01=0x010c}
0x1ee8…1f28 Head {h00=0x003c, h01=0x0050, text=»* BY SETTING CREDIT=1 THIS DRIVER INDEX THE EOR-KEYS «, t00=0x0013, t01=0x0140}
0x1f28…1f6e Head {h00=0x0042, h01=0x0050, text=»* IN THE FOLOWING WAY: THE FIRST KEY IN THE EOR-KEY-TABLE «, t00=0x0013, t01=0x0180}
0x1f6e…1fb2 Head {h00=0x0040, h01=0x0050, text=»* IS GIVEN INDEX =1, THE SECOND EOR-KEY IS GIVEN INDEX=1 «, t00=0x0014, t01=0x0036}
0x1fb2…1fe2 Head {h00=0x002c, h01=0x0050, text=»* AND SO ON. (INDEX= 1,2,3,4,... ) «, t00=0x0014, t01=0x007a}
0x1fe2…201e Head {h00=0x0038, h01=0x0050, text=»* CONTROL WORD OF ECB IS SET TO ZERO INSTED OF -2«, t00=0x0014, t01=0x00aa}
0x201e…2028 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e6}
0x2028…2032 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f0}
0x2032…203a Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x00fa}
0x203a…204e Head {h00=0x0010, h01=0x0050, text=»CREDIT EQU 1«, t00=0x0014, t01=0x0102}
0x204e…2058 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0116}
0x2058…2090 Head {h00=0x0034, h01=0x0050, text=»* BY SETTING NOLJE=1 THIS DRIVER IS PREPARED «, t00=0x0014, t01=0x0120}
0x2090…20c4 Head {h00=0x0030, h01=0x0050, text=»* TO HANDLE THE NORWAY-CASE WITH BETWEEN «, t00=0x0014, t01=0x0158}
0x20c4…20f6 Head {h00=0x002e, h01=0x0050, text=»* THEMSELVES DEPENDENT KEYBOARDS ON THE«, t00=0x0014, t01=0x018c}
0x20f6…2116 Head {h00=0x001c, h01=0x0050, text=»* SAME SELECTOR UNIT.«, t00=0x0015, t01=0x002e}
0x2116…2120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x004e}
0x2120…2134 Head {h00=0x0010, h01=0x0050, text=»NOLJE EQU 0 «, t00=0x0015, t01=0x0058}
0x2134…2142 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x006c}
0x2142…214c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x007a}
0x214c…2156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0084}
0x2156…216c Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0015, t01=0x008e}
0x216c…2182 Head {h00=0x0012, h01=0x0050, text=»* TABLES *«, t00=0x0015, t01=0x00a4}
0x2182…2198 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0015, t01=0x00ba}
0x2198…21a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d0}
0x21a2…21b4 Head {h00=0x000e, h01=0x0050, text=»KBAD EQU *«, t00=0x0015, t01=0x00da}
0x21b4…21d8 Head {h00=0x0020, h01=0x0050, text=» DATA ACKB ACTIVATION DRIVER«, t00=0x0015, t01=0x00ec}
0x21d8…21fc Head {h00=0x0020, h01=0x0050, text=» DATA IHKB INTERRUPT HANDLER«, t00=0x0015, t01=0x0110}
0x21fc…2206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0134}
0x2206…221c Head {h00=0x0012, h01=0x0050, text=» IFF POWOFF=1 «, t00=0x0015, t01=0x013e}
0x221c…2226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0154}
0x2226…2242 Head {h00=0x0018, h01=0x0050, text=» DATA 0 NO RECOVERY «, t00=0x0015, t01=0x015e}
0x2242…224c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017a}
0x224c…2258 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0184}
0x2258…2262 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0190}
0x2262…226c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x000a}
0x226c…2282 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0016, t01=0x0014}
0x2282…228c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x002a}
0x228c…22b0 Head {h00=0x0020, h01=0x0050, text=» DATA RCKB RECOVERY ROUTINE «, t00=0x0016, t01=0x0034}
0x22b0…22be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0058}
0x22be…22c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0066}
0x22c8…22d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0070}
0x22d2…22e6 Head {h00=0x0010, h01=0x0050, text=»* R C K B«, t00=0x0016, t01=0x007a}
0x22e6…22f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008e}
0x22f0…2326 Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE RECOVERY ROUTINE FOR KEYBOARD«, t00=0x0016, t01=0x0098}
0x2326…2350 Head {h00=0x0026, h01=0x0050, text=»* ENTERED FROM CHLT/CHRT DRIVER«, t00=0x0016, t01=0x00ce}
0x2350…235a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f8}
0x235a…236c Head {h00=0x000e, h01=0x0050, text=»RCKB EQU *«, t00=0x0016, t01=0x0102}
0x236c…2382 Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0016, t01=0x0114}
0x2382…23a0 Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTST,A6 BUSY ?«, t00=0x0016, t01=0x012a}
0x23a0…23b6 Head {h00=0x0012, h01=0x0050, text=» RF(NN) RCKB10«, t00=0x0016, t01=0x0148}
0x23b6…23cc Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x0016, t01=0x015e}
0x23cc…2400 Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER OFF OCCURED «, t00=0x0016, t01=0x0174}
0x2400…2412 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0017, t01=0x0018}
0x2412…243c Head {h00=0x0026, h01=0x0050, text=»RCKB10 CF A5,LDREGE LOAD REGISTERS«, t00=0x0017, t01=0x002a}
0x243c…244e Head {h00=0x000e, h01=0x0050, text=» RF AKB202«, t00=0x0017, t01=0x0054}
0x244e…2458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0066}
0x2458…2464 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0070}
0x2464…246e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x007c}
0x246e…247c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0086}
0x247c…2486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0094}
0x2486…2490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x009e}
0x2490…24a4 Head {h00=0x0010, h01=0x0050, text=»* A C K B«, t00=0x0017, t01=0x00a8}
0x24a4…24ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00bc}
0x24ae…24cc Head {h00=0x001a, h01=0x0050, text=»* ACTIVATION PART: «, t00=0x0017, t01=0x00c6}
0x24cc…24d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e4}
0x24d6…250a Head {h00=0x0030, h01=0x0050, text=»* CHECKS VALIDITY OF ORDERS AND EXAMINES «, t00=0x0017, t01=0x00ee}
0x250a…253a Head {h00=0x002c, h01=0x0050, text=»* INPUT BUFFER TO SEE IF SOME QUEUED «, t00=0x0017, t01=0x0122}
0x253a…2552 Head {h00=0x0014, h01=0x0050, text=»* TO THREAT. «, t00=0x0017, t01=0x0152}
0x2552…255c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x016a}
0x255c…2566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0174}
0x2566…2578 Head {h00=0x000e, h01=0x0050, text=»ACKB EQU *«, t00=0x0017, t01=0x017e}
0x2578…258e Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/FEFF«, t00=0x0017, t01=0x0190}
0x258e…25c4 Head {h00=0x0032, h01=0x0050, text=» ANS A1,DWTST,A6 RESET INTERRUPTS ALLOWED FLAG«, t00=0x0018, t01=0x0016}
0x25c4…25d6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0018, t01=0x004c}
0x25d6…25fa Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0018, t01=0x005e}
0x25fa…260c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0018, t01=0x0082}
0x260c…2632 Head {h00=0x0022, h01=0x0050, text=» RF(NG) AKB100 ILLEGEAL ORDER «, t00=0x0018, t01=0x0094}
0x2632…2646 Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0018, t01=0x00ba}
0x2646…266a Head {h00=0x0020, h01=0x0050, text=» CWK A7,/37 SELECT KEYBOARD «, t00=0x0018, t01=0x00ce}
0x266a…2680 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKBSEL «, t00=0x0018, t01=0x00f2}
0x2680…268c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0108}
0x268c…26a2 Head {h00=0x0012, h01=0x0050, text=» IFT CSTAND=0 «, t00=0x0018, t01=0x0114}
0x26a2…26b4 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0018, t01=0x012a}
0x26b4…26e4 Head {h00=0x002c, h01=0x0050, text=» RF(Z) AKB100 STANDARD READ NOT ALLOWED «, t00=0x0018, t01=0x013c}
0x26e4…26f6 Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x0018, t01=0x016c}
0x26f6…2702 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x017e}
0x2702…270a Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x018a}
0x270a…271c (25, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0019, t01=0x0004}
0x271c…2724 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0016}
0x2724…273a Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=1 «, t00=0x0019, t01=0x001e}
0x273a…274e Head {h00=0x0010, h01=0x0050, text=» SUK A4,/2D «, t00=0x0019, t01=0x0034}
0x274e…2776 Head {h00=0x0024, h01=0x0050, text=» RF(Z) CRE:10 SKIP INPUT BUFFER «, t00=0x0019, t01=0x0048}
0x2776…278a Head {h00=0x0010, h01=0x0050, text=» ADK A4,/2D «, t00=0x0019, t01=0x0070}
0x278a…279e Head {h00=0x0010, h01=0x0050, text=»CRE:10 EQU *«, t00=0x0019, t01=0x0084}
0x279e…27aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0098}
0x27aa…27c8 Head {h00=0x001a, h01=0x0050, text=» RF(Z) AKB110 ORDER 4 «, t00=0x0019, t01=0x00a4}
0x27c8…27ec Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB200 ORDER 1,2 OR 3«, t00=0x0019, t01=0x00c2}
0x27ec…281a Head {h00=0x002a, h01=0x0050, text=»AKB100 ORKL A1,/8000 I/O REQUEST ERROR«, t00=0x0019, t01=0x00e6}
0x281a…282e Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x0019, t01=0x0114}
0x282e…283c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0128}
0x283c…2846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0136}
0x2846…2850 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0140}
0x2850…2878 Head {h00=0x0024, h01=0x0050, text=»* ORDER 4 RESET INPUT BUFFER «, t00=0x0019, t01=0x014a}
0x2878…2882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0172}
0x2882…28a8 Head {h00=0x0022, h01=0x0050, text=»AKB110 LD A2,DWTINQ,A6 ORDER 4«, t00=0x0019, t01=0x017c}
0x28a8…28d4 Head {h00=0x0028, h01=0x0050, text=» SCR A1,A2 RESET OVERFLOW IF OCCURED«, t00=0x001a, t01=0x0012}
0x28d4…2900 Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE «, t00=0x001a, t01=0x003e}
0x2900…291c Head {h00=0x0018, h01=0x0050, text=» ABL ENDI05 END I/O «, t00=0x001a, t01=0x006a}
0x291c…2930 Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x001a, t01=0x0086}
0x2930…293a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x009a}
0x293a…2944 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00a4}
0x2944…296a Head {h00=0x0022, h01=0x0050, text=»* ORDER 37 SELECT KEYBOARD«, t00=0x001a, t01=0x00ae}
0x296a…2974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d4}
0x2974…2990 Head {h00=0x0018, h01=0x0050, text=»AKBSEL LDKL A2,/FF7F«, t00=0x001a, t01=0x00de}
0x2990…29be Head {h00=0x002a, h01=0x0050, text=» ANRS A2,A6 RESET ALLOW BITS IN DWTCHP«, t00=0x001a, t01=0x00fa}
0x29be…29d2 Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x001a, t01=0x0128}
0x29d2…29de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x013c}
0x29de…29ec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0148}
0x29ec…29f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0156}
0x29f6…2a00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0160}
0x2a00…2a1c Head {h00=0x0018, h01=0x0050, text=»* ORDER 1 2 3«, t00=0x001a, t01=0x016a}
0x2a1c…2a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0186}
0x2a26…2a30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0190}
0x2a30…2a44 Head {h00=0x0010, h01=0x0050, text=»AKB200 EQU *«, t00=0x001b, t01=0x000a}
0x2a44…2a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x001e}
0x2a4e…2a64 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x001b, t01=0x0028}
0x2a64…2a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x003e}
0x2a6e…2a86 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x001b, t01=0x0048}
0x2a86…2aa8 Head {h00=0x001e, h01=0x0050, text=» ANKL A2,/200 POWER OFF ? «, t00=0x001b, t01=0x0060}
0x2aa8…2abe Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB205 «, t00=0x001b, t01=0x0082}
0x2abe…2ae0 Head {h00=0x001e, h01=0x0050, text=» XRS A2,DWTST,A6 RESET BIT«, t00=0x001b, t01=0x0098}
0x2ae0…2aec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00ba}
0x2aec…2b00 Head {h00=0x0010, h01=0x0050, text=»AKB202 EQU *«, t00=0x001b, t01=0x00c6}
0x2b00…2b1e Head {h00=0x001a, h01=0x0050, text=» IFT CREDIT-POWOFF=-1 «, t00=0x001b, t01=0x00da}
0x2b1e…2b44 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,-2 INDICATE POWER ON «, t00=0x001b, t01=0x00f8}
0x2b44…2b58 Head {h00=0x0010, h01=0x0050, text=» ST A1,10,A8«, t00=0x001b, t01=0x011e}
0x2b58…2b64 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0132}
0x2b64…2b80 Head {h00=0x0018, h01=0x0050, text=» IFT CREDIT+POWOFF=2«, t00=0x001b, t01=0x013e}
0x2b80…2ba4 Head {h00=0x0020, h01=0x0050, text=» CM 10,A8 INDICATE POWER ON «, t00=0x001b, t01=0x015a}
0x2ba4…2bb0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x017e}
0x2bb0…2bc6 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x001b, t01=0x018a}
0x2bc6…2bda Head {h00=0x0010, h01=0x0050, text=» ABL AKB380 «, t00=0x001c, t01=0x0010}
0x2bda…2be4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0024}
0x2be4…2bf0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x002e}
0x2bf0…2bfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x003a}
0x2bfa…2c0e Head {h00=0x0010, h01=0x0050, text=»AKB205 EQU *«, t00=0x001c, t01=0x0044}
0x2c0e…2c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0058}
0x2c18…2c2e Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001c, t01=0x0062}
0x2c2e…2c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0078}
0x2c38…2c4c Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A6 «, t00=0x001c, t01=0x0082}
0x2c4c…2c68 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/40 TIMING ?«, t00=0x001c, t01=0x0096}
0x2c68…2c98 Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB210 NO TIMING FOR THIS DEVICE «, t00=0x001c, t01=0x00b2}
0x2c98…2cb0 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x001c, t01=0x00e2}
0x2cb0…2cc6 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKBTIM «, t00=0x001c, t01=0x00fa}
0x2cc6…2cdc Head {h00=0x0012, h01=0x0050, text=» LDKL A4,-TIME«, t00=0x001c, t01=0x0110}
0x2cdc…2cf4 Head {h00=0x0014, h01=0x0050, text=» ST* A4,DWTTP,A6«, t00=0x001c, t01=0x0126}
0x2cf4…2d06 Head {h00=0x000e, h01=0x0050, text=» RF AKB210«, t00=0x001c, t01=0x013e}
0x2d06…2d1a Head {h00=0x0010, h01=0x0050, text=»AKBTIM EQU *«, t00=0x001c, t01=0x0150}
0x2d1a…2d3e Head {h00=0x0020, h01=0x0050, text=» LDK A4,DWTTP TIMER POINTER «, t00=0x001c, t01=0x0164}
0x2d3e…2d60 Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT-ADDRESS«, t00=0x001c, t01=0x0188}
0x2d60…2d72 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001d, t01=0x001a}
0x2d72…2d92 Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIME «, t00=0x001d, t01=0x002c}
0x2d92…2dc6 Head {h00=0x0030, h01=0x0050, text=» DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME «, t00=0x001d, t01=0x004c}
0x2dc6…2df8 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT«, t00=0x001d, t01=0x0080}
0x2df8…2e02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b2}
0x2e02…2e0e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00bc}
0x2e0e…2e18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c8}
0x2e18…2e42 Head {h00=0x0026, h01=0x0050, text=»AKB210 LD A2,4,A8 REQUESTED LENGTH«, t00=0x001d, t01=0x00d2}
0x2e42…2e72 Head {h00=0x002c, h01=0x0050, text=»AKB220 RF(E) AKB380 RESET A1 AND END I/O«, t00=0x001d, t01=0x00fc}
0x2e72…2e92 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A3 FIRST TIME ? «, t00=0x001d, t01=0x012c}
0x2e92…2eac Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB240 NO «, t00=0x001d, t01=0x014c}
0x2eac…2ece Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A8 BUFFER ADDRESS«, t00=0x001d, t01=0x0166}
0x2ece…2ee0 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001d, t01=0x0188}
0x2ee0…2f04 Head {h00=0x0020, h01=0x0050, text=» ADR A1,A2 ADDRESS IN BUFFER«, t00=0x001e, t01=0x000a}
0x2f04…2f2c Head {h00=0x0024, h01=0x0050, text=»AKB230 SCR A3,A1 STORE CHARACTER«, t00=0x001e, t01=0x002e}
0x2f2c…2f52 Head {h00=0x0022, h01=0x0050, text=» SUK A1,1 NEXT CHAR. POSITION «, t00=0x001e, t01=0x0056}
0x2f52…2f6a Head {h00=0x0014, h01=0x0050, text=» SUK A2,1 LAST ?«, t00=0x001e, t01=0x007c}
0x2f6a…2f84 Head {h00=0x0016, h01=0x0050, text=» RB(NE) AKB230 NO «, t00=0x001e, t01=0x0094}
0x2f84…2f92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x00ae}
0x2f92…2f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00bc}
0x2f9c…2fcc Head {h00=0x002c, h01=0x0050, text=»* READ CHARACTER FROM INPUT BUFFER OR«, t00=0x001e, t01=0x00c6}
0x2fcc…2ff6 Head {h00=0x0026, h01=0x0050, text=»* WAIT FOR KEY-BOARD INTERRUPT «, t00=0x001e, t01=0x00f6}
0x2ff6…3000 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0120}
0x3000…3014 Head {h00=0x0010, h01=0x0050, text=»AKB240 EQU *«, t00=0x001e, t01=0x012a}
0x3014…302c Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTUTQ,A6«, t00=0x001e, t01=0x013e}
0x302c…304a Head {h00=0x001a, h01=0x0050, text=» LCR A2,A1 CHAR. TO A2«, t00=0x001e, t01=0x0156}
0x304a…305c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001e, t01=0x0174}
0x305c…307a Head {h00=0x001a, h01=0x0050, text=» XRK A4,/FF OVERFLOW ?«, t00=0x001e, t01=0x0186}
0x307a…3090 Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB250«, t00=0x001f, t01=0x0014}
0x3090…30b6 Head {h00=0x0022, h01=0x0050, text=» SCR A4,A1 RESET OVERFLOW MARK«, t00=0x001f, t01=0x002a}
0x30b6…30da Head {h00=0x0020, h01=0x0050, text=» LDK A1,OVMASK OVERFLOW SET «, t00=0x001f, t01=0x0050}
0x30da…30ec Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x001f, t01=0x0074}
0x30ec…311e Head {h00=0x002e, h01=0x0050, text=»AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE?«, t00=0x001f, t01=0x0086}
0x311e…3134 Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB260«, t00=0x001f, t01=0x00b8}
0x3134…315a Head {h00=0x0022, h01=0x0050, text=» CF A5,STREG NOTHING IN QUEUE «, t00=0x001f, t01=0x00ce}
0x315a…3170 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001f, t01=0x00f4}
0x3170…319e Head {h00=0x002a, h01=0x0050, text=» LDR A1,A1 CHECK TIME OUT RETURN CODE «, t00=0x001f, t01=0x010a}
0x319e…31c0 Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB270 NO TIME-OUT «, t00=0x001f, t01=0x0138}
0x31c0…31e6 Head {h00=0x0022, h01=0x0050, text=» RF ENDI05 END I/O AT TIME OUT«, t00=0x001f, t01=0x015a}
0x31e6…31f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0180}
0x31f2…3208 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=0 «, t00=0x001f, t01=0x018c}
0x3208…321a Head {h00=0x000e, h01=0x0050, text=» RF AKB270«, t00=0x0020, t01=0x0012}
0x321a…3226 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0024}
0x3226…325a Head {h00=0x0030, h01=0x0050, text=»AKB260 CF A15,EOQUEU NEXT OUT QUEUE POINTER «, t00=0x0020, t01=0x0030}
0x325a…3284 Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW POINTER«, t00=0x0020, t01=0x0064}
0x3284…329c Head {h00=0x0014, h01=0x0050, text=»AKB270 LDR A4,A7«, t00=0x0020, t01=0x008e}
0x329c…32ae Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0020, t01=0x00a6}
0x32ae…32d2 Head {h00=0x0020, h01=0x0050, text=» RF(NN) AKB310 ORDER 2 OR 3 «, t00=0x0020, t01=0x00b8}
0x32d2…32e0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x00dc}
0x32e0…32ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ea}
0x32ea…32f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00f4}
0x32f4…3314 Head {h00=0x001c, h01=0x0050, text=»* ORDER 1 BASIC READ«, t00=0x0020, t01=0x00fe}
0x3314…331e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x011e}
0x331e…3352 Head {h00=0x0030, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN ECB-BUFFER «, t00=0x0020, t01=0x0128}
0x3352…3366 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0020, t01=0x015c}
0x3366…3392 Head {h00=0x0028, h01=0x0050, text=» CF A5,ECHO ECHO INPUTTED CHARACTER «, t00=0x0020, t01=0x0170}
0x3392…339e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x000c}
0x339e…33d2 Head {h00=0x0030, h01=0x0050, text=» CW A3,4,A8 EFFECTIVE LENGTH = REQ. LENGTH? «, t00=0x0021, t01=0x0018}
0x33d2…33e4 Head {h00=0x000e, h01=0x0050, text=» RB AKB220«, t00=0x0021, t01=0x004c}
0x33e4…33f2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x005e}
0x33f2…33fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x006c}
0x33fc…3406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0076}
0x3406…343c Head {h00=0x0032, h01=0x0050, text=»* ORDER 2 OR 3 STANDARD AND NUMERIC READ «, t00=0x0021, t01=0x0080}
0x343c…3446 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b6}
0x3446…3480 Head {h00=0x0036, h01=0x0050, text=»* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE«, t00=0x0021, t01=0x00c0}
0x3480…348a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00fa}
0x348a…3494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0104}
0x3494…34c0 Head {h00=0x0028, h01=0x0050, text=»AKB310 LD A1,10,A8 KEY-TABLE ADDRESS«, t00=0x0021, t01=0x010e}
0x34c0…34e2 Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB359 NO KEYTABLE «, t00=0x0021, t01=0x013a}
0x34e2…3508 Head {h00=0x0022, h01=0x0050, text=» LCR A4,A1 TABLE LENGTH IN A4 «, t00=0x0021, t01=0x015c}
0x3508…351c Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0021, t01=0x0182}
0x351c…3546 Head {h00=0x0026, h01=0x0050, text=» ADR A1,A4 LAST PLACE IN KEY-TABLE«, t00=0x0022, t01=0x0008}
0x3546…3558 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0022, t01=0x0032}
0x3558…3570 Head {h00=0x0014, h01=0x0050, text=»AKB355 SUK A4,1 «, t00=0x0022, t01=0x0044}
0x3570…35a0 Head {h00=0x002c, h01=0x0050, text=» RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE«, t00=0x0022, t01=0x005c}
0x35a0…35ba Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 NEXT KEY«, t00=0x0022, t01=0x008c}
0x35ba…35dc Head {h00=0x001e, h01=0x0050, text=» CCR A2,A1 EOR-CHARACTER? «, t00=0x0022, t01=0x00a6}
0x35dc…35f6 Head {h00=0x0016, h01=0x0050, text=» RB(NE) AKB355 NO «, t00=0x0022, t01=0x00c8}
0x35f6…360c Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=0 «, t00=0x0022, t01=0x00e2}
0x360c…3630 Head {h00=0x0020, h01=0x0050, text=» ADR A4,A4 YES DOUBLE INDEX «, t00=0x0022, t01=0x00f8}
0x3630…363c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x011c}
0x363c…3652 Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=1 «, t00=0x0022, t01=0x0128}
0x3652…367e Head {h00=0x0028, h01=0x0050, text=» ADK A4,1 INDEX STARTS AT ONE,INCR=1«, t00=0x0022, t01=0x013e}
0x367e…368a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x016a}
0x368a…36ba Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROLWORD «, t00=0x0022, t01=0x0176}
0x36ba…36e6 Head {h00=0x0028, h01=0x0050, text=»AKB358 CF A15,STORE STORE CHARACTER «, t00=0x0023, t01=0x0016}
0x36e6…36f8 Head {h00=0x000e, h01=0x0050, text=» RF AKB370«, t00=0x0023, t01=0x0042}
0x36f8…3702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0054}
0x3702…370c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x005e}
0x370c…3744 Head {h00=0x0034, h01=0x0050, text=»AKB359 CC A2,KBEOF,A6 STANDARD END OF RECORD KEY«, t00=0x0023, t01=0x0068}
0x3744…375e Head {h00=0x0016, h01=0x0050, text=» RB(E) AKB358 YES «, t00=0x0023, t01=0x00a0}
0x375e…376c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00ba}
0x376c…3776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c8}
0x3776…37a4 Head {h00=0x002a, h01=0x0050, text=»* CHARACTER NOT FOUND IN KEY-TABLE.«, t00=0x0023, t01=0x00d2}
0x37a4…37c6 Head {h00=0x001e, h01=0x0050, text=»* CHECK CHARACTER CODE.«, t00=0x0023, t01=0x0100}
0x37c6…37d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0122}
0x37d0…37e4 Head {h00=0x0010, h01=0x0050, text=»AKB360 EQU *«, t00=0x0023, t01=0x012c}
0x37e4…3808 Head {h00=0x0020, h01=0x0050, text=» CF A5,CHEK CHECK CHARACTER «, t00=0x0023, t01=0x0140}
0x3808…3832 Head {h00=0x0026, h01=0x0050, text=» LDR* A4,A6 GET CHANNEL PARAMETER «, t00=0x0023, t01=0x0164}
0x3832…3854 Head {h00=0x001e, h01=0x0050, text=» ANK A4,/20 SHIFT BIT 9 ? «, t00=0x0023, t01=0x018e}
0x3854…386e Head {h00=0x0016, h01=0x0050, text=» RF(E) AKB361 YES «, t00=0x0024, t01=0x0020}
0x386e…388a Head {h00=0x0018, h01=0x0050, text=» LDR A4,A2 CHARACTER«, t00=0x0024, t01=0x003a}
0x388a…389c Head {h00=0x000e, h01=0x0050, text=» RF AKB363«, t00=0x0024, t01=0x0056}
0x389c…38b0 Head {h00=0x0010, h01=0x0050, text=»AKB361 EQU *«, t00=0x0024, t01=0x0068}
0x38b0…38c4 Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A6 «, t00=0x0024, t01=0x007c}
0x38c4…38e2 Head {h00=0x001a, h01=0x0050, text=» ANK A4,/10 PTS 6234 ?«, t00=0x0024, t01=0x0090}
0x38e2…38f8 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB362 «, t00=0x0024, t01=0x00ae}
0x38f8…390a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0024, t01=0x00c4}
0x390a…391e Head {h00=0x0010, h01=0x0050, text=» ANK A4,/80 «, t00=0x0024, t01=0x00d6}
0x391e…3934 Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB362«, t00=0x0024, t01=0x00ea}
0x3934…3946 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0024, t01=0x0100}
0x3946…3958 Head {h00=0x000e, h01=0x0050, text=» RF AKB363«, t00=0x0024, t01=0x0112}
0x3958…396c Head {h00=0x0010, h01=0x0050, text=»AKB362 EQU *«, t00=0x0024, t01=0x0124}
0x396c…3988 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A2 CHARACTER«, t00=0x0024, t01=0x0138}
0x3988…39a8 Head {h00=0x001c, h01=0x0050, text=» ANK A4,/BF RESET BIT 9 «, t00=0x0024, t01=0x0154}
0x39a8…39bc Head {h00=0x0010, h01=0x0050, text=»AKB363 EQU *«, t00=0x0024, t01=0x0174}
0x39bc…39d2 Head {h00=0x0012, h01=0x0050, text=» IFF CMULTZ=0 «, t00=0x0024, t01=0x0188}
0x39d2…39f8 Head {h00=0x0022, h01=0x0050, text=» CC A4,KBMZ,A6 MULTIPLE ZERO ?«, t00=0x0025, t01=0x000e}
0x39f8…3a12 Head {h00=0x0016, h01=0x0050, text=» RF(E) KBMZ10 YES!«, t00=0x0025, t01=0x0034}
0x3a12…3a1e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x004e}
0x3a1e…3a3c Head {h00=0x001a, h01=0x0050, text=» CC A4,KBCLR,A6 CLEAR?«, t00=0x0025, t01=0x005a}
0x3a3c…3a52 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBCL10 «, t00=0x0025, t01=0x0078}
0x3a52…3a74 Head {h00=0x001e, h01=0x0050, text=» CC A4,KBBSP,A6 BACKSPACE?«, t00=0x0025, t01=0x008e}
0x3a74…3a8a Head {h00=0x0012, h01=0x0050, text=» RF(E) KBSP10 «, t00=0x0025, t01=0x00b0}
0x3a8a…3aaa Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 RETURN CODE? «, t00=0x0025, t01=0x00c6}
0x3aaa…3ad6 Head {h00=0x0028, h01=0x0050, text=» RF(NE) AKB369 YES,STORE AND END I/O«, t00=0x0025, t01=0x00e6}
0x3ad6…3aec Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0025, t01=0x0112}
0x3aec…3b00 Head {h00=0x0010, h01=0x0050, text=»AKB365 EQU *«, t00=0x0025, t01=0x0128}
0x3b00…3b14 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0025, t01=0x013c}
0x3b14…3b36 Head {h00=0x001e, h01=0x0050, text=» CF A5,ECHO ECHOCHARACTER «, t00=0x0025, t01=0x0150}
0x3b36…3b42 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0172}
0x3b42…3b66 Head {h00=0x0020, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW?«, t00=0x0025, t01=0x017e}
0x3b66…3b7e Head {h00=0x0014, h01=0x0050, text=» RB(L) AKB210 NO«, t00=0x0026, t01=0x0012}
0x3b7e…3ba6 Head {h00=0x0024, h01=0x0050, text=»AKB368 LDK A1,8 SET RETURN CODE «, t00=0x0026, t01=0x002a}
0x3ba6…3bc4 Head {h00=0x001a, h01=0x0050, text=» RF ENDIO AND END I/O «, t00=0x0026, t01=0x0052}
0x3bc4…3bfe Head {h00=0x0036, h01=0x0050, text=»AKB369 CF A15,STORE STORE CHARACTER IN ECB BUFFER «, t00=0x0026, t01=0x0070}
0x3bfe…3c20 Head {h00=0x001e, h01=0x0050, text=» RF ENDIO END I/O REQUEST «, t00=0x0026, t01=0x00aa}
0x3c20…3c2e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x00cc}
0x3c2e…3c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00da}
0x3c38…3c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00e4}
0x3c42…3c6e Head {h00=0x0028, h01=0x0050, text=»* CHECK CODE OF END OF RECORD KEY«, t00=0x0026, t01=0x00ee}
0x3c6e…3c78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x011a}
0x3c78…3c82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0124}
0x3c82…3c96 Head {h00=0x0010, h01=0x0050, text=»AKB370 EQU *«, t00=0x0026, t01=0x012e}
0x3c96…3caa Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0026, t01=0x0142}
0x3caa…3cce Head {h00=0x0020, h01=0x0050, text=» CF A5,CHEK CHECK CHARACTER «, t00=0x0026, t01=0x0156}
0x3cce…3cf8 Head {h00=0x0026, h01=0x0050, text=» ORK A2,/80 INDICATE END OF RECORD«, t00=0x0026, t01=0x017a}
0x3cf8…3d18 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 RETURN CODE? «, t00=0x0027, t01=0x0014}
0x3d18…3d2e Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB380«, t00=0x0027, t01=0x0034}
0x3d2e…3d50 Head {h00=0x001e, h01=0x0050, text=» CF A5,ECHO ECHO CHARACTER«, t00=0x0027, t01=0x004a}
0x3d50…3d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x006c}
0x3d5a…3d66 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0076}
0x3d66…3d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0082}
0x3d70…3d94 Head {h00=0x0020, h01=0x0050, text=»AKB380 LDK A1,0 RETURN CODE «, t00=0x0027, t01=0x008c}
0x3d94…3da2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x00b0}
0x3da2…3dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00be}
0x3dac…3db6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c8}
0x3db6…3de6 Head {h00=0x002c, h01=0x0050, text=»* THIS IS A COMMON END OF THE DRIVER «, t00=0x0027, t01=0x00d2}
0x3de6…3df0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0102}
0x3df0…3e26 Head {h00=0x0032, h01=0x0050, text=»* SET EFFECTIVE LENGTH AND PERFORM END I/O «, t00=0x0027, t01=0x010c}
0x3e26…3e4e Head {h00=0x0024, h01=0x0050, text=»* ON KEYBOARD AND ECHO-DEVICE«, t00=0x0027, t01=0x0142}
0x3e4e…3e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x016a}
0x3e58…3e62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0174}
0x3e62…3e76 Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0027, t01=0x017e}
0x3e76…3e80 (40, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0004}
0x3e80…3e96 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0028, t01=0x000e}
0x3e96…3ea2 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0028, t01=0x0024}
0x3ea2…3eba Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x0028, t01=0x0030}
0x3eba…3ee8 Head {h00=0x002a, h01=0x0050, text=» RF(E) ENDI05 NO TIMING ON THIS DEVICE«, t00=0x0028, t01=0x0048}
0x3ee8…3f0a Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x0028, t01=0x0076}
0x3f0a…3f1e Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0028, t01=0x0098}
0x3f1e…3f2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00ac}
0x3f2a…3f34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b8}
0x3f34…3f64 Head {h00=0x002c, h01=0x0050, text=»ENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0028, t01=0x00c2}
0x3f64…3f78 Head {h00=0x0010, h01=0x0050, text=»ENDI10 EQU *«, t00=0x0028, t01=0x00f2}
0x3f78…3f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0106}
0x3f82…3f96 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0028, t01=0x0110}
0x3f96…3fb0 Head {h00=0x0016, h01=0x0050, text=» LDR A4,A1 SAVE A1«, t00=0x0028, t01=0x0124}
0x3fb0…3fdc Head {h00=0x0028, h01=0x0050, text=» CF A5,ECHEND END I/O ON ECHO DEVICE«, t00=0x0028, t01=0x013e}
0x3fdc…3ffa Head {h00=0x001a, h01=0x0050, text=» LDR A1,A4 RESTORE A1 «, t00=0x0028, t01=0x016a}
0x3ffa…4006 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0188}
0x4006…4010 (41, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0004}
0x4010…4044 Head {h00=0x0030, h01=0x0050, text=» ABL DISEND END I/O ON KEYBOARD AND DISPATCH«, t00=0x0029, t01=0x000e}
0x4044…4052 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0042}
0x4052…405c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0050}
0x405c…4076 Head {h00=0x0016, h01=0x0050, text=»* MULTIPLE ZERO«, t00=0x0029, t01=0x005a}
0x4076…4080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0074}
0x4080…4096 Head {h00=0x0012, h01=0x0050, text=» IFF CMULTZ=0 «, t00=0x0029, t01=0x007e}
0x4096…40aa Head {h00=0x0010, h01=0x0050, text=»KBMZ10 EQU *«, t00=0x0029, t01=0x0094}
0x40aa…40d6 Head {h00=0x0028, h01=0x0050, text=» LDK A4,CMULTZ LOAD NUMBER OF ZEROES«, t00=0x0029, t01=0x00a8}
0x40d6…4106 Head {h00=0x002c, h01=0x0050, text=»KBMZ20 LDK A2,/30 ZERO TO STORE AND ECHO«, t00=0x0029, t01=0x00d4}
0x4106…4118 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0029, t01=0x0104}
0x4118…4136 Head {h00=0x001a, h01=0x0050, text=» RB(L) AKB240 ALL DONE«, t00=0x0029, t01=0x0116}
0x4136…4150 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A4 SAVE A4«, t00=0x0029, t01=0x0134}
0x4150…4180 Head {h00=0x002c, h01=0x0050, text=» CF A15,STORE STORE ZOERO IN ECB-BUFFER «, t00=0x0029, t01=0x014e}
0x4180…419e Head {h00=0x001a, h01=0x0050, text=» LDR A4,A1 RESTORE A4 «, t00=0x0029, t01=0x017e}
0x419e…41a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x000c}
0x41a8…41bc Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x002a, t01=0x0016}
0x41bc…41c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x002a}
0x41c6…41e4 Head {h00=0x001a, h01=0x0050, text=» CF A5,ECHO ECHO ZERO «, t00=0x002a, t01=0x0034}
0x41e4…41f0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0052}
0x41f0…41fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x005e}
0x41fa…4204 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0068}
0x4204…421a Head {h00=0x0012, h01=0x0050, text=» IFF CMULTZ=0 «, t00=0x002a, t01=0x0072}
0x421a…4224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0088}
0x4224…424a Head {h00=0x0022, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW ? «, t00=0x002a, t01=0x0092}
0x424a…4262 Head {h00=0x0014, h01=0x0050, text=» RB(L) KBMZ20 NO«, t00=0x002a, t01=0x00b8}
0x4262…4294 Head {h00=0x002e, h01=0x0050, text=»KBMZ25 SUK A4,1 ANY MORE ZEROES TO STORE ?«, t00=0x002a, t01=0x00d0}
0x4294…42ac Head {h00=0x0014, h01=0x0050, text=» RB(L) AKB368 NO«, t00=0x002a, t01=0x0102}
0x42ac…42b8 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002a, t01=0x011a}
0x42b8…42e6 Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER «, t00=0x002a, t01=0x0126}
0x42e6…42f8 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x002a, t01=0x0154}
0x42f8…431e Head {h00=0x0022, h01=0x0050, text=» CWK A1,DWTSQ FIRST POSITION ?«, t00=0x002a, t01=0x0166}
0x431e…4338 Head {h00=0x0016, h01=0x0050, text=» RF(NE) KBMZ30 NO «, t00=0x002a, t01=0x018c}
0x4338…4368 Head {h00=0x002c, h01=0x0050, text=» LDK A1,DWTEQ GET LAST POSITION IN QUEUE«, t00=0x002b, t01=0x0016}
0x4368…437a Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x002b, t01=0x0046}
0x437a…438c Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x002b, t01=0x0058}
0x438c…439e Head {h00=0x000e, h01=0x0050, text=» RF KBMZ40«, t00=0x002b, t01=0x006a}
0x439e…43d4 Head {h00=0x0032, h01=0x0050, text=»KBMZ30 ADR A1,A6 GET PREIOUS POINTER POSITION «, t00=0x002b, t01=0x007c}
0x43d4…43e6 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x002b, t01=0x00b2}
0x43e6…4416 Head {h00=0x002c, h01=0x0050, text=»KBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? «, t00=0x002b, t01=0x00c4}
0x4416…443a Head {h00=0x0020, h01=0x0050, text=» RF(E) KBMZ90 NO NOT REALY. «, t00=0x002b, t01=0x00f4}
0x443a…446e Head {h00=0x0030, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER «, t00=0x002b, t01=0x0118}
0x446e…4498 Head {h00=0x0026, h01=0x0050, text=» LDK A2,/30 STORE ZERO IN CIRKULAR«, t00=0x002b, t01=0x014c}
0x4498…44b8 Head {h00=0x001c, h01=0x0050, text=» SCR A2,A1 INPUT BUFFER «, t00=0x002b, t01=0x0176}
0x44b8…44dc Head {h00=0x0020, h01=0x0050, text=» RB KBMZ25 ONCE MORE TIME !!«, t00=0x002c, t01=0x0008}
0x44dc…44f0 Head {h00=0x0010, h01=0x0050, text=»KBMZ90 EQU *«, t00=0x002c, t01=0x002c}
0x44f0…451c Head {h00=0x0028, h01=0x0050, text=» LDK A4,/FF INDICATE BUFFER OWERFLOW«, t00=0x002c, t01=0x0040}
0x451c…452e Head {h00=0x000e, h01=0x0050, text=» SCR A4,A1«, t00=0x002c, t01=0x006c}
0x452e…4556 Head {h00=0x0024, h01=0x0050, text=» ST A1,DWTUTQ,A6 UPPDATE POINTER«, t00=0x002c, t01=0x007e}
0x4556…4582 Head {h00=0x0028, h01=0x0050, text=» LDK A1,/A SET RETURN CODE FOR BOTH «, t00=0x002c, t01=0x00a6}
0x4582…45b0 Head {h00=0x002a, h01=0x0050, text=» RB ENDIO LENGTH AND THRUGHPUT ERRORS «, t00=0x002c, t01=0x00d2}
0x45b0…45bc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0100}
0x45bc…45c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x010c}
0x45c6…45d8 Head {h00=0x000e, h01=0x0050, text=»* CLEAR«, t00=0x002c, t01=0x0116}
0x45d8…45e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0128}
0x45e2…460c Head {h00=0x0026, h01=0x0050, text=»KBCL10 LDK A3,0 RESET BUFFER INDEX«, t00=0x002c, t01=0x0132}
0x460c…4636 Head {h00=0x0026, h01=0x0050, text=» LDK A2,/18 CHANGE CHARACTER-CODE «, t00=0x002c, t01=0x015c}
0x4636…4648 Head {h00=0x000e, h01=0x0050, text=» RB AKB365«, t00=0x002c, t01=0x0186}
0x4648…4652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0008}
0x4652…4668 Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE«, t00=0x002d, t01=0x0012}
0x4668…4672 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0028}
0x4672…469c Head {h00=0x0026, h01=0x0050, text=»KBSP10 LDR A3,A3 FIRST CHARACTER? «, t00=0x002d, t01=0x0032}
0x469c…46b2 Head {h00=0x0012, h01=0x0050, text=» RF(Z) KBSP15 «, t00=0x002d, t01=0x005c}
0x46b2…46da Head {h00=0x0024, h01=0x0050, text=» SUK A3,1 DECREMENT BUFFER INDEX«, t00=0x002d, t01=0x0072}
0x46da…46fe Head {h00=0x0020, h01=0x0050, text=» LDK A2,/00 CLEAR ECB-BUFFER«, t00=0x002d, t01=0x009a}
0x46fe…4714 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x002d, t01=0x00be}
0x4714…4736 Head {h00=0x001e, h01=0x0050, text=» SUK A3,1 DECREMENT INDEX «, t00=0x002d, t01=0x00d4}
0x4736…4764 Head {h00=0x002a, h01=0x0050, text=»KBSP15 LDK A2,/8 CHANGE CHARACTER-CODE«, t00=0x002d, t01=0x00f6}
0x4764…4776 Head {h00=0x000e, h01=0x0050, text=» RB AKB365«, t00=0x002d, t01=0x0124}
0x4776…4784 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0136}
0x4784…478e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0144}
0x478e…47a2 Head {h00=0x0010, h01=0x0050, text=»* C H E K«, t00=0x002d, t01=0x014e}
0x47a2…47ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0162}
0x47ac…47b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x016c}
0x47b6…47e6 Head {h00=0x002c, h01=0x0050, text=»* SUBROUTINE TO CHECK INPUT CHARACTER«, t00=0x002d, t01=0x0176}
0x47e6…47f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0016}
0x47f0…4806 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x002e, t01=0x0020}
0x4806…4810 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0036}
0x4810…482c Head {h00=0x0018, h01=0x0050, text=»* A2 = CHARACTER «, t00=0x002e, t01=0x0040}
0x482c…484a Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x002e, t01=0x005c}
0x484a…4868 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x002e, t01=0x007a}
0x4868…4880 Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x002e, t01=0x0098}
0x4880…488a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00b0}
0x488a…4894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00ba}
0x4894…48aa Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x002e, t01=0x00c4}
0x48aa…48b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00da}
0x48b4…48d2 Head {h00=0x001a, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x002e, t01=0x00e4}
0x48d2…48dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0102}
0x48dc…48ee Head {h00=0x000e, h01=0x0050, text=»CHEK EQU *«, t00=0x002e, t01=0x010c}
0x48ee…4912 Head {h00=0x0020, h01=0x0050, text=» STR A2,A15 SAVE A2 ON STACK«, t00=0x002e, t01=0x011e}
0x4912…4926 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x002e, t01=0x0142}
0x4926…494c Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETER «, t00=0x002e, t01=0x0156}
0x494c…4956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x017c}
0x4956…496c Head {h00=0x0012, h01=0x0050, text=» IFT CSTAND=1 «, t00=0x002e, t01=0x0186}
0x496c…4976 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x000c}
0x4976…4990 Head {h00=0x0016, h01=0x0050, text=» CWK A7,2 ORDER 2?«, t00=0x002f, t01=0x0016}
0x4990…49aa Head {h00=0x0016, h01=0x0050, text=» RF(NE) CHEK05 NO «, t00=0x002f, t01=0x0030}
0x49aa…49be Head {h00=0x0010, h01=0x0050, text=» ANK A1,/20 «, t00=0x002f, t01=0x004a}
0x49be…49ea Head {h00=0x0028, h01=0x0050, text=» ORK A1,/5F 5F OR 7F AS UPPER LIMIT «, t00=0x002f, t01=0x005e}
0x49ea…4a0a Head {h00=0x001c, h01=0x0050, text=» LDK A4,/20 LOWER LIMIT «, t00=0x002f, t01=0x008a}
0x4a0a…4a1c Head {h00=0x000e, h01=0x0050, text=» RF CHEK08«, t00=0x002f, t01=0x00aa}
0x4a1c…4a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00bc}
0x4a26…4a32 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00c6}
0x4a32…4a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00d2}
0x4a3c…4a56 Head {h00=0x0016, h01=0x0050, text=»CHEK05 ANK A1,/10 «, t00=0x002f, t01=0x00dc}
0x4a56…4a6c Head {h00=0x0012, h01=0x0050, text=» RF(NE) CHEK06«, t00=0x002f, t01=0x00f6}
0x4a6c…4a8c Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F RESET BIT 9 «, t00=0x002f, t01=0x010c}
0x4a8c…4ab2 Head {h00=0x0022, h01=0x0050, text=»CHEK06 LDK A1,/39 UPPER LIMIT «, t00=0x002f, t01=0x012c}
0x4ab2…4ad2 Head {h00=0x001c, h01=0x0050, text=» LDK A4,/30 LOWER LIMIT «, t00=0x002f, t01=0x0152}
0x4ad2…4aea Head {h00=0x0014, h01=0x0050, text=»CHEK08 SUR A1,A2«, t00=0x002f, t01=0x0172}
0x4aea…4b10 Head {h00=0x0022, h01=0x0050, text=» RF(N) CHERRO CODE CHECK ERROR«, t00=0x002f, t01=0x018a}
0x4b10…4b22 Head {h00=0x000e, h01=0x0050, text=» SUR A4,A2«, t00=0x0030, t01=0x0020}
0x4b22…4b48 Head {h00=0x0022, h01=0x0050, text=» RF(P) CHERRO CODE CHECK ERROR«, t00=0x0030, t01=0x0032}
0x4b48…4b5c Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0030, t01=0x0058}
0x4b5c…4b80 Head {h00=0x0020, h01=0x0050, text=»CHEK10 LDK A1,0 RETURN CODE «, t00=0x0030, t01=0x006c}
0x4b80…4b96 Head {h00=0x0012, h01=0x0050, text=»CHEK20 RTN A5 «, t00=0x0030, t01=0x0090}
0x4b96…4ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00a6}
0x4ba0…4baa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00b0}
0x4baa…4bc8 Head {h00=0x001a, h01=0x0050, text=»* CODE CHECK ERROR «, t00=0x0030, t01=0x00ba}
0x4bc8…4bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00d8}
0x4bd2…4c04 Head {h00=0x002e, h01=0x0050, text=»CHERRO LDK A1,4 SET RETURN CODE AND RETURN«, t00=0x0030, t01=0x00e2}
0x4c04…4c2a Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A15 RELOAD CHARACTER «, t00=0x0030, t01=0x0114}
0x4c2a…4c3c Head {h00=0x000e, h01=0x0050, text=» RB CHEK20«, t00=0x0030, t01=0x013a}
0x4c3c…4c4a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x014c}
0x4c4a…4c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x015a}
0x4c54…4c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0164}
0x4c5e…4c72 Head {h00=0x0010, h01=0x0050, text=»* I H K B«, t00=0x0030, t01=0x016e}
0x4c72…4c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0182}
0x4c7c…4cc4 Head {h00=0x0044, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER«, t00=0x0030, t01=0x018c}
0x4cc4…4cce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0044}
0x4cce…4cd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x004e}
0x4cd8…4cea Head {h00=0x000e, h01=0x0050, text=»IHKB EQU *«, t00=0x0031, t01=0x0058}
0x4cea…4cfe Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0031, t01=0x006a}
0x4cfe…4d20 Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A6 GET ALLOW BITS«, t00=0x0031, t01=0x007e}
0x4d20…4d34 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/C0 «, t00=0x0031, t01=0x00a0}
0x4d34…4d6c Head {h00=0x0034, h01=0x0050, text=» RF(E) IHNOL3 INPUT ALLOWED FROM BOTH KEYBOARDS «, t00=0x0031, t01=0x00b4}
0x4d6c…4d7e Head {h00=0x000e, h01=0x0050, text=» LDK A4,1 «, t00=0x0031, t01=0x00ec}
0x4d7e…4d92 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/80 «, t00=0x0031, t01=0x00fe}
0x4d92…4da8 Head {h00=0x0012, h01=0x0050, text=» RF(E) IHNOL1 «, t00=0x0031, t01=0x0112}
0x4da8…4dba Head {h00=0x000e, h01=0x0050, text=» LDK A4,5 «, t00=0x0031, t01=0x0128}
0x4dba…4dd2 Head {h00=0x0014, h01=0x0050, text=»IHNOL1 LDR A3,A2«, t00=0x0031, t01=0x013a}
0x4dd2…4de4 Head {h00=0x000e, h01=0x0050, text=» SRL A3,12«, t00=0x0031, t01=0x0152}
0x4de4…4df6 Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0031, t01=0x0164}
0x4df6…4e0a Head {h00=0x0010, h01=0x0050, text=» RF(NE) EXIT«, t00=0x0031, t01=0x0176}
0x4e0a…4e1e Head {h00=0x0010, h01=0x0050, text=»IHNOL2 EQU *«, t00=0x0031, t01=0x018a}
0x4e1e…4e2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x000e}
0x4e2a…4e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x001a}
0x4e34…4e4a Head {h00=0x0012, h01=0x0050, text=» IFT CONVER=1 «, t00=0x0032, t01=0x0024}
0x4e4a…4e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x003a}
0x4e54…4e72 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A2 INPUT WORD «, t00=0x0032, t01=0x0044}
0x4e72…4e98 Head {h00=0x0022, h01=0x0050, text=» SRL A4,11 DEVICE ADDRESS * 2 «, t00=0x0032, t01=0x0062}
0x4e98…4eaa Head {h00=0x000e, h01=0x0050, text=» ANK A4,/E«, t00=0x0032, t01=0x0088}
0x4eaa…4ed2 Head {h00=0x0024, h01=0x0050, text=» CC A4,DWTBC,A6 8-BIT SETTING ? «, t00=0x0032, t01=0x009a}
0x4ed2…4ee8 Head {h00=0x0012, h01=0x0050, text=» RF(NE) IHKB03«, t00=0x0032, t01=0x00c2}
0x4ee8…4efa Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0032, t01=0x00d8}
0x4efa…4f0e Head {h00=0x0010, h01=0x0050, text=» ANK A3,/3F «, t00=0x0032, t01=0x00ea}
0x4f0e…4f22 Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0032, t01=0x00fe}
0x4f22…4f38 Head {h00=0x0012, h01=0x0050, text=» RF(N) IHKB01 «, t00=0x0032, t01=0x0112}
0x4f38…4f4a Head {h00=0x000e, h01=0x0050, text=» SUK A3,/A«, t00=0x0032, t01=0x0128}
0x4f4a…4f60 Head {h00=0x0012, h01=0x0050, text=» RF(N) IHKB02 «, t00=0x0032, t01=0x013a}
0x4f60…4f7a Head {h00=0x0016, h01=0x0050, text=»IHKB01 ORK A2,/80 «, t00=0x0032, t01=0x0150}
0x4f7a…4f8c Head {h00=0x000e, h01=0x0050, text=» RF IHKB04«, t00=0x0032, t01=0x016a}
0x4f8c…4fa8 Head {h00=0x0018, h01=0x0050, text=»IHKB02 ANKL A2,/FF3F«, t00=0x0032, t01=0x017c}
0x4fa8…4fba Head {h00=0x000e, h01=0x0050, text=» RF IHKB04«, t00=0x0033, t01=0x0008}
0x4fba…4ff2 Head {h00=0x0034, h01=0x0050, text=»IHKB03 LD A3,DWTCON,A6 CONVERSION TABLE ADDRESS «, t00=0x0033, t01=0x001a}
0x4ff2…5008 Head {h00=0x0012, h01=0x0050, text=» RF(E) IHKB04 «, t00=0x0033, t01=0x0052}
0x5008…501a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0033, t01=0x0068}
0x501a…502e Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0033, t01=0x007a}
0x502e…504a Head {h00=0x0018, h01=0x0050, text=» SRL A4,3 LINE INDEX«, t00=0x0033, t01=0x008e}
0x504a…505c Head {h00=0x000e, h01=0x0050, text=» ADR A3,A4«, t00=0x0033, t01=0x00aa}
0x505c…5084 Head {h00=0x0024, h01=0x0050, text=» LDR* A3,A3 COLUMN TABLE ADDRESS«, t00=0x0033, t01=0x00bc}
0x5084…509a Head {h00=0x0012, h01=0x0050, text=» RF(E) IHKB04 «, t00=0x0033, t01=0x00e4}
0x509a…50ac Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0033, t01=0x00fa}
0x50ac…50be Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x0033, t01=0x010c}
0x50be…50de Head {h00=0x001c, h01=0x0050, text=» ADR A3,A4 ADD ROW INDEX«, t00=0x0033, t01=0x011e}
0x50de…50fe Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0033, t01=0x013e}
0x50fe…5112 Head {h00=0x0010, h01=0x0050, text=»IHKB04 EQU *«, t00=0x0033, t01=0x015e}
0x5112…511c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0172}
0x511c…5128 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x017c}
0x5128…5132 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0188}
0x5132…513c (52, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0004}
0x513c…5150 Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0034, t01=0x000e}
0x5150…515a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0022}
0x515a…516c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0034, t01=0x002c}
0x516c…5180 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/3F «, t00=0x0034, t01=0x003e}
0x5180…5194 Head {h00=0x0010, h01=0x0050, text=» SUK A3,/22 «, t00=0x0034, t01=0x0052}
0x5194…51aa Head {h00=0x0012, h01=0x0050, text=» RF(Z) IHNOL6 «, t00=0x0034, t01=0x0066}
0x51aa…51bc Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0034, t01=0x007c}
0x51bc…51d2 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHNOL8«, t00=0x0034, t01=0x008e}
0x51d2…51e4 Head {h00=0x000e, h01=0x0050, text=» RF IHNOL7«, t00=0x0034, t01=0x00a4}
0x51e4…51fc Head {h00=0x0014, h01=0x0050, text=»IHNOL6 ADK A2,7 «, t00=0x0034, t01=0x00b6}
0x51fc…5218 Head {h00=0x0018, h01=0x0050, text=»IHNOL7 ANKL A2,/FF3F«, t00=0x0034, t01=0x00ce}
0x5218…522c Head {h00=0x0010, h01=0x0050, text=»IHNOL8 EQU *«, t00=0x0034, t01=0x00ea}
0x522c…5236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00fe}
0x5236…5242 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0108}
0x5242…524c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0114}
0x524c…5270 Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 I/O REQUEST?«, t00=0x0034, t01=0x011e}
0x5270…5286 Head {h00=0x0012, h01=0x0050, text=» RF(N) IHKB10 «, t00=0x0034, t01=0x0142}
0x5286…52ac Head {h00=0x0022, h01=0x0050, text=» SLL A3,7 INTERRUPTS ALLOWED? «, t00=0x0034, t01=0x0158}
0x52ac…52e4 Head {h00=0x0034, h01=0x0050, text=» RF(NN) IHKB10 NO,STORE CHARACTER IN DWT-BUFFER «, t00=0x0034, t01=0x017e}
0x52e4…52ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0026}
0x52ee…5304 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0035, t01=0x0030}
0x5304…530e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0046}
0x530e…5326 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTP,A6 «, t00=0x0035, t01=0x0050}
0x5326…5354 Head {h00=0x002a, h01=0x0050, text=» RF(E) IHKB05 NO TIMING ON THIS DEVICE«, t00=0x0035, t01=0x0068}
0x5354…5378 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,-TIME RESTART TIME «, t00=0x0035, t01=0x0096}
0x5378…5390 Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x0035, t01=0x00ba}
0x5390…539a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00d2}
0x539a…53a6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00dc}
0x53a6…53b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00e8}
0x53b0…53e0 Head {h00=0x002c, h01=0x0050, text=»IHKB05 ABL LDREG RETURN TO READ ROUTINE «, t00=0x0035, t01=0x00f2}
0x53e0…53fe Head {h00=0x001a, h01=0x0050, text=»IHKB10 LD A1,DWTINQ,A6«, t00=0x0035, t01=0x0122}
0x53fe…5410 Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0035, t01=0x0140}
0x5410…5436 Head {h00=0x0022, h01=0x0050, text=» XRK A4,/FF ALREADY OVERFLOW ?«, t00=0x0035, t01=0x0152}
0x5436…544e Head {h00=0x0014, h01=0x0050, text=» RF(E) EXIT YES «, t00=0x0035, t01=0x0178}
0x544e…5460 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0035, t01=0x0190}
0x5460…5496 Head {h00=0x0032, h01=0x0050, text=» CF A15,EOQUEU GET NEXT QUEUE POINTER ADDRESS «, t00=0x0036, t01=0x0012}
0x5496…54b8 Head {h00=0x001e, h01=0x0050, text=» CW A1,DWTUTQ,A6 OVERFLOW?«, t00=0x0036, t01=0x0048}
0x54b8…54d2 Head {h00=0x0016, h01=0x0050, text=» RF(NE) IHKB20 NO!«, t00=0x0036, t01=0x006a}
0x54d2…5506 Head {h00=0x0030, h01=0x0050, text=» ORK A2,/FF SET OVERFLOW BIT IN INPUT BUFFER«, t00=0x0036, t01=0x0084}
0x5506…5518 Head {h00=0x000e, h01=0x0050, text=» RF IHKB30«, t00=0x0036, t01=0x00b8}
0x5518…554c Head {h00=0x0030, h01=0x0050, text=»IHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER«, t00=0x0036, t01=0x00ca}
0x554c…5584 Head {h00=0x0034, h01=0x0050, text=»IHKB30 SCR A2,A3 STORE CHARACTER IN INPUT BUFFER«, t00=0x0036, t01=0x00fe}
0x5584…559a Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0036, t01=0x0136}
0x559a…55ae Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0036, t01=0x014c}
0x55ae…55c6 Head {h00=0x0014, h01=0x0050, text=»IHNOL3 LDR A3,A2«, t00=0x0036, t01=0x0160}
0x55c6…55d8 Head {h00=0x000e, h01=0x0050, text=» SRL A3,12«, t00=0x0036, t01=0x0178}
0x55d8…55ec Head {h00=0x0010, h01=0x0050, text=» LDK A4,/40 «, t00=0x0036, t01=0x018a}
0x55ec…55fe Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0037, t01=0x000e}
0x55fe…5614 Head {h00=0x0012, h01=0x0050, text=» RF(E) IHNOL4 «, t00=0x0037, t01=0x0020}
0x5614…5628 Head {h00=0x0010, h01=0x0050, text=» LDK A4,/80 «, t00=0x0037, t01=0x0036}
0x5628…563a Head {h00=0x000e, h01=0x0050, text=» SUK A3,4 «, t00=0x0037, t01=0x004a}
0x563a…5650 Head {h00=0x0012, h01=0x0050, text=» RB(NE) IHNOL2«, t00=0x0037, t01=0x005c}
0x5650…5678 Head {h00=0x0024, h01=0x0050, text=»IHNOL4 ORRS A4,A6 SET ALLOW BIT «, t00=0x0037, t01=0x0072}
0x5678…568a Head {h00=0x000e, h01=0x0050, text=» RB IHNOL2«, t00=0x0037, t01=0x009a}
0x568a…5696 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00ac}
0x5696…56a4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x00b8}
0x56a4…56ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00c6}
0x56ae…56b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00d0}
0x56b8…56d0 Head {h00=0x0014, h01=0x0050, text=»* A K B T U T«, t00=0x0037, t01=0x00da}
0x56d0…56da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00f2}
0x56da…5704 Head {h00=0x0026, h01=0x0050, text=»* THIS IS THE TIME-OUT ROUTINE «, t00=0x0037, t01=0x00fc}
0x5704…570e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0126}
0x570e…5718 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0130}
0x5718…572e Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0037, t01=0x013a}
0x572e…5738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0150}
0x5738…574c Head {h00=0x0010, h01=0x0050, text=»AKBTUT EQU *«, t00=0x0037, t01=0x015a}
0x574c…576e Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0037, t01=0x016e}
0x576e…5782 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0037, t01=0x0190}
0x5782…579a Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0038, t01=0x0014}
0x579a…57ae Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0038, t01=0x002c}
0x57ae…57d2 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 SET RETURN CODE «, t00=0x0038, t01=0x0040}
0x57d2…5802 Head {h00=0x002c, h01=0x0050, text=» RB IHKB05 RESTORE REGISTERS AND END I/O«, t00=0x0038, t01=0x0064}
0x5802…580c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0094}
0x580c…5818 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x009e}
0x5818…5826 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x00aa}
0x5826…5830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00b8}
0x5830…5868 Head {h00=0x0034, h01=0x0050, text=»* STORE = SUBROUTINE TO STORE A CHARACTER IN «, t00=0x0038, t01=0x00c2}
0x5868…58a2 Head {h00=0x0036, h01=0x0050, text=»* ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0038, t01=0x00fa}
0x58a2…58ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0134}
0x58ac…58c2 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0038, t01=0x013e}
0x58c2…58cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0154}
0x58cc…58f0 Head {h00=0x0020, h01=0x0050, text=»* A2 = CHARACTER TO STORE«, t00=0x0038, t01=0x015e}
0x58f0…590e Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x0038, t01=0x0182}
0x590e…5918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0010}
0x5918…5922 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x001a}
0x5922…5936 Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x0039, t01=0x0024}
0x5936…5958 Head {h00=0x001e, h01=0x0050, text=» LD A4,2,A8 BUFFER ADDRESS«, t00=0x0039, t01=0x0038}
0x5958…597c Head {h00=0x0020, h01=0x0050, text=» ADR A4,A3 ADD BUFFER INDEX «, t00=0x0039, t01=0x005a}
0x597c…59a8 Head {h00=0x0028, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER IN BUFFER«, t00=0x0039, t01=0x007e}
0x59a8…59d0 Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0039, t01=0x00aa}
0x59d0…59e4 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0039, t01=0x00d2}
0x59e4…5a06 Head {h00=0x001e, h01=0x0050, text=» RF EOQU20 RTN A15 AND ENB«, t00=0x0039, t01=0x00e6}
0x5a06…5a14 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0108}
0x5a14…5a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0116}
0x5a1e…5a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0120}
0x5a28…5a62 Head {h00=0x0036, h01=0x0050, text=»* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER«, t00=0x0039, t01=0x012a}
0x5a62…5a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0164}
0x5a6c…5a82 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0039, t01=0x016e}
0x5a82…5a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0184}
0x5a8c…5aac Head {h00=0x001c, h01=0x0050, text=»* A1 = QUEUE POINTER «, t00=0x0039, t01=0x018e}
0x5aac…5aca Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x003a, t01=0x001e}
0x5aca…5ad4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x003c}
0x5ad4…5aea Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x003a, t01=0x0046}
0x5aea…5af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x005c}
0x5af4…5b18 Head {h00=0x0020, h01=0x0050, text=»* A1 = NEW QUEUE POINTER «, t00=0x003a, t01=0x0066}
0x5b18…5b2c Head {h00=0x0010, h01=0x0050, text=»EOQUEU EQU *«, t00=0x003a, t01=0x008a}
0x5b2c…5b38 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x003a, t01=0x009e}
0x5b38…5b4a Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x003a, t01=0x00aa}
0x5b4a…5b5c Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x003a, t01=0x00bc}
0x5b5c…5b80 Head {h00=0x0020, h01=0x0050, text=» CWK A1,DWTEQ END OF QUEUE? «, t00=0x003a, t01=0x00ce}
0x5b80…5b96 Head {h00=0x0012, h01=0x0050, text=» RF(NE) EOQU10«, t00=0x003a, t01=0x00f2}
0x5b96…5bc4 Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTSQ SET QUEUE START ADDRESS «, t00=0x003a, t01=0x0108}
0x5bc4…5bdc Head {h00=0x0014, h01=0x0050, text=»EOQU10 ADR A1,A6«, t00=0x003a, t01=0x0136}
0x5bdc…5c08 Head {h00=0x0028, h01=0x0050, text=»EOQU20 ABL RTNA15 RETURN AND ENABLE «, t00=0x003a, t01=0x014e}
0x5c08…5c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x017a}
0x5c12…5c1e Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x003a, t01=0x0184}
0x5c1e…5c22 (59, 2, 8) Head {h00=0x4004, h01=0x0000}
0x5c22…5c26 00 3b 00 04 ┆ ; ┆
0x5c26…5c2e (60, 1, 8) 20 04 00 00 00 3c 00 04 ┆ < ┆