|
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: 32988 (0x80dc)
Notes: pts_type(SC)
Names: »DRKB04.SC«
└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
└─⟦this⟧ »TOSSWORK/DRKB04.SC«
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
└─⟦this⟧ »TOSSWORK/DRKB04.SC«
IDENT DRKB04 REL 11.0 81-05-25 870105041100 =2 GREEK CHARACTER SET & NEW CONDITIONS REL 11.0 81-03-27 = 1 /00 SKIPPED IF IT CAME FROM SECOND DEVICE ADDRESS VIA CIRCULAR INPUT BUFFER REL 11.0 81-01-26 * ****************************************** * * * P H I L I P S T E R M I N A L S Y S T E M P T S * * DRKB04 = DRIVER KEYBOARD * ****************************************** * * THIS DRIVER HANDLES INPUT FROM THE KEYBOARDS * PTS 6231, -32, -33, -34, -36, * -71, -72, 6331, 6342 AND BADGE CARD READER * PTS 6261 WITH CONNECTED PIN (PERSONAL IDEN- * TIFICATION NUMBER -KEYBOARD). * * ONLY INPUT DATA ARE HANDLED BY THIS DRIVER. * * AN ECHO DEVICE CAN BE ATTACHED TO EVERY * KEYBOARD, WHERE RECEIVED CHARACTERS ARE * ECHOED. * * THE DRIVER CONSISTS OF FOLLOWING PARTS: * R C K B = RECOVERY ROUTINE * A C K B = ACTIVATION PART * M A K B = MAIN PART * I H K B = INTERRUPT HANDLER * * THE FOLLOWING ORDERS ARE TREATED: * ORDER 01: BASIC READ * 02: STANDARD READ * 03: NUMERIC READ * 31: RESET INPUT BUFFER * EJECT * 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 * * SYSTEM ADAPTION * * DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE * DEFINED IN DWT. * * IF TIMING IS WANTED, BIT 0 IN DWTDEV 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. * * * BIT 1 IN DWTDEV IS SET TO ZERO IF CHARACTERS WITHIN * /30-/39 AND /70-/79 ARE ACCEPTED FOR NUMERIC READ. * IF IT IS SET TO ONE, ONLY /30-/39 ARE ACCEPTED. * * BIT 2 IN DWTDEV IS SET TO ZERO IF /20-/5F ARE ACCEPTED * FOR STANDARD READ. IF IT IS SET TO ONE, /20-/7F ARE * ACCEPTED. * * KEYBOARD TYPE MUST ALSO BE DEFINED IN DWT. BIT 3 * IN DWTDEV MUST BE SET IF PTS 6236/71/72 IS USED. * * BIT 4 IN DWTDEV IS USED BY THE DRIVER TO INDICATE IF * MORE CHARACTERS ARE TO BE ECHOED. * * SPACE FOR THE CIRCULAR INPUT BUFFER IS RESERVED IN DWT. * * BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE * TO EXCLUDE FOLLOWING FUNCTIONS: * ---- ECHO FUNCTION * ---- TIME OUT FUNCTION * ---- KEYBOARD LOCKED IF NO KEYLOCK ON * ---- COMPLETION OF READ REQUEST AT POWER-ON * ---- SHIFT KEY ON NUMERIC PART OF 6272 USED AS NORMAL KEY * EJECT * ENTRIES * ENTRY KBAD4 ADDRESSBLOCK * * EXTERNAL TOSS MODULE ENTRIES * EXTRN LENDER END REQUEST AND DISPATCH EXTRN INPUT READ A CHARACTER EXTRN ECHO ECHO EXTRN ECHEND END OF ECHO EXTRN LDISP DISPATCH EXTRN SETIME SETS TIME EXTRN LENDIS END I/O AND DISPATCH EXTRN ABORT ABORT REQUESTS EXTRN ABTADR ABORT-ADDRESS EXTRN TENDIO EXTRN TDISP * * DWT PARAMETERS * EXTRN DWTDEV EXTRN DWTST EXTRN DWTA3 EXTRN DWTA5 EXTRN DWTADR EXTRN DWTECH EXTRN DWTSB2 EXTRN DWTECB * * ECB PARAMETERS * EXTRN ECBBA BUFFER ADDRESS EXTRN ECBRL REQUESTED LENGTH EXTRN ECBEL EFFECTIVE LENGTH EXTRN ECBCW CONTROL WORD * * CONSTANTS * OVMASK EQU /2 OVERFLOW IN INPUT BUFFER TIME EQU 300 TIMEOUT CONSTANT EJECT * ************************************ * * CONDITIONAL ASSEMBLY * ************************************ * * TIME OUT FUNCTION MAY BE INCLUDED BY SETTING X:A = 1 * 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 * * COMPLETION OF READ REQUEST AT POWER ON MAY BE * INCLUDED BY SETTING X:C =1 * X:C EQU 0 RECOV EQU X:C * * THE LENGTH OF THE CIRCULAR INPUT BUFFER IS DEFINED * IN X:D, NUMBER OF BYTES IN DECIMAL FORM. * X:D EQU 8 DWTLNG EQU X:D * * CODE CONVERSION DUMMY * X:E EQU 0 * EJECT * * BY SETTING X:F=0 THE KEY A15 ON KB 71/72 GIVES THE CODE * /00 INSTEAD OF BEING A SHIFT KEY * X:F EQU 1 NSHIFT EQU X:F * * BY SETTING X:G = 1 KEYBOARD IS * LOCKED IF NO KEYLOCK ON * X:G EQU 0 KBLOCK EQU X:G * * MMU BUFFER SIZE * X:H EQU 10 DVBLEN EQU X:H * * MMU KEY TABLE SIZE * X:I EQU 10 DVBKTB EQU X:I * * X:J SHOULD BE SET TO 1 IF KB 6236, 71 OR 72 =2 * IS INCLUDED IN SYSTEM =2 * X:J EQU 1 NEWKB EQU X:J * * X:K SHOULD BE SET TO 1 IF OTHER KB THAN 6236 =2 * 71 OR 72 IS INCLUDED IN SYSTEM =2 * X:K EQU 1 OLDKB EQU X:K * * X:L SHOULD BE SET TO 1 IF PLC IS USED =2 * X:L EQU 1 PLC EQU X:L * * IF X:M = 1 IT IS POSSIBLE TO USE =2 * GREEK CHARACTER SET =2 * X:M EQU 0 GREECE EQU X:M * A PROGRAM VERSION USING TOSS MMU-PAGING IS * OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * EJECT * * DWT-DISPLACEMENT * DWTKEY EQU /04 KEYLOCK MEMORY DWTCS EQU /06 CRTL-SHIFT MEMORY DWTCTB EQU /08 CONVERSION POINTERS ADDRESS DWTTP EQU /0A TIMER POINTER * * CIRCULAR INPUT BUFFER * DWTINQ EQU /0C POINTER TO FIRST PLACE DWTUTQ EQU /0E POINTER TO LAST PLACE DWTSQ EQU /10 START OF BUFFER DWTEQ EQU DWTSQ+DWTLNG END OF BUFFER * * ADDRESS BLOCK * DATA DVBKTB MMU KEY TABLE DATA DVBLEN MMU BUFFER SIZE DATA 6 DEVICE INDEX KBAD4 EQU * DATA ACKB ACTIVATION PART DATA ABKB ABORT ROUTINE DATA IHKB INTERRUPT HANDLER IFF RECOV=1 DATA 0 NO RECOVERY ROUTINE XIF IFT RECOV=1 DATA RCKB RECOVERY ROUTINE EJECT ************************************ * * RECOVERY ROUTINE * ************************************* RCKB LDR A8,A8 BUSY ? RF(NZ) RC10 YES ! LDKL A1,/400 NO ! ORS A1,DWTDEV,A6 INDICATE POWER OFF ABL LENDIS DISPATCH ! * RC10 CWK A7,1 BASIC READ ? ABL(E) LDISP YES ! * NO ! CF A15,ABORT RESET INPUT REQUESTED FLAG LD A3,DWTA3,A6 RELOAD EFFECTIVE LENGTH RC15 CM ECBCW,A8 COMPLETE REQUEST ABL MKB335 AND SET RETURN CODE =0 XIF EJECT ************************************ * * * A C K B * ACTIVATION PART * * ************************************ ACKB EQU * ENB * LDK A1,0 RESET REGISTERS LDK A3,0 * * CHECK ORDER * LDR A4,A7 RF(NG) AKB100 ILLEGAL ORDER SUK A4,4 RF(N) AKB200 ORDER 1, 2 OR 3 SUK A4,/2D RF(Z) AKB110 ORDER 31 * * ILLEGAL ORDER * AKB100 EQU * ABL LENDER COMPLETE REQUEST EJECT * * ORDER 31. RESET INPUT BUFFER. * AKB110 EQU * INH LD A1,DWTDEV+DWTUTQ,A6 BUF END CW A1,DWTDEV+DWTINQ,A6 BUFFER EMPTY ? RF(E) AKB119 YES ! * LDR A2,A1 IFT NEWKB+OLDKB=2 =2 LD A4,DWTDEV,A6 ANKL A4,/1000 PTS 6236, -71, -72 ? RF(Z) AKB118 NO ! XIF IFT NEWKB=1 =2 * * SHIFT, CTRL AND KEYLOCK CHARACTERS ARE NOT REMOVED * FROM BUFFER WHEN KB 6236/71/72 IS USED * AKB112 LCR A4,A1 GET CHARACTER ANK A4,/FF IFT NSHIFT=0 CCK A4,/7C00 NUMSHIFT DEPRESSED ? RF(E) AKB113 YES ! SKIP CHARACTER XIF IFT NEWKB=1 =2 SUK A4,/80 SKIP CHARACTER ? RF(Z) AKB113 YES ! ADK A4,/10 SHIFT, CTRL, KEYLOCK ? RF(NN) AKB120 YES ! * AKB113 CF A15,EOQUEU GET NEXT POINTER CW A1,DWTDEV+DWTINQ,A6 END OF BUF ? RB(NE) AKB112 NO ! CHECK NEXT * XIF AKB118 SCR A3,A1 ST A2,DWTDEV+DWTINQ,A6 YES! AKB119 ENB ABL MKB335 SET RC=0 AND COMPLETE REQUEST * IFT NEWKB=1 =2 AKB120 ADK A4,/70 RESTORE CHAR. SCR A4,A2 STORE IN BUF. LDR A3,A1 EXCHANGE REGISTERS LDR A1,A2 CF A15,EOQUEU GET NEXT POINTER LDR A2,A1 LDR A1,A3 LDK A3,0 RB AKB113 * XIF AKB200 EQU * IFT RECOV=1 * * POWER OFF TEST * LD A2,DWTDEV,A6 POWER OFF ? ANKL A2,/400 RF(E) AKB205 NO ! XRS A2,DWTDEV,A6 RESET POWER OFF BIT CWK A7,1 BASIC READ ? RB(NE) RC15 NO ! COMPLETE REQUEST ! XIF AKB205 EQU * IFT CTIMUT=1 EJECT * * INITIATE TIMING ROUTINE * LD A1,DWTDEV,A6 TIMING ? RF(NN) AKB210 NO! * LD A4,DWTTP+DWTDEV,A6 YES ! IS THERE AN EXISTING POINTER ? RF(E) AKBTIM NO! * CF A15,RESTRT YES ! RESTART TIMER RF AKB210 * AKBTIM EQU * LDR A1,A6 DWT-ADDRESS IN A1 * CF A15,SETIME SET TIME DATA AKBTUT,TIME TIMEOUT ROUTINE & TIME * ST A4,DWTTP+DWTDEV,A6 STORE TIMER ADDRESS IN DWT XIF EJECT * * REQUESTED LENGTH OK ? * AKB210 LD A2,ECBRL,A8 REQUESTED LENGTH IN ECB = 0 ? ABL(E) MKBEND YES ! COMPLETE REQUEST ! * * CLEAR ECB-BUFFER * LD A1,ECBBA,A8 BUFFER ADDRESS SUK A1,1 ADR A1,A2 ADD REQUESTED LENGTH * AKB230 SCR A3,A1 CLEAR BUFFER UNTIL REQUESTED LENGTH SUK A1,1 SUK A2,1 RB(NE) AKB230 NOT READY YET EJECT * ************************************ * * * M K B * MAIN PART OF KEYBOARD DRIVER * * ************************************** * * CHECK CIRCULAR INPUT BUFFER. IF IT CONTAINS * CHARACTERS AND NO OVERFLOW HAS OCCURRED, A * CHARACTER WILL BE PUT IN A2 * MKB100 EQU * INH LD A1,DWTDEV+DWTUTQ,A6 FETCH A CHARACTER FROM LCR A2,A1 CIRCULAR BUFFER END * LDR A4,A2 XRK A4,/FF OVERFLOW ? RF(NE) MKB130 NO ! * SCR A4,A1 YES ! ENB LDK A1,OVMASK SET OVERFLOW BIT ABL MKBEND COMPLETE REQUEST * MKB130 CW A1,DWTDEV+DWTINQ,A6 ANYTHING IN BUFFER ? RF(E) MKB140 NO ! CF A15,EOQUEU YES ! MOVE POINTER ST A1,DWTDEV+DWTUTQ,A6 STORE NEW POINTER =1 IFT PLC=1 =2 * * TEST IF THERE ARE MORE CHARACTERS IN CIRC. INPUT BUFFER * LDKL A4,/0800 "MORE CHARACTERS" INDICATION BIT CW A1,DWTDEV+DWTINQ,A6 MORE IN BUFFER ? RF(E) MKB135 NO ! ORS A4,DWTDEV,A6 XIF MKB133 ENB RF MKB150 * IFT PLC=1 =2 MKB135 C1R A4,A4 ANS A4,DWTDEV,A6 CLEAR "MORE CHARACTERS" INDICATION RB MKB133 XIF EJECT * * READ A CHARACTER FROM KEYBOARD * MKB140 EQU * CF A5,INPUT READ CHARACTER ENB * ANK A2,/7F MASK TO GET CHARACTER * IFT PLC=1 =2 * SET "MORE CHARACTERS" INDICATION BIT IF THERE * ARE MORE CHARACTERS * ANK A1,/1 MASK NOT SIGNIFICANT BITS SRC A1,5 ORS A1,DWTDEV,A6 * XIF IFT CTIMUT=1 CF A15,RESTRT RESTART TIMEOUT TIMER XIF * MKB150 EQU * IFT NEWKB+OLDKB=2 =2 * * CHECK WHICH KEYBOARD THAT IS USED * LD A4,DWTDEV,A6 KEYBOARD WITH ANKL A4,/1000 SPECIAL CONVERSION ? RF(Z) MKB290 PERHAPS ! XIF IFT NEWKB=1 =2 * * KB 6236/71/72 IS USED * CHECK INCOMING CHARACTER * LDR A4,A2 SUK A4,/80 SKIP CHAR. FROM CIRC. BUF.? RB(Z) MKB100 YES, READ NEXT CHARACTER ADK A4,/8 CTRL/SHIFT ? RF(NN) MKB220 YES ! ADK A4,/8 NORMAL CHARACTER ? RF(N) MKB300 YES ! EJECT * * KEYLOCK IS TURNED. SET/CLEAR CORRESPONDING BIT IN DWT. * IF THE KEYLOCK ISN'T CHANGED, WHICH MEANS THAT THE * CHARACTER IS COMING BECAUSE OF POWER UP, THE CHARAC- * TER SHOULD BE IGNORED. * LDK A1,1 "FLAG BIT" LDR A4,A4 KEYLOCK CHAR. - /70 MKB160 RF(Z) MKB170 KEYLOCK ON ! SUK A4,1 RF(Z) MKB180 KEYLOCK OFF ! SLC A1,1 SHIFT "FLAG BIT" LEFT SUK A4,1 RB MKB160 NEXT KEYLOCK, PERHAPS ? * MKB170 EQU * LD A4,DWTDEV+DWTKEY,A6 TEST IF KEYLOCK IS CHANGED TM A4,A1 RB(NE) MKB100 NO CHANGE, READ A NEW CHAR. ORS A1,DWTDEV+DWTKEY,A6 SET "FLAG BIT" RF MKB190 MKB180 EQU * LD A4,DWTDEV+DWTKEY,A6 TEST IF KEYLOCK CHANGED TM A4,A1 RB(Z) MKB100 NO CHANGE C1R A1,A1 COMPLEMENT FOR AND-FUNCTION ANS A1,DWTDEV+DWTKEY,A6 CLEAR "FLAG BIT" MKB190 EQU * CF A15,STORE STORE KEYLOCK CHARACTER IN ECB LDR A4,A7 LOAD ORDER CODE SUK A4,2 RF(N) MKB325 ORDER 1 ! EJECT * * KEYLOCK IS TURNED ! MAKE A NEGATIVE CODE * TO THE CONTROLWORD IN ECB AND COMPLETE REQUEST * MKB200 EQU * LDR A4,A2 LOAD CHARACTER SUK A4,/70 SRC A4,1 SHIFT TO GET KEY NUMBER RF(N) MKB210 ON OR OFF ? ADK A4,/4 ON ! MKB210 SLL A4,1 MAKE WORD POSI- SRL A4,1 TIVE AGAIN C1R A4,A4 CHANGE 0 TO 1 AND VICE VERSA ST A4,ECBCW,A8 STORE CODE IN ECB RF MKB335 SET RC=0 AND COMPLETE REQUEST * * CTRL OR (NUM.) SHIFT IS DEPRESSED (RELEASED) * MKB220 EQU * IFT KBLOCK=1 LD A1,DWTDEV+DWTKEY,A6 IS KB LOCKED ? RB(Z) MKB100 YES ! READ A NEW CHARACTER XIF IFT NEWKB=1 =2 IFT NSHIFT=0 * * MAKE CHARACTER /00 IF NUMERIC SHIFT KEY IS * DEPRESSED, AND SKIP THE INCOMING CHARACTER * IF IT IS RELEASED. * CCK A2,/7C00 DEPRESSED ? RF(NE) MKB230 NO ! LDK A2,/00 YES ! LOAD CHARACTER RF MKB300 * MKB230 CCK A2,/7D00 RELEASED ? RB(E) MKB100 YES ! SKIP CHARACTER XIF IFT NEWKB=1 =2 MKB250 LDK A1,/2 SHIFT BIT LDR A4,A4 SHIFT ON ? RF(Z) MKB260 YES ! SUK A4,1 SHIFT OFF ? RF(Z) MKB270 YES ! LDK A1,/4 CONTROL BIT SUK A4,1 CONTROL ON ? RF(Z) MKB260 YES ! SUK A4,1 CONTROL OFF ? RF(Z) MKB270 YES ! SUK A4,1 NUMERIC SHIFT ? RB MKB250 YES ! * MKB260 ORS A1,DWTDEV+DWTCS,A6 SET RF MKB280 MKB270 C1R A1,A1 COMPLEMENT ANS A1,DWTDEV+DWTCS,A6 CLEAR * MKB280 ABL MKB100 NEXT CHARACTER XIF IFT OLDKB=1 =2 EJECT * * SPECIAL CONVERSION OF CHARACTERS FROM * NUMERIC PART OF 6234. * MKB290 EQU * LDR A1,A6 IF THE DWT-ADDRESS IS ANK A1,1 ODD, SHOULD SPECIAL CONVERSION RF(NZ) MKB295 BE USED LDR A4,A2 IF BIT 8 IN CHARACTER IS ANK A4,/80 SET SHOULD SPECIAL CONV. BE USED RF(Z) MKB310 NO SPECIAL CONVERSION ANK A2,/7F MASK AWAY BIT 8 * * INDICATE SPECIAL CONVERSION ! * MKB295 ANKL A6,/FFFE MAKE THE DWT-ADDRESS EVEN LDK A4,/8 LOAD SPECIAL BIT ST A4,DWTDEV+DWTCS,A6 RF MKB310 XIF EJECT * * NORMAL CONVERSION * MKB300 EQU * * IFT KBLOCK=1 LD A1,DWTDEV+DWTKEY,A6 IS KB LOCKED ? ABL(Z) MKB100 YES ! READ A NEW CHARACTER XIF * MKB310 EQU * LD A1,DWTDEV+DWTCTB,A6 GET CTAB ADDRESS RF(E) MKB320 NO CONVERSION AD A1,DWTDEV+DWTCS,A6 GET CURRENT CONVERSION TABLE LDR* A1,A1 RF(E) MKB320 NO CONVERSION TABLE LDR A4,A2 SRL A4,3 LINE INDEX ADR A1,A4 LDR* A1,A1 COLUMN TABLE ADDRESS RF(E) MKB320 NO COLUMN LDR A4,A2 ANK A4,/F ADR A1,A4 ADD ROW INDEX LCR A2,A1 LOAD CHARACTER * MKB320 EQU * IFT OLDKB=1 =2 LDK A4,/7 RESET SPECIAL BIT ANS A4,DWTDEV+DWTCS,A6 XIF EJECT * * CHECK IF BASIC READ OR ORDER 2 OR 3 * LDR A4,A7 LOAD ORDER CODE SUK A4,2 RF(NN) MKB330 ORDER 2 OR 3 ! * * ORDER 1, BASIC READ * CF A5,STOECH STORE CHAR. IN ECB-BUFFER * AND SEND IT TO ECHO-DEVICE * IF ECHO WANTED * MKB325 EQU * CW A3,ECBRL,A8 EFF. LENGTH = REQ. LENGTH ? ABL(NE) MKB100 NO ! READ A NEW CHARACTER * RF MKB335 YES ! SET RETURN CODE = 0 EJECT * * ORDER 2 OR 3, STANDARD OR NUMERIC READ * MKB330 EQU * * * CHECK IF IT IS AN END-OF-RECORD-KEY * LD A1,ECBCW,A8 KEY-TABLE ADDRESS RF(Z) MKB360 NO KEYTABLE ! LCR A4,A1 TABLE LENGTH IN A4 ANK A4,/FF ADR A1,A4 ADDRESS TO LAST PLACE IN KEYTABLE ADK A1,1 MKB340 SUK A4,1 RF(N) MKB360 KEY NOT FOUND IN KEYTABLE SUK A1,1 NEXT KEY CCR A2,A1 EOR-CHARACTER ? RB(NE) MKB340 NO ! TRY NEXT KEY IN KEYTABLE * ADK A4,1 YES ! MAKE KEYTABLE INDEX MKB350 EQU * ST A4,ECBCW,A8 STORE INDEX IN CONTROL WORD * CF A15,STORE STORE CHARACTER IN ECB BUFFER IFT CECHO=1 ORK A2,/80 INDICATE EOR CHARACTER CF A5,EORECH ECHO CHARACTER XIF * MKB335 EQU * LDK A1,0 SET RETURN CODE = 0 RF MKBEND AND COMPLETE REQUEST * EJECT * * * CHARACTER CHECK * MKB360 EQU * STR A2,A15 SAVE CHARACTER ON STACK LD A1,DWTDEV,A6 CWK A7,2 STANDARD READ ? RF(NE) MKB380 NO ! LDK A4,/20 LOWER LIMIT SLC A1,2 /20-/7F ? RF(Z) MKB370 YES ! LDK A1,/5F NO ! UPPER LIMIT RF MKB400 * MKB370 LDK A1,/7F UPPER LIMIT RF MKB400 * MKB380 SLC A1,1 /30-/39 & /70-/79 ? RF(NZ) MKB390 NO ! * ANK A2,/3F RESET BIT 9 MKB390 LDK A1,/39 UPPER LIMIT LDK A4,/30 LOWER LIMIT * MKB400 SUR A1,A2 RF(N) MKB420 NOT WITHIN LIMITS SUR A4,A2 RF(P) MKB420 NOT WITHIN LIMITS LDR* A1,A15 DUMMY LOAD EJECT * * IT IS A "NORMAL" CHARACTER ! * MKB405 EQU * CF A5,STOECH STORE AND ECHO CHARACTER * CW A3,ECBRL,A8 LENGTH OVERFLOW ? ABL(L) MKB100 NO ! TAKE NEXT CHARACTER * MKB410 LDK A1,8 YES ! SET ERROR CODE RF MKBEND * * CHECK IF IT IS BACKSPACE, CLEAR, MULTIPLE ZERO, * STANDARD EOR, SKIP OR UNKNOWN CHARACTER * MKB420 LDR* A2,A15 RELOAD CHARACTER LDR A1,A2 ANK A1,/FF LD A4,ECBCW,A8 RF(NZ) MKB440 STANDARD EOR NOT USED ! LDK A4,1 INDEX TO STORE IN ECBCW IF STANDARD EOR CCK A1,/0D00 STANDARD EOR ? RB(E) MKB350 YES ! MKB440 EQU * SUK A1,/1B TRIPLE ZERO ? (/1B) ABL(E) MZ30 YES ! * ADK A1,/13 BACKSPACE ? (/08) ABL(E) BACKSP YES ! * SUK A1,/10 CLEAR ? (/18) ABL(E) CLEAR YES ! * SUK A1,/2 DOUBLE ZERO ? (/1A) ABL(E) MZ20 YES ! * SUK A1,/E5 SKIP CHARACTER (/FF) ABL(E) MKB100 YES ! IFT GREECE=1 =2 LDR A1,A2 CHECK IF CHARACTER IS SUK A1,/B0 WITHIN LIMITS FOR THE RF(N) MKB460 GREEK CHARACTER SET SUK A1,/9 RB(NP) MKB405 YES IT IS OK MKB460 EQU * XIF * * SET ERROR CODE FOR UNKNOWN CHARACTER * CF A15,STORE STORE CHARACTER IN ECB-BUFFER LDK A1,4 * EJECT **************************************** * * * COMMON END * * ************************************* MKBEND EQU * * IFT CTIMUT=1 LD A4,DWTTP+DWTDEV,A6 RF(E) MKBE10 NO TIMING ! CM* DWTTP+DWTDEV,A6 SCRATCH TIMER CM DWTTP+DWTDEV,A6 XIF * MKBE10 EQU * ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH * IFT CECHO=1 LDR A4,A1 SAVE A1 CF A5,ECHEND END OF ECHOING LDR A1,A4 XIF * ABL LENDIS PERFORM END I/O AND DIPATCH EJECT ************************************** * * * INTERRUPT HANDLER * * ************************************** IHKB EQU * ANK A2,/7F MASK TO GET CHARACTER IFT CTIMUT=1 CF A15,RESTRT RESTART TIMEOUT TIMER XIF * * STORE INCOMING CHARACTER IN CIRCULAR BUFFER * IFT OLDKB=1 =2 LDR A1,A6 SPECIAL CONVERSION ? ANK A1,1 RF(Z) IHKB02 NO ! ORK A2,/80 YES INDICATE BY SETTING BIT 8 XIF IHKB02 LD A1,DWTDEV+DWTINQ,A6 LCR A4,A1 XRK A4,/FF ALREADY OVERFLOW ? RF(E) IHKB05 YES ! * LDR A4,A1 CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS * CW A1,DWTDEV+DWTUTQ,A6 OVERFLOW ? RF(NE) IHKB20 NO ! LDK A1,/FF OVERFLOW INDICATION SCR A1,A4 SET OVFL. IND. IN BUFFER * IHKB05 EQU * IFT NEWKB+OLDKB=2 =2 LD A1,DWTDEV,A6 6236, 71, 72 ? ANKL A1,/1000 RF(Z) EXIT NO ! * XIF IFT NEWKB=1 =2 SUK A2,/70 KEYLOCK, SHIFT, CTRL ? RF(N) EXIT NO ! ADK A2,/70 YES ! * LDK A1,0 SC A1,DWTDEV+1,A6 LD A1,DWTDEV+DWTINQ,A6 LDR A4,A1 CF A15,EOQUEU CW A1,DWTDEV+DWTUTQ,A6 BUFFER FILLED ? RF(E) IHKB07 YES ! SCR A2,A4 STORE NEW CHARACTER LDK A2,/FF MOVE OVERFLOW INDICATION LDR A4,A1 FORWARD IN BUFFER RF IHKB20 * * CHECK BUFFER * IHKB07 LD A1,DWTDEV+DWTINQ,A6 POINTER TO LAST POS IN BUF. IHKB10 EQU * CW A1,DWTDEV+DWTUTQ,A6 END OF QUEUE ? RF(E) IHKB19 YES ! CF A15,SOQUEU GET PREVIOUS POINTER * LCR A4,A1 GET CHARACTER ANK A4,/7F XRR A4,A2 RF(Z) EXIT EQUAL CHARACTER ! SUK A4,1 INVERTED CHAR. ? RF(NZ) IHKB17 NO ! LDK A2,/80 YES ! LOAD SKIP CHAR FOR CIRC BUF RF IHKB18 * IHKB17 EQU * SUK A4,/F CTRL, SHIFT, KEYLOCK ? RB(N) IHKB10 YES ! * IHKB18 SCR A2,A1 NO ! STORE CHAR IN BUFFER RF EXIT * * CHECK BUFFER AGAIN AND SORT OUT * EQUAL AND INV. CHARACTERS * IHKB19 LC A4,DWTDEV+1,A6 SORT OUT EQUAL AND INV. CHAR ANK A4,/FF LD A1,DWTDEV+DWTINQ,A6 IHKB21 CF A15,SOQUEU SUK A4,1 RB(NN) IHKB21 IM DWTDEV,A6 LCR A4,A1 GET OLD CHAR FROM BUFFER CCK A4,/FF00 END OF BUFFER ? RF(E) EXIT YES ! SCR A2,A1 STORE THE NEW ONE LDR A2,A4 PUT CHAR IN A2 ANK A2,/7F RB IHKB07 XIF * IHKB20 ST A1,DWTDEV+DWTINQ,A6 STORE INQUEUE POINTER IHKB30 SCR A2,A4 STORE CHARACTER IN INPUT BUFFER * EXIT ABL LDISP DISPATCH ! EJECT * * STORING (&ECHOING) SUBROUTINE * SKIPS OTHER CHARACTERS THAN DIGITS IF * NUMERIC READ * STOECH EQU * CF A15,STORE STORE CHAR. IN ECB-BUFFER * IFT CECHO=1 IFT GREECE=1 =2 RF EORECH DO NOT MASK XIF IFT CECHO=1 ECHSUB ANK A2,/7F MASK TO GET CHARACTER EORECH EQU * IFT PLC=1 =2 LD A1,DWTDEV,A6 GET "MORE CHARACTERS" INDICATION BIT ANKL A1,/0800 XRS A1,DWTDEV,A6 RESET INDICATION BIT SLC A1,5 XIF IFT CECHO=1 CF A5,ECHO ECHO CHARACTER XIF * RTN A5 * EJECT IFT CTIMUT=1 * * THIS IS THE TIMEOUT ROUTINE * AKBTUT EQU * LDR A6,A1 LOAD DWT-ADDRESS CM DWTTP+DWTDEV,A6 LD A2,DWTST,A6 ABL(N) LDISP DISPATCH IF NO REQUEST ON * CF A15,ABORT RESET INPUT REQUESTED FLAG LDR A5,A6 INITIATE DWT-STACK POINTER ADKL A5,DWTSB2 LD A3,DWTA3,A6 RELOAD EFFECTIVE LENGTH FROM DWT LD A8,DWTECB,A6 RELOAD ECB-ADDRESS LDK A1,/40 SET RETURN CODE ABL MKBEND COMPLETE REQUEST * * RESTART TIMEOUT TIMER * RESTRT EQU * LD A4,DWTTP+DWTDEV,A6 RF(E) NOTIME NO TIMING LDKL A4,-TIME RESTART TIMER ST* A4,DWTTP+DWTDEV,A6 NOTIME RTN A15 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 A1,ECBBA,A8 BUFFER ADDRESS ADR A1,A3 ADD BUFFER INDEX SCR A2,A1 STORE CHARACTER IN BUFFER ADK A3,1 INCREMENT BUFFER INDEX RTN A15 * * EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER * * ON ENTRY: A1 = QUEUE POINTER * A6 = DWT-ADDRESS * EOQUEU EQU * ADK A1,1 SUR A1,A6 CWK A1,DWTDEV+DWTEQ END OF QUEUE ? RF(NE) EOQU10 LDKL A1,DWTDEV+DWTSQ SET QUEUE START ADDRESS EOQU10 ADR A1,A6 RTN A15 * * SOQUEUE = SUBROUTINE TO GET PREVIOUS QUEUE POINTER * * ON ENTRY: A1 = QUEUE POINTER * A6 = DWT-ADDRESS * SOQUEU EQU * SUR A1,A6 CWK A1,DWTDEV+DWTSQ FIRST POS IN QUEUE ? RF(NE) SOQ10 NO ! LDKL A1,DWTDEV+DWTEQ GET LAST POS IN QUEUE SOQ10 ADR A1,A6 SUK A1,1 GET PREVIOUS POINTER POS. RTN A15 EJECT * * BACKSPACE * BACKSP EQU * LDR A3,A3 RF(Z) KBBSPA ECB-BUFFER EMPTY SUK A3,1 ONE STEP BACKWARDS SUR A2,A2 CLEAR A2 CF A15,STORE STORE A BLANK INSTEAD OF LAST CHAR SUK A3,1 STEP BACKWARDS AGAIN * KBBSPA EQU * IFT CECHO=1 LDK A2,/8 BACKSPACE TO ECHODEVICE XIF KBBSP2 EQU * IFT CECHO=1 CF A5,ECHSUB ECHSUB CHARACTER XIF ABL MKB100 NEXT CHARACTER * * CLEAR * CLEAR EQU * LDK A3,0 RESET ECB-BUFFER RB KBBSP2 NEXT CHARACTER EJECT * * MULTIPLE ZERO * MZ20 EQU * DOUBLE ZERO LDK A4,2 RF MZ50 * MZ30 EQU * TRIPLE ZERO LDK A4,3 * MZ50 EQU * SUK A4,1 ANY MORE ZEROES ? ABL(L) MKB100 NO, NEXT CHARACTER * EJECT INH LD A1,DWTDEV+DWTUTQ,A6 GET OUTQUEUE POINTER CF A15,SOQUEU GET PREVIOUS POINTER * CW A1,DWTDEV+DWTINQ,A6 ANY SPACE LEFT ? RF(E) MZ90 NO ! MZ75 EQU * ST A1,DWTDEV+DWTUTQ,A6 STORE NEW OUTQUEUE POINTER LDK A2,/30 STORE ZERO IN CIRCULAR BUFF. SCR A2,A1 RB MZ50 * MZ80 EQU * LDK A4,/FF INDICATE BUFFER OVERFLOW SCR A4,A1 ST A1,DWTDEV+DWTUTQ,A6 UPPDATE POINTER LDK A1,/A SET RETURN CODE FOR BOTH LENGTH AND ENB THROUGHPUT ERRORS * ABL MKBEND * MZ90 EQU * LDR A4,A4 ALL ZEROES ? RB(E) MZ80 YES LDKL A2,/FFFF NO, MOVE IN-POINTER ADS A2,DWTDEV+DWTINQ,A6 RB MZ75 EJECT * **************************************** * * ABORT ROUTINE * **************************************** * ABKB EQU * CF A15,ABORT ABORT INPUT REQUEST IFT CTIMUT=1 LD A4,DWTTP+DWTDEV,A6 RF(Z) ABKB05 NO TIMER ! CM* DWTTP+DWTDEV,A6 CM DWTTP+DWTDEV,A6 RESET TIMER ABKB05 EQU * XIF * LD A4,DWTST,A6 GET STATUS WORD CF A15,TENDIO END I/O ON KEYBOARD SLC A4,2 GET ECHO-MODE INDICATION BIT ABKB10 EQU * ABL(NN) LDISP NOT AN ECHO REQUEST * LD A4,DWTECH,A6 GET DWT-ADDRESS OF ECHO DEVICE LD A3,DWTADR,A4 GET ADDRESS BLOCK LD A3,ABTADR,A3 GET ABORT-ADDRESS OF ECHO DEVICE RB(Z) ABKB10 ABORT-ADDRESS = 0 ! NO ABORT * LDR A6,A4 RESTORE DWT-ADDRESS OF ECHO DEVICE LDKL A5,DWTSB2 STACK BASE 2 DISPLACEMENT ADR A5,A6 ADD DWT-ADDRESS * ABR A3 JUMP TO ABORT ROUTINE OF ECHO DEVICE END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRKB04 REL 11.0 81-05-25 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0072 Head {h00=0x0030, h01=0x0050, text=» =2 GREEK CHARACTER SET & NEW CONDITIONS «, t00=0x0000, t01=0x0042}
0x0072…0090 Head {h00=0x001a, h01=0x0050, text=» REL 11.0 81-03-27 «, t00=0x0000, t01=0x0076}
0x0090…00c8 Head {h00=0x0034, h01=0x0050, text=» = 1 /00 SKIPPED IF IT CAME FROM SECOND DEVICE«, t00=0x0000, t01=0x0094}
0x00c8…00f8 Head {h00=0x002c, h01=0x0050, text=» ADDRESS VIA CIRCULAR INPUT BUFFER«, t00=0x0000, t01=0x00cc}
0x00f8…0114 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-01-26«, t00=0x0000, t01=0x00fc}
0x0114…011e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0150 Head {h00=0x002e, h01=0x002a, text=»******************************************«, t00=0x0000, t01=0x0122}
0x0150…015a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0000, t01=0x0154}
0x015a…0164 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0000, t01=0x015e}
0x0164…01a2 Head {h00=0x003a, h01=0x0036, text=»* P H I L I P S T E R M I N A L S Y S T E M P T S«, t00=0x0000, t01=0x0168}
0x01a2…01ac Head {h00=0x0006, h01=0x0002, text=»* «, t00=0x0001, t01=0x0016}
0x01ac…01d0 Head {h00=0x0020, h01=0x001c, text=»* DRKB04 = DRIVER KEYBOARD«, t00=0x0001, t01=0x0020}
0x01d0…01da Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0044}
0x01da…020c Head {h00=0x002e, h01=0x002a, text=»******************************************«, t00=0x0001, t01=0x004e}
0x020c…0216 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0080}
0x0216…024e Head {h00=0x0034, h01=0x0050, text=»* THIS DRIVER HANDLES INPUT FROM THE KEYBOARDS«, t00=0x0001, t01=0x008a}
0x024e…0278 Head {h00=0x0026, h01=0x0050, text=»* PTS 6231, -32, -33, -34, -36, «, t00=0x0001, t01=0x00c2}
0x0278…02ae Head {h00=0x0032, h01=0x002e, text=»* -71, -72, 6331, 6342 AND BADGE CARD READER«, t00=0x0001, t01=0x00ec}
0x02ae…02e6 Head {h00=0x0034, h01=0x002f, text=»* PTS 6261 WITH CONNECTED PIN (PERSONAL IDEN- «, t00=0x0001, t01=0x0122}
0x02e6…0310 Head {h00=0x0026, h01=0x0021, text=»* TIFICATION NUMBER -KEYBOARD). «, t00=0x0001, t01=0x015a}
0x0310…031a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0184}
0x031a…0352 Head {h00=0x0034, h01=0x002f, text=»* ONLY INPUT DATA ARE HANDLED BY THIS DRIVER. «, t00=0x0001, t01=0x018e}
0x0352…035c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0036}
0x035c…0390 Head {h00=0x0030, h01=0x002b, text=»* AN ECHO DEVICE CAN BE ATTACHED TO EVERY «, t00=0x0002, t01=0x0040}
0x0390…03c4 Head {h00=0x0030, h01=0x002b, text=»* KEYBOARD, WHERE RECEIVED CHARACTERS ARE «, t00=0x0002, t01=0x0074}
0x03c4…03d8 Head {h00=0x0010, h01=0x000b, text=»* ECHOED. «, t00=0x0002, t01=0x00a8}
0x03d8…03e2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x00bc}
0x03e2…0416 Head {h00=0x0030, h01=0x002b, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS: «, t00=0x0002, t01=0x00c6}
0x0416…043c Head {h00=0x0022, h01=0x0050, text=»* R C K B = RECOVERY ROUTINE«, t00=0x0002, t01=0x00fa}
0x043c…0462 Head {h00=0x0022, h01=0x001d, text=»* A C K B = ACTIVATION PART «, t00=0x0002, t01=0x0120}
0x0462…0482 Head {h00=0x001c, h01=0x0017, text=»* M A K B = MAIN PART «, t00=0x0002, t01=0x0146}
0x0482…04aa Head {h00=0x0024, h01=0x001f, text=»* I H K B = INTERRUPT HANDLER «, t00=0x0002, t01=0x0166}
0x04aa…04b4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x018e}
0x04b4…04e2 Head {h00=0x002a, h01=0x0025, text=»* THE FOLLOWING ORDERS ARE TREATED: «, t00=0x0003, t01=0x0008}
0x04e2…0506 Head {h00=0x0020, h01=0x001b, text=»* ORDER 01: BASIC READ «, t00=0x0003, t01=0x0036}
0x0506…052c Head {h00=0x0022, h01=0x001e, text=»* 02: STANDARD READ«, t00=0x0003, t01=0x005a}
0x052c…0552 Head {h00=0x0022, h01=0x001d, text=»* 03: NUMERIC READ «, t00=0x0003, t01=0x0080}
0x0552…057e Head {h00=0x0028, h01=0x0023, text=»* 31: RESET INPUT BUFFER «, t00=0x0003, t01=0x00a6}
0x057e…0588 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x00d2}
0x0588…0596 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00dc}
0x0596…05b8 Head {h00=0x001e, h01=0x001a, text=»* NORMAL REGISTER USAGE:«, t00=0x0003, t01=0x00ea}
0x05b8…05e0 Head {h00=0x0024, h01=0x0036, text=»* REGISTER A1: RETURN CODE «, t00=0x0003, t01=0x010c}
0x05e0…060c Head {h00=0x0028, h01=0x0023, text=»* A2: INPUT CHARACTER «, t00=0x0003, t01=0x0134}
0x060c…0634 Head {h00=0x0024, h01=0x0020, text=»* A3: BUFFER INDEX«, t00=0x0003, t01=0x0160}
0x0634…065e Head {h00=0x0026, h01=0x0021, text=»* A4: WORK REGISTER «, t00=0x0003, t01=0x0188}
0x065e…0684 Head {h00=0x0022, h01=0x001e, text=»* A5: STACK BASE«, t00=0x0004, t01=0x0022}
0x0684…06ac Head {h00=0x0024, h01=0x001f, text=»* A6: DWT-ADDRESS «, t00=0x0004, t01=0x0048}
0x06ac…06ce Head {h00=0x001e, h01=0x0019, text=»* A7: ORDER «, t00=0x0004, t01=0x0070}
0x06ce…06f6 Head {h00=0x0024, h01=0x001f, text=»* A8: ECB-ADDRESS «, t00=0x0004, t01=0x0092}
0x06f6…0700 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x00ba}
0x0700…071c Head {h00=0x0018, h01=0x0013, text=»* SYSTEM ADAPTION «, t00=0x0004, t01=0x00c4}
0x071c…0726 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x00e0}
0x0726…075c Head {h00=0x0032, h01=0x002d, text=»* DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE «, t00=0x0004, t01=0x00ea}
0x075c…0778 Head {h00=0x0018, h01=0x0013, text=»* DEFINED IN DWT. «, t00=0x0004, t01=0x0120}
0x0778…0782 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x013c}
0x0782…07b8 Head {h00=0x0032, h01=0x0050, text=»* IF TIMING IS WANTED, BIT 0 IN DWTDEV MUST «, t00=0x0004, t01=0x0146}
0x07b8…07f4 Head {h00=0x0038, h01=0x0034, text=»* BE SET UNEQUAL TO ZERO. STANDARD VALUE FOR TIME-«, t00=0x0004, t01=0x017c}
0x07f4…082e Head {h00=0x0036, h01=0x0032, text=»* OUT IS 30 SECONDS SINCE LAST DEPRESSED KEY. IF«, t00=0x0005, t01=0x0028}
0x082e…086a Head {h00=0x0038, h01=0x0033, text=»* ANOTHER VALUE IS WANTED FOR A SYSTEM, INDICATOR «, t00=0x0005, t01=0x0062}
0x086a…0890 Head {h00=0x0022, h01=0x001e, text=»* IN DRIVER MUST BE CHANGED.«, t00=0x0005, t01=0x009e}
0x0890…089a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0005, t01=0x00c4}
0x089a…08a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ce}
0x08a4…08e4 Head {h00=0x003c, h01=0x0050, text=»* BIT 1 IN DWTDEV IS SET TO ZERO IF CHARACTERS WITHIN «, t00=0x0005, t01=0x00d8}
0x08e4…0922 Head {h00=0x003a, h01=0x0050, text=»* /30-/39 AND /70-/79 ARE ACCEPTED FOR NUMERIC READ.«, t00=0x0005, t01=0x0118}
0x0922…095e Head {h00=0x0038, h01=0x0050, text=»* IF IT IS SET TO ONE, ONLY /30-/39 ARE ACCEPTED. «, t00=0x0005, t01=0x0156}
0x095e…0968 (6, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0004}
0x0968…09aa Head {h00=0x003e, h01=0x0050, text=»* BIT 2 IN DWTDEV IS SET TO ZERO IF /20-/5F ARE ACCEPTED«, t00=0x0006, t01=0x000e}
0x09aa…09ea Head {h00=0x003c, h01=0x0050, text=»* FOR STANDARD READ. IF IT IS SET TO ONE, /20-/7F ARE «, t00=0x0006, t01=0x0050}
0x09ea…0a00 Head {h00=0x0012, h01=0x0050, text=»* ACCEPTED. «, t00=0x0006, t01=0x0090}
0x0a00…0a0a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x00a6}
0x0a0a…0a46 Head {h00=0x0038, h01=0x0034, text=»* KEYBOARD TYPE MUST ALSO BE DEFINED IN DWT. BIT 3«, t00=0x0006, t01=0x00b0}
0x0a46…0a82 Head {h00=0x0038, h01=0x0034, text=»* IN DWTDEV MUST BE SET IF PTS 6236/71/72 IS USED.«, t00=0x0006, t01=0x00ec}
0x0a82…0a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0128}
0x0a8c…0acc Head {h00=0x003c, h01=0x0050, text=»* BIT 4 IN DWTDEV IS USED BY THE DRIVER TO INDICATE IF«, t00=0x0006, t01=0x0132}
0x0acc…0afa Head {h00=0x002a, h01=0x0050, text=»* MORE CHARACTERS ARE TO BE ECHOED. «, t00=0x0006, t01=0x0172}
0x0afa…0b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0010}
0x0b04…0b48 Head {h00=0x0040, h01=0x0050, text=»* SPACE FOR THE CIRCULAR INPUT BUFFER IS RESERVED IN DWT. «, t00=0x0007, t01=0x001a}
0x0b48…0b52 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0007, t01=0x005e}
0x0b52…0b8e Head {h00=0x0038, h01=0x0033, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE «, t00=0x0007, t01=0x0068}
0x0b8e…0bba Head {h00=0x0028, h01=0x0023, text=»* TO EXCLUDE FOLLOWING FUNCTIONS: «, t00=0x0007, t01=0x00a4}
0x0bba…0bd8 Head {h00=0x001a, h01=0x0016, text=»* ---- ECHO FUNCTION«, t00=0x0007, t01=0x00d0}
0x0bd8…0bfa Head {h00=0x001e, h01=0x001a, text=»* ---- TIME OUT FUNCTION«, t00=0x0007, t01=0x00ee}
0x0bfa…0c2c Head {h00=0x002e, h01=0x0029, text=»* ---- KEYBOARD LOCKED IF NO KEYLOCK ON «, t00=0x0007, t01=0x0110}
0x0c2c…0c64 Head {h00=0x0034, h01=0x0050, text=»* ---- COMPLETION OF READ REQUEST AT POWER-ON «, t00=0x0007, t01=0x0142}
0x0c64…0caa Head {h00=0x0042, h01=0x0050, text=»* ---- SHIFT KEY ON NUMERIC PART OF 6272 USED AS NORMAL KEY «, t00=0x0007, t01=0x017a}
0x0caa…0cb4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x0030}
0x0cb4…0cc2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x003a}
0x0cc2…0cd6 Head {h00=0x0010, h01=0x000b, text=»* ENTRIES «, t00=0x0008, t01=0x0048}
0x0cd6…0ce0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x005c}
0x0ce0…0d02 Head {h00=0x001e, h01=0x0050, text=» ENTRY KBAD4 ADDRESSBLOCK «, t00=0x0008, t01=0x0066}
0x0d02…0d0c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x0088}
0x0d0c…0d34 Head {h00=0x0024, h01=0x0020, text=»* EXTERNAL TOSS MODULE ENTRIES«, t00=0x0008, t01=0x0092}
0x0d34…0d3e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x00ba}
0x0d3e…0d6c Head {h00=0x002a, h01=0x0026, text=» EXTRN LENDER END REQUEST AND DISPATCH«, t00=0x0008, t01=0x00c4}
0x0d6c…0d92 Head {h00=0x0022, h01=0x001d, text=» EXTRN INPUT READ A CHARACTER «, t00=0x0008, t01=0x00f2}
0x0d92…0daa Head {h00=0x0014, h01=0x0010, text=» EXTRN ECHO ECHO«, t00=0x0008, t01=0x0118}
0x0daa…0dcc Head {h00=0x001e, h01=0x0050, text=» EXTRN ECHEND END OF ECHO «, t00=0x0008, t01=0x0130}
0x0dcc…0dea Head {h00=0x001a, h01=0x0015, text=» EXTRN LDISP DISPATCH «, t00=0x0008, t01=0x0152}
0x0dea…0e0a Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SETS TIME «, t00=0x0008, t01=0x0170}
0x0e0a…0e34 Head {h00=0x0026, h01=0x0050, text=» EXTRN LENDIS END I/O AND DISPATCH«, t00=0x0008, t01=0x0190}
0x0e34…0e58 Head {h00=0x0020, h01=0x0050, text=» EXTRN ABORT ABORT REQUESTS «, t00=0x0009, t01=0x002a}
0x0e58…0e7c Head {h00=0x0020, h01=0x0050, text=» EXTRN ABTADR ABORT-ADDRESS «, t00=0x0009, t01=0x004e}
0x0e7c…0e92 Head {h00=0x0012, h01=0x0050, text=» EXTRN TENDIO «, t00=0x0009, t01=0x0072}
0x0e92…0ea6 Head {h00=0x0010, h01=0x0050, text=» EXTRN TDISP«, t00=0x0009, t01=0x0088}
0x0ea6…0eb0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0009, t01=0x009c}
0x0eb0…0eca Head {h00=0x0016, h01=0x0012, text=»* DWT PARAMETERS«, t00=0x0009, t01=0x00a6}
0x0eca…0ed4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0009, t01=0x00c0}
0x0ed4…0eea Head {h00=0x0012, h01=0x000d, text=» EXTRN DWTDEV «, t00=0x0009, t01=0x00ca}
0x0eea…0efe Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTST«, t00=0x0009, t01=0x00e0}
0x0efe…0f12 Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTA3«, t00=0x0009, t01=0x00f4}
0x0f12…0f26 Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTA5«, t00=0x0009, t01=0x0108}
0x0f26…0f3c Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTADR «, t00=0x0009, t01=0x011c}
0x0f3c…0f52 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTECH «, t00=0x0009, t01=0x0132}
0x0f52…0f68 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTSB2 «, t00=0x0009, t01=0x0148}
0x0f68…0f7e Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTECB «, t00=0x0009, t01=0x015e}
0x0f7e…0f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0174}
0x0f88…0fa2 Head {h00=0x0016, h01=0x0050, text=»* ECB PARAMETERS«, t00=0x0009, t01=0x017e}
0x0fa2…0fac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0008}
0x0fac…0fd0 Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x000a, t01=0x0012}
0x0fd0…0ff6 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x000a, t01=0x0036}
0x0ff6…101c Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x000a, t01=0x005c}
0x101c…103e Head {h00=0x001e, h01=0x0050, text=» EXTRN ECBCW CONTROL WORD «, t00=0x000a, t01=0x0082}
0x103e…1048 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x00a4}
0x1048…105e Head {h00=0x0012, h01=0x000d, text=»* CONSTANTS «, t00=0x000a, t01=0x00ae}
0x105e…1068 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x00c4}
0x1068…1096 Head {h00=0x002a, h01=0x0026, text=»OVMASK EQU /2 OVERFLOW IN INPUT BUFFER«, t00=0x000a, t01=0x00ce}
0x1096…10bc Head {h00=0x0022, h01=0x0050, text=»TIME EQU 300 TIMEOUT CONSTANT «, t00=0x000a, t01=0x00fc}
0x10bc…10ca Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x000a, t01=0x0122}
0x10ca…10d4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x0130}
0x10d4…1100 Head {h00=0x0028, h01=0x0024, text=»************************************«, t00=0x000a, t01=0x013a}
0x1100…110a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x0166}
0x110a…112a Head {h00=0x001c, h01=0x0018, text=»* CONDITIONAL ASSEMBLY«, t00=0x000a, t01=0x0170}
0x112a…1134 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x0190}
0x1134…1160 Head {h00=0x0028, h01=0x0024, text=»************************************«, t00=0x000b, t01=0x000a}
0x1160…116a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000b, t01=0x0036}
0x116a…11aa Head {h00=0x003c, h01=0x0050, text=»* TIME OUT FUNCTION MAY BE INCLUDED BY SETTING X:A = 1«, t00=0x000b, t01=0x0040}
0x11aa…11b4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000b, t01=0x0080}
0x11b4…11c6 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000b, t01=0x008a}
0x11c6…11dc Head {h00=0x0012, h01=0x0050, text=»CTIMUT EQU X:A«, t00=0x000b, t01=0x009c}
0x11dc…11e6 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000b, t01=0x00b2}
0x11e6…1222 Head {h00=0x0038, h01=0x0034, text=»* ECHO FUNCTION MAY BE EXCLUDED BY SETTING X:B = 0«, t00=0x000b, t01=0x00bc}
0x1222…122c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000b, t01=0x00f8}
0x122c…123e Head {h00=0x000e, h01=0x0009, text=»X:B EQU 1 «, t00=0x000b, t01=0x0102}
0x123e…1254 Head {h00=0x0012, h01=0x000d, text=»CECHO EQU X:B «, t00=0x000b, t01=0x0114}
0x1254…125e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x012a}
0x125e…1298 Head {h00=0x0036, h01=0x0050, text=»* COMPLETION OF READ REQUEST AT POWER ON MAY BE «, t00=0x000b, t01=0x0134}
0x1298…12be Head {h00=0x0022, h01=0x0050, text=»* INCLUDED BY SETTING X:C =1«, t00=0x000b, t01=0x016e}
0x12be…12c8 (12, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0004}
0x12c8…12da Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000c, t01=0x000e}
0x12da…12f0 Head {h00=0x0012, h01=0x0050, text=»RECOV EQU X:C «, t00=0x000c, t01=0x0020}
0x12f0…12fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0036}
0x12fa…1338 Head {h00=0x003a, h01=0x0050, text=»* THE LENGTH OF THE CIRCULAR INPUT BUFFER IS DEFINED«, t00=0x000c, t01=0x0040}
0x1338…136c Head {h00=0x0030, h01=0x0050, text=»* IN X:D, NUMBER OF BYTES IN DECIMAL FORM.«, t00=0x000c, t01=0x007e}
0x136c…1376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00b2}
0x1376…1388 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 8 «, t00=0x000c, t01=0x00bc}
0x1388…139e Head {h00=0x0012, h01=0x0050, text=»DWTLNG EQU X:D«, t00=0x000c, t01=0x00ce}
0x139e…13a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e4}
0x13a8…13ca Head {h00=0x001e, h01=0x0050, text=»* CODE CONVERSION DUMMY «, t00=0x000c, t01=0x00ee}
0x13ca…13d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0110}
0x13d4…13e6 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000c, t01=0x011a}
0x13e6…13f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x012c}
0x13f0…13fe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0136}
0x13fe…1408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0144}
0x1408…144c Head {h00=0x0040, h01=0x0050, text=»* BY SETTING X:F=0 THE KEY A15 ON KB 71/72 GIVES THE CODE «, t00=0x000c, t01=0x014e}
0x144c…1478 (13, 0, 400) Head {h00=0x0028, h01=0x0050, text=»* /00 INSTEAD OF BEING A SHIFT KEY«, t00=0x000d, t01=0x0004}
0x1478…1482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0030}
0x1482…1494 Head {h00=0x000e, h01=0x0050, text=»X:F EQU 1 «, t00=0x000d, t01=0x003a}
0x1494…14aa Head {h00=0x0012, h01=0x0050, text=»NSHIFT EQU X:F«, t00=0x000d, t01=0x004c}
0x14aa…14b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0062}
0x14b4…14de Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:G = 1 KEYBOARD IS«, t00=0x000d, t01=0x006c}
0x14de…1502 Head {h00=0x0020, h01=0x0050, text=»* LOCKED IF NO KEYLOCK ON «, t00=0x000d, t01=0x0096}
0x1502…150c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ba}
0x150c…151e Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x000d, t01=0x00c4}
0x151e…1534 Head {h00=0x0012, h01=0x0050, text=»KBLOCK EQU X:G«, t00=0x000d, t01=0x00d6}
0x1534…153e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000d, t01=0x00ec}
0x153e…155a Head {h00=0x0018, h01=0x0013, text=»* MMU BUFFER SIZE «, t00=0x000d, t01=0x00f6}
0x155a…1564 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000d, t01=0x0112}
0x1564…1576 Head {h00=0x000e, h01=0x0050, text=»X:H EQU 10«, t00=0x000d, t01=0x011c}
0x1576…158c Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:H«, t00=0x000d, t01=0x012e}
0x158c…1596 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000d, t01=0x0144}
0x1596…15b4 Head {h00=0x001a, h01=0x0016, text=»* MMU KEY TABLE SIZE«, t00=0x000d, t01=0x014e}
0x15b4…15be Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000d, t01=0x016c}
0x15be…15d0 Head {h00=0x000e, h01=0x0050, text=»X:I EQU 10«, t00=0x000d, t01=0x0176}
0x15d0…15e6 Head {h00=0x0012, h01=0x0050, text=»DVBKTB EQU X:I«, t00=0x000d, t01=0x0188}
0x15e6…15f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x000e}
0x15f0…162a Head {h00=0x0036, h01=0x0050, text=»* X:J SHOULD BE SET TO 1 IF KB 6236, 71 OR 72 =2«, t00=0x000e, t01=0x0018}
0x162a…1650 Head {h00=0x0022, h01=0x0050, text=»* IS INCLUDED IN SYSTEM =2 «, t00=0x000e, t01=0x0052}
0x1650…165a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0078}
0x165a…166c Head {h00=0x000e, h01=0x0050, text=»X:J EQU 1 «, t00=0x000e, t01=0x0082}
0x166c…1682 Head {h00=0x0012, h01=0x0050, text=»NEWKB EQU X:J «, t00=0x000e, t01=0x0094}
0x1682…168c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00aa}
0x168c…16c8 Head {h00=0x0038, h01=0x0050, text=»* X:K SHOULD BE SET TO 1 IF OTHER KB THAN 6236 =2 «, t00=0x000e, t01=0x00b4}
0x16c8…16f6 Head {h00=0x002a, h01=0x0050, text=»* 71 OR 72 IS INCLUDED IN SYSTEM =2«, t00=0x000e, t01=0x00f0}
0x16f6…1700 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011e}
0x1700…1712 Head {h00=0x000e, h01=0x0050, text=»X:K EQU 1 «, t00=0x000e, t01=0x0128}
0x1712…1728 Head {h00=0x0012, h01=0x0050, text=»OLDKB EQU X:K «, t00=0x000e, t01=0x013a}
0x1728…1732 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0150}
0x1732…1768 Head {h00=0x0032, h01=0x0050, text=»* X:L SHOULD BE SET TO 1 IF PLC IS USED =2 «, t00=0x000e, t01=0x015a}
0x1768…1772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0190}
0x1772…1784 Head {h00=0x000e, h01=0x0050, text=»X:L EQU 1 «, t00=0x000f, t01=0x000a}
0x1784…1798 Head {h00=0x0010, h01=0x0050, text=»PLC EQU X:L «, t00=0x000f, t01=0x001c}
0x1798…17a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0030}
0x17a2…17d2 Head {h00=0x002c, h01=0x0050, text=»* IF X:M = 1 IT IS POSSIBLE TO USE =2«, t00=0x000f, t01=0x003a}
0x17d2…17f6 Head {h00=0x0020, h01=0x0050, text=»* GREEK CHARACTER SET =2 «, t00=0x000f, t01=0x006a}
0x17f6…1800 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x008e}
0x1800…1812 Head {h00=0x000e, h01=0x0050, text=»X:M EQU 0 «, t00=0x000f, t01=0x0098}
0x1812…1828 Head {h00=0x0012, h01=0x0050, text=»GREECE EQU X:M«, t00=0x000f, t01=0x00aa}
0x1828…185e Head {h00=0x0032, h01=0x002f, text=»* A PROGRAM VERSION USING TOSS MMU-PAGING IS«, t00=0x000f, t01=0x00c0}
0x185e…188c Head {h00=0x002a, h01=0x0025, text=»* OBTAINED BY SETTING MMUPAG EQU 1. «, t00=0x000f, t01=0x00f6}
0x188c…1896 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x0124}
0x1896…18aa Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000f, t01=0x012e}
0x18aa…18b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0142}
0x18b4…18c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x014c}
0x18c2…18cc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x015a}
0x18cc…18e8 Head {h00=0x0018, h01=0x0014, text=»* DWT-DISPLACEMENT«, t00=0x000f, t01=0x0164}
0x18e8…18f2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x0180}
0x18f2…1918 Head {h00=0x0022, h01=0x0050, text=»DWTKEY EQU /04 KEYLOCK MEMORY «, t00=0x000f, t01=0x018a}
0x1918…1940 Head {h00=0x0024, h01=0x0050, text=»DWTCS EQU /06 CRTL-SHIFT MEMORY «, t00=0x0010, t01=0x0020}
0x1940…1972 Head {h00=0x002e, h01=0x0050, text=»DWTCTB EQU /08 CONVERSION POINTERS ADDRESS«, t00=0x0010, t01=0x0048}
0x1972…1996 Head {h00=0x0020, h01=0x0050, text=»DWTTP EQU /0A TIMER POINTER «, t00=0x0010, t01=0x007a}
0x1996…19a0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x009e}
0x19a0…19c2 Head {h00=0x001e, h01=0x0019, text=»* CIRCULAR INPUT BUFFER «, t00=0x0010, t01=0x00a8}
0x19c2…19cc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x00ca}
0x19cc…19fa Head {h00=0x002a, h01=0x0050, text=»DWTINQ EQU /0C POINTER TO FIRST PLACE «, t00=0x0010, t01=0x00d4}
0x19fa…1a26 Head {h00=0x0028, h01=0x0050, text=»DWTUTQ EQU /0E POINTER TO LAST PLACE«, t00=0x0010, t01=0x0102}
0x1a26…1a4c Head {h00=0x0022, h01=0x0050, text=»DWTSQ EQU /10 START OF BUFFER «, t00=0x0010, t01=0x012e}
0x1a4c…1a78 Head {h00=0x0028, h01=0x0050, text=»DWTEQ EQU DWTSQ+DWTLNG END OF BUFFER«, t00=0x0010, t01=0x0154}
0x1a78…1a82 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x0180}
0x1a82…1a9c Head {h00=0x0016, h01=0x0011, text=»* ADDRESS BLOCK «, t00=0x0010, t01=0x018a}
0x1a9c…1aa6 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x0014}
0x1aa6…1ac8 Head {h00=0x001e, h01=0x0050, text=» DATA DVBKTB MMU KEY TABLE«, t00=0x0011, t01=0x001e}
0x1ac8…1aec Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x0040}
0x1aec…1b08 Head {h00=0x0018, h01=0x0050, text=» DATA 6 DEVICE INDEX«, t00=0x0011, t01=0x0064}
0x1b08…1b1c Head {h00=0x0010, h01=0x0050, text=»KBAD4 EQU * «, t00=0x0011, t01=0x0080}
0x1b1c…1b3e Head {h00=0x001e, h01=0x001a, text=» DATA ACKB ACTIVATION PART«, t00=0x0011, t01=0x0094}
0x1b3e…1b5e Head {h00=0x001c, h01=0x0050, text=» DATA ABKB ABORT ROUTINE«, t00=0x0011, t01=0x00b6}
0x1b5e…1b82 Head {h00=0x0020, h01=0x001c, text=» DATA IHKB INTERRUPT HANDLER«, t00=0x0011, t01=0x00d6}
0x1b82…1b96 Head {h00=0x0010, h01=0x0050, text=» IFF RECOV=1«, t00=0x0011, t01=0x00fa}
0x1b96…1bba Head {h00=0x0020, h01=0x001b, text=» DATA 0 NO RECOVERY ROUTINE «, t00=0x0011, t01=0x010e}
0x1bba…1bc6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0132}
0x1bc6…1bda Head {h00=0x0010, h01=0x0050, text=» IFT RECOV=1«, t00=0x0011, t01=0x013e}
0x1bda…1bfe Head {h00=0x0020, h01=0x0050, text=» DATA RCKB RECOVERY ROUTINE «, t00=0x0011, t01=0x0152}
0x1bfe…1c0c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0176}
0x1c0c…1c38 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0011, t01=0x0184}
0x1c38…1c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0020}
0x1c42…1c5e Head {h00=0x0018, h01=0x0050, text=»* RECOVERY ROUTINE«, t00=0x0012, t01=0x002a}
0x1c5e…1c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0046}
0x1c68…1c96 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0012, t01=0x0050}
0x1c96…1cb4 Head {h00=0x001a, h01=0x0050, text=»RCKB LDR A8,A8 BUSY ? «, t00=0x0012, t01=0x007e}
0x1cb4…1cce Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RC10 YES !«, t00=0x0012, t01=0x009c}
0x1cce…1ce8 Head {h00=0x0016, h01=0x0050, text=» LDKL A1,/400 NO !«, t00=0x0012, t01=0x00b6}
0x1ce8…1d14 Head {h00=0x0028, h01=0x0050, text=» ORS A1,DWTDEV,A6 INDICATE POWER OFF«, t00=0x0012, t01=0x00d0}
0x1d14…1d32 Head {h00=0x001a, h01=0x0050, text=» ABL LENDIS DISPATCH !«, t00=0x0012, t01=0x00fc}
0x1d32…1d3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011a}
0x1d3c…1d5e Head {h00=0x001e, h01=0x0050, text=»RC10 CWK A7,1 BASIC READ ?«, t00=0x0012, t01=0x0124}
0x1d5e…1d7a Head {h00=0x0018, h01=0x0050, text=» ABL(E) LDISP YES ! «, t00=0x0012, t01=0x0146}
0x1d7a…1d8a Head {h00=0x000c, h01=0x0050, text=»* NO ! «, t00=0x0012, t01=0x0162}
0x1d8a…1dba Head {h00=0x002c, h01=0x0050, text=» CF A15,ABORT RESET INPUT REQUESTED FLAG«, t00=0x0012, t01=0x0172}
0x1dba…1dea Head {h00=0x002c, h01=0x0050, text=» LD A3,DWTA3,A6 RELOAD EFFECTIVE LENGTH «, t00=0x0013, t01=0x0012}
0x1dea…1e14 Head {h00=0x0026, h01=0x0050, text=»RC15 CM ECBCW,A8 COMPLETE REQUEST «, t00=0x0013, t01=0x0042}
0x1e14…1e3e Head {h00=0x0026, h01=0x0050, text=» ABL MKB335 AND SET RETURN CODE =0«, t00=0x0013, t01=0x006c}
0x1e3e…1e4a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0096}
0x1e4a…1e58 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0013, t01=0x00a2}
0x1e58…1e84 Head {h00=0x0028, h01=0x0024, text=»************************************«, t00=0x0013, t01=0x00b0}
0x1e84…1e8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00dc}
0x1e8e…1e98 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x00e6}
0x1e98…1eac Head {h00=0x0010, h01=0x000b, text=»* A C K B «, t00=0x0013, t01=0x00f0}
0x1eac…1ec8 Head {h00=0x0018, h01=0x0013, text=»* ACTIVATION PART «, t00=0x0013, t01=0x0104}
0x1ec8…1ed2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x0120}
0x1ed2…1edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x012a}
0x1edc…1f08 Head {h00=0x0028, h01=0x0024, text=»************************************«, t00=0x0013, t01=0x0134}
0x1f08…1f1a Head {h00=0x000e, h01=0x000a, text=»ACKB EQU *«, t00=0x0013, t01=0x0160}
0x1f1a…1f26 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0013, t01=0x0172}
0x1f26…1f30 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x017e}
0x1f30…1f52 Head {h00=0x001e, h01=0x0019, text=» LDK A1,0 RESET REGISTERS «, t00=0x0013, t01=0x0188}
0x1f52…1f64 Head {h00=0x000e, h01=0x0009, text=» LDK A3,0 «, t00=0x0014, t01=0x001a}
0x1f64…1f6e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x002c}
0x1f6e…1f86 Head {h00=0x0014, h01=0x000f, text=»* CHECK ORDER «, t00=0x0014, t01=0x0036}
0x1f86…1f90 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x004e}
0x1f90…1fa2 Head {h00=0x000e, h01=0x000a, text=» LDR A4,A7«, t00=0x0014, t01=0x0058}
0x1fa2…1fc6 Head {h00=0x0020, h01=0x001c, text=» RF(NG) AKB100 ILLEGAL ORDER«, t00=0x0014, t01=0x006a}
0x1fc6…1fd8 Head {h00=0x000e, h01=0x0009, text=» SUK A4,4 «, t00=0x0014, t01=0x008e}
0x1fd8…1ffe Head {h00=0x0022, h01=0x001d, text=» RF(N) AKB200 ORDER 1, 2 OR 3 «, t00=0x0014, t01=0x00a0}
0x1ffe…2014 Head {h00=0x0012, h01=0x000d, text=» SUK A4,/2D «, t00=0x0014, t01=0x00c6}
0x2014…2032 Head {h00=0x001a, h01=0x0016, text=» RF(Z) AKB110 ORDER 31«, t00=0x0014, t01=0x00dc}
0x2032…203c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x00fa}
0x203c…2056 Head {h00=0x0016, h01=0x0011, text=»* ILLEGAL ORDER «, t00=0x0014, t01=0x0104}
0x2056…2060 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x011e}
0x2060…2074 Head {h00=0x0010, h01=0x0050, text=»AKB100 EQU *«, t00=0x0014, t01=0x0128}
0x2074…2098 Head {h00=0x0020, h01=0x001c, text=» ABL LENDER COMPLETE REQUEST«, t00=0x0014, t01=0x013c}
0x2098…20a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0160}
0x20a6…20b0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x016e}
0x20b0…20da Head {h00=0x0026, h01=0x0021, text=»* ORDER 31. RESET INPUT BUFFER. «, t00=0x0014, t01=0x0178}
0x20da…20e4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0015, t01=0x0012}
0x20e4…20f8 Head {h00=0x0010, h01=0x000c, text=»AKB110 EQU *«, t00=0x0015, t01=0x001c}
0x20f8…2104 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0015, t01=0x0030}
0x2104…212c Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTDEV+DWTUTQ,A6 BUF END «, t00=0x0015, t01=0x003c}
0x212c…215a Head {h00=0x002a, h01=0x0050, text=» CW A1,DWTDEV+DWTINQ,A6 BUFFER EMPTY ?«, t00=0x0015, t01=0x0064}
0x215a…2176 Head {h00=0x0018, h01=0x0050, text=» RF(E) AKB119 YES ! «, t00=0x0015, t01=0x0092}
0x2176…2180 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ae}
0x2180…2192 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0015, t01=0x00b8}
0x2192…21b0 Head {h00=0x001a, h01=0x0050, text=» IFT NEWKB+OLDKB=2 =2«, t00=0x0015, t01=0x00ca}
0x21b0…21c8 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTDEV,A6«, t00=0x0015, t01=0x00e8}
0x21c8…21f4 Head {h00=0x0028, h01=0x0050, text=» ANKL A4,/1000 PTS 6236, -71, -72 ? «, t00=0x0015, t01=0x0100}
0x21f4…220e Head {h00=0x0016, h01=0x0050, text=» RF(Z) AKB118 NO !«, t00=0x0015, t01=0x012c}
0x220e…221a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0146}
0x221a…2232 Head {h00=0x0014, h01=0x0050, text=» IFT NEWKB=1 =2«, t00=0x0015, t01=0x0152}
0x2232…223c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x016a}
0x223c…227a Head {h00=0x003a, h01=0x0050, text=»* SHIFT, CTRL AND KEYLOCK CHARACTERS ARE NOT REMOVED«, t00=0x0015, t01=0x0174}
0x227a…22ac Head {h00=0x002e, h01=0x0050, text=»* FROM BUFFER WHEN KB 6236/71/72 IS USED«, t00=0x0016, t01=0x0022}
0x22ac…22b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0054}
0x22b6…22dc Head {h00=0x0022, h01=0x0050, text=»AKB112 LCR A4,A1 GET CHARACTER«, t00=0x0016, t01=0x005e}
0x22dc…22f0 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0016, t01=0x0084}
0x22f0…2306 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0016, t01=0x0098}
0x2306…2330 Head {h00=0x0026, h01=0x0050, text=» CCK A4,/7C00 NUMSHIFT DEPRESSED ?«, t00=0x0016, t01=0x00ae}
0x2330…235a Head {h00=0x0026, h01=0x0050, text=» RF(E) AKB113 YES ! SKIP CHARACTER«, t00=0x0016, t01=0x00d8}
0x235a…2366 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0102}
0x2366…237e Head {h00=0x0014, h01=0x0050, text=» IFT NEWKB=1 =2«, t00=0x0016, t01=0x010e}
0x237e…23a2 Head {h00=0x0020, h01=0x0050, text=» SUK A4,/80 SKIP CHARACTER ?«, t00=0x0016, t01=0x0126}
0x23a2…23be Head {h00=0x0018, h01=0x0050, text=» RF(Z) AKB113 YES ! «, t00=0x0016, t01=0x014a}
0x23be…23e8 Head {h00=0x0026, h01=0x0050, text=» ADK A4,/10 SHIFT, CTRL, KEYLOCK ?«, t00=0x0016, t01=0x0166}
0x23e8…2404 Head {h00=0x0018, h01=0x0050, text=» RF(NN) AKB120 YES !«, t00=0x0016, t01=0x0190}
0x2404…240e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x001c}
0x240e…243c Head {h00=0x002a, h01=0x0050, text=»AKB113 CF A15,EOQUEU GET NEXT POINTER «, t00=0x0017, t01=0x0026}
0x243c…2468 Head {h00=0x0028, h01=0x0050, text=» CW A1,DWTDEV+DWTINQ,A6 END OF BUF ?«, t00=0x0017, t01=0x0054}
0x2468…248e Head {h00=0x0022, h01=0x0050, text=» RB(NE) AKB112 NO ! CHECK NEXT«, t00=0x0017, t01=0x0080}
0x248e…2498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a6}
0x2498…24a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00b0}
0x24a4…24bc Head {h00=0x0014, h01=0x0050, text=»AKB118 SCR A3,A1«, t00=0x0017, t01=0x00bc}
0x24bc…24e0 Head {h00=0x0020, h01=0x0050, text=» ST A2,DWTDEV+DWTINQ,A6 YES!«, t00=0x0017, t01=0x00d4}
0x24e0…24f2 Head {h00=0x000e, h01=0x0050, text=»AKB119 ENB«, t00=0x0017, t01=0x00f8}
0x24f2…2524 Head {h00=0x002e, h01=0x0050, text=» ABL MKB335 SET RC=0 AND COMPLETE REQUEST «, t00=0x0017, t01=0x010a}
0x2524…252e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x013c}
0x252e…2546 Head {h00=0x0014, h01=0x0050, text=» IFT NEWKB=1 =2«, t00=0x0017, t01=0x0146}
0x2546…256e Head {h00=0x0024, h01=0x0050, text=»AKB120 ADK A4,/70 RESTORE CHAR. «, t00=0x0017, t01=0x015e}
0x256e…258e Head {h00=0x001c, h01=0x0050, text=» SCR A4,A2 STORE IN BUF.«, t00=0x0017, t01=0x0186}
0x258e…25b4 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A1 EXCHANGE REGISTERS «, t00=0x0018, t01=0x0016}
0x25b4…25c6 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0018, t01=0x003c}
0x25c6…25ee Head {h00=0x0024, h01=0x0050, text=» CF A15,EOQUEU GET NEXT POINTER «, t00=0x0018, t01=0x004e}
0x25ee…2600 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0018, t01=0x0076}
0x2600…2612 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0018, t01=0x0088}
0x2612…2624 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0018, t01=0x009a}
0x2624…2636 Head {h00=0x000e, h01=0x0050, text=» RB AKB113«, t00=0x0018, t01=0x00ac}
0x2636…2640 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0018, t01=0x00be}
0x2640…264c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00c8}
0x264c…2660 Head {h00=0x0010, h01=0x000c, text=»AKB200 EQU *«, t00=0x0018, t01=0x00d4}
0x2660…2674 Head {h00=0x0010, h01=0x0050, text=» IFT RECOV=1«, t00=0x0018, t01=0x00e8}
0x2674…267e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fc}
0x267e…2698 Head {h00=0x0016, h01=0x0050, text=»* POWER OFF TEST«, t00=0x0018, t01=0x0106}
0x2698…26a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0120}
0x26a2…26c6 Head {h00=0x0020, h01=0x0050, text=» LD A2,DWTDEV,A6 POWER OFF ?«, t00=0x0018, t01=0x012a}
0x26c6…26dc Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/400 «, t00=0x0018, t01=0x014e}
0x26dc…26f6 Head {h00=0x0016, h01=0x0050, text=» RF(E) AKB205 NO !«, t00=0x0018, t01=0x0164}
0x26f6…2724 Head {h00=0x002a, h01=0x0050, text=» XRS A2,DWTDEV,A6 RESET POWER OFF BIT «, t00=0x0018, t01=0x017e}
0x2724…2742 Head {h00=0x001a, h01=0x0050, text=» CWK A7,1 BASIC READ ?«, t00=0x0019, t01=0x001c}
0x2742…276e Head {h00=0x0028, h01=0x0050, text=» RB(NE) RC15 NO ! COMPLETE REQUEST !«, t00=0x0019, t01=0x003a}
0x276e…277a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0066}
0x277a…278e Head {h00=0x0010, h01=0x0050, text=»AKB205 EQU *«, t00=0x0019, t01=0x0072}
0x278e…27a4 Head {h00=0x0012, h01=0x000d, text=» IFT CTIMUT=1 «, t00=0x0019, t01=0x0086}
0x27a4…27b2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x009c}
0x27b2…27bc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x00aa}
0x27bc…27e0 Head {h00=0x0020, h01=0x001b, text=»* INITIATE TIMING ROUTINE «, t00=0x0019, t01=0x00b4}
0x27e0…27ea Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x00d8}
0x27ea…280c Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTDEV,A6 TIMING ? «, t00=0x0019, t01=0x00e2}
0x280c…2826 Head {h00=0x0016, h01=0x0012, text=» RF(NN) AKB210 NO!«, t00=0x0019, t01=0x0104}
0x2826…2830 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x011e}
0x2830…2874 Head {h00=0x0040, h01=0x0050, text=» LD A4,DWTTP+DWTDEV,A6 YES ! IS THERE AN EXISTING POINTER ? «, t00=0x0019, t01=0x0128}
0x2874…288e Head {h00=0x0016, h01=0x0011, text=» RF(E) AKBTIM NO! «, t00=0x0019, t01=0x016c}
0x288e…2898 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x0186}
0x2898…28c2 Head {h00=0x0026, h01=0x0050, text=» CF A15,RESTRT YES ! RESTART TIMER«, t00=0x0019, t01=0x0190}
0x28c2…28d4 Head {h00=0x000e, h01=0x000a, text=» RF AKB210«, t00=0x001a, t01=0x002a}
0x28d4…28de Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x003c}
0x28de…28f2 Head {h00=0x0010, h01=0x000c, text=»AKBTIM EQU *«, t00=0x001a, t01=0x0046}
0x28f2…2916 Head {h00=0x0020, h01=0x001c, text=» LDR A1,A6 DWT-ADDRESS IN A1«, t00=0x001a, t01=0x005a}
0x2916…2920 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x007e}
0x2920…2940 Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIME SET TIME «, t00=0x001a, t01=0x0088}
0x2940…2970 Head {h00=0x002c, h01=0x0050, text=» DATA AKBTUT,TIME TIMEOUT ROUTINE & TIME«, t00=0x001a, t01=0x00a8}
0x2970…297a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x00d8}
0x297a…29b4 Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTTP+DWTDEV,A6 STORE TIMER ADDRESS IN DWT «, t00=0x001a, t01=0x00e2}
0x29b4…29c0 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x001a, t01=0x011c}
0x29c0…29ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0128}
0x29ce…29d8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x0136}
0x29d8…29fa Head {h00=0x001e, h01=0x0019, text=»* REQUESTED LENGTH OK ? «, t00=0x001a, t01=0x0140}
0x29fa…2a04 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x0162}
0x2a04…2a40 Head {h00=0x0038, h01=0x0050, text=»AKB210 LD A2,ECBRL,A8 REQUESTED LENGTH IN ECB = 0 ? «, t00=0x001a, t01=0x016c}
0x2a40…2a70 Head {h00=0x002c, h01=0x0027, text=» ABL(E) MKBEND YES ! COMPLETE REQUEST ! «, t00=0x001b, t01=0x0018}
0x2a70…2a7a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x0048}
0x2a7a…2a96 Head {h00=0x0018, h01=0x0015, text=»* CLEAR ECB-BUFFER«, t00=0x001b, t01=0x0052}
0x2a96…2aa0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x006e}
0x2aa0…2ac6 Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBBA,A8 BUFFER ADDRESS«, t00=0x001b, t01=0x0078}
0x2ac6…2ad8 Head {h00=0x000e, h01=0x0009, text=» SUK A1,1 «, t00=0x001b, t01=0x009e}
0x2ad8…2b00 Head {h00=0x0024, h01=0x001f, text=» ADR A1,A2 ADD REQUESTED LENGTH «, t00=0x001b, t01=0x00b0}
0x2b00…2b0a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x00d8}
0x2b0a…2b46 Head {h00=0x0038, h01=0x0034, text=»AKB230 SCR A3,A1 CLEAR BUFFER UNTIL REQUESTED LENGTH«, t00=0x001b, t01=0x00e2}
0x2b46…2b5a Head {h00=0x0010, h01=0x000b, text=» SUK A1,1 «, t00=0x001b, t01=0x011e}
0x2b5a…2b6c Head {h00=0x000e, h01=0x0009, text=» SUK A2,1 «, t00=0x001b, t01=0x0132}
0x2b6c…2b90 Head {h00=0x0020, h01=0x001c, text=» RB(NE) AKB230 NOT READY YET«, t00=0x001b, t01=0x0144}
0x2b90…2b9e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0168}
0x2b9e…2ba8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x0176}
0x2ba8…2bd4 Head {h00=0x0028, h01=0x0024, text=»************************************«, t00=0x001b, t01=0x0180}
0x2bd4…2bde Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x001c}
0x2bde…2be8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x0026}
0x2be8…2bfa Head {h00=0x000e, h01=0x0009, text=»* M K B «, t00=0x001c, t01=0x0030}
0x2bfa…2c22 Head {h00=0x0024, h01=0x0020, text=»* MAIN PART OF KEYBOARD DRIVER«, t00=0x001c, t01=0x0042}
0x2c22…2c2c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x006a}
0x2c2c…2c36 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x0074}
0x2c36…2c64 Head {h00=0x002a, h01=0x0026, text=»**************************************«, t00=0x001c, t01=0x007e}
0x2c64…2c6e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x00ac}
0x2c6e…2ca6 Head {h00=0x0034, h01=0x002f, text=»* CHECK CIRCULAR INPUT BUFFER. IF IT CONTAINS «, t00=0x001c, t01=0x00b6}
0x2ca6…2cdc Head {h00=0x0032, h01=0x002e, text=»* CHARACTERS AND NO OVERFLOW HAS OCCURRED, A«, t00=0x001c, t01=0x00ee}
0x2cdc…2d04 Head {h00=0x0024, h01=0x001f, text=»* CHARACTER WILL BE PUT IN A2 «, t00=0x001c, t01=0x0124}
0x2d04…2d0e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x014c}
0x2d0e…2d22 Head {h00=0x0010, h01=0x0050, text=»MKB100 EQU *«, t00=0x001c, t01=0x0156}
0x2d22…2d2e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001c, t01=0x016a}
0x2d2e…2d64 Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTDEV+DWTUTQ,A6 FETCH A CHARACTER FROM«, t00=0x001c, t01=0x0176}
0x2d64…2d8a Head {h00=0x0022, h01=0x001e, text=» LCR A2,A1 CIRCULAR BUFFER END«, t00=0x001d, t01=0x001c}
0x2d8a…2d94 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x0042}
0x2d94…2da6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001d, t01=0x004c}
0x2da6…2dc4 Head {h00=0x001a, h01=0x0016, text=» XRK A4,/FF OVERFLOW ?«, t00=0x001d, t01=0x005e}
0x2dc4…2de0 Head {h00=0x0018, h01=0x0050, text=» RF(NE) MKB130 NO ! «, t00=0x001d, t01=0x007c}
0x2de0…2dea Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x0098}
0x2dea…2e02 Head {h00=0x0014, h01=0x0050, text=» SCR A4,A1 YES !«, t00=0x001d, t01=0x00a2}
0x2e02…2e0e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x001d, t01=0x00ba}
0x2e0e…2e36 Head {h00=0x0024, h01=0x001f, text=» LDK A1,OVMASK SET OVERFLOW BIT «, t00=0x001d, t01=0x00c6}
0x2e36…2e5a Head {h00=0x0020, h01=0x001c, text=» ABL MKBEND COMPLETE REQUEST«, t00=0x001d, t01=0x00ee}
0x2e5a…2e64 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x0112}
0x2e64…2e9e Head {h00=0x0036, h01=0x0050, text=»MKB130 CW A1,DWTDEV+DWTINQ,A6 ANYTHING IN BUFFER ?«, t00=0x001d, t01=0x011c}
0x2e9e…2eb8 Head {h00=0x0016, h01=0x0050, text=» RF(E) MKB140 NO !«, t00=0x001d, t01=0x0156}
0x2eb8…2ee2 Head {h00=0x0026, h01=0x0050, text=» CF A15,EOQUEU YES ! MOVE POINTER «, t00=0x001d, t01=0x0170}
0x2ee2…2f14 Head {h00=0x002e, h01=0x0050, text=» ST A1,DWTDEV+DWTUTQ,A6 STORE NEW POINTER «, t00=0x001e, t01=0x000a}
0x2f14…2f22 Head {h00=0x000a, h01=0x0050, text=» =1«, t00=0x001e, t01=0x003c}
0x2f22…2f38 Head {h00=0x0012, h01=0x0050, text=» IFT PLC=1 =2«, t00=0x001e, t01=0x004a}
0x2f38…2f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0060}
0x2f42…2f86 Head {h00=0x0040, h01=0x0050, text=»* TEST IF THERE ARE MORE CHARACTERS IN CIRC. INPUT BUFFER «, t00=0x001e, t01=0x006a}
0x2f86…2f90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ae}
0x2f90…2fc8 Head {h00=0x0034, h01=0x0050, text=» LDKL A4,/0800 "MORE CHARACTERS" INDICATION BIT «, t00=0x001e, t01=0x00b8}
0x2fc8…2ff8 Head {h00=0x002c, h01=0x0050, text=» CW A1,DWTDEV+DWTINQ,A6 MORE IN BUFFER ?«, t00=0x001e, t01=0x00f0}
0x2ff8…3012 Head {h00=0x0016, h01=0x0050, text=» RF(E) MKB135 NO !«, t00=0x001e, t01=0x0120}
0x3012…302c Head {h00=0x0016, h01=0x0050, text=» ORS A4,DWTDEV,A6 «, t00=0x001e, t01=0x013a}
0x302c…3038 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0154}
0x3038…304a Head {h00=0x000e, h01=0x0050, text=»MKB133 ENB«, t00=0x001e, t01=0x0160}
0x304a…305c Head {h00=0x000e, h01=0x0050, text=» RF MKB150«, t00=0x001e, t01=0x0172}
0x305c…3066 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0184}
0x3066…307c Head {h00=0x0012, h01=0x0050, text=» IFT PLC=1 =2«, t00=0x001e, t01=0x018e}
0x307c…3094 Head {h00=0x0014, h01=0x0050, text=»MKB135 C1R A4,A4«, t00=0x001f, t01=0x0014}
0x3094…30d0 Head {h00=0x0038, h01=0x0050, text=» ANS A4,DWTDEV,A6 CLEAR "MORE CHARACTERS" INDICATION«, t00=0x001f, t01=0x002c}
0x30d0…30e2 Head {h00=0x000e, h01=0x0050, text=» RB MKB133«, t00=0x001f, t01=0x0068}
0x30e2…30ee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x007a}
0x30ee…30fc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0086}
0x30fc…3106 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001f, t01=0x0094}
0x3106…3130 Head {h00=0x0026, h01=0x0022, text=»* READ A CHARACTER FROM KEYBOARD«, t00=0x001f, t01=0x009e}
0x3130…313a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001f, t01=0x00c8}
0x313a…314e Head {h00=0x0010, h01=0x0050, text=»MKB140 EQU *«, t00=0x001f, t01=0x00d2}
0x314e…3172 Head {h00=0x0020, h01=0x001b, text=» CF A5,INPUT READ CHARACTER «, t00=0x001f, t01=0x00e6}
0x3172…317e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x001f, t01=0x010a}
0x317e…3188 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001f, t01=0x0116}
0x3188…31b2 Head {h00=0x0026, h01=0x0050, text=» ANK A2,/7F MASK TO GET CHARACTER «, t00=0x001f, t01=0x0120}
0x31b2…31bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x014a}
0x31bc…31d2 Head {h00=0x0012, h01=0x0050, text=» IFT PLC=1 =2«, t00=0x001f, t01=0x0154}
0x31d2…320c Head {h00=0x0036, h01=0x0050, text=»* SET "MORE CHARACTERS" INDICATION BIT IF THERE «, t00=0x001f, t01=0x016a}
0x320c…322c Head {h00=0x001c, h01=0x0050, text=»* ARE MORE CHARACTERS «, t00=0x0020, t01=0x0014}
0x322c…3236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0034}
0x3236…3262 Head {h00=0x0028, h01=0x0050, text=» ANK A1,/1 MASK NOT SIGNIFICANT BITS«, t00=0x0020, t01=0x003e}
0x3262…3274 Head {h00=0x000e, h01=0x0050, text=» SRC A1,5 «, t00=0x0020, t01=0x006a}
0x3274…328e Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTDEV,A6 «, t00=0x0020, t01=0x007c}
0x328e…3298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0096}
0x3298…32a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00a0}
0x32a4…32ba Head {h00=0x0012, h01=0x000d, text=» IFT CTIMUT=1 «, t00=0x0020, t01=0x00ac}
0x32ba…32e6 Head {h00=0x0028, h01=0x0050, text=» CF A15,RESTRT RESTART TIMEOUT TIMER«, t00=0x0020, t01=0x00c2}
0x32e6…32f2 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0020, t01=0x00ee}
0x32f2…32fc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x00fa}
0x32fc…3310 Head {h00=0x0010, h01=0x0050, text=»MKB150 EQU *«, t00=0x0020, t01=0x0104}
0x3310…332e Head {h00=0x001a, h01=0x0050, text=» IFT NEWKB+OLDKB=2 =2«, t00=0x0020, t01=0x0118}
0x332e…3338 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x0136}
0x3338…3366 Head {h00=0x002a, h01=0x0050, text=»* CHECK WHICH KEYBOARD THAT IS USED «, t00=0x0020, t01=0x0140}
0x3366…3370 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x016e}
0x3370…3396 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTDEV,A6 KEYBOARD WITH«, t00=0x0020, t01=0x0178}
0x3396…33c2 Head {h00=0x0028, h01=0x0050, text=» ANKL A4,/1000 SPECIAL CONVERSION ? «, t00=0x0021, t01=0x000e}
0x33c2…33e2 Head {h00=0x001c, h01=0x0050, text=» RF(Z) MKB290 PERHAPS ! «, t00=0x0021, t01=0x003a}
0x33e2…33ee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x005a}
0x33ee…3406 Head {h00=0x0014, h01=0x0050, text=» IFT NEWKB=1 =2«, t00=0x0021, t01=0x0066}
0x3406…3410 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x007e}
0x3410…3432 Head {h00=0x001e, h01=0x0050, text=»* KB 6236/71/72 IS USED «, t00=0x0021, t01=0x0088}
0x3432…3456 Head {h00=0x0020, h01=0x001c, text=»* CHECK INCOMING CHARACTER«, t00=0x0021, t01=0x00aa}
0x3456…3460 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x00ce}
0x3460…3472 Head {h00=0x000e, h01=0x000a, text=» LDR A4,A2«, t00=0x0021, t01=0x00d8}
0x3472…34a2 Head {h00=0x002c, h01=0x0050, text=» SUK A4,/80 SKIP CHAR. FROM CIRC. BUF.? «, t00=0x0021, t01=0x00ea}
0x34a2…34d0 Head {h00=0x002a, h01=0x0050, text=» RB(Z) MKB100 YES, READ NEXT CHARACTER«, t00=0x0021, t01=0x011a}
0x34d0…34f0 Head {h00=0x001c, h01=0x0050, text=» ADK A4,/8 CTRL/SHIFT ? «, t00=0x0021, t01=0x0148}
0x34f0…350c Head {h00=0x0018, h01=0x0050, text=» RF(NN) MKB220 YES !«, t00=0x0021, t01=0x0168}
0x350c…3532 Head {h00=0x0022, h01=0x001d, text=» ADK A4,/8 NORMAL CHARACTER ? «, t00=0x0021, t01=0x0184}
0x3532…354e Head {h00=0x0018, h01=0x0050, text=» RF(N) MKB300 YES ! «, t00=0x0022, t01=0x001a}
0x354e…355c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0036}
0x355c…3566 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0022, t01=0x0044}
0x3566…35a8 Head {h00=0x003e, h01=0x0050, text=»* KEYLOCK IS TURNED. SET/CLEAR CORRESPONDING BIT IN DWT.«, t00=0x0022, t01=0x004e}
0x35a8…35e6 Head {h00=0x003a, h01=0x0050, text=»* IF THE KEYLOCK ISN'T CHANGED, WHICH MEANS THAT THE«, t00=0x0022, t01=0x0090}
0x35e6…3626 Head {h00=0x003c, h01=0x0050, text=»* CHARACTER IS COMING BECAUSE OF POWER UP, THE CHARAC-«, t00=0x0022, t01=0x00ce}
0x3626…3648 Head {h00=0x001e, h01=0x0050, text=»* TER SHOULD BE IGNORED.«, t00=0x0022, t01=0x010e}
0x3648…3652 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0022, t01=0x0130}
0x3652…366e Head {h00=0x0018, h01=0x0014, text=» LDK A1,1 "FLAG BIT"«, t00=0x0022, t01=0x013a}
0x366e…3694 Head {h00=0x0022, h01=0x0050, text=» LDR A4,A4 KEYLOCK CHAR. - /70«, t00=0x0022, t01=0x0156}
0x3694…36bc Head {h00=0x0024, h01=0x0050, text=»MKB160 RF(Z) MKB170 KEYLOCK ON !«, t00=0x0022, t01=0x017c}
0x36bc…36ce Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0023, t01=0x0014}
0x36ce…36f2 Head {h00=0x0020, h01=0x0050, text=» RF(Z) MKB180 KEYLOCK OFF ! «, t00=0x0023, t01=0x0026}
0x36f2…371a Head {h00=0x0024, h01=0x001f, text=» SLC A1,1 SHIFT "FLAG BIT" LEFT «, t00=0x0023, t01=0x004a}
0x371a…372c Head {h00=0x000e, h01=0x0009, text=» SUK A4,1 «, t00=0x0023, t01=0x0072}
0x372c…3756 Head {h00=0x0026, h01=0x0050, text=» RB MKB160 NEXT KEYLOCK, PERHAPS ?«, t00=0x0023, t01=0x0084}
0x3756…3760 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0023, t01=0x00ae}
0x3760…3774 Head {h00=0x0010, h01=0x0050, text=»MKB170 EQU *«, t00=0x0023, t01=0x00b8}
0x3774…37ae Head {h00=0x0036, h01=0x0050, text=» LD A4,DWTDEV+DWTKEY,A6 TEST IF KEYLOCK IS CHANGED«, t00=0x0023, t01=0x00cc}
0x37ae…37c0 Head {h00=0x000e, h01=0x0050, text=» TM A4,A1 «, t00=0x0023, t01=0x0106}
0x37c0…37f2 Head {h00=0x002e, h01=0x0050, text=» RB(NE) MKB100 NO CHANGE, READ A NEW CHAR.«, t00=0x0023, t01=0x0118}
0x37f2…3822 Head {h00=0x002c, h01=0x0050, text=» ORS A1,DWTDEV+DWTKEY,A6 SET "FLAG BIT" «, t00=0x0023, t01=0x014a}
0x3822…3834 Head {h00=0x000e, h01=0x0050, text=» RF MKB190«, t00=0x0023, t01=0x017a}
0x3834…3848 Head {h00=0x0010, h01=0x0050, text=»MKB180 EQU *«, t00=0x0023, t01=0x018c}
0x3848…3880 Head {h00=0x0034, h01=0x0050, text=» LD A4,DWTDEV+DWTKEY,A6 TEST IF KEYLOCK CHANGED «, t00=0x0024, t01=0x0010}
0x3880…3892 Head {h00=0x000e, h01=0x0050, text=» TM A4,A1 «, t00=0x0024, t01=0x0048}
0x3892…38b2 Head {h00=0x001c, h01=0x0050, text=» RB(Z) MKB100 NO CHANGE «, t00=0x0024, t01=0x005a}
0x38b2…38e0 Head {h00=0x002a, h01=0x0050, text=» C1R A1,A1 COMPLEMENT FOR AND-FUNCTION«, t00=0x0024, t01=0x007a}
0x38e0…3912 Head {h00=0x002e, h01=0x0050, text=» ANS A1,DWTDEV+DWTKEY,A6 CLEAR "FLAG BIT" «, t00=0x0024, t01=0x00a8}
0x3912…3926 Head {h00=0x0010, h01=0x0050, text=»MKB190 EQU *«, t00=0x0024, t01=0x00da}
0x3926…395a Head {h00=0x0030, h01=0x0050, text=» CF A15,STORE STORE KEYLOCK CHARACTER IN ECB«, t00=0x0024, t01=0x00ee}
0x395a…397c Head {h00=0x001e, h01=0x0050, text=» LDR A4,A7 LOAD ORDER CODE«, t00=0x0024, t01=0x0122}
0x397c…398e Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0024, t01=0x0144}
0x398e…39ae Head {h00=0x001c, h01=0x0050, text=» RF(N) MKB325 ORDER 1 ! «, t00=0x0024, t01=0x0156}
0x39ae…39bc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0176}
0x39bc…39c6 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0184}
0x39c6…39fa Head {h00=0x0030, h01=0x002c, text=»* KEYLOCK IS TURNED ! MAKE A NEGATIVE CODE«, t00=0x0024, t01=0x018e}
0x39fa…3a34 Head {h00=0x0036, h01=0x0050, text=»* TO THE CONTROLWORD IN ECB AND COMPLETE REQUEST«, t00=0x0025, t01=0x0032}
0x3a34…3a3e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x006c}
0x3a3e…3a52 Head {h00=0x0010, h01=0x0050, text=»MKB200 EQU *«, t00=0x0025, t01=0x0076}
0x3a52…3a74 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A2 LOAD CHARACTER «, t00=0x0025, t01=0x008a}
0x3a74…3a88 Head {h00=0x0010, h01=0x0050, text=» SUK A4,/70 «, t00=0x0025, t01=0x00ac}
0x3a88…3ab2 Head {h00=0x0026, h01=0x0021, text=» SRC A4,1 SHIFT TO GET KEY NUMBER «, t00=0x0025, t01=0x00c0}
0x3ab2…3ad4 Head {h00=0x001e, h01=0x0050, text=» RF(N) MKB210 ON OR OFF ? «, t00=0x0025, t01=0x00ea}
0x3ad4…3aec Head {h00=0x0014, h01=0x000f, text=» ADK A4,/4 ON ! «, t00=0x0025, t01=0x010c}
0x3aec…3b14 Head {h00=0x0024, h01=0x0050, text=»MKB210 SLL A4,1 MAKE WORD POSI- «, t00=0x0025, t01=0x0124}
0x3b14…3b30 Head {h00=0x0018, h01=0x0014, text=» SRL A4,1 TIVE AGAIN«, t00=0x0025, t01=0x014c}
0x3b30…3b60 Head {h00=0x002c, h01=0x0027, text=» C1R A4,A4 CHANGE 0 TO 1 AND VICE VERSA «, t00=0x0025, t01=0x0168}
0x3b60…3b8a Head {h00=0x0026, h01=0x0050, text=» ST A4,ECBCW,A8 STORE CODE IN ECB «, t00=0x0026, t01=0x0008}
0x3b8a…3bba Head {h00=0x002c, h01=0x0050, text=» RF MKB335 SET RC=0 AND COMPLETE REQUEST«, t00=0x0026, t01=0x0032}
0x3bba…3bc4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0026, t01=0x0062}
0x3bc4…3bfc Head {h00=0x0034, h01=0x0030, text=»* CTRL OR (NUM.) SHIFT IS DEPRESSED (RELEASED)«, t00=0x0026, t01=0x006c}
0x3bfc…3c06 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0026, t01=0x00a4}
0x3c06…3c1a Head {h00=0x0010, h01=0x0050, text=»MKB220 EQU *«, t00=0x0026, t01=0x00ae}
0x3c1a…3c30 Head {h00=0x0012, h01=0x0050, text=» IFT KBLOCK=1 «, t00=0x0026, t01=0x00c2}
0x3c30…3c5e Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTDEV+DWTKEY,A6 IS KB LOCKED ?«, t00=0x0026, t01=0x00d8}
0x3c5e…3c8e Head {h00=0x002c, h01=0x0050, text=» RB(Z) MKB100 YES ! READ A NEW CHARACTER«, t00=0x0026, t01=0x0106}
0x3c8e…3c9a Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0026, t01=0x0136}
0x3c9a…3cb2 Head {h00=0x0014, h01=0x0050, text=» IFT NEWKB=1 =2«, t00=0x0026, t01=0x0142}
0x3cb2…3cc8 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0026, t01=0x015a}
0x3cc8…3cd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0170}
0x3cd2…3d08 Head {h00=0x0032, h01=0x0050, text=»* MAKE CHARACTER /00 IF NUMERIC SHIFT KEY IS«, t00=0x0026, t01=0x017a}
0x3d08…3d3e Head {h00=0x0032, h01=0x0050, text=»* DEPRESSED, AND SKIP THE INCOMING CHARACTER«, t00=0x0027, t01=0x0020}
0x3d3e…3d5c Head {h00=0x001a, h01=0x0050, text=»* IF IT IS RELEASED.«, t00=0x0027, t01=0x0056}
0x3d5c…3d66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0074}
0x3d66…3d88 Head {h00=0x001e, h01=0x0050, text=» CCK A2,/7C00 DEPRESSED ? «, t00=0x0027, t01=0x007e}
0x3d88…3da4 Head {h00=0x0018, h01=0x0050, text=» RF(NE) MKB230 NO ! «, t00=0x0027, t01=0x00a0}
0x3da4…3dcc Head {h00=0x0024, h01=0x0050, text=» LDK A2,/00 YES ! LOAD CHARACTER«, t00=0x0027, t01=0x00bc}
0x3dcc…3dde Head {h00=0x000e, h01=0x0050, text=» RF MKB300«, t00=0x0027, t01=0x00e4}
0x3dde…3de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00f6}
0x3de8…3e0e Head {h00=0x0022, h01=0x0050, text=»MKB230 CCK A2,/7D00 RELEASED ?«, t00=0x0027, t01=0x0100}
0x3e0e…3e38 Head {h00=0x0026, h01=0x0050, text=» RB(E) MKB100 YES ! SKIP CHARACTER«, t00=0x0027, t01=0x0126}
0x3e38…3e44 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0150}
0x3e44…3e5c Head {h00=0x0014, h01=0x0050, text=» IFT NEWKB=1 =2«, t00=0x0027, t01=0x015c}
0x3e5c…3e7e Head {h00=0x001e, h01=0x0050, text=»MKB250 LDK A1,/2 SHIFT BIT«, t00=0x0027, t01=0x0174}
0x3e7e…3e9c Head {h00=0x001a, h01=0x0050, text=» LDR A4,A4 SHIFT ON ? «, t00=0x0028, t01=0x0008}
0x3e9c…3eb8 Head {h00=0x0018, h01=0x0050, text=» RF(Z) MKB260 YES ! «, t00=0x0028, t01=0x0026}
0x3eb8…3ed6 Head {h00=0x001a, h01=0x0050, text=» SUK A4,1 SHIFT OFF ? «, t00=0x0028, t01=0x0042}
0x3ed6…3ef2 Head {h00=0x0018, h01=0x0050, text=» RF(Z) MKB270 YES ! «, t00=0x0028, t01=0x0060}
0x3ef2…3f10 Head {h00=0x001a, h01=0x0050, text=» LDK A1,/4 CONTROL BIT«, t00=0x0028, t01=0x007c}
0x3f10…3f2e Head {h00=0x001a, h01=0x0050, text=» SUK A4,1 CONTROL ON ?«, t00=0x0028, t01=0x009a}
0x3f2e…3f4a Head {h00=0x0018, h01=0x0050, text=» RF(Z) MKB260 YES ! «, t00=0x0028, t01=0x00b8}
0x3f4a…3f6a Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 CONTROL OFF ? «, t00=0x0028, t01=0x00d4}
0x3f6a…3f86 Head {h00=0x0018, h01=0x0050, text=» RF(Z) MKB270 YES ! «, t00=0x0028, t01=0x00f4}
0x3f86…3fa8 Head {h00=0x001e, h01=0x0050, text=» SUK A4,1 NUMERIC SHIFT ? «, t00=0x0028, t01=0x0110}
0x3fa8…3fc0 Head {h00=0x0014, h01=0x0050, text=» RB MKB250 YES !«, t00=0x0028, t01=0x0132}
0x3fc0…3fca Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0028, t01=0x014a}
0x3fca…3ff4 Head {h00=0x0026, h01=0x0050, text=»MKB260 ORS A1,DWTDEV+DWTCS,A6 SET «, t00=0x0028, t01=0x0154}
0x3ff4…4006 Head {h00=0x000e, h01=0x0050, text=» RF MKB280«, t00=0x0028, t01=0x017e}
0x4006…402a Head {h00=0x0020, h01=0x0050, text=»MKB270 C1R A1,A1 COMPLEMENT «, t00=0x0028, t01=0x0190}
0x402a…4050 Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTDEV+DWTCS,A6 CLEAR «, t00=0x0029, t01=0x0024}
0x4050…405a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0029, t01=0x004a}
0x405a…4082 Head {h00=0x0024, h01=0x0050, text=»MKB280 ABL MKB100 NEXT CHARACTER«, t00=0x0029, t01=0x0054}
0x4082…408e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x007c}
0x408e…40a6 Head {h00=0x0014, h01=0x0050, text=» IFT OLDKB=1 =2«, t00=0x0029, t01=0x0088}
0x40a6…40b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x00a0}
0x40b4…40be Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0029, t01=0x00ae}
0x40be…40f0 Head {h00=0x002e, h01=0x0050, text=»* SPECIAL CONVERSION OF CHARACTERS FROM «, t00=0x0029, t01=0x00b8}
0x40f0…4112 Head {h00=0x001e, h01=0x0050, text=»* NUMERIC PART OF 6234. «, t00=0x0029, t01=0x00ea}
0x4112…411c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0029, t01=0x010c}
0x411c…4130 Head {h00=0x0010, h01=0x0050, text=»MKB290 EQU *«, t00=0x0029, t01=0x0116}
0x4130…4158 Head {h00=0x0024, h01=0x0020, text=» LDR A1,A6 IF THE DWT-ADDRESS IS«, t00=0x0029, t01=0x012a}
0x4158…4188 Head {h00=0x002c, h01=0x0050, text=» ANK A1,1 ODD, SHOULD SPECIAL CONVERSION«, t00=0x0029, t01=0x0152}
0x4188…41a6 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) MKB295 BE USED«, t00=0x0029, t01=0x0182}
0x41a6…41d2 Head {h00=0x0028, h01=0x0050, text=» LDR A4,A2 IF BIT 8 IN CHARACTER IS «, t00=0x002a, t01=0x0010}
0x41d2…4206 Head {h00=0x0030, h01=0x0050, text=» ANK A4,/80 SET SHOULD SPECIAL CONV. BE USED«, t00=0x002a, t01=0x003c}
0x4206…4232 Head {h00=0x0028, h01=0x0050, text=» RF(Z) MKB310 NO SPECIAL CONVERSION «, t00=0x002a, t01=0x0070}
0x4232…4256 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/7F MASK AWAY BIT 8 «, t00=0x002a, t01=0x009c}
0x4256…4260 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x00c0}
0x4260…428a Head {h00=0x0026, h01=0x0050, text=»* INDICATE SPECIAL CONVERSION ! «, t00=0x002a, t01=0x00ca}
0x428a…4294 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x00f4}
0x4294…42ca Head {h00=0x0032, h01=0x0050, text=»MKB295 ANKL A6,/FFFE MAKE THE DWT-ADDRESS EVEN«, t00=0x002a, t01=0x00fe}
0x42ca…42ee Head {h00=0x0020, h01=0x0050, text=» LDK A4,/8 LOAD SPECIAL BIT «, t00=0x002a, t01=0x0134}
0x42ee…430c Head {h00=0x001a, h01=0x0050, text=» ST A4,DWTDEV+DWTCS,A6«, t00=0x002a, t01=0x0158}
0x430c…431e Head {h00=0x000e, h01=0x0050, text=» RF MKB310«, t00=0x002a, t01=0x0176}
0x431e…432a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0188}
0x432a…4338 (43, 0, 398) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0004}
0x4338…4342 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x0012}
0x4342…4360 Head {h00=0x001a, h01=0x0015, text=»* NORMAL CONVERSION «, t00=0x002b, t01=0x001c}
0x4360…436a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x003a}
0x436a…437e Head {h00=0x0010, h01=0x0050, text=»MKB300 EQU *«, t00=0x002b, t01=0x0044}
0x437e…4388 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x0058}
0x4388…439e Head {h00=0x0012, h01=0x000d, text=» IFT KBLOCK=1 «, t00=0x002b, t01=0x0062}
0x439e…43cc Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTDEV+DWTKEY,A6 IS KB LOCKED ?«, t00=0x002b, t01=0x0078}
0x43cc…43fe Head {h00=0x002e, h01=0x0050, text=» ABL(Z) MKB100 YES ! READ A NEW CHARACTER «, t00=0x002b, t01=0x00a6}
0x43fe…440a Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x002b, t01=0x00d8}
0x440a…4414 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x00e4}
0x4414…4428 Head {h00=0x0010, h01=0x0050, text=»MKB310 EQU *«, t00=0x002b, t01=0x00ee}
0x4428…4458 Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTDEV+DWTCTB,A6 GET CTAB ADDRESS«, t00=0x002b, t01=0x0102}
0x4458…447c Head {h00=0x0020, h01=0x0050, text=» RF(E) MKB320 NO CONVERSION «, t00=0x002b, t01=0x0132}
0x447c…44b8 Head {h00=0x0038, h01=0x0050, text=» AD A1,DWTDEV+DWTCS,A6 GET CURRENT CONVERSION TABLE «, t00=0x002b, t01=0x0156}
0x44b8…44cc (44, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x002c, t01=0x0004}
0x44cc…44f6 Head {h00=0x0026, h01=0x0050, text=» RF(E) MKB320 NO CONVERSION TABLE «, t00=0x002c, t01=0x0018}
0x44f6…4508 Head {h00=0x000e, h01=0x000a, text=» LDR A4,A2«, t00=0x002c, t01=0x0042}
0x4508…4524 Head {h00=0x0018, h01=0x0014, text=» SRL A4,3 LINE INDEX«, t00=0x002c, t01=0x0054}
0x4524…4536 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A4«, t00=0x002c, t01=0x0070}
0x4536…455e Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A1 COLUMN TABLE ADDRESS«, t00=0x002c, t01=0x0082}
0x455e…457e Head {h00=0x001c, h01=0x0050, text=» RF(E) MKB320 NO COLUMN «, t00=0x002c, t01=0x00aa}
0x457e…4590 Head {h00=0x000e, h01=0x000a, text=» LDR A4,A2«, t00=0x002c, t01=0x00ca}
0x4590…45a2 Head {h00=0x000e, h01=0x000a, text=» ANK A4,/F«, t00=0x002c, t01=0x00dc}
0x45a2…45c2 Head {h00=0x001c, h01=0x0050, text=» ADR A1,A4 ADD ROW INDEX«, t00=0x002c, t01=0x00ee}
0x45c2…45e4 Head {h00=0x001e, h01=0x0050, text=» LCR A2,A1 LOAD CHARACTER «, t00=0x002c, t01=0x010e}
0x45e4…45ee Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002c, t01=0x0130}
0x45ee…4602 Head {h00=0x0010, h01=0x0050, text=»MKB320 EQU *«, t00=0x002c, t01=0x013a}
0x4602…461a Head {h00=0x0014, h01=0x0050, text=» IFT OLDKB=1 =2«, t00=0x002c, t01=0x014e}
0x461a…463e Head {h00=0x0020, h01=0x0050, text=» LDK A4,/7 RESET SPECIAL BIT«, t00=0x002c, t01=0x0166}
0x463e…465e Head {h00=0x001c, h01=0x0050, text=» ANS A4,DWTDEV+DWTCS,A6 «, t00=0x002c, t01=0x018a}
0x465e…466a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x001a}
0x466a…4678 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0026}
0x4678…4682 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002d, t01=0x0034}
0x4682…46b2 Head {h00=0x002c, h01=0x0027, text=»* CHECK IF BASIC READ OR ORDER 2 OR 3 «, t00=0x002d, t01=0x003e}
0x46b2…46bc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002d, t01=0x006e}
0x46bc…46de Head {h00=0x001e, h01=0x0050, text=» LDR A4,A7 LOAD ORDER CODE«, t00=0x002d, t01=0x0078}
0x46de…46f0 Head {h00=0x000e, h01=0x0009, text=» SUK A4,2 «, t00=0x002d, t01=0x009a}
0x46f0…4716 Head {h00=0x0022, h01=0x0050, text=» RF(NN) MKB330 ORDER 2 OR 3 ! «, t00=0x002d, t01=0x00ac}
0x4716…4720 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002d, t01=0x00d2}
0x4720…4740 Head {h00=0x001c, h01=0x0017, text=»* ORDER 1, BASIC READ «, t00=0x002d, t01=0x00dc}
0x4740…474a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002d, t01=0x00fc}
0x474a…477a Head {h00=0x002c, h01=0x0050, text=» CF A5,STOECH STORE CHAR. IN ECB-BUFFER «, t00=0x002d, t01=0x0106}
0x477a…47c6 Head {h00=0x0048, h01=0x0043, text=»* AND SEND IT TO ECHO-DEVICE «, t00=0x002d, t01=0x0136}
0x47c6…4806 Head {h00=0x003c, h01=0x0037, text=»* IF ECHO WANTED «, t00=0x002d, t01=0x0182}
0x4806…4810 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x0032}
0x4810…4824 Head {h00=0x0010, h01=0x0050, text=»MKB325 EQU *«, t00=0x002e, t01=0x003c}
0x4824…4858 Head {h00=0x0030, h01=0x0050, text=» CW A3,ECBRL,A8 EFF. LENGTH = REQ. LENGTH ? «, t00=0x002e, t01=0x0050}
0x4858…488a Head {h00=0x002e, h01=0x0050, text=» ABL(NE) MKB100 NO ! READ A NEW CHARACTER «, t00=0x002e, t01=0x0084}
0x488a…4894 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x00b6}
0x4894…48c0 Head {h00=0x0028, h01=0x0050, text=» RF MKB335 YES ! SET RETURN CODE = 0«, t00=0x002e, t01=0x00c0}
0x48c0…48ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00ec}
0x48ce…48d8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x00fa}
0x48d8…490a Head {h00=0x002e, h01=0x002a, text=»* ORDER 2 OR 3, STANDARD OR NUMERIC READ«, t00=0x002e, t01=0x0104}
0x490a…4914 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x0136}
0x4914…4928 Head {h00=0x0010, h01=0x0050, text=»MKB330 EQU *«, t00=0x002e, t01=0x0140}
0x4928…4932 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x0154}
0x4932…4962 Head {h00=0x002c, h01=0x0027, text=»* CHECK IF IT IS AN END-OF-RECORD-KEY «, t00=0x002e, t01=0x015e}
0x4962…496c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x018e}
0x496c…4996 Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBCW,A8 KEY-TABLE ADDRESS «, t00=0x002f, t01=0x0008}
0x4996…49ba Head {h00=0x0020, h01=0x0050, text=» RF(Z) MKB360 NO KEYTABLE ! «, t00=0x002f, t01=0x0032}
0x49ba…49e0 Head {h00=0x0022, h01=0x001d, text=» LCR A4,A1 TABLE LENGTH IN A4 «, t00=0x002f, t01=0x0056}
0x49e0…49f4 Head {h00=0x0010, h01=0x000b, text=» ANK A4,/FF «, t00=0x002f, t01=0x007c}
0x49f4…4a28 Head {h00=0x0030, h01=0x002c, text=» ADR A1,A4 ADDRESS TO LAST PLACE IN KEYTABLE«, t00=0x002f, t01=0x0090}
0x4a28…4a3a Head {h00=0x000e, h01=0x0009, text=» ADK A1,1 «, t00=0x002f, t01=0x00c4}
0x4a3a…4a52 Head {h00=0x0014, h01=0x0050, text=»MKB340 SUK A4,1 «, t00=0x002f, t01=0x00d6}
0x4a52…4a82 Head {h00=0x002c, h01=0x0050, text=» RF(N) MKB360 KEY NOT FOUND IN KEYTABLE «, t00=0x002f, t01=0x00ee}
0x4a82…4a9c Head {h00=0x0016, h01=0x0012, text=» SUK A1,1 NEXT KEY«, t00=0x002f, t01=0x011e}
0x4a9c…4abe Head {h00=0x001e, h01=0x001a, text=» CCR A2,A1 EOR-CHARACTER ?«, t00=0x002f, t01=0x0138}
0x4abe…4af2 Head {h00=0x0030, h01=0x0050, text=» RB(NE) MKB340 NO ! TRY NEXT KEY IN KEYTABLE«, t00=0x002f, t01=0x015a}
0x4af2…4afc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002f, t01=0x018e}
0x4afc…4b28 Head {h00=0x0028, h01=0x0023, text=» ADK A4,1 YES ! MAKE KEYTABLE INDEX «, t00=0x0030, t01=0x0008}
0x4b28…4b3c Head {h00=0x0010, h01=0x0050, text=»MKB350 EQU *«, t00=0x0030, t01=0x0034}
0x4b3c…4b70 Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBCW,A8 STORE INDEX IN CONTROL WORD «, t00=0x0030, t01=0x0048}
0x4b70…4b7a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0030, t01=0x007c}
0x4b7a…4bae Head {h00=0x0030, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN ECB BUFFER «, t00=0x0030, t01=0x0086}
0x4bae…4bc2 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0030, t01=0x00ba}
0x4bc2…4bec Head {h00=0x0026, h01=0x0050, text=» ORK A2,/80 INDICATE EOR CHARACTER«, t00=0x0030, t01=0x00ce}
0x4bec…4c10 Head {h00=0x0020, h01=0x0050, text=» CF A5,EORECH ECHO CHARACTER«, t00=0x0030, t01=0x00f8}
0x4c10…4c1c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x011c}
0x4c1c…4c26 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0030, t01=0x0128}
0x4c26…4c3a Head {h00=0x0010, h01=0x0050, text=»MKB335 EQU *«, t00=0x0030, t01=0x0132}
0x4c3a…4c60 Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 SET RETURN CODE = 0 «, t00=0x0030, t01=0x0146}
0x4c60…4c88 Head {h00=0x0024, h01=0x0050, text=» RF MKBEND AND COMPLETE REQUEST «, t00=0x0030, t01=0x016c}
0x4c88…4c92 (49, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0004}
0x4c92…4ca0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x000e}
0x4ca0…4caa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x001c}
0x4caa…4cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0026}
0x4cb4…4cd0 Head {h00=0x0018, h01=0x0050, text=»* CHARACTER CHECK «, t00=0x0031, t01=0x0030}
0x4cd0…4cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x004c}
0x4cda…4cee Head {h00=0x0010, h01=0x0050, text=»MKB360 EQU *«, t00=0x0031, t01=0x0056}
0x4cee…4d1a Head {h00=0x0028, h01=0x0050, text=» STR A2,A15 SAVE CHARACTER ON STACK «, t00=0x0031, t01=0x006a}
0x4d1a…4d32 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTDEV,A6«, t00=0x0031, t01=0x0096}
0x4d32…4d54 Head {h00=0x001e, h01=0x0050, text=» CWK A7,2 STANDARD READ ? «, t00=0x0031, t01=0x00ae}
0x4d54…4d70 Head {h00=0x0018, h01=0x0050, text=» RF(NE) MKB380 NO ! «, t00=0x0031, t01=0x00d0}
0x4d70…4d90 Head {h00=0x001c, h01=0x0050, text=» LDK A4,/20 LOWER LIMIT «, t00=0x0031, t01=0x00ec}
0x4d90…4dac Head {h00=0x0018, h01=0x0050, text=» SLC A1,2 /20-/7F ? «, t00=0x0031, t01=0x010c}
0x4dac…4dc8 Head {h00=0x0018, h01=0x0050, text=» RF(Z) MKB370 YES ! «, t00=0x0031, t01=0x0128}
0x4dc8…4dec Head {h00=0x0020, h01=0x0050, text=» LDK A1,/5F NO ! UPPER LIMIT«, t00=0x0031, t01=0x0144}
0x4dec…4dfe Head {h00=0x000e, h01=0x0050, text=» RF MKB400«, t00=0x0031, t01=0x0168}
0x4dfe…4e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x017a}
0x4e08…4e2e Head {h00=0x0022, h01=0x0050, text=»MKB370 LDK A1,/7F UPPER LIMIT «, t00=0x0031, t01=0x0184}
0x4e2e…4e40 Head {h00=0x000e, h01=0x0050, text=» RF MKB400«, t00=0x0032, t01=0x001a}
0x4e40…4e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x002c}
0x4e4a…4e76 Head {h00=0x0028, h01=0x0050, text=»MKB380 SLC A1,1 /30-/39 & /70-/79 ? «, t00=0x0032, t01=0x0036}
0x4e76…4e92 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) MKB390 NO ! «, t00=0x0032, t01=0x0062}
0x4e92…4e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x007e}
0x4e9c…4ebc Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F RESET BIT 9 «, t00=0x0032, t01=0x0088}
0x4ebc…4ee2 Head {h00=0x0022, h01=0x0050, text=»MKB390 LDK A1,/39 UPPER LIMIT «, t00=0x0032, t01=0x00a8}
0x4ee2…4f02 Head {h00=0x001c, h01=0x0050, text=» LDK A4,/30 LOWER LIMIT «, t00=0x0032, t01=0x00ce}
0x4f02…4f0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00ee}
0x4f0c…4f24 Head {h00=0x0014, h01=0x0050, text=»MKB400 SUR A1,A2«, t00=0x0032, t01=0x00f8}
0x4f24…4f4c Head {h00=0x0024, h01=0x0050, text=» RF(N) MKB420 NOT WITHIN LIMITS «, t00=0x0032, t01=0x0110}
0x4f4c…4f5e Head {h00=0x000e, h01=0x0050, text=» SUR A4,A2«, t00=0x0032, t01=0x0138}
0x4f5e…4f86 Head {h00=0x0024, h01=0x0050, text=» RF(P) MKB420 NOT WITHIN LIMITS «, t00=0x0032, t01=0x014a}
0x4f86…4fa6 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A15 DUMMY LOAD «, t00=0x0032, t01=0x0172}
0x4fa6…4fb4 (51, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0004}
0x4fb4…4fbe Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x0012}
0x4fbe…4fe6 Head {h00=0x0024, h01=0x0020, text=»* IT IS A "NORMAL" CHARACTER !«, t00=0x0033, t01=0x001c}
0x4fe6…4ff0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x0044}
0x4ff0…5004 Head {h00=0x0010, h01=0x0050, text=»MKB405 EQU *«, t00=0x0033, t01=0x004e}
0x5004…5032 Head {h00=0x002a, h01=0x0050, text=» CF A5,STOECH STORE AND ECHO CHARACTER«, t00=0x0033, t01=0x0062}
0x5032…503c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x0090}
0x503c…5066 Head {h00=0x0026, h01=0x0050, text=» CW A3,ECBRL,A8 LENGTH OVERFLOW ? «, t00=0x0033, t01=0x009a}
0x5066…5096 Head {h00=0x002c, h01=0x0050, text=» ABL(L) MKB100 NO ! TAKE NEXT CHARACTER «, t00=0x0033, t01=0x00c4}
0x5096…50a0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x00f4}
0x50a0…50cc Head {h00=0x0028, h01=0x0050, text=»MKB410 LDK A1,8 YES ! SET ERROR CODE«, t00=0x0033, t01=0x00fe}
0x50cc…50de Head {h00=0x000e, h01=0x0050, text=» RF MKBEND«, t00=0x0033, t01=0x012a}
0x50de…50e8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x013c}
0x50e8…5124 Head {h00=0x0038, h01=0x0033, text=»* CHECK IF IT IS BACKSPACE, CLEAR, MULTIPLE ZERO, «, t00=0x0033, t01=0x0146}
0x5124…5158 Head {h00=0x0030, h01=0x0050, text=»* STANDARD EOR, SKIP OR UNKNOWN CHARACTER «, t00=0x0033, t01=0x0182}
0x5158…5162 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0034, t01=0x0026}
0x5162…518e Head {h00=0x0028, h01=0x0050, text=»MKB420 LDR* A2,A15 RELOAD CHARACTER «, t00=0x0034, t01=0x0030}
0x518e…51a0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0034, t01=0x005c}
0x51a0…51b4 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0034, t01=0x006e}
0x51b4…51cc Head {h00=0x0014, h01=0x0050, text=» LD A4,ECBCW,A8 «, t00=0x0034, t01=0x0082}
0x51cc…51fa Head {h00=0x002a, h01=0x0050, text=» RF(NZ) MKB440 STANDARD EOR NOT USED !«, t00=0x0034, t01=0x009a}
0x51fa…5234 Head {h00=0x0036, h01=0x0050, text=» LDK A4,1 INDEX TO STORE IN ECBCW IF STANDARD EOR «, t00=0x0034, t01=0x00c8}
0x5234…5258 Head {h00=0x0020, h01=0x0050, text=» CCK A1,/0D00 STANDARD EOR ?«, t00=0x0034, t01=0x0102}
0x5258…5274 Head {h00=0x0018, h01=0x0050, text=» RB(E) MKB350 YES ! «, t00=0x0034, t01=0x0126}
0x5274…5288 Head {h00=0x0010, h01=0x0050, text=»MKB440 EQU *«, t00=0x0034, t01=0x0142}
0x5288…52b0 Head {h00=0x0024, h01=0x0050, text=» SUK A1,/1B TRIPLE ZERO ? (/1B) «, t00=0x0034, t01=0x0156}
0x52b0…52ca Head {h00=0x0016, h01=0x0050, text=» ABL(E) MZ30 YES !«, t00=0x0034, t01=0x017e}
0x52ca…52d4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0035, t01=0x0008}
0x52d4…52fa Head {h00=0x0022, h01=0x0050, text=» ADK A1,/13 BACKSPACE ? (/08) «, t00=0x0035, t01=0x0012}
0x52fa…5316 Head {h00=0x0018, h01=0x0050, text=» ABL(E) BACKSP YES !«, t00=0x0035, t01=0x0038}
0x5316…5320 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0035, t01=0x0054}
0x5320…5342 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/10 CLEAR ? (/18) «, t00=0x0035, t01=0x005e}
0x5342…535e Head {h00=0x0018, h01=0x0050, text=» ABL(E) CLEAR YES ! «, t00=0x0035, t01=0x0080}
0x535e…5368 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0035, t01=0x009c}
0x5368…538e Head {h00=0x0022, h01=0x0050, text=» SUK A1,/2 DOUBLE ZERO ? (/1A)«, t00=0x0035, t01=0x00a6}
0x538e…53a8 Head {h00=0x0016, h01=0x0050, text=» ABL(E) MZ20 YES !«, t00=0x0035, t01=0x00cc}
0x53a8…53b2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0035, t01=0x00e6}
0x53b2…53da Head {h00=0x0024, h01=0x0050, text=» SUK A1,/E5 SKIP CHARACTER (/FF)«, t00=0x0035, t01=0x00f0}
0x53da…53f6 Head {h00=0x0018, h01=0x0050, text=» ABL(E) MKB100 YES !«, t00=0x0035, t01=0x0118}
0x53f6…5410 Head {h00=0x0016, h01=0x0050, text=» IFT GREECE=1 =2 «, t00=0x0035, t01=0x0134}
0x5410…5438 Head {h00=0x0024, h01=0x0050, text=» LDR A1,A2 CHECK IF CHARACTER IS«, t00=0x0035, t01=0x014e}
0x5438…5462 Head {h00=0x0026, h01=0x0050, text=» SUK A1,/B0 WITHIN LIMITS FOR THE «, t00=0x0035, t01=0x0176}
0x5462…548c Head {h00=0x0026, h01=0x0050, text=» RF(N) MKB460 GREEK CHARACTER SET «, t00=0x0036, t01=0x0010}
0x548c…549e Head {h00=0x000e, h01=0x0050, text=» SUK A1,/9«, t00=0x0036, t01=0x003a}
0x549e…54c2 Head {h00=0x0020, h01=0x0050, text=» RB(NP) MKB405 YES IT IS OK «, t00=0x0036, t01=0x004c}
0x54c2…54d6 Head {h00=0x0010, h01=0x0050, text=»MKB460 EQU *«, t00=0x0036, t01=0x0070}
0x54d6…54e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0084}
0x54e2…54ec Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x0090}
0x54ec…551c Head {h00=0x002c, h01=0x0028, text=»* SET ERROR CODE FOR UNKNOWN CHARACTER«, t00=0x0036, t01=0x009a}
0x551c…5526 Head {h00=0x0006, h01=0x0002, text=»* «, t00=0x0036, t01=0x00ca}
0x5526…555a Head {h00=0x0030, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN ECB-BUFFER «, t00=0x0036, t01=0x00d4}
0x555a…556c Head {h00=0x000e, h01=0x0050, text=» LDK A1,4 «, t00=0x0036, t01=0x0108}
0x556c…5576 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x011a}
0x5576…5584 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0036, t01=0x0124}
0x5584…55b4 Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0036, t01=0x0132}
0x55b4…55be Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x0162}
0x55be…55c8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x016c}
0x55c8…55de Head {h00=0x0012, h01=0x000e, text=»* COMMON END«, t00=0x0036, t01=0x0176}
0x55de…55e8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x018c}
0x55e8…55f2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0037, t01=0x0008}
0x55f2…5620 Head {h00=0x002a, h01=0x0025, text=»************************************* «, t00=0x0037, t01=0x0012}
0x5620…5634 Head {h00=0x0010, h01=0x000c, text=»MKBEND EQU *«, t00=0x0037, t01=0x0040}
0x5634…563e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0037, t01=0x0054}
0x563e…5654 Head {h00=0x0012, h01=0x000d, text=» IFT CTIMUT=1 «, t00=0x0037, t01=0x005e}
0x5654…5672 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTTP+DWTDEV,A6«, t00=0x0037, t01=0x0074}
0x5672…5694 Head {h00=0x001e, h01=0x0019, text=» RF(E) MKBE10 NO TIMING ! «, t00=0x0037, t01=0x0092}
0x5694…56be Head {h00=0x0026, h01=0x0050, text=» CM* DWTTP+DWTDEV,A6 SCRATCH TIMER«, t00=0x0037, t01=0x00b4}
0x56be…56da Head {h00=0x0018, h01=0x0050, text=» CM DWTTP+DWTDEV,A6 «, t00=0x0037, t01=0x00de}
0x56da…56e6 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0037, t01=0x00fa}
0x56e6…56f0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0037, t01=0x0106}
0x56f0…5704 Head {h00=0x0010, h01=0x000c, text=»MKBE10 EQU *«, t00=0x0037, t01=0x0110}
0x5704…5732 Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0037, t01=0x0124}
0x5732…573c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0037, t01=0x0152}
0x573c…5750 Head {h00=0x0010, h01=0x000c, text=» IFT CECHO=1«, t00=0x0037, t01=0x015c}
0x5750…576a Head {h00=0x0016, h01=0x0050, text=» LDR A4,A1 SAVE A1«, t00=0x0037, t01=0x0170}
0x576a…578e Head {h00=0x0020, h01=0x001c, text=» CF A5,ECHEND END OF ECHOING«, t00=0x0037, t01=0x018a}
0x578e…57a0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0038, t01=0x001e}
0x57a0…57ac Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0038, t01=0x0030}
0x57ac…57b6 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0038, t01=0x003c}
0x57b6…57e6 Head {h00=0x002c, h01=0x0050, text=» ABL LENDIS PERFORM END I/O AND DIPATCH «, t00=0x0038, t01=0x0046}
0x57e6…57f4 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0038, t01=0x0076}
0x57f4…5822 Head {h00=0x002a, h01=0x0026, text=»**************************************«, t00=0x0038, t01=0x0084}
0x5822…582c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0038, t01=0x00b2}
0x582c…5836 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0038, t01=0x00bc}
0x5836…5854 Head {h00=0x001a, h01=0x0015, text=»* INTERRUPT HANDLER «, t00=0x0038, t01=0x00c6}
0x5854…585e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0038, t01=0x00e4}
0x585e…5868 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0038, t01=0x00ee}
0x5868…5896 Head {h00=0x002a, h01=0x0026, text=»**************************************«, t00=0x0038, t01=0x00f8}
0x5896…58a8 Head {h00=0x000e, h01=0x000a, text=»IHKB EQU *«, t00=0x0038, t01=0x0126}
0x58a8…58d2 Head {h00=0x0026, h01=0x0050, text=» ANK A2,/7F MASK TO GET CHARACTER «, t00=0x0038, t01=0x0138}
0x58d2…58e8 Head {h00=0x0012, h01=0x000d, text=» IFT CTIMUT=1 «, t00=0x0038, t01=0x0162}
0x58e8…5914 Head {h00=0x0028, h01=0x0050, text=» CF A15,RESTRT RESTART TIMEOUT TIMER«, t00=0x0038, t01=0x0178}
0x5914…5920 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0039, t01=0x0014}
0x5920…592a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0039, t01=0x0020}
0x592a…5962 Head {h00=0x0034, h01=0x002f, text=»* STORE INCOMING CHARACTER IN CIRCULAR BUFFER «, t00=0x0039, t01=0x002a}
0x5962…596c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0039, t01=0x0062}
0x596c…5984 Head {h00=0x0014, h01=0x0050, text=» IFT OLDKB=1 =2«, t00=0x0039, t01=0x006c}
0x5984…59ac Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 SPECIAL CONVERSION ? «, t00=0x0039, t01=0x0084}
0x59ac…59be Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0039, t01=0x00ac}
0x59be…59d8 Head {h00=0x0016, h01=0x0050, text=» RF(Z) IHKB02 NO !«, t00=0x0039, t01=0x00be}
0x59d8…5a0a Head {h00=0x002e, h01=0x0050, text=» ORK A2,/80 YES INDICATE BY SETTING BIT 8 «, t00=0x0039, t01=0x00d8}
0x5a0a…5a16 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x010a}
0x5a16…5a3c Head {h00=0x0022, h01=0x0050, text=»IHKB02 LD A1,DWTDEV+DWTINQ,A6 «, t00=0x0039, t01=0x0116}
0x5a3c…5a4e Head {h00=0x000e, h01=0x000a, text=» LCR A4,A1«, t00=0x0039, t01=0x013c}
0x5a4e…5a74 Head {h00=0x0022, h01=0x001e, text=» XRK A4,/FF ALREADY OVERFLOW ?«, t00=0x0039, t01=0x014e}
0x5a74…5a90 Head {h00=0x0018, h01=0x0050, text=» RF(E) IHKB05 YES ! «, t00=0x0039, t01=0x0174}
0x5a90…5a9a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0039, t01=0x0190}
0x5a9a…5aac Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x003a, t01=0x000a}
0x5aac…5ae4 Head {h00=0x0034, h01=0x0050, text=» CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS«, t00=0x003a, t01=0x001c}
0x5ae4…5aee Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003a, t01=0x0054}
0x5aee…5b18 Head {h00=0x0026, h01=0x0050, text=» CW A1,DWTDEV+DWTUTQ,A6 OVERFLOW ?«, t00=0x003a, t01=0x005e}
0x5b18…5b34 Head {h00=0x0018, h01=0x0013, text=» RF(NE) IHKB20 NO ! «, t00=0x003a, t01=0x0088}
0x5b34…5b5c Head {h00=0x0024, h01=0x0050, text=» LDK A1,/FF OVERFLOW INDICATION «, t00=0x003a, t01=0x00a4}
0x5b5c…5b88 Head {h00=0x0028, h01=0x0050, text=» SCR A1,A4 SET OVFL. IND. IN BUFFER «, t00=0x003a, t01=0x00cc}
0x5b88…5b92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00f8}
0x5b92…5ba6 Head {h00=0x0010, h01=0x0050, text=»IHKB05 EQU *«, t00=0x003a, t01=0x0102}
0x5ba6…5bc4 Head {h00=0x001a, h01=0x0050, text=» IFT NEWKB+OLDKB=2 =2«, t00=0x003a, t01=0x0116}
0x5bc4…5bec Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTDEV,A6 6236, 71, 72 ? «, t00=0x003a, t01=0x0134}
0x5bec…5c02 Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/1000«, t00=0x003a, t01=0x015c}
0x5c02…5c1a Head {h00=0x0014, h01=0x0050, text=» RF(Z) EXIT NO !«, t00=0x003a, t01=0x0172}
0x5c1a…5c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x018a}
0x5c24…5c30 (59, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0004}
0x5c30…5c48 Head {h00=0x0014, h01=0x0050, text=» IFT NEWKB=1 =2«, t00=0x003b, t01=0x0010}
0x5c48…5c72 Head {h00=0x0026, h01=0x0050, text=» SUK A2,/70 KEYLOCK, SHIFT, CTRL ?«, t00=0x003b, t01=0x0028}
0x5c72…5c8a Head {h00=0x0014, h01=0x0050, text=» RF(N) EXIT NO !«, t00=0x003b, t01=0x0052}
0x5c8a…5ca4 Head {h00=0x0016, h01=0x0050, text=» ADK A2,/70 YES ! «, t00=0x003b, t01=0x006a}
0x5ca4…5cae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0084}
0x5cae…5cc0 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x003b, t01=0x008e}
0x5cc0…5cda Head {h00=0x0016, h01=0x0050, text=» SC A1,DWTDEV+1,A6«, t00=0x003b, t01=0x00a0}
0x5cda…5cfa Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTDEV+DWTINQ,A6 «, t00=0x003b, t01=0x00ba}
0x5cfa…5d0c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x003b, t01=0x00da}
0x5d0c…5d22 Head {h00=0x0012, h01=0x0050, text=» CF A15,EOQUEU«, t00=0x003b, t01=0x00ec}
0x5d22…5d52 Head {h00=0x002c, h01=0x0050, text=» CW A1,DWTDEV+DWTUTQ,A6 BUFFER FILLED ? «, t00=0x003b, t01=0x0102}
0x5d52…5d6e Head {h00=0x0018, h01=0x0050, text=» RF(E) IHKB07 YES ! «, t00=0x003b, t01=0x0132}
0x5d6e…5d94 Head {h00=0x0022, h01=0x0050, text=» SCR A2,A4 STORE NEW CHARACTER«, t00=0x003b, t01=0x014e}
0x5d94…5dc0 Head {h00=0x0028, h01=0x0050, text=» LDK A2,/FF MOVE OVERFLOW INDICATION«, t00=0x003b, t01=0x0174}
0x5dc0…5de4 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A1 FORWARD IN BUFFER«, t00=0x003c, t01=0x0010}
0x5de4…5df6 Head {h00=0x000e, h01=0x0050, text=» RF IHKB20«, t00=0x003c, t01=0x0034}
0x5df6…5e00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0046}
0x5e00…5e18 Head {h00=0x0014, h01=0x0050, text=»* CHECK BUFFER«, t00=0x003c, t01=0x0050}
0x5e18…5e22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0068}
0x5e22…5e64 Head {h00=0x003e, h01=0x0050, text=»IHKB07 LD A1,DWTDEV+DWTINQ,A6 POINTER TO LAST POS IN BUF. «, t00=0x003c, t01=0x0072}
0x5e64…5e78 Head {h00=0x0010, h01=0x0050, text=»IHKB10 EQU *«, t00=0x003c, t01=0x00b4}
0x5e78…5ea6 Head {h00=0x002a, h01=0x0050, text=» CW A1,DWTDEV+DWTUTQ,A6 END OF QUEUE ?«, t00=0x003c, t01=0x00c8}
0x5ea6…5ec2 Head {h00=0x0018, h01=0x0050, text=» RF(E) IHKB19 YES ! «, t00=0x003c, t01=0x00f6}
0x5ec2…5eee Head {h00=0x0028, h01=0x0050, text=» CF A15,SOQUEU GET PREVIOUS POINTER «, t00=0x003c, t01=0x0112}
0x5eee…5ef8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x013e}
0x5ef8…5f18 Head {h00=0x001c, h01=0x0050, text=» LCR A4,A1 GET CHARACTER«, t00=0x003c, t01=0x0148}
0x5f18…5f2c Head {h00=0x0010, h01=0x0050, text=» ANK A4,/7F «, t00=0x003c, t01=0x0168}
0x5f2c…5f40 Head {h00=0x0010, h01=0x0050, text=» XRR A4,A2 «, t00=0x003c, t01=0x017c}
0x5f40…5f66 Head {h00=0x0022, h01=0x0050, text=» RF(Z) EXIT EQUAL CHARACTER ! «, t00=0x003c, t01=0x0190}
0x5f66…5f88 Head {h00=0x001e, h01=0x0050, text=» SUK A4,1 INVERTED CHAR. ?«, t00=0x003d, t01=0x0026}
0x5f88…5fa4 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) IHKB17 NO ! «, t00=0x003d, t01=0x0048}
0x5fa4…5fda Head {h00=0x0032, h01=0x0050, text=» LDK A2,/80 YES ! LOAD SKIP CHAR FOR CIRC BUF «, t00=0x003d, t01=0x0064}
0x5fda…5fec Head {h00=0x000e, h01=0x0050, text=» RF IHKB18«, t00=0x003d, t01=0x009a}
0x5fec…5ff6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00ac}
0x5ff6…600a Head {h00=0x0010, h01=0x0050, text=»IHKB17 EQU *«, t00=0x003d, t01=0x00b6}
0x600a…6034 Head {h00=0x0026, h01=0x0050, text=» SUK A4,/F CTRL, SHIFT, KEYLOCK ? «, t00=0x003d, t01=0x00ca}
0x6034…6050 Head {h00=0x0018, h01=0x0050, text=» RB(N) IHKB10 YES ! «, t00=0x003d, t01=0x00f4}
0x6050…605a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0110}
0x605a…608c Head {h00=0x002e, h01=0x0050, text=»IHKB18 SCR A2,A1 NO ! STORE CHAR IN BUFFER«, t00=0x003d, t01=0x011a}
0x608c…609c Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x003d, t01=0x014c}
0x609c…60a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x015c}
0x60a6…60d2 Head {h00=0x0028, h01=0x0050, text=»* CHECK BUFFER AGAIN AND SORT OUT «, t00=0x003d, t01=0x0166}
0x60d2…60f8 (62, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* EQUAL AND INV. CHARACTERS «, t00=0x003e, t01=0x0004}
0x60f8…6102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x002a}
0x6102…6140 Head {h00=0x003a, h01=0x0050, text=»IHKB19 LC A4,DWTDEV+1,A6 SORT OUT EQUAL AND INV. CHAR «, t00=0x003e, t01=0x0034}
0x6140…6154 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x003e, t01=0x0072}
0x6154…6174 Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTDEV+DWTINQ,A6 «, t00=0x003e, t01=0x0086}
0x6174…6190 Head {h00=0x0018, h01=0x0050, text=»IHKB21 CF A15,SOQUEU«, t00=0x003e, t01=0x00a6}
0x6190…61a2 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x003e, t01=0x00c2}
0x61a2…61b8 Head {h00=0x0012, h01=0x0050, text=» RB(NN) IHKB21«, t00=0x003e, t01=0x00d4}
0x61b8…61ce Head {h00=0x0012, h01=0x0050, text=» IM DWTDEV,A6 «, t00=0x003e, t01=0x00ea}
0x61ce…61fa Head {h00=0x0028, h01=0x0050, text=» LCR A4,A1 GET OLD CHAR FROM BUFFER «, t00=0x003e, t01=0x0100}
0x61fa…6220 Head {h00=0x0022, h01=0x0050, text=» CCK A4,/FF00 END OF BUFFER ? «, t00=0x003e, t01=0x012c}
0x6220…623a Head {h00=0x0016, h01=0x0050, text=» RF(E) EXIT YES ! «, t00=0x003e, t01=0x0152}
0x623a…625e Head {h00=0x0020, h01=0x0050, text=» SCR A2,A1 STORE THE NEW ONE«, t00=0x003e, t01=0x016c}
0x625e…6280 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A4 PUT CHAR IN A2 «, t00=0x003e, t01=0x0190}
0x6280…6294 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x003f, t01=0x0022}
0x6294…62a6 Head {h00=0x000e, h01=0x0050, text=» RB IHKB07«, t00=0x003f, t01=0x0036}
0x62a6…62b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0048}
0x62b2…62bc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x0054}
0x62bc…62f8 Head {h00=0x0038, h01=0x0050, text=»IHKB20 ST A1,DWTDEV+DWTINQ,A6 STORE INQUEUE POINTER «, t00=0x003f, t01=0x005e}
0x62f8…6330 Head {h00=0x0034, h01=0x0050, text=»IHKB30 SCR A2,A4 STORE CHARACTER IN INPUT BUFFER«, t00=0x003f, t01=0x009a}
0x6330…633a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x00d2}
0x633a…635c Head {h00=0x001e, h01=0x0019, text=»EXIT ABL LDISP DISPATCH ! «, t00=0x003f, t01=0x00dc}
0x635c…636a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x00fe}
0x636a…6374 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x010c}
0x6374…639e Head {h00=0x0026, h01=0x0021, text=»* STORING (&ECHOING) SUBROUTINE «, t00=0x003f, t01=0x0116}
0x639e…63d0 Head {h00=0x002e, h01=0x0029, text=»* SKIPS OTHER CHARACTERS THAN DIGITS IF «, t00=0x003f, t01=0x0140}
0x63d0…63e8 Head {h00=0x0014, h01=0x0010, text=»* NUMERIC READ«, t00=0x003f, t01=0x0172}
0x63e8…63f2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x018a}
0x63f2…6406 (64, 0, 400) Head {h00=0x0010, h01=0x000c, text=»STOECH EQU *«, t00=0x0040, t01=0x0004}
0x6406…6436 Head {h00=0x002c, h01=0x0027, text=» CF A15,STORE STORE CHAR. IN ECB-BUFFER «, t00=0x0040, t01=0x0018}
0x6436…6440 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0040, t01=0x0048}
0x6440…6454 Head {h00=0x0010, h01=0x000c, text=» IFT CECHO=1«, t00=0x0040, t01=0x0052}
0x6454…646e Head {h00=0x0016, h01=0x0050, text=» IFT GREECE=1 =2 «, t00=0x0040, t01=0x0066}
0x646e…648c Head {h00=0x001a, h01=0x0050, text=» RF EORECH DO NOT MASK«, t00=0x0040, t01=0x0080}
0x648c…6498 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x009e}
0x6498…64ac Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0040, t01=0x00aa}
0x64ac…64dc Head {h00=0x002c, h01=0x0050, text=»ECHSUB ANK A2,/7F MASK TO GET CHARACTER «, t00=0x0040, t01=0x00be}
0x64dc…64f0 Head {h00=0x0010, h01=0x0050, text=»EORECH EQU *«, t00=0x0040, t01=0x00ee}
0x64f0…6506 Head {h00=0x0012, h01=0x0050, text=» IFT PLC=1 =2«, t00=0x0040, t01=0x0102}
0x6506…6544 Head {h00=0x003a, h01=0x0050, text=» LD A1,DWTDEV,A6 GET "MORE CHARACTERS" INDICATION BIT «, t00=0x0040, t01=0x0118}
0x6544…655a Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/0800«, t00=0x0040, t01=0x0156}
0x655a…6588 Head {h00=0x002a, h01=0x0050, text=» XRS A1,DWTDEV,A6 RESET INDICATION BIT«, t00=0x0040, t01=0x016c}
0x6588…659a Head {h00=0x000e, h01=0x0050, text=» SLC A1,5 «, t00=0x0041, t01=0x000a}
0x659a…65a6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x001c}
0x65a6…65ba Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0041, t01=0x0028}
0x65ba…65dc Head {h00=0x001e, h01=0x001a, text=» CF A5,ECHO ECHO CHARACTER«, t00=0x0041, t01=0x003c}
0x65dc…65e8 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0041, t01=0x005e}
0x65e8…65f2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0041, t01=0x006a}
0x65f2…6602 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0041, t01=0x0074}
0x6602…660c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0041, t01=0x0084}
0x660c…661a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x008e}
0x661a…6630 Head {h00=0x0012, h01=0x000d, text=» IFT CTIMUT=1 «, t00=0x0041, t01=0x009c}
0x6630…663a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0041, t01=0x00b2}
0x663a…6662 Head {h00=0x0024, h01=0x001f, text=»* THIS IS THE TIMEOUT ROUTINE «, t00=0x0041, t01=0x00bc}
0x6662…666c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0041, t01=0x00e4}
0x666c…6680 Head {h00=0x0010, h01=0x000c, text=»AKBTUT EQU *«, t00=0x0041, t01=0x00ee}
0x6680…66a4 Head {h00=0x0020, h01=0x0050, text=» LDR A6,A1 LOAD DWT-ADDRESS «, t00=0x0041, t01=0x0102}
0x66a4…66c0 Head {h00=0x0018, h01=0x0050, text=» CM DWTTP+DWTDEV,A6 «, t00=0x0041, t01=0x0126}
0x66c0…66d8 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0041, t01=0x0142}
0x66d8…6708 Head {h00=0x002c, h01=0x0027, text=» ABL(N) LDISP DISPATCH IF NO REQUEST ON «, t00=0x0041, t01=0x015a}
0x6708…6712 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x018a}
0x6712…6742 (66, 0, 400) Head {h00=0x002c, h01=0x0050, text=» CF A15,ABORT RESET INPUT REQUESTED FLAG«, t00=0x0042, t01=0x0004}
0x6742…6770 Head {h00=0x002a, h01=0x0050, text=» LDR A5,A6 INITIATE DWT-STACK POINTER «, t00=0x0042, t01=0x0034}
0x6770…6788 Head {h00=0x0014, h01=0x0050, text=» ADKL A5,DWTSB2 «, t00=0x0042, t01=0x0062}
0x6788…67c0 Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTA3,A6 RELOAD EFFECTIVE LENGTH FROM DWT«, t00=0x0042, t01=0x007a}
0x67c0…67ec Head {h00=0x0028, h01=0x0050, text=» LD A8,DWTECB,A6 RELOAD ECB-ADDRESS «, t00=0x0042, t01=0x00b2}
0x67ec…6810 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 SET RETURN CODE «, t00=0x0042, t01=0x00de}
0x6810…6834 Head {h00=0x0020, h01=0x001c, text=» ABL MKBEND COMPLETE REQUEST«, t00=0x0042, t01=0x0102}
0x6834…683e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0042, t01=0x0126}
0x683e…6860 Head {h00=0x001e, h01=0x0019, text=»* RESTART TIMEOUT TIMER «, t00=0x0042, t01=0x0130}
0x6860…686a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0042, t01=0x0152}
0x686a…687e Head {h00=0x0010, h01=0x000c, text=»RESTRT EQU *«, t00=0x0042, t01=0x015c}
0x687e…689c Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTTP+DWTDEV,A6«, t00=0x0042, t01=0x0170}
0x689c…68bc Head {h00=0x001c, h01=0x0017, text=» RF(E) NOTIME NO TIMING «, t00=0x0042, t01=0x018e}
0x68bc…68e0 Head {h00=0x0020, h01=0x001c, text=» LDKL A4,-TIME RESTART TIMER«, t00=0x0043, t01=0x001e}
0x68e0…6900 Head {h00=0x001c, h01=0x0050, text=» ST* A4,DWTTP+DWTDEV,A6 «, t00=0x0043, t01=0x0042}
0x6900…6916 Head {h00=0x0012, h01=0x0050, text=»NOTIME RTN A15«, t00=0x0043, t01=0x0062}
0x6916…6922 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0043, t01=0x0078}
0x6922…6930 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x0084}
0x6930…693a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0043, t01=0x0092}
0x693a…696e Head {h00=0x0030, h01=0x0050, text=»* STORE = SUBROUTINE TO STORE A CHARACTER «, t00=0x0043, t01=0x009c}
0x696e…69a2 Head {h00=0x0030, h01=0x002c, text=»* IN ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0043, t01=0x00d0}
0x69a2…69ac Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0043, t01=0x0104}
0x69ac…69dc Head {h00=0x002c, h01=0x0028, text=»* ON ENTRY: A2 = CHARACTER TO STORE«, t00=0x0043, t01=0x010e}
0x69dc…6a06 Head {h00=0x0026, h01=0x0022, text=»* A3 = BUFFER INDEX«, t00=0x0043, t01=0x013e}
0x6a06…6a10 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0043, t01=0x0168}
0x6a10…6a24 Head {h00=0x0010, h01=0x000b, text=»STORE EQU * «, t00=0x0043, t01=0x0172}
0x6a24…6a4a Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBBA,A8 BUFFER ADDRESS«, t00=0x0043, t01=0x0186}
0x6a4a…6a6e Head {h00=0x0020, h01=0x0050, text=» ADR A1,A3 ADD BUFFER INDEX «, t00=0x0044, t01=0x001c}
0x6a6e…6a9a Head {h00=0x0028, h01=0x0050, text=» SCR A2,A1 STORE CHARACTER IN BUFFER«, t00=0x0044, t01=0x0040}
0x6a9a…6ac2 Head {h00=0x0024, h01=0x0020, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0044, t01=0x006c}
0x6ac2…6ad2 Head {h00=0x000c, h01=0x0008, text=» RTN A15«, t00=0x0044, t01=0x0094}
0x6ad2…6adc Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0044, t01=0x00a4}
0x6adc…6b16 Head {h00=0x0036, h01=0x0031, text=»* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER «, t00=0x0044, t01=0x00ae}
0x6b16…6b20 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0044, t01=0x00e8}
0x6b20…6b4c Head {h00=0x0028, h01=0x0023, text=»* ON ENTRY: A1 = QUEUE POINTER «, t00=0x0044, t01=0x00f2}
0x6b4c…6b76 Head {h00=0x0026, h01=0x0021, text=»* A6 = DWT-ADDRESS «, t00=0x0044, t01=0x011e}
0x6b76…6b80 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0044, t01=0x0148}
0x6b80…6b94 Head {h00=0x0010, h01=0x000c, text=»EOQUEU EQU *«, t00=0x0044, t01=0x0152}
0x6b94…6ba6 Head {h00=0x000e, h01=0x0009, text=» ADK A1,1 «, t00=0x0044, t01=0x0166}
0x6ba6…6bb8 Head {h00=0x000e, h01=0x000a, text=» SUR A1,A6«, t00=0x0044, t01=0x0178}
0x6bb8…6be4 Head {h00=0x0028, h01=0x0050, text=» CWK A1,DWTDEV+DWTEQ END OF QUEUE ? «, t00=0x0044, t01=0x018a}
0x6be4…6bfa Head {h00=0x0012, h01=0x000e, text=» RF(NE) EOQU10«, t00=0x0045, t01=0x0026}
0x6bfa…6c30 Head {h00=0x0032, h01=0x0050, text=» LDKL A1,DWTDEV+DWTSQ SET QUEUE START ADDRESS «, t00=0x0045, t01=0x003c}
0x6c30…6c48 Head {h00=0x0014, h01=0x0010, text=»EOQU10 ADR A1,A6«, t00=0x0045, t01=0x0072}
0x6c48…6c58 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0045, t01=0x008a}
0x6c58…6c62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x009a}
0x6c62…6ca0 Head {h00=0x003a, h01=0x0050, text=»* SOQUEUE = SUBROUTINE TO GET PREVIOUS QUEUE POINTER«, t00=0x0045, t01=0x00a4}
0x6ca0…6caa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00e2}
0x6caa…6cd6 Head {h00=0x0028, h01=0x0050, text=»* ON ENTRY: A1 = QUEUE POINTER «, t00=0x0045, t01=0x00ec}
0x6cd6…6d00 Head {h00=0x0026, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0045, t01=0x0118}
0x6d00…6d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0142}
0x6d0a…6d1e Head {h00=0x0010, h01=0x0050, text=»SOQUEU EQU *«, t00=0x0045, t01=0x014c}
0x6d1e…6d30 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x0045, t01=0x0160}
0x6d30…6d62 Head {h00=0x002e, h01=0x0050, text=» CWK A1,DWTDEV+DWTSQ FIRST POS IN QUEUE ? «, t00=0x0045, t01=0x0172}
0x6d62…6d7c Head {h00=0x0016, h01=0x0050, text=» RF(NE) SOQ10 NO !«, t00=0x0046, t01=0x0014}
0x6d7c…6db0 Head {h00=0x0030, h01=0x0050, text=» LDKL A1,DWTDEV+DWTEQ GET LAST POS IN QUEUE «, t00=0x0046, t01=0x002e}
0x6db0…6dc8 Head {h00=0x0014, h01=0x0050, text=»SOQ10 ADR A1,A6 «, t00=0x0046, t01=0x0062}
0x6dc8…6df4 Head {h00=0x0028, h01=0x0050, text=» SUK A1,1 GET PREVIOUS POINTER POS. «, t00=0x0046, t01=0x007a}
0x6df4…6e04 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0046, t01=0x00a6}
0x6e04…6e12 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0046, t01=0x00b6}
0x6e12…6e1c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0046, t01=0x00c4}
0x6e1c…6e32 Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE «, t00=0x0046, t01=0x00ce}
0x6e32…6e3c Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0046, t01=0x00e4}
0x6e3c…6e50 Head {h00=0x0010, h01=0x0050, text=»BACKSP EQU *«, t00=0x0046, t01=0x00ee}
0x6e50…6e62 Head {h00=0x000e, h01=0x000a, text=» LDR A3,A3«, t00=0x0046, t01=0x0102}
0x6e62…6e88 Head {h00=0x0022, h01=0x001e, text=» RF(Z) KBBSPA ECB-BUFFER EMPTY«, t00=0x0046, t01=0x0114}
0x6e88…6eac Head {h00=0x0020, h01=0x001c, text=» SUK A3,1 ONE STEP BACKWARDS«, t00=0x0046, t01=0x013a}
0x6eac…6ec8 Head {h00=0x0018, h01=0x0013, text=» SUR A2,A2 CLEAR A2 «, t00=0x0046, t01=0x015e}
0x6ec8…6f00 Head {h00=0x0034, h01=0x0030, text=» CF A15,STORE STORE A BLANK INSTEAD OF LAST CHAR«, t00=0x0046, t01=0x017a}
0x6f00…6f26 Head {h00=0x0022, h01=0x001e, text=» SUK A3,1 STEP BACKWARDS AGAIN«, t00=0x0047, t01=0x0022}
0x6f26…6f30 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0047, t01=0x0048}
0x6f30…6f44 Head {h00=0x0010, h01=0x000c, text=»KBBSPA EQU *«, t00=0x0047, t01=0x0052}
0x6f44…6f58 Head {h00=0x0010, h01=0x000c, text=» IFT CECHO=1«, t00=0x0047, t01=0x0066}
0x6f58…6f82 Head {h00=0x0026, h01=0x0022, text=» LDK A2,/8 BACKSPACE TO ECHODEVICE«, t00=0x0047, t01=0x007a}
0x6f82…6f8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x00a4}
0x6f8e…6fa2 Head {h00=0x0010, h01=0x0050, text=»KBBSP2 EQU *«, t00=0x0047, t01=0x00b0}
0x6fa2…6fb6 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0047, t01=0x00c4}
0x6fb6…6fdc Head {h00=0x0022, h01=0x0050, text=» CF A5,ECHSUB ECHSUB CHARACTER«, t00=0x0047, t01=0x00d8}
0x6fdc…6fe8 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0047, t01=0x00fe}
0x6fe8…700a Head {h00=0x001e, h01=0x0050, text=» ABL MKB100 NEXT CHARACTER«, t00=0x0047, t01=0x010a}
0x700a…7014 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0047, t01=0x012c}
0x7014…7026 Head {h00=0x000e, h01=0x0009, text=»* CLEAR «, t00=0x0047, t01=0x0136}
0x7026…7030 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0047, t01=0x0148}
0x7030…7044 Head {h00=0x0010, h01=0x0050, text=»CLEAR EQU * «, t00=0x0047, t01=0x0152}
0x7044…7066 Head {h00=0x001e, h01=0x001a, text=» LDK A3,0 RESET ECB-BUFFER«, t00=0x0047, t01=0x0166}
0x7066…7088 Head {h00=0x001e, h01=0x0050, text=» RB KBBSP2 NEXT CHARACTER «, t00=0x0047, t01=0x0188}
0x7088…7096 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0048, t01=0x001a}
0x7096…70a0 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x0028}
0x70a0…70ba Head {h00=0x0016, h01=0x0011, text=»* MULTIPLE ZERO «, t00=0x0048, t01=0x0032}
0x70ba…70c4 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x004c}
0x70c4…70e2 Head {h00=0x001a, h01=0x0016, text=»MZ20 EQU * DOUBLE ZERO«, t00=0x0048, t01=0x0056}
0x70e2…70f4 Head {h00=0x000e, h01=0x0050, text=» LDK A4,2 «, t00=0x0048, t01=0x0074}
0x70f4…7104 Head {h00=0x000c, h01=0x0050, text=» RF MZ50«, t00=0x0048, t01=0x0086}
0x7104…710e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x0096}
0x710e…712c Head {h00=0x001a, h01=0x0016, text=»MZ30 EQU * TRIPLE ZERO«, t00=0x0048, t01=0x00a0}
0x712c…713e Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x0048, t01=0x00be}
0x713e…7148 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x00d0}
0x7148…715a Head {h00=0x000e, h01=0x000a, text=»MZ50 EQU *«, t00=0x0048, t01=0x00da}
0x715a…717e Head {h00=0x0020, h01=0x001b, text=» SUK A4,1 ANY MORE ZEROES ? «, t00=0x0048, t01=0x00ec}
0x717e…71a8 Head {h00=0x0026, h01=0x0050, text=» ABL(L) MKB100 NO, NEXT CHARACTER «, t00=0x0048, t01=0x0110}
0x71a8…71b2 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x013a}
0x71b2…71c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0048, t01=0x0144}
0x71c0…71cc Head {h00=0x0008, h01=0x0004, text=» INH«, t00=0x0048, t01=0x0152}
0x71cc…7200 Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTDEV+DWTUTQ,A6 GET OUTQUEUE POINTER«, t00=0x0048, t01=0x015e}
0x7200…722c (73, 0, 400) Head {h00=0x0028, h01=0x0050, text=» CF A15,SOQUEU GET PREVIOUS POINTER «, t00=0x0049, t01=0x0004}
0x722c…7236 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0049, t01=0x0030}
0x7236…7266 Head {h00=0x002c, h01=0x0050, text=» CW A1,DWTDEV+DWTINQ,A6 ANY SPACE LEFT ?«, t00=0x0049, t01=0x003a}
0x7266…727e Head {h00=0x0014, h01=0x0050, text=» RF(E) MZ90 NO !«, t00=0x0049, t01=0x006a}
0x727e…7290 Head {h00=0x000e, h01=0x0050, text=»MZ75 EQU *«, t00=0x0049, t01=0x0082}
0x7290…72ca Head {h00=0x0036, h01=0x0050, text=» ST A1,DWTDEV+DWTUTQ,A6 STORE NEW OUTQUEUE POINTER«, t00=0x0049, t01=0x0094}
0x72ca…72fa Head {h00=0x002c, h01=0x0028, text=» LDK A2,/30 STORE ZERO IN CIRCULAR BUFF.«, t00=0x0049, t01=0x00ce}
0x72fa…730c Head {h00=0x000e, h01=0x000a, text=» SCR A2,A1«, t00=0x0049, t01=0x00fe}
0x730c…731c Head {h00=0x000c, h01=0x0008, text=» RB MZ50«, t00=0x0049, t01=0x0110}
0x731c…7326 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0049, t01=0x0120}
0x7326…7338 Head {h00=0x000e, h01=0x000a, text=»MZ80 EQU *«, t00=0x0049, t01=0x012a}
0x7338…7364 Head {h00=0x0028, h01=0x0024, text=» LDK A4,/FF INDICATE BUFFER OVERFLOW«, t00=0x0049, t01=0x013c}
0x7364…7376 Head {h00=0x000e, h01=0x000a, text=» SCR A4,A1«, t00=0x0049, t01=0x0168}
0x7376…73a6 Head {h00=0x002c, h01=0x0050, text=» ST A1,DWTDEV+DWTUTQ,A6 UPPDATE POINTER «, t00=0x0049, t01=0x017a}
0x73a6…73dc Head {h00=0x0032, h01=0x002e, text=» LDK A1,/A SET RETURN CODE FOR BOTH LENGTH AND«, t00=0x004a, t01=0x001a}
0x73dc…73fc Head {h00=0x001c, h01=0x0017, text=» ENB THROUGHPUT ERRORS «, t00=0x004a, t01=0x0050}
0x73fc…7406 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x004a, t01=0x0070}
0x7406…741a Head {h00=0x0010, h01=0x0050, text=» ABL MKBEND «, t00=0x004a, t01=0x007a}
0x741a…7424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x008e}
0x7424…7436 Head {h00=0x000e, h01=0x0050, text=»MZ90 EQU *«, t00=0x004a, t01=0x0098}
0x7436…7456 Head {h00=0x001c, h01=0x0050, text=» LDR A4,A4 ALL ZEROES ? «, t00=0x004a, t01=0x00aa}
0x7456…746e Head {h00=0x0014, h01=0x0050, text=» RB(E) MZ80 YES «, t00=0x004a, t01=0x00ca}
0x746e…7498 Head {h00=0x0026, h01=0x0050, text=» LDKL A2,/FFFF NO, MOVE IN-POINTER«, t00=0x004a, t01=0x00e2}
0x7498…74b8 Head {h00=0x001c, h01=0x0050, text=» ADS A2,DWTDEV+DWTINQ,A6«, t00=0x004a, t01=0x010c}
0x74b8…74c8 Head {h00=0x000c, h01=0x0050, text=» RB MZ75«, t00=0x004a, t01=0x012c}
0x74c8…74d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x013c}
0x74d6…74e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x014a}
0x74e0…7510 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x004a, t01=0x0154}
0x7510…751a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0184}
0x751a…7534 Head {h00=0x0016, h01=0x0050, text=»* ABORT ROUTINE «, t00=0x004a, t01=0x018e}
0x7534…753e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0018}
0x753e…756e Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x004b, t01=0x0022}
0x756e…7578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0052}
0x7578…758a Head {h00=0x000e, h01=0x0050, text=»ABKB EQU *«, t00=0x004b, t01=0x005c}
0x758a…75b4 Head {h00=0x0026, h01=0x0050, text=» CF A15,ABORT ABORT INPUT REQUEST «, t00=0x004b, t01=0x006e}
0x75b4…75ca Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x004b, t01=0x0098}
0x75ca…75e8 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTTP+DWTDEV,A6«, t00=0x004b, t01=0x00ae}
0x75e8…7608 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ABKB05 NO TIMER !«, t00=0x004b, t01=0x00cc}
0x7608…7624 Head {h00=0x0018, h01=0x0050, text=» CM* DWTTP+DWTDEV,A6«, t00=0x004b, t01=0x00ec}
0x7624…764c Head {h00=0x0024, h01=0x0050, text=» CM DWTTP+DWTDEV,A6 RESET TIMER «, t00=0x004b, t01=0x0108}
0x764c…7660 Head {h00=0x0010, h01=0x0050, text=»ABKB05 EQU *«, t00=0x004b, t01=0x0130}
0x7660…766c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x0144}
0x766c…7676 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0150}
0x7676…769e Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTST,A6 GET STATUS WORD «, t00=0x004b, t01=0x015a}
0x769e…76c8 Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO END I/O ON KEYBOARD«, t00=0x004b, t01=0x0182}
0x76c8…76f6 Head {h00=0x002a, h01=0x0050, text=» SLC A4,2 GET ECHO-MODE INDICATION BIT«, t00=0x004c, t01=0x001c}
0x76f6…770a Head {h00=0x0010, h01=0x0050, text=»ABKB10 EQU *«, t00=0x004c, t01=0x004a}
0x770a…7734 Head {h00=0x0026, h01=0x0050, text=» ABL(NN) LDISP NOT AN ECHO REQUEST«, t00=0x004c, t01=0x005e}
0x7734…773e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0088}
0x773e…7776 Head {h00=0x0034, h01=0x0050, text=» LD A4,DWTECH,A6 GET DWT-ADDRESS OF ECHO DEVICE «, t00=0x004c, t01=0x0092}
0x7776…77a0 Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTADR,A4 GET ADDRESS BLOCK«, t00=0x004c, t01=0x00ca}
0x77a0…77da Head {h00=0x0036, h01=0x0050, text=» LD A3,ABTADR,A3 GET ABORT-ADDRESS OF ECHO DEVICE «, t00=0x004c, t01=0x00f4}
0x77da…780c Head {h00=0x002e, h01=0x0050, text=» RB(Z) ABKB10 ABORT-ADDRESS = 0 ! NO ABORT«, t00=0x004c, t01=0x012e}
0x780c…7816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0160}
0x7816…784c Head {h00=0x0032, h01=0x0050, text=» LDR A6,A4 RESTORE DWT-ADDRESS OF ECHO DEVICE «, t00=0x004c, t01=0x016a}
0x784c…787e Head {h00=0x002e, h01=0x0050, text=» LDKL A5,DWTSB2 STACK BASE 2 DISPLACEMENT «, t00=0x004d, t01=0x0010}
0x787e…78a0 Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 ADD DWT-ADDRESS«, t00=0x004d, t01=0x0042}
0x78a0…78aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0064}
0x78aa…78de Head {h00=0x0030, h01=0x0050, text=» ABR A3 JUMP TO ABORT ROUTINE OF ECHO DEVICE«, t00=0x004d, t01=0x006e}
0x78de…78ea Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x004d, t01=0x00a2}
0x78ea…78ee Head {h00=0x4004, h01=0x0000}
0x78ee…78f0 00 4d ┆ M┆
0x78f0…78f2 00 ae ┆ ┆
0x78f2…78fa (78, 1, 8) 20 04 00 00 00 4e 00 04 ┆ N ┆
0x78fa…790c (79, 0, 18) 1c 20 1c 28 1c 30 1c 38 1e 08 1e 28 1e 38 1e 40 1e 48 ┆ ( 0 8 ( 8 @ H┆
0x790c…795c (80, 0, 400) 39 be 00 45 64 a6 00 00 10 14 0f 74 10 5a 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 13 3a 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 13 3a 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 ┆9 Ed t Z : : ┆
0x795c…79ac 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 12 b2 00 8a 00 a6 01 0d f7 a1 12 b8 00 00 00 00 00 00 00 00 20 7f b5 96 b6 9a 81 40 ┆ @┆
0x79ac…79fc 00 c2 8c 04 20 7f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 06 00 01 02 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 06 00 01 00 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x79fc…7a4c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x7a4c…7a9c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 84 24 84 29 11 02 12 02 1b 02 88 1c 5f 0e 00 00 00 00 00 00 00 00 8f ff ff ff ff ff ff ff f9 00 80 01 40 00 00 00 00 00 00 00 00 00 00 00 ┆ $ ) _ @ ┆
0x7a9c…7aec (81, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x7aec…7b3c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 fc c0 02 08 5f 02 00 0b 85 c1 02 b6 86 c1 02 f2 b8 41 03 18 ┆ _ A ┆
0x7b3c…7b8c 81 20 3a 55 81 41 03 12 81 40 0e d8 81 44 ff fe 81 44 00 0e 19 0a 81 41 0a a6 81 20 00 00 8c 20 03 c0 90 41 02 34 81 40 00 7e 81 41 03 bc 81 20 0e 72 81 41 00 7e 81 40 00 00 81 41 03 b4 81 20 0e 46 81 41 00 00 81 40 00 04 81 41 03 b6 81 20 ┆ :U A @ D D A A 4 @ ~ A r A ~ @ A F A @ A ┆
0x7b8c…7bdc 0e 56 81 41 00 04 81 40 00 0c 81 41 03 b8 81 20 0e 62 81 41 00 0c 81 40 00 0e 81 41 03 ba 81 20 0d dc 81 41 00 0e 8f 20 03 c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V A @ A b A @ A A ┆
0x7bdc…7c2c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 0a 00 00 00 00 00 00 00 00 00 00 01 15 14 08 a2 82 82 82 82 88 00 00 00 00 00 20 ┆ ┆
0x7c2c…7c7c (82, 0, 400) 00 00 00 00 ff f8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 00 08 00 0c 00 10 00 14 00 18 00 1c 00 20 00 24 00 28 00 2c 00 30 00 34 00 38 00 3c 00 00 10 00 00 00 01 00 00 ┆ $ ( , 0 4 8 < ┆
0x7c7c…7ccc 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x7ccc…7d1c 00 00 00 00 00 00 00 00 00 00 00 00 fc 80 00 32 00 00 00 01 00 01 00 00 00 00 00 00 00 00 ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5f 02 20 bf 87 a0 02 7c 05 53 80 a0 02 b4 a0 41 03 aa 81 20 03 be 81 5f 00 14 f0 a1 0d ac 81 14 f0 a1 ┆ 2 _ | S A _ ┆
0x7d1c…7d6c 0d c4 f0 a1 0d a8 82 40 02 b6 f0 a1 0c 9c 05 1e 06 1e 83 08 9a 54 02 d6 3a 61 1d 02 52 12 84 0c 9c 54 02 d6 3c 61 ea 10 5a 10 82 10 86 14 5f 16 01 3d f0 a1 0d c4 3a 41 f0 a1 0c 9c 01 2c f0 a1 0d c4 3e 61 81 18 f0 a1 0d 96 f0 a1 0d a2 82 40 ┆ @ T :a R T <a Z _ = :A , >a @┆
0x7d6c…7dbc 03 9c f0 a1 0c 9c 80 a0 02 b4 f0 a1 0d ac 98 41 03 aa 50 04 01 55 57 02 01 42 f0 a1 0d c4 f0 a1 0d a8 f0 a1 04 d2 f0 a1 0b da 04 62 82 40 04 cc 8f 0c 00 10 04 a2 00 3d 00 00 00 00 00 00 00 00 00 00 00 00 00 25 44 aa 10 40 24 8a aa 82 ad 20 ┆ A P UW B b @ = %D @$ ┆
0x7dbc…7e0c (83, 0, 400) 06 38 00 2f 06 48 00 4d 07 12 00 51 06 86 00 52 06 80 00 53 07 88 00 54 08 4a 00 59 08 56 00 47 08 16 00 50 08 3a 00 48 09 0c 00 4c 09 22 00 56 09 50 00 49 07 8c 00 55 06 8c f0 a1 0d a8 f0 a1 0d ba 5f 76 02 04 83 20 04 bc a0 41 0d 94 f0 a1 ┆ 8 / H M Q R S T J Y V G P : H L " V P I U _v A ┆
0x7e0c…7e5c 0c 7e 5f 86 20 4e 4f 21 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 a0 41 04 c8 a0 41 04 ca a0 41 04 d0 a0 41 04 cc a0 41 04 ce a0 41 04 c2 a0 41 04 c0 a0 41 04 c4 f0 a1 0d cc e9 20 00 2a 54 06 90 41 04 c0 5f 10 f0 a1 0c 12 50 04 ┆ ~_ NO! A A A A A A A A *T A _ P ┆
0x7e5c…7eac 90 41 04 c4 82 41 04 c6 f0 a1 0b da 05 18 8f 0c 00 08 05 de 00 2e 05 3c 00 2c 05 4c 00 2b 05 80 00 2d 05 80 00 3b 05 98 00 23 05 64 00 24 05 6a 00 3a 05 ae f0 a1 0c 0e 58 a0 22 0f 92 08 83 48 02 b6 57 2a f0 a1 0c 0e 58 b0 22 0f 92 08 83 48 ┆ A A . < , L + - ; # d $ j : X " H W* X " H┆
0x7eac…7efc 02 d6 82 48 02 f6 82 41 04 d0 57 12 f0 a1 05 e4 57 0c f0 a1 05 e4 82 4c ff fe 83 48 00 12 93 41 04 c6 90 41 04 c4 5f 70 f0 a1 06 0a 82 40 04 c4 50 04 a0 41 04 c2 31 2b 58 a8 f8 41 04 c2 5f ae f0 a1 06 0a 82 40 04 cc 82 41 04 c8 82 40 04 ce ┆ H A W W L H A A _p @ P A 1+X A _ @ A @ ┆
0x7efc…7f4c 82 41 04 ca 5f d0 f0 a1 0d cc e9 20 00 3a 50 06 f0 a1 05 e8 57 1c f0 a1 0c 0e 50 08 22 0f aa 20 80 00 57 0e 19 55 8c 20 04 a2 82 20 3a 55 f0 a1 0d cc 82 41 04 d0 f0 a1 aa aa aa aa 8a 80 02 aa aa 12 56 55 55 50 90 a9 20 a5 22 55 48 48 08 a0 ┆ A _ :P W P " W U :U A VUUP "UHH ┆
0x7f4c…7f9c (84, 0, 400) 06 0a f0 22 f0 a1 0d cc e2 04 f0 a1 0d cc aa 04 87 3f 87 08 f7 a1 12 46 83 08 82 1c 87 3e 83 0c 88 20 04 a2 f0 a1 0d cc f0 22 83 40 04 c0 82 40 04 c4 54 08 83 0c 8c 20 04 a2 f0 22 82 20 04 c6 82 28 1b 01 5e 06 83 40 04 c2 50 02 9a 09 92 41 ┆ " ? F > " @ @ T " ( ^ @ P A┆
0x7f9c…7fec 04 ce 90 41 04 cc f0 22 88 20 04 a2 82 40 04 ce f0 a1 0c 9c 8f 20 04 36 54 06 84 40 07 86 57 04 84 40 04 ce a4 20 ff fe 84 41 07 86 f0 a1 07 b4 57 08 14 02 f0 a1 0d b6 57 06 84 30 f0 a1 0d ac f0 a1 0d a2 82 10 f0 a1 0c 9c f0 a1 0d be 5f 2c ┆ A " @ 6T @ W @ A W W 0 _,┆
0x7fec…803c 85 20 02 b6 57 0a 85 20 02 d6 57 04 85 20 03 18 82 08 50 66 87 04 86 40 04 ce 26 0f 84 14 94 18 94 18 f0 a1 0d be 82 30 f0 a1 0c 9c ed 20 02 d6 54 2a 85 41 08 14 83 50 00 20 50 20 f0 a1 0d c2 81 0c 56 0c f0 a1 0d c2 81 0c f0 a1 0d 96 57 0c ┆ W W Pf @ & 0 T* A P P V W ┆
0x803c…808c e1 0c f0 a1 0d c4 81 0c f0 a1 0d c4 f0 a1 07 ae 5f 78 16 01 f0 a1 0d b6 f0 a1 0d a2 81 18 f0 a1 0d 96 81 1c f0 a1 0d c4 5f 60 03 02 84 14 a0 41 0d 94 f0 a1 0d ac f0 a1 0c 52 1b 01 5c 0c 8f 20 04 36 54 08 84 40 07 86 86 10 57 14 82 40 04 c8 ┆ _x _` A R 6T @ W @ ┆
0x808c…80dc 54 06 84 40 04 ce 57 04 84 40 04 ca 86 40 04 ce a4 20 ff fe 3e 61 f0 a1 0d ac 82 10 f0 a1 0d a2 f0 a1 0c 9c f0 a1 0d a2 81 40 04 d0 81 41 0d 94 f0 a1 0c 52 f0 a1 0d a2 92 10 52 89 08 a5 52 45 11 4a 49 08 25 21 12 25 14 90 a8 91 25 09 55 50 ┆T @ W @ @ >a @ A R R RE JI %! % % UP┆