|
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: 23632 (0x5c50)
Notes: pts_type(SC)
Names: »DRKB03.SC«
└─⟦245262b9f⟧ Bits:30009679 Philips computer tape "600220"
└─⟦this⟧ »M:92NA/DRKB03.SC«
└─⟦9ad21746d⟧ Bits:30009682 Philips computer tape "600304"
└─⟦this⟧ »M:92NA/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 40 NUMBER OF BYTES IN DECIMAL FORM * * * TIME BEFORE TIME OUT * TIME EQU 2400 TIMEOUT CONSTANT DK * EJECT * * **************************************** * CONDITIONAL ASSEMBLY * **************************************** * * TIME OUT FUNCTION MAY BE EXCLUDED BY * SETTING X:A = 0. * X:A EQU 0 CTIMUT EQU 1 * * ECHO FUNCTION MAY BE EXCLUDED BY * SETTING X:B = 0. * X:B EQU 1 CECHO EQU 1 * * 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 040 * * * MMU KEY TABLE SIZE * * X:K EQU 10 DVBKTB EQU 40 * 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 40 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…1118 Head {h00=0x0026, h01=0x0050, text=»TIME EQU 2400 TIMEOUT CONSTANT DK «, t00=0x000a, t01=0x0154}
0x1118…1122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x017e}
0x1122…1130 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0188}
0x1130…113a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0008}
0x113a…1144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0012}
0x1144…1174 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000b, t01=0x001c}
0x1174…11a4 Head {h00=0x002c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000b, t01=0x004c}
0x11a4…11d4 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000b, t01=0x007c}
0x11d4…11de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ac}
0x11de…1210 Head {h00=0x002e, h01=0x0050, text=»* TIME OUT FUNCTION MAY BE EXCLUDED BY «, t00=0x000b, t01=0x00b6}
0x1210…122e Head {h00=0x001a, h01=0x0050, text=»* SETTING X:A = 0. «, t00=0x000b, t01=0x00e8}
0x122e…1238 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0106}
0x1238…124a Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000b, t01=0x0110}
0x124a…125e Head {h00=0x0010, h01=0x0050, text=»CTIMUT EQU 1«, t00=0x000b, t01=0x0122}
0x125e…1268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0136}
0x1268…1296 Head {h00=0x002a, h01=0x0050, text=»* ECHO FUNCTION MAY BE EXCLUDED BY «, t00=0x000b, t01=0x0140}
0x1296…12b4 Head {h00=0x001a, h01=0x0050, text=»* SETTING X:B = 0. «, t00=0x000b, t01=0x016e}
0x12b4…12be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018c}
0x12be…12d0 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000c, t01=0x0008}
0x12d0…12e4 Head {h00=0x0010, h01=0x0050, text=»CECHO EQU 1 «, t00=0x000c, t01=0x001a}
0x12e4…12ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x002e}
0x12ee…1330 Head {h00=0x003e, h01=0x0050, text=»* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION «, t00=0x000c, t01=0x0038}
0x1330…135a Head {h00=0x0026, h01=0x0050, text=»* IS INCLUDED IN THE DRIVER. «, t00=0x000c, t01=0x007a}
0x135a…139a Head {h00=0x003c, h01=0x0050, text=»* IF THERE IS A READ REQUEST THIS IS COMPLETED WITH«, t00=0x000c, t01=0x00a4}
0x139a…13ca Head {h00=0x002c, h01=0x0050, text=»* ZERO IN THE CONTROL WORD OF ECB. «, t00=0x000c, t01=0x00e4}
0x13ca…140e Head {h00=0x0040, h01=0x0050, text=»* IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST «, t00=0x000c, t01=0x0114}
0x140e…1452 Head {h00=0x0040, h01=0x0050, text=»* AFTER POWER ON IS COMPLETED WITH ZERO IN CONTROL WORD«, t00=0x000c, t01=0x0158}
0x1452…1468 Head {h00=0x0012, h01=0x0050, text=»* OF ECB «, t00=0x000d, t01=0x000c}
0x1468…1472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0022}
0x1472…147c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x002c}
0x147c…148e Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000d, t01=0x0036}
0x148e…14a2 Head {h00=0x0010, h01=0x0050, text=»POWOFF EQU 1«, t00=0x000d, t01=0x0048}
0x14a2…14ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005c}
0x14ac…14b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0066}
0x14b6…14c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0070}
0x14c0…1512 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=0x007a}
0x1512…1524 Head {h00=0x000e, h01=0x0050, text=»X:H EQU 0 «, t00=0x000d, t01=0x00cc}
0x1524…1538 Head {h00=0x0010, h01=0x0050, text=»NSHIFT EQU 1«, t00=0x000d, t01=0x00de}
0x1538…1542 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f2}
0x1542…154c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fc}
0x154c…1592 Head {h00=0x0042, h01=0x0050, text=»* BY SETTING X:I = 1 KEYBOARD IS LOCKED IF NO KEYLOCK ON. «, t00=0x000d, t01=0x0106}
0x1592…15a4 Head {h00=0x000e, h01=0x0050, text=»X:I EQU 0 «, t00=0x000d, t01=0x014c}
0x15a4…15b8 Head {h00=0x0010, h01=0x0050, text=»KBLOCK EQU 1«, t00=0x000d, t01=0x015e}
0x15b8…15c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0172}
0x15c2…15cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017c}
0x15cc…15fe Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000d, t01=0x0186}
0x15fe…162c Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000e, t01=0x0028}
0x162c…1636 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0056}
0x1636…164a Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000e, t01=0x0060}
0x164a…1654 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0074}
0x1654…165e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x007e}
0x165e…1698 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000e, t01=0x0088}
0x1698…16ca Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000e, t01=0x00c2}
0x16ca…16d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f4}
0x16d4…16e8 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000e, t01=0x00fe}
0x16e8…16f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0112}
0x16f2…16fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011c}
0x16fc…1718 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x000e, t01=0x0126}
0x1718…1722 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0142}
0x1722…172c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014c}
0x172c…173e Head {h00=0x000e, h01=0x0050, text=»X:J EQU 10«, t00=0x000e, t01=0x0156}
0x173e…1754 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 040«, t00=0x000e, t01=0x0168}
0x1754…175e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x017e}
0x175e…1768 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0188}
0x1768…1786 (15, 0, 400) Head {h00=0x001a, h01=0x0050, text=»* MMU KEY TABLE SIZE«, t00=0x000f, t01=0x0004}
0x1786…1790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0022}
0x1790…179a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x002c}
0x179a…17ac Head {h00=0x000e, h01=0x0050, text=»X:K EQU 10«, t00=0x000f, t01=0x0036}
0x17ac…17c2 Head {h00=0x0012, h01=0x0050, text=»DVBKTB EQU 40 «, t00=0x000f, t01=0x0048}
0x17c2…17cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x005e}
0x17cc…17da Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0068}
0x17da…17e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0076}
0x17e4…17ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0080}
0x17ee…180c Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENT«, t00=0x000f, t01=0x008a}
0x180c…1816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a8}
0x1816…1820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b2}
0x1820…1854 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000f, t01=0x00bc}
0x1854…185e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f0}
0x185e…1874 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000f, t01=0x00fa}
0x1874…188c Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000f, t01=0x0110}
0x188c…1898 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0128}
0x1898…18a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0134}
0x18a2…18b8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x013e}
0x18b8…18d2 Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000f, t01=0x0154}
0x18d2…18de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x016e}
0x18de…18e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017a}
0x18e8…1916 Head {h00=0x002a, h01=0x0050, text=»DWTCON EQU START+/00 CONVERSION TABLE «, t00=0x000f, t01=0x0184}
0x1916…1952 Head {h00=0x0038, h01=0x0050, text=»DWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE«, t00=0x0010, t01=0x0022}
0x1952…198e Head {h00=0x0038, h01=0x0050, text=»DWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE «, t00=0x0010, t01=0x005e}
0x198e…19b8 Head {h00=0x0026, h01=0x0050, text=»DWTSQ EQU START+/1C START OF QUEUE«, t00=0x0010, t01=0x009a}
0x19b8…19e4 Head {h00=0x0028, h01=0x0050, text=»DWTEQ EQU DWTSQ+DWTLNG END OF QUEUE «, t00=0x0010, t01=0x00c4}
0x19e4…19ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f0}
0x19ee…1a1a Head {h00=0x0028, h01=0x0050, text=»* SPECIAL KEYS DEFINED IN DWT «, t00=0x0010, t01=0x00fa}
0x1a1a…1a24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0126}
0x1a24…1a2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0130}
0x1a2e…1a38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x013a}
0x1a38…1a68 Head {h00=0x002c, h01=0x0050, text=»KBBSP EQU START+/14 BACK-SPACE CHARACTER«, t00=0x0010, t01=0x0144}
0x1a68…1a94 Head {h00=0x0028, h01=0x0050, text=»KBCLR EQU START+/15 CLEAR CHARACTER «, t00=0x0010, t01=0x0174}
0x1a94…1ac6 Head {h00=0x002e, h01=0x0050, text=»KBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER «, t00=0x0011, t01=0x0010}
0x1ac6…1ae2 Head {h00=0x0018, h01=0x0050, text=»KBMZ3 EQU START+/16 «, t00=0x0011, t01=0x0042}
0x1ae2…1aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x005e}
0x1aec…1afa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0068}
0x1afa…1b10 Head {h00=0x0012, h01=0x0050, text=»* TABLES «, t00=0x0011, t01=0x0076}
0x1b10…1b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008c}
0x1b1a…1b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0096}
0x1b24…1b4c Head {h00=0x0024, h01=0x0050, text=» DATA DVBKTB MMU KEY TABLE SIZE «, t00=0x0011, t01=0x00a0}
0x1b4c…1b70 Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x00c8}
0x1b70…1b8c Head {h00=0x0018, h01=0x0050, text=» DATA 6 DEVICE INDEX«, t00=0x0011, t01=0x00ec}
0x1b8c…1b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0108}
0x1b96…1baa Head {h00=0x0010, h01=0x0050, text=»KBAD3 EQU * «, t00=0x0011, t01=0x0112}
0x1baa…1bd0 Head {h00=0x0022, h01=0x0050, text=» DATA ACKB ACTIVATION HANDLER «, t00=0x0011, t01=0x0126}
0x1bd0…1bf6 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x014c}
0x1bf6…1c1a Head {h00=0x0020, h01=0x0050, text=» DATA IHKB INTERRUPT HANDLER«, t00=0x0011, t01=0x0172}
0x1c1a…1c30 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x0008}
0x1c30…1c54 Head {h00=0x0020, h01=0x0050, text=» DATA RCKB RECOVERY ROUTINE «, t00=0x0012, t01=0x001e}
0x1c54…1c60 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0042}
0x1c60…1c76 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=0 «, t00=0x0012, t01=0x004e}
0x1c76…1c92 Head {h00=0x0018, h01=0x0050, text=» DATA 0 NO RECOVERY «, t00=0x0012, t01=0x0064}
0x1c92…1c9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0080}
0x1c9e…1ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x008c}
0x1ca8…1cbe Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x0096}
0x1cbe…1ccc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00ac}
0x1ccc…1cde Head {h00=0x000e, h01=0x0050, text=»* RCKB «, t00=0x0012, t01=0x00ba}
0x1cde…1ce8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00cc}
0x1ce8…1d02 Head {h00=0x0016, h01=0x0050, text=»* RECOVERY PART«, t00=0x0012, t01=0x00d6}
0x1d02…1d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f0}
0x1d0c…1d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00fa}
0x1d16…1d28 Head {h00=0x000e, h01=0x0050, text=»RCKB EQU *«, t00=0x0012, t01=0x0104}
0x1d28…1d3e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0012, t01=0x0116}
0x1d3e…1d68 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0012, t01=0x012c}
0x1d68…1d74 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0156}
0x1d74…1d7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0162}
0x1d7e…1d94 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x016c}
0x1d94…1daa Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0012, t01=0x0182}
0x1daa…1dd0 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0013, t01=0x0008}
0x1dd0…1ddc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x002e}
0x1ddc…1de6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003a}
0x1de6…1dfc Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0013, t01=0x0044}
0x1dfc…1e1a Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTST,A6 BUSY? «, t00=0x0013, t01=0x005a}
0x1e1a…1e30 Head {h00=0x0012, h01=0x0050, text=» RF(NN) RCKB10«, t00=0x0013, t01=0x0078}
0x1e30…1e46 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x0013, t01=0x008e}
0x1e46…1e72 Head {h00=0x0028, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER OFF «, t00=0x0013, t01=0x00a4}
0x1e72…1e84 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0013, t01=0x00d0}
0x1e84…1eae Head {h00=0x0026, h01=0x0050, text=»RCKB10 CF A5,LDREGE LOAD REGISTERS«, t00=0x0013, t01=0x00e2}
0x1eae…1ec0 Head {h00=0x000e, h01=0x0050, text=» RF AKB202«, t00=0x0013, t01=0x010c}
0x1ec0…1ecc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x011e}
0x1ecc…1eda Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x012a}
0x1eda…1ee4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0138}
0x1ee4…1eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0142}
0x1eee…1f02 Head {h00=0x0010, h01=0x0050, text=»* ACKB «, t00=0x0013, t01=0x014c}
0x1f02…1f0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0160}
0x1f0c…1f4a Head {h00=0x003a, h01=0x0050, text=»* ACTIVATION PART: CHECS VALIDITY OF ORDERS AND «, t00=0x0013, t01=0x016a}
0x1f4a…1f54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0018}
0x1f54…1f98 Head {h00=0x0040, h01=0x0050, text=»* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER«, t00=0x0014, t01=0x0022}
0x1f98…1fa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0066}
0x1fa2…1fba Head {h00=0x0014, h01=0x0050, text=»* TO THREAT«, t00=0x0014, t01=0x0070}
0x1fba…1fc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0088}
0x1fc4…1fce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0092}
0x1fce…1fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x009c}
0x1fd8…1fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a6}
0x1fe2…1ff4 Head {h00=0x000e, h01=0x0050, text=»ACKB EQU *«, t00=0x0014, t01=0x00b0}
0x1ff4…200a Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/FEFF«, t00=0x0014, t01=0x00c2}
0x200a…2040 Head {h00=0x0032, h01=0x0050, text=» ANS A1,DWTST,A6 RESET INETRRUPT ALLOWED FLAG «, t00=0x0014, t01=0x00d8}
0x2040…2052 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0014, t01=0x010e}
0x2052…2076 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0014, t01=0x0120}
0x2076…2088 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0014, t01=0x0144}
0x2088…20ac Head {h00=0x0020, h01=0x0050, text=» RF(NG) AKB100 ILLEGAL ORDER«, t00=0x0014, t01=0x0156}
0x20ac…20be Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0014, t01=0x017a}
0x20be…20e2 Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB200 ORDER 1,2 OR 3«, t00=0x0014, t01=0x018c}
0x20e2…20f6 Head {h00=0x0010, h01=0x0050, text=» SUK A4,/2D «, t00=0x0015, t01=0x0020}
0x20f6…2114 Head {h00=0x001a, h01=0x0050, text=» RF(Z) AKB110 ORDER 31«, t00=0x0015, t01=0x0034}
0x2114…2142 Head {h00=0x002a, h01=0x0050, text=»AKB100 ORKL A1,/8000 I/0 REQUEST ERROR«, t00=0x0015, t01=0x0052}
0x2142…2156 Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x0015, t01=0x0080}
0x2156…2164 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0094}
0x2164…216e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a2}
0x216e…2178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ac}
0x2178…2182 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b6}
0x2182…21ac Head {h00=0x0026, h01=0x0050, text=»* ORDER 31 RESET INPUT BUFFER«, t00=0x0015, t01=0x00c0}
0x21ac…21b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ea}
0x21b6…21c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f4}
0x21c0…21ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00fe}
0x21ca…21de Head {h00=0x0010, h01=0x0050, text=»AKB110 EQU *«, t00=0x0015, t01=0x0108}
0x21de…21f6 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTINQ,A6«, t00=0x0015, t01=0x011c}
0x21f6…2208 Head {h00=0x000e, h01=0x0050, text=» SCR A1,A2«, t00=0x0015, t01=0x0134}
0x2208…2234 Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE «, t00=0x0015, t01=0x0146}
0x2234…2246 Head {h00=0x000e, h01=0x0050, text=» ABL ENDIO«, t00=0x0015, t01=0x0172}
0x2246…2250 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0184}
0x2250…225e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x018e}
0x225e…2268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x000c}
0x2268…2272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0016}
0x2272…228c Head {h00=0x0016, h01=0x0050, text=»* ORDER 1,2,3«, t00=0x0016, t01=0x0020}
0x228c…2296 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003a}
0x2296…22a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0044}
0x22a0…22aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x004e}
0x22aa…22be Head {h00=0x0010, h01=0x0050, text=»AKB200 EQU *«, t00=0x0016, t01=0x0058}
0x22be…22d4 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0016, t01=0x006c}
0x22d4…22ec Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0016, t01=0x0082}
0x22ec…230c Head {h00=0x001c, h01=0x0050, text=» ANKL A2,/200 POWER OFF?«, t00=0x0016, t01=0x009a}
0x230c…2326 Head {h00=0x0016, h01=0x0050, text=» RF(E) AKB205 NO! «, t00=0x0016, t01=0x00ba}
0x2326…2352 Head {h00=0x0028, h01=0x0050, text=» XRS A2,DWTST,A6 RESET POWER OFF BIT«, t00=0x0016, t01=0x00d4}
0x2352…2366 Head {h00=0x0010, h01=0x0050, text=»AKB202 EQU *«, t00=0x0016, t01=0x0100}
0x2366…23a2 Head {h00=0x0038, h01=0x0050, text=» CWK A7,1 IF BASIC READ DON'T COMPLEATE THE REQUEST «, t00=0x0016, t01=0x0114}
0x23a2…23b8 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB205 «, t00=0x0016, t01=0x0150}
0x23b8…23dc Head {h00=0x0020, h01=0x0050, text=» CM 10,A8 INDICATE POWER OFF«, t00=0x0016, t01=0x0166}
0x23dc…23ee Head {h00=0x000e, h01=0x0050, text=» RF AKB218«, t00=0x0016, t01=0x018a}
0x23ee…23fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x000c}
0x23fa…240e Head {h00=0x0010, h01=0x0050, text=»AKB205 EQU *«, t00=0x0017, t01=0x0018}
0x240e…2424 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0017, t01=0x002c}
0x2424…2438 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A6 «, t00=0x0017, t01=0x0042}
0x2438…2454 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/40 TIMING? «, t00=0x0017, t01=0x0056}
0x2454…2484 Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB210 NO TIMING FOR THIS DEVICE!«, t00=0x0017, t01=0x0072}
0x2484…24b4 Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTTP,A6 CHECK IF ALREADY TIMING «, t00=0x0017, t01=0x00a2}
0x24b4…24ca Head {h00=0x0012, h01=0x0050, text=» RF(E) AKBTIM «, t00=0x0017, t01=0x00d2}
0x24ca…24e0 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,-TIME«, t00=0x0017, t01=0x00e8}
0x24e0…24f8 Head {h00=0x0014, h01=0x0050, text=» ST* A4,DWTTP,A6«, t00=0x0017, t01=0x00fe}
0x24f8…250a Head {h00=0x000e, h01=0x0050, text=» RF AKB210«, t00=0x0017, t01=0x0116}
0x250a…251e Head {h00=0x0010, h01=0x0050, text=»AKBTIM EQU *«, t00=0x0017, t01=0x0128}
0x251e…2542 Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTTP TIMER POINTER«, t00=0x0017, t01=0x013c}
0x2542…2564 Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT-ADDRESS«, t00=0x0017, t01=0x0160}
0x2564…2576 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0017, t01=0x0182}
0x2576…2596 (24, 0, 400) Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIME «, t00=0x0018, t01=0x0004}
0x2596…25ca Head {h00=0x0030, h01=0x0050, text=» DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME «, t00=0x0018, t01=0x0024}
0x25ca…25fc Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT«, t00=0x0018, t01=0x0058}
0x25fc…2608 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x008a}
0x2608…2612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0096}
0x2612…2620 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00a0}
0x2620…2640 Head {h00=0x001c, h01=0x0050, text=»* IF ANY KEY-LOCK: «, t00=0x0018, t01=0x00ae}
0x2640…264a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ce}
0x264a…2688 Head {h00=0x003a, h01=0x0050, text=»* RESET "CHANGED-KEY" FLAG AND MAKE KEY-CHARACTER«, t00=0x0018, t01=0x00d8}
0x2688…26c2 Head {h00=0x0036, h01=0x0050, text=»* OF FLAG. STORE KEY-CHARACTER IN ECB-BUFFER.«, t00=0x0018, t01=0x0116}
0x26c2…2702 Head {h00=0x003c, h01=0x0050, text=»* IN CASE OF STANDARD OR NUMERIC READ MAKE ECB-CODE«, t00=0x0018, t01=0x0150}
0x2702…272c Head {h00=0x0026, h01=0x0050, text=»* AND END I/O. ELSE CONTINUE.«, t00=0x0018, t01=0x0190}
0x272c…2736 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x002a}
0x2736…2740 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0034}
0x2740…2754 Head {h00=0x0010, h01=0x0050, text=»AKB210 EQU *«, t00=0x0019, t01=0x003e}
0x2754…277a Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY KEY-LOCK? «, t00=0x0019, t01=0x0052}
0x277a…278c Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0019, t01=0x0078}
0x278c…27a2 Head {h00=0x0012, h01=0x0050, text=» RF(Z) AKB219 «, t00=0x0019, t01=0x008a}
0x27a2…27b4 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0019, t01=0x00a0}
0x27b4…27c6 Head {h00=0x000e, h01=0x0050, text=» SRN A2,A4«, t00=0x0019, t01=0x00b2}
0x27c6…27d8 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0019, t01=0x00c4}
0x27d8…27ea Head {h00=0x000e, h01=0x0050, text=» CWK A4,3 «, t00=0x0019, t01=0x00d6}
0x27ea…2800 Head {h00=0x0012, h01=0x0050, text=» RF(N) AKB212 «, t00=0x0019, t01=0x00e8}
0x2800…2816 Head {h00=0x0012, h01=0x0050, text=» RF(P) AKB211 «, t00=0x0019, t01=0x00fe}
0x2816…2828 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0019, t01=0x0114}
0x2828…283a Head {h00=0x000e, h01=0x0050, text=» RF AKB212«, t00=0x0019, t01=0x0126}
0x283a…2852 Head {h00=0x0014, h01=0x0050, text=»AKB211 ADR A4,A4«, t00=0x0019, t01=0x0138}
0x2852…2884 Head {h00=0x002e, h01=0x0050, text=»AKB212 XRS A4,DWTST,A6 RESET OLD KEY-FLAG «, t00=0x0019, t01=0x0150}
0x2884…2896 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0019, t01=0x0182}
0x2896…28a8 (26, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SLL A4,4 «, t00=0x001a, t01=0x0004}
0x28a8…28c0 Head {h00=0x0014, h01=0x0050, text=» AN A4,DWTST,A6 «, t00=0x001a, t01=0x0016}
0x28c0…28dc Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 SAVE A4 «, t00=0x001a, t01=0x002e}
0x28dc…28f0 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x001a, t01=0x004a}
0x28f0…290a Head {h00=0x0016, h01=0x0050, text=» SRN A2,A3 ORDER 1«, t00=0x001a, t01=0x005e}
0x290a…2930 Head {h00=0x0022, h01=0x0050, text=» ADR A3,A3 MAKE CHARACTER FLAG«, t00=0x001a, t01=0x0078}
0x2930…2942 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x001a, t01=0x009e}
0x2942…295a Head {h00=0x0014, h01=0x0050, text=» RF(NE) AKB213 «, t00=0x001a, t01=0x00b0}
0x295a…296c Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x001a, t01=0x00c8}
0x296c…2986 Head {h00=0x0016, h01=0x0050, text=»AKB213 ADK A3,/70 «, t00=0x001a, t01=0x00da}
0x2986…2998 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x001a, t01=0x00f4}
0x2998…29ac Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x001a, t01=0x0106}
0x29ac…29da Head {h00=0x002a, h01=0x0050, text=» CF A15,STORE STORE KEY IN ECB BUFFER «, t00=0x001a, t01=0x011a}
0x29da…29fa Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A15 RESTORE A4 «, t00=0x001a, t01=0x0148}
0x29fa…2a0c Head {h00=0x000e, h01=0x0050, text=» CWK A7,1 «, t00=0x001a, t01=0x0168}
0x2a0c…2a34 Head {h00=0x0024, h01=0x0050, text=» RF(E) AKB307 JUMP IF BASIC READ«, t00=0x001a, t01=0x017a}
0x2a34…2a5a Head {h00=0x0022, h01=0x0050, text=»AKB214 NGR A2,A1 MAKE ECB CODE«, t00=0x001b, t01=0x0012}
0x2a5a…2a76 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 KEY FLAG «, t00=0x001b, t01=0x0038}
0x2a76…2a8c Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB215 «, t00=0x001b, t01=0x0054}
0x2a8c…2a9e Head {h00=0x000e, h01=0x0050, text=» SUK A2,4 «, t00=0x001b, t01=0x006a}
0x2a9e…2ace Head {h00=0x002c, h01=0x0050, text=»AKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB «, t00=0x001b, t01=0x007c}
0x2ace…2ae8 Head {h00=0x0016, h01=0x0050, text=»AKB218 ABL AKB380 «, t00=0x001b, t01=0x00ac}
0x2ae8…2b14 Head {h00=0x0028, h01=0x0050, text=»AKB219 LD A2,4,A8 REQUESTED LENGTH=0«, t00=0x001b, t01=0x00c6}
0x2b14…2b30 Head {h00=0x0018, h01=0x0050, text=»AKB220 ABL(E) AKB380«, t00=0x001b, t01=0x00f2}
0x2b30…2b56 Head {h00=0x0022, h01=0x0050, text=»AKB225 LDR A3,A3 FIRTST RIME? «, t00=0x001b, t01=0x010e}
0x2b56…2b70 Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB240 N0!«, t00=0x001b, t01=0x0134}
0x2b70…2b92 Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A8 BUFFER ADDRESS«, t00=0x001b, t01=0x014e}
0x2b92…2ba4 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001b, t01=0x0170}
0x2ba4…2bb6 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x001b, t01=0x0182}
0x2bb6…2be0 (28, 0, 400) Head {h00=0x0026, h01=0x0050, text=»AKB230 SCR A3,A1 CLEAR ECB BUFFER «, t00=0x001c, t01=0x0004}
0x2be0…2bf2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001c, t01=0x002e}
0x2bf2…2c04 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x001c, t01=0x0040}
0x2c04…2c1a Head {h00=0x0012, h01=0x0050, text=» RB(NE) AKB230«, t00=0x001c, t01=0x0052}
0x2c1a…2c2e Head {h00=0x0010, h01=0x0050, text=»AKB240 EQU *«, t00=0x001c, t01=0x0068}
0x2c2e…2c46 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTUTQ,A6«, t00=0x001c, t01=0x007c}
0x2c46…2c58 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x001c, t01=0x0094}
0x2c58…2c70 Head {h00=0x0014, h01=0x0050, text=»AKB245 LDR A4,A2«, t00=0x001c, t01=0x00a6}
0x2c70…2c8e Head {h00=0x001a, h01=0x0050, text=» XRK A4,/FF OVERFLOW? «, t00=0x001c, t01=0x00be}
0x2c8e…2ca8 Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB250 N0!«, t00=0x001c, t01=0x00dc}
0x2ca8…2cc6 Head {h00=0x001a, h01=0x0050, text=»AKB247 SCR A4,A1 YES! «, t00=0x001c, t01=0x00f6}
0x2cc6…2cea Head {h00=0x0020, h01=0x0050, text=» LDK A1,OVMASK OVERFLOW SET «, t00=0x001c, t01=0x0114}
0x2cea…2d04 Head {h00=0x0016, h01=0x0050, text=» ABL ENDIX END I/O«, t00=0x001c, t01=0x0138}
0x2d04…2d36 Head {h00=0x002e, h01=0x0050, text=»AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE?«, t00=0x001c, t01=0x0152}
0x2d36…2d4e Head {h00=0x0014, h01=0x0050, text=» RF(NE) AKB255 «, t00=0x001c, t01=0x0184}
0x2d4e…2d74 Head {h00=0x0022, h01=0x0050, text=» CF A5,STREG NOTHING IN QUEUE «, t00=0x001d, t01=0x000c}
0x2d74…2d8a Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001d, t01=0x0032}
0x2d8a…2db8 Head {h00=0x002a, h01=0x0050, text=» LDR A1,A1 CHECK TIME OUT RETURN CODE «, t00=0x001d, t01=0x0048}
0x2db8…2dda Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB257 NO TIME OUT «, t00=0x001d, t01=0x0076}
0x2dda…2e02 Head {h00=0x0024, h01=0x0050, text=» ABL ENDI05 END I/O AT TIME OUT «, t00=0x001d, t01=0x0098}
0x2e02…2e0e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00c0}
0x2e0e…2e24 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=0 «, t00=0x001d, t01=0x00cc}
0x2e24…2e36 Head {h00=0x000e, h01=0x0050, text=» RF AKB257«, t00=0x001d, t01=0x00e2}
0x2e36…2e42 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00f4}
0x2e42…2e70 Head {h00=0x002a, h01=0x0050, text=»AKB255 CF A15,EOQUEU NEXT OUT POINTER «, t00=0x001d, t01=0x0100}
0x2e70…2e9a Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW POINTER«, t00=0x001d, t01=0x012e}
0x2e9a…2eae Head {h00=0x0010, h01=0x0050, text=»AKB257 EQU *«, t00=0x001d, t01=0x0158}
0x2eae…2ec0 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x016c}
0x2ec0…2ed2 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x001d, t01=0x017e}
0x2ed2…2ef6 Head {h00=0x0020, h01=0x0050, text=» RF(NN) AKB310 ORDER 2 OR 3 «, t00=0x001d, t01=0x0190}
0x2ef6…2f04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0024}
0x2f04…2f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0032}
0x2f0e…2f18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x003c}
0x2f18…2f38 Head {h00=0x001c, h01=0x0050, text=»* ORDER 1 BASIC READ«, t00=0x001e, t01=0x0046}
0x2f38…2f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0066}
0x2f42…2f4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0070}
0x2f4c…2f56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x007a}
0x2f56…2f90 Head {h00=0x0036, h01=0x0050, text=»AKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER «, t00=0x001e, t01=0x0084}
0x2f90…2fa4 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x001e, t01=0x00be}
0x2fa4…2fb8 Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x001e, t01=0x00d2}
0x2fb8…2fc4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00e6}
0x2fc4…2fde Head {h00=0x0016, h01=0x0050, text=»AKB307 CW A3,4,A8 «, t00=0x001e, t01=0x00f2}
0x2fde…300e Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB380 END I/O IF REQ=EFF LENGTH «, t00=0x001e, t01=0x010c}
0x300e…3030 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 MORE KEYS?«, t00=0x001e, t01=0x013c}
0x3030…3042 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001e, t01=0x015e}
0x3042…3058 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AKB210«, t00=0x001e, t01=0x0170}
0x3058…306a Head {h00=0x000e, h01=0x0050, text=» RB AKB225«, t00=0x001e, t01=0x0186}
0x306a…3078 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0008}
0x3078…3082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0016}
0x3082…308c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0020}
0x308c…3096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x002a}
0x3096…30ce Head {h00=0x0034, h01=0x0050, text=»* ORDER 2 OR 3 STANDARD AND NUMERIC READ «, t00=0x001f, t01=0x0034}
0x30ce…30d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x006c}
0x30d8…311e Head {h00=0x0042, h01=0x0050, text=»* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) «, t00=0x001f, t01=0x0076}
0x311e…3128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00bc}
0x3128…3132 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c6}
0x3132…313c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00d0}
0x313c…3146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00da}
0x3146…315a Head {h00=0x0010, h01=0x0050, text=»AKB310 EQU *«, t00=0x001f, t01=0x00e4}
0x315a…3180 Head {h00=0x0022, h01=0x0050, text=» LD A1,10,A8 KEY-TABLE ADDRESS«, t00=0x001f, t01=0x00f8}
0x3180…31a2 Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB360 NO KEY-TABLE«, t00=0x001f, t01=0x011e}
0x31a2…31cc Head {h00=0x0026, h01=0x0050, text=» LCR A4,A1 KEY-TABLE LENGTH IN A4 «, t00=0x001f, t01=0x0140}
0x31cc…31e0 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x001f, t01=0x016a}
0x31e0…320a Head {h00=0x0026, h01=0x0050, text=» ADR A1,A4 LAST PLACE IN KEY-TABLE«, t00=0x001f, t01=0x017e}
0x320a…321c Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0020, t01=0x0018}
0x321c…3234 Head {h00=0x0014, h01=0x0050, text=»AKB355 SUK A4,1 «, t00=0x0020, t01=0x002a}
0x3234…3264 Head {h00=0x002c, h01=0x0050, text=» RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE«, t00=0x0020, t01=0x0042}
0x3264…327e Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 NEXT KEY«, t00=0x0020, t01=0x0072}
0x327e…3296 Head {h00=0x0014, h01=0x0050, text=» CCR A2,A1 EOR? «, t00=0x0020, t01=0x008c}
0x3296…32b0 Head {h00=0x0016, h01=0x0050, text=» RB(NE) AKB355 NO!«, t00=0x0020, t01=0x00a4}
0x32b0…32c2 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0020, t01=0x00be}
0x32c2…32f2 Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROL WORD«, t00=0x0020, t01=0x00d0}
0x32f2…3318 Head {h00=0x0022, h01=0x0050, text=» CF A15,STORE STORE CHARACTER «, t00=0x0020, t01=0x0100}
0x3318…332c Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0020, t01=0x0126}
0x332c…3356 Head {h00=0x0026, h01=0x0050, text=» ORK A2,/80 INDICATE EOR-CHARACTER«, t00=0x0020, t01=0x013a}
0x3356…337c Head {h00=0x0022, h01=0x0050, text=» CF A5,ECHO ECHO EOR-CHARACTER«, t00=0x0020, t01=0x0164}
0x337c…3388 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x018a}
0x3388…339a Head {h00=0x000e, h01=0x0050, text=» RF AKB380«, t00=0x0021, t01=0x0008}
0x339a…33ae Head {h00=0x0010, h01=0x0050, text=»AKB360 EQU *«, t00=0x0021, t01=0x001a}
0x33ae…33c0 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0021, t01=0x002e}
0x33c0…33d8 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBMZ2,A6 «, t00=0x0021, t01=0x0040}
0x33d8…33ee Head {h00=0x0012, h01=0x0050, text=» RF(E) KBMZ20 «, t00=0x0021, t01=0x0058}
0x33ee…3406 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBMZ3,A6 «, t00=0x0021, t01=0x006e}
0x3406…341c Head {h00=0x0012, h01=0x0050, text=» RF(E) KBMZ30 «, t00=0x0021, t01=0x0086}
0x341c…3434 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBBSP,A6 «, t00=0x0021, t01=0x009c}
0x3434…344a Head {h00=0x0012, h01=0x0050, text=» RF(E) KBSP10 «, t00=0x0021, t01=0x00b4}
0x344a…3462 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBCLR,A6 «, t00=0x0021, t01=0x00ca}
0x3462…3478 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBCL10 «, t00=0x0021, t01=0x00e2}
0x3478…34a8 Head {h00=0x002c, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN BUFFER «, t00=0x0021, t01=0x00f8}
0x34a8…34ba Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0021, t01=0x0128}
0x34ba…34e6 Head {h00=0x0028, h01=0x0050, text=» SUK A4,/20 CHEC CONVERTED CHARACTER«, t00=0x0021, t01=0x013a}
0x34e6…350a Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB364 LESS THAN /20 «, t00=0x0021, t01=0x0166}
0x350a…352e Head {h00=0x0020, h01=0x0050, text=» SUK A4,/5F CHARACTER > /7F «, t00=0x0021, t01=0x018a}
0x352e…3548 Head {h00=0x0016, h01=0x0050, text=» RF(P) AKB364 YES «, t00=0x0022, t01=0x001e}
0x3548…355a Head {h00=0x000e, h01=0x0050, text=» CWK A7,2 «, t00=0x0022, t01=0x0038}
0x355a…3582 Head {h00=0x0024, h01=0x0050, text=» RF(E) AKB366 STANDARD READ OK «, t00=0x0022, t01=0x004a}
0x3582…3596 Head {h00=0x0010, h01=0x0050, text=» ADK A4,/4F «, t00=0x0022, t01=0x0072}
0x3596…35ac Head {h00=0x0012, h01=0x0050, text=» RF(N) AKB364 «, t00=0x0022, t01=0x0086}
0x35ac…35be Head {h00=0x000e, h01=0x0050, text=» SUK A4,/A«, t00=0x0022, t01=0x009c}
0x35be…35e4 Head {h00=0x0022, h01=0x0050, text=» RF(N) AKB366 NUMERIC READ OK«, t00=0x0022, t01=0x00ae}
0x35e4…3606 Head {h00=0x001e, h01=0x0050, text=»AKB364 LDK A1,4 ERROR CODE«, t00=0x0022, t01=0x00d4}
0x3606…3618 Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0022, t01=0x00f6}
0x3618…362c Head {h00=0x0010, h01=0x0050, text=»AKB366 EQU *«, t00=0x0022, t01=0x0108}
0x362c…3640 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0022, t01=0x011c}
0x3640…3654 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0022, t01=0x0130}
0x3654…3668 Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x0022, t01=0x0144}
0x3668…3674 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0158}
0x3674…3698 Head {h00=0x0020, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW?«, t00=0x0022, t01=0x0164}
0x3698…36be Head {h00=0x0022, h01=0x0050, text=»AKB367 ABL(L) AKB210 NO RETURN«, t00=0x0022, t01=0x0188}
0x36be…36e8 Head {h00=0x0026, h01=0x0050, text=»AKB368 LDK A1,8 YES SET ERROR CODE«, t00=0x0023, t01=0x001e}
0x36e8…3702 Head {h00=0x0016, h01=0x0050, text=» RF ENDIO END I/O «, t00=0x0023, t01=0x0048}
0x3702…3710 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0062}
0x3710…3732 Head {h00=0x001e, h01=0x0050, text=»KBMZ30 EQU * TRIPPLE ZERO «, t00=0x0023, t01=0x0070}
0x3732…3744 Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x0023, t01=0x0092}
0x3744…3756 Head {h00=0x000e, h01=0x0050, text=» RF KBMZ25«, t00=0x0023, t01=0x00a4}
0x3756…377a Head {h00=0x0020, h01=0x0050, text=»KBMZ20 LDK A4,2 DOUBLE ZERO «, t00=0x0023, t01=0x00b6}
0x377a…3794 Head {h00=0x0016, h01=0x0050, text=»KBMZ25 LDK A2,/30 «, t00=0x0023, t01=0x00da}
0x3794…37a6 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0023, t01=0x00f4}
0x37a6…37bc Head {h00=0x0012, h01=0x0050, text=» RB(L) AKB367 «, t00=0x0023, t01=0x0106}
0x37bc…37ce Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0023, t01=0x011c}
0x37ce…37e4 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0023, t01=0x012e}
0x37e4…37f6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0023, t01=0x0144}
0x37f6…380a Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0023, t01=0x0156}
0x380a…381e Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x0023, t01=0x016a}
0x381e…382a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x017e}
0x382a…383e Head {h00=0x0010, h01=0x0050, text=» CW A3,4,A8 «, t00=0x0023, t01=0x018a}
0x383e…3854 Head {h00=0x0012, h01=0x0050, text=» RB(L) KBMZ25 «, t00=0x0024, t01=0x000e}
0x3854…3868 Head {h00=0x0010, h01=0x0050, text=»KBMZ27 EQU *«, t00=0x0024, t01=0x0024}
0x3868…388a Head {h00=0x001e, h01=0x0050, text=» SUK A4,1 ANY MORE ZEROES «, t00=0x0024, t01=0x0038}
0x388a…38b2 Head {h00=0x0024, h01=0x0050, text=» RB(L) AKB368 NO,SET RETURN CODE«, t00=0x0024, t01=0x005a}
0x38b2…38be Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0024, t01=0x0082}
0x38be…38ec Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER «, t00=0x0024, t01=0x008e}
0x38ec…38fe Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x0024, t01=0x00bc}
0x38fe…3924 Head {h00=0x0022, h01=0x0050, text=» CWK A1,DWTSQ FIRST POSITION ?«, t00=0x0024, t01=0x00ce}
0x3924…393e Head {h00=0x0016, h01=0x0050, text=» RF(NE) KBMZ29 NO «, t00=0x0024, t01=0x00f4}
0x393e…396e Head {h00=0x002c, h01=0x0050, text=» LDK A1,DWTEQ GET LAST POSITION IN QUEUE«, t00=0x0024, t01=0x010e}
0x396e…3980 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x0024, t01=0x013e}
0x3980…3992 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0024, t01=0x0150}
0x3992…39a4 Head {h00=0x000e, h01=0x0050, text=» RF KBMZ40«, t00=0x0024, t01=0x0162}
0x39a4…39da Head {h00=0x0032, h01=0x0050, text=»KBMZ29 ADR A1,A6 GET PREIOUS POINTER POSITION «, t00=0x0024, t01=0x0174}
0x39da…39ec Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0025, t01=0x001a}
0x39ec…3a1c Head {h00=0x002c, h01=0x0050, text=»KBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? «, t00=0x0025, t01=0x002c}
0x3a1c…3a40 Head {h00=0x0020, h01=0x0050, text=» RF(E) KBMZ90 NO NOT REALY. «, t00=0x0025, t01=0x005c}
0x3a40…3a74 Head {h00=0x0030, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER «, t00=0x0025, t01=0x0080}
0x3a74…3a9e Head {h00=0x0026, h01=0x0050, text=» LDK A2,/30 STORE ZERO IN CIRKULAR«, t00=0x0025, t01=0x00b4}
0x3a9e…3abe Head {h00=0x001c, h01=0x0050, text=» SCR A2,A1 INPUT BUFFER «, t00=0x0025, t01=0x00de}
0x3abe…3ad0 Head {h00=0x000e, h01=0x0050, text=» RB KBMZ27«, t00=0x0025, t01=0x00fe}
0x3ad0…3ae4 Head {h00=0x0010, h01=0x0050, text=»KBMZ90 EQU *«, t00=0x0025, t01=0x0110}
0x3ae4…3b10 Head {h00=0x0028, h01=0x0050, text=» LDK A4,/FF INDICATE BUFFER OWERFLOW«, t00=0x0025, t01=0x0124}
0x3b10…3b22 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A1«, t00=0x0025, t01=0x0150}
0x3b22…3b4a Head {h00=0x0024, h01=0x0050, text=» ST A1,DWTUTQ,A6 UPPDATE POINTER«, t00=0x0025, t01=0x0162}
0x3b4a…3b76 Head {h00=0x0028, h01=0x0050, text=» LDK A1,/A SET RETURN CODE FOR BOTH «, t00=0x0025, t01=0x018a}
0x3b76…3ba8 Head {h00=0x002e, h01=0x0050, text=»ENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS«, t00=0x0026, t01=0x0026}
0x3ba8…3bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0058}
0x3bb2…3bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0062}
0x3bbc…3bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006c}
0x3bc6…3be0 Head {h00=0x0016, h01=0x0050, text=»KBCL10 EQU * CLEAR«, t00=0x0026, t01=0x0076}
0x3be0…3bf2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0026, t01=0x0090}
0x3bf2…3c06 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/18 «, t00=0x0026, t01=0x00a2}
0x3c06…3c18 Head {h00=0x000e, h01=0x0050, text=» RB AKB366«, t00=0x0026, t01=0x00b6}
0x3c18…3c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c8}
0x3c22…3c2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00d2}
0x3c2c…3c36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00dc}
0x3c36…3c4a Head {h00=0x0010, h01=0x0050, text=»KBSP10 EQU *«, t00=0x0026, t01=0x00e6}
0x3c4a…3c5c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0026, t01=0x00fa}
0x3c5c…3c72 Head {h00=0x0012, h01=0x0050, text=» RF(Z) KBSP15 «, t00=0x0026, t01=0x010c}
0x3c72…3c84 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0026, t01=0x0122}
0x3c84…3cb4 Head {h00=0x002c, h01=0x0050, text=» SUR A2,A2 CLEAR LAST CHAR IN ECB-BUFFER«, t00=0x0026, t01=0x0134}
0x3cb4…3cca Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0026, t01=0x0164}
0x3cca…3cdc Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0026, t01=0x017a}
0x3cdc…3cf4 Head {h00=0x0014, h01=0x0050, text=»KBSP15 LDK A2,/8«, t00=0x0026, t01=0x018c}
0x3cf4…3d06 Head {h00=0x000e, h01=0x0050, text=» RB AKB366«, t00=0x0027, t01=0x0014}
0x3d06…3d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0026}
0x3d10…3d1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0030}
0x3d1a…3d3e Head {h00=0x0020, h01=0x0050, text=»AKB380 LDK A1,0 RETURN CODE «, t00=0x0027, t01=0x003a}
0x3d3e…3d4c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x005e}
0x3d4c…3d56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x006c}
0x3d56…3d60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0076}
0x3d60…3d90 Head {h00=0x002c, h01=0x0050, text=»* THIS IS A COMMON END OF THE DRIVER «, t00=0x0027, t01=0x0080}
0x3d90…3d9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b0}
0x3d9a…3dd0 Head {h00=0x0032, h01=0x0050, text=»* SET EFFECTIVE LENGTH AND PERFORM END I/O «, t00=0x0027, t01=0x00ba}
0x3dd0…3df8 Head {h00=0x0024, h01=0x0050, text=»* ON KEYBOARD AND ECHO-DEVICE«, t00=0x0027, t01=0x00f0}
0x3df8…3e02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0118}
0x3e02…3e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0122}
0x3e0c…3e20 Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0027, t01=0x012c}
0x3e20…3e2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0140}
0x3e2a…3e36 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0027, t01=0x014a}
0x3e36…3e4c Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0027, t01=0x0156}
0x3e4c…3e64 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x0027, t01=0x016c}
0x3e64…3e92 Head {h00=0x002a, h01=0x0050, text=» RF(E) ENDI05 NO TIMING ON THIS DEVICE«, t00=0x0027, t01=0x0184}
0x3e92…3eb4 Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x0028, t01=0x0022}
0x3eb4…3ec8 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0028, t01=0x0044}
0x3ec8…3ed4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0058}
0x3ed4…3ede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0064}
0x3ede…3f0e Head {h00=0x002c, h01=0x0050, text=»ENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0028, t01=0x006e}
0x3f0e…3f22 Head {h00=0x0010, h01=0x0050, text=»ENDI10 EQU *«, t00=0x0028, t01=0x009e}
0x3f22…3f2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b2}
0x3f2c…3f40 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0028, t01=0x00bc}
0x3f40…3f5a Head {h00=0x0016, h01=0x0050, text=» LDR A4,A1 SAVE A1«, t00=0x0028, t01=0x00d0}
0x3f5a…3f86 Head {h00=0x0028, h01=0x0050, text=» CF A5,ECHEND END I/O ON ECHO DEVICE«, t00=0x0028, t01=0x00ea}
0x3f86…3fa4 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A4 RESTORE A1 «, t00=0x0028, t01=0x0116}
0x3fa4…3fb0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0134}
0x3fb0…3fc4 Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0028, t01=0x0140}
0x3fc4…3fce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0154}
0x3fce…3fdc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x015e}
0x3fdc…3fe6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x016c}
0x3fe6…3ff0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0176}
0x3ff0…3ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0180}
0x3ffa…400c Head {h00=0x000e, h01=0x0050, text=»* IHKB«, t00=0x0028, t01=0x018a}
0x400c…4016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x000c}
0x4016…4020 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0016}
0x4020…406a Head {h00=0x0046, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER «, t00=0x0029, t01=0x0020}
0x406a…4074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x006a}
0x4074…407e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0074}
0x407e…4088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x007e}
0x4088…409a Head {h00=0x000e, h01=0x0050, text=»IHKB EQU *«, t00=0x0029, t01=0x0088}
0x409a…40ae Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0029, t01=0x009a}
0x40ae…40dc Head {h00=0x002a, h01=0x0050, text=» CF A15,KONVER CONVERT INPUT CHARACTER«, t00=0x0029, t01=0x00ae}
0x40dc…4100 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A4 TEST TYPE OF CHAR«, t00=0x0029, t01=0x00dc}
0x4100…4124 Head {h00=0x0020, h01=0x0050, text=» RF(P) EXIT SHIFT/CTRL/SKIP «, t00=0x0029, t01=0x0100}
0x4124…4142 Head {h00=0x001a, h01=0x0050, text=» RF(N) IHKB12 KEY-LOCK«, t00=0x0029, t01=0x0124}
0x4142…414a Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0142}
0x414a…416e Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 NORMAL CHAR «, t00=0x0029, t01=0x014a}
0x416e…4184 Head {h00=0x0012, h01=0x0050, text=» IFT KBLOCK=1 «, t00=0x0029, t01=0x016e}
0x4184…4198 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0029, t01=0x0184}
0x4198…41ac Head {h00=0x0010, h01=0x0050, text=» RF(Z) EXIT «, t00=0x002a, t01=0x0008}
0x41ac…41d0 Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 I/O REQUEST?«, t00=0x002a, t01=0x001c}
0x41d0…41dc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0040}
0x41dc…420a Head {h00=0x002a, h01=0x0050, text=» RF(N) IHKB15 NO READ REQUEST PENDING «, t00=0x002a, t01=0x004c}
0x420a…4230 Head {h00=0x0022, h01=0x0050, text=» SLL A3,7 INTERRUPT ALLOWED ? «, t00=0x002a, t01=0x007a}
0x4230…4268 Head {h00=0x0034, h01=0x0050, text=» RF(NN) IHKB15 NO, STORE CHARACTER IN DWT-BUFFER«, t00=0x002a, t01=0x00a0}
0x4268…427e Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x002a, t01=0x00d8}
0x427e…4296 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTP,A6 «, t00=0x002a, t01=0x00ee}
0x4296…42c4 Head {h00=0x002a, h01=0x0050, text=» RF(E) IHKB07 NO TIMING ON THIS DEVICE«, t00=0x002a, t01=0x0106}
0x42c4…42e8 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,-TIME RESTART TIME «, t00=0x002a, t01=0x0134}
0x42e8…4300 Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x002a, t01=0x0158}
0x4300…430c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0170}
0x430c…433c Head {h00=0x002c, h01=0x0050, text=»IHKB07 ABL LDREG RETURN TO READ ROUTINE «, t00=0x002a, t01=0x017c}
0x433c…436c Head {h00=0x002c, h01=0x0050, text=»IHKB12 CF A15,KEYSET SET KEY CODE IN DWT«, t00=0x002b, t01=0x001c}
0x436c…437e Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x002b, t01=0x004c}
0x437e…43a0 Head {h00=0x001e, h01=0x0050, text=» RF(Z) EXIT NO KEY CHANGE «, t00=0x002b, t01=0x005e}
0x43a0…43b8 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x002b, t01=0x0080}
0x43b8…43e4 Head {h00=0x0028, h01=0x0050, text=» RF(N) EXIT NO READ REQUEST PENDING «, t00=0x002b, t01=0x0098}
0x43e4…43f6 Head {h00=0x000e, h01=0x0050, text=» SLL A3,7 «, t00=0x002b, t01=0x00c4}
0x43f6…4420 Head {h00=0x0026, h01=0x0050, text=» RF(NN) EXIT INERRUPT NOT ALLOWED «, t00=0x002b, t01=0x00d6}
0x4420…444c Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTA3,A6 RESTORE BUFFER INDEX«, t00=0x002b, t01=0x0100}
0x444c…4464 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x002b, t01=0x012c}
0x4464…4476 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x002b, t01=0x0144}
0x4476…448a Head {h00=0x0010, h01=0x0050, text=» ABL AKB210 «, t00=0x002b, t01=0x0156}
0x448a…4492 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x016a}
0x4492…44b0 Head {h00=0x001a, h01=0x0050, text=»IHKB15 LD A1,DWTINQ,A6«, t00=0x002b, t01=0x0172}
0x44b0…44c2 Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x002b, t01=0x0190}
0x44c2…44e8 Head {h00=0x0022, h01=0x0050, text=» XRK A4,/FF ALREADY OVERFLOW? «, t00=0x002c, t01=0x0012}
0x44e8…4500 Head {h00=0x0014, h01=0x0050, text=» RF(E) EXIT YES «, t00=0x002c, t01=0x0038}
0x4500…4512 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x002c, t01=0x0050}
0x4512…454a Head {h00=0x0034, h01=0x0050, text=» CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS«, t00=0x002c, t01=0x0062}
0x454a…456c Head {h00=0x001e, h01=0x0050, text=» CW A1,DWTUTQ,A6 OVERFLOW?«, t00=0x002c, t01=0x009a}
0x456c…4598 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY «, t00=0x002c, t01=0x00bc}
0x4598…45cc Head {h00=0x0030, h01=0x0050, text=» ORK A2,/FF SET OVERFLOWBIT IN INPUT BUFFER «, t00=0x002c, t01=0x00e8}
0x45cc…45de Head {h00=0x000e, h01=0x0050, text=» RF IHKB30«, t00=0x002c, t01=0x011c}
0x45de…4612 Head {h00=0x0030, h01=0x0050, text=»IHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER«, t00=0x002c, t01=0x012e}
0x4612…462a Head {h00=0x0014, h01=0x0050, text=»IHKB30 SCR A2,A3«, t00=0x002c, t01=0x0162}
0x462a…4640 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x002c, t01=0x017a}
0x4640…464a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0190}
0x464a…4658 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x000a}
0x4658…4662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0018}
0x4662…466c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0022}
0x466c…4676 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x002c}
0x4676…468a Head {h00=0x0010, h01=0x0050, text=»* AKBTUT«, t00=0x002d, t01=0x0036}
0x468a…4694 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x004a}
0x4694…46be Head {h00=0x0026, h01=0x0050, text=»* THIS IS THE TIME-OUT ROUTINE«, t00=0x002d, t01=0x0054}
0x46be…46c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x007e}
0x46c8…46d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0088}
0x46d2…46dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0092}
0x46dc…46f2 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x002d, t01=0x009c}
0x46f2…4706 Head {h00=0x0010, h01=0x0050, text=»AKBTUT EQU *«, t00=0x002d, t01=0x00b2}
0x4706…472c Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTART DWT-ADDRESS«, t00=0x002d, t01=0x00c6}
0x472c…4750 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 SET RETURNE CODE«, t00=0x002d, t01=0x00ec}
0x4750…4764 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x002d, t01=0x0110}
0x4764…477c Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x002d, t01=0x0124}
0x477c…47aa Head {h00=0x002a, h01=0x0050, text=» RB(N) EXIT DISPATCH IF NO REQUEST ON «, t00=0x002d, t01=0x013c}
0x47aa…47da Head {h00=0x002c, h01=0x0050, text=» RB IHKB07 RESTORE REGISTER AND END I/O «, t00=0x002d, t01=0x016a}
0x47da…47e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x000a}
0x47e6…47f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0016}
0x47f4…47fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0024}
0x47fe…4808 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x002e}
0x4808…4812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0038}
0x4812…481c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0042}
0x481c…4830 Head {h00=0x0010, h01=0x0050, text=»* KEYSET «, t00=0x002e, t01=0x004c}
0x4830…483a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0060}
0x483a…4844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x006a}
0x4844…484e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0074}
0x484e…487e Head {h00=0x002c, h01=0x0050, text=»* ON ENTRY: A4= NEG KEY-LOCK VALUE «, t00=0x002e, t01=0x007e}
0x487e…4888 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00ae}
0x4888…48cc Head {h00=0x0040, h01=0x0050, text=»* ON EXIT: A3= ZERO IF IF NO CHANGE IN KEYS, ELSE POS «, t00=0x002e, t01=0x00b8}
0x48cc…48d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00fc}
0x48d6…48e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0106}
0x48e0…48f4 Head {h00=0x0010, h01=0x0050, text=»KEYSET EQU *«, t00=0x002e, t01=0x0110}
0x48f4…4908 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x002e, t01=0x0124}
0x4908…4920 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x002e, t01=0x0138}
0x4920…4936 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/100 «, t00=0x002e, t01=0x0150}
0x4936…494e Head {h00=0x0014, h01=0x0050, text=»SET100 SRL A2,1 «, t00=0x002e, t01=0x0166}
0x494e…4972 Head {h00=0x0020, h01=0x0050, text=» ADK A4,2 IN A4: 1=OFF 0=ON«, t00=0x002e, t01=0x017e}
0x4972…4988 Head {h00=0x0012, h01=0x0050, text=» RB(N) SET100 «, t00=0x002f, t01=0x0012}
0x4988…49b0 Head {h00=0x0024, h01=0x0050, text=» ANR A3,A2 CHEC OLD KEY POSITION«, t00=0x002f, t01=0x0028}
0x49b0…49d6 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SET300 JUMP IF KEY ON «, t00=0x002f, t01=0x0050}
0x49d6…49e8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x002f, t01=0x0076}
0x49e8…49fe Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SET500«, t00=0x002f, t01=0x0088}
0x49fe…4a10 Head {h00=0x000e, h01=0x0050, text=» RF SET400«, t00=0x002f, t01=0x009e}
0x4a10…4a28 Head {h00=0x0014, h01=0x0050, text=»SET300 LDR A4,A4«, t00=0x002f, t01=0x00b0}
0x4a28…4a3e Head {h00=0x0012, h01=0x0050, text=» RF(Z) SET500 «, t00=0x002f, t01=0x00c8}
0x4a3e…4a5c Head {h00=0x001a, h01=0x0050, text=»SET400 LD A3,DWTST,A6 «, t00=0x002f, t01=0x00de}
0x4a5c…4a6e Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x002f, t01=0x00fc}
0x4a6e…4a80 Head {h00=0x000e, h01=0x0050, text=» SRL A2,4 «, t00=0x002f, t01=0x010e}
0x4a80…4a92 Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x002f, t01=0x0120}
0x4a92…4aaa Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x002f, t01=0x0132}
0x4aaa…4ad8 Head {h00=0x002a, h01=0x0050, text=» LDK A3,1 A3=1 IF KEY LOCK HAS CHANGED«, t00=0x002f, t01=0x014a}
0x4ad8…4af2 Head {h00=0x0016, h01=0x0050, text=»SET500 LDR* A4,A15«, t00=0x002f, t01=0x0178}
0x4af2…4b02 (48, 0, 400) Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0030, t01=0x0004}
0x4b02…4b10 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0014}
0x4b10…4b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0022}
0x4b1a…4b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x002c}
0x4b24…4b2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0036}
0x4b2e…4b42 Head {h00=0x0010, h01=0x0050, text=»* KONVER«, t00=0x0030, t01=0x0040}
0x4b42…4b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0054}
0x4b4c…4b7a Head {h00=0x002a, h01=0x0050, text=»* KONVER CONVERTS INPUT CHARACTER «, t00=0x0030, t01=0x005e}
0x4b7a…4b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x008c}
0x4b84…4b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0096}
0x4b8e…4bba Head {h00=0x0028, h01=0x0050, text=»* ON ENTRY: A2= INPUT CHARACTER «, t00=0x0030, t01=0x00a0}
0x4bba…4bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00cc}
0x4bc4…4bce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00d6}
0x4bce…4bfc Head {h00=0x002a, h01=0x0050, text=»* ON EXIT: A2=COVERTED CHARACTER «, t00=0x0030, t01=0x00e0}
0x4bfc…4c4c Head {h00=0x004c, h01=0x0050, text=»* A4= NEG IF KEY-LOCK, ZERO IF CHARACTER,POS IF CTRL,SHIFT«, t00=0x0030, t01=0x010e}
0x4c4c…4c74 Head {h00=0x0024, h01=0x0050, text=»* A5 IS DESTROYED!«, t00=0x0030, t01=0x015e}
0x4c74…4c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0186}
0x4c7e…4c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0190}
0x4c88…4c9c Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0031, t01=0x000a}
0x4c9c…4cae Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0031, t01=0x001e}
0x4cae…4cc4 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0031, t01=0x0030}
0x4cc4…4ce2 Head {h00=0x001a, h01=0x0050, text=» SUK A4,/7C CODE > /7B«, t00=0x0031, t01=0x0046}
0x4ce2…4cfc Head {h00=0x0016, h01=0x0050, text=» RF(NN) KON500 YES«, t00=0x0031, t01=0x0064}
0x4cfc…4d20 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 RESTORE CHARACTER«, t00=0x0031, t01=0x007e}
0x4d20…4d2c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x00a2}
0x4d2c…4d68 Head {h00=0x0038, h01=0x0050, text=» STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION«, t00=0x0031, t01=0x00ae}
0x4d68…4d7c Head {h00=0x0010, h01=0x0050, text=» LDR* A5,A6 «, t00=0x0031, t01=0x00ea}
0x4d7c…4d90 Head {h00=0x0010, h01=0x0050, text=» SUK A4,/20 «, t00=0x0031, t01=0x00fe}
0x4d90…4dae Head {h00=0x001a, h01=0x0050, text=» RF(N) KON105 FUNCTION«, t00=0x0031, t01=0x0112}
0x4dae…4dc8 Head {h00=0x0016, h01=0x0050, text=»KON100 SUK A4,/40 «, t00=0x0031, t01=0x0130}
0x4dc8…4dea Head {h00=0x001e, h01=0x0050, text=» RF(N) KON180 ALFANUMERIC «, t00=0x0031, t01=0x014a}
0x4dea…4e06 Head {h00=0x0018, h01=0x0050, text=» SUK A4,/10 FUNCTION«, t00=0x0031, t01=0x016c}
0x4e06…4e20 Head {h00=0x0016, h01=0x0050, text=» RF(NN) KON110 NO «, t00=0x0031, t01=0x0188}
0x4e20…4e38 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/40 YES «, t00=0x0032, t01=0x0012}
0x4e38…4e4c Head {h00=0x0010, h01=0x0050, text=»KON105 EQU *«, t00=0x0032, t01=0x002a}
0x4e4c…4e60 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/10 «, t00=0x0032, t01=0x003e}
0x4e60…4e72 Head {h00=0x000e, h01=0x0050, text=» SRL A5,3 «, t00=0x0032, t01=0x0052}
0x4e72…4e84 Head {h00=0x000e, h01=0x0050, text=» RF KON200«, t00=0x0032, t01=0x0064}
0x4e84…4eb2 Head {h00=0x002a, h01=0x0050, text=»KON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT «, t00=0x0032, t01=0x0076}
0x4eb2…4ed0 Head {h00=0x001a, h01=0x0050, text=» RF(N) KON400 KEY-LOCK«, t00=0x0032, t01=0x00a4}
0x4ed0…4eee Head {h00=0x001a, h01=0x0050, text=» RF(Z) KON140 SHIFT ON«, t00=0x0032, t01=0x00c2}
0x4eee…4f00 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0032, t01=0x00e0}
0x4f00…4f20 Head {h00=0x001c, h01=0x0050, text=» RF(N) KON160 SHIFT OFF «, t00=0x0032, t01=0x00f2}
0x4f20…4f40 Head {h00=0x001c, h01=0x0050, text=» RF(Z) KON170 CONTROL ON«, t00=0x0032, t01=0x0112}
0x4f40…4f56 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0032, t01=0x0132}
0x4f56…4f68 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0032, t01=0x0148}
0x4f68…4f8a Head {h00=0x001e, h01=0x0050, text=» RF(N) KON125 CONTROL OFF «, t00=0x0032, t01=0x015a}
0x4f8a…4fb2 Head {h00=0x0024, h01=0x0050, text=» RF(E) KON140 NUMERICAL SHIFT ON«, t00=0x0032, t01=0x017c}
0x4fb2…4fd8 Head {h00=0x0022, h01=0x0050, text=» RF KON160 NUMERICAL SHIFT OFF«, t00=0x0033, t01=0x0014}
0x4fd8…4fe4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x003a}
0x4fe4…4ff8 Head {h00=0x0010, h01=0x0050, text=»KON125 EQU *«, t00=0x0033, t01=0x0046}
0x4ff8…5016 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,/FFDF UNCTRL «, t00=0x0033, t01=0x005a}
0x5016…502e Head {h00=0x0014, h01=0x0050, text=»KON120 ANR A5,A2«, t00=0x0033, t01=0x0078}
0x502e…504e Head {h00=0x001c, h01=0x0050, text=»KON130 STR A5,A6 DWTCHP «, t00=0x0033, t01=0x0090}
0x504e…5062 Head {h00=0x0010, h01=0x0050, text=» LDK A4,/10 «, t00=0x0033, t01=0x00b0}
0x5062…507e Head {h00=0x0018, h01=0x0050, text=» RF KON400 GO HOME! «, t00=0x0033, t01=0x00c4}
0x507e…5092 Head {h00=0x0010, h01=0x0050, text=»KON140 EQU *«, t00=0x0033, t01=0x00e0}
0x5092…50a8 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0033, t01=0x00f4}
0x50a8…50ba Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0033, t01=0x010a}
0x50ba…50ce Head {h00=0x0010, h01=0x0050, text=» ANK A4,/10 «, t00=0x0033, t01=0x011c}
0x50ce…50f0 Head {h00=0x001e, h01=0x0050, text=» RF(Z) KON145 SHIFT NOT ON«, t00=0x0033, t01=0x0130}
0x50f0…5104 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/90 «, t00=0x0033, t01=0x0152}
0x5104…5116 Head {h00=0x000e, h01=0x0050, text=» RF KON150«, t00=0x0033, t01=0x0166}
0x5116…5122 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0178}
0x5122…5136 Head {h00=0x0010, h01=0x0050, text=»KON145 EQU *«, t00=0x0033, t01=0x0184}
0x5136…5150 Head {h00=0x0016, h01=0x0050, text=» LDK A2,/10 SHIFT «, t00=0x0034, t01=0x0008}
0x5150…5168 Head {h00=0x0014, h01=0x0050, text=»KON150 ORR A5,A2«, t00=0x0034, t01=0x0022}
0x5168…517a Head {h00=0x000e, h01=0x0050, text=» RB KON130«, t00=0x0034, t01=0x003a}
0x517a…518e Head {h00=0x0010, h01=0x0050, text=»KON160 EQU *«, t00=0x0034, t01=0x004c}
0x518e…51a4 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0034, t01=0x0060}
0x51a4…51b6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0034, t01=0x0076}
0x51b6…51ca Head {h00=0x0010, h01=0x0050, text=» ANK A4,/80 «, t00=0x0034, t01=0x0088}
0x51ca…51e0 Head {h00=0x0012, h01=0x0050, text=» RF(Z) KON165 «, t00=0x0034, t01=0x009c}
0x51e0…51f6 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FF7F«, t00=0x0034, t01=0x00b2}
0x51f6…5208 Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x00c8}
0x5208…5214 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x00da}
0x5214…5228 Head {h00=0x0010, h01=0x0050, text=»KON165 EQU *«, t00=0x0034, t01=0x00e6}
0x5228…523e Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FFEF«, t00=0x0034, t01=0x00fa}
0x523e…5250 Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x0110}
0x5250…5262 Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x0122}
0x5262…5280 Head {h00=0x001a, h01=0x0050, text=»KON170 LDK A2,/20 CTRL«, t00=0x0034, t01=0x0134}
0x5280…5292 Head {h00=0x000e, h01=0x0050, text=» RB KON150«, t00=0x0034, t01=0x0152}
0x5292…52b6 Head {h00=0x0020, h01=0x0050, text=»KON180 SUK A2,/20 FIND INDEX«, t00=0x0034, t01=0x0164}
0x52b6…52ca Head {h00=0x0010, h01=0x0050, text=» ANK A5,/30 «, t00=0x0034, t01=0x0188}
0x52ca…52dc Head {h00=0x000e, h01=0x0050, text=» SRL A5,3 «, t00=0x0035, t01=0x000c}
0x52dc…52ee Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0035, t01=0x001e}
0x52ee…532a Head {h00=0x0038, h01=0x0050, text=»KON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS «, t00=0x0035, t01=0x0030}
0x532a…533c Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x0035, t01=0x006c}
0x533c…5350 Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A4 «, t00=0x0035, t01=0x007e}
0x5350…5366 Head {h00=0x0012, h01=0x0050, text=» RF(Z) KON400 «, t00=0x0035, t01=0x0092}
0x5366…5378 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A2«, t00=0x0035, t01=0x00a8}
0x5378…53a6 Head {h00=0x002a, h01=0x0050, text=» LDR* A2,A15 RESTORE A2 AND A15-STACK «, t00=0x0035, t01=0x00ba}
0x53a6…53d2 Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET CHARACTER FROM TABLE «, t00=0x0035, t01=0x00e8}
0x53d2…5400 Head {h00=0x002a, h01=0x0050, text=»KON250 LDK A4,0 A4=0 IF NOT KEY-LOCK$$«, t00=0x0035, t01=0x0114}
0x5400…5416 Head {h00=0x0012, h01=0x0050, text=»KON300 RTN A15«, t00=0x0035, t01=0x0142}
0x5416…544e Head {h00=0x0034, h01=0x0050, text=»KON400 LDR* A2,A15 NO CONVERSION, KEEP CHARACTER«, t00=0x0035, t01=0x0158}
0x544e…5460 Head {h00=0x000e, h01=0x0050, text=» RB KON300«, t00=0x0035, t01=0x0190}
0x5460…5476 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0036, t01=0x0012}
0x5476…548a Head {h00=0x0010, h01=0x0050, text=»KON500 EQU *«, t00=0x0036, t01=0x0028}
0x548a…54aa Head {h00=0x001c, h01=0x0050, text=» LDR A4,A4 KEY CODE /7C «, t00=0x0036, t01=0x003c}
0x54aa…54c4 Head {h00=0x0016, h01=0x0050, text=» RF(Z) KON600 YES «, t00=0x0036, t01=0x005c}
0x54c4…54ee Head {h00=0x0026, h01=0x0050, text=» LDK A4,1 INDICATE SKIP CHARACTER «, t00=0x0036, t01=0x0076}
0x54ee…54fe Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0036, t01=0x00a0}
0x54fe…5512 Head {h00=0x0010, h01=0x0050, text=»KON600 EQU *«, t00=0x0036, t01=0x00b0}
0x5512…5524 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A2«, t00=0x0036, t01=0x00c4}
0x5524…5546 Head {h00=0x001e, h01=0x0050, text=» RB KONVER DO START AGAIN «, t00=0x0036, t01=0x00d6}
0x5546…5552 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00f8}
0x5552…5560 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0104}
0x5560…556a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0112}
0x556a…55a2 Head {h00=0x0034, h01=0x0050, text=»* STORE = SUBROUTINE TO STORE A CHARACTER IN «, t00=0x0036, t01=0x011c}
0x55a2…55dc Head {h00=0x0036, h01=0x0050, text=»* ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0036, t01=0x0154}
0x55dc…55e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x018e}
0x55e6…55fc Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0037, t01=0x0008}
0x55fc…5606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x001e}
0x5606…562a Head {h00=0x0020, h01=0x0050, text=»* A2 = CHARACTER TO STORE«, t00=0x0037, t01=0x0028}
0x562a…5648 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x0037, t01=0x004c}
0x5648…5652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x006a}
0x5652…565c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0074}
0x565c…5670 Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x0037, t01=0x007e}
0x5670…5692 Head {h00=0x001e, h01=0x0050, text=» LD A4,2,A8 BUFFER ADDRESS«, t00=0x0037, t01=0x0092}
0x5692…56b6 Head {h00=0x0020, h01=0x0050, text=» ADR A4,A3 ADD BUFFER INDEX «, t00=0x0037, t01=0x00b4}
0x56b6…56e2 Head {h00=0x0028, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER IN BUFFER«, t00=0x0037, t01=0x00d8}
0x56e2…570a Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0037, t01=0x0104}
0x570a…5724 Head {h00=0x0016, h01=0x0050, text=»STORTN ADKL A15,2 «, t00=0x0037, t01=0x012c}
0x5724…5738 Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x0037, t01=0x0146}
0x5738…5746 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x015a}
0x5746…5750 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0168}
0x5750…575a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0172}
0x575a…5794 Head {h00=0x0036, h01=0x0050, text=»* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER«, t00=0x0037, t01=0x017c}
0x5794…579e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0026}
0x579e…57b4 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0038, t01=0x0030}
0x57b4…57be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0046}
0x57be…57de Head {h00=0x001c, h01=0x0050, text=»* A1 = QUEUE POINTER «, t00=0x0038, t01=0x0050}
0x57de…57fc Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0038, t01=0x0070}
0x57fc…5806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x008e}
0x5806…581c Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x0038, t01=0x0098}
0x581c…5826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00ae}
0x5826…584a Head {h00=0x0020, h01=0x0050, text=»* A1 = NEW QUEUE POINTER «, t00=0x0038, t01=0x00b8}
0x584a…585e Head {h00=0x0010, h01=0x0050, text=»EOQUEU EQU *«, t00=0x0038, t01=0x00dc}
0x585e…5870 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0038, t01=0x00f0}
0x5870…5882 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x0038, t01=0x0102}
0x5882…58a6 Head {h00=0x0020, h01=0x0050, text=» CWK A1,DWTEQ END OF QUEUE? «, t00=0x0038, t01=0x0114}
0x58a6…58bc Head {h00=0x0012, h01=0x0050, text=» RF(NE) EOQU10«, t00=0x0038, t01=0x0138}
0x58bc…58ea Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTSQ SET QUEUE START ADDRESS «, t00=0x0038, t01=0x014e}
0x58ea…5902 Head {h00=0x0014, h01=0x0050, text=»EOQU10 ADR A1,A6«, t00=0x0038, t01=0x017c}
0x5902…5914 (57, 2, 38) Head {h00=0x000e, h01=0x0050, text=» RB STORTN«, t00=0x0039, t01=0x0004}
0x5914…5920 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0039, t01=0x0016}
0x5920…5924 Head {h00=0x4004, h01=0x0000}
0x5924…5928 00 39 00 22 ┆ 9 "┆
0x5928…5930 (58, 1, 8) 20 04 00 00 00 3a 00 04 ┆ : ┆
0x5930…5980 (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┆
0x5980…59d0 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┆
0x59d0…5a20 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┆
0x5a20…5a70 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┆
0x5a70…5ac0 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┆
0x5ac0…5b10 (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 ┆
0x5b10…5b60 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 ┆
0x5b60…5bb0 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 ,┆
0x5bb0…5c00 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┆
0x5c00…5c50 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┆