|
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: 23628 (0x5c4c)
Notes: pts_type(SC)
Names: »DRKB03.SC«
└─⟦1fa4b7c7b⟧ Bits:30009694 Philips computer tape "600410A"
└─⟦this⟧ »MODMON/DRKB03.SC«
IDENT DRKB03 REL 9.2 79-11-16 870105040920 * ******************************************* * * PHILIPS TERMINAL SYSTEM PTS * * DRKB01 = DRIVER KEYBOARD * * * * * * ******************************************* * * * THIS DRIVER HANDLES INPUT FROM NUMERIC * AND ALPHANUMERIC KEYBOARDS PTS 6236, * CONNECTED TO CPU VIA CHLT OR CHRT. * * ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS * ARE HANDLED BY THE DRIVER. * * AN ECHO-DEVICE CAN BE ATTACHED TO EVERY * KEYBOARD WHERE RECEIVED CHARACTERS ARE * ECHOED. * * THE DRIVER CONSISTS OF FOLLOWING PARTS: * * A C K B : ACTIVATION PART * * I H K B : INTERRUPT HANDLER * * E C H O : ECHO HANDLER * * R C K B : RECOVERY ROUTINE * EJECT * * * THE FOLLOWING ORDERS ARE THREATED: * * ORDER 01: BASIC READ * ORDER 02: STANDARD READ * ORDER 03: NUMERIC READ * ORDER 31: RESET INPUT BUFFER * * * NORMAL REGISTER USAGE : * * REGISTER A1 : RETURN CODE * A2 : INPUT CHARACTER * A3 : BUFFER INDEX * A4 : WORK REGISTER * A5 : STACK BASE * A6 : DWT-ADDRESS * A7 : ORDER * A8 : ECB-ADDRESS * * * * SYSTEM ADAPTATION * * CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, * MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED * IN DWT. * * DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE * DEFINED IN DWT. * * IF TIMING IS WANTED, TIMER POINTER * IN DWT MUST BE SET UNEQUAL TO ZERO. * STANDARD VALUE FOR TIME-OUT IS 30 SECONDS * SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * IS WANTED FOR A SYSTEM, INDICATOR * IN DRIVER MUST BE CHANGED. * * THE LENGTH OF THE CIRCULAR INPUT BUFFER IS * DEFINED IN DWT. STANDARD VALUE IS 7 CHARACTERS * NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL * DWT:S IN SYSTEM EJECT * * BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE * TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: * * -----ECHO-FUNCTION * -----POWER ON INDICATION * -----TIME-OUT-FUNCTION * -----NUMERIC SHIFT-FUNCTION * -----KEYBOARD LOCK IF NO KEYLOCK ON * * ENTRIES * * ENTRY KBAD3 ADDRESS-BLOCK * * * * EXTERNAL TOSS MODULE ENTRIES * * * EXTRN DISIOE I/O REQUEST ERROR EXTRN DISEND END I/O AND GO TO DISPATCHER EXTRN TENDIO END I/O EXTRN TDISP DISPATCHER ENTRY EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN EXTRN STREG STORE REGISTERS AND GO TO DISPATCER EXTRN LDREGE RETURN FROM ECHOE HANDLING EXTRN LDREGF PANIK EXTERN EXTRN SETIME SET TIME EXTRN SETIMP SET TIME EXTRN SAVE8 SAVE 8 REGISTERS EXTRN ECHRTN RETURN FROM ECHO EXTRN ECHO ECHO ROUTINE EXTRN ECHEND END OF ECHOING * * * * DWT PARAMETERS * * * EXTRN DWTCHP CHANEL PARAMETER EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTADR DRIVER ADDRESS BLOCK EXTRN DWTA3 SAVE AREA A3 EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 EXTRN DWTSB2 STACK BASE 2 IN DWT EXTRN DWTECH ECHO DEVICE DWT EXTRN DWTTP TIMER POINTER EXTRN DWTWAT SAVE INPUT DWT EJECT * * * * CONSTANTS * * * OVMASK EQU /2 OVERFLOW IN INPUT BUFFER * X:F EQU 20 LENGTH OF CIRCULAR INPUT BUFFER DWTLNG EQU 30 NUMBER OF BYTES IN DECIMAL FORM * * * TIME BEFORE TIME OUT * TIME EQU 300 TIME OUT CONSTANT * EJECT * * **************************************** * CONDITIONAL ASSEMBLY * **************************************** * * TIME OUT FUNCTION MAY BE EXCLUDED BY * SETTING X:A = 0. * X:A EQU 0 CTIMUT EQU 0 * * ECHO FUNCTION MAY BE EXCLUDED BY * SETTING X:B = 0. * X:B EQU 1 CECHO EQU 0 * * BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION * IS INCLUDED IN THE DRIVER. * IF THERE IS A READ REQUEST THIS IS COMPLETED WITH * ZERO IN THE CONTROL WORD OF ECB. * IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST * AFTER POWER ON IS COMPLETED WITH ZERO IN CONTROL WORD * OF ECB * * X:E EQU 0 POWOFF EQU 1 * * * * BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 71/72 X:H EQU 0 NSHIFT EQU 1 * * * BY SETTING X:I = 1 KEYBOARD IS LOCKED IF NO KEYLOCK ON. X:I EQU 0 KBLOCK EQU 1 * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 0 * * * MMU BUFFER SIZE * * X:J EQU 10 DVBLEN EQU 030 * * * MMU KEY TABLE SIZE * * X:K EQU 10 DVBKTB EQU 30 * EJECT * * * DWT-DISPLACEMENT * * DWTDRD EQU /10 START OF DRIVER DEFINED PART * IFT MMUPAG=0 START EQU DWTDRD XIF * IFT MMUPAG=1 START EQU DWTDRD+4 XIF * DWTCON EQU START+/00 CONVERSION TABLE DWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE DWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE DWTSQ EQU START+/1C START OF QUEUE DWTEQ EQU DWTSQ+DWTLNG END OF QUEUE * * SPECIAL KEYS DEFINED IN DWT * * * KBBSP EQU START+/14 BACK-SPACE CHARACTER KBCLR EQU START+/15 CLEAR CHARACTER KBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER KBMZ3 EQU START+/16 * EJECT * TABLES * * DATA DVBKTB MMU KEY TABLE SIZE DATA DVBLEN MMU BUFFER SIZE DATA 6 DEVICE INDEX * KBAD3 EQU * DATA ACKB ACTIVATION HANDLER DATA 0 ABORT ROUTINE ADDRESS DATA IHKB INTERRUPT HANDLER IFT POWOFF=1 DATA RCKB RECOVERY ROUTINE XIF IFT POWOFF=0 DATA 0 NO RECOVERY XIF * IFT POWOFF=1 EJECT * RCKB * * RECOVERY PART * * RCKB EQU * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT POWOFF=1 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFT POWOFF=1 LD A3,DWTST,A6 BUSY? RF(NN) RCKB10 LDKL A1,/200 ORS A1,DWTST,A6 INDICATE POWER OFF ABL TDISP RCKB10 CF A5,LDREGE LOAD REGISTERS RF AKB202 XIF EJECT * * * ACKB * * ACTIVATION PART: CHECS VALIDITY OF ORDERS AND * * EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER * * TO THREAT * * * * ACKB EQU * LDKL A1,/FEFF ANS A1,DWTST,A6 RESET INETRRUPT ALLOWED FLAG LDK A1,0 LDK A3,0 START BUFFER INDEX 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 AKB100 ORKL A1,/8000 I/0 REQUEST ERROR ABL ENDI10 EJECT * * * * ORDER 31 RESET INPUT BUFFER * * * AKB110 EQU * LD A2,DWTINQ,A6 SCR A1,A2 ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE ABL ENDIO * EJECT * * * ORDER 1,2,3 * * * AKB200 EQU * IFT POWOFF=1 LD A2,DWTST,A6 ANKL A2,/200 POWER OFF? RF(E) AKB205 NO! XRS A2,DWTST,A6 RESET POWER OFF BIT AKB202 EQU * CWK A7,1 IF BASIC READ DON'T COMPLEATE THE REQUEST RF(E) AKB205 CM 10,A8 INDICATE POWER OFF RF AKB218 XIF AKB205 EQU * IFT CTIMUT=1 LDR* A1,A6 ANK A1,/40 TIMING? RF(E) AKB210 NO TIMING FOR THIS DEVICE! LD A4,DWTTP,A6 CHECK IF ALREADY TIMING RF(E) AKBTIM LDKL A4,-TIME ST* A4,DWTTP,A6 RF AKB210 AKBTIM EQU * LDKL A4,DWTTP TIMER POINTER ADR A4,A6 ADD DWT-ADDRESS LDR A1,A6 CF A15,SETIMP SET TIME DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT XIF * EJECT * IF ANY KEY-LOCK: * * RESET "CHANGED-KEY" FLAG AND MAKE KEY-CHARACTER * OF FLAG. STORE KEY-CHARACTER IN ECB-BUFFER. * IN CASE OF STANDARD OR NUMERIC READ MAKE ECB-CODE * AND END I/O. ELSE CONTINUE. * * AKB210 EQU * LD A2,DWTST,A6 ANY KEY-LOCK? ANK A2,/F RF(Z) AKB219 SLL A2,1 SRN A2,A4 LDR A1,A4 CWK A4,3 RF(N) AKB212 RF(P) AKB211 ADK A4,1 RF AKB212 AKB211 ADR A4,A4 AKB212 XRS A4,DWTST,A6 RESET OLD KEY-FLAG LDR A2,A4 SLL A4,4 AN A4,DWTST,A6 STR A4,A15 SAVE A4 STR A3,A15 SRN A2,A3 ORDER 1 ADR A3,A3 MAKE CHARACTER FLAG LDR A4,A4 RF(NE) AKB213 ADK A3,1 AKB213 ADK A3,/70 LDR A2,A3 LDR* A3,A15 CF A15,STORE STORE KEY IN ECB BUFFER LDR* A4,A15 RESTORE A4 CWK A7,1 RF(E) AKB307 JUMP IF BASIC READ AKB214 NGR A2,A1 MAKE ECB CODE LDR A4,A4 KEY FLAG RF(E) AKB215 SUK A2,4 AKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB AKB218 ABL AKB380 AKB219 LD A2,4,A8 REQUESTED LENGTH=0 AKB220 ABL(E) AKB380 AKB225 LDR A3,A3 FIRTST RIME? RF(NE) AKB240 N0! LD A1,2,A8 BUFFER ADDRESS SUK A1,1 ADR A1,A2 AKB230 SCR A3,A1 CLEAR ECB BUFFER SUK A1,1 SUK A2,1 RB(NE) AKB230 AKB240 EQU * LD A1,DWTUTQ,A6 LCR A2,A1 AKB245 LDR A4,A2 XRK A4,/FF OVERFLOW? RF(NE) AKB250 N0! AKB247 SCR A4,A1 YES! LDK A1,OVMASK OVERFLOW SET ABL ENDIX END I/O AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? RF(NE) AKB255 CF A5,STREG NOTHING IN QUEUE IFT CTIMUT=1 LDR A1,A1 CHECK TIME OUT RETURN CODE RF(Z) AKB257 NO TIME OUT ABL ENDI05 END I/O AT TIME OUT XIF IFT CTIMUT=0 RF AKB257 XIF AKB255 CF A15,EOQUEU NEXT OUT POINTER ST A1,DWTUTQ,A6 STORE NEW POINTER AKB257 EQU * LDR A4,A7 SUK A4,2 RF(NN) AKB310 ORDER 2 OR 3 EJECT * * * ORDER 1 BASIC READ * * * AKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER IFT CECHO=1 CF A5,ECHO XIF AKB307 CW A3,4,A8 RF(E) AKB380 END I/O IF REQ=EFF LENGTH LD A2,DWTST,A6 MORE KEYS? ANK A2,/F RB(NZ) AKB210 RB AKB225 EJECT * * * * ORDER 2 OR 3 STANDARD AND NUMERIC READ * * CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) * * * * AKB310 EQU * LD A1,10,A8 KEY-TABLE ADDRESS RF(Z) AKB360 NO KEY-TABLE LCR A4,A1 KEY-TABLE LENGTH IN A4 ANK A4,/FF ADR A1,A4 LAST PLACE IN KEY-TABLE ADK A1,1 AKB355 SUK A4,1 RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE SUK A1,1 NEXT KEY CCR A2,A1 EOR? RB(NE) AKB355 NO! ADK A4,1 ST A4,10,A8 STORE INDEX IN CONTROL WORD CF A15,STORE STORE CHARACTER IFT CECHO=1 ORK A2,/80 INDICATE EOR-CHARACTER CF A5,ECHO ECHO EOR-CHARACTER XIF RF AKB380 AKB360 EQU * LDR A4,A2 CC A4,KBMZ2,A6 RF(E) KBMZ20 CC A4,KBMZ3,A6 RF(E) KBMZ30 CC A4,KBBSP,A6 RF(E) KBSP10 CC A4,KBCLR,A6 RF(E) KBCL10 CF A15,STORE STORE CHARACTER IN BUFFER LDR A4,A2 SUK A4,/20 CHEC CONVERTED CHARACTER RF(N) AKB364 LESS THAN /20 SUK A4,/5F CHARACTER > /7F RF(P) AKB364 YES CWK A7,2 RF(E) AKB366 STANDARD READ OK ADK A4,/4F RF(N) AKB364 SUK A4,/A RF(N) AKB366 NUMERIC READ OK AKB364 LDK A1,4 ERROR CODE RF ENDIO AKB366 EQU * IFT CECHO=1 ANK A2,/7F CF A5,ECHO XIF CW A3,4,A8 LENGTH OVERFLOW? AKB367 ABL(L) AKB210 NO RETURN AKB368 LDK A1,8 YES SET ERROR CODE RF ENDIO END I/O EJECT KBMZ30 EQU * TRIPPLE ZERO LDK A4,3 RF KBMZ25 KBMZ20 LDK A4,2 DOUBLE ZERO KBMZ25 LDK A2,/30 SUK A4,1 RB(L) AKB367 LDR A1,A4 CF A15,STORE LDR A4,A1 IFT CECHO=1 CF A5,ECHO XIF CW A3,4,A8 RB(L) KBMZ25 KBMZ27 EQU * SUK A4,1 ANY MORE ZEROES RB(L) AKB368 NO,SET RETURN CODE INH LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER SUR A1,A6 CWK A1,DWTSQ FIRST POSITION ? RF(NE) KBMZ29 NO LDK A1,DWTEQ GET LAST POSITION IN QUEUE ADR A1,A6 SUK A1,1 RF KBMZ40 KBMZ29 ADR A1,A6 GET PREIOUS POINTER POSITION SUK A1,1 KBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? RF(E) KBMZ90 NO NOT REALY. ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER LDK A2,/30 STORE ZERO IN CIRKULAR SCR A2,A1 INPUT BUFFER RB KBMZ27 KBMZ90 EQU * LDK A4,/FF INDICATE BUFFER OWERFLOW SCR A4,A1 ST A1,DWTUTQ,A6 UPPDATE POINTER LDK A1,/A SET RETURN CODE FOR BOTH ENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS * * * KBCL10 EQU * CLEAR LDK A3,0 LDK A2,/18 RB AKB366 * * * KBSP10 EQU * LDR A3,A3 RF(Z) KBSP15 SUK A3,1 SUR A2,A2 CLEAR LAST CHAR IN ECB-BUFFER CF A15,STORE SUK A3,1 KBSP15 LDK A2,/8 RB AKB366 * * AKB380 LDK A1,0 RETURN CODE EJECT * * * THIS IS A COMMON END OF THE DRIVER * * SET EFFECTIVE LENGTH AND PERFORM END I/O * ON KEYBOARD AND ECHO-DEVICE * * ENDIO EQU * * INH IFT CTIMUT=1 LD A4,DWTTP,A6 RF(E) ENDI05 NO TIMING ON THIS DEVICE CM* DWTTP,A6 RESET TIMER CM DWTTP,A6 XIF * ENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ENDI10 EQU * * IFT CECHO=1 LDR A4,A1 SAVE A1 CF A5,ECHEND END I/O ON ECHO DEVICE LDR A1,A4 RESTORE A1 XIF ABL DISEND * EJECT * * * * IHKB * * * THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER * * * IHKB EQU * ANK A2,/FF CF A15,KONVER CONVERT INPUT CHARACTER LDR A4,A4 TEST TYPE OF CHAR RF(P) EXIT SHIFT/CTRL/SKIP RF(N) IHKB12 KEY-LOCK LD A3,DWTST,A6 NORMAL CHAR IFT KBLOCK=1 ANK A3,/FF RF(Z) EXIT LD A3,DWTST,A6 I/O REQUEST? XIF RF(N) IHKB15 NO READ REQUEST PENDING SLL A3,7 INTERRUPT ALLOWED ? RF(NN) IHKB15 NO, STORE CHARACTER IN DWT-BUFFER IFT CTIMUT=1 LD A3,DWTTP,A6 RF(E) IHKB07 NO TIMING ON THIS DEVICE LDKL A3,-TIME RESTART TIME ST* A3,DWTTP,A6 XIF IHKB07 ABL LDREG RETURN TO READ ROUTINE IHKB12 CF A15,KEYSET SET KEY CODE IN DWT LDR A3,A3 RF(Z) EXIT NO KEY CHANGE LD A3,DWTST,A6 RF(N) EXIT NO READ REQUEST PENDING SLL A3,7 RF(NN) EXIT INERRUPT NOT ALLOWED LD A3,DWTA3,A6 RESTORE BUFFER INDEX LDKL A5,DWTSB2 ADR A5,A6 ABL AKB210 IHKB15 LD A1,DWTINQ,A6 LCR A4,A1 XRK A4,/FF ALREADY OVERFLOW? RF(E) EXIT YES LDR A3,A1 CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS CW A1,DWTUTQ,A6 OVERFLOW? RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY ORK A2,/FF SET OVERFLOWBIT IN INPUT BUFFER RF IHKB30 IHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER IHKB30 SCR A2,A3 EXIT ABL TDISP * EJECT * * * * AKBTUT * * THIS IS THE TIME-OUT ROUTINE * * * IFT CTIMUT=1 AKBTUT EQU * LDR A6,A1 RESTART DWT-ADDRESS LDK A1,/40 SET RETURNE CODE CM DWTTP,A6 LD A2,DWTST,A6 RB(N) EXIT DISPATCH IF NO REQUEST ON RB IHKB07 RESTORE REGISTER AND END I/O XIF EJECT * * * * * KEYSET * * * * ON ENTRY: A4= NEG KEY-LOCK VALUE * * ON EXIT: A3= ZERO IF IF NO CHANGE IN KEYS, ELSE POS * * KEYSET EQU * STR A4,A15 LD A3,DWTST,A6 LDKL A2,/100 SET100 SRL A2,1 ADK A4,2 IN A4: 1=OFF 0=ON RB(N) SET100 ANR A3,A2 CHEC OLD KEY POSITION RF(NZ) SET300 JUMP IF KEY ON LDR A4,A4 RF(NZ) SET500 RF SET400 SET300 LDR A4,A4 RF(Z) SET500 SET400 LD A3,DWTST,A6 XRR A3,A2 SRL A2,4 ORR A2,A3 ST A2,DWTST,A6 LDK A3,1 A3=1 IF KEY LOCK HAS CHANGED SET500 LDR* A4,A15 RTN A15 EJECT * * * * KONVER * * KONVER CONVERTS INPUT CHARACTER * * * ON ENTRY: A2= INPUT CHARACTER * * * ON EXIT: A2=COVERTED CHARACTER * A4= NEG IF KEY-LOCK, ZERO IF CHARACTER,POS IF CTRL,SHIFT * A5 IS DESTROYED! * * KONVER EQU * LDR A4,A2 IFT NSHIFT=0 SUK A4,/7C CODE > /7B RF(NN) KON500 YES LDR A4,A2 RESTORE CHARACTER XIF STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION LDR* A5,A6 SUK A4,/20 RF(N) KON105 FUNCTION KON100 SUK A4,/40 RF(N) KON180 ALFANUMERIC SUK A4,/10 FUNCTION RF(NN) KON110 NO SUK A2,/40 YES KON105 EQU * ANK A5,/10 SRL A5,3 RF KON200 KON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT RF(N) KON400 KEY-LOCK RF(Z) KON140 SHIFT ON SUK A4,2 RF(N) KON160 SHIFT OFF RF(Z) KON170 CONTROL ON IFT NSHIFT=1 SUK A4,2 RF(N) KON125 CONTROL OFF RF(E) KON140 NUMERICAL SHIFT ON RF KON160 NUMERICAL SHIFT OFF XIF KON125 EQU * LDKL A2,/FFDF UNCTRL KON120 ANR A5,A2 KON130 STR A5,A6 DWTCHP LDK A4,/10 RF KON400 GO HOME! KON140 EQU * IFT NSHIFT=1 LDR A4,A5 ANK A4,/10 RF(Z) KON145 SHIFT NOT ON LDK A2,/90 RF KON150 XIF KON145 EQU * LDK A2,/10 SHIFT KON150 ORR A5,A2 RB KON130 KON160 EQU * IFT NSHIFT=1 LDR A4,A5 ANK A4,/80 RF(Z) KON165 LDKL A2,/FF7F RB KON120 XIF KON165 EQU * LDKL A2,/FFEF RB KON120 RB KON120 KON170 LDK A2,/20 CTRL RB KON150 KON180 SUK A2,/20 FIND INDEX ANK A5,/30 SRL A5,3 ADK A5,4 KON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS ADR A4,A5 LDR* A4,A4 RF(Z) KON400 ADR A4,A2 LDR* A2,A15 RESTORE A2 AND A15-STACK LCR A2,A4 GET CHARACTER FROM TABLE KON250 LDK A4,0 A4=0 IF NOT KEY-LOCK$$ KON300 RTN A15 KON400 LDR* A2,A15 NO CONVERSION, KEEP CHARACTER RB KON300 IFT NSHIFT=0 KON500 EQU * LDR A4,A4 KEY CODE /7C RF(Z) KON600 YES LDK A4,1 INDICATE SKIP CHARACTER RTN A15 KON600 EQU * SUR A2,A2 RB KONVER DO START AGAIN XIF EJECT * * STORE = SUBROUTINE TO STORE A CHARACTER IN * ECB-BUFFER AND INCREMENT BUFFER INDEX * * ON ENTRY: * * A2 = CHARACTER TO STORE * A3 = BUFFER INDEX * * STORE EQU * LD A4,2,A8 BUFFER ADDRESS ADR A4,A3 ADD BUFFER INDEX SCR A2,A4 STORE CHARACTER IN BUFFER ADK A3,1 INCREMENT BUFFER INDEX STORTN ADKL A15,2 LDR* P,A15 EJECT * * * EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER * * ON ENTRY: * * A1 = QUEUE POINTER * A6 = DWT-ADDRESS * * ON EXIT: * * A1 = NEW QUEUE POINTER EOQUEU EQU * ADK A1,1 SUR A1,A6 CWK A1,DWTEQ END OF QUEUE? RF(NE) EOQU10 LDK A1,DWTSQ SET QUEUE START ADDRESS EOQU10 ADR A1,A6 RB STORTN END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRKB03 REL 9.2 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…007c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x004c}
0x007c…0086 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0080}
0x0086…00ae Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008a}
0x00ae…00b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b2}
0x00b8…00dc Head {h00=0x0020, h01=0x0050, text=»* DRKB01 = DRIVER KEYBOARD«, t00=0x0000, t01=0x00bc}
0x00dc…00e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e0}
0x00e6…00f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ea}
0x00f0…00fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f4}
0x00fa…0104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fe}
0x0104…010e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0108}
0x010e…0118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0112}
0x0118…014c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x011c}
0x014c…0156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0150}
0x0156…0160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015a}
0x0160…0194 Head {h00=0x0030, h01=0x0050, text=»* THIS DRIVER HANDLES INPUT FROM NUMERIC «, t00=0x0000, t01=0x0164}
0x0194…01c6 Head {h00=0x002e, h01=0x0050, text=»* AND ALPHANUMERIC KEYBOARDS PTS 6236, «, t00=0x0001, t01=0x0008}
0x01c6…01f6 Head {h00=0x002c, h01=0x0050, text=»* CONNECTED TO CPU VIA CHLT OR CHRT. «, t00=0x0001, t01=0x003a}
0x01f6…0200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006a}
0x0200…023e Head {h00=0x003a, h01=0x0050, text=»* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS«, t00=0x0001, t01=0x0074}
0x023e…0266 Head {h00=0x0024, h01=0x0050, text=»* ARE HANDLED BY THE DRIVER. «, t00=0x0001, t01=0x00b2}
0x0266…0270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x0270…02a4 Head {h00=0x0030, h01=0x0050, text=»* AN ECHO-DEVICE CAN BE ATTACHED TO EVERY«, t00=0x0001, t01=0x00e4}
0x02a4…02d8 Head {h00=0x0030, h01=0x0050, text=»* KEYBOARD WHERE RECEIVED CHARACTERS ARE «, t00=0x0001, t01=0x0118}
0x02d8…02ec Head {h00=0x0010, h01=0x0050, text=»* ECHOED.«, t00=0x0001, t01=0x014c}
0x02ec…02f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0160}
0x02f6…032a Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0001, t01=0x016a}
0x032a…0334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x000e}
0x0334…035a Head {h00=0x0022, h01=0x0050, text=»* A C K B : ACTIVATION PART«, t00=0x0002, t01=0x0018}
0x035a…0364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003e}
0x0364…038c Head {h00=0x0024, h01=0x0050, text=»* I H K B : INTERRUPT HANDLER«, t00=0x0002, t01=0x0048}
0x038c…0396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0070}
0x0396…03ba Head {h00=0x0020, h01=0x0050, text=»* E C H O : ECHO HANDLER «, t00=0x0002, t01=0x007a}
0x03ba…03c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x009e}
0x03c4…03ec Head {h00=0x0024, h01=0x0050, text=»* R C K B : RECOVERY ROUTINE «, t00=0x0002, t01=0x00a8}
0x03ec…03f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d0}
0x03f6…0404 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00da}
0x0404…040e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e8}
0x040e…0418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00f2}
0x0418…0448 Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE THREATED: «, t00=0x0002, t01=0x00fc}
0x0448…0452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x012c}
0x0452…0474 Head {h00=0x001e, h01=0x0050, text=»* ORDER 01: BASIC READ «, t00=0x0002, t01=0x0136}
0x0474…0498 Head {h00=0x0020, h01=0x0050, text=»* ORDER 02: STANDARD READ«, t00=0x0002, t01=0x0158}
0x0498…04bc Head {h00=0x0020, h01=0x0050, text=»* ORDER 03: NUMERIC READ «, t00=0x0002, t01=0x017c}
0x04bc…04e6 Head {h00=0x0026, h01=0x0050, text=»* ORDER 31: RESET INPUT BUFFER «, t00=0x0003, t01=0x0010}
0x04e6…04f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003a}
0x04f0…04fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0044}
0x04fa…051e Head {h00=0x0020, h01=0x0050, text=»* NORMAL REGISTER USAGE :«, t00=0x0003, t01=0x004e}
0x051e…0528 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0072}
0x0528…054e Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 : RETURN CODE«, t00=0x0003, t01=0x007c}
0x054e…0578 Head {h00=0x0026, h01=0x0050, text=»* A2 : INPUT CHARACTER«, t00=0x0003, t01=0x00a2}
0x0578…05a0 Head {h00=0x0024, h01=0x0050, text=»* A3 : BUFFER INDEX «, t00=0x0003, t01=0x00cc}
0x05a0…05c8 Head {h00=0x0024, h01=0x0050, text=»* A4 : WORK REGISTER«, t00=0x0003, t01=0x00f4}
0x05c8…05ee Head {h00=0x0022, h01=0x0050, text=»* A5 : STACK BASE «, t00=0x0003, t01=0x011c}
0x05ee…0614 Head {h00=0x0022, h01=0x0050, text=»* A6 : DWT-ADDRESS«, t00=0x0003, t01=0x0142}
0x0614…0634 Head {h00=0x001c, h01=0x0050, text=»* A7 : ORDER«, t00=0x0003, t01=0x0168}
0x0634…065a Head {h00=0x0022, h01=0x0050, text=»* A8 : ECB-ADDRESS«, t00=0x0003, t01=0x0188}
0x065a…0664 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x001e}
0x0664…066e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0028}
0x066e…0678 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0032}
0x0678…0696 Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION«, t00=0x0004, t01=0x003c}
0x0696…06a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x005a}
0x06a0…06dc Head {h00=0x0038, h01=0x0050, text=»* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, «, t00=0x0004, t01=0x0064}
0x06dc…0718 Head {h00=0x0038, h01=0x0050, text=»* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED «, t00=0x0004, t01=0x00a0}
0x0718…072c Head {h00=0x0010, h01=0x0050, text=»* IN DWT.«, t00=0x0004, t01=0x00dc}
0x072c…0736 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f0}
0x0736…076c Head {h00=0x0032, h01=0x0050, text=»* DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE«, t00=0x0004, t01=0x00fa}
0x076c…0788 Head {h00=0x0018, h01=0x0050, text=»* DEFINED IN DWT.«, t00=0x0004, t01=0x0130}
0x0788…0792 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x014c}
0x0792…07c2 Head {h00=0x002c, h01=0x0050, text=»* IF TIMING IS WANTED, TIMER POINTER «, t00=0x0004, t01=0x0156}
0x07c2…07f2 Head {h00=0x002c, h01=0x0050, text=»* IN DWT MUST BE SET UNEQUAL TO ZERO.«, t00=0x0004, t01=0x0186}
0x07f2…0828 Head {h00=0x0032, h01=0x0050, text=»* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS«, t00=0x0005, t01=0x0026}
0x0828…0860 Head {h00=0x0034, h01=0x0050, text=»* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE «, t00=0x0005, t01=0x005c}
0x0860…088e Head {h00=0x002a, h01=0x0050, text=»* IS WANTED FOR A SYSTEM, INDICATOR«, t00=0x0005, t01=0x0094}
0x088e…08b6 Head {h00=0x0024, h01=0x0050, text=»* IN DRIVER MUST BE CHANGED. «, t00=0x0005, t01=0x00c2}
0x08b6…08c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ea}
0x08c0…08f8 Head {h00=0x0034, h01=0x0050, text=»* THE LENGTH OF THE CIRCULAR INPUT BUFFER IS «, t00=0x0005, t01=0x00f4}
0x08f8…0934 Head {h00=0x0038, h01=0x0050, text=»* DEFINED IN DWT. STANDARD VALUE IS 7 CHARACTERS «, t00=0x0005, t01=0x012c}
0x0934…0970 Head {h00=0x0038, h01=0x0050, text=»* NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL «, t00=0x0005, t01=0x0168}
0x0970…098c Head {h00=0x0018, h01=0x0050, text=»* DWT:S IN SYSTEM«, t00=0x0006, t01=0x0014}
0x098c…099a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0030}
0x099a…09a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003e}
0x09a4…09e0 Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x0006, t01=0x0048}
0x09e0…0a1c Head {h00=0x0038, h01=0x0050, text=»* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS:«, t00=0x0006, t01=0x0084}
0x0a1c…0a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c0}
0x0a26…0a46 Head {h00=0x001c, h01=0x0050, text=»* -----ECHO-FUNCTION «, t00=0x0006, t01=0x00ca}
0x0a46…0a6c Head {h00=0x0022, h01=0x0050, text=»* -----POWER ON INDICATION «, t00=0x0006, t01=0x00ea}
0x0a6c…0a90 Head {h00=0x0020, h01=0x0050, text=»* -----TIME-OUT-FUNCTION «, t00=0x0006, t01=0x0110}
0x0a90…0ab8 Head {h00=0x0024, h01=0x0050, text=»* -----NUMERIC SHIFT-FUNCTION«, t00=0x0006, t01=0x0134}
0x0ab8…0ae8 Head {h00=0x002c, h01=0x0050, text=»* -----KEYBOARD LOCK IF NO KEYLOCK ON«, t00=0x0006, t01=0x015c}
0x0ae8…0af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018c}
0x0af2…0b06 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES «, t00=0x0007, t01=0x0008}
0x0b06…0b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001c}
0x0b10…0b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0026}
0x0b1a…0b3c Head {h00=0x001e, h01=0x0050, text=» ENTRY KBAD3 ADDRESS-BLOCK«, t00=0x0007, t01=0x0030}
0x0b3c…0b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0052}
0x0b46…0b50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005c}
0x0b50…0b5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0066}
0x0b5a…0b84 Head {h00=0x0026, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES «, t00=0x0007, t01=0x0070}
0x0b84…0b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009a}
0x0b8e…0b98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a4}
0x0b98…0ba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ae}
0x0ba2…0bca Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0007, t01=0x00b8}
0x0bca…0bfc Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND END I/O AND GO TO DISPATCHER«, t00=0x0007, t01=0x00e0}
0x0bfc…0c1a Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0007, t01=0x0112}
0x0c1a…0c40 Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0007, t01=0x0130}
0x0c40…0c74 Head {h00=0x0030, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN«, t00=0x0007, t01=0x0156}
0x0c74…0cac Head {h00=0x0034, h01=0x0050, text=» EXTRN STREG STORE REGISTERS AND GO TO DISPATCER«, t00=0x0007, t01=0x018a}
0x0cac…0cdc Head {h00=0x002c, h01=0x0050, text=» EXTRN LDREGE RETURN FROM ECHOE HANDLING«, t00=0x0008, t01=0x0032}
0x0cdc…0cfe Head {h00=0x001e, h01=0x0050, text=» EXTRN LDREGF PANIK EXTERN«, t00=0x0008, t01=0x0062}
0x0cfe…0d1c Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIME SET TIME«, t00=0x0008, t01=0x0084}
0x0d1c…0d3a Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIMP SET TIME«, t00=0x0008, t01=0x00a2}
0x0d3a…0d60 Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x0008, t01=0x00c0}
0x0d60…0d86 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECHRTN RETURN FROM ECHO«, t00=0x0008, t01=0x00e6}
0x0d86…0da6 Head {h00=0x001c, h01=0x0050, text=» EXTRN ECHO ECHO ROUTINE«, t00=0x0008, t01=0x010c}
0x0da6…0dca Head {h00=0x0020, h01=0x0050, text=» EXTRN ECHEND END OF ECHOING«, t00=0x0008, t01=0x012c}
0x0dca…0dd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0150}
0x0dd4…0dde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015a}
0x0dde…0de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0164}
0x0de8…0e04 Head {h00=0x0018, h01=0x0050, text=»* DWT PARAMETERS«, t00=0x0008, t01=0x016e}
0x0e04…0e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x018a}
0x0e0e…0e18 (9, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0004}
0x0e18…0e22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000e}
0x0e22…0e48 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTCHP CHANEL PARAMETER«, t00=0x0009, t01=0x0018}
0x0e48…0e64 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0009, t01=0x003e}
0x0e64…0e86 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0009, t01=0x005a}
0x0e86…0eb0 Head {h00=0x0026, h01=0x0022, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK«, t00=0x0009, t01=0x007c}
0x0eb0…0ed2 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0009, t01=0x00a6}
0x0ed2…0ef4 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0009, t01=0x00c8}
0x0ef4…0f16 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0009, t01=0x00ea}
0x0f16…0f40 Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0009, t01=0x010c}
0x0f40…0f66 Head {h00=0x0022, h01=0x001d, text=» EXTRN DWTECH ECHO DEVICE DWT «, t00=0x0009, t01=0x0136}
0x0f66…0f88 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTP TIMER POINTER«, t00=0x0009, t01=0x015c}
0x0f88…0fac Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTWAT SAVE INPUT DWT«, t00=0x0009, t01=0x017e}
0x0fac…0fba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0012}
0x0fba…0fc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0020}
0x0fc4…0fce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x002a}
0x0fce…0fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0034}
0x0fd8…0ff0 Head {h00=0x0014, h01=0x0050, text=»* CONSTANTS «, t00=0x000a, t01=0x003e}
0x0ff0…0ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0056}
0x0ffa…1004 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0060}
0x1004…100e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006a}
0x100e…103c Head {h00=0x002a, h01=0x0050, text=»OVMASK EQU /2 OVERFLOW IN INPUT BUFFER«, t00=0x000a, t01=0x0074}
0x103c…1046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a2}
0x1046…1078 Head {h00=0x002e, h01=0x0050, text=»X:F EQU 20 LENGTH OF CIRCULAR INPUT BUFFER«, t00=0x000a, t01=0x00ac}
0x1078…10ae Head {h00=0x0032, h01=0x0050, text=»DWTLNG EQU 30 NUMBER OF BYTES IN DECIMAL FORM «, t00=0x000a, t01=0x00de}
0x10ae…10b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0114}
0x10b8…10c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011e}
0x10c2…10e4 Head {h00=0x001e, h01=0x0050, text=»* TIME BEFORE TIME OUT«, t00=0x000a, t01=0x0128}
0x10e4…10ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014a}
0x10ee…1114 Head {h00=0x0022, h01=0x0050, text=»TIME EQU 300 TIME OUT CONSTANT«, t00=0x000a, t01=0x0154}
0x1114…111e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x017a}
0x111e…112c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0184}
0x112c…1136 (11, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0004}
0x1136…1140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000e}
0x1140…1170 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000b, t01=0x0018}
0x1170…11a0 Head {h00=0x002c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000b, t01=0x0048}
0x11a0…11d0 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000b, t01=0x0078}
0x11d0…11da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00a8}
0x11da…120c Head {h00=0x002e, h01=0x0050, text=»* TIME OUT FUNCTION MAY BE EXCLUDED BY «, t00=0x000b, t01=0x00b2}
0x120c…122a Head {h00=0x001a, h01=0x0050, text=»* SETTING X:A = 0. «, t00=0x000b, t01=0x00e4}
0x122a…1234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0102}
0x1234…1246 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000b, t01=0x010c}
0x1246…125a Head {h00=0x0010, h01=0x0050, text=»CTIMUT EQU 0«, t00=0x000b, t01=0x011e}
0x125a…1264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0132}
0x1264…1292 Head {h00=0x002a, h01=0x0050, text=»* ECHO FUNCTION MAY BE EXCLUDED BY «, t00=0x000b, t01=0x013c}
0x1292…12b0 Head {h00=0x001a, h01=0x0050, text=»* SETTING X:B = 0. «, t00=0x000b, t01=0x016a}
0x12b0…12ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0188}
0x12ba…12cc (12, 0, 400) Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000c, t01=0x0004}
0x12cc…12e0 Head {h00=0x0010, h01=0x0050, text=»CECHO EQU 0 «, t00=0x000c, t01=0x0016}
0x12e0…12ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x002a}
0x12ea…132c Head {h00=0x003e, h01=0x0050, text=»* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION «, t00=0x000c, t01=0x0034}
0x132c…1356 Head {h00=0x0026, h01=0x0050, text=»* IS INCLUDED IN THE DRIVER. «, t00=0x000c, t01=0x0076}
0x1356…1396 Head {h00=0x003c, h01=0x0050, text=»* IF THERE IS A READ REQUEST THIS IS COMPLETED WITH«, t00=0x000c, t01=0x00a0}
0x1396…13c6 Head {h00=0x002c, h01=0x0050, text=»* ZERO IN THE CONTROL WORD OF ECB. «, t00=0x000c, t01=0x00e0}
0x13c6…140a Head {h00=0x0040, h01=0x0050, text=»* IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST «, t00=0x000c, t01=0x0110}
0x140a…144e Head {h00=0x0040, h01=0x0050, text=»* AFTER POWER ON IS COMPLETED WITH ZERO IN CONTROL WORD«, t00=0x000c, t01=0x0154}
0x144e…1464 Head {h00=0x0012, h01=0x0050, text=»* OF ECB «, t00=0x000d, t01=0x0008}
0x1464…146e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x001e}
0x146e…1478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0028}
0x1478…148a Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000d, t01=0x0032}
0x148a…149e Head {h00=0x0010, h01=0x0050, text=»POWOFF EQU 1«, t00=0x000d, t01=0x0044}
0x149e…14a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0058}
0x14a8…14b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0062}
0x14b2…14bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006c}
0x14bc…150e Head {h00=0x004e, h01=0x0050, text=»* BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 71/72«, t00=0x000d, t01=0x0076}
0x150e…1520 Head {h00=0x000e, h01=0x0050, text=»X:H EQU 0 «, t00=0x000d, t01=0x00c8}
0x1520…1534 Head {h00=0x0010, h01=0x0050, text=»NSHIFT EQU 1«, t00=0x000d, t01=0x00da}
0x1534…153e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ee}
0x153e…1548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f8}
0x1548…158e Head {h00=0x0042, h01=0x0050, text=»* BY SETTING X:I = 1 KEYBOARD IS LOCKED IF NO KEYLOCK ON. «, t00=0x000d, t01=0x0102}
0x158e…15a0 Head {h00=0x000e, h01=0x0050, text=»X:I EQU 0 «, t00=0x000d, t01=0x0148}
0x15a0…15b4 Head {h00=0x0010, h01=0x0050, text=»KBLOCK EQU 1«, t00=0x000d, t01=0x015a}
0x15b4…15be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016e}
0x15be…15c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0178}
0x15c8…15fa Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000d, t01=0x0182}
0x15fa…1628 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000e, t01=0x0024}
0x1628…1632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0052}
0x1632…1646 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000e, t01=0x005c}
0x1646…1650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0070}
0x1650…165a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x007a}
0x165a…1694 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000e, t01=0x0084}
0x1694…16c6 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000e, t01=0x00be}
0x16c6…16d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f0}
0x16d0…16e4 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000e, t01=0x00fa}
0x16e4…16ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x010e}
0x16ee…16f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0118}
0x16f8…1714 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x000e, t01=0x0122}
0x1714…171e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x013e}
0x171e…1728 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0148}
0x1728…173a Head {h00=0x000e, h01=0x0050, text=»X:J EQU 10«, t00=0x000e, t01=0x0152}
0x173a…1750 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 030«, t00=0x000e, t01=0x0164}
0x1750…175a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x017a}
0x175a…1764 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0184}
0x1764…1782 Head {h00=0x001a, h01=0x0050, text=»* MMU KEY TABLE SIZE«, t00=0x000e, t01=0x018e}
0x1782…178c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001c}
0x178c…1796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0026}
0x1796…17a8 Head {h00=0x000e, h01=0x0050, text=»X:K EQU 10«, t00=0x000f, t01=0x0030}
0x17a8…17be Head {h00=0x0012, h01=0x0050, text=»DVBKTB EQU 30 «, t00=0x000f, t01=0x0042}
0x17be…17c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0058}
0x17c8…17d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0062}
0x17d6…17e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0070}
0x17e0…17ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007a}
0x17ea…1808 Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENT«, t00=0x000f, t01=0x0084}
0x1808…1812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a2}
0x1812…181c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ac}
0x181c…1850 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000f, t01=0x00b6}
0x1850…185a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ea}
0x185a…1870 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000f, t01=0x00f4}
0x1870…1888 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000f, t01=0x010a}
0x1888…1894 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0122}
0x1894…189e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x012e}
0x189e…18b4 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x0138}
0x18b4…18ce Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000f, t01=0x014e}
0x18ce…18da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0168}
0x18da…18e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0174}
0x18e4…1912 Head {h00=0x002a, h01=0x0050, text=»DWTCON EQU START+/00 CONVERSION TABLE «, t00=0x000f, t01=0x017e}
0x1912…194e Head {h00=0x0038, h01=0x0050, text=»DWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE«, t00=0x0010, t01=0x001c}
0x194e…198a Head {h00=0x0038, h01=0x0050, text=»DWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE «, t00=0x0010, t01=0x0058}
0x198a…19b4 Head {h00=0x0026, h01=0x0050, text=»DWTSQ EQU START+/1C START OF QUEUE«, t00=0x0010, t01=0x0094}
0x19b4…19e0 Head {h00=0x0028, h01=0x0050, text=»DWTEQ EQU DWTSQ+DWTLNG END OF QUEUE «, t00=0x0010, t01=0x00be}
0x19e0…19ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ea}
0x19ea…1a16 Head {h00=0x0028, h01=0x0050, text=»* SPECIAL KEYS DEFINED IN DWT «, t00=0x0010, t01=0x00f4}
0x1a16…1a20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0120}
0x1a20…1a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012a}
0x1a2a…1a34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0134}
0x1a34…1a64 Head {h00=0x002c, h01=0x0050, text=»KBBSP EQU START+/14 BACK-SPACE CHARACTER«, t00=0x0010, t01=0x013e}
0x1a64…1a90 Head {h00=0x0028, h01=0x0050, text=»KBCLR EQU START+/15 CLEAR CHARACTER «, t00=0x0010, t01=0x016e}
0x1a90…1ac2 Head {h00=0x002e, h01=0x0050, text=»KBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER «, t00=0x0011, t01=0x000a}
0x1ac2…1ade Head {h00=0x0018, h01=0x0050, text=»KBMZ3 EQU START+/16 «, t00=0x0011, t01=0x003c}
0x1ade…1ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0058}
0x1ae8…1af6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0062}
0x1af6…1b0c Head {h00=0x0012, h01=0x0050, text=»* TABLES «, t00=0x0011, t01=0x0070}
0x1b0c…1b16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0086}
0x1b16…1b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0090}
0x1b20…1b48 Head {h00=0x0024, h01=0x0050, text=» DATA DVBKTB MMU KEY TABLE SIZE «, t00=0x0011, t01=0x009a}
0x1b48…1b6c Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x00c2}
0x1b6c…1b88 Head {h00=0x0018, h01=0x0050, text=» DATA 6 DEVICE INDEX«, t00=0x0011, t01=0x00e6}
0x1b88…1b92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0102}
0x1b92…1ba6 Head {h00=0x0010, h01=0x0050, text=»KBAD3 EQU * «, t00=0x0011, t01=0x010c}
0x1ba6…1bcc Head {h00=0x0022, h01=0x0050, text=» DATA ACKB ACTIVATION HANDLER «, t00=0x0011, t01=0x0120}
0x1bcc…1bf2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x0146}
0x1bf2…1c16 Head {h00=0x0020, h01=0x0050, text=» DATA IHKB INTERRUPT HANDLER«, t00=0x0011, t01=0x016c}
0x1c16…1c2c Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0011, t01=0x0190}
0x1c2c…1c50 Head {h00=0x0020, h01=0x0050, text=» DATA RCKB RECOVERY ROUTINE «, t00=0x0012, t01=0x0016}
0x1c50…1c5c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x003a}
0x1c5c…1c72 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=0 «, t00=0x0012, t01=0x0046}
0x1c72…1c8e Head {h00=0x0018, h01=0x0050, text=» DATA 0 NO RECOVERY «, t00=0x0012, t01=0x005c}
0x1c8e…1c9a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0078}
0x1c9a…1ca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0084}
0x1ca4…1cba Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x008e}
0x1cba…1cc8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00a4}
0x1cc8…1cda Head {h00=0x000e, h01=0x0050, text=»* RCKB «, t00=0x0012, t01=0x00b2}
0x1cda…1ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00c4}
0x1ce4…1cfe Head {h00=0x0016, h01=0x0050, text=»* RECOVERY PART«, t00=0x0012, t01=0x00ce}
0x1cfe…1d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e8}
0x1d08…1d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f2}
0x1d12…1d24 Head {h00=0x000e, h01=0x0050, text=»RCKB EQU *«, t00=0x0012, t01=0x00fc}
0x1d24…1d3a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0012, t01=0x010e}
0x1d3a…1d64 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0012, t01=0x0124}
0x1d64…1d70 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x014e}
0x1d70…1d7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x015a}
0x1d7a…1d90 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x0164}
0x1d90…1da6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0012, t01=0x017a}
0x1da6…1dcc Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0012, t01=0x0190}
0x1dcc…1dd8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0026}
0x1dd8…1de2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0032}
0x1de2…1df8 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0013, t01=0x003c}
0x1df8…1e16 Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTST,A6 BUSY? «, t00=0x0013, t01=0x0052}
0x1e16…1e2c Head {h00=0x0012, h01=0x0050, text=» RF(NN) RCKB10«, t00=0x0013, t01=0x0070}
0x1e2c…1e42 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x0013, t01=0x0086}
0x1e42…1e6e Head {h00=0x0028, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER OFF «, t00=0x0013, t01=0x009c}
0x1e6e…1e80 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0013, t01=0x00c8}
0x1e80…1eaa Head {h00=0x0026, h01=0x0050, text=»RCKB10 CF A5,LDREGE LOAD REGISTERS«, t00=0x0013, t01=0x00da}
0x1eaa…1ebc Head {h00=0x000e, h01=0x0050, text=» RF AKB202«, t00=0x0013, t01=0x0104}
0x1ebc…1ec8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0116}
0x1ec8…1ed6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0122}
0x1ed6…1ee0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0130}
0x1ee0…1eea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x013a}
0x1eea…1efe Head {h00=0x0010, h01=0x0050, text=»* ACKB «, t00=0x0013, t01=0x0144}
0x1efe…1f08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0158}
0x1f08…1f46 Head {h00=0x003a, h01=0x0050, text=»* ACTIVATION PART: CHECS VALIDITY OF ORDERS AND «, t00=0x0013, t01=0x0162}
0x1f46…1f50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0010}
0x1f50…1f94 Head {h00=0x0040, h01=0x0050, text=»* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER«, t00=0x0014, t01=0x001a}
0x1f94…1f9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005e}
0x1f9e…1fb6 Head {h00=0x0014, h01=0x0050, text=»* TO THREAT«, t00=0x0014, t01=0x0068}
0x1fb6…1fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0080}
0x1fc0…1fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x008a}
0x1fca…1fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0094}
0x1fd4…1fde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x009e}
0x1fde…1ff0 Head {h00=0x000e, h01=0x0050, text=»ACKB EQU *«, t00=0x0014, t01=0x00a8}
0x1ff0…2006 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/FEFF«, t00=0x0014, t01=0x00ba}
0x2006…203c Head {h00=0x0032, h01=0x0050, text=» ANS A1,DWTST,A6 RESET INETRRUPT ALLOWED FLAG «, t00=0x0014, t01=0x00d0}
0x203c…204e Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0014, t01=0x0106}
0x204e…2072 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0014, t01=0x0118}
0x2072…2084 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0014, t01=0x013c}
0x2084…20a8 Head {h00=0x0020, h01=0x0050, text=» RF(NG) AKB100 ILLEGAL ORDER«, t00=0x0014, t01=0x014e}
0x20a8…20ba Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0014, t01=0x0172}
0x20ba…20de Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB200 ORDER 1,2 OR 3«, t00=0x0014, t01=0x0184}
0x20de…20f2 Head {h00=0x0010, h01=0x0050, text=» SUK A4,/2D «, t00=0x0015, t01=0x0018}
0x20f2…2110 Head {h00=0x001a, h01=0x0050, text=» RF(Z) AKB110 ORDER 31«, t00=0x0015, t01=0x002c}
0x2110…213e Head {h00=0x002a, h01=0x0050, text=»AKB100 ORKL A1,/8000 I/0 REQUEST ERROR«, t00=0x0015, t01=0x004a}
0x213e…2152 Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x0015, t01=0x0078}
0x2152…2160 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x008c}
0x2160…216a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x009a}
0x216a…2174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a4}
0x2174…217e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ae}
0x217e…21a8 Head {h00=0x0026, h01=0x0050, text=»* ORDER 31 RESET INPUT BUFFER«, t00=0x0015, t01=0x00b8}
0x21a8…21b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00e2}
0x21b2…21bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ec}
0x21bc…21c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f6}
0x21c6…21da Head {h00=0x0010, h01=0x0050, text=»AKB110 EQU *«, t00=0x0015, t01=0x0100}
0x21da…21f2 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTINQ,A6«, t00=0x0015, t01=0x0114}
0x21f2…2204 Head {h00=0x000e, h01=0x0050, text=» SCR A1,A2«, t00=0x0015, t01=0x012c}
0x2204…2230 Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE «, t00=0x0015, t01=0x013e}
0x2230…2242 Head {h00=0x000e, h01=0x0050, text=» ABL ENDIO«, t00=0x0015, t01=0x016a}
0x2242…224c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017c}
0x224c…225a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0186}
0x225a…2264 (22, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0004}
0x2264…226e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x000e}
0x226e…2288 Head {h00=0x0016, h01=0x0050, text=»* ORDER 1,2,3«, t00=0x0016, t01=0x0018}
0x2288…2292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0032}
0x2292…229c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003c}
0x229c…22a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0046}
0x22a6…22ba Head {h00=0x0010, h01=0x0050, text=»AKB200 EQU *«, t00=0x0016, t01=0x0050}
0x22ba…22d0 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0016, t01=0x0064}
0x22d0…22e8 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0016, t01=0x007a}
0x22e8…2308 Head {h00=0x001c, h01=0x0050, text=» ANKL A2,/200 POWER OFF?«, t00=0x0016, t01=0x0092}
0x2308…2322 Head {h00=0x0016, h01=0x0050, text=» RF(E) AKB205 NO! «, t00=0x0016, t01=0x00b2}
0x2322…234e Head {h00=0x0028, h01=0x0050, text=» XRS A2,DWTST,A6 RESET POWER OFF BIT«, t00=0x0016, t01=0x00cc}
0x234e…2362 Head {h00=0x0010, h01=0x0050, text=»AKB202 EQU *«, t00=0x0016, t01=0x00f8}
0x2362…239e Head {h00=0x0038, h01=0x0050, text=» CWK A7,1 IF BASIC READ DON'T COMPLEATE THE REQUEST «, t00=0x0016, t01=0x010c}
0x239e…23b4 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB205 «, t00=0x0016, t01=0x0148}
0x23b4…23d8 Head {h00=0x0020, h01=0x0050, text=» CM 10,A8 INDICATE POWER OFF«, t00=0x0016, t01=0x015e}
0x23d8…23ea Head {h00=0x000e, h01=0x0050, text=» RF AKB218«, t00=0x0016, t01=0x0182}
0x23ea…23f6 (23, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0004}
0x23f6…240a Head {h00=0x0010, h01=0x0050, text=»AKB205 EQU *«, t00=0x0017, t01=0x0010}
0x240a…2420 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0017, t01=0x0024}
0x2420…2434 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A6 «, t00=0x0017, t01=0x003a}
0x2434…2450 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/40 TIMING? «, t00=0x0017, t01=0x004e}
0x2450…2480 Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB210 NO TIMING FOR THIS DEVICE!«, t00=0x0017, t01=0x006a}
0x2480…24b0 Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTTP,A6 CHECK IF ALREADY TIMING «, t00=0x0017, t01=0x009a}
0x24b0…24c6 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKBTIM «, t00=0x0017, t01=0x00ca}
0x24c6…24dc Head {h00=0x0012, h01=0x0050, text=» LDKL A4,-TIME«, t00=0x0017, t01=0x00e0}
0x24dc…24f4 Head {h00=0x0014, h01=0x0050, text=» ST* A4,DWTTP,A6«, t00=0x0017, t01=0x00f6}
0x24f4…2506 Head {h00=0x000e, h01=0x0050, text=» RF AKB210«, t00=0x0017, t01=0x010e}
0x2506…251a Head {h00=0x0010, h01=0x0050, text=»AKBTIM EQU *«, t00=0x0017, t01=0x0120}
0x251a…253e Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTTP TIMER POINTER«, t00=0x0017, t01=0x0134}
0x253e…2560 Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT-ADDRESS«, t00=0x0017, t01=0x0158}
0x2560…2572 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0017, t01=0x017a}
0x2572…2592 Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIME «, t00=0x0017, t01=0x018c}
0x2592…25c6 Head {h00=0x0030, h01=0x0050, text=» DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME «, t00=0x0018, t01=0x001c}
0x25c6…25f8 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT«, t00=0x0018, t01=0x0050}
0x25f8…2604 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0082}
0x2604…260e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x008e}
0x260e…261c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0098}
0x261c…263c Head {h00=0x001c, h01=0x0050, text=»* IF ANY KEY-LOCK: «, t00=0x0018, t01=0x00a6}
0x263c…2646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00c6}
0x2646…2684 Head {h00=0x003a, h01=0x0050, text=»* RESET "CHANGED-KEY" FLAG AND MAKE KEY-CHARACTER«, t00=0x0018, t01=0x00d0}
0x2684…26be Head {h00=0x0036, h01=0x0050, text=»* OF FLAG. STORE KEY-CHARACTER IN ECB-BUFFER.«, t00=0x0018, t01=0x010e}
0x26be…26fe Head {h00=0x003c, h01=0x0050, text=»* IN CASE OF STANDARD OR NUMERIC READ MAKE ECB-CODE«, t00=0x0018, t01=0x0148}
0x26fe…2728 Head {h00=0x0026, h01=0x0050, text=»* AND END I/O. ELSE CONTINUE.«, t00=0x0018, t01=0x0188}
0x2728…2732 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0022}
0x2732…273c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x002c}
0x273c…2750 Head {h00=0x0010, h01=0x0050, text=»AKB210 EQU *«, t00=0x0019, t01=0x0036}
0x2750…2776 Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY KEY-LOCK? «, t00=0x0019, t01=0x004a}
0x2776…2788 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0019, t01=0x0070}
0x2788…279e Head {h00=0x0012, h01=0x0050, text=» RF(Z) AKB219 «, t00=0x0019, t01=0x0082}
0x279e…27b0 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0019, t01=0x0098}
0x27b0…27c2 Head {h00=0x000e, h01=0x0050, text=» SRN A2,A4«, t00=0x0019, t01=0x00aa}
0x27c2…27d4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0019, t01=0x00bc}
0x27d4…27e6 Head {h00=0x000e, h01=0x0050, text=» CWK A4,3 «, t00=0x0019, t01=0x00ce}
0x27e6…27fc Head {h00=0x0012, h01=0x0050, text=» RF(N) AKB212 «, t00=0x0019, t01=0x00e0}
0x27fc…2812 Head {h00=0x0012, h01=0x0050, text=» RF(P) AKB211 «, t00=0x0019, t01=0x00f6}
0x2812…2824 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0019, t01=0x010c}
0x2824…2836 Head {h00=0x000e, h01=0x0050, text=» RF AKB212«, t00=0x0019, t01=0x011e}
0x2836…284e Head {h00=0x0014, h01=0x0050, text=»AKB211 ADR A4,A4«, t00=0x0019, t01=0x0130}
0x284e…2880 Head {h00=0x002e, h01=0x0050, text=»AKB212 XRS A4,DWTST,A6 RESET OLD KEY-FLAG «, t00=0x0019, t01=0x0148}
0x2880…2892 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0019, t01=0x017a}
0x2892…28a4 Head {h00=0x000e, h01=0x0050, text=» SLL A4,4 «, t00=0x0019, t01=0x018c}
0x28a4…28bc Head {h00=0x0014, h01=0x0050, text=» AN A4,DWTST,A6 «, t00=0x001a, t01=0x000e}
0x28bc…28d8 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 SAVE A4 «, t00=0x001a, t01=0x0026}
0x28d8…28ec Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x001a, t01=0x0042}
0x28ec…2906 Head {h00=0x0016, h01=0x0050, text=» SRN A2,A3 ORDER 1«, t00=0x001a, t01=0x0056}
0x2906…292c Head {h00=0x0022, h01=0x0050, text=» ADR A3,A3 MAKE CHARACTER FLAG«, t00=0x001a, t01=0x0070}
0x292c…293e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x001a, t01=0x0096}
0x293e…2956 Head {h00=0x0014, h01=0x0050, text=» RF(NE) AKB213 «, t00=0x001a, t01=0x00a8}
0x2956…2968 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x001a, t01=0x00c0}
0x2968…2982 Head {h00=0x0016, h01=0x0050, text=»AKB213 ADK A3,/70 «, t00=0x001a, t01=0x00d2}
0x2982…2994 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x001a, t01=0x00ec}
0x2994…29a8 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x001a, t01=0x00fe}
0x29a8…29d6 Head {h00=0x002a, h01=0x0050, text=» CF A15,STORE STORE KEY IN ECB BUFFER «, t00=0x001a, t01=0x0112}
0x29d6…29f6 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A15 RESTORE A4 «, t00=0x001a, t01=0x0140}
0x29f6…2a08 Head {h00=0x000e, h01=0x0050, text=» CWK A7,1 «, t00=0x001a, t01=0x0160}
0x2a08…2a30 Head {h00=0x0024, h01=0x0050, text=» RF(E) AKB307 JUMP IF BASIC READ«, t00=0x001a, t01=0x0172}
0x2a30…2a56 Head {h00=0x0022, h01=0x0050, text=»AKB214 NGR A2,A1 MAKE ECB CODE«, t00=0x001b, t01=0x000a}
0x2a56…2a72 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 KEY FLAG «, t00=0x001b, t01=0x0030}
0x2a72…2a88 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB215 «, t00=0x001b, t01=0x004c}
0x2a88…2a9a Head {h00=0x000e, h01=0x0050, text=» SUK A2,4 «, t00=0x001b, t01=0x0062}
0x2a9a…2aca Head {h00=0x002c, h01=0x0050, text=»AKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB «, t00=0x001b, t01=0x0074}
0x2aca…2ae4 Head {h00=0x0016, h01=0x0050, text=»AKB218 ABL AKB380 «, t00=0x001b, t01=0x00a4}
0x2ae4…2b10 Head {h00=0x0028, h01=0x0050, text=»AKB219 LD A2,4,A8 REQUESTED LENGTH=0«, t00=0x001b, t01=0x00be}
0x2b10…2b2c Head {h00=0x0018, h01=0x0050, text=»AKB220 ABL(E) AKB380«, t00=0x001b, t01=0x00ea}
0x2b2c…2b52 Head {h00=0x0022, h01=0x0050, text=»AKB225 LDR A3,A3 FIRTST RIME? «, t00=0x001b, t01=0x0106}
0x2b52…2b6c Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB240 N0!«, t00=0x001b, t01=0x012c}
0x2b6c…2b8e Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A8 BUFFER ADDRESS«, t00=0x001b, t01=0x0146}
0x2b8e…2ba0 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001b, t01=0x0168}
0x2ba0…2bb2 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x001b, t01=0x017a}
0x2bb2…2bdc Head {h00=0x0026, h01=0x0050, text=»AKB230 SCR A3,A1 CLEAR ECB BUFFER «, t00=0x001b, t01=0x018c}
0x2bdc…2bee Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001c, t01=0x0026}
0x2bee…2c00 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x001c, t01=0x0038}
0x2c00…2c16 Head {h00=0x0012, h01=0x0050, text=» RB(NE) AKB230«, t00=0x001c, t01=0x004a}
0x2c16…2c2a Head {h00=0x0010, h01=0x0050, text=»AKB240 EQU *«, t00=0x001c, t01=0x0060}
0x2c2a…2c42 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTUTQ,A6«, t00=0x001c, t01=0x0074}
0x2c42…2c54 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x001c, t01=0x008c}
0x2c54…2c6c Head {h00=0x0014, h01=0x0050, text=»AKB245 LDR A4,A2«, t00=0x001c, t01=0x009e}
0x2c6c…2c8a Head {h00=0x001a, h01=0x0050, text=» XRK A4,/FF OVERFLOW? «, t00=0x001c, t01=0x00b6}
0x2c8a…2ca4 Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB250 N0!«, t00=0x001c, t01=0x00d4}
0x2ca4…2cc2 Head {h00=0x001a, h01=0x0050, text=»AKB247 SCR A4,A1 YES! «, t00=0x001c, t01=0x00ee}
0x2cc2…2ce6 Head {h00=0x0020, h01=0x0050, text=» LDK A1,OVMASK OVERFLOW SET «, t00=0x001c, t01=0x010c}
0x2ce6…2d00 Head {h00=0x0016, h01=0x0050, text=» ABL ENDIX END I/O«, t00=0x001c, t01=0x0130}
0x2d00…2d32 Head {h00=0x002e, h01=0x0050, text=»AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE?«, t00=0x001c, t01=0x014a}
0x2d32…2d4a Head {h00=0x0014, h01=0x0050, text=» RF(NE) AKB255 «, t00=0x001c, t01=0x017c}
0x2d4a…2d70 (29, 0, 400) Head {h00=0x0022, h01=0x0050, text=» CF A5,STREG NOTHING IN QUEUE «, t00=0x001d, t01=0x0004}
0x2d70…2d86 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001d, t01=0x002a}
0x2d86…2db4 Head {h00=0x002a, h01=0x0050, text=» LDR A1,A1 CHECK TIME OUT RETURN CODE «, t00=0x001d, t01=0x0040}
0x2db4…2dd6 Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB257 NO TIME OUT «, t00=0x001d, t01=0x006e}
0x2dd6…2dfe Head {h00=0x0024, h01=0x0050, text=» ABL ENDI05 END I/O AT TIME OUT «, t00=0x001d, t01=0x0090}
0x2dfe…2e0a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00b8}
0x2e0a…2e20 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=0 «, t00=0x001d, t01=0x00c4}
0x2e20…2e32 Head {h00=0x000e, h01=0x0050, text=» RF AKB257«, t00=0x001d, t01=0x00da}
0x2e32…2e3e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00ec}
0x2e3e…2e6c Head {h00=0x002a, h01=0x0050, text=»AKB255 CF A15,EOQUEU NEXT OUT POINTER «, t00=0x001d, t01=0x00f8}
0x2e6c…2e96 Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW POINTER«, t00=0x001d, t01=0x0126}
0x2e96…2eaa Head {h00=0x0010, h01=0x0050, text=»AKB257 EQU *«, t00=0x001d, t01=0x0150}
0x2eaa…2ebc Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x0164}
0x2ebc…2ece Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x001d, t01=0x0176}
0x2ece…2ef2 Head {h00=0x0020, h01=0x0050, text=» RF(NN) AKB310 ORDER 2 OR 3 «, t00=0x001d, t01=0x0188}
0x2ef2…2f00 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x001c}
0x2f00…2f0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x002a}
0x2f0a…2f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0034}
0x2f14…2f34 Head {h00=0x001c, h01=0x0050, text=»* ORDER 1 BASIC READ«, t00=0x001e, t01=0x003e}
0x2f34…2f3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x005e}
0x2f3e…2f48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0068}
0x2f48…2f52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0072}
0x2f52…2f8c Head {h00=0x0036, h01=0x0050, text=»AKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER «, t00=0x001e, t01=0x007c}
0x2f8c…2fa0 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x001e, t01=0x00b6}
0x2fa0…2fb4 Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x001e, t01=0x00ca}
0x2fb4…2fc0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00de}
0x2fc0…2fda Head {h00=0x0016, h01=0x0050, text=»AKB307 CW A3,4,A8 «, t00=0x001e, t01=0x00ea}
0x2fda…300a Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB380 END I/O IF REQ=EFF LENGTH «, t00=0x001e, t01=0x0104}
0x300a…302c Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 MORE KEYS?«, t00=0x001e, t01=0x0134}
0x302c…303e Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001e, t01=0x0156}
0x303e…3054 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AKB210«, t00=0x001e, t01=0x0168}
0x3054…3066 Head {h00=0x000e, h01=0x0050, text=» RB AKB225«, t00=0x001e, t01=0x017e}
0x3066…3074 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0190}
0x3074…307e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x000e}
0x307e…3088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0018}
0x3088…3092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0022}
0x3092…30ca Head {h00=0x0034, h01=0x0050, text=»* ORDER 2 OR 3 STANDARD AND NUMERIC READ «, t00=0x001f, t01=0x002c}
0x30ca…30d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0064}
0x30d4…311a Head {h00=0x0042, h01=0x0050, text=»* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) «, t00=0x001f, t01=0x006e}
0x311a…3124 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00b4}
0x3124…312e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00be}
0x312e…3138 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c8}
0x3138…3142 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00d2}
0x3142…3156 Head {h00=0x0010, h01=0x0050, text=»AKB310 EQU *«, t00=0x001f, t01=0x00dc}
0x3156…317c Head {h00=0x0022, h01=0x0050, text=» LD A1,10,A8 KEY-TABLE ADDRESS«, t00=0x001f, t01=0x00f0}
0x317c…319e Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB360 NO KEY-TABLE«, t00=0x001f, t01=0x0116}
0x319e…31c8 Head {h00=0x0026, h01=0x0050, text=» LCR A4,A1 KEY-TABLE LENGTH IN A4 «, t00=0x001f, t01=0x0138}
0x31c8…31dc Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x001f, t01=0x0162}
0x31dc…3206 Head {h00=0x0026, h01=0x0050, text=» ADR A1,A4 LAST PLACE IN KEY-TABLE«, t00=0x001f, t01=0x0176}
0x3206…3218 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0020, t01=0x0010}
0x3218…3230 Head {h00=0x0014, h01=0x0050, text=»AKB355 SUK A4,1 «, t00=0x0020, t01=0x0022}
0x3230…3260 Head {h00=0x002c, h01=0x0050, text=» RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE«, t00=0x0020, t01=0x003a}
0x3260…327a Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 NEXT KEY«, t00=0x0020, t01=0x006a}
0x327a…3292 Head {h00=0x0014, h01=0x0050, text=» CCR A2,A1 EOR? «, t00=0x0020, t01=0x0084}
0x3292…32ac Head {h00=0x0016, h01=0x0050, text=» RB(NE) AKB355 NO!«, t00=0x0020, t01=0x009c}
0x32ac…32be Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0020, t01=0x00b6}
0x32be…32ee Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROL WORD«, t00=0x0020, t01=0x00c8}
0x32ee…3314 Head {h00=0x0022, h01=0x0050, text=» CF A15,STORE STORE CHARACTER «, t00=0x0020, t01=0x00f8}
0x3314…3328 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0020, t01=0x011e}
0x3328…3352 Head {h00=0x0026, h01=0x0050, text=» ORK A2,/80 INDICATE EOR-CHARACTER«, t00=0x0020, t01=0x0132}
0x3352…3378 Head {h00=0x0022, h01=0x0050, text=» CF A5,ECHO ECHO EOR-CHARACTER«, t00=0x0020, t01=0x015c}
0x3378…3384 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0182}
0x3384…3396 Head {h00=0x000e, h01=0x0050, text=» RF AKB380«, t00=0x0020, t01=0x018e}
0x3396…33aa Head {h00=0x0010, h01=0x0050, text=»AKB360 EQU *«, t00=0x0021, t01=0x0010}
0x33aa…33bc Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0021, t01=0x0024}
0x33bc…33d4 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBMZ2,A6 «, t00=0x0021, t01=0x0036}
0x33d4…33ea Head {h00=0x0012, h01=0x0050, text=» RF(E) KBMZ20 «, t00=0x0021, t01=0x004e}
0x33ea…3402 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBMZ3,A6 «, t00=0x0021, t01=0x0064}
0x3402…3418 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBMZ30 «, t00=0x0021, t01=0x007c}
0x3418…3430 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBBSP,A6 «, t00=0x0021, t01=0x0092}
0x3430…3446 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBSP10 «, t00=0x0021, t01=0x00aa}
0x3446…345e Head {h00=0x0014, h01=0x0050, text=» CC A4,KBCLR,A6 «, t00=0x0021, t01=0x00c0}
0x345e…3474 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBCL10 «, t00=0x0021, t01=0x00d8}
0x3474…34a4 Head {h00=0x002c, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN BUFFER «, t00=0x0021, t01=0x00ee}
0x34a4…34b6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0021, t01=0x011e}
0x34b6…34e2 Head {h00=0x0028, h01=0x0050, text=» SUK A4,/20 CHEC CONVERTED CHARACTER«, t00=0x0021, t01=0x0130}
0x34e2…3506 Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB364 LESS THAN /20 «, t00=0x0021, t01=0x015c}
0x3506…352a Head {h00=0x0020, h01=0x0050, text=» SUK A4,/5F CHARACTER > /7F «, t00=0x0021, t01=0x0180}
0x352a…3544 Head {h00=0x0016, h01=0x0050, text=» RF(P) AKB364 YES «, t00=0x0022, t01=0x0014}
0x3544…3556 Head {h00=0x000e, h01=0x0050, text=» CWK A7,2 «, t00=0x0022, t01=0x002e}
0x3556…357e Head {h00=0x0024, h01=0x0050, text=» RF(E) AKB366 STANDARD READ OK «, t00=0x0022, t01=0x0040}
0x357e…3592 Head {h00=0x0010, h01=0x0050, text=» ADK A4,/4F «, t00=0x0022, t01=0x0068}
0x3592…35a8 Head {h00=0x0012, h01=0x0050, text=» RF(N) AKB364 «, t00=0x0022, t01=0x007c}
0x35a8…35ba Head {h00=0x000e, h01=0x0050, text=» SUK A4,/A«, t00=0x0022, t01=0x0092}
0x35ba…35e0 Head {h00=0x0022, h01=0x0050, text=» RF(N) AKB366 NUMERIC READ OK«, t00=0x0022, t01=0x00a4}
0x35e0…3602 Head {h00=0x001e, h01=0x0050, text=»AKB364 LDK A1,4 ERROR CODE«, t00=0x0022, t01=0x00ca}
0x3602…3614 Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0022, t01=0x00ec}
0x3614…3628 Head {h00=0x0010, h01=0x0050, text=»AKB366 EQU *«, t00=0x0022, t01=0x00fe}
0x3628…363c Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0022, t01=0x0112}
0x363c…3650 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0022, t01=0x0126}
0x3650…3664 Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x0022, t01=0x013a}
0x3664…3670 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x014e}
0x3670…3694 Head {h00=0x0020, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW?«, t00=0x0022, t01=0x015a}
0x3694…36ba Head {h00=0x0022, h01=0x0050, text=»AKB367 ABL(L) AKB210 NO RETURN«, t00=0x0022, t01=0x017e}
0x36ba…36e4 Head {h00=0x0026, h01=0x0050, text=»AKB368 LDK A1,8 YES SET ERROR CODE«, t00=0x0023, t01=0x0014}
0x36e4…36fe Head {h00=0x0016, h01=0x0050, text=» RF ENDIO END I/O «, t00=0x0023, t01=0x003e}
0x36fe…370c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0058}
0x370c…372e Head {h00=0x001e, h01=0x0050, text=»KBMZ30 EQU * TRIPPLE ZERO «, t00=0x0023, t01=0x0066}
0x372e…3740 Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x0023, t01=0x0088}
0x3740…3752 Head {h00=0x000e, h01=0x0050, text=» RF KBMZ25«, t00=0x0023, t01=0x009a}
0x3752…3776 Head {h00=0x0020, h01=0x0050, text=»KBMZ20 LDK A4,2 DOUBLE ZERO «, t00=0x0023, t01=0x00ac}
0x3776…3790 Head {h00=0x0016, h01=0x0050, text=»KBMZ25 LDK A2,/30 «, t00=0x0023, t01=0x00d0}
0x3790…37a2 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0023, t01=0x00ea}
0x37a2…37b8 Head {h00=0x0012, h01=0x0050, text=» RB(L) AKB367 «, t00=0x0023, t01=0x00fc}
0x37b8…37ca Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0023, t01=0x0112}
0x37ca…37e0 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0023, t01=0x0124}
0x37e0…37f2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0023, t01=0x013a}
0x37f2…3806 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0023, t01=0x014c}
0x3806…381a Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x0023, t01=0x0160}
0x381a…3826 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0174}
0x3826…383a Head {h00=0x0010, h01=0x0050, text=» CW A3,4,A8 «, t00=0x0023, t01=0x0180}
0x383a…3850 (36, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RB(L) KBMZ25 «, t00=0x0024, t01=0x0004}
0x3850…3864 Head {h00=0x0010, h01=0x0050, text=»KBMZ27 EQU *«, t00=0x0024, t01=0x001a}
0x3864…3886 Head {h00=0x001e, h01=0x0050, text=» SUK A4,1 ANY MORE ZEROES «, t00=0x0024, t01=0x002e}
0x3886…38ae Head {h00=0x0024, h01=0x0050, text=» RB(L) AKB368 NO,SET RETURN CODE«, t00=0x0024, t01=0x0050}
0x38ae…38ba Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0024, t01=0x0078}
0x38ba…38e8 Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER «, t00=0x0024, t01=0x0084}
0x38e8…38fa Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x0024, t01=0x00b2}
0x38fa…3920 Head {h00=0x0022, h01=0x0050, text=» CWK A1,DWTSQ FIRST POSITION ?«, t00=0x0024, t01=0x00c4}
0x3920…393a Head {h00=0x0016, h01=0x0050, text=» RF(NE) KBMZ29 NO «, t00=0x0024, t01=0x00ea}
0x393a…396a Head {h00=0x002c, h01=0x0050, text=» LDK A1,DWTEQ GET LAST POSITION IN QUEUE«, t00=0x0024, t01=0x0104}
0x396a…397c Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x0024, t01=0x0134}
0x397c…398e Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0024, t01=0x0146}
0x398e…39a0 Head {h00=0x000e, h01=0x0050, text=» RF KBMZ40«, t00=0x0024, t01=0x0158}
0x39a0…39d6 Head {h00=0x0032, h01=0x0050, text=»KBMZ29 ADR A1,A6 GET PREIOUS POINTER POSITION «, t00=0x0024, t01=0x016a}
0x39d6…39e8 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0025, t01=0x0010}
0x39e8…3a18 Head {h00=0x002c, h01=0x0050, text=»KBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? «, t00=0x0025, t01=0x0022}
0x3a18…3a3c Head {h00=0x0020, h01=0x0050, text=» RF(E) KBMZ90 NO NOT REALY. «, t00=0x0025, t01=0x0052}
0x3a3c…3a70 Head {h00=0x0030, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER «, t00=0x0025, t01=0x0076}
0x3a70…3a9a Head {h00=0x0026, h01=0x0050, text=» LDK A2,/30 STORE ZERO IN CIRKULAR«, t00=0x0025, t01=0x00aa}
0x3a9a…3aba Head {h00=0x001c, h01=0x0050, text=» SCR A2,A1 INPUT BUFFER «, t00=0x0025, t01=0x00d4}
0x3aba…3acc Head {h00=0x000e, h01=0x0050, text=» RB KBMZ27«, t00=0x0025, t01=0x00f4}
0x3acc…3ae0 Head {h00=0x0010, h01=0x0050, text=»KBMZ90 EQU *«, t00=0x0025, t01=0x0106}
0x3ae0…3b0c Head {h00=0x0028, h01=0x0050, text=» LDK A4,/FF INDICATE BUFFER OWERFLOW«, t00=0x0025, t01=0x011a}
0x3b0c…3b1e Head {h00=0x000e, h01=0x0050, text=» SCR A4,A1«, t00=0x0025, t01=0x0146}
0x3b1e…3b46 Head {h00=0x0024, h01=0x0050, text=» ST A1,DWTUTQ,A6 UPPDATE POINTER«, t00=0x0025, t01=0x0158}
0x3b46…3b72 Head {h00=0x0028, h01=0x0050, text=» LDK A1,/A SET RETURN CODE FOR BOTH «, t00=0x0025, t01=0x0180}
0x3b72…3ba4 Head {h00=0x002e, h01=0x0050, text=»ENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS«, t00=0x0026, t01=0x001c}
0x3ba4…3bae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x004e}
0x3bae…3bb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0058}
0x3bb8…3bc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0062}
0x3bc2…3bdc Head {h00=0x0016, h01=0x0050, text=»KBCL10 EQU * CLEAR«, t00=0x0026, t01=0x006c}
0x3bdc…3bee Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0026, t01=0x0086}
0x3bee…3c02 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/18 «, t00=0x0026, t01=0x0098}
0x3c02…3c14 Head {h00=0x000e, h01=0x0050, text=» RB AKB366«, t00=0x0026, t01=0x00ac}
0x3c14…3c1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00be}
0x3c1e…3c28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c8}
0x3c28…3c32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00d2}
0x3c32…3c46 Head {h00=0x0010, h01=0x0050, text=»KBSP10 EQU *«, t00=0x0026, t01=0x00dc}
0x3c46…3c58 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0026, t01=0x00f0}
0x3c58…3c6e Head {h00=0x0012, h01=0x0050, text=» RF(Z) KBSP15 «, t00=0x0026, t01=0x0102}
0x3c6e…3c80 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0026, t01=0x0118}
0x3c80…3cb0 Head {h00=0x002c, h01=0x0050, text=» SUR A2,A2 CLEAR LAST CHAR IN ECB-BUFFER«, t00=0x0026, t01=0x012a}
0x3cb0…3cc6 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0026, t01=0x015a}
0x3cc6…3cd8 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0026, t01=0x0170}
0x3cd8…3cf0 Head {h00=0x0014, h01=0x0050, text=»KBSP15 LDK A2,/8«, t00=0x0026, t01=0x0182}
0x3cf0…3d02 Head {h00=0x000e, h01=0x0050, text=» RB AKB366«, t00=0x0027, t01=0x000a}
0x3d02…3d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x001c}
0x3d0c…3d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0026}
0x3d16…3d3a Head {h00=0x0020, h01=0x0050, text=»AKB380 LDK A1,0 RETURN CODE «, t00=0x0027, t01=0x0030}
0x3d3a…3d48 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0054}
0x3d48…3d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0062}
0x3d52…3d5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x006c}
0x3d5c…3d8c Head {h00=0x002c, h01=0x0050, text=»* THIS IS A COMMON END OF THE DRIVER «, t00=0x0027, t01=0x0076}
0x3d8c…3d96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a6}
0x3d96…3dcc Head {h00=0x0032, h01=0x0050, text=»* SET EFFECTIVE LENGTH AND PERFORM END I/O «, t00=0x0027, t01=0x00b0}
0x3dcc…3df4 Head {h00=0x0024, h01=0x0050, text=»* ON KEYBOARD AND ECHO-DEVICE«, t00=0x0027, t01=0x00e6}
0x3df4…3dfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x010e}
0x3dfe…3e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0118}
0x3e08…3e1c Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0027, t01=0x0122}
0x3e1c…3e26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0136}
0x3e26…3e32 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0027, t01=0x0140}
0x3e32…3e48 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0027, t01=0x014c}
0x3e48…3e60 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x0027, t01=0x0162}
0x3e60…3e8e Head {h00=0x002a, h01=0x0050, text=» RF(E) ENDI05 NO TIMING ON THIS DEVICE«, t00=0x0027, t01=0x017a}
0x3e8e…3eb0 Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x0028, t01=0x0018}
0x3eb0…3ec4 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0028, t01=0x003a}
0x3ec4…3ed0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x004e}
0x3ed0…3eda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x005a}
0x3eda…3f0a Head {h00=0x002c, h01=0x0050, text=»ENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0028, t01=0x0064}
0x3f0a…3f1e Head {h00=0x0010, h01=0x0050, text=»ENDI10 EQU *«, t00=0x0028, t01=0x0094}
0x3f1e…3f28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a8}
0x3f28…3f3c Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0028, t01=0x00b2}
0x3f3c…3f56 Head {h00=0x0016, h01=0x0050, text=» LDR A4,A1 SAVE A1«, t00=0x0028, t01=0x00c6}
0x3f56…3f82 Head {h00=0x0028, h01=0x0050, text=» CF A5,ECHEND END I/O ON ECHO DEVICE«, t00=0x0028, t01=0x00e0}
0x3f82…3fa0 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A4 RESTORE A1 «, t00=0x0028, t01=0x010c}
0x3fa0…3fac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x012a}
0x3fac…3fc0 Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0028, t01=0x0136}
0x3fc0…3fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x014a}
0x3fca…3fd8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0154}
0x3fd8…3fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0162}
0x3fe2…3fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x016c}
0x3fec…3ff6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0176}
0x3ff6…4008 Head {h00=0x000e, h01=0x0050, text=»* IHKB«, t00=0x0028, t01=0x0180}
0x4008…4012 (41, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0004}
0x4012…401c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x000e}
0x401c…4066 Head {h00=0x0046, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER «, t00=0x0029, t01=0x0018}
0x4066…4070 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0062}
0x4070…407a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x006c}
0x407a…4084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0076}
0x4084…4096 Head {h00=0x000e, h01=0x0050, text=»IHKB EQU *«, t00=0x0029, t01=0x0080}
0x4096…40aa Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0029, t01=0x0092}
0x40aa…40d8 Head {h00=0x002a, h01=0x0050, text=» CF A15,KONVER CONVERT INPUT CHARACTER«, t00=0x0029, t01=0x00a6}
0x40d8…40fc Head {h00=0x0020, h01=0x0050, text=» LDR A4,A4 TEST TYPE OF CHAR«, t00=0x0029, t01=0x00d4}
0x40fc…4120 Head {h00=0x0020, h01=0x0050, text=» RF(P) EXIT SHIFT/CTRL/SKIP «, t00=0x0029, t01=0x00f8}
0x4120…413e Head {h00=0x001a, h01=0x0050, text=» RF(N) IHKB12 KEY-LOCK«, t00=0x0029, t01=0x011c}
0x413e…4146 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x013a}
0x4146…416a Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 NORMAL CHAR «, t00=0x0029, t01=0x0142}
0x416a…4180 Head {h00=0x0012, h01=0x0050, text=» IFT KBLOCK=1 «, t00=0x0029, t01=0x0166}
0x4180…4194 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0029, t01=0x017c}
0x4194…41a8 Head {h00=0x0010, h01=0x0050, text=» RF(Z) EXIT «, t00=0x0029, t01=0x0190}
0x41a8…41cc Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 I/O REQUEST?«, t00=0x002a, t01=0x0014}
0x41cc…41d8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0038}
0x41d8…4206 Head {h00=0x002a, h01=0x0050, text=» RF(N) IHKB15 NO READ REQUEST PENDING «, t00=0x002a, t01=0x0044}
0x4206…422c Head {h00=0x0022, h01=0x0050, text=» SLL A3,7 INTERRUPT ALLOWED ? «, t00=0x002a, t01=0x0072}
0x422c…4264 Head {h00=0x0034, h01=0x0050, text=» RF(NN) IHKB15 NO, STORE CHARACTER IN DWT-BUFFER«, t00=0x002a, t01=0x0098}
0x4264…427a Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x002a, t01=0x00d0}
0x427a…4292 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTP,A6 «, t00=0x002a, t01=0x00e6}
0x4292…42c0 Head {h00=0x002a, h01=0x0050, text=» RF(E) IHKB07 NO TIMING ON THIS DEVICE«, t00=0x002a, t01=0x00fe}
0x42c0…42e4 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,-TIME RESTART TIME «, t00=0x002a, t01=0x012c}
0x42e4…42fc Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x002a, t01=0x0150}
0x42fc…4308 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0168}
0x4308…4338 Head {h00=0x002c, h01=0x0050, text=»IHKB07 ABL LDREG RETURN TO READ ROUTINE «, t00=0x002a, t01=0x0174}
0x4338…4368 Head {h00=0x002c, h01=0x0050, text=»IHKB12 CF A15,KEYSET SET KEY CODE IN DWT«, t00=0x002b, t01=0x0014}
0x4368…437a Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x002b, t01=0x0044}
0x437a…439c Head {h00=0x001e, h01=0x0050, text=» RF(Z) EXIT NO KEY CHANGE «, t00=0x002b, t01=0x0056}
0x439c…43b4 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x002b, t01=0x0078}
0x43b4…43e0 Head {h00=0x0028, h01=0x0050, text=» RF(N) EXIT NO READ REQUEST PENDING «, t00=0x002b, t01=0x0090}
0x43e0…43f2 Head {h00=0x000e, h01=0x0050, text=» SLL A3,7 «, t00=0x002b, t01=0x00bc}
0x43f2…441c Head {h00=0x0026, h01=0x0050, text=» RF(NN) EXIT INERRUPT NOT ALLOWED «, t00=0x002b, t01=0x00ce}
0x441c…4448 Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTA3,A6 RESTORE BUFFER INDEX«, t00=0x002b, t01=0x00f8}
0x4448…4460 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x002b, t01=0x0124}
0x4460…4472 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x002b, t01=0x013c}
0x4472…4486 Head {h00=0x0010, h01=0x0050, text=» ABL AKB210 «, t00=0x002b, t01=0x014e}
0x4486…448e Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0162}
0x448e…44ac Head {h00=0x001a, h01=0x0050, text=»IHKB15 LD A1,DWTINQ,A6«, t00=0x002b, t01=0x016a}
0x44ac…44be Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x002b, t01=0x0188}
0x44be…44e4 Head {h00=0x0022, h01=0x0050, text=» XRK A4,/FF ALREADY OVERFLOW? «, t00=0x002c, t01=0x000a}
0x44e4…44fc Head {h00=0x0014, h01=0x0050, text=» RF(E) EXIT YES «, t00=0x002c, t01=0x0030}
0x44fc…450e Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x002c, t01=0x0048}
0x450e…4546 Head {h00=0x0034, h01=0x0050, text=» CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS«, t00=0x002c, t01=0x005a}
0x4546…4568 Head {h00=0x001e, h01=0x0050, text=» CW A1,DWTUTQ,A6 OVERFLOW?«, t00=0x002c, t01=0x0092}
0x4568…4594 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY «, t00=0x002c, t01=0x00b4}
0x4594…45c8 Head {h00=0x0030, h01=0x0050, text=» ORK A2,/FF SET OVERFLOWBIT IN INPUT BUFFER «, t00=0x002c, t01=0x00e0}
0x45c8…45da Head {h00=0x000e, h01=0x0050, text=» RF IHKB30«, t00=0x002c, t01=0x0114}
0x45da…460e Head {h00=0x0030, h01=0x0050, text=»IHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER«, t00=0x002c, t01=0x0126}
0x460e…4626 Head {h00=0x0014, h01=0x0050, text=»IHKB30 SCR A2,A3«, t00=0x002c, t01=0x015a}
0x4626…463c Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x002c, t01=0x0172}
0x463c…4646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0188}
0x4646…4654 (45, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0004}
0x4654…465e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0012}
0x465e…4668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x001c}
0x4668…4672 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0026}
0x4672…4686 Head {h00=0x0010, h01=0x0050, text=»* AKBTUT«, t00=0x002d, t01=0x0030}
0x4686…4690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0044}
0x4690…46ba Head {h00=0x0026, h01=0x0050, text=»* THIS IS THE TIME-OUT ROUTINE«, t00=0x002d, t01=0x004e}
0x46ba…46c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0078}
0x46c4…46ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0082}
0x46ce…46d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x008c}
0x46d8…46ee Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x002d, t01=0x0096}
0x46ee…4702 Head {h00=0x0010, h01=0x0050, text=»AKBTUT EQU *«, t00=0x002d, t01=0x00ac}
0x4702…4728 Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTART DWT-ADDRESS«, t00=0x002d, t01=0x00c0}
0x4728…474c Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 SET RETURNE CODE«, t00=0x002d, t01=0x00e6}
0x474c…4760 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x002d, t01=0x010a}
0x4760…4778 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x002d, t01=0x011e}
0x4778…47a6 Head {h00=0x002a, h01=0x0050, text=» RB(N) EXIT DISPATCH IF NO REQUEST ON «, t00=0x002d, t01=0x0136}
0x47a6…47d6 Head {h00=0x002c, h01=0x0050, text=» RB IHKB07 RESTORE REGISTER AND END I/O «, t00=0x002d, t01=0x0164}
0x47d6…47e2 (46, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0004}
0x47e2…47f0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0010}
0x47f0…47fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x001e}
0x47fa…4804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0028}
0x4804…480e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0032}
0x480e…4818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x003c}
0x4818…482c Head {h00=0x0010, h01=0x0050, text=»* KEYSET «, t00=0x002e, t01=0x0046}
0x482c…4836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x005a}
0x4836…4840 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0064}
0x4840…484a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x006e}
0x484a…487a Head {h00=0x002c, h01=0x0050, text=»* ON ENTRY: A4= NEG KEY-LOCK VALUE «, t00=0x002e, t01=0x0078}
0x487a…4884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00a8}
0x4884…48c8 Head {h00=0x0040, h01=0x0050, text=»* ON EXIT: A3= ZERO IF IF NO CHANGE IN KEYS, ELSE POS «, t00=0x002e, t01=0x00b2}
0x48c8…48d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00f6}
0x48d2…48dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0100}
0x48dc…48f0 Head {h00=0x0010, h01=0x0050, text=»KEYSET EQU *«, t00=0x002e, t01=0x010a}
0x48f0…4904 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x002e, t01=0x011e}
0x4904…491c Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x002e, t01=0x0132}
0x491c…4932 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/100 «, t00=0x002e, t01=0x014a}
0x4932…494a Head {h00=0x0014, h01=0x0050, text=»SET100 SRL A2,1 «, t00=0x002e, t01=0x0160}
0x494a…496e Head {h00=0x0020, h01=0x0050, text=» ADK A4,2 IN A4: 1=OFF 0=ON«, t00=0x002e, t01=0x0178}
0x496e…4984 Head {h00=0x0012, h01=0x0050, text=» RB(N) SET100 «, t00=0x002f, t01=0x000c}
0x4984…49ac Head {h00=0x0024, h01=0x0050, text=» ANR A3,A2 CHEC OLD KEY POSITION«, t00=0x002f, t01=0x0022}
0x49ac…49d2 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SET300 JUMP IF KEY ON «, t00=0x002f, t01=0x004a}
0x49d2…49e4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x002f, t01=0x0070}
0x49e4…49fa Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SET500«, t00=0x002f, t01=0x0082}
0x49fa…4a0c Head {h00=0x000e, h01=0x0050, text=» RF SET400«, t00=0x002f, t01=0x0098}
0x4a0c…4a24 Head {h00=0x0014, h01=0x0050, text=»SET300 LDR A4,A4«, t00=0x002f, t01=0x00aa}
0x4a24…4a3a Head {h00=0x0012, h01=0x0050, text=» RF(Z) SET500 «, t00=0x002f, t01=0x00c2}
0x4a3a…4a58 Head {h00=0x001a, h01=0x0050, text=»SET400 LD A3,DWTST,A6 «, t00=0x002f, t01=0x00d8}
0x4a58…4a6a Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x002f, t01=0x00f6}
0x4a6a…4a7c Head {h00=0x000e, h01=0x0050, text=» SRL A2,4 «, t00=0x002f, t01=0x0108}
0x4a7c…4a8e Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x002f, t01=0x011a}
0x4a8e…4aa6 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x002f, t01=0x012c}
0x4aa6…4ad4 Head {h00=0x002a, h01=0x0050, text=» LDK A3,1 A3=1 IF KEY LOCK HAS CHANGED«, t00=0x002f, t01=0x0144}
0x4ad4…4aee Head {h00=0x0016, h01=0x0050, text=»SET500 LDR* A4,A15«, t00=0x002f, t01=0x0172}
0x4aee…4afe Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x002f, t01=0x018c}
0x4afe…4b0c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x000c}
0x4b0c…4b16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x001a}
0x4b16…4b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0024}
0x4b20…4b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x002e}
0x4b2a…4b3e Head {h00=0x0010, h01=0x0050, text=»* KONVER«, t00=0x0030, t01=0x0038}
0x4b3e…4b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x004c}
0x4b48…4b76 Head {h00=0x002a, h01=0x0050, text=»* KONVER CONVERTS INPUT CHARACTER «, t00=0x0030, t01=0x0056}
0x4b76…4b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0084}
0x4b80…4b8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x008e}
0x4b8a…4bb6 Head {h00=0x0028, h01=0x0050, text=»* ON ENTRY: A2= INPUT CHARACTER «, t00=0x0030, t01=0x0098}
0x4bb6…4bc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00c4}
0x4bc0…4bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00ce}
0x4bca…4bf8 Head {h00=0x002a, h01=0x0050, text=»* ON EXIT: A2=COVERTED CHARACTER «, t00=0x0030, t01=0x00d8}
0x4bf8…4c48 Head {h00=0x004c, h01=0x0050, text=»* A4= NEG IF KEY-LOCK, ZERO IF CHARACTER,POS IF CTRL,SHIFT«, t00=0x0030, t01=0x0106}
0x4c48…4c70 Head {h00=0x0024, h01=0x0050, text=»* A5 IS DESTROYED!«, t00=0x0030, t01=0x0156}
0x4c70…4c7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x017e}
0x4c7a…4c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0188}
0x4c84…4c98 (49, 0, 400) Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0031, t01=0x0004}
0x4c98…4caa Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0031, t01=0x0018}
0x4caa…4cc0 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0031, t01=0x002a}
0x4cc0…4cde Head {h00=0x001a, h01=0x0050, text=» SUK A4,/7C CODE > /7B«, t00=0x0031, t01=0x0040}
0x4cde…4cf8 Head {h00=0x0016, h01=0x0050, text=» RF(NN) KON500 YES«, t00=0x0031, t01=0x005e}
0x4cf8…4d1c Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 RESTORE CHARACTER«, t00=0x0031, t01=0x0078}
0x4d1c…4d28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x009c}
0x4d28…4d64 Head {h00=0x0038, h01=0x0050, text=» STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION«, t00=0x0031, t01=0x00a8}
0x4d64…4d78 Head {h00=0x0010, h01=0x0050, text=» LDR* A5,A6 «, t00=0x0031, t01=0x00e4}
0x4d78…4d8c Head {h00=0x0010, h01=0x0050, text=» SUK A4,/20 «, t00=0x0031, t01=0x00f8}
0x4d8c…4daa Head {h00=0x001a, h01=0x0050, text=» RF(N) KON105 FUNCTION«, t00=0x0031, t01=0x010c}
0x4daa…4dc4 Head {h00=0x0016, h01=0x0050, text=»KON100 SUK A4,/40 «, t00=0x0031, t01=0x012a}
0x4dc4…4de6 Head {h00=0x001e, h01=0x0050, text=» RF(N) KON180 ALFANUMERIC «, t00=0x0031, t01=0x0144}
0x4de6…4e02 Head {h00=0x0018, h01=0x0050, text=» SUK A4,/10 FUNCTION«, t00=0x0031, t01=0x0166}
0x4e02…4e1c Head {h00=0x0016, h01=0x0050, text=» RF(NN) KON110 NO «, t00=0x0031, t01=0x0182}
0x4e1c…4e34 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/40 YES «, t00=0x0032, t01=0x000c}
0x4e34…4e48 Head {h00=0x0010, h01=0x0050, text=»KON105 EQU *«, t00=0x0032, t01=0x0024}
0x4e48…4e5c Head {h00=0x0010, h01=0x0050, text=» ANK A5,/10 «, t00=0x0032, t01=0x0038}
0x4e5c…4e6e Head {h00=0x000e, h01=0x0050, text=» SRL A5,3 «, t00=0x0032, t01=0x004c}
0x4e6e…4e80 Head {h00=0x000e, h01=0x0050, text=» RF KON200«, t00=0x0032, t01=0x005e}
0x4e80…4eae Head {h00=0x002a, h01=0x0050, text=»KON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT «, t00=0x0032, t01=0x0070}
0x4eae…4ecc Head {h00=0x001a, h01=0x0050, text=» RF(N) KON400 KEY-LOCK«, t00=0x0032, t01=0x009e}
0x4ecc…4eea Head {h00=0x001a, h01=0x0050, text=» RF(Z) KON140 SHIFT ON«, t00=0x0032, t01=0x00bc}
0x4eea…4efc Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0032, t01=0x00da}
0x4efc…4f1c Head {h00=0x001c, h01=0x0050, text=» RF(N) KON160 SHIFT OFF «, t00=0x0032, t01=0x00ec}
0x4f1c…4f3c Head {h00=0x001c, h01=0x0050, text=» RF(Z) KON170 CONTROL ON«, t00=0x0032, t01=0x010c}
0x4f3c…4f52 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0032, t01=0x012c}
0x4f52…4f64 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0032, t01=0x0142}
0x4f64…4f86 Head {h00=0x001e, h01=0x0050, text=» RF(N) KON125 CONTROL OFF «, t00=0x0032, t01=0x0154}
0x4f86…4fae Head {h00=0x0024, h01=0x0050, text=» RF(E) KON140 NUMERICAL SHIFT ON«, t00=0x0032, t01=0x0176}
0x4fae…4fd4 Head {h00=0x0022, h01=0x0050, text=» RF KON160 NUMERICAL SHIFT OFF«, t00=0x0033, t01=0x000e}
0x4fd4…4fe0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0034}
0x4fe0…4ff4 Head {h00=0x0010, h01=0x0050, text=»KON125 EQU *«, t00=0x0033, t01=0x0040}
0x4ff4…5012 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,/FFDF UNCTRL «, t00=0x0033, t01=0x0054}
0x5012…502a Head {h00=0x0014, h01=0x0050, text=»KON120 ANR A5,A2«, t00=0x0033, t01=0x0072}
0x502a…504a Head {h00=0x001c, h01=0x0050, text=»KON130 STR A5,A6 DWTCHP «, t00=0x0033, t01=0x008a}
0x504a…505e Head {h00=0x0010, h01=0x0050, text=» LDK A4,/10 «, t00=0x0033, t01=0x00aa}
0x505e…507a Head {h00=0x0018, h01=0x0050, text=» RF KON400 GO HOME! «, t00=0x0033, t01=0x00be}
0x507a…508e Head {h00=0x0010, h01=0x0050, text=»KON140 EQU *«, t00=0x0033, t01=0x00da}
0x508e…50a4 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0033, t01=0x00ee}
0x50a4…50b6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0033, t01=0x0104}
0x50b6…50ca Head {h00=0x0010, h01=0x0050, text=» ANK A4,/10 «, t00=0x0033, t01=0x0116}
0x50ca…50ec Head {h00=0x001e, h01=0x0050, text=» RF(Z) KON145 SHIFT NOT ON«, t00=0x0033, t01=0x012a}
0x50ec…5100 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/90 «, t00=0x0033, t01=0x014c}
0x5100…5112 Head {h00=0x000e, h01=0x0050, text=» RF KON150«, t00=0x0033, t01=0x0160}
0x5112…511e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0172}
0x511e…5132 Head {h00=0x0010, h01=0x0050, text=»KON145 EQU *«, t00=0x0033, t01=0x017e}
0x5132…514c (52, 0, 400) Head {h00=0x0016, h01=0x0050, text=» LDK A2,/10 SHIFT «, t00=0x0034, t01=0x0004}
0x514c…5164 Head {h00=0x0014, h01=0x0050, text=»KON150 ORR A5,A2«, t00=0x0034, t01=0x001e}
0x5164…5176 Head {h00=0x000e, h01=0x0050, text=» RB KON130«, t00=0x0034, t01=0x0036}
0x5176…518a Head {h00=0x0010, h01=0x0050, text=»KON160 EQU *«, t00=0x0034, t01=0x0048}
0x518a…51a0 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0034, t01=0x005c}
0x51a0…51b2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0034, t01=0x0072}
0x51b2…51c6 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/80 «, t00=0x0034, t01=0x0084}
0x51c6…51dc Head {h00=0x0012, h01=0x0050, text=» RF(Z) KON165 «, t00=0x0034, t01=0x0098}
0x51dc…51f2 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FF7F«, t00=0x0034, t01=0x00ae}
0x51f2…5204 Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x00c4}
0x5204…5210 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x00d6}
0x5210…5224 Head {h00=0x0010, h01=0x0050, text=»KON165 EQU *«, t00=0x0034, t01=0x00e2}
0x5224…523a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FFEF«, t00=0x0034, t01=0x00f6}
0x523a…524c Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x010c}
0x524c…525e Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x011e}
0x525e…527c Head {h00=0x001a, h01=0x0050, text=»KON170 LDK A2,/20 CTRL«, t00=0x0034, t01=0x0130}
0x527c…528e Head {h00=0x000e, h01=0x0050, text=» RB KON150«, t00=0x0034, t01=0x014e}
0x528e…52b2 Head {h00=0x0020, h01=0x0050, text=»KON180 SUK A2,/20 FIND INDEX«, t00=0x0034, t01=0x0160}
0x52b2…52c6 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/30 «, t00=0x0034, t01=0x0184}
0x52c6…52d8 Head {h00=0x000e, h01=0x0050, text=» SRL A5,3 «, t00=0x0035, t01=0x0008}
0x52d8…52ea Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0035, t01=0x001a}
0x52ea…5326 Head {h00=0x0038, h01=0x0050, text=»KON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS «, t00=0x0035, t01=0x002c}
0x5326…5338 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x0035, t01=0x0068}
0x5338…534c Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A4 «, t00=0x0035, t01=0x007a}
0x534c…5362 Head {h00=0x0012, h01=0x0050, text=» RF(Z) KON400 «, t00=0x0035, t01=0x008e}
0x5362…5374 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A2«, t00=0x0035, t01=0x00a4}
0x5374…53a2 Head {h00=0x002a, h01=0x0050, text=» LDR* A2,A15 RESTORE A2 AND A15-STACK «, t00=0x0035, t01=0x00b6}
0x53a2…53ce Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET CHARACTER FROM TABLE «, t00=0x0035, t01=0x00e4}
0x53ce…53fc Head {h00=0x002a, h01=0x0050, text=»KON250 LDK A4,0 A4=0 IF NOT KEY-LOCK$$«, t00=0x0035, t01=0x0110}
0x53fc…5412 Head {h00=0x0012, h01=0x0050, text=»KON300 RTN A15«, t00=0x0035, t01=0x013e}
0x5412…544a Head {h00=0x0034, h01=0x0050, text=»KON400 LDR* A2,A15 NO CONVERSION, KEEP CHARACTER«, t00=0x0035, t01=0x0154}
0x544a…545c Head {h00=0x000e, h01=0x0050, text=» RB KON300«, t00=0x0035, t01=0x018c}
0x545c…5472 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0036, t01=0x000e}
0x5472…5486 Head {h00=0x0010, h01=0x0050, text=»KON500 EQU *«, t00=0x0036, t01=0x0024}
0x5486…54a6 Head {h00=0x001c, h01=0x0050, text=» LDR A4,A4 KEY CODE /7C «, t00=0x0036, t01=0x0038}
0x54a6…54c0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) KON600 YES «, t00=0x0036, t01=0x0058}
0x54c0…54ea Head {h00=0x0026, h01=0x0050, text=» LDK A4,1 INDICATE SKIP CHARACTER «, t00=0x0036, t01=0x0072}
0x54ea…54fa Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0036, t01=0x009c}
0x54fa…550e Head {h00=0x0010, h01=0x0050, text=»KON600 EQU *«, t00=0x0036, t01=0x00ac}
0x550e…5520 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A2«, t00=0x0036, t01=0x00c0}
0x5520…5542 Head {h00=0x001e, h01=0x0050, text=» RB KONVER DO START AGAIN «, t00=0x0036, t01=0x00d2}
0x5542…554e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00f4}
0x554e…555c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0100}
0x555c…5566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x010e}
0x5566…559e Head {h00=0x0034, h01=0x0050, text=»* STORE = SUBROUTINE TO STORE A CHARACTER IN «, t00=0x0036, t01=0x0118}
0x559e…55d8 Head {h00=0x0036, h01=0x0050, text=»* ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0036, t01=0x0150}
0x55d8…55e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x018a}
0x55e2…55f8 (55, 0, 400) Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0037, t01=0x0004}
0x55f8…5602 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x001a}
0x5602…5626 Head {h00=0x0020, h01=0x0050, text=»* A2 = CHARACTER TO STORE«, t00=0x0037, t01=0x0024}
0x5626…5644 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x0037, t01=0x0048}
0x5644…564e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0066}
0x564e…5658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0070}
0x5658…566c Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x0037, t01=0x007a}
0x566c…568e Head {h00=0x001e, h01=0x0050, text=» LD A4,2,A8 BUFFER ADDRESS«, t00=0x0037, t01=0x008e}
0x568e…56b2 Head {h00=0x0020, h01=0x0050, text=» ADR A4,A3 ADD BUFFER INDEX «, t00=0x0037, t01=0x00b0}
0x56b2…56de Head {h00=0x0028, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER IN BUFFER«, t00=0x0037, t01=0x00d4}
0x56de…5706 Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0037, t01=0x0100}
0x5706…5720 Head {h00=0x0016, h01=0x0050, text=»STORTN ADKL A15,2 «, t00=0x0037, t01=0x0128}
0x5720…5734 Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x0037, t01=0x0142}
0x5734…5742 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0156}
0x5742…574c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0164}
0x574c…5756 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x016e}
0x5756…5790 Head {h00=0x0036, h01=0x0050, text=»* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER«, t00=0x0037, t01=0x0178}
0x5790…579a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0022}
0x579a…57b0 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0038, t01=0x002c}
0x57b0…57ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0042}
0x57ba…57da Head {h00=0x001c, h01=0x0050, text=»* A1 = QUEUE POINTER «, t00=0x0038, t01=0x004c}
0x57da…57f8 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0038, t01=0x006c}
0x57f8…5802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x008a}
0x5802…5818 Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x0038, t01=0x0094}
0x5818…5822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00aa}
0x5822…5846 Head {h00=0x0020, h01=0x0050, text=»* A1 = NEW QUEUE POINTER «, t00=0x0038, t01=0x00b4}
0x5846…585a Head {h00=0x0010, h01=0x0050, text=»EOQUEU EQU *«, t00=0x0038, t01=0x00d8}
0x585a…586c Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0038, t01=0x00ec}
0x586c…587e Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x0038, t01=0x00fe}
0x587e…58a2 Head {h00=0x0020, h01=0x0050, text=» CWK A1,DWTEQ END OF QUEUE? «, t00=0x0038, t01=0x0110}
0x58a2…58b8 Head {h00=0x0012, h01=0x0050, text=» RF(NE) EOQU10«, t00=0x0038, t01=0x0134}
0x58b8…58e6 Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTSQ SET QUEUE START ADDRESS «, t00=0x0038, t01=0x014a}
0x58e6…58fe Head {h00=0x0014, h01=0x0050, text=»EOQU10 ADR A1,A6«, t00=0x0038, t01=0x0178}
0x58fe…5910 Head {h00=0x000e, h01=0x0050, text=» RB STORTN«, t00=0x0038, t01=0x0190}
0x5910…591c Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0039, t01=0x0012}
0x591c…5920 Head {h00=0x4004, h01=0x0000}
0x5920…5924 00 39 00 1e ┆ 9 ┆
0x5924…592c (58, 1, 8) 20 04 00 00 00 3a 00 04 ┆ : ┆
0x592c…597c (59, 0, 400) 00 14 00 50 5c 43 57 4b 5c 41 32 2c 41 43 4b 30 2b 50 41 52 00 53 00 04 00 0e 00 50 5c 58 49 46 5c 5c 5c 3d 38 20 00 53 00 1c 00 14 00 50 5c 49 46 54 5c 50 36 38 30 35 3d 31 5c 5c 3d 38 00 53 00 2e 00 14 00 50 5c 43 57 4b 5c 41 32 2c 41 43 ┆ P CWK A2,ACK0+PAR S P XIF =8 S P IFT P6805=1 =8 S . P CWK A2,AC┆
0x597c…59cc 4b 30 5c 5c 3d 38 00 53 00 46 00 0e 00 50 5c 58 49 46 5c 5c 5c 3d 38 20 00 53 00 5e 00 12 00 50 5c 52 46 28 4e 45 29 5c 42 52 4d 36 32 30 00 53 00 70 00 06 00 50 2a 20 00 53 00 86 00 16 00 50 2a 5c 41 43 4b 20 2c 20 30 20 52 45 43 45 49 56 ┆K0 =8 S F P XIF =8 S ^ P RF(NE) BRM620 S p P* S P* ACK , 0 RECEIV┆
0x59cc…5a1c 45 44 00 53 00 90 00 06 00 50 2a 20 00 53 00 aa 00 1e 00 50 5c 4c 44 5c 41 31 2c 43 41 43 4b 5c 47 45 54 20 41 43 4b 43 4f 55 4e 54 45 52 00 53 00 b4 00 20 00 50 5c 52 46 28 5a 29 5c 42 52 4d 36 33 30 5c 41 43 4b 2c 30 20 45 58 50 45 43 54 ┆ED S P* S P LD A1,CACK GET ACKCOUNTER S P RF(Z) BRM630 ACK,0 EXPECT┆
0x5a1c…5a6c 45 44 00 53 00 d6 00 10 00 50 42 52 4d 36 31 30 5c 45 51 55 5c 2a 00 53 00 fa 00 1a 00 50 5c 43 46 5c 41 35 2c 54 52 45 4e 51 5c 53 45 4e 44 20 45 4e 51 20 00 53 01 0e 00 26 00 50 5c 43 46 5c 41 35 2c 53 50 54 49 4d 5c 53 54 41 52 54 20 50 ┆ED S PBRM610 EQU * S P CF A5,TRENQ SEND ENQ S & P CF A5,SPTIM START P┆
0x5a6c…5abc 52 4f 43 45 44 55 52 45 20 54 49 4d 45 52 00 53 01 2c 00 0e 00 50 5c 52 42 5c 42 52 4d 34 31 30 00 53 01 56 00 10 00 50 42 52 4d 36 32 30 5c 45 51 55 5c 2a 00 53 01 68 00 10 00 50 5c 43 57 4b 5c 41 32 2c 41 43 4b 31 00 53 01 7c 00 12 00 50 ┆ROCEDURE TIMER S , P RB BRM410 S V PBRM620 EQU * S h P CWK A2,ACK1 S | P┆
0x5abc…5b0c (60, 0, 400) 5c 52 46 28 4e 45 29 5c 42 52 4d 36 35 30 00 53 01 90 00 06 00 50 2a 20 00 54 00 16 00 16 00 50 2a 5c 41 43 4b 20 2c 20 31 20 52 45 43 45 49 56 45 44 00 54 00 20 00 06 00 50 2a 20 00 54 00 3a 00 20 00 50 5c 4c 44 5c 41 31 2c 43 41 43 4b 5c ┆ RF(NE) BRM650 S P* T P* ACK , 1 RECEIVED T P* T : P LD A1,CACK ┆
0x5b0c…5b5c 47 45 54 20 41 43 4b 20 43 4f 55 4e 54 45 52 20 00 54 00 44 00 24 00 50 5c 52 42 28 5a 29 5c 42 52 4d 36 31 30 5c 41 43 4b 2c 31 20 4e 4f 54 20 45 58 50 45 43 54 45 44 00 54 00 68 00 10 00 50 42 52 4d 36 33 30 5c 45 51 55 5c 2a 00 54 00 90 ┆GET ACK COUNTER T D $ P RB(Z) BRM610 ACK,1 NOT EXPECTED T h PBRM630 EQU * T ┆
0x5b5c…5bac 00 10 00 50 5c 4c 44 5c 41 31 2c 58 45 54 58 20 00 54 00 a4 00 1e 00 50 5c 52 46 28 5a 29 5c 42 52 4d 36 34 30 5c 45 54 58 20 4e 4f 54 20 53 45 4e 54 00 54 00 b8 00 0a 00 50 5c 45 4a 45 43 54 00 54 00 da 00 06 00 50 2a 20 00 54 00 e8 00 2c ┆ P LD A1,XETX T P RF(Z) BRM640 ETX NOT SENT T P EJECT T P* T ,┆
0x5bac…5bfc 00 50 2a 5c 41 43 4b 20 48 41 53 20 42 45 45 4e 20 52 45 43 45 49 56 45 44 20 54 4f 20 41 4e 20 45 54 58 20 42 4c 4f 43 4b 20 00 54 00 f2 00 06 00 50 2a 20 00 54 01 22 00 16 00 50 5c 4c 44 4b 5c 41 31 2c 30 5c 53 45 54 20 52 43 3d 30 00 54 ┆ P* ACK HAS BEEN RECEIVED TO AN ETX BLOCK T P* T " P LDK A1,0 SET RC=0 T┆
0x5bfc…5c4c 01 2c 00 10 00 50 42 52 4d 36 33 35 5c 45 51 55 5c 2a 00 54 01 46 00 10 00 50 5c 49 46 46 5c 53 54 41 54 3d 30 20 00 54 01 5a 00 10 00 50 5c 4c 44 5c 41 32 2c 58 53 54 41 20 00 54 01 6e 00 2e 00 50 5c 52 46 28 4e 5a 29 5c 42 52 4d 36 37 30 ┆ , PBRM635 EQU * T F P IFF STAT=0 T Z P LD A2,XSTA T n . P RF(NZ) BRM670┆