|
|
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: 14084 (0x3704)
Notes: pts_type(SC)
Names: »LRPINT.SC«
└─⟦1fa4b7c7b⟧ Bits:30009694 Philips computer tape "600410A"
└─⟦this⟧ »MODMON/LRPINT.SC«
IDENT LRPINT 9.2DK 1 79-11-16 870105040920 =DK1, HANGING REM. TERM. 80-03-11 * * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * LRPINT = INTERRUPT HANDLERS FOR LKM, RTC * AND POWER FAILURE * * * * * ************************************************** * * * THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS * FOR TOSS. THESE ARE: * * -IHLKM: LKM INTERRUPT * * -IHRTC: RTC INTERRUPT * * -IHPFAR: POWER FAILURE INTERRUPT * * IN THIS MODULE ENTRIES FOR REQUEST ERRORS ALSO ARE * PROVIDED. THESE ARE: * * -LKMRQE: SET A7 = -1, QUEUE JOB AND DISPATCH * * -LKMQDI: QUEUE JOB AND DISPATCH * EJECT LRPINT * * *********** * ENTRIES * *********** * * ENTRY IHLKM LKM INTERRUPT HANDLER ENTRY LKM030 SPECIAL TLDSEG REQUEST ERROR ENTRY ENTRY LKMRQE LKM REQUEST ERROR ENTRY LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR ENTRY LKMQDI QUEUE JOB AND DISPATCH ENTRY IHRTC RTC INTERRUPT HANDLER ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE ENTRY MONCLO MONITOR CLOCK ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER ENTRY INIFLG INITIALIZATION FLAG EJECT LRPINT * * ************* * EXTERNALS * ************* * * EXTRN TDISP DISPATCHER EXTRN DISQUE DISPATCHER QUEUE EXTRN PRUN TTAB OF RUNNING PROGRAM EXTRN MEXIT MONITOR TASK EXIT EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE EXTRN QTJOB QUEUE TASK EXTRN QMJOB QUEUE MONITOR JOB EXTRN SWL48 SWITCH TO LEVEL 48 EXTRN SWLXY SWITCH TO LEVEL XY EXTRN FREBLK SET BLOCK FREE EXTRN SAVE8 SAVE 8 REGISTERS EXTRN PFINIT RESTART OF DEVICES EXTRN HALT HALT MODULE EXTRN INTSAV INTERRUPT SAVE MODULE EXTRN TTABLD LOAD TASK TTAB EXTRN PQEMTY PAGE QUEUE EMPTY FLAG EXTRN PAGQUE FREE PAGE QUEUE EXTRN SEG:PB PAGE BLOCK ADDRESS EXTRN PAG:QB QUEUE LINK BACKWARD EXTRN TTB:SB SEGMENT BLOCK POINTER EXTRN TTB:PW PROGRAM STATUS WORD EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB EXTRN LKMAL LKM REQUEST TABLE EJECT LRPINT * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * 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 * * * A PROGRAM VERSION USING TOSS DISC PAGING * IS OBTAINED BY SETTING DSKPAG EQU 1. * DSKPAG EQU 0 * * * A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS * IS OBTAINED BY SETTING MCLOCK EQU 0. * X:A EQU 1 MONCLK EQU 1 * EJECT LRPINT * * * I H L K M * * * THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING * STEPS ARE CARRIED OUT: * * - IF STACK OVERFLOW SYSTEM HALTS. * * - ELSE REGISTERS A1 - A14 ARE SAVED IN TTAB FOR RUNNING * PROGRAM. * * - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO * APPROPRIATE LKM PROCESSOR. * * EXIT CONDITIONS ARE: * * A4 = LABEL ADDRESS OF LKM REQUEST * (A4 = 0 INDICATES NO LABEL IN LKM REQUEST) * A5 = TTAB ADDRESS OF CALLING PROGRAM * A2, A3 AND A6 ARE LOST. * * ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING * PROGRAM. * * * IHLKM EQU * ST P,INTSAV SAVE LAST INTERRUPT RIT /1D RESET INTERNAL INTERRUPT FLAG * EJECT LRPINT * * ST A15,LKM010 SAVE A15 LD A15,PRUN LOAD TTAB ADDRESS * IFT CPU852=1 ADKL A15,TTB:SA+28 SET A15 TO LAST IN SAVE AREA STR A14,A15 SAVE USER REGISTERS, -A14 STR A13,A15 -A13 STR A12,A15 -A12 STR A11,A15 -A11 STR A10,A15 -A10 STR A9,A15 -A9 STR A8,A15 -A8 STR A7,A15 -A7 STR A6,A15 -A6 STR A5,A15 -A5 STR A4,A15 -A4 STR A3,A15 -A3 STR A2,A15 -A2 STR A1,A15 -A1 XIF * IFT CPU852=0 MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA XIF * LD A5,PRUN GET TTAB ADDRESS OF CALLING TASK LDKL A15,0 RESTORE A15 STACK POINTER LKM010 EQU *-2 * EJECT LRPINT * * GET LKM REQUEST PARAMETERS * LDR* A3,A15 LDR* A2,A15 LOAD P.C. AND ADJUST STACK POINTER ST A3,TTB:PW,A5 STORE PSW IN TTAB * IFT MMUPAG=0 LD A3,-2,A2 GET INSTRUCTION CODE LDR* A6,A2 GET DATA DIRECTIVE XIF * IFT MMUPAG=1 ANK A3,1 RF(NZ) LKM015 USER MODE? TL MONMMU NO, LOAD MONITOR MMU TABLE * LKM015 EQU * EL A3,-2,A2 GET INSTRUCTION CODE ELR A6,A2 GET DATA DIRECTIVE XIF * CWK A3,/2804 RF(E) LKM025 LKM? CWK A3,/6300 RF(E) LKM025 TRAP? * * STACK OVERFLOW: HALT SYSTEM * LDK A1,7 HALT PARAMETER RF LKM070 HALT SYSTEM DUE TO STACK OVERFLOW * EJECT LRPINT * * LKM025 EQU * IFT DSKPAG=1 LD A3,TTB:SB,A5 GET SEGMENT BLOCK ADDRESS RF(Z) LKM027 NO SEGMENT? LDR* A4,A3 GET SEGMENT STATUS ANKL A4,/1E00 CHECK IF CORE RESIDENT OR... RF(NZ) LKM027 ...USED BY AN INTERRUPTED TASK * * INSERT PAGE BLOCK IN PAGE QUEUE * LD A3,SEG:PB,A3 GET PAGE BLOCK ADDRESS LDKL A4,PAGQUE GET PAGQUE ADDRESS ST A4,PAG:QB,A3 LDR* A4,A4 GET ADDRESS OF FIRST BLOCK IN PAGQUE STR A4,A3 UPDATE QUEUE LINKS ST A3,PAGQUE ST A3,PAG:QB,A4 LD A3,PQEMTY CHECK IF LOAD TASK IN PAUSE STATE RF(Z) LKM027 PAGE QUEUE NOT EMPTY? * EJECT LRPINT * * RESTART LOAD TASK * CM PQEMTY INDICATE PAGE QUEUE NOT EMPTY LDR A4,A5 SAVE A5 LDKL A5,TTABLD GET LDTASK TTAB ADDRESS CF A15,QTJOB RESTART LOAD TASK LDR A5,A4 RESTORE A5 LD A4,TTB:PW,A5 GET PSW ST A4,-2,A15 RESTORE PSW ON STACK * LKM027 EQU * XIF * IFF MMUPAG+DSKPAG=0 CWK A6,9 CHECK DATA DIRECTIVE RF(E) LKM060 LOAD SEGMENT REQUEST? XIF * EJECT LRPINT * * LKM030 EQU * CM PRUN INDICATE IDLE LOOP RUNNING CF A15,SWL48 SWITCH TO LEVEL 48 LDK A4,0 LDR A3,A6 GET DATA DIRECTIVE RF(NN) LKM050 NO LABEL? * * LKM REQUEST WITH LABEL * ADK A2,2 NGR A3,A3 MAKE DATA DIRECTIVE POSITIVE * IFT MMUPAG=0 LDR* A4,A2 GET LABEL XIF * IFT MMUPAG=1 ELR A4,A2 GET LABEL XIF * EJECT LRPINT * * UPDATE TTB:SA AND GO TO LKM PROCESSOR * LKM050 EQU * ADK A2,2 SAVE NEXT ADDRESS TO ST A2,TTB:SA,A5 EXECUTE IN TTAB ADR A3,A3 GET INDEX IN LKMAL RF(Z) LKMQDI PROGRAM SWITCH REQUEST? CW A3,LKMAL RF(NL) LKMRQE INVALID DATA DIRECTIVE? INH LD A3,LKMAL,A3 * IFF MMUPAG+DSKPAG=0 RF LKM065 * LKM060 EQU * LOAD SEGMENT REQUEST (DATA 9) LD A3,LKMAL+18 GET TLDSEG ADDRESS XIF * LKM065 EQU * ABR(NZ) A3 BRANCH TO LKM PROCESSOR * EJECT LRPINT * * * L K M E R R * * LKMERR LDK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT * LKM070 EQU * CF A15,HALT HALT SYSTEM * * * L K M R Q E * * SET A7 = -1, QUEUE TERMINAL JOB AND DISPATCH. * * A5 = TTAB ADDRESS * * LKMRQE EQU * LDKL A2,-1 ST A2,TTB:SA+14,A5 SET -1 IN SAVE AREA A7 * * * L K M Q D I * * QUEUE TERMINAL JOB AND DISPATCH. * * A5 = TTAB ADDRESS * * LKMQDI EQU * CF A15,QTJOB * T:DISP EQU * COMMON EXIT TO DISPATCHER ABL TDISP GO TO DISPATCHER * EJECT LRPINT * * I H R T C * * THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER. * THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS. * IHRTC ST P,INTSAV SAVE LAST INTERRUPT RIT /1B RESET INTERRUPT FLAG IM COUNT RF(P) RTC010 CHECK TIMER QUEUE? RTN A15 * RTC010 EQU * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * LDKL A4,-4 SET 100 MS SWITCH ST A4,COUNT LDKL A2,CLOCK QUEUE CLOCK ROUTINE AS MJOB CF A15,QMJOB * IFT MONCLK=1 IM SECOND RF(P) RTC025 UPDATE MONITOR CLOCK? XIF * RTC020 EQU * CF A15,SWLXY SWITCH TO LEVEL XY RB T:DISP * EJECT LRPINT * * IFT MONCLK=1 * * MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. * MCLOCK EQU * RTC025 LDKL A4,-9 SET SECOND SWITCH ST A4,SECOND LDK A4,4 * MCLO10 LDK A3,60 NUMBER OF MINUTES AND SECONDS MCLO20 IM MONCLO+2,A4 INCREMENT TIME XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS ? RB(NE) RTC020 GO TO DISPATCHER? CM MONCLO+2,A4 RESTART TIME COUNTER SUK A4,2 END? RB(N) MCLO20 MIDNIGHT CARRY? RB(P) MCLO10 UPDATE MINUTES? LDK A3,24 UPDATE HOURS RB MCLO20 XIF * * * M O N C L O * * MONCLO EQU * IFT MONCLK=1 DATA 0 ACCUMULATED 24 HOUR CARRY DATA 0 HOUR DATA 0 MINUTE DATA 0 SECOND SECOND DATA 0 SECOND SWITCH XIF * EJECT LRPINT * * CLOCK ROUTINE STARTED EACH 100 MS. * CLOCK INH LDKL A4,TIMQUE LOAD FIRST TIMER ADDRESS * CLK10 LDR A6,A4 CLK20 LDR* A4,A6 GET TIMER BLOCK ABL(Z) MEXIT END OF QUEUE IM 4,A4 INCREMENT TIMER RB(N) CLK10 NOT TIME OUT? RF(Z) CLK30 TIME OUT? LDR* A3,A4 RELEASE TIMER STR A3,A6 CF A15,FREBLK LDR A4,A2 CF A15,FREBLK RB CLK20 * EJECT LRPINT * * CLK30 CF A15,CLK40 CALL TIME OUT ROUTINE CF A15,SWL48 SWITCH TO LEVEL 48 DK1 INH RB CLK10 * CLK40 EQU * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * DK1 INH LD A2,2,A4 LOAD DISP BLOCK LD A1,4,A2 GET PARAMETER ABI 2,A2 GO TO TIME OUT ROUTINE * * COUNT DATA 0 100 MS SWITCH * * * T I M Q U E * * POINTER TO FIRST BLOCK IN TIMER QUEUE * * TIMQUE EQU * DATA 0 * EJECT LRPINT * * * I H P F A R * * THIS IS THE POWER FAIL/AUTO RESTART INTERRUPT HANDLER. * * DATA 0 TTABPF DATA 0 TTAB FOR POWER FAIL DATA '#P' DATA 0 A15SAV DATA 0 DATA /00C0 DATA POWOFF * * * WORK AREAS * * PFX DATA 1 POWER ON/OFF INDICATOR * * INIFLG DATA 1 INITIALIZATION FLAG * EJECT LRPINT * * * POWER FAIL/AUTO RESTART INTERRUPT * * IHPFAR EQU * ST P,INTSAV SAVE LAST INTERRUPT RIT /17 RESET INTERNAL INTERRUPT C1S PFX INDICATE POWER ON OR OFF RF(P) POWON POWER ON? * * POWER OFF * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING LDKL A2,TTABPF STR A1,A2 ST A2,DISQUE RB T:DISP * POWOFF ST A15,A15SAV SAVE A15 FOR BETTER TIMES HLT * EJECT LRPINT * * POWER ON * POWON LD A15,A15SAV RELOAD A15 CM INIFLG RESET INIT FLAG CF A15,PFINIT CM PRUN RB T:DISP * * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT LRPINT 9.2DK 1 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0062 Head {h00=0x0020, h01=0x0050, text=» =DK1, HANGING REM. TERM. «, t00=0x0000, t01=0x0042}
0x0062…0076 Head {h00=0x0010, h01=0x0050, text=» 80-03-11 «, t00=0x0000, t01=0x0066}
0x0076…0080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007a}
0x0080…008a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0084}
0x008a…00c4 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x008e}
0x00c4…00ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c8}
0x00ce…00f6 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00d2}
0x00f6…0100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fa}
0x0100…0134 Head {h00=0x0030, h01=0x0050, text=»* LRPINT = INTERRUPT HANDLERS FOR LKM, RTC«, t00=0x0000, t01=0x0104}
0x0134…015a Head {h00=0x0022, h01=0x0050, text=»* AND POWER FAILURE«, t00=0x0000, t01=0x0138}
0x015a…0164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015e}
0x0164…016e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x016e…0178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0172}
0x0178…0182 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x017c}
0x0182…018c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0186}
0x018c…01c6 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0190}
0x01c6…01d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003a}
0x01d0…01da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0044}
0x01da…0218 Head {h00=0x003a, h01=0x0050, text=»* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS «, t00=0x0001, t01=0x004e}
0x0218…0238 Head {h00=0x001c, h01=0x0050, text=»* FOR TOSS. THESE ARE:«, t00=0x0001, t01=0x008c}
0x0238…0242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ac}
0x0242…0264 Head {h00=0x001e, h01=0x0050, text=»* -IHLKM: LKM INTERRUPT«, t00=0x0001, t01=0x00b6}
0x0264…026e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d8}
0x026e…0290 Head {h00=0x001e, h01=0x0050, text=»* -IHRTC: RTC INTERRUPT«, t00=0x0001, t01=0x00e2}
0x0290…029a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0104}
0x029a…02c6 Head {h00=0x0028, h01=0x0050, text=»* -IHPFAR: POWER FAILURE INTERRUPT«, t00=0x0001, t01=0x010e}
0x02c6…02d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013a}
0x02d0…030e Head {h00=0x003a, h01=0x0050, text=»* IN THIS MODULE ENTRIES FOR REQUEST ERRORS ALSO ARE«, t00=0x0001, t01=0x0144}
0x030e…032e Head {h00=0x001c, h01=0x0050, text=»* PROVIDED. THESE ARE:«, t00=0x0001, t01=0x0182}
0x032e…0338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0012}
0x0338…0370 Head {h00=0x0034, h01=0x0050, text=»* -LKMRQE: SET A7 = -1, QUEUE JOB AND DISPATCH«, t00=0x0002, t01=0x001c}
0x0370…037a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0054}
0x037a…03a6 Head {h00=0x0028, h01=0x0050, text=»* -LKMQDI: QUEUE JOB AND DISPATCH «, t00=0x0002, t01=0x005e}
0x03a6…03b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008a}
0x03b0…03c8 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0002, t01=0x0094}
0x03c8…03d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ac}
0x03d2…03dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b6}
0x03dc…03f0 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00c0}
0x03f0…0404 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x00d4}
0x0404…0418 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00e8}
0x0418…0422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fc}
0x0422…042c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0106}
0x042c…0456 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHLKM LKM INTERRUPT HANDLER«, t00=0x0002, t01=0x0110}
0x0456…048e Head {h00=0x0034, h01=0x0050, text=» ENTRY LKM030 SPECIAL TLDSEG REQUEST ERROR ENTRY«, t00=0x0002, t01=0x013a}
0x048e…04b6 Head {h00=0x0024, h01=0x0050, text=» ENTRY LKMRQE LKM REQUEST ERROR «, t00=0x0002, t01=0x0172}
0x04b6…04ee Head {h00=0x0034, h01=0x0050, text=» ENTRY LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR«, t00=0x0003, t01=0x000a}
0x04ee…051a Head {h00=0x0028, h01=0x0050, text=» ENTRY LKMQDI QUEUE JOB AND DISPATCH«, t00=0x0003, t01=0x0042}
0x051a…0544 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHRTC RTC INTERRUPT HANDLER«, t00=0x0003, t01=0x006e}
0x0544…0580 Head {h00=0x0038, h01=0x0050, text=» ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE «, t00=0x0003, t01=0x0098}
0x0580…05a4 Head {h00=0x0020, h01=0x0050, text=» ENTRY MONCLO MONITOR CLOCK «, t00=0x0003, t01=0x00d4}
0x05a4…05da Head {h00=0x0032, h01=0x0050, text=» ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER «, t00=0x0003, t01=0x00f8}
0x05da…0604 Head {h00=0x0026, h01=0x0050, text=» ENTRY INIFLG INITIALIZATION FLAG «, t00=0x0003, t01=0x012e}
0x0604…061c Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0003, t01=0x0158}
0x061c…0626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0170}
0x0626…0630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x017a}
0x0630…0646 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x0184}
0x0646…065c Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x000a}
0x065c…0672 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0020}
0x0672…067c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0036}
0x067c…0686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0040}
0x0686…06a6 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0004, t01=0x004a}
0x06a6…06cc Head {h00=0x0022, h01=0x0050, text=» EXTRN DISQUE DISPATCHER QUEUE«, t00=0x0004, t01=0x006a}
0x06cc…06f8 Head {h00=0x0028, h01=0x0050, text=» EXTRN PRUN TTAB OF RUNNING PROGRAM «, t00=0x0004, t01=0x0090}
0x06f8…071e Head {h00=0x0022, h01=0x0050, text=» EXTRN MEXIT MONITOR TASK EXIT«, t00=0x0004, t01=0x00bc}
0x071e…074e Head {h00=0x002c, h01=0x0050, text=» EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE«, t00=0x0004, t01=0x00e2}
0x074e…076e Head {h00=0x001c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK «, t00=0x0004, t01=0x0112}
0x076e…0794 Head {h00=0x0022, h01=0x0050, text=» EXTRN QMJOB QUEUE MONITOR JOB«, t00=0x0004, t01=0x0132}
0x0794…07bc Head {h00=0x0024, h01=0x0050, text=» EXTRN SWL48 SWITCH TO LEVEL 48 «, t00=0x0004, t01=0x0158}
0x07bc…07e4 Head {h00=0x0024, h01=0x0050, text=» EXTRN SWLXY SWITCH TO LEVEL XY «, t00=0x0004, t01=0x0180}
0x07e4…0808 Head {h00=0x0020, h01=0x0050, text=» EXTRN FREBLK SET BLOCK FREE«, t00=0x0005, t01=0x0018}
0x0808…082e Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x0005, t01=0x003c}
0x082e…0856 Head {h00=0x0024, h01=0x0050, text=» EXTRN PFINIT RESTART OF DEVICES«, t00=0x0005, t01=0x0062}
0x0856…0876 Head {h00=0x001c, h01=0x0050, text=» EXTRN HALT HALT MODULE «, t00=0x0005, t01=0x008a}
0x0876…08a2 Head {h00=0x0028, h01=0x0050, text=» EXTRN INTSAV INTERRUPT SAVE MODULE «, t00=0x0005, t01=0x00aa}
0x08a2…08c6 Head {h00=0x0020, h01=0x0050, text=» EXTRN TTABLD LOAD TASK TTAB«, t00=0x0005, t01=0x00d6}
0x08c6…08f2 Head {h00=0x0028, h01=0x0050, text=» EXTRN PQEMTY PAGE QUEUE EMPTY FLAG «, t00=0x0005, t01=0x00fa}
0x08f2…0918 Head {h00=0x0022, h01=0x0050, text=» EXTRN PAGQUE FREE PAGE QUEUE «, t00=0x0005, t01=0x0126}
0x0918…0940 Head {h00=0x0024, h01=0x0050, text=» EXTRN SEG:PB PAGE BLOCK ADDRESS«, t00=0x0005, t01=0x014c}
0x0940…096a Head {h00=0x0026, h01=0x0050, text=» EXTRN PAG:QB QUEUE LINK BACKWARD «, t00=0x0005, t01=0x0174}
0x096a…0996 Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SB SEGMENT BLOCK POINTER «, t00=0x0006, t01=0x000e}
0x0996…09c0 Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x0006, t01=0x003a}
0x09c0…09f6 Head {h00=0x0032, h01=0x0050, text=» EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB «, t00=0x0006, t01=0x0064}
0x09f6…0a1c Head {h00=0x0022, h01=0x0050, text=» EXTRN LKMAL LKM REQUEST TABLE«, t00=0x0006, t01=0x009a}
0x0a1c…0a34 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0006, t01=0x00c0}
0x0a34…0a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d8}
0x0a3e…0a48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e2}
0x0a48…0a7a Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x00ec}
0x0a7a…0a84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011e}
0x0a84…0aa2 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0006, t01=0x0128}
0x0aa2…0aac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0146}
0x0aac…0ade Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x0150}
0x0ade…0ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0182}
0x0ae8…0b1a Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0006, t01=0x018c}
0x0b1a…0b48 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0007, t01=0x002e}
0x0b48…0b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005c}
0x0b52…0b66 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0007, t01=0x0066}
0x0b66…0b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007a}
0x0b70…0b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0084}
0x0b7a…0bb4 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x008e}
0x0bb4…0be6 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x00c8}
0x0be6…0bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fa}
0x0bf0…0c04 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0007, t01=0x0104}
0x0c04…0c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0118}
0x0c0e…0c18 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0007, t01=0x0122}
0x0c18…0c4a Head {h00=0x002e, h01=0x002a, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x0007, t01=0x012c}
0x0c4a…0c78 Head {h00=0x002a, h01=0x0026, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x0007, t01=0x015e}
0x0c78…0c82 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0007, t01=0x018c}
0x0c82…0c96 Head {h00=0x0010, h01=0x000c, text=»DSKPAG EQU 0«, t00=0x0008, t01=0x0008}
0x0c96…0ca0 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0008, t01=0x001c}
0x0ca0…0caa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0026}
0x0caa…0ce6 Head {h00=0x0038, h01=0x0050, text=»* A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS«, t00=0x0008, t01=0x0030}
0x0ce6…0d14 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MCLOCK EQU 0.«, t00=0x0008, t01=0x006c}
0x0d14…0d1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x009a}
0x0d1e…0d30 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x0008, t01=0x00a4}
0x0d30…0d44 Head {h00=0x0010, h01=0x0050, text=»MONCLK EQU 1«, t00=0x0008, t01=0x00b6}
0x0d44…0d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ca}
0x0d4e…0d66 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0008, t01=0x00d4}
0x0d66…0d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ec}
0x0d70…0d7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f6}
0x0d7a…0d90 Head {h00=0x0012, h01=0x0050, text=»* I H L K M «, t00=0x0008, t01=0x0100}
0x0d90…0d9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0116}
0x0d9a…0da4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0120}
0x0da4…0de0 Head {h00=0x0038, h01=0x0050, text=»* THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING«, t00=0x0008, t01=0x012a}
0x0de0…0e02 Head {h00=0x001e, h01=0x0050, text=»* STEPS ARE CARRIED OUT:«, t00=0x0008, t01=0x0166}
0x0e02…0e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0188}
0x0e0c…0e3a (9, 0, 400) Head {h00=0x002a, h01=0x0050, text=»* - IF STACK OVERFLOW SYSTEM HALTS. «, t00=0x0009, t01=0x0004}
0x0e3a…0e44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0032}
0x0e44…0e88 Head {h00=0x0040, h01=0x0050, text=»* - ELSE REGISTERS A1 - A14 ARE SAVED IN TTAB FOR RUNNING «, t00=0x0009, t01=0x003c}
0x0e88…0e9e Head {h00=0x0012, h01=0x0050, text=»* PROGRAM.«, t00=0x0009, t01=0x0080}
0x0e9e…0ea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0096}
0x0ea8…0ee6 Head {h00=0x003a, h01=0x0050, text=»* - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO «, t00=0x0009, t01=0x00a0}
0x0ee6…0f0e Head {h00=0x0024, h01=0x0050, text=»* APPROPRIATE LKM PROCESSOR.«, t00=0x0009, t01=0x00de}
0x0f0e…0f18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0106}
0x0f18…0f38 Head {h00=0x001c, h01=0x0050, text=»* EXIT CONDITIONS ARE:«, t00=0x0009, t01=0x0110}
0x0f38…0f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0130}
0x0f42…0f70 Head {h00=0x002a, h01=0x0050, text=»* A4 = LABEL ADDRESS OF LKM REQUEST «, t00=0x0009, t01=0x013a}
0x0f70…0fac Head {h00=0x0038, h01=0x0050, text=»* (A4 = 0 INDICATES NO LABEL IN LKM REQUEST) «, t00=0x0009, t01=0x0168}
0x0fac…0fdc Head {h00=0x002c, h01=0x0050, text=»* A5 = TTAB ADDRESS OF CALLING PROGRAM«, t00=0x000a, t01=0x0014}
0x0fdc…1000 Head {h00=0x0020, h01=0x0050, text=»* A2, A3 AND A6 ARE LOST. «, t00=0x000a, t01=0x0044}
0x1000…100a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0068}
0x100a…1048 Head {h00=0x003a, h01=0x0050, text=»* ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING «, t00=0x000a, t01=0x0072}
0x1048…105c Head {h00=0x0010, h01=0x0050, text=»* PROGRAM.«, t00=0x000a, t01=0x00b0}
0x105c…1066 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c4}
0x1066…1070 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00ce}
0x1070…107a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d8}
0x107a…108e Head {h00=0x0010, h01=0x0050, text=»IHLKM EQU * «, t00=0x000a, t01=0x00e2}
0x108e…10b6 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x000a, t01=0x00f6}
0x10b6…10e4 Head {h00=0x002a, h01=0x0050, text=» RIT /1D RESET INTERNAL INTERRUPT FLAG«, t00=0x000a, t01=0x011e}
0x10e4…10ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014c}
0x10ee…1106 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x000a, t01=0x0156}
0x1106…1110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016e}
0x1110…111a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0178}
0x111a…113a Head {h00=0x001c, h01=0x0050, text=» ST A15,LKM010 SAVE A15 «, t00=0x000a, t01=0x0182}
0x113a…1160 Head {h00=0x0022, h01=0x0050, text=» LD A15,PRUN LOAD TTAB ADDRESS«, t00=0x000b, t01=0x0012}
0x1160…116a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0038}
0x116a…1180 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x000b, t01=0x0042}
0x1180…11b8 Head {h00=0x0034, h01=0x0050, text=» ADKL A15,TTB:SA+28 SET A15 TO LAST IN SAVE AREA«, t00=0x000b, t01=0x0058}
0x11b8…11e6 Head {h00=0x002a, h01=0x0050, text=» STR A14,A15 SAVE USER REGISTERS, -A14«, t00=0x000b, t01=0x0090}
0x11e6…1200 Head {h00=0x0016, h01=0x0050, text=» STR A13,A15 -A13 «, t00=0x000b, t01=0x00be}
0x1200…121a Head {h00=0x0016, h01=0x0050, text=» STR A12,A15 -A12 «, t00=0x000b, t01=0x00d8}
0x121a…1234 Head {h00=0x0016, h01=0x0050, text=» STR A11,A15 -A11 «, t00=0x000b, t01=0x00f2}
0x1234…124e Head {h00=0x0016, h01=0x0050, text=» STR A10,A15 -A10 «, t00=0x000b, t01=0x010c}
0x124e…1266 Head {h00=0x0014, h01=0x0050, text=» STR A9,A15 -A9 «, t00=0x000b, t01=0x0126}
0x1266…127e Head {h00=0x0014, h01=0x0050, text=» STR A8,A15 -A8 «, t00=0x000b, t01=0x013e}
0x127e…1296 Head {h00=0x0014, h01=0x0050, text=» STR A7,A15 -A7 «, t00=0x000b, t01=0x0156}
0x1296…12ae Head {h00=0x0014, h01=0x0050, text=» STR A6,A15 -A6 «, t00=0x000b, t01=0x016e}
0x12ae…12c6 Head {h00=0x0014, h01=0x0050, text=» STR A5,A15 -A5 «, t00=0x000b, t01=0x0186}
0x12c6…12de Head {h00=0x0014, h01=0x0050, text=» STR A4,A15 -A4 «, t00=0x000c, t01=0x000e}
0x12de…12f6 Head {h00=0x0014, h01=0x0050, text=» STR A3,A15 -A3 «, t00=0x000c, t01=0x0026}
0x12f6…130e Head {h00=0x0014, h01=0x0050, text=» STR A2,A15 -A2 «, t00=0x000c, t01=0x003e}
0x130e…1326 Head {h00=0x0014, h01=0x0050, text=» STR A1,A15 -A1 «, t00=0x000c, t01=0x0056}
0x1326…1332 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x006e}
0x1332…133c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x007a}
0x133c…1352 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x000c, t01=0x0084}
0x1352…138c Head {h00=0x0036, h01=0x0050, text=» MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA «, t00=0x000c, t01=0x009a}
0x138c…1398 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00d4}
0x1398…13a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e0}
0x13a2…13d6 Head {h00=0x0030, h01=0x0050, text=» LD A5,PRUN GET TTAB ADDRESS OF CALLING TASK«, t00=0x000c, t01=0x00ea}
0x13d6…1404 Head {h00=0x002a, h01=0x0050, text=» LDKL A15,0 RESTORE A15 STACK POINTER «, t00=0x000c, t01=0x011e}
0x1404…141a Head {h00=0x0012, h01=0x0050, text=»LKM010 EQU *-2«, t00=0x000c, t01=0x014c}
0x141a…1424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0162}
0x1424…143c Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x000c, t01=0x016c}
0x143c…1446 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0184}
0x1446…146c Head {h00=0x0022, h01=0x0050, text=»* GET LKM REQUEST PARAMETERS«, t00=0x000c, t01=0x018e}
0x146c…1476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0024}
0x1476…148a Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x000d, t01=0x002e}
0x148a…14c2 Head {h00=0x0034, h01=0x0050, text=» LDR* A2,A15 LOAD P.C. AND ADJUST STACK POINTER «, t00=0x000d, t01=0x0042}
0x14c2…14ec Head {h00=0x0026, h01=0x0050, text=» ST A3,TTB:PW,A5 STORE PSW IN TTAB«, t00=0x000d, t01=0x007a}
0x14ec…14f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00a4}
0x14f6…150c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000d, t01=0x00ae}
0x150c…1536 Head {h00=0x0026, h01=0x0050, text=» LD A3,-2,A2 GET INSTRUCTION CODE «, t00=0x000d, t01=0x00c4}
0x1536…155c Head {h00=0x0022, h01=0x0050, text=» LDR* A6,A2 GET DATA DIRECTIVE«, t00=0x000d, t01=0x00ee}
0x155c…1568 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0114}
0x1568…1572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0120}
0x1572…1588 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000d, t01=0x012a}
0x1588…159a Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x000d, t01=0x0140}
0x159a…15bc Head {h00=0x001e, h01=0x0050, text=» RF(NZ) LKM015 USER MODE? «, t00=0x000d, t01=0x0152}
0x15bc…15ea Head {h00=0x002a, h01=0x0050, text=» TL MONMMU NO, LOAD MONITOR MMU TABLE «, t00=0x000d, t01=0x0174}
0x15ea…15f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0012}
0x15f4…1608 Head {h00=0x0010, h01=0x0050, text=»LKM015 EQU *«, t00=0x000e, t01=0x001c}
0x1608…1632 Head {h00=0x0026, h01=0x0050, text=» EL A3,-2,A2 GET INSTRUCTION CODE«, t00=0x000e, t01=0x0030}
0x1632…1658 Head {h00=0x0022, h01=0x0050, text=» ELR A6,A2 GET DATA DIRECTIVE «, t00=0x000e, t01=0x005a}
0x1658…1664 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0080}
0x1664…166e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x008c}
0x166e…1684 Head {h00=0x0012, h01=0x0050, text=» CWK A3,/2804 «, t00=0x000e, t01=0x0096}
0x1684…169e Head {h00=0x0016, h01=0x0050, text=» RF(E) LKM025 LKM?«, t00=0x000e, t01=0x00ac}
0x169e…16b4 Head {h00=0x0012, h01=0x0050, text=» CWK A3,/6300 «, t00=0x000e, t01=0x00c6}
0x16b4…16d0 Head {h00=0x0018, h01=0x0050, text=» RF(E) LKM025 TRAP? «, t00=0x000e, t01=0x00dc}
0x16d0…16da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f8}
0x16da…1702 Head {h00=0x0024, h01=0x0050, text=»* STACK OVERFLOW: HALT SYSTEM «, t00=0x000e, t01=0x0102}
0x1702…170c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012a}
0x170c…172c Head {h00=0x001c, h01=0x0050, text=» LDK A1,7 HALT PARAMETER«, t00=0x000e, t01=0x0134}
0x172c…1760 Head {h00=0x0030, h01=0x0050, text=» RF LKM070 HALT SYSTEM DUE TO STACK OVERFLOW«, t00=0x000e, t01=0x0154}
0x1760…176a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0188}
0x176a…1782 (15, 0, 400) Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x000f, t01=0x0004}
0x1782…178c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001c}
0x178c…1796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0026}
0x1796…17aa Head {h00=0x0010, h01=0x0050, text=»LKM025 EQU *«, t00=0x000f, t01=0x0030}
0x17aa…17c0 Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x000f, t01=0x0044}
0x17c0…17f2 Head {h00=0x002e, h01=0x0050, text=» LD A3,TTB:SB,A5 GET SEGMENT BLOCK ADDRESS«, t00=0x000f, t01=0x005a}
0x17f2…1814 Head {h00=0x001e, h01=0x0050, text=» RF(Z) LKM027 NO SEGMENT? «, t00=0x000f, t01=0x008c}
0x1814…183a Head {h00=0x0022, h01=0x0050, text=» LDR* A4,A3 GET SEGMENT STATUS«, t00=0x000f, t01=0x00ae}
0x183a…186e Head {h00=0x0030, h01=0x0050, text=» ANKL A4,/1E00 CHECK IF CORE RESIDENT OR... «, t00=0x000f, t01=0x00d4}
0x186e…18a4 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) LKM027 ...USED BY AN INTERRUPTED TASK «, t00=0x000f, t01=0x0108}
0x18a4…18ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x013e}
0x18ae…18da Head {h00=0x0028, h01=0x0050, text=»* INSERT PAGE BLOCK IN PAGE QUEUE «, t00=0x000f, t01=0x0148}
0x18da…18e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0174}
0x18e4…1914 Head {h00=0x002c, h01=0x0050, text=» LD A3,SEG:PB,A3 GET PAGE BLOCK ADDRESS «, t00=0x000f, t01=0x017e}
0x1914…193e Head {h00=0x0026, h01=0x0050, text=» LDKL A4,PAGQUE GET PAGQUE ADDRESS«, t00=0x0010, t01=0x001e}
0x193e…1956 Head {h00=0x0014, h01=0x0050, text=» ST A4,PAG:QB,A3«, t00=0x0010, t01=0x0048}
0x1956…198e Head {h00=0x0034, h01=0x0050, text=» LDR* A4,A4 GET ADDRESS OF FIRST BLOCK IN PAGQUE«, t00=0x0010, t01=0x0060}
0x198e…19b4 Head {h00=0x0022, h01=0x0050, text=» STR A4,A3 UPDATE QUEUE LINKS «, t00=0x0010, t01=0x0098}
0x19b4…19ca Head {h00=0x0012, h01=0x0050, text=» ST A3,PAGQUE «, t00=0x0010, t01=0x00be}
0x19ca…19e2 Head {h00=0x0014, h01=0x0050, text=» ST A3,PAG:QB,A4«, t00=0x0010, t01=0x00d4}
0x19e2…1a1a Head {h00=0x0034, h01=0x0050, text=» LD A3,PQEMTY CHECK IF LOAD TASK IN PAUSE STATE «, t00=0x0010, t01=0x00ec}
0x1a1a…1a46 Head {h00=0x0028, h01=0x0050, text=» RF(Z) LKM027 PAGE QUEUE NOT EMPTY? «, t00=0x0010, t01=0x0124}
0x1a46…1a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0150}
0x1a50…1a68 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0010, t01=0x015a}
0x1a68…1a72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0172}
0x1a72…1a90 Head {h00=0x001a, h01=0x0050, text=»* RESTART LOAD TASK «, t00=0x0010, t01=0x017c}
0x1a90…1a9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x000a}
0x1a9a…1aca Head {h00=0x002c, h01=0x0050, text=» CM PQEMTY INDICATE PAGE QUEUE NOT EMPTY«, t00=0x0011, t01=0x0014}
0x1aca…1ae4 Head {h00=0x0016, h01=0x0050, text=» LDR A4,A5 SAVE A5«, t00=0x0011, t01=0x0044}
0x1ae4…1b14 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,TTABLD GET LDTASK TTAB ADDRESS «, t00=0x0011, t01=0x005e}
0x1b14…1b3c Head {h00=0x0024, h01=0x0050, text=» CF A15,QTJOB RESTART LOAD TASK «, t00=0x0011, t01=0x008e}
0x1b3c…1b5a Head {h00=0x001a, h01=0x0050, text=» LDR A5,A4 RESTORE A5 «, t00=0x0011, t01=0x00b6}
0x1b5a…1b7a Head {h00=0x001c, h01=0x0050, text=» LD A4,TTB:PW,A5 GET PSW«, t00=0x0011, t01=0x00d4}
0x1b7a…1ba4 Head {h00=0x0026, h01=0x0050, text=» ST A4,-2,A15 RESTORE PSW ON STACK«, t00=0x0011, t01=0x00f4}
0x1ba4…1bae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011e}
0x1bae…1bc2 Head {h00=0x0010, h01=0x0050, text=»LKM027 EQU *«, t00=0x0011, t01=0x0128}
0x1bc2…1bce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x013c}
0x1bce…1bd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0148}
0x1bd8…1bf4 Head {h00=0x0018, h01=0x0050, text=» IFF MMUPAG+DSKPAG=0«, t00=0x0011, t01=0x0152}
0x1bf4…1c1a Head {h00=0x0022, h01=0x0050, text=» CWK A6,9 CHECK DATA DIRECTIVE«, t00=0x0011, t01=0x016e}
0x1c1a…1c46 (18, 0, 400) Head {h00=0x0028, h01=0x0050, text=» RF(E) LKM060 LOAD SEGMENT REQUEST? «, t00=0x0012, t01=0x0004}
0x1c46…1c52 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0030}
0x1c52…1c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x003c}
0x1c5c…1c74 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0012, t01=0x0046}
0x1c74…1c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005e}
0x1c7e…1c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0068}
0x1c88…1c9c Head {h00=0x0010, h01=0x0050, text=»LKM030 EQU *«, t00=0x0012, t01=0x0072}
0x1c9c…1cc8 Head {h00=0x0028, h01=0x0050, text=» CM PRUN INDICATE IDLE LOOP RUNNING «, t00=0x0012, t01=0x0086}
0x1cc8…1cf0 Head {h00=0x0024, h01=0x0050, text=» CF A15,SWL48 SWITCH TO LEVEL 48«, t00=0x0012, t01=0x00b2}
0x1cf0…1d02 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0012, t01=0x00da}
0x1d02…1d28 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 GET DATA DIRECTIVE «, t00=0x0012, t01=0x00ec}
0x1d28…1d48 Head {h00=0x001c, h01=0x0050, text=» RF(NN) LKM050 NO LABEL?«, t00=0x0012, t01=0x0112}
0x1d48…1d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0132}
0x1d52…1d74 Head {h00=0x001e, h01=0x0050, text=»* LKM REQUEST WITH LABEL«, t00=0x0012, t01=0x013c}
0x1d74…1d7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x015e}
0x1d7e…1d90 Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x0012, t01=0x0168}
0x1d90…1dc0 Head {h00=0x002c, h01=0x0050, text=» NGR A3,A3 MAKE DATA DIRECTIVE POSITIVE «, t00=0x0012, t01=0x017a}
0x1dc0…1dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x001a}
0x1dca…1de0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0013, t01=0x0024}
0x1de0…1dfe Head {h00=0x001a, h01=0x0050, text=» LDR* A4,A2 GET LABEL «, t00=0x0013, t01=0x003a}
0x1dfe…1e0a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0058}
0x1e0a…1e14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0064}
0x1e14…1e2a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0013, t01=0x006e}
0x1e2a…1e46 Head {h00=0x0018, h01=0x0050, text=» ELR A4,A2 GET LABEL«, t00=0x0013, t01=0x0084}
0x1e46…1e52 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00a0}
0x1e52…1e5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ac}
0x1e5c…1e74 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0013, t01=0x00b6}
0x1e74…1e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ce}
0x1e7e…1eb0 Head {h00=0x002e, h01=0x0050, text=»* UPDATE TTB:SA AND GO TO LKM PROCESSOR «, t00=0x0013, t01=0x00d8}
0x1eb0…1eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x010a}
0x1eba…1ece Head {h00=0x0010, h01=0x0050, text=»LKM050 EQU *«, t00=0x0013, t01=0x0114}
0x1ece…1ef4 Head {h00=0x0022, h01=0x0050, text=» ADK A2,2 SAVE NEXT ADDRESS TO«, t00=0x0013, t01=0x0128}
0x1ef4…1f1c Head {h00=0x0024, h01=0x0050, text=» ST A2,TTB:SA,A5 EXECUTE IN TTAB«, t00=0x0013, t01=0x014e}
0x1f1c…1f42 Head {h00=0x0022, h01=0x0050, text=» ADR A3,A3 GET INDEX IN LKMAL «, t00=0x0013, t01=0x0176}
0x1f42…1f70 Head {h00=0x002a, h01=0x0050, text=» RF(Z) LKMQDI PROGRAM SWITCH REQUEST? «, t00=0x0014, t01=0x000c}
0x1f70…1f84 Head {h00=0x0010, h01=0x0050, text=» CW A3,LKMAL«, t00=0x0014, t01=0x003a}
0x1f84…1fb2 Head {h00=0x002a, h01=0x0050, text=» RF(NL) LKMRQE INVALID DATA DIRECTIVE?«, t00=0x0014, t01=0x004e}
0x1fb2…1fbe Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0014, t01=0x007c}
0x1fbe…1fd6 Head {h00=0x0014, h01=0x0050, text=» LD A3,LKMAL,A3 «, t00=0x0014, t01=0x0088}
0x1fd6…1fe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a0}
0x1fe0…1ffc Head {h00=0x0018, h01=0x0050, text=» IFF MMUPAG+DSKPAG=0«, t00=0x0014, t01=0x00aa}
0x1ffc…200e Head {h00=0x000e, h01=0x0050, text=» RF LKM065«, t00=0x0014, t01=0x00c6}
0x200e…2018 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00d8}
0x2018…204a Head {h00=0x002e, h01=0x0050, text=»LKM060 EQU * LOAD SEGMENT REQUEST (DATA 9)«, t00=0x0014, t01=0x00e2}
0x204a…2074 Head {h00=0x0026, h01=0x0050, text=» LD A3,LKMAL+18 GET TLDSEG ADDRESS«, t00=0x0014, t01=0x0114}
0x2074…2080 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x013e}
0x2080…208a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x014a}
0x208a…209e Head {h00=0x0010, h01=0x0050, text=»LKM065 EQU *«, t00=0x0014, t01=0x0154}
0x209e…20ca Head {h00=0x0028, h01=0x0050, text=» ABR(NZ) A3 BRANCH TO LKM PROCESSOR «, t00=0x0014, t01=0x0168}
0x20ca…20d4 (21, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0004}
0x20d4…20ec Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0015, t01=0x000e}
0x20ec…20f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0026}
0x20f6…2100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0030}
0x2100…2118 Head {h00=0x0014, h01=0x0050, text=»* L K M E R R «, t00=0x0015, t01=0x003a}
0x2118…2122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0052}
0x2122…212c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005c}
0x212c…216e Head {h00=0x003e, h01=0x0050, text=»LKMERR LDK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT «, t00=0x0015, t01=0x0066}
0x216e…2178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a8}
0x2178…218c Head {h00=0x0010, h01=0x0050, text=»LKM070 EQU *«, t00=0x0015, t01=0x00b2}
0x218c…21ac Head {h00=0x001c, h01=0x0050, text=» CF A15,HALT HALT SYSTEM«, t00=0x0015, t01=0x00c6}
0x21ac…21b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00e6}
0x21b6…21c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f0}
0x21c0…21d8 Head {h00=0x0014, h01=0x0050, text=»* L K M R Q E «, t00=0x0015, t01=0x00fa}
0x21d8…21e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0112}
0x21e2…221c Head {h00=0x0036, h01=0x0050, text=»* SET A7 = -1, QUEUE TERMINAL JOB AND DISPATCH. «, t00=0x0015, t01=0x011c}
0x221c…2226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0156}
0x2226…2244 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0015, t01=0x0160}
0x2244…224e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017e}
0x224e…2258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0188}
0x2258…226c (22, 0, 400) Head {h00=0x0010, h01=0x0050, text=»LKMRQE EQU *«, t00=0x0016, t01=0x0004}
0x226c…2280 Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-1 «, t00=0x0016, t01=0x0018}
0x2280…22b2 Head {h00=0x002e, h01=0x0050, text=» ST A2,TTB:SA+14,A5 SET -1 IN SAVE AREA A7«, t00=0x0016, t01=0x002c}
0x22b2…22bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x005e}
0x22bc…22c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0068}
0x22c6…22de Head {h00=0x0014, h01=0x0050, text=»* L K M Q D I «, t00=0x0016, t01=0x0072}
0x22de…22e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008a}
0x22e8…2314 Head {h00=0x0028, h01=0x0050, text=»* QUEUE TERMINAL JOB AND DISPATCH.«, t00=0x0016, t01=0x0094}
0x2314…231e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00c0}
0x231e…233c Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0016, t01=0x00ca}
0x233c…2346 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00e8}
0x2346…2350 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f2}
0x2350…2364 Head {h00=0x0010, h01=0x0050, text=»LKMQDI EQU *«, t00=0x0016, t01=0x00fc}
0x2364…237a Head {h00=0x0012, h01=0x0050, text=» CF A15,QTJOB «, t00=0x0016, t01=0x0110}
0x237a…2384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0126}
0x2384…23b2 Head {h00=0x002a, h01=0x0050, text=»T:DISP EQU * COMMON EXIT TO DISPATCHER«, t00=0x0016, t01=0x0130}
0x23b2…23d6 Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x015e}
0x23d6…23e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0182}
0x23e0…23f8 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0016, t01=0x018c}
0x23f8…2402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0014}
0x2402…2418 Head {h00=0x0012, h01=0x0050, text=»* I H R T C «, t00=0x0017, t01=0x001e}
0x2418…2422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0034}
0x2422…245c Head {h00=0x0036, h01=0x0050, text=»* THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER.«, t00=0x0017, t01=0x003e}
0x245c…2496 Head {h00=0x0036, h01=0x0050, text=»* THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS.«, t00=0x0017, t01=0x0078}
0x2496…24a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b2}
0x24a0…24ce Head {h00=0x002a, h01=0x0050, text=»IHRTC ST P,INTSAV SAVE LAST INTERRUPT «, t00=0x0017, t01=0x00bc}
0x24ce…24f4 Head {h00=0x0022, h01=0x0050, text=» RIT /1B RESET INTERRUPT FLAG «, t00=0x0017, t01=0x00ea}
0x24f4…2506 Head {h00=0x000e, h01=0x0050, text=» IM COUNT «, t00=0x0017, t01=0x0110}
0x2506…252e Head {h00=0x0024, h01=0x0050, text=» RF(P) RTC010 CHECK TIMER QUEUE?«, t00=0x0017, t01=0x0122}
0x252e…253e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0017, t01=0x014a}
0x253e…2548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x015a}
0x2548…255c Head {h00=0x0010, h01=0x0050, text=»RTC010 EQU *«, t00=0x0017, t01=0x0164}
0x255c…2572 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0017, t01=0x0178}
0x2572…259c Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0017, t01=0x018e}
0x259c…25a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0028}
0x25a8…25b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0034}
0x25b2…25c8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0018, t01=0x003e}
0x25c8…25ee Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0018, t01=0x0054}
0x25ee…25fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x007a}
0x25fa…2604 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0086}
0x2604…262a Head {h00=0x0022, h01=0x0050, text=» LDKL A4,-4 SET 100 MS SWITCH «, t00=0x0018, t01=0x0090}
0x262a…263e Head {h00=0x0010, h01=0x0050, text=» ST A4,COUNT«, t00=0x0018, t01=0x00b6}
0x263e…2670 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,CLOCK QUEUE CLOCK ROUTINE AS MJOB«, t00=0x0018, t01=0x00ca}
0x2670…2686 Head {h00=0x0012, h01=0x0050, text=» CF A15,QMJOB «, t00=0x0018, t01=0x00fc}
0x2686…2690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0112}
0x2690…26a6 Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x0018, t01=0x011c}
0x26a6…26b8 Head {h00=0x000e, h01=0x0050, text=» IM SECOND«, t00=0x0018, t01=0x0132}
0x26b8…26e4 Head {h00=0x0028, h01=0x0050, text=» RF(P) RTC025 UPDATE MONITOR CLOCK? «, t00=0x0018, t01=0x0144}
0x26e4…26f0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0170}
0x26f0…26fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x017c}
0x26fa…270e Head {h00=0x0010, h01=0x0050, text=»RTC020 EQU *«, t00=0x0018, t01=0x0186}
0x270e…2736 Head {h00=0x0024, h01=0x0050, text=» CF A15,SWLXY SWITCH TO LEVEL XY«, t00=0x0019, t01=0x000a}
0x2736…2748 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0019, t01=0x0032}
0x2748…2752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0044}
0x2752…276a Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0019, t01=0x004e}
0x276a…2774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0066}
0x2774…277e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0070}
0x277e…2794 Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x0019, t01=0x007a}
0x2794…279e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0090}
0x279e…27de Head {h00=0x003c, h01=0x0050, text=»* MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. «, t00=0x0019, t01=0x009a}
0x27de…27e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00da}
0x27e8…27fc Head {h00=0x0010, h01=0x0050, text=»MCLOCK EQU *«, t00=0x0019, t01=0x00e4}
0x27fc…2828 Head {h00=0x0028, h01=0x0050, text=»RTC025 LDKL A4,-9 SET SECOND SWITCH «, t00=0x0019, t01=0x00f8}
0x2828…283e Head {h00=0x0012, h01=0x0050, text=» ST A4,SECOND «, t00=0x0019, t01=0x0124}
0x283e…2850 Head {h00=0x000e, h01=0x0050, text=» LDK A4,4 «, t00=0x0019, t01=0x013a}
0x2850…285a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x014c}
0x285a…2890 Head {h00=0x0032, h01=0x0050, text=»MCLO10 LDK A3,60 NUMBER OF MINUTES AND SECONDS«, t00=0x0019, t01=0x0156}
0x2890…28bc Head {h00=0x0028, h01=0x0050, text=»MCLO20 IM MONCLO+2,A4 INCREMENT TIME«, t00=0x0019, t01=0x018c}
0x28bc…28f0 Head {h00=0x0030, h01=0x0050, text=» XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS ?«, t00=0x001a, t01=0x0028}
0x28f0…2918 Head {h00=0x0024, h01=0x0050, text=» RB(NE) RTC020 GO TO DISPATCHER?«, t00=0x001a, t01=0x005c}
0x2918…2944 Head {h00=0x0028, h01=0x0050, text=» CM MONCLO+2,A4 RESTART TIME COUNTER«, t00=0x001a, t01=0x0084}
0x2944…295a Head {h00=0x0012, h01=0x0050, text=» SUK A4,2 END?«, t00=0x001a, t01=0x00b0}
0x295a…2980 Head {h00=0x0022, h01=0x0050, text=» RB(N) MCLO20 MIDNIGHT CARRY? «, t00=0x001a, t01=0x00c6}
0x2980…29a6 Head {h00=0x0022, h01=0x0050, text=» RB(P) MCLO10 UPDATE MINUTES? «, t00=0x001a, t01=0x00ec}
0x29a6…29c6 Head {h00=0x001c, h01=0x0050, text=» LDK A3,24 UPDATE HOURS «, t00=0x001a, t01=0x0112}
0x29c6…29d8 Head {h00=0x000e, h01=0x0050, text=» RB MCLO20«, t00=0x001a, t01=0x0132}
0x29d8…29e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0144}
0x29e4…29ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0150}
0x29ee…29f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x015a}
0x29f8…2a10 Head {h00=0x0014, h01=0x0050, text=»* M O N C L O «, t00=0x001a, t01=0x0164}
0x2a10…2a1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x017c}
0x2a1a…2a24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0186}
0x2a24…2a38 Head {h00=0x0010, h01=0x0050, text=»MONCLO EQU *«, t00=0x001a, t01=0x0190}
0x2a38…2a4e Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x001b, t01=0x0014}
0x2a4e…2a78 Head {h00=0x0026, h01=0x0050, text=» DATA 0 ACCUMULATED 24 HOUR CARRY «, t00=0x001b, t01=0x002a}
0x2a78…2a8c Head {h00=0x0010, h01=0x0050, text=» DATA 0 HOUR«, t00=0x001b, t01=0x0054}
0x2a8c…2aa2 Head {h00=0x0012, h01=0x0050, text=» DATA 0 MINUTE«, t00=0x001b, t01=0x0068}
0x2aa2…2ab8 Head {h00=0x0012, h01=0x0050, text=» DATA 0 SECOND«, t00=0x001b, t01=0x007e}
0x2ab8…2adc Head {h00=0x0020, h01=0x0050, text=»SECOND DATA 0 SECOND SWITCH «, t00=0x001b, t01=0x0094}
0x2adc…2ae8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00b8}
0x2ae8…2af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00c4}
0x2af2…2b0a Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001b, t01=0x00ce}
0x2b0a…2b14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e6}
0x2b14…2b42 Head {h00=0x002a, h01=0x0050, text=»* CLOCK ROUTINE STARTED EACH 100 MS.«, t00=0x001b, t01=0x00f0}
0x2b42…2b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x011e}
0x2b4c…2b5e Head {h00=0x000e, h01=0x0050, text=»CLOCK INH «, t00=0x001b, t01=0x0128}
0x2b5e…2b8e Head {h00=0x002c, h01=0x0050, text=» LDKL A4,TIMQUE LOAD FIRST TIMER ADDRESS«, t00=0x001b, t01=0x013a}
0x2b8e…2b98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x016a}
0x2b98…2bb0 Head {h00=0x0014, h01=0x0050, text=»CLK10 LDR A6,A4 «, t00=0x001b, t01=0x0174}
0x2bb0…2bd8 Head {h00=0x0024, h01=0x0050, text=»CLK20 LDR* A4,A6 GET TIMER BLOCK«, t00=0x001b, t01=0x018c}
0x2bd8…2bfa Head {h00=0x001e, h01=0x0050, text=» ABL(Z) MEXIT END OF QUEUE«, t00=0x001c, t01=0x0024}
0x2bfa…2c1a Head {h00=0x001c, h01=0x0050, text=» IM 4,A4 INCREMENT TIMER«, t00=0x001c, t01=0x0046}
0x2c1a…2c3c Head {h00=0x001e, h01=0x0050, text=» RB(N) CLK10 NOT TIME OUT?«, t00=0x001c, t01=0x0066}
0x2c3c…2c5a Head {h00=0x001a, h01=0x0050, text=» RF(Z) CLK30 TIME OUT?«, t00=0x001c, t01=0x0088}
0x2c5a…2c7c Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A4 RELEASE TIMER «, t00=0x001c, t01=0x00a6}
0x2c7c…2c8e Head {h00=0x000e, h01=0x0050, text=» STR A3,A6«, t00=0x001c, t01=0x00c8}
0x2c8e…2ca4 Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x001c, t01=0x00da}
0x2ca4…2cb6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001c, t01=0x00f0}
0x2cb6…2ccc Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x001c, t01=0x0102}
0x2ccc…2cde Head {h00=0x000e, h01=0x0050, text=» RB CLK20 «, t00=0x001c, t01=0x0118}
0x2cde…2ce8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012a}
0x2ce8…2d00 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001c, t01=0x0134}
0x2d00…2d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x014c}
0x2d0a…2d14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0156}
0x2d14…2d44 Head {h00=0x002c, h01=0x0050, text=»CLK30 CF A15,CLK40 CALL TIME OUT ROUTINE«, t00=0x001c, t01=0x0160}
0x2d44…2d70 Head {h00=0x0028, h01=0x0050, text=» CF A15,SWL48 SWITCH TO LEVEL 48 DK1«, t00=0x001c, t01=0x0190}
0x2d70…2d7c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001d, t01=0x002c}
0x2d7c…2d8e Head {h00=0x000e, h01=0x0050, text=» RB CLK10 «, t00=0x001d, t01=0x0038}
0x2d8e…2d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x004a}
0x2d98…2dac Head {h00=0x0010, h01=0x0050, text=»CLK40 EQU * «, t00=0x001d, t01=0x0054}
0x2dac…2dc2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001d, t01=0x0068}
0x2dc2…2dec Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001d, t01=0x007e}
0x2dec…2df8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00a8}
0x2df8…2e02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b4}
0x2e02…2e18 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001d, t01=0x00be}
0x2e18…2e3e Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001d, t01=0x00d4}
0x2e3e…2e4a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00fa}
0x2e4a…2e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0106}
0x2e54…2e64 Head {h00=0x000c, h01=0x0050, text=» DK1 «, t00=0x001d, t01=0x0110}
0x2e64…2e70 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001d, t01=0x0120}
0x2e70…2e94 Head {h00=0x0020, h01=0x0050, text=» LD A2,2,A4 LOAD DISP BLOCK «, t00=0x001d, t01=0x012c}
0x2e94…2eb6 Head {h00=0x001e, h01=0x0050, text=» LD A1,4,A2 GET PARAMETER «, t00=0x001d, t01=0x0150}
0x2eb6…2ede Head {h00=0x0024, h01=0x0050, text=» ABI 2,A2 GO TO TIME OUT ROUTINE«, t00=0x001d, t01=0x0172}
0x2ede…2ee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x000a}
0x2ee8…2ef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0014}
0x2ef2…2f14 Head {h00=0x001e, h01=0x0050, text=»COUNT DATA 0 100 MS SWITCH«, t00=0x001e, t01=0x001e}
0x2f14…2f1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0040}
0x2f1e…2f28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x004a}
0x2f28…2f40 Head {h00=0x0014, h01=0x0050, text=»* T I M Q U E «, t00=0x001e, t01=0x0054}
0x2f40…2f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x006c}
0x2f4a…2f7c Head {h00=0x002e, h01=0x0050, text=»* POINTER TO FIRST BLOCK IN TIMER QUEUE «, t00=0x001e, t01=0x0076}
0x2f7c…2f86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a8}
0x2f86…2f90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b2}
0x2f90…2fa4 Head {h00=0x0010, h01=0x0050, text=»TIMQUE EQU *«, t00=0x001e, t01=0x00bc}
0x2fa4…2fb4 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x001e, t01=0x00d0}
0x2fb4…2fbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00e0}
0x2fbe…2fd6 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001e, t01=0x00ea}
0x2fd6…2fe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0102}
0x2fe0…2fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x010c}
0x2fea…3002 Head {h00=0x0014, h01=0x0050, text=»* I H P F A R «, t00=0x001e, t01=0x0116}
0x3002…300c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x012e}
0x300c…304e Head {h00=0x003e, h01=0x0050, text=»* THIS IS THE POWER FAIL/AUTO RESTART INTERRUPT HANDLER.«, t00=0x001e, t01=0x0138}
0x304e…3058 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x017a}
0x3058…3062 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0184}
0x3062…3072 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x001e, t01=0x018e}
0x3072…309c Head {h00=0x0026, h01=0x0050, text=»TTABPF DATA 0 TTAB FOR POWER FAIL «, t00=0x001f, t01=0x000e}
0x309c…30ae Head {h00=0x000e, h01=0x0050, text=» DATA '#P'«, t00=0x001f, t01=0x0038}
0x30ae…30be Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x001f, t01=0x004a}
0x30be…30d4 Head {h00=0x0012, h01=0x0050, text=»A15SAV DATA 0 «, t00=0x001f, t01=0x005a}
0x30d4…30e8 Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x001f, t01=0x0070}
0x30e8…30fc Head {h00=0x0010, h01=0x0050, text=» DATA POWOFF«, t00=0x001f, t01=0x0084}
0x30fc…3106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0098}
0x3106…3110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00a2}
0x3110…3126 Head {h00=0x0012, h01=0x0050, text=»* WORK AREAS«, t00=0x001f, t01=0x00ac}
0x3126…3130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c2}
0x3130…313a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00cc}
0x313a…3164 Head {h00=0x0026, h01=0x0050, text=»PFX DATA 1 POWER ON/OFF INDICATOR «, t00=0x001f, t01=0x00d6}
0x3164…316e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0100}
0x316e…3178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x010a}
0x3178…31a2 Head {h00=0x0026, h01=0x0050, text=»INIFLG DATA 1 INITIALIZATION FLAG «, t00=0x001f, t01=0x0114}
0x31a2…31ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x013e}
0x31ac…31c4 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001f, t01=0x0148}
0x31c4…31ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0160}
0x31ce…31d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x016a}
0x31d8…3206 Head {h00=0x002a, h01=0x0050, text=»* POWER FAIL/AUTO RESTART INTERRUPT «, t00=0x001f, t01=0x0174}
0x3206…3210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0012}
0x3210…321a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x001c}
0x321a…3230 Head {h00=0x0012, h01=0x0050, text=»IHPFAR EQU * «, t00=0x0020, t01=0x0026}
0x3230…3258 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0020, t01=0x003c}
0x3258…3282 Head {h00=0x0026, h01=0x0050, text=» RIT /17 RESET INTERNAL INTERRUPT «, t00=0x0020, t01=0x0064}
0x3282…32ac Head {h00=0x0026, h01=0x0050, text=» C1S PFX INDICATE POWER ON OR OFF «, t00=0x0020, t01=0x008e}
0x32ac…32ca Head {h00=0x001a, h01=0x0050, text=» RF(P) POWON POWER ON?«, t00=0x0020, t01=0x00b8}
0x32ca…32d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00d6}
0x32d4…32ea Head {h00=0x0012, h01=0x0050, text=»* POWER OFF «, t00=0x0020, t01=0x00e0}
0x32ea…32f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00f6}
0x32f4…330a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x0100}
0x330a…3334 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0020, t01=0x0116}
0x3334…3340 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0140}
0x3340…334a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x014c}
0x334a…3360 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0020, t01=0x0156}
0x3360…3386 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0020, t01=0x016c}
0x3386…3392 (33, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0004}
0x3392…339c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0010}
0x339c…33d4 Head {h00=0x0034, h01=0x0050, text=» LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING«, t00=0x0021, t01=0x001a}
0x33d4…33ec Head {h00=0x0014, h01=0x0050, text=» LDKL A2,TTABPF «, t00=0x0021, t01=0x0052}
0x33ec…33fe Head {h00=0x000e, h01=0x0050, text=» STR A1,A2«, t00=0x0021, t01=0x006a}
0x33fe…3414 Head {h00=0x0012, h01=0x0050, text=» ST A2,DISQUE «, t00=0x0021, t01=0x007c}
0x3414…3426 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0021, t01=0x0092}
0x3426…3430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00a4}
0x3430…3466 Head {h00=0x0032, h01=0x0050, text=»POWOFF ST A15,A15SAV SAVE A15 FOR BETTER TIMES«, t00=0x0021, t01=0x00ae}
0x3466…3472 Head {h00=0x0008, h01=0x0050, text=» HLT«, t00=0x0021, t01=0x00e4}
0x3472…347c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00f0}
0x347c…3494 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0021, t01=0x00fa}
0x3494…349e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0112}
0x349e…34b2 Head {h00=0x0010, h01=0x0050, text=»* POWER ON«, t00=0x0021, t01=0x011c}
0x34b2…34bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0130}
0x34bc…34e2 Head {h00=0x0022, h01=0x0050, text=»POWON LD A15,A15SAV RELOAD A15«, t00=0x0021, t01=0x013a}
0x34e2…3504 Head {h00=0x001e, h01=0x0050, text=» CM INIFLG RESET INIT FLAG«, t00=0x0021, t01=0x0160}
0x3504…351a Head {h00=0x0012, h01=0x0050, text=» CF A15,PFINIT«, t00=0x0021, t01=0x0182}
0x351a…352a Head {h00=0x000c, h01=0x0050, text=» CM PRUN«, t00=0x0022, t01=0x0008}
0x352a…353c Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0022, t01=0x0018}
0x353c…3546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x002a}
0x3546…3550 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0034}
0x3550…355a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x003e}
0x355a…3566 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0022, t01=0x0048}
0x3566…356a Head {h00=0x4004, h01=0x0000}
0x356a…356e 00 22 00 54 ┆ " T┆
0x356e…3576 (35, 1, 8) 20 04 00 00 00 23 00 04 ┆ # ┆
0x3576…35c6 (36, 0, 398) 41 31 00 2b 01 88 00 22 00 50 5c 58 52 4b 5c 41 34 2c 2f 46 46 5c 41 4c 52 45 41 44 59 20 4f 56 45 52 46 4c 4f 57 3f 20 00 2c 00 0a 00 14 00 50 5c 52 46 28 45 29 5c 45 58 49 54 5c 59 45 53 20 00 2c 00 30 00 0e 00 50 5c 4c 44 52 5c 41 33 2c ┆A1 + " P XRK A4,/FF ALREADY OVERFLOW? , P RF(E) EXIT YES , 0 P LDR A3,┆
0x35c6…3616 41 31 00 2c 00 48 00 34 00 50 5c 43 46 5c 41 31 35 2c 45 4f 51 55 45 55 5c 47 45 54 20 4e 45 58 54 20 4f 55 54 51 55 45 55 45 20 50 4f 49 4e 54 45 52 20 41 44 44 52 45 53 53 00 2c 00 5a 00 1e 00 50 5c 43 57 5c 41 31 2c 44 57 54 55 54 51 2c ┆A1 , H 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS , Z P CW A1,DWTUTQ,┆
0x3616…3666 41 36 5c 4f 56 45 52 46 4c 4f 57 3f 00 2c 00 92 00 28 00 50 5c 52 46 28 4e 5a 29 5c 49 48 4b 42 32 30 5c 53 41 56 45 20 4b 45 59 2d 4c 4f 43 4b 20 49 46 20 41 4e 59 20 00 2c 00 b4 00 30 00 50 5c 4f 52 4b 5c 41 32 2c 2f 46 46 5c 53 45 54 20 ┆A6 OVERFLOW? , ( P RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY , 0 P ORK A2,/FF SET ┆
0x3666…36b6 4f 56 45 52 46 4c 4f 57 42 49 54 20 49 4e 20 49 4e 50 55 54 20 42 55 46 46 45 52 20 00 2c 00 e0 00 0e 00 50 5c 52 46 5c 49 48 4b 42 33 30 00 2c 01 14 00 30 00 50 49 48 4b 42 32 30 5c 53 54 5c 41 31 2c 44 57 54 49 4e 51 2c 41 36 5c 53 54 4f ┆OVERFLOWBIT IN INPUT BUFFER , P RF IHKB30 , 0 PIHKB20 ST A1,DWTINQ,A6 STO┆
0x36b6…3704 52 45 20 49 4e 51 55 45 55 45 20 50 4f 49 4e 54 45 52 00 2c 01 26 00 14 00 50 49 48 4b 42 33 30 5c 53 43 52 5c 41 32 2c 41 33 00 2c 01 5a 00 12 00 50 45 58 49 54 5c 41 42 4c 5c 54 44 49 53 50 00 2c 01 72 00 06 00 50 2a 20 00 2c 01 88 ┆RE INQUEUE POINTER , & PIHKB30 SCR A2,A3 , Z PEXIT ABL TDISP , r P* , ┆