|
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: 17216 (0x4340)
Notes: pts_type(SC)
Names: »LRPINT.SC«
└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
└─⟦this⟧ »TOSSWORK/LRPINT.SC«
IDENT LRPINT REL 11.0 81-01-26 870105041100 * * ************************************************** * * 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 * * THE FOLLOWING ENTRIES ARE USED TO QUEUE TASKS: * * -LKMRQE: SET A7 = -1, QUEUE TASK AND DISPATCH * * -LKMSRC: SET A7 TO RETURN CODE (C(A2)), QUEUE TASK AND DISPATCH * * -LKMQDI: QUEUE TASK 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 TASK AND DISPATCH ENTRY LKMSRC SET RETURN CODE IN A7 TO USER 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 ENTRY PFPOST PWF POST PROCESSING FLAG EJECT LRPINT * * ************* * EXTERNALS * ************* * * EXTRN TDISP DISPATCHER EXTRN DISQUE DISPATCHER QUEUE EXTRN PRUN TTAB OF RUNNING TASK EXTRN MEXIT MONITOR TASK EXIT EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE EXTRN QTJOB QUEUE TASK EXTRN QMJOB QUEUE MONITOR TASK 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 RELPAG RELEASE PAGE EXTRN TLDSEG LOAD SEGMENT LKM PROCESSOR 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 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * * * 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 MONCLK EQU 0. * X:A EQU 1 MONCLK EQU X:A * EJECT LRPINT * * * A PROGRAM VERSION SUPPORTING DATE FUNCTIONS * IS OBTAINED BY SETTING MONDAT = MONCLK = 1. * X:B EQU 0 MONDAT EQU X:B * * * A PROGRAM VERSION WITH MONITOR CLOCK FUNCTIONS * ADAPTED TO 60 HERTZ NET FREQUENCY (USA/CANADA) * IS OBTAINED BY SETTING NETFRQ EQU 60. * NOTICE THAT THE DEFAULT VALUE SHOULD BE 50. * NETFRQ EQU 50 * 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 TASK * * - 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 TASK * A6 = LKM DATA DIRECTIVE * A2, A3 ARE DESTROYED * * ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING TASK * * 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 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 INSTRUCTION CODE LDR* A6,A2 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 INSTRUCTION CODE ELR A6,A2 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 * ADK A2,2 UPDATE DISPATCH ADDRESS * IFF MMUPAG+DSKPAG=0 CWK A6,9 CHECK DATA DIRECTIVE ABL(E) TLDSEG LOAD SEGMENT REQUEST XIF * IFT DSKPAG=1 LD A3,TTB:SB,A5 SEGMENT BLOCK ADDRESS RF(Z) LKM030 NO SEGMENT LCR A4,A3 SEGMENT STATUS ANK A4,/5E CHECK IF CORE RESIDENT OR... RF(NZ) LKM030 ...USED BY AN INTERRUPTED TASK CF A15,RELPAG RELEASE PAGE XIF * EJECT LRPINT * * LKM030 EQU * CM PRUN INDICATE IDLE LOOP RUNNING CF A15,SWL48 SWITCH TO LEVEL 48 LDK A4,0 LDR A3,A6 DATA DIRECTIVE RF(NN) LKM050 NO LABEL * * LKM REQUEST WITH LABEL * IFT MMUPAG=0 LDR* A4,A2 LABEL XIF * IFT MMUPAG=1 ELR A4,A2 LABEL XIF * ADK A2,2 ADJUST DISPATCH ADDRESS NGR A3,A3 MAKE DATA DIRECTIVE POSITIVE * EJECT LRPINT * * UPDATE TTB:SA AND GO TO LKM PROCESSOR * LKM050 EQU * ST A2,TTB:SA,A5 SET NEXT DISPATCH ADDRESS ADR A3,A3 INDEX IN LKMAL RF(Z) LKMQDI TASK SWITCH REQUEST CW A3,LKMAL RF(NL) LKMRQE INVALID DATA DIRECTIVE INH LD A3,LKMAL,A3 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 TASK AND DISPATCH. * * A5 = TTAB ADDRESS * * LKMRQE EQU * LDKL A2,-1 * * * L K M S R C * * SET A7 = A2, QUEUE TASK AND DISPATCH. * * A2 = RETURN CODE * A5 = TTAB ADDRESS * * LKMSRC EQU * ST A2,TTB:SA+14,A5 SET RETURN CODE IN SAVE AREA A7 EJECT * * * L K M Q D I * * QUEUE TASK 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 P F A R * * THIS IS THE POWER FAIL/AUTO RESTART INTERRUPT HANDLER. * DATA 0 SEGMENT BLOCK ADDRESS DATA 0 TTABPF DATA 0 TTAB FOR POWER FAIL DATA '#P' DATA 0 A15SAV DATA 0 DATA /00C0 DATA PFTASK PFX DATA 1 POWER ON/OFF INDICATOR P=POWER IS ON, N=POWER IS OFF INIFLG DATA 1 INITIALIZATION FLAG NZ=INITIALIZATION PFPOST DATA 0 PWF POST PROCESSING FLAG NZ=PWF POST PROCESSING 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-A14 ON STACK STR A9,A15 STR A10,A15 STR A11,A15 STR A12,A15 STR A13,A15 STR A14,A15 XIF IFT CPU852=0 MSR 14,A15 SAVE A1-A14 ON STACK XIF ST A15,A15SAV SAVE A15 FOR BETTER TIMES HLT EJECT LRPINT * * POWER ON * POWON LD A15,A15SAV RELOAD A15 IFT CPU852=1 LDR* A14,A15 RESTORE A9-A14 LDR* A13,A15 LDR* A12,A15 LDR* A11,A15 LDR* A10,A15 LDR* A9,A15 XIF IFT CPU852=0 MLR 14,A15 RESTORE A9-A14 MSR 8,A15 XIF LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING LDKL A2,TTABPF CWR A1,A2 RB(E) T:DISP ALREADY QUEUED, PWF DURING PFPOST STR A1,A2 ST A2,DISQUE IM PFPOST INDICATE PWF POST PROCESSING RB T:DISP EJECT LRPINT * * POWER FAIL TASK * STARTED AFTER ALL PWF POST PROCESSING * PFTASK CM PFPOST CLEAR PWF POST PROC FLAG CM INIFLG AND INIT FLAG CF A15,PFINIT RESTART I/O DEVICES CM PRUN EXIT PFTASK RB T:DISP 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 * EJECT LRPINT * * IFT NETFRQ=50 LDKL A4,-4 SET 100 MS SWITCH ST A4,COUNT XIF * IFT NETFRQ=60 LDKL A4,-5 SET 100 MS SWITCH XIF * LDKL A2,CLOCK QUEUE CLOCK ROUTINE AS MJOB CF A15,QMJOB * IFT MONCLK=1 IM SECOND RF(P) RTC025 UPDATE MONITOR CLOCK XIF * SWDISP EQU * CF A15,SWLXY SWITCH TO LEVEL XY RB T:DISP * EJECT LRPINT * * IFT MONCLK=1 * * MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. * RTC025 EQU * 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) SWDISP GO TO DISPATCHER CM MONCLO+2,A4 RESTART TIME COUNTER SUK A4,2 END RF(N) MCLO30 MIDNIGHT CARRY AND WE HAVE A NEW DAY RB(P) MCLO10 UPDATE MINUTES LDK A3,24 UPDATE HOURS RB MCLO20 * MCLO30 EQU * IM MCARRY INCREMENT MIDNIGHT CARRY * EJECT LRPINT * * IFT MONDAT=1 * * UPDATE DAY, MONTH AND YEAR * IFT CPU852=1 LDKL A1,MONTH MONTH ADDRESS LDKL A2,DAY DAY ADDRESS LDK A3,1 XIF * IFT MONCLK+MONDAT=2 IFT CPU852=0 MLK 3 DATA MONTH,DAY,1 MONTH AND DAY ADDRESS TO A1 AND A2 XIF * IFT MONCLK+MONDAT=2 IMR A2 INCREMENT DAY LDR* A4,A1 MONTH LDR A6,A4 LDR* A5,A2 NEW DAY SUK A5,29 CHECK IF DAY WAS 28 RF(Z) MCLO40 YES, GO AND CHECK IF FEBRUARY SUK A5,2 CHECK IF DAY WAS 30 RF(Z) MCLO60 YES SUK A5,1 CHECK IF DAY WAS 31 RB(NZ) SWDISP NO, RETURN RF MCLO50 YES, WE HAVE A NEW MONTH * MCLO40 EQU * SUK A6,2 CHECK IF FEBRUARY RB(NZ) SWDISP NO, RETURN * EJECT LRPINT * * CHANGE TO NEW MONTH (AND YEAR?) * * MCLO50 EQU * STR A3,A2 SET DAY := 1 IMR A1 INCREMENT MONTH SUK A4,12 CHECK IF MONTH WAS DECEMBER RB(NZ) SWDISP NO, RETURN STR A3,A1 SET MONTH TO JANUARY IM YEAR HAPPY NEW YEAR!!! RB SWDISP RETURN * MCLO60 EQU * LDR A7,A6 MONTH ANK A6,1 RF(Z) MCLO70 MONTH EVEN SUK A7,7 RB(P) MCLO50 SEPTEMBER OR NOVEMBER RB SWDISP JANUARY, MARCH, MAY OR JULY * MCLO70 EQU * SUK A7,7 RB(N) MCLO50 APRIL OR JUNE XIF * IFT MONCLK=1 RB SWDISP RETURN XIF * EJECT LRPINT * * * M O N C L O * * IFT MONCLK+MONDAT=2 DATA 0 THIS WORD USED BY MONTIM (TDATE) YEAR DATA 0 MONTH DATA 0 DAY DATA 0 XIF * MONCLO EQU * IFT MONCLK=1 MCARRY DATA 0 ACKUMULATED 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 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 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 * LDKL A1,/C4C0 LEVEL 49 AND ENABLE ST A1,18,A15 SET NEW PSW ON STACK LD A2,2,A4 LOAD DISP BLOCK LD A1,4,A2 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 * * * END
0x0000…0036 (0, 0, 398) Head {h00=0x0032, h01=0x0050, text=» IDENT LRPINT REL 11.0 81-01-26 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004c}
0x0052…008c Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0056}
0x008c…0096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0090}
0x0096…00be Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x009a}
0x00be…00c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c2}
0x00c8…00fc Head {h00=0x0030, h01=0x0050, text=»* LRPINT = INTERRUPT HANDLERS FOR LKM, RTC«, t00=0x0000, t01=0x00cc}
0x00fc…0122 Head {h00=0x0022, h01=0x0050, text=»* AND POWER FAILURE«, t00=0x0000, t01=0x0100}
0x0122…012c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0126}
0x012c…0136 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0130}
0x0136…0140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013a}
0x0140…014a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0144}
0x014a…0154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014e}
0x0154…018e Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0158}
0x018e…0198 (1, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0004}
0x0198…01a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000e}
0x01a2…01e0 Head {h00=0x003a, h01=0x0050, text=»* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS «, t00=0x0001, t01=0x0018}
0x01e0…0200 Head {h00=0x001c, h01=0x0050, text=»* FOR TOSS. THESE ARE:«, t00=0x0001, t01=0x0056}
0x0200…020a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0076}
0x020a…022c Head {h00=0x001e, h01=0x0050, text=»* -IHLKM: LKM INTERRUPT«, t00=0x0001, t01=0x0080}
0x022c…0236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a2}
0x0236…0258 Head {h00=0x001e, h01=0x0050, text=»* -IHRTC: RTC INTERRUPT«, t00=0x0001, t01=0x00ac}
0x0258…0262 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ce}
0x0262…028e Head {h00=0x0028, h01=0x0050, text=»* -IHPFAR: POWER FAILURE INTERRUPT«, t00=0x0001, t01=0x00d8}
0x028e…0298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0104}
0x0298…02d2 Head {h00=0x0036, h01=0x0050, text=»* THE FOLLOWING ENTRIES ARE USED TO QUEUE TASKS:«, t00=0x0001, t01=0x010e}
0x02d2…02dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0148}
0x02dc…0316 Head {h00=0x0036, h01=0x0050, text=»* -LKMRQE: SET A7 = -1, QUEUE TASK AND DISPATCH «, t00=0x0001, t01=0x0152}
0x0316…0320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018c}
0x0320…036c Head {h00=0x0048, h01=0x0050, text=»* -LKMSRC: SET A7 TO RETURN CODE (C(A2)), QUEUE TASK AND DISPATCH «, t00=0x0002, t01=0x0008}
0x036c…0376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0054}
0x0376…03a2 Head {h00=0x0028, h01=0x0050, text=»* -LKMQDI: QUEUE TASK AND DISPATCH«, t00=0x0002, t01=0x005e}
0x03a2…03ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008a}
0x03ac…03c4 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0002, t01=0x0094}
0x03c4…03ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ac}
0x03ce…03d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b6}
0x03d8…03ec Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00c0}
0x03ec…0400 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x00d4}
0x0400…0414 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00e8}
0x0414…041e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fc}
0x041e…0428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0106}
0x0428…0452 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHLKM LKM INTERRUPT HANDLER«, t00=0x0002, t01=0x0110}
0x0452…048a Head {h00=0x0034, h01=0x0050, text=» ENTRY LKM030 SPECIAL TLDSEG REQUEST ERROR ENTRY«, t00=0x0002, t01=0x013a}
0x048a…04b2 Head {h00=0x0024, h01=0x0050, text=» ENTRY LKMRQE LKM REQUEST ERROR «, t00=0x0002, t01=0x0172}
0x04b2…04ea Head {h00=0x0034, h01=0x0050, text=» ENTRY LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR«, t00=0x0003, t01=0x000a}
0x04ea…0518 Head {h00=0x002a, h01=0x0050, text=» ENTRY LKMQDI QUEUE TASK AND DISPATCH «, t00=0x0003, t01=0x0042}
0x0518…054c Head {h00=0x0030, h01=0x0050, text=» ENTRY LKMSRC SET RETURN CODE IN A7 TO USER «, t00=0x0003, t01=0x0070}
0x054c…0576 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHRTC RTC INTERRUPT HANDLER«, t00=0x0003, t01=0x00a4}
0x0576…05b2 Head {h00=0x0038, h01=0x0050, text=» ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE «, t00=0x0003, t01=0x00ce}
0x05b2…05d6 Head {h00=0x0020, h01=0x0050, text=» ENTRY MONCLO MONITOR CLOCK «, t00=0x0003, t01=0x010a}
0x05d6…060c Head {h00=0x0032, h01=0x0050, text=» ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER «, t00=0x0003, t01=0x012e}
0x060c…0636 Head {h00=0x0026, h01=0x0050, text=» ENTRY INIFLG INITIALIZATION FLAG «, t00=0x0003, t01=0x0164}
0x0636…0664 Head {h00=0x002a, h01=0x0050, text=» ENTRY PFPOST PWF POST PROCESSING FLAG«, t00=0x0003, t01=0x018e}
0x0664…067c Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0004, t01=0x002c}
0x067c…0686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0044}
0x0686…0690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004e}
0x0690…06a6 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0058}
0x06a6…06bc Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x006e}
0x06bc…06d2 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0084}
0x06d2…06dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x009a}
0x06dc…06e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a4}
0x06e6…0706 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0004, t01=0x00ae}
0x0706…072c Head {h00=0x0022, h01=0x0050, text=» EXTRN DISQUE DISPATCHER QUEUE«, t00=0x0004, t01=0x00ce}
0x072c…0754 Head {h00=0x0024, h01=0x0050, text=» EXTRN PRUN TTAB OF RUNNING TASK«, t00=0x0004, t01=0x00f4}
0x0754…077a Head {h00=0x0022, h01=0x0050, text=» EXTRN MEXIT MONITOR TASK EXIT«, t00=0x0004, t01=0x011c}
0x077a…07aa Head {h00=0x002c, h01=0x0050, text=» EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE«, t00=0x0004, t01=0x0142}
0x07aa…07ca Head {h00=0x001c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK «, t00=0x0004, t01=0x0172}
0x07ca…07f2 (5, 0, 400) Head {h00=0x0024, h01=0x0050, text=» EXTRN QMJOB QUEUE MONITOR TASK «, t00=0x0005, t01=0x0004}
0x07f2…081a Head {h00=0x0024, h01=0x0050, text=» EXTRN SWL48 SWITCH TO LEVEL 48 «, t00=0x0005, t01=0x002c}
0x081a…0842 Head {h00=0x0024, h01=0x0050, text=» EXTRN SWLXY SWITCH TO LEVEL XY «, t00=0x0005, t01=0x0054}
0x0842…0866 Head {h00=0x0020, h01=0x0050, text=» EXTRN FREBLK SET BLOCK FREE«, t00=0x0005, t01=0x007c}
0x0866…088c Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x0005, t01=0x00a0}
0x088c…08b4 Head {h00=0x0024, h01=0x0050, text=» EXTRN PFINIT RESTART OF DEVICES«, t00=0x0005, t01=0x00c6}
0x08b4…08d4 Head {h00=0x001c, h01=0x0050, text=» EXTRN HALT HALT MODULE «, t00=0x0005, t01=0x00ee}
0x08d4…0900 Head {h00=0x0028, h01=0x0050, text=» EXTRN INTSAV INTERRUPT SAVE MODULE «, t00=0x0005, t01=0x010e}
0x0900…0922 Head {h00=0x001e, h01=0x0050, text=» EXTRN RELPAG RELEASE PAGE«, t00=0x0005, t01=0x013a}
0x0922…0952 Head {h00=0x002c, h01=0x0050, text=» EXTRN TLDSEG LOAD SEGMENT LKM PROCESSOR«, t00=0x0005, t01=0x015c}
0x0952…097e Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SB SEGMENT BLOCK POINTER «, t00=0x0005, t01=0x018c}
0x097e…09a8 Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x0006, t01=0x0028}
0x09a8…09de Head {h00=0x0032, h01=0x0050, text=» EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB «, t00=0x0006, t01=0x0052}
0x09de…0a04 Head {h00=0x0022, h01=0x0050, text=» EXTRN LKMAL LKM REQUEST TABLE«, t00=0x0006, t01=0x0088}
0x0a04…0a1c Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0006, t01=0x00ae}
0x0a1c…0a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c6}
0x0a26…0a30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d0}
0x0a30…0a62 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x00da}
0x0a62…0a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010c}
0x0a6c…0a8a Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0006, t01=0x0116}
0x0a8a…0a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0134}
0x0a94…0ac6 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x013e}
0x0ac6…0ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0170}
0x0ad0…0b02 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0006, t01=0x017a}
0x0b02…0b30 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0007, t01=0x001c}
0x0b30…0b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004a}
0x0b3a…0b4e Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0007, t01=0x0054}
0x0b4e…0b58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0068}
0x0b58…0b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0072}
0x0b62…0b9c Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x007c}
0x0b9c…0bce Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x00b6}
0x0bce…0bd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e8}
0x0bd8…0bec Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0007, t01=0x00f2}
0x0bec…0bf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0106}
0x0bf6…0c00 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0007, t01=0x0110}
0x0c00…0c32 Head {h00=0x002e, h01=0x002a, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x0007, t01=0x011a}
0x0c32…0c60 Head {h00=0x002a, h01=0x0026, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x0007, t01=0x014c}
0x0c60…0c6a Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0007, t01=0x017a}
0x0c6a…0c7e Head {h00=0x0010, h01=0x000c, text=»DSKPAG EQU 0«, t00=0x0007, t01=0x0184}
0x0c7e…0c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0008}
0x0c88…0c92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0012}
0x0c92…0cce Head {h00=0x0038, h01=0x0050, text=»* A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS«, t00=0x0008, t01=0x001c}
0x0cce…0cfc Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MONCLK EQU 0.«, t00=0x0008, t01=0x0058}
0x0cfc…0d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0086}
0x0d06…0d18 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x0008, t01=0x0090}
0x0d18…0d2e Head {h00=0x0012, h01=0x0050, text=»MONCLK EQU X:A«, t00=0x0008, t01=0x00a2}
0x0d2e…0d38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00b8}
0x0d38…0d50 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0008, t01=0x00c2}
0x0d50…0d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00da}
0x0d5a…0d64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e4}
0x0d64…0d9a Head {h00=0x0032, h01=0x0050, text=»* A PROGRAM VERSION SUPPORTING DATE FUNCTIONS «, t00=0x0008, t01=0x00ee}
0x0d9a…0dd0 Head {h00=0x0032, h01=0x0050, text=»* IS OBTAINED BY SETTING MONDAT = MONCLK = 1. «, t00=0x0008, t01=0x0124}
0x0dd0…0dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015a}
0x0dda…0dec Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0008, t01=0x0164}
0x0dec…0e02 Head {h00=0x0012, h01=0x0050, text=»MONDAT EQU X:B«, t00=0x0008, t01=0x0176}
0x0e02…0e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x018c}
0x0e0c…0e16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0008}
0x0e16…0e4e Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION WITH MONITOR CLOCK FUNCTIONS«, t00=0x0009, t01=0x0012}
0x0e4e…0e86 Head {h00=0x0034, h01=0x0050, text=»* ADAPTED TO 60 HERTZ NET FREQUENCY (USA/CANADA)«, t00=0x0009, t01=0x004a}
0x0e86…0eb6 Head {h00=0x002c, h01=0x0050, text=»* IS OBTAINED BY SETTING NETFRQ EQU 60. «, t00=0x0009, t01=0x0082}
0x0eb6…0eec Head {h00=0x0032, h01=0x0050, text=»* NOTICE THAT THE DEFAULT VALUE SHOULD BE 50. «, t00=0x0009, t01=0x00b2}
0x0eec…0ef6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e8}
0x0ef6…0f0c Head {h00=0x0012, h01=0x0050, text=»NETFRQ EQU 50 «, t00=0x0009, t01=0x00f2}
0x0f0c…0f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0108}
0x0f16…0f2e Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0009, t01=0x0112}
0x0f2e…0f38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x012a}
0x0f38…0f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0134}
0x0f42…0f58 Head {h00=0x0012, h01=0x0050, text=»* I H L K M «, t00=0x0009, t01=0x013e}
0x0f58…0f62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0154}
0x0f62…0f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x015e}
0x0f6c…0fa8 Head {h00=0x0038, h01=0x0050, text=»* THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING«, t00=0x0009, t01=0x0168}
0x0fa8…0fca Head {h00=0x001e, h01=0x0050, text=»* STEPS ARE CARRIED OUT:«, t00=0x000a, t01=0x0014}
0x0fca…0fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0036}
0x0fd4…1002 Head {h00=0x002a, h01=0x0050, text=»* - IF STACK OVERFLOW SYSTEM HALTS. «, t00=0x000a, t01=0x0040}
0x1002…100c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006e}
0x100c…1054 Head {h00=0x0044, h01=0x0050, text=»* - ELSE REGISTERS A1 - A14 ARE SAVED IN TTAB FOR RUNNING TASK«, t00=0x000a, t01=0x0078}
0x1054…105e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c0}
0x105e…109c Head {h00=0x003a, h01=0x0050, text=»* - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO «, t00=0x000a, t01=0x00ca}
0x109c…10c4 Head {h00=0x0024, h01=0x0050, text=»* APPROPRIATE LKM PROCESSOR.«, t00=0x000a, t01=0x0108}
0x10c4…10ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0130}
0x10ce…10ee Head {h00=0x001c, h01=0x0050, text=»* EXIT CONDITIONS ARE:«, t00=0x000a, t01=0x013a}
0x10ee…10f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x015a}
0x10f8…1126 Head {h00=0x002a, h01=0x0050, text=»* A4 = LABEL ADDRESS OF LKM REQUEST «, t00=0x000a, t01=0x0164}
0x1126…1162 (11, 0, 400) Head {h00=0x0038, h01=0x0050, text=»* (A4 = 0 INDICATES NO LABEL IN LKM REQUEST) «, t00=0x000b, t01=0x0004}
0x1162…1190 Head {h00=0x002a, h01=0x0050, text=»* A5 = TTAB ADDRESS OF CALLING TASK «, t00=0x000b, t01=0x0040}
0x1190…11b4 Head {h00=0x0020, h01=0x0050, text=»* A6 = LKM DATA DIRECTIVE «, t00=0x000b, t01=0x006e}
0x11b4…11d4 Head {h00=0x001c, h01=0x0050, text=»* A2, A3 ARE DESTROYED«, t00=0x000b, t01=0x0092}
0x11d4…11de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b2}
0x11de…1220 Head {h00=0x003e, h01=0x0050, text=»* ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING TASK«, t00=0x000b, t01=0x00bc}
0x1220…122a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00fe}
0x122a…1234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0108}
0x1234…1248 Head {h00=0x0010, h01=0x0050, text=»IHLKM EQU * «, t00=0x000b, t01=0x0112}
0x1248…1270 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x000b, t01=0x0126}
0x1270…129e Head {h00=0x002a, h01=0x0050, text=» RIT /1D RESET INTERNAL INTERRUPT FLAG«, t00=0x000b, t01=0x014e}
0x129e…12a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017c}
0x12a8…12c0 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x000b, t01=0x0186}
0x12c0…12ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x000e}
0x12ca…12d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0018}
0x12d4…12f4 Head {h00=0x001c, h01=0x0050, text=» ST A15,LKM010 SAVE A15 «, t00=0x000c, t01=0x0022}
0x12f4…131a Head {h00=0x0022, h01=0x0050, text=» LD A15,PRUN LOAD TTAB ADDRESS«, t00=0x000c, t01=0x0042}
0x131a…1324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0068}
0x1324…133a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x000c, t01=0x0072}
0x133a…1372 Head {h00=0x0034, h01=0x0050, text=» ADKL A15,TTB:SA+28 SET A15 TO LAST IN SAVE AREA«, t00=0x000c, t01=0x0088}
0x1372…13a0 Head {h00=0x002a, h01=0x0050, text=» STR A14,A15 SAVE USER REGISTERS, -A14«, t00=0x000c, t01=0x00c0}
0x13a0…13ba Head {h00=0x0016, h01=0x0050, text=» STR A13,A15 -A13 «, t00=0x000c, t01=0x00ee}
0x13ba…13d4 Head {h00=0x0016, h01=0x0050, text=» STR A12,A15 -A12 «, t00=0x000c, t01=0x0108}
0x13d4…13ee Head {h00=0x0016, h01=0x0050, text=» STR A11,A15 -A11 «, t00=0x000c, t01=0x0122}
0x13ee…1408 Head {h00=0x0016, h01=0x0050, text=» STR A10,A15 -A10 «, t00=0x000c, t01=0x013c}
0x1408…1420 Head {h00=0x0014, h01=0x0050, text=» STR A9,A15 -A9 «, t00=0x000c, t01=0x0156}
0x1420…1438 Head {h00=0x0014, h01=0x0050, text=» STR A8,A15 -A8 «, t00=0x000c, t01=0x016e}
0x1438…1450 Head {h00=0x0014, h01=0x0050, text=» STR A7,A15 -A7 «, t00=0x000c, t01=0x0186}
0x1450…1468 Head {h00=0x0014, h01=0x0050, text=» STR A6,A15 -A6 «, t00=0x000d, t01=0x000e}
0x1468…1480 Head {h00=0x0014, h01=0x0050, text=» STR A5,A15 -A5 «, t00=0x000d, t01=0x0026}
0x1480…1498 Head {h00=0x0014, h01=0x0050, text=» STR A4,A15 -A4 «, t00=0x000d, t01=0x003e}
0x1498…14b0 Head {h00=0x0014, h01=0x0050, text=» STR A3,A15 -A3 «, t00=0x000d, t01=0x0056}
0x14b0…14c8 Head {h00=0x0014, h01=0x0050, text=» STR A2,A15 -A2 «, t00=0x000d, t01=0x006e}
0x14c8…14e0 Head {h00=0x0014, h01=0x0050, text=» STR A1,A15 -A1 «, t00=0x000d, t01=0x0086}
0x14e0…14ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x009e}
0x14ec…14f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00aa}
0x14f6…150c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x000d, t01=0x00b4}
0x150c…1546 Head {h00=0x0036, h01=0x0050, text=» MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA «, t00=0x000d, t01=0x00ca}
0x1546…1552 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0104}
0x1552…155c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0110}
0x155c…158c Head {h00=0x002c, h01=0x0050, text=» LD A5,PRUN TTAB ADDRESS OF CALLING TASK«, t00=0x000d, t01=0x011a}
0x158c…15ba Head {h00=0x002a, h01=0x0050, text=» LDKL A15,0 RESTORE A15 STACK POINTER «, t00=0x000d, t01=0x014a}
0x15ba…15d0 Head {h00=0x0012, h01=0x0050, text=»LKM010 EQU *-2«, t00=0x000d, t01=0x0178}
0x15d0…15da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018e}
0x15da…15f2 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x000e, t01=0x0008}
0x15f2…15fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0020}
0x15fc…1622 Head {h00=0x0022, h01=0x0050, text=»* GET LKM REQUEST PARAMETERS«, t00=0x000e, t01=0x002a}
0x1622…162c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0050}
0x162c…1640 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x000e, t01=0x005a}
0x1640…1678 Head {h00=0x0034, h01=0x0050, text=» LDR* A2,A15 LOAD P.C. AND ADJUST STACK POINTER «, t00=0x000e, t01=0x006e}
0x1678…16a2 Head {h00=0x0026, h01=0x0050, text=» ST A3,TTB:PW,A5 STORE PSW IN TTAB«, t00=0x000e, t01=0x00a6}
0x16a2…16ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d0}
0x16ac…16c2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x00da}
0x16c2…16e8 Head {h00=0x0022, h01=0x0050, text=» LD A3,-2,A2 INSTRUCTION CODE «, t00=0x000e, t01=0x00f0}
0x16e8…170a Head {h00=0x001e, h01=0x0050, text=» LDR* A6,A2 DATA DIRECTIVE«, t00=0x000e, t01=0x0116}
0x170a…1716 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0138}
0x1716…1720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0144}
0x1720…1736 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x014e}
0x1736…1748 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x000e, t01=0x0164}
0x1748…1768 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) LKM015 USER MODE«, t00=0x000e, t01=0x0176}
0x1768…1796 Head {h00=0x002a, h01=0x0050, text=» TL MONMMU NO, LOAD MONITOR MMU TABLE «, t00=0x000f, t01=0x0008}
0x1796…17a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0036}
0x17a0…17b4 Head {h00=0x0010, h01=0x0050, text=»LKM015 EQU *«, t00=0x000f, t01=0x0040}
0x17b4…17da Head {h00=0x0022, h01=0x0050, text=» EL A3,-2,A2 INSTRUCTION CODE«, t00=0x000f, t01=0x0054}
0x17da…17fc Head {h00=0x001e, h01=0x0050, text=» ELR A6,A2 DATA DIRECTIVE «, t00=0x000f, t01=0x007a}
0x17fc…1808 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x009c}
0x1808…1812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a8}
0x1812…1828 Head {h00=0x0012, h01=0x0050, text=» CWK A3,/2804 «, t00=0x000f, t01=0x00b2}
0x1828…1842 Head {h00=0x0016, h01=0x0050, text=» RF(E) LKM025 LKM «, t00=0x000f, t01=0x00c8}
0x1842…1858 Head {h00=0x0012, h01=0x0050, text=» CWK A3,/6300 «, t00=0x000f, t01=0x00e2}
0x1858…1872 Head {h00=0x0016, h01=0x0050, text=» RF(E) LKM025 TRAP«, t00=0x000f, t01=0x00f8}
0x1872…187c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0112}
0x187c…18a4 Head {h00=0x0024, h01=0x0050, text=»* STACK OVERFLOW: HALT SYSTEM «, t00=0x000f, t01=0x011c}
0x18a4…18ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0144}
0x18ae…18ce Head {h00=0x001c, h01=0x0050, text=» LDK A1,7 HALT PARAMETER«, t00=0x000f, t01=0x014e}
0x18ce…1902 Head {h00=0x0030, h01=0x0050, text=» RF LKM070 HALT SYSTEM DUE TO STACK OVERFLOW«, t00=0x000f, t01=0x016e}
0x1902…190c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0012}
0x190c…1924 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0010, t01=0x001c}
0x1924…192e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0034}
0x192e…1938 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003e}
0x1938…194c Head {h00=0x0010, h01=0x0050, text=»LKM025 EQU *«, t00=0x0010, t01=0x0048}
0x194c…1976 Head {h00=0x0026, h01=0x0050, text=» ADK A2,2 UPDATE DISPATCH ADDRESS «, t00=0x0010, t01=0x005c}
0x1976…1980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0086}
0x1980…199c Head {h00=0x0018, h01=0x0050, text=» IFF MMUPAG+DSKPAG=0«, t00=0x0010, t01=0x0090}
0x199c…19c2 Head {h00=0x0022, h01=0x0050, text=» CWK A6,9 CHECK DATA DIRECTIVE«, t00=0x0010, t01=0x00ac}
0x19c2…19ee Head {h00=0x0028, h01=0x0050, text=» ABL(E) TLDSEG LOAD SEGMENT REQUEST «, t00=0x0010, t01=0x00d2}
0x19ee…19fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00fe}
0x19fa…1a04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x010a}
0x1a04…1a1a Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x0010, t01=0x0114}
0x1a1a…1a48 Head {h00=0x002a, h01=0x0050, text=» LD A3,TTB:SB,A5 SEGMENT BLOCK ADDRESS«, t00=0x0010, t01=0x012a}
0x1a48…1a68 Head {h00=0x001c, h01=0x0050, text=» RF(Z) LKM030 NO SEGMENT«, t00=0x0010, t01=0x0158}
0x1a68…1a8a Head {h00=0x001e, h01=0x0050, text=» LCR A4,A3 SEGMENT STATUS «, t00=0x0010, t01=0x0178}
0x1a8a…1aba Head {h00=0x002c, h01=0x0050, text=» ANK A4,/5E CHECK IF CORE RESIDENT OR...«, t00=0x0011, t01=0x000a}
0x1aba…1af0 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) LKM030 ...USED BY AN INTERRUPTED TASK «, t00=0x0011, t01=0x003a}
0x1af0…1b14 Head {h00=0x0020, h01=0x0050, text=» CF A15,RELPAG RELEASE PAGE «, t00=0x0011, t01=0x0070}
0x1b14…1b20 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0094}
0x1b20…1b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a0}
0x1b2a…1b42 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0011, t01=0x00aa}
0x1b42…1b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00c2}
0x1b4c…1b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00cc}
0x1b56…1b6a Head {h00=0x0010, h01=0x0050, text=»LKM030 EQU *«, t00=0x0011, t01=0x00d6}
0x1b6a…1b96 Head {h00=0x0028, h01=0x0050, text=» CM PRUN INDICATE IDLE LOOP RUNNING «, t00=0x0011, t01=0x00ea}
0x1b96…1bbe Head {h00=0x0024, h01=0x0050, text=» CF A15,SWL48 SWITCH TO LEVEL 48«, t00=0x0011, t01=0x0116}
0x1bbe…1bd0 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0011, t01=0x013e}
0x1bd0…1bf2 Head {h00=0x001e, h01=0x0050, text=» LDR A3,A6 DATA DIRECTIVE «, t00=0x0011, t01=0x0150}
0x1bf2…1c12 Head {h00=0x001c, h01=0x0050, text=» RF(NN) LKM050 NO LABEL «, t00=0x0011, t01=0x0172}
0x1c12…1c1c (18, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0004}
0x1c1c…1c3e Head {h00=0x001e, h01=0x0050, text=»* LKM REQUEST WITH LABEL«, t00=0x0012, t01=0x000e}
0x1c3e…1c48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0030}
0x1c48…1c5e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0012, t01=0x003a}
0x1c5e…1c78 Head {h00=0x0016, h01=0x0050, text=» LDR* A4,A2 LABEL «, t00=0x0012, t01=0x0050}
0x1c78…1c84 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x006a}
0x1c84…1c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0076}
0x1c8e…1ca4 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0012, t01=0x0080}
0x1ca4…1cbc Head {h00=0x0014, h01=0x0050, text=» ELR A4,A2 LABEL«, t00=0x0012, t01=0x0096}
0x1cbc…1cc8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00ae}
0x1cc8…1cd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ba}
0x1cd2…1cfc Head {h00=0x0026, h01=0x0050, text=» ADK A2,2 ADJUST DISPATCH ADDRESS «, t00=0x0012, t01=0x00c4}
0x1cfc…1d2c Head {h00=0x002c, h01=0x0050, text=» NGR A3,A3 MAKE DATA DIRECTIVE POSITIVE «, t00=0x0012, t01=0x00ee}
0x1d2c…1d36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011e}
0x1d36…1d4e Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0012, t01=0x0128}
0x1d4e…1d58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0140}
0x1d58…1d8a Head {h00=0x002e, h01=0x0050, text=»* UPDATE TTB:SA AND GO TO LKM PROCESSOR «, t00=0x0012, t01=0x014a}
0x1d8a…1d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x017c}
0x1d94…1da8 Head {h00=0x0010, h01=0x0050, text=»LKM050 EQU *«, t00=0x0012, t01=0x0186}
0x1da8…1dda Head {h00=0x002e, h01=0x0050, text=» ST A2,TTB:SA,A5 SET NEXT DISPATCH ADDRESS«, t00=0x0013, t01=0x000a}
0x1dda…1dfc Head {h00=0x001e, h01=0x0050, text=» ADR A3,A3 INDEX IN LKMAL «, t00=0x0013, t01=0x003c}
0x1dfc…1e26 Head {h00=0x0026, h01=0x0050, text=» RF(Z) LKMQDI TASK SWITCH REQUEST «, t00=0x0013, t01=0x005e}
0x1e26…1e3a Head {h00=0x0010, h01=0x0050, text=» CW A3,LKMAL«, t00=0x0013, t01=0x0088}
0x1e3a…1e68 Head {h00=0x002a, h01=0x0050, text=» RF(NL) LKMRQE INVALID DATA DIRECTIVE «, t00=0x0013, t01=0x009c}
0x1e68…1e74 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0013, t01=0x00ca}
0x1e74…1e8c Head {h00=0x0014, h01=0x0050, text=» LD A3,LKMAL,A3 «, t00=0x0013, t01=0x00d6}
0x1e8c…1eb8 Head {h00=0x0028, h01=0x0050, text=» ABR(NZ) A3 BRANCH TO LKM PROCESSOR «, t00=0x0013, t01=0x00ee}
0x1eb8…1ec2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x011a}
0x1ec2…1eda Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0013, t01=0x0124}
0x1eda…1ee4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x013c}
0x1ee4…1eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0146}
0x1eee…1f06 Head {h00=0x0014, h01=0x0050, text=»* L K M E R R «, t00=0x0013, t01=0x0150}
0x1f06…1f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0168}
0x1f10…1f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0172}
0x1f1a…1f5c Head {h00=0x003e, h01=0x0050, text=»LKMERR LDK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT «, t00=0x0013, t01=0x017c}
0x1f5c…1f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002e}
0x1f66…1f7a Head {h00=0x0010, h01=0x0050, text=»LKM070 EQU *«, t00=0x0014, t01=0x0038}
0x1f7a…1f9a Head {h00=0x001c, h01=0x0050, text=» CF A15,HALT HALT SYSTEM«, t00=0x0014, t01=0x004c}
0x1f9a…1fa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006c}
0x1fa4…1fae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0076}
0x1fae…1fc6 Head {h00=0x0014, h01=0x0050, text=»* L K M R Q E «, t00=0x0014, t01=0x0080}
0x1fc6…1fd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0098}
0x1fd0…2002 Head {h00=0x002e, h01=0x0050, text=»* SET A7 = -1, QUEUE TASK AND DISPATCH. «, t00=0x0014, t01=0x00a2}
0x2002…200c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00d4}
0x200c…202a Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0014, t01=0x00de}
0x202a…2034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00fc}
0x2034…203e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0106}
0x203e…2052 Head {h00=0x0010, h01=0x0050, text=»LKMRQE EQU *«, t00=0x0014, t01=0x0110}
0x2052…2066 Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-1 «, t00=0x0014, t01=0x0124}
0x2066…2070 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0138}
0x2070…207a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0142}
0x207a…2092 Head {h00=0x0014, h01=0x0050, text=»* L K M S R C «, t00=0x0014, t01=0x014c}
0x2092…209c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0164}
0x209c…20ce Head {h00=0x002e, h01=0x0050, text=»* SET A7 = A2, QUEUE TASK AND DISPATCH. «, t00=0x0014, t01=0x016e}
0x20ce…20d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0010}
0x20d8…20f4 Head {h00=0x0018, h01=0x0050, text=»* A2 = RETURN CODE«, t00=0x0015, t01=0x001a}
0x20f4…2112 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0015, t01=0x0036}
0x2112…211c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0054}
0x211c…2126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005e}
0x2126…213a Head {h00=0x0010, h01=0x0050, text=»LKMSRC EQU *«, t00=0x0015, t01=0x0068}
0x213a…2176 Head {h00=0x0038, h01=0x0050, text=» ST A2,TTB:SA+14,A5 SET RETURN CODE IN SAVE AREA A7 «, t00=0x0015, t01=0x007c}
0x2176…2184 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x00b8}
0x2184…218e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c6}
0x218e…2198 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d0}
0x2198…21b0 Head {h00=0x0014, h01=0x0050, text=»* L K M Q D I «, t00=0x0015, t01=0x00da}
0x21b0…21ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f2}
0x21ba…21de Head {h00=0x0020, h01=0x0050, text=»* QUEUE TASK AND DISPATCH.«, t00=0x0015, t01=0x00fc}
0x21de…21e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0120}
0x21e8…2206 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0015, t01=0x012a}
0x2206…2210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0148}
0x2210…221a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0152}
0x221a…222e Head {h00=0x0010, h01=0x0050, text=»LKMQDI EQU *«, t00=0x0015, t01=0x015c}
0x222e…2244 Head {h00=0x0012, h01=0x0050, text=» CF A15,QTJOB «, t00=0x0015, t01=0x0170}
0x2244…224e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0186}
0x224e…227c Head {h00=0x002a, h01=0x0050, text=»T:DISP EQU * COMMON EXIT TO DISPATCHER«, t00=0x0015, t01=0x0190}
0x227c…22a0 Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x002e}
0x22a0…22aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0052}
0x22aa…22c2 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0016, t01=0x005c}
0x22c2…22ca Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0074}
0x22ca…22d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x007c}
0x22d4…22ec Head {h00=0x0014, h01=0x0050, text=»* I H P F A R «, t00=0x0016, t01=0x0086}
0x22ec…22f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009e}
0x22f6…2338 Head {h00=0x003e, h01=0x0050, text=»* THIS IS THE POWER FAIL/AUTO RESTART INTERRUPT HANDLER.«, t00=0x0016, t01=0x00a8}
0x2338…2342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ea}
0x2342…234a Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00f4}
0x234a…2352 Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00fc}
0x2352…235a Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0104}
0x235a…2380 Head {h00=0x0022, h01=0x0050, text=» DATA 0 SEGMENT BLOCK ADDRESS «, t00=0x0016, t01=0x010c}
0x2380…2390 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0016, t01=0x0132}
0x2390…23ba Head {h00=0x0026, h01=0x0050, text=»TTABPF DATA 0 TTAB FOR POWER FAIL «, t00=0x0016, t01=0x0142}
0x23ba…23cc Head {h00=0x000e, h01=0x0050, text=» DATA '#P'«, t00=0x0016, t01=0x016c}
0x23cc…23dc Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0016, t01=0x017e}
0x23dc…23f2 Head {h00=0x0012, h01=0x0050, text=»A15SAV DATA 0 «, t00=0x0016, t01=0x018e}
0x23f2…2406 Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x0017, t01=0x0014}
0x2406…241a Head {h00=0x0010, h01=0x0050, text=» DATA PFTASK«, t00=0x0017, t01=0x0028}
0x241a…2422 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x003c}
0x2422…242a Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0044}
0x242a…2432 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x004c}
0x2432…243a Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0054}
0x243a…2442 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x005c}
0x2442…246c Head {h00=0x0026, h01=0x0050, text=»PFX DATA 1 POWER ON/OFF INDICATOR «, t00=0x0017, t01=0x0064}
0x246c…2494 Head {h00=0x0024, h01=0x0050, text=» P=POWER IS ON, N=POWER IS OFF«, t00=0x0017, t01=0x008e}
0x2494…249c Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00b6}
0x249c…24c6 Head {h00=0x0026, h01=0x0050, text=»INIFLG DATA 1 INITIALIZATION FLAG «, t00=0x0017, t01=0x00be}
0x24c6…24e2 Head {h00=0x0018, h01=0x0050, text=» NZ=INITIALIZATION«, t00=0x0017, t01=0x00e8}
0x24e2…24ea Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0104}
0x24ea…2518 Head {h00=0x002a, h01=0x0050, text=»PFPOST DATA 0 PWF POST PROCESSING FLAG«, t00=0x0017, t01=0x010c}
0x2518…253a Head {h00=0x001e, h01=0x0050, text=» NZ=PWF POST PROCESSING «, t00=0x0017, t01=0x013a}
0x253a…2552 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0017, t01=0x015c}
0x2552…255a Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0174}
0x255a…2564 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x017c}
0x2564…2592 Head {h00=0x002a, h01=0x0050, text=»* POWER FAIL/AUTO RESTART INTERRUPT «, t00=0x0017, t01=0x0186}
0x2592…259c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0024}
0x259c…25a4 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x002e}
0x25a4…25ba Head {h00=0x0012, h01=0x0050, text=»IHPFAR EQU * «, t00=0x0018, t01=0x0036}
0x25ba…25e2 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0018, t01=0x004c}
0x25e2…260c Head {h00=0x0026, h01=0x0050, text=» RIT /17 RESET INTERNAL INTERRUPT «, t00=0x0018, t01=0x0074}
0x260c…2636 Head {h00=0x0026, h01=0x0050, text=» C1S PFX INDICATE POWER ON OR OFF «, t00=0x0018, t01=0x009e}
0x2636…2654 Head {h00=0x001a, h01=0x0050, text=» RF(P) POWON POWER ON «, t00=0x0018, t01=0x00c8}
0x2654…265e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e6}
0x265e…2674 Head {h00=0x0012, h01=0x0050, text=»* POWER OFF «, t00=0x0018, t01=0x00f0}
0x2674…267e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0106}
0x267e…2694 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0018, t01=0x0110}
0x2694…26be Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A14 ON STACK«, t00=0x0018, t01=0x0126}
0x26be…26d2 Head {h00=0x0010, h01=0x0050, text=» STR A9,A15 «, t00=0x0018, t01=0x0150}
0x26d2…26e6 Head {h00=0x0010, h01=0x0050, text=» STR A10,A15«, t00=0x0018, t01=0x0164}
0x26e6…26fa Head {h00=0x0010, h01=0x0050, text=» STR A11,A15«, t00=0x0018, t01=0x0178}
0x26fa…270e Head {h00=0x0010, h01=0x0050, text=» STR A12,A15«, t00=0x0018, t01=0x018c}
0x270e…2722 Head {h00=0x0010, h01=0x0050, text=» STR A13,A15«, t00=0x0019, t01=0x0010}
0x2722…2736 Head {h00=0x0010, h01=0x0050, text=» STR A14,A15«, t00=0x0019, t01=0x0024}
0x2736…2742 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0038}
0x2742…274a Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0044}
0x274a…2760 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0019, t01=0x004c}
0x2760…2788 Head {h00=0x0024, h01=0x0050, text=» MSR 14,A15 SAVE A1-A14 ON STACK«, t00=0x0019, t01=0x0062}
0x2788…2794 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x008a}
0x2794…279c Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0096}
0x279c…27cc Head {h00=0x002c, h01=0x0050, text=» ST A15,A15SAV SAVE A15 FOR BETTER TIMES«, t00=0x0019, t01=0x009e}
0x27cc…27d8 Head {h00=0x0008, h01=0x0050, text=» HLT«, t00=0x0019, t01=0x00ce}
0x27d8…27f0 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0019, t01=0x00da}
0x27f0…27f8 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x00f2}
0x27f8…2802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00fa}
0x2802…2816 Head {h00=0x0010, h01=0x0050, text=»* POWER ON«, t00=0x0019, t01=0x0104}
0x2816…2820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0118}
0x2820…2828 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0122}
0x2828…284e Head {h00=0x0022, h01=0x0050, text=»POWON LD A15,A15SAV RELOAD A15«, t00=0x0019, t01=0x012a}
0x284e…2856 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0150}
0x2856…286c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0019, t01=0x0158}
0x286c…2890 Head {h00=0x0020, h01=0x0050, text=» LDR* A14,A15 RESTORE A9-A14«, t00=0x0019, t01=0x016e}
0x2890…28a6 (26, 0, 400) Head {h00=0x0012, h01=0x0050, text=» LDR* A13,A15 «, t00=0x001a, t01=0x0004}
0x28a6…28bc Head {h00=0x0012, h01=0x0050, text=» LDR* A12,A15 «, t00=0x001a, t01=0x001a}
0x28bc…28d2 Head {h00=0x0012, h01=0x0050, text=» LDR* A11,A15 «, t00=0x001a, t01=0x0030}
0x28d2…28e8 Head {h00=0x0012, h01=0x0050, text=» LDR* A10,A15 «, t00=0x001a, t01=0x0046}
0x28e8…28fc Head {h00=0x0010, h01=0x0050, text=» LDR* A9,A15«, t00=0x001a, t01=0x005c}
0x28fc…2908 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0070}
0x2908…2910 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x007c}
0x2910…2926 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001a, t01=0x0084}
0x2926…2948 Head {h00=0x001e, h01=0x0050, text=» MLR 14,A15 RESTORE A9-A14«, t00=0x001a, t01=0x009a}
0x2948…295a Head {h00=0x000e, h01=0x0050, text=» MSR 8,A15«, t00=0x001a, t01=0x00bc}
0x295a…2966 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00ce}
0x2966…296e Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00da}
0x296e…29a6 Head {h00=0x0034, h01=0x0050, text=» LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING«, t00=0x001a, t01=0x00e2}
0x29a6…29be Head {h00=0x0014, h01=0x0050, text=» LDKL A2,TTABPF «, t00=0x001a, t01=0x011a}
0x29be…29d0 Head {h00=0x000e, h01=0x0050, text=» CWR A1,A2«, t00=0x001a, t01=0x0132}
0x29d0…2a08 Head {h00=0x0034, h01=0x0050, text=» RB(E) T:DISP ALREADY QUEUED, PWF DURING PFPOST «, t00=0x001a, t01=0x0144}
0x2a08…2a1a Head {h00=0x000e, h01=0x0050, text=» STR A1,A2«, t00=0x001a, t01=0x017c}
0x2a1a…2a30 Head {h00=0x0012, h01=0x0050, text=» ST A2,DISQUE «, t00=0x001a, t01=0x018e}
0x2a30…2a60 Head {h00=0x002c, h01=0x0050, text=» IM PFPOST INDICATE PWF POST PROCESSING «, t00=0x001b, t01=0x0014}
0x2a60…2a72 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x001b, t01=0x0044}
0x2a72…2a8a Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001b, t01=0x0056}
0x2a8a…2a92 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x006e}
0x2a92…2a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0076}
0x2a9c…2ab8 Head {h00=0x0018, h01=0x0050, text=»* POWER FAIL TASK «, t00=0x001b, t01=0x0080}
0x2ab8…2aea Head {h00=0x002e, h01=0x0050, text=»* STARTED AFTER ALL PWF POST PROCESSING «, t00=0x001b, t01=0x009c}
0x2aea…2af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ce}
0x2af4…2afc Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00d8}
0x2afc…2b2e Head {h00=0x002e, h01=0x0050, text=»PFTASK CM PFPOST CLEAR PWF POST PROC FLAG «, t00=0x001b, t01=0x00e0}
0x2b2e…2b4e Head {h00=0x001c, h01=0x0050, text=» CM INIFLG AND INIT FLAG«, t00=0x001b, t01=0x0112}
0x2b4e…2b78 Head {h00=0x0026, h01=0x0050, text=» CF A15,PFINIT RESTART I/O DEVICES«, t00=0x001b, t01=0x0132}
0x2b78…2b94 Head {h00=0x0018, h01=0x0050, text=» CM PRUN EXIT PFTASK«, t00=0x001b, t01=0x015c}
0x2b94…2ba6 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x001b, t01=0x0178}
0x2ba6…2bbe Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001b, t01=0x018a}
0x2bbe…2bc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0012}
0x2bc8…2bde Head {h00=0x0012, h01=0x0050, text=»* I H R T C «, t00=0x001c, t01=0x001c}
0x2bde…2be8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0032}
0x2be8…2c22 Head {h00=0x0036, h01=0x0050, text=»* THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER.«, t00=0x001c, t01=0x003c}
0x2c22…2c5c Head {h00=0x0036, h01=0x0050, text=»* THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS.«, t00=0x001c, t01=0x0076}
0x2c5c…2c66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00b0}
0x2c66…2c94 Head {h00=0x002a, h01=0x0050, text=»IHRTC ST P,INTSAV SAVE LAST INTERRUPT «, t00=0x001c, t01=0x00ba}
0x2c94…2cba Head {h00=0x0022, h01=0x0050, text=» RIT /1B RESET INTERRUPT FLAG «, t00=0x001c, t01=0x00e8}
0x2cba…2ccc Head {h00=0x000e, h01=0x0050, text=» IM COUNT «, t00=0x001c, t01=0x010e}
0x2ccc…2cf4 Head {h00=0x0024, h01=0x0050, text=» RF(P) RTC010 CHECK TIMER QUEUE «, t00=0x001c, t01=0x0120}
0x2cf4…2d04 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x001c, t01=0x0148}
0x2d04…2d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0158}
0x2d0e…2d22 Head {h00=0x0010, h01=0x0050, text=»RTC010 EQU *«, t00=0x001c, t01=0x0162}
0x2d22…2d38 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001c, t01=0x0176}
0x2d38…2d62 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001c, t01=0x018c}
0x2d62…2d6e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0026}
0x2d6e…2d78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0032}
0x2d78…2d8e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001d, t01=0x003c}
0x2d8e…2db4 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001d, t01=0x0052}
0x2db4…2dc0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0078}
0x2dc0…2dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0084}
0x2dca…2de2 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001d, t01=0x008e}
0x2de2…2dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a6}
0x2dec…2df6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b0}
0x2df6…2e0c Head {h00=0x0012, h01=0x0050, text=» IFT NETFRQ=50«, t00=0x001d, t01=0x00ba}
0x2e0c…2e32 Head {h00=0x0022, h01=0x0050, text=» LDKL A4,-4 SET 100 MS SWITCH «, t00=0x001d, t01=0x00d0}
0x2e32…2e46 Head {h00=0x0010, h01=0x0050, text=» ST A4,COUNT«, t00=0x001d, t01=0x00f6}
0x2e46…2e52 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x010a}
0x2e52…2e5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0116}
0x2e5c…2e72 Head {h00=0x0012, h01=0x0050, text=» IFT NETFRQ=60«, t00=0x001d, t01=0x0120}
0x2e72…2e98 Head {h00=0x0022, h01=0x0050, text=» LDKL A4,-5 SET 100 MS SWITCH «, t00=0x001d, t01=0x0136}
0x2e98…2ea4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x015c}
0x2ea4…2eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0168}
0x2eae…2ee0 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,CLOCK QUEUE CLOCK ROUTINE AS MJOB«, t00=0x001d, t01=0x0172}
0x2ee0…2ef6 Head {h00=0x0012, h01=0x0050, text=» CF A15,QMJOB «, t00=0x001e, t01=0x0014}
0x2ef6…2f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x002a}
0x2f00…2f16 Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x001e, t01=0x0034}
0x2f16…2f28 Head {h00=0x000e, h01=0x0050, text=» IM SECOND«, t00=0x001e, t01=0x004a}
0x2f28…2f52 Head {h00=0x0026, h01=0x0050, text=» RF(P) RTC025 UPDATE MONITOR CLOCK«, t00=0x001e, t01=0x005c}
0x2f52…2f5e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0086}
0x2f5e…2f68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0092}
0x2f68…2f7c Head {h00=0x0010, h01=0x0050, text=»SWDISP EQU *«, t00=0x001e, t01=0x009c}
0x2f7c…2fa4 Head {h00=0x0024, h01=0x0050, text=» CF A15,SWLXY SWITCH TO LEVEL XY«, t00=0x001e, t01=0x00b0}
0x2fa4…2fb6 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x001e, t01=0x00d8}
0x2fb6…2fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ea}
0x2fc0…2fd8 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x001e, t01=0x00f4}
0x2fd8…2fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x010c}
0x2fe2…2fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0116}
0x2fec…3002 Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x001e, t01=0x0120}
0x3002…300c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0136}
0x300c…304c Head {h00=0x003c, h01=0x0050, text=»* MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. «, t00=0x001e, t01=0x0140}
0x304c…3056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0180}
0x3056…306a Head {h00=0x0010, h01=0x0050, text=»RTC025 EQU *«, t00=0x001e, t01=0x018a}
0x306a…3090 Head {h00=0x0022, h01=0x0050, text=» LDKL A4,-9 SET SECOND SWITCH «, t00=0x001f, t01=0x000e}
0x3090…30a6 Head {h00=0x0012, h01=0x0050, text=» ST A4,SECOND «, t00=0x001f, t01=0x0034}
0x30a6…30b8 Head {h00=0x000e, h01=0x0050, text=» LDK A4,4 «, t00=0x001f, t01=0x004a}
0x30b8…30c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x005c}
0x30c2…30f8 Head {h00=0x0032, h01=0x0050, text=»MCLO10 LDK A3,60 NUMBER OF MINUTES AND SECONDS«, t00=0x001f, t01=0x0066}
0x30f8…3102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x009c}
0x3102…312e Head {h00=0x0028, h01=0x0050, text=»MCLO20 IM MONCLO+2,A4 INCREMENT TIME«, t00=0x001f, t01=0x00a6}
0x312e…3160 Head {h00=0x002e, h01=0x0050, text=» XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS«, t00=0x001f, t01=0x00d2}
0x3160…3188 Head {h00=0x0024, h01=0x0050, text=» RB(NE) SWDISP GO TO DISPATCHER «, t00=0x001f, t01=0x0104}
0x3188…31b4 Head {h00=0x0028, h01=0x0050, text=» CM MONCLO+2,A4 RESTART TIME COUNTER«, t00=0x001f, t01=0x012c}
0x31b4…31ca Head {h00=0x0012, h01=0x0050, text=» SUK A4,2 END «, t00=0x001f, t01=0x0158}
0x31ca…3204 Head {h00=0x0036, h01=0x0050, text=» RF(N) MCLO30 MIDNIGHT CARRY AND WE HAVE A NEW DAY«, t00=0x001f, t01=0x016e}
0x3204…3228 Head {h00=0x0020, h01=0x0050, text=» RB(P) MCLO10 UPDATE MINUTES«, t00=0x0020, t01=0x0018}
0x3228…3248 Head {h00=0x001c, h01=0x0050, text=» LDK A3,24 UPDATE HOURS «, t00=0x0020, t01=0x003c}
0x3248…325a Head {h00=0x000e, h01=0x0050, text=» RB MCLO20«, t00=0x0020, t01=0x005c}
0x325a…3264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x006e}
0x3264…3278 Head {h00=0x0010, h01=0x0050, text=»MCLO30 EQU *«, t00=0x0020, t01=0x0078}
0x3278…32a4 Head {h00=0x0028, h01=0x0050, text=» IM MCARRY INCREMENT MIDNIGHT CARRY «, t00=0x0020, t01=0x008c}
0x32a4…32ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00b8}
0x32ae…32c6 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0020, t01=0x00c2}
0x32c6…32d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00da}
0x32d0…32da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00e4}
0x32da…32f0 Head {h00=0x0012, h01=0x0050, text=» IFT MONDAT=1 «, t00=0x0020, t01=0x00ee}
0x32f0…32fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0104}
0x32fa…331e Head {h00=0x0020, h01=0x0050, text=»* UPDATE DAY, MONTH AND YEAR«, t00=0x0020, t01=0x010e}
0x331e…3328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0132}
0x3328…333e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x013c}
0x333e…3362 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,MONTH MONTH ADDRESS«, t00=0x0020, t01=0x0152}
0x3362…3382 Head {h00=0x001c, h01=0x0050, text=» LDKL A2,DAY DAY ADDRESS«, t00=0x0020, t01=0x0176}
0x3382…3394 Head {h00=0x000e, h01=0x0050, text=» LDK A3,1 «, t00=0x0021, t01=0x0008}
0x3394…33a0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x001a}
0x33a0…33aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0026}
0x33aa…33c6 Head {h00=0x0018, h01=0x0050, text=» IFT MONCLK+MONDAT=2«, t00=0x0021, t01=0x0030}
0x33c6…33dc Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0021, t01=0x004c}
0x33dc…33ea Head {h00=0x000a, h01=0x0050, text=» MLK 3«, t00=0x0021, t01=0x0062}
0x33ea…3426 Head {h00=0x0038, h01=0x0050, text=» DATA MONTH,DAY,1 MONTH AND DAY ADDRESS TO A1 AND A2«, t00=0x0021, t01=0x0070}
0x3426…3432 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00ac}
0x3432…343c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b8}
0x343c…3458 Head {h00=0x0018, h01=0x0050, text=» IFT MONCLK+MONDAT=2«, t00=0x0021, t01=0x00c2}
0x3458…3476 Head {h00=0x001a, h01=0x0050, text=» IMR A2 INCREMENT DAY «, t00=0x0021, t01=0x00de}
0x3476…3490 Head {h00=0x0016, h01=0x0050, text=» LDR* A4,A1 MONTH «, t00=0x0021, t01=0x00fc}
0x3490…34a2 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A4«, t00=0x0021, t01=0x0116}
0x34a2…34be Head {h00=0x0018, h01=0x0050, text=» LDR* A5,A2 NEW DAY «, t00=0x0021, t01=0x0128}
0x34be…34e4 Head {h00=0x0022, h01=0x0050, text=» SUK A5,29 CHECK IF DAY WAS 28«, t00=0x0021, t01=0x0144}
0x34e4…3518 Head {h00=0x0030, h01=0x0050, text=» RF(Z) MCLO40 YES, GO AND CHECK IF FEBRUARY «, t00=0x0021, t01=0x016a}
0x3518…353e Head {h00=0x0022, h01=0x0050, text=» SUK A5,2 CHECK IF DAY WAS 30 «, t00=0x0022, t01=0x000e}
0x353e…3558 Head {h00=0x0016, h01=0x0050, text=» RF(Z) MCLO60 YES «, t00=0x0022, t01=0x0034}
0x3558…357e Head {h00=0x0022, h01=0x0050, text=» SUK A5,1 CHECK IF DAY WAS 31 «, t00=0x0022, t01=0x004e}
0x357e…35a0 Head {h00=0x001e, h01=0x0050, text=» RB(NZ) SWDISP NO, RETURN «, t00=0x0022, t01=0x0074}
0x35a0…35cc Head {h00=0x0028, h01=0x0050, text=» RF MCLO50 YES, WE HAVE A NEW MONTH «, t00=0x0022, t01=0x0096}
0x35cc…35d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c2}
0x35d6…35ea Head {h00=0x0010, h01=0x0050, text=»MCLO40 EQU *«, t00=0x0022, t01=0x00cc}
0x35ea…360e Head {h00=0x0020, h01=0x0050, text=» SUK A6,2 CHECK IF FEBRUARY «, t00=0x0022, t01=0x00e0}
0x360e…3630 Head {h00=0x001e, h01=0x0050, text=» RB(NZ) SWDISP NO, RETURN «, t00=0x0022, t01=0x0104}
0x3630…363a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0126}
0x363a…3652 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0022, t01=0x0130}
0x3652…365c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0148}
0x365c…3686 Head {h00=0x0026, h01=0x0050, text=»* CHANGE TO NEW MONTH (AND YEAR?) «, t00=0x0022, t01=0x0152}
0x3686…3690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x017c}
0x3690…369a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0186}
0x369a…36ae Head {h00=0x0010, h01=0x0050, text=»MCLO50 EQU *«, t00=0x0022, t01=0x0190}
0x36ae…36ce Head {h00=0x001c, h01=0x0050, text=» STR A3,A2 SET DAY := 1 «, t00=0x0023, t01=0x0014}
0x36ce…36ee Head {h00=0x001c, h01=0x0050, text=» IMR A1 INCREMENT MONTH «, t00=0x0023, t01=0x0034}
0x36ee…371c Head {h00=0x002a, h01=0x0050, text=» SUK A4,12 CHECK IF MONTH WAS DECEMBER«, t00=0x0023, t01=0x0054}
0x371c…373e Head {h00=0x001e, h01=0x0050, text=» RB(NZ) SWDISP NO, RETURN «, t00=0x0023, t01=0x0082}
0x373e…3766 Head {h00=0x0024, h01=0x0050, text=» STR A3,A1 SET MONTH TO JANUARY «, t00=0x0023, t01=0x00a4}
0x3766…3788 Head {h00=0x001e, h01=0x0050, text=» IM YEAR HAPPY NEW YEAR!!!«, t00=0x0023, t01=0x00cc}
0x3788…37a2 Head {h00=0x0016, h01=0x0050, text=» RB SWDISP RETURN «, t00=0x0023, t01=0x00ee}
0x37a2…37ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0108}
0x37ac…37c0 Head {h00=0x0010, h01=0x0050, text=»MCLO60 EQU *«, t00=0x0023, t01=0x0112}
0x37c0…37d8 Head {h00=0x0014, h01=0x0050, text=» LDR A7,A6 MONTH«, t00=0x0023, t01=0x0126}
0x37d8…37ea Head {h00=0x000e, h01=0x0050, text=» ANK A6,1 «, t00=0x0023, t01=0x013e}
0x37ea…380a Head {h00=0x001c, h01=0x0050, text=» RF(Z) MCLO70 MONTH EVEN«, t00=0x0023, t01=0x0150}
0x380a…381c Head {h00=0x000e, h01=0x0050, text=» SUK A7,7 «, t00=0x0023, t01=0x0170}
0x381c…3848 Head {h00=0x0028, h01=0x0050, text=» RB(P) MCLO50 SEPTEMBER OR NOVEMBER «, t00=0x0023, t01=0x0182}
0x3848…3876 Head {h00=0x002a, h01=0x0050, text=» RB SWDISP JANUARY, MARCH, MAY OR JULY«, t00=0x0024, t01=0x001e}
0x3876…3880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x004c}
0x3880…3894 Head {h00=0x0010, h01=0x0050, text=»MCLO70 EQU *«, t00=0x0024, t01=0x0056}
0x3894…38a6 Head {h00=0x000e, h01=0x0050, text=» SUK A7,7 «, t00=0x0024, t01=0x006a}
0x38a6…38ca Head {h00=0x0020, h01=0x0050, text=» RB(N) MCLO50 APRIL OR JUNE «, t00=0x0024, t01=0x007c}
0x38ca…38d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00a0}
0x38d6…38e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00ac}
0x38e0…38f6 Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x0024, t01=0x00b6}
0x38f6…3910 Head {h00=0x0016, h01=0x0050, text=» RB SWDISP RETURN «, t00=0x0024, t01=0x00cc}
0x3910…391c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00e6}
0x391c…3926 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00f2}
0x3926…393e Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0024, t01=0x00fc}
0x393e…3948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0114}
0x3948…3952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x011e}
0x3952…396a Head {h00=0x0014, h01=0x0050, text=»* M O N C L O «, t00=0x0024, t01=0x0128}
0x396a…3974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0140}
0x3974…397e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x014a}
0x397e…399a Head {h00=0x0018, h01=0x0050, text=» IFT MONCLK+MONDAT=2«, t00=0x0024, t01=0x0154}
0x399a…39ca Head {h00=0x002c, h01=0x0050, text=» DATA 0 THIS WORD USED BY MONTIM (TDATE)«, t00=0x0024, t01=0x0170}
0x39ca…39de Head {h00=0x0010, h01=0x0050, text=»YEAR DATA 0 «, t00=0x0025, t01=0x0010}
0x39de…39f2 Head {h00=0x0010, h01=0x0050, text=»MONTH DATA 0«, t00=0x0025, t01=0x0024}
0x39f2…3a04 Head {h00=0x000e, h01=0x0050, text=»DAY DATA 0«, t00=0x0025, t01=0x0038}
0x3a04…3a10 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x004a}
0x3a10…3a1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0056}
0x3a1a…3a2e Head {h00=0x0010, h01=0x0050, text=»MONCLO EQU *«, t00=0x0025, t01=0x0060}
0x3a2e…3a44 Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x0025, t01=0x0074}
0x3a44…3a74 Head {h00=0x002c, h01=0x0050, text=»MCARRY DATA 0 ACKUMULATED 24 HOUR CARRY «, t00=0x0025, t01=0x008a}
0x3a74…3a88 Head {h00=0x0010, h01=0x0050, text=» DATA 0 HOUR«, t00=0x0025, t01=0x00ba}
0x3a88…3a9e Head {h00=0x0012, h01=0x0050, text=» DATA 0 MINUTE«, t00=0x0025, t01=0x00ce}
0x3a9e…3ab4 Head {h00=0x0012, h01=0x0050, text=» DATA 0 SECOND«, t00=0x0025, t01=0x00e4}
0x3ab4…3ad8 Head {h00=0x0020, h01=0x0050, text=»SECOND DATA 0 SECOND SWITCH «, t00=0x0025, t01=0x00fa}
0x3ad8…3ae4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x011e}
0x3ae4…3aee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x012a}
0x3aee…3b06 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0025, t01=0x0134}
0x3b06…3b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x014c}
0x3b10…3b3e Head {h00=0x002a, h01=0x0050, text=»* CLOCK ROUTINE STARTED EACH 100 MS.«, t00=0x0025, t01=0x0156}
0x3b3e…3b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0184}
0x3b48…3b5a Head {h00=0x000e, h01=0x0050, text=»CLOCK INH «, t00=0x0025, t01=0x018e}
0x3b5a…3b8a Head {h00=0x002c, h01=0x0050, text=» LDKL A4,TIMQUE LOAD FIRST TIMER ADDRESS«, t00=0x0026, t01=0x0010}
0x3b8a…3b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0040}
0x3b94…3bac Head {h00=0x0014, h01=0x0050, text=»CLK10 LDR A6,A4 «, t00=0x0026, t01=0x004a}
0x3bac…3bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0062}
0x3bb6…3bda Head {h00=0x0020, h01=0x0050, text=»CLK20 LDR* A4,A6 TIMER BLOCK«, t00=0x0026, t01=0x006c}
0x3bda…3bfc Head {h00=0x001e, h01=0x0050, text=» ABL(Z) MEXIT END OF QUEUE«, t00=0x0026, t01=0x0090}
0x3bfc…3c1c Head {h00=0x001c, h01=0x0050, text=» IM 4,A4 INCREMENT TIMER«, t00=0x0026, t01=0x00b2}
0x3c1c…3c3e Head {h00=0x001e, h01=0x0050, text=» RB(N) CLK10 NOT TIME OUT «, t00=0x0026, t01=0x00d2}
0x3c3e…3c5c Head {h00=0x001a, h01=0x0050, text=» RF(Z) CLK30 TIME OUT «, t00=0x0026, t01=0x00f4}
0x3c5c…3c7e Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A4 RELEASE TIMER «, t00=0x0026, t01=0x0112}
0x3c7e…3c90 Head {h00=0x000e, h01=0x0050, text=» STR A3,A6«, t00=0x0026, t01=0x0134}
0x3c90…3ca6 Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x0026, t01=0x0146}
0x3ca6…3cb8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0026, t01=0x015c}
0x3cb8…3cce Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x0026, t01=0x016e}
0x3cce…3ce0 Head {h00=0x000e, h01=0x0050, text=» RB CLK20 «, t00=0x0026, t01=0x0184}
0x3ce0…3cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0008}
0x3cea…3d02 Head {h00=0x0014, h01=0x0050, text=» EJECT LRPINT «, t00=0x0027, t01=0x0012}
0x3d02…3d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x002a}
0x3d0c…3d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0034}
0x3d16…3d46 Head {h00=0x002c, h01=0x0050, text=»CLK30 CF A15,CLK40 CALL TIME OUT ROUTINE«, t00=0x0027, t01=0x003e}
0x3d46…3d6e Head {h00=0x0024, h01=0x0050, text=» CF A15,SWL48 SWITCH TO LEVEL 48«, t00=0x0027, t01=0x006e}
0x3d6e…3d7a Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0027, t01=0x0096}
0x3d7a…3d8c Head {h00=0x000e, h01=0x0050, text=» RB CLK10 «, t00=0x0027, t01=0x00a2}
0x3d8c…3d96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b4}
0x3d96…3daa Head {h00=0x0010, h01=0x0050, text=»CLK40 EQU * «, t00=0x0027, t01=0x00be}
0x3daa…3dc0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0027, t01=0x00d2}
0x3dc0…3dea Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0027, t01=0x00e8}
0x3dea…3df6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0112}
0x3df6…3e00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x011e}
0x3e00…3e16 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0027, t01=0x0128}
0x3e16…3e3c Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0027, t01=0x013e}
0x3e3c…3e48 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0164}
0x3e48…3e52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0170}
0x3e52…3e7c Head {h00=0x0026, h01=0x0050, text=» LDKL A1,/C4C0 LEVEL 49 AND ENABLE«, t00=0x0027, t01=0x017a}
0x3e7c…3ea6 Head {h00=0x0026, h01=0x0050, text=» ST A1,18,A15 SET NEW PSW ON STACK«, t00=0x0028, t01=0x0014}
0x3ea6…3eca Head {h00=0x0020, h01=0x0050, text=» LD A2,2,A4 LOAD DISP BLOCK «, t00=0x0028, t01=0x003e}
0x3eca…3ee8 Head {h00=0x001a, h01=0x0050, text=» LD A1,4,A2 PARAMETER «, t00=0x0028, t01=0x0062}
0x3ee8…3f10 Head {h00=0x0024, h01=0x0050, text=» ABI 2,A2 GO TO TIME OUT ROUTINE«, t00=0x0028, t01=0x0080}
0x3f10…3f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a8}
0x3f1a…3f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b2}
0x3f24…3f46 Head {h00=0x001e, h01=0x0050, text=»COUNT DATA 0 100 MS SWITCH«, t00=0x0028, t01=0x00bc}
0x3f46…3f50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00de}
0x3f50…3f5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e8}
0x3f5a…3f72 Head {h00=0x0014, h01=0x0050, text=»* T I M Q U E «, t00=0x0028, t01=0x00f2}
0x3f72…3f7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x010a}
0x3f7c…3fae Head {h00=0x002e, h01=0x0050, text=»* POINTER TO FIRST BLOCK IN TIMER QUEUE «, t00=0x0028, t01=0x0114}
0x3fae…3fb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0146}
0x3fb8…3fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0150}
0x3fc2…3fd6 Head {h00=0x0010, h01=0x0050, text=»TIMQUE EQU *«, t00=0x0028, t01=0x015a}
0x3fd6…3fe6 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0028, t01=0x016e}
0x3fe6…3ff0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x017e}
0x3ff0…3ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0188}
0x3ffa…4004 (41, 2, 30) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0004}
0x4004…4010 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0029, t01=0x000e}
0x4010…4014 Head {h00=0x4004, h01=0x0000}
0x4014…4018 00 29 00 1a ┆ ) ┆
0x4018…4020 (42, 1, 8) 20 04 00 00 00 2a 00 04 ┆ * ┆
0x4020…4070 (43, 0, 400) 00 42 01 70 00 1a 00 50 5c 52 46 28 4e 5a 29 5c 44 45 4c 46 30 38 5c 4e 4f 54 20 31 53 54 00 43 00 08 00 28 00 50 5c 4c 43 5c 41 31 2c 56 54 43 3a 4e 45 2c 41 31 33 5c 4e 55 4d 42 45 52 20 4f 46 20 45 58 54 45 4e 54 53 20 00 43 00 26 00 0e ┆ B p P RF(NZ) DELF08 NOT 1ST C ( P LC A1,VTC:NE,A13 NUMBER OF EXTENTS C & ┆
0x4070…40c0 00 50 5c 4e 47 52 5c 41 31 2c 41 31 00 43 00 52 00 12 00 50 5c 41 44 53 5c 41 31 2c 46 45 58 54 4e 4f 00 43 00 64 00 06 00 50 2a 20 00 43 00 7a 00 12 00 50 5c 45 4a 45 43 54 5c 5c 46 4d 43 44 45 46 00 43 00 84 00 06 00 50 2a 20 00 43 00 9a ┆ P NGR A1,A1 C R P ADS A1,FEXTNO C d P* C z P EJECT FMCDEF C P* C ┆
0x40c0…4110 00 06 00 50 2a 20 00 43 00 a4 00 10 00 50 44 45 4c 46 30 38 5c 45 51 55 5c 2a 00 43 00 ae 00 06 00 50 2a 20 00 43 00 c2 00 12 00 50 5c 49 46 54 5c 43 50 55 38 35 32 3d 31 20 00 43 00 cc 00 26 00 50 5c 4c 44 4b 4c 5c 41 31 2c 56 54 43 3a 45 ┆ P* C PDELF08 EQU * C P* C P IFT CPU852=1 C & P LDKL A1,VTC:E┆
0x4110…4160 4c 5c 47 45 54 20 45 58 54 45 4e 54 20 4c 45 4e 47 54 48 20 00 43 00 e2 00 36 00 50 5c 41 44 52 5c 41 31 2c 41 31 33 5c 4d 4f 56 45 20 45 58 54 20 4c 45 4e 20 41 4e 44 20 45 58 54 20 42 41 53 45 20 54 4f 20 57 4f 52 4b 20 41 52 45 41 00 43 ┆L GET EXTENT LENGTH C 6 P ADR A1,A13 MOVE EXT LEN AND EXT BASE TO WORK AREA C┆
0x4160…41b0 01 0c 00 14 00 50 5c 4c 44 4b 4c 5c 41 33 2c 56 54 43 3a 45 4c 20 00 43 01 46 00 0e 00 50 5c 41 44 52 5c 41 33 2c 41 39 00 43 01 5e 00 12 00 50 5c 43 46 5c 41 31 34 2c 46 4d 3a 4d 56 38 00 43 01 70 00 2c 00 50 5c 4c 44 4b 4c 5c 41 33 2c 56 ┆ P LDKL A3,VTC:EL C F P ADR A3,A9 C ^ P CF A14,FM:MV8 C p , P LDKL A3,V┆
0x41b0…4200 (44, 0, 400) 54 43 3a 45 4c 5c 41 44 44 52 45 53 53 20 54 4f 20 45 58 54 45 4e 54 20 4c 45 4e 47 54 48 00 43 01 86 00 0e 00 50 5c 41 44 52 5c 41 33 2c 41 39 00 44 00 26 00 2a 00 50 5c 4c 44 4b 4c 5c 41 36 2c 56 54 43 3a 45 42 5c 41 44 44 52 45 53 53 20 ┆TC:EL ADDRESS TO EXTENT LENGTH C P ADR A3,A9 D & * P LDKL A6,VTC:EB ADDRESS ┆
0x4200…4250 54 4f 20 45 58 54 45 4e 54 20 42 41 53 45 00 44 00 38 00 0e 00 50 5c 41 44 52 5c 41 36 2c 41 39 00 44 00 66 00 36 00 50 5c 43 46 5c 41 31 34 2c 44 42 4c 41 44 44 5c 56 54 43 3a 45 4c 3d 45 58 54 45 4e 54 20 42 41 53 45 20 2b 20 45 58 54 45 ┆TO EXTENT BASE D 8 P ADR A6,A9 D f 6 P CF A14,DBLADD VTC:EL=EXTENT BASE + EXTE┆
0x4250…42a0 4e 54 20 4c 45 4e 47 54 48 20 00 44 00 78 00 08 00 50 5c 58 49 46 00 44 00 b2 00 06 00 50 2a 20 00 44 00 be 00 12 00 50 5c 49 46 54 5c 43 50 55 38 35 32 3d 30 20 00 44 00 c8 00 14 00 50 5c 4d 4c 5c 34 2c 56 54 43 3a 45 4c 2c 41 31 33 00 44 ┆NT LENGTH D x P XIF D P* D P IFT CPU852=0 D P ML 4,VTC:EL,A13 D┆
0x42a0…42f0 00 de 00 26 00 50 5c 44 41 52 5c 41 33 5c 56 54 43 3a 45 4c 3d 45 58 54 20 42 41 53 45 2b 45 58 54 20 4c 45 4e 47 54 48 00 44 00 f6 00 14 00 50 5c 4d 53 5c 34 2c 56 54 43 3a 45 4c 2c 41 39 20 00 44 01 20 00 08 00 50 5c 58 49 46 00 44 01 38 ┆ & P DAR A3 VTC:EL=EXT BASE+EXT LENGTH D P MS 4,VTC:EL,A9 D P XIF D 8┆
0x42f0…4340 00 06 00 50 2a 20 00 44 01 44 00 18 00 50 5c 43 46 5c 41 31 34 2c 43 44 45 57 52 49 5c 57 52 49 54 45 00 44 01 4e 00 18 00 50 5c 52 42 28 4e 5a 29 5c 44 45 4c 46 30 33 5c 45 52 52 4f 52 00 44 01 6a 00 06 00 50 2a 20 00 44 01 86 00 12 00 50 ┆ P* D D P CF A14,CDEWRI WRITE D N P RB(NZ) DELF03 ERROR D j P* D P┆