|
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: 23720 (0x5ca8)
Notes: pts_type(SC)
Names: »DRKB03.SC«
└─⟦025d39960⟧ Bits:30009672 Philips computer tape "600133"
└─⟦this⟧ »M:DSB/DRKB03.SC«
IDENT DRKB03 9.2 DSB 820603 NJ DSB1 - THE DRIVER DID NOT CHECK IF THE CHR RETURNED FROM THE CTAB WAS /FF (=IGNORE) * ******************************************* * * 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 * * * * CONSTANTS * * * OVMASK EQU /2 OVERFLOW IN INPUT BUFFER * X:F EQU 20 LENGTH OF CIRCULAR INPUT BUFFER DWTLNG EQU 30 NUMBER OF BYTES IN DECIMAL FORM * * * TIME BEFORE TIME OUT * TIME EQU 300 TIME OUT CONSTANT * EJECT * * **************************************** * CONDITIONAL ASSEMBLY * **************************************** * * TIME OUT FUNCTION MAY BE EXCLUDED BY * SETTING X:A = 0. * X:A EQU 0 CTIMUT EQU 0 * * ECHO FUNCTION MAY BE EXCLUDED BY * SETTING X:B = 0. * X:B EQU 1 CECHO EQU 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 0 * * * * BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 71/72 X:H EQU 0 NSHIFT EQU 0 * * * BY SETTING X:I = 1 KEYBOARD IS LOCKED IF NO KEYLOCK ON. X:I EQU 0 KBLOCK EQU 0 * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 0 * * * MMU BUFFER SIZE * * X:J EQU 10 DVBLEN EQU 030 * * * MMU KEY TABLE SIZE * * X:K EQU 10 DVBKTB EQU 32 * 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 CWK A2,/00FF IGNORE? DSB1 RF(E) KON550 DSB1 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 KON550 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…0028 (0, 0, 400) Head {h00=0x0024, h01=0x0050, text=» IDENT DRKB03 9.2 DSB 820603 NJ «, t00=0x0000, t01=0x0004}
0x0028…0030 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x002c}
0x0030…005a Head {h00=0x0026, h01=0x0050, text=» DSB1 - THE DRIVER DID NOT CHECK«, t00=0x0000, t01=0x0034}
0x005a…0082 Head {h00=0x0024, h01=0x0050, text=» IF THE CHR RETURNED FROM THE «, t00=0x0000, t01=0x005e}
0x0082…00a4 Head {h00=0x001e, h01=0x0050, text=» CTAB WAS /FF (=IGNORE) «, t00=0x0000, t01=0x0086}
0x00a4…00ac Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00a8}
0x00ac…00b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b0}
0x00b6…00ea Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x00ba}
0x00ea…00f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ee}
0x00f4…011c Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00f8}
0x011c…0126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…014a Head {h00=0x0020, h01=0x0050, text=»* DRKB01 = DRIVER KEYBOARD«, t00=0x0000, t01=0x012a}
0x014a…0154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014e}
0x0154…015e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0158}
0x015e…0168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0162}
0x0168…0172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016c}
0x0172…017c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0176}
0x017c…0186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x0186…01ba Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x018a}
0x01ba…01c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002e}
0x01c4…01ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0038}
0x01ce…0202 Head {h00=0x0030, h01=0x0050, text=»* THIS DRIVER HANDLES INPUT FROM NUMERIC «, t00=0x0001, t01=0x0042}
0x0202…0234 Head {h00=0x002e, h01=0x0050, text=»* AND ALPHANUMERIC KEYBOARDS PTS 6236, «, t00=0x0001, t01=0x0076}
0x0234…0264 Head {h00=0x002c, h01=0x0050, text=»* CONNECTED TO CPU VIA CHLT OR CHRT. «, t00=0x0001, t01=0x00a8}
0x0264…026e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d8}
0x026e…02ac Head {h00=0x003a, h01=0x0050, text=»* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS«, t00=0x0001, t01=0x00e2}
0x02ac…02d4 Head {h00=0x0024, h01=0x0050, text=»* ARE HANDLED BY THE DRIVER. «, t00=0x0001, t01=0x0120}
0x02d4…02de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0148}
0x02de…0312 Head {h00=0x0030, h01=0x0050, text=»* AN ECHO-DEVICE CAN BE ATTACHED TO EVERY«, t00=0x0001, t01=0x0152}
0x0312…0346 Head {h00=0x0030, h01=0x0050, text=»* KEYBOARD WHERE RECEIVED CHARACTERS ARE «, t00=0x0001, t01=0x0186}
0x0346…035a Head {h00=0x0010, h01=0x0050, text=»* ECHOED.«, t00=0x0002, t01=0x002a}
0x035a…0364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003e}
0x0364…0398 Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0002, t01=0x0048}
0x0398…03a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007c}
0x03a2…03c8 Head {h00=0x0022, h01=0x0050, text=»* A C K B : ACTIVATION PART«, t00=0x0002, t01=0x0086}
0x03c8…03d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ac}
0x03d2…03fa Head {h00=0x0024, h01=0x0050, text=»* I H K B : INTERRUPT HANDLER«, t00=0x0002, t01=0x00b6}
0x03fa…0404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00de}
0x0404…0428 Head {h00=0x0020, h01=0x0050, text=»* E C H O : ECHO HANDLER «, t00=0x0002, t01=0x00e8}
0x0428…0432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010c}
0x0432…045a Head {h00=0x0024, h01=0x0050, text=»* R C K B : RECOVERY ROUTINE «, t00=0x0002, t01=0x0116}
0x045a…0464 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013e}
0x0464…0472 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0148}
0x0472…047c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0156}
0x047c…0486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0160}
0x0486…04b6 Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE THREATED: «, t00=0x0002, t01=0x016a}
0x04b6…04c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000a}
0x04c0…04e2 Head {h00=0x001e, h01=0x0050, text=»* ORDER 01: BASIC READ «, t00=0x0003, t01=0x0014}
0x04e2…0506 Head {h00=0x0020, h01=0x0050, text=»* ORDER 02: STANDARD READ«, t00=0x0003, t01=0x0036}
0x0506…052a Head {h00=0x0020, h01=0x0050, text=»* ORDER 03: NUMERIC READ «, t00=0x0003, t01=0x005a}
0x052a…0554 Head {h00=0x0026, h01=0x0050, text=»* ORDER 31: RESET INPUT BUFFER «, t00=0x0003, t01=0x007e}
0x0554…055e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a8}
0x055e…0568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b2}
0x0568…058c Head {h00=0x0020, h01=0x0050, text=»* NORMAL REGISTER USAGE :«, t00=0x0003, t01=0x00bc}
0x058c…0596 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e0}
0x0596…05bc Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 : RETURN CODE«, t00=0x0003, t01=0x00ea}
0x05bc…05e6 Head {h00=0x0026, h01=0x0050, text=»* A2 : INPUT CHARACTER«, t00=0x0003, t01=0x0110}
0x05e6…060e Head {h00=0x0024, h01=0x0050, text=»* A3 : BUFFER INDEX «, t00=0x0003, t01=0x013a}
0x060e…0636 Head {h00=0x0024, h01=0x0050, text=»* A4 : WORK REGISTER«, t00=0x0003, t01=0x0162}
0x0636…065c Head {h00=0x0022, h01=0x0050, text=»* A5 : STACK BASE «, t00=0x0003, t01=0x018a}
0x065c…0682 Head {h00=0x0022, h01=0x0050, text=»* A6 : DWT-ADDRESS«, t00=0x0004, t01=0x0020}
0x0682…06a2 Head {h00=0x001c, h01=0x0050, text=»* A7 : ORDER«, t00=0x0004, t01=0x0046}
0x06a2…06c8 Head {h00=0x0022, h01=0x0050, text=»* A8 : ECB-ADDRESS«, t00=0x0004, t01=0x0066}
0x06c8…06d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x008c}
0x06d2…06dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0096}
0x06dc…06e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a0}
0x06e6…0704 Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION«, t00=0x0004, t01=0x00aa}
0x0704…070e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00c8}
0x070e…074a Head {h00=0x0038, h01=0x0050, text=»* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, «, t00=0x0004, t01=0x00d2}
0x074a…0786 Head {h00=0x0038, h01=0x0050, text=»* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED «, t00=0x0004, t01=0x010e}
0x0786…079a Head {h00=0x0010, h01=0x0050, text=»* IN DWT.«, t00=0x0004, t01=0x014a}
0x079a…07a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x015e}
0x07a4…07da Head {h00=0x0032, h01=0x0050, text=»* DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE«, t00=0x0004, t01=0x0168}
0x07da…07f6 Head {h00=0x0018, h01=0x0050, text=»* DEFINED IN DWT.«, t00=0x0005, t01=0x000e}
0x07f6…0800 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002a}
0x0800…0830 Head {h00=0x002c, h01=0x0050, text=»* IF TIMING IS WANTED, TIMER POINTER «, t00=0x0005, t01=0x0034}
0x0830…0860 Head {h00=0x002c, h01=0x0050, text=»* IN DWT MUST BE SET UNEQUAL TO ZERO.«, t00=0x0005, t01=0x0064}
0x0860…0896 Head {h00=0x0032, h01=0x0050, text=»* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS«, t00=0x0005, t01=0x0094}
0x0896…08ce Head {h00=0x0034, h01=0x0050, text=»* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE «, t00=0x0005, t01=0x00ca}
0x08ce…08fc Head {h00=0x002a, h01=0x0050, text=»* IS WANTED FOR A SYSTEM, INDICATOR«, t00=0x0005, t01=0x0102}
0x08fc…0924 Head {h00=0x0024, h01=0x0050, text=»* IN DRIVER MUST BE CHANGED. «, t00=0x0005, t01=0x0130}
0x0924…092e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0158}
0x092e…0966 Head {h00=0x0034, h01=0x0050, text=»* THE LENGTH OF THE CIRCULAR INPUT BUFFER IS «, t00=0x0005, t01=0x0162}
0x0966…09a2 Head {h00=0x0038, h01=0x0050, text=»* DEFINED IN DWT. STANDARD VALUE IS 7 CHARACTERS «, t00=0x0006, t01=0x000a}
0x09a2…09de Head {h00=0x0038, h01=0x0050, text=»* NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL «, t00=0x0006, t01=0x0046}
0x09de…09fa Head {h00=0x0018, h01=0x0050, text=»* DWT:S IN SYSTEM«, t00=0x0006, t01=0x0082}
0x09fa…0a08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x009e}
0x0a08…0a12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ac}
0x0a12…0a4e Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x0006, t01=0x00b6}
0x0a4e…0a8a Head {h00=0x0038, h01=0x0050, text=»* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS:«, t00=0x0006, t01=0x00f2}
0x0a8a…0a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012e}
0x0a94…0ab4 Head {h00=0x001c, h01=0x0050, text=»* -----ECHO-FUNCTION «, t00=0x0006, t01=0x0138}
0x0ab4…0ada Head {h00=0x0022, h01=0x0050, text=»* -----POWER ON INDICATION «, t00=0x0006, t01=0x0158}
0x0ada…0afe Head {h00=0x0020, h01=0x0050, text=»* -----TIME-OUT-FUNCTION «, t00=0x0006, t01=0x017e}
0x0afe…0b26 Head {h00=0x0024, h01=0x0050, text=»* -----NUMERIC SHIFT-FUNCTION«, t00=0x0007, t01=0x0012}
0x0b26…0b56 Head {h00=0x002c, h01=0x0050, text=»* -----KEYBOARD LOCK IF NO KEYLOCK ON«, t00=0x0007, t01=0x003a}
0x0b56…0b60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x006a}
0x0b60…0b74 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES «, t00=0x0007, t01=0x0074}
0x0b74…0b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0088}
0x0b7e…0b88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0092}
0x0b88…0baa Head {h00=0x001e, h01=0x0050, text=» ENTRY KBAD3 ADDRESS-BLOCK«, t00=0x0007, t01=0x009c}
0x0baa…0bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00be}
0x0bb4…0bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c8}
0x0bbe…0bc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d2}
0x0bc8…0bf2 Head {h00=0x0026, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES «, t00=0x0007, t01=0x00dc}
0x0bf2…0bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0106}
0x0bfc…0c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0110}
0x0c06…0c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x011a}
0x0c10…0c38 Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0007, t01=0x0124}
0x0c38…0c6a Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND END I/O AND GO TO DISPATCHER«, t00=0x0007, t01=0x014c}
0x0c6a…0c88 Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0007, t01=0x017e}
0x0c88…0cae Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0008, t01=0x000c}
0x0cae…0ce2 Head {h00=0x0030, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN«, t00=0x0008, t01=0x0032}
0x0ce2…0d1a Head {h00=0x0034, h01=0x0050, text=» EXTRN STREG STORE REGISTERS AND GO TO DISPATCER«, t00=0x0008, t01=0x0066}
0x0d1a…0d4a Head {h00=0x002c, h01=0x0050, text=» EXTRN LDREGE RETURN FROM ECHOE HANDLING«, t00=0x0008, t01=0x009e}
0x0d4a…0d6c Head {h00=0x001e, h01=0x0050, text=» EXTRN LDREGF PANIK EXTERN«, t00=0x0008, t01=0x00ce}
0x0d6c…0d8a Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIME SET TIME«, t00=0x0008, t01=0x00f0}
0x0d8a…0da8 Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIMP SET TIME«, t00=0x0008, t01=0x010e}
0x0da8…0dce Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x0008, t01=0x012c}
0x0dce…0df4 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECHRTN RETURN FROM ECHO«, t00=0x0008, t01=0x0152}
0x0df4…0e14 Head {h00=0x001c, h01=0x0050, text=» EXTRN ECHO ECHO ROUTINE«, t00=0x0008, t01=0x0178}
0x0e14…0e38 Head {h00=0x0020, h01=0x0050, text=» EXTRN ECHEND END OF ECHOING«, t00=0x0009, t01=0x0008}
0x0e38…0e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x002c}
0x0e42…0e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0036}
0x0e4c…0e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0040}
0x0e56…0e72 Head {h00=0x0018, h01=0x0050, text=»* DWT PARAMETERS«, t00=0x0009, t01=0x004a}
0x0e72…0e7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0066}
0x0e7c…0e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0070}
0x0e86…0e90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007a}
0x0e90…0eb6 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTCHP CHANEL PARAMETER«, t00=0x0009, t01=0x0084}
0x0eb6…0ed2 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0009, t01=0x00aa}
0x0ed2…0ef4 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0009, t01=0x00c6}
0x0ef4…0f1e Head {h00=0x0026, h01=0x0022, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK«, t00=0x0009, t01=0x00e8}
0x0f1e…0f40 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0009, t01=0x0112}
0x0f40…0f62 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0009, t01=0x0134}
0x0f62…0f84 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0009, t01=0x0156}
0x0f84…0fae Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0009, t01=0x0178}
0x0fae…0fd4 Head {h00=0x0022, h01=0x001d, text=» EXTRN DWTECH ECHO DEVICE DWT «, t00=0x000a, t01=0x0012}
0x0fd4…0ff6 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTP TIMER POINTER«, t00=0x000a, t01=0x0038}
0x0ff6…101a Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTWAT SAVE INPUT DWT«, t00=0x000a, t01=0x005a}
0x101a…1024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x007e}
0x1024…102e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0088}
0x102e…1038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0092}
0x1038…1050 Head {h00=0x0014, h01=0x0050, text=»* CONSTANTS «, t00=0x000a, t01=0x009c}
0x1050…105a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00b4}
0x105a…1064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00be}
0x1064…106e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c8}
0x106e…109c Head {h00=0x002a, h01=0x0050, text=»OVMASK EQU /2 OVERFLOW IN INPUT BUFFER«, t00=0x000a, t01=0x00d2}
0x109c…10a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0100}
0x10a6…10d8 Head {h00=0x002e, h01=0x0050, text=»X:F EQU 20 LENGTH OF CIRCULAR INPUT BUFFER«, t00=0x000a, t01=0x010a}
0x10d8…110e Head {h00=0x0032, h01=0x0050, text=»DWTLNG EQU 30 NUMBER OF BYTES IN DECIMAL FORM «, t00=0x000a, t01=0x013c}
0x110e…1118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0172}
0x1118…1122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x017c}
0x1122…1144 Head {h00=0x001e, h01=0x0050, text=»* TIME BEFORE TIME OUT«, t00=0x000a, t01=0x0186}
0x1144…114e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0018}
0x114e…1174 Head {h00=0x0022, h01=0x0050, text=»TIME EQU 300 TIME OUT CONSTANT«, t00=0x000b, t01=0x0022}
0x1174…117e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0048}
0x117e…118c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0052}
0x118c…1196 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0060}
0x1196…11a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x006a}
0x11a0…11d0 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000b, t01=0x0074}
0x11d0…1200 Head {h00=0x002c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000b, t01=0x00a4}
0x1200…1230 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000b, t01=0x00d4}
0x1230…123a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0104}
0x123a…126c Head {h00=0x002e, h01=0x0050, text=»* TIME OUT FUNCTION MAY BE EXCLUDED BY «, t00=0x000b, t01=0x010e}
0x126c…128a Head {h00=0x001a, h01=0x0050, text=»* SETTING X:A = 0. «, t00=0x000b, t01=0x0140}
0x128a…1294 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x015e}
0x1294…12a6 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000b, t01=0x0168}
0x12a6…12ba Head {h00=0x0010, h01=0x0050, text=»CTIMUT EQU 0«, t00=0x000b, t01=0x017a}
0x12ba…12c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018e}
0x12c4…12f2 Head {h00=0x002a, h01=0x0050, text=»* ECHO FUNCTION MAY BE EXCLUDED BY «, t00=0x000c, t01=0x0008}
0x12f2…1310 Head {h00=0x001a, h01=0x0050, text=»* SETTING X:B = 0. «, t00=0x000c, t01=0x0036}
0x1310…131a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0054}
0x131a…132c Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000c, t01=0x005e}
0x132c…1340 Head {h00=0x0010, h01=0x0050, text=»CECHO EQU 1 «, t00=0x000c, t01=0x0070}
0x1340…134a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0084}
0x134a…138c Head {h00=0x003e, h01=0x0050, text=»* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION «, t00=0x000c, t01=0x008e}
0x138c…13b6 Head {h00=0x0026, h01=0x0050, text=»* IS INCLUDED IN THE DRIVER. «, t00=0x000c, t01=0x00d0}
0x13b6…13f6 Head {h00=0x003c, h01=0x0050, text=»* IF THERE IS A READ REQUEST THIS IS COMPLETED WITH«, t00=0x000c, t01=0x00fa}
0x13f6…1426 Head {h00=0x002c, h01=0x0050, text=»* ZERO IN THE CONTROL WORD OF ECB. «, t00=0x000c, t01=0x013a}
0x1426…146a Head {h00=0x0040, h01=0x0050, text=»* IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST «, t00=0x000c, t01=0x016a}
0x146a…14ae Head {h00=0x0040, h01=0x0050, text=»* AFTER POWER ON IS COMPLETED WITH ZERO IN CONTROL WORD«, t00=0x000d, t01=0x001e}
0x14ae…14c4 Head {h00=0x0012, h01=0x0050, text=»* OF ECB «, t00=0x000d, t01=0x0062}
0x14c4…14ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0078}
0x14ce…14d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0082}
0x14d8…14ea Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000d, t01=0x008c}
0x14ea…14fe Head {h00=0x0010, h01=0x0050, text=»POWOFF EQU 0«, t00=0x000d, t01=0x009e}
0x14fe…1508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b2}
0x1508…1512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00bc}
0x1512…151c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c6}
0x151c…156e 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=0x00d0}
0x156e…1580 Head {h00=0x000e, h01=0x0050, text=»X:H EQU 0 «, t00=0x000d, t01=0x0122}
0x1580…1594 Head {h00=0x0010, h01=0x0050, text=»NSHIFT EQU 0«, t00=0x000d, t01=0x0134}
0x1594…159e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0148}
0x159e…15a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0152}
0x15a8…15ee Head {h00=0x0042, h01=0x0050, text=»* BY SETTING X:I = 1 KEYBOARD IS LOCKED IF NO KEYLOCK ON. «, t00=0x000d, t01=0x015c}
0x15ee…1600 Head {h00=0x000e, h01=0x0050, text=»X:I EQU 0 «, t00=0x000e, t01=0x0012}
0x1600…1614 Head {h00=0x0010, h01=0x0050, text=»KBLOCK EQU 0«, t00=0x000e, t01=0x0024}
0x1614…161e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0038}
0x161e…1628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0042}
0x1628…165a Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000e, t01=0x004c}
0x165a…1688 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000e, t01=0x007e}
0x1688…1692 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ac}
0x1692…16a6 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000e, t01=0x00b6}
0x16a6…16b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ca}
0x16b0…16ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d4}
0x16ba…16f4 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000e, t01=0x00de}
0x16f4…1726 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000e, t01=0x0118}
0x1726…1730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014a}
0x1730…1744 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000e, t01=0x0154}
0x1744…174e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0168}
0x174e…1758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0172}
0x1758…1774 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x000e, t01=0x017c}
0x1774…177e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0008}
0x177e…1788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0012}
0x1788…179a Head {h00=0x000e, h01=0x0050, text=»X:J EQU 10«, t00=0x000f, t01=0x001c}
0x179a…17b0 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 030«, t00=0x000f, t01=0x002e}
0x17b0…17ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0044}
0x17ba…17c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004e}
0x17c4…17e2 Head {h00=0x001a, h01=0x0050, text=»* MMU KEY TABLE SIZE«, t00=0x000f, t01=0x0058}
0x17e2…17ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0076}
0x17ec…17f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0080}
0x17f6…1808 Head {h00=0x000e, h01=0x0050, text=»X:K EQU 10«, t00=0x000f, t01=0x008a}
0x1808…181e Head {h00=0x0012, h01=0x0050, text=»DVBKTB EQU 32 «, t00=0x000f, t01=0x009c}
0x181e…1828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b2}
0x1828…1836 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00bc}
0x1836…1840 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ca}
0x1840…184a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00d4}
0x184a…1868 Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENT«, t00=0x000f, t01=0x00de}
0x1868…1872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00fc}
0x1872…187c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0106}
0x187c…18b0 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000f, t01=0x0110}
0x18b0…18ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0144}
0x18ba…18d0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000f, t01=0x014e}
0x18d0…18e8 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000f, t01=0x0164}
0x18e8…18f4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x017c}
0x18f4…18fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0188}
0x18fe…1914 (16, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0010, t01=0x0004}
0x1914…192e Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0010, t01=0x001a}
0x192e…193a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0034}
0x193a…1944 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0040}
0x1944…1972 Head {h00=0x002a, h01=0x0050, text=»DWTCON EQU START+/00 CONVERSION TABLE «, t00=0x0010, t01=0x004a}
0x1972…19ae Head {h00=0x0038, h01=0x0050, text=»DWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE«, t00=0x0010, t01=0x0078}
0x19ae…19ea Head {h00=0x0038, h01=0x0050, text=»DWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE «, t00=0x0010, t01=0x00b4}
0x19ea…1a14 Head {h00=0x0026, h01=0x0050, text=»DWTSQ EQU START+/1C START OF QUEUE«, t00=0x0010, t01=0x00f0}
0x1a14…1a40 Head {h00=0x0028, h01=0x0050, text=»DWTEQ EQU DWTSQ+DWTLNG END OF QUEUE «, t00=0x0010, t01=0x011a}
0x1a40…1a4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0146}
0x1a4a…1a76 Head {h00=0x0028, h01=0x0050, text=»* SPECIAL KEYS DEFINED IN DWT «, t00=0x0010, t01=0x0150}
0x1a76…1a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x017c}
0x1a80…1a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0186}
0x1a8a…1a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0190}
0x1a94…1ac4 Head {h00=0x002c, h01=0x0050, text=»KBBSP EQU START+/14 BACK-SPACE CHARACTER«, t00=0x0011, t01=0x000a}
0x1ac4…1af0 Head {h00=0x0028, h01=0x0050, text=»KBCLR EQU START+/15 CLEAR CHARACTER «, t00=0x0011, t01=0x003a}
0x1af0…1b22 Head {h00=0x002e, h01=0x0050, text=»KBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER «, t00=0x0011, t01=0x0066}
0x1b22…1b3e Head {h00=0x0018, h01=0x0050, text=»KBMZ3 EQU START+/16 «, t00=0x0011, t01=0x0098}
0x1b3e…1b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b4}
0x1b48…1b56 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00be}
0x1b56…1b6c Head {h00=0x0012, h01=0x0050, text=»* TABLES «, t00=0x0011, t01=0x00cc}
0x1b6c…1b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e2}
0x1b76…1b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ec}
0x1b80…1ba8 Head {h00=0x0024, h01=0x0050, text=» DATA DVBKTB MMU KEY TABLE SIZE «, t00=0x0011, t01=0x00f6}
0x1ba8…1bcc Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x011e}
0x1bcc…1be8 Head {h00=0x0018, h01=0x0050, text=» DATA 6 DEVICE INDEX«, t00=0x0011, t01=0x0142}
0x1be8…1bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x015e}
0x1bf2…1c06 Head {h00=0x0010, h01=0x0050, text=»KBAD3 EQU * «, t00=0x0011, t01=0x0168}
0x1c06…1c2c Head {h00=0x0022, h01=0x0050, text=» DATA ACKB ACTIVATION HANDLER «, t00=0x0011, t01=0x017c}
0x1c2c…1c52 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0012, t01=0x0012}
0x1c52…1c76 Head {h00=0x0020, h01=0x0050, text=» DATA IHKB INTERRUPT HANDLER«, t00=0x0012, t01=0x0038}
0x1c76…1c8c Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x005c}
0x1c8c…1cb0 Head {h00=0x0020, h01=0x0050, text=» DATA RCKB RECOVERY ROUTINE «, t00=0x0012, t01=0x0072}
0x1cb0…1cbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0096}
0x1cbc…1cd2 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=0 «, t00=0x0012, t01=0x00a2}
0x1cd2…1cee Head {h00=0x0018, h01=0x0050, text=» DATA 0 NO RECOVERY «, t00=0x0012, t01=0x00b8}
0x1cee…1cfa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00d4}
0x1cfa…1d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e0}
0x1d04…1d1a Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x00ea}
0x1d1a…1d28 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0100}
0x1d28…1d3a Head {h00=0x000e, h01=0x0050, text=»* RCKB «, t00=0x0012, t01=0x010e}
0x1d3a…1d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0120}
0x1d44…1d5e Head {h00=0x0016, h01=0x0050, text=»* RECOVERY PART«, t00=0x0012, t01=0x012a}
0x1d5e…1d68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0144}
0x1d68…1d72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x014e}
0x1d72…1d84 Head {h00=0x000e, h01=0x0050, text=»RCKB EQU *«, t00=0x0012, t01=0x0158}
0x1d84…1d9a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0012, t01=0x016a}
0x1d9a…1dc4 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0012, t01=0x0180}
0x1dc4…1dd0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x001a}
0x1dd0…1dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0026}
0x1dda…1df0 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0013, t01=0x0030}
0x1df0…1e06 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0013, t01=0x0046}
0x1e06…1e2c Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0013, t01=0x005c}
0x1e2c…1e38 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0082}
0x1e38…1e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x008e}
0x1e42…1e58 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0013, t01=0x0098}
0x1e58…1e76 Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTST,A6 BUSY? «, t00=0x0013, t01=0x00ae}
0x1e76…1e8c Head {h00=0x0012, h01=0x0050, text=» RF(NN) RCKB10«, t00=0x0013, t01=0x00cc}
0x1e8c…1ea2 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x0013, t01=0x00e2}
0x1ea2…1ece Head {h00=0x0028, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER OFF «, t00=0x0013, t01=0x00f8}
0x1ece…1ee0 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0013, t01=0x0124}
0x1ee0…1f0a Head {h00=0x0026, h01=0x0050, text=»RCKB10 CF A5,LDREGE LOAD REGISTERS«, t00=0x0013, t01=0x0136}
0x1f0a…1f1c Head {h00=0x000e, h01=0x0050, text=» RF AKB202«, t00=0x0013, t01=0x0160}
0x1f1c…1f28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0172}
0x1f28…1f36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x017e}
0x1f36…1f40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018c}
0x1f40…1f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0008}
0x1f4a…1f5e Head {h00=0x0010, h01=0x0050, text=»* ACKB «, t00=0x0014, t01=0x0012}
0x1f5e…1f68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0026}
0x1f68…1fa6 Head {h00=0x003a, h01=0x0050, text=»* ACTIVATION PART: CHECS VALIDITY OF ORDERS AND «, t00=0x0014, t01=0x0030}
0x1fa6…1fb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006e}
0x1fb0…1ff4 Head {h00=0x0040, h01=0x0050, text=»* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER«, t00=0x0014, t01=0x0078}
0x1ff4…1ffe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00bc}
0x1ffe…2016 Head {h00=0x0014, h01=0x0050, text=»* TO THREAT«, t00=0x0014, t01=0x00c6}
0x2016…2020 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00de}
0x2020…202a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e8}
0x202a…2034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f2}
0x2034…203e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00fc}
0x203e…2050 Head {h00=0x000e, h01=0x0050, text=»ACKB EQU *«, t00=0x0014, t01=0x0106}
0x2050…2066 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/FEFF«, t00=0x0014, t01=0x0118}
0x2066…209c Head {h00=0x0032, h01=0x0050, text=» ANS A1,DWTST,A6 RESET INETRRUPT ALLOWED FLAG «, t00=0x0014, t01=0x012e}
0x209c…20ae Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0014, t01=0x0164}
0x20ae…20d2 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0014, t01=0x0176}
0x20d2…20e4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0015, t01=0x000a}
0x20e4…2108 Head {h00=0x0020, h01=0x0050, text=» RF(NG) AKB100 ILLEGAL ORDER«, t00=0x0015, t01=0x001c}
0x2108…211a Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0015, t01=0x0040}
0x211a…213e Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB200 ORDER 1,2 OR 3«, t00=0x0015, t01=0x0052}
0x213e…2152 Head {h00=0x0010, h01=0x0050, text=» SUK A4,/2D «, t00=0x0015, t01=0x0076}
0x2152…2170 Head {h00=0x001a, h01=0x0050, text=» RF(Z) AKB110 ORDER 31«, t00=0x0015, t01=0x008a}
0x2170…219e Head {h00=0x002a, h01=0x0050, text=»AKB100 ORKL A1,/8000 I/0 REQUEST ERROR«, t00=0x0015, t01=0x00a8}
0x219e…21b2 Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x0015, t01=0x00d6}
0x21b2…21c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x00ea}
0x21c0…21ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f8}
0x21ca…21d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0102}
0x21d4…21de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010c}
0x21de…2208 Head {h00=0x0026, h01=0x0050, text=»* ORDER 31 RESET INPUT BUFFER«, t00=0x0015, t01=0x0116}
0x2208…2212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0140}
0x2212…221c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014a}
0x221c…2226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0154}
0x2226…223a Head {h00=0x0010, h01=0x0050, text=»AKB110 EQU *«, t00=0x0015, t01=0x015e}
0x223a…2252 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTINQ,A6«, t00=0x0015, t01=0x0172}
0x2252…2264 Head {h00=0x000e, h01=0x0050, text=» SCR A1,A2«, t00=0x0015, t01=0x018a}
0x2264…2290 Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE «, t00=0x0016, t01=0x000c}
0x2290…22a2 Head {h00=0x000e, h01=0x0050, text=» ABL ENDIO«, t00=0x0016, t01=0x0038}
0x22a2…22ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x004a}
0x22ac…22ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0054}
0x22ba…22c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0062}
0x22c4…22ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006c}
0x22ce…22e8 Head {h00=0x0016, h01=0x0050, text=»* ORDER 1,2,3«, t00=0x0016, t01=0x0076}
0x22e8…22f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0090}
0x22f2…22fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009a}
0x22fc…2306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a4}
0x2306…231a Head {h00=0x0010, h01=0x0050, text=»AKB200 EQU *«, t00=0x0016, t01=0x00ae}
0x231a…2330 Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0016, t01=0x00c2}
0x2330…2348 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0016, t01=0x00d8}
0x2348…2368 Head {h00=0x001c, h01=0x0050, text=» ANKL A2,/200 POWER OFF?«, t00=0x0016, t01=0x00f0}
0x2368…2382 Head {h00=0x0016, h01=0x0050, text=» RF(E) AKB205 NO! «, t00=0x0016, t01=0x0110}
0x2382…23ae Head {h00=0x0028, h01=0x0050, text=» XRS A2,DWTST,A6 RESET POWER OFF BIT«, t00=0x0016, t01=0x012a}
0x23ae…23c2 Head {h00=0x0010, h01=0x0050, text=»AKB202 EQU *«, t00=0x0016, t01=0x0156}
0x23c2…23fe Head {h00=0x0038, h01=0x0050, text=» CWK A7,1 IF BASIC READ DON'T COMPLEATE THE REQUEST «, t00=0x0016, t01=0x016a}
0x23fe…2414 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB205 «, t00=0x0017, t01=0x0016}
0x2414…2438 Head {h00=0x0020, h01=0x0050, text=» CM 10,A8 INDICATE POWER OFF«, t00=0x0017, t01=0x002c}
0x2438…244a Head {h00=0x000e, h01=0x0050, text=» RF AKB218«, t00=0x0017, t01=0x0050}
0x244a…2456 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0062}
0x2456…246a Head {h00=0x0010, h01=0x0050, text=»AKB205 EQU *«, t00=0x0017, t01=0x006e}
0x246a…2480 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0017, t01=0x0082}
0x2480…2494 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A6 «, t00=0x0017, t01=0x0098}
0x2494…24b0 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/40 TIMING? «, t00=0x0017, t01=0x00ac}
0x24b0…24e0 Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB210 NO TIMING FOR THIS DEVICE!«, t00=0x0017, t01=0x00c8}
0x24e0…2510 Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTTP,A6 CHECK IF ALREADY TIMING «, t00=0x0017, t01=0x00f8}
0x2510…2526 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKBTIM «, t00=0x0017, t01=0x0128}
0x2526…253c Head {h00=0x0012, h01=0x0050, text=» LDKL A4,-TIME«, t00=0x0017, t01=0x013e}
0x253c…2554 Head {h00=0x0014, h01=0x0050, text=» ST* A4,DWTTP,A6«, t00=0x0017, t01=0x0154}
0x2554…2566 Head {h00=0x000e, h01=0x0050, text=» RF AKB210«, t00=0x0017, t01=0x016c}
0x2566…257a Head {h00=0x0010, h01=0x0050, text=»AKBTIM EQU *«, t00=0x0017, t01=0x017e}
0x257a…259e (24, 0, 400) Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTTP TIMER POINTER«, t00=0x0018, t01=0x0004}
0x259e…25c0 Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT-ADDRESS«, t00=0x0018, t01=0x0028}
0x25c0…25d2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0018, t01=0x004a}
0x25d2…25f2 Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIME «, t00=0x0018, t01=0x005c}
0x25f2…2626 Head {h00=0x0030, h01=0x0050, text=» DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME «, t00=0x0018, t01=0x007c}
0x2626…2658 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT«, t00=0x0018, t01=0x00b0}
0x2658…2664 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00e2}
0x2664…266e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ee}
0x266e…267c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00f8}
0x267c…269c Head {h00=0x001c, h01=0x0050, text=»* IF ANY KEY-LOCK: «, t00=0x0018, t01=0x0106}
0x269c…26a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0126}
0x26a6…26e4 Head {h00=0x003a, h01=0x0050, text=»* RESET "CHANGED-KEY" FLAG AND MAKE KEY-CHARACTER«, t00=0x0018, t01=0x0130}
0x26e4…271e Head {h00=0x0036, h01=0x0050, text=»* OF FLAG. STORE KEY-CHARACTER IN ECB-BUFFER.«, t00=0x0018, t01=0x016e}
0x271e…275e Head {h00=0x003c, h01=0x0050, text=»* IN CASE OF STANDARD OR NUMERIC READ MAKE ECB-CODE«, t00=0x0019, t01=0x0018}
0x275e…2788 Head {h00=0x0026, h01=0x0050, text=»* AND END I/O. ELSE CONTINUE.«, t00=0x0019, t01=0x0058}
0x2788…2792 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0082}
0x2792…279c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x008c}
0x279c…27b0 Head {h00=0x0010, h01=0x0050, text=»AKB210 EQU *«, t00=0x0019, t01=0x0096}
0x27b0…27d6 Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY KEY-LOCK? «, t00=0x0019, t01=0x00aa}
0x27d6…27e8 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0019, t01=0x00d0}
0x27e8…27fe Head {h00=0x0012, h01=0x0050, text=» RF(Z) AKB219 «, t00=0x0019, t01=0x00e2}
0x27fe…2810 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0019, t01=0x00f8}
0x2810…2822 Head {h00=0x000e, h01=0x0050, text=» SRN A2,A4«, t00=0x0019, t01=0x010a}
0x2822…2834 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0019, t01=0x011c}
0x2834…2846 Head {h00=0x000e, h01=0x0050, text=» CWK A4,3 «, t00=0x0019, t01=0x012e}
0x2846…285c Head {h00=0x0012, h01=0x0050, text=» RF(N) AKB212 «, t00=0x0019, t01=0x0140}
0x285c…2872 Head {h00=0x0012, h01=0x0050, text=» RF(P) AKB211 «, t00=0x0019, t01=0x0156}
0x2872…2884 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0019, t01=0x016c}
0x2884…2896 Head {h00=0x000e, h01=0x0050, text=» RF AKB212«, t00=0x0019, t01=0x017e}
0x2896…28ae Head {h00=0x0014, h01=0x0050, text=»AKB211 ADR A4,A4«, t00=0x0019, t01=0x0190}
0x28ae…28e0 Head {h00=0x002e, h01=0x0050, text=»AKB212 XRS A4,DWTST,A6 RESET OLD KEY-FLAG «, t00=0x001a, t01=0x0018}
0x28e0…28f2 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x001a, t01=0x004a}
0x28f2…2904 Head {h00=0x000e, h01=0x0050, text=» SLL A4,4 «, t00=0x001a, t01=0x005c}
0x2904…291c Head {h00=0x0014, h01=0x0050, text=» AN A4,DWTST,A6 «, t00=0x001a, t01=0x006e}
0x291c…2938 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 SAVE A4 «, t00=0x001a, t01=0x0086}
0x2938…294c Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x001a, t01=0x00a2}
0x294c…2966 Head {h00=0x0016, h01=0x0050, text=» SRN A2,A3 ORDER 1«, t00=0x001a, t01=0x00b6}
0x2966…298c Head {h00=0x0022, h01=0x0050, text=» ADR A3,A3 MAKE CHARACTER FLAG«, t00=0x001a, t01=0x00d0}
0x298c…299e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x001a, t01=0x00f6}
0x299e…29b6 Head {h00=0x0014, h01=0x0050, text=» RF(NE) AKB213 «, t00=0x001a, t01=0x0108}
0x29b6…29c8 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x001a, t01=0x0120}
0x29c8…29e2 Head {h00=0x0016, h01=0x0050, text=»AKB213 ADK A3,/70 «, t00=0x001a, t01=0x0132}
0x29e2…29f4 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x001a, t01=0x014c}
0x29f4…2a08 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x001a, t01=0x015e}
0x2a08…2a36 Head {h00=0x002a, h01=0x0050, text=» CF A15,STORE STORE KEY IN ECB BUFFER «, t00=0x001a, t01=0x0172}
0x2a36…2a56 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A15 RESTORE A4 «, t00=0x001b, t01=0x0010}
0x2a56…2a68 Head {h00=0x000e, h01=0x0050, text=» CWK A7,1 «, t00=0x001b, t01=0x0030}
0x2a68…2a90 Head {h00=0x0024, h01=0x0050, text=» RF(E) AKB307 JUMP IF BASIC READ«, t00=0x001b, t01=0x0042}
0x2a90…2ab6 Head {h00=0x0022, h01=0x0050, text=»AKB214 NGR A2,A1 MAKE ECB CODE«, t00=0x001b, t01=0x006a}
0x2ab6…2ad2 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 KEY FLAG «, t00=0x001b, t01=0x0090}
0x2ad2…2ae8 Head {h00=0x0012, h01=0x0050, text=» RF(E) AKB215 «, t00=0x001b, t01=0x00ac}
0x2ae8…2afa Head {h00=0x000e, h01=0x0050, text=» SUK A2,4 «, t00=0x001b, t01=0x00c2}
0x2afa…2b2a Head {h00=0x002c, h01=0x0050, text=»AKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB «, t00=0x001b, t01=0x00d4}
0x2b2a…2b44 Head {h00=0x0016, h01=0x0050, text=»AKB218 ABL AKB380 «, t00=0x001b, t01=0x0104}
0x2b44…2b70 Head {h00=0x0028, h01=0x0050, text=»AKB219 LD A2,4,A8 REQUESTED LENGTH=0«, t00=0x001b, t01=0x011e}
0x2b70…2b8c Head {h00=0x0018, h01=0x0050, text=»AKB220 ABL(E) AKB380«, t00=0x001b, t01=0x014a}
0x2b8c…2bb2 Head {h00=0x0022, h01=0x0050, text=»AKB225 LDR A3,A3 FIRTST RIME? «, t00=0x001b, t01=0x0166}
0x2bb2…2bcc Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB240 N0!«, t00=0x001b, t01=0x018c}
0x2bcc…2bee Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A8 BUFFER ADDRESS«, t00=0x001c, t01=0x0016}
0x2bee…2c00 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001c, t01=0x0038}
0x2c00…2c12 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x001c, t01=0x004a}
0x2c12…2c3c Head {h00=0x0026, h01=0x0050, text=»AKB230 SCR A3,A1 CLEAR ECB BUFFER «, t00=0x001c, t01=0x005c}
0x2c3c…2c4e Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001c, t01=0x0086}
0x2c4e…2c60 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x001c, t01=0x0098}
0x2c60…2c76 Head {h00=0x0012, h01=0x0050, text=» RB(NE) AKB230«, t00=0x001c, t01=0x00aa}
0x2c76…2c8a Head {h00=0x0010, h01=0x0050, text=»AKB240 EQU *«, t00=0x001c, t01=0x00c0}
0x2c8a…2ca2 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTUTQ,A6«, t00=0x001c, t01=0x00d4}
0x2ca2…2cb4 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x001c, t01=0x00ec}
0x2cb4…2ccc Head {h00=0x0014, h01=0x0050, text=»AKB245 LDR A4,A2«, t00=0x001c, t01=0x00fe}
0x2ccc…2cea Head {h00=0x001a, h01=0x0050, text=» XRK A4,/FF OVERFLOW? «, t00=0x001c, t01=0x0116}
0x2cea…2d04 Head {h00=0x0016, h01=0x0050, text=» RF(NE) AKB250 N0!«, t00=0x001c, t01=0x0134}
0x2d04…2d22 Head {h00=0x001a, h01=0x0050, text=»AKB247 SCR A4,A1 YES! «, t00=0x001c, t01=0x014e}
0x2d22…2d46 Head {h00=0x0020, h01=0x0050, text=» LDK A1,OVMASK OVERFLOW SET «, t00=0x001c, t01=0x016c}
0x2d46…2d60 Head {h00=0x0016, h01=0x0050, text=» ABL ENDIX END I/O«, t00=0x001c, t01=0x0190}
0x2d60…2d92 Head {h00=0x002e, h01=0x0050, text=»AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE?«, t00=0x001d, t01=0x001a}
0x2d92…2daa Head {h00=0x0014, h01=0x0050, text=» RF(NE) AKB255 «, t00=0x001d, t01=0x004c}
0x2daa…2dd0 Head {h00=0x0022, h01=0x0050, text=» CF A5,STREG NOTHING IN QUEUE «, t00=0x001d, t01=0x0064}
0x2dd0…2de6 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001d, t01=0x008a}
0x2de6…2e14 Head {h00=0x002a, h01=0x0050, text=» LDR A1,A1 CHECK TIME OUT RETURN CODE «, t00=0x001d, t01=0x00a0}
0x2e14…2e36 Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB257 NO TIME OUT «, t00=0x001d, t01=0x00ce}
0x2e36…2e5e Head {h00=0x0024, h01=0x0050, text=» ABL ENDI05 END I/O AT TIME OUT «, t00=0x001d, t01=0x00f0}
0x2e5e…2e6a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0118}
0x2e6a…2e80 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=0 «, t00=0x001d, t01=0x0124}
0x2e80…2e92 Head {h00=0x000e, h01=0x0050, text=» RF AKB257«, t00=0x001d, t01=0x013a}
0x2e92…2e9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x014c}
0x2e9e…2ecc Head {h00=0x002a, h01=0x0050, text=»AKB255 CF A15,EOQUEU NEXT OUT POINTER «, t00=0x001d, t01=0x0158}
0x2ecc…2ef6 Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW POINTER«, t00=0x001d, t01=0x0186}
0x2ef6…2f0a Head {h00=0x0010, h01=0x0050, text=»AKB257 EQU *«, t00=0x001e, t01=0x0020}
0x2f0a…2f1c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001e, t01=0x0034}
0x2f1c…2f2e Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x001e, t01=0x0046}
0x2f2e…2f52 Head {h00=0x0020, h01=0x0050, text=» RF(NN) AKB310 ORDER 2 OR 3 «, t00=0x001e, t01=0x0058}
0x2f52…2f60 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x007c}
0x2f60…2f6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x008a}
0x2f6a…2f74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0094}
0x2f74…2f94 Head {h00=0x001c, h01=0x0050, text=»* ORDER 1 BASIC READ«, t00=0x001e, t01=0x009e}
0x2f94…2f9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00be}
0x2f9e…2fa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00c8}
0x2fa8…2fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00d2}
0x2fb2…2fec Head {h00=0x0036, h01=0x0050, text=»AKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER «, t00=0x001e, t01=0x00dc}
0x2fec…3000 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x001e, t01=0x0116}
0x3000…3014 Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x001e, t01=0x012a}
0x3014…3020 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x013e}
0x3020…303a Head {h00=0x0016, h01=0x0050, text=»AKB307 CW A3,4,A8 «, t00=0x001e, t01=0x014a}
0x303a…306a Head {h00=0x002c, h01=0x0050, text=» RF(E) AKB380 END I/O IF REQ=EFF LENGTH «, t00=0x001e, t01=0x0164}
0x306a…308c (31, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 MORE KEYS?«, t00=0x001f, t01=0x0004}
0x308c…309e Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001f, t01=0x0026}
0x309e…30b4 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AKB210«, t00=0x001f, t01=0x0038}
0x30b4…30c6 Head {h00=0x000e, h01=0x0050, text=» RB AKB225«, t00=0x001f, t01=0x004e}
0x30c6…30d4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0060}
0x30d4…30de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x006e}
0x30de…30e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0078}
0x30e8…30f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0082}
0x30f2…312a Head {h00=0x0034, h01=0x0050, text=»* ORDER 2 OR 3 STANDARD AND NUMERIC READ «, t00=0x001f, t01=0x008c}
0x312a…3134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c4}
0x3134…317a Head {h00=0x0042, h01=0x0050, text=»* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) «, t00=0x001f, t01=0x00ce}
0x317a…3184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0114}
0x3184…318e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x011e}
0x318e…3198 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0128}
0x3198…31a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0132}
0x31a2…31b6 Head {h00=0x0010, h01=0x0050, text=»AKB310 EQU *«, t00=0x001f, t01=0x013c}
0x31b6…31dc Head {h00=0x0022, h01=0x0050, text=» LD A1,10,A8 KEY-TABLE ADDRESS«, t00=0x001f, t01=0x0150}
0x31dc…31fe Head {h00=0x001e, h01=0x0050, text=» RF(Z) AKB360 NO KEY-TABLE«, t00=0x001f, t01=0x0176}
0x31fe…3228 Head {h00=0x0026, h01=0x0050, text=» LCR A4,A1 KEY-TABLE LENGTH IN A4 «, t00=0x0020, t01=0x0008}
0x3228…323c Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0020, t01=0x0032}
0x323c…3266 Head {h00=0x0026, h01=0x0050, text=» ADR A1,A4 LAST PLACE IN KEY-TABLE«, t00=0x0020, t01=0x0046}
0x3266…3278 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0020, t01=0x0070}
0x3278…3290 Head {h00=0x0014, h01=0x0050, text=»AKB355 SUK A4,1 «, t00=0x0020, t01=0x0082}
0x3290…32c0 Head {h00=0x002c, h01=0x0050, text=» RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE«, t00=0x0020, t01=0x009a}
0x32c0…32da Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 NEXT KEY«, t00=0x0020, t01=0x00ca}
0x32da…32f2 Head {h00=0x0014, h01=0x0050, text=» CCR A2,A1 EOR? «, t00=0x0020, t01=0x00e4}
0x32f2…330c Head {h00=0x0016, h01=0x0050, text=» RB(NE) AKB355 NO!«, t00=0x0020, t01=0x00fc}
0x330c…331e Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0020, t01=0x0116}
0x331e…334e Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROL WORD«, t00=0x0020, t01=0x0128}
0x334e…3374 Head {h00=0x0022, h01=0x0050, text=» CF A15,STORE STORE CHARACTER «, t00=0x0020, t01=0x0158}
0x3374…3388 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0020, t01=0x017e}
0x3388…33b2 (33, 0, 398) Head {h00=0x0026, h01=0x0050, text=» ORK A2,/80 INDICATE EOR-CHARACTER«, t00=0x0021, t01=0x0004}
0x33b2…33d8 Head {h00=0x0022, h01=0x0050, text=» CF A5,ECHO ECHO EOR-CHARACTER«, t00=0x0021, t01=0x002e}
0x33d8…33e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0054}
0x33e4…33f6 Head {h00=0x000e, h01=0x0050, text=» RF AKB380«, t00=0x0021, t01=0x0060}
0x33f6…340a Head {h00=0x0010, h01=0x0050, text=»AKB360 EQU *«, t00=0x0021, t01=0x0072}
0x340a…341c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0021, t01=0x0086}
0x341c…3434 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBMZ2,A6 «, t00=0x0021, t01=0x0098}
0x3434…344a Head {h00=0x0012, h01=0x0050, text=» RF(E) KBMZ20 «, t00=0x0021, t01=0x00b0}
0x344a…3462 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBMZ3,A6 «, t00=0x0021, t01=0x00c6}
0x3462…3478 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBMZ30 «, t00=0x0021, t01=0x00de}
0x3478…3490 Head {h00=0x0014, h01=0x0050, text=» CC A4,KBBSP,A6 «, t00=0x0021, t01=0x00f4}
0x3490…34a6 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBSP10 «, t00=0x0021, t01=0x010c}
0x34a6…34be Head {h00=0x0014, h01=0x0050, text=» CC A4,KBCLR,A6 «, t00=0x0021, t01=0x0122}
0x34be…34d4 Head {h00=0x0012, h01=0x0050, text=» RF(E) KBCL10 «, t00=0x0021, t01=0x013a}
0x34d4…3504 Head {h00=0x002c, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN BUFFER «, t00=0x0021, t01=0x0150}
0x3504…3516 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0021, t01=0x0180}
0x3516…3542 (34, 0, 400) Head {h00=0x0028, h01=0x0050, text=» SUK A4,/20 CHEC CONVERTED CHARACTER«, t00=0x0022, t01=0x0004}
0x3542…3566 Head {h00=0x0020, h01=0x0050, text=» RF(N) AKB364 LESS THAN /20 «, t00=0x0022, t01=0x0030}
0x3566…358a Head {h00=0x0020, h01=0x0050, text=» SUK A4,/5F CHARACTER > /7F «, t00=0x0022, t01=0x0054}
0x358a…35a4 Head {h00=0x0016, h01=0x0050, text=» RF(P) AKB364 YES «, t00=0x0022, t01=0x0078}
0x35a4…35b6 Head {h00=0x000e, h01=0x0050, text=» CWK A7,2 «, t00=0x0022, t01=0x0092}
0x35b6…35de Head {h00=0x0024, h01=0x0050, text=» RF(E) AKB366 STANDARD READ OK «, t00=0x0022, t01=0x00a4}
0x35de…35f2 Head {h00=0x0010, h01=0x0050, text=» ADK A4,/4F «, t00=0x0022, t01=0x00cc}
0x35f2…3608 Head {h00=0x0012, h01=0x0050, text=» RF(N) AKB364 «, t00=0x0022, t01=0x00e0}
0x3608…361a Head {h00=0x000e, h01=0x0050, text=» SUK A4,/A«, t00=0x0022, t01=0x00f6}
0x361a…3640 Head {h00=0x0022, h01=0x0050, text=» RF(N) AKB366 NUMERIC READ OK«, t00=0x0022, t01=0x0108}
0x3640…3662 Head {h00=0x001e, h01=0x0050, text=»AKB364 LDK A1,4 ERROR CODE«, t00=0x0022, t01=0x012e}
0x3662…3674 Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0022, t01=0x0150}
0x3674…3688 Head {h00=0x0010, h01=0x0050, text=»AKB366 EQU *«, t00=0x0022, t01=0x0162}
0x3688…369c Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0022, t01=0x0176}
0x369c…36b0 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0022, t01=0x018a}
0x36b0…36c4 Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x0023, t01=0x000e}
0x36c4…36d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0022}
0x36d0…36f4 Head {h00=0x0020, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW?«, t00=0x0023, t01=0x002e}
0x36f4…371a Head {h00=0x0022, h01=0x0050, text=»AKB367 ABL(L) AKB210 NO RETURN«, t00=0x0023, t01=0x0052}
0x371a…3744 Head {h00=0x0026, h01=0x0050, text=»AKB368 LDK A1,8 YES SET ERROR CODE«, t00=0x0023, t01=0x0078}
0x3744…375e Head {h00=0x0016, h01=0x0050, text=» RF ENDIO END I/O «, t00=0x0023, t01=0x00a2}
0x375e…376c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00bc}
0x376c…378e Head {h00=0x001e, h01=0x0050, text=»KBMZ30 EQU * TRIPPLE ZERO «, t00=0x0023, t01=0x00ca}
0x378e…37a0 Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x0023, t01=0x00ec}
0x37a0…37b2 Head {h00=0x000e, h01=0x0050, text=» RF KBMZ25«, t00=0x0023, t01=0x00fe}
0x37b2…37d6 Head {h00=0x0020, h01=0x0050, text=»KBMZ20 LDK A4,2 DOUBLE ZERO «, t00=0x0023, t01=0x0110}
0x37d6…37f0 Head {h00=0x0016, h01=0x0050, text=»KBMZ25 LDK A2,/30 «, t00=0x0023, t01=0x0134}
0x37f0…3802 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0023, t01=0x014e}
0x3802…3818 Head {h00=0x0012, h01=0x0050, text=» RB(L) AKB367 «, t00=0x0023, t01=0x0160}
0x3818…382a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0023, t01=0x0176}
0x382a…3840 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0023, t01=0x0188}
0x3840…3852 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0024, t01=0x000e}
0x3852…3866 Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0024, t01=0x0020}
0x3866…387a Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x0024, t01=0x0034}
0x387a…3886 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0048}
0x3886…389a Head {h00=0x0010, h01=0x0050, text=» CW A3,4,A8 «, t00=0x0024, t01=0x0054}
0x389a…38b0 Head {h00=0x0012, h01=0x0050, text=» RB(L) KBMZ25 «, t00=0x0024, t01=0x0068}
0x38b0…38c4 Head {h00=0x0010, h01=0x0050, text=»KBMZ27 EQU *«, t00=0x0024, t01=0x007e}
0x38c4…38e6 Head {h00=0x001e, h01=0x0050, text=» SUK A4,1 ANY MORE ZEROES «, t00=0x0024, t01=0x0092}
0x38e6…390e Head {h00=0x0024, h01=0x0050, text=» RB(L) AKB368 NO,SET RETURN CODE«, t00=0x0024, t01=0x00b4}
0x390e…391a Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0024, t01=0x00dc}
0x391a…3948 Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER «, t00=0x0024, t01=0x00e8}
0x3948…395a Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x0024, t01=0x0116}
0x395a…3980 Head {h00=0x0022, h01=0x0050, text=» CWK A1,DWTSQ FIRST POSITION ?«, t00=0x0024, t01=0x0128}
0x3980…399a Head {h00=0x0016, h01=0x0050, text=» RF(NE) KBMZ29 NO «, t00=0x0024, t01=0x014e}
0x399a…39ca Head {h00=0x002c, h01=0x0050, text=» LDK A1,DWTEQ GET LAST POSITION IN QUEUE«, t00=0x0024, t01=0x0168}
0x39ca…39dc Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x0025, t01=0x0008}
0x39dc…39ee Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0025, t01=0x001a}
0x39ee…3a00 Head {h00=0x000e, h01=0x0050, text=» RF KBMZ40«, t00=0x0025, t01=0x002c}
0x3a00…3a36 Head {h00=0x0032, h01=0x0050, text=»KBMZ29 ADR A1,A6 GET PREIOUS POINTER POSITION «, t00=0x0025, t01=0x003e}
0x3a36…3a48 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0025, t01=0x0074}
0x3a48…3a78 Head {h00=0x002c, h01=0x0050, text=»KBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? «, t00=0x0025, t01=0x0086}
0x3a78…3a9c Head {h00=0x0020, h01=0x0050, text=» RF(E) KBMZ90 NO NOT REALY. «, t00=0x0025, t01=0x00b6}
0x3a9c…3ad0 Head {h00=0x0030, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER «, t00=0x0025, t01=0x00da}
0x3ad0…3afa Head {h00=0x0026, h01=0x0050, text=» LDK A2,/30 STORE ZERO IN CIRKULAR«, t00=0x0025, t01=0x010e}
0x3afa…3b1a Head {h00=0x001c, h01=0x0050, text=» SCR A2,A1 INPUT BUFFER «, t00=0x0025, t01=0x0138}
0x3b1a…3b2c Head {h00=0x000e, h01=0x0050, text=» RB KBMZ27«, t00=0x0025, t01=0x0158}
0x3b2c…3b40 Head {h00=0x0010, h01=0x0050, text=»KBMZ90 EQU *«, t00=0x0025, t01=0x016a}
0x3b40…3b6c Head {h00=0x0028, h01=0x0050, text=» LDK A4,/FF INDICATE BUFFER OWERFLOW«, t00=0x0025, t01=0x017e}
0x3b6c…3b7e Head {h00=0x000e, h01=0x0050, text=» SCR A4,A1«, t00=0x0026, t01=0x001a}
0x3b7e…3ba6 Head {h00=0x0024, h01=0x0050, text=» ST A1,DWTUTQ,A6 UPPDATE POINTER«, t00=0x0026, t01=0x002c}
0x3ba6…3bd2 Head {h00=0x0028, h01=0x0050, text=» LDK A1,/A SET RETURN CODE FOR BOTH «, t00=0x0026, t01=0x0054}
0x3bd2…3c04 Head {h00=0x002e, h01=0x0050, text=»ENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS«, t00=0x0026, t01=0x0080}
0x3c04…3c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00b2}
0x3c0e…3c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00bc}
0x3c18…3c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c6}
0x3c22…3c3c Head {h00=0x0016, h01=0x0050, text=»KBCL10 EQU * CLEAR«, t00=0x0026, t01=0x00d0}
0x3c3c…3c4e Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0026, t01=0x00ea}
0x3c4e…3c62 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/18 «, t00=0x0026, t01=0x00fc}
0x3c62…3c74 Head {h00=0x000e, h01=0x0050, text=» RB AKB366«, t00=0x0026, t01=0x0110}
0x3c74…3c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0122}
0x3c7e…3c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x012c}
0x3c88…3c92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0136}
0x3c92…3ca6 Head {h00=0x0010, h01=0x0050, text=»KBSP10 EQU *«, t00=0x0026, t01=0x0140}
0x3ca6…3cb8 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0026, t01=0x0154}
0x3cb8…3cce Head {h00=0x0012, h01=0x0050, text=» RF(Z) KBSP15 «, t00=0x0026, t01=0x0166}
0x3cce…3ce0 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0026, t01=0x017c}
0x3ce0…3d10 Head {h00=0x002c, h01=0x0050, text=» SUR A2,A2 CLEAR LAST CHAR IN ECB-BUFFER«, t00=0x0026, t01=0x018e}
0x3d10…3d26 Head {h00=0x0012, h01=0x0050, text=» CF A15,STORE «, t00=0x0027, t01=0x002e}
0x3d26…3d38 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0027, t01=0x0044}
0x3d38…3d50 Head {h00=0x0014, h01=0x0050, text=»KBSP15 LDK A2,/8«, t00=0x0027, t01=0x0056}
0x3d50…3d62 Head {h00=0x000e, h01=0x0050, text=» RB AKB366«, t00=0x0027, t01=0x006e}
0x3d62…3d6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0080}
0x3d6c…3d76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x008a}
0x3d76…3d9a Head {h00=0x0020, h01=0x0050, text=»AKB380 LDK A1,0 RETURN CODE «, t00=0x0027, t01=0x0094}
0x3d9a…3da8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x00b8}
0x3da8…3db2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c6}
0x3db2…3dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d0}
0x3dbc…3dec Head {h00=0x002c, h01=0x0050, text=»* THIS IS A COMMON END OF THE DRIVER «, t00=0x0027, t01=0x00da}
0x3dec…3df6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x010a}
0x3df6…3e2c Head {h00=0x0032, h01=0x0050, text=»* SET EFFECTIVE LENGTH AND PERFORM END I/O «, t00=0x0027, t01=0x0114}
0x3e2c…3e54 Head {h00=0x0024, h01=0x0050, text=»* ON KEYBOARD AND ECHO-DEVICE«, t00=0x0027, t01=0x014a}
0x3e54…3e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0172}
0x3e5e…3e68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x017c}
0x3e68…3e7c Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0027, t01=0x0186}
0x3e7c…3e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x000a}
0x3e86…3e92 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0028, t01=0x0014}
0x3e92…3ea8 Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0028, t01=0x0020}
0x3ea8…3ec0 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x0028, t01=0x0036}
0x3ec0…3eee Head {h00=0x002a, h01=0x0050, text=» RF(E) ENDI05 NO TIMING ON THIS DEVICE«, t00=0x0028, t01=0x004e}
0x3eee…3f10 Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x0028, t01=0x007c}
0x3f10…3f24 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0028, t01=0x009e}
0x3f24…3f30 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00b2}
0x3f30…3f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00be}
0x3f3a…3f6a Head {h00=0x002c, h01=0x0050, text=»ENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0028, t01=0x00c8}
0x3f6a…3f7e Head {h00=0x0010, h01=0x0050, text=»ENDI10 EQU *«, t00=0x0028, t01=0x00f8}
0x3f7e…3f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x010c}
0x3f88…3f9c Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0028, t01=0x0116}
0x3f9c…3fb6 Head {h00=0x0016, h01=0x0050, text=» LDR A4,A1 SAVE A1«, t00=0x0028, t01=0x012a}
0x3fb6…3fe2 Head {h00=0x0028, h01=0x0050, text=» CF A5,ECHEND END I/O ON ECHO DEVICE«, t00=0x0028, t01=0x0144}
0x3fe2…4000 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A4 RESTORE A1 «, t00=0x0028, t01=0x0170}
0x4000…400c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x018e}
0x400c…4020 Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0029, t01=0x000a}
0x4020…402a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x001e}
0x402a…4038 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0028}
0x4038…4042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0036}
0x4042…404c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0040}
0x404c…4056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x004a}
0x4056…4068 Head {h00=0x000e, h01=0x0050, text=»* IHKB«, t00=0x0029, t01=0x0054}
0x4068…4072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0066}
0x4072…407c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0070}
0x407c…40c6 Head {h00=0x0046, h01=0x0050, text=»* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER «, t00=0x0029, t01=0x007a}
0x40c6…40d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c4}
0x40d0…40da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00ce}
0x40da…40e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00d8}
0x40e4…40f6 Head {h00=0x000e, h01=0x0050, text=»IHKB EQU *«, t00=0x0029, t01=0x00e2}
0x40f6…410a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0029, t01=0x00f4}
0x410a…4138 Head {h00=0x002a, h01=0x0050, text=» CF A15,KONVER CONVERT INPUT CHARACTER«, t00=0x0029, t01=0x0108}
0x4138…415c Head {h00=0x0020, h01=0x0050, text=» LDR A4,A4 TEST TYPE OF CHAR«, t00=0x0029, t01=0x0136}
0x415c…4180 Head {h00=0x0020, h01=0x0050, text=» RF(P) EXIT SHIFT/CTRL/SKIP «, t00=0x0029, t01=0x015a}
0x4180…419e Head {h00=0x001a, h01=0x0050, text=» RF(N) IHKB12 KEY-LOCK«, t00=0x0029, t01=0x017e}
0x419e…41a6 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x000c}
0x41a6…41ca Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 NORMAL CHAR «, t00=0x002a, t01=0x0014}
0x41ca…41e0 Head {h00=0x0012, h01=0x0050, text=» IFT KBLOCK=1 «, t00=0x002a, t01=0x0038}
0x41e0…41f4 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x002a, t01=0x004e}
0x41f4…4208 Head {h00=0x0010, h01=0x0050, text=» RF(Z) EXIT «, t00=0x002a, t01=0x0062}
0x4208…422c Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 I/O REQUEST?«, t00=0x002a, t01=0x0076}
0x422c…4238 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x009a}
0x4238…4266 Head {h00=0x002a, h01=0x0050, text=» RF(N) IHKB15 NO READ REQUEST PENDING «, t00=0x002a, t01=0x00a6}
0x4266…428c Head {h00=0x0022, h01=0x0050, text=» SLL A3,7 INTERRUPT ALLOWED ? «, t00=0x002a, t01=0x00d4}
0x428c…42c4 Head {h00=0x0034, h01=0x0050, text=» RF(NN) IHKB15 NO, STORE CHARACTER IN DWT-BUFFER«, t00=0x002a, t01=0x00fa}
0x42c4…42da Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x002a, t01=0x0132}
0x42da…42f2 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTP,A6 «, t00=0x002a, t01=0x0148}
0x42f2…4320 Head {h00=0x002a, h01=0x0050, text=» RF(E) IHKB07 NO TIMING ON THIS DEVICE«, t00=0x002a, t01=0x0160}
0x4320…4344 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,-TIME RESTART TIME «, t00=0x002a, t01=0x018e}
0x4344…435c Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x002b, t01=0x0022}
0x435c…4368 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x003a}
0x4368…4398 Head {h00=0x002c, h01=0x0050, text=»IHKB07 ABL LDREG RETURN TO READ ROUTINE «, t00=0x002b, t01=0x0046}
0x4398…43c8 Head {h00=0x002c, h01=0x0050, text=»IHKB12 CF A15,KEYSET SET KEY CODE IN DWT«, t00=0x002b, t01=0x0076}
0x43c8…43da Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x002b, t01=0x00a6}
0x43da…43fc Head {h00=0x001e, h01=0x0050, text=» RF(Z) EXIT NO KEY CHANGE «, t00=0x002b, t01=0x00b8}
0x43fc…4414 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x002b, t01=0x00da}
0x4414…4440 Head {h00=0x0028, h01=0x0050, text=» RF(N) EXIT NO READ REQUEST PENDING «, t00=0x002b, t01=0x00f2}
0x4440…4452 Head {h00=0x000e, h01=0x0050, text=» SLL A3,7 «, t00=0x002b, t01=0x011e}
0x4452…447c Head {h00=0x0026, h01=0x0050, text=» RF(NN) EXIT INERRUPT NOT ALLOWED «, t00=0x002b, t01=0x0130}
0x447c…44a8 Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTA3,A6 RESTORE BUFFER INDEX«, t00=0x002b, t01=0x015a}
0x44a8…44c0 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x002b, t01=0x0186}
0x44c0…44d2 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x002c, t01=0x000e}
0x44d2…44e6 Head {h00=0x0010, h01=0x0050, text=» ABL AKB210 «, t00=0x002c, t01=0x0020}
0x44e6…44ee Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0034}
0x44ee…450c Head {h00=0x001a, h01=0x0050, text=»IHKB15 LD A1,DWTINQ,A6«, t00=0x002c, t01=0x003c}
0x450c…451e Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x002c, t01=0x005a}
0x451e…4544 Head {h00=0x0022, h01=0x0050, text=» XRK A4,/FF ALREADY OVERFLOW? «, t00=0x002c, t01=0x006c}
0x4544…455c Head {h00=0x0014, h01=0x0050, text=» RF(E) EXIT YES «, t00=0x002c, t01=0x0092}
0x455c…456e Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x002c, t01=0x00aa}
0x456e…45a6 Head {h00=0x0034, h01=0x0050, text=» CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS«, t00=0x002c, t01=0x00bc}
0x45a6…45c8 Head {h00=0x001e, h01=0x0050, text=» CW A1,DWTUTQ,A6 OVERFLOW?«, t00=0x002c, t01=0x00f4}
0x45c8…45f4 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY «, t00=0x002c, t01=0x0116}
0x45f4…4628 Head {h00=0x0030, h01=0x0050, text=» ORK A2,/FF SET OVERFLOWBIT IN INPUT BUFFER «, t00=0x002c, t01=0x0142}
0x4628…463a Head {h00=0x000e, h01=0x0050, text=» RF IHKB30«, t00=0x002c, t01=0x0176}
0x463a…466e Head {h00=0x0030, h01=0x0050, text=»IHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER«, t00=0x002c, t01=0x0188}
0x466e…4686 Head {h00=0x0014, h01=0x0050, text=»IHKB30 SCR A2,A3«, t00=0x002d, t01=0x002c}
0x4686…469c Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x002d, t01=0x0044}
0x469c…46a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x005a}
0x46a6…46b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0064}
0x46b4…46be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0072}
0x46be…46c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x007c}
0x46c8…46d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0086}
0x46d2…46e6 Head {h00=0x0010, h01=0x0050, text=»* AKBTUT«, t00=0x002d, t01=0x0090}
0x46e6…46f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00a4}
0x46f0…471a Head {h00=0x0026, h01=0x0050, text=»* THIS IS THE TIME-OUT ROUTINE«, t00=0x002d, t01=0x00ae}
0x471a…4724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00d8}
0x4724…472e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00e2}
0x472e…4738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ec}
0x4738…474e Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x002d, t01=0x00f6}
0x474e…4762 Head {h00=0x0010, h01=0x0050, text=»AKBTUT EQU *«, t00=0x002d, t01=0x010c}
0x4762…4788 Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTART DWT-ADDRESS«, t00=0x002d, t01=0x0120}
0x4788…47ac Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 SET RETURNE CODE«, t00=0x002d, t01=0x0146}
0x47ac…47c0 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x002d, t01=0x016a}
0x47c0…47d8 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x002d, t01=0x017e}
0x47d8…4806 Head {h00=0x002a, h01=0x0050, text=» RB(N) EXIT DISPATCH IF NO REQUEST ON «, t00=0x002e, t01=0x0008}
0x4806…4836 Head {h00=0x002c, h01=0x0050, text=» RB IHKB07 RESTORE REGISTER AND END I/O «, t00=0x002e, t01=0x0036}
0x4836…4842 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0066}
0x4842…4850 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0072}
0x4850…485a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0080}
0x485a…4864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x008a}
0x4864…486e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0094}
0x486e…4878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x009e}
0x4878…488c Head {h00=0x0010, h01=0x0050, text=»* KEYSET «, t00=0x002e, t01=0x00a8}
0x488c…4896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00bc}
0x4896…48a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c6}
0x48a0…48aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00d0}
0x48aa…48da Head {h00=0x002c, h01=0x0050, text=»* ON ENTRY: A4= NEG KEY-LOCK VALUE «, t00=0x002e, t01=0x00da}
0x48da…48e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010a}
0x48e4…4928 Head {h00=0x0040, h01=0x0050, text=»* ON EXIT: A3= ZERO IF IF NO CHANGE IN KEYS, ELSE POS «, t00=0x002e, t01=0x0114}
0x4928…4932 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0158}
0x4932…493c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0162}
0x493c…4950 Head {h00=0x0010, h01=0x0050, text=»KEYSET EQU *«, t00=0x002e, t01=0x016c}
0x4950…4964 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x002e, t01=0x0180}
0x4964…497c (47, 0, 400) Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x002f, t01=0x0004}
0x497c…4992 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/100 «, t00=0x002f, t01=0x001c}
0x4992…49aa Head {h00=0x0014, h01=0x0050, text=»SET100 SRL A2,1 «, t00=0x002f, t01=0x0032}
0x49aa…49ce Head {h00=0x0020, h01=0x0050, text=» ADK A4,2 IN A4: 1=OFF 0=ON«, t00=0x002f, t01=0x004a}
0x49ce…49e4 Head {h00=0x0012, h01=0x0050, text=» RB(N) SET100 «, t00=0x002f, t01=0x006e}
0x49e4…4a0c Head {h00=0x0024, h01=0x0050, text=» ANR A3,A2 CHEC OLD KEY POSITION«, t00=0x002f, t01=0x0084}
0x4a0c…4a32 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SET300 JUMP IF KEY ON «, t00=0x002f, t01=0x00ac}
0x4a32…4a44 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x002f, t01=0x00d2}
0x4a44…4a5a Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SET500«, t00=0x002f, t01=0x00e4}
0x4a5a…4a6c Head {h00=0x000e, h01=0x0050, text=» RF SET400«, t00=0x002f, t01=0x00fa}
0x4a6c…4a84 Head {h00=0x0014, h01=0x0050, text=»SET300 LDR A4,A4«, t00=0x002f, t01=0x010c}
0x4a84…4a9a Head {h00=0x0012, h01=0x0050, text=» RF(Z) SET500 «, t00=0x002f, t01=0x0124}
0x4a9a…4ab8 Head {h00=0x001a, h01=0x0050, text=»SET400 LD A3,DWTST,A6 «, t00=0x002f, t01=0x013a}
0x4ab8…4aca Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x002f, t01=0x0158}
0x4aca…4adc Head {h00=0x000e, h01=0x0050, text=» SRL A2,4 «, t00=0x002f, t01=0x016a}
0x4adc…4aee Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x002f, t01=0x017c}
0x4aee…4b06 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x002f, t01=0x018e}
0x4b06…4b34 Head {h00=0x002a, h01=0x0050, text=» LDK A3,1 A3=1 IF KEY LOCK HAS CHANGED«, t00=0x0030, t01=0x0016}
0x4b34…4b4e Head {h00=0x0016, h01=0x0050, text=»SET500 LDR* A4,A15«, t00=0x0030, t01=0x0044}
0x4b4e…4b5e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0030, t01=0x005e}
0x4b5e…4b6c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x006e}
0x4b6c…4b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x007c}
0x4b76…4b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0086}
0x4b80…4b8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0090}
0x4b8a…4b9e Head {h00=0x0010, h01=0x0050, text=»* KONVER«, t00=0x0030, t01=0x009a}
0x4b9e…4ba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00ae}
0x4ba8…4bd6 Head {h00=0x002a, h01=0x0050, text=»* KONVER CONVERTS INPUT CHARACTER «, t00=0x0030, t01=0x00b8}
0x4bd6…4be0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00e6}
0x4be0…4bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00f0}
0x4bea…4c16 Head {h00=0x0028, h01=0x0050, text=»* ON ENTRY: A2= INPUT CHARACTER «, t00=0x0030, t01=0x00fa}
0x4c16…4c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0126}
0x4c20…4c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0130}
0x4c2a…4c58 Head {h00=0x002a, h01=0x0050, text=»* ON EXIT: A2=COVERTED CHARACTER «, t00=0x0030, t01=0x013a}
0x4c58…4ca8 Head {h00=0x004c, h01=0x0050, text=»* A4= NEG IF KEY-LOCK, ZERO IF CHARACTER,POS IF CTRL,SHIFT«, t00=0x0030, t01=0x0168}
0x4ca8…4cd0 Head {h00=0x0024, h01=0x0050, text=»* A5 IS DESTROYED!«, t00=0x0031, t01=0x0028}
0x4cd0…4cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0050}
0x4cda…4ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x005a}
0x4ce4…4cf8 Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0031, t01=0x0064}
0x4cf8…4d0a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0031, t01=0x0078}
0x4d0a…4d20 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0031, t01=0x008a}
0x4d20…4d3e Head {h00=0x001a, h01=0x0050, text=» SUK A4,/7C CODE > /7B«, t00=0x0031, t01=0x00a0}
0x4d3e…4d58 Head {h00=0x0016, h01=0x0050, text=» RF(NN) KON500 YES«, t00=0x0031, t01=0x00be}
0x4d58…4d7c Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 RESTORE CHARACTER«, t00=0x0031, t01=0x00d8}
0x4d7c…4d88 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x00fc}
0x4d88…4dc4 Head {h00=0x0038, h01=0x0050, text=» STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION«, t00=0x0031, t01=0x0108}
0x4dc4…4dd8 Head {h00=0x0010, h01=0x0050, text=» LDR* A5,A6 «, t00=0x0031, t01=0x0144}
0x4dd8…4dec Head {h00=0x0010, h01=0x0050, text=» SUK A4,/20 «, t00=0x0031, t01=0x0158}
0x4dec…4e0a Head {h00=0x001a, h01=0x0050, text=» RF(N) KON105 FUNCTION«, t00=0x0031, t01=0x016c}
0x4e0a…4e24 Head {h00=0x0016, h01=0x0050, text=»KON100 SUK A4,/40 «, t00=0x0031, t01=0x018a}
0x4e24…4e46 Head {h00=0x001e, h01=0x0050, text=» RF(N) KON180 ALFANUMERIC «, t00=0x0032, t01=0x0014}
0x4e46…4e62 Head {h00=0x0018, h01=0x0050, text=» SUK A4,/10 FUNCTION«, t00=0x0032, t01=0x0036}
0x4e62…4e7c Head {h00=0x0016, h01=0x0050, text=» RF(NN) KON110 NO «, t00=0x0032, t01=0x0052}
0x4e7c…4e94 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/40 YES «, t00=0x0032, t01=0x006c}
0x4e94…4ea8 Head {h00=0x0010, h01=0x0050, text=»KON105 EQU *«, t00=0x0032, t01=0x0084}
0x4ea8…4ebc Head {h00=0x0010, h01=0x0050, text=» ANK A5,/10 «, t00=0x0032, t01=0x0098}
0x4ebc…4ece Head {h00=0x000e, h01=0x0050, text=» SRL A5,3 «, t00=0x0032, t01=0x00ac}
0x4ece…4ee0 Head {h00=0x000e, h01=0x0050, text=» RF KON200«, t00=0x0032, t01=0x00be}
0x4ee0…4f0e Head {h00=0x002a, h01=0x0050, text=»KON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT «, t00=0x0032, t01=0x00d0}
0x4f0e…4f2c Head {h00=0x001a, h01=0x0050, text=» RF(N) KON400 KEY-LOCK«, t00=0x0032, t01=0x00fe}
0x4f2c…4f4a Head {h00=0x001a, h01=0x0050, text=» RF(Z) KON140 SHIFT ON«, t00=0x0032, t01=0x011c}
0x4f4a…4f5c Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0032, t01=0x013a}
0x4f5c…4f7c Head {h00=0x001c, h01=0x0050, text=» RF(N) KON160 SHIFT OFF «, t00=0x0032, t01=0x014c}
0x4f7c…4f9c Head {h00=0x001c, h01=0x0050, text=» RF(Z) KON170 CONTROL ON«, t00=0x0032, t01=0x016c}
0x4f9c…4fb2 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0032, t01=0x018c}
0x4fb2…4fc4 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0033, t01=0x0012}
0x4fc4…4fe6 Head {h00=0x001e, h01=0x0050, text=» RF(N) KON125 CONTROL OFF «, t00=0x0033, t01=0x0024}
0x4fe6…500e Head {h00=0x0024, h01=0x0050, text=» RF(E) KON140 NUMERICAL SHIFT ON«, t00=0x0033, t01=0x0046}
0x500e…5034 Head {h00=0x0022, h01=0x0050, text=» RF KON160 NUMERICAL SHIFT OFF«, t00=0x0033, t01=0x006e}
0x5034…5040 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0094}
0x5040…5054 Head {h00=0x0010, h01=0x0050, text=»KON125 EQU *«, t00=0x0033, t01=0x00a0}
0x5054…5072 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,/FFDF UNCTRL «, t00=0x0033, t01=0x00b4}
0x5072…508a Head {h00=0x0014, h01=0x0050, text=»KON120 ANR A5,A2«, t00=0x0033, t01=0x00d2}
0x508a…50aa Head {h00=0x001c, h01=0x0050, text=»KON130 STR A5,A6 DWTCHP «, t00=0x0033, t01=0x00ea}
0x50aa…50be Head {h00=0x0010, h01=0x0050, text=» LDK A4,/10 «, t00=0x0033, t01=0x010a}
0x50be…50da Head {h00=0x0018, h01=0x0050, text=» RF KON400 GO HOME! «, t00=0x0033, t01=0x011e}
0x50da…50ee Head {h00=0x0010, h01=0x0050, text=»KON140 EQU *«, t00=0x0033, t01=0x013a}
0x50ee…5104 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0033, t01=0x014e}
0x5104…5116 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0033, t01=0x0164}
0x5116…512a Head {h00=0x0010, h01=0x0050, text=» ANK A4,/10 «, t00=0x0033, t01=0x0176}
0x512a…514c Head {h00=0x001e, h01=0x0050, text=» RF(Z) KON145 SHIFT NOT ON«, t00=0x0033, t01=0x018a}
0x514c…5160 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/90 «, t00=0x0034, t01=0x001c}
0x5160…5172 Head {h00=0x000e, h01=0x0050, text=» RF KON150«, t00=0x0034, t01=0x0030}
0x5172…517e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0042}
0x517e…5192 Head {h00=0x0010, h01=0x0050, text=»KON145 EQU *«, t00=0x0034, t01=0x004e}
0x5192…51ac Head {h00=0x0016, h01=0x0050, text=» LDK A2,/10 SHIFT «, t00=0x0034, t01=0x0062}
0x51ac…51c4 Head {h00=0x0014, h01=0x0050, text=»KON150 ORR A5,A2«, t00=0x0034, t01=0x007c}
0x51c4…51d6 Head {h00=0x000e, h01=0x0050, text=» RB KON130«, t00=0x0034, t01=0x0094}
0x51d6…51ea Head {h00=0x0010, h01=0x0050, text=»KON160 EQU *«, t00=0x0034, t01=0x00a6}
0x51ea…5200 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=1 «, t00=0x0034, t01=0x00ba}
0x5200…5212 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0034, t01=0x00d0}
0x5212…5226 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/80 «, t00=0x0034, t01=0x00e2}
0x5226…523c Head {h00=0x0012, h01=0x0050, text=» RF(Z) KON165 «, t00=0x0034, t01=0x00f6}
0x523c…5252 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FF7F«, t00=0x0034, t01=0x010c}
0x5252…5264 Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x0122}
0x5264…5270 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0134}
0x5270…5284 Head {h00=0x0010, h01=0x0050, text=»KON165 EQU *«, t00=0x0034, t01=0x0140}
0x5284…529a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FFEF«, t00=0x0034, t01=0x0154}
0x529a…52ac Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x016a}
0x52ac…52be Head {h00=0x000e, h01=0x0050, text=» RB KON120«, t00=0x0034, t01=0x017c}
0x52be…52dc Head {h00=0x001a, h01=0x0050, text=»KON170 LDK A2,/20 CTRL«, t00=0x0034, t01=0x018e}
0x52dc…52ee Head {h00=0x000e, h01=0x0050, text=» RB KON150«, t00=0x0035, t01=0x001c}
0x52ee…5312 Head {h00=0x0020, h01=0x0050, text=»KON180 SUK A2,/20 FIND INDEX«, t00=0x0035, t01=0x002e}
0x5312…5326 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/30 «, t00=0x0035, t01=0x0052}
0x5326…5338 Head {h00=0x000e, h01=0x0050, text=» SRL A5,3 «, t00=0x0035, t01=0x0066}
0x5338…534a Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0035, t01=0x0078}
0x534a…5386 Head {h00=0x0038, h01=0x0050, text=»KON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS «, t00=0x0035, t01=0x008a}
0x5386…5398 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x0035, t01=0x00c6}
0x5398…53ac Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A4 «, t00=0x0035, t01=0x00d8}
0x53ac…53c2 Head {h00=0x0012, h01=0x0050, text=» RF(Z) KON400 «, t00=0x0035, t01=0x00ec}
0x53c2…53d4 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A2«, t00=0x0035, t01=0x0102}
0x53d4…5402 Head {h00=0x002a, h01=0x0050, text=» LDR* A2,A15 RESTORE A2 AND A15-STACK «, t00=0x0035, t01=0x0114}
0x5402…542e Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET CHARACTER FROM TABLE «, t00=0x0035, t01=0x0142}
0x542e…5450 Head {h00=0x001e, h01=0x0050, text=» CWK A2,/00FF IGNORE? DSB1«, t00=0x0035, t01=0x016e}
0x5450…546c Head {h00=0x0018, h01=0x0050, text=» RF(E) KON550 DSB1 «, t00=0x0035, t01=0x0190}
0x546c…549a Head {h00=0x002a, h01=0x0050, text=»KON250 LDK A4,0 A4=0 IF NOT KEY-LOCK$$«, t00=0x0036, t01=0x001c}
0x549a…54b0 Head {h00=0x0012, h01=0x0050, text=»KON300 RTN A15«, t00=0x0036, t01=0x004a}
0x54b0…54e8 Head {h00=0x0034, h01=0x0050, text=»KON400 LDR* A2,A15 NO CONVERSION, KEEP CHARACTER«, t00=0x0036, t01=0x0060}
0x54e8…54fa Head {h00=0x000e, h01=0x0050, text=» RB KON300«, t00=0x0036, t01=0x0098}
0x54fa…5510 Head {h00=0x0012, h01=0x0050, text=» IFT NSHIFT=0 «, t00=0x0036, t01=0x00aa}
0x5510…5524 Head {h00=0x0010, h01=0x0050, text=»KON500 EQU *«, t00=0x0036, t01=0x00c0}
0x5524…5544 Head {h00=0x001c, h01=0x0050, text=» LDR A4,A4 KEY CODE /7C «, t00=0x0036, t01=0x00d4}
0x5544…555e Head {h00=0x0016, h01=0x0050, text=» RF(Z) KON600 YES «, t00=0x0036, t01=0x00f4}
0x555e…558e Head {h00=0x002c, h01=0x0050, text=»KON550 LDK A4,1 INDICATE SKIP CHARACTER «, t00=0x0036, t01=0x010e}
0x558e…559e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0036, t01=0x013e}
0x559e…55b2 Head {h00=0x0010, h01=0x0050, text=»KON600 EQU *«, t00=0x0036, t01=0x014e}
0x55b2…55c4 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A2«, t00=0x0036, t01=0x0162}
0x55c4…55e6 Head {h00=0x001e, h01=0x0050, text=» RB KONVER DO START AGAIN «, t00=0x0036, t01=0x0174}
0x55e6…55f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0008}
0x55f2…5600 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0014}
0x5600…560a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0022}
0x560a…5642 Head {h00=0x0034, h01=0x0050, text=»* STORE = SUBROUTINE TO STORE A CHARACTER IN «, t00=0x0037, t01=0x002c}
0x5642…567c Head {h00=0x0036, h01=0x0050, text=»* ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0037, t01=0x0064}
0x567c…5686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x009e}
0x5686…569c Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0037, t01=0x00a8}
0x569c…56a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00be}
0x56a6…56ca Head {h00=0x0020, h01=0x0050, text=»* A2 = CHARACTER TO STORE«, t00=0x0037, t01=0x00c8}
0x56ca…56e8 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x0037, t01=0x00ec}
0x56e8…56f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x010a}
0x56f2…56fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0114}
0x56fc…5710 Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x0037, t01=0x011e}
0x5710…5732 Head {h00=0x001e, h01=0x0050, text=» LD A4,2,A8 BUFFER ADDRESS«, t00=0x0037, t01=0x0132}
0x5732…5756 Head {h00=0x0020, h01=0x0050, text=» ADR A4,A3 ADD BUFFER INDEX «, t00=0x0037, t01=0x0154}
0x5756…5782 Head {h00=0x0028, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER IN BUFFER«, t00=0x0037, t01=0x0178}
0x5782…57aa Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0038, t01=0x0014}
0x57aa…57c4 Head {h00=0x0016, h01=0x0050, text=»STORTN ADKL A15,2 «, t00=0x0038, t01=0x003c}
0x57c4…57d8 Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x0038, t01=0x0056}
0x57d8…57e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x006a}
0x57e6…57f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0078}
0x57f0…57fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0082}
0x57fa…5834 Head {h00=0x0036, h01=0x0050, text=»* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER«, t00=0x0038, t01=0x008c}
0x5834…583e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00c6}
0x583e…5854 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0038, t01=0x00d0}
0x5854…585e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00e6}
0x585e…587e Head {h00=0x001c, h01=0x0050, text=»* A1 = QUEUE POINTER «, t00=0x0038, t01=0x00f0}
0x587e…589c Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0038, t01=0x0110}
0x589c…58a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x012e}
0x58a6…58bc Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x0038, t01=0x0138}
0x58bc…58c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014e}
0x58c6…58ea Head {h00=0x0020, h01=0x0050, text=»* A1 = NEW QUEUE POINTER «, t00=0x0038, t01=0x0158}
0x58ea…58fe Head {h00=0x0010, h01=0x0050, text=»EOQUEU EQU *«, t00=0x0038, t01=0x017c}
0x58fe…5910 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0038, t01=0x0190}
0x5910…5922 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x0039, t01=0x0012}
0x5922…5946 Head {h00=0x0020, h01=0x0050, text=» CWK A1,DWTEQ END OF QUEUE? «, t00=0x0039, t01=0x0024}
0x5946…595c Head {h00=0x0012, h01=0x0050, text=» RF(NE) EOQU10«, t00=0x0039, t01=0x0048}
0x595c…598a Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTSQ SET QUEUE START ADDRESS «, t00=0x0039, t01=0x005e}
0x598a…59a2 Head {h00=0x0014, h01=0x0050, text=»EOQU10 ADR A1,A6«, t00=0x0039, t01=0x008c}
0x59a2…59b4 Head {h00=0x000e, h01=0x0050, text=» RB STORTN«, t00=0x0039, t01=0x00a4}
0x59b4…59c0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0039, t01=0x00b6}
0x59c0…59c4 Head {h00=0x4004, h01=0x0000}
0x59c4…59c8 00 39 00 c2 ┆ 9 ┆
0x59c8…59d0 (58, 1, 8) 20 04 00 00 00 3a 00 04 ┆ : ┆
0x59d0…5a20 (59, 2, 328) 00 34 00 46 20 20 49 44 45 4e 54 20 20 49 3a 45 56 53 20 20 20 20 50 2c 52 45 4c 3d 34 2e 32 2c 37 39 31 31 31 36 2c 38 37 30 31 33 36 39 34 30 34 32 30 20 00 92 00 04 00 16 00 12 01 08 c4 49 3a 45 56 53 31 4b c4 49 3a 45 56 53 32 00 00 92 ┆ 4 F IDENT I:EVS P,REL=4.2,791116,870136940420 I:EVS1K I:EVS2 ┆
0x5a20…5a70 00 3c 00 0e 00 0a 02 04 c2 49 3a 45 56 41 30 c4 00 92 00 56 00 2c 00 28 03 13 00 00 00 01 41 00 f6 a1 00 00 00 02 82 86 86 14 84 0c f6 a1 00 00 00 02 eb a0 00 6a 50 04 eb a0 00 6b 54 02 04 00 00 92 00 68 00 10 00 0c 05 05 dc 49 3a 45 56 53 ┆ < I:EVA0 V , ( A jP kT h I:EVS┆
0x5a70…5ac0 31 4b 00 38 00 92 00 98 00 2c 00 28 03 13 00 01 00 1d 00 00 01 20 a4 05 54 00 92 a6 f0 3a 81 26 82 04 39 21 92 84 22 01 3a e1 24 ff ac 08 f0 3a f6 a1 00 00 00 92 00 ac 00 0e 00 0a 02 04 c2 49 3a 45 56 41 32 00 00 92 00 dc 00 10 00 0c 05 05 ┆1K 8 , ( T : & 9! " : $ : I:EVA2 ┆
0x5ac0…5b10 dc 49 3a 45 56 53 32 00 00 00 00 92 00 ee 00 1c 00 18 03 0b 00 00 00 3d 20 00 87 06 f6 a1 00 00 00 04 81 06 81 9c 87 24 f0 3a 00 92 01 02 00 0c 00 08 04 03 00 00 00 21 54 04 00 92 01 22 00 0e 00 0a 07 04 00 00 00 00 00 4a 00 00 00 92 01 32 ┆ I:EVS2 = $ : !T " J 2┆
0x5b10…5b18 40 04 00 00 00 92 01 44 ┆@ D┆
0x5b18…5b68 (60, 0, 400) 00 34 00 46 20 20 49 44 45 4e 54 20 20 49 3a 41 44 53 20 20 20 20 50 2c 52 45 4c 3d 34 2e 32 2c 37 39 31 31 31 36 2c 38 37 30 31 33 36 39 34 30 34 32 30 20 00 75 00 04 00 12 00 0e 01 06 a4 49 3a 41 44 44 a4 49 3a 53 55 42 00 75 00 3c 00 0e ┆ 4 F IDENT I:ADS P,REL=4.2,791116,870136940420 u I:ADD I:SUB u < ┆
0x5b68…5bb8 00 0a 05 04 bc 49 3a 41 44 44 00 00 00 75 00 52 00 0e 00 0a 05 04 bc 49 3a 53 55 42 00 06 00 75 00 64 00 2c 00 28 03 13 00 00 00 01 00 00 83 a0 ff a0 57 00 b3 8e 82 0c 22 10 54 00 81 26 83 8e 54 02 99 05 80 d6 00 02 91 2b f0 81 f0 3a 00 75 ┆ I:ADD u R I:SUB u d , ( W " T & T + : u┆
0x5bb8…5c08 00 76 00 0c 00 08 02 03 a2 49 3a 43 50 41 00 75 00 a6 00 2c 00 28 03 13 00 00 00 21 00 08 87 18 80 8a e1 2a e2 26 b1 08 21 40 50 02 01 60 31 60 93 84 50 00 f6 a1 00 00 00 02 51 00 81 18 00 75 00 b6 00 22 00 1e 03 0e 00 00 00 3f 00 00 86 14 ┆ v I:CPA u , ( ! * & !@P `1` P Q u " ? ┆
0x5c08…5c58 85 04 81 0a 82 86 81 84 84 20 ff ff 84 5b ff fe 04 00 84 3b 00 75 00 e6 00 2c 00 28 03 13 00 00 00 55 00 00 1e 01 1d 01 1f 01 e1 38 83 04 b6 0b 56 04 ea 98 57 02 ee 0a 51 00 50 02 03 00 01 00 e1 5b ff fe 00 75 01 0c 00 2c 00 28 03 13 00 00 ┆ [ ; u , ( U 8 V W Q P [ u , ( ┆
0x5c58…5ca8 00 75 00 00 21 f0 19 f0 58 0a 11 f0 23 0f 1b 0f 50 02 13 0f 93 10 e2 34 84 08 b5 07 56 04 e9 94 57 02 ed 06 00 75 01 3c 00 2c 00 28 03 13 00 00 00 95 00 00 51 00 50 02 04 00 02 00 e2 5b ff ff 22 f0 1a f0 58 0a 12 f0 24 0f 1c 0f 50 02 14 0f ┆ u ! X # P 4 V W u < , ( Q P [ " X $ P ┆