Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/dskea.seq
There are no other files named dskea.seq in the archive.
;DSKEA
IDENTIFICATION
--------------
PRODUCT CODE: AH-E337A-DD
DIAGNOSTIC CODE: DSKEA
PRODUCT NAME: DSKEAA0 DECSYSTEM 2020
PAGING HARDWARE DIAGNOSTIC
VERSION: 0.1
DATE RELEASED: MARCH 1978
MAINTAINED BY: DIAGNOSTIC ENGINEERING
AUTHOR: JOHN R. KIRCHOFF
COPYRIGHT (C) 1978
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A
SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE INCLUSION
OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR ANY OTHER
COPIES THEREOF, MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE
TO ANY OTHER PERSON EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO
AGREES TO THESE LICENSE TERMS. TITLE TO AND OWNERSHIP OF THE
SOFTWARE SHALL AT ALL TIMES REMAIN IN DIGITAL EQUIPMENT
CORPORATION.
THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE
USE OR RELIABILITY OF ITS SOFTWARE IN EQUIPMENT WHICH IS NOT
SUPPLIED BY DIGITAL EQUIPMENT CORPORATION.
MAINDEC-10-DSKEA
PAGE 2 SEQ 0003
TABLE OF CONTENTS
-----------------
1.0 ABSTRACT
2.0 REQUIREMENTS
2.1 EQUIPMENT
2.2 STORAGE
2.3 PRELIMINARY PROGRAMS
3.0 PROGRAM PROCEDURES
3.1 LOADING PROCEDURE
3.2 STARTING PROCEDURE
3.3 OPERATING PROCEDURE
4.0 DATA SWITCH FUNCTIONS
5.0 ERRORS
6.0 ITERATION COUNTER
7.0 CYCLE TIME
8.0 OPERATIONAL VARIATIONS
9.0 MISCELLANEOUS
10.0 LISTING
MAINDEC-10-DSKEA
PAGE 3 SEQ 0004
1.0 ABSTRACT
THIS DECSYSTEM 2020 DIAGNOSTIC TESTS THE PAGING HARDWARE OF
THE DECSYSTEM 2020 CENTRAL PROCESSOR. THE DIAGNOSTIC CONSISTS
OF THE FOLLOWING TESTS:
A. EXEC BASE REGISTER
B. USER BASE REGISTER
E. MAP INSTRUCTION
F. PAGE FAIL TRAPPING
G. PAGING MEMORY
H. EXEC-PER-PROCESS MAPPING
I. PAGING MEMORY RELIABILITY
J. PAGED DATA READ
K. PAGED DATA WRITE
L. WRITE PROTECT
M. PAGED BLT
N. BASE REGISTER RELOCATION
1. MUUO
2. PAGE FAIL
3. EXEC-PER-PROCESS
4. LUUO
5. TRAPPING
6. INTERRUPTS
7. EPMP PAGING
O. INSTRUCTION PAGE FAIL
P. MONITOR UUOS
Q. VARIOUS MACHINE MODES
R. TRAP LOGIC
THIS DIAGNOSTIC OPERATES ONLY IN EXEC MODE.
MAINDEC-10-DSKEA
PAGE 4 SEQ 0005
2.0 REQUIREMENTS
2.1 EQUIPMENT
A DECSYSTEM 2020 WITH 32K OF MEMORY.
DIAGNOSTIC CONSOLE
CONSOLE TELETYPE
LOAD DEVICE
2.2 STORAGE
THE PROGRAM USES ALL OF THE FIRST 32K OF MEMORY
2.3 PRELIMINARY PROGRAMS
ALL PRECEDING CENTRAL PROCESSOR DIAGNOSTICS.
3.0 PROGRAM PROCEDURES
3.1 LOADING PROCEDURES
THIS DIAGNOSTIC REQUIRES THAT THE DECSYSTEM 2020 SUBROUTINE
PROGRAM BE RESIDENT IN THEDECSYSTEM 2020.
LOAD VIA CONSOLE PROCESSOR OR WITH "SMMON".
3.2 STARTING PROCEDURE
A. SELECT OPERATIONAL CONSOLE DATA SWITCH SETTINGS (REFER
TO 4.0 DATA SWITCH FUNCTIONS)
B. STAND-ALONE STARTING ADDRESS IS 30000.
C. SPECIAL FEATURE RESTART IS 30004(8). THIS CLEARS THE PASS
COUNTER SO THE MAXIMUM ADDRESSING SETUP QUESTION MAY BE REPEATED.
MAINDEC-10-DSKEA
PAGE 5 SEQ 0006
3.3 OPERATING PROCEDURE
A. TO THOROUGHLY TEST ALL HARDWARE, ALL TEST CONTROL DATA
SWITCHES SHOULD BE SET TO 0.
B. WHEN DEBUGGING HARDWARE, SET SWITCHES TO 0. ALLOW THE
TELETYPE TO PRINT THE ERROR MESSAGES. THIS ALLOWS THE
PROGRAM TO RUN A COMPLETE PASS AND THEN THE ERROR MESSAGES
MAY BE CORRELATED TO QUICKLY DIAGNOSE THE FAILURE. IF A
HARDWARE PROBLEM IS SUCH THAT THE ERROR MESSAGES, AFTER THE
FIRST ONE, HAVE NO MEANING (FIRST ERROR CAUSES ALL FOLLOWING
TESTS TO FAIL) SET THE LOOP ON ERROR SWITCH AND RESTART THE
TEST FROM THE BEGINNING. THE FIRST FAILURE WILL THEN CAUSE
THE PROGRAM TO ENTER A LOOP SUITABLE FOR SCOPING.
THE ERROR MESSAGES USED IN CONJUNCTION WITH THE LISTING
AND SCOPING IF NECESSARY SHOULD ALLOW THE FAILING
COMPONENT TO BE ISOLATED AND REPLACED AND/OR REPAIRED.
C. ERROR INFORMATION MAY BE OBTAINED QUICKLY BY PRINTING
ERRORS ON THE LINE PRINTER.
MAINDEC-10-DSKEA
PAGE 6 SEQ 0007
4.0 DATA SWITCH FUNCTIONS
SWITCH STATE FUNCTION
------ ----- --------
0 ABORT 0 NORMAL OPERATION
1 ABORT AT END OF PASS
1 RSTART NOT USED
2 TOTALS NOT USED
3 NOPNT 0 NORMAL TYPEOUT
1 INHIBIT ALL PRINT/TYPEOUT
(EXCEPT FORCED)
4 PNTLPT 0 NORMAL OUTPUT TO TTY
1 PRINT ALL DATA ON LPT
(LOGICAL DEVICE, USER MODE)
5 DING 0 NO FUNCTION
1 RING TTY BELL ON ERROR
6 LOOPER 0 PROCEED TO NEXT TEST
1 ENTER SCOPE LOOP ON TEST ERROR
7 ERSTOP 0 NO FUNCTION
1 HALT ON TEST ERROR
8 PALERS 0 PRINT ONLY FIRST ERROR WHEN LOOPING
1 PRINT ALL ERRORS, EVEN IF SAME ERROR
9 RELIAB 0 QUICK VERIFY OPERATION
1 RELIABILITY MODE OPERATION
10 TXTINH 0 PRINT FULL ERROR MESSAGES.
1 INHIBIT COMMENT PORTION OF
ERROR MESSAGES.
MAINDEC-10-DSKEA
PAGE 7 SEQ 0008
5.0 ERRORS
ERRORS ARE PRINTED ON THE TTY OR LINE PRINTER. THE ERROR
PRINTOUT CONTAINS THE TEST TITLE, TEST PASS COUNT, PC OF THE
FAILURE, SUBTEST TITLE, SUBTEST FUNCTION, CORRECT WORD, ACTUAL
RESULTS, DISCREPANCY WORD, AND A DIAGNOSTIC COMMENT.
THE FOLLOWING IS AN EXAMPLE ERROR MESSAGE:
DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC (DSKEA)
TEST PASS COUNT = #
ERROR IN (SUBTEST TITLE) - (SUBTEST FUNCTION)
CORRECT: XXXXXX XXXXXX
ACTUAL: YYYYYY YYYYYY
DISCREP: ZZZZZZ ZZZZZZ
(DIAGNOSTIC COMMENT)
THE SUBTEST TITLE, SUBTEST FUNCTION, AND DIAGNOSTIC COMMENT
PORTION OF THE ERROR TYPEOUT MAY BE INHIBITED BY SETTING THE
'TXTINH' SWITCH. THIS ALLOWS FOR SHORTER PRINTOUTS ON
REPETITIVE FAILURES.
THE TEST TITLE IS ONLY PRINTED WHEN STARTING THE PROGRAM OR ON THE
FIRST FAILURE IF IT HAS NOT BEEN PRINTED YET.
THE TEST PASS COUNT IS ONLY PRINTED ON ERROR WHICH OCCUR ON PASSES
AFTER THE FIRST PASS.
IF AN AUDIO INDICATION OF A CONTINUING ERROR IS DESIRED THE
'DING' SWITCH MAY BE SET.
MAINDEC-10-DSKEA
PAGE 8 SEQ 0009
6.0 ITERATION COUNTER
THE ITERATION COUNT OF THE PROGRAM IS PRINTED ON THE CONSOLE
TTY.
7.0 CYCLE TIME
THE PROGRAM CYCLE TIME IS A UNDER A MINUTE AND IS THEREFORE
SUITABLE FOR MARGINING, VIBRATION TESTS, ETC.
8.0 OPERATIONAL VARIATIONS
THE PROGRAM IS USABLE WITH THE DIAGNOSTIC MONITOR TO PROVIDE
RELIABILITY TESTS, ACCEPTANCE TESTS, AND/OR TO PROVIDE A
QUICK METHOD OF ISOLATION OF A FAULT TO A PARTICULAR AREA
OF THE PROCESSOR.
9.0 MISCELLANEOUS
THIS DIAGNOSTIC DOES NOT USE THE "INHPAG" SWITCH AND DOES NOT
USE THE CACHE.
10.0 LISTING
HISTORY FILE FOR DSKEA SEQ 0010
----------------------
---------------------------------------------------------------
CODE: MAINDEC-10-DSKEA
TITLE: DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC
VERSION: 0.1
DATE: MARCH 1978
REASON: ORIGINAL RELEASE OF THIS PROGRAM FOR KS-10.
---------------------------------------------------------------
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 1
SEQ 0011
DOCUMENT
**************
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^
**************
COPYRIGHT 1978
DIGITAL EQUIPMENT CORPORATION
MAYNARD, MASS. 01754
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 2
SEQ 0012
TABLE OF CONTENTS
*******************
24 DIAGNOSTIC PARAMETERS
165 PROGRAM MACRO'S
202 PROGRAM MACROS AND OPDEFS
250 CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978
285 PROGRAM/SUBROUTINE PARAMETERS
487 ERROR HANDLING UUO DEFINITIONS
525 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978
853 PROGRAM INITIALIZATION
899 TEST EXEC BASE REGISTER
1301 TEST USER BASE REGISTER
1735 TEST PROCESSOR TRAPS
1821 PDL TRAPPING TESTS
2418 TEST MAP INSTRUCTION
2516 TEST PAGE FAIL TRAPPING
2627 TEST EXEC-PER-PROCESS MAPPING
2741 TEST PAGING AND SCRATCHPAD MEMORIES
2871 TEST PAGED DATA READ
3015 TEST PAGED DATA WRITE
3233 TEST PAGE FAIL WORD
3293 TEST WRITE PROTECTED PAGING
3384 PAGED BLT PAGING AND ADDRESSING TEST
3471 TEST BASE REGISTER RELOCATION
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 3
SEQ 0013
TABLE OF CONTENTS
*******************
3864 TEST INTERRUPT RELOCATION
4095 TEST PAGE REFILL RELOCATION
4176 INSTRUCTION PAGE FAIL TESTING
4743 TRAP INSTRUCTION PAGE FAIL TEST
4970 INTERRUPT INSTRUCTION PAGE FAIL
5058 PAGING MEMORY FLOATING BIT TEST TABLE
5110 MONITOR UUO TRAP TESTING
5283 TEST MUUO'S IN CONCEALED MODE
5466 TRAP TESTING
5541 FLAG SETTING
6016 TEST IOT'S IN CONCEALED MODE
6104 TEST USER MODE ADDRESSING
6180 SPECIAL PROGRAM SUBROUTINES
6218 *STOR* RESERVED STORAGE, MARCH 1978
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 4
SEQ 0014
1 MAINDEC-10-DSKEA
17 COPYRIGHT 1978
DIGITAL EQUIPMENT CORPORATION
MARLBORO, MASS. 01752
21 JOHN R. KIRCHOFF
*****************************************************************
24 DIAGNOSTIC PARAMETERS
*****************************************************************
26 SUBROUTINE ASSEMBLY PARAMETERS
34 ACCUMULATOR DEFINITIONS
45 MISCELLANEOUS
57 MAP INSTRUCTION READOUT ASSIGNMENTS
BIT 0 - USER ADDRESS
1 - PAGE FAIL
2 - ACCESS
3 - WRITABLE
4 - SOFTWARE
7 - CACHE
8 - PAGED REF
9-13 - 0
^ - CORE ADDRESS BITS 16-35
PAGE FAIL ERROR FORMAT
IF BIT 1 = 1
20 - I/O PAGE FAIL
25 - PAGE TABLE PARITY ERROR
36 - HARD MEMORY ERROR
37 - NXM
PAGE TABLE ENTRY WORD FORMAT
BIT 0 - ACCESS
2 - WRITABLE
3 - SOFTWARE
4 - CACHE
^ - PHYSICAL PAGE ADDRESS BITS 16-26
;LEFT HALF = EVEN VIRTUAL PAGE
;RIGHT HALF = ODD VIRTUAL PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 5
SEQ 0015
93 BEGIN PARAMETERS
124 KS-10 EXEC PAGE MAP PAGE ASSIGNMENTS
137 KS-10 USER PAGE MAP PAGE ASSIGNMENTS
*****************************************************************
165 PROGRAM MACRO'S
*****************************************************************
169 TRY TO SET FLAG VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
*****************************************************************
202 PROGRAM MACROS AND OPDEFS
*****************************************************************
231 SPECIAL PAGE TABLE DEFINITIONS
*****************************************************************
250 CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978
*****************************************************************
255 DATA SWITCHES
LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
*****************************************************************
285 PROGRAM/SUBROUTINE PARAMETERS
*****************************************************************
288 SPECIAL SUBPROGRAM LINKAGES
299 SPECIAL SUBROUTINE FATAL HALTS
USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
331 SUBROUTINE INITIALIZATION CALL
337 HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
344 TERMINAL INPUT UUO'S
ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
360 TERMINAL OUTPUT UUO'S.
426 SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
CONSERVES CORE OVER ASCIZ
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 6
SEQ 0016
431 CONSOLE SWITCH INPUT UUO.
READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
USER MODE.
437 CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
443 KS-10 CACHE OPERATION UUO'S
448 END OF PASS/PROGRAM UUOS
451 DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
456 MEMORY MANAGEMENT UUO'S
UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
ADDRESS CONVERSION, ETC...
468 DEVICE CODE MODIFICATION UUO
ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
IOT'S TO A DIFFERENT DEVICE CODE.
478 "DIAMON" FILE SELECTION AND READ UUOS
*****************************************************************
487 ERROR HANDLING UUO DEFINITIONS
*****************************************************************
490 ERROR HANDLER PARAMETERS
499 THE ERROR HANDLER MACROS
501 A MACRO TO REPORT AN ERROR AND LOOP
512 A MACRO TO REPORT AN ERROR AND NOT LOOP
*****************************************************************
525 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978
*****************************************************************
530 PROGRAM STARTING ADDRESSES
THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
563 PROGRAM FIXED PARAMETER AREA
583 PROGRAM VARIABLE PARAMETER AREA
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 7
SEQ 0017
603 SPECIAL PROGRAM DISPATCH ADDRESSES
634 PROCESSOR CONTROL STORAGE
654 UUO DISPATCH TABLE
674 MEMORY MANAGMENT STORAGE
684 PRINT CONTROL STORAGE
707 THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
MOVEI NAME
PNTA ;OR PNTAF
738 USER MODE OUTPUT FILE INFORMATION
747 DISK UPDATE MODE FILE INFORMATION
755 PUSHDOWN LIST CONTROL INFORMATION
763 POWER LINE CLOCK FREQUENCY FLAG
769 KL10 CACHE CONTROL FLAGS
776 NUMBER INPUT DIGIT FLAG
782 KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
788 ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
796 SPECIAL USERS UUO INTERCEPT INSTRUCTION
801 USER MODE MONITOR TYPE FLAG
807 SPECIAL USERS MUUO INTERCEPT INSTRUCTION
813 SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
819 "SWITCH" CALL USAGE CONTROL
825 SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
832 SM10 (KS-10) PROCESSOR TYPE FLAG
838 RIGHT HALF SWITCHES PROMPT TABLE ADDRESS
844 SPECIAL FUTURE EXPANSION ROOM
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 8
SEQ 0018
848 END OF FIXED STORAGE
*****************************************************************
853 PROGRAM INITIALIZATION
*****************************************************************
*****************************************************************
899 TEST EXEC BASE REGISTER
*****************************************************************
905 LOAD EXEC BASE REGISTER WITH ALL ZERO'S WITH CONO
EXEC BASE REGISTER SHOULD THEN BE CLEAR.
921 LOAD EXEC BASE REGISTER WITH ALL ONE'S
IF ANY BIT IS READ BACK THEN LOAD EBR SHOULD WORK.
936 LOAD EXEC BASE REGISTER WITH TRAP ENABLE BIT
955 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
966 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
980 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
994 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1008 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1022 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1036 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1050 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1064 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1078 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1092 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 9
SEQ 0019
1106 CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1120 LOAD EXEC BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK
1136 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1147 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1161 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1175 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1189 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1203 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1217 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1231 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1245 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1259 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1273 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
1287 LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
TO CHECK BIT INTERACTION.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 10
SEQ 0020
*****************************************************************
1301 TEST USER BASE REGISTER
*****************************************************************
1303 LOAD USER BASE REGISTER WITH ALL ZERO'S.
USER BASE REGISTER SHOULD THEN BE CLEAR.
1320 LOAD USER BASE REGISTER WITH ALL ONE'S.
IF ANY BIT IS READ BACK THEN LOAD UBR SHOULD WORK.
1339 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1352 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1368 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1384 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1400 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1416 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1432 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1448 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1464 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1480 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1496 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1512 CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1527 LOAD USER BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK.
1543 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 11
SEQ 0021
1556 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1572 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1588 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1604 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1620 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1636 LOAD USER BASE REGISTER WITH A FLOATING ZERO
1637 CHECK BIT INTERACTION.
1652 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1668 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1684 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1700 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
1716 LOAD USER BASE REGISTER WITH A FLOATING ZERO
CHECK BIT INTERACTION.
*****************************************************************
1735 TEST PROCESSOR TRAPS
*****************************************************************
1748 TEST TRAP 3 TRAP
1772 TEST PUSHDOWN OVERFLOW TRAP
1795 TEST OVERFLOW TRAP
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 12
SEQ 0022
*****************************************************************
1821 PDL TRAPPING TESTS
*****************************************************************
1823 THESE TEST FOR THE PUSHDOWN INSTRUCTIONS INSURE THAT THEY WILL
INDEED TRAP WHEN AN OVERFLOW OR UNDERFLOW CONDITION OCCURS.
THESE TEST ALSO VERIFY THE VALIDITY OF THE INFORMATION PROCESSED
BY THE INSTRUCTION, AS THEY SHOULD GIVE VALID RESULTS INDEPENDENT
OF WHETHER OR NOT THEY TRAP.
1829 TEST PUSH INSTRUCTION
1859 TEST PUSHJ INSTRUCTION
1890 TEST POP INSTRUCTION
1916 TEST POPJ INSTRUCTION
1941 TEST OVERFLOW TRAP WITH "ASH"
1964 TEST OVERFLOW TRAP WITH "ASHC"
1988 TEST OVERFLOW TRAP WITH "MUL"
2011 TEST OVERFLOW TRAP WITH "IMUL"
2034 TEST OVERFLOW TRAP WITH "ADJBP"
2052 TEST OVERFLOW TRAP WITH "FSC"
2070 TEST OVERFLOW TRAP WITH "FIX"
2093 TEST OVERFLOW TRAP WITH "FIXR"
2116 TEST OVERFLOW TRAP WITH "FAD"
2134 TEST OVERFLOW TRAP WITH "DFAD"
2152 TEST OVERFLOW TRAP WITH "FSB"
2171 TEST OVERFLOW TRAP WITH "DFSB"
2191 TEST OVERFLOW TRAP WITH "FMP"
2209 TEST OVERFLOW TRAP WITH "DFMP"
2227 TEST NO-DIVIDE TRAP WITH "DIV"
2255 TEST NO-DIVIDE TRAP WITH "IDIV"
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 13
SEQ 0023
2283 TEST NO-DIVIDE TRAP WITH "FDV"
2311 TEST NO-DIVIDE TRAP WITH "FDVR"
2339 TEST NO-DIVIDE TRAP WITH "DFDV"
2372 TRAPPING SUBROUTINES
2407 TRAP STORAGE
*****************************************************************
2418 TEST MAP INSTRUCTION
*****************************************************************
2424 PERFORM 'MAP' OF ADDRESS 0.
MAP READOUT SHOULD BE:
ACCESS, WRITEABLE, SOFTWARE, PAGED REF
2440 PERFORM 'MAP' OF ADDRESS 337000,
HIGHEST EXEC PAGED MEMORY ADDRESS.
MAP READOUT SHOULD BE:
ACCESS, WRITABLE, SOFTWARE, PAGED REF
2452 CLEAR PAGE MAP
2459 PERFORM 'MAP' OF ADDRESS 400000,
LOWEST EPMP PAGING ADDRESS.
SINCE PAGE MAP IS CLEAR
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
2472 PERFORM 'MAP' OF ADDRESS 777000,
HIGHEST EPMP PAGING ADDRESS.
SINCE PAGE MAP IS CLEAR
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
2484 SETUP EPMP FOR ADDRESS 400000 WITH ALL BUT ACCESS.
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
SHOULD HAVE NO EFFECT.
2499 SETUP EPMP FOR ADDRESS 777000 WITH ALL BUT ACCESS.
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
SHOULD HAVE NO EFFECT.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 14
SEQ 0024
*****************************************************************
2516 TEST PAGE FAIL TRAPPING
*****************************************************************
2522 DO A 'MOVE' FROM LOCATION 400000.
SINCE PAGE MAP IS CLEAR THIS SHOULD PAGE FAIL.
2550 PAGE FAULT TRAP SHOULD RETURN HERE
2569 PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY
2575 CHECK PAGE FAIL WORD FOR MAXIMUM ADDRESS
DO A 'MOVE' FROM LOCATION 777777.
2591 PAGE FAULT TRAP SHOULD RETURN HERE
2610 PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY
2617 RESET PAGE FAULT TRAP
*****************************************************************
2627 TEST EXEC-PER-PROCESS MAPPING
*****************************************************************
2643 PERFORM 'MAP' OF ADDRESS 340000
LOWEST UPMP EXEC-PER-PROCESS ADDRESS.
SINCE PAGE MAP IS CLEAR
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
2657 PERFORM 'MAP' OF ADDRESS 377000
HIGHEST UPMP EXEC-PER-PROCESS ADDRESS.
SINCE PAGE MAP IS CLEAR
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
2669 SETUP UPMP FOR ADDRESS 340000 WITH ALL BUT ACCESS.
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
2682 SETUP UPMP FOR ADDRESS 377000 WITH ALL BUT ACCESS
MAP READOUT SHOULD BE:
PAGE FAIL, PAGING MEMORY NO MATCH.
2699 UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 377 WITH
ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 0.
'DATAO PAG' CLEARS PAGING MEMORY THEREFORE 'MAP'
SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
FROM UPMP EXEC-PER-PROCESS MAP AND LOAD PAGING MEMORY
WITH PAGE ADDRESS 377.
THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
BY THE MAP INSTRUCTION.
READOUT OF THE LOADED PAGING MEMORY (BY 'CONI PAG')
SHOULD BE:
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 15
SEQ 0025
PAGE 377',EXEC MEMORY SPACE, RELOAD COUNTER.
2719 UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 340 WITH
ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 03777.
'DATAO PAG' CLEARS PAGING MEMORY THEREFORE 'MAP'
SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
FROM UPMP EXEC-PER-PROCESS MAP AND LOAD PAGING MEMORY
WITH PAGE ADDRESS 340.
THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
BY THE MAP INSTRUCTION.
READOUT OF THE LOADED PAGING MEMORY (BY 'CONI PAG')
SHOULD BE:
PAGE 340',EXEC MEMORY SPACE, RELOAD COUNTER.
*****************************************************************
2741 TEST PAGING AND SCRATCHPAD MEMORIES
*****************************************************************
2743 PAGE MAP IS SETUP FOR 42 PAGES WITH DATA THAT PRODUCES
FLOATING BIT PATTERNS IN BOTH THE PAGING MEMORY
AND THE SCRATCHPAD MEMORY TO CHECK REGISTER AND BIT INTERACTION.
ALL PAGING ADDRESSES ARE SETUP SO PAGING MUST REFILL ON EVERY
OPERATION. THIS SHOULD VERIFY THAT THE PAGING REFILL OPERATION
AND THE PAGING AND SCRATCHPAD REGISTERS ARE OPERATIONAL.
2813 CLEAR PAGING MEMORY AND PAGE MAP
CHECK THAT ALL PREVIOUS REFERENCES TRAP
SHOULD IF AM IS REALLY CLEAR
*****************************************************************
2871 TEST PAGED DATA READ
*****************************************************************
2873 USING PAGING ADDRESSES 400XXX AND 777XXX
2891 TEST A 'MOVE' USING AN 'E' ADDRESS THAT CAUSES PAGING.
'E' = PAGE 400 (HIGH ORDER 9 BITS),
LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGR400' ADDRESS.
PAGE MAP RELOCATION BITS SETUP FOR
HIGH ORDER 9 BITS OF 'PGR400' ADDRESS.
THEREFORE ACTUAL ADDRESS FOR 'MOVE' IS:
HIGH ORDER 9 BITS FROM PAGE MAP AND
LOW ORDER 9 BITS OF 'PGR400' ADDRESS.
2909 TEST A 'MOVE' USING AN 'E' ADDRESS THAT CAUSES PAGING.
'E' = PAGE 777 (HIGH ORDER 9 BITS),
LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGR777' ADDRESS.
PAGE MAP RELOCATION BITS SETUP FOR
HIGH ORDER 9 BITS OF 'PGR777' ADDRESS.
THEREFORE ACTUAL ADDRESS FOR 'MOVE' IS:
HIGH ORDER 9 BITS FROM PAGE MAP AND
LOW ORDER 9 BITS OF 'PGR777' ADDRESS.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 16
SEQ 0026
2931 TEST READ OF DATA FROM A DATA BLOCK
USING PAGED REFERENCES THAT POINT TO
CONSECUTIVE DATA WORDS IN AN EXEC UNPAGED
MEMORY AREA.
DATA CONSISTS OF COMPLEMENT OF AND
PAGING REFERENCE ADDRESS.
*****************************************************************
3015 TEST PAGED DATA WRITE
*****************************************************************
3017 USING PAGING ADDRESS 400XXX AND 777XXX
PAGING REFERENCES POINT TO EXEC UNPAGED ADDRESSES.
3036 TEST A 'MOVEM' USING AN 'E' ADDRESS THAT CAUSES PAGING.
'E' = PAGE 400 (HIGH ORDER 9 BITS),
LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGW400' ADDRESS.
PAGE MAP RELOCATION BITS SETUP FOR
HIGH ORDER 9 BITS OF 'PGW400' ADDRESS.
THEREFORE ACTUAL ADDRESS FOR 'MOVEM' IS:
HIGH ORDER 9 BITS FROM PAGE MAP AND
LOW ORDER 9 BITS OF 'PGW400' ADDRESS.
3062 TEST A 'MOVEM' USING AN 'E' ADDRESS THAT CAUSES PAGING.
'E' = PAGE 777 (HIGH ORDER 9 BITS),
LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGW777' ADDRESS.
PAGE MAP RELOCATION BITS SETUP FOR
HIGH ORDER 9 BITS OF 'PGW777' ADDRESS.
THEREFORE ACTUAL ADDRESS FOR 'MOVEM' IS:
HIGH ORDER 9 BITS FROM PAGE MAP AND
LOW ORDER 9 BITS OF 'PGW777' ADDRESS.
3092 TEST WRITE OF DATA USING PAGED ADDRESS.
DATA IS WRITTEN INTO CONSECUTIVE DATA WORDS
IN AN EXEC UNPAGED DATA AREA.
DATA CONSISTS OF PAGED ADR AND COMPLEMENT OF PAGED ADDRESS.
*****************************************************************
3233 TEST PAGE FAIL WORD
*****************************************************************
3239 VERIFY THAT THE PROPER PAGE FAIL CODE OCCURS ON A PAGED READ
TO AN AREA WITHOUT THE ACCESS BIT BUT WITH THE PUBLIC,
WRITEABLE,SOFTWARE & CACHE BIT.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 17
SEQ 0027
*****************************************************************
3293 TEST WRITE PROTECTED PAGING
*****************************************************************
3295 TRYING TO WRITE INTO A WRITE PROTECTED AREA
SHOULD CAUSE A PAGE FAILURE
*****************************************************************
3384 PAGED BLT PAGING AND ADDRESSING TEST
*****************************************************************
3386 CHECKS THAT ADDRESSING FROM 340000 TO 777777 WORKS.
ALL PAGING REFERENCES RELOCATE INTO ACTUAL ADDRESSES 76000 TO 76777.
BLT USES ALL ADDRESS FROM 340000 TO 777777.
*****************************************************************
3471 TEST BASE REGISTER RELOCATION
*****************************************************************
3473 SETUP PAGE MAP PAGES AS PAGE 76
SETUP PAGE 0 PAGE MAP FOR ERRORS
SETUP BASE REGISTERS
TEST MUUO FOR PAGE 0 AND FOR PAGE 76
TEST THAT EXEC PAGE FAIL WORD STORES CORRECTLY
IN PAGE 76 USING USER BASE REGISTER RELOCATION.
3523 TEST USER BASE REGISTER RELOCATION
BY USING AN MUUO OF 0,,654321.
3526 TEST MUUO FIRST WITH EPMP & UPMP AS PAGE 0.
3555 TEST THAT WITH UPMP RELOCATED TO PAGE 76
AN MUUO TRAPS CORRECTLY AND RETRIEVES NEW PC
FROM RELOCATED USER PAGE MAP PAGE.
ALSO TEST THAT MUUO AND TRAPPED PC GET STORED CORRECTLY
IN RELOCATED UPMP.
3585 TEST USER BASE REGISTER RELOCATION
BY USING EXEC PAGE FAIL WORD
3618 TEST BASE REGISTER RELOCATION
BY USING EXEC-PER-PROCESS PAGING
AND PAGING REFILL DATA FROM RELOCATED PAGE
WITH USER BASE REGISTER SET TO PAGE 76.
3697 TEST THAT A TRAP FROM THE EXEC-PER-PROCESS AREA
USES THE CORRECT BASE REGISTER
3742 TEST BASE REGISTER RELOCATION
BY USING PAGE FAULT TRAP
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 18
SEQ 0028
3786 TEST BASE REGISTER RELOCATION
BY USING TRAPPING
3796 TEST RELOCATED TRAP 3
3817 TEST RELOCATED TRAP 2
3838 TEST RELOCATED TRAP 1
*****************************************************************
3864 TEST INTERRUPT RELOCATION
*****************************************************************
3866 SET PAGE 0 INTERRUPT LOCATIONS AS ERROR
SETUP RELOCATED PAGE INTERRUPT LOCATIONS FOR TESTING
RELOCATE EXEC BASE REGISTER
TEST INTERRUPTS
3907 PAGE 0 INTERRUPT ERROR HANDLER
3920 RELOCATED INTERRUPT MACRO'S
3923 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = APRCHN.
3936 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = ITRCHN
3946 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = 7
3958 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 7
3966 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = 6
3978 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 6
3986 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = 5
3998 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 5
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 19
SEQ 0029
4006 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = 4
4018 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 4
4026 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = 3
4038 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 3
4046 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = 2
4058 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 2
4066 SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
PAGE MAP RELOCATED TO PAGE 76.
INTERRUPT CHANNEL = 1
4078 INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 1
*****************************************************************
4095 TEST PAGE REFILL RELOCATION
*****************************************************************
4097 BY PUTTING REFILL DATA IN PAGE 76.
AND RELOCATING EXEC BASE REGISTER
*****************************************************************
4176 INSTRUCTION PAGE FAIL TESTING
*****************************************************************
4178 TEST BLOCK TRANSFER PAGE FAIL
SETUP 5 WORD BLT ACROSS PAGE BOUNDRY
FIRST PAGE DATA RELOCATION DATA IN PAGE MAP
SECOND PAGE DATA RELOCATION DATA NOT IN PAGE MAP
PERFORM BLT
SHOULD PAGE FAIL AFTER TRANSFERING 3 WORDS.
TEST PAGE FAIL, BLT AC, ETC.
REDO BLT, ON PAGE FAIL SETUP 2ND PAGE RELOCATION DATA AND CONTINUE BLT.
TEST FOR PROPER COMPLETION.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 20
SEQ 0030
4223 BLT PAGE FAIL RETURN
4275 TEST BLT PAGE FAIL CONTINUE
4294 BLT SHOULD PAGE FAIL
PAGE MAP IS THEN SETUP
AND BLT CONTINUED
4338 ON PAGE FAIL, SETUP NEXT PAGE FOR BLT
4344 TEST BYTE PAGE FAIL
FIRST TEST WITH BYTE DATA IN UNMAPPED PAGE
THEN TEST WITH BYTE POINTER IN UNMAPPED PAGE.
4376 ILDB PAGE FAIL RETURN
BYTE POINTER SHOULD HAVE BEEN INCREMENTED
PAGE FAIL SHOULD HAVE OCCURRED WHEN DATA WAS FETCHED.
4404 TEST DEPOSIT BYTE PAGE FAIL
4420 IDPB PAGE FAIL RETURN
4450 TEST BYTE POINTER FETCH PAGE FAIL
BYTE POINTER IN PAGED AREA WITH PAGE MAP CLEARED
THEREFORE PAGE FAIL SHOULD OCCUR ON POINTER FETCH
AND POINTER SHOULD NOT BE INCREMENTED.
4471 POINTER FETCH PAGE FAIL RETURN
4505 TEST DOUBLE MOVE PAGE FAIL
FIRST PAGE FAIL ON FIRST OPERAND FETCH
OPERANDS FETCHED FROM PAGED AREA WITH PAGE MAP CLEAR.
4537 PAGE FAIL RETURN
4562 PAGE FAIL DOUBLE MOVE ON SECOND WORD
DATA FOR FIRST OPERAND IN PAGE WITH RELOCATION DATA IN PAGE MAP.
DATA FOR SECOND OPERAND ACROSS PAGE BOUNDRY
PAGE MAP CLEAR FOR THAT PAGE.
4586 PAGE FAIL RETURN
4614 TEST DOUBLE MOVE TO MEMORY PAGE FAIL
FIRST TEST WITH DATA DESTINATION ADDRESSES IN A PAGED AREA
WITH THE PAGE MAP CLEAR.
4649 PAGE FAIL RETURN
4686 TEST DOUBLE MOVE TO MEMORY PAGE FAIL
PAGE FAIL ON SECOND WORD.
PAGE MAP SETUP SO FIRST OPERAND IS STORED IN PAGE
WITH RELOCATION DATA IN PAGE MAP.
SECOND OPERAND STORE IS ACROSS PAGE BOUNDRY WITH
PAGE MAP CLEAR FOR THAT PAGE.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 21
SEQ 0031
4711 PAGE FAIL RETURN
*****************************************************************
4743 TRAP INSTRUCTION PAGE FAIL TEST
*****************************************************************
4745 CAUSE A TRAP, THE TRAP "JSR" IS TO A PAGED ADDRESS THAT PAGE FAILS
PAGE FAIL ROUTINE VERIFIES PAGE FAIL INFO & CORRECT PC WORD
PAGE TABLE THEN SETUP AND TRAP CONTINUED
TRAP SHOULD THEN COMPLETE
TRAP HANDLER THEN VERIFIES CORRECT PC WORD
4787 HERE IF PAGE FAIL TRAP HAPPENED
4808 SETUP FOR PAGE FAIL TRAP CONTINUE
4820 HERE IF TRAP CONTINUED PROPERLY
4839 CAUSE A TRAP TO A PAGE FAIL PAGE
TRAP HANDLER THEN VERIFIES CORRECT PC WORD
4886 HERE IF TRAP HAPPENED WITHOUT PAGE FAIL
4896 HERE IF PAGE FAIL TRAP HAPPENED
4916 TEST I/O INSTRUCTION PAGE FAIL
*****************************************************************
4970 INTERRUPT INSTRUCTION PAGE FAIL
*****************************************************************
4976 CAUSE AN INTERRUPT THAT HAS FOR ITS INTERRUPT HANDLING
INSTRUCTION A "JSR" TO A PAGE FAIL ADDRESS.
AN I/O PAGE FAIL INTERRUPT SHOULD OCCUR.
4983 FIRST VERIFY THAT THE METER CAN CAUSE AN INTERRUPT
4998 NOW USE IT TO CAUSE I/O PAGE FAIL
5029 IF PAGE FAIL HAPPENED, ERROR
5037 APR ERROR INTERRUPT, CHECK PROPER CONDITIONS
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 22
SEQ 0032
*****************************************************************
5058 PAGING MEMORY FLOATING BIT TEST TABLE
*****************************************************************
5060 LH = SCRATCHPAD DATA
RH = PAGING ADDRESS
*****************************************************************
5110 MONITOR UUO TRAP TESTING
*****************************************************************
5112 TEST MUUO TRAPPING TO 424(KERNAL NO TRAP)
5190 MONITOR UUO TEST - UUO STORE INTO 424
5224 MONITOR UUO - STORE CORRECT PC
5250 TEST STORING ALL POSSIBLE VALUES OF THE E FIELD WHEN EXECUTING
A MONITOR UUO
*****************************************************************
5283 TEST MUUO'S IN CONCEALED MODE
*****************************************************************
5285 MONITOR UUO TEST - TRAPPING IN CONCEALED MODE
5332 MONITOR UUO TEST - UUO STORE INTO 424
5380 MONITOR UUO - STORING THE CORRECT PC
5419 MUUO STORING THE CORRECT E FIELD
*****************************************************************
5466 TRAP TESTING
*****************************************************************
5468 CAUSE TRAPS VIA JRSTF INSTRUCTION
TRAP WILL CAUSE A MOVEI TO BE EXECUTED PUTING THE TRAP ADDRESS INTO
AC0 WHICH IS THEN CHECKED FOR BEING THE CORRECT TRAP
TRAP RETURN WILL CHECK FOR CORRECT PC STORED IN IN 0
5495 TEST PUSHDOWN LIST OVERFLOW TRAP TO 422
5518 TRAP3 TRAP TEST TRAPPING TO 423
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 23
SEQ 0033
*****************************************************************
5541 FLAG SETTING
*****************************************************************
5545 TRY TO SET USERF VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5588 THIS ROUTINE TO BRING US BACK TO KERNAL MODE FROM USER
MODE RESTORE VIA MUUO
5610 TRY TO SET EXIOT VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5656 TRY TO SET AROV VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5701 TRY TO SET CRY0 VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5746 TRY TO SET CRY1 VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5791 TRY TO SET FOV VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5836 TRY TO SET BIS VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5881 TRY TO SET FXU VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5926 TRY TO SET DCK VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
5972 TRY TO SET CRY0+CRY1+AROV+FOV+FXU+DCK+BIS VIA MONITOR UUO TRAP
TRAPS TO ANY MODE IS OK FOR THIS TEST
*****************************************************************
6016 TEST IOT'S IN CONCEALED MODE
*****************************************************************
6090 ILLEGAL USER MODE IOT TABLE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^ DECDOC VER 00.24 29-MAR-78 15:26:30 PAGE 24
SEQ 0034
*****************************************************************
6104 TEST USER MODE ADDRESSING
*****************************************************************
6106 USER MODE CONCEALED - MAXIMUM BLOCK TRANSFER
*****************************************************************
6180 SPECIAL PROGRAM SUBROUTINES
*****************************************************************
6195 PAGE TABLE SETUP
*****************************************************************
6218 *STOR* RESERVED STORAGE, MARCH 1978
*****************************************************************
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1
DSKEAT MAC 29-Mar-78 14:48 CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978 SEQ 0035
1 ;*MAINDEC-10-DSKEA
2
3 000000 MCNVER=0
4 000001 DECVER=1
5
6 XLIST
7 LIST
8 LALL
9
10 NAME \MCNVER,\DECVER^
11
12 TITLE DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1^
13
14 000137 LOC 137
15 000137 000000 000001 MCNVER,,DECVER
16
17 ;*COPYRIGHT 1978
18 ;*DIGITAL EQUIPMENT CORPORATION
19 ;*MARLBORO, MASS. 01752
20
21 ;*JOHN R. KIRCHOFF
22
23 NOSYM
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 2
DSKEAT MAC 29-Mar-78 14:48 DIAGNOSTIC PARAMETERS SEQ 0036
24 SUBTTL DIAGNOSTIC PARAMETERS
25
26 ;*SUBROUTINE ASSEMBLY PARAMETERS
27
28 000001 EXCASB= 1 ;ASSEMBLE FOR EXEC MODE
29 000001 PGMEND= 1 ; " PROGRAM END STATEMENT
30 000100 DEBUG= 100 ; " ROOM FOR DEBUGGING
31 030000 MODDVL= BEGIN
32 030000 MODDVU= BEGIN
33
34 ;*ACCUMULATOR DEFINITIONS
35
36 000006 CNTR=6 ;COUNTER AC
37 000007 AC=7 ;COMMON AC 1
38 000010 AC1=10 ;COMMON AC 2
39 000011 AC2=11 ;COMMON AC 3
40 000012 AC3=12 ;COMMON AC 4
41 000013 ACT=13 ;ACTUAL RESULTS AC
42 000014 COR=14 ;CORRECT RESULTS AC
43 000005 INDX=5 ;INDEXING AC
44
45 ;*MISCELLANEOUS
46
47 257000 000000 OPDEF MAP [257B8] ;MAP INSTRUCTION
48
49 043742 PGRDTB=END+1 ;440(8) WORD PAGED READ DATA BLOCK
50 043742 PGWRTB=END+1 ;440(8) WORD PAGED WRITE DATA BLOCK
51 044401 END1=END+440 ;NEW END OF PROGRAM
52
53 000400 TN0==400 ;TRAP NUMBER 0
54 000200 TN1==200 ;TRAP NUMBER 1
55
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 3
DSKEAT MAC 29-Mar-78 14:48 DIAGNOSTIC PARAMETERS SEQ 0037
56 COMMENT %
57 MAP INSTRUCTION READOUT ASSIGNMENTS
58
59 BIT 0 - USER ADDRESS
60 1 - PAGE FAIL
61 2 - ACCESS
62 3 - WRITABLE
63 4 - SOFTWARE
64 7 - CACHE
65 8 - PAGED REF
66 9-13 - 0
67 16
68 ^ - CORE ADDRESS BITS 16-35
69 35
70
71 PAGE FAIL ERROR FORMAT
72 IF BIT 1 = 1
73
74 20 - I/O PAGE FAIL
75 25 - PAGE TABLE PARITY ERROR
76 36 - HARD MEMORY ERROR
77 37 - NXM
78
79 PAGE TABLE ENTRY WORD FORMAT
80
81 BIT 0 - ACCESS
82 2 - WRITABLE
83 3 - SOFTWARE
84 4 - CACHE
85 7
86 ^ - PHYSICAL PAGE ADDRESS BITS 16-26
87 17
88
89 ;LEFT HALF = EVEN VIRTUAL PAGE
90 ;RIGHT HALF = ODD VIRTUAL PAGE
91 %
92
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 4
DSKEAT MAC 29-Mar-78 14:48 DIAGNOSTIC PARAMETERS SEQ 0038
93 ;*BEGIN PARAMETERS
94
95 030647 SADR1= SFSRT1 ;SPECIAL FEATURE START
96 030076 SADR2= RESRT1 ;POWER FAIL RESTART
97 030000 SADR3= BEGIN ;NO REENTER START
98 030007 SADR4= SRTDDT ;DDT
99 030061 SADR5= $BEND2 ;^C - START OVER
100 030000 SADR6= BEGIN ;ALTMODE - START OVER
101 254200 030000 SADR7= HALT BEGIN
102 254200 030000 SADR8= HALT BEGIN
103 254200 030000 SADR9= HALT BEGIN
104 254200 030000 SADR10= HALT BEGIN
105 254200 030000 SADR11= HALT BEGIN
106
107 000000 PAREA1= 0 ;NO RANDOM
108 000000 PAREA2= 0 ;NO SYS EXR
109 446353 454100 PAREA3= SIXBIT/DSKEA/ ;PROGRAM NAME
110 000000 PAREA4= 0 ;NO EXTENTION
111 000000 PAREA5= 0
112 000000 PAREA6= 0
113
114 000001 ITERAT= 1
115
116 ;MACROS
117
118 DEFINE SUBTST<
119 MOVEI .
120 MOVEM TESTPC ;SETUP SUBTEST PC >
121
122 367640 000000 OPDEF REPTLP [SOJG REPT,] ;REPEAT LOOP
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 5
DSKEAT MAC 29-Mar-78 14:48 DIAGNOSTIC PARAMETERS SEQ 0039
123 S^;*********************************************************************^
124 ;*KS-10 EXEC PAGE MAP PAGE ASSIGNMENTS
125 S^;*********************************************************************^
126
127 000421 LAROVTP==421 ;ARITHMETIC TRAP
128 000422 LPDOVTP==422 ;PUSHDOWN OVERFLOW TRAP
129 000423 LTRP3TP==423 ;TRAP 3 TRAP
130
131 000510 LTBASH==510 ;TIME-BASE, HI
132 000511 LTBASL==511 ;TIME-BASE, LO
133 000512 LPRFMH==512 ;PERFORMANCE ANAYLYSIS, HI
134 000513 LPRFML==513 ;PERFORMANCE ANAYLYSIS, LO
135
136 S^;*********************************************************************^
137 ;*KS-10 USER PAGE MAP PAGE ASSIGNMENTS
138 S^;*********************************************************************^
139
140 000421 LAROVTP==421 ;ARITHMETIC TRAP
141 000422 LPDOVTP==422 ;PUSHDOWN OVERFLOW TRAP
142 000423 LTRP3TP==423 ;TRAP 3 TRAP
143
144 000424 LMUUO== 424 ;MUUO STORAGE
145 000425 LMUUOPC==425 ;C(PC) OF MUUO STORAGE
146 000426 LCNTXT==426 ;PROCESS CONTEXT WORD
147
148 000430 LKNTRP==430 ;KERNAL NO TRAP - NEW PC'S-
149 000431 LKTRP== 431 ;" TRAP
150 000432 LSNTRP==432 ;SUPERVISOR NO TRAP
151 000433 LSTRP== 433 ;" TRAP
152 000434 LCNTRP==434 ;CONCEAL NO TRAP
153 000435 LCTRP== 435 ;" TRAP
154 000436 LPNTRP==436 ;PUBLIC NO TRAP
155 000437 LPTRP== 437 ;" TRAP
156
157 000500 LEUPFW==500 ;EXEC & USER PAGE FAIL WORD
158 000501 LPFWPC==501 ;C(PC) OF PAGE FAIL WORD
159 000502 LPGFTR==502 ;PAGE FAIL NEW PC
160
161 000504 LEBXMH==504 ;E-BOX CLOCK TICK METER, HI
162 000505 LEBXML==505 ;E-BOX CLOCK TICK METER, LO
163 000506 LMBXMH==506 ;M-BOX CYCLE METER, HI
164 000507 LMBXML==507 ;M-BOX CYCLE METER, LO
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 6
DSKEAT MAC 29-Mar-78 14:48 PROGRAM MACRO'S SEQ 0040
165 SUBTTL PROGRAM MACRO'S
166
167 DEFINE FLGTST (FLAG,MSG0,%FLAG0,%FLAG3,%FLAG2),<
168 LALL
169 ;*TRY TO SET FLAG VIA MONITOR UUO TRAP
170 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
171
172 A=1 ;ACTUAL FLAGS AND PC STORED
173 C=[FLAG,,%FLAG3] ;CORRECT FLAGS AND PC
174
175 %FLAG0: CONO PAG,LTRPEN
176 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
177 TNSET
178 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
179 SKIPN [MODE] ;DONT PAGE IF MODE = 0
180 JRST .+3
181 PAGECN
182 MOVSI 1B21 ;UUO TO DO
183 MOVEM %FLAG2 ;STORE UUO TO DO
184 MOVE [FLAG,,%FLAG3] ;PC AND FLAGS TO RESTORE
185 MOVEM UPMP+CNTRP
186 MOVEM UPMP+CTRP
187 MOVEM UPMP+PNTRP
188 MOVEM UPMP+PTRP
189 MOVEM UPMP+SNTRP
190 MOVEM UPMP+STRP
191 MOVEM KNTRP
192 MOVEM KTRP
193 SETZM UPMP+MUUO
194 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
195 %FLAG2: 0 ;HERE IS THE UUO
196 ERROR %FLAG0,13,0,0,MUUO DID NOT CAUSE TRAP
197 LALL
198 %FLAG3: JSP 1,.+1 ;GET FLAGS
199 TLNN 1,FLAG ;ARE FLAG(S) SET?
200 ERROR %FLAG0,13,C,A,MSG0
201 >
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 7
DSKEAT MAC 29-Mar-78 14:48 PROGRAM MACROS AND OPDEFS SEQ 0041
202 SUBTTL PROGRAM MACROS AND OPDEFS
203
204 264000 037005 OPDEF TRPSET [JSR TRAPST]
205
206 700200 200000 OPDEF RESET [CONO APR,200000]
207
208 DEFINE MOVMEM(A,B)<
209 PUT [A]
210 GET B
211 >
212
213 DEFINE PAGECN<
214 SETOM CNSFLG ;INFORM PAGE ROUTINE
215 GO PAGSET ;THAT I WANT CONCEALED MODE
216 >
217 DEFINE PAGEPN<
218 SETZM CNSFLG ;INFORM PAGE ROUTINE
219 GO PAGSET ;THAT I WANT PUBLIC MODE
220 >
221
222 DEFINE TNSET<
223 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
224 MOVEM TESTPC ;INTO TEST
225 >
226
227 044000 IFNDEF UPMP,<UPMP=<END+1000>&777000> ;INSURE THAT THE USER PAGE MAP PAGE
228 ;STARTS AT AN EVEN ADDRESS WICH IS
229 ;A MULTIPLE OF 1K
230
231 ;*SPECIAL PAGE TABLE DEFINITIONS
232
233 000421 AROVTP= 421 ;ARITHMETIC TRAP
234 000422 PDOVTP= 422 ;PUSHDOWN OVERFLOW TRAP
235 000423 TRP3TP= 423 ;TRAP 3 TRAP
236 000424 MUUO= 424 ;MUUO STORAGE
237 000425 MUUOPC= 425 ;MUUO NEW PC
238 000430 KNTRP= 430 ;KERNAL
239 000431 KTRP= 431
240 000432 SNTRP= 432 ;SUPERVISOR
241 000433 STRP= 433
242 000434 CNTRP= 434 ;CONCEALED
243 000435 CTRP= 435
244 000436 PNTRP= 436 ;PUBLIC
245 000437 PTRP= 437
246
247 002000 LIP= 2000 ;PC FLAG, LAST INST PUBLIC
248 000400 TN0= 400 ;PC FLAG, TN 0 BIT
249 000200 TN1= 200 ;PC FLAG, TN 1 BIT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1
PARAM KSM 28-Mar-78 11:27 CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978 SEQ 0042
250 SUBTTL CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978
251
252 DEFINE S,<;*********************************************************************>
253
254 S^;*********************************************************************^
255 ;*DATA SWITCHES
256 ;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
257 ;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
258 S^;*********************************************************************^
259
260 400000 ABORT== 400000 ;ABORT PROGRAM ON PASS COMPLETION
261 200000 RSTART==200000 ;RESTART TEST, PRINT TOTALS
262 100000 TOTALS==100000 ;PRINT TOTALS, CONTINUE
263
264 040000 NOPNT== 040000 ;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
265 020000 PNTLPT==020000 ;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
266 010000 DING== 010000 ;RING BELL ON ERROR
267
268 004000 LOOPER==004000 ;ENTER EXERCISE/CHECK LOOP ON ERROR
269 002000 ERSTOP==002000 ;HALT ON TEST ERROR
270 001000 PALERS==001000 ;PRINT ALL ERRORS
271
272 000400 RELIAB==000400 ;RELIABILITY MODE
273 000200 TXTINH==000200 ;INHIBIT ERROR TEXT
274 000100 INHPAG==000100 ;INHIBIT PAGING
275
276 000040 MODDVC==000040 ;MODIFY DEVICE CODE
277 000020 INHCSH==000020 ;INHIBIT CACHE
278 000010 OPRSEL==000010 ;OPERATOR SELECTION
279
280 000004 CHAIN== 000004 ;CHAIN CONTROL SWITCH
281
282 ;SWITCH 16 RESERVED
283
284 ;SWITCH 17 RESERVED !!!
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 2
PARAM KSM 28-Mar-78 11:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0043
285 SUBTTL PROGRAM/SUBROUTINE PARAMETERS
286
287 S^;*********************************************************************^
288 ;*SPECIAL SUBPROGRAM LINKAGES
289 S^;*********************************************************************^
290
291 027772 FSELNK= 27772 ;FILE SELECT LINK
292 027773 FRDLNK= 27773 ;FILE READ LINK
293 027774 LDLNK= 27774 ;LOAD LINKAGE ADDRESS
294 027775 DDTLNK= 27775 ;DDT LINKAGE ADDRESS
295 027776 MODLNK= 27776 ;OPERATIONAL MODE CHECK LINKAGE ADDRESS
296 027777 SUBLNK= 27777 ;SUBROUTINE LINKAGE ADDRESS
297
298 S^;*********************************************************************^
299 ;*SPECIAL SUBROUTINE FATAL HALTS
300 ;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
301 S^;*********************************************************************^
302
303 ;ADDRESS TAG REASON
304 ;---------------------
305
306 ; 1010 NOEXEC ;PROGRAM NOT CODED FOR EXEC MODE OPERATION
307 ; 1011 PLERR ;FATAL PUSH LIST POINTER ERROR
308 ; 1012 PLERR1 ;INITIAL PUSH LIST POINTER ERROR
309 ; 1013 MUOERR ;MUUO WITH LUUO HANDLER WIPED OUT
310 ; 1014 SMBER ;KS-10 INTERRUPT WITHOUT DOORBELL
311 ; 1015 SMCER ;KS-10 CLOCK INTERRUPT WITHOUT FLAG SET
312 ; 1016 CPIERR ;CPU INITIALIZATION ERROR
313 ; 1017 EOPERR ;END OF PROGRAM ERROR
314 ; 1020 LUOERR ;INTERRUPT WITH LUUO HANDLER WIPED OUT
315
316 S^;*********************************************************************^
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 3
PARAM KSM 28-Mar-78 11:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0044
317 S^;*********************************************************************^
318 ;OPERATOR DEFINITIONS (NON-UUO'S)
319 S^;*********************************************************************^
320
321 260740 000000 OPDEF GO [PUSHJ P,] ;SUBROUTINE CALL
322 263740 000000 OPDEF RTN [POPJ P,] ;SUBROUTINE RETURN
323 261740 000000 OPDEF PUT [PUSH P,] ;PUT DATA ON PUSH LIST
324 262740 000000 OPDEF GET [POP P,] ;GET DATA FROM PUSH LIST
325 254000 000000 OPDEF PJRST [JRST ] ;JRST TO ROUTINE THAT RTN'S
326 254200 000000 OPDEF HALT [JRST 4,] ;DEFINITION FOR DDT
327 254100 000000 OPDEF JRSTF [JRST 2,] ;DEFINITION FOR DDT
328 254500 000000 OPDEF JEN [JRST 12,] ;DEFINITION FOR DDT
329
330 S^;*********************************************************************^
331 ;*SUBROUTINE INITIALIZATION CALL
332 S^;*********************************************************************^
333
334 265000 030011 OPDEF PGMINT [JSP 0,SBINIT] ;SUBROUTINE INITIALIZATION
335
336 S^;*********************************************************************^
337 ;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
338 S^;*********************************************************************^
339
340 037640 000004 OPDEF FATAL [37B8!15B12!4] ;FATAL PROGRAMMING HALT
341 037600 000004 OPDEF ERRHLT [37B8!14B12!4] ;PROGRAM ERROR HALT
342
343 S^;*********************************************************************^
344 ;*TERMINAL INPUT UUO'S
345 ;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
346 ;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
347 S^;*********************************************************************^
348
349 037000 000003 OPDEF TTICHR [37B8!0B12!3] ;TTY, INPUT ANY CHARACTER
350 037040 000003 OPDEF TTIYES [37B8!1B12!3] ;TTY, NORMAL RETURN Y
351 037100 000003 OPDEF TTINO [37B8!2B12!3] ;TTY, NORMAL RETURN N
352 037140 000003 OPDEF TTIOCT [37B8!3B12!3] ;TTY, INPUT OCTAL WORD
353 037200 000003 OPDEF TTIDEC [37B8!4B12!3] ;TTY, INPUT DECIMAL WORD
354 037240 000003 OPDEF TTICNV [37B8!5B12!3] ;TTY, INPUT CONVERTABLE WORD
355 037300 000003 OPDEF TTLOOK [37B8!6B12!3] ;TTY, KEYBOARD CHECK
356 037340 000003 OPDEF TTALTM [37B8!7B12!3] ;TTY, ALT-MODE CHECK
357 037400 000003 OPDEF TTSIXB [37B8!10B12!3] ;TTY, INPUT SIXBIT WORD
358 037440 000003 OPDEF TTYINP [37B8!11B12!3] ;TTY, IMAGE MODE INPUT
359 037500 000003 OPDEF TTICLR [37B8!12B12!3] ;TTY, CLEAR INPUT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 4
PARAM KSM 28-Mar-78 11:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0045
360 ;*TERMINAL OUTPUT UUO'S.
361
362 037000 000000 OPDEF PNTA [37B8!0B12!0] ;PRINT ASCII WORD
363 037000 000001 OPDEF PNTAF [37B8!0B12!1] ;PRINT ASCII WORD FORCED
364 037740 000000 OPDEF PNTAL [37B8!17B12!0] ;PRINT ASCIZ LINE
365 037740 000001 OPDEF PNTALF [37B8!17B12!1] ;PRINT ASCIZ LINE FORCED
366 037600 000003 OPDEF PSIXL [37B8!14B12!3] ;PRINT SIXBIT'Z LINE
367 037640 000003 OPDEF PSIXLF [37B8!15B12!3] ;PRINT SIXBIT'Z LINE FORCED
368 037000 000000 OPDEF PNTMSG [37B8!0B12!0] ;PRINT MESSAGE IMMEDIATE
369 037040 000000 OPDEF PNTMSF [37B8!1B12!0] ;PRINT MESSAGE IMMEDIATE FORCED
370 037100 000000 OPDEF PSIXM [37B8!2B12!0] ;PRINT SIXBIT'Z MSG IMMEDIATE
371 037200 000000 OPDEF PSIXMF [37B8!4B12!0] ;PRINT SIXBIT'Z MSG IMM FORCED
372 037000 000000 OPDEF PNTCI [37B8!0B12!0] ;PRINT CHARACTER IMMEDIATE
373 037040 000000 OPDEF PNTCIF [37B8!1B12!0] ;PRINT CHARACTER IMMEDIATE FORCED
374 037500 000000 OPDEF PNTCHR [37B8!12B12!0] ;PRINT CHARACTER
375 037500 000001 OPDEF PNTCHF [37B8!12B12!1] ;PRINT CHARACTER FORCED
376 037040 000000 OPDEF PNT1 [37B8!1B12!0] ;PRINT ONE OCTAL DIGIT
377 037040 000001 OPDEF PNT1F [37B8!1B12!1] ;PRINT 1 OCTAL DIGIT FORCED
378 037100 000000 OPDEF PNT2 [37B8!2B12!0] ;PRINT TWO OCTAL DIGITS
379 037100 000001 OPDEF PNT2F [37B8!2B12!1] ;PRINT 2 OCTAL DIGITS FORCED
380 037140 000000 OPDEF PNT3 [37B8!3B12!0] ;PRINT THREE OCTAL DIGITS
381 037140 000001 OPDEF PNT3F [37B8!3B12!1] ;PRINT THREE OCTAL DIGITS FORCED
382 037200 000000 OPDEF PNT4 [37B8!4B12!0] ;PRINT FOUR OCTAL DIGITS
383 037200 000001 OPDEF PNT4F [37B8!4B12!1] ;PRINT FOUR OCTAL DIGITS FORCED
384 037240 000000 OPDEF PNT5 [37B8!5B12!0] ;PRINT FIVE OCTAL DIGITS
385 037240 000001 OPDEF PNT5F [37B8!5B12!1] ;PRINT FIVE OCTAL DIGITS FORCED
386 037300 000000 OPDEF PNT6 [37B8!6B12!0] ;PRINT SIX OCTAL DIGITS
387 037300 000001 OPDEF PNT6F [37B8!6B12!1] ;PRINT SIX OCTAL DIGITS FORCED
388 037340 000000 OPDEF PNT7 [37B8!7B12!0] ;PRINT 7 OCTAL DIGITS
389 037340 000001 OPDEF PNT7F [37B8!7B12!1] ;PRINT 7 OCTAL DIGITS FORCED
390 037440 000000 OPDEF PNT11 [37B8!11B12!0] ;PRINT 11 OCTAL DIGITS
391 037440 000001 OPDEF PNT11F [37B8!11B12!1] ;PRINT 11 OCTAL DIGITS FORCED.
392 037400 000000 OPDEF PNTADR [37B8!10B12!0] ;PRINT PHYSICAL ADDRESS
393 037400 000001 OPDEF PNTADF [37B8!10B12!1] ;PRINT PHYSICAL ADDRESS FORCED
394 037600 000000 OPDEF PNTOCT [37B8!14B12!0] ;PRINT FULL WORD OCTAL
395 037600 000001 OPDEF PNTOTF [37B8!14B12!1] ;PRINT FULL WORD OCTAL FORCED
396 037540 000000 OPDEF PNTHW [37B8!13B12!0] ;PRINT OCTAL HALF WORDS, 6 SP 6
397 037540 000001 OPDEF PNTHWF [37B8!13B12!1] ;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
398 037700 000003 OPDEF PNTOCS [37B8!16B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S
399 037740 000003 OPDEF PNTOCF [37B8!17B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
400 037640 000000 OPDEF PNTDEC [37B8!15B12!0] ;PRINT DECIMAL, SUPRESS LEADING 0'S
401 037640 000001 OPDEF PNTDCF [37B8!15B12!1] ;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
402 037700 000000 OPDEF PNTDS [37B8!16B12!0] ;PRINT DECIMAL, SPACES FOR LD 0'S
403 037700 000001 OPDEF PNTDSF [37B8!16B12!1] ;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 5
PARAM KSM 28-Mar-78 11:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0046
404 037200 000002 OPDEF PNTNM [37B8!4B12!2] ;PRINT PROGRAM NAME
405 037000 000002 OPDEF PNTSIX [37B8!0B12!2] ;PRINT SIXBIT WORD
406 037040 000002 OPDEF PNTSXF [37B8!1B12!2] ;PRINT SIXBIT WORD FORCED
407 037240 000002 OPDEF DROPDV [37B8!5B12!2] ;CLOSE LOGICAL FILE, USER MODE
408 037100 000002 OPDEF PNTCW [37B8!2B12!2] ;PRINT DF10 CONTROL WORD
409 037140 000002 OPDEF PNTCWF [37B8!3B12!2] ;PRINT DF10 CONTROL WORD FORCED
410 037000 030242 OPDEF PCRL [37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
411 037040 030242 OPDEF PCRLF [37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
412 037000 000040 OPDEF PSP [37B8!0B12!40] ;PRINT SPACE
413 037040 000040 OPDEF PSPF [37B8!1B12!40] ;PRINT SPACE FORCED
414 037000 030243 OPDEF PCRL2 [37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
415 037040 030243 OPDEF PCRL2F [37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
416 037040 000007 OPDEF PBELL [37B8!1B12!7] ;PRINT TTY BELL
417
418 037040 000026 OPDEF PFORCE [37B8!1B12!26] ;PRINT FORCE, CONTROL O OVERRIDE
419
420 DEFINE PMSG (ARG),<
421 PSIXM [SIXBIT\ARG'_\]>
422
423 DEFINE PMSGF (ARG),<
424 PSIXMF [SIXBIT\ARG'_\]>
425
426 ;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
427 ;* CONSERVES CORE OVER ASCIZ
428
429 DEFINE SIXBTZ (ARG),< [SIXBIT\ARG'_\]>
430
431 ;*CONSOLE SWITCH INPUT UUO.
432 ;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
433 ;* USER MODE.
434
435 037400 000002 OPDEF SWITCH [37B8!10B12!2] ;INPUT CONSOLE SWITCHES
436
437 ;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
438 ;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
439
440 037540 000004 OPDEF CLOKOP [37B8!13B12!4] ;CLOCK OPERATION UUO - CLOCK
441 037200 000004 OPDEF MTROP [37B8!4B12!4] ;CLOCK OPERATION UUO - METER
442
443 ;*KS-10 CACHE OPERATION UUO'S
444
445 037040 000004 OPDEF CINVAL [37B8!1B12!4] ;CACHE INVALIDATE
446 037100 000004 OPDEF CFLUSH [37B8!2B12!4] ;CACHE FLUSH
447 037140 000004 OPDEF CWRTBI [37B8!3B12!4] ;CACHE WRITE-BACK & INVALIDATE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 6
PARAM KSM 28-Mar-78 11:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0047
448 ;*END OF PASS/PROGRAM UUOS
449
450 ;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
451 ;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
452
453 037500 000004 OPDEF ENDUUO [37B8!12B12!4] ;UUO TO DISPLAY LIGHTS
454 037700 000004 OPDEF EOPUUO [37B8!16B12!4] ;END OF PROGRAM UUO
455
456 ;*MEMORY MANAGEMENT UUO'S
457 ;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
458 ;*ADDRESS CONVERSION, ETC...
459
460 037000 000004 OPDEF MAPMEM [37B8!0B12!4] ;MAP MEMORY
461 037500 000002 OPDEF MEMZRO [37B8!12B12!2] ;ZERO MEMORY
462 037440 000002 OPDEF MEMSEG [37B8!11B12!2] ;SETUP MEMORY SEGMENT
463 037540 000002 OPDEF MAPADR [37B8!13B12!2] ;VIRTUAL TO PHYSICAL ADR CONVERT
464 037640 000002 OPDEF MAPCNK [37B8!15B12!2] ;MAP MEMORY CHUNK
465 037600 000002 OPDEF MAPSET [37B8!14B12!2] ;SET KI10 EXEC PAGE MAP
466 037740 000002 OPDEF MAPPNT [37B8!17B12!2] ;PRINT MEMORY MAP
467
468 ;*DEVICE CODE MODIFICATION UUO
469 ;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
470 ;*IOT'S TO A DIFFERENT DEVICE CODE.
471
472 037340 000002 OPDEF MODPCU [37B8!7B12!2] ;MODIFY PERHIPERAL CODE, USER
473 037300 000002 OPDEF MODPCP [37B8!6B12!2] ;MODIFY PERHIPERAL CODE, PROGRAM
474
475 IFNDEF MODDVL,<MODDVL==BEGIN>
476 IFNDEF MODDVU,<MODDVU==BEGIN>
477
478 ;*"DIAMON" FILE SELECTION AND READ UUOS
479
480 037240 000004 OPDEF FSELECT [37B8!5B12!4] ;FILE SELECTION
481 037300 000004 OPDEF FREAD [37B8!6B12!4] ;FILE READ - ASCII DATA
482 037340 000004 OPDEF FRD36 [37B8!7B12!4] ;FILE READ - 36 BIT DATA
483 037400 000004 OPDEF FRD8 [37B8!10B12!4] ;FILE READ - 8 BIT DATA
484
485 XLIST
486 IFNDEF EROLD,<LIST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 7
PARAM KSM 28-Mar-78 11:27 ERROR HANDLING UUO DEFINITIONS SEQ 0048
487 SUBTTL ERROR HANDLING UUO DEFINITIONS
488
489 S^;*********************************************************************^
490 ;*ERROR HANDLER PARAMETERS
491 S^;*********************************************************************^
492
493 036000 000000 OPDEF ERUUO [36B8] ;ERROR CALL UUO
494 035000 000000 OPDEF ERLOOP [35B8] ;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
495 035040 000000 OPDEF ERLP1 [35B8!1B12] ;ERROR LOOP IF PC'S MATCH
496 035100 000000 OPDEF ERLP2 [35B8!2B12] ;ERROR LOOP IF ANY ERROR
497 034000 000000 OPDEF REPTUO [34B8] ;REPEAT LOOP UUO
498
499 ;*THE ERROR HANDLER MACROS
500
501 ;*A MACRO TO REPORT AN ERROR AND LOOP
502
503 DEFINE ERROR (ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
504 SALL
505 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
506 CORECT,,ACTUAL
507 [SIXBIT\D'_\],,ERR]
508 XALL
509 ERLOOP ADR ;IF ERROR, LOOP TO ADR
510 >
511
512 ;*A MACRO TO REPORT AN ERROR AND NOT LOOP
513
514 DEFINE ERROR1 (FORMAT,CORECT,ACTUAL,F,D,ERR)<
515 SALL
516 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
517 CORECT,,ACTUAL
518 [SIXBIT\D'_\],,ERR]
519 XALL>
520
521 >;END OF EROLD CONDITIONAL
522
523 XLIST
524 LIST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1
FIXED KSM 28-Mar-78 11:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0049
525 SUBTTL *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978
526
527 030000 LOC 30000
528
529 S^;*********************************************************************^
530 ;*PROGRAM STARTING ADDRESSES
531 ;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
532 ;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
533 ;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
534 ;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
535 S^;*********************************************************************^
536
537 030000 254 00 04 00 027776 BEGIN: JRST @MODLNK ;STAND-ALONE START
538 030001 254 00 0 00 030613 $START: JRST START ;MODE CHECK STARTING ADDRESS
539
540 030002 254 00 1 00 027774 DIAGMN: JRST @LDLNK ;DIAGNOSTIC MONITOR START
541
542 030003 254 00 1 00 027774 SYSEXR: JRST @LDLNK ;SYSTEM EXERCISER START
543
544 030004 254 00 0 00 030647 SFSTRT: JRST SADR1 ;SPECIAL FEATURE START
545
546 030005 254 00 0 00 030076 PFSTRT: JRST SADR2 ;POWER FAIL RESTART
547
548 030006 254 00 0 00 030000 REENTR: JRST SADR3 ;REENTER START(USUALLY USER MODE ONLY)
549
550 030007 SRTDDT: ;COMMONLY MISTAKEN NAME FOR "DDTSRT"
551 030007 254 00 1 00 027775 DDTSRT: JRST @DDTLNK ;DDT START
552
553 030010 254 00 0 00 030637 BEGIN1: JRST STARTA ;LOOP START(END OF PASS COMES HERE)
554 030011 254 00 1 00 027777 SBINIT: JRST @SUBLNK ;PMGINT LINKAGE
555 030012 000000 000000 RETURN: 0 ;RETURN ADDRESS STORAGE
556
557 030013 254200 030000 START1: SADR7 ;OPTIONAL STARTING ADR/INSTRUCTIONS
558 030014 254200 030000 START2: SADR8 ; "
559 030015 254200 030000 START3: SADR9 ; "
560 030016 254200 030000 START4: SADR10 ; "
561 030017 254200 030000 START5: SADR11 ; "
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 2
FIXED KSM 28-Mar-78 11:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0050
562 S^;*********************************************************************^
563 ;*PROGRAM FIXED PARAMETER AREA
564 S^;*********************************************************************^
565
566 030020 446353 454100 PNTNAM: PAREA3 ;SIXBIT PROGRAM NAME
567 030021 000000 000000 PNTEXT: PAREA4 ;SIXBIT PROGRAM EXTENSION
568 030022 000000 000000 RANDBS: PAREA1 ;RANDOM BASE NUMBER
569 030023 000000 000000 SWTEXR: PAREA2 ;SYSTEM EXERCISER SWITCHES
570 030024 000000 000001 ITRCNT: ITERAT ;PROGRAM ITERATIONS
571 030025 000000 030600 $PNAME: PGMNAM ;POINTER TO PROGRAMS NAME
572 030026 000000 000001 $PVER: MCNVER,,DECVER ;MCN & DEC VERSION LEVEL
573 030027 000000 030000 $MODVL: MODDVL ;DEVICE CODE CHANGE LOWER LIMIT
574 030030 000000 030000 $MODVU: MODDVU ;DEVICE CODE CHANGE UPPER LIMIT
575 030031 777777 777777 $EMODE: IFNDEF EXCASB,<0> IFDEF EXCASB,<-1> ;EXEC ALLOWED
576 030032 000000 000000 $UMODE: IFNDEF USRASB,<0> IFDEF USRASB,<-1> ;USER ALLOWED
577 030033 000000 000000 $DSKUP: IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1> ;DISK UPDATE MODE
578 030034 000000 000000 $MMAP: IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1> ;ALLOW MEMORY RTNS
579 030035 000000 000000 PAREA7: PAREA5 ;OPTIONAL PARAMETER
580 030036 000000 000000 PAREA8: PAREA6 ;OPTIONAL PARAMETER
581
582 S^;*********************************************************************^
583 ;*PROGRAM VARIABLE PARAMETER AREA
584 S^;*********************************************************************^
585
586 030037 000000 000000 USER: 0 ; 0 = EXEC, -1 = USER MODE FLAG
587 030040 000000 000000 KAIFLG: 0 ;PROCESSOR TYPE, 0 = KA10, -1 = KI10
588 030041 000000 000000 KLFLG: 0 ;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
589 030042 777777 777777 MONFLG: -1 ;DIAG MONITOR SPECIAL USER FLAG
590 030043 000000 000000 MONCTL: 0 ;DIAG MON/SYS EXR FLAG
591 030044 000000 000000 MONTEN: 0 ;-1= LOADED BY 10
592 030045 000000 000000 CLOCKF: 0 ;CLOCK TICKED FLAG
593 030046 000000 000000 CONSW: 0 ;CONSOLE SWITCH SETTINGS
594 030047 000000 000000 PASCNT: 0 ;PROGRAM PASS COUNT
595 030050 000000 000000 RUNFLG: 0 ;PROGRAM RUN FLAG
596 030051 000000 000000 TESTPC: 0 ;SUBTEST PC
597 030052 000000 000000 ERRPC: 0 ;ERROR PC
598 030053 000000 000000 ERRTLS: 0 ;ERROR TOTALS
599 030054 000000 000000 TICKS: 0 ;PROGRAM RUNNING TIME
600 030055 000000 000000 MARGIN: 0 ;KI10 MARGIN WORD VALUE
601 030056 000000 000000 $ONETM: 0 ;SUBROUTINE INITIALIZATION FLAG
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 3
FIXED KSM 28-Mar-78 11:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0051
602 S^;*********************************************************************^
603 ;*SPECIAL PROGRAM DISPATCH ADDRESSES
604 S^;*********************************************************************^
605
606 030057 037 12 0 00 000004 BEGEND: ENDUUO ;END OF PASS
607 030060 254 00 0 00 030010 $BEND1: JRST BEGIN1 ;KEEP RUNNING PROGRAM
608 030061 037 16 0 00 000004 $BEND2: EOPUUO ;END OF PROGRAM - NO RETURN
609 030062 000000 030061 CNTLC: SADR5 ;CONTROL C XFER ADDRESS
610 030063 000000 030000 ALTMGO: SADR6 ;ALTMODE XFER ADDRESS
611 030064 CPOPJ1: ;SKIP RETURN
612 030064 350 00 0 17 000000 UUOSKP: AOS (P) ;SKIP RETURN FROM UUO
613 030065 CPOPJ: ;NON-SKIP REGULAR RETURN
614 030065 263 17 0 00 000000 UUOEXT: RTN ;UUO RETURN
615 030066 255 00 0 00 000000 UUORTN: JFCL ;ADDITIONAL USERS UUO ROUTINE
616 030067 255 00 0 00 000000 $UORTX: JFCL ;ADDITIONAL UUO LINKAGE
617 030070 255 00 0 00 000000 $UUOER: JFCL ;INITED AS (JRST $UOERX)
618 030071 255 00 0 00 000000 $ITRHL: JFCL ;ADDITIONAL INTERRUPT LINKAGE
619 030072 255 00 0 00 000000 $ITRX1: JFCL ; "
620 030073 255 00 0 00 000000 $USRHL: JFCL ; "
621 030074 255 00 0 00 000000 $RSRTX: JFCL ;ADDITIONAL POWER FAIL LINKAGE
622 030075 255 00 0 00 000000 $RSRTY: JFCL ; "
623 030076 255 00 0 00 000000 RESRT1: JFCL ; INITED AS (JRST RESRTX)
624 030077 255 00 0 00 000000 RESRT2: JFCL ; "
625 030100 255 00 0 00 000000 $PARER: JFCL ;ADDITIONAL PARITY ERROR LINKAGE
626 030101 255 00 0 00 000000 ERMORE: JFCL ;ADDITIONAL ERROR HANDLER LINKAGE
627 030102 254 04 0 00 030102 HALT . ;IMPROPER TRANSFER HALT
628
629 030103 000000 000000 $PSHER: 0 ;INITED AS (JRST PSHERR)
630 030104 000000 000000 ITRCH1: 0 ;PC & FLAGS OF CURRENT INTERRUPT
631 030105 000000 000000 0 ;INITED AS (JRST $ITRC1)
632
633 S^;*********************************************************************^
634 ;*PROCESSOR CONTROL STORAGE
635 S^;*********************************************************************^
636
637 030106 000000 000000 $ACC0: 0 ;INTERRUPT SAVED AC0
638 030107 000000 000000 $SVPI: 0 ;INTERRUPT SAVED PI
639 030110 000000 000000 $SVAPR: 0 ;INTERRUPT SAVED APR
640 030111 000000 000000 $SVPAG: 0 ;INTERRUPT SAVED PAG (DATAI)
641 030112 000000 000000 $SPAG1: 0 ;INTERRUPT SAVED PAG (CONI)
642
643 030113 000000 000000 $SVUUO: 0 ;CURRENT USERS UUO
644 030114 000000 000000 $SVUPC: 0 ;PC OF CURRENT USERS UUO
645
646 030115 000000 000000 REPTU: 0 ;REPEAT UUO ITERATIONS
647 030116 000000 000000 SCOPE: 0 ;ERROR HANDLER SCOPE LOOP FLAG
648 030117 000000 000000 %CORFLG:0 ; " CORRECT FLAG
649 030120 000000 000000 %COREC: 0 ; " CORRECT DATA
650 030121 000000 000000 %ACTFL: 0 ; " ACTUAL FLAG
651 030122 000000 000000 %ACTUL: 0 ; " ACTUAL DATA
652 030123 000000 000000 %DISCR: 0 ; " DISCREPENCY DATA
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 4
FIXED KSM 28-Mar-78 11:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0052
653 S^;*********************************************************************^
654 ;*UUO DISPATCH TABLE
655 S^;*********************************************************************^
656 XLIST
657 LIST
658 030124 030070 030070 UUODIS: LUUO1,,$UUOER
659 030125 030070 030070 LUUO3,,LUUO2
660 030126 030070 030070 LUUO5,,LUUO4
661 030127 030070 030070 LUUO7,,LUUO6
662 030130 030070 030070 LUUO11,,LUUO10
663 030131 030070 030070 LUUO13,,LUUO12
664 030132 030070 030070 LUUO15,,LUUO14
665 030133 030070 030070 LUUO17,,LUUO16
666 030134 030070 030070 LUUO21,,LUUO20
667 030135 030070 030070 LUUO23,,LUUO22
668 030136 030070 030070 LUUO25,,LUUO24
669 030137 030070 030070 LUUO27,,LUUO26
670 030140 030070 030070 LUUO31,,LUUO30
671 030141 030070 030070 LUUO33,,LUUO32
672
673 S^;*********************************************************************^
674 ;*MEMORY MANAGMENT STORAGE
675 S^;*********************************************************************^
676
677 030142 000000 000000 DF22F: 0 ;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
678 030143 000000 000000 MAPNEW: 0 ;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
679 030144 000000 000000 MEMTOT: 0 ;TOTAL MEMORY SIZE IN K (1024.)
680 030145 000000 000000 MEMLOW: 0 ;LOWEST USABLE MEMORY
681 030146 MEMSIZ: BLOCK ^D41 ;MEMORY SEGMENT POINTER TABLE
682
683 S^;*********************************************************************^
684 ;*PRINT CONTROL STORAGE
685 S^;*********************************************************************^
686
687 030217 000000 000000 PNTFLG: 0 ;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
688 030220 000000 000000 PNTENB: 0 ;PRINT ENABLE
689 030221 000000 000000 PDISF: 0 ;PRINT DISABLED FLAG
690 030222 000000 000000 PNTINH: 0 ;INHIBIT PRINT INPUT CHECKS
691 030223 000000 000000 PNTSPC: 0 ;PRINT SPACE CONTROL
692 030224 000000 000000 OPTIME: 0 ;TYPE-IN WAIT TIME
693 030225 000000 000000 $TWCNT: 0 ;TIME WAITED
694 030226 000000 000000 $DVOFF: 0 ;LOGICAL DEVICE INITED FLAG
695 030227 000000 000000 TTYFIL: 0 ;TTY EXEC FILLERS FLAG
696 030230 000000 000000 TTYSPD: 0 ;TTY EXEC BAUD RATE
697 030231 000000 000000 $TTCHR: 0 ;ACTUAL TYPED IN CHAR
698 030232 000000 000000 $CHRIN: 0 ;UPPER CASED & PARITY STRIPPED CHAR
699 030233 000000 000000 $TYPNB: 0 ;TYPED IN NUMBER
700 030234 000000 000000 $CRLF: 0 ;FREE CR/LF FLAG
701 030235 000000 000000 $TABF: 0 ;TAB CONVERSION FLAG
702 030236 000000 000000 $FFF: 0 ;FORM FEED CONVERSION FLAG
703 030237 000000 000000 $VTF: 0 ;VERTICAL TAB CONVERSION FLAG
704 030240 000000 000000 USRLFF: 0 ;USER LF FILLERS
705 030241 000000 000000 USRCRF: 0 ;USER CR FILLERS
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 5
FIXED KSM 28-Mar-78 11:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0053
706 S^;*********************************************************************^
707 ;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
708 ;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
709 ;* MOVEI NAME
710 ;* PNTA ;OR PNTAF
711 S^;*********************************************************************^
712
713 030242 CRLF: ASCII/
714 030242 015 012 000 000 000 /
715 030243 CRLF2: ASCII/
716
717 030243 015 012 015 012 000 /
718 030244 054 000 000 000 000 COMMA: ASCII/,/
719 030245 056 000 000 000 000 PERIOD: ASCII/./
720 030246 040 000 000 000 000 SPACE: ASCII/ /
721 030247 011 000 000 000 000 TAB: ASCII/ /
722 030250 MINUS:
723 030250 055 000 000 000 000 HYPEN: ASCII/-/
724 030251 053 000 000 000 000 PLUS: ASCII/+/
725 030252 052 000 000 000 000 AST: ASCII/*/
726 030253 100 000 000 000 000 ATSIN: ASCII/@/
727 030254 050 000 000 000 000 LFP: ASCII/(/
728 030255 051 000 000 000 000 RTP: ASCII/)/
729 030256 007 0000000000 BELL: BYTE (7) 007
730 030257 077 000 000 000 000 QUEST: ASCII/?/
731 030260 057 000 000 000 000 SLASH: ASCII!/!
732 030261 044 000 000 000 000 DOLLAR: ASCII/$/
733 030262 000000 000012 RADIX: ^D10 ;DECIMAL PRINT RADIX
734 030263 000000 000040 RADLSP: 40 ;DECIMAL PRINT LEADING CHAR
735 030264 000000 000012 RADLSC: ^D10 ;DECIMAL PRINT LEADING CHAR COUNT
736
737 S^;*********************************************************************^
738 ;*USER MODE OUTPUT FILE INFORMATION
739 S^;*********************************************************************^
740
741 030265 $OBUF: BLOCK 3 ;LOGICAL FILE OUTPUT BUFFER HEADER
742 030270 60 62 51 56 64 00 $OUTNM: SIXBIT /PRINT/ ;FILE NAME
743 030271 60 56 64 00 00 00 $OUTEX: SIXBIT /PNT/ ;FILE NAME EXTENSION
744 030272 BLOCK 2
745
746 S^;*********************************************************************^
747 ;*DISK UPDATE MODE FILE INFORMATION
748 S^;*********************************************************************^
749
750 030274 $IBUF: BLOCK 3
751 030277 60 62 51 56 64 00 $INNM: SIXBIT /PRINT/
752 030300 60 56 64 00 00 00 $INEXT: SIXBIT /PNT/
753 030301 BLOCK 2
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 6
FIXED KSM 28-Mar-78 11:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0054
754 S^;*********************************************************************^
755 ;*PUSHDOWN LIST CONTROL INFORMATION
756 S^;*********************************************************************^
757
758 030303 777577 030303 PLIST: PLIST-PLISTE,,PLIST
759 030304 PLISTS: BLOCK 200
760 030504 000000 000000 PLISTE: 0 ;END OF PUSHDOWN LIST
761
762 S^;*********************************************************************^
763 ;*POWER LINE CLOCK FREQUENCY FLAG
764 S^;*********************************************************************^
765
766 030505 000000 000000 CYCL60: 0 ;0 = 60, -1 = 50 CYCLE
767
768 S^;*********************************************************************^
769 ;*KL10 CACHE CONTROL FLAGS
770 S^;*********************************************************************^
771
772 030506 000000 000000 CSHFLG: 0 ;ALLOW CACHE IF 0
773 030507 000000 000000 CSHMEM: 0 ;CACHE MEMORY SEGMENTS IF 0
774
775 S^;*********************************************************************^
776 ;*NUMBER INPUT DIGIT FLAG
777 S^;*********************************************************************^
778
779 030510 000000 000000 TTNBRF: 0 ;-1 IF ANY DIGIT TYPED
780
781 S^;*********************************************************************^
782 ;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
783 S^;*********************************************************************^
784
785 030511 000000 000000 PVPAGI: 0 ;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
786
787 S^;*********************************************************************^
788 ;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
789 S^;*********************************************************************^
790
791 030512 000000 000000 %ERHI1: 0 ;IF NON-ZERO, XCT'D AT START OF %ERUUO
792 030513 000000 000000 %ERHI2: 0 ;IF NON-ZERO, XCT'D AT END OF %ERUUO
793 030514 000000 000000 %ERHI3: 0 ;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
794
795 S^;*********************************************************************^
796 ;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
797 S^;*********************************************************************^
798
799 030515 000000 000000 $$UUO: 0 ;IF NON-ZERO, XCT'D AT START OF $UORTN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 7
FIXED KSM 28-Mar-78 11:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0055
800 S^;*********************************************************************^
801 ;*USER MODE MONITOR TYPE FLAG
802 S^;*********************************************************************^
803
804 030516 000000 000000 MONTYP: 0 ;0 = TOPS10, -1 = TOPS20
805
806 S^;*********************************************************************^
807 ;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
808 S^;*********************************************************************^
809
810 030517 000000 000000 $$MUUO: 0 ;IF NON-ZERO, XCT'D AT START OF MUUOER
811
812 S^;*********************************************************************^
813 ;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
814 S^;*********************************************************************^
815
816 030520 000000 000000 $$OUTER:0 ;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
817
818 S^;*********************************************************************^
819 ;*"SWITCH" CALL USAGE CONTROL
820 S^;*********************************************************************^
821
822 030521 000000 000000 $$TOGGLE:0 ;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
823
824 S^;*********************************************************************^
825 ;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
826 S^;*********************************************************************^
827
828 030522 000000 000000 $$TAX1: 0 ;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
829 030523 000000 000000 $$TAX2: 0 ;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
830
831 S^;*********************************************************************^
832 ;*SM10 (KS-10) PROCESSOR TYPE FLAG
833 S^;*********************************************************************^
834
835 030524 000000 000000 SM10: 0 ;IF -1 THIS IS AN KS-10
836
837 S^;*********************************************************************^
838 ;*RIGHT HALF SWITCHES PROMPT TABLE ADDRESS
839 S^;*********************************************************************^
840
841 030525 000000 000000 SWPTAB: 0 ;0 = NO PROMPT, ADR = ADR OF SIXBIT PROMPT TABLE
842
843 S^;*********************************************************************^
844 ;*SPECIAL FUTURE EXPANSION ROOM
845 S^;*********************************************************************^
846
847 S^;*********************************************************************^
848 ;*END OF FIXED STORAGE
849 S^;*********************************************************************^
850
851 030577 LOC 30577
852 030577 000000 000000 ENDFIX: 0 ;END OF FIXED STORAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1
DSKEAM MAC 29-Mar-78 14:55 PROGRAM INITIALIZATION SEQ 0056
853 SUBTTL PROGRAM INITIALIZATION
854
855 030600 PGMNAM: ASCIZ/
856 030600 015 012 104 105 103 DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC (DSKEA)
857 030601 123 131 123 124 105
858 030602 115 040 062 060 062
859 030603 060 040 120 101 107
860 030604 111 116 107 040 110
861 030605 101 122 104 127 101
862 030606 122 105 040 104 111
863 030607 101 107 116 117 123
864 030610 124 111 103 040 050
865 030611 104 123 113 105 101
866 030612 051 015 012 000 000 /
867 030613 201 00 0 00 030613 START: MOVEI .
868 030614 202 00 0 00 030051 MOVEM TESTPC
869 030615 476 00 0 00 030506 SETOM CSHFLG ;DON'T USE CACHE
870 030616 476 00 0 00 030511 SETOM PVPAGI ;MUST BE PAGED
871 030617 265 00 0 00 030011 PGMINT ;INIT SUBROUTINES
872 030620 201 00 0 00 500000 MOVEI 500000
873 030621 202 00 0 00 043727 MOVEM KLUBRX#
874 030622 200 00 0 00 000041 MOVE LUUOI
875 030623 202 00 0 00 043733 MOVEM LUUOISV#
876 030624 200 00 0 00 000502 MOVE LPGFTR
877 030625 202 00 0 00 043736 MOVEM PGFAIL#
878 030626 200 00 0 00 000430 MOVE LKNTRP
879 030627 202 00 0 00 043734 MOVEM MUUOER
880 030630 200 00 0 00 000423 MOVE LTRP3T
881 030631 202 00 0 00 043732 MOVEM LTRP3SV#
882 030632 200 00 0 00 000422 MOVE LPDOVT
883 030633 202 00 0 00 043731 MOVEM LPDOVSV#
884 030634 200 00 0 00 000421 MOVE LAROVT
885 030635 202 00 0 00 043730 MOVEM LAROVSV#
886 030636 402 00 0 00 043735 SETZM MXFLG# ;CLEAR TEST MAX FLAG
887 030637 402 00 0 00 030116 STARTA: SETZM SCOPE ;PRESET ERROR REPEAT SWITCH
888 030640 402 00 0 00 030052 SETZM ERRPC ;PRESET ERROR PC STORAGE
889 030641 037 10 0 00 000002 SWITCH
890 030642 201 07 0 00 000012 MOVEI AC,^D10 ;SETUP REPEAT FOR 10 SUBLOOPS
891 030643 607 00 0 00 000400 TLNN RELIAB ;FAST CYCLE MODE ?
892 030644 201 07 0 00 000001 MOVEI AC,1 ;YES, SUBLOOP JUST ONCE
893 030645 202 07 0 00 043737 MOVEM AC,RPEAT#
894 030646 254 00 0 00 030652 JRST EBRCK0-2
895
896 030647 402 00 0 00 030047 SFSRT1: SETZM PASCNT ;SPECIAL FEATURE START
897 030650 402 00 0 00 030053 SETZM ERRTLS
898 030651 254 00 0 00 030010 JRST BEGIN1 ;CLEAR PASCNT FOR MAX ADR ?
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 2
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0057
899 SUBTTL TEST EXEC BASE REGISTER
900
901 SALL
902 037042 T= SIXBTZ BASE REGISTER TEST
903 LALL
904
905 ;*LOAD EXEC BASE REGISTER WITH ALL ZERO'S WITH CONO
906 ;*EXEC BASE REGISTER SHOULD THEN BE CLEAR.
907
908 SUBTST^
909 030652 201 00 0 00 030652 MOVEI .
910 030653 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
911 030654 200 15 0 00 043737 EBRCK0: MOVE REPT,RPEAT ;SETUP REPEAT COUNT
912 030655 201 14 0 00 000000 MOVEI COR,0
913 030656 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH 0'S
914 030657 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
915 030660 312 14 0 00 000013 CAME COR,ACT ;COMPARE RESULTS
916 ERROR EBRCK0+1,13,COR,ACT,EBR,ALL 0'S^
917 SALL
918 030661 036 13 0 00 037051
919 030662 035 00 0 00 030655 ERLOOP EBRCK0+1 ;IF ERROR, LOOP TO EBRCK0+1
920
921 ;*LOAD EXEC BASE REGISTER WITH ALL ONE'S
922 ;*IF ANY BIT IS READ BACK THEN LOAD EBR SHOULD WORK.
923
924 SUBTST^
925 030663 201 00 0 00 030663 MOVEI .
926 030664 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
927 030665 201 14 0 00 003777 EBRCK1: MOVEI COR,3777
928 030666 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH ALL 1'S
929 030667 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
930 030670 7 010 20 0 00 000000 CONO PAG,0
931 030671 336 00 0 00 000013 SKIPN ACT ;CHECK FOR ANY BIT SET
932 ERROR EBRCK1,13,COR,ACT,EBR,NO BITS SET^
933 030672 036 13 0 00 037056
934 030673 035 00 0 00 030665 ERLOOP EBRCK1 ;IF ERROR, LOOP TO EBRCK1
935
936 ;*LOAD EXEC BASE REGISTER WITH TRAP ENABLE BIT
937
938 SUBTST^
939 030674 201 00 0 00 030674 MOVEI .
940 030675 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
941 030676 201 14 0 00 020000 EBRC1A: MOVEI COR,LTRPEN
942 030677 7 010 20 0 14 000000 CONO PAG,(COR) ;SET TRAP ENABLE
943 030700 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
944 030701 7 010 20 0 00 020000 CONO PAG,LTRPEN
945 030702 312 14 0 00 000013 CAME COR,ACT
946 ERROR EBRC1A,13,COR,ACT,EBR,TRAP ENABLE BIT^
947 030703 036 13 0 00 037064
948 030704 035 00 0 00 030676 ERLOOP EBRC1A ;IF ERROR, LOOP TO EBRC1A
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 3
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0058
949 000000 XX=0
950
951 SUBTST^
952 030705 201 00 0 00 030705 MOVEI .
953 030706 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
954 EBRCK2: REPEAT ^D11,<
955 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
956 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
957 XX=XX+XX
958 IFE XX,<XX=1>
959 MOVEI COR,XX
960 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
961 CONI PAG,ACT ;READ BACK
962 CONO PAG,LTRPEN
963 CAME COR,ACT
964 ERROR .-6,13,COR,ACT,EBR,FLOATING 1>
965
966 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
967 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
968 000000 XX=XX+XX
969 000001 IFE XX,<XX=1>
970 030707 201 14 0 00 000001 MOVEI COR,XX
971 030710 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
972 030711 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
973 030712 7 010 20 0 00 020000 CONO PAG,LTRPEN
974 030713 312 14 0 00 000013 CAME COR,ACT
975 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
976
977 030714 036 13 0 00 037071
978 030715 035 00 0 00 030707 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
979
980 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
981 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
982 000002 XX=XX+XX
983 IFE XX,<XX=1>
984 030716 201 14 0 00 000002 MOVEI COR,XX
985 030717 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
986 030720 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
987 030721 7 010 20 0 00 020000 CONO PAG,LTRPEN
988 030722 312 14 0 00 000013 CAME COR,ACT
989 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
990
991 030723 036 13 0 00 037071
992 030724 035 00 0 00 030716 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
993
994 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
995 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
996 000004 XX=XX+XX
997 IFE XX,<XX=1>
998 030725 201 14 0 00 000004 MOVEI COR,XX
999 030726 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1000 030727 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1001 030730 7 010 20 0 00 020000 CONO PAG,LTRPEN
1002 030731 312 14 0 00 000013 CAME COR,ACT
1003 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 3-1
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0059
1004
1005 030732 036 13 0 00 037071
1006 030733 035 00 0 00 030725 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1007
1008 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1009 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1010 000010 XX=XX+XX
1011 IFE XX,<XX=1>
1012 030734 201 14 0 00 000010 MOVEI COR,XX
1013 030735 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1014 030736 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1015 030737 7 010 20 0 00 020000 CONO PAG,LTRPEN
1016 030740 312 14 0 00 000013 CAME COR,ACT
1017 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1018
1019 030741 036 13 0 00 037071
1020 030742 035 00 0 00 030734 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1021
1022 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1023 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1024 000020 XX=XX+XX
1025 IFE XX,<XX=1>
1026 030743 201 14 0 00 000020 MOVEI COR,XX
1027 030744 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1028 030745 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1029 030746 7 010 20 0 00 020000 CONO PAG,LTRPEN
1030 030747 312 14 0 00 000013 CAME COR,ACT
1031 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1032
1033 030750 036 13 0 00 037071
1034 030751 035 00 0 00 030743 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1035
1036 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1037 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1038 000040 XX=XX+XX
1039 IFE XX,<XX=1>
1040 030752 201 14 0 00 000040 MOVEI COR,XX
1041 030753 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1042 030754 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1043 030755 7 010 20 0 00 020000 CONO PAG,LTRPEN
1044 030756 312 14 0 00 000013 CAME COR,ACT
1045 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1046
1047 030757 036 13 0 00 037071
1048 030760 035 00 0 00 030752 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1049
1050 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1051 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1052 000100 XX=XX+XX
1053 IFE XX,<XX=1>
1054 030761 201 14 0 00 000100 MOVEI COR,XX
1055 030762 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1056 030763 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1057 030764 7 010 20 0 00 020000 CONO PAG,LTRPEN
1058 030765 312 14 0 00 000013 CAME COR,ACT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 3-2
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0060
1059 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1060
1061 030766 036 13 0 00 037071
1062 030767 035 00 0 00 030761 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1063
1064 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1065 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1066 000200 XX=XX+XX
1067 IFE XX,<XX=1>
1068 030770 201 14 0 00 000200 MOVEI COR,XX
1069 030771 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1070 030772 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1071 030773 7 010 20 0 00 020000 CONO PAG,LTRPEN
1072 030774 312 14 0 00 000013 CAME COR,ACT
1073 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1074
1075 030775 036 13 0 00 037071
1076 030776 035 00 0 00 030770 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1077
1078 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1079 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1080 000400 XX=XX+XX
1081 IFE XX,<XX=1>
1082 030777 201 14 0 00 000400 MOVEI COR,XX
1083 031000 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1084 031001 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1085 031002 7 010 20 0 00 020000 CONO PAG,LTRPEN
1086 031003 312 14 0 00 000013 CAME COR,ACT
1087 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1088
1089 031004 036 13 0 00 037071
1090 031005 035 00 0 00 030777 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1091
1092 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1093 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1094 001000 XX=XX+XX
1095 IFE XX,<XX=1>
1096 031006 201 14 0 00 001000 MOVEI COR,XX
1097 031007 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1098 031010 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1099 031011 7 010 20 0 00 020000 CONO PAG,LTRPEN
1100 031012 312 14 0 00 000013 CAME COR,ACT
1101 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1102
1103 031013 036 13 0 00 037071
1104 031014 035 00 0 00 031006 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1105
1106 ;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
1107 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
1108 002000 XX=XX+XX
1109 IFE XX,<XX=1>
1110 031015 201 14 0 00 002000 MOVEI COR,XX
1111 031016 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING ONE
1112 031017 7 010 24 0 00 000013 CONI PAG,ACT ;READ BACK
1113 031020 7 010 20 0 00 020000 CONO PAG,LTRPEN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 3-3
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0061
1114 031021 312 14 0 00 000013 CAME COR,ACT
1115 ERROR .-6,13,COR,ACT,EBR,FLOATING 1
1116
1117 031022 036 13 0 00 037071
1118 031023 035 00 0 00 031015 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1119
1120 ;*LOAD EXEC BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK
1121
1122 031024 201 14 0 00 003777 EBRCK3: MOVEI COR,3777
1123 031025 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH ALL 1'S
1124 031026 7 010 24 0 00 000013 CONI PAG,ACT
1125 031027 7 010 20 0 00 020000 CONO PAG,LTRPEN
1126 031030 312 14 0 00 000013 CAME COR,ACT
1127 ERROR EBRCK3,13,COR,ACT,EBR,ALL 1'S^
1128 031031 036 13 0 00 037076
1129 031032 035 00 0 00 031024 ERLOOP EBRCK3 ;IF ERROR, LOOP TO EBRCK3
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 4
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0062
1130 000000 XX=0
1131
1132 SUBTST^
1133 031033 201 00 0 00 031033 MOVEI .
1134 031034 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
1135 EBRCK4: REPEAT ^D11,<
1136 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1137 ;*TO CHECK BIT INTERACTION.
1138 XX=XX+XX
1139 IFE XX,<XX=1>
1140 MOVEI COR,3777-XX
1141 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1142 CONI PAG,ACT
1143 CONO PAG,LTRPEN
1144 CAME COR,ACT
1145 ERROR .-6,13,COR,ACT,EBR,FLOATING 0>
1146
1147 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1148 ;*TO CHECK BIT INTERACTION.
1149 000000 XX=XX+XX
1150 000001 IFE XX,<XX=1>
1151 031035 201 14 0 00 003776 MOVEI COR,3777-XX
1152 031036 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1153 031037 7 010 24 0 00 000013 CONI PAG,ACT
1154 031040 7 010 20 0 00 020000 CONO PAG,LTRPEN
1155 031041 312 14 0 00 000013 CAME COR,ACT
1156 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1157
1158 031042 036 13 0 00 037103
1159 031043 035 00 0 00 031035 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1160
1161 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1162 ;*TO CHECK BIT INTERACTION.
1163 000002 XX=XX+XX
1164 IFE XX,<XX=1>
1165 031044 201 14 0 00 003775 MOVEI COR,3777-XX
1166 031045 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1167 031046 7 010 24 0 00 000013 CONI PAG,ACT
1168 031047 7 010 20 0 00 020000 CONO PAG,LTRPEN
1169 031050 312 14 0 00 000013 CAME COR,ACT
1170 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1171
1172 031051 036 13 0 00 037103
1173 031052 035 00 0 00 031044 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1174
1175 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1176 ;*TO CHECK BIT INTERACTION.
1177 000004 XX=XX+XX
1178 IFE XX,<XX=1>
1179 031053 201 14 0 00 003773 MOVEI COR,3777-XX
1180 031054 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1181 031055 7 010 24 0 00 000013 CONI PAG,ACT
1182 031056 7 010 20 0 00 020000 CONO PAG,LTRPEN
1183 031057 312 14 0 00 000013 CAME COR,ACT
1184 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 4-1
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0063
1185
1186 031060 036 13 0 00 037103
1187 031061 035 00 0 00 031053 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1188
1189 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1190 ;*TO CHECK BIT INTERACTION.
1191 000010 XX=XX+XX
1192 IFE XX,<XX=1>
1193 031062 201 14 0 00 003767 MOVEI COR,3777-XX
1194 031063 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1195 031064 7 010 24 0 00 000013 CONI PAG,ACT
1196 031065 7 010 20 0 00 020000 CONO PAG,LTRPEN
1197 031066 312 14 0 00 000013 CAME COR,ACT
1198 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1199
1200 031067 036 13 0 00 037103
1201 031070 035 00 0 00 031062 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1202
1203 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1204 ;*TO CHECK BIT INTERACTION.
1205 000020 XX=XX+XX
1206 IFE XX,<XX=1>
1207 031071 201 14 0 00 003757 MOVEI COR,3777-XX
1208 031072 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1209 031073 7 010 24 0 00 000013 CONI PAG,ACT
1210 031074 7 010 20 0 00 020000 CONO PAG,LTRPEN
1211 031075 312 14 0 00 000013 CAME COR,ACT
1212 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1213
1214 031076 036 13 0 00 037103
1215 031077 035 00 0 00 031071 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1216
1217 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1218 ;*TO CHECK BIT INTERACTION.
1219 000040 XX=XX+XX
1220 IFE XX,<XX=1>
1221 031100 201 14 0 00 003737 MOVEI COR,3777-XX
1222 031101 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1223 031102 7 010 24 0 00 000013 CONI PAG,ACT
1224 031103 7 010 20 0 00 020000 CONO PAG,LTRPEN
1225 031104 312 14 0 00 000013 CAME COR,ACT
1226 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1227
1228 031105 036 13 0 00 037103
1229 031106 035 00 0 00 031100 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1230
1231 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1232 ;*TO CHECK BIT INTERACTION.
1233 000100 XX=XX+XX
1234 IFE XX,<XX=1>
1235 031107 201 14 0 00 003677 MOVEI COR,3777-XX
1236 031110 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1237 031111 7 010 24 0 00 000013 CONI PAG,ACT
1238 031112 7 010 20 0 00 020000 CONO PAG,LTRPEN
1239 031113 312 14 0 00 000013 CAME COR,ACT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 4-2
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0064
1240 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1241
1242 031114 036 13 0 00 037103
1243 031115 035 00 0 00 031107 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1244
1245 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1246 ;*TO CHECK BIT INTERACTION.
1247 000200 XX=XX+XX
1248 IFE XX,<XX=1>
1249 031116 201 14 0 00 003577 MOVEI COR,3777-XX
1250 031117 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1251 031120 7 010 24 0 00 000013 CONI PAG,ACT
1252 031121 7 010 20 0 00 020000 CONO PAG,LTRPEN
1253 031122 312 14 0 00 000013 CAME COR,ACT
1254 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1255
1256 031123 036 13 0 00 037103
1257 031124 035 00 0 00 031116 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1258
1259 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1260 ;*TO CHECK BIT INTERACTION.
1261 000400 XX=XX+XX
1262 IFE XX,<XX=1>
1263 031125 201 14 0 00 003377 MOVEI COR,3777-XX
1264 031126 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1265 031127 7 010 24 0 00 000013 CONI PAG,ACT
1266 031130 7 010 20 0 00 020000 CONO PAG,LTRPEN
1267 031131 312 14 0 00 000013 CAME COR,ACT
1268 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1269
1270 031132 036 13 0 00 037103
1271 031133 035 00 0 00 031125 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1272
1273 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1274 ;*TO CHECK BIT INTERACTION.
1275 001000 XX=XX+XX
1276 IFE XX,<XX=1>
1277 031134 201 14 0 00 002777 MOVEI COR,3777-XX
1278 031135 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1279 031136 7 010 24 0 00 000013 CONI PAG,ACT
1280 031137 7 010 20 0 00 020000 CONO PAG,LTRPEN
1281 031140 312 14 0 00 000013 CAME COR,ACT
1282 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1283
1284 031141 036 13 0 00 037103
1285 031142 035 00 0 00 031134 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1286
1287 ;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
1288 ;*TO CHECK BIT INTERACTION.
1289 002000 XX=XX+XX
1290 IFE XX,<XX=1>
1291 031143 201 14 0 00 001777 MOVEI COR,3777-XX
1292 031144 7 010 20 0 14 000000 CONO PAG,(COR) ;LOAD EBR WITH A FLOATING 0
1293 031145 7 010 24 0 00 000013 CONI PAG,ACT
1294 031146 7 010 20 0 00 020000 CONO PAG,LTRPEN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 4-3
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC BASE REGISTER SEQ 0065
1295 031147 312 14 0 00 000013 CAME COR,ACT
1296 ERROR .-6,13,COR,ACT,EBR,FLOATING 0
1297
1298 031150 036 13 0 00 037103
1299 031151 035 00 0 00 031143 ERLOOP .-6 ;IF ERROR, LOOP TO .-6
1300 031152 367 15 0 00 030655 REPTLP EBRCK0+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 5
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0066
1301 SUBTTL TEST USER BASE REGISTER
1302
1303 ;*LOAD USER BASE REGISTER WITH ALL ZERO'S.
1304 ;*USER BASE REGISTER SHOULD THEN BE CLEAR.
1305
1306 SUBTST^
1307 031153 201 00 0 00 031153 MOVEI .
1308 031154 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
1309 031155 200 15 0 00 043737 UBRCK0: MOVE REPT,RPEAT
1310 031156 200 14 0 00 037106 MOVE COR,[LLACBL!LLDUSB,,400000]
1311 031157 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH 0'S
1312 031160 7 010 04 0 00 000013 DATAI PAG,ACT
1313 031161 620 14 0 00 400000 TRZ COR,400000
1314 031162 205 14 1 00 043727 MOVSI COR,@KLUBRX
1315 031163 312 14 0 00 000013 CAME COR,ACT
1316 ERROR UBRCK0+1,13,COR,ACT,UBR,ALL 0'S^
1317 031164 036 13 0 00 037112
1318 031165 035 00 0 00 031156 ERLOOP UBRCK0+1 ;IF ERROR, LOOP TO UBRCK0+1
1319
1320 ;*LOAD USER BASE REGISTER WITH ALL ONE'S.
1321 ;*IF ANY BIT IS READ BACK THEN LOAD UBR SHOULD WORK.
1322
1323 031166 200 14 0 00 037115 UBRCK1: MOVE COR,[LLDUSB,,403777]
1324 031167 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH ALL ONES
1325 031170 7 010 04 0 00 000013 DATAI PAG,ACT
1326 031171 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1327 031172 620 14 0 00 400000 TRZ COR,400000
1328 031173 505 14 1 00 043727 HRLI COR,@KLUBRX
1329 031174 336 00 0 00 000013 SKIPN ACT ;CHECK FOR ANY BIT SET
1330 ERROR UBRCK1,13,COR,ACT,UBR,NO BITS SET^
1331 031175 036 13 0 00 037117
1332 031176 035 00 0 00 031166 ERLOOP UBRCK1 ;IF ERROR, LOOP TO UBRCK1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 6
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0067
1333 000000 XX=0
1334
1335 SUBTST^
1336 031177 201 00 0 00 031177 MOVEI .
1337 031200 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
1338 UBRCK2: REPEAT ^D11,<
1339 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1340 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1341 XX=XX+XX
1342 IFE XX,<XX=1>
1343 MOVE COR,[LLDUSB,,400000!XX]
1344 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1345 DATAI PAG,ACT
1346 DATAO PAG,[LLDUSB,,400000]
1347 TRZ COR,400000
1348 HRLI COR,@KLUBRX
1349 CAME COR,ACT
1350 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1>
1351
1352 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1353 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1354 000000 XX=XX+XX
1355 000001 IFE XX,<XX=1>
1356 031201 200 14 0 00 037122 MOVE COR,[LLDUSB,,400000!XX]
1357 031202 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1358 031203 7 010 04 0 00 000013 DATAI PAG,ACT
1359 031204 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1360 031205 620 14 0 00 400000 TRZ COR,400000
1361 031206 505 14 1 00 043727 HRLI COR,@KLUBRX
1362 031207 312 14 0 00 000013 CAME COR,ACT
1363 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1364
1365 031210 036 13 0 00 037123
1366 031211 035 00 0 00 031201 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1367
1368 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1369 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1370 000002 XX=XX+XX
1371 IFE XX,<XX=1>
1372 031212 200 14 0 00 037126 MOVE COR,[LLDUSB,,400000!XX]
1373 031213 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1374 031214 7 010 04 0 00 000013 DATAI PAG,ACT
1375 031215 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1376 031216 620 14 0 00 400000 TRZ COR,400000
1377 031217 505 14 1 00 043727 HRLI COR,@KLUBRX
1378 031220 312 14 0 00 000013 CAME COR,ACT
1379 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1380
1381 031221 036 13 0 00 037123
1382 031222 035 00 0 00 031212 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1383
1384 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1385 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1386 000004 XX=XX+XX
1387 IFE XX,<XX=1>
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 6-1
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0068
1388 031223 200 14 0 00 037127 MOVE COR,[LLDUSB,,400000!XX]
1389 031224 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1390 031225 7 010 04 0 00 000013 DATAI PAG,ACT
1391 031226 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1392 031227 620 14 0 00 400000 TRZ COR,400000
1393 031230 505 14 1 00 043727 HRLI COR,@KLUBRX
1394 031231 312 14 0 00 000013 CAME COR,ACT
1395 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1396
1397 031232 036 13 0 00 037123
1398 031233 035 00 0 00 031223 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1399
1400 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1401 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1402 000010 XX=XX+XX
1403 IFE XX,<XX=1>
1404 031234 200 14 0 00 037130 MOVE COR,[LLDUSB,,400000!XX]
1405 031235 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1406 031236 7 010 04 0 00 000013 DATAI PAG,ACT
1407 031237 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1408 031240 620 14 0 00 400000 TRZ COR,400000
1409 031241 505 14 1 00 043727 HRLI COR,@KLUBRX
1410 031242 312 14 0 00 000013 CAME COR,ACT
1411 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1412
1413 031243 036 13 0 00 037123
1414 031244 035 00 0 00 031234 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1415
1416 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1417 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1418 000020 XX=XX+XX
1419 IFE XX,<XX=1>
1420 031245 200 14 0 00 037131 MOVE COR,[LLDUSB,,400000!XX]
1421 031246 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1422 031247 7 010 04 0 00 000013 DATAI PAG,ACT
1423 031250 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1424 031251 620 14 0 00 400000 TRZ COR,400000
1425 031252 505 14 1 00 043727 HRLI COR,@KLUBRX
1426 031253 312 14 0 00 000013 CAME COR,ACT
1427 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1428
1429 031254 036 13 0 00 037123
1430 031255 035 00 0 00 031245 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1431
1432 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1433 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1434 000040 XX=XX+XX
1435 IFE XX,<XX=1>
1436 031256 200 14 0 00 037132 MOVE COR,[LLDUSB,,400000!XX]
1437 031257 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1438 031260 7 010 04 0 00 000013 DATAI PAG,ACT
1439 031261 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1440 031262 620 14 0 00 400000 TRZ COR,400000
1441 031263 505 14 1 00 043727 HRLI COR,@KLUBRX
1442 031264 312 14 0 00 000013 CAME COR,ACT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 6-2
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0069
1443 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1444
1445 031265 036 13 0 00 037123
1446 031266 035 00 0 00 031256 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1447
1448 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1449 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1450 000100 XX=XX+XX
1451 IFE XX,<XX=1>
1452 031267 200 14 0 00 037133 MOVE COR,[LLDUSB,,400000!XX]
1453 031270 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1454 031271 7 010 04 0 00 000013 DATAI PAG,ACT
1455 031272 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1456 031273 620 14 0 00 400000 TRZ COR,400000
1457 031274 505 14 1 00 043727 HRLI COR,@KLUBRX
1458 031275 312 14 0 00 000013 CAME COR,ACT
1459 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1460
1461 031276 036 13 0 00 037123
1462 031277 035 00 0 00 031267 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1463
1464 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1465 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1466 000200 XX=XX+XX
1467 IFE XX,<XX=1>
1468 031300 200 14 0 00 037134 MOVE COR,[LLDUSB,,400000!XX]
1469 031301 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1470 031302 7 010 04 0 00 000013 DATAI PAG,ACT
1471 031303 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1472 031304 620 14 0 00 400000 TRZ COR,400000
1473 031305 505 14 1 00 043727 HRLI COR,@KLUBRX
1474 031306 312 14 0 00 000013 CAME COR,ACT
1475 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1476
1477 031307 036 13 0 00 037123
1478 031310 035 00 0 00 031300 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1479
1480 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1481 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1482 000400 XX=XX+XX
1483 IFE XX,<XX=1>
1484 031311 200 14 0 00 037135 MOVE COR,[LLDUSB,,400000!XX]
1485 031312 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1486 031313 7 010 04 0 00 000013 DATAI PAG,ACT
1487 031314 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1488 031315 620 14 0 00 400000 TRZ COR,400000
1489 031316 505 14 1 00 043727 HRLI COR,@KLUBRX
1490 031317 312 14 0 00 000013 CAME COR,ACT
1491 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1492
1493 031320 036 13 0 00 037123
1494 031321 035 00 0 00 031311 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1495
1496 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1497 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 6-3
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0070
1498 001000 XX=XX+XX
1499 IFE XX,<XX=1>
1500 031322 200 14 0 00 037136 MOVE COR,[LLDUSB,,400000!XX]
1501 031323 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1502 031324 7 010 04 0 00 000013 DATAI PAG,ACT
1503 031325 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1504 031326 620 14 0 00 400000 TRZ COR,400000
1505 031327 505 14 1 00 043727 HRLI COR,@KLUBRX
1506 031330 312 14 0 00 000013 CAME COR,ACT
1507 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1508
1509 031331 036 13 0 00 037123
1510 031332 035 00 0 00 031322 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1511
1512 ;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
1513 ;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
1514 002000 XX=XX+XX
1515 IFE XX,<XX=1>
1516 031333 200 14 0 00 037137 MOVE COR,[LLDUSB,,400000!XX]
1517 031334 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 1
1518 031335 7 010 04 0 00 000013 DATAI PAG,ACT
1519 031336 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1520 031337 620 14 0 00 400000 TRZ COR,400000
1521 031340 505 14 1 00 043727 HRLI COR,@KLUBRX
1522 031341 312 14 0 00 000013 CAME COR,ACT
1523 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 1
1524
1525 031342 036 13 0 00 037123
1526 031343 035 00 0 00 031333 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 7
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0071
1527 ;*LOAD USER BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK.
1528
1529 031344 200 14 0 00 037115 UBRCK3: MOVE COR,[LLDUSB,,403777]
1530 031345 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH ALL ONES
1531 031346 7 010 04 0 00 000013 DATAI PAG,ACT
1532 031347 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1533 031350 620 14 0 00 400000 TRZ COR,400000
1534 031351 505 14 1 00 043727 HRLI COR,@KLUBRX
1535 031352 312 14 0 00 000013 CAME COR,ACT
1536 ERROR UBRCK3,13,COR,ACT,UBR,ALL 1'S^
1537 031353 036 13 0 00 037140
1538 031354 035 00 0 00 031344 ERLOOP UBRCK3 ;IF ERROR, LOOP TO UBRCK3
1539
1540 000000 XX=0
1541
1542 UBRCK4: REPEAT ^D11,<
1543 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1544 ;*CHECK BIT INTERACTION.
1545 XX=XX+XX
1546 IFE XX,<XX=1>
1547 MOVE COR,[LLDUSB,,403777-XX]
1548 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1549 DATAI PAG,ACT
1550 DATAO PAG,[LLDUSB,,400000]
1551 TRZ COR,400000
1552 HRLI COR,@KLUBRX
1553 CAME COR,ACT
1554 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0>
1555
1556 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1557 ;*CHECK BIT INTERACTION.
1558 000000 XX=XX+XX
1559 000001 IFE XX,<XX=1>
1560 031355 200 14 0 00 037143 MOVE COR,[LLDUSB,,403777-XX]
1561 031356 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1562 031357 7 010 04 0 00 000013 DATAI PAG,ACT
1563 031360 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1564 031361 620 14 0 00 400000 TRZ COR,400000
1565 031362 505 14 1 00 043727 HRLI COR,@KLUBRX
1566 031363 312 14 0 00 000013 CAME COR,ACT
1567 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1568
1569 031364 036 13 0 00 037144
1570 031365 035 00 0 00 031355 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1571
1572 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1573 ;*CHECK BIT INTERACTION.
1574 000002 XX=XX+XX
1575 IFE XX,<XX=1>
1576 031366 200 14 0 00 037147 MOVE COR,[LLDUSB,,403777-XX]
1577 031367 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1578 031370 7 010 04 0 00 000013 DATAI PAG,ACT
1579 031371 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1580 031372 620 14 0 00 400000 TRZ COR,400000
1581 031373 505 14 1 00 043727 HRLI COR,@KLUBRX
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 7-1
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0072
1582 031374 312 14 0 00 000013 CAME COR,ACT
1583 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1584
1585 031375 036 13 0 00 037144
1586 031376 035 00 0 00 031366 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1587
1588 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1589 ;*CHECK BIT INTERACTION.
1590 000004 XX=XX+XX
1591 IFE XX,<XX=1>
1592 031377 200 14 0 00 037150 MOVE COR,[LLDUSB,,403777-XX]
1593 031400 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1594 031401 7 010 04 0 00 000013 DATAI PAG,ACT
1595 031402 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1596 031403 620 14 0 00 400000 TRZ COR,400000
1597 031404 505 14 1 00 043727 HRLI COR,@KLUBRX
1598 031405 312 14 0 00 000013 CAME COR,ACT
1599 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1600
1601 031406 036 13 0 00 037144
1602 031407 035 00 0 00 031377 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1603
1604 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1605 ;*CHECK BIT INTERACTION.
1606 000010 XX=XX+XX
1607 IFE XX,<XX=1>
1608 031410 200 14 0 00 037151 MOVE COR,[LLDUSB,,403777-XX]
1609 031411 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1610 031412 7 010 04 0 00 000013 DATAI PAG,ACT
1611 031413 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1612 031414 620 14 0 00 400000 TRZ COR,400000
1613 031415 505 14 1 00 043727 HRLI COR,@KLUBRX
1614 031416 312 14 0 00 000013 CAME COR,ACT
1615 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1616
1617 031417 036 13 0 00 037144
1618 031420 035 00 0 00 031410 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1619
1620 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1621 ;*CHECK BIT INTERACTION.
1622 000020 XX=XX+XX
1623 IFE XX,<XX=1>
1624 031421 200 14 0 00 037152 MOVE COR,[LLDUSB,,403777-XX]
1625 031422 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1626 031423 7 010 04 0 00 000013 DATAI PAG,ACT
1627 031424 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1628 031425 620 14 0 00 400000 TRZ COR,400000
1629 031426 505 14 1 00 043727 HRLI COR,@KLUBRX
1630 031427 312 14 0 00 000013 CAME COR,ACT
1631 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1632
1633 031430 036 13 0 00 037144
1634 031431 035 00 0 00 031421 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1635
1636 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 7-2
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0073
1637 ;*CHECK BIT INTERACTION.
1638 000040 XX=XX+XX
1639 IFE XX,<XX=1>
1640 031432 200 14 0 00 037153 MOVE COR,[LLDUSB,,403777-XX]
1641 031433 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1642 031434 7 010 04 0 00 000013 DATAI PAG,ACT
1643 031435 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1644 031436 620 14 0 00 400000 TRZ COR,400000
1645 031437 505 14 1 00 043727 HRLI COR,@KLUBRX
1646 031440 312 14 0 00 000013 CAME COR,ACT
1647 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1648
1649 031441 036 13 0 00 037144
1650 031442 035 00 0 00 031432 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1651
1652 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1653 ;*CHECK BIT INTERACTION.
1654 000100 XX=XX+XX
1655 IFE XX,<XX=1>
1656 031443 200 14 0 00 037154 MOVE COR,[LLDUSB,,403777-XX]
1657 031444 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1658 031445 7 010 04 0 00 000013 DATAI PAG,ACT
1659 031446 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1660 031447 620 14 0 00 400000 TRZ COR,400000
1661 031450 505 14 1 00 043727 HRLI COR,@KLUBRX
1662 031451 312 14 0 00 000013 CAME COR,ACT
1663 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1664
1665 031452 036 13 0 00 037144
1666 031453 035 00 0 00 031443 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1667
1668 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1669 ;*CHECK BIT INTERACTION.
1670 000200 XX=XX+XX
1671 IFE XX,<XX=1>
1672 031454 200 14 0 00 037155 MOVE COR,[LLDUSB,,403777-XX]
1673 031455 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1674 031456 7 010 04 0 00 000013 DATAI PAG,ACT
1675 031457 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1676 031460 620 14 0 00 400000 TRZ COR,400000
1677 031461 505 14 1 00 043727 HRLI COR,@KLUBRX
1678 031462 312 14 0 00 000013 CAME COR,ACT
1679 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1680
1681 031463 036 13 0 00 037144
1682 031464 035 00 0 00 031454 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1683
1684 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1685 ;*CHECK BIT INTERACTION.
1686 000400 XX=XX+XX
1687 IFE XX,<XX=1>
1688 031465 200 14 0 00 037156 MOVE COR,[LLDUSB,,403777-XX]
1689 031466 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1690 031467 7 010 04 0 00 000013 DATAI PAG,ACT
1691 031470 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 7-3
DSKEAM MAC 29-Mar-78 14:55 TEST USER BASE REGISTER SEQ 0074
1692 031471 620 14 0 00 400000 TRZ COR,400000
1693 031472 505 14 1 00 043727 HRLI COR,@KLUBRX
1694 031473 312 14 0 00 000013 CAME COR,ACT
1695 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1696
1697 031474 036 13 0 00 037144
1698 031475 035 00 0 00 031465 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1699
1700 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1701 ;*CHECK BIT INTERACTION.
1702 001000 XX=XX+XX
1703 IFE XX,<XX=1>
1704 031476 200 14 0 00 037157 MOVE COR,[LLDUSB,,403777-XX]
1705 031477 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1706 031500 7 010 04 0 00 000013 DATAI PAG,ACT
1707 031501 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1708 031502 620 14 0 00 400000 TRZ COR,400000
1709 031503 505 14 1 00 043727 HRLI COR,@KLUBRX
1710 031504 312 14 0 00 000013 CAME COR,ACT
1711 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1712
1713 031505 036 13 0 00 037144
1714 031506 035 00 0 00 031476 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1715
1716 ;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
1717 ;*CHECK BIT INTERACTION.
1718 002000 XX=XX+XX
1719 IFE XX,<XX=1>
1720 031507 200 14 0 00 037160 MOVE COR,[LLDUSB,,403777-XX]
1721 031510 7 010 14 0 00 000014 DATAO PAG,COR ;LOAD UBR WITH A FLOATING 0
1722 031511 7 010 04 0 00 000013 DATAI PAG,ACT
1723 031512 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1724 031513 620 14 0 00 400000 TRZ COR,400000
1725 031514 505 14 1 00 043727 HRLI COR,@KLUBRX
1726 031515 312 14 0 00 000013 CAME COR,ACT
1727 ERROR .-^D8,13,COR,ACT,UBR,FLOATING 0
1728
1729 031516 036 13 0 00 037144
1730 031517 035 00 0 00 031507 ERLOOP .-^D8 ;IF ERROR, LOOP TO .-^D8
1731 031520 367 15 0 00 031156 REPTLP UBRCK0+1
1732
1733 XLIST
1734 LIST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 14
DSKEAM MAC 29-Mar-78 14:55 TEST PROCESSOR TRAPS SEQ 0075
1735 SUBTTL TEST PROCESSOR TRAPS
1736
1737 SALL
1738 037161 T=SIXBTZ PROCESSOR TRAP TEST
1739 LALL
1740
1741 SUBTST^
1742 031521 201 00 0 00 031521 MOVEI .
1743 031522 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
1744 031523 200 15 0 00 043737 P0TRP0: MOVE REPT,RPEAT
1745 031524 7 010 20 0 00 020000 CONO PAG,LTRPEN
1746 031525 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
1747
1748 ;*TEST TRAP 3 TRAP
1749
1750 031526 200 07 0 00 037165 P0TRP1: MOVE AC,[JSR P0TP3]
1751 031527 202 07 0 00 000423 MOVEM AC,LTRP3T
1752 031530 7 010 20 0 00 020000 CONO PAG,LTRPEN
1753 031531 254 02 1 00 031532 JRSTF @.+1
1754 031532 000600 031533 TN0!TN1,,.+1
1755 031533 200 00 0 00 043732 P0TP3X: MOVE LTRP3SV
1756 031534 202 00 0 00 000423 MOVEM LTRP3T
1757 ERROR1 13,0,0,TRAP 3 FAILED,FATAL^
1758 SALL
1759 031535 036 13 0 00 037172
1760 031536 254 00 0 00 031550 JRST P0PDLX-5
1761
1762 031537 000000 000000 P0TP3: 0
1763 031540 7 010 20 0 00 020000 CONO PAG,LTRPEN
1764 031541 200 00 0 00 043732 MOVE LTRP3SV
1765 031542 202 00 0 00 000423 MOVEM LTRP3T
1766 031543 200 14 0 00 037175 MOVE COR,[0,,P0TP3X]
1767 031544 200 13 0 00 031537 MOVE ACT,P0TP3
1768 031545 312 14 0 00 000013 CAME COR,ACT
1769 ERROR P0TRP1,13,COR,ACT,TRAP 3 SAVED PC^
1770 031546 036 13 0 00 037201
1771 031547 035 00 0 00 031526 ERLOOP P0TRP1 ;IF ERROR, LOOP TO P0TRP1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 15
DSKEAM MAC 29-Mar-78 14:55 TEST PROCESSOR TRAPS SEQ 0076
1772 ;*TEST PUSHDOWN OVERFLOW TRAP
1773
1774 031550 200 07 0 00 037204 MOVE AC,[JSR P0PDL]
1775 031551 202 07 0 00 000422 MOVEM AC,LPDOVT
1776 031552 7 010 20 0 00 020000 CONO PAG,LTRPEN
1777 031553 254 02 1 00 031554 JRSTF @.+1
1778 031554 000400 031555 TN0,,.+1
1779 031555 200 00 0 00 043731 P0PDLX: MOVE LPDOVSV
1780 031556 202 00 0 00 000422 MOVEM LPDOVT
1781 ERROR1 13,0,0,TRAP 2 FAILED,FATAL^
1782 031557 036 13 0 00 037210
1783 031560 254 00 0 00 031572 JRST P0AROX-5
1784
1785 031561 000000 000000 P0PDL: 0
1786 031562 7 010 20 0 00 020000 CONO PAG,LTRPEN
1787 031563 200 00 0 00 043731 MOVE LPDOVSV
1788 031564 202 00 0 00 000422 MOVEM LPDOVT
1789 031565 200 14 0 00 037213 MOVE COR,[0,,P0PDLX]
1790 031566 200 13 0 00 031561 MOVE ACT,P0PDL
1791 031567 312 14 0 00 000013 CAME COR,ACT
1792 ERROR P0TRP1,13,COR,ACT,TRAP 2 SAVED PC^
1793 031570 036 13 0 00 037217
1794 031571 035 00 0 00 031526 ERLOOP P0TRP1 ;IF ERROR, LOOP TO P0TRP1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 16
DSKEAM MAC 29-Mar-78 14:55 TEST PROCESSOR TRAPS SEQ 0077
1795 ;*TEST OVERFLOW TRAP
1796
1797 031572 200 07 0 00 037222 MOVE AC,[JSR P0AROV]
1798 031573 202 07 0 00 000421 MOVEM AC,LAROVT
1799 031574 7 010 20 0 00 020000 CONO PAG,LTRPEN
1800 031575 254 02 1 00 031576 JRSTF @.+1
1801 031576 000200 031577 TN1,,.+1
1802 031577 200 00 0 00 043730 P0AROX: MOVE LAROVSV
1803 031600 202 00 0 00 000421 MOVEM LAROVT
1804 ERROR1 13,0,0,TRAP 1 FAILED,FATAL^
1805 031601 036 13 0 00 037226
1806 031602 254 00 0 00 031615 JRST P0ARO1
1807
1808 031603 000000 000000 P0AROV: 0
1809 031604 7 010 20 0 00 020000 CONO PAG,LTRPEN
1810 031605 200 00 0 00 043730 MOVE LAROVSV
1811 031606 202 00 0 00 000421 MOVEM LAROVT
1812 031607 200 14 0 00 037231 MOVE COR,[0,,P0AROX]
1813 031610 200 13 0 00 031603 MOVE ACT,P0AROV
1814 031611 312 14 0 00 000013 CAME COR,ACT
1815 ERROR P0TRP1,13,COR,ACT,TRAP 1 SAVED PC^
1816 031612 036 13 0 00 037235
1817 031613 035 00 0 00 031526 ERLOOP P0TRP1 ;IF ERROR, LOOP TO P0TRP1
1818
1819 031614 367 15 0 00 031524 REPTLP P0TRP0+1
1820 031615 P0ARO1:
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 17
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0078
1821 SUBTTL PDL TRAPPING TESTS
1822
1823 ;*THESE TEST FOR THE PUSHDOWN INSTRUCTIONS INSURE THAT THEY WILL
1824 ;*INDEED TRAP WHEN AN OVERFLOW OR UNDERFLOW CONDITION OCCURS.
1825 ;*THESE TEST ALSO VERIFY THE VALIDITY OF THE INFORMATION PROCESSED
1826 ;*BY THE INSTRUCTION, AS THEY SHOULD GIVE VALID RESULTS INDEPENDENT
1827 ;*OF WHETHER OR NOT THEY TRAP.
1828
1829 ;*TEST PUSH INSTRUCTION
1830
1831 SUBTST^
1832 031615 201 00 0 00 031615 MOVEI .
1833 031616 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
1834 031617 200 15 0 00 043737 PDT0: MOVE REPT,RPEAT
1835
1836 031620 205 00 0 00 031625 PDT1: MOVSI PDT2 ;SHOULD TRAP HERE
1837 031621 541 00 0 00 031627 HRRI PDT3 ;AFTER TRAP
1838 031622 260 17 0 00 032331 GO PDSET ;SETUP TRAPPING
1839
1840 031623 200 01 0 00 037240 MOVE 1,[-1,,OVSTR1-1] ; SET PDL POINTER
1841
1842 031624 261 01 0 00 032365 PUSH 1,TSTWD ;PUSH SHOULD TRAP
1843
1844 031625 PDT2: ERROR PDT1,13,0,0,PUSH,PUSH DID NOT TRAP^
1845 031625 036 13 0 00 037245
1846 031626 035 00 0 00 031620 ERLOOP PDT1 ;IF ERROR, LOOP TO PDT1
1847
1848 037250 C=[0,,OVSTR1]
1849 031627 312 01 0 00 037250 PDT3: CAME 1,C ;PDL POINTER OK ?
1850 ERROR PDT1,13,C,1,PUSH,DID NOT INCREMENT POINTER^
1851 031630 036 13 0 00 037256
1852 031631 035 00 0 00 031620 ERLOOP PDT1 ;IF ERROR, LOOP TO PDT1
1853
1854 031632 200 01 0 00 032366 MOVE 1,OVSTR1 ;GET C(STK)
1855 031633 312 01 0 00 032365 CAME 1,TSTWD ;VERIFY CORRECT DEPOSIT OF DATA
1856 ERROR PDT1,13,TSTWD,1,PUSH,DID NOT STORE DATA^
1857 031634 036 13 0 00 037265
1858 031635 035 00 0 00 031620 ERLOOP PDT1 ;IF ERROR, LOOP TO PDT1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 18
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0079
1859 ;*TEST PUSHJ INSTRUCTION
1860
1861 031636 205 00 0 00 031645 PDT4A: MOVSI PDT5 ;SHOULD TRAP
1862 031637 541 00 0 00 031647 HRRI PDT6 ;RETURN TO AFTER TRAP
1863 031640 260 17 0 00 032331 GO PDSET ;SETUP TRAPPING
1864
1865 031641 200 01 0 00 037240 MOVE 1,[-1,,OVSTR1-1] ;SET PTR
1866
1867 031642 260 01 0 00 031645 PUSHJ 1,PDT5 ;PUSHJ SHOULD TRAP
1868
1869 031643 PDT4: ERROR PDT4A,13,0,0,PUSHJ,DID NOT TRAP OR CALC EA^
1870 031643 036 13 0 00 037275
1871 031644 035 00 0 00 031636 ERLOOP PDT4A ;IF ERROR, LOOP TO PDT4A
1872
1873 031645 PDT5: ERROR PDT4A,13,0,0,PUSHJ,DID NOT TRAP^
1874 031645 036 13 0 00 037303
1875 031646 035 00 0 00 031636 ERLOOP PDT4A ;IF ERROR, LOOP TO PDT4A
1876
1877 037250 C=[0,,OVSTR1]
1878 031647 312 01 0 00 037250 PDT6: CAME 1,C
1879 ERROR PDT4A,13,C,1,PUSHJ,DID NOT INCREMENT POINTER^
1880 031650 036 13 0 00 037306
1881 031651 035 00 0 00 031636 ERLOOP PDT4A ;IF ERROR, LOOP TO PDT4A
1882
1883 031652 200 01 0 00 032366 MOVE 1,OVSTR1 ;GET C(STK)
1884 031653 201 02 0 00 031643 MOVEI 2,PDT4 ;GET ADR WHERE TRAPPED
1885 031654 553 00 0 00 000001 HRRZS 1 ;CLEAR LH(AC1)
1886 031655 312 01 0 00 000002 CAME 1,2 ;AC1=AC2 ?
1887 ERROR PDT4A,13,2,1,PUSHJ,DID NOT SAVE RIGHT RET ADDR^
1888 031656 036 13 0 00 037316
1889 031657 035 00 0 00 031636 ERLOOP PDT4A ;IF ERROR, LOOP TO PDT4A
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 19
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0080
1890 ;*TEST POP INSTRUCTION
1891
1892 031660 205 00 0 00 031670 PDT7: MOVSI PDT8 ;SHOULD TRAP HERE
1893 031661 541 00 0 00 031672 HRRI PDT9 ;RETURN TO AFTER TRAP
1894 031662 260 17 0 00 032331 GO PDSET ;SETUP TRAPPING
1895
1896 031663 201 01 0 00 032366 MOVEI 1,OVSTR1 ;SET PDL POINTER
1897 031664 200 00 0 00 032365 MOVE TSTWD# ;GET TEST WORD
1898 031665 202 00 0 00 032366 MOVEM OVSTR1# ;PUT IT ON STACK
1899 031666 400 02 0 00 000000 SETZ 2, ;CLEAR AC2
1900
1901 031667 262 01 0 00 000002 POP 1,2 ;POP SHOULD TRAP
1902 031670 PDT8: ERROR PDT7,13,0,0,POP,DID NOT TRAP^
1903 031670 036 13 0 00 037322
1904 031671 035 00 0 00 031660 ERLOOP PDT7 ;IF ERROR, LOOP TO PDT7
1905
1906 031672 312 02 0 00 032365 PDT9: CAME 2,TSTWD ;AC2 RESTORED OK ?
1907 ERROR PDT7,13,TSTWD,2,POP,DID NOT RESTORE DATA^
1908 031673 036 13 0 00 037331
1909 031674 035 00 0 00 031660 ERLOOP PDT7 ;IF ERROR, LOOP TO PDT7
1910
1911 037240 C=[-1,,OVSTR1-1]
1912 031675 312 01 0 00 037240 CAME 1,C ;PTR OK ?
1913 ERROR PDT7,13,C,1,POP,DID NOT DECREMENT POINTER^
1914 031676 036 13 0 00 037341
1915 031677 035 00 0 00 031660 ERLOOP PDT7 ;IF ERROR, LOOP TO PDT7
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 20
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0081
1916 ;*TEST POPJ INSTRUCTION
1917
1918 031700 205 00 0 00 031711 PDT10: MOVSI PDT11A ;SHOULD TRAP TO HERE
1919 031701 541 00 0 00 031713 HRRI PDT12 ;RETURN HERE
1920 031702 260 17 0 00 032331 GO PDSET ;SETUP TRAPPING
1921
1922 031703 201 01 0 00 032366 MOVEI 1,OVSTR1 ;SETUP PDL STACK
1923 031704 201 00 0 00 031711 MOVEI PDT11A ;GET POPJ'S RETURN ADDRESS
1924 031705 202 00 0 00 032366 MOVEM OVSTR1 ;PUT ON STACK
1925
1926 031706 263 01 0 00 000000 POPJ 1, ;POPJ SHOULD TRAP
1927
1928 031707 PDT11: ERROR PDT10,13,0,0,POPJ,DID NOT TRAP OR GET RETURN ADR^
1929 031707 036 13 0 00 037353
1930 031710 035 00 0 00 031700 ERLOOP PDT10 ;IF ERROR, LOOP TO PDT10
1931
1932 031711 PDT11A: ERROR PDT10,13,0,0,POPJ,DID NOT TRAP^
1933 031711 036 13 0 00 037356
1934 031712 035 00 0 00 031700 ERLOOP PDT10 ;IF ERROR, LOOP TO PDT10
1935
1936 037240 C=[-1,,OVSTR1-1]
1937 031713 312 01 0 00 037240 PDT12: CAME 1,C
1938 ERROR PDT10,13,C,1,POPJ,DID NOT DECREMENT POINTER^
1939 031714 036 13 0 00 037361
1940 031715 035 00 0 00 031700 ERLOOP PDT10 ;IF ERROR, LOOP TO PDT10
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 21
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0082
1941 ;*TEST OVERFLOW TRAP WITH "ASH"
1942
1943 031716 205 00 0 00 031723 ASHTST: MOVSI ASHTRP ;TRAP TO HERE
1944 031717 541 00 0 00 031727 HRRI ASHRET ;RETURN TO HERE
1945 031720 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
1946
1947 031721 200 02 0 00 037364 MOVE 2,[377777,,-1]
1948
1949 031722 240 02 0 00 000001 ASH 2,1 ;ASH SHOULD TRAP
1950
1951 031723 200 00 0 00 043730 ASHTRP: MOVE LAROVSV
1952 031724 202 00 0 00 000421 MOVEM LAROVT
1953 ERROR ASHTST,13,0,0,ASH OVERFLOW,DID NOT TRAP^
1954 031725 036 13 0 00 037370
1955 031726 035 00 0 00 031716 ERLOOP ASHTST ;IF ERROR, LOOP TO ASHTST
1956
1957 037373 C=[377777,,-2]
1958 031727 200 00 0 00 043730 ASHRET: MOVE LAROVSV
1959 031730 202 00 0 00 000421 MOVEM LAROVT
1960 031731 312 02 0 00 037373 CAME 2,C ;INSURE AC HAS CHANGED
1961 ERROR ASHTST,13,C,2,ASH OVERFLOW,AC WRONG^
1962 031732 036 13 0 00 037376
1963 031733 035 00 0 00 031716 ERLOOP ASHTST ;IF ERROR, LOOP TO ASHTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 22
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0083
1964 ;*TEST OVERFLOW TRAP WITH "ASHC"
1965
1966 031734 205 00 0 00 031742 ASHCTST:MOVSI ASHCTRP ;TRAP TO HERE
1967 031735 541 00 0 00 031746 HRRI ASHCRET ;RETURN TO HERE
1968 031736 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
1969
1970 031737 200 02 0 00 037364 MOVE 2,[377777,,-1]
1971 031740 201 03 0 00 000000 MOVEI 3,0
1972
1973 031741 244 02 0 00 000001 ASHC 2,1 ;ASHC SHOULD TRAP
1974
1975 031742 200 00 0 00 043730 ASHCTRP:MOVE LAROVSV
1976 031743 202 00 0 00 000421 MOVEM LAROVT
1977 ERROR ASHCTST,13,0,0,ASHC OVERFLOW,DID NOT TRAP^
1978 031744 036 13 0 00 037404
1979 031745 035 00 0 00 031734 ERLOOP ASHCTST ;IF ERROR, LOOP TO ASHCTST
1980
1981 037373 C=[377777,,-2]
1982 031746 200 00 0 00 043730 ASHCRET:MOVE LAROVSV
1983 031747 202 00 0 00 000421 MOVEM LAROVT
1984 031750 312 02 0 00 037373 CAME 2,C ;INSURE AC HAS CHANGED
1985 ERROR ASHCTST,13,C,2,ASHC OVERFLOW,AC WRONG^
1986 031751 036 13 0 00 037407
1987 031752 035 00 0 00 031734 ERLOOP ASHCTST ;IF ERROR, LOOP TO ASHCTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 23
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0084
1988 ;*TEST OVERFLOW TRAP WITH "MUL"
1989
1990 031753 205 00 0 00 031760 MULTST: MOVSI MULTRP ;TRAP TO HERE
1991 031754 541 00 0 00 031764 HRRI MULRET ;RETURN TO HERE
1992 031755 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
1993
1994 031756 200 02 0 00 037412 MOVE 2,[400000,,0]
1995
1996 031757 224 02 0 00 000002 MUL 2,2 ;MUL SHOULD TRAP
1997
1998 031760 200 00 0 00 043730 MULTRP: MOVE LAROVSV
1999 031761 202 00 0 00 000421 MOVEM LAROVT
2000 ERROR MULTST,13,0,0,MUL OVERFLOW,DID NOT TRAP^
2001 031762 036 13 0 00 037416
2002 031763 035 00 0 00 031753 ERLOOP MULTST ;IF ERROR, LOOP TO MULTST
2003
2004 037412 C=[400000,,0]
2005 031764 200 00 0 00 043730 MULRET: MOVE LAROVSV
2006 031765 202 00 0 00 000421 MOVEM LAROVT
2007 031766 312 02 0 00 037412 CAME 2,C ;INSURE AC HAS CHANGED
2008 ERROR MULTST,13,C,2,MUL OVERFLOW,AC MODIFIED^
2009 031767 036 13 0 00 037423
2010 031770 035 00 0 00 031753 ERLOOP MULTST ;IF ERROR, LOOP TO MULTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 24
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0085
2011 ;*TEST OVERFLOW TRAP WITH "IMUL"
2012
2013 031771 205 00 0 00 031776 IMULTST:MOVSI IMULTRP ;TRAP TO HERE
2014 031772 541 00 0 00 032002 HRRI IMULRET ;RETURN TO HERE
2015 031773 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2016
2017 031774 200 02 0 00 037412 MOVE 2,[400000,,0]
2018
2019 031775 220 02 0 00 000002 IMUL 2,2 ;IMUL SHOULD TRAP
2020
2021 031776 200 00 0 00 043730 IMULTRP:MOVE LAROVSV
2022 031777 202 00 0 00 000421 MOVEM LAROVT
2023 ERROR IMULTST,13,0,0,IMUL OVERFLOW,DID NOT TRAP^
2024 032000 036 13 0 00 037431
2025 032001 035 00 0 00 031771 ERLOOP IMULTST ;IF ERROR, LOOP TO IMULTST
2026
2027 037412 C=[400000,,0]
2028 032002 200 00 0 00 043730 IMULRET:MOVE LAROVSV
2029 032003 202 00 0 00 000421 MOVEM LAROVT
2030 032004 312 02 0 00 037412 CAME 2,C ;INSURE AC HAS CHANGED
2031 ERROR IMULTST,13,C,2,IMUL OVERFLOW,AC MODIFIED^
2032 032005 036 13 0 00 037434
2033 032006 035 00 0 00 031771 ERLOOP IMULTST ;IF ERROR, LOOP TO IMULTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 25
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0086
2034 ;*TEST OVERFLOW TRAP WITH "ADJBP"
2035
2036 032007 205 00 0 00 032014 ADJTST: MOVSI ADJTRP ;TRAP TO HERE
2037 032010 541 00 0 00 032020 HRRI ADJRET ;RETURN TO HERE
2038 032011 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2039
2040 032012 200 02 0 00 037437 MOVE 2,[017700,,0]
2041
2042 032013 133 01 0 00 000002 IBP 1,2 ;ADJBP SHOULD TRAP
2043
2044 032014 200 00 0 00 043730 ADJTRP: MOVE LAROVSV
2045 032015 202 00 0 00 000421 MOVEM LAROVT
2046 ERROR ADJTST,13,0,0,ADJBP OVERFLOW,DID NOT TRAP^
2047 032016 036 13 0 00 037443
2048 032017 035 00 0 00 032007 ERLOOP ADJTST ;IF ERROR, LOOP TO ADJTST
2049
2050 032020 200 00 0 00 043730 ADJRET: MOVE LAROVSV
2051 032021 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 26
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0087
2052 ;*TEST OVERFLOW TRAP WITH "FSC"
2053
2054 032022 205 00 0 00 032027 FSCTST: MOVSI FSCTRP ;TRAP TO HERE
2055 032023 541 00 0 00 032033 HRRI FSCRET ;RETURN TO HERE
2056 032024 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2057
2058 032025 200 02 0 00 037446 MOVE 2,[-377400,,0]
2059
2060 032026 132 02 0 00 777400 FSC 2,-400 ;FSC SHOULD TRAP
2061
2062 032027 200 00 0 00 043730 FSCTRP: MOVE LAROVSV
2063 032030 202 00 0 00 000421 MOVEM LAROVT
2064 ERROR FSCTST,13,0,0,FSC OVERFLOW,DID NOT TRAP^
2065 032031 036 13 0 00 037452
2066 032032 035 00 0 00 032022 ERLOOP FSCTST ;IF ERROR, LOOP TO FSCTST
2067
2068 032033 200 00 0 00 043730 FSCRET: MOVE LAROVSV
2069 032034 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 27
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0088
2070 ;*TEST OVERFLOW TRAP WITH "FIX"
2071
2072 032035 205 00 0 00 032042 FIXTST: MOVSI FIXTRP ;TRAP TO HERE
2073 032036 541 00 0 00 032046 HRRI FIXRET ;RETURN TO HERE
2074 032037 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2075
2076 032040 200 02 0 00 037455 MOVE 2,[244400,,0]
2077
2078 032041 122 02 0 00 000002 FIX 2,2 ;FIX SHOULD TRAP
2079
2080 032042 200 00 0 00 043730 FIXTRP: MOVE LAROVSV
2081 032043 202 00 0 00 000421 MOVEM LAROVT
2082 ERROR FIXTST,13,0,0,FIX OVERFLOW,DID NOT TRAP^
2083 032044 036 13 0 00 037461
2084 032045 035 00 0 00 032035 ERLOOP FIXTST ;IF ERROR, LOOP TO FIXTST
2085
2086 037455 C=[244400,,0]
2087 032046 200 00 0 00 043730 FIXRET: MOVE LAROVSV
2088 032047 202 00 0 00 000421 MOVEM LAROVT
2089 032050 312 02 0 00 037455 CAME 2,C ;INSURE AC HAS CHANGED
2090 ERROR FIXTST,13,C,2,FIX OVERFLOW,AC MODIFIED^
2091 032051 036 13 0 00 037464
2092 032052 035 00 0 00 032035 ERLOOP FIXTST ;IF ERROR, LOOP TO FIXTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 28
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0089
2093 ;*TEST OVERFLOW TRAP WITH "FIXR"
2094
2095 032053 205 00 0 00 032060 FIXRTST:MOVSI FIXRTRP ;TRAP TO HERE
2096 032054 541 00 0 00 032064 HRRI FIXRRET ;RETURN TO HERE
2097 032055 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2098
2099 032056 200 02 0 00 037455 MOVE 2,[244400,,0]
2100
2101 032057 126 02 0 00 000002 FIXR 2,2 ;FIXR SHOULD TRAP
2102
2103 032060 200 00 0 00 043730 FIXRTRP:MOVE LAROVSV
2104 032061 202 00 0 00 000421 MOVEM LAROVT
2105 ERROR FIXRTST,13,0,0,FIXR OVERFLOW,DID NOT TRAP^
2106 032062 036 13 0 00 037472
2107 032063 035 00 0 00 032053 ERLOOP FIXRTST ;IF ERROR, LOOP TO FIXRTST
2108
2109 037455 C=[244400,,0]
2110 032064 200 00 0 00 043730 FIXRRET:MOVE LAROVSV
2111 032065 202 00 0 00 000421 MOVEM LAROVT
2112 032066 312 02 0 00 037455 CAME 2,C ;INSURE AC HAS CHANGED
2113 ERROR FIXRTST,13,C,2,FIXR OVERFLOW,AC MODIFIED^
2114 032067 036 13 0 00 037475
2115 032070 035 00 0 00 032053 ERLOOP FIXRTST ;IF ERROR, LOOP TO FIXRTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 29
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0090
2116 ;*TEST OVERFLOW TRAP WITH "FAD"
2117
2118 032071 205 00 0 00 032076 FADTST: MOVSI FADTRP ;TRAP TO HERE
2119 032072 541 00 0 00 032102 HRRI FADRET ;RETURN TO HERE
2120 032073 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2121
2122 032074 200 02 0 00 037500 MOVE 2,[377400,,0]
2123
2124 032075 140 02 0 00 000002 FAD 2,2 ;FAD SHOULD TRAP
2125
2126 032076 200 00 0 00 043730 FADTRP: MOVE LAROVSV
2127 032077 202 00 0 00 000421 MOVEM LAROVT
2128 ERROR FADTST,13,0,0,FAD OVERFLOW,DID NOT TRAP^
2129 032100 036 13 0 00 037504
2130 032101 035 00 0 00 032071 ERLOOP FADTST ;IF ERROR, LOOP TO FADTST
2131
2132 032102 200 00 0 00 043730 FADRET: MOVE LAROVSV
2133 032103 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 30
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0091
2134 ;*TEST OVERFLOW TRAP WITH "DFAD"
2135
2136 032104 205 00 0 00 032111 DFADTST:MOVSI DFADTRP ;TRAP TO HERE
2137 032105 541 00 0 00 032115 HRRI DFADRET ;RETURN TO HERE
2138 032106 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2139
2140 032107 200 02 0 00 037500 MOVE 2,[377400,,0]
2141
2142 032110 110 02 0 00 000002 DFAD 2,2 ;DFAD SHOULD TRAP
2143
2144 032111 200 00 0 00 043730 DFADTRP:MOVE LAROVSV
2145 032112 202 00 0 00 000421 MOVEM LAROVT
2146 ERROR DFADTST,13,0,0,DFAD OVERFLOW,DID NOT TRAP^
2147 032113 036 13 0 00 037512
2148 032114 035 00 0 00 032104 ERLOOP DFADTST ;IF ERROR, LOOP TO DFADTST
2149
2150 032115 200 00 0 00 043730 DFADRET:MOVE LAROVSV
2151 032116 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 31
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0092
2152 ;*TEST OVERFLOW TRAP WITH "FSB"
2153
2154 032117 205 00 0 00 032125 FSBTST: MOVSI FSBTRP ;TRAP TO HERE
2155 032120 541 00 0 00 032131 HRRI FSBRET ;RETURN TO HERE
2156 032121 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2157
2158 032122 200 02 0 00 037446 MOVE 2,[400400,,0]
2159 032123 200 03 0 00 037500 MOVE 3,[377400,,0]
2160
2161 032124 150 02 0 00 000003 FSB 2,3 ;FSB SHOULD TRAP
2162
2163 032125 200 00 0 00 043730 FSBTRP: MOVE LAROVSV
2164 032126 202 00 0 00 000421 MOVEM LAROVT
2165 ERROR FSBTST,13,0,0,FSB OVERFLOW,DID NOT TRAP^
2166 032127 036 13 0 00 037520
2167 032130 035 00 0 00 032117 ERLOOP FSBTST ;IF ERROR, LOOP TO FSBTST
2168
2169 032131 200 00 0 00 043730 FSBRET: MOVE LAROVSV
2170 032132 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 32
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0093
2171 ;*TEST OVERFLOW TRAP WITH "DFSB"
2172
2173 032133 205 00 0 00 032142 DFSBTST:MOVSI DFSBTRP ;TRAP TO HERE
2174 032134 541 00 0 00 032146 HRRI DFSBRET ;RETURN TO HERE
2175 032135 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2176
2177 032136 200 02 0 00 037446 MOVE 2,[400400,,0]
2178 032137 200 04 0 00 037500 MOVE 4,[377400,,0]
2179 032140 403 03 0 00 000005 SETZB 3,5
2180
2181 032141 111 02 0 00 000004 DFSB 2,4 ;DFSB SHOULD TRAP
2182
2183 032142 200 00 0 00 043730 DFSBTRP:MOVE LAROVSV
2184 032143 202 00 0 00 000421 MOVEM LAROVT
2185 ERROR DFSBTST,13,0,0,DFSB OVERFLOW,DID NOT TRAP^
2186 032144 036 13 0 00 037526
2187 032145 035 00 0 00 032133 ERLOOP DFSBTST ;IF ERROR, LOOP TO DFSBTST
2188
2189 032146 200 00 0 00 043730 DFSBRET:MOVE LAROVSV
2190 032147 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 33
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0094
2191 ;*TEST OVERFLOW TRAP WITH "FMP"
2192
2193 032150 205 00 0 00 032155 FMPTST: MOVSI FMPTRP ;TRAP TO HERE
2194 032151 541 00 0 00 032161 HRRI FMPRET ;RETURN TO HERE
2195 032152 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2196
2197 032153 200 02 0 00 037500 MOVE 2,[377400,,0]
2198
2199 032154 160 02 0 00 000002 FMP 2,2 ;FMP SHOULD TRAP
2200
2201 032155 200 00 0 00 043730 FMPTRP: MOVE LAROVSV
2202 032156 202 00 0 00 000421 MOVEM LAROVT
2203 ERROR FMPTST,13,0,0,FMP OVERFLOW,DID NOT TRAP^
2204 032157 036 13 0 00 037534
2205 032160 035 00 0 00 032150 ERLOOP FMPTST ;IF ERROR, LOOP TO FMPTST
2206
2207 032161 200 00 0 00 043730 FMPRET: MOVE LAROVSV
2208 032162 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 34
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0095
2209 ;*TEST OVERFLOW TRAP WITH "DFMP"
2210
2211 032163 205 00 0 00 032170 DFMPTST:MOVSI DFMPTRP ;TRAP TO HERE
2212 032164 541 00 0 00 032174 HRRI DFMPRET ;RETURN TO HERE
2213 032165 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2214
2215 032166 200 02 0 00 037500 MOVE 2,[377400,,0]
2216
2217 032167 112 02 0 00 000002 DFMP 2,2 ;DFMP SHOULD TRAP
2218
2219 032170 200 00 0 00 043730 DFMPTRP:MOVE LAROVSV
2220 032171 202 00 0 00 000421 MOVEM LAROVT
2221 ERROR DFMPTST,13,0,0,DFMP OVERFLOW,DID NOT TRAP^
2222 032172 036 13 0 00 037542
2223 032173 035 00 0 00 032163 ERLOOP DFMPTST ;IF ERROR, LOOP TO DFMPTST
2224
2225 032174 200 00 0 00 043730 DFMPRET:MOVE LAROVSV
2226 032175 202 00 0 00 000421 MOVEM LAROVT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 35
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0096
2227 ;*TEST NO-DIVIDE TRAP WITH "DIV"
2228
2229 032176 205 00 0 00 032203 DIVTST: MOVSI DIVTRP ;TRAP TO HERE
2230 032177 541 00 0 00 032207 HRRI DIVRET ;RETURN TO HERE
2231 032200 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2232
2233 032201 403 02 0 00 000003 SETZB 2,3 ;CLEAR AC2 & AC3
2234
2235 032202 234 02 0 00 000002 DIV 2,2 ;DIV SHOULD TRAP
2236
2237 032203 200 00 0 00 043730 DIVTRP: MOVE LAROVSV
2238 032204 202 00 0 00 000421 MOVEM LAROVT
2239 ERROR DIVTST,13,0,0,DIV NO DIVIDE,DID NOT TRAP^
2240 032205 036 13 0 00 037550
2241 032206 035 00 0 00 032176 ERLOOP DIVTST ;IF ERROR, LOOP TO DIVTST
2242
2243 037173 C=[0]
2244 032207 200 00 0 00 043730 DIVRET: MOVE LAROVSV
2245 032210 202 00 0 00 000421 MOVEM LAROVT
2246 032211 312 02 0 00 037173 CAME 2,C ;INSURE AC HAS NOT CHANGED
2247 ERROR DIVTST,13,C,2,DIV NO DIVIDE,AC MODIFIED^
2248 032212 036 13 0 00 037553
2249 032213 035 00 0 00 032176 ERLOOP DIVTST ;IF ERROR, LOOP TO DIVTST
2250
2251 032214 312 03 0 00 037173 CAME 3,C
2252 ERROR DIVTST,13,C,3,DIV NO DIVIDE,AC+1 MODIFIED^
2253 032215 036 13 0 00 037561
2254 032216 035 00 0 00 032176 ERLOOP DIVTST ;IF ERROR, LOOP TO DIVTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 36
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0097
2255 ;*TEST NO-DIVIDE TRAP WITH "IDIV"
2256
2257 032217 205 00 0 00 032224 IDIVTST:MOVSI IDIVTRP ;TRAP TO HERE
2258 032220 541 00 0 00 032230 HRRI IDIVRET ;RETURN TO HERE
2259 032221 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2260
2261 032222 403 02 0 00 000003 SETZB 2,3 ;CLEAR AC2 & AC3
2262
2263 032223 230 02 0 00 000002 IDIV 2,2 ;IDIV SHOULD TRAP
2264
2265 032224 200 00 0 00 043730 IDIVTRP:MOVE LAROVSV
2266 032225 202 00 0 00 000421 MOVEM LAROVT
2267 ERROR IDIVTST,13,0,0,IDIV NO DIVIDE,DID NOT TRAP^
2268 032226 036 13 0 00 037567
2269 032227 035 00 0 00 032217 ERLOOP IDIVTST ;IF ERROR, LOOP TO IDIVTST
2270
2271 037173 C=[0]
2272 032230 200 00 0 00 043730 IDIVRET:MOVE LAROVSV
2273 032231 202 00 0 00 000421 MOVEM LAROVT
2274 032232 312 02 0 00 037173 CAME 2,C ;INSURE AC HAS NOT CHANGED
2275 ERROR IDIVTST,13,C,2,IDIV NO DIVIDE,AC MODIFIED^
2276 032233 036 13 0 00 037572
2277 032234 035 00 0 00 032217 ERLOOP IDIVTST ;IF ERROR, LOOP TO IDIVTST
2278
2279 032235 312 03 0 00 037173 CAME 3,C
2280 ERROR IDIVTST,13,C,3,IDIV NO DIVIDE,AC+1 MODIFIED^
2281 032236 036 13 0 00 037575
2282 032237 035 00 0 00 032217 ERLOOP IDIVTST ;IF ERROR, LOOP TO IDIVTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 37
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0098
2283 ;*TEST NO-DIVIDE TRAP WITH "FDV"
2284
2285 032240 205 00 0 00 032245 FDVTST: MOVSI FDVTRP ;TRAP TO HERE
2286 032241 541 00 0 00 032251 HRRI FDVRET ;RETURN TO HERE
2287 032242 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2288
2289 032243 403 02 0 00 000003 SETZB 2,3 ;CLEAR AC2 & AC3
2290
2291 032244 170 02 0 00 000002 FDV 2,2 ;FDV SHOULD TRAP
2292
2293 032245 200 00 0 00 043730 FDVTRP: MOVE LAROVSV
2294 032246 202 00 0 00 000421 MOVEM LAROVT
2295 ERROR FDVTST,13,0,0,FDV NO DIVIDE,DID NOT TRAP^
2296 032247 036 13 0 00 037603
2297 032250 035 00 0 00 032240 ERLOOP FDVTST ;IF ERROR, LOOP TO FDVTST
2298
2299 037173 C=[0]
2300 032251 200 00 0 00 043730 FDVRET: MOVE LAROVSV
2301 032252 202 00 0 00 000421 MOVEM LAROVT
2302 032253 312 02 0 00 037173 CAME 2,C ;INSURE AC HAS NOT CHANGED
2303 ERROR FDVTST,13,C,2,FDV NO DIVIDE,AC MODIFIED^
2304 032254 036 13 0 00 037606
2305 032255 035 00 0 00 032240 ERLOOP FDVTST ;IF ERROR, LOOP TO FDVTST
2306
2307 032256 312 03 0 00 037173 CAME 3,C
2308 ERROR FDVTST,13,C,3,FDV NO DIVIDE,AC+1 MODIFIED^
2309 032257 036 13 0 00 037611
2310 032260 035 00 0 00 032240 ERLOOP FDVTST ;IF ERROR, LOOP TO FDVTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 38
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0099
2311 ;*TEST NO-DIVIDE TRAP WITH "FDVR"
2312
2313 032261 205 00 0 00 032266 FDVRTST:MOVSI FDVRTRP ;TRAP TO HERE
2314 032262 541 00 0 00 032272 HRRI FDVRRET ;RETURN TO HERE
2315 032263 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2316
2317 032264 403 02 0 00 000003 SETZB 2,3 ;CLEAR AC2 & AC3
2318
2319 032265 174 02 0 00 000002 FDVR 2,2 ;FDVR SHOULD TRAP
2320
2321 032266 200 00 0 00 043730 FDVRTRP:MOVE LAROVSV
2322 032267 202 00 0 00 000421 MOVEM LAROVT
2323 ERROR FDVRTST,13,0,0,FDVR NO DIVIDE,DID NOT TRAP^
2324 032270 036 13 0 00 037617
2325 032271 035 00 0 00 032261 ERLOOP FDVRTST ;IF ERROR, LOOP TO FDVRTST
2326
2327 037173 C=[0]
2328 032272 200 00 0 00 043730 FDVRRET:MOVE LAROVSV
2329 032273 202 00 0 00 000421 MOVEM LAROVT
2330 032274 312 02 0 00 037173 CAME 2,C ;INSURE AC HAS NOT CHANGED
2331 ERROR FDVRTST,13,C,2,FDVR NO DIVIDE,AC MODIFIED^
2332 032275 036 13 0 00 037622
2333 032276 035 00 0 00 032261 ERLOOP FDVRTST ;IF ERROR, LOOP TO FDVRTST
2334
2335 032277 312 03 0 00 037173 CAME 3,C
2336 ERROR FDVRTST,13,C,3,FDVR NO DIVIDE,AC+1 MODIFIED^
2337 032300 036 13 0 00 037625
2338 032301 035 00 0 00 032261 ERLOOP FDVRTST ;IF ERROR, LOOP TO FDVRTST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 39
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0100
2339 ;*TEST NO-DIVIDE TRAP WITH "DFDV"
2340
2341 032302 205 00 0 00 032307 DFDVTST:MOVSI DFDVTRP ;TRAP TO HERE
2342 032303 541 00 0 00 032313 HRRI DFDVRET ;RETURN TO HERE
2343 032304 260 17 0 00 032327 GO ARSET ;SETUP TRAPPING
2344
2345 032305 403 02 0 00 000003 SETZB 2,3 ;CLEAR AC2 & AC3
2346 032306 113 02 0 00 000002 DFDV 2,2 ;DFDV SHOULD TRAP
2347
2348 032307 200 00 0 00 043730 DFDVTRP:MOVE LAROVSV
2349 032310 202 00 0 00 000421 MOVEM LAROVT
2350 ERROR DFDVTST,13,0,0,DFDV NO DIVIDE,DID NOT TRAP^
2351 032311 036 13 0 00 037633
2352 032312 035 00 0 00 032302 ERLOOP DFDVTST ;IF ERROR, LOOP TO DFDVTST
2353
2354 037173 C=[0]
2355 032313 200 00 0 00 043730 DFDVRET:MOVE LAROVSV
2356 032314 202 00 0 00 000421 MOVEM LAROVT
2357 032315 312 02 0 00 037173 CAME 2,C ;INSURE AC HAS NOT CHANGED
2358 ERROR DFDVTST,13,C,2,DFDV NO DIVIDE,AC MODIFIED^
2359 032316 036 13 0 00 037636
2360 032317 035 00 0 00 032302 ERLOOP DFDVTST ;IF ERROR, LOOP TO DFDVTST
2361
2362 032320 312 03 0 00 037173 CAME 3,C
2363 ERROR DFDVTST,13,C,3,DFDV NO DIVIDE,AC+1 MODIFIED^
2364 032321 036 13 0 00 037641
2365 032322 035 00 0 00 032302 ERLOOP DFDVTST ;IF ERROR, LOOP TO DFDVTST
2366
2367 032323 367 15 0 00 031620 REPTLP PDT1 ;REPEAT LOOP
2368
2369 032324 200 00 0 00 043731 MOVE LPDOVSV
2370 032325 202 00 0 00 000422 MOVEM LPDOVT ;RESTORE TRAP
2371 032326 254 00 0 00 032371 JRST MAPCK0-2
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 40
DSKEAM MAC 29-Mar-78 14:55 PDL TRAPPING TESTS SEQ 0101
2372 ;*TRAPPING SUBROUTINES
2373
2374 032327 402 00 0 00 032364 ARSET: SETZM TRPTYP ;NOTE AR OVERFLOW
2375 032330 254 00 0 00 032332 JRST .+2
2376
2377 032331 476 00 0 00 032364 PDSET: SETOM TRPTYP ;NOTE PDL OVERFLOW
2378
2379 032332 552 00 0 00 032361 HRRZM RETO ;SAVE TRAP RETURN ADDRESS
2380 032333 556 00 0 00 032360 HLRZM SHTRP ;SAVE WHERE SHOULD TRAP
2381
2382 032334 201 00 0 00 000421 MOVEI LAROVT ;GET AR TRAP LOCATION
2383 032335 332 00 0 00 032364 SKIPE TRPTYP
2384 032336 201 00 0 00 000422 MOVEI LPDOVT ;GET PDL TRAP LOCATION
2385 032337 202 00 0 00 032363 MOVEM TRPLOC ;SAVE ADR OF TRAP LOCATION
2386
2387 032340 200 00 0 00 032344 MOVE TRINST ;GET EXEC TRAP INSTRUCTION
2388 032341 250 00 1 00 032363 EXCH @TRPLOC ;STORE NEW & GET OLD TRAP INST
2389 032342 202 00 0 00 032362 MOVEM TRPSAV ;SAVE TO RESTORE LATER
2390 032343 263 17 0 00 000000 RTN
2391
2392 032344 264 00 0 00 032345 TRINST: JSR EXCTRP ;THIS WILL SAVE PC
2393 032345 000000 000000 EXCTRP: 0 ;PC GOES HERE
2394 032346 261 17 0 00 000001 PUT 1
2395 032347 200 01 0 00 032362 MOVE 1,TRPSAV ;GET ORIGINAL TRAP INST
2396 032350 202 01 1 00 032363 MOVEM 1,@TRPLOC ;RESTORE IT
2397
2398 032351 200 01 0 00 032345 COMCHK: MOVE 1,EXCTRP ;GET TRAP PC
2399 032352 553 00 0 00 000001 HRRZS 1 ;CLEAR LH(AC0)
2400 032353 312 01 0 00 032360 CAME 1,SHTRP ;TRAP WHERE SHOULD ?
2401 ERROR PDT0,13,SHTRP,1,BAD TRAP^
2402 032354 036 13 0 00 037646
2403 032355 035 00 0 00 031617 ERLOOP PDT0 ;IF ERROR, LOOP TO PDT0
2404 032356 262 17 0 00 000001 GET 1
2405 032357 254 02 1 00 032361 JRSTF @RETO ;RETURN TO PROG AT SUPPLIED ADR
2406
2407 ;*TRAP STORAGE
2408
2409 032360 000000 000000 SHTRP: 0 ;LOC WHERE SHOULD TRAP
2410 032361 000000 000000 RETO: 0 ;RETURN TO ADDRESS
2411 032362 000000 000000 TRPSAV: 0 ;ORIGINAL TRAP INST
2412 032363 000000 000000 TRPLOC: 0 ;ADR OF TRAP LOCATION
2413 032364 000000 000000 TRPTYP: 0 ;TRAP TYPE 0=AR, -1=PDL
2414 032365 123456 654321 TSTWD: 123456,,654321 ;TEST WORD
2415 032366 000000 000000 OVSTR1: 0 ;STACK FOR PDL TESTS
2416 032367 000000 000000 MTRZ: 0
2417 032370 000000 000000 MTRX: 0
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 41
DSKEAM MAC 29-Mar-78 14:55 TEST MAP INSTRUCTION SEQ 0102
2418 SUBTTL TEST MAP INSTRUCTION
2419
2420 SALL
2421 037651 T= SIXBTZ MAP INST TEST
2422 LALL
2423
2424 ;*PERFORM 'MAP' OF ADDRESS 0.
2425 ;*MAP READOUT SHOULD BE:
2426 ;*ACCESS, WRITEABLE, SOFTWARE, PAGED REF
2427
2428 SUBTST^
2429 032371 201 00 0 00 032371 MOVEI .
2430 032372 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
2431 032373 200 15 0 00 043737 MAPCK0: MOVE REPT,RPEAT
2432 032374 200 14 0 00 037654 MOVE COR,[161000,,0]
2433 032375 257 13 0 00 000000 MAP ACT,0 ;MAP FOR LOCATION 0
2434 032376 312 14 0 00 000013 CAME COR,ACT
2435 ERROR .-4,13,COR,ACT,MAP ADR 0,^
2436 SALL
2437 032377 036 13 0 00 037657
2438 032400 035 00 0 00 032374 ERLOOP .-4 ;IF ERROR, LOOP TO .-4
2439
2440 ;*PERFORM 'MAP' OF ADDRESS 337000,
2441 ;*HIGHEST EXEC PAGED MEMORY ADDRESS.
2442 ;*MAP READOUT SHOULD BE:
2443 ;*ACCESS, WRITABLE, SOFTWARE, PAGED REF
2444
2445 032401 200 14 0 00 037662 MAPCK1: MOVE COR,[161000,,337000]
2446 032402 257 13 0 00 337000 MAP ACT,337000 ;MAP FOR LOCATION 337000
2447 032403 312 14 0 00 000013 CAME COR,ACT
2448 ERROR .-4,13,COR,ACT,MAP ADR 337000,^
2449 032404 036 13 0 00 037666
2450 032405 035 00 0 00 032401 ERLOOP .-4 ;IF ERROR, LOOP TO .-4
2451
2452 ;*CLEAR PAGE MAP
2453
2454 032406 402 00 0 00 000200 MAPCK2: SETZM 200
2455 032407 200 07 0 00 037671 MOVE AC,[200,,201]
2456 032410 251 07 0 00 000417 BLT AC,417 ;CLEAR ALL OF PAGE MAP
2457 032411 7 010 20 0 00 020000 MAPCK9: CONO PAG,LTRPEN
2458 032412 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 42
DSKEAM MAC 29-Mar-78 14:55 TEST MAP INSTRUCTION SEQ 0103
2459 ;*PERFORM 'MAP' OF ADDRESS 400000,
2460 ;*LOWEST EPMP PAGING ADDRESS.
2461 ;*SINCE PAGE MAP IS CLEAR
2462 ;*MAP READOUT SHOULD BE:
2463 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2464
2465 032413 200 14 0 00 037672 MAPCK3: MOVE COR,[1000,,400000]
2466 032414 257 13 0 00 400000 MAP ACT,400000
2467 032415 312 14 0 00 000013 CAME COR,ACT
2468 ERROR MAPCK9,13,COR,ACT,MAP ADR 400000,PAGE MAP CLEAR^
2469 032416 036 13 0 00 037701
2470 032417 035 00 0 00 032411 ERLOOP MAPCK9 ;IF ERROR, LOOP TO MAPCK9
2471
2472 ;*PERFORM 'MAP' OF ADDRESS 777000,
2473 ;*HIGHEST EPMP PAGING ADDRESS.
2474 ;*SINCE PAGE MAP IS CLEAR
2475 ;*MAP READOUT SHOULD BE:
2476 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2477
2478 032420 200 14 0 00 037704 MAPCK4: MOVE COR,[1000,,777000]
2479 032421 257 13 0 00 777000 MAP ACT,777000
2480 032422 312 14 0 00 000013 CAME COR,ACT
2481 ERROR MAPCK9,13,COR,ACT,MAP ADR 777000,PAGE MAP CLEAR^
2482 032423 036 13 0 00 037710
2483 032424 035 00 0 00 032411 ERLOOP MAPCK9 ;IF ERROR, LOOP TO MAPCK9
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 43
DSKEAM MAC 29-Mar-78 14:55 TEST MAP INSTRUCTION SEQ 0104
2484 ;*SETUP EPMP FOR ADDRESS 400000 WITH ALL BUT ACCESS.
2485 ;*MAP READOUT SHOULD BE:
2486 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2487 ;*IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
2488 ;*SHOULD HAVE NO EFFECT.
2489
2490 032425 205 07 0 00 377777 MAPCK5: MOVSI AC,377777
2491 032426 202 07 0 00 000200 MOVEM AC,200 ;SET PAGE MAP TO ALL BUT ACCESS
2492 032427 200 14 0 00 037672 MOVE COR,[1000,,400000]
2493 032430 257 13 0 00 400000 MAP ACT,400000
2494 032431 312 14 0 00 000013 CAME COR,ACT
2495 ERROR MAPCK9,13,COR,ACT,MAP ADR 400000,ALL BUT ACCESS^
2496 032432 036 13 0 00 037716
2497 032433 035 00 0 00 032411 ERLOOP MAPCK9 ;IF ERROR, LOOP TO MAPCK9
2498
2499 ;*SETUP EPMP FOR ADDRESS 777000 WITH ALL BUT ACCESS.
2500 ;*MAP READOUT SHOULD BE:
2501 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2502 ;*IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
2503 ;*SHOULD HAVE NO EFFECT.
2504
2505 032434 201 07 0 00 377777 MAPCK6: MOVEI AC,377777
2506 032435 202 07 0 00 000377 MOVEM AC,377 ;SET PAGE MAP TO ALL BUT ACCESS
2507 032436 200 14 0 00 037704 MOVE COR,[1000,,777000]
2508 032437 257 13 0 00 777000 MAP ACT,777000
2509 032440 312 14 0 00 000013 CAME COR,ACT
2510 ERROR MAPCK9,13,COR,ACT,MAP ADR 777000,ALL BUT ACCESS^
2511 032441 036 13 0 00 037721
2512 032442 035 00 0 00 032411 ERLOOP MAPCK9 ;IF ERROR, LOOP TO MAPCK9
2513
2514 032443 367 15 0 00 032374 REPTLP MAPCK0+1
2515
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 44
DSKEAM MAC 29-Mar-78 14:55 TEST PAGE FAIL TRAPPING SEQ 0105
2516 SUBTTL TEST PAGE FAIL TRAPPING
2517
2518 SALL
2519 037724 T= SIXBTZ PAGE FAIL TRAP TEST
2520 LALL
2521
2522 ;*DO A 'MOVE' FROM LOCATION 400000.
2523 ;*SINCE PAGE MAP IS CLEAR THIS SHOULD PAGE FAIL.
2524
2525 SUBTST^
2526 032444 201 00 0 00 032444 MOVEI .
2527 032445 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
2528 032446 200 15 0 00 043737 PFAIL0: MOVE REPT,RPEAT
2529
2530 032447 402 00 0 00 000200 SETZM 200 ;CLEAR EXEC PAGE MAP
2531 032450 200 07 0 00 037671 MOVE AC,[200,,201]
2532 032451 251 07 0 00 000377 BLT AC,377
2533
2534 032452 7 004 20 0 00 001040 CONO PI,CHNOFF!PICHN2
2535 032453 7 000 20 0 00 020402 CONO APR,LCNXER!LAPRP2
2536 032454 476 00 0 00 000500 SETOM LEUPFW ;PRESET PAGE FAIL WORD
2537 032455 476 00 0 00 000501 SETOM LPFWPC ;PRESET PAGE FAIL PC
2538 032456 7 010 20 0 00 020000 CONO PAG,LTRPEN
2539 032457 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2540 032460 201 07 0 00 032467 MOVEI AC,PFAIL1
2541 032461 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP PAGE FAULT TRAP
2542
2543 032462 477 00 0 00 000013 SETOB 0,ACT ;PRESET AC
2544 032463 200 13 0 00 400000 MOVE ACT,400000 ;MAKE PAGING REF, SHOULD FAULT
2545 ERROR PFAIL0+1,13,0,ACT,TRAP FAILED,REF TO 400000^
2546 SALL
2547 032464 036 13 0 00 037735
2548 032465 035 00 0 00 032447 ERLOOP PFAIL0+1 ;IF ERROR, LOOP TO PFAIL0+1
2549 032466 254 00 0 00 032504 JRST PFAIL2 ;NO NEED TO CHECK PAGE FAIL WORD
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 45
DSKEAM MAC 29-Mar-78 14:55 TEST PAGE FAIL TRAPPING SEQ 0106
2550 ;*PAGE FAULT TRAP SHOULD RETURN HERE
2551
2552 032467 476 00 0 00 000014 PFAIL1: SETOM COR
2553 032470 312 14 0 00 000013 CAME COR,ACT
2554 ERROR PFAIL0+1,13,COR,ACT,PAGE FAIL STORED IN AC,REF TO 400000^
2555 032471 036 13 0 00 037744
2556 032472 035 00 0 00 032447 ERLOOP PFAIL0+1 ;IF ERROR, LOOP TO PFAIL0+1
2557 032473 200 13 0 00 000000 MOVE ACT,0
2558 032474 312 14 0 00 000013 CAME COR,ACT
2559 ERROR PFAIL0+1,13,COR,ACT,PAGE FAIL STORED IN 0,REF TO 400000^
2560 032475 036 13 0 00 037753
2561 032476 035 00 0 00 032447 ERLOOP PFAIL0+1 ;IF ERROR, LOOP TO PFAIL0+1
2562 032477 200 14 0 00 037672 MOVE COR,[1000,,400000] ;SETUP CORRECT WORD
2563 032500 200 13 0 00 000500 MOVE ACT,LEUPFW ;GET PAGE FAIL WORD
2564 032501 312 14 0 00 000013 CAME COR,ACT
2565 ERROR PFAIL0+1,13,COR,ACT,PAGE FAIL WORD WRONG,REF TO 400000^
2566 032502 036 13 0 00 037762
2567 032503 035 00 0 00 032447 ERLOOP PFAIL0+1 ;IF ERROR, LOOP TO PFAIL0+1
2568
2569 ;*PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY
2570
2571 032504 7 000 30 0 00 000400 PFAIL2: CONSZ APR,LNXMER
2572 ERROR PFAIL0+1,13,COR,ACT,NON-X-MEM,REF TO 400000^
2573 032505 036 13 0 00 037767
2574 032506 035 00 0 00 032447 ERLOOP PFAIL0+1 ;IF ERROR, LOOP TO PFAIL0+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 46
DSKEAM MAC 29-Mar-78 14:55 TEST PAGE FAIL TRAPPING SEQ 0107
2575 ;*CHECK PAGE FAIL WORD FOR MAXIMUM ADDRESS
2576 ;*DO A 'MOVE' FROM LOCATION 777777.
2577
2578 032507 7 000 20 0 00 020402 PFAIL3: CONO APR,LCNXER!LAPRP2
2579 032510 402 00 0 00 000500 SETZM LEUPFW ;PRESET PAGE FAIL WORD
2580 032511 7 010 20 0 00 020000 CONO PAG,LTRPEN
2581 032512 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2582 032513 201 07 0 00 032522 MOVEI AC,PFAIL4
2583 032514 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP PAGE FAULT TRAP
2584 032515 403 00 0 00 000013 SETZB 0,ACT ;PRESET AC
2585 032516 200 13 0 00 777777 MOVE ACT,777777 ;MAKE PAGING REF, SHOULD FAULT
2586 ERROR PFAIL3,13,0,ACT,TRAP FAILED,REF TO 777777^
2587 032517 036 13 0 00 037775
2588 032520 035 00 0 00 032507 ERLOOP PFAIL3 ;IF ERROR, LOOP TO PFAIL3
2589 032521 254 00 0 00 032537 JRST PFAIL5
2590
2591 ;*PAGE FAULT TRAP SHOULD RETURN HERE
2592
2593 032522 402 00 0 00 000014 PFAIL4: SETZM COR
2594 032523 312 14 0 00 000013 CAME COR,ACT
2595 ERROR PFAIL3,13,COR,ACT,PAGE FAIL STORED IN AC,REF TO 777777^
2596 032524 036 13 0 00 040000
2597 032525 035 00 0 00 032507 ERLOOP PFAIL3 ;IF ERROR, LOOP TO PFAIL3
2598 032526 200 13 0 00 000000 MOVE ACT,0
2599 032527 312 14 0 00 000013 CAME COR,ACT
2600 ERROR PFAIL3,13,COR,ACT,PAGE FAIL STORED IN 0,REF TO 777777^
2601 032530 036 13 0 00 040003
2602 032531 035 00 0 00 032507 ERLOOP PFAIL3 ;IF ERROR, LOOP TO PFAIL3
2603 032532 200 14 0 00 040006 MOVE COR,[1000,,777777] ;SETUP CORRECT WORD
2604 032533 200 13 0 00 000500 MOVE ACT,LEUPFW ;GET PAGE FAIL WORD
2605 032534 312 14 0 00 000013 CAME COR,ACT
2606 ERROR PFAIL3,13,COR,ACT,PAGE FAIL WORD WRONG,REF TO 777777^
2607 032535 036 13 0 00 040007
2608 032536 035 00 0 00 032507 ERLOOP PFAIL3 ;IF ERROR, LOOP TO PFAIL3
2609
2610 ;*PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY
2611
2612 032537 7 000 30 0 00 000400 PFAIL5: CONSZ APR,LNXMER
2613 ERROR PFAIL3,13,COR,ACT,NON-X-MEM,REF TO 777777^
2614 032540 036 13 0 00 040012
2615 032541 035 00 0 00 032507 ERLOOP PFAIL3 ;IF ERROR, LOOP TO PFAIL3
2616
2617 ;*RESET PAGE FAULT TRAP
2618
2619 032542 200 07 0 00 043736 PFAIL6: MOVE AC,PGFAIL
2620 032543 202 07 0 00 000502 MOVEM AC,LPGFTR
2621 032544 7 000 20 0 00 020402 CONO APR,LCNXER!LAPRP2
2622 032545 7 004 20 0 00 002040 CONO PI,LCHNON!LPICH2 ;RE-ENABLE INTERRUPTS
2623
2624 032546 367 15 0 00 032447 REPTLP PFAIL0+1
2625 XLIST
2626 LIST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 52
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC-PER-PROCESS MAPPING SEQ 0108
2627 SUBTTL TEST EXEC-PER-PROCESS MAPPING
2628
2629 SALL
2630 040015 T= SIXBTZ EXEC-PER-PROCESS MAP TEST
2631 LALL
2632
2633 SUBTST^
2634 032547 201 00 0 00 032547 MOVEI .
2635 032550 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
2636 032551 200 15 0 00 043737 EPPM0: MOVE REPT,RPEAT
2637 032552 402 00 0 00 000200 SETZM 200 ;CLEAR ALL OF PAGE MAP
2638 032553 200 07 0 00 037671 MOVE AC,[200,,201]
2639 032554 251 07 0 00 000417 BLT AC,417
2640 032555 7 010 20 0 00 020000 EPPM9: CONO PAG,LTRPEN
2641 032556 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2642
2643 ;*PERFORM 'MAP' OF ADDRESS 340000
2644 ;*LOWEST UPMP EXEC-PER-PROCESS ADDRESS.
2645 ;*SINCE PAGE MAP IS CLEAR
2646 ;*MAP READOUT SHOULD BE:
2647 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2648
2649 032557 200 14 0 00 040022 EPPM1: MOVE COR,[1000,,340000]
2650 032560 257 13 0 00 340000 MAP ACT,340000
2651 032561 312 14 0 00 000013 CAME COR,ACT
2652 ERROR EPPM9,13,COR,ACT,MAP ADR 340000,PAGE MAP CLEAR^
2653 SALL
2654 032562 036 13 0 00 040026
2655 032563 035 00 0 00 032555 ERLOOP EPPM9 ;IF ERROR, LOOP TO EPPM9
2656
2657 ;*PERFORM 'MAP' OF ADDRESS 377000
2658 ;*HIGHEST UPMP EXEC-PER-PROCESS ADDRESS.
2659 ;*SINCE PAGE MAP IS CLEAR
2660 ;*MAP READOUT SHOULD BE:
2661 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2662
2663 032564 200 14 0 00 040031 EPPM2: MOVE COR,[1000,,377000]
2664 032565 257 13 0 00 377000 MAP ACT,377000
2665 032566 312 14 0 00 000013 CAME COR,ACT
2666 ERROR EPPM9,13,COR,ACT,MAP ADR 377000,PAGE MAP CLEAR^
2667 032567 036 13 0 00 040035
2668 032570 035 00 0 00 032555 ERLOOP EPPM9 ;IF ERROR, LOOP TO EPPM9
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 53
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC-PER-PROCESS MAPPING SEQ 0109
2669 ;*SETUP UPMP FOR ADDRESS 340000 WITH ALL BUT ACCESS.
2670 ;*MAP READOUT SHOULD BE:
2671 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2672
2673 032571 205 07 0 00 377777 EPPM3: MOVSI AC,377777
2674 032572 202 07 0 00 000400 MOVEM AC,400
2675 032573 200 14 0 00 040022 MOVE COR,[1000,,340000]
2676 032574 257 13 0 00 340000 MAP ACT,340000
2677 032575 312 14 0 00 000013 CAME COR,ACT
2678 ERROR EPPM9,13,COR,ACT,MAP ADR 340000,ALL BUT ACCESS^
2679 032576 036 13 0 00 040040
2680 032577 035 00 0 00 032555 ERLOOP EPPM9 ;IF ERROR, LOOP TO EPPM9
2681
2682 ;*SETUP UPMP FOR ADDRESS 377000 WITH ALL BUT ACCESS
2683 ;*MAP READOUT SHOULD BE:
2684 ;*PAGE FAIL, PAGING MEMORY NO MATCH.
2685
2686 032600 201 07 0 00 377777 EPPM4: MOVEI AC,377777
2687 032601 202 07 0 00 000417 MOVEM AC,417
2688 032602 200 14 0 00 040031 MOVE COR,[1000,,377000]
2689 032603 257 13 0 00 377000 MAP ACT,377000
2690 032604 312 14 0 00 000013 CAME COR,ACT
2691 ERROR EPPM9,13,COR,ACT,MAP ADR 377000,ALL BUT ACCESS^
2692 032605 036 13 0 00 040043
2693 032606 035 00 0 00 032555 ERLOOP EPPM9 ;IF ERROR, LOOP TO EPPM9
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 54
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC-PER-PROCESS MAPPING SEQ 0110
2694 032607 201 07 0 00 740000 EPPM5: MOVEI AC,740000
2695 032610 202 07 0 00 000417 MOVEM AC,417 ;SETUP P-P MAP FOR PAGE 377
2696 032611 205 07 0 00 757777 MOVSI AC,757777
2697 032612 202 07 0 00 000400 MOVEM AC,400 ;SETUP P-P MAP FOR PAGE 340
2698
2699 ;*UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 377 WITH
2700 ;*ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 0.
2701 ;*'DATAO PAG' CLEARS PAGING MEMORY THEREFORE 'MAP'
2702 ;*SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
2703 ;*FROM UPMP EXEC-PER-PROCESS MAP AND LOAD PAGING MEMORY
2704 ;*WITH PAGE ADDRESS 377.
2705 ;*THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
2706 ;*BY THE MAP INSTRUCTION.
2707 ;*READOUT OF THE LOADED PAGING MEMORY (BY 'CONI PAG')
2708 ;*SHOULD BE:
2709 ;*PAGE 377',EXEC MEMORY SPACE, RELOAD COUNTER.
2710
2711 032613 7 010 20 0 00 020000 EPPM6: CONO PAG,LTRPEN ;CLEAR RELOAD CNTR
2712 032614 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2713 032615 200 14 0 00 037654 MOVE COR,[161000,,0]
2714 032616 257 13 0 00 377000 MAP ACT,377000 ;'MAP'
2715 032617 312 14 0 00 000013 CAME COR,ACT
2716 ERROR EPPM6,13,COR,ACT,MAP READOUT FAILURE,MAP ADR 377000^
2717 032620 036 13 0 00 040052
2718 032621 035 00 0 00 032613 ERLOOP EPPM6 ;IF ERROR, LOOP TO EPPM6
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 55
DSKEAM MAC 29-Mar-78 14:55 TEST EXEC-PER-PROCESS MAPPING SEQ 0111
2719 ;*UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 340 WITH
2720 ;*ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 03777.
2721 ;*'DATAO PAG' CLEARS PAGING MEMORY THEREFORE 'MAP'
2722 ;*SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
2723 ;*FROM UPMP EXEC-PER-PROCESS MAP AND LOAD PAGING MEMORY
2724 ;*WITH PAGE ADDRESS 340.
2725 ;*THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
2726 ;*BY THE MAP INSTRUCTION.
2727 ;*READOUT OF THE LOADED PAGING MEMORY (BY 'CONI PAG')
2728 ;*SHOULD BE:
2729 ;*PAGE 340',EXEC MEMORY SPACE, RELOAD COUNTER.
2730
2731 032622 7 010 20 0 00 020000 EPPM7: CONO PAG,LTRPEN
2732 032623 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2733 032624 200 14 0 00 040055 MOVE COR,[161003,,777000]
2734 032625 257 13 0 00 340000 MAP ACT,340000 ;'MAP'
2735 032626 312 14 0 00 000013 CAME COR,ACT
2736 ERROR EPPM7,13,COR,ACT,MAP READOUT FAILURE,MAP ADR 340000^
2737 032627 036 13 0 00 040056
2738 032630 035 00 0 00 032622 ERLOOP EPPM7 ;IF ERROR, LOOP TO EPPM7
2739
2740 032631 367 15 0 00 032552 REPTLP EPPM0+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 56
DSKEAM MAC 29-Mar-78 14:55 TEST PAGING AND SCRATCHPAD MEMORIES SEQ 0112
2741 SUBTTL TEST PAGING AND SCRATCHPAD MEMORIES
2742
2743 ;*PAGE MAP IS SETUP FOR 42 PAGES WITH DATA THAT PRODUCES
2744 ;*FLOATING BIT PATTERNS IN BOTH THE PAGING MEMORY
2745 ;*AND THE SCRATCHPAD MEMORY TO CHECK REGISTER AND BIT INTERACTION.
2746 ;*ALL PAGING ADDRESSES ARE SETUP SO PAGING MUST REFILL ON EVERY
2747 ;*OPERATION. THIS SHOULD VERIFY THAT THE PAGING REFILL OPERATION
2748 ;*AND THE PAGING AND SCRATCHPAD REGISTERS ARE OPERATIONAL.
2749
2750 SALL
2751 040061 T= SIXBTZ FLOATING BIT TEST
2752 LALL
2753
2754 SUBTST^
2755 032632 201 00 0 00 032632 MOVEI .
2756 032633 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
2757 032634 200 15 0 00 043737 AMTST4: MOVE REPT,RPEAT
2758 032635 402 00 0 00 000200 SETZM 200 ;CLEAR PAGE MAP
2759 032636 200 07 0 00 037671 MOVE AC,[200,,201]
2760 032637 251 07 0 00 000417 BLT AC,417
2761
2762 032640 205 05 0 00 777726 AMTST5: MOVSI INDX,-^D42 ;SETUP PAGE MAP FOR
2763 032641 200 07 0 05 035464 MOVE AC,AMTAB1(INDX) ;42 PAGES WITH DATA
2764 032642 550 10 0 00 000007 HRRZ AC1,AC ;THAT PRODUCES FLOATING
2765 032643 242 10 0 00 777777 LSH AC1,-1 ;BIT PATTERNS TO TEST
2766 032644 305 10 0 00 000200 CAIGE AC1,200 ;PAGING AND SCRATCHPAD
2767 032645 271 10 0 00 000220 ADDI AC1,220 ;MEMORIES.
2768 032646 606 07 0 00 000001 TRNN AC,1
2769 032647 502 07 0 10 000000 HLLM AC,(AC1)
2770 032650 602 07 0 00 000001 TRNE AC,1
2771 032651 546 07 0 10 000000 HLRM AC,(AC1)
2772 032652 253 05 0 00 032641 AOBJN INDX,AMTST5+1
2773
2774 032653 201 06 0 00 000144 MOVEI CNTR,^D100 ;CYCLE FLT BITS FOR 100 PASSES
2775 032654 205 05 0 00 777726 MOVSI INDX,-^D42 ;SETUP FOR 42 PAGING REF'S
2776 032655 201 11 0 00 000040 MOVEI AC2,^D32
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 57
DSKEAM MAC 29-Mar-78 14:55 TEST PAGING AND SCRATCHPAD MEMORIES SEQ 0113
2777 032656 7 010 20 0 00 020000 CONO PAG,LTRPEN
2778 032657 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2779 032660 554 14 0 05 035464 AMTST6: HLRZ COR,AMTAB1(INDX) ;SETUP FOR MAP READOUT
2780 032661 242 14 0 00 000011 LSH COR,^D9
2781 032662 621 14 0 00 000014 TLZ COR,14 ;ONLY 11 BITS OF RELOCATION
2782 032663 661 14 0 00 001000 TLO COR,1000 ;SET PAGED REF BIT
2783 032664 623 14 0 00 000400 TLZE COR,400 ;ACCESS
2784 032665 661 14 0 00 100000 TLO COR,100000
2785 032666 621 14 0 00 000200 TLZ COR,200 ;NO PUBLIC
2786 032667 623 14 0 00 000100 TLZE COR,100 ;WRITABLE
2787 032670 661 14 0 00 040000 TLO COR,40000
2788 032671 623 14 0 00 000040 TLZE COR,40 ;SOFTWARE
2789 032672 661 14 0 00 020000 TLO COR,20000
2790 032673 623 14 0 00 000020 TLZE COR,20 ;CACHE
2791 032674 661 14 0 00 002000 TLO COR,2000
2792 032675 550 07 0 05 035464 HRRZ AC,AMTAB1(INDX) ;SETUP MAPPING ADDRESS
2793 032676 242 07 0 00 000011 LSH AC,^D9
2794 032677 257 13 0 07 000000 MAP ACT,(AC) ;'MAP'
2795 032700 312 14 0 00 000013 CAME COR,ACT
2796 ERROR AMTST6-2,13,COR,ACT,MAP READOUT FAILURE,,AMTSTX^
2797 SALL
2798 032701 036 13 0 00 040064
2799 032702 035 00 0 00 032656 ERLOOP AMTST6-2 ;IF ERROR, LOOP TO AMTST6-2
2800
2801 032703 253 05 0 00 032660 AOBJN INDX,AMTST6 ;DO 42 DIF REF
2802
2803 032704 365 06 0 00 032654 SOJGE CNTR,AMTST6-4 ;CYCLE MEMORIES, ETC.
2804
2805 032705 367 15 0 00 032635 REPTLP AMTST4+1
2806 032706 254 00 0 00 032714 JRST AMTST7-2
2807
2808 032707 037 02 0 00 040067 AMTSTX: PSIXM SIXBTZ <REF TO >^ [SIXBIT\REF TO _\]^
2809 032710 200 00 0 00 000007 MOVE AC
2810 032711 037 06 0 00 000000 PNT6
2811 032712 037 00 0 00 030242 PCRL
2812 032713 263 17 0 00 000000 RTN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 58
DSKEAM MAC 29-Mar-78 14:55 TEST PAGING AND SCRATCHPAD MEMORIES SEQ 0114
2813 ;*CLEAR PAGING MEMORY AND PAGE MAP
2814 ;*CHECK THAT ALL PREVIOUS REFERENCES TRAP
2815 ;*SHOULD IF AM IS REALLY CLEAR
2816
2817 SALL
2818 040071 T= SIXBTZ TRAP TEST
2819 LALL
2820
2821 SUBTST^
2822 032714 201 00 0 00 032714 MOVEI .
2823 032715 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
2824 032716 201 15 0 00 000001 AMTST7: MOVEI REPT,1
2825 032717 402 00 0 00 000200 SETZM 200 ;DO ONCE ONLY
2826 032720 200 07 0 00 037671 MOVE AC,[200,,201]
2827 032721 251 07 0 00 000417 BLT AC,417 ;CLEAR PAGE MAP
2828 032722 200 07 0 00 030024 MOVE AC,ITRCNT
2829 032723 602 07 0 00 000001 TRNE AC,1 ;ALTERNATE CLEARING AM
2830 032724 7 010 20 0 00 020000 CONO PAG,LTRPEN
2831 032725 606 07 0 00 000001 TRNN AC,1
2832 032726 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2833 032727 205 05 0 00 777726 MOVSI INDX,-^D42
2834 032730 201 07 0 00 032741 MOVEI AC,AMTST9
2835 032731 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE TRAP
2836
2837 032732 550 14 0 05 035464 AMTST8: HRRZ COR,AMTAB1(INDX) ;SETUP REFERANCE ADDRESS
2838 032733 242 14 0 00 000011 LSH COR,^D9
2839 032734 477 00 0 00 000013 SETOB 0,ACT
2840 032735 200 13 0 14 000000 MOVE ACT,(COR) ;SHOULD FAIL
2841 ERROR AMTST8,13,COR,ACT,TRAP FAILED,<REF TO (CORRECT)>^
2842 SALL
2843 032736 036 13 0 00 040076
2844 032737 035 00 0 00 032732 ERLOOP AMTST8 ;IF ERROR, LOOP TO AMTST8
2845 032740 254 00 0 00 032760 JRST AMTSTA
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 59
DSKEAM MAC 29-Mar-78 14:55 TEST PAGING AND SCRATCHPAD MEMORIES SEQ 0115
2846 032741 476 00 0 00 000014 AMTST9: SETOM COR
2847 032742 312 14 0 00 000013 CAME COR,ACT
2848 ERROR AMTST7,13,COR,ACT,PAGE FAIL STORED IN AC,^
2849 032743 036 13 0 00 040101
2850 032744 035 00 0 00 032716 ERLOOP AMTST7 ;IF ERROR, LOOP TO AMTST7
2851 032745 200 13 0 00 000000 MOVE ACT,0
2852 032746 312 14 0 00 000013 CAME COR,ACT
2853 ERROR AMTST7,13,COR,ACT,PAGE FAIL STORED IN 0,^
2854 032747 036 13 0 00 040104
2855 032750 035 00 0 00 032716 ERLOOP AMTST7 ;IF ERROR, LOOP TO AMTST7
2856 032751 550 14 0 05 035464 HRRZ COR,AMTAB1(INDX) ;SETUP CORRECT PAGE FAIL WORD
2857 032752 242 14 0 00 000011 LSH COR,^D9
2858 032753 661 14 0 00 001000 TLO COR,1000 ;SET PAGED REF BIT
2859 032754 200 13 0 00 000500 MOVE ACT,LEUPFW ;GET PAGE FAIL WORD
2860 032755 312 14 0 00 000013 CAME COR,ACT
2861 ERROR AMTST7,13,COR,ACT,PAGE FAIL WORD WRONG,^
2862 032756 036 13 0 00 040107
2863 032757 035 00 0 00 032716 ERLOOP AMTST7 ;IF ERROR, LOOP TO AMTST7
2864
2865 032760 253 05 0 00 032732 AMTSTA: AOBJN INDX,AMTST8
2866
2867 032761 367 15 0 00 032717 REPTLP AMTST7+1
2868
2869 032762 200 07 0 00 043736 MOVE AC,PGFAIL ;RESET PAGE FAULT TRAP
2870 032763 202 07 0 00 000502 MOVEM AC,LPGFTR
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 60
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA READ SEQ 0116
2871 SUBTTL TEST PAGED DATA READ
2872
2873 ;*USING PAGING ADDRESSES 400XXX AND 777XXX
2874
2875 SALL
2876 040112 T= SIXBTZ PAGED DATA READ TEST
2877 LALL
2878
2879 SUBTST^
2880 032764 201 00 0 00 032764 MOVEI .
2881 032765 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
2882 032766 200 15 0 00 043737 PAGRDA: MOVE REPT,RPEAT
2883 032767 402 00 0 00 000200 SETZM 200 ;CLEAR AND SETUP PAGE MAP
2884 032770 200 07 0 00 037671 MOVE AC,[200,,201]
2885 032771 251 07 0 00 000417 BLT AC,417
2886 032772 205 07 0 00 740033 MOVSI AC,740000!<PGR400_-^D9>
2887 032773 202 07 0 00 000200 MOVEM AC,200
2888 032774 201 07 0 00 740033 MOVEI AC,740000!<PGR777_-^D9>
2889 032775 202 07 0 00 000377 MOVEM AC,377
2890
2891 ;*TEST A 'MOVE' USING AN 'E' ADDRESS THAT CAUSES PAGING.
2892 ;*'E' = PAGE 400 (HIGH ORDER 9 BITS),
2893 ;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGR400' ADDRESS.
2894 ;*PAGE MAP RELOCATION BITS SETUP FOR
2895 ;*HIGH ORDER 9 BITS OF 'PGR400' ADDRESS.
2896 ;*THEREFORE ACTUAL ADDRESS FOR 'MOVE' IS:
2897 ;*HIGH ORDER 9 BITS FROM PAGE MAP AND
2898 ;*LOW ORDER 9 BITS OF 'PGR400' ADDRESS.
2899
2900 032776 7 010 20 0 00 020000 PAGRDB: CONO PAG,LTRPEN ;CLEAR MEMORIES, ETC.
2901 032777 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2902 033000 200 14 0 00 033014 MOVE COR,PGR400
2903 033001 200 13 0 00 400014 MOVE ACT,400000!<PGR400&777> ;MAKE PAGED READ
2904 033002 312 14 0 00 000013 CAME COR,ACT
2905 ERROR PAGRDB,13,COR,ACT,DATA ERROR,ADR 400XXX^
2906 SALL
2907 033003 036 13 0 00 040122
2908 033004 035 00 0 00 032776 ERLOOP PAGRDB ;IF ERROR, LOOP TO PAGRDB
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 61
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA READ SEQ 0117
2909 ;*TEST A 'MOVE' USING AN 'E' ADDRESS THAT CAUSES PAGING.
2910 ;*'E' = PAGE 777 (HIGH ORDER 9 BITS),
2911 ;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGR777' ADDRESS.
2912 ;*PAGE MAP RELOCATION BITS SETUP FOR
2913 ;*HIGH ORDER 9 BITS OF 'PGR777' ADDRESS.
2914 ;*THEREFORE ACTUAL ADDRESS FOR 'MOVE' IS:
2915 ;*HIGH ORDER 9 BITS FROM PAGE MAP AND
2916 ;*LOW ORDER 9 BITS OF 'PGR777' ADDRESS.
2917
2918 033005 200 14 0 00 033015 PAGRDC: MOVE COR,PGR777
2919 033006 200 13 0 00 400015 MOVE ACT,400000!<PGR777&777> ;MAKE PAGED READ
2920 033007 312 14 0 00 000013 CAME COR,ACT
2921 ERROR1 13,COR,ACT,DATA ERROR,ADR 777XXX^
2922 033010 036 13 0 00 040127
2923 033011 035 00 0 00 033005 ERLOOP .-4
2924
2925 033012 367 15 0 00 032767 REPTLP PAGRDA+1
2926
2927 033013 254 00 0 00 033016 JRST PAGRD0-2
2928
2929 033014 377777 400000 PGR400: 377777,,400000 ;DATA FOR PAGE 400
2930 033015 000777 777000 PGR777: 000777,,777000 ;DATA FOR PAGE 777
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 62
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA READ SEQ 0118
2931 ;*TEST READ OF DATA FROM A DATA BLOCK
2932 ;*USING PAGED REFERENCES THAT POINT TO
2933 ;*CONSECUTIVE DATA WORDS IN AN EXEC UNPAGED
2934 ;*MEMORY AREA.
2935 ;*DATA CONSISTS OF COMPLEMENT OF AND
2936 ;*PAGING REFERENCE ADDRESS.
2937
2938 SUBTST^
2939 033016 201 00 0 00 033016 MOVEI .
2940 033017 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
2941 033020 200 15 0 00 043737 PAGRD0: MOVE REPT,RPEAT
2942 033021 221 15 0 00 000012 IMULI REPT,^D10 ;FSTCYL=10 PASSES, REL=100 PASSES
2943 033022 205 05 0 00 777340 MOVSI INDX,-440 ;340-777=440 PAGES
2944 033023 201 07 0 00 000340 MOVEI AC,340 ;SETUP FOR FIRST PAGING ADDRESS
2945
2946 033024 200 10 0 00 000007 PAGRD1: MOVE AC1,AC ;SETUP DATA WORD
2947 033025 242 10 0 00 000011 LSH AC1,^D9 ;COMPL ADR,,PAGED ADR
2948 033026 661 10 0 00 777777 TLO AC1,-1
2949 033027 621 10 0 10 000000 TLZ AC1,(AC1)
2950 033030 202 10 0 05 043742 MOVEM AC1,PGRDTB(INDX)
2951 033031 602 07 0 00 000001 TRNE AC,1
2952 033032 254 00 0 00 033050 JRST PAGRD2
2953 033033 201 11 0 05 043742 MOVEI AC2,PGRDTB(INDX)
2954 033034 242 11 0 00 777767 LSH AC2,-^D9 ;SETUP PAGE MAP FOR EVEN HI-ORDER
2955 033035 271 11 0 00 740000 ADDI AC2,740000 ;INCLUDE ACCESS, ETC.
2956 033036 504 12 0 00 000011 HRL AC3,AC2
2957 033037 201 11 0 05 043743 MOVEI AC2,PGRDTB+1(INDX)
2958 033040 242 11 0 00 777767 LSH AC2,-^D9 ;SETUP PAGE MAP FOR ODD HI-ORDER
2959 033041 271 11 0 00 740000 ADDI AC2,740000 ;INCLUDE ACCESS, ETC.
2960 033042 540 12 0 00 000011 HRR AC3,AC2
2961 033043 550 10 0 00 000007 HRRZ AC1,AC ;SETUP PAGE MAP
2962 033044 242 10 0 00 777777 LSH AC1,-1
2963 033045 305 10 0 00 000200 CAIGE AC1,200
2964 033046 271 10 0 00 000220 ADDI AC1,220
2965 033047 202 12 0 10 000000 MOVEM AC3,(AC1) ;MOVE RELOCATION DATA TO PAGE MAP
2966 033050 350 00 0 00 000007 PAGRD2: AOS AC
2967 033051 253 05 0 00 033024 AOBJN INDX,PAGRD1
2968
2969 033052 7 010 20 0 00 020000 PAGRD3: CONO PAG,LTRPEN ;CLEAR AM, ETC.
2970 033053 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
2971 033054 205 05 0 00 777340 MOVSI INDX,-440
2972 033055 201 07 0 00 000340 MOVEI AC,340
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 63
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA READ SEQ 0119
2973 033056 200 14 0 00 000007 PAGRD4: MOVE COR,AC ;SETUP CORRECT RESULTS
2974 033057 242 14 0 00 000011 LSH COR,^D9
2975 033060 661 14 0 00 777777 TLO COR,-1
2976 033061 621 14 0 14 000000 TLZ COR,(COR)
2977 033062 201 10 0 05 043742 MOVEI AC1,PGRDTB(INDX) ;SETUP PAGING ADDRESS
2978 033063 405 10 0 00 000777 ANDI AC1,777
2979 033064 271 10 0 14 000000 ADDI AC1,(COR)
2980 033065 200 13 0 10 000000 MOVE ACT,(AC1) ;MAKE PAGED MEMORY READ
2981 033066 312 14 0 00 000013 CAME COR,ACT ;ADDRESSES GO FROM 340XXX TO 777XXX
2982 ERROR PAGRD4,13,COR,ACT,DATA ERROR,INC PAGING ADR'S,PAGRDX^
2983 033067 036 13 0 00 040135
2984 033070 035 00 0 00 033056 ERLOOP PAGRD4 ;IF ERROR, LOOP TO PAGRD4
2985 033071 350 00 0 00 000007 AOS AC ;INCREMENT PAGING ADDRESS
2986 033072 253 05 0 00 033056 AOBJN INDX,PAGRD4
2987
2988 033073 205 05 0 00 777340 PAGRD5: MOVSI INDX,-440
2989 033074 201 07 0 00 000777 MOVEI AC,777
2990
2991 033075 200 14 0 00 000007 MOVE COR,AC ;MAKE REVERSE PAGED MEMORY READ
2992 033076 242 14 0 00 000011 LSH COR,^D9 ;ADDRESSES GO FROM 777XXX TO 340XXX
2993 033077 661 14 0 00 777777 TLO COR,-1
2994 033100 621 14 0 14 000000 TLZ COR,(COR)
2995 033101 201 10 0 00 044401 MOVEI AC1,PGRDTB+437
2996 033102 275 10 0 05 000000 SUBI AC1,(INDX)
2997 033103 405 10 0 00 000777 ANDI AC1,777
2998 033104 271 10 0 14 000000 ADDI AC1,(COR)
2999 033105 200 13 0 10 000000 MOVE ACT,(AC1)
3000 033106 312 14 0 00 000013 CAME COR,ACT
3001 ERROR PAGRD5+2,13,COR,ACT,DATA ERROR,REVERSE READ,PAGRDX^
3002 033107 036 13 0 00 040143
3003 033110 035 00 0 00 033075 ERLOOP PAGRD5+2 ;IF ERROR, LOOP TO PAGRD5+2
3004 033111 370 00 0 00 000007 SOS AC
3005 033112 253 05 0 00 033075 AOBJN INDX,PAGRD5+2
3006
3007 033113 367 15 0 00 033052 REPTLP PAGRD3
3008 033114 254 00 0 00 033122 JRST PGWRTA-2
3009
3010 033115 037 02 0 00 040067 PAGRDX: PSIXM SIXBTZ <REF TO >^ [SIXBIT\REF TO _\]^
3011 033116 200 00 0 00 000010 MOVE AC1
3012 033117 037 06 0 00 000000 PNT6
3013 033120 037 00 0 00 030242 PCRL
3014 033121 263 17 0 00 000000 RTN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 64
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA WRITE SEQ 0120
3015 SUBTTL TEST PAGED DATA WRITE
3016
3017 ;*USING PAGING ADDRESS 400XXX AND 777XXX
3018 ;*PAGING REFERENCES POINT TO EXEC UNPAGED ADDRESSES.
3019
3020 SALL
3021 040146 T= SIXBTZ PAGED DATA WRITE TEST
3022 LALL
3023
3024 SUBTST^
3025 033122 201 00 0 00 033122 MOVEI .
3026 033123 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3027 033124 200 15 0 00 043737 PGWRTA: MOVE REPT,RPEAT
3028 033125 402 00 0 00 000200 SETZM 200 ;CLEAR AND SETUP PAGE MAP
3029 033126 200 07 0 00 037671 MOVE AC,[200,,201]
3030 033127 251 07 0 00 000417 BLT AC,417
3031 033130 205 07 0 00 740033 MOVSI AC,740000!<PGW400_-^D9>
3032 033131 202 07 0 00 000200 MOVEM AC,200
3033 033132 201 07 0 00 740033 MOVEI AC,740000!<PGW777_-^D9>
3034 033133 202 07 0 00 000377 MOVEM AC,377
3035
3036 ;*TEST A 'MOVEM' USING AN 'E' ADDRESS THAT CAUSES PAGING.
3037 ;*'E' = PAGE 400 (HIGH ORDER 9 BITS),
3038 ;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGW400' ADDRESS.
3039 ;*PAGE MAP RELOCATION BITS SETUP FOR
3040 ;*HIGH ORDER 9 BITS OF 'PGW400' ADDRESS.
3041 ;*THEREFORE ACTUAL ADDRESS FOR 'MOVEM' IS:
3042 ;*HIGH ORDER 9 BITS FROM PAGE MAP AND
3043 ;*LOW ORDER 9 BITS OF 'PGW400' ADDRESS.
3044
3045 033134 7 010 20 0 00 020000 PGWTBB: CONO PAG,LTRPEN ;CLEAR MEMORIES, ETC.
3046 033135 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3047 033136 402 00 0 00 033170 SETZM PGW400
3048 033137 200 14 0 00 040152 MOVE COR,[377000,,400777]
3049 033140 202 14 0 00 400170 MOVEM COR,400000!<PGW400&777> ;MAKE PAGED WRITE
3050 033141 476 00 0 00 000013 SETOM ACT
3051 033142 200 13 0 00 400170 MOVE ACT,400000!<PGW400&777> ;PAGED REREAD VERIFY
3052 033143 312 14 0 00 000013 CAME COR,ACT
3053 ERROR PGWTBB,13,COR,ACT,PAGED REREAD,ADR 400XXX^
3054 SALL
3055 033144 036 13 0 00 040156
3056 033145 035 00 0 00 033134 ERLOOP PGWTBB ;IF ERROR, LOOP TO PGWTBB
3057 033146 200 13 0 00 033170 MOVE ACT,PGW400 ;DIRECT REREAD VERIFY
3058 033147 312 14 0 00 000013 CAME COR,ACT
3059 ERROR PGWTBB,13,COR,ACT,DIRECT REREAD,ADR 400XXX^
3060 033150 036 13 0 00 040164
3061 033151 035 00 0 00 033134 ERLOOP PGWTBB ;IF ERROR, LOOP TO PGWTBB
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 65
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA WRITE SEQ 0121
3062 ;*TEST A 'MOVEM' USING AN 'E' ADDRESS THAT CAUSES PAGING.
3063 ;*'E' = PAGE 777 (HIGH ORDER 9 BITS),
3064 ;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGW777' ADDRESS.
3065 ;*PAGE MAP RELOCATION BITS SETUP FOR
3066 ;*HIGH ORDER 9 BITS OF 'PGW777' ADDRESS.
3067 ;*THEREFORE ACTUAL ADDRESS FOR 'MOVEM' IS:
3068 ;*HIGH ORDER 9 BITS FROM PAGE MAP AND
3069 ;*LOW ORDER 9 BITS OF 'PGW777' ADDRESS.
3070
3071 033152 402 00 0 00 033171 PGWRTC: SETZM PGW777
3072 033153 200 14 0 00 040167 MOVE COR,[000777,,777000]
3073 033154 202 14 0 00 777171 MOVEM COR,777000!<PGW777&777> ;MAKE PAGED WRITE
3074 033155 476 00 0 00 000013 SETOM ACT
3075 033156 200 13 0 00 777171 MOVE ACT,777000!<PGW777&777> ;PAGED REREAD VERIFY
3076 033157 312 14 0 00 000013 CAME COR,ACT
3077 ERROR PGWRTC,13,COR,ACT,PAGED REREAD,ADR 777XXX^
3078 033160 036 13 0 00 040170
3079 033161 035 00 0 00 033152 ERLOOP PGWRTC ;IF ERROR, LOOP TO PGWRTC
3080 033162 200 13 0 00 033171 MOVE ACT,PGW777 ;DIRECT REREAD VERIFY
3081 033163 312 14 0 00 000013 CAME COR,ACT
3082 ERROR PGWRTC,13,COR,ACT,DIRECT REREAD,ADR 777XXX^
3083 033164 036 13 0 00 040173
3084 033165 035 00 0 00 033152 ERLOOP PGWRTC ;IF ERROR, LOOP TO PGWRTC
3085
3086 033166 367 15 0 00 033125 REPTLP PGWRTA+1
3087
3088 033167 254 00 0 00 033172 JRST PGWRT0-2
3089
3090 033170 000000 000000 PGW400: 0 ;PAGE 400 STORAGE LOCATION
3091 033171 000000 000000 PGW777: 0 ;PAGE 777 STORAGE LOCATION
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 66
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA WRITE SEQ 0122
3092 ;*TEST WRITE OF DATA USING PAGED ADDRESS.
3093 ;*DATA IS WRITTEN INTO CONSECUTIVE DATA WORDS
3094 ;*IN AN EXEC UNPAGED DATA AREA.
3095 ;*DATA CONSISTS OF PAGED ADR AND COMPLEMENT OF PAGED ADDRESS.
3096
3097 SUBTST^
3098 033172 201 00 0 00 033172 MOVEI .
3099 033173 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3100 033174 200 15 0 00 043737 PGWRT0: MOVE REPT,RPEAT
3101 033175 221 15 0 00 000012 IMULI REPT,^D10 ;FSTCYL=10 PASSES, REL=100 PASSES
3102 033176 205 05 0 00 777560 MOVSI INDX,-440/2
3103 033177 201 07 0 00 000340 MOVEI AC,340
3104
3105 033200 201 11 0 05 043742 PGWRT1: MOVEI AC2,PGWRTB(INDX)
3106 033201 242 11 0 00 777767 LSH AC2,-^D9
3107 033202 271 11 0 00 740000 ADDI AC2,740000
3108 033203 504 12 0 00 000011 HRL AC3,AC2
3109 033204 201 11 0 05 043743 MOVEI AC2,PGWRTB+1(INDX)
3110 033205 242 11 0 00 777767 LSH AC2,-^D9
3111 033206 271 11 0 00 740000 ADDI AC2,740000
3112 033207 540 12 0 00 000011 HRR AC3,AC2
3113 033210 550 10 0 00 000007 HRRZ AC1,AC ;SETUP PAGE MAP
3114 033211 242 10 0 00 777777 LSH AC1,-1
3115 033212 305 10 0 00 000200 CAIGE AC1,200
3116 033213 271 10 0 00 000220 ADDI AC1,220
3117 033214 202 12 0 10 000000 MOVEM AC3,(AC1)
3118 033215 271 07 0 00 000002 ADDI AC,2
3119 033216 350 00 0 00 000005 AOS INDX
3120 033217 253 05 0 00 033200 AOBJN INDX,PGWRT1
3121
3122 033220 7 010 20 0 00 020000 PGWRT2: CONO PAG,LTRPEN ;CLEAR AM, ETC
3123 033221 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3124 033222 402 00 0 00 043742 SETZM PGWRTB ;CLEAR DATA AREA
3125 033223 200 07 0 00 040176 MOVE AC,[PGWRTB,,PGWRTB+1]
3126 033224 251 07 0 00 044402 BLT AC,PGWRTB+440
3127 033225 205 05 0 00 777340 MOVSI INDX,-440
3128 033226 201 07 0 00 000340 MOVEI AC,340
3129
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 67
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA WRITE SEQ 0123
3130 033227 200 14 0 00 000007 PGWRT3: MOVE COR,AC
3131 033230 242 14 0 00 000011 LSH COR,^D9
3132 033231 661 14 0 00 777777 TLO COR,-1
3133 033232 621 14 0 14 000000 TLZ COR,(COR)
3134 033233 201 10 0 05 043742 MOVEI AC1,PGWRTB(INDX)
3135 033234 405 10 0 00 000777 ANDI AC1,777
3136 033235 271 10 0 14 000000 ADDI AC1,(COR)
3137
3138 033236 202 14 0 10 000000 MOVEM COR,(AC1) ;MAKE PAGED MEMORY WRITE
3139 033237 476 00 0 00 000013 SETOM ACT
3140 033240 200 13 0 10 000000 MOVE ACT,(AC1) ;PAGED READ VERIFY
3141 033241 312 14 0 00 000013 CAME COR,ACT
3142 ERROR PGWRT3,13,COR,ACT,DATA ERROR,PAGED REREAD,PGWRTX^
3143 033242 036 13 0 00 040177
3144 033243 035 00 0 00 033227 ERLOOP PGWRT3 ;IF ERROR, LOOP TO PGWRT3
3145 033244 200 13 0 05 043742 MOVE ACT,PGWRTB(INDX)
3146 033245 312 14 0 00 000013 CAME COR,ACT
3147 ERROR PGWRT3,13,COR,ACT,DATA ERROR,DIRECT REREAD,PGWRTX^
3148 033246 036 13 0 00 040202
3149 033247 035 00 0 00 033227 ERLOOP PGWRT3 ;IF ERROR, LOOP TO PGWRT3
3150 033250 350 00 0 00 000007 AOS AC
3151 033251 253 05 0 00 033227 AOBJN INDX,PGWRT3
3152
3153 033252 205 05 0 00 777340 PGWRT4: MOVSI INDX,-440 ;CHECK DATA WRITE BLOCK
3154 033253 201 07 0 00 000340 MOVEI AC,340 ;USING DIRECT ADDRESSING
3155
3156 033254 200 14 0 00 000007 MOVE COR,AC
3157 033255 242 14 0 00 000011 LSH COR,^D9 ;SETUP COMPARE WORD
3158 033256 661 14 0 00 777777 TLO COR,-1
3159 033257 621 14 0 14 000000 TLZ COR,(COR)
3160 033260 200 13 0 05 043742 MOVE ACT,PGWRTB(INDX)
3161 033261 312 14 0 00 000013 CAME COR,ACT
3162 ERROR PGWRT2,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
3163 033262 036 13 0 00 040207
3164 033263 035 00 0 00 033220 ERLOOP PGWRT2 ;IF ERROR, LOOP TO PGWRT2
3165 033264 350 00 0 00 000007 AOS AC
3166 033265 253 05 0 00 033254 AOBJN INDX,PGWRT4+2
3167
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 68
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA WRITE SEQ 0124
3168 033266 402 00 0 00 043742 PGWRT5: SETZM PGWRTB ;CLEAR DATA AREA
3169 033267 200 07 0 00 040176 MOVE AC,[PGWRTB,,PGWRTB+1]
3170 033270 251 07 0 00 044401 BLT AC,PGWRTB+437
3171 033271 205 05 0 00 777340 MOVSI INDX,-440
3172 033272 201 07 0 00 000777 MOVEI AC,777
3173
3174 033273 200 14 0 00 000007 PGWRT6: MOVE COR,AC ;MAKE REVERSE PAGED MEMORY WRITE
3175 033274 242 14 0 00 000011 LSH COR,^D9
3176 033275 661 14 0 00 777777 TLO COR,-1
3177 033276 621 14 0 14 000000 TLZ COR,(COR)
3178 033277 201 10 0 00 044401 MOVEI AC1,PGWRTB+437
3179 033300 275 10 0 05 000000 SUBI AC1,(INDX)
3180 033301 405 10 0 00 000777 ANDI AC1,777
3181 033302 271 10 0 14 000000 ADDI AC1,(COR)
3182 033303 202 14 0 10 000000 MOVEM COR,(AC1) ;PERFORM PAGED WRITE
3183 033304 476 00 0 00 000013 SETOM ACT
3184 033305 200 13 0 10 000000 MOVE ACT,(AC1) ;PAGED REREAD VERIFY
3185 033306 312 14 0 00 000013 CAME COR,ACT
3186 ERROR PGWRT6,13,COR,ACT,DATA ERROR,REVERSE PAGED REREAD,PGWRTX^
3187 033307 036 13 0 00 040216
3188 033310 035 00 0 00 033273 ERLOOP PGWRT6 ;IF ERROR, LOOP TO PGWRT6
3189 033311 201 11 0 00 044401 MOVEI AC2,PGWRTB+437
3190 033312 275 11 0 05 000000 SUBI AC2,(INDX)
3191 033313 200 13 0 11 000000 MOVE ACT,(AC2)
3192 033314 312 14 0 00 000013 CAME COR,ACT
3193 ERROR PGWRT6,13,COR,ACT,DATA ERROR,REVERSE DIRECT REREAD,PGWRTZ^
3194 033315 036 13 0 00 040225
3195 033316 035 00 0 00 033273 ERLOOP PGWRT6 ;IF ERROR, LOOP TO PGWRT6
3196 033317 370 00 0 00 000007 SOS AC
3197 033320 253 05 0 00 033273 AOBJN INDX,PGWRT6
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 69
DSKEAM MAC 29-Mar-78 14:55 TEST PAGED DATA WRITE SEQ 0125
3198 033321 205 05 0 00 777340 PGWRT7: MOVSI INDX,-440
3199 033322 201 07 0 00 000340 MOVEI AC,340
3200
3201 033323 200 14 0 00 000007 MOVE COR,AC ;CHECK DATA WRITE BLOCK
3202 033324 242 14 0 00 000011 LSH COR,^D9 ;USING DIRECT ADDRESSING
3203 033325 661 14 0 00 777777 TLO COR,-1
3204 033326 621 14 0 14 000000 TLZ COR,(COR)
3205 033327 200 13 0 05 043742 MOVE ACT,PGWRTB(INDX)
3206 033330 312 14 0 00 000013 CAME COR,ACT
3207 ERROR PGWRT5,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
3208 033331 036 13 0 00 040207
3209 033332 035 00 0 00 033266 ERLOOP PGWRT5 ;IF ERROR, LOOP TO PGWRT5
3210 033333 350 00 0 00 000007 AOS AC
3211 033334 253 05 0 00 033323 AOBJN INDX,PGWRT7+2
3212
3213 033335 367 15 0 00 033176 REPTLP PGWRT0+2 ;CYCLE
3214 033336 254 00 0 00 033356 JRST PFT0-2
3215
3216 033337 037 02 0 00 040067 PGWRTX: PSIXM SIXBTZ <REF TO >^ [SIXBIT\REF TO _\]^
3217 033340 200 00 0 00 000010 MOVE AC1
3218 033341 037 06 0 00 000000 PNT6
3219 033342 037 00 0 00 030242 PCRL
3220 033343 263 17 0 00 000000 RTN
3221
3222 033344 037 02 0 00 040067 PGWRTY: PSIXM SIXBTZ <REF TO >^ [SIXBIT\REF TO _\]^
3223 033345 201 00 0 05 043742 MOVEI PGWRTB(INDX)
3224 033346 037 06 0 00 000000 PNT6
3225 033347 037 00 0 00 030242 PCRL
3226 033350 263 17 0 00 000000 RTN
3227
3228 033351 037 02 0 00 040067 PGWRTZ: PSIXM SIXBTZ <REF TO >^ [SIXBIT\REF TO _\]^
3229 033352 200 00 0 00 000011 MOVE AC2
3230 033353 037 06 0 00 000000 PNT6
3231 033354 037 00 0 00 030242 PCRL
3232 033355 263 17 0 00 000000 RTN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 70
DSKEAM MAC 29-Mar-78 14:55 TEST PAGE FAIL WORD SEQ 0126
3233 SUBTTL TEST PAGE FAIL WORD
3234
3235 SALL
3236 040230 T= SIXBTZ PAGE FAIL WORD TEST
3237 LALL
3238
3239 ;*VERIFY THAT THE PROPER PAGE FAIL CODE OCCURS ON A PAGED READ
3240 ;*TO AN AREA WITHOUT THE ACCESS BIT BUT WITH THE PUBLIC,
3241 ;*WRITEABLE,SOFTWARE & CACHE BIT.
3242
3243 SUBTST^
3244 033356 201 00 0 00 033356 MOVEI .
3245 033357 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3246 033360 200 15 0 00 043737 PFT0: MOVE REPT,RPEAT
3247 033361 402 00 0 00 000200 SETZM 200
3248 033362 200 00 0 00 040234 MOVE [200,201]
3249 033363 251 00 0 00 000417 BLT 417 ;CLEAR PAGE MAP
3250
3251 033364 205 00 0 00 360033 MOVSI 360000!<PGW400_-^D9>
3252 033365 202 00 0 00 000200 MOVEM 200 ;SETUP PAGE MAP WORD
3253
3254 033366 201 00 0 00 033402 MOVEI PFT2
3255 033367 202 00 0 00 000502 MOVEM LPGFTR ;SETUP FOR PAGE FAIL
3256
3257 033370 476 00 0 00 033170 PFT1: SETOM PGW400
3258 033371 7 010 20 0 00 020000 CONO PAG,LTRPEN
3259 033372 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3260 033373 402 00 0 00 000014 SETZM COR
3261 033374 403 00 0 00 000013 SETZB 0,ACT
3262
3263 033375 200 13 0 00 400170 MOVE ACT,400000!<PGW400&777> ;MAKE PAGED READ
3264
3265 033376 200 13 0 00 033170 MOVE ACT,PGW400
3266 ERROR PFT1,13,COR,ACT,TRAP FAILED,FATAL^
3267 SALL
3268 033377 036 13 0 00 040235
3269 033400 035 00 0 00 033370 ERLOOP PFT1 ;IF ERROR, LOOP TO PFT1
3270 033401 254 00 0 00 033417 JRST PFT3 ;FATAL
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 71
DSKEAM MAC 29-Mar-78 14:55 TEST PAGE FAIL WORD SEQ 0127
3271 033402 312 14 0 00 000013 PFT2: CAME COR,ACT
3272 ERROR PFT1,13,COR,ACT,PAGE FAIL STORED IN AC^
3273 033403 036 13 0 00 040240
3274 033404 035 00 0 00 033370 ERLOOP PFT1 ;IF ERROR, LOOP TO PFT1
3275
3276 033405 200 13 0 00 000000 MOVE ACT,0
3277 033406 312 14 0 00 000013 CAME COR,ACT
3278 ERROR PFT1,13,COR,ACT,PAGE FAIL STORED IN 0^
3279 033407 036 13 0 00 040243
3280 033410 035 00 0 00 033370 ERLOOP PFT1 ;IF ERROR, LOOP TO PFT1
3281
3282 033411 200 14 0 00 040246 MOVE COR,[001000,,400000!<PGW400&777>]
3283 033412 200 13 0 00 000500 MOVE ACT,LEUPFW
3284 033413 312 14 0 00 000013 CAME COR,ACT
3285 ERROR PFT1,13,COR,ACT,PAGE FAIL WORD WRONG^
3286 033414 036 13 0 00 040247
3287 033415 035 00 0 00 033370 ERLOOP PFT1 ;IF ERROR, LOOP TO PFT1
3288
3289 033416 367 15 0 00 033361 REPTLP PFT0+1
3290
3291 033417 200 00 0 00 043736 PFT3: MOVE PGFAIL ;RESTORE PAGE FAIL
3292 033420 202 00 0 00 000502 MOVEM LPGFTR
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 72
DSKEAM MAC 29-Mar-78 14:55 TEST WRITE PROTECTED PAGING SEQ 0128
3293 SUBTTL TEST WRITE PROTECTED PAGING
3294
3295 ;*TRYING TO WRITE INTO A WRITE PROTECTED AREA
3296 ;*SHOULD CAUSE A PAGE FAILURE
3297
3298 SALL
3299 040252 T= SIXBTZ WRITE PROTECT TEST
3300 LALL
3301
3302 SUBTST^
3303 033421 201 00 0 00 033421 MOVEI .
3304 033422 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3305 033423 200 15 0 00 043737 WRTP0: MOVE REPT,RPEAT
3306 033424 402 00 0 00 000200 SETZM 200 ;CLEAR AND SETUP PAGE MAP
3307 033425 200 07 0 00 037671 MOVE AC,[200,,201]
3308 033426 251 07 0 00 000417 BLT AC,417
3309 033427 205 07 0 00 640033 MOVSI AC,640000!<PGW400_-^D9>
3310 033430 202 07 0 00 000200 MOVEM AC,200
3311 033431 201 07 0 00 400033 MOVEI AC,400000!<PGW777_-^D9>
3312 033432 202 07 0 00 000377 MOVEM AC,377
3313 033433 201 07 0 00 033447 MOVEI AC,WRTPF
3314 033434 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
3315
3316 033435 402 00 0 00 033170 WRTP1: SETZM PGW400
3317 033436 7 010 20 0 00 020000 CONO PAG,LTRPEN
3318 033437 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3319 033440 402 00 0 00 000014 SETZM COR
3320 033441 403 00 0 00 000013 SETZB 0,ACT
3321 033442 476 00 0 00 400170 SETOM 400000!<PGW400&777> ;MAKE PAGED WRITE
3322 033443 200 13 0 00 033170 MOVE ACT,PGW400
3323 ERROR WRTP1,13,COR,ACT,TRAP FAILED,ADR 400XXX^
3324 SALL
3325 033444 036 13 0 00 040256
3326 033445 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
3327 033446 254 00 0 00 033435 JRST WRTP1
3328
3329 033447 402 00 0 00 000014 WRTPF: SETZM COR
3330 033450 312 14 0 00 000013 CAME COR,ACT
3331 ERROR WRTP1,13,COR,ACT,PAGE FAIL STORED IN AC,ADR 400XXX^
3332 033451 036 13 0 00 040261
3333 033452 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
3334 033453 200 13 0 00 000000 MOVE ACT,0
3335 033454 312 14 0 00 000013 CAME COR,ACT
3336 ERROR WRTP1,13,COR,ACT,PAGE FAIL STORED IN 0,ADR 400XXX^
3337 033455 036 13 0 00 040264
3338 033456 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
3339 033457 200 14 0 00 040267 MOVE COR,[131000,,400000!<PGW400&777>]
3340 033460 200 13 0 00 000500 MOVE ACT,LEUPFW
3341 033461 312 14 0 00 000013 CAME COR,ACT
3342 ERROR WRTP1,13,COR,ACT,PAGE FAIL WORD WRONG,ADR 400XXX^
3343 033462 036 13 0 00 040270
3344 033463 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 73
DSKEAM MAC 29-Mar-78 14:55 TEST WRITE PROTECTED PAGING SEQ 0129
3345 033464 402 00 0 00 000014 WRTP2: SETZM COR
3346 033465 200 13 0 00 033170 MOVE ACT,PGW400
3347 033466 312 14 0 00 000013 CAME COR,ACT
3348 ERROR WRTP1,13,COR,ACT,DATA WORD WRONG,ADR 400XXX^
3349 033467 036 13 0 00 040276
3350 033470 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
3351
3352 033471 201 07 0 00 033502 WRTP3: MOVEI AC,WRTPF1
3353 033472 202 07 0 00 000502 MOVEM AC,LPGFTR
3354 033473 476 00 0 00 033171 SETOM PGW777
3355 033474 476 00 0 00 000014 SETOM COR
3356 033475 476 00 0 00 000013 SETOM ACT
3357 033476 402 00 0 00 777171 SETZM 777000!<PGW777&777> ;MAKE PAGED WRITE
3358 033477 200 13 0 00 033171 MOVE ACT,PGW777
3359 ERROR1 13,COR,ACT,TRAP FAILED,ADR 777XXX^
3360 033500 036 13 0 00 040301
3361 033501 254 00 0 00 033471 JRST WRTP3
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 74
DSKEAM MAC 29-Mar-78 14:55 TEST WRITE PROTECTED PAGING SEQ 0130
3362 033502 312 14 0 00 000013 WRTPF1: CAME COR,ACT
3363 ERROR WRTP1,13,COR,ACT,PAGE FAIL STORED IN AC,ADR 777XXX^
3364 033503 036 13 0 00 040304
3365 033504 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
3366 033505 200 14 0 00 040307 MOVE COR,[111000,,777000!<PGW777&777>]
3367 033506 200 13 0 00 000500 MOVE ACT,LEUPFW
3368 033507 312 14 0 00 000013 CAME COR,ACT
3369 ERROR WRTP1,13,COR,ACT,PAGE FAIL WORD WRONG,ADR 777XXX^
3370 033510 036 13 0 00 040310
3371 033511 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
3372
3373 033512 476 00 0 00 000014 WRTP4: SETOM COR
3374 033513 200 13 0 00 033171 MOVE ACT,PGW777
3375 033514 312 14 0 00 000013 CAME COR,ACT
3376 ERROR WRTP1,13,COR,ACT,DATA WORD WRONG,ADR 777XXX^
3377 033515 036 13 0 00 040313
3378 033516 035 00 0 00 033435 ERLOOP WRTP1 ;IF ERROR, LOOP TO WRTP1
3379
3380 033517 367 15 0 00 033424 REPTLP WRTP0+1
3381
3382 033520 200 07 0 00 043736 MOVE AC,PGFAIL
3383 033521 202 07 0 00 000502 MOVEM AC,LPGFTR ;RESET PAGE FAIL TRAP
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 75
DSKEAM MAC 29-Mar-78 14:55 PAGED BLT PAGING AND ADDRESSING TEST SEQ 0131
3384 SUBTTL PAGED BLT PAGING AND ADDRESSING TEST
3385
3386 ;*CHECKS THAT ADDRESSING FROM 340000 TO 777777 WORKS.
3387 ;*ALL PAGING REFERENCES RELOCATE INTO ACTUAL ADDRESSES 76000 TO 76777.
3388 ;*BLT USES ALL ADDRESS FROM 340000 TO 777777.
3389
3390 SALL
3391 040316 T= SIXBTZ PAGED BLT TEST
3392 LALL
3393
3394 SUBTST^
3395 033522 201 00 0 00 033522 MOVEI .
3396 033523 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3397 033524 200 15 0 00 043737 BLT0: MOVE REPT,RPEAT
3398 033525 205 05 0 00 777560 MOVSI INDX,-440/2 ;SETUP PAGE MAP SO ALL ADDRESSES
3399 033526 201 07 0 00 000340 MOVEI AC,340 ;POINT TO 76XXX.
3400 033527 200 11 0 00 040321 MOVE AC2,[740076,,740076]
3401 033530 550 10 0 00 000007 BLT1: HRRZ AC1,AC
3402 033531 242 10 0 00 777777 LSH AC1,-1
3403 033532 305 10 0 00 000200 CAIGE AC1,200
3404 033533 271 10 0 00 000220 ADDI AC1,220
3405 033534 202 11 0 10 000000 MOVEM AC2,(AC1)
3406 033535 271 07 0 00 000002 ADDI AC,2
3407 033536 253 05 0 00 033530 AOBJN INDX,BLT1
3408
3409 033537 7 010 20 0 00 020000 BLT2: CONO PAG,LTRPEN ;CLEAR AM, ETC.
3410 033540 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3411 033541 402 00 0 00 340000 SETZM 340000 ;SET FIRST ADDRESS TO ALL ZEROS
3412 033542 200 07 0 00 040322 MOVE AC,[340000,,340001]
3413 033543 251 07 0 00 777777 BLT AC,777777 ;BLT TO MAXIMUM
3414
3415 033544 205 05 0 00 777000 BLT3: MOVSI INDX,-1000 ;CHECK DATA AREA WITH DIRECT ADDRESSING
3416 033545 201 14 0 05 076000 MOVEI COR,76000(INDX)
3417 033546 200 13 0 05 076000 MOVE ACT,76000(INDX)
3418 033547 312 13 0 00 037173 CAME ACT,[0]
3419 ERROR BLT1,13,COR,ACT,NOT ALL ZEROS,<REF TO (CORRECT)>^
3420 SALL
3421 033550 036 13 0 00 040326
3422 033551 035 00 0 00 033530 ERLOOP BLT1 ;IF ERROR, LOOP TO BLT1
3423 033552 253 05 0 00 033545 AOBJN INDX,BLT3+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 76
DSKEAM MAC 29-Mar-78 14:55 PAGED BLT PAGING AND ADDRESSING TEST SEQ 0132
3424 033553 7 010 20 0 00 020000 BLT4: CONO PAG,LTRPEN ;CLEAR AM, ETC.
3425 033554 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3426 033555 476 00 0 00 340000 SETOM 340000 ;SET FIRST ADDRESS TO ALL ONES
3427 033556 200 07 0 00 040322 MOVE AC,[340000,,340001]
3428 033557 251 07 0 00 777777 BLT AC,777777 ;BLT TO MAXIMUM
3429
3430 033560 205 05 0 00 777000 BLT5: MOVSI INDX,-1000 ;CHECK DATA AREA WITH DIRECT ADDRESSING
3431 033561 201 14 0 05 076000 MOVEI COR,76000(INDX)
3432 033562 200 13 0 05 076000 MOVE ACT,76000(INDX)
3433 033563 312 13 0 00 040331 CAME ACT,[-1]
3434 ERROR BLT4,13,COR,ACT,NOT ALL ONES,<REF TO (CORRECT)>^
3435 033564 036 13 0 00 040335
3436 033565 035 00 0 00 033553 ERLOOP BLT4 ;IF ERROR, LOOP TO BLT4
3437 033566 253 05 0 00 033561 AOBJN INDX,BLT5+1
3438
3439 033567 7 010 20 0 00 020000 BLT6: CONO PAG,LTRPEN ;CLEAR AM, ETC.
3440 033570 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3441 033571 200 13 0 00 040340 MOVE ACT,[525252,,525252]
3442 033572 202 13 0 00 340000 MOVEM ACT,340000 ;SET FIRST ADDRESS TO ALT BITS
3443 033573 200 07 0 00 040322 MOVE AC,[340000,,340001]
3444 033574 251 07 0 00 777777 BLT AC,777777 ;BLT TO MAXIMUM
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 77
DSKEAM MAC 29-Mar-78 14:55 PAGED BLT PAGING AND ADDRESSING TEST SEQ 0133
3445 033575 205 05 0 00 777000 BLT7: MOVSI INDX,-1000 ;CHECK DATA AREA WITH DIRECT ADDRESSING
3446 033576 201 14 0 05 076000 MOVEI COR,76000(INDX)
3447 033577 200 13 0 05 076000 MOVE ACT,76000(INDX)
3448 033600 312 13 0 00 040340 CAME ACT,[525252,,525252]
3449 ERROR BLT6,13,COR,ACT,NOT ALT BITS,<REF TO (CORRECT)>^
3450 033601 036 13 0 00 040344
3451 033602 035 00 0 00 033567 ERLOOP BLT6 ;IF ERROR, LOOP TO BLT6
3452 033603 253 05 0 00 033576 AOBJN INDX,BLT7+1
3453
3454 033604 7 010 20 0 00 020000 BLT8: CONO PAG,LTRPEN ;CLEAR AM, ETC.
3455 033605 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3456 033606 200 13 0 00 040347 MOVE ACT,[252525,,252525]
3457 033607 202 13 0 00 340000 MOVEM ACT,340000 ;SET FIRST ADDRESS TO ALT BITS
3458 033610 200 07 0 00 040322 MOVE AC,[340000,,340001]
3459 033611 251 07 0 00 777777 BLT AC,777777 ;BLT TO MAXIMUM
3460
3461 033612 205 05 0 00 777000 BLT9: MOVSI INDX,-1000 ;CHECK DATA AREA WITH DIRECT ADDRESSING
3462 033613 201 14 0 05 076000 MOVEI COR,76000(INDX)
3463 033614 200 13 0 05 076000 MOVE ACT,76000(INDX)
3464 033615 312 13 0 00 040347 CAME ACT,[252525,,252525]
3465 ERROR BLT8,13,COR,ACT,NOT ALT BITS,<REF TO (CORRECT)>^
3466 033616 036 13 0 00 040344
3467 033617 035 00 0 00 033604 ERLOOP BLT8 ;IF ERROR, LOOP TO BLT8
3468 033620 253 05 0 00 033613 AOBJN INDX,BLT9+1
3469
3470 033621 367 15 0 00 033525 REPTLP BLT0+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 78
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0134
3471 SUBTTL TEST BASE REGISTER RELOCATION
3472
3473 ;*SETUP PAGE MAP PAGES AS PAGE 76
3474 ;*SETUP PAGE 0 PAGE MAP FOR ERRORS
3475 ;*SETUP BASE REGISTERS
3476 ;*TEST MUUO FOR PAGE 0 AND FOR PAGE 76
3477 ;*TEST THAT EXEC PAGE FAIL WORD STORES CORRECTLY
3478 ;*IN PAGE 76 USING USER BASE REGISTER RELOCATION.
3479
3480 SALL
3481 040350 T= SIXBTZ BASE REGISTER RELOCATION TEST
3482 LALL
3483
3484 SUBTST^
3485 033622 201 00 0 00 033622 MOVEI .
3486 033623 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3487 033624 200 15 0 00 043737 RLBAS0: MOVE REPT,RPEAT
3488 033625 7 010 20 0 00 020000 CONO PAG,LTRPEN
3489 033626 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3490 033627 402 00 0 00 000200 SETZM 200 ;CLEAR PAGE 0 PAGE MAP
3491 033630 200 07 0 00 037671 MOVE AC,[200,,201]
3492 033631 251 07 0 00 000417 BLT AC,417
3493 033632 402 00 0 00 076200 SETZM 76200 ;CLEAR RELOC PAGE PAGE MAP
3494 033633 200 07 0 00 040355 MOVE AC,[76200,,76201]
3495 033634 251 07 0 00 076417 BLT AC,76417
3496 033635 200 00 0 00 040356 MOVE [540000,,540001]
3497 033636 202 00 0 00 076600 MOVEM 76600 ;SETUP LOWER EXEC PAGING
3498 033637 205 01 0 00 777621 MOVSI 1,-157
3499 033640 270 00 0 00 040357 ADD [2,,2]
3500 033641 202 00 0 01 076601 MOVEM 76601(1)
3501 033642 253 01 0 00 033640 AOBJN 1,.-2
3502 033643 200 00 0 00 000041 MOVE 41
3503 033644 202 00 0 00 076041 MOVEM 76000!LUUOI ;SETUP LUUO
3504 033645 200 00 0 00 000042 MOVE 42
3505 033646 202 00 0 00 076042 MOVEM 76000!42 ;SETUP INTERRUPT
3506 033647 200 00 0 00 000502 MOVE LPGFTR
3507 033650 202 00 0 00 076502 MOVEM 76000!LPGFTR ;SETUP PAGE FAIL
3508 033651 200 00 0 00 040360 MOVE [JFCL]
3509 033652 202 00 0 00 076421 MOVEM 76000!LAROVT ;SETUP ARITH TRAP
3510 033653 200 00 0 00 000422 MOVE LPDOVT
3511 033654 202 00 0 00 076422 MOVEM 76000!LPDOVT ;SETUP PDL OV TRAP
3512 033655 200 00 0 00 000423 MOVE LTRP3T
3513 033656 202 00 0 00 076423 MOVEM 76000!LTRP3T ;SETUP TRAP 3 TRAP
3514 033657 200 00 0 00 000430 MOVE LKNTRP
3515 033660 202 00 0 00 076430 MOVEM 76000!LKNTRP ;SETUP MUUO AS ERROR
3516 033661 202 00 0 00 076431 MOVEM 76000!LKTRP
3517 033662 202 00 0 00 076432 MOVEM 76000!LSNTRP
3518 033663 202 00 0 00 076433 MOVEM 76000!LSTRP
3519 033664 202 00 0 00 076434 MOVEM 76000!LCNTRP
3520 033665 202 00 0 00 076435 MOVEM 76000!LCTRP
3521 033666 202 00 0 00 076436 MOVEM 76000!LPNTRP
3522 033667 202 00 0 00 076437 MOVEM 76000!LPTRP
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 79
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0135
3523 ;*TEST USER BASE REGISTER RELOCATION
3524 ;*BY USING AN MUUO OF 0,,654321.
3525
3526 ;*TEST MUUO FIRST WITH EPMP & UPMP AS PAGE 0.
3527
3528 033670 201 07 0 00 033703 RLBAS1: MOVEI AC,RLBMU1 ;SETUP MUUO TO RETURN
3529 033671 202 07 0 00 000430 MOVEM AC,LKNTRP ;FROM PAGE 0
3530 033672 201 07 0 00 033726 MOVEI AC,RLBMU3
3531 033673 202 07 0 00 076430 MOVEM AC,76000!LKNTRP ;FROM RELOCATED PAGE
3532
3533 033674 402 00 0 00 000014 RLBAS2: SETZM COR
3534 033675 201 13 0 00 033700 MOVEI ACT,.+3
3535 033676 254 02 1 00 033677 JRSTF @.+1 ;CLEAR FLAGS
3536 033677 000000 033700 .+1
3537 033700 000000 654321 RLBMU0: 0,,654321 ;DO AN MUUO OF 0,,654321
3538 ERROR RLBAS2,13,COR,ACT,MUUO FAILED,<COR=MUUO, ACT=MUUO ADR>^
3539 SALL
3540 033701 036 13 0 00 040367
3541 033702 035 00 0 00 033674 ERLOOP RLBAS2 ;IF ERROR, LOOP TO RLBAS2
3542
3543 033703 201 14 0 00 654321 RLBMU1: MOVEI COR,654321
3544 033704 200 13 0 00 000424 MOVE ACT,LMUUO
3545 033705 312 14 0 00 000013 CAME COR,ACT
3546 ERROR RLBAS2,13,COR,ACT,MUUO STORED WRONG,PAGE 0^
3547 033706 036 13 0 00 040377
3548 033707 035 00 0 00 033674 ERLOOP RLBAS2 ;IF ERROR, LOOP TO RLBAS2
3549 033710 201 14 0 00 033701 MOVEI COR,RLBMU0+1
3550 033711 200 13 0 00 000425 MOVE ACT,LMUUOP
3551 033712 312 14 0 00 000013 CAME COR,ACT
3552 ERROR RLBAS2,13,COR,ACT,MUUO PC STORED WRONG,PAGE 0^
3553 033713 036 13 0 00 040406
3554 033714 035 00 0 00 033674 ERLOOP RLBAS2 ;IF ERROR, LOOP TO RLBAS2
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 80
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0136
3555 ;*TEST THAT WITH UPMP RELOCATED TO PAGE 76
3556 ;*AN MUUO TRAPS CORRECTLY AND RETRIEVES NEW PC
3557 ;*FROM RELOCATED USER PAGE MAP PAGE.
3558 ;*ALSO TEST THAT MUUO AND TRAPPED PC GET STORED CORRECTLY
3559 ;*IN RELOCATED UPMP.
3560
3561 033715 7 010 14 0 00 040411 RLBAS3: DATAO PAG,[LLDUSB,,400076] ;RELOCATE USER BASE REG
3562 033716 402 00 0 00 000014 SETZM COR
3563 033717 201 13 0 00 033722 MOVEI ACT,.+3
3564 033720 254 02 1 00 033721 JRSTF @.+1
3565 033721 000000 033722 .+1
3566 033722 000000 123456 RLBMU2: 0,,123456 ;DO AN MUUO OF 0,,123456
3567 033723 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3568 ERROR RLBAS3,13,COR,ACT,MUUO FAILED,<COR=MUUO, ACT=MUUO ADR>^
3569 033724 036 13 0 00 040367
3570 033725 035 00 0 00 033715 ERLOOP RLBAS3 ;IF ERROR, LOOP TO RLBAS3
3571
3572 033726 7 010 14 0 00 037116 RLBMU3: DATAO PAG,[LLDUSB,,400000]
3573 033727 201 14 0 00 123456 MOVEI COR,123456
3574 033730 200 13 0 00 076424 MOVE ACT,76000!LMUUO
3575 033731 312 14 0 00 000013 CAME COR,ACT
3576 ERROR RLBAS3,13,COR,ACT,MUUO STORED WRONG,RELOCATED PAGE^
3577 033732 036 13 0 00 040415
3578 033733 035 00 0 00 033715 ERLOOP RLBAS3 ;IF ERROR, LOOP TO RLBAS3
3579 033734 201 14 0 00 033723 MOVEI COR,RLBMU2+1
3580 033735 200 13 0 00 076425 MOVE ACT,76000!LMUUOP
3581 033736 312 14 0 00 000013 CAME COR,ACT
3582 ERROR RLBAS3,13,COR,ACT,MUUO PC STORED WRONG,RELOCATED PAGE^
3583 033737 036 13 0 00 040420
3584 033740 035 00 0 00 033715 ERLOOP RLBAS3 ;IF ERROR, LOOP TO RLBAS3
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 81
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0137
3585 ;*TEST USER BASE REGISTER RELOCATION
3586 ;*BY USING EXEC PAGE FAIL WORD
3587
3588 033741 200 07 0 00 043734 RLBAS4: MOVE AC,MUUOER#
3589 033742 202 07 0 00 000430 MOVEM AC,LKNTRP
3590 033743 202 07 0 00 076430 MOVEM AC,76000!LKNTRP
3591 033744 201 07 0 00 033755 MOVEI AC,RLPFL
3592 033745 202 07 0 00 076502 MOVEM AC,76000!LPGFTR ;SETUP PAGE FAIL TRAP
3593 033746 476 00 0 00 076500 RLPF1: SETOM 76000!LEUPFW
3594 033747 201 14 0 00 777777 MOVEI COR,777777
3595 033750 476 00 0 00 000013 SETOM ACT
3596 033751 7 010 14 0 00 040411 DATAO PAG,[LLDUSB,,400076]
3597 033752 200 13 0 00 777777 MOVE ACT,777777 ;SHOULD PAGE FAIL
3598 ERROR RLPF1,13,COR,ACT,PAGE FAIL FAILED,REF TO 777777^
3599 033753 036 13 0 00 040426
3600 033754 035 00 0 00 033746 ERLOOP RLPF1 ;IF ERROR, LOOP TO RLPF1
3601
3602 033755 476 00 0 00 000014 RLPFL: SETOM COR
3603 033756 312 14 0 00 000013 CAME COR,ACT
3604 ERROR RLPF1,13,COR,ACT,PAGE FAIL STORED IN AC,REF TO 777777^
3605 033757 036 13 0 00 040431
3606 033760 035 00 0 00 033746 ERLOOP RLPF1 ;IF ERROR, LOOP TO RLPF1
3607 033761 200 14 0 00 040006 MOVE COR,[1000,,777777] ;SETUP CORRECT WORD
3608 033762 200 13 0 00 076500 MOVE ACT,76000!LEUPFW
3609 033763 312 14 0 00 000013 CAME COR,ACT
3610 ERROR RLPF1,13,COR,ACT,PAGE FAIL WORD WRONG,REF TO 777777^
3611 033764 036 13 0 00 040434
3612 033765 035 00 0 00 033746 ERLOOP RLPF1 ;IF ERROR, LOOP TO RLPF1
3613
3614 033766 7 010 14 0 00 037116 RLBAS5: DATAO PAG,[LLDUSB,,400000]
3615 033767 200 07 0 00 043736 MOVE AC,PGFAIL
3616 033770 202 07 0 00 000502 MOVEM AC,LPGFTR
3617 033771 367 15 0 00 033625 REPTLP RLBAS0+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 82
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0138
3618 ;*TEST BASE REGISTER RELOCATION
3619 ;*BY USING EXEC-PER-PROCESS PAGING
3620 ;*AND PAGING REFILL DATA FROM RELOCATED PAGE
3621 ;*WITH USER BASE REGISTER SET TO PAGE 76.
3622
3623 SALL
3624 040437 T= SIXBTZ RELOCATED EXEC-PER-PROCESS PAGING
3625 LALL
3626
3627 SUBTST^
3628 033772 201 00 0 00 033772 MOVEI .
3629 033773 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3630 033774 200 15 0 00 043737 RLBAS6: MOVE REPT,RPEAT
3631 033775 221 15 0 00 000012 IMULI REPT,^D10 ;FSTCYL=10 PASSES, REL=100 PASSES
3632 033776 205 05 0 00 777760 MOVSI INDX,-40/2
3633 033777 201 07 0 00 000340 MOVEI AC,340
3634
3635 034000 201 11 0 05 043742 RLWRT1: MOVEI AC2,PGWRTB(INDX)
3636 034001 242 11 0 00 777767 LSH AC2,-^D9 ;SETUP RELOCATED PAGE PAGE MAP
3637 034002 271 11 0 00 540000 ADDI AC2,540000 ;FOR RELOCATION OF PAGES
3638 034003 504 12 0 00 000011 HRL AC3,AC2 ;340-377 TO EXEC DATA AREA
3639 034004 201 11 0 05 043743 MOVEI AC2,PGWRTB+1(INDX)
3640 034005 242 11 0 00 777767 LSH AC2,-^D9
3641 034006 271 11 0 00 540000 ADDI AC2,540000
3642 034007 540 12 0 00 000011 HRR AC3,AC2
3643 034010 550 10 0 00 000007 HRRZ AC1,AC
3644 034011 242 10 0 00 777777 LSH AC1,-1
3645 034012 271 10 0 00 000220 ADDI AC1,220
3646 034013 202 12 0 10 076000 MOVEM AC3,76000(AC1) ;WRITE PAGING DATA
3647 034014 271 07 0 00 000002 ADDI AC,2
3648 034015 350 00 0 00 000005 AOS INDX
3649 034016 253 05 0 00 034000 AOBJN INDX,RLWRT1
3650
3651 034017 402 00 0 00 043742 RLWRT2: SETZM PGWRTB
3652 034020 200 07 0 00 040176 MOVE AC,[PGWRTB,,PGWRTB+1]
3653 034021 251 07 0 00 044001 BLT AC,PGWRTB+37 ;CLEAR DATA AREA
3654 034022 7 010 20 0 00 020000 CONO PAG,LTRPEN
3655 034023 7 010 14 0 00 040411 DATAO PAG,[LLDUSB,,400076]
3656 034024 205 05 0 00 777740 MOVSI INDX,-40
3657 034025 201 07 0 00 000340 MOVEI AC,340
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 83
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0139
3658 034026 200 14 0 00 000007 RLWRT3: MOVE COR,AC ;SETUP DATA
3659 034027 242 14 0 00 000011 LSH COR,^D9 ;AND PAGING ADDRESS
3660 034030 661 14 0 00 777777 TLO COR,-1
3661 034031 621 14 0 14 000000 TLZ COR,(COR)
3662 034032 201 10 0 05 043742 MOVEI AC1,PGWRTB(INDX)
3663 034033 405 10 0 00 000777 ANDI AC1,777
3664 034034 271 10 0 14 000000 ADDI AC1,(COR)
3665
3666 034035 202 14 0 10 000000 MOVEM COR,(AC1) ;MAKE PAGED MEMORY WRITE
3667 034036 200 13 0 10 000000 MOVE ACT,(AC1) ;PAGED READ VERIFY
3668 034037 312 14 0 00 000013 CAME COR,ACT
3669 ERROR RLWRT2,13,COR,ACT,DATA ERROR,PAGED REREAD,PGWRTX^
3670 SALL
3671 034040 036 13 0 00 040445
3672 034041 035 00 0 00 034017 ERLOOP RLWRT2 ;IF ERROR, LOOP TO RLWRT2
3673 034042 200 13 0 05 043742 MOVE ACT,PGWRTB(INDX)
3674 034043 312 14 0 00 000013 CAME COR,ACT
3675 ERROR RLWRT2,13,COR,ACT,DATA ERROR,DIRECT REREAD,PGWRTY^
3676 034044 036 13 0 00 040450
3677 034045 035 00 0 00 034017 ERLOOP RLWRT2 ;IF ERROR, LOOP TO RLWRT2
3678 034046 350 00 0 00 000007 AOS AC
3679 034047 253 05 0 00 034026 AOBJN INDX,RLWRT3
3680
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 84
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0140
3681 034050 7 010 20 0 00 020000 RLWRT4: CONO PAG,LTRPEN
3682 034051 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3683 034052 205 05 0 00 777740 MOVSI INDX,-40 ;CHECK DATA BLOCK USING
3684 034053 201 07 0 00 000340 MOVEI AC,340 ;DIRECT ADDRESSING
3685
3686 034054 200 14 0 00 000007 MOVE COR,AC
3687 034055 242 14 0 00 000011 LSH COR,^D9
3688 034056 661 14 0 00 777777 TLO COR,-1
3689 034057 621 14 0 14 000000 TLZ COR,(COR)
3690 034060 200 13 0 05 043742 MOVE ACT,PGWRTB(INDX)
3691 034061 312 14 0 00 000013 CAME COR,ACT
3692 ERROR RLWRT2,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
3693 034062 036 13 0 00 040453
3694 034063 035 00 0 00 034017 ERLOOP RLWRT2 ;IF ERROR, LOOP TO RLWRT2
3695 034064 350 00 0 00 000007 AOS AC
3696 034065 253 05 0 00 034054 AOBJN INDX,RLWRT4+4
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 85
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0141
3697 ;*TEST THAT A TRAP FROM THE EXEC-PER-PROCESS AREA
3698 ;*USES THE CORRECT BASE REGISTER
3699
3700 034066 7 010 20 0 00 020000 EPPT0: CONO PAG,LTRPEN
3701 034067 7 010 14 0 00 040411 DATAO PAG,[LLDUSB,,400076]
3702
3703 034070 200 00 0 00 040456 MOVE [JRST 1,340001] ;PORTAL
3704 034071 202 00 0 00 340000 MOVEM 340000
3705 034072 200 00 0 00 040457 MOVE [JRSTF @340002] ;SET FLAGS
3706 034073 202 00 0 00 340001 MOVEM 340001
3707 034074 200 00 0 00 040460 MOVE [TN0!TN1,,340003] ;TO CAUSE TRAP 3
3708 034075 202 00 0 00 340002 MOVEM 340002
3709 034076 200 00 0 00 040461 MOVE [JRST 340003] ;IF NO TRAP, HANG
3710 034077 202 00 0 00 340003 MOVEM 340003
3711
3712 034100 200 00 0 00 040462 MOVE [JSR EPPT2] ;SHOULD TRAP USING EBR
3713 034101 202 00 0 00 000423 MOVEM LTRP3T
3714 034102 200 00 0 00 040463 MOVE [JSR EPPT1] ;ERROR IF USED UBR
3715 034103 202 00 0 00 076423 MOVEM 76000!LTRP3T
3716
3717 034104 254 00 0 00 340000 JRST 340000 ;TO PER-PROCESS AREA
3718
3719 034105 000000 000000 EPPT1: 0
3720 034106 7 010 20 0 00 020000 CONO PAG,LTRPEN
3721 034107 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3722 ERROR RLBAS6+2,13,0,0,EPP ADR TRAP ERROR,TRAPPED USING UBR^
3723 034110 036 13 0 00 040473
3724 034111 035 00 0 00 033776 ERLOOP RLBAS6+2 ;IF ERROR, LOOP TO RLBAS6+2
3725 034112 254 00 0 00 034125 JRST EPPT3
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 86
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0142
3726 034113 000000 000000 EPPT2: 0
3727 034114 7 010 20 0 00 020000 CONO PAG,LTRPEN
3728 034115 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3729 034116 200 00 0 00 043732 MOVE LTRP3SV
3730 034117 202 00 0 00 000423 MOVEM LTRP3T
3731 034120 200 14 0 00 040476 MOVE COR,[0,,340003]
3732 034121 200 13 0 00 034113 MOVE ACT,EPPT2
3733 034122 312 14 0 00 000013 CAME COR,ACT
3734 ERROR RLBAS6+2,13,COR,ACT,EPP ADR TRAP ERROR,SAVED PC WRONG^
3735 034123 036 13 0 00 040502
3736 034124 035 00 0 00 033776 ERLOOP RLBAS6+2 ;IF ERROR, LOOP TO RLBAS6+2
3737
3738 034125 367 15 0 00 033776 EPPT3: REPTLP RLBAS6+2
3739
3740 XLIST
3741 LIST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 89
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0143
3742 ;*TEST BASE REGISTER RELOCATION
3743 ;*BY USING PAGE FAULT TRAP
3744
3745 SUBTST^
3746 034126 201 00 0 00 034126 MOVEI .
3747 034127 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3748 034130 200 15 0 00 043737 RLPFT0: MOVE REPT,RPEAT
3749 034131 7 010 20 0 00 020000 CONO PAG,LTRPEN
3750 034132 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3751 034133 201 07 0 00 034154 MOVEI AC,RLPFT1
3752 034134 202 07 0 00 076502 MOVEM AC,76000!LPGFTR ;SETUP PAGE PAGE FAULT
3753 034135 201 07 0 00 034147 MOVEI AC,RLPFT2
3754 034136 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP PAGE 0 PAGE FAULT
3755
3756 034137 402 00 0 00 076400 SETZM 76400
3757 034140 7 010 20 0 00 020000 CONO PAG,LTRPEN
3758 034141 7 010 14 0 00 040411 DATAO PAG,[LLDUSB,,400076] ;SETUP BASE REG
3759 034142 200 13 0 00 340000 RLPFT3: MOVE ACT,340000 ;DO PAGING, SHOULD FAULT
3760 034143 7 010 20 0 00 020000 CONO PAG,LTRPEN
3761 034144 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3762 ERROR1 13,COR,ACT,PAGE FAULT FAILED,FATAL^
3763 034145 036 13 0 00 040510
3764 034146 254 00 0 00 034164 JRST RLPFT4
3765
3766 034147 7 010 20 0 00 020000 RLPFT2: CONO PAG,LTRPEN
3767 034150 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3768 034151 200 14 0 00 000500 MOVE COR,LEUPFW
3769 ERROR1 13,COR,ACT,RELOCATION FAILED,PAGE FAIL TRAPPED TO PAGE 0^
3770 034152 036 13 0 00 040523
3771 034153 254 00 0 00 034164 JRST RLPFT4 ;FATAL
3772
3773 034154 7 010 20 0 00 020000 RLPFT1: CONO PAG,LTRPEN
3774 034155 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3775 034156 200 14 0 00 040022 MOVE COR,[1000,,340000]
3776 034157 200 13 0 00 076500 MOVE ACT,76000!LEUPFW
3777 034160 312 14 0 00 000013 CAME COR,ACT
3778 ERROR1 13,COR,ACT,RELOCATION SUCCEEDED,PAGE FAIL WORD WRONG^
3779 034161 036 13 0 00 040532
3780 034162 035 00 0 00 034140 ERLOOP RLPFT3-2
3781
3782 034163 367 15 0 00 034131 REPTLP RLPFT0+1
3783
3784 034164 200 00 0 00 043736 RLPFT4: MOVE PGFAIL
3785 034165 202 00 0 00 000502 MOVEM LPGFTR
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 90
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0144
3786 ;*TEST BASE REGISTER RELOCATION
3787 ;*BY USING TRAPPING
3788
3789 SUBTST^
3790 034166 201 00 0 00 034166 MOVEI .
3791 034167 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3792 034170 200 15 0 00 043737 RLTRP0: MOVE REPT,RPEAT
3793 034171 7 010 20 0 00 020000 CONO PAG,LTRPEN
3794 034172 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
3795
3796 ;*TEST RELOCATED TRAP 3
3797
3798 034173 200 07 0 00 040535 RLTRP1: MOVE AC,[JSR RLTP3]
3799 034174 202 07 0 00 076423 MOVEM AC,76000!LTRP3T
3800 034175 7 010 20 0 00 020076 CONO PAG,LTRPEN!76
3801 034176 254 02 1 00 034177 JRSTF @.+1
3802 034177 000600 034200 TN0!TN1,,.+1
3803 034200 7 010 20 0 00 020000 RLTP3X: CONO PAG,LTRPEN
3804 ERROR1 13,0,0,TRAP 3 FAILED,FATAL^
3805 034201 036 13 0 00 040536
3806 034202 254 00 0 00 034212 JRST RLTP4
3807
3808 034203 000000 000000 RLTP3: 0
3809 034204 7 010 20 0 00 020000 CONO PAG,LTRPEN
3810 034205 200 14 0 00 040541 MOVE COR,[0,,RLTP3X]
3811 034206 200 13 0 00 034203 MOVE ACT,RLTP3
3812 034207 312 14 0 00 000013 CAME COR,ACT
3813 ERROR RLTRP1,13,COR,ACT,TRAP 3 SAVED PC^
3814 034210 036 13 0 00 040542
3815 034211 035 00 0 00 034173 ERLOOP RLTRP1 ;IF ERROR, LOOP TO RLTRP1
3816 034212 RLTP4:
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 91
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0145
3817 ;*TEST RELOCATED TRAP 2
3818
3819 034212 200 07 0 00 040545 MOVE AC,[JSR RLPDL]
3820 034213 202 07 0 00 076422 MOVEM AC,76000!LPDOVT
3821 034214 7 010 20 0 00 020076 CONO PAG,LTRPEN!76
3822 034215 254 02 1 00 034216 JRSTF @.+1
3823 034216 000400 034217 TN0,,.+1
3824 034217 7 010 20 0 00 020000 RLPDLX: CONO PAG,LTRPEN
3825 ERROR1 13,0,0,TRAP 2 FAILED,FATAL^
3826 034220 036 13 0 00 040546
3827 034221 254 00 0 00 034231 JRST RLPDL1
3828
3829 034222 000000 000000 RLPDL: 0
3830 034223 7 010 20 0 00 020000 CONO PAG,LTRPEN
3831 034224 200 14 0 00 040551 MOVE COR,[0,,RLPDLX]
3832 034225 200 13 0 00 034222 MOVE ACT,RLPDL
3833 034226 312 14 0 00 000013 CAME COR,ACT
3834 ERROR RLTRP1,13,COR,ACT,TRAP 2 SAVED PC^
3835 034227 036 13 0 00 040552
3836 034230 035 00 0 00 034173 ERLOOP RLTRP1 ;IF ERROR, LOOP TO RLTRP1
3837 034231 RLPDL1:
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 92
DSKEAM MAC 29-Mar-78 14:55 TEST BASE REGISTER RELOCATION SEQ 0146
3838 ;*TEST RELOCATED TRAP 1
3839
3840 034231 200 07 0 00 040555 MOVE AC,[JSR RLAROV]
3841 034232 202 07 0 00 076421 MOVEM AC,76000!LAROVT
3842 034233 7 010 20 0 00 020076 CONO PAG,LTRPEN!76
3843 034234 254 02 1 00 034235 JRSTF @.+1
3844 034235 000200 034236 TN1,,.+1
3845 034236 7 010 20 0 00 020000 RLAROX: CONO PAG,LTRPEN
3846 ERROR1 13,0,0,TRAP 1 FAILED,FATAL^
3847 034237 036 13 0 00 040556
3848 034240 254 00 0 00 034253 JRST RLARO1
3849
3850 034241 000000 000000 RLAROV: 0
3851 034242 7 010 20 0 00 020000 CONO PAG,LTRPEN
3852 034243 200 14 0 00 040561 MOVE COR,[0,,RLAROX]
3853 034244 200 13 0 00 034241 MOVE ACT,RLAROV
3854 034245 312 14 0 00 000013 CAME COR,ACT
3855 ERROR RLTRP1,13,COR,ACT,TRAP 1 SAVED PC^
3856 034246 036 13 0 00 040562
3857 034247 035 00 0 00 034173 ERLOOP RLTRP1 ;IF ERROR, LOOP TO RLTRP1
3858
3859 034250 200 07 0 00 040360 MOVE AC,[JFCL]
3860 034251 202 07 0 00 076421 MOVEM AC,76000!LAROVT
3861
3862 034252 367 15 0 00 034171 REPTLP RLTRP0+1
3863 034253 RLARO1:
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 93
DSKEAM MAC 29-Mar-78 14:55 TEST INTERRUPT RELOCATION SEQ 0147
3864 SUBTTL TEST INTERRUPT RELOCATION
3865
3866 ;*SET PAGE 0 INTERRUPT LOCATIONS AS ERROR
3867 ;*SETUP RELOCATED PAGE INTERRUPT LOCATIONS FOR TESTING
3868 ;*RELOCATE EXEC BASE REGISTER
3869 ;*TEST INTERRUPTS
3870
3871 SALL
3872 040565 T=SIXBTZ RELOCATED INTERRUPT TEST
3873 LALL
3874
3875 SUBTST^
3876 034253 201 00 0 00 034253 MOVEI .
3877 034254 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
3878 034255 200 15 0 00 043737 RLINT0: MOVE REPT,RPEAT
3879 034256 221 15 0 00 000012 IMULI REPT,^D10 ;FSTCYL=10 PASSES, REL =100 PASSES
3880 034257 200 00 0 00 040572 MOVE [JSR RLITR1] ;SETUP RELOC PAGE INTERRUPTS
3881 034260 202 00 0 00 076042 MOVEM 76000!42
3882 034261 200 00 0 00 040573 MOVE [JSR RLITR2]
3883 034262 202 00 0 00 076044 MOVEM 76000!44
3884 034263 200 00 0 00 040574 MOVE [JSR RLITR3]
3885 034264 202 00 0 00 076046 MOVEM 76000!46
3886 034265 200 00 0 00 040575 MOVE [JSR RLITR4]
3887 034266 202 00 0 00 076050 MOVEM 76000!50
3888 034267 200 00 0 00 040576 MOVE [JSR RLITR5]
3889 034270 202 00 0 00 076052 MOVEM 76000!52
3890 034271 200 00 0 00 040577 MOVE [JSR RLITR6]
3891 034272 202 00 0 00 076054 MOVEM 76000!54
3892 034273 200 00 0 00 040600 MOVE [JSR RLITR7]
3893 034274 202 00 0 00 076056 MOVEM 76000!56
3894
3895 034275 200 00 0 00 040601 MOVE [JSR RLIERR] ;SETUP PAGE 0 FOR ERROR
3896 034276 202 00 0 00 000056 MOVEM 56
3897 034277 202 00 0 00 000054 MOVEM 54
3898 034300 202 00 0 00 000052 MOVEM 52
3899 034301 202 00 0 00 000050 MOVEM 50
3900 034302 202 00 0 00 000046 MOVEM 46
3901 034303 202 00 0 00 000044 MOVEM 44
3902 034304 202 00 0 00 000042 MOVEM 42
3903
3904 034305 7 004 20 0 00 011400 RLINT1: CONO PI,LPICLR!LCHNOF!LPIOFF
3905 034306 7 000 20 0 00 200000 CONO APR,LIOCLR
3906 034307 254 00 0 00 034320 JRST RLINT2
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 94
DSKEAM MAC 29-Mar-78 14:55 TEST INTERRUPT RELOCATION SEQ 0148
3907 ;*PAGE 0 INTERRUPT ERROR HANDLER
3908
3909 034310 000000 000000 RLIERR: 0
3910 034311 7 010 20 0 00 020000 CONO PAG,LTRPEN
3911 034312 7 000 24 0 00 000014 CONI APR,COR
3912 034313 7 004 24 0 00 000013 CONI PI,ACT
3913 034314 7 000 20 0 00 200000 CONO APR,LIOCLR
3914 034315 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
3915 ERROR1 13,COR,ACT,PAGE 0 INTERRUPT ERROR,<COR=APR, ACT=PI>^
3916 SALL
3917 034316 036 13 0 00 040611
3918 034317 254 00 0 00 034305 JRST RLINT1
3919
3920 ;*RELOCATED INTERRUPT MACRO'S
3921
3922 DEFINE RLITRX (PICHN,APRCHN)<
3923 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
3924 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
3925 ;*PAGE MAP RELOCATED TO PAGE 76.
3926 ;*INTERRUPT CHANNEL = APRCHN.
3927
3928 CONO PI,LCHNON!LPION!PICHN
3929 CONO APR,LSPAER!LEPAER!APRCHN
3930 MOVEI AC,1000
3931 SOJG AC,.
3932 HALT . ;IF NO INTERRUPT, FATAL
3933 >
3934
3935 DEFINE RLITRC (ITRCHN)<
3936 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = ITRCHN
3937
3938 0 ;RETURN, CHANNEL ITRCHN
3939 CONO APR,LDPAER!LCPAER
3940 CONO PI,LPICLR!LCHNOF!LPIOFF
3941 >
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 95
DSKEAM MAC 29-Mar-78 14:55 TEST INTERRUPT RELOCATION SEQ 0149
3942 034320 7 010 20 0 00 020076 RLINT2: CONO PAG,LTRPEN!76
3943
3944 LALL
3945 034321 RLINT3: RLITRX (1,7)^
3946 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
3947 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
3948 ;*PAGE MAP RELOCATED TO PAGE 76.
3949 ;*INTERRUPT CHANNEL = 7
3950
3951 034321 7 004 20 0 00 002201 CONO PI,LCHNON!LPION!1
3952 034322 7 000 20 0 00 110207 CONO APR,LSPAER!LEPAER!7
3953 034323 201 07 0 00 001000 MOVEI AC,1000
3954 034324 367 07 0 00 034324 SOJG AC,.
3955 034325 254 04 0 00 034325 HALT . ;IF NO INTERRUPT, FATAL
3956 ^
3957 034326 RLITR7: RLITRC (7)^
3958 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 7
3959
3960 034326 000000 000000 0 ;RETURN, CHANNEL 7
3961 034327 7 000 20 0 00 060200 CONO APR,LDPAER!LCPAER
3962 034330 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
3963 ^
3964
3965 034331 RLINT4: RLITRX (2,6)^
3966 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
3967 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
3968 ;*PAGE MAP RELOCATED TO PAGE 76.
3969 ;*INTERRUPT CHANNEL = 6
3970
3971 034331 7 004 20 0 00 002202 CONO PI,LCHNON!LPION!2
3972 034332 7 000 20 0 00 110206 CONO APR,LSPAER!LEPAER!6
3973 034333 201 07 0 00 001000 MOVEI AC,1000
3974 034334 367 07 0 00 034334 SOJG AC,.
3975 034335 254 04 0 00 034335 HALT . ;IF NO INTERRUPT, FATAL
3976 ^
3977 034336 RLITR6: RLITRC (6)^
3978 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 6
3979
3980 034336 000000 000000 0 ;RETURN, CHANNEL 6
3981 034337 7 000 20 0 00 060200 CONO APR,LDPAER!LCPAER
3982 034340 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
3983 ^
3984
3985 034341 RLINT5: RLITRX (4,5)^
3986 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
3987 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
3988 ;*PAGE MAP RELOCATED TO PAGE 76.
3989 ;*INTERRUPT CHANNEL = 5
3990
3991 034341 7 004 20 0 00 002204 CONO PI,LCHNON!LPION!4
3992 034342 7 000 20 0 00 110205 CONO APR,LSPAER!LEPAER!5
3993 034343 201 07 0 00 001000 MOVEI AC,1000
3994 034344 367 07 0 00 034344 SOJG AC,.
3995 034345 254 04 0 00 034345 HALT . ;IF NO INTERRUPT, FATAL
3996 ^
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 95-1
DSKEAM MAC 29-Mar-78 14:55 TEST INTERRUPT RELOCATION SEQ 0150
3997 034346 RLITR5: RLITRC (5)^
3998 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 5
3999
4000 034346 000000 000000 0 ;RETURN, CHANNEL 5
4001 034347 7 000 20 0 00 060200 CONO APR,LDPAER!LCPAER
4002 034350 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
4003 ^
4004
4005 034351 RLINT6: RLITRX (10,4)^
4006 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
4007 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
4008 ;*PAGE MAP RELOCATED TO PAGE 76.
4009 ;*INTERRUPT CHANNEL = 4
4010
4011 034351 7 004 20 0 00 002210 CONO PI,LCHNON!LPION!10
4012 034352 7 000 20 0 00 110204 CONO APR,LSPAER!LEPAER!4
4013 034353 201 07 0 00 001000 MOVEI AC,1000
4014 034354 367 07 0 00 034354 SOJG AC,.
4015 034355 254 04 0 00 034355 HALT . ;IF NO INTERRUPT, FATAL
4016 ^
4017 034356 RLITR4: RLITRC (4)^
4018 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 4
4019
4020 034356 000000 000000 0 ;RETURN, CHANNEL 4
4021 034357 7 000 20 0 00 060200 CONO APR,LDPAER!LCPAER
4022 034360 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
4023 ^
4024
4025 034361 RLINT7: RLITRX (20,3)^
4026 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
4027 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
4028 ;*PAGE MAP RELOCATED TO PAGE 76.
4029 ;*INTERRUPT CHANNEL = 3
4030
4031 034361 7 004 20 0 00 002220 CONO PI,LCHNON!LPION!20
4032 034362 7 000 20 0 00 110203 CONO APR,LSPAER!LEPAER!3
4033 034363 201 07 0 00 001000 MOVEI AC,1000
4034 034364 367 07 0 00 034364 SOJG AC,.
4035 034365 254 04 0 00 034365 HALT . ;IF NO INTERRUPT, FATAL
4036 ^
4037 034366 RLITR3: RLITRC (3)^
4038 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 3
4039
4040 034366 000000 000000 0 ;RETURN, CHANNEL 3
4041 034367 7 000 20 0 00 060200 CONO APR,LDPAER!LCPAER
4042 034370 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
4043 ^
4044
4045 034371 RLINT8: RLITRX (40,2)^
4046 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
4047 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
4048 ;*PAGE MAP RELOCATED TO PAGE 76.
4049 ;*INTERRUPT CHANNEL = 2
4050
4051 034371 7 004 20 0 00 002240 CONO PI,LCHNON!LPION!40
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 95-2
DSKEAM MAC 29-Mar-78 14:55 TEST INTERRUPT RELOCATION SEQ 0151
4052 034372 7 000 20 0 00 110202 CONO APR,LSPAER!LEPAER!2
4053 034373 201 07 0 00 001000 MOVEI AC,1000
4054 034374 367 07 0 00 034374 SOJG AC,.
4055 034375 254 04 0 00 034375 HALT . ;IF NO INTERRUPT, FATAL
4056 ^
4057 034376 RLITR2: RLITRC (2)^
4058 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 2
4059
4060 034376 000000 000000 0 ;RETURN, CHANNEL 2
4061 034377 7 000 20 0 00 060200 CONO APR,LDPAER!LCPAER
4062 034400 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
4063 ^
4064
4065 034401 RLINT9: RLITRX (100,1)^
4066 ;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
4067 ;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
4068 ;*PAGE MAP RELOCATED TO PAGE 76.
4069 ;*INTERRUPT CHANNEL = 1
4070
4071 034401 7 004 20 0 00 002300 CONO PI,LCHNON!LPION!100
4072 034402 7 000 20 0 00 110201 CONO APR,LSPAER!LEPAER!1
4073 034403 201 07 0 00 001000 MOVEI AC,1000
4074 034404 367 07 0 00 034404 SOJG AC,.
4075 034405 254 04 0 00 034405 HALT . ;IF NO INTERRUPT, FATAL
4076 ^
4077 034406 RLITR1: RLITRC (1)^
4078 ;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 1
4079
4080 034406 000000 000000 0 ;RETURN, CHANNEL 1
4081 034407 7 000 20 0 00 060200 CONO APR,LDPAER!LCPAER
4082 034410 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
4083 ^
4084
4085 034411 367 15 0 00 034305 REPTLP RLINT1
4086
4087 034412 7 010 20 0 00 020000 RLINTA: CONO PAG,LTRPEN
4088 034413 7 004 20 0 00 011400 CONO PI,LPICLR!LCHNOF!LPIOFF
4089 034414 7 000 20 0 00 260200 CONO APR,LIOCLR!LDPAER!LCPAER
4090
4091 034415 200 07 0 00 040614 MOVE AC,[JSR ITRCH1] ;RESET INTERRUPTS
4092 034416 202 07 0 00 000042 MOVEM AC,42
4093 034417 7 000 20 0 00 121600 CONO APR,LAPRAL
4094 034420 7 004 20 0 00 002300 CONO PI,LCHNON!LPION!LPICH1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 96
DSKEAM MAC 29-Mar-78 14:55 TEST PAGE REFILL RELOCATION SEQ 0152
4095 SUBTTL TEST PAGE REFILL RELOCATION
4096
4097 ;*BY PUTTING REFILL DATA IN PAGE 76.
4098 ;*AND RELOCATING EXEC BASE REGISTER
4099
4100 SALL
4101 040615 T=SIXBTZ RELOCATED EPMP REFILL PAGING
4102 LALL
4103
4104 SUBTST^
4105 034421 201 00 0 00 034421 MOVEI .
4106 034422 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4107 034423 200 15 0 00 043737 RLEPM0: MOVE REPT,RPEAT
4108 034424 221 15 0 00 000012 IMULI REPT,^D10 ;FSTCYL=10 PASSES, REL=100 PASSES
4109 034425 205 05 0 00 777600 MOVSI INDX,-400/2
4110 034426 201 07 0 00 000400 MOVEI AC,400
4111
4112 034427 201 11 0 05 043742 RLEPM1: MOVEI AC2,PGWRTB(INDX) ;SETUP RELOCATION DATA
4113 034430 242 11 0 00 777767 LSH AC2,-^D9
4114 034431 271 11 0 00 740000 ADDI AC2,740000
4115 034432 504 12 0 00 000011 HRL AC3,AC2
4116 034433 201 11 0 05 043743 MOVEI AC2,PGWRTB+1(INDX)
4117 034434 242 11 0 00 777767 LSH AC2,-^D9
4118 034435 271 11 0 00 740000 ADDI AC2,740000
4119 034436 540 12 0 00 000011 HRR AC3,AC2
4120 034437 550 10 0 00 000007 HRRZ AC1,AC ;SETUP PAGE MAP ADDRESS
4121 034440 242 10 0 00 777777 LSH AC1,-1
4122 034441 202 12 0 10 076000 MOVEM AC3,76000(AC1) ;PUT MAPPING DATA IN PAGE 76.
4123 034442 271 07 0 00 000002 ADDI AC,2
4124 034443 350 00 0 00 000005 AOS INDX
4125 034444 253 05 0 00 034427 AOBJN INDX,RLEPM1
4126
4127 034445 7 010 20 0 00 020000 RLEPM2: CONO PAG,LTRPEN ;CLEAR AM, ETC.
4128 034446 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4129 034447 402 00 0 00 043742 SETZM PGWRTB ;CLEAR DATA AREA
4130 034450 200 07 0 00 040176 MOVE AC,[PGWRTB,,PGWRTB+1]
4131 034451 251 07 0 00 044342 BLT AC,PGWRTB+400
4132 034452 205 05 0 00 777400 MOVSI INDX,-400
4133 034453 201 07 0 00 000400 MOVEI AC,400
4134 034454 7 010 20 0 00 020076 CONO PAG,LTRPEN!76 ;RELOC EXEC BASE REG
4135 034455 7 010 14 0 00 040411 DATAO PAG,[LLDUSB,,400076]
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 97
DSKEAM MAC 29-Mar-78 14:55 TEST PAGE REFILL RELOCATION SEQ 0153
4136 034456 200 14 0 00 000007 RLEPM3: MOVE COR,AC ;SETUP DATA
4137 034457 242 14 0 00 000011 LSH COR,^D9
4138 034460 661 14 0 00 777777 TLO COR,-1
4139 034461 621 14 0 14 000000 TLZ COR,(COR)
4140 034462 201 10 0 05 043742 MOVEI AC1,PGWRTB(INDX) ;SETUP PAGING ADDRESS
4141 034463 405 10 0 00 000777 ANDI AC1,777
4142 034464 271 10 0 14 000000 ADDI AC1,(COR)
4143 034465 202 14 0 10 000000 MOVEM COR,(AC1) ;MAKE PAGED MEMORY WRITE
4144 034466 200 13 0 10 000000 MOVE ACT,(AC1) ;PAGED READ VERIFY
4145 034467 7 010 20 0 00 020000 CONO PAG,LTRPEN
4146 034470 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4147 034471 312 14 0 00 000013 CAME COR,ACT
4148 ERROR RLEPM3-2,13,COR,ACT,DATA ERROR,PAGED REREAD,PGWRTX^
4149 SALL
4150 034472 036 13 0 00 040622
4151 034473 035 00 0 00 034454 ERLOOP RLEPM3-2 ;IF ERROR, LOOP TO RLEPM3-2
4152 034474 200 13 0 05 043742 MOVE ACT,PGWRTB(INDX)
4153 034475 312 14 0 00 000013 CAME COR,ACT
4154 ERROR RLEPM3-2,13,COR,ACT,DATA ERROR,DIRECT REREAD,PGWRTY^
4155 034476 036 13 0 00 040625
4156 034477 035 00 0 00 034454 ERLOOP RLEPM3-2 ;IF ERROR, LOOP TO RLEPM3-2
4157 034500 350 00 0 00 000007 AOS AC
4158 034501 253 05 0 00 034454 AOBJN INDX,RLEPM3-2
4159
4160 034502 7 010 20 0 00 020000 RLEPM4: CONO PAG,LTRPEN
4161 034503 205 05 0 00 777400 MOVSI INDX,-400 ;CHECK DATA BLOCK
4162 034504 201 07 0 00 000400 MOVEI AC,400 ;USING DIRECT ADDRESSING
4163 034505 200 14 0 00 000007 MOVE COR,AC
4164 034506 242 14 0 00 000011 LSH COR,^D9 ;SETUP COMPARE WORD
4165 034507 661 14 0 00 777777 TLO COR,-1
4166 034510 621 14 0 14 000000 TLZ COR,(COR)
4167 034511 200 13 0 05 043742 MOVE ACT,PGWRTB(INDX)
4168 034512 312 14 0 00 000013 CAME COR,ACT
4169 ERROR RLEPM2,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
4170 034513 036 13 0 00 040630
4171 034514 035 00 0 00 034445 ERLOOP RLEPM2 ;IF ERROR, LOOP TO RLEPM2
4172 034515 350 00 0 00 000007 AOS AC
4173 034516 253 05 0 00 034505 AOBJN INDX,RLEPM4+3
4174
4175 034517 367 15 0 00 034425 REPTLP RLEPM0+2
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 98
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0154
4176 SUBTTL INSTRUCTION PAGE FAIL TESTING
4177
4178 ;*TEST BLOCK TRANSFER PAGE FAIL
4179 ;*SETUP 5 WORD BLT ACROSS PAGE BOUNDRY
4180 ;*FIRST PAGE DATA RELOCATION DATA IN PAGE MAP
4181 ;*SECOND PAGE DATA RELOCATION DATA NOT IN PAGE MAP
4182 ;*PERFORM BLT
4183 ;*SHOULD PAGE FAIL AFTER TRANSFERING 3 WORDS.
4184 ;*TEST PAGE FAIL, BLT AC, ETC.
4185 ;*REDO BLT, ON PAGE FAIL SETUP 2ND PAGE RELOCATION DATA AND CONTINUE BLT.
4186 ;*TEST FOR PROPER COMPLETION.
4187
4188 SALL
4189 040633 T=SIXBTZ BLT PAGE FAIL
4190 LALL
4191
4192 SUBTST^
4193 034520 201 00 0 00 034520 MOVEI .
4194 034521 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4195 034522 200 15 0 00 043737 PFBLT0: MOVE REPT,RPEAT
4196 034523 402 00 0 00 000200 SETZM 200 ;CLEAR AND SETUP PAGE MAP
4197 034524 200 07 0 00 037671 MOVE AC,[200,,201]
4198 034525 251 07 0 00 000417 BLT AC,417
4199 034526 205 07 0 00 740075 MOVSI AC,740000!75
4200 034527 202 07 0 00 000200 MOVEM AC,200 ;ADDRESSES 400XXX RELOCATE TO PAGE 75.
4201 034530 201 07 0 00 034552 MOVEI AC,PFBLT3
4202 034531 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
4203
4204 034532 403 14 0 00 075775 PFBLT1: SETZB COR,75775 ;CLEAR BLT DATA AREA
4205 034533 402 00 0 00 075776 SETZM 75776
4206 034534 402 00 0 00 075777 SETZM 75777
4207 034535 402 00 0 00 076000 SETZM 76000
4208 034536 402 00 0 00 076001 SETZM 76001
4209 034537 402 00 0 00 076002 SETZM 76002
4210 034540 476 00 0 00 000500 SETOM LEUPFW
4211 034541 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4212 034542 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4213 034543 254 02 1 00 034544 JRSTF @.+1
4214 034544 000000 034545 0,,.+1
4215 034545 476 00 0 00 400775 SETOM 400775 ;SET FIRST BLT ADDRESS
4216 034546 200 13 0 00 040636 MOVE ACT,[400775,,400776]
4217
4218 034547 251 13 0 00 401001 PFBLT2: BLT ACT,401001 ;DO PAGED BLT
4219 ERROR1 13,COR,ACT,TRAP FAILED,<ACT=BLT AC>^
4220 SALL
4221 034550 036 13 0 00 040641
4222 034551 254 00 0 00 034532 JRST PFBLT1 ;FATAL
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 99
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0155
4223 ;*BLT PAGE FAIL RETURN
4224
4225 034552 200 14 0 00 040644 PFBLT3: MOVE COR,[400777,,401000]
4226 034553 312 14 0 00 000013 CAME COR,ACT
4227 ERROR1 13,COR,ACT,BLT AC WRONG,^
4228 034554 036 13 0 00 040650
4229
4230 034555 200 13 0 00 000500 MOVE ACT,LEUPFW
4231 034556 200 14 0 00 040653 MOVE COR,[011000,,401000]
4232 034557 312 14 0 00 000013 CAME COR,ACT
4233 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4234 034560 036 13 0 00 040654
4235
4236 034561 200 13 0 00 000501 MOVE ACT,LPFWPC
4237 034562 200 14 0 00 040657 MOVE COR,[0,,PFBLT2]
4238 034563 312 14 0 00 000013 CAME COR,ACT
4239 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4240 034564 036 13 0 00 040664
4241
4242 034565 476 00 0 00 000014 SETOM COR
4243 034566 200 13 0 00 075775 MOVE ACT,75775
4244 034567 312 14 0 00 000013 CAME COR,ACT
4245 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 400775^
4246 034570 036 13 0 00 040674
4247
4248 034571 200 13 0 00 075776 MOVE ACT,75776
4249 034572 312 14 0 00 000013 CAME COR,ACT
4250 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 400776^
4251 034573 036 13 0 00 040701
4252
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 100
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0156
4253 034574 200 13 0 00 075777 MOVE ACT,75777
4254 034575 312 14 0 00 000013 CAME COR,ACT
4255 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 400777^
4256 034576 036 13 0 00 040706
4257
4258 034577 402 00 0 00 000014 SETZM COR
4259 034600 200 13 0 00 076000 MOVE ACT,76000
4260 034601 312 14 0 00 000013 CAME COR,ACT
4261 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 401000^
4262 034602 036 13 0 00 040713
4263
4264 034603 200 13 0 00 076001 MOVE ACT,76001
4265 034604 312 14 0 00 000013 CAME COR,ACT
4266 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 401001^
4267 034605 036 13 0 00 040720
4268
4269 034606 200 13 0 00 076002 MOVE ACT,76002
4270 034607 312 14 0 00 000013 CAME COR,ACT
4271 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 401002^
4272 034610 036 13 0 00 040725
4273
4274 034611 035 00 0 00 034532 ERLOOP PFBLT1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 101
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0157
4275 ;*TEST BLT PAGE FAIL CONTINUE
4276
4277 034612 201 07 0 00 034662 PFBLT4: MOVEI AC,PFBLT5
4278 034613 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP PAGE FAIL TRAP
4279 034614 402 00 0 00 075775 SETZM 75775 ;CLEAR DATA AREA
4280 034615 402 00 0 00 075776 SETZM 75776
4281 034616 402 00 0 00 075777 SETZM 75777
4282 034617 402 00 0 00 076000 SETZM 76000
4283 034620 402 00 0 00 076001 SETZM 76001
4284 034621 402 00 0 00 076002 SETZM 76002
4285 034622 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4286 034623 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4287 034624 254 02 1 00 034625 JRSTF @.+1
4288 034625 000000 034626 0,,.+1
4289 034626 476 00 0 00 400775 SETOM 400775 ;SET FIRST BLT ADDRESS
4290 034627 200 07 0 00 040636 MOVE AC,[400775,,400776]
4291
4292 034630 251 07 0 00 401001 BLT AC,401001 ;PERFORM PAGED BLT
4293
4294 ;*BLT SHOULD PAGE FAIL
4295 ;*PAGE MAP IS THEN SETUP
4296 ;*AND BLT CONTINUED
4297
4298 034631 476 00 0 00 000014 SETOM COR
4299 034632 200 13 0 00 075775 MOVE ACT,75775
4300 034633 312 14 0 00 000013 CAME COR,ACT
4301 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 400775^
4302 034634 036 13 0 00 040674
4303
4304 034635 200 13 0 00 075776 MOVE ACT,75776
4305 034636 312 14 0 00 000013 CAME COR,ACT
4306 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 400776^
4307 034637 036 13 0 00 040701
4308
4309 034640 200 13 0 00 075777 MOVE ACT,75777
4310 034641 312 14 0 00 000013 CAME COR,ACT
4311 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 400777^
4312 034642 036 13 0 00 040706
4313
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 102
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0158
4314 034643 200 13 0 00 076000 MOVE ACT,76000
4315 034644 312 14 0 00 000013 CAME COR,ACT
4316 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 401000^
4317 034645 036 13 0 00 040713
4318
4319 034646 200 13 0 00 076001 MOVE ACT,76001
4320 034647 312 14 0 00 000013 CAME COR,ACT
4321 ERROR1 13,COR,ACT,BLT DATA WRONG,ADR 401001^
4322 034650 036 13 0 00 040720
4323
4324 034651 402 00 0 00 000014 SETZM COR
4325 034652 200 13 0 00 076002 MOVE ACT,76002
4326 034653 312 14 0 00 000013 CAME COR,ACT
4327 ERROR1 13,COR,ACT,BLT WENT TOO FAR,ADR 401002^
4328 034654 036 13 0 00 040733
4329
4330 034655 035 00 0 00 034552 ERLOOP PFBLT3
4331
4332 034656 367 15 0 00 034523 REPTLP PFBLT0+1
4333
4334 034657 200 07 0 00 043736 MOVE AC,PGFAIL
4335 034660 202 07 0 00 000502 MOVEM AC,LPGFTR ;RESET PAGE FAIL TRAP
4336 034661 254 00 0 00 034666 JRST PFBYT0-2
4337
4338 ;*ON PAGE FAIL, SETUP NEXT PAGE FOR BLT
4339
4340 034662 200 10 0 00 040736 PFBLT5: MOVE AC1,[740000!75,,740000!76]
4341 034663 202 10 0 00 000200 MOVEM AC1,200 ;SETUP PAGE MAP
4342 034664 7 010 20 0 00 020000 CONO PAG,LTRPEN
4343 034665 254 02 1 00 000501 JRSTF @LPFWPC ;RETURN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 103
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0159
4344 ;*TEST BYTE PAGE FAIL
4345 ;*FIRST TEST WITH BYTE DATA IN UNMAPPED PAGE
4346 ;*THEN TEST WITH BYTE POINTER IN UNMAPPED PAGE.
4347
4348 SALL
4349 040737 T=SIXBTZ BYTE PAGE FAIL
4350 LALL
4351
4352 SUBTST^
4353 034666 201 00 0 00 034666 MOVEI .
4354 034667 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4355 034670 200 15 0 00 043737 PFBYT0: MOVE REPT,RPEAT
4356 034671 402 00 0 00 000200 SETZM 200 ;CLEAR PAGE MAP
4357 034672 200 07 0 00 037671 MOVE AC,[200,,201]
4358 034673 251 07 0 00 000417 BLT AC,417
4359 034674 201 07 0 00 034711 MOVEI AC,PFBYT3
4360 034675 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
4361
4362 034676 402 00 0 00 000014 PFBYT1: SETZM COR ;SETUP DATA AREA AND AC
4363 034677 476 00 0 00 076000 SETOM 76000
4364 034700 476 00 0 00 000500 SETOM LEUPFW
4365 034701 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4366 034702 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4367 034703 254 02 1 00 034704 JRSTF @.+1
4368 034704 000000 034705 0,,.+1
4369 034705 200 13 0 00 040742 MOVE ACT,[POINT 6,400000]
4370
4371 034706 134 14 0 00 000013 PFBYT2: ILDB COR,ACT ;PERFORM BYTE INSTRUCTION
4372 ERROR1 13,COR,ACT,ILDB TRAP FAILED,<ACT=POINTER, COR=BYTE AC>^
4373 SALL
4374 034707 036 13 0 00 040753
4375 034710 254 00 0 00 034676 JRST PFBYT1 ;FATAL
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 104
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0160
4376 ;*ILDB PAGE FAIL RETURN
4377 ;*BYTE POINTER SHOULD HAVE BEEN INCREMENTED
4378 ;*PAGE FAIL SHOULD HAVE OCCURRED WHEN DATA WAS FETCHED.
4379
4380 034711 332 00 0 00 000014 PFBYT3: SKIPE COR
4381 ERROR1 13,COR,ACT,ILDB CHANGED BYTE AC,<ACT=POINTER, COR=BYTE AC>^
4382 034712 036 13 0 00 040762
4383 034713 200 14 0 00 040765 MOVE COR,[POINT 6,400000,5]
4384 034714 312 14 0 00 000013 CAME COR,ACT
4385 ERROR1 13,COR,ACT,ILDB POINTER WRONG,^
4386 034715 036 13 0 00 040772
4387 034716 476 00 0 00 000014 SETOM COR
4388 034717 200 13 0 00 076000 MOVE ACT,76000
4389 034720 312 14 0 00 000013 CAME COR,ACT
4390 ERROR1 13,COR,ACT,ILDB MODIFIED BYTE SOURCE,ADR 400000^
4391 034721 036 13 0 00 041004
4392 034722 200 13 0 00 000500 MOVE ACT,LEUPFW
4393 034723 200 14 0 00 037672 MOVE COR,[1000,,400000]
4394 034724 312 14 0 00 000013 CAME COR,ACT
4395 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4396 034725 036 13 0 00 041007
4397 034726 200 13 0 00 000501 MOVE ACT,LPFWPC
4398 034727 200 14 0 00 041012 MOVE COR,[BIS,,PFBYT2]
4399 034730 312 14 0 00 000013 CAME COR,ACT
4400 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4401 034731 036 13 0 00 041013
4402
4403 034732 035 00 0 00 034676 ERLOOP PFBYT1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 105
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0161
4404 ;*TEST DEPOSIT BYTE PAGE FAIL
4405
4406 034733 201 07 0 00 034746 PFBYT4: MOVEI AC,PFBYT6
4407 034734 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
4408 034735 402 00 0 00 000014 SETZM COR
4409 034736 476 00 0 00 076000 SETOM 76000 ;SETUP DATA
4410 034737 476 00 0 00 000500 SETOM LEUPFW
4411 034740 254 02 1 00 034741 JRSTF @.+1
4412 034741 000000 034742 0,,.+1
4413 034742 200 13 0 00 040742 MOVE ACT,[POINT 6,400000]
4414
4415 034743 136 14 0 00 000013 PFBYT5: IDPB COR,ACT ;PERFORM DEPOSIT BYTE
4416 ERROR1 13,COR,ACT,IDPB TRAP FAILED,<ACT=POINTER, COR=BYTE AC>^
4417 034744 036 13 0 00 041021
4418 034745 254 00 0 00 034733 JRST PFBYT4 ;FATAL
4419
4420 ;*IDPB PAGE FAIL RETURN
4421
4422 034746 332 00 0 00 000014 PFBYT6: SKIPE COR
4423 ERROR1 13,COR,ACT,IDPB CHANGED BYTE AC,<ACT=POINTER, COR=BYTE AC>^
4424 034747 036 13 0 00 041030
4425
4426 034750 200 14 0 00 040765 MOVE COR,[POINT 6,400000,5]
4427 034751 312 14 0 00 000013 CAME COR,ACT
4428 ERROR1 13,COR,ACT,IDPB POINTER WRONG,^
4429 034752 036 13 0 00 041037
4430
4431 034753 476 00 0 00 000014 SETOM COR
4432 034754 200 13 0 00 076000 MOVE ACT,76000
4433 034755 312 14 0 00 000013 CAME COR,ACT
4434 ERROR1 13,COR,ACT,IDPB MODIFIED BYTE DESTINATION,ADR 400000^
4435 034756 036 13 0 00 041050
4436
4437 034757 200 13 0 00 000500 MOVE ACT,LEUPFW
4438 034760 200 14 0 00 037672 MOVE COR,[1000,,400000]
4439 034761 312 14 0 00 000013 CAME COR,ACT
4440 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4441 034762 036 13 0 00 041007
4442
4443 034763 200 13 0 00 000501 MOVE ACT,LPFWPC
4444 034764 200 14 0 00 041053 MOVE COR,[BIS,,PFBYT5]
4445 034765 312 14 0 00 000013 CAME COR,ACT
4446 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4447 034766 036 13 0 00 041013
4448
4449 034767 035 00 0 00 034733 ERLOOP PFBYT4
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 106
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0162
4450 ;*TEST BYTE POINTER FETCH PAGE FAIL
4451 ;*BYTE POINTER IN PAGED AREA WITH PAGE MAP CLEARED
4452 ;*THEREFORE PAGE FAIL SHOULD OCCUR ON POINTER FETCH
4453 ;*AND POINTER SHOULD NOT BE INCREMENTED.
4454
4455 034770 201 07 0 00 035005 PFBYT7: MOVEI AC,PFBYT9
4456 034771 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
4457 034772 402 00 0 00 000014 SETZM COR
4458 034773 200 13 0 00 041054 MOVE ACT,[POINT 6,COR]
4459 034774 202 13 0 00 076000 MOVEM ACT,76000 ;SETUP POINTER
4460 034775 476 00 0 00 000500 SETOM LEUPFW
4461 034776 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4462 034777 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4463 035000 254 02 1 00 035001 JRSTF @.+1
4464 035001 000000 035002 0,,.+1
4465
4466 035002 134 14 0 00 400000 PFBYT8: ILDB COR,400000 ;PERFORM BYTE INSTRUCTION
4467 ERROR1 13,COR,ACT,POINTER FETCH TRAP FAILED,ADR 400000^
4468 035003 036 13 0 00 041062
4469 035004 254 00 0 00 034770 JRST PFBYT7 ;FATAL
4470
4471 ;*POINTER FETCH PAGE FAIL RETURN
4472
4473 035005 332 00 0 00 000014 PFBYT9: SKIPE COR
4474 ERROR1 13,COR,ACT,POINTER FETCH MODIFIED BYTE AC,^
4475 035006 036 13 0 00 041073
4476
4477 035007 200 14 0 00 041054 MOVE COR,[POINT 6,COR]
4478 035010 312 14 0 00 000013 CAME COR,ACT
4479 ERROR1 13,COR,ACT,AC 'ACT' MODIFIED,^
4480 035011 036 13 0 00 041101
4481
4482 035012 200 13 0 00 076000 MOVE ACT,76000
4483 035013 312 14 0 00 000013 CAME COR,ACT
4484 ERROR1 13,COR,ACT,POINTER WRONG,ADR 400000^
4485 035014 036 13 0 00 041107
4486
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 107
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0163
4487 035015 200 13 0 00 000500 MOVE ACT,LEUPFW
4488 035016 200 14 0 00 041112 MOVE COR,[011000,,400000]
4489 035017 312 14 0 00 000013 CAME COR,ACT
4490 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4491 035020 036 13 0 00 041007
4492
4493 035021 200 13 0 00 000501 MOVE ACT,LPFWPC
4494 035022 200 14 0 00 041113 MOVE COR,[0,,PFBYT8]
4495 035023 312 14 0 00 000013 CAME COR,ACT
4496 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4497 035024 036 13 0 00 041013
4498
4499 035025 035 00 0 00 034770 ERLOOP PFBYT7
4500
4501 035026 367 15 0 00 034671 REPTLP PFBYT0+1
4502
4503 035027 200 07 0 00 043736 MOVE AC,PGFAIL
4504 035030 202 00 0 00 000502 MOVEM LPGFTR ;RESET PAGE FAIL
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 108
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0164
4505 ;*TEST DOUBLE MOVE PAGE FAIL
4506 ;*FIRST PAGE FAIL ON FIRST OPERAND FETCH
4507 ;*OPERANDS FETCHED FROM PAGED AREA WITH PAGE MAP CLEAR.
4508
4509 SALL
4510 041114 T=SIXBTZ DOUBLE MOVE PAGE FAIL
4511 LALL
4512
4513 SUBTST^
4514 035031 201 00 0 00 035031 MOVEI .
4515 035032 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4516 035033 200 15 0 00 043737 PFDMV0: MOVE REPT,RPEAT
4517 035034 402 00 0 00 000200 SETZM 200 ;CLEAR PAGE MAP
4518 035035 200 07 0 00 037671 MOVE AC,[200,,201]
4519 035036 251 07 0 00 000417 BLT AC,417
4520 035037 201 07 0 00 035054 MOVEI AC,PFDMV3
4521 035040 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
4522 035041 403 13 0 00 076000 PFDMV1: SETZB ACT,76000
4523 035042 403 14 0 00 076001 SETZB COR,76001
4524 035043 477 07 0 00 000010 SETOB AC,AC1 ;SETUP OPERANDS
4525 035044 476 00 0 00 000500 SETOM LEUPFW
4526 035045 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4527 035046 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4528 035047 254 02 1 00 035050 JRSTF @.+1
4529 035050 000000 035051 0,,.+1
4530
4531 035051 120 07 0 00 400000 PFDMV2: DMOVE AC,400000 ;PERFORM DOUBLE MOVE
4532 ERROR1 13,COR,ACT,TRAP FAILED,ADR 400000^
4533 SALL
4534 035052 036 13 0 00 041120
4535 035053 254 00 0 00 035041 JRST PFDMV1 ;FATAL
4536
4537 ;*PAGE FAIL RETURN
4538
4539 035054 476 00 0 00 000014 PFDMV3: SETOM COR
4540 035055 200 13 0 00 000007 MOVE ACT,AC
4541 035056 312 14 0 00 000013 CAME COR,ACT
4542 ERROR1 13,COR,ACT,DMOVE MODIFIED AC,FETCH FROM 400000^
4543 035057 036 13 0 00 041131
4544 035060 200 13 0 00 000010 MOVE ACT,AC1
4545 035061 312 14 0 00 000013 CAME COR,ACT
4546 ERROR1 13,COR,ACT,DMOVE MODIFIED AC1,FETCH FROM 400001^
4547 035062 036 13 0 00 041143
4548
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 109
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0165
4549 035063 200 13 0 00 000500 MOVE ACT,LEUPFW
4550 035064 200 14 0 00 037672 MOVE COR,[1000,,400000]
4551 035065 312 14 0 00 000013 CAME COR,ACT
4552 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4553 035066 036 13 0 00 041146
4554
4555 035067 200 13 0 00 000501 MOVE ACT,LPFWPC
4556 035070 200 14 0 00 041151 MOVE COR,[0,,PFDMV2]
4557 035071 312 14 0 00 000013 CAME COR,ACT
4558 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4559 035072 036 13 0 00 041152
4560
4561 035073 035 00 0 00 035041 ERLOOP PFDMV1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 110
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0166
4562 ;*PAGE FAIL DOUBLE MOVE ON SECOND WORD
4563 ;*DATA FOR FIRST OPERAND IN PAGE WITH RELOCATION DATA IN PAGE MAP.
4564 ;*DATA FOR SECOND OPERAND ACROSS PAGE BOUNDRY
4565 ;*PAGE MAP CLEAR FOR THAT PAGE.
4566
4567 035074 201 07 0 00 035114 PFDMV4: MOVEI AC,PFDMV6
4568 035075 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
4569 035076 205 07 0 00 740075 MOVSI AC,740000!75
4570 035077 202 07 0 00 000200 MOVEM AC,200 ;SETUP 1ST WORD PAGE MAP
4571 035100 403 14 0 00 000013 SETZB COR,ACT
4572 035101 402 00 0 00 075777 SETZM 75777 ;SETUP OPERANDS
4573 035102 402 00 0 00 076000 SETZM 76000
4574 035103 477 07 0 00 000010 SETOB AC,AC1
4575 035104 476 00 0 00 000500 SETOM LEUPFW
4576 035105 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4577 035106 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4578 035107 254 02 1 00 035110 JRSTF @.+1
4579 035110 000000 035111 0,,.+1
4580
4581 035111 120 07 0 00 400777 PFDMV5: DMOVE AC,400777 ;PERFORM DOUBLE MOVE
4582 ERROR1 13,COR,ACT,TRAP FAILED,^
4583 035112 036 13 0 00 041155
4584 035113 254 00 0 00 035074 JRST PFDMV4 ;FATAL
4585
4586 ;*PAGE FAIL RETURN
4587
4588 035114 476 00 0 00 000014 PFDMV6: SETOM COR
4589 035115 200 13 0 00 000007 MOVE ACT,AC
4590 035116 312 14 0 00 000013 CAME COR,ACT
4591 ERROR1 13,COR,ACT,DMOVE MODIFIED AC,FETCH FROM 400777^
4592 035117 036 13 0 00 041163
4593
4594 035120 200 13 0 00 000010 MOVE ACT,AC1
4595 035121 312 14 0 00 000013 CAME COR,ACT
4596 ERROR1 13,COR,ACT,DMOVE MODIFIED AC1,FETCH FROM 401000^
4597 035122 036 13 0 00 041171
4598
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 111
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0167
4599 035123 200 13 0 00 000500 MOVE ACT,LEUPFW
4600 035124 200 14 0 00 041174 MOVE COR,[1000,,401000]
4601 035125 312 14 0 00 000013 CAME COR,ACT
4602 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4603 035126 036 13 0 00 041146
4604
4605 035127 200 13 0 00 000501 MOVE ACT,LPFWPC
4606 035130 200 14 0 00 041175 MOVE COR,[0,,PFDMV5]
4607 035131 312 14 0 00 000013 CAME COR,ACT
4608 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4609 035132 036 13 0 00 041152
4610
4611 035133 035 00 0 00 035074 ERLOOP PFDMV4
4612
4613 035134 367 15 0 00 035034 REPTLP PFDMV0+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 112
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0168
4614 ;*TEST DOUBLE MOVE TO MEMORY PAGE FAIL
4615 ;*FIRST TEST WITH DATA DESTINATION ADDRESSES IN A PAGED AREA
4616 ;*WITH THE PAGE MAP CLEAR.
4617
4618 SALL
4619 041176 T=SIXBTZ DBL MOVE TO MEM PAGE FAIL
4620 LALL
4621
4622 SUBTST^
4623 035135 201 00 0 00 035135 MOVEI .
4624 035136 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4625 035137 200 15 0 00 043737 PFDMM0: MOVE REPT,RPEAT
4626 035140 402 00 0 00 000200 SETZM 200 ;CLEAR PAGE MAP
4627 035141 200 07 0 00 037671 MOVE AC,[200,,201]
4628 035142 251 07 0 00 000417 BLT AC,417
4629 035143 201 07 0 00 035162 MOVEI AC,PFDMM3
4630 035144 202 07 0 00 000502 MOVEM AC,LPGFTR ;SETUP FOR PAGE FAIL
4631
4632 035145 7 010 20 0 00 020000 PFDMM1: CONO PAG,LTRPEN ;CLEAR AM, ETC.
4633 035146 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4634 035147 403 13 0 00 076000 SETZB ACT,76000
4635 035150 403 14 0 00 076001 SETZB COR,76001 ;SETUP OPERANDS
4636 035151 477 07 0 00 000010 SETOB AC,AC1
4637 035152 476 00 0 00 000500 SETOM LEUPFW
4638 035153 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4639 035154 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4640 035155 254 02 1 00 035156 JRSTF @.+1
4641 035156 000000 035157 0,,.+1
4642
4643 035157 124 07 0 00 400000 PFDMM2: DMOVEM AC,400000 ;PERFORM DOUBLE MOVE
4644 ERROR1 13,COR,ACT,TRAP FAILED,ADR 400000^
4645 SALL
4646 035160 036 13 0 00 041203
4647 035161 254 00 0 00 035145 JRST PFDMM1 ;FATAL
4648
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 113
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0169
4649 ;*PAGE FAIL RETURN
4650
4651 035162 402 00 0 00 000014 PFDMM3: SETZM COR
4652 035163 200 13 0 00 076000 MOVE ACT,76000
4653 035164 312 14 0 00 000013 CAME COR,ACT
4654 ERROR1 13,COR,ACT,DMOVEM MODIFIED AC DESTINATION,ADR 400000^
4655 035165 036 13 0 00 041214
4656
4657 035166 200 13 0 00 076001 MOVE ACT,76001
4658 035167 312 14 0 00 000013 CAME COR,ACT
4659 ERROR1 13,COR,ACT,DMOVEM MODIFIED AC1 DESTINATION,ADR 400001^
4660 035170 036 13 0 00 041227
4661
4662 035171 476 00 0 00 000014 SETOM COR
4663 035172 200 13 0 00 000007 MOVE ACT,AC
4664 035173 312 14 0 00 000013 CAME COR,ACT
4665 ERROR1 13,COR,ACT,DMOVEM MODIFIED AC,^
4666 035174 036 13 0 00 041236
4667
4668 035175 200 13 0 00 000010 MOVE ACT,AC1
4669 035176 312 14 0 00 000013 CAME COR,ACT
4670 ERROR1 13,COR,ACT,DMOVEM MODIFIED AC1,^
4671 035177 036 13 0 00 041245
4672
4673 035200 200 13 0 00 000500 MOVE ACT,LEUPFW
4674 035201 200 14 0 00 041250 MOVE COR,[011000,,400001] ;KS-10 DIFF FROM KL, KL =011000,,400000
4675 035202 312 14 0 00 000013 CAME COR,ACT
4676 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4677 035203 036 13 0 00 041251
4678
4679 035204 200 13 0 00 000501 MOVE ACT,LPFWPC
4680 035205 200 14 0 00 041254 MOVE COR,[0,,PFDMM2]
4681 035206 312 14 0 00 000013 CAME COR,ACT
4682 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4683 035207 036 13 0 00 041255
4684
4685 035210 035 00 0 00 035145 ERLOOP PFDMM1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 114
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0170
4686 ;*TEST DOUBLE MOVE TO MEMORY PAGE FAIL
4687 ;*PAGE FAIL ON SECOND WORD.
4688 ;*PAGE MAP SETUP SO FIRST OPERAND IS STORED IN PAGE
4689 ;*WITH RELOCATION DATA IN PAGE MAP.
4690 ;*SECOND OPERAND STORE IS ACROSS PAGE BOUNDRY WITH
4691 ;*PAGE MAP CLEAR FOR THAT PAGE.
4692
4693 035211 201 07 0 00 035230 PFDMM4: MOVEI AC,PFDMM6
4694 035212 202 07 0 00 000502 MOVEM AC,LPGFTR
4695 035213 205 07 0 00 740075 MOVSI AC,740000!75
4696 035214 202 07 0 00 000200 MOVEM AC,200 ;SETUP 1ST WORD PAGE MAP
4697 035215 402 00 0 00 075777 SETZM 75777
4698 035216 402 00 0 00 076000 SETZM 76000
4699 035217 477 07 0 00 000010 SETOB AC,AC1
4700 035220 476 00 0 00 000500 SETOM LEUPFW
4701 035221 7 010 20 0 00 020000 CONO PAG,LTRPEN ;CLEAR AM, ETC.
4702 035222 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4703 035223 254 02 1 00 035224 JRSTF @.+1
4704 035224 000000 035225 0,,.+1
4705
4706 035225 124 07 0 00 400777 PFDMM5: DMOVEM AC,400777 ;PERFORM DOUBLE MOVE
4707 ERROR1 13,COR,ACT,TRAP FAILED,2ND WORD DMOVEM^
4708 035226 036 13 0 00 041263
4709 035227 254 00 0 00 035211 JRST PFDMM4 ;FATAL
4710
4711 ;*PAGE FAIL RETURN
4712
4713 035230 402 00 0 00 000014 PFDMM6: SETZM COR
4714 035231 200 13 0 00 075777 MOVE ACT,75777
4715 035232 312 14 0 00 000013 CAME COR,ACT
4716 ERROR1 13,COR,ACT,DMOVEM MODIFIED AC DESTINATION,ADR 400777^
4717 035233 036 13 0 00 041266
4718
4719 035234 402 00 0 00 000014 SETZM COR
4720 035235 200 13 0 00 076000 MOVE ACT,76000
4721 035236 312 14 0 00 000013 CAME COR,ACT
4722 ERROR1 13,COR,ACT,DMOVEM MODIFIED AC1 DESTINATION,ADR 401000^
4723 035237 036 13 0 00 041271
4724
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 115
DSKEAM MAC 29-Mar-78 14:55 INSTRUCTION PAGE FAIL TESTING SEQ 0171
4725 035240 200 13 0 00 000500 MOVE ACT,LEUPFW
4726 035241 200 14 0 00 040653 MOVE COR,[011000,,401000]
4727 035242 312 14 0 00 000013 CAME COR,ACT
4728 ERROR1 13,COR,ACT,PAGE FAIL WORD WRONG,^
4729 035243 036 13 0 00 041251
4730
4731 035244 200 13 0 00 000501 MOVE ACT,LPFWPC
4732 035245 200 14 0 00 041274 MOVE COR,[0,,PFDMM5]
4733 035246 312 14 0 00 000013 CAME COR,ACT
4734 ERROR1 13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
4735 035247 036 13 0 00 041255
4736
4737 035250 035 00 0 00 035211 ERLOOP PFDMM4
4738
4739 035251 367 15 0 00 035140 REPTLP PFDMM0+1
4740
4741 035252 200 07 0 00 043736 MOVE AC,PGFAIL
4742 035253 202 07 0 00 000502 MOVEM AC,LPGFTR ;RESET PAGE FAIL
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 116
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0172
4743 SUBTTL TRAP INSTRUCTION PAGE FAIL TEST
4744
4745 ;*CAUSE A TRAP, THE TRAP "JSR" IS TO A PAGED ADDRESS THAT PAGE FAILS
4746 ;*PAGE FAIL ROUTINE VERIFIES PAGE FAIL INFO & CORRECT PC WORD
4747 ;*PAGE TABLE THEN SETUP AND TRAP CONTINUED
4748 ;*TRAP SHOULD THEN COMPLETE
4749 ;*TRAP HANDLER THEN VERIFIES CORRECT PC WORD
4750
4751 SALL
4752 041275 T= SIXBTZ TRAP INSTRUCTION PAGE FAIL
4753 LALL
4754
4755 SUBTST^
4756 035254 201 00 0 00 035254 MOVEI .
4757 035255 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4758 035256 200 15 0 00 043737 TIPF0: MOVE REPT,RPEAT
4759 035257 402 00 0 00 000200 SETZM 200 ;CLEAR PAGE MAP
4760 035260 200 07 0 00 037671 MOVE AC,[200,,201]
4761 035261 251 07 0 00 000417 BLT AC,417
4762
4763 035262 201 07 0 00 035302 MOVEI AC,TIPF2 ;SETUP PAGE FAIL TRANSFER
4764 035263 202 07 0 00 000502 MOVEM AC,LPGFTR
4765 035264 200 07 0 00 041302 MOVE AC,[JSR 400000!<TIPF4&777>]
4766 035265 202 07 0 00 000423 MOVEM AC,LTRP3T ;SETUP TRAP 3 TRANSFER
4767
4768 035266 476 00 0 00 000500 SETOM LEUPFW ;PRESET PAGE FAIL WORDS
4769 035267 476 00 0 00 000501 SETOM LPFWPC
4770
4771 035270 7 010 20 0 00 020000 CONO PAG,LTRPEN ;ENABLE TRAPPING
4772 035271 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4773
4774 035272 254 02 1 00 035273 JRSTF @.+1 ;CAUSE TRAP 3
4775 035273 000600 035277 TN0!TN1,,TIPFX
4776
4777 035274 7 010 20 0 00 020000 TIPF1: CONO PAG,LTRPEN ;IF GET HERE, TRAP DID NOT HAPPEN
4778 ERROR1 13,0,0,TRAP FAILED,FATAL^
4779 SALL
4780 035275 036 13 0 00 041303
4781 035276 254 00 0 00 035256 JRST TIPF0
4782
4783 035277 7 010 20 0 00 020000 TIPFX: CONO PAG,LTRPEN
4784 ERROR1 13,0,0,JRSTF HAPPENED,NO TRAP^
4785 035300 036 13 0 00 041313
4786 035301 254 00 0 00 035256 JRST TIPF0
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 117
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0173
4787 ;*HERE IF PAGE FAIL TRAP HAPPENED
4788
4789 035302 200 00 0 00 043736 TIPF2: MOVE PGFAIL ;RESTORE PAGE FAIL TRAP
4790 035303 202 00 0 00 000502 MOVEM LPGFTR
4791
4792 035304 200 14 0 00 041316 MOVE COR,[011000,,400000!<TIPF4&777>]
4793 035305 200 13 0 00 000500 MOVE ACT,LEUPFW
4794 035306 312 14 0 00 000013 CAME COR,ACT
4795 ERROR TIPF0+1,13,COR,ACT,PAGE FAIL WORD WRONG^
4796 035307 036 13 0 00 041317
4797 035310 035 00 0 00 035257 ERLOOP TIPF0+1 ;IF ERROR, LOOP TO TIPF0+1
4798
4799 035311 200 14 0 00 041322 MOVE COR,[TN0!TN1,,TIPFX]
4800 035312 200 13 0 00 000501 MOVE ACT,LPFWPC
4801 035313 312 14 0 00 000013 CAME COR,ACT
4802 ERROR TIPF0+1,13,COR,ACT,<SAVED FLAGS,,PC WRONG>,PAGE FAIL^
4803 035314 036 13 0 00 041323
4804 035315 035 00 0 00 035257 ERLOOP TIPF0+1 ;IF ERROR, LOOP TO TIPF0+1
4805
4806 035316 312 14 0 00 000013 CAME COR,ACT
4807 035317 254 00 0 00 035324 JRST TIPF3+4 ;IF SAVED PC WRONG, CAN'T CONT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 118
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0174
4808 ;*SETUP FOR PAGE FAIL TRAP CONTINUE
4809
4810 035320 205 07 0 00 540035 TIPF3: MOVSI AC,540000!<TIPFX_-^D9>
4811 035321 202 07 0 00 000200 MOVEM AC,200 ;SETUP PAGE MAP
4812 035322 7 010 20 0 00 020000 CONO PAG,LTRPEN ;***CAUSE REFILL***
4813
4814 035323 254 02 1 00 000501 JRSTF @LPFWPC ;CONTINUE TRAP
4815
4816 ERROR1 13,0,0,PAGE FAIL CONTINUE FAILED,FATAL^
4817 035324 036 13 0 00 041333
4818 035325 254 00 0 00 035344 JRST TIPF10-2
4819
4820 ;*HERE IF TRAP CONTINUED PROPERLY
4821
4822 035326 000000 000000 TIPF4: 0 ;JSR SHOULD COME HERE
4823 035327 200 00 0 00 043732 MOVE LTRP3SV
4824 035330 202 00 0 00 000423 MOVEM LTRP3T ;RESET TRAP
4825 035331 265 13 0 00 035332 JSP ACT,TIPF5 ;GET CURRENT RELOCATED PC
4826 035332 200 14 0 00 041336 TIPF5: MOVE COR,[0,,400000!<TIPF5&777>]
4827 035333 312 14 0 00 000013 CAME COR,ACT
4828 ERROR TIPF0+1,13,COR,ACT,RELOCATION INCORRECT,PF CONTINUE^
4829 035334 036 13 0 00 041345
4830 035335 035 00 0 00 035257 ERLOOP TIPF0+1 ;IF ERROR, LOOP TO TIPF0+1
4831 035336 200 14 0 00 041350 MOVE COR,[0,,TIPFX]
4832 035337 200 13 0 00 035326 MOVE ACT,TIPF4
4833 035340 312 14 0 00 000013 CAME COR,ACT
4834 ERROR TIPF0+1,13,COR,ACT,TRAP SAVED PC WRONG,PF CONTINUE^
4835 035341 036 13 0 00 041355
4836 035342 035 00 0 00 035257 ERLOOP TIPF0+1 ;IF ERROR, LOOP TO TIPF0+1
4837
4838 035343 367 15 0 00 035257 REPTLP TIPF0+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 119
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0175
4839 ;*CAUSE A TRAP TO A PAGE FAIL PAGE
4840 ;*TRAP HANDLER THEN VERIFIES CORRECT PC WORD
4841
4842 SALL
4843 041360 T=SIXBTZ TRAP PAGE FAIL
4844 LALL
4845
4846 SUBTST^
4847 035344 201 00 0 00 035344 MOVEI .
4848 035345 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4849 035346 200 15 0 00 043737 TIPF10: MOVE REPT,RPEAT
4850 035347 402 00 0 00 000200 SETZM 200
4851 035350 200 07 0 00 037671 MOVE AC,[200,,201]
4852 035351 251 07 0 00 000417 BLT AC,417 ;CLEAR PAGE MAP
4853
4854 035352 201 07 0 00 035410 MOVEI AC,TIPF12 ;SETUP PAGE FAIL TRANSFER
4855 035353 202 07 0 00 000502 MOVEM AC,LPGFTR
4856 035354 200 07 0 00 041363 MOVE AC,[JSR TIPF14]
4857 035355 202 07 0 00 000423 MOVEM AC,LTRP3T ;SETUP TRAP 3 TRANSFER
4858
4859 035356 476 00 0 00 000500 SETOM LEUPFW ;PRESET PAGE FAIL WORD
4860 035357 476 00 0 00 000501 SETOM LPFWPC
4861
4862 035360 7 010 20 0 00 020000 CONO PAG,LTRPEN
4863 035361 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4864
4865 035362 254 02 1 00 035363 JRSTF @.+1 ;CAUSE TRAP 3
4866 035363 000600 400373 TN0!TN1,,400000!<TIPF1X&777>
4867
4868 035364 7 010 20 0 00 020000 TIPF11: CONO PAG,LTRPEN
4869 035365 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4870 035366 200 00 0 00 043736 MOVE PGFAIL
4871 035367 202 00 0 00 000502 MOVEM LPGFTRP
4872 ERROR TIPF10,13,0,0,TRAP FAILED,FATAL^
4873 SALL
4874 035370 036 13 0 00 041364
4875 035371 035 00 0 00 035346 ERLOOP TIPF10 ;IF ERROR, LOOP TO TIPF10
4876 035372 254 00 0 00 035346 JRST TIPF10
4877
4878 035373 7 010 20 0 00 020000 TIPF1X: CONO PAG,LTRPEN
4879 035374 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4880 035375 200 00 0 00 043736 MOVE PGFAIL
4881 035376 202 00 0 00 000502 MOVEM LPGFTR
4882 ERROR TIPF10,13,0,0,JRSTF HAPPENED,NO TRAP^
4883 035377 036 13 0 00 041367
4884 035400 035 00 0 00 035346 ERLOOP TIPF10 ;IF ERROR, LOOP TO TIPF10
4885 035401 254 00 0 00 035346 JRST TIPF10
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 120
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0176
4886 ;*HERE IF TRAP HAPPENED WITHOUT PAGE FAIL
4887
4888 035402 000000 000000 TIPF14: 0
4889 035403 200 00 0 00 043736 MOVE PGFAIL
4890 035404 202 00 0 00 000502 MOVEM LPGFTR
4891 ERROR TIPF10,13,0,0,TRAP 3 HAPPENED,NO PAGE FAIL^
4892 035405 036 13 0 00 041400
4893 035406 035 00 0 00 035346 ERLOOP TIPF10 ;IF ERROR, LOOP TO TIPF10
4894 035407 254 00 0 00 035346 JRST TIPF10
4895
4896 ;*HERE IF PAGE FAIL TRAP HAPPENED
4897
4898 035410 200 00 0 00 043736 TIPF12: MOVE PGFAIL
4899 035411 202 00 0 00 000502 MOVEM LPGFTR
4900
4901 035412 200 14 0 00 041403 MOVE COR,[001000,,400000!<TIPF1X&777>]
4902 035413 200 13 0 00 000500 MOVE ACT,LEUPFW
4903 035414 312 14 0 00 000013 CAME COR,ACT
4904 ERROR TIPF10+1,13,COR,ACT,PAGE FAIL WORD WRONG^
4905 035415 036 13 0 00 041404
4906 035416 035 00 0 00 035347 ERLOOP TIPF10+1 ;IF ERROR, LOOP TO TIPF10+1
4907
4908 035417 200 14 0 00 041407 MOVE COR,[TN0!TN1,,400000!<TIPF1X&777>]
4909 035420 200 13 0 00 000501 MOVE ACT,LPFWPC
4910 035421 312 14 0 00 000013 CAME COR,ACT
4911 ERROR TIPF10+1,13,COR,ACT,<SAVED FLAGS,,PC WRONG>,PAGE FAIL^
4912 035422 036 13 0 00 041410
4913 035423 035 00 0 00 035347 ERLOOP TIPF10+1 ;IF ERROR, LOOP TO TIPF10+1
4914
4915 035424 367 15 0 00 035347 REPTLP TIPF10+1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 121
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0177
4916 ;*TEST I/O INSTRUCTION PAGE FAIL
4917
4918 SALL
4919 041413 T=SIXBTZ <I/O INST PAGE FAIL>
4920 LALL
4921
4922 SUBTST^
4923 035425 201 00 0 00 035425 MOVEI .
4924 035426 202 00 0 00 030051 MOVEM TESTPC ;SETUP SUBTEST PC ^
4925 035427 200 15 0 00 043737 PFIO0: MOVE REPT,RPEAT
4926 035430 402 00 0 00 000200 SETZM 200
4927 035431 200 00 0 00 037671 MOVE [200,,201]
4928 035432 251 00 0 00 000417 BLT 417 ;CLEAR PAGE MAP
4929
4930 035433 201 00 0 00 035446 MOVEI PFIO3
4931 035434 202 00 0 00 000502 MOVEM LPGFTR ;SETUP FOR PAGE FAIL
4932
4933 035435 476 00 0 00 000500 PFIO1: SETOM LEUPFW ;SETUP PAGING
4934 035436 7 010 20 0 00 020000 CONO PAG,LTRPEN
4935 035437 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000]
4936 035440 254 02 1 00 035441 JRSTF @.+1
4937 035441 000000 035442 0,,.+1
4938
4939 035442 7 000 24 0 00 400000 PFIO2: CONI APR,400000 ;PERFORM I/O INST PAGE FAIL
4940 ERROR PFIO1,13,0,0,CONI TRAP FAILED,FATAL^
4941 SALL
4942 035443 036 13 0 00 041422
4943 035444 035 00 0 00 035435 ERLOOP PFIO1 ;IF ERROR, LOOP TO PFIO1
4944 035445 254 00 0 00 035435 JRST PFIO1
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 122
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0178
4945 035446 200 13 0 00 000500 PFIO3: MOVE ACT,LEUPFW
4946 035447 200 14 0 00 041112 MOVE COR,[011000,,400000]
4947 035450 312 14 0 00 000013 CAME COR,ACT
4948 ERROR PFIO1,13,COR,ACT,PAGE FAIL WORD WRONG,DATAI^
4949 035451 036 13 0 00 041426
4950 035452 035 00 0 00 035435 ERLOOP PFIO1 ;IF ERROR, LOOP TO PFIO1
4951
4952 035453 200 13 0 00 000501 MOVE ACT,LPFWPC
4953 035454 200 14 0 00 041431 MOVE COR,[0,,PFIO2]
4954 035455 312 14 0 00 000013 CAME COR,ACT
4955 ERROR PFIO1,13,COR,ACT,<SAVED FLAGS,,PC WRONG>,DATAI^
4956 035456 036 13 0 00 041432
4957 035457 035 00 0 00 035435 ERLOOP PFIO1 ;IF ERROR, LOOP TO PFIO1
4958
4959 035460 367 15 0 00 035430 REPTLP PFIO0+1
4960
4961 035461 200 00 0 00 043736 MOVE PGFAIL
4962 035462 202 00 0 00 000502 MOVEM LPGFTR
4963
4964 035463 254 00 0 00 035542 JRST STMUUO
4965
4966 REPEAT 0,<
4967
4968 AN I/O PAGE FAILURE CAUSES THE KS-10 TO HALT, THEREFORE THE
4969 FOLLOWING TEST IS NOT PERFORMED.
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 123
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0179
4970 SUBTTL INTERRUPT INSTRUCTION PAGE FAIL
4971
4972 SALL
4973 T=SIXBTZ INTERRUPT INST PAGE FAIL
4974 LALL
4975
4976 ;*CAUSE AN INTERRUPT THAT HAS FOR ITS INTERRUPT HANDLING
4977 ;*INSTRUCTION A "JSR" TO A PAGE FAIL ADDRESS.
4978 ;*AN I/O PAGE FAIL INTERRUPT SHOULD OCCUR.
4979
4980 SUBTST
4981 INTPF0: MOVE REPT,RPEAT
4982
4983 ;*FIRST VERIFY THAT THE METER CAN CAUSE AN INTERRUPT
4984
4985 CONO PI,LPICLR
4986 CONO APR,LAPRAL!LAPRP1
4987 CONO PI,LCHNON!LPION!LPICHA
4988 MOVE [JSR INTPFA]
4989 MOVEM 514 ;SETUP METER VECTOR
4990
4991 MOVSI 0,77
4992 CONO TIM,63203
4993 CONO MTR,7 ;ASSIGN METER CHAN 7
4994 SOJGE 0,. ;WAIT FOR METER INTERRUPT
4995 CONO PI,PICLR
4996 ERROR INTPF0+1,13,0,0,NO METER INTERRUPT,FATAL
4997 JRST INTPF3
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 124
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0180
4998 ;*NOW USE IT TO CAUSE I/O PAGE FAIL
4999
5000 INTPFA: 0 ;METER CAUSED INTERRUPT
5001 CONO MTR,0 ;GO AHEAD AND USE IT
5002 CONO PI,LPICLR
5003 CONO APR,LAPRAL!LAPRP1
5004 CONO PI,LCHNON!LPION!LPICHA
5005
5006 SETZM 200
5007 MOVE [200,,201]
5008 BLT 417 ;CLEAR PAGE MAP
5009
5010 MOVEI INTPF1
5011 MOVEM LPGFTR ;SETUP PAGE FAIL TRAP
5012
5013 MOVE [JSR 400000]
5014 MOVEM 514 ;SETUP METER INTERRUPT
5015
5016 MOVE [JSR INTPF2]
5017 MOVEM 42 ;SETUP I/O PAGE FAIL ERROR INTERRUPT
5018
5019 CONO PAG,LTRPEN
5020 DATAO PAG,[LLDUSB,,400000]
5021
5022 MOVSI 0,77 ;WAIT FOR METER INTERRUPT
5023 CONO TIM,63203
5024 CONO MTR,7
5025 SOJGE 0,.
5026 CONO PI,PICLR
5027 ERROR INTPF0+1,13,0,0,NO INTERRUPT,FATAL
5028 JRST INTPF3
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 125
DSKEAM MAC 29-Mar-78 14:55 TRAP INSTRUCTION PAGE FAIL TEST SEQ 0181
5029 ;*IF PAGE FAIL HAPPENED, ERROR
5030
5031 INTPF1: CONO MTR,0
5032 CONO PI,PICLR
5033 ERROR INTPF0+1,13,LEUPFW,LPFWPC,PAGE FAILURE,<COR=PAGE FAIL WORD,ACT=PAGE FAIL PC
5034 >
5035 JRST INTPF3
5036
5037 ;*APR ERROR INTERRUPT, CHECK PROPER CONDITIONS
5038
5039 INTPF2: 0
5040 CONO MTR,0
5041 CONO PI,PICLR
5042 CONI APR,ACT
5043 MOVE COR,[LIOPFE]
5044 TRNN ACT,LIOPFE
5045 ERROR INTPF0+1,13,COR,ACT,IO PAGE FAIL NOT SET
5046
5047 REPTLP INTPF0+1
5048
5049 INTPF3: CONO MTR,0
5050 CONO PI,LPICLR
5051 CONO PI,LCHNON!LPION!LPICHA
5052 CONO APR,LAPRAL!LAPRP1
5053 MOVE [JSR ITRCH1]
5054 MOVEM 42 ;RESET INTERRUPT SYSTEM
5055
5056 JRST BEGEND
5057 >
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 126
DSKEAM MAC 29-Mar-78 14:55 PAGING MEMORY FLOATING BIT TEST TABLE SEQ 0182
5058 SUBTTL PAGING MEMORY FLOATING BIT TEST TABLE
5059
5060 ;*LH = SCRATCHPAD DATA
5061 ;*RH = PAGING ADDRESS
5062
5063 035464 777777 000400 AMTAB1: 777777,,400
5064 035465 757776 000600 757776,,600
5065 035466 737775 000500 737775,,500
5066 035467 577773 000440 577773,,440
5067 035470 517767 000420 517767,,420
5068 035471 777757 000410 777757,,410
5069 035472 577737 000404 577737,,404
5070 035473 737677 000402 737677,,402
5071 035474 757577 000401 757577,,401
5072 035475 660000 000340 660000,,340
5073 035476 757377 000777 757377,,777
5074 035477 736777 000577 736777,,577
5075 035500 575777 000677 575777,,677
5076 035501 773777 000737 773777,,737
5077 035502 567777 000757 567777,,757
5078 035503 730000 000767 730000,,767
5079 035504 744000 000773 744000,,773
5080 035505 762000 000775 762000,,775
5081 035506 501000 000776 501000,,776
5082 035507 677777 000501 677777,,501
5083 035510 500400 000640 500400,,640
5084 035511 760200 000700 760200,,700
5085 035512 720100 000740 720100,,740
5086 035513 440000 000760 440000,,760
5087 035514 720040 000770 720040,,770
5088 035515 540020 000774 540020,,774
5089 035516 720010 000772 720010,,772
5090 035517 417777 000341 417777,,341
5091 035520 760004 000342 760004,,342
5092 035521 660000 000345 660000,,345
5093 035522 500002 000352 500002,,352
5094 035523 500001 000525 500001,,525
5095 035524 777777 000376 777777,,376
5096 035525 517777 000463 517777,,463
5097 035526 620000 000632 620000,,632
5098 035527 552525 000505 552525,,505
5099 035530 637777 000362 637777,,362
5100 035531 545252 000623 545252,,623
5101 035532 400000 000551 400000,,551
5102 035533 772525 000624 772525,,624
5103 035534 417777 000353 417777,,353
5104 035535 760000 000603 760000,,603
5105 035536 000000 000000 0
5106 035537 000000 000000 0
5107 035540 000000 000000 0
5108 035541 000000 000000 0
5109
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 127
DSKEAM MAC 29-Mar-78 14:55 MONITOR UUO TRAP TESTING SEQ 0183
5110 SUBTTL MONITOR UUO TRAP TESTING
5111
5112 ;*TEST MUUO TRAPPING TO 424(KERNAL NO TRAP)
5113
5114 SALL
5115 041435 T=SIXBTZ MONITOR UUO TEST - TRAPPING IN KERNAL MODE
5116 LALL
5117 000424 A=MUUO ;DATA STORED
5118 035557 C=AXMUUO ;CORRECT DATA
5119
5120 035542 402 00 0 00 030116 STMUUO: SETZM SCOPE# ;CLEAR SCOPE
5121 035543 7 010 20 0 00 020000 CONO PAG,LTRPEN
5122 035544 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5123 035545 201 00 0 00 000040 AXMBEG: MOVEI 40 ;SET UP TEST
5124 035546 202 00 0 00 043726 MOVEM COUNT# ;COUNTER
5125 TNSET^
5126 035547 201 00 0 00 035547 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5127 035550 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5128 ^
5129 035551 205 00 0 00 040000 MOVSI 1B21 ;SET UP FIRST UUO
5130 035552 202 00 0 00 035557 MOVEM AXMUUO ;FOR EXECUTION
5131 035553 201 00 0 00 035562 AXMST: MOVEI AXMUPC ;SET UP UUO TRAP PC
5132 035554 202 00 0 00 000430 MOVEM KNTRP ;INTO KERNAL NO TRAP
5133 035555 402 00 0 00 000424 SETZM MUUO ;CLEAR UUO TRAP
5134 035556 402 00 0 00 000425 SETZM MUUO+1 ;LOCATIONS
5135 035557 000000 000000 AXMUUO: 0 ;THIS IS THE UUO
5136 ERROR1 13,C,0,MUUO DID NOT TRAP IN KERNAL MODE,C(CORRECT)=MONITOR UUO^
5137 SALL
5138 035560 036 13 0 00 041457
5139 035561 035 02 0 00 035553 ERLP2 AXMST
5140 035562 336 00 0 00 043726 AXMUPC: SKIPN COUNT ;DONE 40 UUOS
5141 035563 254 00 0 00 035636 JRST AYMBEG ;YES DO NEXT SET
5142 035564 205 00 0 00 001000 MOVSI 1B26 ;SET UP FOR NEXT UUO
5143 035565 272 00 0 00 035557 ADDM AXMUUO ;ADD IN FOR NEXT UUO
5144 035566 370 00 0 00 043726 SOS COUNT ;FIX UP COUNTER
5145 035567 254 00 0 00 035553 JRST AXMST ;LOOP
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 128
DSKEAM MAC 29-Mar-78 14:55 MONITOR UUO TRAP TESTING SEQ 0184
5146 035602 C=MUUOXA ;CORRECT DATA
5147 035570 201 00 0 00 000010 MUU100: MOVEI 10 ;TEST COUNT
5148 035571 202 00 0 00 043726 MOVEM COUNT
5149 TNSET^
5150 035572 201 00 0 00 035572 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5151 035573 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5152 035574 205 00 0 00 100000 MOVSI 1B20 ;FIRST MUUO (100)
5153 035575 202 00 0 00 035602 MOVEM MUUOXA ;STORE UUO TO EXECUTE
5154 035576 201 00 0 00 035605 MUUSTA: MOVEI MUXPCA ;SET UP UUO TRAP PC
5155 035577 202 00 0 00 000430 MOVEM KNTRP ;INTO KERNAL NO TRAP
5156 035600 402 00 0 00 000424 SETZM MUUO ;CLEAR UUO
5157 035601 402 00 0 00 000425 SETZM MUUO+1 ;AND NEXT
5158 035602 000000 000000 MUUOXA: 0 ;THIS LOC HAS MUUO
5159 ERROR1 13,C,0,MUUO DID NOT TRAP IN KERNAL MODE,C(CORRECT)=MUUO ^
5160 035603 036 13 0 00 041465
5161 035604 035 02 0 00 035576 ERLP2 MUUSTA
5162 035605 336 00 0 00 043726 MUXPCA: SKIPN COUNT ;FINISHED
5163 035606 254 00 0 00 035613 JRST MUU114 ;DO NEXT TEST SET
5164 035607 205 00 0 00 001000 MOVSI 1B26 ;SET UP FOR NEXT UUO
5165 035610 272 00 0 00 035602 ADDM MUUOXA ;AND ADD IN TO OLD UUO
5166 035611 370 00 0 00 043726 SOS COUNT ;FIX UP COUNT
5167 035612 254 00 0 00 035576 JRST MUUSTA ;AND LOOP TEST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 129
DSKEAM MAC 29-Mar-78 14:55 MONITOR UUO TRAP TESTING SEQ 0185
5168 035625 C=MUUOXB ;CORRECT DATA
5169 035613 201 00 0 00 000004 MUU114: MOVEI 4 ;TEST COUNT
5170 035614 202 00 0 00 043726 MOVEM COUNT
5171 TNSET^
5172 035615 201 00 0 00 035615 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5173 035616 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5174 035617 205 00 0 00 114000 MOVSI 114000 ;FIRST MUUO (114)
5175 035620 202 00 0 00 035625 MOVEM MUUOXB ;STORE UUO TO EXECUTE
5176 035621 201 00 0 00 035630 MUUSTB: MOVEI MUXPCB ;SET UP UUO TRAP PC
5177 035622 202 00 0 00 000430 MOVEM KNTRP ;INTO KERNAL NO TRAP
5178 035623 402 00 0 00 000424 SETZM MUUO ;CLEAR UUO
5179 035624 402 00 0 00 000425 SETZM MUUO+1 ;AND NEXT
5180 035625 000000 000000 MUUOXB: 0 ;THIS LOC HAS MUUO
5181 ERROR1 13,C,0,MUUO DID NOT TRAP IN KERNAL MODE,C(CORRECT)=MUUO ^
5182 035626 036 13 0 00 041470
5183 035627 035 02 0 00 035621 ERLP2 MUUSTB
5184 035630 336 00 0 00 043726 MUXPCB: SKIPN COUNT ;FINISHED
5185 035631 254 00 0 00 035613 JRST MUU114 ;DO NEXT TEST SET
5186 035632 205 00 0 00 001000 MOVSI 1B26 ;SET UP FOR NEXT UUO
5187 035633 272 00 0 00 035602 ADDM MUUOXA ;AND ADD IN TO OLD UUO
5188 035634 370 00 0 00 043726 SOS COUNT ;FIX UP COUNT
5189 035635 254 00 0 00 035621 JRST MUUSTB ;AND LOOP TEST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 130
DSKEAM MAC 29-Mar-78 14:55 MONITOR UUO TRAP TESTING SEQ 0186
5190 ;*MONITOR UUO TEST - UUO STORE INTO 424
5191
5192 SALL
5193 041473 T=SIXBTZ MONITOR UUO TEST - UUO STORE INTO 424
5194 LALL
5195 000424 A=MUUO ;ACTUAL DATA STORED
5196 035650 C=AYMUUO ;CORRECT DATA LOCATION
5197
5198 035636 201 00 0 00 000040 AYMBEG: MOVEI 40 ;SET UP TEST COUNTER
5199 035637 202 00 0 00 043726 MOVEM COUNT
5200 TNSET^
5201 035640 201 00 0 00 035640 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5202 035641 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5203 ^
5204 035642 205 00 0 00 040000 MOVSI 1B21 ;SET UP FIRST UUO
5205 035643 202 00 0 00 035650 MOVEM AYMUUO ;FOR EXECUTION
5206 035644 201 00 0 00 035652 AYMST: MOVEI AYMUPC ;SET UP UUO TRAP
5207 035645 202 00 0 00 000430 MOVEM KNTRP ;INTO KERNAL NO TRAP
5208 035646 402 00 0 00 000424 SETZM MUUO ;CLEAR MUUO TRAP
5209 035647 402 00 0 00 000425 SETZM MUUO+1 ;LOCATIONS
5210 035650 000000 000000 AYMUUO: 0 ;EXECUTE THIS UUO
5211 035651 254 04 0 00 035651 HALT . ;UUO DID NOT TRAP
5212 035652 200 00 0 00 000424 AYMUPC: MOVE MUUO ;GET WRITTEN UUO
5213 035653 312 00 0 00 035650 CAME AYMUUO ;STORED CORRECTLY?
5214 ERROR1 13,C,A,CONTENTS OF 424 IS NOT EQUAL TO EXECUTED UUO,^
5215 SALL
5216 035654 036 13 0 00 041512
5217 035655 035 02 0 00 035644 ERLP2 AYMST
5218 035656 336 00 0 00 043726 SKIPN COUNT ;DONE 40 UUO'S
5219 035657 254 00 0 00 035664 JRST AZMBEG ;DO NEXT SET
5220 035660 205 00 0 00 001000 MOVSI 1B26 ;SET UP FOR NEXT UUO
5221 035661 272 00 0 00 035650 ADDM AYMUUO ;ADD IN FOR NEXT UUO
5222 035662 370 00 0 00 043726 SOS COUNT ;FIX UUO COUNTER
5223 035663 254 00 0 00 035644 JRST AYMST ;LOOP
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 131
DSKEAM MAC 29-Mar-78 14:55 MONITOR UUO TRAP TESTING SEQ 0187
5224 ;*MONITOR UUO - STORE CORRECT PC
5225
5226 SALL
5227 041515 T=SIXBTZ MONITOR UUO - STORE CORRECT PC
5228 LALL
5229 041523 C=[AZMUUO+1] ;CORRECT DATA
5230 000001 A=1 ;ACTUAL DATA
5231
5232 035664 402 00 0 00 000424 AZMBEG: SETZM MUUO ;CLEAR MONITOR UUO
5233 035665 402 00 0 00 000425 SETZM MUUO+1 ;TRAP LOCATIONS
5234 TNSET^
5235 035666 201 00 0 00 035666 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5236 035667 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5237 ^
5238 035670 205 00 0 00 040000 MOVSI 1B21 ;SET UP FIRST UUO
5239 035671 202 00 0 00 035674 MOVEM AZMUUO ;TO BE EXECUTED
5240 035672 201 00 0 00 035676 AZMST: MOVEI AZMUPC ;SET UP TRAP INSTRUCTION
5241 035673 202 00 0 00 000430 MOVEM KNTRP ;INTO KERNAL NO TRAP
5242 035674 000000 000000 AZMUUO: 0 ;EXECUTABLE UUO
5243 035675 254 04 0 00 035675 HALT . ;SHOULDN'T UUO DID NOT TRAP
5244 035676 550 01 0 00 000425 AZMUPC: HRRZ 1,MUUO+1 ;GET THE PC OF THE UUO
5245 035677 302 01 0 00 035675 CAIE 1,AZMUUO+1 ;PC+1 OF THE UUO SHOULD BE STORED
5246 ERROR1 13,C,A,MUUO DID NOT STORE THE CORRECT PC,C(425) HAS PC STORED^
5247 SALL
5248 035700 036 13 0 00 041536
5249 035701 035 02 0 00 035672 ERLP2 AZMST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 132
DSKEAM MAC 29-Mar-78 14:55 MONITOR UUO TRAP TESTING SEQ 0188
5250 ;*TEST STORING ALL POSSIBLE VALUES OF THE E FIELD WHEN EXECUTING
5251 ;*A MONITOR UUO
5252
5253 SALL
5254 041541 T=SIXBTZ MONITOR UUO - STORE E CORRECTLY
5255 LALL
5256 000001 A=1 ;ACTUAL DATA
5257 000007 C=7 ;CORRECT DATA
5258
5259 035702 201 07 0 00 001000 AWMBEG: MOVEI 7,1000 ;FIRST E FIELD TO TEST
5260 035703 201 00 0 00 035716 AWMST: MOVEI AWMUPC ;SET UP MUUO TRAP INSTUCTION
5261 035704 202 00 0 00 000430 MOVEM KNTRP ;INTO KERNAL NO TRAP
5262 TNSET^
5263 035705 201 00 0 00 035705 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5264 035706 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5265 ^
5266 035707 402 00 0 00 000424 SETZM MUUO ;CLEAR MUUO TRAP LOCATIONS
5267 035710 402 00 0 00 000425 SETZM MUUO+1
5268 035711 205 00 0 00 040000 MOVSI 1B21 ;SET UP UUO TO EXECUTE
5269 035712 202 00 0 00 035714 MOVEM AWMUUO ;AND STORE IT
5270 035713 542 07 0 00 035714 HRRM 7,AWMUUO ;AN A NEW PC
5271 035714 000000 000000 AWMUUO: 0 ;THIS IS THE UUO
5272 035715 254 04 0 00 035715 HALT . ;SHOULD NOT HALT
5273 035716 550 01 0 00 000424 AWMUPC: HRRZ 1,MUUO
5274 035717 312 01 0 00 000007 CAME 1,7 ;CORRECT E STORED
5275 ERROR1 13,C,A,MUUO DID NOT STORE E CORRECTLY,C(424) HAS E VALUE STORED^
5276 SALL
5277 035720 036 13 0 00 041562
5278 035721 035 02 0 00 035703 ERLP2 AWMST
5279 035722 271 07 0 00 001000 ADDI 7,1000 ;NEXT E FIELD
5280 035723 603 07 0 00 000001 TLNE 7,1 ;DONE 2^18TH TESTS?
5281 035724 254 00 0 00 035726 JRST BXMBEG ;NEXT SET OF TESTS
5282 035725 254 00 0 00 035703 JRST AWMST ;LOOP TEST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 133
DSKEAM MAC 29-Mar-78 14:55 TEST MUUO'S IN CONCEALED MODE SEQ 0189
5283 SUBTTL TEST MUUO'S IN CONCEALED MODE
5284
5285 ;*MONITOR UUO TEST - TRAPPING IN CONCEALED MODE
5286
5287 SALL
5288 041565 T=SIXBTZ MONITOR UUO TEST - TRAPPING IN CONCEALED MODE
5289 LALL
5290 044424 A=UPMP+MUUO ;DATA STORED
5291 035753 C=BXMUUO ;CORRECT DATA
5292
5293 035726 BXMBEG: TNSET^
5294 035726 201 00 0 00 035726 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5295 035727 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5296 ^
5297 PAGECN^
5298 035730 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5299 035731 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5300 ^
5301 035732 201 00 0 00 000040 MOVEI 40 ;SET UP TEST
5302 035733 202 00 0 00 043726 MOVEM COUNT# ;COUNTER
5303 035734 205 00 0 00 040000 MOVSI 1B21 ;SET UP FIRST UUO
5304 035735 202 00 0 00 035753 MOVEM BXMUUO ;FOR EXECUTION
5305 035736 260 17 0 00 037025 BXMST: GO PAGE1
5306 035737 201 00 0 00 035756 MOVEI BXMUPC ;SET UP UUO TRAP PC
5307 035740 202 00 0 00 044434 MOVEM UPMP+CNTRP ;INTO CONCEALED NO TRAP
5308 035741 201 00 0 00 035764 MOVEI BXERR ;SET WRONG TRAP ERROR
5309 035742 202 00 0 00 044430 MOVEM UPMP+KNTRP
5310 035743 202 00 0 00 044436 MOVEM UPMP+PNTRP
5311 035744 202 00 0 00 044432 MOVEM UPMP+SNTRP
5312 035745 202 00 0 00 044431 MOVEM UPMP+KTRP
5313 035746 202 00 0 00 044433 MOVEM UPMP+STRP
5314 035747 202 00 0 00 044437 MOVEM UPMP+PTRP
5315 035750 202 00 0 00 044435 MOVEM UPMP+CTRP
5316 035751 402 00 0 00 044424 SETZM UPMP+MUUO ;CLEAR UUO TRAP
5317 035752 402 00 0 00 044425 SETZM UPMP+MUUO+1 ;LOCATIONS
5318 035753 000000 000000 BXMUUO: 0 ;THIS IS THE UUO
5319 ERROR1 13,C,A,MUUO DID NOT TRAP IN CONCEALED MODE,C(CORRECT)=MONITOR UUO^
5320 SALL
5321 035754 036 13 0 00 041603
5322 035755 035 02 0 00 035736 ERLP2 BXMST
5323 035756 336 00 0 00 043726 BXMUPC: SKIPN COUNT ;DONE 40 UUOS
5324 035757 254 00 0 00 035766 JRST BYMBEG ;YES DO NEXT SET
5325 035760 205 00 0 00 001000 MOVSI 1B26 ;SET UP FOR NEXT UUO
5326 035761 272 00 0 00 035753 ADDM BXMUUO ;ADD IN FOR NEXT UUO
5327 035762 370 00 0 00 043726 SOS COUNT ;FIX UP COUNTER
5328 035763 254 00 0 00 035736 JRST BXMST ;LOOP
5329 035764 BXERR: ERROR1 13,C,A,MUUO TRAPPED TO INCORRECT TRAP LOCATION,^
5330 035764 036 13 0 00 041615
5331 035765 035 02 0 00 035736 ERLP2 BXMST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 134
DSKEAM MAC 29-Mar-78 14:55 TEST MUUO'S IN CONCEALED MODE SEQ 0190
5332 ;*MONITOR UUO TEST - UUO STORE INTO 424
5333
5334 SALL
5335 041473 T=SIXBTZ MONITOR UUO TEST - UUO STORE INTO 424
5336 LALL
5337 044424 A=UPMP+MUUO ;ACTUAL DATA STORED
5338 036007 C=BYMUUO ;CORRECT DATA LOCATION
5339
5340 035766 BYMBEG: PAGECN^
5341 035766 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5342 035767 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5343 ^
5344 035770 201 00 0 00 000040 MOVEI 40 ;SET UP TEST COUNTER
5345 035771 202 00 0 00 043726 MOVEM COUNT
5346 TNSET^
5347 035772 201 00 0 00 035772 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5348 035773 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5349 ^
5350 035774 205 00 0 00 040000 MOVSI 1B21 ;SET UP FIRST UUO
5351 035775 202 00 0 00 036007 MOVEM BYMUUO ;FOR EXECUTION
5352 035776 260 17 0 00 037025 BYMST: GO PAGE1
5353 035777 201 00 0 00 036012 MOVEI BYMUPC ;SET UP UUO TRAP
5354 036000 202 00 0 00 044434 MOVEM UPMP+CNTRP ;INTO CONCEALED NO TRAP
5355 036001 201 00 0 00 036024 MOVEI BYERR ;IN CASE WE GO TO THE WRONG TRAP
5356 036002 202 00 0 00 044430 MOVEM UPMP+KNTRP
5357 036003 202 00 0 00 044432 MOVEM UPMP+SNTRP
5358 036004 202 00 0 00 044436 MOVEM UPMP+PNTRP ;SET UP THE OTHER TRAP LOCATIONS
5359 036005 402 00 0 00 044424 SETZM UPMP+MUUO ;CLEAR MUUO TRAP
5360 036006 402 00 0 00 044425 SETZM UPMP+MUUO+1 ;LOCATIONS
5361 036007 000000 000000 BYMUUO: 0 ;EXECUTE THIS UUO
5362 ERROR1 13,C,A,MUUO DID NOT TRAP,^
5363 SALL
5364 036010 036 13 0 00 041623
5365 036011 035 02 0 00 035776 ERLP2 BYMST
5366 036012 200 00 0 00 044424 BYMUPC: MOVE UPMP+MUUO ;GET WRITTEN UUO
5367 036013 312 00 0 00 036007 CAME BYMUUO ;STORED CORRECTLY?
5368 ERROR1 13,C,A,CONTENTS OF 424 IS NOT EQUAL TO EXECUTED UUO,^
5369 036014 036 13 0 00 041626
5370 036015 035 02 0 00 035776 ERLP2 BYMST
5371 036016 336 00 0 00 043726 SKIPN COUNT ;DONE 40 UUO'S
5372 036017 254 00 0 00 036026 JRST BZMBEG ;DO NEXT SET
5373 036020 205 00 0 00 001000 MOVSI 1B26 ;SET UP FOR NEXT UUO
5374 036021 272 00 0 00 036007 ADDM BYMUUO ;ADD IN FOR NEXT UUO
5375 036022 370 00 0 00 043726 SOS COUNT ;FIX UUO COUNTER
5376 036023 254 00 0 00 035776 JRST BYMST ;LOOP
5377 036024 BYERR: ERROR1 13,C,A,MUUO TRAPED TO INCORRECT TRAP LOCATION,^
5378 036024 036 13 0 00 041640
5379 036025 035 02 0 00 035776 ERLP2 BYMST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 135
DSKEAM MAC 29-Mar-78 14:55 TEST MUUO'S IN CONCEALED MODE SEQ 0191
5380 ;*MONITOR UUO - STORING THE CORRECT PC
5381
5382 SALL
5383 041643 T=SIXBTZ MONITOR UUO - STORING THE CORRECT PC
5384 LALL
5385 041652 C=[BZMUUO+1] ;CORRECT DATA
5386 000001 A=1 ;ACTUAL DATA
5387
5388 036026 BZMBEG: TNSET^
5389 036026 201 00 0 00 036026 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5390 036027 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5391 ^
5392 PAGECN^
5393 036030 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5394 036031 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5395 ^
5396 036032 402 00 0 00 044424 SETZM UPMP+MUUO ;CLEAR MONITOR UUO
5397 036033 402 00 0 00 044425 SETZM UPMP+MUUO+1 ;TRAP LOCATIONS
5398 036034 205 00 0 00 040000 MOVSI 1B21 ;SET UP FIRST UUO
5399 036035 202 00 0 00 036045 MOVEM BZMUUO ;TO BE EXECUTED
5400 036036 260 17 0 00 037025 BZMST: GO PAGE1
5401 036037 201 00 0 00 036047 MOVEI BZMUPC ;SET UP TRAP INSTRUCTION
5402 036040 202 00 0 00 044434 MOVEM UPMP+CNTRP ;INTO CONCEALED NO TRAP
5403 036041 201 00 0 00 036054 MOVEI BZERR ;SET UP TRAP FOR INCORRECT TRAP
5404 036042 202 00 0 00 044430 MOVEM UPMP+KNTRP ;INTO KERNAL NO TRAP
5405 036043 202 00 0 00 044432 MOVEM UPMP+SNTRP
5406 036044 202 00 0 00 044436 MOVEM UPMP+PNTRP
5407 036045 000000 000000 BZMUUO: 0 ;EXECUTABLE UUO
5408 036046 254 04 0 00 036046 HALT . ;SHOULDN'T UUO DID NOT TRAP
5409 036047 550 01 0 00 044425 BZMUPC: HRRZ 1,UPMP+MUUO+1 ;GET THE PC OF THE UUO
5410 036050 302 01 0 00 036046 CAIE 1,BZMUUO+1 ;PC+1 OF THE UUO SHOULD BE STORED
5411 ERROR1 13,C,A,MUUO DID NOT STORE THE CORRECT PC,^
5412 SALL
5413 036051 036 13 0 00 041653
5414 036052 035 02 0 00 036036 ERLP2 BZMST
5415 036053 254 00 0 00 036056 JRST BWMBEG ;GO TO NEXT SET
5416 036054 BZERR: ERROR1 13,C,A,MUUO DID NOT TRAP TO CORRECT TRAP,^
5417 036054 036 13 0 00 041664
5418 036055 035 02 0 00 036036 ERLP2 BZMST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 136
DSKEAM MAC 29-Mar-78 14:55 TEST MUUO'S IN CONCEALED MODE SEQ 0192
5419 ;*MUUO STORING THE CORRECT E FIELD
5420
5421 SALL
5422 041667 T=SIXBTZ MUUO STORING THE CORRECT E FIELD
5423 LALL
5424 000001 A=1 ;ACTUAL DATA
5425 000007 C=7 ;CORRECT DATA
5426
5427 036056 BWMBEG: PAGECN^
5428 036056 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5429 036057 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5430 ^
5431 TNSET^
5432 036060 201 00 0 00 036060 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5433 036061 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5434 ^
5435 036062 201 07 0 00 001000 MOVEI 7,1000 ;FIRST E FEILD TO TEST
5436 036063 260 17 0 00 037025 BWMST: GO PAGE1
5437 036064 201 00 0 00 036102 MOVEI BWMUPC ;SET UP MUUO TRAP INSTUCTION
5438 036065 202 00 0 00 044434 MOVEM UPMP+CNTRP ;INTO CONCEALED NO TRAP
5439 036066 201 00 0 00 036113 MOVEI BWERR ;SET UP FOR INCORRECT TRAP
5440 036067 202 00 0 00 044436 MOVEM UPMP+PNTRP
5441 036070 202 00 0 00 044432 MOVEM UPMP+SNTRP
5442 036071 202 00 0 00 044430 MOVEM UPMP+KNTRP
5443 036072 402 00 0 00 044424 SETZM UPMP+MUUO ;CLEAR MUUO TRAP LOCATIONS
5444 036073 402 00 0 00 044425 SETZM UPMP+MUUO+1
5445 036074 205 00 0 00 040000 MOVSI 1B21 ;SET UP UUO TO EXECUTE
5446 036075 202 00 0 00 036077 MOVEM BWMUUO ;AND STORE IT
5447 036076 542 07 0 00 036077 HRRM 7,BWMUUO ;AN A NEW PC
5448 036077 000000 000000 BWMUUO: 0 ;THIS IS THE UUO
5449 ERROR1 13,C,A,MUUO DID NOT TRAP IN CONCEALED,^
5450 SALL
5451 036100 036 13 0 00 041703
5452 036101 035 02 0 00 036063 ERLP2 BWMST
5453 036102 550 01 0 00 044424 BWMUPC: HRRZ 1,UPMP+MUUO
5454 036103 312 01 0 00 000007 CAME 1,7 ;CORRECT E STORED
5455 ERROR1 13,C,A,MUUO DID NOT STORE E CORRECTLY,^
5456 036104 036 13 0 00 041706
5457 036105 035 02 0 00 036063 ERLP2 BWMST
5458 036106 271 07 0 00 001000 ADDI 7,1000 ;NEXT E FIELD
5459 036107 603 07 0 00 000001 TLNE 7,1 ;DONE 2^18TH TESTS?
5460 036110 254 00 0 00 036115 JRST TRAP0 ;NEXT SET
5461 036111 254 00 0 00 036063 JRST BWMST ;LOOP TEST
5462 036112 254 00 0 00 036115 JRST TRAP0 ;GO TO NEXT SET
5463 036113 BWERR: ERROR1 13,C,A,MUUO DID NOT TRAP TO CORRECT TRAP,^
5464 036113 036 13 0 00 041711
5465 036114 035 02 0 00 036063 ERLP2 BWMST
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 137
DSKEAM MAC 29-Mar-78 14:55 TRAP TESTING SEQ 0193
5466 SUBTTL TRAP TESTING
5467
5468 ;*CAUSE TRAPS VIA JRSTF INSTRUCTION
5469 ;*TRAP WILL CAUSE A MOVEI TO BE EXECUTED PUTING THE TRAP ADDRESS INTO
5470 ;*AC0 WHICH IS THEN CHECKED FOR BEING THE CORRECT TRAP
5471 ;*TRAP RETURN WILL CHECK FOR CORRECT PC STORED IN IN 0
5472
5473 SALL
5474 041714 T=SIXBTZ AROV TRAP TEST
5475 LALL
5476 041717 C=[AROVTP] ;CORRECT DATA
5477 000000 A=0 ;ACTUAL DATA
5478 036115 400 00 0 00 000000 TRAP0: SETZ ;CLEAR AC0
5479 TNSET^
5480 036116 201 00 0 00 036116 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5481 036117 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5482 ^
5483 036120 700 04 0 00 200000 RESET
5484 036121 264 00 0 00 037005 TRPSET
5485 036122 7 010 20 0 00 020000 TRAP0A: CONO PAG,LTRPEN
5486 036123 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;SET UP FOR ALLOWING TRAPS
5487 036124 200 00 0 00 041720 MOVE [XWD TN1,.+2] ;TRAP PC WORD FOR JRSTF
5488 036125 254 02 1 00 000000 JRSTF @ ;CAUSE TRAP VIA JRSTF
5489 036126 302 00 0 00 000421 CAIE 0,AROVTP ;TRAP DID NOT OCCUR
5490 ERROR1 13,C,A,AROV DID NOT TRAP TO 421,^
5491 SALL
5492 036127 036 13 0 00 041726
5493 036130 035 02 0 00 036122 ERLP2 TRAP0A
5494
5495 ;*TEST PUSHDOWN LIST OVERFLOW TRAP TO 422
5496 SALL
5497 041731 T=SIXBTZ PDLOV TRAP TEST
5498 LALL
5499 041734 C=[PDOVTP] ;CORRECT DATA
5500 000000 A=0 ;ACTUAL DATA
5501
5502 036131 400 00 0 00 000000 TRAP1: SETZ ;CLEAR AC0
5503 TNSET^
5504 036132 201 00 0 00 036132 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5505 036133 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5506 ^
5507 036134 700 04 0 00 200000 RESET
5508 036135 264 00 0 00 037005 TRPSET
5509 036136 7 010 20 0 00 020000 TRAP1A: CONO PAG,LTRPEN
5510 036137 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;SET UP FOR ALLOWING TRAPS
5511 036140 200 00 0 00 041735 MOVE [XWD TN0,.+2] ;TRAP PC WORD FOR JRSTF
5512 036141 254 02 1 00 000000 JRSTF @ ;CAUSE TRAP VIA JRSTF
5513 036142 302 00 0 00 000422 CAIE 0,PDOVTP ;TRAP DID NOT OCCUR
5514 ERROR1 13,C,A,PDOVTP DID NOT TRAP TO 422,^
5515 SALL
5516 036143 036 13 0 00 041743
5517 036144 035 02 0 00 036136 ERLP2 TRAP1A
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 138
DSKEAM MAC 29-Mar-78 14:55 TRAP TESTING SEQ 0194
5518 ;*TRAP3 TRAP TEST TRAPPING TO 423
5519
5520 SALL
5521 041746 T=SIXBTZ TRAP3 TRAP TEST
5522 LALL
5523 041751 C=[TRP3TP] ;CORRECT DATA
5524 000000 A=0 ;ACTUAL DATA
5525 036145 400 00 0 00 000000 TRP02: SETZ ;CLEAR AC0
5526 TNSET^
5527 036146 201 00 0 00 036146 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5528 036147 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5529 ^
5530 036150 700 04 0 00 200000 RESET
5531 036151 264 00 0 00 037005 TRPSET
5532 036152 7 010 20 0 00 020000 CONO PAG,LTRPEN
5533 036153 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;SET UP FOR ALLOWING TRAPS
5534 036154 200 00 0 00 041752 TRAP2A: MOVE [XWD TN0!TN1,.+2] ;PC FOR JRSTF
5535 036155 254 02 1 00 000000 JRSTF @ ;CAUSE TRAP VIA JRSTF
5536 036156 302 00 0 00 000423 CAIE 0,TRP3TP ;TRAP DID NOT OCCUR
5537 ERROR1 13,C,A,TRAP3 TRAP DID NOT TRAP TO 423,^
5538 SALL
5539 036157 036 13 0 00 041761
5540 036160 035 02 0 00 036154 ERLP2 TRAP2A
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 139
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0195
5541 SUBTTL FLAG SETTING
5542 000001 MODE=1
5543
5544 FLGTST USERF,<MUUO DID NOT RE-ENTER USER-MODE>^
5545 ;*TRY TO SET USERF VIA MONITOR UUO TRAP
5546 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5547
5548 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5549 041764 C=[USERF,,..0001] ;CORRECT FLAGS AND PC
5550
5551 036161 7 010 20 0 00 020000 ..0002: CONO PAG,LTRPEN
5552 036162 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5553 TNSET^
5554 036163 201 00 0 00 036163 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5555 036164 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5556 ^
5557 036165 255 17 0 00 036166 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5558 036166 336 00 0 00 041765 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5559 036167 254 00 0 00 036172 JRST .+3
5560 PAGECN^
5561 036170 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5562 036171 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5563 ^
5564 036172 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5565 036173 202 00 0 00 036207 MOVEM ..0003 ;STORE UUO TO DO
5566 036174 200 00 0 00 041764 MOVE [USERF,,..0001] ;PC AND FLAGS TO RESTORE
5567 036175 202 00 0 00 044434 MOVEM UPMP+CNTRP
5568 036176 202 00 0 00 044435 MOVEM UPMP+CTRP
5569 036177 202 00 0 00 044436 MOVEM UPMP+PNTRP
5570 036200 202 00 0 00 044437 MOVEM UPMP+PTRP
5571 036201 202 00 0 00 044432 MOVEM UPMP+SNTRP
5572 036202 202 00 0 00 044433 MOVEM UPMP+STRP
5573 036203 202 00 0 00 000430 MOVEM KNTRP
5574 036204 202 00 0 00 000431 MOVEM KTRP
5575 036205 402 00 0 00 044424 SETZM UPMP+MUUO
5576 036206 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5577 036207 000000 000000 ..0003: 0 ;HERE IS THE UUO
5578 ERROR ..0002,13,0,0,MUUO DID NOT CAUSE TRAP^
5579 SALL
5580 036210 036 13 0 00 041772
5581 036211 035 00 0 00 036161 ERLOOP ..0002 ;IF ERROR, LOOP TO ..0002
5582 036212 265 01 0 00 036213 ..0001: JSP 1,.+1 ;GET FLAGS
5583 036213 607 01 0 00 010000 TLNN 1,USERF ;ARE USERF(S) SET?
5584 ERROR ..0002,13,C,A,MUUO DID NOT RE-ENTER USER-MODE^
5585 SALL
5586 036214 036 13 0 00 042003
5587 036215 035 00 0 00 036161 ERLOOP ..0002 ;IF ERROR, LOOP TO ..0002
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 140
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0196
5588 ;*THIS ROUTINE TO BRING US BACK TO KERNAL MODE FROM USER
5589 ;*MODE RESTORE VIA MUUO
5590
5591 036216 200 00 0 00 042006 USRRTN: MOVE [UEXT] ;PC FOR RETURN
5592 036217 202 00 0 00 044430 MOVEM UPMP+KNTRP
5593 036220 202 00 0 00 044436 MOVEM UPMP+PNTRP
5594 036221 202 00 0 00 044432 MOVEM UPMP+SNTRP
5595 036222 202 00 0 00 044434 MOVEM UPMP+CNTRP
5596 036223 202 00 0 00 044433 MOVEM UPMP+STRP
5597 036224 202 00 0 00 044431 MOVEM UPMP+KTRP
5598 036225 202 00 0 00 044435 MOVEM UPMP+CTRP
5599 036226 202 00 0 00 044437 MOVEM UPMP+PTRP
5600 036227 205 00 0 00 040000 MOVSI 1B21
5601 036230 202 00 0 00 036231 MOVEM .+1 ;UUO TO GET US OUT
5602 036231 000000 000000 USREXT: 0 ;DO THIS UUO TO EXIT TO KERNAL
5603 036232 254 04 0 00 036232 HALT . ;FATAL ERROR (DID NOT ENTER KERNAL
5604 036233 265 00 0 00 036234 UEXT: JSP .+1 ;GET FLAGS
5605 036234 603 00 0 00 010000 TLNE USERF ;STILL IN USER MODE
5606 036235 254 04 0 00 036236 HALT .+1 ;FATAL - TRAPPED FROM UUO BUT STILL
5607 036236 254 00 0 00 036237 JRST .+1 ;IN USER MODE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0197
5608 000001 MODE=1
5609 FLGTST EXIOT,<MMUO DID NOT SET EXIOT FLAG>^
5610 ;*TRY TO SET EXIOT VIA MONITOR UUO TRAP
5611 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5612
5613 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5614 042007 C=[EXIOT,,..0004] ;CORRECT FLAGS AND PC
5615
5616 036237 7 010 20 0 00 020000 ..0005: CONO PAG,LTRPEN
5617 036240 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5618 TNSET^
5619 036241 201 00 0 00 036241 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5620 036242 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5621 ^
5622 036243 255 17 0 00 036244 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5623 036244 336 00 0 00 041765 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5624 036245 254 00 0 00 036250 JRST .+3
5625 PAGECN^
5626 036246 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5627 036247 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5628 ^
5629 036250 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5630 036251 202 00 0 00 036265 MOVEM ..0006 ;STORE UUO TO DO
5631 036252 200 00 0 00 042007 MOVE [EXIOT,,..0004] ;PC AND FLAGS TO RESTORE
5632 036253 202 00 0 00 044434 MOVEM UPMP+CNTRP
5633 036254 202 00 0 00 044435 MOVEM UPMP+CTRP
5634 036255 202 00 0 00 044436 MOVEM UPMP+PNTRP
5635 036256 202 00 0 00 044437 MOVEM UPMP+PTRP
5636 036257 202 00 0 00 044432 MOVEM UPMP+SNTRP
5637 036260 202 00 0 00 044433 MOVEM UPMP+STRP
5638 036261 202 00 0 00 000430 MOVEM KNTRP
5639 036262 202 00 0 00 000431 MOVEM KTRP
5640 036263 402 00 0 00 044424 SETZM UPMP+MUUO
5641 036264 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5642 036265 000000 000000 ..0006: 0 ;HERE IS THE UUO
5643 ERROR ..0005,13,0,0,MUUO DID NOT CAUSE TRAP^
5644 SALL
5645 036266 036 13 0 00 041772
5646 036267 035 00 0 00 036237 ERLOOP ..0005 ;IF ERROR, LOOP TO ..0005
5647 036270 265 01 0 00 036271 ..0004: JSP 1,.+1 ;GET FLAGS
5648 036271 607 01 0 00 004000 TLNN 1,EXIOT ;ARE EXIOT(S) SET?
5649 ERROR ..0005,13,C,A,MMUO DID NOT SET EXIOT FLAG^
5650 SALL
5651 036272 036 13 0 00 042015
5652 036273 035 00 0 00 036237 ERLOOP ..0005 ;IF ERROR, LOOP TO ..0005
5653 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-1
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0198
5654 000000 MODE=0
5655 FLGTST AROV,<MUUO DID NOT SET ARITHMETIC OVERFLOW FLAG>^
5656 ;*TRY TO SET AROV VIA MONITOR UUO TRAP
5657 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5658
5659 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5660 042020 C=[AROV,,..0007] ;CORRECT FLAGS AND PC
5661
5662 036274 7 010 20 0 00 020000 ..0010: CONO PAG,LTRPEN
5663 036275 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5664 TNSET^
5665 036276 201 00 0 00 036276 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5666 036277 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5667 ^
5668 036300 255 17 0 00 036301 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5669 036301 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5670 036302 254 00 0 00 036305 JRST .+3
5671 PAGECN^
5672 036303 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5673 036304 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5674 ^
5675 036305 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5676 036306 202 00 0 00 036322 MOVEM ..0011 ;STORE UUO TO DO
5677 036307 200 00 0 00 042020 MOVE [AROV,,..0007] ;PC AND FLAGS TO RESTORE
5678 036310 202 00 0 00 044434 MOVEM UPMP+CNTRP
5679 036311 202 00 0 00 044435 MOVEM UPMP+CTRP
5680 036312 202 00 0 00 044436 MOVEM UPMP+PNTRP
5681 036313 202 00 0 00 044437 MOVEM UPMP+PTRP
5682 036314 202 00 0 00 044432 MOVEM UPMP+SNTRP
5683 036315 202 00 0 00 044433 MOVEM UPMP+STRP
5684 036316 202 00 0 00 000430 MOVEM KNTRP
5685 036317 202 00 0 00 000431 MOVEM KTRP
5686 036320 402 00 0 00 044424 SETZM UPMP+MUUO
5687 036321 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5688 036322 000000 000000 ..0011: 0 ;HERE IS THE UUO
5689 ERROR ..0010,13,0,0,MUUO DID NOT CAUSE TRAP^
5690 SALL
5691 036323 036 13 0 00 041772
5692 036324 035 00 0 00 036274 ERLOOP ..0010 ;IF ERROR, LOOP TO ..0010
5693 036325 265 01 0 00 036326 ..0007: JSP 1,.+1 ;GET FLAGS
5694 036326 607 01 0 00 400000 TLNN 1,AROV ;ARE AROV(S) SET?
5695 ERROR ..0010,13,C,A,MUUO DID NOT SET ARITHMETIC OVERFLOW FLAG^
5696 SALL
5697 036327 036 13 0 00 042030
5698 036330 035 00 0 00 036274 ERLOOP ..0010 ;IF ERROR, LOOP TO ..0010
5699 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-2
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0199
5700 FLGTST CRY0,<MUUO DID NOT SET CRY0 FLAG>^
5701 ;*TRY TO SET CRY0 VIA MONITOR UUO TRAP
5702 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5703
5704 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5705 042033 C=[CRY0,,..0012] ;CORRECT FLAGS AND PC
5706
5707 036331 7 010 20 0 00 020000 ..0013: CONO PAG,LTRPEN
5708 036332 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5709 TNSET^
5710 036333 201 00 0 00 036333 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5711 036334 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5712 ^
5713 036335 255 17 0 00 036336 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5714 036336 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5715 036337 254 00 0 00 036342 JRST .+3
5716 PAGECN^
5717 036340 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5718 036341 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5719 ^
5720 036342 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5721 036343 202 00 0 00 036357 MOVEM ..0014 ;STORE UUO TO DO
5722 036344 200 00 0 00 042033 MOVE [CRY0,,..0012] ;PC AND FLAGS TO RESTORE
5723 036345 202 00 0 00 044434 MOVEM UPMP+CNTRP
5724 036346 202 00 0 00 044435 MOVEM UPMP+CTRP
5725 036347 202 00 0 00 044436 MOVEM UPMP+PNTRP
5726 036350 202 00 0 00 044437 MOVEM UPMP+PTRP
5727 036351 202 00 0 00 044432 MOVEM UPMP+SNTRP
5728 036352 202 00 0 00 044433 MOVEM UPMP+STRP
5729 036353 202 00 0 00 000430 MOVEM KNTRP
5730 036354 202 00 0 00 000431 MOVEM KTRP
5731 036355 402 00 0 00 044424 SETZM UPMP+MUUO
5732 036356 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5733 036357 000000 000000 ..0014: 0 ;HERE IS THE UUO
5734 ERROR ..0013,13,0,0,MUUO DID NOT CAUSE TRAP^
5735 SALL
5736 036360 036 13 0 00 041772
5737 036361 035 00 0 00 036331 ERLOOP ..0013 ;IF ERROR, LOOP TO ..0013
5738 036362 265 01 0 00 036363 ..0012: JSP 1,.+1 ;GET FLAGS
5739 036363 607 01 0 00 200000 TLNN 1,CRY0 ;ARE CRY0(S) SET?
5740 ERROR ..0013,13,C,A,MUUO DID NOT SET CRY0 FLAG^
5741 SALL
5742 036364 036 13 0 00 042041
5743 036365 035 00 0 00 036331 ERLOOP ..0013 ;IF ERROR, LOOP TO ..0013
5744 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-3
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0200
5745 FLGTST CRY1,<MUUO DID NOT SET CRY1 FLAG>^
5746 ;*TRY TO SET CRY1 VIA MONITOR UUO TRAP
5747 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5748
5749 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5750 042044 C=[CRY1,,..0015] ;CORRECT FLAGS AND PC
5751
5752 036366 7 010 20 0 00 020000 ..0016: CONO PAG,LTRPEN
5753 036367 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5754 TNSET^
5755 036370 201 00 0 00 036370 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5756 036371 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5757 ^
5758 036372 255 17 0 00 036373 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5759 036373 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5760 036374 254 00 0 00 036377 JRST .+3
5761 PAGECN^
5762 036375 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5763 036376 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5764 ^
5765 036377 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5766 036400 202 00 0 00 036414 MOVEM ..0017 ;STORE UUO TO DO
5767 036401 200 00 0 00 042044 MOVE [CRY1,,..0015] ;PC AND FLAGS TO RESTORE
5768 036402 202 00 0 00 044434 MOVEM UPMP+CNTRP
5769 036403 202 00 0 00 044435 MOVEM UPMP+CTRP
5770 036404 202 00 0 00 044436 MOVEM UPMP+PNTRP
5771 036405 202 00 0 00 044437 MOVEM UPMP+PTRP
5772 036406 202 00 0 00 044432 MOVEM UPMP+SNTRP
5773 036407 202 00 0 00 044433 MOVEM UPMP+STRP
5774 036410 202 00 0 00 000430 MOVEM KNTRP
5775 036411 202 00 0 00 000431 MOVEM KTRP
5776 036412 402 00 0 00 044424 SETZM UPMP+MUUO
5777 036413 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5778 036414 000000 000000 ..0017: 0 ;HERE IS THE UUO
5779 ERROR ..0016,13,0,0,MUUO DID NOT CAUSE TRAP^
5780 SALL
5781 036415 036 13 0 00 041772
5782 036416 035 00 0 00 036366 ERLOOP ..0016 ;IF ERROR, LOOP TO ..0016
5783 036417 265 01 0 00 036420 ..0015: JSP 1,.+1 ;GET FLAGS
5784 036420 607 01 0 00 100000 TLNN 1,CRY1 ;ARE CRY1(S) SET?
5785 ERROR ..0016,13,C,A,MUUO DID NOT SET CRY1 FLAG^
5786 SALL
5787 036421 036 13 0 00 042052
5788 036422 035 00 0 00 036366 ERLOOP ..0016 ;IF ERROR, LOOP TO ..0016
5789 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-4
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0201
5790 FLGTST FOV,<MUUO DID NOT SET FOV FLAG>^
5791 ;*TRY TO SET FOV VIA MONITOR UUO TRAP
5792 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5793
5794 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5795 042055 C=[FOV,,..0020] ;CORRECT FLAGS AND PC
5796
5797 036423 7 010 20 0 00 020000 ..0021: CONO PAG,LTRPEN
5798 036424 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5799 TNSET^
5800 036425 201 00 0 00 036425 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5801 036426 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5802 ^
5803 036427 255 17 0 00 036430 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5804 036430 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5805 036431 254 00 0 00 036434 JRST .+3
5806 PAGECN^
5807 036432 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5808 036433 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5809 ^
5810 036434 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5811 036435 202 00 0 00 036451 MOVEM ..0022 ;STORE UUO TO DO
5812 036436 200 00 0 00 042055 MOVE [FOV,,..0020] ;PC AND FLAGS TO RESTORE
5813 036437 202 00 0 00 044434 MOVEM UPMP+CNTRP
5814 036440 202 00 0 00 044435 MOVEM UPMP+CTRP
5815 036441 202 00 0 00 044436 MOVEM UPMP+PNTRP
5816 036442 202 00 0 00 044437 MOVEM UPMP+PTRP
5817 036443 202 00 0 00 044432 MOVEM UPMP+SNTRP
5818 036444 202 00 0 00 044433 MOVEM UPMP+STRP
5819 036445 202 00 0 00 000430 MOVEM KNTRP
5820 036446 202 00 0 00 000431 MOVEM KTRP
5821 036447 402 00 0 00 044424 SETZM UPMP+MUUO
5822 036450 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5823 036451 000000 000000 ..0022: 0 ;HERE IS THE UUO
5824 ERROR ..0021,13,0,0,MUUO DID NOT CAUSE TRAP^
5825 SALL
5826 036452 036 13 0 00 041772
5827 036453 035 00 0 00 036423 ERLOOP ..0021 ;IF ERROR, LOOP TO ..0021
5828 036454 265 01 0 00 036455 ..0020: JSP 1,.+1 ;GET FLAGS
5829 036455 607 01 0 00 040000 TLNN 1,FOV ;ARE FOV(S) SET?
5830 ERROR ..0021,13,C,A,MUUO DID NOT SET FOV FLAG^
5831 SALL
5832 036456 036 13 0 00 042063
5833 036457 035 00 0 00 036423 ERLOOP ..0021 ;IF ERROR, LOOP TO ..0021
5834 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-5
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0202
5835 FLGTST BIS,<MUUO DID NOT SET BIS FLAG>^
5836 ;*TRY TO SET BIS VIA MONITOR UUO TRAP
5837 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5838
5839 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5840 042066 C=[BIS,,..0023] ;CORRECT FLAGS AND PC
5841
5842 036460 7 010 20 0 00 020000 ..0024: CONO PAG,LTRPEN
5843 036461 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5844 TNSET^
5845 036462 201 00 0 00 036462 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5846 036463 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5847 ^
5848 036464 255 17 0 00 036465 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5849 036465 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5850 036466 254 00 0 00 036471 JRST .+3
5851 PAGECN^
5852 036467 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5853 036470 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5854 ^
5855 036471 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5856 036472 202 00 0 00 036506 MOVEM ..0025 ;STORE UUO TO DO
5857 036473 200 00 0 00 042066 MOVE [BIS,,..0023] ;PC AND FLAGS TO RESTORE
5858 036474 202 00 0 00 044434 MOVEM UPMP+CNTRP
5859 036475 202 00 0 00 044435 MOVEM UPMP+CTRP
5860 036476 202 00 0 00 044436 MOVEM UPMP+PNTRP
5861 036477 202 00 0 00 044437 MOVEM UPMP+PTRP
5862 036500 202 00 0 00 044432 MOVEM UPMP+SNTRP
5863 036501 202 00 0 00 044433 MOVEM UPMP+STRP
5864 036502 202 00 0 00 000430 MOVEM KNTRP
5865 036503 202 00 0 00 000431 MOVEM KTRP
5866 036504 402 00 0 00 044424 SETZM UPMP+MUUO
5867 036505 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5868 036506 000000 000000 ..0025: 0 ;HERE IS THE UUO
5869 ERROR ..0024,13,0,0,MUUO DID NOT CAUSE TRAP^
5870 SALL
5871 036507 036 13 0 00 041772
5872 036510 035 00 0 00 036460 ERLOOP ..0024 ;IF ERROR, LOOP TO ..0024
5873 036511 265 01 0 00 036512 ..0023: JSP 1,.+1 ;GET FLAGS
5874 036512 607 01 0 00 020000 TLNN 1,BIS ;ARE BIS(S) SET?
5875 ERROR ..0024,13,C,A,MUUO DID NOT SET BIS FLAG^
5876 SALL
5877 036513 036 13 0 00 042074
5878 036514 035 00 0 00 036460 ERLOOP ..0024 ;IF ERROR, LOOP TO ..0024
5879 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-6
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0203
5880 FLGTST FXU,<MUUO DID NOT SET FXU FLAG>^
5881 ;*TRY TO SET FXU VIA MONITOR UUO TRAP
5882 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5883
5884 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5885 042077 C=[FXU,,..0026] ;CORRECT FLAGS AND PC
5886
5887 036515 7 010 20 0 00 020000 ..0027: CONO PAG,LTRPEN
5888 036516 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5889 TNSET^
5890 036517 201 00 0 00 036517 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5891 036520 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5892 ^
5893 036521 255 17 0 00 036522 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5894 036522 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5895 036523 254 00 0 00 036526 JRST .+3
5896 PAGECN^
5897 036524 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5898 036525 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5899 ^
5900 036526 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5901 036527 202 00 0 00 036543 MOVEM ..0030 ;STORE UUO TO DO
5902 036530 200 00 0 00 042077 MOVE [FXU,,..0026] ;PC AND FLAGS TO RESTORE
5903 036531 202 00 0 00 044434 MOVEM UPMP+CNTRP
5904 036532 202 00 0 00 044435 MOVEM UPMP+CTRP
5905 036533 202 00 0 00 044436 MOVEM UPMP+PNTRP
5906 036534 202 00 0 00 044437 MOVEM UPMP+PTRP
5907 036535 202 00 0 00 044432 MOVEM UPMP+SNTRP
5908 036536 202 00 0 00 044433 MOVEM UPMP+STRP
5909 036537 202 00 0 00 000430 MOVEM KNTRP
5910 036540 202 00 0 00 000431 MOVEM KTRP
5911 036541 402 00 0 00 044424 SETZM UPMP+MUUO
5912 036542 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5913 036543 000000 000000 ..0030: 0 ;HERE IS THE UUO
5914 ERROR ..0027,13,0,0,MUUO DID NOT CAUSE TRAP^
5915 SALL
5916 036544 036 13 0 00 041772
5917 036545 035 00 0 00 036515 ERLOOP ..0027 ;IF ERROR, LOOP TO ..0027
5918 036546 265 01 0 00 036547 ..0026: JSP 1,.+1 ;GET FLAGS
5919 036547 607 01 0 00 000100 TLNN 1,FXU ;ARE FXU(S) SET?
5920 ERROR ..0027,13,C,A,MUUO DID NOT SET FXU FLAG^
5921 SALL
5922 036550 036 13 0 00 042105
5923 036551 035 00 0 00 036515 ERLOOP ..0027 ;IF ERROR, LOOP TO ..0027
5924 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-7
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0204
5925 FLGTST DCK,<MUUO DID NOT SET DCK FLAG>^
5926 ;*TRY TO SET DCK VIA MONITOR UUO TRAP
5927 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5928
5929 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5930 042110 C=[DCK,,..0031] ;CORRECT FLAGS AND PC
5931
5932 036552 7 010 20 0 00 020000 ..0032: CONO PAG,LTRPEN
5933 036553 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5934 TNSET^
5935 036554 201 00 0 00 036554 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5936 036555 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5937 ^
5938 036556 255 17 0 00 036557 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5939 036557 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5940 036560 254 00 0 00 036563 JRST .+3
5941 PAGECN^
5942 036561 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5943 036562 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5944 ^
5945 036563 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5946 036564 202 00 0 00 036600 MOVEM ..0033 ;STORE UUO TO DO
5947 036565 200 00 0 00 042110 MOVE [DCK,,..0031] ;PC AND FLAGS TO RESTORE
5948 036566 202 00 0 00 044434 MOVEM UPMP+CNTRP
5949 036567 202 00 0 00 044435 MOVEM UPMP+CTRP
5950 036570 202 00 0 00 044436 MOVEM UPMP+PNTRP
5951 036571 202 00 0 00 044437 MOVEM UPMP+PTRP
5952 036572 202 00 0 00 044432 MOVEM UPMP+SNTRP
5953 036573 202 00 0 00 044433 MOVEM UPMP+STRP
5954 036574 202 00 0 00 000430 MOVEM KNTRP
5955 036575 202 00 0 00 000431 MOVEM KTRP
5956 036576 402 00 0 00 044424 SETZM UPMP+MUUO
5957 036577 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
5958 036600 000000 000000 ..0033: 0 ;HERE IS THE UUO
5959 ERROR ..0032,13,0,0,MUUO DID NOT CAUSE TRAP^
5960 SALL
5961 036601 036 13 0 00 041772
5962 036602 035 00 0 00 036552 ERLOOP ..0032 ;IF ERROR, LOOP TO ..0032
5963 036603 265 01 0 00 036604 ..0031: JSP 1,.+1 ;GET FLAGS
5964 036604 607 01 0 00 000040 TLNN 1,DCK ;ARE DCK(S) SET?
5965 ERROR ..0032,13,C,A,MUUO DID NOT SET DCK FLAG^
5966 SALL
5967 036605 036 13 0 00 042116
5968 036606 035 00 0 00 036552 ERLOOP ..0032 ;IF ERROR, LOOP TO ..0032
5969 PAGE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 141-8
DSKEAM MAC 29-Mar-78 14:55 FLAG SETTING SEQ 0205
5970 FLGTST CRY0+CRY1+AROV+FOV+FXU+DCK+BIS,<MUUO DID NOT SET CRY0+CRY1+AROV+FOV+FXU+DCK
5971 +BIS FLAGS>^
5972 ;*TRY TO SET CRY0+CRY1+AROV+FOV+FXU+DCK+BIS VIA MONITOR UUO TRAP
5973 ;*TRAPS TO ANY MODE IS OK FOR THIS TEST
5974
5975 000001 A=1 ;ACTUAL FLAGS AND PC STORED
5976 042121 C=[CRY0+CRY1+AROV+FOV+FXU+DCK+BIS,,..0034] ;CORRECT FLAGS AND PC
5977
5978 036607 7 010 20 0 00 020000 ..0035: CONO PAG,LTRPEN
5979 036610 7 010 14 0 00 037116 DATAO PAG,[LLDUSB,,400000] ;CLEAR BASE REGISTER
5980 TNSET^
5981 036611 201 00 0 00 036611 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
5982 036612 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
5983 ^
5984 036613 255 17 0 00 036614 JFCL 17,.+1 ;CLEAR ANY AND ALL FLAGS
5985 036614 336 00 0 00 037173 SKIPN [MODE] ;DONT PAGE IF MODE = 0
5986 036615 254 00 0 00 036620 JRST .+3
5987 PAGECN^
5988 036616 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
5989 036617 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
5990 ^
5991 036620 205 00 0 00 040000 MOVSI 1B21 ;UUO TO DO
5992 036621 202 00 0 00 036635 MOVEM ..0036 ;STORE UUO TO DO
5993 036622 200 00 0 00 042121 MOVE [CRY0+CRY1+AROV+FOV+FXU+DCK+BIS,,..0034] ;PC AND FLAGS TO RESTORE
5994 036623 202 00 0 00 044434 MOVEM UPMP+CNTRP
5995 036624 202 00 0 00 044435 MOVEM UPMP+CTRP
5996 036625 202 00 0 00 044436 MOVEM UPMP+PNTRP
5997 036626 202 00 0 00 044437 MOVEM UPMP+PTRP
5998 036627 202 00 0 00 044432 MOVEM UPMP+SNTRP
5999 036630 202 00 0 00 044433 MOVEM UPMP+STRP
6000 036631 202 00 0 00 000430 MOVEM KNTRP
6001 036632 202 00 0 00 000431 MOVEM KTRP
6002 036633 402 00 0 00 044424 SETZM UPMP+MUUO
6003 036634 402 00 0 00 044425 SETZM UPMP+MUUOPC ;CLEAR WORK AREAS
6004 036635 000000 000000 ..0036: 0 ;HERE IS THE UUO
6005 ERROR ..0035,13,0,0,MUUO DID NOT CAUSE TRAP^
6006 SALL
6007 036636 036 13 0 00 041772
6008 036637 035 00 0 00 036607 ERLOOP ..0035 ;IF ERROR, LOOP TO ..0035
6009 036640 265 01 0 00 036641 ..0034: JSP 1,.+1 ;GET FLAGS
6010 TLNN 1,CRY0+CRY1+AROV+FOV+FXU+DCK+BIS ;ARE CRY0+CRY1+AROV+FOV+FXU
6011 036641 607 01 0 00 760140 +DCK+BIS(S) SET?
6012 ERROR ..0035,13,C,A,MUUO DID NOT SET CRY0+CRY1+AROV+FOV+FXU+DCK+BIS FLAGS^
6013 SALL
6014 036642 036 13 0 00 042133
6015 036643 035 00 0 00 036607 ERLOOP ..0035 ;IF ERROR, LOOP TO ..0035
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 142
DSKEAM MAC 29-Mar-78 14:55 TEST IOT'S IN CONCEALED MODE SEQ 0206
6016 SUBTTL TEST IOT'S IN CONCEALED MODE
6017
6018 SALL
6019 042136 T=SIXBTZ IOT MUUO^CONCEALED MODE
6020 LALL
6021 044424 A=UPMP+MUUO
6022 036670 C=IOTCM1
6023
6024 036644 IOTCM: TNSET^
6025 036644 201 00 0 00 036644 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
6026 036645 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
6027 ^
6028 PAGECN^
6029 036646 476 00 0 00 043725 SETOM CNSFLG ;INFORM PAGE ROUTINE
6030 036647 260 17 0 00 037016 GO PAGSET ;THAT I WANT CONCEALED MODE
6031 ^
6032
6033 036650 402 00 0 00 000010 SETZM 10 ;INIT COUNTER
6034
6035 036651 200 00 0 10 036717 IOTCM0: MOVE IOTTAB(10) ;SETUP IOT FOR EXECUTION
6036 036652 202 00 0 00 036670 MOVEM IOTCM1
6037
6038 036653 260 17 0 00 037025 GO PAGE1
6039 036654 201 00 0 00 036676 MOVEI IOTCM3 ;SETUP MUUO TRAP PC
6040 036655 202 00 0 00 044434 MOVEM UPMP+CNTRP
6041 036656 201 00 0 00 036674 MOVEI IOTCM2 ;SETUP FOR INCORRECT TRAP
6042 036657 202 00 0 00 044430 MOVEM UPMP+KNTRP
6043 036660 202 00 0 00 044436 MOVEM UPMP+PNTRP
6044 036661 202 00 0 00 044432 MOVEM UPMP+SNTRP
6045 036662 202 00 0 00 044431 MOVEM UPMP+KTRP
6046 036663 202 00 0 00 044433 MOVEM UPMP+STRP
6047 036664 202 00 0 00 044437 MOVEM UPMP+PTRP
6048 036665 202 00 0 00 044435 MOVEM UPMP+CTRP
6049
6050 036666 402 00 0 00 044424 SETZM UPMP+MUUO ;CLEAR MUUO LOCATIONS
6051 036667 403 00 0 00 044425 SETZB 0,UPMP+MUUO+1
6052
6053 036670 000000 000000 IOTCM1: 0 ;DO "IOT"
6054
6055 ERROR1 13,C,A,IOT DID NOT TRAP,C=IOT^
6056 SALL
6057 036671 036 13 0 00 042146
6058 036672 035 02 0 00 036651 ERLP2 IOTCM0
6059 036673 254 00 0 00 036676 JRST IOTCM3
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 143
DSKEAM MAC 29-Mar-78 14:55 TEST IOT'S IN CONCEALED MODE SEQ 0207
6060 036674 IOTCM2: ERROR1 13,C,A,IOT DID NOT TRAP TO PROPER TRAP^
6061 036674 036 13 0 00 042157
6062 036675 035 02 0 00 036651 ERLP2 IOTCM0
6063
6064 036676 200 00 0 00 044424 IOTCM3: MOVE UPMP+MUUO ;GET SAVED MUUO
6065 036677 312 00 0 00 036670 CAME IOTCM1
6066 ERROR1 13,C,A,CONTENTS OF 424 NOT EXECUTED IOT^
6067 036700 036 13 0 00 042170
6068 036701 035 02 0 00 036651 ERLP2 IOTCM0
6069
6070 042173 C=[IOTCM1+1]
6071 000001 A=1
6072
6073 036702 550 01 0 00 044425 HRRZ 1,UPMP+MUUO+1 ;GET SAVED PC
6074 036703 302 01 0 00 036671 CAIE 1,IOTCM1+1
6075 ERROR1 13,C,A,IOT MUUO DID NOT STORE CORRECT PC,,IOTCMX^
6076 036704 036 13 0 00 042202
6077 036705 035 02 0 00 036651 ERLP2 IOTCM0
6078
6079 036706 350 00 0 00 000010 AOS 10
6080 036707 302 10 0 00 000013 CAIE 10,^D11 ;DONE ALL ILLEGAL IOT'S ?
6081 036710 254 00 0 00 036651 JRST IOTCM0 ;NOT YET
6082 036711 254 00 0 00 036733 JRST UBLT ;YES, TO NEXT TEST
6083
6084 036712 IOTCMX: PMSG <IOT = >^
6085 036712 037 02 0 00 042205 PSIXM [SIXBIT\IOT = _\]^
6086 036713 200 00 0 00 036670 MOVE IOTCM1
6087 036714 037 13 0 00 000000 PNTHW
6088 036715 037 00 0 00 030242 PCRL
6089 036716 263 17 0 00 000000 RTN
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 144
DSKEAM MAC 29-Mar-78 14:55 TEST IOT'S IN CONCEALED MODE SEQ 0208
6090 ;*ILLEGAL USER MODE IOT TABLE
6091
6092 036717 7 000 20 0 00 000000 IOTTAB: CONO
6093 036720 7 000 24 0 00 000000 CONI
6094 036721 7 000 14 0 00 000000 DATAO
6095 036722 7 000 04 0 00 000000 DATAI
6096 036723 7 000 30 0 00 000000 CONSZ
6097 036724 7 000 34 0 00 000000 CONSO
6098 036725 7 000 10 0 00 000000 BLKO
6099 036726 7 000 00 0 00 000000 BLKI
6100 036727 254 04 0 00 000000 HALT
6101 036730 254 12 0 00 000000 JEN
6102 036731 254 10 0 00 000000 JRST 10,
6103 036732 254 04 0 00 000000 HALT
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 145
DSKEAM MAC 29-Mar-78 14:55 TEST USER MODE ADDRESSING SEQ 0209
6104 SUBTTL TEST USER MODE ADDRESSING
6105
6106 ;*USER MODE CONCEALED - MAXIMUM BLOCK TRANSFER
6107
6108 SALL
6109 042207 T=SIXBTZ USER MODE CONCEALED^MAXIMUM BLOCK TRANSFER
6110 LALL
6111
6112 044424 A=UPMP+MUUO
6113 042217 C=[HALT 13]
6114
6115 036733 UBLT:
6116 036733 UBLT3: TNSET^
6117 036733 201 00 0 00 036733 MOVEI . ;STORE THIS PC IN CASE WE GET LOST
6118 036734 202 00 0 00 030051 MOVEM TESTPC ;INTO TEST
6119 ^
6120 036735 201 00 0 00 540045 UBLT4: MOVEI <<UPMP+1000>_-^D9>!540000
6121 036736 504 00 0 00 000000 HRL ;SETUP PAGE TABLE ENTRY
6122 036737 205 01 0 00 777400 MOVSI 1,-1000/2 ;SO ALL PAGES POINT TO SAME 512 WORDS
6123 036740 202 00 0 01 044000 MOVEM UPMP(1)
6124 036741 253 01 0 00 036740 AOBJN 1,.-1
6125
6126 036742 200 10 0 00 042220 MOVE 10,[JRST 1,11] ;PORTAL
6127 036743 200 11 0 00 042221 MOVE 11,[SETOM 20] ;SET FIRST LOC
6128 036744 200 12 0 00 042222 MOVE 12,[BLT 7,777777] ;MAX BLT
6129 036745 200 13 0 00 042217 MOVE 13,[HALT 13] ;MUUO TO GET BACK TO EXEC
6130 036746 200 07 0 00 042223 MOVE 7,[20,,21] ;BLT START ADDRESSES
6131
6132 036747 201 00 0 00 036766 MOVEI UBLT5 ;SETUP FOR TERMINATION MUUO
6133 036750 202 00 0 00 044434 MOVEM UPMP+CNTRP
6134 036751 201 00 0 00 036777 MOVEI UBLT6 ;SETUP FOR ERROR TERMINATION MUUO
6135 036752 202 00 0 00 044435 MOVEM UPMP+CTRP
6136 036753 202 00 0 00 044436 MOVEM UPMP+PNTRP
6137 036754 202 00 0 00 044437 MOVEM UPMP+PTRP
6138
6139 036755 402 00 0 00 044424 SETZM UPMP+MUUO ;CLEAR MUUO LOCATIONS
6140 036756 402 00 0 00 044425 SETZM UPMP+MUUO+1
6141
6142 036757 200 00 0 00 042224 MOVE [0,,UPMP+LPGFTRP] ;SETUP FOR PAGE FAIL
6143 036760 202 00 0 00 044502 MOVEM UPMP+LPGFTRP ;HANDLE VIA MUUO
6144
6145 036761 7 010 20 0 00 020000 CONO PAG,LTRPEN
6146 036762 7 010 14 0 00 042225 DATAO PAG,[LLDUSB,,400000!<UPMP_-^D9>]
6147
6148 036763 254 02 1 00 036764 JRSTF @.+1 ;GO TO USER MODE
6149 036764 010000 000010 USERF,,10 ;IN THE AC'S
6150 036765 254 04 0 00 036765 HALT .
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 146
DSKEAM MAC 29-Mar-78 14:55 TEST USER MODE ADDRESSING SEQ 0210
6151 036766 200 00 0 00 044424 UBLT5: MOVE UPMP+MUUO ;COMPLETED, CHECK RESULTS
6152 036767 312 00 0 00 042217 CAME [HALT 13]
6153 ERROR1 13,C,A,INCORRECT TERMINATION MUUO^
6154 SALL
6155 036770 036 13 0 00 042233
6156 036771 035 02 0 00 036735 ERLP2 UBLT4
6157
6158 044425 A=UPMP+MUUO+1
6159 042236 C=[USERF,,14]
6160
6161 036772 200 00 0 00 044425 MOVE UPMP+MUUO+1
6162 036773 312 00 0 00 042236 CAME [USERF,,14]
6163 ERROR1 13,C,A,INCORRECT TERMINATION PC^
6164 036774 036 13 0 00 042244
6165 036775 035 02 0 00 036735 ERLP2 UBLT4
6166 036776 254 00 0 00 037003 JRST UBLT7
6167
6168 000005 C=5
6169 000006 A=6
6170
6171 036777 200 05 0 00 044500 UBLT6: MOVE 5,UPMP+LEUPFW
6172 037000 200 06 0 00 044425 MOVE 6,UPMP+MUUO+1
6173 ERROR1 13,C,A,PAGE FAILURE,<CORRECT=PF WORD, ACTUAL=PF PC>^
6174 037001 036 13 0 00 042257
6175 037002 035 02 0 00 036735 ERLP2 UBLT4
6176
6177 037003 254 00 0 00 037004 UBLT7: JRST LAST
6178
6179 037004 254 00 0 00 030057 LAST: JRST BEGEND
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 147
DSKEAM MAC 29-Mar-78 14:55 SPECIAL PROGRAM SUBROUTINES SEQ 0211
6180 SUBTTL SPECIAL PROGRAM SUBROUTINES
6181
6182 IFNDEF PAGSIZ,<PAGSIZ=24>
6183
6184 037005 000000 000000 TRAPST: 0 ;FOR JSR
6185 037006 202 00 0 00 043740 MOVEM XAC0# ;SAVE AC0
6186 037007 200 00 0 00 042262 MOVE [TPLST,,421] ;BLT POINTER
6187 037010 251 00 0 00 000423 BLT 423 ;FILL LOCATIONS
6188 037011 200 00 0 00 043740 MOVE XAC0 ;RESTORE AC0
6189 037012 254 00 1 00 037005 JRST @TRAPST ;RETURN
6190
6191 037013 201 00 0 00 000421 TPLST: MOVEI 421
6192 037014 201 00 0 00 000422 MOVEI 422
6193 037015 201 00 0 00 000423 MOVEI 423
6194
6195 ;*PAGE TABLE SETUP
6196
6197 037016 205 01 0 00 777754 PAGSET: MOVSI 1,-PAGSIZ ;SET UP PAGE COUNT
6198 037017 200 00 0 00 042263 MOVE [737776,,737777] ;ADDRESS
6199 037020 332 00 0 00 043725 SKIPE CNSFLG# ;IF CONCEALED DONT SET PUBLIC
6200 037021 200 00 0 00 042264 MOVE [537776,,537777]
6201 037022 270 00 0 00 040357 ADD [2,,2] ;NEW ADRESS
6202 037023 202 00 0 01 044000 MOVEM UPMP(1) ;STORE PAGE MAP
6203 037024 253 01 0 00 037022 AOBJN 1,.-2 ;LOOP TILL DONE
6204 037025 265 01 0 00 037026 PAGE1: JSP 1,.+1
6205 037026 603 01 0 00 010000 TLNE 1,USERF ;IF IN USER MODE FORGET PAGE RESET
6206 037027 263 17 0 00 000000 POPJ P, ;EXIT DIRECTLY
6207 037030 7 010 20 0 00 020000 CONO PAG,LTRPEN
6208 037031 7 010 14 0 00 042225 DATAO PAG,[LLDUSB,,400000!<UPMP_-^D9>]
6209 037032 254 02 1 00 037033 JRSTF @.+1 ;ENTER USER MODE
6210 037033 010000 037034 USERF,,.+1 ;ENTRY FLAG
6211 037034 254 01 0 00 037035 JRST 1,.+1 ;ENTRY
6212 037035 265 00 0 00 037036 JSP .+1 ;GET FLAGS
6213 037036 607 00 0 00 010000 TLNN USERF ;DID WE GET INTO USER MODE?
6214 ERROR1 13,C,A,ENTRY TO USER MODE UNSUCESSFUL,JRSTF FAILED^
6215 037037 036 13 0 00 042276
6216 037040 035 02 0 00 037016 ERLP2 PAGSET
6217 037041 263 17 0 00 000000 POPJ P, ;RETURN TO CALLING SEQUENCE
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0212
6218 SUBTTL *STOR* RESERVED STORAGE, MARCH 1978
6219
6220 ;PROGRAM LITERALS
6221
6222 XLIST
6223 IFNDEF $LPAPER,<LIST>
6224 037042 LIT
6225 037042 42 41 63 45 00 62
6226 037043 45 47 51 63 64 45
6227 037044 62 00 64 45 63 64
6228 037045 77 00 00 00 00 00
6229 037046 45 42 62 77 00 00
6230 037047 41 54 54 00 00 20
6231 037050 07 63 77 00 00 00
6232 037051 037042 037046
6233 037052 000014 000013
6234 037053 037047 000000
6235 037054 56 57 00 42 51 64
6236 037055 63 00 63 45 64 77
6237 037056 037042 037046
6238 037057 000014 000013
6239 037060 037054 000000
6240 037061 64 62 41 60 00 45
6241 037062 56 41 42 54 45 00
6242 037063 42 51 64 77 00 00
6243 037064 037042 037046
6244 037065 000014 000013
6245 037066 037061 000000
6246 037067 46 54 57 41 64 51
6247 037070 56 47 00 21 77 00
6248 037071 037042 037046
6249 037072 000014 000013
6250 037073 037067 000000
6251 037074 41 54 54 00 21 07
6252 037075 63 77 00 00 00 00
6253 037076 037042 037046
6254 037077 000014 000013
6255 037100 037074 000000
6256 037101 46 54 57 41 64 51
6257 037102 56 47 00 20 77 00
6258 037103 037042 037046
6259 037104 000014 000013
6260 037105 037101 000000
6261 037106 500000 400000
6262 037107 65 42 62 77 00 00
6263 037110 41 54 54 00 20 07
6264 037111 63 77 00 00 00 00
6265 037112 037042 037107
6266 037113 000014 000013
6267 037114 037110 000000
6268 037115 100000 403777
6269 037116 100000 400000
6270 037117 037042 037107
6271 037120 000014 000013
6272 037121 037054 000000
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-1
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0213
6273 037122 100000 400001
6274 037123 037042 037107
6275 037124 000014 000013
6276 037125 037067 000000
6277 037126 100000 400002
6278 037127 100000 400004
6279 037130 100000 400010
6280 037131 100000 400020
6281 037132 100000 400040
6282 037133 100000 400100
6283 037134 100000 400200
6284 037135 100000 400400
6285 037136 100000 401000
6286 037137 100000 402000
6287 037140 037042 037107
6288 037141 000014 000013
6289 037142 037074 000000
6290 037143 100000 403776
6291 037144 037042 037107
6292 037145 000014 000013
6293 037146 037101 000000
6294 037147 100000 403775
6295 037150 100000 403773
6296 037151 100000 403767
6297 037152 100000 403757
6298 037153 100000 403737
6299 037154 100000 403677
6300 037155 100000 403577
6301 037156 100000 403377
6302 037157 100000 402777
6303 037160 100000 401777
6304 037161 60 62 57 43 45 63
6305 037162 63 57 62 00 64 62
6306 037163 41 60 00 64 45 63
6307 037164 64 77 00 00 00 00
6308 037165 264 00 0 00 031537
6309 037166 64 62 41 60 00 23
6310 037167 00 46 41 51 54 45
6311 037170 44 77 00 00 00 00
6312 037171 46 41 64 41 54 77
6313 037172 037161 037166
6314 037173 000000 000000
6315 037174 037171 000000
6316 037175 000000 031533
6317 037176 64 62 41 60 00 23
6318 037177 00 63 41 66 45 44
6319 037200 00 60 43 77 00 00
6320 037201 037161 037176
6321 037202 000014 000013
6322 037203 037045 000000
6323 037204 264 00 0 00 031561
6324 037205 64 62 41 60 00 22
6325 037206 00 46 41 51 54 45
6326 037207 44 77 00 00 00 00
6327 037210 037161 037205
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-2
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0214
6328 037211 000000 000000
6329 037212 037171 000000
6330 037213 000000 031555
6331 037214 64 62 41 60 00 22
6332 037215 00 63 41 66 45 44
6333 037216 00 60 43 77 00 00
6334 037217 037161 037214
6335 037220 000014 000013
6336 037221 037045 000000
6337 037222 264 00 0 00 031603
6338 037223 64 62 41 60 00 21
6339 037224 00 46 41 51 54 45
6340 037225 44 77 00 00 00 00
6341 037226 037161 037223
6342 037227 000000 000000
6343 037230 037171 000000
6344 037231 000000 031577
6345 037232 64 62 41 60 00 21
6346 037233 00 63 41 66 45 44
6347 037234 00 60 43 77 00 00
6348 037235 037161 037232
6349 037236 000014 000013
6350 037237 037045 000000
6351 037240 777777 032365
6352 037241 60 65 63 50 77 00
6353 037242 60 65 63 50 00 44
6354 037243 51 44 00 56 57 64
6355 037244 00 64 62 41 60 77
6356 037245 037161 037241
6357 037246 000000 000000
6358 037247 037242 000000
6359 037250 000000 032366
6360 037251 44 51 44 00 56 57
6361 037252 64 00 51 56 43 62
6362 037253 45 55 45 56 64 00
6363 037254 60 57 51 56 64 45
6364 037255 62 77 00 00 00 00
6365 037256 037161 037241
6366 037257 037250 000001
6367 037260 037251 000000
6368 037261 44 51 44 00 56 57
6369 037262 64 00 63 64 57 62
6370 037263 45 00 44 41 64 41
6371 037264 77 00 00 00 00 00
6372 037265 037161 037241
6373 037266 032365 000001
6374 037267 037261 000000
6375 037270 60 65 63 50 52 77
6376 037271 44 51 44 00 56 57
6377 037272 64 00 64 62 41 60
6378 037273 00 57 62 00 43 41
6379 037274 54 43 00 45 41 77
6380 037275 037161 037270
6381 037276 000000 000000
6382 037277 037271 000000
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-3
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0215
6383 037300 44 51 44 00 56 57
6384 037301 64 00 64 62 41 60
6385 037302 77 00 00 00 00 00
6386 037303 037161 037270
6387 037304 000000 000000
6388 037305 037300 000000
6389 037306 037161 037270
6390 037307 037250 000001
6391 037310 037251 000000
6392 037311 44 51 44 00 56 57
6393 037312 64 00 63 41 66 45
6394 037313 00 62 51 47 50 64
6395 037314 00 62 45 64 00 41
6396 037315 44 44 62 77 00 00
6397 037316 037161 037270
6398 037317 000002 000001
6399 037320 037311 000000
6400 037321 60 57 60 77 00 00
6401 037322 037161 037321
6402 037323 000000 000000
6403 037324 037300 000000
6404 037325 44 51 44 00 56 57
6405 037326 64 00 62 45 63 64
6406 037327 57 62 45 00 44 41
6407 037330 64 41 77 00 00 00
6408 037331 037161 037321
6409 037332 032365 000002
6410 037333 037325 000000
6411 037334 44 51 44 00 56 57
6412 037335 64 00 44 45 43 62
6413 037336 45 55 45 56 64 00
6414 037337 60 57 51 56 64 45
6415 037340 62 77 00 00 00 00
6416 037341 037161 037321
6417 037342 037240 000001
6418 037343 037334 000000
6419 037344 60 57 60 52 77 00
6420 037345 44 51 44 00 56 57
6421 037346 64 00 64 62 41 60
6422 037347 00 57 62 00 47 45
6423 037350 64 00 62 45 64 65
6424 037351 62 56 00 41 44 62
6425 037352 77 00 00 00 00 00
6426 037353 037161 037344
6427 037354 000000 000000
6428 037355 037345 000000
6429 037356 037161 037344
6430 037357 000000 000000
6431 037360 037300 000000
6432 037361 037161 037344
6433 037362 037240 000001
6434 037363 037334 000000
6435 037364 377777 777777
6436 037365 41 63 50 00 57 66
6437 037366 45 62 46 54 57 67
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-4
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0216
6438 037367 77 00 00 00 00 00
6439 037370 037161 037365
6440 037371 000000 000000
6441 037372 037300 000000
6442 037373 377777 777776
6443 037374 41 43 00 67 62 57
6444 037375 56 47 77 00 00 00
6445 037376 037161 037365
6446 037377 037373 000002
6447 037400 037374 000000
6448 037401 41 63 50 43 00 57
6449 037402 66 45 62 46 54 57
6450 037403 67 77 00 00 00 00
6451 037404 037161 037401
6452 037405 000000 000000
6453 037406 037300 000000
6454 037407 037161 037401
6455 037410 037373 000002
6456 037411 037374 000000
6457 037412 400000 000000
6458 037413 55 65 54 00 57 66
6459 037414 45 62 46 54 57 67
6460 037415 77 00 00 00 00 00
6461 037416 037161 037413
6462 037417 000000 000000
6463 037420 037300 000000
6464 037421 41 43 00 55 57 44
6465 037422 51 46 51 45 44 77
6466 037423 037161 037413
6467 037424 037412 000002
6468 037425 037421 000000
6469 037426 51 55 65 54 00 57
6470 037427 66 45 62 46 54 57
6471 037430 67 77 00 00 00 00
6472 037431 037161 037426
6473 037432 000000 000000
6474 037433 037300 000000
6475 037434 037161 037426
6476 037435 037412 000002
6477 037436 037421 000000
6478 037437 017700 000000
6479 037440 41 44 52 42 60 00
6480 037441 57 66 45 62 46 54
6481 037442 57 67 77 00 00 00
6482 037443 037161 037440
6483 037444 000000 000000
6484 037445 037300 000000
6485 037446 400400 000000
6486 037447 46 63 43 00 57 66
6487 037450 45 62 46 54 57 67
6488 037451 77 00 00 00 00 00
6489 037452 037161 037447
6490 037453 000000 000000
6491 037454 037300 000000
6492 037455 244400 000000
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-5
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0217
6493 037456 46 51 70 00 57 66
6494 037457 45 62 46 54 57 67
6495 037460 77 00 00 00 00 00
6496 037461 037161 037456
6497 037462 000000 000000
6498 037463 037300 000000
6499 037464 037161 037456
6500 037465 037455 000002
6501 037466 037421 000000
6502 037467 46 51 70 62 00 57
6503 037470 66 45 62 46 54 57
6504 037471 67 77 00 00 00 00
6505 037472 037161 037467
6506 037473 000000 000000
6507 037474 037300 000000
6508 037475 037161 037467
6509 037476 037455 000002
6510 037477 037421 000000
6511 037500 377400 000000
6512 037501 46 41 44 00 57 66
6513 037502 45 62 46 54 57 67
6514 037503 77 00 00 00 00 00
6515 037504 037161 037501
6516 037505 000000 000000
6517 037506 037300 000000
6518 037507 44 46 41 44 00 57
6519 037510 66 45 62 46 54 57
6520 037511 67 77 00 00 00 00
6521 037512 037161 037507
6522 037513 000000 000000
6523 037514 037300 000000
6524 037515 46 63 42 00 57 66
6525 037516 45 62 46 54 57 67
6526 037517 77 00 00 00 00 00
6527 037520 037161 037515
6528 037521 000000 000000
6529 037522 037300 000000
6530 037523 44 46 63 42 00 57
6531 037524 66 45 62 46 54 57
6532 037525 67 77 00 00 00 00
6533 037526 037161 037523
6534 037527 000000 000000
6535 037530 037300 000000
6536 037531 46 55 60 00 57 66
6537 037532 45 62 46 54 57 67
6538 037533 77 00 00 00 00 00
6539 037534 037161 037531
6540 037535 000000 000000
6541 037536 037300 000000
6542 037537 44 46 55 60 00 57
6543 037540 66 45 62 46 54 57
6544 037541 67 77 00 00 00 00
6545 037542 037161 037537
6546 037543 000000 000000
6547 037544 037300 000000
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-6
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0218
6548 037545 44 51 66 00 56 57
6549 037546 00 44 51 66 51 44
6550 037547 45 77 00 00 00 00
6551 037550 037161 037545
6552 037551 000000 000000
6553 037552 037300 000000
6554 037553 037161 037545
6555 037554 037173 000002
6556 037555 037421 000000
6557 037556 41 43 13 21 00 55
6558 037557 57 44 51 46 51 45
6559 037560 44 77 00 00 00 00
6560 037561 037161 037545
6561 037562 037173 000003
6562 037563 037556 000000
6563 037564 51 44 51 66 00 56
6564 037565 57 00 44 51 66 51
6565 037566 44 45 77 00 00 00
6566 037567 037161 037564
6567 037570 000000 000000
6568 037571 037300 000000
6569 037572 037161 037564
6570 037573 037173 000002
6571 037574 037421 000000
6572 037575 037161 037564
6573 037576 037173 000003
6574 037577 037556 000000
6575 037600 46 44 66 00 56 57
6576 037601 00 44 51 66 51 44
6577 037602 45 77 00 00 00 00
6578 037603 037161 037600
6579 037604 000000 000000
6580 037605 037300 000000
6581 037606 037161 037600
6582 037607 037173 000002
6583 037610 037421 000000
6584 037611 037161 037600
6585 037612 037173 000003
6586 037613 037556 000000
6587 037614 46 44 66 62 00 56
6588 037615 57 00 44 51 66 51
6589 037616 44 45 77 00 00 00
6590 037617 037161 037614
6591 037620 000000 000000
6592 037621 037300 000000
6593 037622 037161 037614
6594 037623 037173 000002
6595 037624 037421 000000
6596 037625 037161 037614
6597 037626 037173 000003
6598 037627 037556 000000
6599 037630 44 46 44 66 00 56
6600 037631 57 00 44 51 66 51
6601 037632 44 45 77 00 00 00
6602 037633 037161 037630
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-7
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0219
6603 037634 000000 000000
6604 037635 037300 000000
6605 037636 037161 037630
6606 037637 037173 000002
6607 037640 037421 000000
6608 037641 037161 037630
6609 037642 037173 000003
6610 037643 037556 000000
6611 037644 42 41 44 00 64 62
6612 037645 41 60 77 00 00 00
6613 037646 037161 037644
6614 037647 032360 000001
6615 037650 037045 000000
6616 037651 55 41 60 00 51 56
6617 037652 63 64 00 64 45 63
6618 037653 64 77 00 00 00 00
6619 037654 161000 000000
6620 037655 55 41 60 00 41 44
6621 037656 62 00 20 77 00 00
6622 037657 037651 037655
6623 037660 000014 000013
6624 037661 037045 000000
6625 037662 161000 337000
6626 037663 55 41 60 00 41 44
6627 037664 62 00 23 23 27 20
6628 037665 20 20 77 00 00 00
6629 037666 037651 037663
6630 037667 000014 000013
6631 037670 037045 000000
6632 037671 000200 000201
6633 037672 001000 400000
6634 037673 55 41 60 00 41 44
6635 037674 62 00 24 20 20 20
6636 037675 20 20 77 00 00 00
6637 037676 60 41 47 45 00 55
6638 037677 41 60 00 43 54 45
6639 037700 41 62 77 00 00 00
6640 037701 037651 037673
6641 037702 000014 000013
6642 037703 037676 000000
6643 037704 001000 777000
6644 037705 55 41 60 00 41 44
6645 037706 62 00 27 27 27 20
6646 037707 20 20 77 00 00 00
6647 037710 037651 037705
6648 037711 000014 000013
6649 037712 037676 000000
6650 037713 41 54 54 00 42 65
6651 037714 64 00 41 43 43 45
6652 037715 63 63 77 00 00 00
6653 037716 037651 037673
6654 037717 000014 000013
6655 037720 037713 000000
6656 037721 037651 037705
6657 037722 000014 000013
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-8
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0220
6658 037723 037713 000000
6659 037724 60 41 47 45 00 46
6660 037725 41 51 54 00 64 62
6661 037726 41 60 00 64 45 63
6662 037727 64 77 00 00 00 00
6663 037730 64 62 41 60 00 46
6664 037731 41 51 54 45 44 77
6665 037732 62 45 46 00 64 57
6666 037733 00 24 20 20 20 20
6667 037734 20 77 00 00 00 00
6668 037735 037724 037730
6669 037736 000000 000013
6670 037737 037732 000000
6671 037740 60 41 47 45 00 46
6672 037741 41 51 54 00 63 64
6673 037742 57 62 45 44 00 51
6674 037743 56 00 41 43 77 00
6675 037744 037724 037740
6676 037745 000014 000013
6677 037746 037732 000000
6678 037747 60 41 47 45 00 46
6679 037750 41 51 54 00 63 64
6680 037751 57 62 45 44 00 51
6681 037752 56 00 20 77 00 00
6682 037753 037724 037747
6683 037754 000014 000013
6684 037755 037732 000000
6685 037756 60 41 47 45 00 46
6686 037757 41 51 54 00 67 57
6687 037760 62 44 00 67 62 57
6688 037761 56 47 77 00 00 00
6689 037762 037724 037756
6690 037763 000014 000013
6691 037764 037732 000000
6692 037765 56 57 56 15 70 15
6693 037766 55 45 55 77 00 00
6694 037767 037724 037765
6695 037770 000014 000013
6696 037771 037732 000000
6697 037772 62 45 46 00 64 57
6698 037773 00 27 27 27 27 27
6699 037774 27 77 00 00 00 00
6700 037775 037724 037730
6701 037776 000000 000013
6702 037777 037772 000000
6703 040000 037724 037740
6704 040001 000014 000013
6705 040002 037772 000000
6706 040003 037724 037747
6707 040004 000014 000013
6708 040005 037772 000000
6709 040006 001000 777777
6710 040007 037724 037756
6711 040010 000014 000013
6712 040011 037772 000000
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-9
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0221
6713 040012 037724 037765
6714 040013 000014 000013
6715 040014 037772 000000
6716 040015 45 70 45 43 15 60
6717 040016 45 62 15 60 62 57
6718 040017 43 45 63 63 00 55
6719 040020 41 60 00 64 45 63
6720 040021 64 77 00 00 00 00
6721 040022 001000 340000
6722 040023 55 41 60 00 41 44
6723 040024 62 00 23 24 20 20
6724 040025 20 20 77 00 00 00
6725 040026 040015 040023
6726 040027 000014 000013
6727 040030 037676 000000
6728 040031 001000 377000
6729 040032 55 41 60 00 41 44
6730 040033 62 00 23 27 27 20
6731 040034 20 20 77 00 00 00
6732 040035 040015 040032
6733 040036 000014 000013
6734 040037 037676 000000
6735 040040 040015 040023
6736 040041 000014 000013
6737 040042 037713 000000
6738 040043 040015 040032
6739 040044 000014 000013
6740 040045 037713 000000
6741 040046 55 41 60 00 62 45
6742 040047 41 44 57 65 64 00
6743 040050 46 41 51 54 65 62
6744 040051 45 77 00 00 00 00
6745 040052 040015 040046
6746 040053 000014 000013
6747 040054 040032 000000
6748 040055 161003 777000
6749 040056 040015 040046
6750 040057 000014 000013
6751 040060 040023 000000
6752 040061 46 54 57 41 64 51
6753 040062 56 47 00 42 51 64
6754 040063 00 64 45 63 64 77
6755 040064 040061 040046
6756 040065 000014 000013
6757 040066 037045 032707
6758 040067 62 45 46 00 64 57
6759 040070 00 77 00 00 00 00
6760 040071 64 62 41 60 00 64
6761 040072 45 63 64 77 00 00
6762 040073 62 45 46 00 64 57
6763 040074 00 10 43 57 62 62
6764 040075 45 43 64 11 77 00
6765 040076 040071 037730
6766 040077 000014 000013
6767 040100 040073 000000
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-10
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0222
6768 040101 040071 037740
6769 040102 000014 000013
6770 040103 037045 000000
6771 040104 040071 037747
6772 040105 000014 000013
6773 040106 037045 000000
6774 040107 040071 037756
6775 040110 000014 000013
6776 040111 037045 000000
6777 040112 60 41 47 45 44 00
6778 040113 44 41 64 41 00 62
6779 040114 45 41 44 00 64 45
6780 040115 63 64 77 00 00 00
6781 040116 44 41 64 41 00 45
6782 040117 62 62 57 62 77 00
6783 040120 41 44 62 00 24 20
6784 040121 20 70 70 70 77 00
6785 040122 040112 040116
6786 040123 000014 000013
6787 040124 040120 000000
6788 040125 41 44 62 00 27 27
6789 040126 27 70 70 70 77 00
6790 040127 040112 040116
6791 040130 000014 000013
6792 040131 040125 000000
6793 040132 51 56 43 00 60 41
6794 040133 47 51 56 47 00 41
6795 040134 44 62 07 63 77 00
6796 040135 040112 040116
6797 040136 000014 000013
6798 040137 040132 033115
6799 040140 62 45 66 45 62 63
6800 040141 45 00 62 45 41 44
6801 040142 77 00 00 00 00 00
6802 040143 040112 040116
6803 040144 000014 000013
6804 040145 040140 033115
6805 040146 60 41 47 45 44 00
6806 040147 44 41 64 41 00 67
6807 040150 62 51 64 45 00 64
6808 040151 45 63 64 77 00 00
6809 040152 377000 400777
6810 040153 60 41 47 45 44 00
6811 040154 62 45 62 45 41 44
6812 040155 77 00 00 00 00 00
6813 040156 040146 040153
6814 040157 000014 000013
6815 040160 040120 000000
6816 040161 44 51 62 45 43 64
6817 040162 00 62 45 62 45 41
6818 040163 44 77 00 00 00 00
6819 040164 040146 040161
6820 040165 000014 000013
6821 040166 040120 000000
6822 040167 000777 777000
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-11
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0223
6823 040170 040146 040153
6824 040171 000014 000013
6825 040172 040125 000000
6826 040173 040146 040161
6827 040174 000014 000013
6828 040175 040125 000000
6829 040176 043742 043743
6830 040177 040146 040116
6831 040200 000014 000013
6832 040201 040153 033337
6833 040202 040146 040116
6834 040203 000014 000013
6835 040204 040161 033337
6836 040205 44 51 62 45 43 64
6837 040206 00 62 45 41 44 77
6838 040207 040146 040116
6839 040210 000014 000013
6840 040211 040205 033344
6841 040212 62 45 66 45 62 63
6842 040213 45 00 60 41 47 45
6843 040214 44 00 62 45 62 45
6844 040215 41 44 77 00 00 00
6845 040216 040146 040116
6846 040217 000014 000013
6847 040220 040212 033337
6848 040221 62 45 66 45 62 63
6849 040222 45 00 44 51 62 45
6850 040223 43 64 00 62 45 62
6851 040224 45 41 44 77 00 00
6852 040225 040146 040116
6853 040226 000014 000013
6854 040227 040221 033351
6855 040230 60 41 47 45 00 46
6856 040231 41 51 54 00 67 57
6857 040232 62 44 00 64 45 63
6858 040233 64 77 00 00 00 00
6859 040234 000000 000201
6860 040235 040230 037730
6861 040236 000014 000013
6862 040237 037171 000000
6863 040240 040230 037740
6864 040241 000014 000013
6865 040242 037045 000000
6866 040243 040230 037747
6867 040244 000014 000013
6868 040245 037045 000000
6869 040246 001000 400170
6870 040247 040230 037756
6871 040250 000014 000013
6872 040251 037045 000000
6873 040252 67 62 51 64 45 00
6874 040253 60 62 57 64 45 43
6875 040254 64 00 64 45 63 64
6876 040255 77 00 00 00 00 00
6877 040256 040252 037730
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-12
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0224
6878 040257 000014 000013
6879 040260 040120 000000
6880 040261 040252 037740
6881 040262 000014 000013
6882 040263 040120 000000
6883 040264 040252 037747
6884 040265 000014 000013
6885 040266 040120 000000
6886 040267 131000 400170
6887 040270 040252 037756
6888 040271 000014 000013
6889 040272 040120 000000
6890 040273 44 41 64 41 00 67
6891 040274 57 62 44 00 67 62
6892 040275 57 56 47 77 00 00
6893 040276 040252 040273
6894 040277 000014 000013
6895 040300 040120 000000
6896 040301 040252 037730
6897 040302 000014 000013
6898 040303 040125 000000
6899 040304 040252 037740
6900 040305 000014 000013
6901 040306 040125 000000
6902 040307 111000 777171
6903 040310 040252 037756
6904 040311 000014 000013
6905 040312 040125 000000
6906 040313 040252 040273
6907 040314 000014 000013
6908 040315 040125 000000
6909 040316 60 41 47 45 44 00
6910 040317 42 54 64 00 64 45
6911 040320 63 64 77 00 00 00
6912 040321 740076 740076
6913 040322 340000 340001
6914 040323 56 57 64 00 41 54
6915 040324 54 00 72 45 62 57
6916 040325 63 77 00 00 00 00
6917 040326 040316 040323
6918 040327 000014 000013
6919 040330 040073 000000
6920 040331 777777 777777
6921 040332 56 57 64 00 41 54
6922 040333 54 00 57 56 45 63
6923 040334 77 00 00 00 00 00
6924 040335 040316 040332
6925 040336 000014 000013
6926 040337 040073 000000
6927 040340 525252 525252
6928 040341 56 57 64 00 41 54
6929 040342 64 00 42 51 64 63
6930 040343 77 00 00 00 00 00
6931 040344 040316 040341
6932 040345 000014 000013
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-13
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0225
6933 040346 040073 000000
6934 040347 252525 252525
6935 040350 42 41 63 45 00 62
6936 040351 45 47 51 63 64 45
6937 040352 62 00 62 45 54 57
6938 040353 43 41 64 51 57 56
6939 040354 00 64 45 63 64 77
6940 040355 076200 076201
6941 040356 540000 540001
6942 040357 000002 000002
6943 040360 255 00 0 00 000000
6944 040361 55 65 65 57 00 46
6945 040362 41 51 54 45 44 77
6946 040363 43 57 62 35 55 65
6947 040364 65 57 14 00 41 43
6948 040365 64 35 55 65 65 57
6949 040366 00 41 44 62 77 00
6950 040367 040350 040361
6951 040370 000014 000013
6952 040371 040363 000000
6953 040372 55 65 65 57 00 63
6954 040373 64 57 62 45 44 00
6955 040374 67 62 57 56 47 77
6956 040375 60 41 47 45 00 20
6957 040376 77 00 00 00 00 00
6958 040377 040350 040372
6959 040400 000014 000013
6960 040401 040375 000000
6961 040402 55 65 65 57 00 60
6962 040403 43 00 63 64 57 62
6963 040404 45 44 00 67 62 57
6964 040405 56 47 77 00 00 00
6965 040406 040350 040402
6966 040407 000014 000013
6967 040410 040375 000000
6968 040411 100000 400076
6969 040412 62 45 54 57 43 41
6970 040413 64 45 44 00 60 41
6971 040414 47 45 77 00 00 00
6972 040415 040350 040372
6973 040416 000014 000013
6974 040417 040412 000000
6975 040420 040350 040402
6976 040421 000014 000013
6977 040422 040412 000000
6978 040423 60 41 47 45 00 46
6979 040424 41 51 54 00 46 41
6980 040425 51 54 45 44 77 00
6981 040426 040350 040423
6982 040427 000014 000013
6983 040430 037772 000000
6984 040431 040350 037740
6985 040432 000014 000013
6986 040433 037772 000000
6987 040434 040350 037756
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-14
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0226
6988 040435 000014 000013
6989 040436 037772 000000
6990 040437 62 45 54 57 43 41
6991 040440 64 45 44 00 45 70
6992 040441 45 43 15 60 45 62
6993 040442 15 60 62 57 43 45
6994 040443 63 63 00 60 41 47
6995 040444 51 56 47 77 00 00
6996 040445 040437 040116
6997 040446 000014 000013
6998 040447 040153 033337
6999 040450 040437 040116
7000 040451 000014 000013
7001 040452 040161 033344
7002 040453 040437 040116
7003 040454 000014 000013
7004 040455 040205 033344
7005 040456 254 01 0 00 340001
7006 040457 254 02 1 00 340002
7007 040460 000600 340003
7008 040461 254 00 0 00 340003
7009 040462 264 00 0 00 034113
7010 040463 264 00 0 00 034105
7011 040464 45 60 60 00 41 44
7012 040465 62 00 64 62 41 60
7013 040466 00 45 62 62 57 62
7014 040467 77 00 00 00 00 00
7015 040470 64 62 41 60 60 45
7016 040471 44 00 65 63 51 56
7017 040472 47 00 65 42 62 77
7018 040473 040437 040464
7019 040474 000000 000000
7020 040475 040470 000000
7021 040476 000000 340003
7022 040477 63 41 66 45 44 00
7023 040500 60 43 00 67 62 57
7024 040501 56 47 77 00 00 00
7025 040502 040437 040464
7026 040503 000014 000013
7027 040504 040477 000000
7028 040505 60 41 47 45 00 46
7029 040506 41 65 54 64 00 46
7030 040507 41 51 54 45 44 77
7031 040510 040437 040505
7032 040511 000014 000013
7033 040512 037171 000000
7034 040513 62 45 54 57 43 41
7035 040514 64 51 57 56 00 46
7036 040515 41 51 54 45 44 77
7037 040516 60 41 47 45 00 46
7038 040517 41 51 54 00 64 62
7039 040520 41 60 60 45 44 00
7040 040521 64 57 00 60 41 47
7041 040522 45 00 20 77 00 00
7042 040523 040437 040513
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-15
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0227
7043 040524 000014 000013
7044 040525 040516 000000
7045 040526 62 45 54 57 43 41
7046 040527 64 51 57 56 00 63
7047 040530 65 43 43 45 45 44
7048 040531 45 44 77 00 00 00
7049 040532 040437 040526
7050 040533 000014 000013
7051 040534 037756 000000
7052 040535 264 00 0 00 034203
7053 040536 040437 037166
7054 040537 000000 000000
7055 040540 037171 000000
7056 040541 000000 034200
7057 040542 040437 037176
7058 040543 000014 000013
7059 040544 037045 000000
7060 040545 264 00 0 00 034222
7061 040546 040437 037205
7062 040547 000000 000000
7063 040550 037171 000000
7064 040551 000000 034217
7065 040552 040437 037214
7066 040553 000014 000013
7067 040554 037045 000000
7068 040555 264 00 0 00 034241
7069 040556 040437 037223
7070 040557 000000 000000
7071 040560 037171 000000
7072 040561 000000 034236
7073 040562 040437 037232
7074 040563 000014 000013
7075 040564 037045 000000
7076 040565 62 45 54 57 43 41
7077 040566 64 45 44 00 51 56
7078 040567 64 45 62 62 65 60
7079 040570 64 00 64 45 63 64
7080 040571 77 00 00 00 00 00
7081 040572 264 00 0 00 034406
7082 040573 264 00 0 00 034376
7083 040574 264 00 0 00 034366
7084 040575 264 00 0 00 034356
7085 040576 264 00 0 00 034346
7086 040577 264 00 0 00 034336
7087 040600 264 00 0 00 034326
7088 040601 264 00 0 00 034310
7089 040602 60 41 47 45 00 20
7090 040603 00 51 56 64 45 62
7091 040604 62 65 60 64 00 45
7092 040605 62 62 57 62 77 00
7093 040606 43 57 62 35 41 60
7094 040607 62 14 00 41 43 64
7095 040610 35 60 51 77 00 00
7096 040611 040565 040602
7097 040612 000014 000013
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-16
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0228
7098 040613 040606 000000
7099 040614 264 00 0 00 030104
7100 040615 62 45 54 57 43 41
7101 040616 64 45 44 00 45 60
7102 040617 55 60 00 62 45 46
7103 040620 51 54 54 00 60 41
7104 040621 47 51 56 47 77 00
7105 040622 040615 040116
7106 040623 000014 000013
7107 040624 040153 033337
7108 040625 040615 040116
7109 040626 000014 000013
7110 040627 040161 033344
7111 040630 040615 040116
7112 040631 000014 000013
7113 040632 040205 033344
7114 040633 42 54 64 00 60 41
7115 040634 47 45 00 46 41 51
7116 040635 54 77 00 00 00 00
7117 040636 400775 400776
7118 040637 41 43 64 35 42 54
7119 040640 64 00 41 43 77 00
7120 040641 040633 037730
7121 040642 000014 000013
7122 040643 040637 000000
7123 040644 400777 401000
7124 040645 42 54 64 00 41 43
7125 040646 00 67 62 57 56 47
7126 040647 77 00 00 00 00 00
7127 040650 040633 040645
7128 040651 000014 000013
7129 040652 037045 000000
7130 040653 011000 401000
7131 040654 040633 037756
7132 040655 000014 000013
7133 040656 037045 000000
7134 040657 000000 034547
7135 040660 63 41 66 45 44 00
7136 040661 46 54 41 47 63 14
7137 040662 14 60 43 00 67 62
7138 040663 57 56 47 77 00 00
7139 040664 040633 040660
7140 040665 000014 000013
7141 040666 037045 000000
7142 040667 42 54 64 00 44 41
7143 040670 64 41 00 67 62 57
7144 040671 56 47 77 00 00 00
7145 040672 41 44 62 00 24 20
7146 040673 20 27 27 25 77 00
7147 040674 040633 040667
7148 040675 000014 000013
7149 040676 040672 000000
7150 040677 41 44 62 00 24 20
7151 040700 20 27 27 26 77 00
7152 040701 040633 040667
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-17
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0229
7153 040702 000014 000013
7154 040703 040677 000000
7155 040704 41 44 62 00 24 20
7156 040705 20 27 27 27 77 00
7157 040706 040633 040667
7158 040707 000014 000013
7159 040710 040704 000000
7160 040711 41 44 62 00 24 20
7161 040712 21 20 20 20 77 00
7162 040713 040633 040667
7163 040714 000014 000013
7164 040715 040711 000000
7165 040716 41 44 62 00 24 20
7166 040717 21 20 20 21 77 00
7167 040720 040633 040667
7168 040721 000014 000013
7169 040722 040716 000000
7170 040723 41 44 62 00 24 20
7171 040724 21 20 20 22 77 00
7172 040725 040633 040667
7173 040726 000014 000013
7174 040727 040723 000000
7175 040730 42 54 64 00 67 45
7176 040731 56 64 00 64 57 57
7177 040732 00 46 41 62 77 00
7178 040733 040633 040730
7179 040734 000014 000013
7180 040735 040723 000000
7181 040736 740075 740076
7182 040737 42 71 64 45 00 60
7183 040740 41 47 45 00 46 41
7184 040741 51 54 77 00 00 00
7185 040742 44 06 0 00 400000
7186 040743 51 54 44 42 00 64
7187 040744 62 41 60 00 46 41
7188 040745 51 54 45 44 77 00
7189 040746 41 43 64 35 60 57
7190 040747 51 56 64 45 62 14
7191 040750 00 43 57 62 35 42
7192 040751 71 64 45 00 41 43
7193 040752 77 00 00 00 00 00
7194 040753 040737 040743
7195 040754 000014 000013
7196 040755 040746 000000
7197 040756 51 54 44 42 00 43
7198 040757 50 41 56 47 45 44
7199 040760 00 42 71 64 45 00
7200 040761 41 43 77 00 00 00
7201 040762 040737 040756
7202 040763 000014 000013
7203 040764 040746 000000
7204 040765 36 06 0 00 400000
7205 040766 51 54 44 42 00 60
7206 040767 57 51 56 64 45 62
7207 040770 00 67 62 57 56 47
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-18
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0230
7208 040771 77 00 00 00 00 00
7209 040772 040737 040766
7210 040773 000014 000013
7211 040774 037045 000000
7212 040775 51 54 44 42 00 55
7213 040776 57 44 51 46 51 45
7214 040777 44 00 42 71 64 45
7215 041000 00 63 57 65 62 43
7216 041001 45 77 00 00 00 00
7217 041002 41 44 62 00 24 20
7218 041003 20 20 20 20 77 00
7219 041004 040737 040775
7220 041005 000014 000013
7221 041006 041002 000000
7222 041007 040737 037756
7223 041010 000014 000013
7224 041011 037045 000000
7225 041012 020000 034706
7226 041013 040737 040660
7227 041014 000014 000013
7228 041015 037045 000000
7229 041016 51 44 60 42 00 64
7230 041017 62 41 60 00 46 41
7231 041020 51 54 45 44 77 00
7232 041021 040737 041016
7233 041022 000014 000013
7234 041023 040746 000000
7235 041024 51 44 60 42 00 43
7236 041025 50 41 56 47 45 44
7237 041026 00 42 71 64 45 00
7238 041027 41 43 77 00 00 00
7239 041030 040737 041024
7240 041031 000014 000013
7241 041032 040746 000000
7242 041033 51 44 60 42 00 60
7243 041034 57 51 56 64 45 62
7244 041035 00 67 62 57 56 47
7245 041036 77 00 00 00 00 00
7246 041037 040737 041033
7247 041040 000014 000013
7248 041041 037045 000000
7249 041042 51 44 60 42 00 55
7250 041043 57 44 51 46 51 45
7251 041044 44 00 42 71 64 45
7252 041045 00 44 45 63 64 51
7253 041046 56 41 64 51 57 56
7254 041047 77 00 00 00 00 00
7255 041050 040737 041042
7256 041051 000014 000013
7257 041052 041002 000000
7258 041053 020000 034743
7259 041054 44 06 0 00 000014
7260 041055 60 57 51 56 64 45
7261 041056 62 00 46 45 64 43
7262 041057 50 00 64 62 41 60
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-19
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0231
7263 041060 00 46 41 51 54 45
7264 041061 44 77 00 00 00 00
7265 041062 040737 041055
7266 041063 000014 000013
7267 041064 041002 000000
7268 041065 60 57 51 56 64 45
7269 041066 62 00 46 45 64 43
7270 041067 50 00 55 57 44 51
7271 041070 46 51 45 44 00 42
7272 041071 71 64 45 00 41 43
7273 041072 77 00 00 00 00 00
7274 041073 040737 041065
7275 041074 000014 000013
7276 041075 037045 000000
7277 041076 41 43 00 07 41 43
7278 041077 64 07 00 55 57 44
7279 041100 51 46 51 45 44 77
7280 041101 040737 041076
7281 041102 000014 000013
7282 041103 037045 000000
7283 041104 60 57 51 56 64 45
7284 041105 62 00 67 62 57 56
7285 041106 47 77 00 00 00 00
7286 041107 040737 041104
7287 041110 000014 000013
7288 041111 041002 000000
7289 041112 011000 400000
7290 041113 000000 035002
7291 041114 44 57 65 42 54 45
7292 041115 00 55 57 66 45 00
7293 041116 60 41 47 45 00 46
7294 041117 41 51 54 77 00 00
7295 041120 041114 037730
7296 041121 000014 000013
7297 041122 041002 000000
7298 041123 44 55 57 66 45 00
7299 041124 55 57 44 51 46 51
7300 041125 45 44 00 41 43 77
7301 041126 46 45 64 43 50 00
7302 041127 46 62 57 55 00 24
7303 041130 20 20 20 20 20 77
7304 041131 041114 041123
7305 041132 000014 000013
7306 041133 041126 000000
7307 041134 44 55 57 66 45 00
7308 041135 55 57 44 51 46 51
7309 041136 45 44 00 41 43 21
7310 041137 77 00 00 00 00 00
7311 041140 46 45 64 43 50 00
7312 041141 46 62 57 55 00 24
7313 041142 20 20 20 20 21 77
7314 041143 041114 041134
7315 041144 000014 000013
7316 041145 041140 000000
7317 041146 041114 037756
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-20
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0232
7318 041147 000014 000013
7319 041150 037045 000000
7320 041151 000000 035051
7321 041152 041114 040660
7322 041153 000014 000013
7323 041154 037045 000000
7324 041155 041114 037730
7325 041156 000014 000013
7326 041157 037045 000000
7327 041160 46 45 64 43 50 00
7328 041161 46 62 57 55 00 24
7329 041162 20 20 27 27 27 77
7330 041163 041114 041123
7331 041164 000014 000013
7332 041165 041160 000000
7333 041166 46 45 64 43 50 00
7334 041167 46 62 57 55 00 24
7335 041170 20 21 20 20 20 77
7336 041171 041114 041134
7337 041172 000014 000013
7338 041173 041166 000000
7339 041174 001000 401000
7340 041175 000000 035111
7341 041176 44 42 54 00 55 57
7342 041177 66 45 00 64 57 00
7343 041200 55 45 55 00 60 41
7344 041201 47 45 00 46 41 51
7345 041202 54 77 00 00 00 00
7346 041203 041176 037730
7347 041204 000014 000013
7348 041205 041002 000000
7349 041206 44 55 57 66 45 55
7350 041207 00 55 57 44 51 46
7351 041210 51 45 44 00 41 43
7352 041211 00 44 45 63 64 51
7353 041212 56 41 64 51 57 56
7354 041213 77 00 00 00 00 00
7355 041214 041176 041206
7356 041215 000014 000013
7357 041216 041002 000000
7358 041217 44 55 57 66 45 55
7359 041220 00 55 57 44 51 46
7360 041221 51 45 44 00 41 43
7361 041222 21 00 44 45 63 64
7362 041223 51 56 41 64 51 57
7363 041224 56 77 00 00 00 00
7364 041225 41 44 62 00 24 20
7365 041226 20 20 20 21 77 00
7366 041227 041176 041217
7367 041230 000014 000013
7368 041231 041225 000000
7369 041232 44 55 57 66 45 55
7370 041233 00 55 57 44 51 46
7371 041234 51 45 44 00 41 43
7372 041235 77 00 00 00 00 00
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-21
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0233
7373 041236 041176 041232
7374 041237 000014 000013
7375 041240 037045 000000
7376 041241 44 55 57 66 45 55
7377 041242 00 55 57 44 51 46
7378 041243 51 45 44 00 41 43
7379 041244 21 77 00 00 00 00
7380 041245 041176 041241
7381 041246 000014 000013
7382 041247 037045 000000
7383 041250 011000 400001
7384 041251 041176 037756
7385 041252 000014 000013
7386 041253 037045 000000
7387 041254 000000 035157
7388 041255 041176 040660
7389 041256 000014 000013
7390 041257 037045 000000
7391 041260 22 56 44 00 67 57
7392 041261 62 44 00 44 55 57
7393 041262 66 45 55 77 00 00
7394 041263 041176 037730
7395 041264 000014 000013
7396 041265 041260 000000
7397 041266 041176 041206
7398 041267 000014 000013
7399 041270 040704 000000
7400 041271 041176 041217
7401 041272 000014 000013
7402 041273 040711 000000
7403 041274 000000 035225
7404 041275 64 62 41 60 00 51
7405 041276 56 63 64 62 65 43
7406 041277 64 51 57 56 00 60
7407 041300 41 47 45 00 46 41
7408 041301 51 54 77 00 00 00
7409 041302 264 00 0 00 400326
7410 041303 041275 037730
7411 041304 000000 000000
7412 041305 037171 000000
7413 041306 52 62 63 64 46 00
7414 041307 50 41 60 60 45 56
7415 041310 45 44 77 00 00 00
7416 041311 56 57 00 64 62 41
7417 041312 60 77 00 00 00 00
7418 041313 041275 041306
7419 041314 000000 000000
7420 041315 041311 000000
7421 041316 011000 400326
7422 041317 041275 037756
7423 041320 000014 000013
7424 041321 037045 000000
7425 041322 000600 035277
7426 041323 041275 040660
7427 041324 000014 000013
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-22
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0234
7428 041325 041116 000000
7429 041326 60 41 47 45 00 46
7430 041327 41 51 54 00 43 57
7431 041330 56 64 51 56 65 45
7432 041331 00 46 41 51 54 45
7433 041332 44 77 00 00 00 00
7434 041333 041275 041326
7435 041334 000000 000000
7436 041335 037171 000000
7437 041336 000000 400332
7438 041337 62 45 54 57 43 41
7439 041340 64 51 57 56 00 51
7440 041341 56 43 57 62 62 45
7441 041342 43 64 77 00 00 00
7442 041343 60 46 00 43 57 56
7443 041344 64 51 56 65 45 77
7444 041345 041275 041337
7445 041346 000014 000013
7446 041347 041343 000000
7447 041350 000000 035277
7448 041351 64 62 41 60 00 63
7449 041352 41 66 45 44 00 60
7450 041353 43 00 67 62 57 56
7451 041354 47 77 00 00 00 00
7452 041355 041275 041351
7453 041356 000014 000013
7454 041357 041343 000000
7455 041360 64 62 41 60 00 60
7456 041361 41 47 45 00 46 41
7457 041362 51 54 77 00 00 00
7458 041363 264 00 0 00 035402
7459 041364 041360 037730
7460 041365 000000 000000
7461 041366 037171 000000
7462 041367 041360 041306
7463 041370 000000 000000
7464 041371 041311 000000
7465 041372 64 62 41 60 00 23
7466 041373 00 50 41 60 60 45
7467 041374 56 45 44 77 00 00
7468 041375 56 57 00 60 41 47
7469 041376 45 00 46 41 51 54
7470 041377 77 00 00 00 00 00
7471 041400 041360 041372
7472 041401 000000 000000
7473 041402 041375 000000
7474 041403 001000 400373
7475 041404 041360 037756
7476 041405 000014 000013
7477 041406 037045 000000
7478 041407 000600 400373
7479 041410 041360 040660
7480 041411 000014 000013
7481 041412 041116 000000
7482 041413 51 17 57 00 51 56
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-23
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0235
7483 041414 63 64 00 60 41 47
7484 041415 45 00 46 41 51 54
7485 041416 77 00 00 00 00 00
7486 041417 43 57 56 51 00 64
7487 041420 62 41 60 00 46 41
7488 041421 51 54 45 44 77 00
7489 041422 041413 041417
7490 041423 000000 000000
7491 041424 037171 000000
7492 041425 44 41 64 41 51 77
7493 041426 041413 037756
7494 041427 000014 000013
7495 041430 041425 000000
7496 041431 000000 035442
7497 041432 041413 040660
7498 041433 000014 000013
7499 041434 041425 000000
7500 041435 55 57 56 51 64 57
7501 041436 62 00 65 65 57 00
7502 041437 64 45 63 64 00 15
7503 041440 00 64 62 41 60 60
7504 041441 51 56 47 00 51 56
7505 041442 00 53 45 62 56 41
7506 041443 54 00 55 57 44 45
7507 041444 77 00 00 00 00 00
7508 041445 55 65 65 57 00 44
7509 041446 51 44 00 56 57 64
7510 041447 00 64 62 41 60 00
7511 041450 51 56 00 53 45 62
7512 041451 56 41 54 00 55 57
7513 041452 44 45 77 00 00 00
7514 041453 43 10 43 57 62 62
7515 041454 45 43 64 11 35 55
7516 041455 57 56 51 64 57 62
7517 041456 00 65 65 57 77 00
7518 041457 041435 041445
7519 041460 035557 000000
7520 041461 041453 000000
7521 041462 43 10 43 57 62 62
7522 041463 45 43 64 11 35 55
7523 041464 65 65 57 77 00 00
7524 041465 041435 041445
7525 041466 035602 000000
7526 041467 041462 000000
7527 041470 041435 041445
7528 041471 035625 000000
7529 041472 041462 000000
7530 041473 55 57 56 51 64 57
7531 041474 62 00 65 65 57 00
7532 041475 64 45 63 64 00 15
7533 041476 00 65 65 57 00 63
7534 041477 64 57 62 45 00 51
7535 041500 56 64 57 00 24 22
7536 041501 24 77 00 00 00 00
7537 041502 43 57 56 64 45 56
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-24
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0236
7538 041503 64 63 00 57 46 00
7539 041504 24 22 24 00 51 63
7540 041505 00 56 57 64 00 45
7541 041506 61 65 41 54 00 64
7542 041507 57 00 45 70 45 43
7543 041510 65 64 45 44 00 65
7544 041511 65 57 77 00 00 00
7545 041512 041473 041502
7546 041513 035650 000424
7547 041514 037045 000000
7548 041515 55 57 56 51 64 57
7549 041516 62 00 65 65 57 00
7550 041517 15 00 63 64 57 62
7551 041520 45 00 43 57 62 62
7552 041521 45 43 64 00 60 43
7553 041522 77 00 00 00 00 00
7554 041523 000000 035675
7555 041524 55 65 65 57 00 44
7556 041525 51 44 00 56 57 64
7557 041526 00 63 64 57 62 45
7558 041527 00 64 50 45 00 43
7559 041530 57 62 62 45 43 64
7560 041531 00 60 43 77 00 00
7561 041532 43 10 24 22 25 11
7562 041533 00 50 41 63 00 60
7563 041534 43 00 63 64 57 62
7564 041535 45 44 77 00 00 00
7565 041536 041515 041524
7566 041537 041523 000001
7567 041540 041532 000000
7568 041541 55 57 56 51 64 57
7569 041542 62 00 65 65 57 00
7570 041543 15 00 63 64 57 62
7571 041544 45 00 45 00 43 57
7572 041545 62 62 45 43 64 54
7573 041546 71 77 00 00 00 00
7574 041547 55 65 65 57 00 44
7575 041550 51 44 00 56 57 64
7576 041551 00 63 64 57 62 45
7577 041552 00 45 00 43 57 62
7578 041553 62 45 43 64 54 71
7579 041554 77 00 00 00 00 00
7580 041555 43 10 24 22 24 11
7581 041556 00 50 41 63 00 45
7582 041557 00 66 41 54 65 45
7583 041560 00 63 64 57 62 45
7584 041561 44 77 00 00 00 00
7585 041562 041541 041547
7586 041563 000007 000001
7587 041564 041555 000000
7588 041565 55 57 56 51 64 57
7589 041566 62 00 65 65 57 00
7590 041567 64 45 63 64 00 15
7591 041570 00 64 62 41 60 60
7592 041571 51 56 47 00 51 56
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-25
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0237
7593 041572 00 43 57 56 43 45
7594 041573 41 54 45 44 00 55
7595 041574 57 44 45 77 00 00
7596 041575 55 65 65 57 00 44
7597 041576 51 44 00 56 57 64
7598 041577 00 64 62 41 60 00
7599 041600 51 56 00 43 57 56
7600 041601 43 45 41 54 45 44
7601 041602 00 55 57 44 45 77
7602 041603 041565 041575
7603 041604 035753 044424
7604 041605 041453 000000
7605 041606 55 65 65 57 00 64
7606 041607 62 41 60 60 45 44
7607 041610 00 64 57 00 51 56
7608 041611 43 57 62 62 45 43
7609 041612 64 00 64 62 41 60
7610 041613 00 54 57 43 41 64
7611 041614 51 57 56 77 00 00
7612 041615 041565 041606
7613 041616 035753 044424
7614 041617 037045 000000
7615 041620 55 65 65 57 00 44
7616 041621 51 44 00 56 57 64
7617 041622 00 64 62 41 60 77
7618 041623 041473 041620
7619 041624 036007 044424
7620 041625 037045 000000
7621 041626 041473 041502
7622 041627 036007 044424
7623 041630 037045 000000
7624 041631 55 65 65 57 00 64
7625 041632 62 41 60 45 44 00
7626 041633 64 57 00 51 56 43
7627 041634 57 62 62 45 43 64
7628 041635 00 64 62 41 60 00
7629 041636 54 57 43 41 64 51
7630 041637 57 56 77 00 00 00
7631 041640 041473 041631
7632 041641 036007 044424
7633 041642 037045 000000
7634 041643 55 57 56 51 64 57
7635 041644 62 00 65 65 57 00
7636 041645 15 00 63 64 57 62
7637 041646 51 56 47 00 64 50
7638 041647 45 00 43 57 62 62
7639 041650 45 43 64 00 60 43
7640 041651 77 00 00 00 00 00
7641 041652 000000 036046
7642 041653 041643 041524
7643 041654 041652 000001
7644 041655 037045 000000
7645 041656 55 65 65 57 00 44
7646 041657 51 44 00 56 57 64
7647 041660 00 64 62 41 60 00
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-26
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0238
7648 041661 64 57 00 43 57 62
7649 041662 62 45 43 64 00 64
7650 041663 62 41 60 77 00 00
7651 041664 041643 041656
7652 041665 041652 000001
7653 041666 037045 000000
7654 041667 55 65 65 57 00 63
7655 041670 64 57 62 51 56 47
7656 041671 00 64 50 45 00 43
7657 041672 57 62 62 45 43 64
7658 041673 00 45 00 46 51 45
7659 041674 54 44 77 00 00 00
7660 041675 55 65 65 57 00 44
7661 041676 51 44 00 56 57 64
7662 041677 00 64 62 41 60 00
7663 041700 51 56 00 43 57 56
7664 041701 43 45 41 54 45 44
7665 041702 77 00 00 00 00 00
7666 041703 041667 041675
7667 041704 000007 000001
7668 041705 037045 000000
7669 041706 041667 041547
7670 041707 000007 000001
7671 041710 037045 000000
7672 041711 041667 041656
7673 041712 000007 000001
7674 041713 037045 000000
7675 041714 41 62 57 66 00 64
7676 041715 62 41 60 00 64 45
7677 041716 63 64 77 00 00 00
7678 041717 000000 000421
7679 041720 000200 036126
7680 041721 41 62 57 66 00 44
7681 041722 51 44 00 56 57 64
7682 041723 00 64 62 41 60 00
7683 041724 64 57 00 24 22 21
7684 041725 77 00 00 00 00 00
7685 041726 041714 041721
7686 041727 041717 000000
7687 041730 037045 000000
7688 041731 60 44 54 57 66 00
7689 041732 64 62 41 60 00 64
7690 041733 45 63 64 77 00 00
7691 041734 000000 000422
7692 041735 000400 036142
7693 041736 60 44 57 66 64 60
7694 041737 00 44 51 44 00 56
7695 041740 57 64 00 64 62 41
7696 041741 60 00 64 57 00 24
7697 041742 22 22 77 00 00 00
7698 041743 041731 041736
7699 041744 041734 000000
7700 041745 037045 000000
7701 041746 64 62 41 60 23 00
7702 041747 64 62 41 60 00 64
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-27
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0239
7703 041750 45 63 64 77 00 00
7704 041751 000000 000423
7705 041752 000600 036156
7706 041753 64 62 41 60 23 00
7707 041754 64 62 41 60 00 44
7708 041755 51 44 00 56 57 64
7709 041756 00 64 62 41 60 00
7710 041757 64 57 00 24 22 23
7711 041760 77 00 00 00 00 00
7712 041761 041746 041753
7713 041762 041751 000000
7714 041763 037045 000000
7715 041764 010000 036212
7716 041765 000000 000001
7717 041766 55 65 65 57 00 44
7718 041767 51 44 00 56 57 64
7719 041770 00 43 41 65 63 45
7720 041771 00 64 62 41 60 77
7721 041772 041746 041766
7722 041773 000000 000000
7723 041774 037045 000000
7724 041775 55 65 65 57 00 44
7725 041776 51 44 00 56 57 64
7726 041777 00 62 45 15 45 56
7727 042000 64 45 62 00 65 63
7728 042001 45 62 15 55 57 44
7729 042002 45 77 00 00 00 00
7730 042003 041746 041775
7731 042004 041764 000001
7732 042005 037045 000000
7733 042006 000000 036233
7734 042007 004000 036270
7735 042010 55 55 65 57 00 44
7736 042011 51 44 00 56 57 64
7737 042012 00 63 45 64 00 45
7738 042013 70 51 57 64 00 46
7739 042014 54 41 47 77 00 00
7740 042015 041746 042010
7741 042016 042007 000001
7742 042017 037045 000000
7743 042020 400000 036325
7744 042021 55 65 65 57 00 44
7745 042022 51 44 00 56 57 64
7746 042023 00 63 45 64 00 41
7747 042024 62 51 64 50 55 45
7748 042025 64 51 43 00 57 66
7749 042026 45 62 46 54 57 67
7750 042027 00 46 54 41 47 77
7751 042030 041746 042021
7752 042031 042020 000001
7753 042032 037045 000000
7754 042033 200000 036362
7755 042034 55 65 65 57 00 44
7756 042035 51 44 00 56 57 64
7757 042036 00 63 45 64 00 43
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-28
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0240
7758 042037 62 71 20 00 46 54
7759 042040 41 47 77 00 00 00
7760 042041 041746 042034
7761 042042 042033 000001
7762 042043 037045 000000
7763 042044 100000 036417
7764 042045 55 65 65 57 00 44
7765 042046 51 44 00 56 57 64
7766 042047 00 63 45 64 00 43
7767 042050 62 71 21 00 46 54
7768 042051 41 47 77 00 00 00
7769 042052 041746 042045
7770 042053 042044 000001
7771 042054 037045 000000
7772 042055 040000 036454
7773 042056 55 65 65 57 00 44
7774 042057 51 44 00 56 57 64
7775 042060 00 63 45 64 00 46
7776 042061 57 66 00 46 54 41
7777 042062 47 77 00 00 00 00
7778 042063 041746 042056
7779 042064 042055 000001
7780 042065 037045 000000
7781 042066 020000 036511
7782 042067 55 65 65 57 00 44
7783 042070 51 44 00 56 57 64
7784 042071 00 63 45 64 00 42
7785 042072 51 63 00 46 54 41
7786 042073 47 77 00 00 00 00
7787 042074 041746 042067
7788 042075 042066 000001
7789 042076 037045 000000
7790 042077 000100 036546
7791 042100 55 65 65 57 00 44
7792 042101 51 44 00 56 57 64
7793 042102 00 63 45 64 00 46
7794 042103 70 65 00 46 54 41
7795 042104 47 77 00 00 00 00
7796 042105 041746 042100
7797 042106 042077 000001
7798 042107 037045 000000
7799 042110 000040 036603
7800 042111 55 65 65 57 00 44
7801 042112 51 44 00 56 57 64
7802 042113 00 63 45 64 00 44
7803 042114 43 53 00 46 54 41
7804 042115 47 77 00 00 00 00
7805 042116 041746 042111
7806 042117 042110 000001
7807 042120 037045 000000
7808 042121 760140 036640
7809 042122 55 65 65 57 00 44
7810 042123 51 44 00 56 57 64
7811 042124 00 63 45 64 00 43
7812 042125 62 71 20 13 43 62
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-29
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0241
7813 042126 71 21 13 41 62 57
7814 042127 66 13 46 57 66 13
7815 042130 46 70 65 13 44 43
7816 042131 53 13 42 51 63 00
7817 042132 46 54 41 47 63 77
7818 042133 041746 042122
7819 042134 042121 000001
7820 042135 037045 000000
7821 042136 51 57 64 00 55 65
7822 042137 65 57 76 43 57 56
7823 042140 43 45 41 54 45 44
7824 042141 00 55 57 44 45 77
7825 042142 51 57 64 00 44 51
7826 042143 44 00 56 57 64 00
7827 042144 64 62 41 60 77 00
7828 042145 43 35 51 57 64 77
7829 042146 042136 042142
7830 042147 036670 044424
7831 042150 042145 000000
7832 042151 51 57 64 00 44 51
7833 042152 44 00 56 57 64 00
7834 042153 64 62 41 60 00 64
7835 042154 57 00 60 62 57 60
7836 042155 45 62 00 64 62 41
7837 042156 60 77 00 00 00 00
7838 042157 042136 042151
7839 042160 036670 044424
7840 042161 037045 000000
7841 042162 43 57 56 64 45 56
7842 042163 64 63 00 57 46 00
7843 042164 24 22 24 00 56 57
7844 042165 64 00 45 70 45 43
7845 042166 65 64 45 44 00 51
7846 042167 57 64 77 00 00 00
7847 042170 042136 042162
7848 042171 036670 044424
7849 042172 037045 000000
7850 042173 000000 036671
7851 042174 51 57 64 00 55 65
7852 042175 65 57 00 44 51 44
7853 042176 00 56 57 64 00 63
7854 042177 64 57 62 45 00 43
7855 042200 57 62 62 45 43 64
7856 042201 00 60 43 77 00 00
7857 042202 042136 042174
7858 042203 042173 000001
7859 042204 037045 036712
7860 042205 51 57 64 00 35 00
7861 042206 77 00 00 00 00 00
7862 042207 65 63 45 62 00 55
7863 042210 57 44 45 00 43 57
7864 042211 56 43 45 41 54 45
7865 042212 44 76 55 41 70 51
7866 042213 55 65 55 00 42 54
7867 042214 57 43 53 00 64 62
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-30
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0242
7868 042215 41 56 63 46 45 62
7869 042216 77 00 00 00 00 00
7870 042217 254 04 0 00 000013
7871 042220 254 01 0 00 000011
7872 042221 476 00 0 00 000020
7873 042222 251 07 0 00 777777
7874 042223 000020 000021
7875 042224 000000 044502
7876 042225 100000 400044
7877 042226 51 56 43 57 62 62
7878 042227 45 43 64 00 64 45
7879 042230 62 55 51 56 41 64
7880 042231 51 57 56 00 55 65
7881 042232 65 57 77 00 00 00
7882 042233 042207 042226
7883 042234 042217 044424
7884 042235 037045 000000
7885 042236 010000 000014
7886 042237 51 56 43 57 62 62
7887 042240 45 43 64 00 64 45
7888 042241 62 55 51 56 41 64
7889 042242 51 57 56 00 60 43
7890 042243 77 00 00 00 00 00
7891 042244 042207 042237
7892 042245 042236 044425
7893 042246 037045 000000
7894 042247 60 41 47 45 00 46
7895 042250 41 51 54 65 62 45
7896 042251 77 00 00 00 00 00
7897 042252 43 57 62 62 45 43
7898 042253 64 35 60 46 00 67
7899 042254 57 62 44 14 00 41
7900 042255 43 64 65 41 54 35
7901 042256 60 46 00 60 43 77
7902 042257 042207 042247
7903 042260 000005 000006
7904 042261 042252 000000
7905 042262 037013 000421
7906 042263 737776 737777
7907 042264 537776 537777
7908 042265 45 56 64 62 71 00
7909 042266 64 57 00 65 63 45
7910 042267 62 00 55 57 44 45
7911 042270 00 65 56 63 65 43
7912 042271 45 63 63 46 65 54
7913 042272 77 00 00 00 00 00
7914 042273 52 62 63 64 46 00
7915 042274 46 41 51 54 45 44
7916 042275 77 00 00 00 00 00
7917 042276 042207 042265
7918 042277 000005 000006
7919 042300 042273 000000
7920 LIST
7921 043624 000000 000000 ENDSLD: 0
7922
DSKEA DECSYSTEM 2020 PAGING HARDWARE DIAGNOSTIC - VER 0,1 MACRO %53(1020) 15:12 29-Mar-78 Page 1-31
STOR KSM 28-Mar-78 11:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0243
7923 IFDEF DEBUG,<
7924 043625 PATCH: BLOCK DEBUG ;PATCHING AREA
7925 >
7926
7927 ;PROGRAM VARIABLES
7928 043725 VAR
7929
7930 IFDEF PGMEND,<
7931 043741 000000 000000 END: 0
7932 030000 END BEGIN >
NO ERRORS DETECTED
PROGRAM BREAK IS 000000
ABSOLUTE BREAK IS 043742
CPU TIME USED 00:30.973
36P CORE USED
A 5117# 5195# 5216 5230# 5248 5256# 5277 5290# 5321 5330 5337# 5364 5369 5378
5386# 5413 5417 5424# 5451 5456 5464 5477# 5492 5500# 5516 5524# 5539 5548# SEQ 0244
5586 5613# 5651 5659# 5697 5704# 5742 5749# 5787 5794# 5832 5839# 5877 5884#
5922 5929# 5967 5975# 6014 6021# 6057 6061 6067 6071# 6076 6112# 6155 6158#
6164 6169# 6174 6215
ABORT 260#
AC 37# 890 892 893 1750 1751 1774 1775 1797 1798 2455 2456 2490 2491
2505 2506 2531 2532 2540 2541 2582 2583 2619 2620 2638 2639 2673 2674
2686 2687 2694 2695 2696 2697 2759 2760 2763 2764 2768 2769 2770 2771
2792 2793 2794 2809 2826 2827 2828 2829 2831 2834 2835 2869 2870 2884
2885 2886 2887 2888 2889 2944 2946 2951 2961 2966 2972 2973 2985 2989
2991 3004 3029 3030 3031 3032 3033 3034 3103 3113 3118 3125 3126 3128
3130 3150 3154 3156 3165 3169 3170 3172 3174 3196 3199 3201 3210 3307
3308 3309 3310 3311 3312 3313 3314 3352 3353 3382 3383 3399 3401 3406
3412 3413 3427 3428 3443 3444 3458 3459 3491 3492 3494 3495 3528 3529
3530 3531 3588 3589 3590 3591 3592 3615 3616 3633 3643 3647 3652 3653
3657 3658 3678 3684 3686 3695 3751 3752 3753 3754 3798 3799 3819 3820
3840 3841 3859 3860 3953 3954 3973 3974 3993 3994 4013 4014 4033 4034
4053 4054 4073 4074 4091 4092 4110 4120 4123 4130 4131 4133 4136 4157
4162 4163 4172 4197 4198 4199 4200 4201 4202 4277 4278 4290 4292 4334
4335 4357 4358 4359 4360 4406 4407 4455 4456 4503 4518 4519 4520 4521
4524 4531 4540 4567 4568 4569 4570 4574 4581 4589 4627 4628 4629 4630
4636 4643 4663 4693 4694 4695 4696 4699 4706 4741 4742 4760 4761 4763
4764 4765 4766 4810 4811 4851 4852 4854 4855 4856 4857
AC1 38# 2764 2765 2766 2767 2769 2771 2946 2947 2948 2949 2950 2961 2962
2963 2964 2965 2977 2978 2979 2980 2995 2996 2997 2998 2999 3011 3113
3114 3115 3116 3117 3134 3135 3136 3138 3140 3178 3179 3180 3181 3182
3184 3217 3401 3402 3403 3404 3405 3643 3644 3645 3646 3662 3663 3664
3666 3667 4120 4121 4122 4140 4141 4142 4143 4144 4340 4341 4524 4544
4574 4594 4636 4668 4699
AC2 39# 2776 2953 2954 2955 2956 2957 2958 2959 2960 3105 3106 3107 3108
3109 3110 3111 3112 3189 3190 3191 3229 3400 3405 3635 3636 3637 3638
3639 3640 3641 3642 4112 4113 4114 4115 4116 4117 4118 4119
AC3 40# 2956 2960 2965 3108 3112 3117 3638 3642 3646 4115 4119 4122
ACT 41# 914 915 918 929 931 933 943 945 947 972 974 977 986
988 991 1000 1002 1005 1014 1016 1019 1028 1030 1033 1042 1044 1047
1056 1058 1061 1070 1072 1075 1084 1086 1089 1098 1100 1103 1112 1114
1117 1124 1126 1128 1153 1155 1158 1167 1169 1172 1181 1183 1186 1195
1197 1200 1209 1211 1214 1223 1225 1228 1237 1239 1242 1251 1253 1256
1265 1267 1270 1279 1281 1284 1293 1295 1298 1312 1315 1317 1325 1329
1331 1358 1362 1365 1374 1378 1381 1390 1394 1397 1406 1410 1413 1422
1426 1429 1438 1442 1445 1454 1458 1461 1470 1474 1477 1486 1490 1493
1502 1506 1509 1518 1522 1525 1531 1535 1537 1562 1566 1569 1578 1582
1585 1594 1598 1601 1610 1614 1617 1626 1630 1633 1642 1646 1649 1658
1662 1665 1674 1678 1681 1690 1694 1697 1706 1710 1713 1722 1726 1729
1767 1768 1770 1790 1791 1793 1813 1814 1816 2433 2434 2437 2446 2447
2449 2466 2467 2469 2479 2480 2482 2493 2494 2496 2508 2509 2511 2543
2544 2547 2553 2555 2557 2558 2560 2563 2564 2566 2573 2584 2585 2587
2594 2596 2598 2599 2601 2604 2605 2607 2614 2650 2651 2654 2664 2665
2667 2676 2677 2679 2689 2690 2692 2714 2715 2717 2734 2735 2737 2794
2795 2798 2839 2840 2843 2847 2849 2851 2852 2854 2859 2860 2862 2903
2904 2907 2919 2920 2922 2980 2981 2983 2999 3000 3002 3050 3051 3052
3055 3057 3058 3060 3074 3075 3076 3078 3080 3081 3083 3139 3140 3141
3143 3145 3146 3148 3160 3161 3163 3183 3184 3185 3187 3191 3192 3194
3205 3206 3208 3261 3263 3265 3268 3271 3273 3276 3277 3279 3283 3284 SEQ 0245
3286 3320 3322 3325 3330 3332 3334 3335 3337 3340 3341 3343 3346 3347
3349 3356 3358 3360 3362 3364 3367 3368 3370 3374 3375 3377 3417 3418
3421 3432 3433 3435 3441 3442 3447 3448 3450 3456 3457 3463 3464 3466
3534 3540 3544 3545 3547 3550 3551 3553 3563 3569 3574 3575 3577 3580
3581 3583 3595 3597 3599 3603 3605 3608 3609 3611 3667 3668 3671 3673
3674 3676 3690 3691 3693 3732 3733 3735 3759 3763 3770 3776 3777 3779
3811 3812 3814 3832 3833 3835 3853 3854 3856 3912 3917 4144 4147 4150
4152 4153 4155 4167 4168 4170 4216 4218 4221 4226 4228 4230 4232 4234
4236 4238 4240 4243 4244 4246 4248 4249 4251 4253 4254 4256 4259 4260
4262 4264 4265 4267 4269 4270 4272 4299 4300 4302 4304 4305 4307 4309
4310 4312 4314 4315 4317 4319 4320 4322 4325 4326 4328 4369 4371 4374
4382 4384 4386 4388 4389 4391 4392 4394 4396 4397 4399 4401 4413 4415
4417 4424 4427 4429 4432 4433 4435 4437 4439 4441 4443 4445 4447 4458
4459 4468 4475 4478 4480 4482 4483 4485 4487 4489 4491 4493 4495 4497
4522 4534 4540 4541 4543 4544 4545 4547 4549 4551 4553 4555 4557 4559
4571 4583 4589 4590 4592 4594 4595 4597 4599 4601 4603 4605 4607 4609
4634 4646 4652 4653 4655 4657 4658 4660 4663 4664 4666 4668 4669 4671
4673 4675 4677 4679 4681 4683 4708 4714 4715 4717 4720 4721 4723 4725
4727 4729 4731 4733 4735 4793 4794 4796 4800 4801 4803 4806 4825 4827
4829 4832 4833 4835 4902 4903 4905 4909 4910 4912 4945 4947 4949 4952
4954 4956
ADJRET 2037 2050#
ADJTRP 2036 2044#
ADJTST 2036# 2048
ALTMGO 610#
AMTAB1 2763 2779 2792 2837 2856 5063#
AMTST4 2757# 2805
AMTST5 2762# 2772
AMTST6 2779# 2799 2801 2803
AMTST7 2806 2824# 2850 2855 2863 2867
AMTST8 2837# 2844 2865
AMTST9 2834 2846#
AMTSTA 2845 2865#
AMTSTX 2798 2808#
APR 206 2535 2571 2578 2612 2621 3905 3911 3913 3952 3961 3972 3981 3992
4001 4012 4021 4032 4041 4052 4061 4072 4081 4089 4093 4939
AROV 524# 5660 5677 5694 5976 5993 6010
AROVTP 233# 524# 5476 5489
AROVU 524#
ARSET 1945 1968 1992 2015 2038 2056 2074 2097 2120 2138 2156 2175 2195 2213
2231 2259 2287 2315 2343 2374#
ASHCRE 1967 1982#
ASHCTR 1966 1975#
ASHCTS 1966# 1979 1987
ASHRET 1944 1958#
ASHTRP 1943 1951#
ASHTST 1943# 1955 1963
AST 725#
ATSIN 726#
AWMBEG 5259#
AWMST 5260# 5278 5282
AWMUPC 5260 5273#
AWMUUO 5269 5270 5271# SEQ 0246
AXMBEG 5123#
AXMST 5131# 5139 5145
AXMUPC 5131 5140#
AXMUUO 5118 5130 5135# 5143
AYMBEG 5141 5198#
AYMST 5206# 5217 5223
AYMUPC 5206 5212#
AYMUUO 5196 5205 5210# 5213 5221
AZMBEG 5219 5232#
AZMST 5240# 5249
AZMUPC 5240 5244#
AZMUUO 5229 5239 5242# 5245
BEGEND 606# 6179
BEGIN 31 32 97 100 101 102 103 104 105 537# 7932
BEGIN1 553# 607 898
BELL 729#
BIS 524# 4398 4444 5840 5857 5874 5976 5993 6010
BLT0 3397# 3470
BLT1 3401# 3407 3422
BLT2 3409#
BLT3 3415# 3423
BLT4 3424# 3436
BLT5 3430# 3437
BLT6 3439# 3451
BLT7 3445# 3452
BLT8 3454# 3467
BLT9 3461# 3468
BWERR 5439 5463#
BWMBEG 5415 5427#
BWMST 5436# 5452 5457 5461 5465
BWMUPC 5437 5453#
BWMUUO 5446 5447 5448#
BXERR 5308 5329#
BXMBEG 5281 5293#
BXMST 5305# 5322 5328 5331
BXMUPC 5306 5323#
BXMUUO 5291 5304 5318# 5326
BYERR 5355 5377#
BYMBEG 5324 5340#
BYMST 5352# 5365 5370 5376 5379
BYMUPC 5353 5366#
BYMUUO 5338 5351 5361# 5367 5374
BZERR 5403 5416#
BZMBEG 5372 5388#
BZMST 5400# 5414 5418
BZMUPC 5401 5409#
BZMUUO 5385 5399 5407# 5410
C 1848# 1849 1851 1877# 1878 1880 1911# 1912 1914 1936# 1937 1939 1957# 1960
1962 1981# 1984 1986 2004# 2007 2009 2027# 2030 2032 2086# 2089 2091 2109#
2112 2114 2243# 2246 2248 2251 2253 2271# 2274 2276 2279 2281 2299# 2302
2304 2307 2309 2327# 2330 2332 2335 2337 2354# 2357 2359 2362 2364 5118#
5138 5146# 5160 5168# 5182 5196# 5216 5229# 5248 5257# 5277 5291# 5321 5330
5338# 5364 5369 5378 5385# 5413 5417 5425# 5451 5456 5464 5476# 5492 5499# SEQ 0247
5516 5523# 5539 5549# 5586 5614# 5651 5660# 5697 5705# 5742 5750# 5787 5795#
5832 5840# 5877 5885# 5922 5930# 5967 5976# 6014 6022# 6057 6061 6067 6070#
6076 6113# 6155 6159# 6164 6168# 6174 6215
CCA 524#
CHAIN 280#
CHNOFF 524# 2534
CHNON 524#
CLKU 524#
CLOCKF 592#
CNSFLG 5298 5341 5393 5428 5561 5626 5672 5717 5762 5807 5852 5897 5942 5988
6029 6199# 6199
CNTLC 609#
CNTR 36# 2774 2803
CNTRP 242# 524# 5307 5354 5402 5438 5567 5595 5632 5678 5723 5768 5813 5858
5903 5948 5994 6040 6133
COMCHK 2398#
COMMA 718#
CONSW 593#
COR 42# 912 913 915 918 927 928 933 941 942 945 947 970 971
974 977 984 985 988 991 998 999 1002 1005 1012 1013 1016 1019
1026 1027 1030 1033 1040 1041 1044 1047 1054 1055 1058 1061 1068 1069
1072 1075 1082 1083 1086 1089 1096 1097 1100 1103 1110 1111 1114 1117
1122 1123 1126 1128 1151 1152 1155 1158 1165 1166 1169 1172 1179 1180
1183 1186 1193 1194 1197 1200 1207 1208 1211 1214 1221 1222 1225 1228
1235 1236 1239 1242 1249 1250 1253 1256 1263 1264 1267 1270 1277 1278
1281 1284 1291 1292 1295 1298 1310 1311 1313 1314 1315 1317 1323 1324
1327 1328 1331 1356 1357 1360 1361 1362 1365 1372 1373 1376 1377 1378
1381 1388 1389 1392 1393 1394 1397 1404 1405 1408 1409 1410 1413 1420
1421 1424 1425 1426 1429 1436 1437 1440 1441 1442 1445 1452 1453 1456
1457 1458 1461 1468 1469 1472 1473 1474 1477 1484 1485 1488 1489 1490
1493 1500 1501 1504 1505 1506 1509 1516 1517 1520 1521 1522 1525 1529
1530 1533 1534 1535 1537 1560 1561 1564 1565 1566 1569 1576 1577 1580
1581 1582 1585 1592 1593 1596 1597 1598 1601 1608 1609 1612 1613 1614
1617 1624 1625 1628 1629 1630 1633 1640 1641 1644 1645 1646 1649 1656
1657 1660 1661 1662 1665 1672 1673 1676 1677 1678 1681 1688 1689 1692
1693 1694 1697 1704 1705 1708 1709 1710 1713 1720 1721 1724 1725 1726
1729 1766 1768 1770 1789 1791 1793 1812 1814 1816 2432 2434 2437 2445
2447 2449 2465 2467 2469 2478 2480 2482 2492 2494 2496 2507 2509 2511
2552 2553 2555 2558 2560 2562 2564 2566 2573 2593 2594 2596 2599 2601
2603 2605 2607 2614 2649 2651 2654 2663 2665 2667 2675 2677 2679 2688
2690 2692 2713 2715 2717 2733 2735 2737 2779 2780 2781 2782 2783 2784
2785 2786 2787 2788 2789 2790 2791 2795 2798 2837 2838 2840 2843 2846
2847 2849 2852 2854 2856 2857 2858 2860 2862 2902 2904 2907 2918 2920
2922 2973 2974 2975 2976 2979 2981 2983 2991 2992 2993 2994 2998 3000
3002 3048 3049 3052 3055 3058 3060 3072 3073 3076 3078 3081 3083 3130
3131 3132 3133 3136 3138 3141 3143 3146 3148 3156 3157 3158 3159 3161
3163 3174 3175 3176 3177 3181 3182 3185 3187 3192 3194 3201 3202 3203
3204 3206 3208 3260 3268 3271 3273 3277 3279 3282 3284 3286 3319 3325
3329 3330 3332 3335 3337 3339 3341 3343 3345 3347 3349 3355 3360 3362
3364 3366 3368 3370 3373 3375 3377 3416 3421 3431 3435 3446 3450 3462
3466 3533 3540 3543 3545 3547 3549 3551 3553 3562 3569 3573 3575 3577
3579 3581 3583 3594 3599 3602 3603 3605 3607 3609 3611 3658 3659 3660
3661 3664 3666 3668 3671 3674 3676 3686 3687 3688 3689 3691 3693 3731 SEQ 0248
3733 3735 3763 3768 3770 3775 3777 3779 3810 3812 3814 3831 3833 3835
3852 3854 3856 3911 3917 4136 4137 4138 4139 4142 4143 4147 4150 4153
4155 4163 4164 4165 4166 4168 4170 4204 4221 4225 4226 4228 4231 4232
4234 4237 4238 4240 4242 4244 4246 4249 4251 4254 4256 4258 4260 4262
4265 4267 4270 4272 4298 4300 4302 4305 4307 4310 4312 4315 4317 4320
4322 4324 4326 4328 4362 4371 4374 4380 4382 4383 4384 4386 4387 4389
4391 4393 4394 4396 4398 4399 4401 4408 4415 4417 4422 4424 4426 4427
4429 4431 4433 4435 4438 4439 4441 4444 4445 4447 4457 4458 4466 4468
4473 4475 4477 4478 4480 4483 4485 4488 4489 4491 4494 4495 4497 4523
4534 4539 4541 4543 4545 4547 4550 4551 4553 4556 4557 4559 4571 4583
4588 4590 4592 4595 4597 4600 4601 4603 4606 4607 4609 4635 4646 4651
4653 4655 4658 4660 4662 4664 4666 4669 4671 4674 4675 4677 4680 4681
4683 4708 4713 4715 4717 4719 4721 4723 4726 4727 4729 4732 4733 4735
4792 4794 4796 4799 4801 4803 4806 4826 4827 4829 4831 4833 4835 4901
4903 4905 4908 4910 4912 4946 4947 4949 4953 4954 4956
COUNT 5124# 5124 5140 5144 5148 5162 5166 5170 5184 5188 5199 5218 5222 5302#
5302 5323 5327 5345 5371 5375
CPOPJ 613#
CPOPJ1 611#
CRLF 410 411 713#
CRLF2 414 415 715#
CRY0 524# 5705 5722 5739 5976 5993 6010
CRY1 524# 5750 5767 5784 5976 5993 6010
CSHFLG 772# 869
CSHMEM 773#
CTRP 243# 524# 5315 5568 5598 5633 5679 5724 5769 5814 5859 5904 5949 5995
6048 6135
CYCL60 766#
DCK 524# 5930 5947 5964 5976 5993 6010
DDTLNK 294# 551
DDTSRT 551#
DEBUG 30# 7923 7924
DECVER 4# 10 15 572
DF22F 677#
DFADRE 2137 2150#
DFADTR 2136 2144#
DFADTS 2136# 2148
DFDVRE 2342 2355#
DFDVTR 2341 2348#
DFDVTS 2341# 2352 2360 2365
DFMPRE 2212 2225#
DFMPTR 2211 2219#
DFMPTS 2211# 2223
DFSBRE 2174 2189#
DFSBTR 2173 2183#
DFSBTS 2173# 2187
DIAGMN 540#
DING 266#
DIVRET 2230 2244#
DIVTRP 2229 2237#
DIVTST 2229# 2241 2249 2254
DOLLAR 732#
DSKUPD 577 SEQ 0249
EBIT0 524#
EBIT1 524#
EBIT10 524#
EBIT11 524#
EBIT12 524#
EBIT13 524#
EBIT14 524#
EBIT15 524#
EBIT2 524#
EBIT3 524#
EBIT4 524#
EBIT5 524#
EBIT6 524#
EBIT7 524#
EBIT8 524#
EBIT9 524#
EBRC1A 941# 948
EBRCK0 894 911# 919 1300
EBRCK1 927# 934
EBRCK2 954#
EBRCK3 1122# 1129
EBRCK4 1135#
END 49 50 51 227 7931#
END1 51#
ENDFIX 852#
ENDSLD 7921#
EPPM0 2636# 2740
EPPM1 2649#
EPPM2 2663#
EPPM3 2673#
EPPM4 2686#
EPPM5 2694#
EPPM6 2711# 2718
EPPM7 2731# 2738
EPPM9 2640# 2655 2668 2680 2693
EPPT0 3700#
EPPT1 3714 3719#
EPPT2 3712 3726# 3732
EPPT3 3725 3738#
ERMORE 626#
EROLD 486
ERRPC 597# 888
ERRTLS 598# 897
ERSTOP 269#
EXCASB 28# 575
EXCTRP 2392 2393# 2398
EXIOT 524# 5614 5631 5648
FADRET 2119 2132#
FADTRP 2118 2126#
FADTST 2118# 2130
FDVRET 2286 2300#
FDVRRE 2314 2328#
FDVRTR 2313 2321# SEQ 0250
FDVRTS 2313# 2325 2333 2338
FDVTRP 2285 2293#
FDVTST 2285# 2297 2305 2310
FIXRET 2073 2087#
FIXRRE 2096 2110#
FIXRTR 2095 2103#
FIXRTS 2095# 2107 2115
FIXTRP 2072 2080#
FIXTST 2072# 2084 2092
FMPRET 2194 2207#
FMPTRP 2193 2201#
FMPTST 2193# 2205
FOV 524# 5795 5812 5829 5976 5993 6010
FOVU 524#
FRDLNK 292#
FSBRET 2155 2169#
FSBTRP 2154 2163#
FSBTST 2154# 2167
FSCRET 2055 2068#
FSCTRP 2054 2062#
FSCTST 2054# 2066
FSELNK 291#
FXU 524# 5885 5902 5919 5976 5993 6010
HYPEN 723#
IDIVRE 2258 2272#
IDIVTR 2257 2265#
IDIVTS 2257# 2269 2277 2282
IMULRE 2014 2028#
IMULTR 2013 2021#
IMULTS 2013# 2025 2033
INDX 43# 2762 2763 2772 2775 2779 2792 2801 2833 2837 2856 2865 2943 2950
2953 2957 2967 2971 2977 2986 2988 2996 3005 3102 3105 3109 3119 3120
3127 3134 3145 3151 3153 3160 3166 3171 3179 3190 3197 3198 3205 3211
3223 3398 3407 3415 3416 3417 3423 3430 3431 3432 3437 3445 3446 3447
3452 3461 3462 3463 3468 3632 3635 3639 3648 3649 3656 3662 3673 3679
3683 3690 3696 4109 4112 4116 4124 4125 4132 4140 4152 4158 4161 4167
4173
INHCSH 277#
INHPAG 274#
IOCLR 524#
IOTCM 6024#
IOTCM0 6035# 6058 6062 6068 6077 6081
IOTCM1 6022 6036 6053# 6065 6070 6074 6086
IOTCM2 6041 6060#
IOTCM3 6039 6059 6064#
IOTCMX 6076 6084#
IOTTAB 6035 6092#
ITERAT 114# 570
ITRCH1 630# 4091
ITRCNT 570# 2828
JOB41 524#
JOBAPR 524#
JOBCNI 524# SEQ 0251
JOBDDT 524#
JOBFF 524#
JOBOPC 524#
JOBREL 524#
JOBREN 524#
JOBSA 524#
JOBSYM 524#
JOBTPC 524#
JOBUSY 524#
JOBUUO 524#
JOBVER 524#
KAIFLG 587#
KLFLG 588#
KLUBRX 873# 873 1314 1328 1361 1377 1393 1409 1425 1441 1457 1473 1489 1505
1521 1534 1565 1581 1597 1613 1629 1645 1661 1677 1693 1709 1725
KNTRP 238# 524# 5132 5155 5177 5207 5241 5261 5309 5356 5404 5442 5573 5592
5638 5684 5729 5774 5819 5864 5909 5954 6000 6042
KTRP 239# 524# 5312 5574 5597 5639 5685 5730 5775 5820 5865 5910 5955 6001
6045
LACLK 524#
LACLKE 524#
LAPRAL 524# 4093
LAPRP1 524#
LAPRP2 524# 2535 2578 2621
LAPRP3 524#
LAPRP4 524#
LAPRP5 524#
LAPRP6 524#
LAPRP7 524#
LAROVS 885# 885 1802 1810 1951 1958 1975 1982 1998 2005 2021 2028 2044 2050
2062 2068 2080 2087 2103 2110 2126 2132 2144 2150 2163 2169 2183 2189
2201 2207 2219 2225 2237 2244 2265 2272 2293 2300 2321 2328 2348 2355
LAROVT 127# 140# 884 1798 1803 1811 1952 1959 1976 1983 1999 2006 2022 2029
2045 2051 2063 2069 2081 2088 2104 2111 2127 2133 2145 2151 2164 2170
2184 2190 2202 2208 2220 2226 2238 2245 2266 2273 2294 2301 2322 2329
2349 2356 2382 3509 3841 3860
LAST 6177 6179#
LCHNOF 524# 3904 3914 3962 3982 4002 4022 4042 4062 4082 4088
LCHNON 524# 2622 3951 3971 3991 4011 4031 4051 4071 4094
LCNTRP 152# 3519
LCNTXT 146# 524#
LCNXER 524# 2535 2578 2621
LCPAER 524# 3961 3981 4001 4021 4041 4061 4081 4089
LCPSFT 524#
LCPWRF 524#
LCTRP 153# 3520
LDATAF 524#
LDLNK 293# 540 542
LDNXER 524#
LDPAER 524# 3961 3981 4001 4021 4041 4061 4081 4089
LDPSFT 524#
LDPWRF 524#
LEBXMH 161# 524# SEQ 0252
LEBXML 162# 524#
LENXER 524#
LEPAER 524# 3952 3972 3992 4012 4032 4052 4072
LEPSFT 524#
LEPWRF 524#
LEUPFW 157# 524# 2536 2563 2579 2604 2859 3283 3340 3367 3593 3608 3768 3776
4210 4230 4364 4392 4410 4437 4460 4487 4525 4549 4575 4599 4637 4673
4700 4725 4768 4793 4859 4902 4933 4945 6171
LEXCMP 524#
LFLGCL 524#
LFLGDS 524#
LFLGEN 524#
LFLGST 524#
LFP 727#
LINSTF 524#
LINT 524#
LIOCLR 524# 3905 3913 4089
LIP 247#
LKNTRP 148# 878 3514 3515 3529 3531 3589 3590
LKTRP 149# 3516
LLACBL 524# 1310
LLDUSB 524# 1310 1323 1326 1356 1359 1372 1375 1388 1391 1404 1407 1420 1423
1436 1439 1452 1455 1468 1471 1484 1487 1500 1503 1516 1519 1529 1532
1560 1563 1576 1579 1592 1595 1608 1611 1624 1627 1640 1643 1656 1659
1672 1675 1688 1691 1704 1707 1720 1723 1746 2458 2539 2581 2641 2712
2732 2778 2832 2901 2970 3046 3123 3259 3318 3410 3425 3440 3455 3489
3561 3567 3572 3596 3614 3655 3682 3701 3721 3728 3750 3758 3761 3767
3774 3794 4128 4135 4146 4212 4286 4366 4462 4527 4577 4633 4639 4702
4772 4863 4869 4879 4935 5122 5486 5510 5533 5552 5617 5663 5708 5753
5798 5843 5888 5933 5979 6146 6208
LMBXMH 163# 524#
LMBXML 164# 524#
LMUUO 144# 3544 3574
LMUUOP 145# 3550 3580
LNXMEN 524#
LNXMER 524# 2571 2612
LOOPER 268#
LPAREN 524#
LPARER 524#
LPDOVS 883# 883 1779 1787 2369
LPDOVT 128# 141# 882 1775 1780 1788 2370 2384 3510 3511 3820
LPFWPC 158# 524# 2537 4236 4343 4397 4443 4493 4555 4605 4679 4731 4769 4800
4814 4860 4909 4952
LPGFTR 159# 524# 876 2541 2583 2620 2835 2870 3255 3292 3314 3353 3383 3506
3507 3592 3616 3752 3754 3785 4202 4278 4335 4360 4407 4456 4504 4521
4568 4630 4694 4742 4764 4790 4855 4871 4881 4890 4899 4931 4962 6142
6143
LPICH1 524# 4094
LPICH2 524# 2622
LPICH3 524#
LPICH4 524#
LPICH5 524#
LPICH6 524# SEQ 0253
LPICH7 524#
LPICHA 524#
LPICLR 524# 3904 3914 3962 3982 4002 4022 4042 4062 4082 4088
LPIIP1 524#
LPIIP2 524#
LPIIP3 524#
LPIIP4 524#
LPIIP5 524#
LPIIP6 524#
LPIIP7 524#
LPIOFF 524# 3904 3914 3962 3982 4002 4022 4042 4062 4082 4088
LPION 524# 3951 3971 3991 4011 4031 4051 4071 4094
LPNTRP 154# 3521
LPRCH1 524#
LPRCH2 524#
LPRCH3 524#
LPRCH4 524#
LPRCH5 524#
LPRCH6 524#
LPRCH7 524#
LPRFMH 133# 524#
LPRFML 134# 524#
LPSFT 524#
LPSFTE 524#
LPTRP 155# 3522
LPWRFE 524#
LPWRFL 524#
LREQSE 524#
LRQCLR 524#
LSECMO 524#
LSMODE 524#
LSNTRP 150# 3517
LSNXER 524#
LSPAER 524# 3952 3972 3992 4012 4032 4052 4072
LSPSFT 524#
LSPWRF 524#
LSTRP 151# 3518
LTBASH 131# 524#
LTBASL 132# 524#
LTRP3S 881# 881 1755 1764 3729 4823
LTRP3T 129# 142# 880 1751 1756 1765 3512 3513 3713 3715 3730 3799 4766 4824
4857
LTRPAE 524#
LTRPEN 524# 941 944 973 987 1001 1015 1029 1043 1057 1071 1085 1099 1113
1125 1154 1168 1182 1196 1210 1224 1238 1252 1266 1280 1294 1745 1752
1763 1776 1786 1799 1809 2457 2538 2580 2640 2711 2731 2777 2830 2900
2969 3045 3122 3258 3317 3409 3424 3439 3454 3488 3654 3681 3700 3720
3727 3749 3757 3760 3766 3773 3793 3800 3803 3809 3821 3824 3830 3842
3845 3851 3910 3942 4087 4127 4134 4145 4160 4211 4285 4342 4365 4461
4526 4576 4632 4638 4701 4771 4777 4783 4812 4862 4868 4878 4934 5121
5485 5509 5532 5551 5616 5662 5707 5752 5797 5842 5887 5932 5978 6145
6207
LUSCMP 524# SEQ 0254
LUUO 524#
LUUO1 657 658
LUUO10 657 662
LUUO11 657 662
LUUO12 657 663
LUUO13 657 663
LUUO14 657 664
LUUO15 657 664
LUUO16 657 665
LUUO17 657 665
LUUO2 657 659
LUUO20 657 666
LUUO21 657 666
LUUO22 657 667
LUUO23 657 667
LUUO24 657 668
LUUO25 657 668
LUUO26 657 669
LUUO27 657 669
LUUO3 657 659
LUUO30 657 670
LUUO31 657 670
LUUO32 657 671
LUUO33 657 671
LUUO4 657 660
LUUO5 657 660
LUUO6 657 661
LUUO7 657 661
LUUOI 524# 874 3503
LUUOIS 875# 875
LWRITE 524#
MAPCK0 2371 2431# 2514
MAPCK1 2445#
MAPCK2 2454#
MAPCK3 2465#
MAPCK4 2478#
MAPCK5 2490#
MAPCK6 2505#
MAPCK9 2457# 2470 2483 2497 2512
MAPNEW 678#
MARGIN 600#
MCNVER 3# 10 15 572
MEMLOW 680#
MEMMAP 578
MEMSIZ 681#
MEMTOT 679#
MINUS 722#
MODDVC 276#
MODDVL 31# 475 573
MODDVU 32# 476 574
MODE 5542# 5558 5608# 5623 5654# 5669 5714 5759 5804 5849 5894 5939 5985
MODLNK 295# 537
MONCTL 590# SEQ 0255
MONFLG 589#
MONTEN 591#
MONTYP 804#
MPVU 524#
MTRX 2417#
MTRZ 2416#
MULRET 1991 2005#
MULTRP 1990 1998#
MULTST 1990# 2002 2010
MUU100 5147#
MUU114 5163 5169# 5185
MUUO 236# 524# 5117 5133 5134 5156 5157 5178 5179 5195 5208 5209 5212 5232
5233 5244 5266 5267 5273 5290 5316 5317 5337 5359 5360 5366 5396 5397
5409 5443 5444 5453 5575 5640 5686 5731 5776 5821 5866 5911 5956 6002
6021 6050 6051 6064 6073 6112 6139 6140 6151 6158 6161 6172
MUUOER 879 3588# 3588
MUUOPC 237# 524# 5576 5641 5687 5732 5777 5822 5867 5912 5957 6003
MUUOXA 5146 5153 5158# 5165 5187
MUUOXB 5168 5175 5180#
MUUSTA 5154# 5161 5167
MUUSTB 5176# 5183 5189
MUXPCA 5154 5162#
MUXPCB 5176 5184#
MXFLG 886# 886
NOPNT 264#
NXMU 524#
OPRSEL 278#
OPTIME 692#
OVSTR1 1840 1848 1854 1865 1877 1883 1896 1898# 1898 1911 1922 1924 1936 2415#
P 321 322 323 324 524# 612 6206 6217
P0ARO1 1806 1820#
P0AROV 1797 1808# 1813
P0AROX 1783 1802# 1812
P0PDL 1774 1785# 1790
P0PDLX 1760 1779# 1789
P0TP3 1750 1762# 1767
P0TP3X 1755# 1766
P0TRP0 1744# 1819
P0TRP1 1750# 1771 1794 1817
PAG 524# 913 914 928 929 930 942 943 944 971 972 973 985 986
987 999 1000 1001 1013 1014 1015 1027 1028 1029 1041 1042 1043 1055
1056 1057 1069 1070 1071 1083 1084 1085 1097 1098 1099 1111 1112 1113
1123 1124 1125 1152 1153 1154 1166 1167 1168 1180 1181 1182 1194 1195
1196 1208 1209 1210 1222 1223 1224 1236 1237 1238 1250 1251 1252 1264
1265 1266 1278 1279 1280 1292 1293 1294 1311 1312 1324 1325 1326 1357
1358 1359 1373 1374 1375 1389 1390 1391 1405 1406 1407 1421 1422 1423
1437 1438 1439 1453 1454 1455 1469 1470 1471 1485 1486 1487 1501 1502
1503 1517 1518 1519 1530 1531 1532 1561 1562 1563 1577 1578 1579 1593
1594 1595 1609 1610 1611 1625 1626 1627 1641 1642 1643 1657 1658 1659
1673 1674 1675 1689 1690 1691 1705 1706 1707 1721 1722 1723 1745 1746
1752 1763 1776 1786 1799 1809 2457 2458 2538 2539 2580 2581 2640 2641
2711 2712 2731 2732 2777 2778 2830 2832 2900 2901 2969 2970 3045 3046
3122 3123 3258 3259 3317 3318 3409 3410 3424 3425 3439 3440 3454 3455 SEQ 0256
3488 3489 3561 3567 3572 3596 3614 3654 3655 3681 3682 3700 3701 3720
3721 3727 3728 3749 3750 3757 3758 3760 3761 3766 3767 3773 3774 3793
3794 3800 3803 3809 3821 3824 3830 3842 3845 3851 3910 3942 4087 4127
4128 4134 4135 4145 4146 4160 4211 4212 4285 4286 4342 4365 4366 4461
4462 4526 4527 4576 4577 4632 4633 4638 4639 4701 4702 4771 4772 4777
4783 4812 4862 4863 4868 4869 4878 4879 4934 4935 5121 5122 5485 5486
5509 5510 5532 5533 5551 5552 5616 5617 5662 5663 5707 5708 5752 5753
5797 5798 5842 5843 5887 5888 5932 5933 5978 5979 6145 6146 6207 6208
PAGE1 5305 5352 5400 5436 6038 6204#
PAGRD0 2927 2941#
PAGRD1 2946# 2967
PAGRD2 2952 2966#
PAGRD3 2969# 3007
PAGRD4 2973# 2984 2986
PAGRD5 2988# 3003 3005
PAGRDA 2882# 2925
PAGRDB 2900# 2908
PAGRDC 2918#
PAGRDX 2983 3002 3010#
PAGSET 5299 5342 5394 5429 5562 5627 5673 5718 5763 5808 5853 5898 5943 5989
6030 6197# 6216
PAGSIZ 6182 6197
PALERS 270#
PAREA1 107# 568
PAREA2 108# 569
PAREA3 109# 566
PAREA4 110# 567
PAREA5 111# 579
PAREA6 112# 580
PAREA7 579#
PAREA8 580#
PARU 524#
PASCNT 594# 896
PATCH 7924#
PDISF 689#
PDLOVU 524#
PDOVTP 234# 524# 5499 5513
PDSET 1838 1863 1894 1920 2377#
PDT0 1834# 2403
PDT1 1836# 1846 1852 1858 2367
PDT10 1918# 1930 1934 1940
PDT11 1928#
PDT11A 1918 1923 1932#
PDT12 1919 1937#
PDT2 1836 1844#
PDT3 1837 1849#
PDT4 1869# 1884
PDT4A 1861# 1871 1875 1881 1889
PDT5 1861 1867 1873#
PDT6 1862 1878#
PDT7 1892# 1904 1909 1915
PDT8 1892 1902#
PDT9 1893 1906# SEQ 0257
PERIOD 719#
PFAIL0 2528# 2548 2556 2561 2567 2574 2624
PFAIL1 2540 2552#
PFAIL2 2549 2571#
PFAIL3 2578# 2588 2597 2602 2608 2615
PFAIL4 2582 2593#
PFAIL5 2589 2612#
PFAIL6 2619#
PFBLT0 4195# 4332
PFBLT1 4204# 4222 4274
PFBLT2 4218# 4237
PFBLT3 4201 4225# 4330
PFBLT4 4277#
PFBLT5 4277 4340#
PFBYT0 4336 4355# 4501
PFBYT1 4362# 4375 4403
PFBYT2 4371# 4398
PFBYT3 4359 4380#
PFBYT4 4406# 4418 4449
PFBYT5 4415# 4444
PFBYT6 4406 4422#
PFBYT7 4455# 4469 4499
PFBYT8 4466# 4494
PFBYT9 4455 4473#
PFDMM0 4625# 4739
PFDMM1 4632# 4647 4685
PFDMM2 4643# 4680
PFDMM3 4629 4651#
PFDMM4 4693# 4709 4737
PFDMM5 4706# 4732
PFDMM6 4693 4713#
PFDMV0 4516# 4613
PFDMV1 4522# 4535 4561
PFDMV2 4531# 4556
PFDMV3 4520 4539#
PFDMV4 4567# 4584 4611
PFDMV5 4581# 4606
PFDMV6 4567 4588#
PFIO0 4925# 4959
PFIO1 4933# 4943 4944 4950 4957
PFIO2 4939# 4953
PFIO3 4930 4945#
PFSTRT 546#
PFT0 3214 3246# 3289
PFT1 3257# 3269 3274 3280 3287
PFT2 3254 3271#
PFT3 3270 3291#
PGFAIL 877# 877 2619 2869 3291 3382 3615 3784 4334 4503 4741 4789 4870 4880
4889 4898 4961
PGMEND 29# 7930
PGMNAM 571 855#
PGR400 2886 2902 2903 2929#
PGR777 2888 2918 2919 2930# SEQ 0258
PGRDTB 49# 2950 2953 2957 2977 2995
PGW400 3031 3047 3049 3051 3057 3090# 3251 3257 3263 3265 3282 3309 3316 3321
3322 3339 3346
PGW777 3033 3071 3073 3075 3080 3091# 3311 3354 3357 3358 3366 3374
PGWRT0 3088 3100# 3213
PGWRT1 3105# 3120
PGWRT2 3122# 3164
PGWRT3 3130# 3144 3149 3151
PGWRT4 3153# 3166
PGWRT5 3168# 3209
PGWRT6 3174# 3188 3195 3197
PGWRT7 3198# 3211
PGWRTA 3008 3027# 3086
PGWRTB 50# 3105 3109 3124 3125 3126 3134 3145 3160 3168 3169 3170 3178 3189
3205 3223 3635 3639 3651 3652 3653 3662 3673 3690 4112 4116 4129 4130
4131 4140 4152 4167
PGWRTC 3071# 3079 3084
PGWRTX 3143 3148 3187 3216# 3671 4150
PGWRTY 3163 3208 3222# 3676 3693 4155 4170
PGWRTZ 3194 3228#
PGWTBB 3045# 3056 3061
PI 2534 2622 3904 3912 3914 3951 3962 3971 3982 3991 4002 4011 4022 4031
4042 4051 4062 4071 4082 4088 4094
PICHN1 524#
PICHN2 524# 2534
PICHN3 524#
PICHN4 524#
PICHN5 524#
PICHN6 524#
PICHN7 524#
PICHNA 524#
PICLR 524#
PIOFF 524#
PION 524#
PLIST 758# 758
PLISTE 758 760#
PLISTS 759#
PLUS 724#
PNTENB 688#
PNTEXT 567#
PNTFLG 687#
PNTINH 690#
PNTLPT 265#
PNTNAM 566#
PNTRP 244# 524# 5310 5358 5406 5440 5569 5593 5634 5680 5725 5770 5815 5860
5905 5950 5996 6043 6136
PNTSPC 691#
PTRP 245# 524# 5314 5570 5599 5635 5681 5726 5771 5816 5861 5906 5951 5997
6047 6137
PVPAGI 785# 870
QUEST 730#
RADIX 733#
RADLSC 735# SEQ 0259
RADLSP 734#
RANDBS 568#
REENTR 548#
RELIAB 272# 891
REPT 122 524# 911 1309 1744 1834 2431 2528 2636 2757 2824 2882 2941 2942
3027 3100 3101 3246 3305 3397 3487 3630 3631 3748 3792 3878 3879 4107
4108 4195 4355 4516 4625 4758 4849 4925
REPT1 524#
REPTU 646#
REQSET 524#
RESRT1 96 623#
RESRT2 624#
RETO 2379 2405 2410#
RETURN 555#
RLARO1 3848 3863#
RLAROV 3840 3850# 3853
RLAROX 3845# 3852
RLBAS0 3487# 3617
RLBAS1 3528#
RLBAS2 3533# 3541 3548 3554
RLBAS3 3561# 3570 3578 3584
RLBAS4 3588#
RLBAS5 3614#
RLBAS6 3630# 3724 3736 3738
RLBMU0 3537# 3549
RLBMU1 3528 3543#
RLBMU2 3566# 3579
RLBMU3 3530 3572#
RLEPM0 4107# 4175
RLEPM1 4112# 4125
RLEPM2 4127# 4171
RLEPM3 4136# 4151 4156 4158
RLEPM4 4160# 4173
RLIERR 3895 3909#
RLINT0 3878#
RLINT1 3904# 3918 4085
RLINT2 3906 3942#
RLINT3 3945#
RLINT4 3965#
RLINT5 3985#
RLINT6 4005#
RLINT7 4025#
RLINT8 4045#
RLINT9 4065#
RLINTA 4087#
RLITR1 3880 4077#
RLITR2 3882 4057#
RLITR3 3884 4037#
RLITR4 3886 4017#
RLITR5 3888 3997#
RLITR6 3890 3977#
RLITR7 3892 3957#
RLPDL 3819 3829# 3832 SEQ 0260
RLPDL1 3827 3837#
RLPDLX 3824# 3831
RLPF1 3593# 3600 3606 3612
RLPFL 3591 3602#
RLPFT0 3748# 3782
RLPFT1 3751 3773#
RLPFT2 3753 3766#
RLPFT3 3759# 3780
RLPFT4 3764 3771 3784#
RLTP3 3798 3808# 3811
RLTP3X 3803# 3810
RLTP4 3806 3816#
RLTRP0 3792# 3862
RLTRP1 3798# 3815 3836 3857
RLWRT1 3635# 3649
RLWRT2 3651# 3672 3677 3694
RLWRT3 3658# 3679
RLWRT4 3681# 3696
RPEAT 893# 893 911 1309 1744 1834 2431 2528 2636 2757 2882 2941 3027 3100
3246 3305 3397 3487 3630 3748 3792 3878 4107 4195 4355 4516 4625 4758
4849 4925
RSTART 261#
RTP 728#
RUNFLG 595#
SADR1 95# 544
SADR10 104# 560
SADR11 105# 561
SADR2 96# 546
SADR3 97# 548
SADR4 98#
SADR5 99# 609
SADR6 100# 610
SADR7 101# 557
SADR8 102# 558
SADR9 103# 559
SBINIT 334 554#
SCOPE 647# 887 5120# 5120
SFSRT1 95 896#
SFSTRT 544#
SHTRP 2380 2400 2402 2409#
SLASH 731#
SM10 835#
SNTRP 240# 524# 5311 5357 5405 5441 5571 5594 5636 5682 5727 5772 5817 5862
5907 5952 5998 6044
SPACE 720#
SRTDDT 98 550#
START 538 867#
START1 557#
START2 558#
START3 559#
START4 560#
START5 561#
STARTA 553 887# SEQ 0261
STMUUO 4964 5120#
STRP 241# 524# 5313 5572 5596 5637 5683 5728 5773 5818 5863 5908 5953 5999
6046
SUBLNK 296# 554
SWPTAB 841#
SWTEXR 569#
SYSEXR 542#
T 902# 918 933 947 977 991 1005 1019 1033 1047 1061 1075 1089 1103
1117 1128 1158 1172 1186 1200 1214 1228 1242 1256 1270 1284 1298 1317
1331 1365 1381 1397 1413 1429 1445 1461 1477 1493 1509 1525 1537 1569
1585 1601 1617 1633 1649 1665 1681 1697 1713 1729 1738# 1759 1770 1782
1793 1805 1816 1845 1851 1857 1870 1874 1880 1888 1903 1908 1914 1929
1933 1939 1954 1962 1978 1986 2001 2009 2024 2032 2047 2065 2083 2091
2106 2114 2129 2147 2166 2186 2204 2222 2240 2248 2253 2268 2276 2281
2296 2304 2309 2324 2332 2337 2351 2359 2364 2402 2421# 2437 2449 2469
2482 2496 2511 2519# 2547 2555 2560 2566 2573 2587 2596 2601 2607 2614
2630# 2654 2667 2679 2692 2717 2737 2751# 2798 2818# 2843 2849 2854 2862
2876# 2907 2922 2983 3002 3021# 3055 3060 3078 3083 3143 3148 3163 3187
3194 3208 3236# 3268 3273 3279 3286 3299# 3325 3332 3337 3343 3349 3360
3364 3370 3377 3391# 3421 3435 3450 3466 3481# 3540 3547 3553 3569 3577
3583 3599 3605 3611 3624# 3671 3676 3693 3723 3735 3763 3770 3779 3805
3814 3826 3835 3847 3856 3872# 3917 4101# 4150 4155 4170 4189# 4221 4228
4234 4240 4246 4251 4256 4262 4267 4272 4302 4307 4312 4317 4322 4328
4349# 4374 4382 4386 4391 4396 4401 4417 4424 4429 4435 4441 4447 4468
4475 4480 4485 4491 4497 4510# 4534 4543 4547 4553 4559 4583 4592 4597
4603 4609 4619# 4646 4655 4660 4666 4671 4677 4683 4708 4717 4723 4729
4735 4752# 4780 4785 4796 4803 4817 4829 4835 4843# 4874 4883 4892 4905
4912 4919# 4942 4949 4956 5115# 5138 5160 5182 5193# 5216 5227# 5248 5254#
5277 5288# 5321 5330 5335# 5364 5369 5378 5383# 5413 5417 5422# 5451 5456
5464 5474# 5492 5497# 5516 5521# 5539 5580 5586 5645 5651 5691 5697 5736
5742 5781 5787 5826 5832 5871 5877 5916 5922 5961 5967 6007 6014 6019#
6057 6061 6067 6076 6109# 6155 6164 6174 6215
TAB 721#
TESTPC 596# 868 910 926 940 953 1134 1308 1337 1743 1833 2430 2527 2635
2756 2823 2881 2940 3026 3099 3245 3304 3396 3486 3629 3747 3791 3877
4106 4194 4354 4515 4624 4757 4848 4924 5127 5151 5173 5202 5236 5264
5295 5348 5390 5433 5481 5505 5528 5555 5620 5666 5711 5756 5801 5846
5891 5936 5982 6026 6118
TICKS 599#
TIPF0 4758# 4781 4786 4797 4804 4830 4836 4838
TIPF1 4777#
TIPF10 4818 4849# 4875 4876 4884 4885 4893 4894 4906 4913 4915
TIPF11 4868#
TIPF12 4854 4898#
TIPF14 4856 4888#
TIPF1X 4866 4878# 4901 4908
TIPF2 4763 4789#
TIPF3 4807 4810#
TIPF4 4765 4792 4822# 4832
TIPF5 4825 4826# 4826
TIPFX 4775 4783# 4799 4810 4831
TN0 53# 248# 524# 1754 1778 3707 3802 3823 4775 4799 4866 4908 5511 5534
TN1 54# 249# 524# 1754 1801 3707 3802 3844 4775 4799 4866 4908 5487 5534 SEQ 0262
TOTALS 262#
TPLST 6186 6191#
TRAP0 5460 5462 5478#
TRAP0A 5485# 5493
TRAP1 5502#
TRAP1A 5509# 5517
TRAP2A 5534# 5540
TRAPST 204 6184# 6189
TRINST 2387 2392#
TRP02 5525#
TRP3TP 235# 524# 5523 5536
TRPLOC 2385 2388 2396 2412#
TRPSAV 2389 2395 2411#
TRPTYP 2374 2377 2383 2413#
TSTWD 1842 1855 1857 1897# 1897 1906 1908 2414#
TTNBRF 779#
TTYFIL 695#
TTYSPD 696#
TXTINH 273#
UBAVEC 524#
UBLT 6082 6115#
UBLT3 6116#
UBLT4 6120# 6156 6165 6175
UBLT5 6132 6151#
UBLT6 6134 6171#
UBLT7 6166 6177#
UBRCK0 1309# 1318 1731
UBRCK1 1323# 1332
UBRCK2 1338#
UBRCK3 1529# 1538
UBRCK4 1542#
UEXT 5591 5604#
UPMP 227 227# 5290 5307 5309 5310 5311 5312 5313 5314 5315 5316 5317 5337
5354 5356 5357 5358 5359 5360 5366 5396 5397 5402 5404 5405 5406 5409
5438 5440 5441 5442 5443 5444 5453 5567 5568 5569 5570 5571 5572 5575
5576 5592 5593 5594 5595 5596 5597 5598 5599 5632 5633 5634 5635 5636
5637 5640 5641 5678 5679 5680 5681 5682 5683 5686 5687 5723 5724 5725
5726 5727 5728 5731 5732 5768 5769 5770 5771 5772 5773 5776 5777 5813
5814 5815 5816 5817 5818 5821 5822 5858 5859 5860 5861 5862 5863 5866
5867 5903 5904 5905 5906 5907 5908 5911 5912 5948 5949 5950 5951 5952
5953 5956 5957 5994 5995 5996 5997 5998 5999 6002 6003 6021 6040 6042
6043 6044 6045 6046 6047 6048 6050 6051 6064 6073 6112 6120 6123 6133
6135 6136 6137 6139 6140 6142 6143 6146 6151 6158 6161 6171 6172 6202
6208
USER 586#
USERF 524# 5549 5566 5583 5605 6149 6159 6162 6205 6210 6213
USRASB 576
USRCRF 705#
USREXT 5602#
USRLFF 704#
USRRTN 5591#
UUODIS 658#
UUOEXT 614# SEQ 0263
UUORTN 615#
UUOSKP 612#
WRTP0 3305# 3380
WRTP1 3316# 3326 3327 3333 3338 3344 3350 3365 3371 3378
WRTP2 3345#
WRTP3 3352# 3361
WRTP4 3373#
WRTPF 3313 3329#
WRTPF1 3352 3362#
XAC0 6185# 6185 6188
XX 949# 968 968# 969 969# 970 982 982# 983 984 996 996# 997 998
1010 1010# 1011 1012 1024 1024# 1025 1026 1038 1038# 1039 1040 1052 1052#
1053 1054 1066 1066# 1067 1068 1080 1080# 1081 1082 1094 1094# 1095 1096
1108 1108# 1109 1110 1130# 1149 1149# 1150 1150# 1151 1163 1163# 1164 1165
1177 1177# 1178 1179 1191 1191# 1192 1193 1205 1205# 1206 1207 1219 1219#
1220 1221 1233 1233# 1234 1235 1247 1247# 1248 1249 1261 1261# 1262 1263
1275 1275# 1276 1277 1289 1289# 1290 1291 1333# 1354 1354# 1355 1355# 1356
1370 1370# 1371 1372 1386 1386# 1387 1388 1402 1402# 1403 1404 1418 1418#
1419 1420 1434 1434# 1435 1436 1450 1450# 1451 1452 1466 1466# 1467 1468
1482 1482# 1483 1484 1498 1498# 1499 1500 1514 1514# 1515 1516 1540# 1558
1558# 1559 1559# 1560 1574 1574# 1575 1576 1590 1590# 1591 1592 1606 1606#
1607 1608 1622 1622# 1623 1624 1638 1638# 1639 1640 1654 1654# 1655 1656
1670 1670# 1671 1672 1686 1686# 1687 1688 1702 1702# 1703 1704 1718 1718#
1719 1720
$$MUUO 810#
$$OUTE 816#
$$TAX1 828#
$$TAX2 829#
$$TOGG 822#
$$UUO 799#
$ACC0 637#
$BEND1 607#
$BEND2 99 608#
$CHRIN 698#
$CRLF 700#
$DEVCH 524#
$DSKUP 577#
$DVOFF 694#
$EMODE 575#
$FFF 702#
$IBUF 750#
$INEXT 752#
$INNM 751#
$ITRHL 618#
$ITRX1 619#
$LPAPE 6223
$MMAP 578#
$MODVL 573#
$MODVU 574#
$OBUF 741#
$ONETM 601#
$OUTEX 743#
$OUTNM 742# SEQ 0264
$PAPER 524
$PARER 625#
$PNAME 571#
$PSHER 629#
$PVER 572#
$RSRTX 621#
$RSRTY 622#
$SPAG1 641#
$START 538#
$SVAPR 639#
$SVPAG 640#
$SVPI 638#
$SVUPC 644#
$SVUUO 643#
$TABF 701#
$TTCHR 697#
$TWCNT 693#
$TYPNB 699#
$UMODE 576#
$UORTX 616#
$USRHL 620#
$UUOER 617# 658
$VTF 703#
%ACTFL 650#
%ACTUL 651#
%COREC 649#
%CORFL 648#
%DISCR 652#
%ERHI1 791#
%ERHI2 792#
%ERHI3 793#
..0001 5549 5566 5582#
..0002 5551# 5581 5587
..0003 5565 5577#
..0004 5614 5631 5647#
..0005 5616# 5646 5652
..0006 5630 5642#
..0007 5660 5677 5693#
..0010 5662# 5692 5698
..0011 5676 5688#
..0012 5705 5722 5738#
..0013 5707# 5737 5743
..0014 5721 5733#
..0015 5750 5767 5783#
..0016 5752# 5782 5788
..0017 5766 5778#
..0020 5795 5812 5828#
..0021 5797# 5827 5833
..0022 5811 5823#
..0023 5840 5857 5873#
..0024 5842# 5872 5878
..0025 5856 5868#
..0026 5885 5902 5918# SEQ 0265
..0027 5887# 5917 5923
..0030 5901 5913#
..0031 5930 5947 5963#
..0032 5932# 5962 5968
..0033 5946 5958#
..0034 5976 5993 6009#
..0035 5978# 6008 6015
..0036 5992 6004#
.JB41 524#
.JBAPR 524#
.JBCNI 524#
.JBDDT 524#
.JBFF 524#
.JBOPC 524#
.JBREL 524#
.JBREN 524#
.JBSA 524#
.JBSYM 524#
.JBTPC 524#
.JBUSY 524#
.JBUUO 524#
.JBVER 524#
APRID 524#
BCIO 524# SEQ 0266
BCIOB 524#
BSIO 524#
BSIOB 524#
CFLUSH 446#
CINVAL 445#
CLOKOP 440#
CLRPT 524#
CWRTBI 447#
DROPDV 407#
ENDUUO 453# 606
EOPUUO 454# 608
ERLOOP 494# 919 934 948 978 992 1006 1020 1034 1048 1062 1076 1090 1104
1118 1129 1159 1173 1187 1201 1215 1229 1243 1257 1271 1285 1299 1318
1332 1366 1382 1398 1414 1430 1446 1462 1478 1494 1510 1526 1538 1570
1586 1602 1618 1634 1650 1666 1682 1698 1714 1730 1771 1794 1817 1846
1852 1858 1871 1875 1881 1889 1904 1909 1915 1930 1934 1940 1955 1963
1979 1987 2002 2010 2025 2033 2048 2066 2084 2092 2107 2115 2130 2148
2167 2187 2205 2223 2241 2249 2254 2269 2277 2282 2297 2305 2310 2325
2333 2338 2352 2360 2365 2403 2438 2450 2470 2483 2497 2512 2548 2556
2561 2567 2574 2588 2597 2602 2608 2615 2655 2668 2680 2693 2718 2738
2799 2844 2850 2855 2863 2908 2923 2984 3003 3056 3061 3079 3084 3144
3149 3164 3188 3195 3209 3269 3274 3280 3287 3326 3333 3338 3344 3350
3365 3371 3378 3422 3436 3451 3467 3541 3548 3554 3570 3578 3584 3600
3606 3612 3672 3677 3694 3724 3736 3780 3815 3836 3857 4151 4156 4171
4274 4330 4403 4449 4499 4561 4611 4685 4737 4797 4804 4830 4836 4875
4884 4893 4906 4913 4943 4950 4957 5581 5587 5646 5652 5692 5698 5737
5743 5782 5788 5827 5833 5872 5878 5917 5923 5962 5968 6008 6015
ERLP1 495#
ERLP2 496# 5139 5161 5183 5217 5249 5278 5322 5331 5365 5370 5379 5414 5418
5452 5457 5465 5493 5517 5540 6058 6062 6068 6077 6156 6165 6175 6216
ERRHLT 341#
ERROR 503# 916 932 946 975 989 1003 1017 1031 1045 1059 1073 1087 1101
1115 1127 1156 1170 1184 1198 1212 1226 1240 1254 1268 1282 1296 1316
1330 1363 1379 1395 1411 1427 1443 1459 1475 1491 1507 1523 1536 1567
1583 1599 1615 1631 1647 1663 1679 1695 1711 1727 1769 1792 1815 1844
1850 1856 1869 1873 1879 1887 1902 1907 1913 1928 1932 1938 1953 1961
1977 1985 2000 2008 2023 2031 2046 2064 2082 2090 2105 2113 2128 2146
2165 2185 2203 2221 2239 2247 2252 2267 2275 2280 2295 2303 2308 2323
2331 2336 2350 2358 2363 2401 2435 2448 2468 2481 2495 2510 2545 2554
2559 2565 2572 2586 2595 2600 2606 2613 2652 2666 2678 2691 2716 2736
2796 2841 2848 2853 2861 2905 2982 3001 3053 3059 3077 3082 3142 3147
3162 3186 3193 3207 3266 3272 3278 3285 3323 3331 3336 3342 3348 3363
3369 3376 3419 3434 3449 3465 3538 3546 3552 3568 3576 3582 3598 3604
3610 3669 3675 3692 3722 3734 3813 3834 3855 4148 4154 4169 4795 4802
4828 4834 4872 4882 4891 4904 4911 4940 4948 4955 5578 5584 5643 5649
5689 5695 5734 5740 5779 5785 5824 5830 5869 5875 5914 5920 5959 5965
6005 6012
ERROR1 514# 1757 1781 1804 2921 3359 3762 3769 3778 3804 3825 3846 3915 4219
4227 4233 4239 4245 4250 4255 4261 4266 4271 4301 4306 4311 4316 4321
4327 4372 4381 4385 4390 4395 4400 4416 4423 4428 4434 4440 4446 4467
4474 4479 4484 4490 4496 4532 4542 4546 4552 4558 4582 4591 4596 4602
4608 4644 4654 4659 4665 4670 4676 4682 4707 4716 4722 4728 4734 4778
4784 4816 5136 5159 5181 5214 5246 5275 5319 5329 5362 5368 5377 5411 SEQ 0267
5416 5449 5455 5463 5490 5514 5537 6055 6060 6066 6075 6153 6163 6173
6214
ERUUO 493# 918 933 947 977 991 1005 1019 1033 1047 1061 1075 1089 1103
1117 1128 1158 1172 1186 1200 1214 1228 1242 1256 1270 1284 1298 1317
1331 1365 1381 1397 1413 1429 1445 1461 1477 1493 1509 1525 1537 1569
1585 1601 1617 1633 1649 1665 1681 1697 1713 1729 1759 1770 1782 1793
1805 1816 1845 1851 1857 1870 1874 1880 1888 1903 1908 1914 1929 1933
1939 1954 1962 1978 1986 2001 2009 2024 2032 2047 2065 2083 2091 2106
2114 2129 2147 2166 2186 2204 2222 2240 2248 2253 2268 2276 2281 2296
2304 2309 2324 2332 2337 2351 2359 2364 2402 2437 2449 2469 2482 2496
2511 2547 2555 2560 2566 2573 2587 2596 2601 2607 2614 2654 2667 2679
2692 2717 2737 2798 2843 2849 2854 2862 2907 2922 2983 3002 3055 3060
3078 3083 3143 3148 3163 3187 3194 3208 3268 3273 3279 3286 3325 3332
3337 3343 3349 3360 3364 3370 3377 3421 3435 3450 3466 3540 3547 3553
3569 3577 3583 3599 3605 3611 3671 3676 3693 3723 3735 3763 3770 3779
3805 3814 3826 3835 3847 3856 3917 4150 4155 4170 4221 4228 4234 4240
4246 4251 4256 4262 4267 4272 4302 4307 4312 4317 4322 4328 4374 4382
4386 4391 4396 4401 4417 4424 4429 4435 4441 4447 4468 4475 4480 4485
4491 4497 4534 4543 4547 4553 4559 4583 4592 4597 4603 4609 4646 4655
4660 4666 4671 4677 4683 4708 4717 4723 4729 4735 4780 4785 4796 4803
4817 4829 4835 4874 4883 4892 4905 4912 4942 4949 4956 5138 5160 5182
5216 5248 5277 5321 5330 5364 5369 5378 5413 5417 5451 5456 5464 5492
5516 5539 5580 5586 5645 5651 5691 5697 5736 5742 5781 5787 5826 5832
5871 5877 5916 5922 5961 5967 6007 6014 6057 6061 6067 6076 6155 6164
6174 6215
FATAL 340#
FLGTST 167# 5544 5609 5655 5700 5745 5790 5835 5880 5925 5970
FRD36 482#
FRD8 483#
FREAD 481#
FSELEC 480#
GET 324# 2404
GO 321# 1838 1863 1894 1920 1945 1968 1992 2015 2038 2056 2074 2097 2120
2138 2156 2175 2195 2213 2231 2259 2287 2315 2343 5299 5305 5342 5352
5394 5400 5429 5436 5562 5627 5673 5718 5763 5808 5853 5898 5943 5989
6030 6038
HALT 101 102 103 104 105 326# 627 3955 3975 3995 4015 4035 4055 4075
5211 5243 5272 5408 5603 5606 6100 6103 6113 6129 6150 6152
JEN 328# 6101
JRSTF 327# 1753 1777 1800 2405 3535 3564 3705 3801 3822 3843 4213 4287 4343
4367 4411 4463 4528 4578 4640 4703 4774 4814 4865 4936 5488 5512 5535
6148 6209
MAP 47# 2433 2446 2466 2479 2493 2508 2650 2664 2676 2689 2714 2734 2794
MAPADR 463#
MAPCNK 464#
MAPMEM 460#
MAPPNT 466#
MAPSET 465#
MEMSEG 462#
MEMZRO 461#
MODPCP 473#
MODPCU 472#
MOVMEM 208# SEQ 0268
MTROP 441#
NAME 7# 10
PAGECN 213# 5297 5340 5392 5427 5560 5625 5671 5716 5761 5806 5851 5896 5941
5987 6028
PAGEPN 217#
PBELL 416#
PCRL 410# 2811 3013 3219 3225 3231 6088
PCRL2 414#
PCRL2F 415#
PCRLF 411#
PFORCE 418#
PGMINT 334# 871
PJRST 325#
PMSG 420# 6084
PMSGF 423#
PNT1 376#
PNT11 390#
PNT11F 391#
PNT1F 377#
PNT2 378#
PNT2F 379#
PNT3 380#
PNT3F 381#
PNT4 382#
PNT4F 383#
PNT5 384#
PNT5F 385#
PNT6 386# 2810 3012 3218 3224 3230
PNT6F 387#
PNT7 388#
PNT7F 389#
PNTA 362#
PNTADF 393#
PNTADR 392#
PNTAF 363#
PNTAL 364#
PNTALF 365#
PNTCHF 375#
PNTCHR 374#
PNTCI 372#
PNTCIF 373#
PNTCW 408#
PNTCWF 409#
PNTDCF 401#
PNTDEC 400#
PNTDS 402#
PNTDSF 403#
PNTHW 396# 6087
PNTHWF 397#
PNTMSF 369#
PNTMSG 368#
PNTNM 404#
PNTOCF 399# SEQ 0269
PNTOCS 398#
PNTOCT 394#
PNTOTF 395#
PNTSIX 405#
PNTSXF 406#
PSIXL 366#
PSIXLF 367#
PSIXM 370# 2808 3010 3216 3222 3228 6085
PSIXMF 371#
PSP 412#
PSPF 413#
PUT 323# 2394
RDAPR 524#
RDCSB 524#
RDCSTM 524#
RDEBR 524#
RDHSB 524#
RDINT 524#
RDIO 524#
RDIOB 524#
RDPI 524#
RDPUR 524#
RDSPB 524#
RDTIM 524#
RDUBR 524#
REPTLP 122# 1300 1731 1819 2367 2514 2624 2740 2805 2867 2925 3007 3086 3213
3289 3380 3470 3617 3738 3782 3862 4085 4175 4332 4501 4613 4739 4838
4915 4959
REPTUO 497#
RESET 206# 5483 5507 5530
RLITRC 3935# 3957 3977 3997 4017 4037 4057 4077
RLITRX 3922# 3945 3965 3985 4005 4025 4045 4065
RTN 322# 614 2390 2812 3014 3220 3226 3232 6089
S 123 125 136 138 252# 254 258 287 289 298 301 316 317 319
330 332 336 338 343 347 489 491 524 529 535 562 564 582
584 602 604 633 635 653 655 673 675 683 685 706 711 737
739 746 748 754 756 762 764 768 770 775 777 781 783 787
789 795 797 800 802 806 808 812 814 818 820 824 826 831
833 837 839 843 845 847 849
SIXBTZ 429# 902 1738 2421 2519 2630 2751 2808 2818 2876 3010 3021 3216 3222
3228 3236 3299 3391 3481 3624 3872 4101 4189 4349 4510 4619 4752 4843
4919 5115 5193 5227 5254 5288 5335 5383 5422 5474 5497 5521 6019 6109
SUBTST 118# 908 924 938 951 1132 1306 1335 1741 1831 2428 2525 2633 2754
2821 2879 2938 3024 3097 3243 3302 3394 3484 3627 3745 3789 3875 4104
4192 4352 4513 4622 4755 4846 4922
SWITCH 435# 889
TIOE 524#
TIOEB 524#
TION 524#
TIONB 524#
TNSET 222# 5125 5149 5171 5200 5234 5262 5293 5346 5388 5431 5479 5503 5526
5553 5618 5664 5709 5754 5799 5844 5889 5934 5980 6024 6116
TRPSET 204# 5484 5508 5531 SEQ 0270
TTALTM 356#
TTICHR 349#
TTICLR 359#
TTICNV 354#
TTIDEC 353#
TTINO 351#
TTIOCT 352#
TTIYES 350#
TTLOOK 355#
TTSIXB 357#
TTYINP 358#
WRAPR 524#
WRCSB 524#
WRCSTM 524#
WREBR 524#
WRHSB 524#
WRINT 524#
WRIO 524#
WRIOB 524#
WRPI 524#
WRPUR 524#
WRSPB 524#
WRTIM 524#
WRUBR 524#
ADD 3499 6201
ADDI 2767 2955 2959 2964 2979 2998 3107 3111 3116 3118 3136 3181 3404 3406 SEQ 0271
3637 3641 3645 3647 3664 4114 4118 4123 4142 5279 5458
ADDM 5143 5165 5187 5221 5326 5374
ANDI 2978 2997 3135 3180 3663 4141
AOBJN 2772 2801 2865 2967 2986 3005 3120 3151 3166 3197 3211 3407 3423 3437
3452 3468 3501 3649 3679 3696 4125 4158 4173 6124 6203
AOS 612 2966 2985 3119 3150 3165 3210 3648 3678 3695 4124 4157 4172 6079
ASCII 713 715 718 719 720 721 723 724 725 726 727 728 730 731
732
ASCIZ 855
ASH 1949
ASHC 1973
BLKI 6099
BLKO 6098
BLOCK 681 741 744 750 753 759 7924
BLT 2456 2532 2639 2760 2827 2885 3030 3126 3170 3249 3308 3413 3428 3444
3459 3492 3495 3653 4131 4198 4218 4292 4358 4519 4628 4761 4852 4928
6128 6187
BYTE 729
CAIE 5245 5410 5489 5513 5536 6074 6080
CAIGE 2766 2963 3115 3403
CAME 915 945 974 988 1002 1016 1030 1044 1058 1072 1086 1100 1114 1126
1155 1169 1183 1197 1211 1225 1239 1253 1267 1281 1295 1315 1362 1378
1394 1410 1426 1442 1458 1474 1490 1506 1522 1535 1566 1582 1598 1614
1630 1646 1662 1678 1694 1710 1726 1768 1791 1814 1849 1855 1878 1886
1906 1912 1937 1960 1984 2007 2030 2089 2112 2246 2251 2274 2279 2302
2307 2330 2335 2357 2362 2400 2434 2447 2467 2480 2494 2509 2553 2558
2564 2594 2599 2605 2651 2665 2677 2690 2715 2735 2795 2847 2852 2860
2904 2920 2981 3000 3052 3058 3076 3081 3141 3146 3161 3185 3192 3206
3271 3277 3284 3330 3335 3341 3347 3362 3368 3375 3418 3433 3448 3464
3545 3551 3575 3581 3603 3609 3668 3674 3691 3733 3777 3812 3833 3854
4147 4153 4168 4226 4232 4238 4244 4249 4254 4260 4265 4270 4300 4305
4310 4315 4320 4326 4384 4389 4394 4399 4427 4433 4439 4445 4478 4483
4489 4495 4541 4545 4551 4557 4590 4595 4601 4607 4653 4658 4664 4669
4675 4681 4715 4721 4727 4733 4794 4801 4806 4827 4833 4903 4910 4947
4954 5213 5274 5367 5454 6065 6152 6162
COMMEN 56
CONI 914 929 943 972 986 1000 1014 1028 1042 1056 1070 1084 1098 1112
1124 1153 1167 1181 1195 1209 1223 1237 1251 1265 1279 1293 3911 3912
4939 6093
CONO 206 913 928 930 942 944 971 973 985 987 999 1001 1013 1015
1027 1029 1041 1043 1055 1057 1069 1071 1083 1085 1097 1099 1111 1113
1123 1125 1152 1154 1166 1168 1180 1182 1194 1196 1208 1210 1222 1224
1236 1238 1250 1252 1264 1266 1278 1280 1292 1294 1745 1752 1763 1776
1786 1799 1809 2457 2534 2535 2538 2578 2580 2621 2622 2640 2711 2731
2777 2830 2900 2969 3045 3122 3258 3317 3409 3424 3439 3454 3488 3654
3681 3700 3720 3727 3749 3757 3760 3766 3773 3793 3800 3803 3809 3821
3824 3830 3842 3845 3851 3904 3905 3910 3913 3914 3942 3951 3952 3961
3962 3971 3972 3981 3982 3991 3992 4001 4002 4011 4012 4021 4022 4031
4032 4041 4042 4051 4052 4061 4062 4071 4072 4081 4082 4087 4088 4089
4093 4094 4127 4134 4145 4160 4211 4285 4342 4365 4461 4526 4576 4632
4638 4701 4771 4777 4783 4812 4862 4868 4878 4934 5121 5485 5509 5532
5551 5616 5662 5707 5752 5797 5842 5887 5932 5978 6092 6145 6207
CONSO 6097 SEQ 0272
CONSZ 2571 2612 6096
DATAI 1312 1325 1358 1374 1390 1406 1422 1438 1454 1470 1486 1502 1518 1531
1562 1578 1594 1610 1626 1642 1658 1674 1690 1706 1722 6095
DATAO 1311 1324 1326 1357 1359 1373 1375 1389 1391 1405 1407 1421 1423 1437
1439 1453 1455 1469 1471 1485 1487 1501 1503 1517 1519 1530 1532 1561
1563 1577 1579 1593 1595 1609 1611 1625 1627 1641 1643 1657 1659 1673
1675 1689 1691 1705 1707 1721 1723 1746 2458 2539 2581 2641 2712 2732
2778 2832 2901 2970 3046 3123 3259 3318 3410 3425 3440 3455 3489 3561
3567 3572 3596 3614 3655 3682 3701 3721 3728 3750 3758 3761 3767 3774
3794 4128 4135 4146 4212 4286 4366 4462 4527 4577 4633 4639 4702 4772
4863 4869 4879 4935 5122 5486 5510 5533 5552 5617 5663 5708 5753 5798
5843 5888 5933 5979 6094 6146 6208
DEFINE 7 118 167 208 213 217 222 252 420 423 429 503 514 3922
3935
DFAD 2142
DFDV 2346
DFMP 2217
DFSB 2181
DIV 2235
DMOVE 4531 4581
DMOVEM 4643 4706
END 7932
EXCH 2388
FAD 2124
FDV 2291
FDVR 2319
FIX 2078
FIXR 2101
FMP 2199
FSB 2161
FSC 2060
HLLM 2769
HLRM 2771
HLRZ 2779
HLRZM 2380
HRL 2956 3108 3638 4115 6121
HRLI 1328 1361 1377 1393 1409 1425 1441 1457 1473 1489 1505 1521 1534 1565
1581 1597 1613 1629 1645 1661 1677 1693 1709 1725
HRR 2960 3112 3642 4119
HRRI 1837 1862 1893 1919 1944 1967 1991 2014 2037 2055 2073 2096 2119 2137
2155 2174 2194 2212 2230 2258 2286 2314 2342
HRRM 5270 5447
HRRZ 2764 2792 2837 2856 2961 3113 3401 3643 4120 5244 5273 5409 5453 6073
HRRZM 2379
HRRZS 1885 2399
IBP 2042
IDIV 2263
IDPB 4415
IFDEF 524 575 576 577 578 7923 7930
IFE 969 983 997 1011 1025 1039 1053 1067 1081 1095 1109 1150 1164 1178
1192 1206 1220 1234 1248 1262 1276 1290 1355 1371 1387 1403 1419 1435
1451 1467 1483 1499 1515 1559 1575 1591 1607 1623 1639 1655 1671 1687
1703 1719 SEQ 0273
IFNDEF 227 475 476 486 575 576 577 578 657 6182 6223
ILDB 4371 4466
IMUL 2019
IMULI 2942 3101 3631 3879 4108
JFCL 615 616 617 618 619 620 621 622 623 624 625 626 3508 3859
5557 5622 5668 5713 5758 5803 5848 5893 5938 5984
JRST 325 326 327 328 537 538 540 542 544 546 548 551 553 554
607 894 898 1760 1783 1806 2371 2375 2549 2589 2806 2845 2927 2952
3008 3088 3214 3270 3327 3361 3703 3709 3717 3725 3764 3771 3806 3827
3848 3906 3918 4222 4336 4375 4418 4469 4535 4584 4647 4709 4781 4786
4807 4818 4876 4885 4894 4944 4964 5141 5145 5163 5167 5185 5189 5219
5223 5281 5282 5324 5328 5372 5376 5415 5460 5461 5462 5559 5607 5624
5670 5715 5760 5805 5850 5895 5940 5986 6059 6081 6082 6102 6126 6166
6177 6179 6189 6211
JSP 334 4825 5582 5604 5647 5693 5738 5783 5828 5873 5918 5963 6009 6204
6212
JSR 204 1750 1774 1797 2392 3712 3714 3798 3819 3840 3880 3882 3884 3886
3888 3890 3892 3895 4091 4765 4856
LALL 8 903 1739 2422 2520 2631 2752 2819 2877 3022 3237 3300 3392 3482
3625 3873 3944 4102 4190 4350 4511 4620 4753 4844 4920 5116 5194 5228
5255 5289 5336 5384 5423 5475 5498 5522 5545 5582 5610 5647 5656 5693
5701 5738 5746 5783 5791 5828 5836 5873 5881 5918 5926 5963 5972 6009
6020 6110
LIST 7 486 524 657 1734 2626 3741 6223 7920
LIT 6224
LOC 14 527 851
LSH 2765 2780 2793 2838 2857 2947 2954 2958 2962 2974 2992 3106 3110 3114
3131 3157 3175 3202 3402 3636 3640 3644 3659 3687 4113 4117 4121 4137
4164
MOVE 874 876 878 880 882 884 911 1309 1310 1323 1356 1372 1388 1404
1420 1436 1452 1468 1484 1500 1516 1529 1560 1576 1592 1608 1624 1640
1656 1672 1688 1704 1720 1744 1750 1755 1764 1766 1767 1774 1779 1787
1789 1790 1797 1802 1810 1812 1813 1834 1840 1854 1865 1883 1897 1947
1951 1958 1970 1975 1982 1994 1998 2005 2017 2021 2028 2040 2044 2050
2058 2062 2068 2076 2080 2087 2099 2103 2110 2122 2126 2132 2140 2144
2150 2158 2159 2163 2169 2177 2178 2183 2189 2197 2201 2207 2215 2219
2225 2237 2244 2265 2272 2293 2300 2321 2328 2348 2355 2369 2387 2395
2398 2431 2432 2445 2455 2465 2478 2492 2507 2528 2531 2544 2557 2562
2563 2585 2598 2603 2604 2619 2636 2638 2649 2663 2675 2688 2713 2733
2757 2759 2763 2809 2826 2828 2840 2851 2859 2869 2882 2884 2902 2903
2918 2919 2941 2946 2973 2980 2991 2999 3011 3027 3029 3048 3051 3057
3072 3075 3080 3100 3125 3130 3140 3145 3156 3160 3169 3174 3184 3191
3201 3205 3217 3229 3246 3248 3263 3265 3276 3282 3283 3291 3305 3307
3322 3334 3339 3340 3346 3358 3366 3367 3374 3382 3397 3400 3412 3417
3427 3432 3441 3443 3447 3456 3458 3463 3487 3491 3494 3496 3502 3504
3506 3508 3510 3512 3514 3544 3550 3574 3580 3588 3597 3607 3608 3615
3630 3652 3658 3667 3673 3686 3690 3703 3705 3707 3709 3712 3714 3729
3731 3732 3748 3759 3768 3775 3776 3784 3792 3798 3810 3811 3819 3831
3832 3840 3852 3853 3859 3878 3880 3882 3884 3886 3888 3890 3892 3895
4091 4107 4130 4136 4144 4152 4163 4167 4195 4197 4216 4225 4230 4231
4236 4237 4243 4248 4253 4259 4264 4269 4290 4299 4304 4309 4314 4319
4325 4334 4340 4355 4357 4369 4383 4388 4392 4393 4397 4398 4413 4426
4432 4437 4438 4443 4444 4458 4477 4482 4487 4488 4493 4494 4503 4516 SEQ 0274
4518 4540 4544 4549 4550 4555 4556 4589 4594 4599 4600 4605 4606 4625
4627 4652 4657 4663 4668 4673 4674 4679 4680 4714 4720 4725 4726 4731
4732 4741 4758 4760 4765 4789 4792 4793 4799 4800 4823 4826 4831 4832
4849 4851 4856 4870 4880 4889 4898 4901 4902 4908 4909 4925 4927 4945
4946 4952 4953 4961 5212 5366 5487 5511 5534 5566 5591 5631 5677 5722
5767 5812 5857 5902 5947 5993 6035 6064 6086 6126 6127 6128 6129 6130
6142 6151 6161 6171 6172 6186 6188 6198 6200
MOVEI 867 872 890 892 909 912 925 927 939 941 952 970 984 998
1012 1026 1040 1054 1068 1082 1096 1110 1122 1133 1151 1165 1179 1193
1207 1221 1235 1249 1263 1277 1291 1307 1336 1742 1832 1884 1896 1922
1923 1971 2382 2384 2429 2505 2526 2540 2582 2634 2686 2694 2755 2774
2776 2822 2824 2834 2880 2888 2939 2944 2953 2957 2972 2977 2989 2995
3025 3033 3098 3103 3105 3109 3128 3134 3154 3172 3178 3189 3199 3223
3244 3254 3303 3311 3313 3352 3395 3399 3416 3431 3446 3462 3485 3528
3530 3534 3543 3549 3563 3573 3579 3591 3594 3628 3633 3635 3639 3657
3662 3684 3746 3751 3753 3790 3876 3953 3973 3993 4013 4033 4053 4073
4105 4110 4112 4116 4133 4140 4162 4193 4201 4277 4353 4359 4406 4455
4514 4520 4567 4623 4629 4693 4756 4763 4847 4854 4923 4930 5123 5126
5131 5147 5150 5154 5169 5172 5176 5198 5201 5206 5235 5240 5259 5260
5263 5294 5301 5306 5308 5344 5347 5353 5355 5389 5401 5403 5432 5435
5437 5439 5480 5504 5527 5554 5619 5665 5710 5755 5800 5845 5890 5935
5981 6025 6039 6041 6117 6120 6132 6134 6191 6192 6193
MOVEM 868 873 875 877 879 881 883 885 893 910 926 940 953 1134
1308 1337 1743 1751 1756 1765 1775 1780 1788 1798 1803 1811 1833 1898
1924 1952 1959 1976 1983 1999 2006 2022 2029 2045 2051 2063 2069 2081
2088 2104 2111 2127 2133 2145 2151 2164 2170 2184 2190 2202 2208 2220
2226 2238 2245 2266 2273 2294 2301 2322 2329 2349 2356 2370 2385 2389
2396 2430 2491 2506 2527 2541 2583 2620 2635 2674 2687 2695 2697 2756
2823 2835 2870 2881 2887 2889 2940 2950 2965 3026 3032 3034 3049 3073
3099 3117 3138 3182 3245 3252 3255 3292 3304 3310 3312 3314 3353 3383
3396 3405 3442 3457 3486 3497 3500 3503 3505 3507 3509 3511 3513 3515
3516 3517 3518 3519 3520 3521 3522 3529 3531 3589 3590 3592 3616 3629
3646 3666 3704 3706 3708 3710 3713 3715 3730 3747 3752 3754 3785 3791
3799 3820 3841 3860 3877 3881 3883 3885 3887 3889 3891 3893 3896 3897
3898 3899 3900 3901 3902 4092 4106 4122 4143 4194 4200 4202 4278 4335
4341 4354 4360 4407 4456 4459 4504 4515 4521 4568 4570 4624 4630 4694
4696 4742 4757 4764 4766 4790 4811 4824 4848 4855 4857 4871 4881 4890
4899 4924 4931 4962 5124 5127 5130 5132 5148 5151 5153 5155 5170 5173
5175 5177 5199 5202 5205 5207 5236 5239 5241 5261 5264 5269 5295 5302
5304 5307 5309 5310 5311 5312 5313 5314 5315 5345 5348 5351 5354 5356
5357 5358 5390 5399 5402 5404 5405 5406 5433 5438 5440 5441 5442 5446
5481 5505 5528 5555 5565 5567 5568 5569 5570 5571 5572 5573 5574 5592
5593 5594 5595 5596 5597 5598 5599 5601 5620 5630 5632 5633 5634 5635
5636 5637 5638 5639 5666 5676 5678 5679 5680 5681 5682 5683 5684 5685
5711 5721 5723 5724 5725 5726 5727 5728 5729 5730 5756 5766 5768 5769
5770 5771 5772 5773 5774 5775 5801 5811 5813 5814 5815 5816 5817 5818
5819 5820 5846 5856 5858 5859 5860 5861 5862 5863 5864 5865 5891 5901
5903 5904 5905 5906 5907 5908 5909 5910 5936 5946 5948 5949 5950 5951
5952 5953 5954 5955 5982 5992 5994 5995 5996 5997 5998 5999 6000 6001
6026 6036 6040 6042 6043 6044 6045 6046 6047 6048 6118 6123 6133 6135
6136 6137 6143 6185 6202
MOVSI 1314 1836 1861 1892 1918 1943 1966 1990 2013 2036 2054 2072 2095 2118
2136 2154 2173 2193 2211 2229 2257 2285 2313 2341 2490 2673 2696 2762 SEQ 0275
2775 2833 2886 2943 2971 2988 3031 3102 3127 3153 3171 3198 3251 3309
3398 3415 3430 3445 3461 3498 3632 3656 3683 4109 4132 4161 4199 4569
4695 4810 5129 5142 5152 5164 5174 5186 5204 5220 5238 5268 5303 5325
5350 5373 5398 5445 5564 5600 5629 5675 5720 5765 5810 5855 5900 5945
5991 6122 6197
MUL 1996
NOSYM 23
OPDEF 47 122 204 206 321 322 323 324 325 326 327 328 334 340
341 349 350 351 352 353 354 355 356 357 358 359 362 363
364 365 366 367 368 369 370 371 372 373 374 375 376 377
378 379 380 381 382 383 384 385 386 387 388 389 390 391
392 393 394 395 396 397 398 399 400 401 402 403 404 405
406 407 408 409 410 411 412 413 414 415 416 418 435 440
441 445 446 447 453 454 460 461 462 463 464 465 466 472
473 480 481 482 483 493 494 495 496 497 524
PAGE 5653 5699 5744 5789 5834 5879 5924 5969
POINT 4369 4383 4413 4426 4458 4477
POP 324 1901
POPJ 322 1926 6206 6217
PUSH 323 1842
PUSHJ 321 1867
REPEAT 954 1135 1338 1542 1734 2626 3741 4966
SALL 901 917 933 947 977 991 1005 1019 1033 1047 1061 1075 1089 1103
1117 1128 1158 1172 1186 1200 1214 1228 1242 1256 1270 1284 1298 1317
1331 1365 1381 1397 1413 1429 1445 1461 1477 1493 1509 1525 1537 1569
1585 1601 1617 1633 1649 1665 1681 1697 1713 1729 1737 1758 1770 1782
1793 1805 1816 1845 1851 1857 1870 1874 1880 1888 1903 1908 1914 1929
1933 1939 1954 1962 1978 1986 2001 2009 2024 2032 2047 2065 2083 2091
2106 2114 2129 2147 2166 2186 2204 2222 2240 2248 2253 2268 2276 2281
2296 2304 2309 2324 2332 2337 2351 2359 2364 2402 2420 2436 2449 2469
2482 2496 2511 2518 2546 2555 2560 2566 2573 2587 2596 2601 2607 2614
2629 2653 2667 2679 2692 2717 2737 2750 2797 2817 2842 2849 2854 2862
2875 2906 2922 2983 3002 3020 3054 3060 3078 3083 3143 3148 3163 3187
3194 3208 3235 3267 3273 3279 3286 3298 3324 3332 3337 3343 3349 3360
3364 3370 3377 3390 3420 3435 3450 3466 3480 3539 3547 3553 3569 3577
3583 3599 3605 3611 3623 3670 3676 3693 3723 3735 3763 3770 3779 3805
3814 3826 3835 3847 3856 3871 3916 4100 4149 4155 4170 4188 4220 4228
4234 4240 4246 4251 4256 4262 4267 4272 4302 4307 4312 4317 4322 4328
4348 4373 4382 4386 4391 4396 4401 4417 4424 4429 4435 4441 4447 4468
4475 4480 4485 4491 4497 4509 4533 4543 4547 4553 4559 4583 4592 4597
4603 4609 4618 4645 4655 4660 4666 4671 4677 4683 4708 4717 4723 4729
4735 4751 4779 4785 4796 4803 4817 4829 4835 4842 4873 4883 4892 4905
4912 4918 4941 4949 4956 5114 5137 5160 5182 5192 5215 5226 5247 5253
5276 5287 5320 5330 5334 5363 5369 5378 5382 5412 5417 5421 5450 5456
5464 5473 5491 5496 5515 5520 5538 5579 5585 5644 5650 5690 5696 5735
5741 5780 5786 5825 5831 5870 5876 5915 5921 5960 5966 6006 6013 6018
6056 6061 6067 6076 6108 6154 6164 6174 6215
SETOB 2543 2839 4524 4574 4636 4699
SETOM 869 870 2377 2536 2537 2552 2846 3050 3074 3139 3183 3257 3321 3354
3355 3356 3373 3426 3593 3595 3602 4210 4215 4242 4289 4298 4363 4364
4387 4409 4410 4431 4460 4525 4539 4575 4588 4637 4662 4700 4768 4769
4859 4860 4933 5298 5341 5393 5428 5561 5626 5672 5717 5762 5807 5852
5897 5942 5988 6029 6127 SEQ 0276
SETZ 1899 5478 5502 5525
SETZB 2179 2233 2261 2289 2317 2345 2584 3261 3320 4204 4522 4523 4571 4634
4635 6051
SETZM 886 887 888 896 897 2374 2454 2530 2579 2593 2637 2758 2825 2883
3028 3047 3071 3124 3168 3247 3260 3306 3316 3319 3329 3345 3357 3411
3490 3493 3533 3562 3651 3756 4129 4196 4205 4206 4207 4208 4209 4258
4279 4280 4281 4282 4283 4284 4324 4356 4362 4408 4457 4517 4572 4573
4626 4651 4697 4698 4713 4719 4759 4850 4926 5120 5133 5134 5156 5157
5178 5179 5208 5209 5232 5233 5266 5267 5316 5317 5359 5360 5396 5397
5443 5444 5575 5576 5640 5641 5686 5687 5731 5732 5776 5777 5821 5822
5866 5867 5911 5912 5956 5957 6002 6003 6033 6050 6139 6140
SIXBIT 109 742 743 751 752 902 918 933 947 977 991 1005 1019 1033
1047 1061 1075 1089 1103 1117 1128 1158 1172 1186 1200 1214 1228 1242
1256 1270 1284 1298 1317 1331 1365 1381 1397 1413 1429 1445 1461 1477
1493 1509 1525 1537 1569 1585 1601 1617 1633 1649 1665 1681 1697 1713
1729 1738 1759 1770 1782 1793 1805 1816 1845 1851 1857 1870 1874 1880
1888 1903 1908 1914 1929 1933 1939 1954 1962 1978 1986 2001 2009 2024
2032 2047 2065 2083 2091 2106 2114 2129 2147 2166 2186 2204 2222 2240
2248 2253 2268 2276 2281 2296 2304 2309 2324 2332 2337 2351 2359 2364
2402 2421 2437 2449 2469 2482 2496 2511 2519 2547 2555 2560 2566 2573
2587 2596 2601 2607 2614 2630 2654 2667 2679 2692 2717 2737 2751 2798
2808 2818 2843 2849 2854 2862 2876 2907 2922 2983 3002 3010 3021 3055
3060 3078 3083 3143 3148 3163 3187 3194 3208 3216 3222 3228 3236 3268
3273 3279 3286 3299 3325 3332 3337 3343 3349 3360 3364 3370 3377 3391
3421 3435 3450 3466 3481 3540 3547 3553 3569 3577 3583 3599 3605 3611
3624 3671 3676 3693 3723 3735 3763 3770 3779 3805 3814 3826 3835 3847
3856 3872 3917 4101 4150 4155 4170 4189 4221 4228 4234 4240 4246 4251
4256 4262 4267 4272 4302 4307 4312 4317 4322 4328 4349 4374 4382 4386
4391 4396 4401 4417 4424 4429 4435 4441 4447 4468 4475 4480 4485 4491
4497 4510 4534 4543 4547 4553 4559 4583 4592 4597 4603 4609 4619 4646
4655 4660 4666 4671 4677 4683 4708 4717 4723 4729 4735 4752 4780 4785
4796 4803 4817 4829 4835 4843 4874 4883 4892 4905 4912 4919 4942 4949
4956 5115 5138 5160 5182 5193 5216 5227 5248 5254 5277 5288 5321 5330
5335 5364 5369 5378 5383 5413 5417 5422 5451 5456 5464 5474 5492 5497
5516 5521 5539 5580 5586 5645 5651 5691 5697 5736 5742 5781 5787 5826
5832 5871 5877 5916 5922 5961 5967 6007 6014 6019 6057 6061 6067 6076
6085 6109 6155 6164 6174 6215
SKIPE 2383 4380 4422 4473 6199
SKIPN 931 1329 5140 5162 5184 5218 5323 5371 5558 5623 5669 5714 5759 5804
5849 5894 5939 5985
SOJG 122 3954 3974 3994 4014 4034 4054 4074
SOJGE 2803
SOS 3004 3196 5144 5166 5188 5222 5327 5375
SUBI 2996 3179 3190
SUBTTL 24 165 202 250 285 487 524 525 853 899 1301 1735 1821 2418
2516 2627 2741 2871 3015 3233 3293 3384 3471 3864 4095 4176 4743 5058
5110 5283 5466 5541 6016 6104 6180 6218
TITLE 12
TLNE 5280 5459 5605 6205
TLNN 891 5583 5648 5694 5739 5784 5829 5874 5919 5964 6010 6213
TLO 2782 2784 2787 2789 2791 2858 2948 2975 2993 3132 3158 3176 3203 3660
3688 4138 4165
TLZ 2781 2785 2949 2976 2994 3133 3159 3177 3204 3661 3689 4139 4166 SEQ 0277
TLZE 2783 2786 2788 2790
TRNE 2770 2829 2951
TRNN 2768 2831
TRZ 1313 1327 1360 1376 1392 1408 1424 1440 1456 1472 1488 1504 1520 1533
1564 1580 1596 1612 1628 1644 1660 1676 1692 1708 1724
VAR 7928
XALL 919 934 948 978 992 1006 1020 1034 1048 1062 1076 1090 1104 1118
1129 1159 1173 1187 1201 1215 1229 1243 1257 1271 1285 1299 1318 1332
1366 1382 1398 1414 1430 1446 1462 1478 1494 1510 1526 1538 1570 1586
1602 1618 1634 1650 1666 1682 1698 1714 1730 1760 1771 1783 1794 1806
1817 1846 1852 1858 1871 1875 1881 1889 1904 1909 1915 1930 1934 1940
1955 1963 1979 1987 2002 2010 2025 2033 2048 2066 2084 2092 2107 2115
2130 2148 2167 2187 2205 2223 2241 2249 2254 2269 2277 2282 2297 2305
2310 2325 2333 2338 2352 2360 2365 2403 2438 2450 2470 2483 2497 2512
2548 2556 2561 2567 2574 2588 2597 2602 2608 2615 2655 2668 2680 2693
2718 2738 2799 2844 2850 2855 2863 2908 2923 2984 3003 3056 3061 3079
3084 3144 3149 3164 3188 3195 3209 3269 3274 3280 3287 3326 3333 3338
3344 3350 3361 3365 3371 3378 3422 3436 3451 3467 3541 3548 3554 3570
3578 3584 3600 3606 3612 3672 3677 3694 3724 3736 3764 3771 3780 3806
3815 3827 3836 3848 3857 3918 4151 4156 4171 4222 4229 4235 4241 4247
4252 4257 4263 4268 4273 4303 4308 4313 4318 4323 4329 4375 4383 4387
4392 4397 4402 4418 4425 4430 4436 4442 4448 4469 4476 4481 4486 4492
4498 4535 4544 4548 4554 4560 4584 4593 4598 4604 4610 4647 4656 4661
4667 4672 4678 4684 4709 4718 4724 4730 4736 4781 4786 4797 4804 4818
4830 4836 4875 4884 4893 4906 4913 4943 4950 4957 5139 5161 5183 5217
5249 5278 5322 5331 5365 5370 5379 5414 5418 5452 5457 5465 5493 5517
5540 5581 5587 5646 5652 5692 5698 5737 5743 5782 5788 5827 5833 5872
5878 5917 5923 5962 5968 6008 6015 6058 6062 6068 6077 6156 6165 6175
6216
XLIST 6 485 523 656 1733 2625 3740 6222
XWD 5487 5511 5534