|
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: 23610 (0x5c3a)
Notes: pts_type(SC)
Names: »DRKB01.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/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 X:F 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 X:A * * ECHO FUNCTION MAY BE EXCLUDED BY * SETTING X:B = 0. * X:B EQU 1 CECHO EQU X:B * * STANDARD READ MAY BE EXCLUDED BY * SETTING X:C = 0. * X:C EQU 1 CSTAND EQU X:C * * 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 X:D * 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 X:E ** ** * 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 X:G * * * 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 0 * * 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 X:F 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…1966 Head {h00=0x0012, h01=0x0050, text=»CTIMUT EQU X:A«, t00=0x0010, t01=0x0056}
0x1966…1970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006c}
0x1970…199e Head {h00=0x002a, h01=0x0050, text=»* ECHO FUNCTION MAY BE EXCLUDED BY «, t00=0x0010, t01=0x0076}
0x199e…19bc Head {h00=0x001a, h01=0x0050, text=»* SETTING X:B = 0. «, t00=0x0010, t01=0x00a4}
0x19bc…19c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c2}
0x19c6…19d8 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0010, t01=0x00cc}
0x19d8…19ee Head {h00=0x0012, h01=0x0050, text=»CECHO EQU X:B «, t00=0x0010, t01=0x00de}
0x19ee…19f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f4}
0x19f8…1a26 Head {h00=0x002a, h01=0x0050, text=»* STANDARD READ MAY BE EXCLUDED BY «, t00=0x0010, t01=0x00fe}
0x1a26…1a44 Head {h00=0x001a, h01=0x0050, text=»* SETTING X:C = 0. «, t00=0x0010, t01=0x012c}
0x1a44…1a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x014a}
0x1a4e…1a60 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x0010, t01=0x0154}
0x1a60…1a76 Head {h00=0x0012, h01=0x0050, text=»CSTAND EQU X:C«, t00=0x0010, t01=0x0166}
0x1a76…1a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x017c}
0x1a80…1ab2 Head {h00=0x002e, h01=0x0050, text=»* DOUBLE ZERO MAY BE INCLUDED IN SYSTEM«, t00=0x0010, t01=0x0186}
0x1ab2…1ade Head {h00=0x0028, h01=0x0050, text=»* BY SETTING X:D = 2. SETTING X:D«, t00=0x0011, t01=0x0028}
0x1ade…1b0e Head {h00=0x002c, h01=0x0050, text=»* = 3 GIVES A THREE ZERO FUNCTION AND«, t00=0x0011, t01=0x0054}
0x1b0e…1b46 Head {h00=0x0034, h01=0x0050, text=»* X:D = 4 GIVES FOUR-ZERO FUNCTION AND SO ON «, t00=0x0011, t01=0x0084}
0x1b46…1b7e Head {h00=0x0034, h01=0x0050, text=»* X:D = 0 EXCLUDES THE MULTIPLE ZERO FUNCTION«, t00=0x0011, t01=0x00bc}
0x1b7e…1b88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f4}
0x1b88…1b9a Head {h00=0x000e, h01=0x0050, text=»X:D EQU 2 «, t00=0x0011, t01=0x00fe}
0x1b9a…1bb0 Head {h00=0x0012, h01=0x0050, text=»CMULTZ EQU X:D«, t00=0x0011, t01=0x0110}
0x1bb0…1bba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0126}
0x1bba…1bc8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0130}
0x1bc8…1bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x013e}
0x1bd2…1c0e Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:E = 1 FOLLOWING POWER OFF FUNCTION«, t00=0x0011, t01=0x0148}
0x1c0e…1c3a Head {h00=0x0028, h01=0x0050, text=»* CAN BE INCLUDED IN THE DRIVER. «, t00=0x0011, t01=0x0184}
0x1c3a…1c7c Head {h00=0x003e, h01=0x0050, text=»* IF THERE IS A READ REQUEST, THIS IS COMPLETED WITH -2«, t00=0x0012, t01=0x0020}
0x1c7c…1cc0 Head {h00=0x0040, h01=0x0050, text=»* SET IN THE CONTROL WORD OF ECB. IF NOT A POWER OFF FLAG«, t00=0x0012, t01=0x0062}
0x1cc0…1d06 Head {h00=0x0042, h01=0x0050, text=»* IS SET, CAUSING THE FIRST READ REQUEST AFTER POWER ON TO «, t00=0x0012, t01=0x00a6}
0x1d06…1d3c Head {h00=0x0032, h01=0x0050, text=»* BE COMPLETED WITH CONTROL WORD SET TO -2.«, t00=0x0012, t01=0x00ec}
0x1d3c…1d46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0122}
0x1d46…1d58 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x0012, t01=0x012c}
0x1d58…1d6e Head {h00=0x0012, h01=0x0050, text=»POWOFF EQU X:E«, t00=0x0012, t01=0x013e}
0x1d6e…1d78 Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0012, t01=0x0154}
0x1d78…1d82 Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0012, t01=0x015e}
0x1d82…1dba Head {h00=0x0034, h01=0x0050, text=»* BY SETTING X:G TO 1 THE CODE CONVERSION VIA«, t00=0x0012, t01=0x0168}
0x1dba…1df0 Head {h00=0x0032, h01=0x0050, text=»* "8-BIT" SETTING AND CONVERSION TABLES IS «, t00=0x0013, t01=0x0010}
0x1df0…1e14 Head {h00=0x0020, h01=0x0050, text=»* INCLUDED IN THE DRIVER.«, t00=0x0013, t01=0x0046}
0x1e14…1e1e Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0013, t01=0x006a}
0x1e1e…1e30 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x0013, t01=0x0074}
0x1e30…1e46 Head {h00=0x0012, h01=0x0050, text=»CONVER EQU X:G«, t00=0x0013, t01=0x0086}
0x1e46…1e4e Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x009c}
0x1e4e…1e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a4}
0x1e58…1e62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ae}
0x1e62…1e9e Head {h00=0x0038, h01=0x0050, text=»* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS «, t00=0x0013, t01=0x00b8}
0x1e9e…1ec0 Head {h00=0x001e, h01=0x0050, text=»* BY SETTING CREDIT = 1 «, t00=0x0013, t01=0x00f4}
0x1ec0…1ef4 Head {h00=0x0030, h01=0x0050, text=»* ORDER /04 IS THEN REPLACED BY ORDER /31 «, t00=0x0013, t01=0x0116}
0x1ef4…1f34 Head {h00=0x003c, h01=0x0050, text=»* BY SETTING CREDIT=1 THIS DRIVER INDEX THE EOR-KEYS «, t00=0x0013, t01=0x014a}
0x1f34…1f7a Head {h00=0x0042, h01=0x0050, text=»* IN THE FOLOWING WAY: THE FIRST KEY IN THE EOR-KEY-TABLE «, t00=0x0013, t01=0x018a}
0x1f7a…1fbe Head {h00=0x0040, h01=0x0050, text=»* IS GIVEN INDEX =1, THE SECOND EOR-KEY IS GIVEN INDEX=1 «, t00=0x0014, t01=0x0040}
0x1fbe…1fee Head {h00=0x002c, h01=0x0050, text=»* AND SO ON. (INDEX= 1,2,3,4,... ) «, t00=0x0014, t01=0x0084}
0x1fee…202a Head {h00=0x0038, h01=0x0050, text=»* CONTROL WORD OF ECB IS SET TO ZERO INSTED OF -2«, t00=0x0014, t01=0x00b4}
0x202a…2034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f0}
0x2034…203e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00fa}
0x203e…2046 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0104}
0x2046…205a Head {h00=0x0010, h01=0x0050, text=»CREDIT EQU 0«, t00=0x0014, t01=0x010c}
0x205a…2064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0120}
0x2064…209c Head {h00=0x0034, h01=0x0050, text=»* BY SETTING NOLJE=1 THIS DRIVER IS PREPARED «, t00=0x0014, t01=0x012a}
0x209c…20d0 Head {h00=0x0030, h01=0x0050, text=»* TO HANDLE THE NORWAY-CASE WITH BETWEEN «, t00=0x0014, t01=0x0162}
0x20d0…2102 Head {h00=0x002e, h01=0x0050, text=»* THEMSELVES DEPENDENT KEYBOARDS ON THE«, t00=0x0015, t01=0x0008}
0x2102…2122 Head {h00=0x001c, h01=0x0050, text=»* SAME SELECTOR UNIT.«, t00=0x0015, t01=0x003a}
0x2122…212c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005a}
0x212c…2140 Head {h00=0x0010, h01=0x0050, text=»NOLJE EQU 0 «, t00=0x0015, t01=0x0064}
0x2140…214e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0078}
0x214e…2158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0086}
0x2158…2162 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0090}
0x2162…2178 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0015, t01=0x009a}
0x2178…218e Head {h00=0x0012, h01=0x0050, text=»* TABLES *«, t00=0x0015, t01=0x00b0}
0x218e…21a4 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0015, t01=0x00c6}
0x21a4…21ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00dc}
0x21ae…21c0 Head {h00=0x000e, h01=0x0050, text=»KBAD EQU *«, t00=0x0015, t01=0x00e6}
0x21c0…21e4 Head {h00=0x0020, h01=0x0050, text=» DATA ACKB ACTIVATION DRIVER«, t00=0x0015, t01=0x00f8}
0x21e4…2208 Head {h00=0x0020, h01=0x0050, text=» DATA IHKB INTERRUPT HANDLER«, t00=0x0015, t01=0x011c}
0x2208…2212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0140}
0x2212…2228 Head {h00=0x0012, h01=0x0050, text=» IFF POWOFF=1 «, t00=0x0015, t01=0x014a}
0x2228…2232 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0160}
0x2232…224e Head {h00=0x0018, h01=0x0050, text=» DATA 0 NO RECOVERY «, t00=0x0015, t01=0x016a}
0x224e…2258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0186}
0x2258…2264 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0190}
0x2264…226e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x000c}
0x226e…2278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0016}
0x2278…228e Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0016, t01=0x0020}
0x228e…2298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0036}
0x2298…22bc Head {h00=0x0020, h01=0x0050, text=» DATA RCKB RECOVERY ROUTINE «, t00=0x0016, t01=0x0040}
0x22bc…22ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0064}
0x22ca…22d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0072}
0x22d4…22de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x007c}
0x22de…22f2 Head {h00=0x0010, h01=0x0050, text=»* R C K B«, t00=0x0016, t01=0x0086}
0x22f2…22fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009a}
0x22fc…2332 Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE RECOVERY ROUTINE FOR KEYBOARD«, t00=0x0016, t01=0x00a4}
0x2332…235c Head {h00=0x0026, h01=0x0050, text=»* ENTERED FROM CHLT/CHRT DRIVER«, t00=0x0016, t01=0x00da}
0x235c…2366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0104}
0x2366…2378 Head {h00=0x000e, h01=0x0050, text=»RCKB EQU *«, t00=0x0016, t01=0x010e}
0x2378…238e Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0016, t01=0x0120}
0x238e…23ac Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTST,A6 BUSY ?«, t00=0x0016, t01=0x0136}
0x23ac…23c2 Head {h00=0x0012, h01=0x0050, text=» RF(NN) RCKB10«, t00=0x0016, t01=0x0154}
0x23c2…23d8 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x0016, t01=0x016a}
0x23d8…240c Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER OFF OCCURED «, t00=0x0016, t01=0x0180}
0x240c…241e Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0017, t01=0x0024}
0x241e…2448 Head {h00=0x0026, h01=0x0050, text=»RCKB10 CF A5,LDREGE LOAD REGISTERS«, t00=0x0017, t01=0x0036}
0x2448…245a Head {h00=0x000e, h01=0x0050, text=» RF AKB202«, t00=0x0017, t01=0x0060}
0x245a…2464 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0072}
0x2464…2470 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x007c}
0x2470…247a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0088}
0x247a…2488 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0092}
0x2488…2492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a0}
0x2492…249c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00aa}
0x249c…24b0 Head {h00=0x0010, h01=0x0050, text=»* A C K B«, t00=0x0017, t01=0x00b4}
0x24b0…24ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c8}
0x24ba…24d8 Head {h00=0x001a, h01=0x0050, text=»* ACTIVATION PART: «, t00=0x0017, t01=0x00d2}
0x24d8…24e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00f0}
0x24e2…2516 Head {h00=0x0030, h01=0x0050, text=»* CHECKS VALIDITY OF ORDERS AND EXAMINES «, t00=0x0017, t01=0x00fa}
0x2516…2546 Head {h00=0x002c, h01=0x0050, text=»* INPUT BUFFER TO SEE IF SOME QUEUED «, t00=0x0017, t01=0x012e}
0x2546…255e Head {h00=0x0014, h01=0x0050, text=»* TO THREAT. «, t00=0x0017, t01=0x015e}
0x255e…2568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0176}
0x2568…2572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0180}
0x2572…2584 Head {h00=0x000e, h01=0x0050, text=»ACKB EQU *«, t00=0x0017, t01=0x018a}
0x2584…259a Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/FEFF«, t00=0x0018, t01=0x000c}
0x259a…25d0 Head {h00=0x0032, h01=0x0050, text=» ANS A1,DWTST,A6 RESET INTERRUPTS ALLOWED FLAG«, t00=0x0018, t01=0x0022}
0x25d0…25e2 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0018, t01=0x0058}
0x25e2…2606 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0018, t01=0x006a}
0x2606…2618 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0018, t01=0x008e}
0x2618…263e Head {h00=0x0022, h01=0x0050, text=» RF(NG) AKB100 ILLEGEAL ORDER «, t00=0x0018, t01=0x00a0}
0x263e…2652 Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0018, t01=0x00c6}
0x2652…2676 Head {h00=0x0020, h01=0x0050, text=» CWK A7,/37 SELECT KEYBOARD «, t00=0x0018, t01=0x00da}
0x2676…268c Head {h00=0x0012, h01=0x0050, text=» RF(E) AKBSEL «, t00=0x0018, t01=0x00fe}
0x268c…2698 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0114}
0x2698…26ae Head {h00=0x0012, h01=0x0050, text=» IFT CSTAND=0 «, t00=0x0018, t01=0x0120}
0x26ae…26c0 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0018, t01=0x0136}
0x26c0…26f0 Head {h00=0x002c, h01=0x0050, text=» RF(Z) AKB100 STANDARD READ NOT ALLOWED «, t00=0x0018, t01=0x0148}
0x26f0…2702 Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x0018, t01=0x0178}
0x2702…270e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x018a}
0x270e…2716 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0008}
0x2716…2728 Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0019, t01=0x0010}
0x2728…2730 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0022}
0x2730…2746 Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=1 «, t00=0x0019, t01=0x002a}
0x2746…275a Head {h00=0x0010, h01=0x0050, text=» SUK A4,/2D «, t00=0x0019, t01=0x0040}
0x275a…2782 Head {h00=0x0024, h01=0x0050, text=» RF(Z) CRE:10 SKIP INPUT BUFFER «, t00=0x0019, t01=0x0054}
0x2782…2796 Head {h00=0x0010, h01=0x0050, text=» ADK A4,/2D «, t00=0x0019, t01=0x007c}
0x2796…27aa Head {h00=0x0010, h01=0x0050, text=»CRE:10 EQU *«, t00=0x0019, t01=0x0090}
0x27aa…27b6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00a4}
0x27b6…27d4 Head {h00=0x001a, h01=0x0050, text=» RF(Z) AKB110 ORDER 4 «, t00=0x0019, t01=0x00b0}
0x27d4…27f8 Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB200 ORDER 1,2 OR 3«, t00=0x0019, t01=0x00ce}
0x27f8…2826 Head {h00=0x002a, h01=0x0050, text=»AKB100 ORKL A1,/8000 I/O REQUEST ERROR«, t00=0x0019, t01=0x00f2}
0x2826…283a Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x0019, t01=0x0120}
0x283a…2848 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0134}
0x2848…2852 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0142}
0x2852…285c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x014c}
0x285c…2884 Head {h00=0x0024, h01=0x0050, text=»* ORDER 4 RESET INPUT BUFFER «, t00=0x0019, t01=0x0156}
0x2884…288e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x017e}
0x288e…28b4 Head {h00=0x0022, h01=0x0050, text=»AKB110 LD A2,DWTINQ,A6 ORDER 4«, t00=0x0019, t01=0x0188}
0x28b4…28e0 Head {h00=0x0028, h01=0x0050, text=» SCR A1,A2 RESET OVERFLOW IF OCCURED«, t00=0x001a, t01=0x001e}
0x28e0…290c Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE «, t00=0x001a, t01=0x004a}
0x290c…2928 Head {h00=0x0018, h01=0x0050, text=» ABL ENDI05 END I/O «, t00=0x001a, t01=0x0076}
0x2928…293c Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x001a, t01=0x0092}
0x293c…2946 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00a6}
0x2946…2950 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b0}
0x2950…2976 Head {h00=0x0022, h01=0x0050, text=»* ORDER 37 SELECT KEYBOARD«, t00=0x001a, t01=0x00ba}
0x2976…2980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e0}
0x2980…299c Head {h00=0x0018, h01=0x0050, text=»AKBSEL LDKL A2,/FF7F«, t00=0x001a, t01=0x00ea}
0x299c…29ca Head {h00=0x002a, h01=0x0050, text=» ANRS A2,A6 RESET ALLOW BITS IN DWTCHP«, t00=0x001a, t01=0x0106}
0x29ca…29de Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x001a, t01=0x0134}
0x29de…29ea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0148}
0x29ea…29f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0154}
0x29f8…2a02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0162}
0x2a02…2a0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016c}
0x2a0c…2a28 Head {h00=0x0018, h01=0x0050, text=»* ORDER 1 2 3«, t00=0x001a, t01=0x0176}
0x2a28…2a32 (27, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0004}
0x2a32…2a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x000e}
0x2a3c…2a50 Head {h00=0x0010, h01=0x0050, text=»AKB200 EQU *«, t00=0x001b, t01=0x0018}
0x2a50…2a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x002c}
0x2a5a…2a70 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x001b, t01=0x0036}
0x2a70…2a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x004c}
0x2a7a…2a92 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x001b, t01=0x0056}
0x2a92…2ab4 Head {h00=0x001e, h01=0x0050, text=» ANKL A2,/200 POWER OFF ? «, t00=0x001b, t01=0x006e}
0x2ab4…2aca Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB205 «, t00=0x001b, t01=0x0090}
0x2aca…2aec Head {h00=0x001e, h01=0x0050, text=» XRS A2,DWTST,A6 RESET BIT«, t00=0x001b, t01=0x00a6}
0x2aec…2af8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00c8}
0x2af8…2b0c Head {h00=0x0010, h01=0x0050, text=»AKB202 EQU *«, t00=0x001b, t01=0x00d4}
0x2b0c…2b2a Head {h00=0x001a, h01=0x0050, text=» IFT CREDIT-POWOFF=-1 «, t00=0x001b, t01=0x00e8}
0x2b2a…2b50 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,-2 INDICATE POWER ON «, t00=0x001b, t01=0x0106}
0x2b50…2b64 Head {h00=0x0010, h01=0x0050, text=» ST A1,10,A8«, t00=0x001b, t01=0x012c}
0x2b64…2b70 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0140}
0x2b70…2b8c Head {h00=0x0018, h01=0x0050, text=» IFT CREDIT+POWOFF=2«, t00=0x001b, t01=0x014c}
0x2b8c…2bb0 Head {h00=0x0020, h01=0x0050, text=» CM 10,A8 INDICATE POWER ON «, t00=0x001b, t01=0x0168}
0x2bb0…2bbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x018c}
0x2bbc…2bd2 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x001c, t01=0x0008}
0x2bd2…2be6 Head {h00=0x0010, h01=0x0050, text=» ABL AKB380 «, t00=0x001c, t01=0x001e}
0x2be6…2bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0032}
0x2bf0…2bfc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x003c}
0x2bfc…2c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0048}
0x2c06…2c1a Head {h00=0x0010, h01=0x0050, text=»AKB205 EQU *«, t00=0x001c, t01=0x0052}
0x2c1a…2c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0066}
0x2c24…2c3a Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001c, t01=0x0070}
0x2c3a…2c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0086}
0x2c44…2c58 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A6 «, t00=0x001c, t01=0x0090}
0x2c58…2c74 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/40 TIMING ?«, t00=0x001c, t01=0x00a4}
0x2c74…2ca4 Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB210 NO TIMING FOR THIS DEVICE «, t00=0x001c, t01=0x00c0}
0x2ca4…2cbc Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x001c, t01=0x00f0}
0x2cbc…2cd2 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKBTIM «, t00=0x001c, t01=0x0108}
0x2cd2…2ce8 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,-TIME«, t00=0x001c, t01=0x011e}
0x2ce8…2d00 Head {h00=0x0014, h01=0x0050, text=» ST* A4,DWTTP,A6«, t00=0x001c, t01=0x0134}
0x2d00…2d12 Head {h00=0x000e, h01=0x0050, text=» RF AKB210«, t00=0x001c, t01=0x014c}
0x2d12…2d26 Head {h00=0x0010, h01=0x0050, text=»AKBTIM EQU *«, t00=0x001c, t01=0x015e}
0x2d26…2d4a Head {h00=0x0020, h01=0x0050, text=» LDK A4,DWTTP TIMER POINTER «, t00=0x001c, t01=0x0172}
0x2d4a…2d6c Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT-ADDRESS«, t00=0x001d, t01=0x0008}
0x2d6c…2d7e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001d, t01=0x002a}
0x2d7e…2d9e Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIME «, t00=0x001d, t01=0x003c}
0x2d9e…2dd2 Head {h00=0x0030, h01=0x0050, text=» DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME «, t00=0x001d, t01=0x005c}
0x2dd2…2e04 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT«, t00=0x001d, t01=0x0090}
0x2e04…2e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c2}
0x2e0e…2e1a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00cc}
0x2e1a…2e24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00d8}
0x2e24…2e4e Head {h00=0x0026, h01=0x0050, text=»AKB210 LD A2,4,A8 REQUESTED LENGTH«, t00=0x001d, t01=0x00e2}
0x2e4e…2e7e Head {h00=0x002c, h01=0x0050, text=»AKB220 RF(E) AKB380 RESET A1 AND END I/O«, t00=0x001d, t01=0x010c}
0x2e7e…2e9e Head {h00=0x001c, h01=0x0050, text=» LDR A3,A3 FIRST TIME ? «, t00=0x001d, t01=0x013c}
0x2e9e…2eb8 Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB240 NO «, t00=0x001d, t01=0x015c}
0x2eb8…2eda Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A8 BUFFER ADDRESS«, t00=0x001d, t01=0x0176}
0x2eda…2eec Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001e, t01=0x0008}
0x2eec…2f10 Head {h00=0x0020, h01=0x0050, text=» ADR A1,A2 ADDRESS IN BUFFER«, t00=0x001e, t01=0x001a}
0x2f10…2f38 Head {h00=0x0024, h01=0x0050, text=»AKB230 SCR A3,A1 STORE CHARACTER«, t00=0x001e, t01=0x003e}
0x2f38…2f5e Head {h00=0x0022, h01=0x0050, text=» SUK A1,1 NEXT CHAR. POSITION «, t00=0x001e, t01=0x0066}
0x2f5e…2f76 Head {h00=0x0014, h01=0x0050, text=» SUK A2,1 LAST ?«, t00=0x001e, t01=0x008c}
0x2f76…2f90 Head {h00=0x0016, h01=0x0050, text=» RB(NE) AKB230 NO «, t00=0x001e, t01=0x00a4}
0x2f90…2f9e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x00be}
0x2f9e…2fa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00cc}
0x2fa8…2fd8 Head {h00=0x002c, h01=0x0050, text=»* READ CHARACTER FROM INPUT BUFFER OR«, t00=0x001e, t01=0x00d6}
0x2fd8…3002 Head {h00=0x0026, h01=0x0050, text=»* WAIT FOR KEY-BOARD INTERRUPT «, t00=0x001e, t01=0x0106}
0x3002…300c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0130}
0x300c…3020 Head {h00=0x0010, h01=0x0050, text=»AKB240 EQU *«, t00=0x001e, t01=0x013a}
0x3020…3038 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTUTQ,A6«, t00=0x001e, t01=0x014e}
0x3038…3056 Head {h00=0x001a, h01=0x0050, text=» LCR A2,A1 CHAR. TO A2«, t00=0x001e, t01=0x0166}
0x3056…3068 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001e, t01=0x0184}
0x3068…3086 Head {h00=0x001a, h01=0x0050, text=» XRK A4,/FF OVERFLOW ?«, t00=0x001f, t01=0x0008}
0x3086…309c Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB250«, t00=0x001f, t01=0x0026}
0x309c…30c2 Head {h00=0x0022, h01=0x0050, text=» SCR A4,A1 RESET OVERFLOW MARK«, t00=0x001f, t01=0x003c}
0x30c2…30e6 Head {h00=0x0020, h01=0x0050, text=» LDK A1,OVMASK OVERFLOW SET «, t00=0x001f, t01=0x0062}
0x30e6…30f8 Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x001f, t01=0x0086}
0x30f8…312a Head {h00=0x002e, h01=0x0050, text=»AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE?«, t00=0x001f, t01=0x0098}
0x312a…3140 Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB260«, t00=0x001f, t01=0x00ca}
0x3140…3166 Head {h00=0x0022, h01=0x0050, text=» CF A5,STREG NOTHING IN QUEUE «, t00=0x001f, t01=0x00e0}
0x3166…317c Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001f, t01=0x0106}
0x317c…31aa Head {h00=0x002a, h01=0x0050, text=» LDR A1,A1 CHECK TIME OUT RETURN CODE «, t00=0x001f, t01=0x011c}
0x31aa…31cc Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB270 NO TIME-OUT «, t00=0x001f, t01=0x014a}
0x31cc…31f2 Head {h00=0x0022, h01=0x0050, text=» RF ENDI05 END I/O AT TIME OUT«, t00=0x001f, t01=0x016c}
0x31f2…31fe (32, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0004}
0x31fe…3214 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=0 «, t00=0x0020, t01=0x0010}
0x3214…3226 Head {h00=0x000e, h01=0x0050, text=» RF AKB270«, t00=0x0020, t01=0x0026}
0x3226…3232 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0038}
0x3232…3266 Head {h00=0x0030, h01=0x0050, text=»AKB260 CF A15,EOQUEU NEXT OUT QUEUE POINTER «, t00=0x0020, t01=0x0044}
0x3266…3290 Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW POINTER«, t00=0x0020, t01=0x0078}
0x3290…32a8 Head {h00=0x0014, h01=0x0050, text=»AKB270 LDR A4,A7«, t00=0x0020, t01=0x00a2}
0x32a8…32ba Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0020, t01=0x00ba}
0x32ba…32de Head {h00=0x0020, h01=0x0050, text=» RF(NN) AKB310 ORDER 2 OR 3 «, t00=0x0020, t01=0x00cc}
0x32de…32ec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x00f0}
0x32ec…32f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00fe}
0x32f6…3300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0108}
0x3300…3320 Head {h00=0x001c, h01=0x0050, text=»* ORDER 1 BASIC READ«, t00=0x0020, t01=0x0112}
0x3320…332a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0132}
0x332a…335e Head {h00=0x0030, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN ECB-BUFFER «, t00=0x0020, t01=0x013c}
0x335e…3372 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0020, t01=0x0170}
0x3372…339e Head {h00=0x0028, h01=0x0050, text=» CF A5,ECHO ECHO INPUTTED CHARACTER «, t00=0x0020, t01=0x0184}
0x339e…33aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0020}
0x33aa…33de Head {h00=0x0030, h01=0x0050, text=» CW A3,4,A8 EFFECTIVE LENGTH = REQ. LENGTH? «, t00=0x0021, t01=0x002c}
0x33de…33f0 Head {h00=0x000e, h01=0x0050, text=» RB AKB220«, t00=0x0021, t01=0x0060}
0x33f0…33fe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0072}
0x33fe…3408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0080}
0x3408…3412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x008a}
0x3412…3448 Head {h00=0x0032, h01=0x0050, text=»* ORDER 2 OR 3 STANDARD AND NUMERIC READ «, t00=0x0021, t01=0x0094}
0x3448…3452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ca}
0x3452…348c Head {h00=0x0036, h01=0x0050, text=»* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE«, t00=0x0021, t01=0x00d4}
0x348c…3496 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x010e}
0x3496…34a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0118}
0x34a0…34cc Head {h00=0x0028, h01=0x0050, text=»AKB310 LD A1,10,A8 KEY-TABLE ADDRESS«, t00=0x0021, t01=0x0122}
0x34cc…34ee Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB359 NO KEYTABLE «, t00=0x0021, t01=0x014e}
0x34ee…3514 Head {h00=0x0022, h01=0x0050, text=» LCR A4,A1 TABLE LENGTH IN A4 «, t00=0x0021, t01=0x0170}
0x3514…3528 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0022, t01=0x0008}
0x3528…3552 Head {h00=0x0026, h01=0x0050, text=» ADR A1,A4 LAST PLACE IN KEY-TABLE«, t00=0x0022, t01=0x001c}
0x3552…3564 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0022, t01=0x0046}
0x3564…357c Head {h00=0x0014, h01=0x0050, text=»AKB355 SUK A4,1 «, t00=0x0022, t01=0x0058}
0x357c…35ac Head {h00=0x002c, h01=0x0050, text=» RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE«, t00=0x0022, t01=0x0070}
0x35ac…35c6 Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 NEXT KEY«, t00=0x0022, t01=0x00a0}
0x35c6…35e8 Head {h00=0x001e, h01=0x0050, text=» CCR A2,A1 EOR-CHARACTER? «, t00=0x0022, t01=0x00ba}
0x35e8…3602 Head {h00=0x0016, h01=0x0050, text=» RB(NE) AKB355 NO «, t00=0x0022, t01=0x00dc}
0x3602…3618 Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=0 «, t00=0x0022, t01=0x00f6}
0x3618…363c Head {h00=0x0020, h01=0x0050, text=» ADR A4,A4 YES DOUBLE INDEX «, t00=0x0022, t01=0x010c}
0x363c…3648 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0130}
0x3648…365e Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=1 «, t00=0x0022, t01=0x013c}
0x365e…368a Head {h00=0x0028, h01=0x0050, text=» ADK A4,1 INDEX STARTS AT ONE,INCR=1«, t00=0x0022, t01=0x0152}
0x368a…3696 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x017e}
0x3696…36c6 Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROLWORD «, t00=0x0022, t01=0x018a}
0x36c6…36f2 Head {h00=0x0028, h01=0x0050, text=»AKB358 CF A15,STORE STORE CHARACTER «, t00=0x0023, t01=0x002a}
0x36f2…3704 Head {h00=0x000e, h01=0x0050, text=» RF AKB370«, t00=0x0023, t01=0x0056}
0x3704…370e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0068}
0x370e…3718 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0072}
0x3718…3750 Head {h00=0x0034, h01=0x0050, text=»AKB359 CC A2,KBEOF,A6 STANDARD END OF RECORD KEY«, t00=0x0023, t01=0x007c}
0x3750…376a Head {h00=0x0016, h01=0x0050, text=» RB(E) AKB358 YES «, t00=0x0023, t01=0x00b4}
0x376a…3778 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00ce}
0x3778…3782 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00dc}
0x3782…37b0 Head {h00=0x002a, h01=0x0050, text=»* CHARACTER NOT FOUND IN KEY-TABLE.«, t00=0x0023, t01=0x00e6}
0x37b0…37d2 Head {h00=0x001e, h01=0x0050, text=»* CHECK CHARACTER CODE.«, t00=0x0023, t01=0x0114}
0x37d2…37dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0136}
0x37dc…37f0 Head {h00=0x0010, h01=0x0050, text=»AKB360 EQU *«, t00=0x0023, t01=0x0140}
0x37f0…3814 Head {h00=0x0020, h01=0x0050, text=» CF A5,CHEK CHECK CHARACTER «, t00=0x0023, t01=0x0154}
0x3814…383e Head {h00=0x0026, h01=0x0050, text=» LDR* A4,A6 GET CHANNEL PARAMETER «, t00=0x0023, t01=0x0178}
0x383e…3860 Head {h00=0x001e, h01=0x0050, text=» ANK A4,/20 SHIFT BIT 9 ? «, t00=0x0024, t01=0x0012}
0x3860…387a Head {h00=0x0016, h01=0x0050, text=» RF(E) AKB361 YES «, t00=0x0024, t01=0x0034}
0x387a…3896 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A2 CHARACTER«, t00=0x0024, t01=0x004e}
0x3896…38a8 Head {h00=0x000e, h01=0x0050, text=» RF AKB363«, t00=0x0024, t01=0x006a}
0x38a8…38bc Head {h00=0x0010, h01=0x0050, text=»AKB361 EQU *«, t00=0x0024, t01=0x007c}
0x38bc…38d0 Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A6 «, t00=0x0024, t01=0x0090}
0x38d0…38ee Head {h00=0x001a, h01=0x0050, text=» ANK A4,/10 PTS 6234 ?«, t00=0x0024, t01=0x00a4}
0x38ee…3904 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB362 «, t00=0x0024, t01=0x00c2}
0x3904…3916 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0024, t01=0x00d8}
0x3916…392a Head {h00=0x0010, h01=0x0050, text=» ANK A4,/80 «, t00=0x0024, t01=0x00ea}
0x392a…3940 Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB362«, t00=0x0024, t01=0x00fe}
0x3940…3952 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0024, t01=0x0114}
0x3952…3964 Head {h00=0x000e, h01=0x0050, text=» RF AKB363«, t00=0x0024, t01=0x0126}
0x3964…3978 Head {h00=0x0010, h01=0x0050, text=»AKB362 EQU *«, t00=0x0024, t01=0x0138}
0x3978…3994 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A2 CHARACTER«, t00=0x0024, t01=0x014c}
0x3994…39b4 Head {h00=0x001c, h01=0x0050, text=» ANK A4,/BF RESET BIT 9 «, t00=0x0024, t01=0x0168}
0x39b4…39c8 Head {h00=0x0010, h01=0x0050, text=»AKB363 EQU *«, t00=0x0024, t01=0x0188}
0x39c8…39de Head {h00=0x0012, h01=0x0050, text=» IFF CMULTZ=0 «, t00=0x0025, t01=0x000c}
0x39de…3a04 Head {h00=0x0022, h01=0x0050, text=» CC A4,KBMZ,A6 MULTIPLE ZERO ?«, t00=0x0025, t01=0x0022}
0x3a04…3a1e Head {h00=0x0016, h01=0x0050, text=» RF(E) KBMZ10 YES!«, t00=0x0025, t01=0x0048}
0x3a1e…3a2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0062}
0x3a2a…3a48 Head {h00=0x001a, h01=0x0050, text=» CC A4,KBCLR,A6 CLEAR?«, t00=0x0025, t01=0x006e}
0x3a48…3a5e Head {h00=0x0012, h01=0x0050, text=» RF(E) KBCL10 «, t00=0x0025, t01=0x008c}
0x3a5e…3a80 Head {h00=0x001e, h01=0x0050, text=» CC A4,KBBSP,A6 BACKSPACE?«, t00=0x0025, t01=0x00a2}
0x3a80…3a96 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBSP10 «, t00=0x0025, t01=0x00c4}
0x3a96…3ab6 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 RETURN CODE? «, t00=0x0025, t01=0x00da}
0x3ab6…3ae2 Head {h00=0x0028, h01=0x0050, text=» RF(NE) AKB369 YES,STORE AND END I/O«, t00=0x0025, t01=0x00fa}
0x3ae2…3af8 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0025, t01=0x0126}
0x3af8…3b0c Head {h00=0x0010, h01=0x0050, text=»AKB365 EQU *«, t00=0x0025, t01=0x013c}
0x3b0c…3b20 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0025, t01=0x0150}
0x3b20…3b42 Head {h00=0x001e, h01=0x0050, text=» CF A5,ECHO ECHOCHARACTER «, t00=0x0025, t01=0x0164}
0x3b42…3b4e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0186}
0x3b4e…3b72 (38, 0, 400) Head {h00=0x0020, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW?«, t00=0x0026, t01=0x0004}
0x3b72…3b8a Head {h00=0x0014, h01=0x0050, text=» RB(L) AKB210 NO«, t00=0x0026, t01=0x0028}
0x3b8a…3bb2 Head {h00=0x0024, h01=0x0050, text=»AKB368 LDK A1,8 SET RETURN CODE «, t00=0x0026, t01=0x0040}
0x3bb2…3bd0 Head {h00=0x001a, h01=0x0050, text=» RF ENDIO AND END I/O «, t00=0x0026, t01=0x0068}
0x3bd0…3c0a Head {h00=0x0036, h01=0x0050, text=»AKB369 CF A15,STORE STORE CHARACTER IN ECB BUFFER «, t00=0x0026, t01=0x0086}
0x3c0a…3c2c Head {h00=0x001e, h01=0x0050, text=» RF ENDIO END I/O REQUEST «, t00=0x0026, t01=0x00c0}
0x3c2c…3c3a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x00e2}
0x3c3a…3c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f0}
0x3c44…3c4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00fa}
0x3c4e…3c7a Head {h00=0x0028, h01=0x0050, text=»* CHECK CODE OF END OF RECORD KEY«, t00=0x0026, t01=0x0104}
0x3c7a…3c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0130}
0x3c84…3c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x013a}
0x3c8e…3ca2 Head {h00=0x0010, h01=0x0050, text=»AKB370 EQU *«, t00=0x0026, t01=0x0144}
0x3ca2…3cb6 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0026, t01=0x0158}
0x3cb6…3cda Head {h00=0x0020, h01=0x0050, text=» CF A5,CHEK CHECK CHARACTER «, t00=0x0026, t01=0x016c}
0x3cda…3d04 Head {h00=0x0026, h01=0x0050, text=» ORK A2,/80 INDICATE END OF RECORD«, t00=0x0026, t01=0x0190}
0x3d04…3d24 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 RETURN CODE? «, t00=0x0027, t01=0x002a}
0x3d24…3d3a Head {h00=0x0012, h01=0x0050, text=» RF(NE) AKB380«, t00=0x0027, t01=0x004a}
0x3d3a…3d5c Head {h00=0x001e, h01=0x0050, text=» CF A5,ECHO ECHO CHARACTER«, t00=0x0027, t01=0x0060}
0x3d5c…3d66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0082}
0x3d66…3d72 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x008c}
0x3d72…3d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0098}
0x3d7c…3da0 Head {h00=0x0020, h01=0x0050, text=»AKB380 LDK A1,0 RETURN CODE «, t00=0x0027, t01=0x00a2}
0x3da0…3dae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x00c6}
0x3dae…3db8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d4}
0x3db8…3dc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00de}
0x3dc2…3df2 Head {h00=0x002c, h01=0x0050, text=»* THIS IS A COMMON END OF THE DRIVER «, t00=0x0027, t01=0x00e8}
0x3df2…3dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0118}
0x3dfc…3e32 Head {h00=0x0032, h01=0x0050, text=»* SET EFFECTIVE LENGTH AND PERFORM END I/O «, t00=0x0027, t01=0x0122}
0x3e32…3e5a Head {h00=0x0024, h01=0x0050, text=»* ON KEYBOARD AND ECHO-DEVICE«, t00=0x0027, t01=0x0158}
0x3e5a…3e64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0180}
0x3e64…3e6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x018a}
0x3e6e…3e82 (40, 0, 400) Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0028, t01=0x0004}
0x3e82…3e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0018}
0x3e8c…3ea2 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0028, t01=0x0022}
0x3ea2…3eae Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0028, t01=0x0038}
0x3eae…3ec6 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x0028, t01=0x0044}
0x3ec6…3ef4 Head {h00=0x002a, h01=0x0050, text=» RF(E) ENDI05 NO TIMING ON THIS DEVICE«, t00=0x0028, t01=0x005c}
0x3ef4…3f16 Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x0028, t01=0x008a}
0x3f16…3f2a Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0028, t01=0x00ac}
0x3f2a…3f36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00c0}
0x3f36…3f40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00cc}
0x3f40…3f70 Head {h00=0x002c, h01=0x0050, text=»ENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0028, t01=0x00d6}
0x3f70…3f84 Head {h00=0x0010, h01=0x0050, text=»ENDI10 EQU *«, t00=0x0028, t01=0x0106}
0x3f84…3f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x011a}
0x3f8e…3fa2 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0028, t01=0x0124}
0x3fa2…3fbc Head {h00=0x0016, h01=0x0050, text=» LDR A4,A1 SAVE A1«, t00=0x0028, t01=0x0138}
0x3fbc…3fe8 Head {h00=0x0028, h01=0x0050, text=» CF A5,ECHEND END I/O ON ECHO DEVICE«, t00=0x0028, t01=0x0152}
0x3fe8…4006 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A4 RESTORE A1 «, t00=0x0028, t01=0x017e}
0x4006…4012 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x000c}
0x4012…401c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0018}
0x401c…4050 Head {h00=0x0030, h01=0x0050, text=» ABL DISEND END I/O ON KEYBOARD AND DISPATCH«, t00=0x0029, t01=0x0022}
0x4050…405e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0056}
0x405e…4068 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0064}
0x4068…4082 Head {h00=0x0016, h01=0x0050, text=»* MULTIPLE ZERO«, t00=0x0029, t01=0x006e}
0x4082…408c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0088}
0x408c…40a2 Head {h00=0x0012, h01=0x0050, text=» IFF CMULTZ=0 «, t00=0x0029, t01=0x0092}
0x40a2…40b6 Head {h00=0x0010, h01=0x0050, text=»KBMZ10 EQU *«, t00=0x0029, t01=0x00a8}
0x40b6…40e2 Head {h00=0x0028, h01=0x0050, text=» LDK A4,CMULTZ LOAD NUMBER OF ZEROES«, t00=0x0029, t01=0x00bc}
0x40e2…4112 Head {h00=0x002c, h01=0x0050, text=»KBMZ20 LDK A2,/30 ZERO TO STORE AND ECHO«, t00=0x0029, t01=0x00e8}
0x4112…4124 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0029, t01=0x0118}
0x4124…4142 Head {h00=0x001a, h01=0x0050, text=» RB(L) AKB240 ALL DONE«, t00=0x0029, t01=0x012a}
0x4142…415c Head {h00=0x0016, h01=0x0050, text=» LDR A1,A4 SAVE A4«, t00=0x0029, t01=0x0148}
0x415c…418c Head {h00=0x002c, h01=0x0050, text=» CF A15,STORE STORE ZOERO IN ECB-BUFFER «, t00=0x0029, t01=0x0162}
0x418c…41aa (42, 0, 400) Head {h00=0x001a, h01=0x0050, text=» LDR A4,A1 RESTORE A4 «, t00=0x002a, t01=0x0004}
0x41aa…41b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0022}
0x41b4…41c8 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x002a, t01=0x002c}
0x41c8…41d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0040}
0x41d2…41f0 Head {h00=0x001a, h01=0x0050, text=» CF A5,ECHO ECHO ZERO «, t00=0x002a, t01=0x004a}
0x41f0…41fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0068}
0x41fc…4206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0074}
0x4206…4210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x007e}
0x4210…4226 Head {h00=0x0012, h01=0x0050, text=» IFF CMULTZ=0 «, t00=0x002a, t01=0x0088}
0x4226…4230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x009e}
0x4230…4256 Head {h00=0x0022, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW ? «, t00=0x002a, t01=0x00a8}
0x4256…426e Head {h00=0x0014, h01=0x0050, text=» RB(L) KBMZ20 NO«, t00=0x002a, t01=0x00ce}
0x426e…42a0 Head {h00=0x002e, h01=0x0050, text=»KBMZ25 SUK A4,1 ANY MORE ZEROES TO STORE ?«, t00=0x002a, t01=0x00e6}
0x42a0…42b8 Head {h00=0x0014, h01=0x0050, text=» RB(L) AKB368 NO«, t00=0x002a, t01=0x0118}
0x42b8…42c4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002a, t01=0x0130}
0x42c4…42f2 Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER «, t00=0x002a, t01=0x013c}
0x42f2…4304 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x002a, t01=0x016a}
0x4304…432a Head {h00=0x0022, h01=0x0050, text=» CWK A1,DWTSQ FIRST POSITION ?«, t00=0x002a, t01=0x017c}
0x432a…4344 Head {h00=0x0016, h01=0x0050, text=» RF(NE) KBMZ30 NO «, t00=0x002b, t01=0x0012}
0x4344…4374 Head {h00=0x002c, h01=0x0050, text=» LDK A1,DWTEQ GET LAST POSITION IN QUEUE«, t00=0x002b, t01=0x002c}
0x4374…4386 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x002b, t01=0x005c}
0x4386…4398 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x002b, t01=0x006e}
0x4398…43aa Head {h00=0x000e, h01=0x0050, text=» RF KBMZ40«, t00=0x002b, t01=0x0080}
0x43aa…43e0 Head {h00=0x0032, h01=0x0050, text=»KBMZ30 ADR A1,A6 GET PREIOUS POINTER POSITION «, t00=0x002b, t01=0x0092}
0x43e0…43f2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x002b, t01=0x00c8}
0x43f2…4422 Head {h00=0x002c, h01=0x0050, text=»KBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? «, t00=0x002b, t01=0x00da}
0x4422…4446 Head {h00=0x0020, h01=0x0050, text=» RF(E) KBMZ90 NO NOT REALY. «, t00=0x002b, t01=0x010a}
0x4446…447a Head {h00=0x0030, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER «, t00=0x002b, t01=0x012e}
0x447a…44a4 Head {h00=0x0026, h01=0x0050, text=» LDK A2,/30 STORE ZERO IN CIRKULAR«, t00=0x002b, t01=0x0162}
0x44a4…44c4 Head {h00=0x001c, h01=0x0050, text=» SCR A2,A1 INPUT BUFFER «, t00=0x002b, t01=0x018c}
0x44c4…44e8 Head {h00=0x0020, h01=0x0050, text=» RB KBMZ25 ONCE MORE TIME !!«, t00=0x002c, t01=0x001c}
0x44e8…44fc Head {h00=0x0010, h01=0x0050, text=»KBMZ90 EQU *«, t00=0x002c, t01=0x0040}
0x44fc…4528 Head {h00=0x0028, h01=0x0050, text=» LDK A4,/FF INDICATE BUFFER OWERFLOW«, t00=0x002c, t01=0x0054}
0x4528…453a Head {h00=0x000e, h01=0x0050, text=» SCR A4,A1«, t00=0x002c, t01=0x0080}
0x453a…4562 Head {h00=0x0024, h01=0x0050, text=» ST A1,DWTUTQ,A6 UPPDATE POINTER«, t00=0x002c, t01=0x0092}
0x4562…458e Head {h00=0x0028, h01=0x0050, text=» LDK A1,/A SET RETURN CODE FOR BOTH «, t00=0x002c, t01=0x00ba}
0x458e…45bc Head {h00=0x002a, h01=0x0050, text=» RB ENDIO LENGTH AND THRUGHPUT ERRORS «, t00=0x002c, t01=0x00e6}
0x45bc…45c8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0114}
0x45c8…45d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0120}
0x45d2…45e4 Head {h00=0x000e, h01=0x0050, text=»* CLEAR«, t00=0x002c, t01=0x012a}
0x45e4…45ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x013c}
0x45ee…4618 Head {h00=0x0026, h01=0x0050, text=»KBCL10 LDK A3,0 RESET BUFFER INDEX«, t00=0x002c, t01=0x0146}
0x4618…4642 Head {h00=0x0026, h01=0x0050, text=» LDK A2,/18 CHANGE CHARACTER-CODE «, t00=0x002c, t01=0x0170}
0x4642…4654 Head {h00=0x000e, h01=0x0050, text=» RB AKB365«, t00=0x002d, t01=0x000a}
0x4654…465e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x001c}
0x465e…4674 Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE«, t00=0x002d, t01=0x0026}
0x4674…467e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x003c}
0x467e…46a8 Head {h00=0x0026, h01=0x0050, text=»KBSP10 LDR A3,A3 FIRST CHARACTER? «, t00=0x002d, t01=0x0046}
0x46a8…46be Head {h00=0x0012, h01=0x0050, text=» RF(Z) KBSP15 «, t00=0x002d, t01=0x0070}
0x46be…46e6 Head {h00=0x0024, h01=0x0050, text=» SUK A3,1 DECREMENT BUFFER INDEX«, t00=0x002d, t01=0x0086}
0x46e6…470a Head {h00=0x0020, h01=0x0050, text=» LDK A2,/00 CLEAR ECB-BUFFER«, t00=0x002d, t01=0x00ae}
0x470a…4720 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x002d, t01=0x00d2}
0x4720…4742 Head {h00=0x001e, h01=0x0050, text=» SUK A3,1 DECREMENT INDEX «, t00=0x002d, t01=0x00e8}
0x4742…4770 Head {h00=0x002a, h01=0x0050, text=»KBSP15 LDK A2,/8 CHANGE CHARACTER-CODE«, t00=0x002d, t01=0x010a}
0x4770…4782 Head {h00=0x000e, h01=0x0050, text=» RB AKB365«, t00=0x002d, t01=0x0138}
0x4782…4790 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x014a}
0x4790…479a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0158}
0x479a…47ae Head {h00=0x0010, h01=0x0050, text=»* C H E K«, t00=0x002d, t01=0x0162}
0x47ae…47b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0176}
0x47b8…47c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0180}
0x47c2…47f2 Head {h00=0x002c, h01=0x0050, text=»* SUBROUTINE TO CHECK INPUT CHARACTER«, t00=0x002d, t01=0x018a}
0x47f2…47fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x002a}
0x47fc…4812 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x002e, t01=0x0034}
0x4812…481c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x004a}
0x481c…4838 Head {h00=0x0018, h01=0x0050, text=»* A2 = CHARACTER «, t00=0x002e, t01=0x0054}
0x4838…4856 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x002e, t01=0x0070}
0x4856…4874 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x002e, t01=0x008e}
0x4874…488c Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x002e, t01=0x00ac}
0x488c…4896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c4}
0x4896…48a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00ce}
0x48a0…48b6 Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x002e, t01=0x00d8}
0x48b6…48c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00ee}
0x48c0…48de Head {h00=0x001a, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x002e, t01=0x00f8}
0x48de…48e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0116}
0x48e8…48fa Head {h00=0x000e, h01=0x0050, text=»CHEK EQU *«, t00=0x002e, t01=0x0120}
0x48fa…491e Head {h00=0x0020, h01=0x0050, text=» STR A2,A15 SAVE A2 ON STACK«, t00=0x002e, t01=0x0132}
0x491e…4932 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x002e, t01=0x0156}
0x4932…4958 Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETER «, t00=0x002e, t01=0x016a}
0x4958…4962 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0190}
0x4962…4978 Head {h00=0x0012, h01=0x0050, text=» IFT CSTAND=1 «, t00=0x002f, t01=0x000a}
0x4978…4982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0020}
0x4982…499c Head {h00=0x0016, h01=0x0050, text=» CWK A7,2 ORDER 2?«, t00=0x002f, t01=0x002a}
0x499c…49b6 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CHEK05 NO «, t00=0x002f, t01=0x0044}
0x49b6…49ca Head {h00=0x0010, h01=0x0050, text=» ANK A1,/20 «, t00=0x002f, t01=0x005e}
0x49ca…49f6 Head {h00=0x0028, h01=0x0050, text=» ORK A1,/5F 5F OR 7F AS UPPER LIMIT «, t00=0x002f, t01=0x0072}
0x49f6…4a16 Head {h00=0x001c, h01=0x0050, text=» LDK A4,/20 LOWER LIMIT «, t00=0x002f, t01=0x009e}
0x4a16…4a28 Head {h00=0x000e, h01=0x0050, text=» RF CHEK08«, t00=0x002f, t01=0x00be}
0x4a28…4a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00d0}
0x4a32…4a3e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00da}
0x4a3e…4a48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00e6}
0x4a48…4a62 Head {h00=0x0016, h01=0x0050, text=»CHEK05 ANK A1,/10 «, t00=0x002f, t01=0x00f0}
0x4a62…4a78 Head {h00=0x0012, h01=0x0050, text=» RF(NE) CHEK06«, t00=0x002f, t01=0x010a}
0x4a78…4a98 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F RESET BIT 9 «, t00=0x002f, t01=0x0120}
0x4a98…4abe Head {h00=0x0022, h01=0x0050, text=»CHEK06 LDK A1,/39 UPPER LIMIT «, t00=0x002f, t01=0x0140}
0x4abe…4ade Head {h00=0x001c, h01=0x0050, text=» LDK A4,/30 LOWER LIMIT «, t00=0x002f, t01=0x0166}
0x4ade…4af6 Head {h00=0x0014, h01=0x0050, text=»CHEK08 SUR A1,A2«, t00=0x002f, t01=0x0186}
0x4af6…4b1c Head {h00=0x0022, h01=0x0050, text=» RF(N) CHERRO CODE CHECK ERROR«, t00=0x0030, t01=0x000e}
0x4b1c…4b2e Head {h00=0x000e, h01=0x0050, text=» SUR A4,A2«, t00=0x0030, t01=0x0034}
0x4b2e…4b54 Head {h00=0x0022, h01=0x0050, text=» RF(P) CHERRO CODE CHECK ERROR«, t00=0x0030, t01=0x0046}
0x4b54…4b68 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0030, t01=0x006c}
0x4b68…4b8c Head {h00=0x0020, h01=0x0050, text=»CHEK10 LDK A1,0 RETURN CODE «, t00=0x0030, t01=0x0080}
0x4b8c…4ba2 Head {h00=0x0012, h01=0x0050, text=»CHEK20 RTN A5 «, t00=0x0030, t01=0x00a4}
0x4ba2…4bac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00ba}
0x4bac…4bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00c4}
0x4bb6…4bd4 Head {h00=0x001a, h01=0x0050, text=»* CODE CHECK ERROR «, t00=0x0030, t01=0x00ce}
0x4bd4…4bde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00ec}
0x4bde…4c10 Head {h00=0x002e, h01=0x0050, text=»CHERRO LDK A1,4 SET RETURN CODE AND RETURN«, t00=0x0030, t01=0x00f6}
0x4c10…4c36 Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A15 RELOAD CHARACTER «, t00=0x0030, t01=0x0128}
0x4c36…4c48 Head {h00=0x000e, h01=0x0050, text=» RB CHEK20«, t00=0x0030, t01=0x014e}
0x4c48…4c56 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0160}
0x4c56…4c60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x016e}
0x4c60…4c6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0178}
0x4c6a…4c7e Head {h00=0x0010, h01=0x0050, text=»* I H K B«, t00=0x0030, t01=0x0182}
0x4c7e…4c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0008}
0x4c88…4cd0 Head {h00=0x0044, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER«, t00=0x0031, t01=0x0012}
0x4cd0…4cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x005a}
0x4cda…4ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0064}
0x4ce4…4cf6 Head {h00=0x000e, h01=0x0050, text=»IHKB EQU *«, t00=0x0031, t01=0x006e}
0x4cf6…4d0a Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0031, t01=0x0080}
0x4d0a…4d2c Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A6 GET ALLOW BITS«, t00=0x0031, t01=0x0094}
0x4d2c…4d40 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/C0 «, t00=0x0031, t01=0x00b6}
0x4d40…4d78 Head {h00=0x0034, h01=0x0050, text=» RF(E) IHNOL3 INPUT ALLOWED FROM BOTH KEYBOARDS «, t00=0x0031, t01=0x00ca}
0x4d78…4d8a Head {h00=0x000e, h01=0x0050, text=» LDK A4,1 «, t00=0x0031, t01=0x0102}
0x4d8a…4d9e Head {h00=0x0010, h01=0x0050, text=» ANK A3,/80 «, t00=0x0031, t01=0x0114}
0x4d9e…4db4 Head {h00=0x0012, h01=0x0050, text=» RF(E) IHNOL1 «, t00=0x0031, t01=0x0128}
0x4db4…4dc6 Head {h00=0x000e, h01=0x0050, text=» LDK A4,5 «, t00=0x0031, t01=0x013e}
0x4dc6…4dde Head {h00=0x0014, h01=0x0050, text=»IHNOL1 LDR A3,A2«, t00=0x0031, t01=0x0150}
0x4dde…4df0 Head {h00=0x000e, h01=0x0050, text=» SRL A3,12«, t00=0x0031, t01=0x0168}
0x4df0…4e02 Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0031, t01=0x017a}
0x4e02…4e16 Head {h00=0x0010, h01=0x0050, text=» RF(NE) EXIT«, t00=0x0031, t01=0x018c}
0x4e16…4e2a Head {h00=0x0010, h01=0x0050, text=»IHNOL2 EQU *«, t00=0x0032, t01=0x0010}
0x4e2a…4e36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0024}
0x4e36…4e40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0030}
0x4e40…4e56 Head {h00=0x0012, h01=0x0050, text=» IFT CONVER=1 «, t00=0x0032, t01=0x003a}
0x4e56…4e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0050}
0x4e60…4e7e Head {h00=0x001a, h01=0x0050, text=» LDR A4,A2 INPUT WORD «, t00=0x0032, t01=0x005a}
0x4e7e…4ea4 Head {h00=0x0022, h01=0x0050, text=» SRL A4,11 DEVICE ADDRESS * 2 «, t00=0x0032, t01=0x0078}
0x4ea4…4eb6 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/E«, t00=0x0032, t01=0x009e}
0x4eb6…4ede Head {h00=0x0024, h01=0x0050, text=» CC A4,DWTBC,A6 8-BIT SETTING ? «, t00=0x0032, t01=0x00b0}
0x4ede…4ef4 Head {h00=0x0012, h01=0x0050, text=» RF(NE) IHKB03«, t00=0x0032, t01=0x00d8}
0x4ef4…4f06 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0032, t01=0x00ee}
0x4f06…4f1a Head {h00=0x0010, h01=0x0050, text=» ANK A3,/3F «, t00=0x0032, t01=0x0100}
0x4f1a…4f2e Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0032, t01=0x0114}
0x4f2e…4f44 Head {h00=0x0012, h01=0x0050, text=» RF(N) IHKB01 «, t00=0x0032, t01=0x0128}
0x4f44…4f56 Head {h00=0x000e, h01=0x0050, text=» SUK A3,/A«, t00=0x0032, t01=0x013e}
0x4f56…4f6c Head {h00=0x0012, h01=0x0050, text=» RF(N) IHKB02 «, t00=0x0032, t01=0x0150}
0x4f6c…4f86 Head {h00=0x0016, h01=0x0050, text=»IHKB01 ORK A2,/80 «, t00=0x0032, t01=0x0166}
0x4f86…4f98 Head {h00=0x000e, h01=0x0050, text=» RF IHKB04«, t00=0x0032, t01=0x0180}
0x4f98…4fb4 (51, 0, 400) Head {h00=0x0018, h01=0x0050, text=»IHKB02 ANKL A2,/FF3F«, t00=0x0033, t01=0x0004}
0x4fb4…4fc6 Head {h00=0x000e, h01=0x0050, text=» RF IHKB04«, t00=0x0033, t01=0x0020}
0x4fc6…4ffe Head {h00=0x0034, h01=0x0050, text=»IHKB03 LD A3,DWTCON,A6 CONVERSION TABLE ADDRESS «, t00=0x0033, t01=0x0032}
0x4ffe…5014 Head {h00=0x0012, h01=0x0050, text=» RF(E) IHKB04 «, t00=0x0033, t01=0x006a}
0x5014…5026 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0033, t01=0x0080}
0x5026…503a Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0033, t01=0x0092}
0x503a…5056 Head {h00=0x0018, h01=0x0050, text=» SRL A4,3 LINE INDEX«, t00=0x0033, t01=0x00a6}
0x5056…5068 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A4«, t00=0x0033, t01=0x00c2}
0x5068…5090 Head {h00=0x0024, h01=0x0050, text=» LDR* A3,A3 COLUMN TABLE ADDRESS«, t00=0x0033, t01=0x00d4}
0x5090…50a6 Head {h00=0x0012, h01=0x0050, text=» RF(E) IHKB04 «, t00=0x0033, t01=0x00fc}
0x50a6…50b8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0033, t01=0x0112}
0x50b8…50ca Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x0033, t01=0x0124}
0x50ca…50ea Head {h00=0x001c, h01=0x0050, text=» ADR A3,A4 ADD ROW INDEX«, t00=0x0033, t01=0x0136}
0x50ea…510a Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0033, t01=0x0156}
0x510a…511e Head {h00=0x0010, h01=0x0050, text=»IHKB04 EQU *«, t00=0x0033, t01=0x0176}
0x511e…5128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x018a}
0x5128…5134 (52, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0004}
0x5134…513e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0010}
0x513e…5148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x001a}
0x5148…515c Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0034, t01=0x0024}
0x515c…5166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0038}
0x5166…5178 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0034, t01=0x0042}
0x5178…518c Head {h00=0x0010, h01=0x0050, text=» ANK A3,/3F «, t00=0x0034, t01=0x0054}
0x518c…51a0 Head {h00=0x0010, h01=0x0050, text=» SUK A3,/22 «, t00=0x0034, t01=0x0068}
0x51a0…51b6 Head {h00=0x0012, h01=0x0050, text=» RF(Z) IHNOL6 «, t00=0x0034, t01=0x007c}
0x51b6…51c8 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0034, t01=0x0092}
0x51c8…51de Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHNOL8«, t00=0x0034, t01=0x00a4}
0x51de…51f0 Head {h00=0x000e, h01=0x0050, text=» RF IHNOL7«, t00=0x0034, t01=0x00ba}
0x51f0…5208 Head {h00=0x0014, h01=0x0050, text=»IHNOL6 ADK A2,7 «, t00=0x0034, t01=0x00cc}
0x5208…5224 Head {h00=0x0018, h01=0x0050, text=»IHNOL7 ANKL A2,/FF3F«, t00=0x0034, t01=0x00e4}
0x5224…5238 Head {h00=0x0010, h01=0x0050, text=»IHNOL8 EQU *«, t00=0x0034, t01=0x0100}
0x5238…5242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0114}
0x5242…524e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x011e}
0x524e…5258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x012a}
0x5258…527c Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 I/O REQUEST?«, t00=0x0034, t01=0x0134}
0x527c…5292 Head {h00=0x0012, h01=0x0050, text=» RF(N) IHKB10 «, t00=0x0034, t01=0x0158}
0x5292…52b8 Head {h00=0x0022, h01=0x0050, text=» SLL A3,7 INTERRUPTS ALLOWED? «, t00=0x0034, t01=0x016e}
0x52b8…52f0 (53, 0, 400) Head {h00=0x0034, h01=0x0050, text=» RF(NN) IHKB10 NO,STORE CHARACTER IN DWT-BUFFER «, t00=0x0035, t01=0x0004}
0x52f0…52fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x003c}
0x52fa…5310 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0035, t01=0x0046}
0x5310…531a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x005c}
0x531a…5332 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTP,A6 «, t00=0x0035, t01=0x0066}
0x5332…5360 Head {h00=0x002a, h01=0x0050, text=» RF(E) IHKB05 NO TIMING ON THIS DEVICE«, t00=0x0035, t01=0x007e}
0x5360…5384 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,-TIME RESTART TIME «, t00=0x0035, t01=0x00ac}
0x5384…539c Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x0035, t01=0x00d0}
0x539c…53a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00e8}
0x53a6…53b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00f2}
0x53b2…53bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00fe}
0x53bc…53ec Head {h00=0x002c, h01=0x0050, text=»IHKB05 ABL LDREG RETURN TO READ ROUTINE «, t00=0x0035, t01=0x0108}
0x53ec…540a Head {h00=0x001a, h01=0x0050, text=»IHKB10 LD A1,DWTINQ,A6«, t00=0x0035, t01=0x0138}
0x540a…541c Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0035, t01=0x0156}
0x541c…5442 Head {h00=0x0022, h01=0x0050, text=» XRK A4,/FF ALREADY OVERFLOW ?«, t00=0x0035, t01=0x0168}
0x5442…545a Head {h00=0x0014, h01=0x0050, text=» RF(E) EXIT YES «, t00=0x0035, t01=0x018e}
0x545a…546c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0036, t01=0x0016}
0x546c…54a2 Head {h00=0x0032, h01=0x0050, text=» CF A15,EOQUEU GET NEXT QUEUE POINTER ADDRESS «, t00=0x0036, t01=0x0028}
0x54a2…54c4 Head {h00=0x001e, h01=0x0050, text=» CW A1,DWTUTQ,A6 OVERFLOW?«, t00=0x0036, t01=0x005e}
0x54c4…54de Head {h00=0x0016, h01=0x0050, text=» RF(NE) IHKB20 NO!«, t00=0x0036, t01=0x0080}
0x54de…5512 Head {h00=0x0030, h01=0x0050, text=» ORK A2,/FF SET OVERFLOW BIT IN INPUT BUFFER«, t00=0x0036, t01=0x009a}
0x5512…5524 Head {h00=0x000e, h01=0x0050, text=» RF IHKB30«, t00=0x0036, t01=0x00ce}
0x5524…5558 Head {h00=0x0030, h01=0x0050, text=»IHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER«, t00=0x0036, t01=0x00e0}
0x5558…5590 Head {h00=0x0034, h01=0x0050, text=»IHKB30 SCR A2,A3 STORE CHARACTER IN INPUT BUFFER«, t00=0x0036, t01=0x0114}
0x5590…55a6 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0036, t01=0x014c}
0x55a6…55ba Head {h00=0x0010, h01=0x0050, text=» IFT NOLJE=1«, t00=0x0036, t01=0x0162}
0x55ba…55d2 Head {h00=0x0014, h01=0x0050, text=»IHNOL3 LDR A3,A2«, t00=0x0036, t01=0x0176}
0x55d2…55e4 Head {h00=0x000e, h01=0x0050, text=» SRL A3,12«, t00=0x0036, t01=0x018e}
0x55e4…55f8 Head {h00=0x0010, h01=0x0050, text=» LDK A4,/40 «, t00=0x0037, t01=0x0010}
0x55f8…560a Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0037, t01=0x0024}
0x560a…5620 Head {h00=0x0012, h01=0x0050, text=» RF(E) IHNOL4 «, t00=0x0037, t01=0x0036}
0x5620…5634 Head {h00=0x0010, h01=0x0050, text=» LDK A4,/80 «, t00=0x0037, t01=0x004c}
0x5634…5646 Head {h00=0x000e, h01=0x0050, text=» SUK A3,4 «, t00=0x0037, t01=0x0060}
0x5646…565c Head {h00=0x0012, h01=0x0050, text=» RB(NE) IHNOL2«, t00=0x0037, t01=0x0072}
0x565c…5684 Head {h00=0x0024, h01=0x0050, text=»IHNOL4 ORRS A4,A6 SET ALLOW BIT «, t00=0x0037, t01=0x0088}
0x5684…5696 Head {h00=0x000e, h01=0x0050, text=» RB IHNOL2«, t00=0x0037, t01=0x00b0}
0x5696…56a2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00c2}
0x56a2…56b0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x00ce}
0x56b0…56ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00dc}
0x56ba…56c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00e6}
0x56c4…56dc Head {h00=0x0014, h01=0x0050, text=»* A K B T U T«, t00=0x0037, t01=0x00f0}
0x56dc…56e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0108}
0x56e6…5710 Head {h00=0x0026, h01=0x0050, text=»* THIS IS THE TIME-OUT ROUTINE «, t00=0x0037, t01=0x0112}
0x5710…571a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x013c}
0x571a…5724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0146}
0x5724…573a Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0037, t01=0x0150}
0x573a…5744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0166}
0x5744…5758 Head {h00=0x0010, h01=0x0050, text=»AKBTUT EQU *«, t00=0x0037, t01=0x0170}
0x5758…577a Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0037, t01=0x0184}
0x577a…578e Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0038, t01=0x0016}
0x578e…57a6 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0038, t01=0x002a}
0x57a6…57ba Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0038, t01=0x0042}
0x57ba…57de Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 SET RETURN CODE «, t00=0x0038, t01=0x0056}
0x57de…580e Head {h00=0x002c, h01=0x0050, text=» RB IHKB05 RESTORE REGISTERS AND END I/O«, t00=0x0038, t01=0x007a}
0x580e…5818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00aa}
0x5818…5824 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x00b4}
0x5824…5832 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x00c0}
0x5832…583c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00ce}
0x583c…5874 Head {h00=0x0034, h01=0x0050, text=»* STORE = SUBROUTINE TO STORE A CHARACTER IN «, t00=0x0038, t01=0x00d8}
0x5874…58ae Head {h00=0x0036, h01=0x0050, text=»* ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0038, t01=0x0110}
0x58ae…58b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014a}
0x58b8…58ce Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0038, t01=0x0154}
0x58ce…58d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x016a}
0x58d8…58fc Head {h00=0x0020, h01=0x0050, text=»* A2 = CHARACTER TO STORE«, t00=0x0038, t01=0x0174}
0x58fc…591a Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x0039, t01=0x0008}
0x591a…5924 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0026}
0x5924…592e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0030}
0x592e…5942 Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x0039, t01=0x003a}
0x5942…5964 Head {h00=0x001e, h01=0x0050, text=» LD A4,2,A8 BUFFER ADDRESS«, t00=0x0039, t01=0x004e}
0x5964…5988 Head {h00=0x0020, h01=0x0050, text=» ADR A4,A3 ADD BUFFER INDEX «, t00=0x0039, t01=0x0070}
0x5988…59b4 Head {h00=0x0028, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER IN BUFFER«, t00=0x0039, t01=0x0094}
0x59b4…59dc Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0039, t01=0x00c0}
0x59dc…59f0 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0039, t01=0x00e8}
0x59f0…5a12 Head {h00=0x001e, h01=0x0050, text=» RF EOQU20 RTN A15 AND ENB«, t00=0x0039, t01=0x00fc}
0x5a12…5a20 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x011e}
0x5a20…5a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x012c}
0x5a2a…5a34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0136}
0x5a34…5a6e Head {h00=0x0036, h01=0x0050, text=»* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER«, t00=0x0039, t01=0x0140}
0x5a6e…5a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x017a}
0x5a78…5a8e Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0039, t01=0x0184}
0x5a8e…5a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x000a}
0x5a98…5ab8 Head {h00=0x001c, h01=0x0050, text=»* A1 = QUEUE POINTER «, t00=0x003a, t01=0x0014}
0x5ab8…5ad6 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x003a, t01=0x0034}
0x5ad6…5ae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0052}
0x5ae0…5af6 Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x003a, t01=0x005c}
0x5af6…5b00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0072}
0x5b00…5b24 Head {h00=0x0020, h01=0x0050, text=»* A1 = NEW QUEUE POINTER «, t00=0x003a, t01=0x007c}
0x5b24…5b38 Head {h00=0x0010, h01=0x0050, text=»EOQUEU EQU *«, t00=0x003a, t01=0x00a0}
0x5b38…5b44 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x003a, t01=0x00b4}
0x5b44…5b56 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x003a, t01=0x00c0}
0x5b56…5b68 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x003a, t01=0x00d2}
0x5b68…5b8c Head {h00=0x0020, h01=0x0050, text=» CWK A1,DWTEQ END OF QUEUE? «, t00=0x003a, t01=0x00e4}
0x5b8c…5ba2 Head {h00=0x0012, h01=0x0050, text=» RF(NE) EOQU10«, t00=0x003a, t01=0x0108}
0x5ba2…5bd0 Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTSQ SET QUEUE START ADDRESS «, t00=0x003a, t01=0x011e}
0x5bd0…5be8 Head {h00=0x0014, h01=0x0050, text=»EOQU10 ADR A1,A6«, t00=0x003a, t01=0x014c}
0x5be8…5c14 Head {h00=0x0028, h01=0x0050, text=»EOQU20 ABL RTNA15 RETURN AND ENABLE «, t00=0x003a, t01=0x0164}
0x5c14…5c1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0190}
0x5c1e…5c2a Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x003b, t01=0x000a}
0x5c2a…5c2e Head {h00=0x4004, h01=0x0000}
0x5c2e…5c30 00 3b ┆ ;┆
0x5c30…5c32 00 16 ┆ ┆
0x5c32…5c3a (60, 1, 8) 20 04 00 00 00 3c 00 04 ┆ < ┆