Google
 

Trailing-Edge - PDP-10 Archives - klad_sources - klad.sources/dfkea.seq
There are no other files named dfkea.seq in the archive.
;DFKEA
                                                                                                                           SEQ 0001




				IDENTIFICATION
				--------------

	PRODUCT CODE:		AH-F545E-DD

	DIAGNOSTIC CODE:	DFKEA

	PRODUCT NAME:		DFKEAE0 KL10 PAGING HARDWARE DIAGNOSTIC

	VERSION:		0.5

	DATE RELEASED:		SEPTEMBER 1981

	MAINTAINED BY:		36-BIT DIAGNOSTIC ENGINEERING

	AUTHOR:			JOHN R. KIRCHOFF

		        COPYRIGHT (C) 1975, 1981

	        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-DFKEA
							PAGE 2                                                             SEQ 0002


			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-DFKEA
							PAGE 3                                                             SEQ 0003

1.0	ABSTRACT

	THIS PDP-10 KL10 DIAGNOSTIC TESTS THE PAGING HARDWARE OF
	THE KL10 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.  MAXIMUM  ADDRESS PAGING
	Q.  PAGING AND ADDRESSING BLT
	R.  MAXIMUM BASE REGISTER RELOCATION
	    1.  MUUO
	    2.  PAGE FAIL
	    3.  EXEC-PER-PROCESS
	    4.  LUUO
	    5.  TRAPPING
	    6.  INTERRUPTS
	    7.  EPMP PAGING

	THIS DIAGNOSTIC OPERATES ONLY IN EXEC MODE.
							MAINDEC-10-DFKEA
							PAGE 4                                                             SEQ 0004

2.0	REQUIREMENTS

2.1	EQUIPMENT

	A PDP-10 KL10 WITH 32K OF MEMORY
	48K OF MEMORY IS REQUIRED FOR THE MAXIMUM TESTING
	CONSOLE TELETYPE
	DECTAPE (OPTIONAL)
	LINE PRINTER (OPTIONAL)

2.2	STORAGE

	THE PROGRAM USES ALL OF THE FIRST 32K OF MEMORY
	THE PROGRAM USES 48K OF MEMORY FOR MAXIMUM TESTING.

2.3	PRELIMINARY PROGRAMS

	ALL PRECEDING CENTRAL PROCESSOR DIAGNOSTICS.

3.0	PROGRAM PROCEDURES

3.1	LOADING PROCEDURES

	THIS DIAGNOSTIC REQUIRES THAT THE DECSYSTEM10 SUBROUTINE
	PROGRAM BE RESIDENT IN THE PDP-10.
	LOAD VIA CONSOLE PROCESSOR OR WITH "DIAMON".

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-DFKEA
							PAGE 5                                                             SEQ 0005

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.

	D.  THE PROGRAM ALLOWS FOR MAXIMUM ADDRESS AND RELOCATION TESTING
	    BY REQUESTING THAT A MEMORY BE CONFIGURED TO ACT AS THE
	    MAXIMUM ADDRESSES, I.E. 4080 TO 4096K.  THIS IS DONE
	    THROUGH PROGRAM TYPEOUT AND THE OPERATOR TAKING THE
	    APPROPRIATE ACTIONS.

	TO ALLOW SELECTION OF THE MAXIMUM TESTING THE "OPRSEL" SWITCH
	MUST BE SET TO A ONE.

	THIS SECTION MAY BE INHIBITED (IF NO AVAILABLE MEMORY, ETC.)
	BY RESPONDING APPROPRIATLY TO THE PROGRAM REQUEST OR BY SETTING
	THE 'INHMAX' DATA SWITCH.

	THE PROGRAM REQUEST MAY BE INHIBITED BY SETTING THE 'INHMXQ'
	DATA SWITCH.  THE PROGRAM WILL THEN ASSUME THAT THE MEMORIES ARE
	PROPERLY SETUP.
							MAINDEC-10-DFKEA.TXT
							PAGE 6                                                             SEQ 0006

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.

	14   OPRSEL	0	RUN DEFAULT (NO MAXIMUM TESTING)
			1	ALLOW MAXIMUM RELOCATION SELECTION

	34   INHMXQ	0	ALLOW RECONFIGURATION QUESTION
			1	INHIBIT RECONFIGURATION QUESTION

	35   INHMAX	0	ALLOW MAXIMUM RELOCATION TESTING
			1	INHIBIT MAXIMUM RELOCATION TESTING
							MAINDEC-10-DFKEA
							PAGE 7                                                             SEQ 0007

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 KL10 PAGING HARDWARE DIAGNOSTIC (DFKEA)
	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-DFKEA
							PAGE 8                                                             SEQ 0008

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
DECSYSTEM10 KL10 PAGING HARDWARE DIAGNOSTIC
                                                                                                                           SEQ 0009
************************************************************************

PRODUCT CODE:		MAINDEC-10-DFKEA

PRODUCT NAME:		KL10 PAGING HARDWARE DIAGNOSTIC

DATE RELEASED:		SEPTEMBER 1981

VERSION:		0.5

UPDATE AUTHOR:		RICK JEVON

CHANGES MADE:

		ADDED TESTS MAPCKA AND MAPCKB TO TEST MAP INSTRUCTION
		WITH ALL ADDRESS LINES.

************************************************************************

PRODUCT CODE:		MAINDEC-10-DFKEA

PRODUCT NAME:		KL10 PAGING HARDWARE DIAGNOSTIC

DATE RELEASED:		MARCH 1981

VERSION:		0.4

UPDATE AUTHOR:		RICK JEVON

CHANGES MADE:

		EDIT TO ENABLE DFKEA TO RUN WITH AC BLK'S 0-6
		
************************************************************************

PRODUCT CODE:		MAINDEC-10-DFKEA

PRODUCT NAME:		KL10 PAGING HARDWARE DIAGNOSTIC

DATE RELEASED:		JULY 1979

VERSION:		0.3

UPDATE AUTHOR:		BILL SCORZELLI

CHANGES MADE:

		BECAUSE OF A NEW RELEASE OF THE MICROCODE VERSION 231
THE DPB INSTRUCTION CAUSES BIT 5 TO COME UP IN THE PAGE FAIL WORD.
CHANGED CODE TO ACCOMMODATE THIS FUNCTION IN MODEL "A" MACHINES ONLY.

************************************************************************
MAINDEC-10-DFKEA

VERSION 0.2

AUGUST 1976

HISTORY:
                                                                                                                           SEQ 0010
UPGRADED DIAGNOSTIC TO INCLUDE THE FOLLOWING ADDITIONAL TESTS:
1.	PAGE FAIL WORD TEST
2.	EXEC-PER-PROCESS TRAP TEST
3.	I/O INSTRUCTION PAGE FAIL
4.	INTERRUPT INSTRUCTION PAGE FAIL
5.	TRAP TO A PAGE FAIL PAGE
************************************************************************
VERSION 0.1

MAY 1,1975

HISTORY:

ORIGINAL RELEASE OF THIS PROGRAM FOR THE KL10.
************************************************************************
DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 1             
                                                                                                                           SEQ 0011




















				   DOCUMENT
				**************
        DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^
				**************

















		    COPYRIGHT 1981
		    DIGITAL EQUIPMENT CORPORATION
		    MAYNARD, MASS. 01754

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 2             
                                                                                                                           SEQ 0012

				 TABLE OF CONTENTS
				*******************


	24	DIAGNOSTIC PARAMETERS

	136	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, SEPT 18,1979

	171	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979

	377	ERROR HANDLING UUO DEFINITIONS, SEPT 18,1979

	415	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979

	743	PROGRAM INITIALIZATION

	792	TEST EXEC BASE REGISTER

	1250	TEST USER BASE REGISTER

	1748	TEST PROCESSOR TRAPS

	1833	TEST MAP INSTRUCTION

	1955	TEST PAGE FAIL TRAPPING

	2066	TEST EXEC-PER-PROCESS MAPPING

	2180	TEST ASSOCIATIVE AND SCRATCHPAD MEMORIES

	2310	TEST PAGED DATA READ

	2454	TEST PAGED DATA WRITE

	2672	TEST PAGE FAIL WORD

	2732	TEST WRITE PROTECTED PAGING

	2823	PAGED BLT PAGING AND ADDRESSING TEST

	2910	TEST BASE REGISTER RELOCATION

	3300	TEST INTERRUPT RELOCATION

	3531	TEST PAGE REFILL RELOCATION

	3611	INSTRUCTION PAGE FAIL TESTING
DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 3             
                                                                                                                           SEQ 0013

				 TABLE OF CONTENTS
				*******************


	4188	TRAP INSTRUCTION PAGE FAIL TEST

	4406	INTERRUPT INSTRUCTION PAGE FAIL

	4512	ASSOCIATIVE MEMORY FLOATING BIT TEST TABLE

	4564	MAXIMUM PAGING AND BASE REGISTER RELOCATION TEST.

	4712	PAGING AND ADDRESSING TEST WITH 128K 'BLT'.

	4784	TEST MAXIMUM BASE REGISTER RELOCATION

	5137	TEST MAXIMUM PAGE INTERRUPT RELOCATION

	5367	TEST MAXIMUM PAGE REFILL RELOCATION

	5446	*STOR* RESERVED STORAGE, SEPT 18,1979
DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 4             
                                                                                                                           SEQ 0014
		1	MAINDEC-10-DFKEA

		17	COPYRIGHT 1975,1981
			DIGITAL EQUIPMENT CORPORATION
			MARLBORO, MASS. 01752

		21	JOHN R. KIRCHOFF

		*****************************************************************
	24	DIAGNOSTIC PARAMETERS
		*****************************************************************

		26	SUBROUTINE ASSEMBLY PARAMETERS

		36	ACCUMULATOR DEFINITIONS

		47	MISCELLANEOUS

		62	MAP INSTRUCTION READOUT ASSIGNMENTS
			
			BIT 0 - USER ADDRESS
			    1 - PAGE FAIL
			    2 - ACCESS
			    3 - WRITABLE
			    4 - SOFTWARE
			    6 - PUBLIC
			    7 - CACHE
			    8 - PAGED REF
			    9-13 - 0
			
			    ^ - CORE ADDRESS BITS 14-35
			
			
			PAGE FAIL ERROR FORMAT
			IF BIT 1 = 1
			
				21 = PROPRIETARY VIOLATION
				22 = REFILL ERROR (HARDWARE FAILURE
				23 = ADDRESS COMPARE
				24 = SEC ACCESS FAILURE
			
			PAGE TABLE ENTRY WORD FORMAT
			
			BIT 0 - ACCESS
			    1 - PUBLIC
			    2 - WRITABLE
			    3 - SOFTWARE
			    4 - CACHE
			
			    ^ - PHYSICAL PAGE ADDRESS BITS 14-26
			
			
			;LEFT HALF = EVEN VIRTUAL PAGE
			;RIGHT HALF = ODD VIRTUAL PAGE

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 5             
                                                                                                                           SEQ 0015
		100	DATA SWITCHES

		106	BEGIN PARAMETERS

		*****************************************************************
	136	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, SEPT 18,1979
		*****************************************************************

		141	DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
			LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
			AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS

		*****************************************************************
	171	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979
		*****************************************************************

		174	SPECIAL SUBPROGRAM LINKAGES

		185	SPECIAL SUBROUTINE FATAL HALTS
			USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE

		*****************************************************************
	377	ERROR HANDLING UUO DEFINITIONS, SEPT 18,1979
		*****************************************************************

		*****************************************************************
	415	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979
		*****************************************************************

		*****************************************************************
	743	PROGRAM INITIALIZATION
		*****************************************************************

		*****************************************************************
	792	TEST EXEC BASE REGISTER
		*****************************************************************

		798	LOAD EXEC BASE REGISTER WITH ALL ZERO'S WITH CONO
			EXEC BASE REGISTER SHOULD THEN BE CLEAR.

		814	LOAD EXEC BASE REGISTER WITH ALL ONE'S
			IF ANY BIT IS READ BACK THEN LOAD EBR SHOULD WORK.

		829	LOAD EXEC BASE REGISTER WITH TRAP ENABLE BIT

		848	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		859	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 6             
                                                                                                                           SEQ 0016
		873	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		887	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		901	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		915	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		929	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		943	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		957	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		971	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		985	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		999	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		1013	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		1027	CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.

		1041	LOAD EXEC BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK

		1057	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1068	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1082	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1096	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 7             
                                                                                                                           SEQ 0017
		1110	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1124	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1138	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1152	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1166	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1180	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1194	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1208	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1222	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		1236	LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
			TO CHECK BIT INTERACTION.

		*****************************************************************
	1250	TEST USER BASE REGISTER
		*****************************************************************

		1252	LOAD USER BASE REGISTER WITH ALL ZERO'S.
			USER BASE REGISTER SHOULD THEN BE CLEAR.

		1269	LOAD USER BASE REGISTER WITH ALL ONE'S.
			IF ANY BIT IS READ BACK THEN LOAD UBR SHOULD WORK.

		1288	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1301	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1317	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 8             
                                                                                                                           SEQ 0018
		1333	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1349	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1365	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1381	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1397	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1413	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1429	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1445	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1461	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1477	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1493	CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
			ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS

		1508	LOAD USER BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK.

		1524	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1537	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1553	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1569	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1585	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 9             
                                                                                                                           SEQ 0019
		1601	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1617	LOAD USER BASE REGISTER WITH A FLOATING ZERO

		1618	CHECK BIT INTERACTION.

		1633	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1649	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1665	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1681	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1697	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1713	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		1729	LOAD USER BASE REGISTER WITH A FLOATING ZERO
			CHECK BIT INTERACTION.

		*****************************************************************
	1748	TEST PROCESSOR TRAPS
		*****************************************************************

		1761	TEST TRAP 3 TRAP

		1785	TEST PUSHDOWN OVERFLOW TRAP

		1808	TEST OVERFLOW TRAP

		*****************************************************************
	1833	TEST MAP INSTRUCTION
		*****************************************************************

		1839	PERFORM 'MAP' OF ADDRESS 0.
			MAP READOUT SHOULD BE:
			ACCESS, WRITEABLE, SOFTWARE, PAGED REF

		1855	PERFORM 'MAP' OF ADDRESS 337000,
			HIGHEST EXEC PAGED MEMORY ADDRESS.
			MAP READOUT SHOULD BE:
			ACCESS, WRITABLE, SOFTWARE, PAGED REF

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 10            
                                                                                                                           SEQ 0020
		1867	PERFORM 'MAP' OF ADDRESS 252525,
			TEST ALTERNATE MEMORY ADDRESS ARE PAGED.
			MAP READOUT SHOULD BE:
			ACCESS, WRITABLE, SOFTWARE, PAGED REF

		1879	PERFORM 'MAP' OF ADDRESS 125252,
			TEST ALTERNATE MEMORY ADDRESS ARE PAGED.
			MAP READOUT SHOULD BE:
			ACCESS, WRITABLE, SOFTWARE, PAGED REF

		1891	CLEAR PAGE MAP

		1898	PERFORM 'MAP' OF ADDRESS 400000,
			LOWEST EPMP PAGING ADDRESS.
			SINCE PAGE MAP IS CLEAR
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.

		1911	PERFORM 'MAP' OF ADDRESS 777000,
			HIGHEST EPMP PAGING ADDRESS.
			SINCE PAGE MAP IS CLEAR
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.

		1923	SETUP EPMP FOR ADDRESS 400000 WITH ALL BUT ACCESS.
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
			IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
			SHOULD HAVE NO EFFECT.

		1938	SETUP EPMP FOR ADDRESS 777000 WITH ALL BUT ACCESS.
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
			IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
			SHOULD HAVE NO EFFECT.

		*****************************************************************
	1955	TEST PAGE FAIL TRAPPING
		*****************************************************************

		1961	DO A 'MOVE' FROM LOCATION 400000.
			SINCE PAGE MAP IS CLEAR THIS SHOULD PAGE FAIL.

		1989	PAGE FAULT TRAP SHOULD RETURN HERE

		2008	PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY

		2014	CHECK PAGE FAIL WORD FOR MAXIMUM ADDRESS
			DO A 'MOVE' FROM LOCATION 777777.

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 11            
                                                                                                                           SEQ 0021
		2030	PAGE FAULT TRAP SHOULD RETURN HERE

		2049	PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY

		2056	RESET PAGE FAULT TRAP

		*****************************************************************
	2066	TEST EXEC-PER-PROCESS MAPPING
		*****************************************************************

		2082	PERFORM 'MAP' OF ADDRESS 340000
			LOWEST UPMP EXEC-PER-PROCESS ADDRESS.
			SINCE PAGE MAP IS CLEAR
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.

		2096	PERFORM 'MAP' OF ADDRESS 377000
			HIGHEST UPMP EXEC-PER-PROCESS ADDRESS.
			SINCE PAGE MAP IS CLEAR
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.

		2108	SETUP UPMP FOR ADDRESS 340000 WITH ALL BUT ACCESS.
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.

		2121	SETUP UPMP FOR ADDRESS 340000 WITH ALL BUT ACCESS
			MAP READOUT SHOULD BE:
			PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.

		2138	UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 377 WITH
			ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 0.
			'DATAO PAG' CLEARS ASSOCIATIVE MEMORY THEREFORE 'MAP'
			SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
			FROM UPMP EXEC-PER-PROCESS MAP AND LOAD ASSOCIATIVE MEMORY
			WITH PAGE ADDRESS 377.
			THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
			BY THE MAP INSTRUCTION.
			READOUT OF THE LOADED ASSOCIATIVE MEMORY (BY 'CONI PAG')
			SHOULD BE:
			PAGE 377',EXEC MEMORY SPACE, RELOAD COUNTER.

		2158	UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 340 WITH
			ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 17777.
			'DATAO PAG' CLEARS ASSOCIATIVE MEMORY THEREFORE 'MAP'
			SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
			FROM UPMP EXEC-PER-PROCESS MAP AND LOAD ASSOCIATIVE MEMORY
			WITH PAGE ADDRESS 340.
			THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
			BY THE MAP INSTRUCTION.
			READOUT OF THE LOADED ASSOCIATIVE MEMORY (BY 'CONI PAG')
			SHOULD BE:
			PAGE 340',EXEC MEMORY SPACE, RELOAD COUNTER.

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 12            
                                                                                                                           SEQ 0022
		*****************************************************************
	2180	TEST ASSOCIATIVE AND SCRATCHPAD MEMORIES
		*****************************************************************

		2182	PAGE MAP IS SETUP FOR 42 PAGES WITH DATA THAT PRODUCES
			FLOATING BIT PATTERNS IN BOTH THE ASSOCIATIVE 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 ASSOCIATIVE AND SCRATCHPAD REGISTERS ARE OPERATIONAL.

		2252	CLEAR ASSOCIATIVE MEMORY AND PAGE MAP
			CHECK THAT ALL PREVIOUS REFERENCES TRAP
			SHOULD IF AM IS REALLY CLEAR

		*****************************************************************
	2310	TEST PAGED DATA READ
		*****************************************************************

		2312	USING PAGING ADDRESSES 400XXX AND 777XXX

		2330	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.

		2348	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.

		2370	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.

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 13            
                                                                                                                           SEQ 0023
		*****************************************************************
	2454	TEST PAGED DATA WRITE
		*****************************************************************

		2456	USING PAGING ADDRESS 400XXX AND 777XXX
			PAGING REFERENCES POINT TO EXEC UNPAGED ADDRESSES.

		2475	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.

		2501	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.

		2531	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.

		*****************************************************************
	2672	TEST PAGE FAIL WORD
		*****************************************************************

		2678	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.

		*****************************************************************
	2732	TEST WRITE PROTECTED PAGING
		*****************************************************************

		2734	TRYING TO WRITE INTO A WRITE PROTECTED AREA
			SHOULD CAUSE A PAGE FAILURE

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 14            
                                                                                                                           SEQ 0024
		*****************************************************************
	2823	PAGED BLT PAGING AND ADDRESSING TEST
		*****************************************************************

		2825	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.

		*****************************************************************
	2910	TEST BASE REGISTER RELOCATION
		*****************************************************************

		2912	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.

		2962	TEST USER BASE REGISTER RELOCATION
			BY USING AN MUUO OF 0,,654321.

		2965	TEST MUUO FIRST WITH EPMP & UPMP AS PAGE 0.

		2994	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.

		3024	TEST USER BASE REGISTER RELOCATION
			BY USING EXEC PAGE FAIL WORD

		3057	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.

		3136	TEST THAT A TRAP FROM THE EXEC-PER-PROCESS AREA
			USES THE CORRECT BASE REGISTER

		3181	TEST BASE REGISTER RELOCATION
			BY USING PAGE FAULT TRAP

		3225	TEST BASE REGISTER RELOCATION
			BY USING TRAPPING

		3235	TEST RELOCATED TRAP 3

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 15            
                                                                                                                           SEQ 0025
		3255	TEST RELOCATED TRAP 2

		3275	TEST RELOCATED TRAP 1

		*****************************************************************
	3300	TEST INTERRUPT RELOCATION
		*****************************************************************

		3302	SET PAGE 0 INTERRUPT LOCATIONS AS ERROR
			SETUP RELOCATED PAGE INTERRUPT LOCATIONS FOR TESTING
			RELOCATE EXEC BASE REGISTER
			TEST INTERRUPTS

		3343	PAGE 0 INTERRUPT ERROR HANDLER

		3356	RELOCATED INTERRUPT MACRO'S

		3359	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.

		3372	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = ITRCHN

		3382	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

		3394	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 7

		3402	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

		3414	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 6

		3422	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

		3434	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 5

		3442	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

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 16            
                                                                                                                           SEQ 0026
		3454	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 4

		3462	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

		3474	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 3

		3482	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

		3494	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 2

		3502	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

		3514	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 1

		*****************************************************************
	3531	TEST PAGE REFILL RELOCATION
		*****************************************************************

		3533	BY PUTTING REFILL DATA IN PAGE 76.
			AND RELOCATING EXEC BASE REGISTER

		*****************************************************************
	3611	INSTRUCTION PAGE FAIL TESTING
		*****************************************************************

		3613	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.

		3658	BLT PAGE FAIL RETURN

		3710	TEST BLT PAGE FAIL CONTINUE

		3729	BLT SHOULD PAGE FAIL
			PAGE MAP IS THEN SETUP
			AND BLT CONTINUED

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 17            
                                                                                                                           SEQ 0027
		3773	ON PAGE FAIL, SETUP NEXT PAGE FOR BLT

		3779	TEST BYTE PAGE FAIL
			FIRST TEST WITH BYTE DATA IN UNMAPPED PAGE
			THEN TEST WITH BYTE POINTER IN UNMAPPED PAGE.

		3811	ILDB PAGE FAIL RETURN
			BYTE POINTER SHOULD HAVE BEEN INCREMENTED
			PAGE FAIL SHOULD HAVE OCCURRED WHEN DATA WAS FETCHED.

		3839	TEST DEPOSIT BYTE PAGE FAIL

		3855	IDPB PAGE FAIL RETURN

		3895	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.

		3916	POINTER FETCH PAGE FAIL RETURN

		3950	TEST DOUBLE MOVE PAGE FAIL
			FIRST PAGE FAIL ON FIRST OPERAND FETCH
			OPERANDS FETCHED FROM PAGED AREA WITH PAGE MAP CLEAR.

		3982	PAGE FAIL RETURN

		4007	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.

		4031	PAGE FAIL RETURN

		4059	TEST DOUBLE MOVE TO MEMORY PAGE FAIL
			FIRST TEST WITH DATA DESTINATION ADDRESSES IN A PAGED AREA
			WITH THE PAGE MAP CLEAR.

		4094	PAGE FAIL RETURN

		4131	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.

		4156	PAGE FAIL RETURN

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 18            
                                                                                                                           SEQ 0028
		*****************************************************************
	4188	TRAP INSTRUCTION PAGE FAIL TEST
		*****************************************************************

		4190	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

		4232	HERE IF PAGE FAIL TRAP HAPPENED

		4251	SETUP FOR PAGE FAIL TRAP CONTINUE

		4263	HERE IF TRAP CONTINUED PROPERLY

		4282	CAUSE A TRAP TO A PAGE FAIL PAGE
			TRAP HANDLER THEN VERIFIES CORRECT PC WORD

		4329	HERE IF TRAP HAPPENED WITHOUT PAGE FAIL

		4339	HERE IF PAGE FAIL TRAP HAPPENED

		4359	TEST I/O INSTRUCTION PAGE FAIL

		*****************************************************************
	4406	INTERRUPT INSTRUCTION PAGE FAIL
		*****************************************************************

		4412	CAUSE AN INTERRUPT THAT HAS FOR ITS INTERRUPT HANDLING
			INSTRUCTION A "JSR" TO A PAGE FAIL ADDRESS.
			A PAGE FAIL SHOULD OCCUR.

		4421	FIRST VERIFY THAT THE METER CAN CAUSE AN INTERRUPT

		4439	NOW USE IT TO CAUSE I/O PAGE FAIL

		4472	IF PAGE FAIL HAPPENED, CHECK PROPER CONDITIONS

		4492	APR ERROR INTERRUPT,ERROR

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 19            
                                                                                                                           SEQ 0029
		*****************************************************************
	4512	ASSOCIATIVE MEMORY FLOATING BIT TEST TABLE
		*****************************************************************

		4514	LH = SCRATCHPAD DATA
			RH = PAGING ADDRESS

		*****************************************************************
	4564	MAXIMUM PAGING AND BASE REGISTER RELOCATION TEST.
		*****************************************************************

		4566	"OPRSEL" SWITCH SET ALLOWS THE FOLLOWING MAXIMUM TESTS
			PERFORM TEST UNLESS INHIBITED BY "INHMAX" SWITCH.
			ALLOW FOR REQUIRED OPERATOR ACTION ON FIRST PASS
			TO RESELECT A MEMORY FOR MAXIMUM 4 MILLION ADDRESSING.
			IF "INHMXQ" SWITCH IS SET, "INHMAX" CLEAR, ASSUME THAT
			MEMORY IS CORRECTLY SETUP.

		4610	TEST MAXIMUM ADDRESS PAGING
			PAGING ADDRESS 400000 RELOCATES TO 17740000
			PAGING ADDRESS 777777 RELOCATES TO 17777777

		4649	TEST MAXIMUM ADDRESS PAGING.
			USING PAGING ADDRESSES 340XXX THRU 777XXX
			WRITE DATA INTO MAXIMUM MEMORY.
			RELOCATION STARTS AT 17740000 AND GOES TO 17777740
			IN INCREMENTS OF 40(8) ADDRESSES.

		*****************************************************************
	4712	PAGING AND ADDRESSING TEST WITH 128K 'BLT'.
		*****************************************************************

		4714	CHECKS THAT ADDRESSING FROM 400000 TO 777777 WORKS
			ALSO CHECKS THAT 'BLT' OPERATES AND TERMINATES CORRECTLY.
			CLEAR MAXIMUM MEMORY USING A PAGED 'BLT'.
			PAGE MAP SHOULD STILL BE SETUP FROM PREVIOUS TEST.

		4764	SET MAXIMUM MEMORY TO ALL ONES USING A PAGED 'BLT'.
			PAGE MAP SETUP FROM PREVIOUS TEST.

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 20            
                                                                                                                           SEQ 0030
		*****************************************************************
	4784	TEST MAXIMUM BASE REGISTER RELOCATION
		*****************************************************************

		4786	SETUP PAGE MAP PAGES AS THE MAXIMUM PAGE
			SETUP PAGE 0 PAGE MAP FOR ERRORS
			SETUP BASE REGISTERS
			TEST MUUO FOR PAGE 0 AND FOR MAX PAGE
			TEST THAT EXEC PAGE FAIL WORD STORES CORRECTLY
			IN MAX PAGE USING MAXIMUM USER BASE REGISTER RELOCATION.

		4835	TEST USER BASE REGISTER RELOCATION
			BY USING AN MUUO OF 0.

		4838	TEST MUUO FIRST WITH EPMP & UPMP AS PAGE 0.

		4866	TEST THAT WITH UPMP RELOCATED TO MAXIMUM PAGE
			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.

		4895	TEST USER BASE REGISTER RELOCATION
			BY USING EXEC PAGE FAIL WORD

		4929	TEST MAXIMUM BASE REGISTER RELOCATION
			BY USING EXEC-PER-PROCESS PAGING
			AND PAGING REFILL DATA FROM MAXIMUM PAGE
			WITH USER BASE REGISTER SET TO MAXIMUM.

		5012	TEST MAXIMUM BASE REGISTER RELOCATION
			BY USING PAGE FAULT TRAP

		5059	TEST MAXIMUM BASE REGISTER RELOCATION
			BY USING TRAPPING

		5071	TEST RELOCATED TRAP 3

		5091	TEST RELOCATED TRAP 2

		5112	TEST RELOCATED TRAP 1

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 21            
                                                                                                                           SEQ 0031
		*****************************************************************
	5137	TEST MAXIMUM PAGE INTERRUPT RELOCATION
		*****************************************************************

		5139	SET PAGE 0 INTERRUPT LOCATIONS AS ERRORS
			SETUP MAX PAGE INTERRUPT LOCATION FOR TESTING
			RELOCATE EXEC BASE REGISTER
			TEST INTERRUPTS

		5180	PAGE 0 INTERRUPT ERROR HANDLER

		5193	MAXIMUM INTERRUPT MACRO'S

		5196	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = APRCHN.

		5209	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = ITRCHN

		5219	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = 7

		5231	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 7

		5239	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = 6

		5251	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 6

		5259	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = 5

		5271	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 5

		5279	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = 4

		5291	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 4

		5299	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = 3

DFKEA DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^          DECDOC VER  00.24   15-SEP-81 09:33:19   PAGE 22            
                                                                                                                           SEQ 0032
		5311	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 3

		5319	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = 2

		5331	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 2

		5339	SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
			INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
			PAGE MAP RELOCATED TO MAXIMUM PAGE.
			INTERRUPT CHANNEL = 1

		5351	INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 1

		*****************************************************************
	5367	TEST MAXIMUM PAGE REFILL RELOCATION
		*****************************************************************

		5369	BY PUTTING REFILL DATA IN MAX PAGE
			AND RELOCATING EXEC BASE REGISTER

		*****************************************************************
	5446	*STOR* RESERVED STORAGE, SEPT 18,1979
		*****************************************************************
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1
DFKEAT	MAC	15-Sep-81 09:29		*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, SEPT 18,1979                              SEQ 0033

     1					;*MAINDEC-10-DFKEA
     2
     3			000000		MCNVER=000
     4			000005		DECVER=005
     5
     6						XLIST
     7						LIST
     8						LALL
     9
    10						NAME	\MCNVER,\DECVER^
    11
    12					TITLE	DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5^
    13
    14	000137				LOC	137
    15	000137	000000	000005		MCNVER,,DECVER
    16
    17					;*COPYRIGHT 1975,1981
    18					;*DIGITAL EQUIPMENT CORPORATION
    19					;*MARLBORO, MASS. 01752
    20
    21					;*JOHN R. KIRCHOFF
    22
    23						NOSYM
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 2
DFKEAT	MAC	15-Sep-81 09:29		DIAGNOSTIC PARAMETERS                                                              SEQ 0034

    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			000001		KL10=	1				;    "    FOR KL10 CP
    32			000001		KL10P0=	1				;    "    FOR KL10 P0
    33			030000		MODDVL=	BEGIN
    34			030000		MODDVU=	BEGIN
    35
    36					;*ACCUMULATOR DEFINITIONS
    37
    38			000006		CNTR=6					;COUNTER AC
    39			000007		AC=7					;COMMON AC 1
    40			000010		AC1=10					;COMMON AC 2
    41			000011		AC2=11					;COMMON AC 3
    42			000012		AC3=12					;COMMON AC 4
    43			000013		ACT=13					;ACTUAL RESULTS AC
    44			000014		COR=14					;CORRECT RESULTS AC
    45			000005		INDX=5					;INDEXING AC
    46
    47					;*MISCELLANEOUS
    48
    49		257000	000000		OPDEF	MAP	[257B8]			;MAP INSTRUCTION
    50		700000	000000		OPDEF	APRID	[7B2]			;USED TO SEE IF MODEL A OR B
    51
    52			042235		PGRDTB=END+1				;440(8) WORD PAGED READ DATA BLOCK
    53			042235		PGWRTB=END+1				;440(8) WORD PAGED WRITE DATA BLOCK
    54			042674		END1=END+440				;NEW END OF PROGRAM
    55
    56			000400		TN0==400				;TRAP NUMBER 0
    57			000200		TN1==200				;TRAP NUMBER 1
    58
    59			000024		MTR=24					;METER DEVICE CODES
    60			000020		TIM=20
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 3
DFKEAT	MAC	15-Sep-81 09:29		DIAGNOSTIC PARAMETERS                                                              SEQ 0035

    61					COMMENT	%
    62					MAP INSTRUCTION READOUT ASSIGNMENTS
    63
    64					BIT 0 - USER ADDRESS
    65					    1 - PAGE FAIL
    66					    2 - ACCESS
    67					    3 - WRITABLE
    68					    4 - SOFTWARE
    69					    6 - PUBLIC
    70					    7 - CACHE
    71					    8 - PAGED REF
    72					    9-13 - 0
    73					    14
    74					    ^ - CORE ADDRESS BITS 14-35
    75					    35
    76
    77					PAGE FAIL ERROR FORMAT
    78					IF BIT 1 = 1
    79
    80						21 = PROPRIETARY VIOLATION
    81						22 = REFILL ERROR (HARDWARE FAILURE
    82						23 = ADDRESS COMPARE
    83						24 = SEC ACCESS FAILURE
    84
    85					PAGE TABLE ENTRY WORD FORMAT
    86
    87					BIT 0 - ACCESS
    88					    1 - PUBLIC
    89					    2 - WRITABLE
    90					    3 - SOFTWARE
    91					    4 - CACHE
    92					    5
    93					    ^ - PHYSICAL PAGE ADDRESS BITS 14-26
    94					   17
    95
    96					;LEFT HALF = EVEN VIRTUAL PAGE
    97					;RIGHT HALF = ODD VIRTUAL PAGE
    98					%
    99
   100					;*DATA SWITCHES
   101
   102					;OPRSEL = ALLOW MAXIMUM TESTING
   103
   104			000002		INHMXQ=2				;INHIBIT RECONFIGURATION QUESTION
   105			000001		INHMAX=1				;INHIBIT MAX RELOCATION TESTING
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 4
DFKEAT	MAC	15-Sep-81 09:29		DIAGNOSTIC PARAMETERS                                                              SEQ 0036

   106					;*BEGIN PARAMETERS
   107
   108			030652		SADR1=	SFSRT1				;SPECIAL FEATURE START
   109			030076		SADR2=	RESRT1				;POWER FAIL RESTART
   110			030000		SADR3=	BEGIN				;NO REENTER START
   111			030000		SADR4=	BEGIN				;NO DDT
   112			030000		SADR5=	BEGIN				;^C - START OVER
   113			030000		SADR6=	BEGIN				;ALTMODE - START OVER
   114		254200	030000		SADR7=	HALT BEGIN
   115		254200	030000		SADR8=	HALT BEGIN
   116		254200	030000		SADR9=	HALT BEGIN
   117		254200	030000		SADR10=	HALT BEGIN
   118		254200	030000		SADR11=	HALT BEGIN
   119
   120			000000		PAREA1=	0				;NO RANDOM
   121			000000		PAREA2=	0				;NO SYS EXR
   122		444653	454100		PAREA3=	SIXBIT/DFKEA/			;PROGRAM NAME
   123			000000		PAREA4=	0				;NO EXTENTION
   124			000000		PAREA5=	0
   125			000000		PAREA6=	0
   126
   127			000000		ITERAT=	0
   128
   129					;MACROS
   130
   131					DEFINE	SUBTST<
   132						MOVEI	.
   133						MOVEM	TESTPC			;SETUP SUBTEST PC >
   134
   135		367640	000000		OPDEF	REPTLP	[SOJG	REPT,]		;REPEAT LOOP
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1
PARAM	KLM	18-Sep-79 17:16		*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, SEPT 18,1979                              SEQ 0037

   136					SUBTTL	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, SEPT 18,1979
   137
   138					DEFINE	S,<; *********************************************************************>
   139
   140					; **********************************************************************
   141					;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
   142					;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
   143					;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
   144					; **********************************************************************
   145
   146			400000		ABORT==	400000			;ABORT PROGRAM ON PASS COMPLETION
   147			200000		RSTART==200000			;RESTART TEST, PRINT TOTALS
   148			100000		TOTALS==100000			;PRINT TOTALS, CONTINUE
   149
   150			040000		NOPNT==	040000			;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
   151			020000		PNTLPT==020000			;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
   152			010000		DING==	010000			;RING BELL ON ERROR
   153
   154			004000		LOOPER==004000			;ENTER EXERCISE/CHECK LOOP ON ERROR
   155			002000		ERSTOP==002000			;HALT ON TEST ERROR
   156			001000		PALERS==001000			;PRINT ALL ERRORS
   157
   158			000400		RELIAB==000400			;RELIABILITY MODE
   159			000200		TXTINH==000200			;INHIBIT ERROR TEXT
   160			000100		INHPAG==000100			;INHIBIT PAGING
   161
   162			000040		MODDVC==000040			;MODIFY DEVICE CODE
   163			000020		INHCSH==000020			;INHIBIT CACHE
   164			000010		OPRSEL==000010			;OPERATOR SELECTION
   165
   166			000004		CHAIN==	000004			;CHAIN CONTROL SWITCH
   167
   168			000002		KAHZ50==000002			;KA10 50 HERTZ POWER
   169
   170									;SWITCH 17 RESERVED !!!
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 2
PARAM	KLM	18-Sep-79 17:16		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979                                SEQ 0038

   171					SUBTTL	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979
   172
   173					; **********************************************************************
   174					;*SPECIAL SUBPROGRAM LINKAGES
   175					; **********************************************************************
   176
   177			027772		FSELNK=	27772	;FILE SELECT LINK
   178			027773		FRDLNK=	27773	;FILE READ LINK
   179			027774		LDLNK=	27774	;LOAD LINKAGE ADDRESS
   180			027775		DDTLNK=	27775	;DDT LINKAGE ADDRESS
   181			027776		MODLNK=	27776	;OPERATIONAL MODE CHECK LINKAGE ADDRESS
   182			027777		SUBLNK=	27777	;SUBROUTINE LINKAGE ADDRESS
   183
   184					; **********************************************************************
   185					;*SPECIAL SUBROUTINE FATAL HALTS
   186					;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
   187					; **********************************************************************
   188
   189					;ADDRESS   TAG	REASON
   190					;---------------------
   191
   192					; 1010 	NOEXEC	;PROGRAM NOT CODED FOR EXEC MODE OPERATION
   193					; 1011  PLERR	;FATAL PUSH LIST POINTER ERROR
   194					; 1012  PLERR1	;INITIAL PUSH LIST POINTER ERROR
   195					; 1013  MUOERR	;MUUO WITH LUUO HANDLER WIPED OUT
   196					; 1014  DTEBER	;DTE20 INTERRUPT WITHOUT DOORBELL
   197					; 1015  DTECER	;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
   198					; 1016  CPIERR	;CPU INITIALIZATION ERROR
   199					; 1017  EOPERR	;END OF PROGRAM ERROR
   200					; 1020  LUOERR	;INTERRUPT WITH LUUO HANDLER WIPED OUT
   201
   202					; **********************************************************************
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 3
PARAM	KLM	18-Sep-79 17:16		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979                                SEQ 0039

   203					; **********************************************************************
   204					;OPERATOR DEFINITIONS (NON-UUO'S)
   205					; **********************************************************************
   206
   207		260740	000000		OPDEF	GO	[PUSHJ	P,]	;SUBROUTINE CALL
   208		263740	000000		OPDEF	RTN	[POPJ	P,]	;SUBROUTINE RETURN 
   209		261740	000000		OPDEF	PUT	[PUSH	P,]	;PUT DATA ON PUSH LIST
   210		262740	000000		OPDEF	GET	[POP	P,]	;GET DATA FROM PUSH LIST 
   211		254000	000000		OPDEF	PJRST	[JRST	]	;JRST TO ROUTINE THAT RTN'S
   212		254200	000000		OPDEF	HALT	[JRST	4,]	;DEFINITION FOR DDT
   213		254100	000000		OPDEF	JRSTF	[JRST	2,]	;DEFINITION FOR DDT
   214		254500	000000		OPDEF	JEN	[JRST	12,]	;DEFINITION FOR DDT
   215
   216					; **********************************************************************
   217					;SUBROUTINE INITIALIZATION CALL
   218					; **********************************************************************
   219
   220		265000	030011		OPDEF	PGMINT	[JSP	0,SBINIT]	;SUBROUTINE INITIALIZATION
   221
   222					; **********************************************************************
   223					;HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
   224					; **********************************************************************
   225
   226		037640	000004		OPDEF	FATAL	[37B8!15B12!4]	;FATAL PROGRAMMING HALT
   227		037600	000004		OPDEF	ERRHLT	[37B8!14B12!4]	;PROGRAM ERROR HALT
   228
   229					; **********************************************************************
   230					;TERMINAL INPUT UUO'S
   231					;ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
   232					;CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
   233					; **********************************************************************
   234
   235		037000	000003		OPDEF	TTICHR 	[37B8!0B12!3]	;TTY, INPUT ANY CHARACTER
   236		037040	000003		OPDEF	TTIYES	[37B8!1B12!3]	;TTY, NORMAL RETURN Y
   237		037100	000003		OPDEF	TTINO	[37B8!2B12!3]	;TTY, NORMAL RETURN N
   238		037140	000003		OPDEF	TTIOCT	[37B8!3B12!3]	;TTY, INPUT OCTAL WORD
   239		037200	000003		OPDEF	TTIDEC	[37B8!4B12!3]	;TTY, INPUT DECIMAL WORD
   240		037240	000003		OPDEF	TTICNV	[37B8!5B12!3]	;TTY, INPUT CONVERTABLE WORD
   241		037300	000003		OPDEF	TTLOOK	[37B8!6B12!3]	;TTY, KEYBOARD CHECK
   242		037340	000003		OPDEF	TTALTM	[37B8!7B12!3]	;TTY, ALT-MODE CHECK
   243		037400	000003		OPDEF	TTSIXB	[37B8!10B12!3]	;TTY, INPUT SIXBIT WORD
   244		037440	000003		OPDEF	TTYINP	[37B8!11B12!3]	;TTY, IMAGE MODE INPUT
   245		037500	000003		OPDEF	TTICLR	[37B8!12B12!3]	;TTY, CLEAR INPUT
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 4
PARAM	KLM	18-Sep-79 17:16		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979                                SEQ 0040

   246					;TERMINAL OUTPUT UUO'S.
   247
   248		037000	000000		OPDEF	PNTA	[37B8!0B12!0]	;PRINT ASCII WORD
   249		037000	000001		OPDEF	PNTAF	[37B8!0B12!1]	;PRINT ASCII WORD FORCED
   250		037740	000000		OPDEF	PNTAL	[37B8!17B12!0]	;PRINT ASCIZ LINE
   251		037740	000001		OPDEF	PNTALF	[37B8!17B12!1]	;PRINT ASCIZ LINE FORCED
   252		037600	000003		OPDEF	PSIXL	[37B8!14B12!3]	;PRINT SIXBIT'Z LINE
   253		037640	000003		OPDEF	PSIXLF	[37B8!15B12!3]	;PRINT SIXBIT'Z LINE FORCED
   254		037000	000000		OPDEF	PNTMSG	[37B8!0B12!0]	;PRINT MESSAGE IMMEDIATE
   255		037040	000000		OPDEF	PNTMSF	[37B8!1B12!0]	;PRINT MESSAGE IMMEDIATE FORCED
   256		037100	000000		OPDEF	PSIXM	[37B8!2B12!0]	;PRINT SIXBIT'Z MSG IMMEDIATE
   257		037200	000000		OPDEF	PSIXMF	[37B8!4B12!0]	;PRINT SIXBIT'Z MSG IMM FORCED
   258		037000	000000		OPDEF	PNTCI	[37B8!0B12!0]	;PRINT CHARACTER IMMEDIATE
   259		037040	000000		OPDEF	PNTCIF	[37B8!1B12!0]	;PRINT CHARACTER IMMEDIATE FORCED
   260		037500	000000		OPDEF	PNTCHR	[37B8!12B12!0]	;PRINT CHARACTER
   261		037500	000001		OPDEF	PNTCHF	[37B8!12B12!1]	;PRINT CHARACTER FORCED
   262		037040	000000		OPDEF	PNT1	[37B8!1B12!0]	;PRINT ONE OCTAL DIGIT
   263		037040	000001		OPDEF	PNT1F	[37B8!1B12!1]	;PRINT 1 OCTAL DIGIT FORCED	
   264		037100	000000		OPDEF	PNT2	[37B8!2B12!0]	;PRINT TWO OCTAL DIGITS
   265		037100	000001		OPDEF	PNT2F	[37B8!2B12!1]	;PRINT 2 OCTAL DIGITS FORCED	
   266		037140	000000		OPDEF	PNT3	[37B8!3B12!0]	;PRINT THREE OCTAL DIGITS
   267		037140	000001		OPDEF	PNT3F	[37B8!3B12!1]	;PRINT THREE OCTAL DIGITS FORCED	
   268		037200	000000		OPDEF	PNT4	[37B8!4B12!0]	;PRINT FOUR OCTAL DIGITS
   269		037200	000001		OPDEF	PNT4F	[37B8!4B12!1]	;PRINT FOUR OCTAL DIGITS FORCED
   270		037240	000000		OPDEF	PNT5	[37B8!5B12!0]	;PRINT FIVE OCTAL DIGITS
   271		037240	000001		OPDEF	PNT5F	[37B8!5B12!1]	;PRINT FIVE OCTAL DIGITS FORCED
   272		037300	000000		OPDEF	PNT6	[37B8!6B12!0]	;PRINT SIX OCTAL DIGITS
   273		037300	000001		OPDEF	PNT6F	[37B8!6B12!1]	;PRINT SIX OCTAL DIGITS FORCED
   274		037340	000000		OPDEF	PNT7	[37B8!7B12!0]	;PRINT 7 OCTAL DIGITS
   275		037340	000001		OPDEF	PNT7F	[37B8!7B12!1]	;PRINT 7 OCTAL DIGITS FORCED
   276		037440	000000		OPDEF	PNT11	[37B8!11B12!0]	;PRINT 11 OCTAL DIGITS
   277		037440	000001		OPDEF	PNT11F	[37B8!11B12!1]	;PRINT 11 OCTAL DIGITS FORCED.
   278		037400	000000		OPDEF	PNTADR	[37B8!10B12!0]	;PRINT PHYSICAL ADDRESS
   279		037400	000001		OPDEF	PNTADF	[37B8!10B12!1]	;PRINT PHYSICAL ADDRESS FORCED
   280		037600	000000		OPDEF	PNTOCT  [37B8!14B12!0]	;PRINT FULL WORD OCTAL
   281		037600	000001		OPDEF	PNTOTF	[37B8!14B12!1]	;PRINT FULL WORD OCTAL FORCED
   282		037540	000000		OPDEF	PNTHW	[37B8!13B12!0]	;PRINT OCTAL HALF WORDS, 6 SP 6
   283		037540	000001		OPDEF	PNTHWF	[37B8!13B12!1]	;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
   284		037700	000003		OPDEF	PNTOCS	[37B8!16B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S
   285		037740	000003		OPDEF	PNTOCF	[37B8!17B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
   286		037640	000000		OPDEF	PNTDEC	[37B8!15B12!0]	;PRINT DECIMAL, SUPRESS LEADING 0'S
   287		037640	000001		OPDEF	PNTDCF	[37B8!15B12!1]	;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
   288		037700	000000		OPDEF	PNTDS	[37B8!16B12!0]	;PRINT DECIMAL, SPACES FOR LD 0'S
   289		037700	000001		OPDEF	PNTDSF	[37B8!16B12!1]	;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 5
PARAM	KLM	18-Sep-79 17:16		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979                                SEQ 0041

   290		037200	000002		OPDEF	PNTNM	[37B8!4B12!2]	;PRINT PROGRAM NAME
   291		037000	000002		OPDEF	PNTSIX	[37B8!0B12!2]	;PRINT SIXBIT WORD
   292		037040	000002		OPDEF	PNTSXF	[37B8!1B12!2]	;PRINT SIXBIT WORD FORCED
   293		037240	000002		OPDEF	DROPDV	[37B8!5B12!2]	;CLOSE LOGICAL FILE, USER MODE
   294		037100	000002		OPDEF	PNTCW	[37B8!2B12!2]	;PRINT DF10 CONTROL WORD
   295		037140	000002		OPDEF	PNTCWF	[37B8!3B12!2]	;PRINT DF10 CONTROL WORD FORCED
   296		037000	030242		OPDEF	PCRL	[37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
   297		037040	030242		OPDEF	PCRLF	[37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
   298		037000	000040		OPDEF	PSP	[37B8!0B12!40]	;PRINT SPACE
   299		037040	000040		OPDEF	PSPF	[37B8!1B12!40]	;PRINT SPACE FORCED
   300		037000	030243		OPDEF	PCRL2	[37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
   301		037040	030243		OPDEF	PCRL2F	[37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
   302		037040	000007		OPDEF	PBELL	[37B8!1B12!7]	;PRINT TTY BELL
   303
   304		037040	000026		OPDEF	PFORCE	[37B8!1B12!26]	;PRINT FORCE, CONTROL O OVERRIDE
   305
   306					DEFINE	PMSG	(ARG),<
   307						PSIXM	[SIXBIT\ARG'_\]>
   308
   309					DEFINE	PMSGF	(ARG),<
   310						PSIXMF	[SIXBIT\ARG'_\]>
   311
   312					;SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
   313					;	CONSERVES CORE OVER ASCIZ
   314
   315					DEFINE	SIXBTZ	(ARG),<	[SIXBIT\ARG'_\]>
   316
   317					;CONSOLE SWITCH INPUT UUO.
   318					;READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
   319					; USER MODE.
   320
   321		037400	000002		OPDEF	SWITCH	[37B8!10B12!2]	;INPUT CONSOLE SWITCHES
   322
   323					;CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
   324					;EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
   325
   326		037540	000004		OPDEF	CLOKOP	[37B8!13B12!4]	;CLOCK OPERATION UUO - PDP-11 CLOCK
   327		037200	000004		OPDEF	MTROP	[37B8!4B12!4]	;CLOCK OPERATION UUO - DK20 METER
   328
   329					;KL10 ONLY CACHE OPERATION UUO'S
   330
   331		037040	000004		OPDEF	CINVAL	[37B8!1B12!4]	;CACHE INVALIDATE
   332		037100	000004		OPDEF	CFLUSH	[37B8!2B12!4]	;CACHE FLUSH
   333		037140	000004		OPDEF	CWRTBI	[37B8!3B12!4]	;CACHE WRITE-BACK & INVALIDATE
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 6
PARAM	KLM	18-Sep-79 17:16		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, SEPT 18,1979                                SEQ 0042

   334					;END OF PASS/PROGRAM UUOS
   335
   336					;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
   337					;DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
   338
   339		037500	000004		OPDEF	ENDUUO	[37B8!12B12!4]	;UUO TO DISPLAY LIGHTS
   340		037700	000004		OPDEF	EOPUUO	[37B8!16B12!4]	;END OF PROGRAM UUO
   341
   342					;MEMORY MANAGEMENT UUO'S
   343					;UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
   344					;ADDRESS CONVERSION, ETC...
   345
   346		037000	000004		OPDEF	MAPMEM	[37B8!0B12!4]	;MAP MEMORY
   347		037500	000002		OPDEF	MEMZRO	[37B8!12B12!2]	;ZERO MEMORY
   348		037440	000002		OPDEF	MEMSEG	[37B8!11B12!2]	;SETUP MEMORY SEGMENT
   349		037540	000002		OPDEF	MAPADR	[37B8!13B12!2]	;VIRTUAL TO PHYSICAL ADR CONVERT
   350		037640	000002		OPDEF	MAPCNK	[37B8!15B12!2]	;MAP MEMORY CHUNK
   351		037600	000002		OPDEF	MAPSET	[37B8!14B12!2]	;SET KI10 EXEC PAGE MAP
   352		037740	000002		OPDEF	MAPPNT	[37B8!17B12!2]	;PRINT MEMORY MAP
   353
   354					;DEVICE CODE MODIFICATION UUO
   355					;ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
   356					;IOT'S TO A DIFFERENT DEVICE CODE.
   357
   358		037340	000002		OPDEF	MODPCU	[37B8!7B12!2]	;MODIFY PERHIPERAL CODE, USER
   359		037300	000002		OPDEF	MODPCP	[37B8!6B12!2]	;MODIFY PERHIPERAL CODE, PROGRAM
   360
   361						IFNDEF	MODDVL,<MODDVL==BEGIN>
   362						IFNDEF	MODDVU,<MODDVU==BEGIN>
   363
   364					;"DIAMON" FILE SELECTION AND READ UUOS
   365
   366		037240	000004		OPDEF	FSELECT	[37B8!5B12!4]	;FILE SELECTION
   367		037300	000004		OPDEF	FREAD	[37B8!6B12!4]	;FILE READ - ASCII DATA
   368		037340	000004		OPDEF	FRD36	[37B8!7B12!4]	;FILE READ - 36 BIT DATA
   369		037400	000004		OPDEF	FRD8	[37B8!10B12!4]	;FILE READ - 8 BIT DATA
   370
   371					;KI10 ONLY UUO FOR PRINTING MARGIN VALUES
   372
   373		037700	000002		OPDEF	PNTMGN	[37B8!16B12!2]	;PRINT MARGIN VALUE
   374
   375						XLIST
   376					IFNDEF	KLOLD,<LIST
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 7
PARAM	KLM	18-Sep-79 17:16		ERROR HANDLING UUO DEFINITIONS, SEPT 18,1979                                       SEQ 0043

   377					SUBTTL	ERROR HANDLING UUO DEFINITIONS, SEPT 18,1979
   378
   379					; **********************************************************************
   380					;ERROR HANDLER PARAMETERS
   381					; **********************************************************************
   382
   383		036000	000000		OPDEF	ERUUO	[36B8]		;ERROR CALL UUO
   384		035000	000000		OPDEF	ERLOOP	[35B8]		;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
   385		035040	000000		OPDEF	ERLP1	[35B8!1B12]	;ERROR LOOP IF PC'S MATCH
   386		035100	000000		OPDEF	ERLP2	[35B8!2B12]	;ERROR LOOP IF ANY ERROR
   387		034000	000000		OPDEF	REPTUO	[34B8]		;REPEAT LOOP UUO
   388
   389					;THE ERROR HANDLER MACROS
   390
   391					;A MACRO TO REPORT AN ERROR AND LOOP
   392
   393						DEFINE	ERROR	(ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
   394												SALL
   395						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   396							   CORECT,,ACTUAL
   397							   [SIXBIT\D'_\],,ERR]
   398												XALL
   399						ERLOOP	ADR		;IF ERROR, LOOP TO ADR
   400					>
   401
   402					;A MACRO TO REPORT AN ERROR AND NOT LOOP
   403
   404						DEFINE	ERROR1	(FORMAT,CORECT,ACTUAL,F,D,ERR)<
   405												SALL
   406						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   407							   CORECT,,ACTUAL
   408							   [SIXBIT\D'_\],,ERR]
   409												XALL>
   410
   411					>;END OF KLOLD CONDITIONAL
   412
   413						XLIST
   414						LIST
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1
FIXED	KLM	18-Sep-79 17:18		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979                           SEQ 0044

   415					SUBTTL	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979
   416
   417	030000					LOC	30000
   418
   419					; **********************************************************************
   420					;PROGRAM STARTING ADDRESSES
   421					;THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
   422					;NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
   423					;OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
   424					;MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
   425					; **********************************************************************
   426
   427	030000	254 00 1 00 027776 	BEGIN:	JRST	@MODLNK		;STAND-ALONE START
   428	030001	254 00 0 00 030613 	$START:	JRST	START		;MODE CHECK STARTING ADDRESS
   429
   430	030002	254 00 1 00 027774 	DIAGMN:	JRST	@LDLNK		;DIAGNOSTIC MONITOR START
   431
   432	030003	254 00 1 00 027774 	SYSEXR:	JRST	@LDLNK		;SYSTEM EXERCISER START
   433
   434	030004	254 00 0 00 030652 	SFSTRT:	JRST	SADR1		;SPECIAL FEATURE START
   435
   436	030005	254 00 0 00 030076 	PFSTRT:	JRST	SADR2		;POWER FAIL RESTART
   437
   438	030006	254 00 0 00 030000 	REENTR:	JRST	SADR3		;REENTER START(USUALLY USER MODE ONLY)
   439
   440	030007				SRTDDT:				;COMMONLY MISTAKEN NAME FOR "DDTSRT"
   441	030007	254 00 1 00 027775 	DDTSRT:	JRST	@DDTLNK		;DDT START
   442
   443	030010	254 00 0 00 030642 	BEGIN1:	JRST	STARTA		;LOOP START(END OF PASS COMES HERE)
   444	030011	254 00 1 00 027777 	SBINIT:	JRST	@SUBLNK		;PMGINT LINKAGE
   445	030012	000000	000000		RETURN:	0			;RETURN ADDRESS STORAGE
   446
   447	030013	254200	030000		START1:	SADR7			;OPTIONAL STARTING ADR/INSTRUCTIONS
   448	030014	254200	030000		START2:	SADR8			; "
   449	030015	254200	030000		START3:	SADR9			; "
   450	030016	254200	030000		START4:	SADR10			; "
   451	030017	254200	030000		START5:	SADR11			; "
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 2
FIXED	KLM	18-Sep-79 17:18		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979                           SEQ 0045

   452					; **********************************************************************
   453					;PROGRAM FIXED PARAMETER AREA
   454					; **********************************************************************
   455
   456	030020	444653	454100		PNTNAM:	PAREA3		;SIXBIT PROGRAM NAME
   457	030021	000000	000000		PNTEXT:	PAREA4		;SIXBIT PROGRAM EXTENSION
   458	030022	000000	000000		RANDBS:	PAREA1		;RANDOM BASE NUMBER
   459	030023	000000	000000		SWTEXR:	PAREA2		;SYSTEM EXERCISER SWITCHES
   460	030024	000000	000000		ITRCNT:	ITERAT		;PROGRAM ITERATIONS
   461	030025	000000	030600		$PNAME:	PGMNAM		;POINTER TO PROGRAMS NAME
   462	030026	000000	000005		$PVER:	MCNVER,,DECVER	;MCN & DEC VERSION LEVEL
   463	030027	000000	030000		$MODVL:	MODDVL		;DEVICE CODE CHANGE LOWER LIMIT
   464	030030	000000	030000		$MODVU:	MODDVU		;DEVICE CODE CHANGE UPPER LIMIT
   465	030031	777777	777777		$EMODE:	IFNDEF EXCASB,<0> IFDEF EXCASB,<-1>	;EXEC ALLOWED
   466	030032	000000	000000		$UMODE:	IFNDEF USRASB,<0> IFDEF USRASB,<-1>	;USER ALLOWED
   467	030033	000000	000000		$DSKUP:	IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1>	;DISK UPDATE MODE
   468	030034	000000	000000		$MMAP:	IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1>	;ALLOW MEMORY RTNS
   469	030035	000000	000000		PAREA7:	PAREA5		;OPTIONAL PARAMETER
   470	030036	000000	000000		PAREA8:	PAREA6		;OPTIONAL PARAMETER
   471
   472					; **********************************************************************
   473					;PROGRAM VARIABLE PARAMETER AREA
   474					; **********************************************************************
   475
   476	030037	000000	000000		USER:	0		; 0 = EXEC, -1 = USER MODE FLAG
   477	030040	000000	000000		KAIFLG:	0		;PROCESSOR TYPE, 0 = KA10, -1 = KI10
   478	030041	000000	000000		KLFLG:	0		;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
   479	030042	777777	777777		MONFLG:	-1		;DIAG MONITOR SPECIAL USER FLAG
   480	030043	000000	000000		MONCTL:	0		;DIAG MON/SYS EXR FLAG
   481	030044	000000	000000		MONTEN:	0		;-1= LOADED BY 10
   482	030045	000000	000000		CLOCKF:	0		;CLOCK TICKED FLAG
   483	030046	000000	000000		CONSW:	0		;CONSOLE SWITCH SETTINGS
   484	030047	000000	000000		PASCNT:	0		;PROGRAM PASS COUNT
   485	030050	000000	000000		RUNFLG:	0		;PROGRAM RUN FLAG
   486	030051	000000	000000		TESTPC:	0		;SUBTEST PC
   487	030052	000000	000000		ERRPC:	0		;ERROR PC
   488	030053	000000	000000		ERRTLS:	0		;ERROR TOTALS
   489	030054	000000	000000		TICKS:	0		;PROGRAM RUNNING TIME
   490	030055	000000	000000		MARGIN:	0		;KI10 MARGIN WORD VALUE
   491	030056	000000	000000		$ONETM:	0		;SUBROUTINE INITIALIZATION FLAG
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 3
FIXED	KLM	18-Sep-79 17:18		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979                           SEQ 0046

   492					; **********************************************************************
   493					;SPECIAL PROGRAM DISPATCH ADDRESSES
   494					; **********************************************************************
   495
   496	030057	037 12 0 00 000004 	BEGEND:	ENDUUO		;END OF PASS
   497	030060	254 00 0 00 030010 	$BEND1:	JRST	BEGIN1	;KEEP RUNNING PROGRAM
   498	030061	037 16 0 00 000004 	$BEND2:	EOPUUO		;END OF PROGRAM - NO RETURN
   499	030062	000000	030000		CNTLC:	SADR5		;CONTROL C XFER ADDRESS
   500	030063	000000	030000		ALTMGO:	SADR6		;ALTMODE XFER ADDRESS
   501	030064				CPOPJ1:			;SKIP RETURN
   502	030064	350 00 0 17 000000 	UUOSKP:	AOS	(P)	;SKIP RETURN FROM UUO
   503	030065				CPOPJ:			;NON-SKIP REGULAR RETURN
   504	030065	263 17 0 00 000000 	UUOEXT:	RTN		;UUO RETURN
   505	030066	255 00 0 00 000000 	UUORTN:	JFCL		;ADDITIONAL USERS UUO ROUTINE
   506	030067	255 00 0 00 000000 	$UORTX:	JFCL		;ADDITIONAL UUO LINKAGE
   507	030070	255 00 0 00 000000 	$UUOER:	JFCL		;INITED AS (JRST $UOERX)
   508	030071	255 00 0 00 000000 	$ITRHL:	JFCL		;ADDITIONAL INTERRUPT LINKAGE
   509	030072	255 00 0 00 000000 	$ITRX1:	JFCL		; "
   510	030073	255 00 0 00 000000 	$USRHL:	JFCL		; "
   511	030074	255 00 0 00 000000 	$RSRTX:	JFCL		;ADDITIONAL POWER FAIL LINKAGE
   512	030075	255 00 0 00 000000 	$RSRTY:	JFCL		; "
   513	030076	255 00 0 00 000000 	RESRT1:	JFCL		; INITED AS (JRST RESRTX)
   514	030077	255 00 0 00 000000 	RESRT2:	JFCL		; "
   515	030100	255 00 0 00 000000 	$PARER:	JFCL		;ADDITIONAL PARITY ERROR LINKAGE
   516	030101	255 00 0 00 000000 	ERMORE:	JFCL		;ADDITIONAL ERROR HANDLER LINKAGE
   517	030102	254 04 0 00 030102 		HALT	.	;IMPROPER TRANSFER HALT
   518
   519	030103	000000	000000		$PSHER:	0		;INITED AS (JRST PSHERR)
   520	030104	000000	000000		ITRCH1:	0		;PC & FLAGS OF CURRENT INTERRUPT
   521	030105	000000	000000			0		;INITED AS (JRST $ITRC1)
   522
   523					; **********************************************************************
   524					;PROCESSOR CONTROL STORAGE
   525					; **********************************************************************
   526
   527	030106	000000	000000		$ACC0:	0		;INTERRUPT SAVED AC0
   528	030107	000000	000000		$SVPI:	0		;INTERRUPT SAVED PI
   529	030110	000000	000000		$SVAPR:	0		;INTERRUPT SAVED APR
   530	030111	000000	000000		$SVPAG:	0		;INTERRUPT SAVED PAG (DATAI)
   531	030112	000000	000000		$SPAG1:	0		;INTERRUPT SAVED PAG (CONI)
   532
   533	030113	000000	000000		$SVUUO:	0		;CURRENT USERS UUO
   534	030114	000000	000000		$SVUPC:	0		;PC OF CURRENT USERS UUO
   535
   536	030115	000000	000000		REPTU:	0		;REPEAT UUO ITERATIONS
   537	030116	000000	000000		SCOPE:	0		;ERROR HANDLER SCOPE LOOP FLAG
   538	030117	000000	000000		%CORFLG:0		; " CORRECT FLAG
   539	030120	000000	000000		%COREC:	0		; " CORRECT DATA
   540	030121	000000	000000		%ACTFL:	0		; " ACTUAL FLAG
   541	030122	000000	000000		%ACTUL:	0		; " ACTUAL DATA
   542	030123	000000	000000		%DISCR:	0		; " DISCREPENCY DATA
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 4
FIXED	KLM	18-Sep-79 17:18		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979                           SEQ 0047

   543					; **********************************************************************
   544					;UUO DISPATCH TABLE
   545					; **********************************************************************
   546						XLIST
   547						LIST
   548	030124	030070	030070		UUODIS:	LUUO1,,$UUOER
   549	030125	030070	030070			LUUO3,,LUUO2
   550	030126	030070	030070			LUUO5,,LUUO4
   551	030127	030070	030070			LUUO7,,LUUO6
   552	030130	030070	030070			LUUO11,,LUUO10
   553	030131	030070	030070			LUUO13,,LUUO12
   554	030132	030070	030070			LUUO15,,LUUO14
   555	030133	030070	030070			LUUO17,,LUUO16
   556	030134	030070	030070			LUUO21,,LUUO20
   557	030135	030070	030070			LUUO23,,LUUO22
   558	030136	030070	030070			LUUO25,,LUUO24
   559	030137	030070	030070			LUUO27,,LUUO26
   560	030140	030070	030070			LUUO31,,LUUO30
   561	030141	030070	030070			LUUO33,,LUUO32
   562
   563					; **********************************************************************
   564					;MEMORY MANAGMENT STORAGE
   565					; **********************************************************************
   566
   567	030142	000000	000000		DF22F:	0		;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
   568	030143	000000	000000		MAPNEW:	0		;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
   569	030144	000000	000000		MEMTOT:	0		;TOTAL MEMORY SIZE IN K (1024.)
   570	030145	000000	000000		MEMLOW:	0		;LOWEST USABLE MEMORY
   571	030146				MEMSIZ:	BLOCK ^D41	;MEMORY SEGMENT POINTER TABLE
   572
   573					; **********************************************************************
   574					;PRINT CONTROL STORAGE
   575					; **********************************************************************
   576
   577	030217	000000	000000		PNTFLG:	0		;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
   578	030220	000000	000000		PNTENB:	0		;PRINT ENABLE
   579	030221	000000	000000		PDISF:	0		;PRINT DISABLED FLAG
   580	030222	000000	000000		PNTINH:	0		;INHIBIT PRINT INPUT CHECKS
   581	030223	000000	000000		PNTSPC:	0		;PRINT SPACE CONTROL
   582	030224	000000	000000		OPTIME:	0		;TYPE-IN WAIT TIME
   583	030225	000000	000000		$TWCNT:	0		;TIME WAITED
   584	030226	000000	000000		$DVOFF:	0		;LOGICAL DEVICE INITED FLAG
   585	030227	000000	000000		TTYFIL:	0		;TTY EXEC FILLERS FLAG
   586	030230	000000	000000		TTYSPD:	0		;TTY EXEC BAUD RATE
   587	030231	000000	000000		$TTCHR:	0		;ACTUAL TYPED IN CHAR
   588	030232	000000	000000		$CHRIN:	0		;UPPER CASED & PARITY STRIPPED CHAR
   589	030233	000000	000000		$TYPNB:	0		;TYPED IN NUMBER
   590	030234	000000	000000		$CRLF:	0		;FREE CR/LF FLAG
   591	030235	000000	000000		$TABF:	0		;TAB CONVERSION FLAG
   592	030236	000000	000000		$FFF:	0		;FORM FEED CONVERSION FLAG
   593	030237	000000	000000		$VTF:	0		;VERTICAL TAB CONVERSION FLAG
   594	030240	000000	000000		USRLFF:	0		;USER LF FILLERS
   595	030241	000000	000000		USRCRF:	0		;USER CR FILLERS
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 5
FIXED	KLM	18-Sep-79 17:18		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979                           SEQ 0048

   596					; **********************************************************************
   597					;THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
   598					;TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
   599					;	MOVEI	NAME
   600					;	PNTA		;OR PNTAF
   601					; **********************************************************************
   602
   603	030242				CRLF:	ASCII/
   604	030242	015 012 000 000 000 	/
   605	030243				CRLF2:	ASCII/
   606
   607	030243	015 012 015 012 000 	/
   608	030244	054 000 000 000 000 	COMMA:	ASCII/,/
   609	030245	056 000 000 000 000 	PERIOD:	ASCII/./
   610	030246	040 000 000 000 000 	SPACE:	ASCII/ /
   611	030247	011 000 000 000 000 	TAB:	ASCII/	/
   612	030250				MINUS:
   613	030250	055 000 000 000 000 	HYPEN:	ASCII/-/
   614	030251	053 000 000 000 000 	PLUS:	ASCII/+/
   615	030252	052 000 000 000 000 	AST:	ASCII/*/
   616	030253	100 000 000 000 000 	ATSIN:	ASCII/@/
   617	030254	050 000 000 000 000 	LFP:	ASCII/(/
   618	030255	051 000 000 000 000 	RTP:	ASCII/)/
   619	030256	007 0000000000 		BELL:	BYTE (7) 007
   620	030257	077 000 000 000 000 	QUEST:	ASCII/?/
   621	030260	057 000 000 000 000 	SLASH:	ASCII!/!
   622	030261	044 000 000 000 000 	DOLLAR:	ASCII/$/
   623	030262	000000	000012		RADIX:	^D10			;DECIMAL PRINT RADIX
   624	030263	000000	000040		RADLSP:	40			;DECIMAL PRINT LEADING CHAR
   625	030264	000000	000012		RADLSC:	^D10			;DECIMAL PRINT LEADING CHAR COUNT
   626
   627					; **********************************************************************
   628					;USER MODE OUTPUT FILE INFORMATION
   629					; **********************************************************************
   630
   631	030265				$OBUF:	BLOCK	3		;LOGICAL FILE OUTPUT BUFFER HEADER
   632	030270	60 62 51 56 64 00 	$OUTNM:	SIXBIT	/PRINT/		;FILE NAME
   633	030271	60 56 64 00 00 00 	$OUTEX:	SIXBIT	/PNT/		;FILE NAME EXTENSION
   634	030272					BLOCK	2
   635
   636					; **********************************************************************
   637					;DISK UPDATE MODE FILE INFORMATION
   638					; **********************************************************************
   639
   640	030274				$IBUF:	BLOCK	3
   641	030277	60 62 51 56 64 00 	$INNM:	SIXBIT	/PRINT/
   642	030300	60 56 64 00 00 00 	$INEXT:	SIXBIT	/PNT/
   643	030301					BLOCK	2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 6
FIXED	KLM	18-Sep-79 17:18		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979                           SEQ 0049

   644					; **********************************************************************
   645					;PUSHDOWN LIST CONTROL INFORMATION
   646					; **********************************************************************
   647
   648	030303	777577	030303		PLIST:	PLIST-PLISTE,,PLIST
   649	030304				PLISTS:	BLOCK	200
   650	030504	000000	000000		PLISTE:	0		;END OF PUSHDOWN LIST
   651
   652					; **********************************************************************
   653					;POWER LINE CLOCK FREQUENCY FLAG
   654					; **********************************************************************
   655
   656	030505	000000	000000		CYCL60:	0	;0 = 60, -1 = 50 CYCLE
   657
   658					; **********************************************************************
   659					;KL10 CACHE CONTROL FLAGS
   660					; **********************************************************************
   661
   662	030506	000000	000000		CSHFLG:	0	;ALLOW CACHE IF 0
   663	030507	000000	000000		CSHMEM:	0	;CACHE MEMORY SEGMENTS IF 0
   664
   665					; **********************************************************************
   666					;NUMBER INPUT DIGIT FLAG
   667					; **********************************************************************
   668
   669	030510	000000	000000		TTNBRF:	0	;-1 IF ANY DIGIT TYPED
   670
   671					; **********************************************************************
   672					;KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
   673					; **********************************************************************
   674
   675	030511	000000	000000		PVPAGI:	0	;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
   676
   677					; **********************************************************************
   678					;ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
   679					; **********************************************************************
   680
   681	030512	000000	000000		%ERHI1:	0	;IF NON-ZERO, XCT'D AT START OF %ERUUO
   682	030513	000000	000000		%ERHI2:	0	;IF NON-ZERO, XCT'D AT END OF %ERUUO
   683	030514	000000	000000		%ERHI3:	0	;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
   684
   685					; **********************************************************************
   686					;SPECIAL USERS UUO INTERCEPT INSTRUCTION
   687					; **********************************************************************
   688
   689	030515	000000	000000		$$UUO:	0	;IF NON-ZERO, XCT'D AT START OF $UORTN
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 7
FIXED	KLM	18-Sep-79 17:18		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, SEPT 18,1979                           SEQ 0050

   690					; **********************************************************************
   691					;USER MODE MONITOR TYPE FLAG
   692					; **********************************************************************
   693
   694	030516	000000	000000		MONTYP:	0	;0 = TOPS10, -1 = TOPS20
   695
   696					; **********************************************************************
   697					;SPECIAL USERS MUUO INTERCEPT INSTRUCTION
   698					; **********************************************************************
   699
   700	030517	000000	000000		$$MUUO:	0	;IF NON-ZERO, XCT'D AT START OF MUUOER
   701
   702					; **********************************************************************
   703					;SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
   704					; **********************************************************************
   705
   706	030520	000000	000000		$$OUTER:0	;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
   707
   708					; **********************************************************************
   709					;"SWITCH" CALL USAGE CONTROL
   710					; **********************************************************************
   711
   712	030521	000000	000000		$$TOGGLE:0	;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
   713
   714					; **********************************************************************
   715					;SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
   716					; **********************************************************************
   717
   718	030522	000000	000000		$$TAX1:	0	;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
   719	030523	000000	000000		$$TAX2:	0	;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
   720
   721					; **********************************************************************
   722					;SM10 (KS-10) PROCESSOR TYPE FLAG
   723					; **********************************************************************
   724
   725	030524	000000	000000		SM10:	0	;IF -1 THIS IS A KS-10
   726
   727					; **********************************************************************
   728					;RIGHT HALF SWITCHES PROMPT TABLE ADDRESS
   729					; **********************************************************************
   730
   731	030525	000000	000000		SWPTAB:	0	;0 = NO PROMPT, ADR = ADR OF SIXBIT PROMPT TABLE
   732
   733					; **********************************************************************
   734					;SPECIAL FUTURE EXPANSION ROOM
   735					; **********************************************************************
   736
   737					; **********************************************************************
   738					;END OF FIXED STORAGE
   739					; **********************************************************************
   740
   741	030577					LOC	30577
   742	030577	000000	000000		ENDFIX:	0		;END OF FIXED STORAGE
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1
DFKEAM	MAC	15-Sep-81 09:29		PROGRAM INITIALIZATION                                                             SEQ 0051

   743					SUBTTL	PROGRAM INITIALIZATION
   744
   745	030600				PGMNAM:	ASCIZ/
   746	030600	015 012 104 105 103 	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC (DFKEA)
   747	030601	123 131 123 124 105 
   748	030602	115 040 113 114 061 
   749	030603	060 040 120 101 107 
   750	030604	111 116 107 040 110 
   751	030605	101 122 104 127 101 
   752	030606	122 105 040 104 111 
   753	030607	101 107 116 117 123 
   754	030610	124 111 103 040 050 
   755	030611	104 106 113 105 101 
   756	030612	051 015 012 000 000 	/
   757	030613	201 00 0 00 030613 	START:	MOVEI	.
   758	030614	202 00 0 00 030051 		MOVEM	TESTPC
   759	030615	476 00 0 00 030506 		SETOM	CSHFLG			;DON'T USE CACHE
   760	030616	476 00 0 00 030511 		SETOM	PVPAGI			;MUST BE PAGED
   761	030617	265 00 0 00 030011 		PGMINT				;INIT SUBROUTINES
   762	030620	201 00 0 00 700000 		MOVEI	700000			;P0
   763	030621	202 00 0 00 042223 		MOVEM	KLUBRX#
   764	030622	7 010 04 0 00 000000 		DATAI	PAG,0			;READ PAGER STATUS
   765	030623	135 07 0 00 036271 		LDB	AC,[POINT 3,0,8]	;GET AC BLK BYTE
   766	030624	137 07 0 00 036272 		DPB	AC,[POINT 3,KLUBRX,26]	;DEPOSIT AC BLK INTO KLUBRX
   767	030625	200 00 0 00 000041 		MOVE	LUUOI
   768	030626	202 00 0 00 042227 		MOVEM	LUUOISV#
   769	030627	200 00 0 00 000502 		MOVE	LPGFTR
   770	030630	202 00 0 00 042232 		MOVEM	PGFAIL#
   771	030631	200 00 0 00 000430 		MOVE	LKNTRP
   772	030632	202 00 0 00 042230 		MOVEM	MUUOER
   773	030633	200 00 0 00 000423 		MOVE	LTRP3T
   774	030634	202 00 0 00 042226 		MOVEM	LTRP3SV#
   775	030635	200 00 0 00 000422 		MOVE	LPDOVT
   776	030636	202 00 0 00 042225 		MOVEM	LPDOVSV#
   777	030637	200 00 0 00 000421 		MOVE	LAROVT
   778	030640	202 00 0 00 042224 		MOVEM	LAROVSV#
   779	030641	402 00 0 00 042231 		SETZM	MXFLG#			;CLEAR TEST MAX FLAG
   780	030642	402 00 0 00 030116 	STARTA:	SETZM	SCOPE			;PRESET ERROR REPEAT SWITCH
   781	030643	402 00 0 00 030052 		SETZM	ERRPC			;PRESET ERROR PC STORAGE
   782	030644	037 10 0 00 000002 		SWITCH
   783	030645	201 07 0 00 000012 		MOVEI	AC,^D10			;SETUP REPEAT FOR 10 SUBLOOPS
   784	030646	607 00 0 00 000400 		TLNN	RELIAB			;FAST CYCLE MODE ?
   785	030647	201 07 0 00 000001 		MOVEI	AC,1			;YES, SUBLOOP JUST ONCE
   786	030650	202 07 0 00 042233 		MOVEM	AC,RPEAT#
   787	030651	254 00 0 00 030655 		JRST	EBRCK0-2
   788
   789	030652	402 00 0 00 030047 	SFSRT1:	SETZM	PASCNT			;SPECIAL FEATURE START
   790	030653	402 00 0 00 030053 		SETZM	ERRTLS
   791	030654	254 00 0 00 030010 		JRST	BEGIN1			;CLEAR PASCNT FOR MAX ADR ?
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 2
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0052

   792					SUBTTL	TEST EXEC BASE REGISTER
   793
   794					SALL
   795			036273		T=	SIXBTZ	BASE REGISTER TEST
   796					LALL
   797
   798					;*LOAD EXEC BASE REGISTER WITH ALL ZERO'S WITH CONO
   799					;*EXEC BASE REGISTER SHOULD THEN BE CLEAR.
   800
   801						SUBTST^
   802	030655	201 00 0 00 030655 		MOVEI	.
   803	030656	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
   804	030657	200 15 0 00 042233 	EBRCK0:	MOVE	REPT,RPEAT		;SETUP REPEAT COUNT
   805	030660	201 14 0 00 000000 		MOVEI	COR,0
   806	030661	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH 0'S
   807	030662	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   808	030663	312 14 0 00 000013 		CAME	COR,ACT			;COMPARE RESULTS
   809						ERROR	EBRCK0+1,13,COR,ACT,EBR,ALL  0'S^
   810												SALL
   811	030664	036 13 0 00 036302 
   812	030665	035 00 0 00 030660 		ERLOOP	EBRCK0+1		;IF ERROR, LOOP TO EBRCK0+1
   813
   814					;*LOAD EXEC BASE REGISTER WITH ALL ONE'S
   815					;*IF ANY BIT IS READ BACK THEN LOAD EBR SHOULD WORK.
   816
   817						SUBTST^
   818	030666	201 00 0 00 030666 		MOVEI	.
   819	030667	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
   820	030670	201 14 0 00 017777 	EBRCK1:	MOVEI	COR,17777
   821	030671	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH ALL 1'S
   822	030672	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   823	030673	7 010 20 0 00 000000 		CONO	PAG,0
   824	030674	336 00 0 00 000013 		SKIPN	ACT			;CHECK FOR ANY BIT SET
   825						ERROR	EBRCK1,13,COR,ACT,EBR,NO BITS SET^
   826	030675	036 13 0 00 036307 
   827	030676	035 00 0 00 030670 		ERLOOP	EBRCK1		;IF ERROR, LOOP TO EBRCK1
   828
   829					;*LOAD EXEC BASE REGISTER WITH TRAP ENABLE BIT
   830
   831						SUBTST^
   832	030677	201 00 0 00 030677 		MOVEI	.
   833	030700	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
   834	030701	201 14 0 00 020000 	EBRC1A:	MOVEI	COR,LTRPEN
   835	030702	7 010 20 0 14 000000 		CONO	PAG,(COR)		;SET TRAP ENABLE
   836	030703	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   837	030704	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   838	030705	312 14 0 00 000013 		CAME	COR,ACT
   839						ERROR	EBRC1A,13,COR,ACT,EBR,TRAP ENABLE BIT^
   840	030706	036 13 0 00 036315 
   841	030707	035 00 0 00 030701 		ERLOOP	EBRC1A		;IF ERROR, LOOP TO EBRC1A
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 3
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0053

   842			000000			XX=0
   843
   844						SUBTST^
   845	030710	201 00 0 00 030710 		MOVEI	.
   846	030711	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
   847					EBRCK2:	REPEAT	^D13,<
   848					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   849					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   850						XX=XX+XX
   851						IFE	XX,<XX=1>
   852						MOVEI	COR,XX
   853						CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   854						CONI	PAG,ACT			;READ BACK
   855						CONO	PAG,LTRPEN
   856						CAME	COR,ACT
   857						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1>
   858
   859					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   860					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   861			000000			XX=XX+XX
   862			000001			IFE	XX,<XX=1>
   863	030712	201 14 0 00 000001 		MOVEI	COR,XX
   864	030713	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   865	030714	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   866	030715	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   867	030716	312 14 0 00 000013 		CAME	COR,ACT
   868						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   869
   870	030717	036 13 0 00 036322 
   871	030720	035 00 0 00 030712 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   872
   873					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   874					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   875			000002			XX=XX+XX
   876						IFE	XX,<XX=1>
   877	030721	201 14 0 00 000002 		MOVEI	COR,XX
   878	030722	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   879	030723	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   880	030724	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   881	030725	312 14 0 00 000013 		CAME	COR,ACT
   882						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   883
   884	030726	036 13 0 00 036322 
   885	030727	035 00 0 00 030721 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   886
   887					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   888					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   889			000004			XX=XX+XX
   890						IFE	XX,<XX=1>
   891	030730	201 14 0 00 000004 		MOVEI	COR,XX
   892	030731	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   893	030732	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   894	030733	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   895	030734	312 14 0 00 000013 		CAME	COR,ACT
   896						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 3-1
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0054

   897
   898	030735	036 13 0 00 036322 
   899	030736	035 00 0 00 030730 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   900
   901					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   902					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   903			000010			XX=XX+XX
   904						IFE	XX,<XX=1>
   905	030737	201 14 0 00 000010 		MOVEI	COR,XX
   906	030740	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   907	030741	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   908	030742	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   909	030743	312 14 0 00 000013 		CAME	COR,ACT
   910						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   911
   912	030744	036 13 0 00 036322 
   913	030745	035 00 0 00 030737 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   914
   915					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   916					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   917			000020			XX=XX+XX
   918						IFE	XX,<XX=1>
   919	030746	201 14 0 00 000020 		MOVEI	COR,XX
   920	030747	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   921	030750	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   922	030751	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   923	030752	312 14 0 00 000013 		CAME	COR,ACT
   924						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   925
   926	030753	036 13 0 00 036322 
   927	030754	035 00 0 00 030746 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   928
   929					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   930					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   931			000040			XX=XX+XX
   932						IFE	XX,<XX=1>
   933	030755	201 14 0 00 000040 		MOVEI	COR,XX
   934	030756	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   935	030757	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   936	030760	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   937	030761	312 14 0 00 000013 		CAME	COR,ACT
   938						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   939
   940	030762	036 13 0 00 036322 
   941	030763	035 00 0 00 030755 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   942
   943					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   944					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   945			000100			XX=XX+XX
   946						IFE	XX,<XX=1>
   947	030764	201 14 0 00 000100 		MOVEI	COR,XX
   948	030765	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   949	030766	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   950	030767	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   951	030770	312 14 0 00 000013 		CAME	COR,ACT
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 3-2
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0055

   952						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   953
   954	030771	036 13 0 00 036322 
   955	030772	035 00 0 00 030764 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   956
   957					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   958					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   959			000200			XX=XX+XX
   960						IFE	XX,<XX=1>
   961	030773	201 14 0 00 000200 		MOVEI	COR,XX
   962	030774	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   963	030775	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   964	030776	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   965	030777	312 14 0 00 000013 		CAME	COR,ACT
   966						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   967
   968	031000	036 13 0 00 036322 
   969	031001	035 00 0 00 030773 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   970
   971					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   972					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   973			000400			XX=XX+XX
   974						IFE	XX,<XX=1>
   975	031002	201 14 0 00 000400 		MOVEI	COR,XX
   976	031003	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   977	031004	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   978	031005	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   979	031006	312 14 0 00 000013 		CAME	COR,ACT
   980						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   981
   982	031007	036 13 0 00 036322 
   983	031010	035 00 0 00 031002 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   984
   985					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
   986					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
   987			001000			XX=XX+XX
   988						IFE	XX,<XX=1>
   989	031011	201 14 0 00 001000 		MOVEI	COR,XX
   990	031012	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
   991	031013	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
   992	031014	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
   993	031015	312 14 0 00 000013 		CAME	COR,ACT
   994						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
   995
   996	031016	036 13 0 00 036322 
   997	031017	035 00 0 00 031011 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
   998
   999					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
  1000					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
  1001			002000			XX=XX+XX
  1002						IFE	XX,<XX=1>
  1003	031020	201 14 0 00 002000 		MOVEI	COR,XX
  1004	031021	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
  1005	031022	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
  1006	031023	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 3-3
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0056

  1007	031024	312 14 0 00 000013 		CAME	COR,ACT
  1008						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
  1009
  1010	031025	036 13 0 00 036322 
  1011	031026	035 00 0 00 031020 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1012
  1013					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
  1014					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
  1015			004000			XX=XX+XX
  1016						IFE	XX,<XX=1>
  1017	031027	201 14 0 00 004000 		MOVEI	COR,XX
  1018	031030	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
  1019	031031	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
  1020	031032	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1021	031033	312 14 0 00 000013 		CAME	COR,ACT
  1022						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
  1023
  1024	031034	036 13 0 00 036322 
  1025	031035	035 00 0 00 031027 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1026
  1027					;*CHECK OUT EXEC BASE REGISTER ONE FLOP AT A TIME.
  1028					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS.
  1029			010000			XX=XX+XX
  1030						IFE	XX,<XX=1>
  1031	031036	201 14 0 00 010000 		MOVEI	COR,XX
  1032	031037	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING ONE
  1033	031040	7 010 24 0 00 000013 		CONI	PAG,ACT			;READ BACK
  1034	031041	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1035	031042	312 14 0 00 000013 		CAME	COR,ACT
  1036						ERROR	.-6,13,COR,ACT,EBR,FLOATING 1
  1037
  1038	031043	036 13 0 00 036322 
  1039	031044	035 00 0 00 031036 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1040
  1041					;*LOAD EXEC BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK
  1042
  1043	031045	201 14 0 00 017777 	EBRCK3:	MOVEI	COR,17777
  1044	031046	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH ALL 1'S
  1045	031047	7 010 24 0 00 000013 		CONI	PAG,ACT
  1046	031050	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1047	031051	312 14 0 00 000013 		CAME	COR,ACT
  1048						ERROR	EBRCK3,13,COR,ACT,EBR,ALL 1'S^
  1049	031052	036 13 0 00 036327 
  1050	031053	035 00 0 00 031045 		ERLOOP	EBRCK3		;IF ERROR, LOOP TO EBRCK3
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 4
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0057

  1051			000000			XX=0
  1052
  1053						SUBTST^
  1054	031054	201 00 0 00 031054 		MOVEI	.
  1055	031055	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  1056					EBRCK4:	REPEAT	^D13,<
  1057					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1058					;*TO CHECK BIT INTERACTION.
  1059						XX=XX+XX
  1060						IFE	XX,<XX=1>
  1061						MOVEI	COR,17777-XX
  1062						CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1063						CONI	PAG,ACT
  1064						CONO	PAG,LTRPEN
  1065						CAME	COR,ACT
  1066						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0>
  1067
  1068					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1069					;*TO CHECK BIT INTERACTION.
  1070			000000			XX=XX+XX
  1071			000001			IFE	XX,<XX=1>
  1072	031056	201 14 0 00 017776 		MOVEI	COR,17777-XX
  1073	031057	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1074	031060	7 010 24 0 00 000013 		CONI	PAG,ACT
  1075	031061	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1076	031062	312 14 0 00 000013 		CAME	COR,ACT
  1077						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1078
  1079	031063	036 13 0 00 036334 
  1080	031064	035 00 0 00 031056 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1081
  1082					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1083					;*TO CHECK BIT INTERACTION.
  1084			000002			XX=XX+XX
  1085						IFE	XX,<XX=1>
  1086	031065	201 14 0 00 017775 		MOVEI	COR,17777-XX
  1087	031066	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1088	031067	7 010 24 0 00 000013 		CONI	PAG,ACT
  1089	031070	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1090	031071	312 14 0 00 000013 		CAME	COR,ACT
  1091						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1092
  1093	031072	036 13 0 00 036334 
  1094	031073	035 00 0 00 031065 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1095
  1096					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1097					;*TO CHECK BIT INTERACTION.
  1098			000004			XX=XX+XX
  1099						IFE	XX,<XX=1>
  1100	031074	201 14 0 00 017773 		MOVEI	COR,17777-XX
  1101	031075	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1102	031076	7 010 24 0 00 000013 		CONI	PAG,ACT
  1103	031077	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1104	031100	312 14 0 00 000013 		CAME	COR,ACT
  1105						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 4-1
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0058

  1106
  1107	031101	036 13 0 00 036334 
  1108	031102	035 00 0 00 031074 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1109
  1110					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1111					;*TO CHECK BIT INTERACTION.
  1112			000010			XX=XX+XX
  1113						IFE	XX,<XX=1>
  1114	031103	201 14 0 00 017767 		MOVEI	COR,17777-XX
  1115	031104	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1116	031105	7 010 24 0 00 000013 		CONI	PAG,ACT
  1117	031106	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1118	031107	312 14 0 00 000013 		CAME	COR,ACT
  1119						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1120
  1121	031110	036 13 0 00 036334 
  1122	031111	035 00 0 00 031103 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1123
  1124					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1125					;*TO CHECK BIT INTERACTION.
  1126			000020			XX=XX+XX
  1127						IFE	XX,<XX=1>
  1128	031112	201 14 0 00 017757 		MOVEI	COR,17777-XX
  1129	031113	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1130	031114	7 010 24 0 00 000013 		CONI	PAG,ACT
  1131	031115	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1132	031116	312 14 0 00 000013 		CAME	COR,ACT
  1133						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1134
  1135	031117	036 13 0 00 036334 
  1136	031120	035 00 0 00 031112 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1137
  1138					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1139					;*TO CHECK BIT INTERACTION.
  1140			000040			XX=XX+XX
  1141						IFE	XX,<XX=1>
  1142	031121	201 14 0 00 017737 		MOVEI	COR,17777-XX
  1143	031122	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1144	031123	7 010 24 0 00 000013 		CONI	PAG,ACT
  1145	031124	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1146	031125	312 14 0 00 000013 		CAME	COR,ACT
  1147						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1148
  1149	031126	036 13 0 00 036334 
  1150	031127	035 00 0 00 031121 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1151
  1152					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1153					;*TO CHECK BIT INTERACTION.
  1154			000100			XX=XX+XX
  1155						IFE	XX,<XX=1>
  1156	031130	201 14 0 00 017677 		MOVEI	COR,17777-XX
  1157	031131	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1158	031132	7 010 24 0 00 000013 		CONI	PAG,ACT
  1159	031133	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1160	031134	312 14 0 00 000013 		CAME	COR,ACT
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 4-2
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0059

  1161						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1162
  1163	031135	036 13 0 00 036334 
  1164	031136	035 00 0 00 031130 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1165
  1166					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1167					;*TO CHECK BIT INTERACTION.
  1168			000200			XX=XX+XX
  1169						IFE	XX,<XX=1>
  1170	031137	201 14 0 00 017577 		MOVEI	COR,17777-XX
  1171	031140	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1172	031141	7 010 24 0 00 000013 		CONI	PAG,ACT
  1173	031142	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1174	031143	312 14 0 00 000013 		CAME	COR,ACT
  1175						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1176
  1177	031144	036 13 0 00 036334 
  1178	031145	035 00 0 00 031137 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1179
  1180					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1181					;*TO CHECK BIT INTERACTION.
  1182			000400			XX=XX+XX
  1183						IFE	XX,<XX=1>
  1184	031146	201 14 0 00 017377 		MOVEI	COR,17777-XX
  1185	031147	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1186	031150	7 010 24 0 00 000013 		CONI	PAG,ACT
  1187	031151	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1188	031152	312 14 0 00 000013 		CAME	COR,ACT
  1189						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1190
  1191	031153	036 13 0 00 036334 
  1192	031154	035 00 0 00 031146 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1193
  1194					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1195					;*TO CHECK BIT INTERACTION.
  1196			001000			XX=XX+XX
  1197						IFE	XX,<XX=1>
  1198	031155	201 14 0 00 016777 		MOVEI	COR,17777-XX
  1199	031156	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1200	031157	7 010 24 0 00 000013 		CONI	PAG,ACT
  1201	031160	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1202	031161	312 14 0 00 000013 		CAME	COR,ACT
  1203						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1204
  1205	031162	036 13 0 00 036334 
  1206	031163	035 00 0 00 031155 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1207
  1208					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1209					;*TO CHECK BIT INTERACTION.
  1210			002000			XX=XX+XX
  1211						IFE	XX,<XX=1>
  1212	031164	201 14 0 00 015777 		MOVEI	COR,17777-XX
  1213	031165	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1214	031166	7 010 24 0 00 000013 		CONI	PAG,ACT
  1215	031167	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 4-3
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC BASE REGISTER                                                            SEQ 0060

  1216	031170	312 14 0 00 000013 		CAME	COR,ACT
  1217						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1218
  1219	031171	036 13 0 00 036334 
  1220	031172	035 00 0 00 031164 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1221
  1222					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1223					;*TO CHECK BIT INTERACTION.
  1224			004000			XX=XX+XX
  1225						IFE	XX,<XX=1>
  1226	031173	201 14 0 00 013777 		MOVEI	COR,17777-XX
  1227	031174	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1228	031175	7 010 24 0 00 000013 		CONI	PAG,ACT
  1229	031176	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1230	031177	312 14 0 00 000013 		CAME	COR,ACT
  1231						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1232
  1233	031200	036 13 0 00 036334 
  1234	031201	035 00 0 00 031173 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1235
  1236					;*LOAD AND CHECK EXEC BASE REGISTER WITH A FLOATING ZERO
  1237					;*TO CHECK BIT INTERACTION.
  1238			010000			XX=XX+XX
  1239						IFE	XX,<XX=1>
  1240	031202	201 14 0 00 007777 		MOVEI	COR,17777-XX
  1241	031203	7 010 20 0 14 000000 		CONO	PAG,(COR)		;LOAD EBR WITH A FLOATING 0
  1242	031204	7 010 24 0 00 000013 		CONI	PAG,ACT
  1243	031205	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1244	031206	312 14 0 00 000013 		CAME	COR,ACT
  1245						ERROR	.-6,13,COR,ACT,EBR,FLOATING 0
  1246
  1247	031207	036 13 0 00 036334 
  1248	031210	035 00 0 00 031202 		ERLOOP	.-6		;IF ERROR, LOOP TO .-6
  1249	031211	367 15 0 00 030660 		REPTLP	EBRCK0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 5
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0061

  1250					SUBTTL	TEST USER BASE REGISTER
  1251
  1252					;*LOAD USER BASE REGISTER WITH ALL ZERO'S.
  1253					;*USER BASE REGISTER SHOULD THEN BE CLEAR.
  1254
  1255						SUBTST^
  1256	031212	201 00 0 00 031212 		MOVEI	.
  1257	031213	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  1258	031214	200 15 0 00 042233 	UBRCK0:	MOVE	REPT,RPEAT
  1259	031215	200 14 0 00 036337 		MOVE	COR,[LLDUSB,,400000]
  1260	031216	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH 0'S
  1261	031217	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1262	031220	620 14 0 00 400000 		TRZ	COR,400000
  1263	031221	205 14 1 00 042223 		MOVSI	COR,@KLUBRX
  1264	031222	312 14 0 00 000013 		CAME	COR,ACT
  1265						ERROR	UBRCK0+1,13,COR,ACT,UBR,ALL 0'S^
  1266	031223	036 13 0 00 036343 
  1267	031224	035 00 0 00 031215 		ERLOOP	UBRCK0+1		;IF ERROR, LOOP TO UBRCK0+1
  1268
  1269					;*LOAD USER BASE REGISTER WITH ALL ONE'S.
  1270					;*IF ANY BIT IS READ BACK THEN LOAD UBR SHOULD WORK.
  1271
  1272	031225	200 14 0 00 036346 	UBRCK1:	MOVE	COR,[LLDUSB,,417777]
  1273	031226	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH ALL ONES
  1274	031227	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1275	031230	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1276	031231	620 14 0 00 400000 		TRZ	COR,400000
  1277	031232	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1278	031233	336 00 0 00 000013 		SKIPN	ACT			;CHECK FOR ANY BIT SET
  1279						ERROR	UBRCK1,13,COR,ACT,UBR,NO BITS SET^
  1280	031234	036 13 0 00 036347 
  1281	031235	035 00 0 00 031225 		ERLOOP	UBRCK1		;IF ERROR, LOOP TO UBRCK1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 6
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0062

  1282			000000			XX=0
  1283
  1284						SUBTST^
  1285	031236	201 00 0 00 031236 		MOVEI	.
  1286	031237	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  1287					UBRCK2:	REPEAT	^D13,<
  1288					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1289					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1290						XX=XX+XX
  1291						IFE	XX,<XX=1>
  1292						MOVE	COR,[LLDUSB,,400000!XX]
  1293						DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1294						DATAI	PAG,ACT
  1295						DATAO	PAG,[LLDUSB,,400000]
  1296						TRZ	COR,400000
  1297						HRLI	COR,@KLUBRX
  1298						CAME	COR,ACT
  1299						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1>
  1300
  1301					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1302					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1303			000000			XX=XX+XX
  1304			000001			IFE	XX,<XX=1>
  1305	031240	200 14 0 00 036352 		MOVE	COR,[LLDUSB,,400000!XX]
  1306	031241	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1307	031242	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1308	031243	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1309	031244	620 14 0 00 400000 		TRZ	COR,400000
  1310	031245	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1311	031246	312 14 0 00 000013 		CAME	COR,ACT
  1312						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1313
  1314	031247	036 13 0 00 036353 
  1315	031250	035 00 0 00 031240 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1316
  1317					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1318					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1319			000002			XX=XX+XX
  1320						IFE	XX,<XX=1>
  1321	031251	200 14 0 00 036356 		MOVE	COR,[LLDUSB,,400000!XX]
  1322	031252	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1323	031253	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1324	031254	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1325	031255	620 14 0 00 400000 		TRZ	COR,400000
  1326	031256	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1327	031257	312 14 0 00 000013 		CAME	COR,ACT
  1328						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1329
  1330	031260	036 13 0 00 036353 
  1331	031261	035 00 0 00 031251 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1332
  1333					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1334					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1335			000004			XX=XX+XX
  1336						IFE	XX,<XX=1>
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 6-1
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0063

  1337	031262	200 14 0 00 036357 		MOVE	COR,[LLDUSB,,400000!XX]
  1338	031263	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1339	031264	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1340	031265	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1341	031266	620 14 0 00 400000 		TRZ	COR,400000
  1342	031267	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1343	031270	312 14 0 00 000013 		CAME	COR,ACT
  1344						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1345
  1346	031271	036 13 0 00 036353 
  1347	031272	035 00 0 00 031262 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1348
  1349					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1350					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1351			000010			XX=XX+XX
  1352						IFE	XX,<XX=1>
  1353	031273	200 14 0 00 036360 		MOVE	COR,[LLDUSB,,400000!XX]
  1354	031274	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1355	031275	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1356	031276	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1357	031277	620 14 0 00 400000 		TRZ	COR,400000
  1358	031300	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1359	031301	312 14 0 00 000013 		CAME	COR,ACT
  1360						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1361
  1362	031302	036 13 0 00 036353 
  1363	031303	035 00 0 00 031273 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1364
  1365					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1366					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1367			000020			XX=XX+XX
  1368						IFE	XX,<XX=1>
  1369	031304	200 14 0 00 036361 		MOVE	COR,[LLDUSB,,400000!XX]
  1370	031305	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1371	031306	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1372	031307	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1373	031310	620 14 0 00 400000 		TRZ	COR,400000
  1374	031311	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1375	031312	312 14 0 00 000013 		CAME	COR,ACT
  1376						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1377
  1378	031313	036 13 0 00 036353 
  1379	031314	035 00 0 00 031304 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1380
  1381					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1382					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1383			000040			XX=XX+XX
  1384						IFE	XX,<XX=1>
  1385	031315	200 14 0 00 036362 		MOVE	COR,[LLDUSB,,400000!XX]
  1386	031316	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1387	031317	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1388	031320	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1389	031321	620 14 0 00 400000 		TRZ	COR,400000
  1390	031322	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1391	031323	312 14 0 00 000013 		CAME	COR,ACT
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 6-2
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0064

  1392						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1393
  1394	031324	036 13 0 00 036353 
  1395	031325	035 00 0 00 031315 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1396
  1397					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1398					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1399			000100			XX=XX+XX
  1400						IFE	XX,<XX=1>
  1401	031326	200 14 0 00 036363 		MOVE	COR,[LLDUSB,,400000!XX]
  1402	031327	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1403	031330	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1404	031331	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1405	031332	620 14 0 00 400000 		TRZ	COR,400000
  1406	031333	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1407	031334	312 14 0 00 000013 		CAME	COR,ACT
  1408						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1409
  1410	031335	036 13 0 00 036353 
  1411	031336	035 00 0 00 031326 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1412
  1413					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1414					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1415			000200			XX=XX+XX
  1416						IFE	XX,<XX=1>
  1417	031337	200 14 0 00 036364 		MOVE	COR,[LLDUSB,,400000!XX]
  1418	031340	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1419	031341	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1420	031342	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1421	031343	620 14 0 00 400000 		TRZ	COR,400000
  1422	031344	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1423	031345	312 14 0 00 000013 		CAME	COR,ACT
  1424						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1425
  1426	031346	036 13 0 00 036353 
  1427	031347	035 00 0 00 031337 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1428
  1429					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1430					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1431			000400			XX=XX+XX
  1432						IFE	XX,<XX=1>
  1433	031350	200 14 0 00 036365 		MOVE	COR,[LLDUSB,,400000!XX]
  1434	031351	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1435	031352	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1436	031353	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1437	031354	620 14 0 00 400000 		TRZ	COR,400000
  1438	031355	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1439	031356	312 14 0 00 000013 		CAME	COR,ACT
  1440						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1441
  1442	031357	036 13 0 00 036353 
  1443	031360	035 00 0 00 031350 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1444
  1445					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1446					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 6-3
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0065

  1447			001000			XX=XX+XX
  1448						IFE	XX,<XX=1>
  1449	031361	200 14 0 00 036366 		MOVE	COR,[LLDUSB,,400000!XX]
  1450	031362	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1451	031363	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1452	031364	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1453	031365	620 14 0 00 400000 		TRZ	COR,400000
  1454	031366	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1455	031367	312 14 0 00 000013 		CAME	COR,ACT
  1456						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1457
  1458	031370	036 13 0 00 036353 
  1459	031371	035 00 0 00 031361 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1460
  1461					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1462					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1463			002000			XX=XX+XX
  1464						IFE	XX,<XX=1>
  1465	031372	200 14 0 00 036367 		MOVE	COR,[LLDUSB,,400000!XX]
  1466	031373	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1467	031374	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1468	031375	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1469	031376	620 14 0 00 400000 		TRZ	COR,400000
  1470	031377	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1471	031400	312 14 0 00 000013 		CAME	COR,ACT
  1472						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1473
  1474	031401	036 13 0 00 036353 
  1475	031402	035 00 0 00 031372 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1476
  1477					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1478					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1479			004000			XX=XX+XX
  1480						IFE	XX,<XX=1>
  1481	031403	200 14 0 00 036370 		MOVE	COR,[LLDUSB,,400000!XX]
  1482	031404	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1483	031405	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1484	031406	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1485	031407	620 14 0 00 400000 		TRZ	COR,400000
  1486	031410	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1487	031411	312 14 0 00 000013 		CAME	COR,ACT
  1488						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1489
  1490	031412	036 13 0 00 036353 
  1491	031413	035 00 0 00 031403 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1492
  1493					;*CHECK OUT USER BASE REGISTER ONE FLOP AT A TIME.
  1494					;*ON A FAILURE CHECK CORRESPONDING FLOP AND CONTROL SIGNALS
  1495			010000			XX=XX+XX
  1496						IFE	XX,<XX=1>
  1497	031414	200 14 0 00 036371 		MOVE	COR,[LLDUSB,,400000!XX]
  1498	031415	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 1
  1499	031416	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1500	031417	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1501	031420	620 14 0 00 400000 		TRZ	COR,400000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 6-4
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0066

  1502	031421	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1503	031422	312 14 0 00 000013 		CAME	COR,ACT
  1504						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 1
  1505
  1506	031423	036 13 0 00 036353 
  1507	031424	035 00 0 00 031414 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 7
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0067

  1508					;*LOAD USER BASE REGISTER WITH ALL ONE'S AS ADDITIONAL CHECK.
  1509
  1510	031425	200 14 0 00 036346 	UBRCK3:	MOVE	COR,[LLDUSB,,417777]
  1511	031426	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH ALL ONES
  1512	031427	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1513	031430	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1514	031431	620 14 0 00 400000 		TRZ	COR,400000
  1515	031432	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1516	031433	312 14 0 00 000013 		CAME	COR,ACT
  1517						ERROR	UBRCK3,13,COR,ACT,UBR,ALL 1'S^
  1518	031434	036 13 0 00 036372 
  1519	031435	035 00 0 00 031425 		ERLOOP	UBRCK3		;IF ERROR, LOOP TO UBRCK3
  1520
  1521			000000			XX=0
  1522
  1523					UBRCK4:	REPEAT	^D13,<
  1524					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1525					;*CHECK BIT INTERACTION.
  1526						XX=XX+XX
  1527						IFE	XX,<XX=1>
  1528						MOVE	COR,[LLDUSB,,417777-XX]
  1529						DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1530						DATAI	PAG,ACT
  1531						DATAO	PAG,[LLDUSB,,400000]
  1532						TRZ	COR,400000
  1533						HRLI	COR,@KLUBRX
  1534						CAME	COR,ACT
  1535						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0>
  1536
  1537					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1538					;*CHECK BIT INTERACTION.
  1539			000000			XX=XX+XX
  1540			000001			IFE	XX,<XX=1>
  1541	031436	200 14 0 00 036375 		MOVE	COR,[LLDUSB,,417777-XX]
  1542	031437	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1543	031440	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1544	031441	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1545	031442	620 14 0 00 400000 		TRZ	COR,400000
  1546	031443	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1547	031444	312 14 0 00 000013 		CAME	COR,ACT
  1548						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1549
  1550	031445	036 13 0 00 036376 
  1551	031446	035 00 0 00 031436 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1552
  1553					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1554					;*CHECK BIT INTERACTION.
  1555			000002			XX=XX+XX
  1556						IFE	XX,<XX=1>
  1557	031447	200 14 0 00 036401 		MOVE	COR,[LLDUSB,,417777-XX]
  1558	031450	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1559	031451	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1560	031452	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1561	031453	620 14 0 00 400000 		TRZ	COR,400000
  1562	031454	505 14 1 00 042223 		HRLI	COR,@KLUBRX
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 7-1
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0068

  1563	031455	312 14 0 00 000013 		CAME	COR,ACT
  1564						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1565
  1566	031456	036 13 0 00 036376 
  1567	031457	035 00 0 00 031447 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1568
  1569					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1570					;*CHECK BIT INTERACTION.
  1571			000004			XX=XX+XX
  1572						IFE	XX,<XX=1>
  1573	031460	200 14 0 00 036402 		MOVE	COR,[LLDUSB,,417777-XX]
  1574	031461	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1575	031462	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1576	031463	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1577	031464	620 14 0 00 400000 		TRZ	COR,400000
  1578	031465	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1579	031466	312 14 0 00 000013 		CAME	COR,ACT
  1580						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1581
  1582	031467	036 13 0 00 036376 
  1583	031470	035 00 0 00 031460 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1584
  1585					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1586					;*CHECK BIT INTERACTION.
  1587			000010			XX=XX+XX
  1588						IFE	XX,<XX=1>
  1589	031471	200 14 0 00 036403 		MOVE	COR,[LLDUSB,,417777-XX]
  1590	031472	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1591	031473	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1592	031474	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1593	031475	620 14 0 00 400000 		TRZ	COR,400000
  1594	031476	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1595	031477	312 14 0 00 000013 		CAME	COR,ACT
  1596						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1597
  1598	031500	036 13 0 00 036376 
  1599	031501	035 00 0 00 031471 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1600
  1601					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1602					;*CHECK BIT INTERACTION.
  1603			000020			XX=XX+XX
  1604						IFE	XX,<XX=1>
  1605	031502	200 14 0 00 036404 		MOVE	COR,[LLDUSB,,417777-XX]
  1606	031503	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1607	031504	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1608	031505	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1609	031506	620 14 0 00 400000 		TRZ	COR,400000
  1610	031507	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1611	031510	312 14 0 00 000013 		CAME	COR,ACT
  1612						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1613
  1614	031511	036 13 0 00 036376 
  1615	031512	035 00 0 00 031502 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1616
  1617					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 7-2
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0069

  1618					;*CHECK BIT INTERACTION.
  1619			000040			XX=XX+XX
  1620						IFE	XX,<XX=1>
  1621	031513	200 14 0 00 036405 		MOVE	COR,[LLDUSB,,417777-XX]
  1622	031514	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1623	031515	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1624	031516	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1625	031517	620 14 0 00 400000 		TRZ	COR,400000
  1626	031520	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1627	031521	312 14 0 00 000013 		CAME	COR,ACT
  1628						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1629
  1630	031522	036 13 0 00 036376 
  1631	031523	035 00 0 00 031513 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1632
  1633					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1634					;*CHECK BIT INTERACTION.
  1635			000100			XX=XX+XX
  1636						IFE	XX,<XX=1>
  1637	031524	200 14 0 00 036406 		MOVE	COR,[LLDUSB,,417777-XX]
  1638	031525	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1639	031526	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1640	031527	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1641	031530	620 14 0 00 400000 		TRZ	COR,400000
  1642	031531	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1643	031532	312 14 0 00 000013 		CAME	COR,ACT
  1644						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1645
  1646	031533	036 13 0 00 036376 
  1647	031534	035 00 0 00 031524 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1648
  1649					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1650					;*CHECK BIT INTERACTION.
  1651			000200			XX=XX+XX
  1652						IFE	XX,<XX=1>
  1653	031535	200 14 0 00 036407 		MOVE	COR,[LLDUSB,,417777-XX]
  1654	031536	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1655	031537	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1656	031540	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1657	031541	620 14 0 00 400000 		TRZ	COR,400000
  1658	031542	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1659	031543	312 14 0 00 000013 		CAME	COR,ACT
  1660						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1661
  1662	031544	036 13 0 00 036376 
  1663	031545	035 00 0 00 031535 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1664
  1665					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1666					;*CHECK BIT INTERACTION.
  1667			000400			XX=XX+XX
  1668						IFE	XX,<XX=1>
  1669	031546	200 14 0 00 036410 		MOVE	COR,[LLDUSB,,417777-XX]
  1670	031547	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1671	031550	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1672	031551	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 7-3
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0070

  1673	031552	620 14 0 00 400000 		TRZ	COR,400000
  1674	031553	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1675	031554	312 14 0 00 000013 		CAME	COR,ACT
  1676						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1677
  1678	031555	036 13 0 00 036376 
  1679	031556	035 00 0 00 031546 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1680
  1681					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1682					;*CHECK BIT INTERACTION.
  1683			001000			XX=XX+XX
  1684						IFE	XX,<XX=1>
  1685	031557	200 14 0 00 036411 		MOVE	COR,[LLDUSB,,417777-XX]
  1686	031560	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1687	031561	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1688	031562	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1689	031563	620 14 0 00 400000 		TRZ	COR,400000
  1690	031564	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1691	031565	312 14 0 00 000013 		CAME	COR,ACT
  1692						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1693
  1694	031566	036 13 0 00 036376 
  1695	031567	035 00 0 00 031557 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1696
  1697					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1698					;*CHECK BIT INTERACTION.
  1699			002000			XX=XX+XX
  1700						IFE	XX,<XX=1>
  1701	031570	200 14 0 00 036412 		MOVE	COR,[LLDUSB,,417777-XX]
  1702	031571	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1703	031572	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1704	031573	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1705	031574	620 14 0 00 400000 		TRZ	COR,400000
  1706	031575	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1707	031576	312 14 0 00 000013 		CAME	COR,ACT
  1708						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1709
  1710	031577	036 13 0 00 036376 
  1711	031600	035 00 0 00 031570 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1712
  1713					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1714					;*CHECK BIT INTERACTION.
  1715			004000			XX=XX+XX
  1716						IFE	XX,<XX=1>
  1717	031601	200 14 0 00 036413 		MOVE	COR,[LLDUSB,,417777-XX]
  1718	031602	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1719	031603	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1720	031604	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1721	031605	620 14 0 00 400000 		TRZ	COR,400000
  1722	031606	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1723	031607	312 14 0 00 000013 		CAME	COR,ACT
  1724						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1725
  1726	031610	036 13 0 00 036376 
  1727	031611	035 00 0 00 031601 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 7-4
DFKEAM	MAC	15-Sep-81 09:29		TEST USER BASE REGISTER                                                            SEQ 0071

  1728
  1729					;*LOAD USER BASE REGISTER WITH A FLOATING ZERO
  1730					;*CHECK BIT INTERACTION.
  1731			010000			XX=XX+XX
  1732						IFE	XX,<XX=1>
  1733	031612	200 14 0 00 036414 		MOVE	COR,[LLDUSB,,417777-XX]
  1734	031613	7 010 14 0 00 000014 		DATAO	PAG,COR			;LOAD UBR WITH A FLOATING 0
  1735	031614	7 010 04 0 00 000013 		DATAI	PAG,ACT
  1736	031615	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1737	031616	620 14 0 00 400000 		TRZ	COR,400000
  1738	031617	505 14 1 00 042223 		HRLI	COR,@KLUBRX
  1739	031620	312 14 0 00 000013 		CAME	COR,ACT
  1740						ERROR	.-^D8,13,COR,ACT,UBR,FLOATING 0
  1741
  1742	031621	036 13 0 00 036376 
  1743	031622	035 00 0 00 031612 		ERLOOP	.-^D8		;IF ERROR, LOOP TO .-^D8
  1744	031623	367 15 0 00 031215 		REPTLP	UBRCK0+1
  1745
  1746						XLIST
  1747						LIST
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 14
DFKEAM	MAC	15-Sep-81 09:29		TEST PROCESSOR TRAPS                                                               SEQ 0072

  1748					SUBTTL	TEST PROCESSOR TRAPS
  1749
  1750					SALL
  1751			036415		T=SIXBTZ	PROCESSOR TRAP TEST
  1752					LALL
  1753
  1754						SUBTST^
  1755	031624	201 00 0 00 031624 		MOVEI	.
  1756	031625	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  1757	031626	200 15 0 00 042233 	P0TRP0:	MOVE	REPT,RPEAT
  1758	031627	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1759	031630	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1760
  1761					;*TEST TRAP 3 TRAP
  1762
  1763	031631	200 07 0 00 036421 	P0TRP1:	MOVE	AC,[JSR	P0TP3]
  1764	031632	202 07 0 00 000423 		MOVEM	AC,LTRP3T
  1765	031633	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1766	031634	254 02 1 00 031635 		JRSTF	@.+1
  1767	031635	000600	031636			TN0!TN1,,.+1
  1768	031636	200 00 0 00 042226 	P0TP3X:	MOVE	LTRP3SV
  1769	031637	202 00 0 00 000423 		MOVEM	LTRP3T
  1770						ERROR1	13,0,0,TRAP 3 FAILED,FATAL^
  1771												SALL
  1772	031640	036 13 0 00 036426 
  1773	031641	254 00 0 00 031626 		JRST	P0TRP0
  1774
  1775	031642	000000	000000		P0TP3:	0
  1776	031643	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1777	031644	200 00 0 00 042226 		MOVE	LTRP3SV
  1778	031645	202 00 0 00 000423 		MOVEM	LTRP3T
  1779	031646	200 14 0 00 036431 		MOVE	COR,[0,,P0TP3X]
  1780	031647	200 13 0 00 031642 		MOVE	ACT,P0TP3
  1781	031650	312 14 0 00 000013 		CAME	COR,ACT
  1782						ERROR	P0TRP1,13,COR,ACT,TRAP 3 SAVED PC^
  1783	031651	036 13 0 00 036435 
  1784	031652	035 00 0 00 031631 		ERLOOP	P0TRP1		;IF ERROR, LOOP TO P0TRP1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 15
DFKEAM	MAC	15-Sep-81 09:29		TEST PROCESSOR TRAPS                                                               SEQ 0073

  1785					;*TEST PUSHDOWN OVERFLOW TRAP
  1786
  1787	031653	200 07 0 00 036440 		MOVE	AC,[JSR P0PDL]
  1788	031654	202 07 0 00 000422 		MOVEM	AC,LPDOVT
  1789	031655	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1790	031656	254 02 1 00 031657 		JRSTF	@.+1
  1791	031657	000400	031660			TN0,,.+1
  1792	031660	200 00 0 00 042225 	P0PDLX:	MOVE	LPDOVSV
  1793	031661	202 00 0 00 000422 		MOVEM	LPDOVT
  1794						ERROR1	13,0,0,TRAP 2 FAILED,FATAL^
  1795	031662	036 13 0 00 036444 
  1796	031663	254 00 0 00 031626 		JRST	P0TRP0
  1797
  1798	031664	000000	000000		P0PDL:	0
  1799	031665	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1800	031666	200 00 0 00 042225 		MOVE	LPDOVSV
  1801	031667	202 00 0 00 000422 		MOVEM	LPDOVT
  1802	031670	200 14 0 00 036447 		MOVE	COR,[0,,P0PDLX]
  1803	031671	200 13 0 00 031664 		MOVE	ACT,P0PDL
  1804	031672	312 14 0 00 000013 		CAME	COR,ACT
  1805						ERROR	P0TRP1,13,COR,ACT,TRAP 2 SAVED PC^
  1806	031673	036 13 0 00 036453 
  1807	031674	035 00 0 00 031631 		ERLOOP	P0TRP1		;IF ERROR, LOOP TO P0TRP1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 16
DFKEAM	MAC	15-Sep-81 09:29		TEST PROCESSOR TRAPS                                                               SEQ 0074

  1808					;*TEST OVERFLOW TRAP
  1809
  1810	031675	200 07 0 00 036456 		MOVE	AC,[JSR P0AROV]
  1811	031676	202 07 0 00 000421 		MOVEM	AC,LAROVT
  1812	031677	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1813	031700	254 02 1 00 031701 		JRSTF	@.+1
  1814	031701	000200	031702			TN1,,.+1
  1815	031702	200 00 0 00 042224 	P0AROX:	MOVE	LAROVSV
  1816	031703	202 00 0 00 000421 		MOVEM	LAROVT
  1817						ERROR1	13,0,0,TRAP 1 FAILED,FATAL^
  1818	031704	036 13 0 00 036462 
  1819	031705	254 00 0 00 031626 		JRST	P0TRP0
  1820
  1821	031706	000000	000000		P0AROV:	0
  1822	031707	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1823	031710	200 00 0 00 042224 		MOVE	LAROVSV
  1824	031711	202 00 0 00 000421 		MOVEM	LAROVT
  1825	031712	200 14 0 00 036465 		MOVE	COR,[0,,P0AROX]
  1826	031713	200 13 0 00 031706 		MOVE	ACT,P0AROV
  1827	031714	312 14 0 00 000013 		CAME	COR,ACT
  1828						ERROR	P0TRP1,13,COR,ACT,TRAP 1 SAVED PC^
  1829	031715	036 13 0 00 036471 
  1830	031716	035 00 0 00 031631 		ERLOOP	P0TRP1		;IF ERROR, LOOP TO P0TRP1
  1831
  1832	031717	367 15 0 00 031627 		REPTLP	P0TRP0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 17
DFKEAM	MAC	15-Sep-81 09:29		TEST MAP INSTRUCTION                                                               SEQ 0075

  1833					SUBTTL	TEST MAP INSTRUCTION
  1834
  1835					SALL
  1836			036474		T=	SIXBTZ	MAP INST TEST
  1837					LALL
  1838
  1839					;*PERFORM 'MAP' OF ADDRESS 0.
  1840					;*MAP READOUT SHOULD BE:
  1841					;*ACCESS, WRITEABLE, SOFTWARE, PAGED REF
  1842
  1843						SUBTST^
  1844	031720	201 00 0 00 031720 		MOVEI	.
  1845	031721	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  1846	031722	200 15 0 00 042233 	MAPCK0:	MOVE	REPT,RPEAT
  1847	031723	200 14 0 00 036477 		MOVE	COR,[161000,,0]
  1848	031724	257 13 0 00 000000 		MAP	ACT,0			;MAP FOR LOCATION 0
  1849	031725	312 14 0 00 000013 		CAME	COR,ACT
  1850						ERROR	.-4,13,COR,ACT,MAP ADR 0,^
  1851												SALL
  1852	031726	036 13 0 00 036502 
  1853	031727	035 00 0 00 031723 		ERLOOP	.-4		;IF ERROR, LOOP TO .-4
  1854
  1855					;*PERFORM 'MAP' OF ADDRESS 337000,
  1856					;*HIGHEST EXEC PAGED MEMORY ADDRESS.
  1857					;*MAP READOUT SHOULD BE:
  1858					;*ACCESS, WRITABLE, SOFTWARE, PAGED REF
  1859
  1860	031730	200 14 0 00 036505 	MAPCK1:	MOVE	COR,[161000,,337000]
  1861	031731	257 13 0 00 337000 		MAP	ACT,337000		;MAP FOR LOCATION 337000
  1862	031732	312 14 0 00 000013 		CAME	COR,ACT
  1863						ERROR	.-4,13,COR,ACT,MAP ADR 337000,^
  1864	031733	036 13 0 00 036511 
  1865	031734	035 00 0 00 031730 		ERLOOP	.-4		;IF ERROR, LOOP TO .-4
  1866
  1867					;*PERFORM 'MAP' OF ADDRESS 252525,
  1868					;*TEST ALTERNATE MEMORY ADDRESS ARE PAGED.
  1869					;*MAP READOUT SHOULD BE:
  1870					;*ACCESS, WRITABLE, SOFTWARE, PAGED REF
  1871
  1872	031735	200 14 0 00 036514 	MAPCKA:	MOVE	COR,[161000,,252525]
  1873	031736	257 13 0 00 252525 		MAP	ACT,252525		;MAP FOR LOCATION 252525
  1874	031737	312 14 0 00 000013 		CAME	COR,ACT
  1875						ERROR	.-4,13,COR,ACT,MAP ADR 252525,^
  1876	031740	036 13 0 00 036520 
  1877	031741	035 00 0 00 031735 		ERLOOP	.-4		;IF ERROR, LOOP TO .-4
  1878
  1879					;*PERFORM 'MAP' OF ADDRESS 125252,
  1880					;*TEST ALTERNATE MEMORY ADDRESS ARE PAGED.
  1881					;*MAP READOUT SHOULD BE:
  1882					;*ACCESS, WRITABLE, SOFTWARE, PAGED REF
  1883
  1884	031742	200 14 0 00 036523 	MAPCKB:	MOVE	COR,[161000,,125252]
  1885	031743	257 13 0 00 125252 		MAP	ACT,125252		;MAP FOR LOCATION 125252
  1886	031744	312 14 0 00 000013 		CAME	COR,ACT
  1887						ERROR	.-4,13,COR,ACT,MAP ADR 125252,^
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 17-1
DFKEAM	MAC	15-Sep-81 09:29		TEST MAP INSTRUCTION                                                               SEQ 0076

  1888	031745	036 13 0 00 036527 
  1889	031746	035 00 0 00 031742 		ERLOOP	.-4		;IF ERROR, LOOP TO .-4
  1890
  1891					;*CLEAR PAGE MAP
  1892
  1893	031747	402 00 0 00 000200 	MAPCK2:	SETZM	200
  1894	031750	200 07 0 00 036532 		MOVE	AC,[200,,201]
  1895	031751	251 07 0 00 000417 		BLT	AC,417			;CLEAR ALL OF PAGE MAP
  1896	031752	7 010 20 0 00 020000 	MAPCK9:	CONO	PAG,LTRPEN
  1897	031753	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 18
DFKEAM	MAC	15-Sep-81 09:29		TEST MAP INSTRUCTION                                                               SEQ 0077

  1898					;*PERFORM 'MAP' OF ADDRESS 400000,
  1899					;*LOWEST EPMP PAGING ADDRESS.
  1900					;*SINCE PAGE MAP IS CLEAR
  1901					;*MAP READOUT SHOULD BE:
  1902					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  1903
  1904	031754	205 14 0 00 001000 	MAPCK3:	MOVSI	COR,1000
  1905	031755	257 13 0 00 400000 		MAP	ACT,400000
  1906	031756	312 14 0 00 000013 		CAME	COR,ACT
  1907						ERROR	MAPCK9,13,COR,ACT,MAP ADR 400000,PAGE MAP CLEAR^
  1908	031757	036 13 0 00 036541 
  1909	031760	035 00 0 00 031752 		ERLOOP	MAPCK9		;IF ERROR, LOOP TO MAPCK9
  1910
  1911					;*PERFORM 'MAP' OF ADDRESS 777000,
  1912					;*HIGHEST EPMP PAGING ADDRESS.
  1913					;*SINCE PAGE MAP IS CLEAR
  1914					;*MAP READOUT SHOULD BE:
  1915					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  1916
  1917	031761	205 14 0 00 001000 	MAPCK4:	MOVSI	COR,1000
  1918	031762	257 13 0 00 777000 		MAP	ACT,777000
  1919	031763	312 14 0 00 000013 		CAME	COR,ACT
  1920						ERROR	MAPCK9,13,COR,ACT,MAP ADR 777000,PAGE MAP CLEAR^
  1921	031764	036 13 0 00 036547 
  1922	031765	035 00 0 00 031752 		ERLOOP	MAPCK9		;IF ERROR, LOOP TO MAPCK9
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 19
DFKEAM	MAC	15-Sep-81 09:29		TEST MAP INSTRUCTION                                                               SEQ 0078

  1923					;*SETUP EPMP FOR ADDRESS 400000 WITH ALL BUT ACCESS.
  1924					;*MAP READOUT SHOULD BE:
  1925					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  1926					;*IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
  1927					;*SHOULD HAVE NO EFFECT.
  1928
  1929	031766	205 07 0 00 377777 	MAPCK5:	MOVSI	AC,377777
  1930	031767	202 07 0 00 000200 		MOVEM	AC,200			;SET PAGE MAP TO ALL BUT ACCESS
  1931	031770	205 14 0 00 001000 		MOVSI	COR,1000
  1932	031771	257 13 0 00 400000 		MAP	ACT,400000
  1933	031772	312 14 0 00 000013 		CAME	COR,ACT
  1934						ERROR	MAPCK9,13,COR,ACT,MAP ADR 400000,ALL BUT ACCESS^
  1935	031773	036 13 0 00 036555 
  1936	031774	035 00 0 00 031752 		ERLOOP	MAPCK9		;IF ERROR, LOOP TO MAPCK9
  1937
  1938					;*SETUP EPMP FOR ADDRESS 777000 WITH ALL BUT ACCESS.
  1939					;*MAP READOUT SHOULD BE:
  1940					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  1941					;*IF ACCESS IS CLEAR REST OF BITS IN PAGE MAP WORD
  1942					;*SHOULD HAVE NO EFFECT.
  1943
  1944	031775	201 07 0 00 377777 	MAPCK6:	MOVEI	AC,377777
  1945	031776	202 07 0 00 000377 		MOVEM	AC,377			;SET PAGE MAP TO ALL BUT ACCESS
  1946	031777	205 14 0 00 001000 		MOVSI	COR,1000
  1947	032000	257 13 0 00 777000 		MAP	ACT,777000
  1948	032001	312 14 0 00 000013 		CAME	COR,ACT
  1949						ERROR	MAPCK9,13,COR,ACT,MAP ADR 777000,ALL BUT ACCESS^
  1950	032002	036 13 0 00 036560 
  1951	032003	035 00 0 00 031752 		ERLOOP	MAPCK9		;IF ERROR, LOOP TO MAPCK9
  1952
  1953	032004	367 15 0 00 031723 		REPTLP	MAPCK0+1
  1954
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 20
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE FAIL TRAPPING                                                            SEQ 0079

  1955					SUBTTL	TEST PAGE FAIL TRAPPING
  1956
  1957					SALL
  1958			036563		T=	SIXBTZ	PAGE FAIL TRAP TEST
  1959					LALL
  1960
  1961					;*DO A 'MOVE' FROM LOCATION 400000.
  1962					;*SINCE PAGE MAP IS CLEAR THIS SHOULD PAGE FAIL.
  1963
  1964						SUBTST^
  1965	032005	201 00 0 00 032005 		MOVEI	.
  1966	032006	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  1967	032007	200 15 0 00 042233 	PFAIL0:	MOVE	REPT,RPEAT
  1968
  1969	032010	402 00 0 00 000200 		SETZM	200			;CLEAR EXEC PAGE MAP
  1970	032011	200 07 0 00 036532 		MOVE	AC,[200,,201]
  1971	032012	251 07 0 00 000377 		BLT	AC,377
  1972
  1973	032013	7 004 20 0 00 001040 		CONO	PI,CHNOFF!PICHN2
  1974	032014	7 000 20 0 00 022002 		CONO	APR,LCNXER!LAPRP2
  1975	032015	476 00 0 00 000500 		SETOM	LEUPFW			;PRESET PAGE FAIL WORD
  1976	032016	476 00 0 00 000501 		SETOM	LPFWPC			;PRESET PAGE FAIL PC
  1977	032017	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  1978	032020	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  1979	032021	201 07 0 00 032030 		MOVEI	AC,PFAIL1
  1980	032022	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP PAGE FAULT TRAP
  1981
  1982	032023	477 00 0 00 000013 		SETOB	0,ACT			;PRESET AC
  1983	032024	200 13 0 00 400000 		MOVE	ACT,400000		;MAKE PAGING REF, SHOULD FAULT
  1984						ERROR	PFAIL0+1,13,0,ACT,TRAP FAILED,REF TO 400000^
  1985												SALL
  1986	032025	036 13 0 00 036574 
  1987	032026	035 00 0 00 032010 		ERLOOP	PFAIL0+1		;IF ERROR, LOOP TO PFAIL0+1
  1988	032027	254 00 0 00 032045 		JRST	PFAIL2			;NO NEED TO CHECK PAGE FAIL WORD
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 21
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE FAIL TRAPPING                                                            SEQ 0080

  1989					;*PAGE FAULT TRAP SHOULD RETURN HERE
  1990
  1991	032030	476 00 0 00 000014 	PFAIL1:	SETOM	COR
  1992	032031	312 14 0 00 000013 		CAME	COR,ACT
  1993						ERROR	PFAIL0+1,13,COR,ACT,PAGE FAIL STORED IN AC,REF TO 400000^
  1994	032032	036 13 0 00 036603 
  1995	032033	035 00 0 00 032010 		ERLOOP	PFAIL0+1		;IF ERROR, LOOP TO PFAIL0+1
  1996	032034	200 13 0 00 000000 		MOVE	ACT,0
  1997	032035	312 14 0 00 000013 		CAME	COR,ACT
  1998						ERROR	PFAIL0+1,13,COR,ACT,PAGE FAIL STORED IN 0,REF TO 400000^
  1999	032036	036 13 0 00 036612 
  2000	032037	035 00 0 00 032010 		ERLOOP	PFAIL0+1		;IF ERROR, LOOP TO PFAIL0+1
  2001	032040	200 14 0 00 036615 		MOVE	COR,[1000,,400000]	;SETUP CORRECT WORD
  2002	032041	200 13 0 00 000500 		MOVE	ACT,LEUPFW		;GET PAGE FAIL WORD
  2003	032042	312 14 0 00 000013 		CAME	COR,ACT
  2004						ERROR	PFAIL0+1,13,COR,ACT,PAGE FAIL WORD WRONG,REF TO 400000^
  2005	032043	036 13 0 00 036622 
  2006	032044	035 00 0 00 032010 		ERLOOP	PFAIL0+1		;IF ERROR, LOOP TO PFAIL0+1
  2007
  2008					;*PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY
  2009
  2010	032045	7 000 30 0 00 002000 	PFAIL2:	CONSZ	APR,LNXMER
  2011						ERROR	PFAIL0+1,13,COR,ACT,NON-X-MEM,REF TO 400000^
  2012	032046	036 13 0 00 036627 
  2013	032047	035 00 0 00 032010 		ERLOOP	PFAIL0+1		;IF ERROR, LOOP TO PFAIL0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 22
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE FAIL TRAPPING                                                            SEQ 0081

  2014					;*CHECK PAGE FAIL WORD FOR MAXIMUM ADDRESS
  2015					;*DO A 'MOVE' FROM LOCATION 777777.
  2016
  2017	032050	7 000 20 0 00 022002 	PFAIL3:	CONO	APR,LCNXER!LAPRP2
  2018	032051	402 00 0 00 000500 		SETZM	LEUPFW			;PRESET PAGE FAIL WORD
  2019	032052	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  2020	032053	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2021	032054	201 07 0 00 032063 		MOVEI	AC,PFAIL4
  2022	032055	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP PAGE FAULT TRAP
  2023	032056	403 00 0 00 000013 		SETZB	0,ACT			;PRESET AC
  2024	032057	200 13 0 00 777777 		MOVE	ACT,777777		;MAKE PAGING REF, SHOULD FAULT
  2025						ERROR	PFAIL3,13,0,ACT,TRAP FAILED,REF TO 777777^
  2026	032060	036 13 0 00 036635 
  2027	032061	035 00 0 00 032050 		ERLOOP	PFAIL3		;IF ERROR, LOOP TO PFAIL3
  2028	032062	254 00 0 00 032100 		JRST	PFAIL5
  2029
  2030					;*PAGE FAULT TRAP SHOULD RETURN HERE
  2031
  2032	032063	402 00 0 00 000014 	PFAIL4:	SETZM	COR
  2033	032064	312 14 0 00 000013 		CAME	COR,ACT
  2034						ERROR	PFAIL3,13,COR,ACT,PAGE FAIL STORED IN AC,REF TO 777777^
  2035	032065	036 13 0 00 036640 
  2036	032066	035 00 0 00 032050 		ERLOOP	PFAIL3		;IF ERROR, LOOP TO PFAIL3
  2037	032067	200 13 0 00 000000 		MOVE	ACT,0
  2038	032070	312 14 0 00 000013 		CAME	COR,ACT
  2039						ERROR	PFAIL3,13,COR,ACT,PAGE FAIL STORED IN 0,REF TO 777777^
  2040	032071	036 13 0 00 036643 
  2041	032072	035 00 0 00 032050 		ERLOOP	PFAIL3		;IF ERROR, LOOP TO PFAIL3
  2042	032073	200 14 0 00 036646 		MOVE	COR,[1000,,777777]	;SETUP CORRECT WORD
  2043	032074	200 13 0 00 000500 		MOVE	ACT,LEUPFW		;GET PAGE FAIL WORD
  2044	032075	312 14 0 00 000013 		CAME	COR,ACT
  2045						ERROR	PFAIL3,13,COR,ACT,PAGE FAIL WORD WRONG,REF TO 777777^
  2046	032076	036 13 0 00 036647 
  2047	032077	035 00 0 00 032050 		ERLOOP	PFAIL3		;IF ERROR, LOOP TO PFAIL3
  2048
  2049					;*PAGE FAULT TRAP SHOULD NOT CAUSE NON-X-MEMORY
  2050
  2051	032100	7 000 30 0 00 002000 	PFAIL5:	CONSZ	APR,LNXMER
  2052						ERROR	PFAIL3,13,COR,ACT,NON-X-MEM,REF TO 777777^
  2053	032101	036 13 0 00 036652 
  2054	032102	035 00 0 00 032050 		ERLOOP	PFAIL3		;IF ERROR, LOOP TO PFAIL3
  2055
  2056					;*RESET PAGE FAULT TRAP
  2057
  2058	032103	200 07 0 00 042232 	PFAIL6:	MOVE	AC,PGFAIL
  2059	032104	202 07 0 00 000502 		MOVEM	AC,LPGFTR
  2060	032105	7 000 20 0 00 022002 		CONO	APR,LCNXER!LAPRP2
  2061	032106	7 004 20 0 00 002040 		CONO	PI,LCHNON!LPICH2	;RE-ENABLE INTERRUPTS
  2062
  2063	032107	367 15 0 00 032010 		REPTLP	PFAIL0+1
  2064						XLIST
  2065					LIST
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 28
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC-PER-PROCESS MAPPING                                                      SEQ 0082

  2066					SUBTTL	TEST EXEC-PER-PROCESS MAPPING
  2067
  2068					SALL
  2069			036655		T=	SIXBTZ	EXEC-PER-PROCESS MAP TEST
  2070					LALL
  2071
  2072						SUBTST^
  2073	032110	201 00 0 00 032110 		MOVEI	.
  2074	032111	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2075	032112	200 15 0 00 042233 	EPPM0:	MOVE	REPT,RPEAT
  2076	032113	402 00 0 00 000200 		SETZM	200			;CLEAR ALL OF PAGE MAP
  2077	032114	200 07 0 00 036532 		MOVE	AC,[200,,201]
  2078	032115	251 07 0 00 000417 		BLT	AC,417
  2079	032116	7 010 20 0 00 020000 	EPPM9:	CONO	PAG,LTRPEN
  2080	032117	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2081
  2082					;*PERFORM 'MAP' OF ADDRESS 340000
  2083					;*LOWEST UPMP EXEC-PER-PROCESS ADDRESS.
  2084					;*SINCE PAGE MAP IS CLEAR
  2085					;*MAP READOUT SHOULD BE:
  2086					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  2087
  2088	032120	205 14 0 00 001000 	EPPM1:	MOVSI	COR,1000
  2089	032121	257 13 0 00 340000 		MAP	ACT,340000
  2090	032122	312 14 0 00 000013 		CAME	COR,ACT
  2091						ERROR	EPPM9,13,COR,ACT,MAP ADR 340000,PAGE MAP CLEAR^
  2092												SALL
  2093	032123	036 13 0 00 036665 
  2094	032124	035 00 0 00 032116 		ERLOOP	EPPM9		;IF ERROR, LOOP TO EPPM9
  2095
  2096					;*PERFORM 'MAP' OF ADDRESS 377000
  2097					;*HIGHEST UPMP EXEC-PER-PROCESS ADDRESS.
  2098					;*SINCE PAGE MAP IS CLEAR
  2099					;*MAP READOUT SHOULD BE:
  2100					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  2101
  2102	032125	205 14 0 00 001000 	EPPM2:	MOVSI	COR,1000
  2103	032126	257 13 0 00 377000 		MAP	ACT,377000
  2104	032127	312 14 0 00 000013 		CAME	COR,ACT
  2105						ERROR	EPPM9,13,COR,ACT,MAP ADR 377000,PAGE MAP CLEAR^
  2106	032130	036 13 0 00 036673 
  2107	032131	035 00 0 00 032116 		ERLOOP	EPPM9		;IF ERROR, LOOP TO EPPM9
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 29
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC-PER-PROCESS MAPPING                                                      SEQ 0083

  2108					;*SETUP UPMP FOR ADDRESS 340000 WITH ALL BUT ACCESS.
  2109					;*MAP READOUT SHOULD BE:
  2110					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  2111
  2112	032132	205 07 0 00 377777 	EPPM3:	MOVSI	AC,377777
  2113	032133	202 07 0 00 000400 		MOVEM	AC,400
  2114	032134	205 14 0 00 001000 		MOVSI	COR,1000
  2115	032135	257 13 0 00 340000 		MAP	ACT,340000
  2116	032136	312 14 0 00 000013 		CAME	COR,ACT
  2117						ERROR	EPPM9,13,COR,ACT,MAP ADR 340000,ALL BUT ACCESS^
  2118	032137	036 13 0 00 036676 
  2119	032140	035 00 0 00 032116 		ERLOOP	EPPM9		;IF ERROR, LOOP TO EPPM9
  2120
  2121					;*SETUP UPMP FOR ADDRESS 340000 WITH ALL BUT ACCESS
  2122					;*MAP READOUT SHOULD BE:
  2123					;*PAGE FAIL, ASSOCIATIVE MEMORY NO MATCH.
  2124
  2125	032141	201 07 0 00 377777 	EPPM4:	MOVEI	AC,377777
  2126	032142	202 07 0 00 000417 		MOVEM	AC,417
  2127	032143	205 14 0 00 001000 		MOVSI	COR,1000
  2128	032144	257 13 0 00 377000 		MAP	ACT,377000
  2129	032145	312 14 0 00 000013 		CAME	COR,ACT
  2130						ERROR	EPPM9,13,COR,ACT,MAP ADR 377000,ALL BUT ACCESS^
  2131	032146	036 13 0 00 036701 
  2132	032147	035 00 0 00 032116 		ERLOOP	EPPM9		;IF ERROR, LOOP TO EPPM9
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 30
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC-PER-PROCESS MAPPING                                                      SEQ 0084

  2133	032150	201 07 0 00 740000 	EPPM5:	MOVEI	AC,740000
  2134	032151	202 07 0 00 000417 		MOVEM	AC,417			;SETUP P-P MAP FOR PAGE 377
  2135	032152	205 07 0 00 757777 		MOVSI	AC,757777
  2136	032153	202 07 0 00 000400 		MOVEM	AC,400			;SETUP P-P MAP FOR PAGE 340
  2137
  2138					;*UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 377 WITH
  2139					;*ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 0.
  2140					;*'DATAO PAG' CLEARS ASSOCIATIVE MEMORY THEREFORE 'MAP'
  2141					;*SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
  2142					;*FROM UPMP EXEC-PER-PROCESS MAP AND LOAD ASSOCIATIVE MEMORY
  2143					;*WITH PAGE ADDRESS 377.
  2144					;*THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
  2145					;*BY THE MAP INSTRUCTION.
  2146					;*READOUT OF THE LOADED ASSOCIATIVE MEMORY (BY 'CONI PAG')
  2147					;*SHOULD BE:
  2148					;*PAGE 377',EXEC MEMORY SPACE, RELOAD COUNTER.
  2149
  2150	032154	7 010 20 0 00 020000 	EPPM6:	CONO	PAG,LTRPEN		;CLEAR RELOAD CNTR
  2151	032155	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2152	032156	200 14 0 00 036704 		MOVE	COR,[165000,,0]
  2153	032157	257 13 0 00 377000 		MAP	ACT,377000		;'MAP'
  2154	032160	312 14 0 00 000013 		CAME	COR,ACT
  2155						ERROR	EPPM6,13,COR,ACT,MAP READOUT FAILURE,MAP ADR 377000^
  2156	032161	036 13 0 00 036711 
  2157	032162	035 00 0 00 032154 		ERLOOP	EPPM6		;IF ERROR, LOOP TO EPPM6
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 31
DFKEAM	MAC	15-Sep-81 09:29		TEST EXEC-PER-PROCESS MAPPING                                                      SEQ 0085

  2158					;*UPMP EXEC-PER-PROCESS MAP IS SETUP FOR PAGE 340 WITH
  2159					;*ACCESS, PUBLIC, WRITABLE, SOFTWARE AND ADR BITS 14-26 = 17777.
  2160					;*'DATAO PAG' CLEARS ASSOCIATIVE MEMORY THEREFORE 'MAP'
  2161					;*SHOULD DO REFILL CYCLE AND LOAD SCRATCHPAD MEMORY WITH DATA
  2162					;*FROM UPMP EXEC-PER-PROCESS MAP AND LOAD ASSOCIATIVE MEMORY
  2163					;*WITH PAGE ADDRESS 340.
  2164					;*THE DATA FROM THE SCRATCHPAD MEMORY IS READ INTO 'ACT'
  2165					;*BY THE MAP INSTRUCTION.
  2166					;*READOUT OF THE LOADED ASSOCIATIVE MEMORY (BY 'CONI PAG')
  2167					;*SHOULD BE:
  2168					;*PAGE 340',EXEC MEMORY SPACE, RELOAD COUNTER.
  2169
  2170	032163	7 010 20 0 00 020000 	EPPM7:	CONO	PAG,LTRPEN
  2171	032164	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2172	032165	200 14 0 00 036714 		MOVE	COR,[165017,,777000]
  2173	032166	257 13 0 00 340000 		MAP	ACT,340000		;'MAP'
  2174	032167	312 14 0 00 000013 		CAME	COR,ACT
  2175						ERROR	EPPM7,13,COR,ACT,MAP READOUT FAILURE,MAP ADR 340000^
  2176	032170	036 13 0 00 036715 
  2177	032171	035 00 0 00 032163 		ERLOOP	EPPM7		;IF ERROR, LOOP TO EPPM7
  2178
  2179	032172	367 15 0 00 032113 		REPTLP	EPPM0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 32
DFKEAM	MAC	15-Sep-81 09:29		TEST ASSOCIATIVE AND SCRATCHPAD MEMORIES                                           SEQ 0086

  2180					SUBTTL	TEST ASSOCIATIVE AND SCRATCHPAD MEMORIES
  2181
  2182					;*PAGE MAP IS SETUP FOR 42 PAGES WITH DATA THAT PRODUCES
  2183					;*FLOATING BIT PATTERNS IN BOTH THE ASSOCIATIVE MEMORY
  2184					;*AND THE SCRATCHPAD MEMORY TO CHECK REGISTER AND BIT INTERACTION.
  2185					;*ALL PAGING ADDRESSES ARE SETUP SO PAGING MUST REFILL ON EVERY
  2186					;*OPERATION.  THIS SHOULD VERIFY THAT THE PAGING REFILL OPERATION
  2187					;*AND THE ASSOCIATIVE AND SCRATCHPAD REGISTERS ARE OPERATIONAL.
  2188
  2189					SALL
  2190			036720		T=	SIXBTZ	FLOATING BIT TEST
  2191					LALL
  2192
  2193						SUBTST^
  2194	032173	201 00 0 00 032173 		MOVEI	.
  2195	032174	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2196	032175	200 15 0 00 042233 	AMTST4:	MOVE	REPT,RPEAT
  2197	032176	402 00 0 00 000200 		SETZM	200			;CLEAR PAGE MAP
  2198	032177	200 07 0 00 036532 		MOVE	AC,[200,,201]
  2199	032200	251 07 0 00 000417 		BLT	AC,417
  2200
  2201	032201	205 05 0 00 777726 	AMTST5:	MOVSI	INDX,-^D42		;SETUP PAGE MAP FOR
  2202	032202	200 07 0 05 035140 		MOVE	AC,AMTAB1(INDX)		;42 PAGES WITH DATA
  2203	032203	550 10 0 00 000007 		HRRZ	AC1,AC			;THAT PRODUCES FLOATING
  2204	032204	242 10 0 00 777777 		LSH	AC1,-1			;BIT PATTERNS TO TEST
  2205	032205	305 10 0 00 000200 		CAIGE	AC1,200			;ASSOCIATIVE AND SCRATCHPAD
  2206	032206	271 10 0 00 000220 		ADDI	AC1,220			;MEMORIES.
  2207	032207	606 07 0 00 000001 		TRNN	AC,1
  2208	032210	502 07 0 10 000000 		HLLM	AC,(AC1)
  2209	032211	602 07 0 00 000001 		TRNE	AC,1
  2210	032212	546 07 0 10 000000 		HLRM	AC,(AC1)
  2211	032213	253 05 0 00 032202 		AOBJN	INDX,AMTST5+1
  2212
  2213	032214	201 06 0 00 000144 		MOVEI	CNTR,^D100		;CYCLE FLT BITS FOR 100 PASSES
  2214	032215	205 05 0 00 777726 		MOVSI	INDX,-^D42		;SETUP FOR 42 PAGING REF'S
  2215	032216	201 11 0 00 000040 		MOVEI	AC2,^D32
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 33
DFKEAM	MAC	15-Sep-81 09:29		TEST ASSOCIATIVE AND SCRATCHPAD MEMORIES                                           SEQ 0087

  2216	032217	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  2217	032220	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2218	032221	554 14 0 05 035140 	AMTST6:	HLRZ	COR,AMTAB1(INDX)	;SETUP FOR MAP READOUT
  2219	032222	242 14 0 00 000011 		LSH	COR,^D9
  2220	032223	661 14 0 00 001000 		TLO	COR,1000		;SET PAGED REF BIT
  2221	032224	623 14 0 00 000400 		TLZE	COR,400			;ACCESS
  2222	032225	661 14 0 00 100000 		TLO	COR,100000
  2223	032226	623 14 0 00 000200 		TLZE	COR,200			;PUBLIC
  2224	032227	661 14 0 00 004000 		TLO	COR,4000
  2225	032230	623 14 0 00 000100 		TLZE	COR,100			;WRITABLE
  2226	032231	661 14 0 00 040000 		TLO	COR,40000
  2227	032232	623 14 0 00 000040 		TLZE	COR,40			;SOFTWARE
  2228	032233	661 14 0 00 020000 		TLO	COR,20000
  2229	032234	623 14 0 00 000020 		TLZE	COR,20			;CACHE
  2230	032235	661 14 0 00 002000 		TLO	COR,2000
  2231	032236	550 07 0 05 035140 		HRRZ	AC,AMTAB1(INDX)		;SETUP MAPPING ADDRESS
  2232	032237	242 07 0 00 000011 		LSH	AC,^D9
  2233	032240	257 13 0 07 000000 		MAP	ACT,(AC)		;'MAP'
  2234	032241	312 14 0 00 000013 		CAME	COR,ACT
  2235						ERROR	AMTST6-2,13,COR,ACT,MAP READOUT FAILURE,,AMTSTX^
  2236												SALL
  2237	032242	036 13 0 00 036723 
  2238	032243	035 00 0 00 032217 		ERLOOP	AMTST6-2		;IF ERROR, LOOP TO AMTST6-2
  2239
  2240	032244	253 05 0 00 032221 		AOBJN	INDX,AMTST6		;DO 42 DIF REF
  2241
  2242	032245	365 06 0 00 032215 		SOJGE	CNTR,AMTST6-4		;CYCLE MEMORIES, ETC.
  2243
  2244	032246	367 15 0 00 032176 		REPTLP	AMTST4+1
  2245	032247	254 00 0 00 032255 		JRST	AMTST7-2
  2246
  2247	032250	037 02 0 00 036726 	AMTSTX:	PSIXM	SIXBTZ	<REF TO >^	[SIXBIT\REF TO _\]^
  2248	032251	200 00 0 00 000007 		MOVE	AC
  2249	032252	037 06 0 00 000000 		PNT6
  2250	032253	037 00 0 00 030242 		PCRL
  2251	032254	263 17 0 00 000000 		RTN
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 34
DFKEAM	MAC	15-Sep-81 09:29		TEST ASSOCIATIVE AND SCRATCHPAD MEMORIES                                           SEQ 0088

  2252					;*CLEAR ASSOCIATIVE MEMORY AND PAGE MAP
  2253					;*CHECK THAT ALL PREVIOUS REFERENCES TRAP
  2254					;*SHOULD IF AM IS REALLY CLEAR
  2255
  2256					SALL
  2257			036730		T=	SIXBTZ	TRAP TEST
  2258					LALL
  2259
  2260						SUBTST^
  2261	032255	201 00 0 00 032255 		MOVEI	.
  2262	032256	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2263	032257	201 15 0 00 000001 	AMTST7:	MOVEI	REPT,1
  2264	032260	402 00 0 00 000200 		SETZM	200			;DO ONCE ONLY
  2265	032261	200 07 0 00 036532 		MOVE	AC,[200,,201]
  2266	032262	251 07 0 00 000417 		BLT	AC,417			;CLEAR PAGE MAP
  2267	032263	200 07 0 00 030024 		MOVE	AC,ITRCNT
  2268	032264	602 07 0 00 000001 		TRNE	AC,1			;ALTERNATE CLEARING AM
  2269	032265	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  2270	032266	606 07 0 00 000001 		TRNN	AC,1
  2271	032267	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2272	032270	205 05 0 00 777726 		MOVSI	INDX,-^D42
  2273	032271	201 07 0 00 032302 		MOVEI	AC,AMTST9
  2274	032272	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE TRAP
  2275
  2276	032273	550 14 0 05 035140 	AMTST8:	HRRZ	COR,AMTAB1(INDX)	;SETUP REFERANCE ADDRESS
  2277	032274	242 14 0 00 000011 		LSH	COR,^D9
  2278	032275	477 00 0 00 000013 		SETOB	0,ACT
  2279	032276	200 13 0 14 000000 		MOVE	ACT,(COR)		;SHOULD FAIL
  2280						ERROR	AMTST8,13,COR,ACT,TRAP FAILED,<REF TO (CORRECT)>^
  2281												SALL
  2282	032277	036 13 0 00 036735 
  2283	032300	035 00 0 00 032273 		ERLOOP	AMTST8		;IF ERROR, LOOP TO AMTST8
  2284	032301	254 00 0 00 032321 		JRST	AMTSTA
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 35
DFKEAM	MAC	15-Sep-81 09:29		TEST ASSOCIATIVE AND SCRATCHPAD MEMORIES                                           SEQ 0089

  2285	032302	476 00 0 00 000014 	AMTST9:	SETOM	COR
  2286	032303	312 14 0 00 000013 		CAME	COR,ACT
  2287						ERROR	AMTST7,13,COR,ACT,PAGE FAIL STORED IN AC,^
  2288	032304	036 13 0 00 036740 
  2289	032305	035 00 0 00 032257 		ERLOOP	AMTST7		;IF ERROR, LOOP TO AMTST7
  2290	032306	200 13 0 00 000000 		MOVE	ACT,0
  2291	032307	312 14 0 00 000013 		CAME	COR,ACT
  2292						ERROR	AMTST7,13,COR,ACT,PAGE FAIL STORED IN 0,^
  2293	032310	036 13 0 00 036743 
  2294	032311	035 00 0 00 032257 		ERLOOP	AMTST7		;IF ERROR, LOOP TO AMTST7
  2295	032312	550 14 0 05 035140 		HRRZ	COR,AMTAB1(INDX)	;SETUP CORRECT PAGE FAIL WORD
  2296	032313	242 14 0 00 000011 		LSH	COR,^D9
  2297	032314	661 14 0 00 001000 		TLO	COR,1000		;SET PAGED REF BIT
  2298	032315	200 13 0 00 000500 		MOVE	ACT,LEUPFW		;GET PAGE FAIL WORD
  2299	032316	312 14 0 00 000013 		CAME	COR,ACT
  2300						ERROR	AMTST7,13,COR,ACT,PAGE FAIL WORD WRONG,^
  2301	032317	036 13 0 00 036746 
  2302	032320	035 00 0 00 032257 		ERLOOP	AMTST7		;IF ERROR, LOOP TO AMTST7
  2303
  2304	032321	253 05 0 00 032273 	AMTSTA:	AOBJN	INDX,AMTST8
  2305
  2306	032322	367 15 0 00 032260 		REPTLP	AMTST7+1
  2307
  2308	032323	200 07 0 00 042232 		MOVE	AC,PGFAIL		;RESET PAGE FAULT TRAP
  2309	032324	202 07 0 00 000502 		MOVEM	AC,LPGFTR
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 36
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA READ                                                               SEQ 0090

  2310					SUBTTL	TEST PAGED DATA READ
  2311
  2312					;*USING PAGING ADDRESSES 400XXX AND 777XXX
  2313
  2314					SALL
  2315			036751		T=	SIXBTZ	PAGED DATA READ TEST
  2316					LALL
  2317
  2318						SUBTST^
  2319	032325	201 00 0 00 032325 		MOVEI	.
  2320	032326	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2321	032327	200 15 0 00 042233 	PAGRDA:	MOVE	REPT,RPEAT
  2322	032330	402 00 0 00 000200 		SETZM	200			;CLEAR AND SETUP PAGE MAP
  2323	032331	200 07 0 00 036532 		MOVE	AC,[200,,201]
  2324	032332	251 07 0 00 000417 		BLT	AC,417
  2325	032333	205 07 0 00 740032 		MOVSI	AC,740000!<PGR400_-^D9>
  2326	032334	202 07 0 00 000200 		MOVEM	AC,200
  2327	032335	201 07 0 00 740032 		MOVEI	AC,740000!<PGR777_-^D9>
  2328	032336	202 07 0 00 000377 		MOVEM	AC,377
  2329
  2330					;*TEST A 'MOVE' USING AN 'E' ADDRESS THAT CAUSES PAGING.
  2331					;*'E' = PAGE 400 (HIGH ORDER 9 BITS),
  2332					;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGR400' ADDRESS.
  2333					;*PAGE MAP RELOCATION BITS SETUP FOR
  2334					;*HIGH ORDER 9 BITS OF 'PGR400' ADDRESS.
  2335					;*THEREFORE ACTUAL ADDRESS FOR 'MOVE' IS:
  2336					;*HIGH ORDER 9 BITS FROM PAGE MAP AND
  2337					;*LOW ORDER 9 BITS OF 'PGR400' ADDRESS.
  2338
  2339	032337	7 010 20 0 00 020000 	PAGRDB:	CONO	PAG,LTRPEN		;CLEAR MEMORIES, ETC.
  2340	032340	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2341	032341	200 14 0 00 032355 		MOVE	COR,PGR400
  2342	032342	200 13 0 00 400355 		MOVE	ACT,400000!<PGR400&777>	;MAKE PAGED READ
  2343	032343	312 14 0 00 000013 		CAME	COR,ACT
  2344						ERROR	PAGRDB,13,COR,ACT,DATA ERROR,ADR 400XXX^
  2345												SALL
  2346	032344	036 13 0 00 036761 
  2347	032345	035 00 0 00 032337 		ERLOOP	PAGRDB		;IF ERROR, LOOP TO PAGRDB
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 37
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA READ                                                               SEQ 0091

  2348					;*TEST A 'MOVE' USING AN 'E' ADDRESS THAT CAUSES PAGING.
  2349					;*'E' = PAGE 777 (HIGH ORDER 9 BITS),
  2350					;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGR777' ADDRESS.
  2351					;*PAGE MAP RELOCATION BITS SETUP FOR
  2352					;*HIGH ORDER 9 BITS OF 'PGR777' ADDRESS.
  2353					;*THEREFORE ACTUAL ADDRESS FOR 'MOVE' IS:
  2354					;*HIGH ORDER 9 BITS FROM PAGE MAP AND
  2355					;*LOW ORDER 9 BITS OF 'PGR777' ADDRESS.
  2356
  2357	032346	200 14 0 00 032356 	PAGRDC:	MOVE	COR,PGR777
  2358	032347	200 13 0 00 400356 		MOVE	ACT,400000!<PGR777&777>	;MAKE PAGED READ
  2359	032350	312 14 0 00 000013 		CAME	COR,ACT
  2360						ERROR1	13,COR,ACT,DATA ERROR,ADR 777XXX^
  2361	032351	036 13 0 00 036766 
  2362	032352	035 00 0 00 032346 		ERLOOP	.-4
  2363
  2364	032353	367 15 0 00 032330 		REPTLP	PAGRDA+1
  2365
  2366	032354	254 00 0 00 032357 		JRST	PAGRD0-2
  2367
  2368	032355	377777	400000		PGR400:	377777,,400000			;DATA FOR PAGE 400
  2369	032356	000777	777000		PGR777:	000777,,777000			;DATA FOR PAGE 777
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 38
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA READ                                                               SEQ 0092

  2370					;*TEST READ OF DATA FROM A DATA BLOCK
  2371					;*USING PAGED REFERENCES THAT POINT TO
  2372					;*CONSECUTIVE DATA WORDS IN AN EXEC UNPAGED
  2373					;*MEMORY AREA.
  2374					;*DATA CONSISTS OF COMPLEMENT OF AND
  2375					;*PAGING REFERENCE ADDRESS.
  2376
  2377						SUBTST^
  2378	032357	201 00 0 00 032357 		MOVEI	.
  2379	032360	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2380	032361	200 15 0 00 042233 	PAGRD0:	MOVE	REPT,RPEAT
  2381	032362	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL=100 PASSES
  2382	032363	205 05 0 00 777340 		MOVSI	INDX,-440		;340-777=440 PAGES
  2383	032364	201 07 0 00 000340 		MOVEI	AC,340			;SETUP FOR FIRST PAGING ADDRESS
  2384
  2385	032365	200 10 0 00 000007 	PAGRD1:	MOVE	AC1,AC			;SETUP DATA WORD
  2386	032366	242 10 0 00 000011 		LSH	AC1,^D9			;COMPL ADR,,PAGED ADR
  2387	032367	661 10 0 00 777777 		TLO	AC1,-1
  2388	032370	621 10 0 10 000000 		TLZ	AC1,(AC1)
  2389	032371	202 10 0 05 042235 		MOVEM	AC1,PGRDTB(INDX)
  2390	032372	602 07 0 00 000001 		TRNE	AC,1
  2391	032373	254 00 0 00 032411 		JRST	PAGRD2
  2392	032374	201 11 0 05 042235 		MOVEI	AC2,PGRDTB(INDX)
  2393	032375	242 11 0 00 777767 		LSH	AC2,-^D9		;SETUP PAGE MAP FOR EVEN HI-ORDER
  2394	032376	271 11 0 00 740000 		ADDI	AC2,740000		;INCLUDE ACCESS, ETC.
  2395	032377	504 12 0 00 000011 		HRL	AC3,AC2
  2396	032400	201 11 0 05 042236 		MOVEI	AC2,PGRDTB+1(INDX)
  2397	032401	242 11 0 00 777767 		LSH	AC2,-^D9		;SETUP PAGE MAP FOR ODD HI-ORDER
  2398	032402	271 11 0 00 740000 		ADDI	AC2,740000		;INCLUDE ACCESS, ETC.
  2399	032403	540 12 0 00 000011 		HRR	AC3,AC2
  2400	032404	550 10 0 00 000007 		HRRZ	AC1,AC			;SETUP PAGE MAP
  2401	032405	242 10 0 00 777777 		LSH	AC1,-1
  2402	032406	305 10 0 00 000200 		CAIGE	AC1,200
  2403	032407	271 10 0 00 000220 		ADDI	AC1,220
  2404	032410	202 12 0 10 000000 		MOVEM	AC3,(AC1)		;MOVE RELOCATION DATA TO PAGE MAP
  2405	032411	350 00 0 00 000007 	PAGRD2:	AOS	AC
  2406	032412	253 05 0 00 032365 		AOBJN	INDX,PAGRD1
  2407
  2408	032413	7 010 20 0 00 020000 	PAGRD3:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  2409	032414	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2410	032415	205 05 0 00 777340 		MOVSI	INDX,-440
  2411	032416	201 07 0 00 000340 		MOVEI	AC,340
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 39
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA READ                                                               SEQ 0093

  2412	032417	200 14 0 00 000007 	PAGRD4:	MOVE	COR,AC			;SETUP CORRECT RESULTS
  2413	032420	242 14 0 00 000011 		LSH	COR,^D9
  2414	032421	661 14 0 00 777777 		TLO	COR,-1
  2415	032422	621 14 0 14 000000 		TLZ	COR,(COR)
  2416	032423	201 10 0 05 042235 		MOVEI	AC1,PGRDTB(INDX)	;SETUP PAGING ADDRESS
  2417	032424	405 10 0 00 000777 		ANDI	AC1,777
  2418	032425	271 10 0 14 000000 		ADDI	AC1,(COR)
  2419	032426	200 13 0 10 000000 		MOVE	ACT,(AC1)		;MAKE PAGED MEMORY READ
  2420	032427	312 14 0 00 000013 		CAME	COR,ACT			;ADDRESSES GO FROM 340XXX TO 777XXX
  2421						ERROR	PAGRD4,13,COR,ACT,DATA ERROR,INC PAGING ADR'S,PAGRDX^
  2422	032430	036 13 0 00 036774 
  2423	032431	035 00 0 00 032417 		ERLOOP	PAGRD4		;IF ERROR, LOOP TO PAGRD4
  2424	032432	350 00 0 00 000007 		AOS	AC			;INCREMENT PAGING ADDRESS
  2425	032433	253 05 0 00 032417 		AOBJN	INDX,PAGRD4
  2426
  2427	032434	205 05 0 00 777340 	PAGRD5:	MOVSI	INDX,-440
  2428	032435	201 07 0 00 000777 		MOVEI	AC,777
  2429
  2430	032436	200 14 0 00 000007 		MOVE	COR,AC			;MAKE REVERSE PAGED MEMORY READ
  2431	032437	242 14 0 00 000011 		LSH	COR,^D9			;ADDRESSES GO FROM 777XXX TO 340XXX
  2432	032440	661 14 0 00 777777 		TLO	COR,-1
  2433	032441	621 14 0 14 000000 		TLZ	COR,(COR)
  2434	032442	201 10 0 00 042674 		MOVEI	AC1,PGRDTB+437
  2435	032443	275 10 0 05 000000 		SUBI	AC1,(INDX)
  2436	032444	405 10 0 00 000777 		ANDI	AC1,777
  2437	032445	271 10 0 14 000000 		ADDI	AC1,(COR)
  2438	032446	200 13 0 10 000000 		MOVE	ACT,(AC1)
  2439	032447	312 14 0 00 000013 		CAME	COR,ACT
  2440						ERROR	PAGRD5+2,13,COR,ACT,DATA ERROR,REVERSE READ,PAGRDX^
  2441	032450	036 13 0 00 037002 
  2442	032451	035 00 0 00 032436 		ERLOOP	PAGRD5+2		;IF ERROR, LOOP TO PAGRD5+2
  2443	032452	370 00 0 00 000007 		SOS	AC
  2444	032453	253 05 0 00 032436 		AOBJN	INDX,PAGRD5+2
  2445
  2446	032454	367 15 0 00 032413 		REPTLP	PAGRD3
  2447	032455	254 00 0 00 032463 		JRST	PGWRTA-2
  2448
  2449	032456	037 02 0 00 036726 	PAGRDX:	PSIXM	SIXBTZ	<REF TO >^	[SIXBIT\REF TO _\]^
  2450	032457	200 00 0 00 000010 		MOVE	AC1
  2451	032460	037 06 0 00 000000 		PNT6
  2452	032461	037 00 0 00 030242 		PCRL
  2453	032462	263 17 0 00 000000 		RTN
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 40
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA WRITE                                                              SEQ 0094

  2454					SUBTTL	TEST PAGED DATA WRITE
  2455
  2456					;*USING PAGING ADDRESS 400XXX AND 777XXX
  2457					;*PAGING REFERENCES POINT TO EXEC UNPAGED ADDRESSES.
  2458
  2459					SALL
  2460			037005		T=	SIXBTZ	PAGED DATA WRITE TEST
  2461					LALL
  2462
  2463						SUBTST^
  2464	032463	201 00 0 00 032463 		MOVEI	.
  2465	032464	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2466	032465	200 15 0 00 042233 	PGWRTA:	MOVE	REPT,RPEAT
  2467	032466	402 00 0 00 000200 		SETZM	200			;CLEAR AND SETUP PAGE MAP
  2468	032467	200 07 0 00 036532 		MOVE	AC,[200,,201]
  2469	032470	251 07 0 00 000417 		BLT	AC,417
  2470	032471	205 07 0 00 740032 		MOVSI	AC,740000!<PGW400_-^D9>
  2471	032472	202 07 0 00 000200 		MOVEM	AC,200
  2472	032473	201 07 0 00 740032 		MOVEI	AC,740000!<PGW777_-^D9>
  2473	032474	202 07 0 00 000377 		MOVEM	AC,377
  2474
  2475					;*TEST A 'MOVEM' USING AN 'E' ADDRESS THAT CAUSES PAGING.
  2476					;*'E' = PAGE 400 (HIGH ORDER 9 BITS),
  2477					;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGW400' ADDRESS.
  2478					;*PAGE MAP RELOCATION BITS SETUP FOR
  2479					;*HIGH ORDER 9 BITS OF 'PGW400' ADDRESS.
  2480					;*THEREFORE ACTUAL ADDRESS FOR 'MOVEM' IS:
  2481					;*HIGH ORDER 9 BITS FROM PAGE MAP AND
  2482					;*LOW ORDER 9 BITS OF 'PGW400' ADDRESS.
  2483
  2484	032475	7 010 20 0 00 020000 	PGWTBB:	CONO	PAG,LTRPEN		;CLEAR MEMORIES, ETC.
  2485	032476	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2486	032477	402 00 0 00 032531 		SETZM	PGW400
  2487	032500	200 14 0 00 037011 		MOVE	COR,[377000,,400777]
  2488	032501	202 14 0 00 400531 		MOVEM	COR,400000!<PGW400&777>	;MAKE PAGED WRITE
  2489	032502	476 00 0 00 000013 		SETOM	ACT
  2490	032503	200 13 0 00 400531 		MOVE	ACT,400000!<PGW400&777>	;PAGED REREAD VERIFY
  2491	032504	312 14 0 00 000013 		CAME	COR,ACT
  2492						ERROR	PGWTBB,13,COR,ACT,PAGED REREAD,ADR 400XXX^
  2493												SALL
  2494	032505	036 13 0 00 037015 
  2495	032506	035 00 0 00 032475 		ERLOOP	PGWTBB		;IF ERROR, LOOP TO PGWTBB
  2496	032507	200 13 0 00 032531 		MOVE	ACT,PGW400		;DIRECT REREAD VERIFY
  2497	032510	312 14 0 00 000013 		CAME	COR,ACT
  2498						ERROR	PGWTBB,13,COR,ACT,DIRECT REREAD,ADR 400XXX^
  2499	032511	036 13 0 00 037023 
  2500	032512	035 00 0 00 032475 		ERLOOP	PGWTBB		;IF ERROR, LOOP TO PGWTBB
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 41
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA WRITE                                                              SEQ 0095

  2501					;*TEST A 'MOVEM' USING AN 'E' ADDRESS THAT CAUSES PAGING.
  2502					;*'E' = PAGE 777 (HIGH ORDER 9 BITS),
  2503					;*LOW ORDER 9 BITS ARE LOW ORDER 9 BITS OF 'PGW777' ADDRESS.
  2504					;*PAGE MAP RELOCATION BITS SETUP FOR
  2505					;*HIGH ORDER 9 BITS OF 'PGW777' ADDRESS.
  2506					;*THEREFORE ACTUAL ADDRESS FOR 'MOVEM' IS:
  2507					;*HIGH ORDER 9 BITS FROM PAGE MAP AND
  2508					;*LOW ORDER 9 BITS OF 'PGW777' ADDRESS.
  2509
  2510	032513	402 00 0 00 032532 	PGWRTC:	SETZM	PGW777
  2511	032514	200 14 0 00 037026 		MOVE	COR,[000777,,777000]
  2512	032515	202 14 0 00 777532 		MOVEM	COR,777000!<PGW777&777>	;MAKE PAGED WRITE
  2513	032516	476 00 0 00 000013 		SETOM	ACT
  2514	032517	200 13 0 00 777532 		MOVE	ACT,777000!<PGW777&777>	;PAGED REREAD VERIFY
  2515	032520	312 14 0 00 000013 		CAME	COR,ACT
  2516						ERROR	PGWRTC,13,COR,ACT,PAGED REREAD,ADR 777XXX^
  2517	032521	036 13 0 00 037027 
  2518	032522	035 00 0 00 032513 		ERLOOP	PGWRTC		;IF ERROR, LOOP TO PGWRTC
  2519	032523	200 13 0 00 032532 		MOVE	ACT,PGW777		;DIRECT REREAD VERIFY
  2520	032524	312 14 0 00 000013 		CAME	COR,ACT
  2521						ERROR	PGWRTC,13,COR,ACT,DIRECT REREAD,ADR 777XXX^
  2522	032525	036 13 0 00 037032 
  2523	032526	035 00 0 00 032513 		ERLOOP	PGWRTC		;IF ERROR, LOOP TO PGWRTC
  2524
  2525	032527	367 15 0 00 032466 		REPTLP	PGWRTA+1
  2526
  2527	032530	254 00 0 00 032533 		JRST	PGWRT0-2
  2528
  2529	032531	000000	000000		PGW400:	0				;PAGE 400 STORAGE LOCATION
  2530	032532	000000	000000		PGW777:	0				;PAGE 777 STORAGE LOCATION
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 42
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA WRITE                                                              SEQ 0096

  2531					;*TEST WRITE OF DATA USING PAGED ADDRESS.
  2532					;*DATA IS WRITTEN INTO CONSECUTIVE DATA WORDS
  2533					;*IN AN EXEC UNPAGED DATA AREA.
  2534					;*DATA CONSISTS OF PAGED ADR AND COMPLEMENT OF PAGED ADDRESS.
  2535
  2536						SUBTST^
  2537	032533	201 00 0 00 032533 		MOVEI	.
  2538	032534	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2539	032535	200 15 0 00 042233 	PGWRT0:	MOVE	REPT,RPEAT
  2540	032536	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL=100 PASSES
  2541	032537	205 05 0 00 777560 		MOVSI	INDX,-440/2
  2542	032540	201 07 0 00 000340 		MOVEI	AC,340
  2543
  2544	032541	201 11 0 05 042235 	PGWRT1:	MOVEI	AC2,PGWRTB(INDX)
  2545	032542	242 11 0 00 777767 		LSH	AC2,-^D9
  2546	032543	271 11 0 00 740000 		ADDI	AC2,740000
  2547	032544	504 12 0 00 000011 		HRL	AC3,AC2
  2548	032545	201 11 0 05 042236 		MOVEI	AC2,PGWRTB+1(INDX)
  2549	032546	242 11 0 00 777767 		LSH	AC2,-^D9
  2550	032547	271 11 0 00 740000 		ADDI	AC2,740000
  2551	032550	540 12 0 00 000011 		HRR	AC3,AC2
  2552	032551	550 10 0 00 000007 		HRRZ	AC1,AC			;SETUP PAGE MAP
  2553	032552	242 10 0 00 777777 		LSH	AC1,-1
  2554	032553	305 10 0 00 000200 		CAIGE	AC1,200
  2555	032554	271 10 0 00 000220 		ADDI	AC1,220
  2556	032555	202 12 0 10 000000 		MOVEM	AC3,(AC1)
  2557	032556	271 07 0 00 000002 		ADDI	AC,2
  2558	032557	350 00 0 00 000005 		AOS	INDX
  2559	032560	253 05 0 00 032541 		AOBJN	INDX,PGWRT1
  2560
  2561	032561	7 010 20 0 00 020000 	PGWRT2:	CONO	PAG,LTRPEN		;CLEAR AM, ETC
  2562	032562	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2563	032563	402 00 0 00 042235 		SETZM	PGWRTB			;CLEAR DATA AREA
  2564	032564	200 07 0 00 037035 		MOVE	AC,[PGWRTB,,PGWRTB+1]
  2565	032565	251 07 0 00 042675 		BLT	AC,PGWRTB+440
  2566	032566	205 05 0 00 777340 		MOVSI	INDX,-440
  2567	032567	201 07 0 00 000340 		MOVEI	AC,340
  2568
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 43
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA WRITE                                                              SEQ 0097

  2569	032570	200 14 0 00 000007 	PGWRT3:	MOVE	COR,AC
  2570	032571	242 14 0 00 000011 		LSH	COR,^D9
  2571	032572	661 14 0 00 777777 		TLO	COR,-1
  2572	032573	621 14 0 14 000000 		TLZ	COR,(COR)
  2573	032574	201 10 0 05 042235 		MOVEI	AC1,PGWRTB(INDX)
  2574	032575	405 10 0 00 000777 		ANDI	AC1,777
  2575	032576	271 10 0 14 000000 		ADDI	AC1,(COR)
  2576
  2577	032577	202 14 0 10 000000 		MOVEM	COR,(AC1)		;MAKE PAGED MEMORY WRITE
  2578	032600	476 00 0 00 000013 		SETOM	ACT
  2579	032601	200 13 0 10 000000 		MOVE	ACT,(AC1)		;PAGED READ VERIFY
  2580	032602	312 14 0 00 000013 		CAME	COR,ACT
  2581						ERROR	PGWRT3,13,COR,ACT,DATA ERROR,PAGED REREAD,PGWRTX^
  2582	032603	036 13 0 00 037036 
  2583	032604	035 00 0 00 032570 		ERLOOP	PGWRT3		;IF ERROR, LOOP TO PGWRT3
  2584	032605	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  2585	032606	312 14 0 00 000013 		CAME	COR,ACT
  2586						ERROR	PGWRT3,13,COR,ACT,DATA ERROR,DIRECT REREAD,PGWRTX^
  2587	032607	036 13 0 00 037041 
  2588	032610	035 00 0 00 032570 		ERLOOP	PGWRT3		;IF ERROR, LOOP TO PGWRT3
  2589	032611	350 00 0 00 000007 		AOS	AC
  2590	032612	253 05 0 00 032570 		AOBJN	INDX,PGWRT3
  2591
  2592	032613	205 05 0 00 777340 	PGWRT4:	MOVSI	INDX,-440		;CHECK DATA WRITE BLOCK
  2593	032614	201 07 0 00 000340 		MOVEI	AC,340			;USING DIRECT ADDRESSING
  2594
  2595	032615	200 14 0 00 000007 		MOVE	COR,AC
  2596	032616	242 14 0 00 000011 		LSH	COR,^D9			;SETUP COMPARE WORD
  2597	032617	661 14 0 00 777777 		TLO	COR,-1
  2598	032620	621 14 0 14 000000 		TLZ	COR,(COR)
  2599	032621	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  2600	032622	312 14 0 00 000013 		CAME	COR,ACT
  2601						ERROR	PGWRT2,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
  2602	032623	036 13 0 00 037046 
  2603	032624	035 00 0 00 032561 		ERLOOP	PGWRT2		;IF ERROR, LOOP TO PGWRT2
  2604	032625	350 00 0 00 000007 		AOS	AC
  2605	032626	253 05 0 00 032615 		AOBJN	INDX,PGWRT4+2
  2606
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 44
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA WRITE                                                              SEQ 0098

  2607	032627	402 00 0 00 042235 	PGWRT5:	SETZM	PGWRTB			;CLEAR DATA AREA
  2608	032630	200 07 0 00 037035 		MOVE	AC,[PGWRTB,,PGWRTB+1]
  2609	032631	251 07 0 00 042674 		BLT	AC,PGWRTB+437
  2610	032632	205 05 0 00 777340 		MOVSI	INDX,-440
  2611	032633	201 07 0 00 000777 		MOVEI	AC,777
  2612
  2613	032634	200 14 0 00 000007 	PGWRT6:	MOVE	COR,AC			;MAKE REVERSE PAGED MEMORY WRITE
  2614	032635	242 14 0 00 000011 		LSH	COR,^D9
  2615	032636	661 14 0 00 777777 		TLO	COR,-1
  2616	032637	621 14 0 14 000000 		TLZ	COR,(COR)
  2617	032640	201 10 0 00 042674 		MOVEI	AC1,PGWRTB+437
  2618	032641	275 10 0 05 000000 		SUBI	AC1,(INDX)
  2619	032642	405 10 0 00 000777 		ANDI	AC1,777
  2620	032643	271 10 0 14 000000 		ADDI	AC1,(COR)
  2621	032644	202 14 0 10 000000 		MOVEM	COR,(AC1)		;PERFORM PAGED WRITE
  2622	032645	476 00 0 00 000013 		SETOM	ACT
  2623	032646	200 13 0 10 000000 		MOVE	ACT,(AC1)		;PAGED REREAD VERIFY
  2624	032647	312 14 0 00 000013 		CAME	COR,ACT
  2625						ERROR	PGWRT6,13,COR,ACT,DATA ERROR,REVERSE PAGED REREAD,PGWRTX^
  2626	032650	036 13 0 00 037055 
  2627	032651	035 00 0 00 032634 		ERLOOP	PGWRT6		;IF ERROR, LOOP TO PGWRT6
  2628	032652	201 11 0 00 042674 		MOVEI	AC2,PGWRTB+437
  2629	032653	275 11 0 05 000000 		SUBI	AC2,(INDX)
  2630	032654	200 13 0 11 000000 		MOVE	ACT,(AC2)
  2631	032655	312 14 0 00 000013 		CAME	COR,ACT
  2632						ERROR	PGWRT6,13,COR,ACT,DATA ERROR,REVERSE DIRECT REREAD,PGWRTZ^
  2633	032656	036 13 0 00 037064 
  2634	032657	035 00 0 00 032634 		ERLOOP	PGWRT6		;IF ERROR, LOOP TO PGWRT6
  2635	032660	370 00 0 00 000007 		SOS	AC
  2636	032661	253 05 0 00 032634 		AOBJN	INDX,PGWRT6
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 45
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGED DATA WRITE                                                              SEQ 0099

  2637	032662	205 05 0 00 777340 	PGWRT7:	MOVSI	INDX,-440
  2638	032663	201 07 0 00 000340 		MOVEI	AC,340
  2639
  2640	032664	200 14 0 00 000007 		MOVE	COR,AC			;CHECK DATA WRITE BLOCK
  2641	032665	242 14 0 00 000011 		LSH	COR,^D9			;USING DIRECT ADDRESSING
  2642	032666	661 14 0 00 777777 		TLO	COR,-1
  2643	032667	621 14 0 14 000000 		TLZ	COR,(COR)
  2644	032670	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  2645	032671	312 14 0 00 000013 		CAME	COR,ACT
  2646						ERROR	PGWRT5,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
  2647	032672	036 13 0 00 037046 
  2648	032673	035 00 0 00 032627 		ERLOOP	PGWRT5		;IF ERROR, LOOP TO PGWRT5
  2649	032674	350 00 0 00 000007 		AOS	AC
  2650	032675	253 05 0 00 032664 		AOBJN	INDX,PGWRT7+2
  2651
  2652	032676	367 15 0 00 032537 		REPTLP	PGWRT0+2		;CYCLE
  2653	032677	254 00 0 00 032717 		JRST	PFT0-2
  2654
  2655	032700	037 02 0 00 036726 	PGWRTX:	PSIXM	SIXBTZ	<REF TO >^	[SIXBIT\REF TO _\]^
  2656	032701	200 00 0 00 000010 		MOVE	AC1
  2657	032702	037 06 0 00 000000 		PNT6
  2658	032703	037 00 0 00 030242 		PCRL
  2659	032704	263 17 0 00 000000 		RTN
  2660
  2661	032705	037 02 0 00 036726 	PGWRTY:	PSIXM	SIXBTZ	<REF TO >^	[SIXBIT\REF TO _\]^
  2662	032706	201 00 0 05 042235 		MOVEI	PGWRTB(INDX)
  2663	032707	037 06 0 00 000000 		PNT6
  2664	032710	037 00 0 00 030242 		PCRL
  2665	032711	263 17 0 00 000000 		RTN
  2666
  2667	032712	037 02 0 00 036726 	PGWRTZ:	PSIXM	SIXBTZ	<REF TO >^	[SIXBIT\REF TO _\]^
  2668	032713	200 00 0 00 000011 		MOVE	AC2
  2669	032714	037 06 0 00 000000 		PNT6
  2670	032715	037 00 0 00 030242 		PCRL
  2671	032716	263 17 0 00 000000 		RTN
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 46
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE FAIL WORD                                                                SEQ 0100

  2672					SUBTTL	TEST PAGE FAIL WORD
  2673
  2674					SALL
  2675			037067		T=	SIXBTZ	PAGE FAIL WORD TEST
  2676					LALL
  2677
  2678					;*VERIFY THAT THE PROPER PAGE FAIL CODE OCCURS ON A PAGED READ
  2679					;*TO AN AREA WITHOUT THE ACCESS BIT BUT WITH THE PUBLIC,
  2680					;*WRITEABLE,SOFTWARE & CACHE BIT.
  2681
  2682						SUBTST^
  2683	032717	201 00 0 00 032717 		MOVEI	.
  2684	032720	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2685	032721	200 15 0 00 042233 	PFT0:	MOVE	REPT,RPEAT
  2686	032722	402 00 0 00 000200 		SETZM	200
  2687	032723	200 00 0 00 037073 		MOVE	[200,201]
  2688	032724	251 00 0 00 000417 		BLT	417			;CLEAR PAGE MAP
  2689
  2690	032725	205 00 0 00 360032 		MOVSI	360000!<PGW400_-^D9>
  2691	032726	202 00 0 00 000200 		MOVEM	200			;SETUP PAGE MAP WORD
  2692
  2693	032727	201 00 0 00 032743 		MOVEI	PFT2
  2694	032730	202 00 0 00 000502 		MOVEM	LPGFTR			;SETUP FOR PAGE FAIL
  2695
  2696	032731	476 00 0 00 032531 	PFT1:	SETOM	PGW400
  2697	032732	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  2698	032733	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2699	032734	402 00 0 00 000014 		SETZM	COR
  2700	032735	403 00 0 00 000013 		SETZB	0,ACT
  2701
  2702	032736	200 13 0 00 400531 		MOVE	ACT,400000!<PGW400&777>	;MAKE PAGED READ
  2703
  2704	032737	200 13 0 00 032531 		MOVE	ACT,PGW400
  2705						ERROR	PFT1,13,COR,ACT,TRAP FAILED,FATAL^
  2706												SALL
  2707	032740	036 13 0 00 037074 
  2708	032741	035 00 0 00 032731 		ERLOOP	PFT1		;IF ERROR, LOOP TO PFT1
  2709	032742	254 00 0 00 032731 		JRST	PFT1			;FATAL
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 47
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE FAIL WORD                                                                SEQ 0101

  2710	032743	312 14 0 00 000013 	PFT2:	CAME	COR,ACT
  2711						ERROR	PFT1,13,COR,ACT,PAGE FAIL STORED IN AC^
  2712	032744	036 13 0 00 037077 
  2713	032745	035 00 0 00 032731 		ERLOOP	PFT1		;IF ERROR, LOOP TO PFT1
  2714
  2715	032746	200 13 0 00 000000 		MOVE	ACT,0
  2716	032747	312 14 0 00 000013 		CAME	COR,ACT
  2717						ERROR	PFT1,13,COR,ACT,PAGE FAIL STORED IN 0^
  2718	032750	036 13 0 00 037102 
  2719	032751	035 00 0 00 032731 		ERLOOP	PFT1		;IF ERROR, LOOP TO PFT1
  2720
  2721	032752	200 14 0 00 037105 		MOVE	COR,[067000,,400000!<PGW400&777>]
  2722	032753	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  2723	032754	312 14 0 00 000013 		CAME	COR,ACT
  2724						ERROR	PFT1,13,COR,ACT,PAGE FAIL WORD WRONG^
  2725	032755	036 13 0 00 037106 
  2726	032756	035 00 0 00 032731 		ERLOOP	PFT1		;IF ERROR, LOOP TO PFT1
  2727
  2728	032757	367 15 0 00 032722 		REPTLP	PFT0+1
  2729
  2730	032760	200 00 0 00 042232 		MOVE	PGFAIL			;RESTORE PAGE FAIL
  2731	032761	202 00 0 00 000502 		MOVEM	LPGFTR
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 48
DFKEAM	MAC	15-Sep-81 09:29		TEST WRITE PROTECTED PAGING                                                        SEQ 0102

  2732					SUBTTL	TEST WRITE PROTECTED PAGING
  2733
  2734					;*TRYING TO WRITE INTO A WRITE PROTECTED AREA
  2735					;*SHOULD CAUSE A PAGE FAILURE
  2736
  2737					SALL
  2738			037111		T=	SIXBTZ	WRITE PROTECT TEST
  2739					LALL
  2740
  2741						SUBTST^
  2742	032762	201 00 0 00 032762 		MOVEI	.
  2743	032763	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2744	032764	200 15 0 00 042233 	WRTP0:	MOVE	REPT,RPEAT
  2745	032765	402 00 0 00 000200 		SETZM	200			;CLEAR AND SETUP PAGE MAP
  2746	032766	200 07 0 00 036532 		MOVE	AC,[200,,201]
  2747	032767	251 07 0 00 000417 		BLT	AC,417
  2748	032770	205 07 0 00 640032 		MOVSI	AC,640000!<PGW400_-^D9>
  2749	032771	202 07 0 00 000200 		MOVEM	AC,200
  2750	032772	201 07 0 00 400032 		MOVEI	AC,400000!<PGW777_-^D9>
  2751	032773	202 07 0 00 000377 		MOVEM	AC,377
  2752	032774	201 07 0 00 033010 		MOVEI	AC,WRTPF
  2753	032775	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  2754
  2755	032776	402 00 0 00 032531 	WRTP1:	SETZM	PGW400
  2756	032777	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  2757	033000	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2758	033001	402 00 0 00 000014 		SETZM	COR
  2759	033002	403 00 0 00 000013 		SETZB	0,ACT
  2760	033003	476 00 0 00 400531 		SETOM	400000!<PGW400&777>	;MAKE PAGED WRITE
  2761	033004	200 13 0 00 032531 		MOVE	ACT,PGW400
  2762						ERROR	WRTP1,13,COR,ACT,TRAP FAILED,ADR 400XXX^
  2763												SALL
  2764	033005	036 13 0 00 037115 
  2765	033006	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
  2766	033007	254 00 0 00 032776 		JRST	WRTP1
  2767
  2768	033010	402 00 0 00 000014 	WRTPF:	SETZM	COR
  2769	033011	312 14 0 00 000013 		CAME	COR,ACT
  2770						ERROR	WRTP1,13,COR,ACT,PAGE FAIL STORED IN AC,ADR 400XXX^
  2771	033012	036 13 0 00 037120 
  2772	033013	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
  2773	033014	200 13 0 00 000000 		MOVE	ACT,0
  2774	033015	312 14 0 00 000013 		CAME	COR,ACT
  2775						ERROR	WRTP1,13,COR,ACT,PAGE FAIL STORED IN 0,ADR 400XXX^
  2776	033016	036 13 0 00 037123 
  2777	033017	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
  2778	033020	200 14 0 00 037126 		MOVE	COR,[135000,,400000!<PGW400&777>]
  2779	033021	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  2780	033022	312 14 0 00 000013 		CAME	COR,ACT
  2781						ERROR	WRTP1,13,COR,ACT,PAGE FAIL WORD WRONG,ADR 400XXX^
  2782	033023	036 13 0 00 037127 
  2783	033024	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 49
DFKEAM	MAC	15-Sep-81 09:29		TEST WRITE PROTECTED PAGING                                                        SEQ 0103

  2784	033025	402 00 0 00 000014 	WRTP2:	SETZM	COR
  2785	033026	200 13 0 00 032531 		MOVE	ACT,PGW400
  2786	033027	312 14 0 00 000013 		CAME	COR,ACT
  2787						ERROR	WRTP1,13,COR,ACT,DATA WORD WRONG,ADR 400XXX^
  2788	033030	036 13 0 00 037135 
  2789	033031	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
  2790
  2791	033032	201 07 0 00 033043 	WRTP3:	MOVEI	AC,WRTPF1
  2792	033033	202 07 0 00 000502 		MOVEM	AC,LPGFTR
  2793	033034	476 00 0 00 032532 		SETOM	PGW777
  2794	033035	476 00 0 00 000014 		SETOM	COR
  2795	033036	476 00 0 00 000013 		SETOM	ACT
  2796	033037	402 00 0 00 777532 		SETZM	777000!<PGW777&777>	;MAKE PAGED WRITE
  2797	033040	200 13 0 00 032532 		MOVE	ACT,PGW777
  2798						ERROR1	13,COR,ACT,TRAP FAILED,ADR 777XXX^
  2799	033041	036 13 0 00 037140 
  2800	033042	254 00 0 00 033032 		JRST	WRTP3
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 50
DFKEAM	MAC	15-Sep-81 09:29		TEST WRITE PROTECTED PAGING                                                        SEQ 0104

  2801	033043	312 14 0 00 000013 	WRTPF1:	CAME	COR,ACT
  2802						ERROR	WRTP1,13,COR,ACT,PAGE FAIL STORED IN AC,ADR 777XXX^
  2803	033044	036 13 0 00 037143 
  2804	033045	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
  2805	033046	200 14 0 00 037146 		MOVE	COR,[111000,,777000!<PGW777&777>]
  2806	033047	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  2807	033050	312 14 0 00 000013 		CAME	COR,ACT
  2808						ERROR	WRTP1,13,COR,ACT,PAGE FAIL WORD WRONG,ADR 777XXX^
  2809	033051	036 13 0 00 037147 
  2810	033052	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
  2811
  2812	033053	476 00 0 00 000014 	WRTP4:	SETOM	COR
  2813	033054	200 13 0 00 032532 		MOVE	ACT,PGW777
  2814	033055	312 14 0 00 000013 		CAME	COR,ACT
  2815						ERROR	WRTP1,13,COR,ACT,DATA WORD WRONG,ADR 777XXX^
  2816	033056	036 13 0 00 037152 
  2817	033057	035 00 0 00 032776 		ERLOOP	WRTP1		;IF ERROR, LOOP TO WRTP1
  2818
  2819	033060	367 15 0 00 032765 		REPTLP	WRTP0+1
  2820
  2821	033061	200 07 0 00 042232 		MOVE	AC,PGFAIL
  2822	033062	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;RESET PAGE FAIL TRAP
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 51
DFKEAM	MAC	15-Sep-81 09:29		PAGED BLT PAGING AND ADDRESSING TEST                                               SEQ 0105

  2823					SUBTTL	PAGED BLT PAGING AND ADDRESSING TEST
  2824
  2825					;*CHECKS THAT ADDRESSING FROM 340000 TO 777777 WORKS.
  2826					;*ALL PAGING REFERENCES RELOCATE INTO ACTUAL ADDRESSES 76000 TO 76777.
  2827					;*BLT USES ALL ADDRESS FROM 340000 TO 777777.
  2828
  2829					SALL
  2830			037155		T=	SIXBTZ	PAGED BLT TEST
  2831					LALL
  2832
  2833						SUBTST^
  2834	033063	201 00 0 00 033063 		MOVEI	.
  2835	033064	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2836	033065	200 15 0 00 042233 	BLT0:	MOVE	REPT,RPEAT
  2837	033066	205 05 0 00 777560 		MOVSI	INDX,-440/2		;SETUP PAGE MAP SO ALL ADDRESSES
  2838	033067	201 07 0 00 000340 		MOVEI	AC,340			;POINT TO 76XXX.
  2839	033070	200 11 0 00 037160 		MOVE	AC2,[740076,,740076]
  2840	033071	550 10 0 00 000007 	BLT1:	HRRZ	AC1,AC
  2841	033072	242 10 0 00 777777 		LSH	AC1,-1
  2842	033073	305 10 0 00 000200 		CAIGE	AC1,200
  2843	033074	271 10 0 00 000220 		ADDI	AC1,220
  2844	033075	202 11 0 10 000000 		MOVEM	AC2,(AC1)
  2845	033076	271 07 0 00 000002 		ADDI	AC,2
  2846	033077	253 05 0 00 033071 		AOBJN	INDX,BLT1
  2847
  2848	033100	7 010 20 0 00 020000 	BLT2:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  2849	033101	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2850	033102	402 00 0 00 340000 		SETZM	340000			;SET FIRST ADDRESS TO ALL ZEROS
  2851	033103	200 07 0 00 037161 		MOVE	AC,[340000,,340001]
  2852	033104	251 07 0 00 777777 		BLT	AC,777777		;BLT TO MAXIMUM
  2853
  2854	033105	205 05 0 00 777000 	BLT3:	MOVSI	INDX,-1000		;CHECK DATA AREA WITH DIRECT ADDRESSING
  2855	033106	201 14 0 05 076000 		MOVEI	COR,76000(INDX)
  2856	033107	200 13 0 05 076000 		MOVE	ACT,76000(INDX)
  2857	033110	312 13 0 00 036427 		CAME	ACT,[0]
  2858						ERROR	BLT1,13,COR,ACT,NOT ALL ZEROS,<REF TO (CORRECT)>^
  2859												SALL
  2860	033111	036 13 0 00 037165 
  2861	033112	035 00 0 00 033071 		ERLOOP	BLT1		;IF ERROR, LOOP TO BLT1
  2862	033113	253 05 0 00 033106 		AOBJN	INDX,BLT3+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 52
DFKEAM	MAC	15-Sep-81 09:29		PAGED BLT PAGING AND ADDRESSING TEST                                               SEQ 0106

  2863	033114	7 010 20 0 00 020000 	BLT4:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  2864	033115	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2865	033116	476 00 0 00 340000 		SETOM	340000			;SET FIRST ADDRESS TO ALL ONES
  2866	033117	200 07 0 00 037161 		MOVE	AC,[340000,,340001]
  2867	033120	251 07 0 00 777777 		BLT	AC,777777		;BLT TO MAXIMUM
  2868
  2869	033121	205 05 0 00 777000 	BLT5:	MOVSI	INDX,-1000		;CHECK DATA AREA WITH DIRECT ADDRESSING
  2870	033122	201 14 0 05 076000 		MOVEI	COR,76000(INDX)
  2871	033123	200 13 0 05 076000 		MOVE	ACT,76000(INDX)
  2872	033124	312 13 0 00 037170 		CAME	ACT,[-1]
  2873						ERROR	BLT4,13,COR,ACT,NOT ALL ONES,<REF TO (CORRECT)>^
  2874	033125	036 13 0 00 037174 
  2875	033126	035 00 0 00 033114 		ERLOOP	BLT4		;IF ERROR, LOOP TO BLT4
  2876	033127	253 05 0 00 033122 		AOBJN	INDX,BLT5+1
  2877
  2878	033130	7 010 20 0 00 020000 	BLT6:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  2879	033131	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2880	033132	200 13 0 00 037177 		MOVE	ACT,[525252,,525252]
  2881	033133	202 13 0 00 340000 		MOVEM	ACT,340000		;SET FIRST ADDRESS TO ALT BITS
  2882	033134	200 07 0 00 037161 		MOVE	AC,[340000,,340001]
  2883	033135	251 07 0 00 777777 		BLT	AC,777777		;BLT TO MAXIMUM
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 53
DFKEAM	MAC	15-Sep-81 09:29		PAGED BLT PAGING AND ADDRESSING TEST                                               SEQ 0107

  2884	033136	205 05 0 00 777000 	BLT7:	MOVSI	INDX,-1000		;CHECK DATA AREA WITH DIRECT ADDRESSING
  2885	033137	201 14 0 05 076000 		MOVEI	COR,76000(INDX)
  2886	033140	200 13 0 05 076000 		MOVE	ACT,76000(INDX)
  2887	033141	312 13 0 00 037177 		CAME	ACT,[525252,,525252]
  2888						ERROR	BLT6,13,COR,ACT,NOT ALT BITS,<REF TO (CORRECT)>^
  2889	033142	036 13 0 00 037203 
  2890	033143	035 00 0 00 033130 		ERLOOP	BLT6		;IF ERROR, LOOP TO BLT6
  2891	033144	253 05 0 00 033137 		AOBJN	INDX,BLT7+1
  2892
  2893	033145	7 010 20 0 00 020000 	BLT8:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  2894	033146	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2895	033147	200 13 0 00 037206 		MOVE	ACT,[252525,,252525]
  2896	033150	202 13 0 00 340000 		MOVEM	ACT,340000		;SET FIRST ADDRESS TO ALT BITS
  2897	033151	200 07 0 00 037161 		MOVE	AC,[340000,,340001]
  2898	033152	251 07 0 00 777777 		BLT	AC,777777		;BLT TO MAXIMUM
  2899
  2900	033153	205 05 0 00 777000 	BLT9:	MOVSI	INDX,-1000		;CHECK DATA AREA WITH DIRECT ADDRESSING
  2901	033154	201 14 0 05 076000 		MOVEI	COR,76000(INDX)
  2902	033155	200 13 0 05 076000 		MOVE	ACT,76000(INDX)
  2903	033156	312 13 0 00 037206 		CAME	ACT,[252525,,252525]
  2904						ERROR	BLT8,13,COR,ACT,NOT ALT BITS,<REF TO (CORRECT)>^
  2905	033157	036 13 0 00 037203 
  2906	033160	035 00 0 00 033145 		ERLOOP	BLT8		;IF ERROR, LOOP TO BLT8
  2907	033161	253 05 0 00 033154 		AOBJN	INDX,BLT9+1
  2908
  2909	033162	367 15 0 00 033066 		REPTLP	BLT0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 54
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0108

  2910					SUBTTL	TEST BASE REGISTER RELOCATION
  2911
  2912					;*SETUP PAGE MAP PAGES AS PAGE 76
  2913					;*SETUP PAGE 0 PAGE MAP FOR ERRORS
  2914					;*SETUP BASE REGISTERS
  2915					;*TEST MUUO FOR PAGE 0 AND FOR PAGE 76
  2916					;*TEST THAT EXEC PAGE FAIL WORD STORES CORRECTLY
  2917					;*IN PAGE 76 USING USER BASE REGISTER RELOCATION.
  2918
  2919					SALL
  2920			037207		T=	SIXBTZ	BASE REGISTER RELOCATION TEST
  2921					LALL
  2922
  2923						SUBTST^
  2924	033163	201 00 0 00 033163 		MOVEI	.
  2925	033164	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  2926	033165	200 15 0 00 042233 	RLBAS0:	MOVE	REPT,RPEAT
  2927	033166	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  2928	033167	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  2929	033170	402 00 0 00 000200 		SETZM	200			;CLEAR PAGE 0 PAGE MAP
  2930	033171	200 07 0 00 036532 		MOVE	AC,[200,,201]
  2931	033172	251 07 0 00 000417 		BLT	AC,417
  2932	033173	402 00 0 00 076200 		SETZM	76200			;CLEAR RELOC PAGE PAGE MAP
  2933	033174	200 07 0 00 037214 		MOVE	AC,[76200,,76201]
  2934	033175	251 07 0 00 076417 		BLT	AC,76417
  2935	033176	200 00 0 00 037215 		MOVE	[540000,,540001]
  2936	033177	202 00 0 00 076600 		MOVEM	76600			;SETUP LOWER EXEC PAGING
  2937	033200	205 01 0 00 777621 		MOVSI	1,-157
  2938	033201	270 00 0 00 037216 		ADD	[2,,2]
  2939	033202	202 00 0 01 076601 		MOVEM	76601(1)
  2940	033203	253 01 0 00 033201 		AOBJN	1,.-2
  2941	033204	200 00 0 00 000041 		MOVE	41
  2942	033205	202 00 0 00 076041 		MOVEM	76000!LUUOI		;SETUP LUUO
  2943	033206	200 00 0 00 000042 		MOVE	42
  2944	033207	202 00 0 00 076042 		MOVEM	76000!42		;SETUP INTERRUPT
  2945	033210	200 00 0 00 000502 		MOVE	LPGFTR
  2946	033211	202 00 0 00 076502 		MOVEM	76000!LPGFTR		;SETUP PAGE FAIL
  2947	033212	200 00 0 00 037217 		MOVE	[JFCL]
  2948	033213	202 00 0 00 076421 		MOVEM	76000!LAROVT		;SETUP ARITH TRAP
  2949	033214	200 00 0 00 000422 		MOVE	LPDOVT
  2950	033215	202 00 0 00 076422 		MOVEM	76000!LPDOVT		;SETUP PDL OV TRAP
  2951	033216	200 00 0 00 000423 		MOVE	LTRP3T
  2952	033217	202 00 0 00 076423 		MOVEM	76000!LTRP3T		;SETUP TRAP 3 TRAP
  2953	033220	200 00 0 00 000430 		MOVE	LKNTRP
  2954	033221	202 00 0 00 076430 		MOVEM	76000!LKNTRP		;SETUP MUUO AS ERROR
  2955	033222	202 00 0 00 076431 		MOVEM	76000!LKTRP
  2956	033223	202 00 0 00 076432 		MOVEM	76000!LSNTRP
  2957	033224	202 00 0 00 076433 		MOVEM	76000!LSTRP
  2958	033225	202 00 0 00 076434 		MOVEM	76000!LCNTRP
  2959	033226	202 00 0 00 076435 		MOVEM	76000!LCTRP
  2960	033227	202 00 0 00 076436 		MOVEM	76000!LPNTRP
  2961	033230	202 00 0 00 076437 		MOVEM	76000!LPTRP
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 55
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0109

  2962					;*TEST USER BASE REGISTER RELOCATION
  2963					;*BY USING AN MUUO OF 0,,654321.
  2964
  2965					;*TEST MUUO FIRST WITH EPMP & UPMP AS PAGE 0.
  2966
  2967	033231	201 07 0 00 033244 	RLBAS1:	MOVEI	AC,RLBMU1		;SETUP MUUO TO RETURN
  2968	033232	202 07 0 00 000430 		MOVEM	AC,LKNTRP		;FROM PAGE 0
  2969	033233	201 07 0 00 033267 		MOVEI	AC,RLBMU3
  2970	033234	202 07 0 00 076430 		MOVEM	AC,76000!LKNTRP		;FROM RELOCATED PAGE
  2971
  2972	033235	402 00 0 00 000014 	RLBAS2:	SETZM	COR
  2973	033236	201 13 0 00 033241 		MOVEI	ACT,.+3
  2974	033237	254 02 1 00 033240 		JRSTF	@.+1			;CLEAR FLAGS
  2975	033240	000000	033241				.+1
  2976	033241	000000	654321		RLBMU0:	0,,654321			;DO AN MUUO OF 0,,654321
  2977						ERROR	RLBAS2,13,COR,ACT,MUUO FAILED,<COR=MUUO, ACT=MUUO ADR>^
  2978												SALL
  2979	033242	036 13 0 00 037226 
  2980	033243	035 00 0 00 033235 		ERLOOP	RLBAS2		;IF ERROR, LOOP TO RLBAS2
  2981
  2982	033244	201 14 0 00 654321 	RLBMU1:	MOVEI	COR,654321
  2983	033245	200 13 0 00 000424 		MOVE	ACT,LMUUO
  2984	033246	312 14 0 00 000013 		CAME	COR,ACT
  2985						ERROR	RLBAS2,13,COR,ACT,MUUO STORED WRONG,PAGE 0^
  2986	033247	036 13 0 00 037236 
  2987	033250	035 00 0 00 033235 		ERLOOP	RLBAS2		;IF ERROR, LOOP TO RLBAS2
  2988	033251	201 14 0 00 033242 		MOVEI	COR,RLBMU0+1
  2989	033252	200 13 0 00 000425 		MOVE	ACT,LMUUOP
  2990	033253	312 14 0 00 000013 		CAME	COR,ACT
  2991						ERROR	RLBAS2,13,COR,ACT,MUUO PC STORED WRONG,PAGE 0^
  2992	033254	036 13 0 00 037245 
  2993	033255	035 00 0 00 033235 		ERLOOP	RLBAS2		;IF ERROR, LOOP TO RLBAS2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 56
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0110

  2994					;*TEST THAT WITH UPMP RELOCATED TO PAGE 76
  2995					;*AN MUUO TRAPS CORRECTLY AND RETRIEVES NEW PC
  2996					;*FROM RELOCATED USER PAGE MAP PAGE.
  2997					;*ALSO TEST THAT MUUO AND TRAPPED PC GET STORED CORRECTLY
  2998					;*IN RELOCATED UPMP.
  2999
  3000	033256	7 010 14 0 00 037250 	RLBAS3:	DATAO	PAG,[LLDUSB,,400076]	;RELOCATE USER BASE REG
  3001	033257	402 00 0 00 000014 		SETZM	COR
  3002	033260	201 13 0 00 033263 		MOVEI	ACT,.+3
  3003	033261	254 02 1 00 033262 		JRSTF	@.+1
  3004	033262	000000	033263				.+1
  3005	033263	000000	123456		RLBMU2:	0,,123456			;DO AN MUUO OF 0,,123456
  3006	033264	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3007						ERROR	RLBAS3,13,COR,ACT,MUUO FAILED,<COR=MUUO, ACT=MUUO ADR>^
  3008	033265	036 13 0 00 037226 
  3009	033266	035 00 0 00 033256 		ERLOOP	RLBAS3		;IF ERROR, LOOP TO RLBAS3
  3010
  3011	033267	7 010 14 0 00 036337 	RLBMU3:	DATAO	PAG,[LLDUSB,,400000]
  3012	033270	201 14 0 00 123456 		MOVEI	COR,123456
  3013	033271	200 13 0 00 076424 		MOVE	ACT,76000!LMUUO
  3014	033272	312 14 0 00 000013 		CAME	COR,ACT
  3015						ERROR	RLBAS3,13,COR,ACT,MUUO STORED WRONG,RELOCATED PAGE^
  3016	033273	036 13 0 00 037254 
  3017	033274	035 00 0 00 033256 		ERLOOP	RLBAS3		;IF ERROR, LOOP TO RLBAS3
  3018	033275	201 14 0 00 033264 		MOVEI	COR,RLBMU2+1
  3019	033276	200 13 0 00 076425 		MOVE	ACT,76000!LMUUOP
  3020	033277	312 14 0 00 000013 		CAME	COR,ACT
  3021						ERROR	RLBAS3,13,COR,ACT,MUUO PC STORED WRONG,RELOCATED PAGE^
  3022	033300	036 13 0 00 037257 
  3023	033301	035 00 0 00 033256 		ERLOOP	RLBAS3		;IF ERROR, LOOP TO RLBAS3
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 57
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0111

  3024					;*TEST USER BASE REGISTER RELOCATION
  3025					;*BY USING EXEC PAGE FAIL WORD
  3026
  3027	033302	200 07 0 00 042230 	RLBAS4:	MOVE	AC,MUUOER#
  3028	033303	202 07 0 00 000430 		MOVEM	AC,LKNTRP
  3029	033304	202 07 0 00 076430 		MOVEM	AC,76000!LKNTRP
  3030	033305	201 07 0 00 033316 		MOVEI	AC,RLPFL
  3031	033306	202 07 0 00 076502 		MOVEM	AC,76000!LPGFTR		;SETUP PAGE FAIL TRAP
  3032	033307	476 00 0 00 076500 	RLPF1:	SETOM	76000!LEUPFW
  3033	033310	201 14 0 00 777777 		MOVEI	COR,777777
  3034	033311	476 00 0 00 000013 		SETOM	ACT
  3035	033312	7 010 14 0 00 037250 		DATAO	PAG,[LLDUSB,,400076]
  3036	033313	200 13 0 00 777777 		MOVE	ACT,777777		;SHOULD PAGE FAIL
  3037						ERROR	RLPF1,13,COR,ACT,PAGE FAIL FAILED,REF TO 777777^
  3038	033314	036 13 0 00 037265 
  3039	033315	035 00 0 00 033307 		ERLOOP	RLPF1		;IF ERROR, LOOP TO RLPF1
  3040
  3041	033316	476 00 0 00 000014 	RLPFL:	SETOM	COR
  3042	033317	312 14 0 00 000013 		CAME	COR,ACT
  3043						ERROR	RLPF1,13,COR,ACT,PAGE FAIL STORED IN AC,REF TO 777777^
  3044	033320	036 13 0 00 037270 
  3045	033321	035 00 0 00 033307 		ERLOOP	RLPF1		;IF ERROR, LOOP TO RLPF1
  3046	033322	200 14 0 00 036646 		MOVE	COR,[1000,,777777]	;SETUP CORRECT WORD
  3047	033323	200 13 0 00 076500 		MOVE	ACT,76000!LEUPFW
  3048	033324	312 14 0 00 000013 		CAME	COR,ACT
  3049						ERROR	RLPF1,13,COR,ACT,PAGE FAIL WORD WRONG,REF TO 777777^
  3050	033325	036 13 0 00 037273 
  3051	033326	035 00 0 00 033307 		ERLOOP	RLPF1		;IF ERROR, LOOP TO RLPF1
  3052
  3053	033327	7 010 14 0 00 036337 	RLBAS5:	DATAO	PAG,[LLDUSB,,400000]
  3054	033330	200 07 0 00 042232 		MOVE	AC,PGFAIL
  3055	033331	202 07 0 00 000502 		MOVEM	AC,LPGFTR
  3056	033332	367 15 0 00 033166 		REPTLP	RLBAS0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 58
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0112

  3057					;*TEST BASE REGISTER RELOCATION
  3058					;*BY USING EXEC-PER-PROCESS PAGING
  3059					;*AND PAGING REFILL DATA FROM RELOCATED PAGE
  3060					;*WITH USER BASE REGISTER SET TO PAGE 76.
  3061
  3062					SALL
  3063			037276		T=	SIXBTZ	RELOCATED EXEC-PER-PROCESS PAGING
  3064					LALL
  3065
  3066						SUBTST^
  3067	033333	201 00 0 00 033333 		MOVEI	.
  3068	033334	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3069	033335	200 15 0 00 042233 	RLBAS6:	MOVE	REPT,RPEAT
  3070	033336	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL=100 PASSES
  3071	033337	205 05 0 00 777760 		MOVSI	INDX,-40/2
  3072	033340	201 07 0 00 000340 		MOVEI	AC,340
  3073
  3074	033341	201 11 0 05 042235 	RLWRT1:	MOVEI	AC2,PGWRTB(INDX)
  3075	033342	242 11 0 00 777767 		LSH	AC2,-^D9		;SETUP RELOCATED PAGE PAGE MAP
  3076	033343	271 11 0 00 540000 		ADDI	AC2,540000		;FOR RELOCATION OF PAGES
  3077	033344	504 12 0 00 000011 		HRL	AC3,AC2			;340-377 TO EXEC DATA AREA
  3078	033345	201 11 0 05 042236 		MOVEI	AC2,PGWRTB+1(INDX)
  3079	033346	242 11 0 00 777767 		LSH	AC2,-^D9
  3080	033347	271 11 0 00 540000 		ADDI	AC2,540000
  3081	033350	540 12 0 00 000011 		HRR	AC3,AC2
  3082	033351	550 10 0 00 000007 		HRRZ	AC1,AC
  3083	033352	242 10 0 00 777777 		LSH	AC1,-1
  3084	033353	271 10 0 00 000220 		ADDI	AC1,220
  3085	033354	202 12 0 10 076000 		MOVEM	AC3,76000(AC1)		;WRITE PAGING DATA
  3086	033355	271 07 0 00 000002 		ADDI	AC,2
  3087	033356	350 00 0 00 000005 		AOS	INDX
  3088	033357	253 05 0 00 033341 		AOBJN	INDX,RLWRT1
  3089
  3090	033360	402 00 0 00 042235 	RLWRT2:	SETZM	PGWRTB
  3091	033361	200 07 0 00 037035 		MOVE	AC,[PGWRTB,,PGWRTB+1]
  3092	033362	251 07 0 00 042274 		BLT	AC,PGWRTB+37		;CLEAR DATA AREA
  3093	033363	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3094	033364	7 010 14 0 00 037250 		DATAO	PAG,[LLDUSB,,400076]
  3095	033365	205 05 0 00 777740 		MOVSI	INDX,-40
  3096	033366	201 07 0 00 000340 		MOVEI	AC,340
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 59
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0113

  3097	033367	200 14 0 00 000007 	RLWRT3:	MOVE	COR,AC			;SETUP DATA
  3098	033370	242 14 0 00 000011 		LSH	COR,^D9			;AND PAGING ADDRESS
  3099	033371	661 14 0 00 777777 		TLO	COR,-1
  3100	033372	621 14 0 14 000000 		TLZ	COR,(COR)
  3101	033373	201 10 0 05 042235 		MOVEI	AC1,PGWRTB(INDX)
  3102	033374	405 10 0 00 000777 		ANDI	AC1,777
  3103	033375	271 10 0 14 000000 		ADDI	AC1,(COR)
  3104
  3105	033376	202 14 0 10 000000 		MOVEM	COR,(AC1)		;MAKE PAGED MEMORY WRITE
  3106	033377	200 13 0 10 000000 		MOVE	ACT,(AC1)		;PAGED READ VERIFY
  3107	033400	312 14 0 00 000013 		CAME	COR,ACT
  3108						ERROR	RLWRT2,13,COR,ACT,DATA ERROR,PAGED REREAD,PGWRTX^
  3109												SALL
  3110	033401	036 13 0 00 037304 
  3111	033402	035 00 0 00 033360 		ERLOOP	RLWRT2		;IF ERROR, LOOP TO RLWRT2
  3112	033403	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  3113	033404	312 14 0 00 000013 		CAME	COR,ACT
  3114						ERROR	RLWRT2,13,COR,ACT,DATA ERROR,DIRECT REREAD,PGWRTY^
  3115	033405	036 13 0 00 037307 
  3116	033406	035 00 0 00 033360 		ERLOOP	RLWRT2		;IF ERROR, LOOP TO RLWRT2
  3117	033407	350 00 0 00 000007 		AOS	AC
  3118	033410	253 05 0 00 033367 		AOBJN	INDX,RLWRT3
  3119
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 60
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0114

  3120	033411	7 010 20 0 00 020000 	RLWRT4:	CONO	PAG,LTRPEN
  3121	033412	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3122	033413	205 05 0 00 777740 		MOVSI	INDX,-40		;CHECK DATA BLOCK USING
  3123	033414	201 07 0 00 000340 		MOVEI	AC,340			;DIRECT ADDRESSING
  3124
  3125	033415	200 14 0 00 000007 		MOVE	COR,AC
  3126	033416	242 14 0 00 000011 		LSH	COR,^D9
  3127	033417	661 14 0 00 777777 		TLO	COR,-1
  3128	033420	621 14 0 14 000000 		TLZ	COR,(COR)
  3129	033421	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  3130	033422	312 14 0 00 000013 		CAME	COR,ACT
  3131						ERROR	RLWRT2,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
  3132	033423	036 13 0 00 037312 
  3133	033424	035 00 0 00 033360 		ERLOOP	RLWRT2		;IF ERROR, LOOP TO RLWRT2
  3134	033425	350 00 0 00 000007 		AOS	AC
  3135	033426	253 05 0 00 033415 		AOBJN	INDX,RLWRT4+4
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 61
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0115

  3136					;*TEST THAT A TRAP FROM THE EXEC-PER-PROCESS AREA
  3137					;*USES THE CORRECT BASE REGISTER
  3138
  3139	033427	7 010 20 0 00 020000 	EPPT0:	CONO	PAG,LTRPEN
  3140	033430	7 010 14 0 00 037250 		DATAO	PAG,[LLDUSB,,400076]
  3141
  3142	033431	200 00 0 00 037315 		MOVE	[JRST 1,340001]		;PORTAL
  3143	033432	202 00 0 00 340000 		MOVEM	340000
  3144	033433	200 00 0 00 037316 		MOVE	[JRSTF @340002]		;SET FLAGS
  3145	033434	202 00 0 00 340001 		MOVEM	340001
  3146	033435	200 00 0 00 037317 		MOVE	[TN0!TN1,,340003] ;TO CAUSE TRAP 3
  3147	033436	202 00 0 00 340002 		MOVEM	340002
  3148	033437	200 00 0 00 037320 		MOVE	[JRST 340003]		;IF NO TRAP, HANG
  3149	033440	202 00 0 00 340003 		MOVEM	340003
  3150
  3151	033441	200 00 0 00 037321 		MOVE	[JSR EPPT2]		;SHOULD TRAP USING EBR
  3152	033442	202 00 0 00 000423 		MOVEM	LTRP3T
  3153	033443	200 00 0 00 037322 		MOVE	[JSR EPPT1]		;ERROR IF USED UBR
  3154	033444	202 00 0 00 076423 		MOVEM	76000!LTRP3T
  3155
  3156	033445	254 00 0 00 340000 		JRST	340000			;TO PER-PROCESS AREA
  3157
  3158	033446	000000	000000		EPPT1:	0
  3159	033447	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3160	033450	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3161						ERROR	RLBAS6+2,13,0,0,EPP ADR TRAP ERROR,TRAPPED USING UBR^
  3162	033451	036 13 0 00 037332 
  3163	033452	035 00 0 00 033337 		ERLOOP	RLBAS6+2		;IF ERROR, LOOP TO RLBAS6+2
  3164	033453	254 00 0 00 033466 		JRST	EPPT3
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 62
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0116

  3165	033454	000000	000000		EPPT2:	0
  3166	033455	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3167	033456	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3168	033457	200 00 0 00 042226 		MOVE	LTRP3SV
  3169	033460	202 00 0 00 000423 		MOVEM	LTRP3T
  3170	033461	200 14 0 00 037335 		MOVE	COR,[0,,340003]
  3171	033462	200 13 0 00 033454 		MOVE	ACT,EPPT2
  3172	033463	312 14 0 00 000013 		CAME	COR,ACT
  3173						ERROR	RLBAS6+2,13,COR,ACT,EPP ADR TRAP ERROR,SAVED PC WRONG^
  3174	033464	036 13 0 00 037341 
  3175	033465	035 00 0 00 033337 		ERLOOP	RLBAS6+2		;IF ERROR, LOOP TO RLBAS6+2
  3176
  3177	033466	367 15 0 00 033337 	EPPT3:	REPTLP	RLBAS6+2
  3178
  3179					XLIST
  3180					LIST
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 65
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0117

  3181					;*TEST BASE REGISTER RELOCATION
  3182					;*BY USING PAGE FAULT TRAP
  3183
  3184						SUBTST^
  3185	033467	201 00 0 00 033467 		MOVEI	.
  3186	033470	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3187	033471	200 15 0 00 042233 	RLPFT0:	MOVE	REPT,RPEAT
  3188	033472	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3189	033473	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3190	033474	201 07 0 00 033515 		MOVEI	AC,RLPFT1
  3191	033475	202 07 0 00 076502 		MOVEM	AC,76000!LPGFTR		;SETUP PAGE PAGE FAULT
  3192	033476	201 07 0 00 033510 		MOVEI	AC,RLPFT2
  3193	033477	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP PAGE 0 PAGE FAULT
  3194
  3195	033500	402 00 0 00 076400 		SETZM	76400
  3196	033501	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3197	033502	7 010 14 0 00 037250 		DATAO	PAG,[LLDUSB,,400076]	;SETUP BASE REG
  3198	033503	200 13 0 00 340000 	RLPFT3:	MOVE	ACT,340000		;DO PAGING, SHOULD FAULT
  3199	033504	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3200	033505	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3201						ERROR1	13,COR,ACT,PAGE FAULT FAILED,FATAL^
  3202	033506	036 13 0 00 037347 
  3203	033507	254 00 0 00 033471 		JRST	RLPFT0
  3204
  3205	033510	7 010 20 0 00 020000 	RLPFT2:	CONO	PAG,LTRPEN
  3206	033511	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3207	033512	200 14 0 00 000500 		MOVE	COR,LEUPFW
  3208						ERROR1	13,COR,ACT,RELOCATION FAILED,PAGE FAIL TRAPPED TO PAGE 0^
  3209	033513	036 13 0 00 037362 
  3210	033514	254 00 0 00 033471 		JRST	RLPFT0			;FATAL
  3211
  3212	033515	7 010 20 0 00 020000 	RLPFT1:	CONO	PAG,LTRPEN
  3213	033516	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3214	033517	200 14 0 00 037365 		MOVE	COR,[1000,,340000]
  3215	033520	200 13 0 00 076500 		MOVE	ACT,76000!LEUPFW
  3216	033521	312 14 0 00 000013 		CAME	COR,ACT
  3217						ERROR1	13,COR,ACT,RELOCATION SUCCEEDED,PAGE FAIL WORD WRONG^
  3218	033522	036 13 0 00 037372 
  3219	033523	035 00 0 00 033501 		ERLOOP	RLPFT3-2
  3220
  3221	033524	367 15 0 00 033472 		REPTLP	RLPFT0+1
  3222
  3223	033525	200 00 0 00 042232 		MOVE	PGFAIL
  3224	033526	202 00 0 00 000502 		MOVEM	LPGFTR
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 66
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0118

  3225					;*TEST BASE REGISTER RELOCATION
  3226					;*BY USING TRAPPING
  3227
  3228						SUBTST^
  3229	033527	201 00 0 00 033527 		MOVEI	.
  3230	033530	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3231	033531	200 15 0 00 042233 	RLTRP0:	MOVE	REPT,RPEAT
  3232	033532	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3233	033533	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3234
  3235					;*TEST RELOCATED TRAP 3
  3236
  3237	033534	200 07 0 00 037375 	RLTRP1:	MOVE	AC,[JSR	RLTP3]
  3238	033535	202 07 0 00 076423 		MOVEM	AC,76000!LTRP3T
  3239	033536	7 010 20 0 00 020076 		CONO	PAG,LTRPEN!76
  3240	033537	254 02 1 00 033540 		JRSTF	@.+1
  3241	033540	000600	033541			TN0!TN1,,.+1
  3242	033541	7 010 20 0 00 020000 	RLTP3X:	CONO	PAG,LTRPEN
  3243						ERROR1	13,0,0,TRAP 3 FAILED,FATAL^
  3244	033542	036 13 0 00 037376 
  3245	033543	254 00 0 00 033531 		JRST	RLTRP0
  3246
  3247	033544	000000	000000		RLTP3:	0
  3248	033545	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3249	033546	200 14 0 00 037401 		MOVE	COR,[0,,RLTP3X]
  3250	033547	200 13 0 00 033544 		MOVE	ACT,RLTP3
  3251	033550	312 14 0 00 000013 		CAME	COR,ACT
  3252						ERROR	RLTRP1,13,COR,ACT,TRAP 3 SAVED PC^
  3253	033551	036 13 0 00 037402 
  3254	033552	035 00 0 00 033534 		ERLOOP	RLTRP1		;IF ERROR, LOOP TO RLTRP1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 67
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0119

  3255					;*TEST RELOCATED TRAP 2
  3256
  3257	033553	200 07 0 00 037405 		MOVE	AC,[JSR RLPDL]
  3258	033554	202 07 0 00 076422 		MOVEM	AC,76000!LPDOVT
  3259	033555	7 010 20 0 00 020076 		CONO	PAG,LTRPEN!76
  3260	033556	254 02 1 00 033557 		JRSTF	@.+1
  3261	033557	000400	033560			TN0,,.+1
  3262	033560	7 010 20 0 00 020000 	RLPDLX:	CONO	PAG,LTRPEN
  3263						ERROR1	13,0,0,TRAP 2 FAILED,FATAL^
  3264	033561	036 13 0 00 037406 
  3265	033562	254 00 0 00 033531 		JRST	RLTRP0
  3266
  3267	033563	000000	000000		RLPDL:	0
  3268	033564	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3269	033565	200 14 0 00 037411 		MOVE	COR,[0,,RLPDLX]
  3270	033566	200 13 0 00 033563 		MOVE	ACT,RLPDL
  3271	033567	312 14 0 00 000013 		CAME	COR,ACT
  3272						ERROR	RLTRP1,13,COR,ACT,TRAP 2 SAVED PC^
  3273	033570	036 13 0 00 037412 
  3274	033571	035 00 0 00 033534 		ERLOOP	RLTRP1		;IF ERROR, LOOP TO RLTRP1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 68
DFKEAM	MAC	15-Sep-81 09:29		TEST BASE REGISTER RELOCATION                                                      SEQ 0120

  3275					;*TEST RELOCATED TRAP 1
  3276
  3277	033572	200 07 0 00 037415 		MOVE	AC,[JSR RLAROV]
  3278	033573	202 07 0 00 076421 		MOVEM	AC,76000!LAROVT
  3279	033574	7 010 20 0 00 020076 		CONO	PAG,LTRPEN!76
  3280	033575	254 02 1 00 033576 		JRSTF	@.+1
  3281	033576	000200	033577			TN1,,.+1
  3282	033577	7 010 20 0 00 020000 	RLAROX:	CONO	PAG,LTRPEN
  3283						ERROR1	13,0,0,TRAP 1 FAILED,FATAL^
  3284	033600	036 13 0 00 037416 
  3285	033601	254 00 0 00 033531 		JRST	RLTRP0
  3286
  3287	033602	000000	000000		RLAROV:	0
  3288	033603	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3289	033604	200 14 0 00 037421 		MOVE	COR,[0,,RLAROX]
  3290	033605	200 13 0 00 033602 		MOVE	ACT,RLAROV
  3291	033606	312 14 0 00 000013 		CAME	COR,ACT
  3292						ERROR	RLTRP1,13,COR,ACT,TRAP 1 SAVED PC^
  3293	033607	036 13 0 00 037422 
  3294	033610	035 00 0 00 033534 		ERLOOP	RLTRP1		;IF ERROR, LOOP TO RLTRP1
  3295
  3296	033611	200 07 0 00 037217 		MOVE	AC,[JFCL]
  3297	033612	202 07 0 00 076421 		MOVEM	AC,76000!LAROVT
  3298
  3299	033613	367 15 0 00 033532 		REPTLP	RLTRP0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 69
DFKEAM	MAC	15-Sep-81 09:29		TEST INTERRUPT RELOCATION                                                          SEQ 0121

  3300					SUBTTL	TEST INTERRUPT RELOCATION
  3301
  3302					;*SET PAGE 0 INTERRUPT LOCATIONS AS ERROR
  3303					;*SETUP RELOCATED PAGE INTERRUPT LOCATIONS FOR TESTING
  3304					;*RELOCATE EXEC BASE REGISTER
  3305					;*TEST INTERRUPTS
  3306
  3307					SALL
  3308			037425		T=SIXBTZ	RELOCATED INTERRUPT TEST
  3309					LALL
  3310
  3311						SUBTST^
  3312	033614	201 00 0 00 033614 		MOVEI	.
  3313	033615	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3314	033616	200 15 0 00 042233 	RLINT0:	MOVE	REPT,RPEAT
  3315	033617	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL =100 PASSES
  3316	033620	200 00 0 00 037432 		MOVE	[JSR RLITR1]		;SETUP RELOC PAGE INTERRUPTS
  3317	033621	202 00 0 00 076042 		MOVEM	76000!42
  3318	033622	200 00 0 00 037433 		MOVE	[JSR RLITR2]
  3319	033623	202 00 0 00 076044 		MOVEM	76000!44
  3320	033624	200 00 0 00 037434 		MOVE	[JSR RLITR3]
  3321	033625	202 00 0 00 076046 		MOVEM	76000!46
  3322	033626	200 00 0 00 037435 		MOVE	[JSR RLITR4]
  3323	033627	202 00 0 00 076050 		MOVEM	76000!50
  3324	033630	200 00 0 00 037436 		MOVE	[JSR RLITR5]
  3325	033631	202 00 0 00 076052 		MOVEM	76000!52
  3326	033632	200 00 0 00 037437 		MOVE	[JSR RLITR6]
  3327	033633	202 00 0 00 076054 		MOVEM	76000!54
  3328	033634	200 00 0 00 037440 		MOVE	[JSR RLITR7]
  3329	033635	202 00 0 00 076056 		MOVEM	76000!56
  3330
  3331	033636	200 00 0 00 037441 		MOVE	[JSR RLIERR]		;SETUP PAGE 0 FOR ERROR
  3332	033637	202 00 0 00 000056 		MOVEM	56
  3333	033640	202 00 0 00 000054 		MOVEM	54
  3334	033641	202 00 0 00 000052 		MOVEM	52
  3335	033642	202 00 0 00 000050 		MOVEM	50
  3336	033643	202 00 0 00 000046 		MOVEM	46
  3337	033644	202 00 0 00 000044 		MOVEM	44
  3338	033645	202 00 0 00 000042 		MOVEM	42
  3339
  3340	033646	7 004 20 0 00 011400 	RLINT1:	CONO	PI,LPICLR!LCHNOF!LPIOFF
  3341	033647	7 000 20 0 00 200000 		CONO	APR,LIOCLR
  3342	033650	254 00 0 00 033661 		JRST	RLINT2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 70
DFKEAM	MAC	15-Sep-81 09:29		TEST INTERRUPT RELOCATION                                                          SEQ 0122

  3343					;*PAGE 0 INTERRUPT ERROR HANDLER
  3344
  3345	033651	000000	000000		RLIERR:	0
  3346	033652	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3347	033653	7 000 24 0 00 000014 		CONI	APR,COR
  3348	033654	7 004 24 0 00 000013 		CONI	PI,ACT
  3349	033655	7 000 20 0 00 200000 		CONO	APR,LIOCLR
  3350	033656	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3351						ERROR1	13,COR,ACT,PAGE 0 INTERRUPT ERROR,<COR=APR, ACT=PI>^
  3352												SALL
  3353	033657	036 13 0 00 037451 
  3354	033660	254 00 0 00 033646 		JRST	RLINT1
  3355
  3356					;*RELOCATED INTERRUPT MACRO'S
  3357
  3358					DEFINE	RLITRX	(PICHN,APRCHN)<
  3359					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3360					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3361					;*PAGE MAP RELOCATED TO PAGE 76.
  3362					;*INTERRUPT CHANNEL = APRCHN.
  3363					
  3364						CONO	PI,LCHNON!LPION!PICHN
  3365						CONO	APR,LSPAER!LEPAER!APRCHN
  3366						MOVEI	AC,1000
  3367						SOJG	AC,.
  3368						HALT	.			;IF NO INTERRUPT, FATAL
  3369					>
  3370
  3371					DEFINE	RLITRC	(ITRCHN)<
  3372					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = ITRCHN
  3373					
  3374						0				;RETURN, CHANNEL ITRCHN
  3375						CONO	APR,LDPAER!LCPAER
  3376						CONO	PI,LPICLR!LCHNOF!LPIOFF
  3377					>
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 71
DFKEAM	MAC	15-Sep-81 09:29		TEST INTERRUPT RELOCATION                                                          SEQ 0123

  3378	033661	7 010 20 0 00 020076 	RLINT2:	CONO	PAG,LTRPEN!76
  3379
  3380						LALL
  3381	033662				RLINT3:	RLITRX	(1,7)^
  3382					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3383					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3384					;*PAGE MAP RELOCATED TO PAGE 76.
  3385					;*INTERRUPT CHANNEL = 7
  3386
  3387	033662	7 004 20 0 00 002201 		CONO	PI,LCHNON!LPION!1
  3388	033663	7 000 20 0 00 110407 		CONO	APR,LSPAER!LEPAER!7
  3389	033664	201 07 0 00 001000 		MOVEI	AC,1000
  3390	033665	367 07 0 00 033665 		SOJG	AC,.
  3391	033666	254 04 0 00 033666 		HALT	.			;IF NO INTERRUPT, FATAL
  3392					^
  3393	033667				RLITR7:	RLITRC	(7)^
  3394					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 7
  3395
  3396	033667	000000	000000			0				;RETURN, CHANNEL 7
  3397	033670	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  3398	033671	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3399					^
  3400
  3401	033672				RLINT4:	RLITRX	(2,6)^
  3402					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3403					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3404					;*PAGE MAP RELOCATED TO PAGE 76.
  3405					;*INTERRUPT CHANNEL = 6
  3406
  3407	033672	7 004 20 0 00 002202 		CONO	PI,LCHNON!LPION!2
  3408	033673	7 000 20 0 00 110406 		CONO	APR,LSPAER!LEPAER!6
  3409	033674	201 07 0 00 001000 		MOVEI	AC,1000
  3410	033675	367 07 0 00 033675 		SOJG	AC,.
  3411	033676	254 04 0 00 033676 		HALT	.			;IF NO INTERRUPT, FATAL
  3412					^
  3413	033677				RLITR6:	RLITRC	(6)^
  3414					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 6
  3415
  3416	033677	000000	000000			0				;RETURN, CHANNEL 6
  3417	033700	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  3418	033701	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3419					^
  3420
  3421	033702				RLINT5:	RLITRX	(4,5)^
  3422					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3423					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3424					;*PAGE MAP RELOCATED TO PAGE 76.
  3425					;*INTERRUPT CHANNEL = 5
  3426
  3427	033702	7 004 20 0 00 002204 		CONO	PI,LCHNON!LPION!4
  3428	033703	7 000 20 0 00 110405 		CONO	APR,LSPAER!LEPAER!5
  3429	033704	201 07 0 00 001000 		MOVEI	AC,1000
  3430	033705	367 07 0 00 033705 		SOJG	AC,.
  3431	033706	254 04 0 00 033706 		HALT	.			;IF NO INTERRUPT, FATAL
  3432					^
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 71-1
DFKEAM	MAC	15-Sep-81 09:29		TEST INTERRUPT RELOCATION                                                          SEQ 0124

  3433	033707				RLITR5:	RLITRC	(5)^
  3434					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 5
  3435
  3436	033707	000000	000000			0				;RETURN, CHANNEL 5
  3437	033710	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  3438	033711	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3439					^
  3440
  3441	033712				RLINT6:	RLITRX	(10,4)^
  3442					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3443					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3444					;*PAGE MAP RELOCATED TO PAGE 76.
  3445					;*INTERRUPT CHANNEL = 4
  3446
  3447	033712	7 004 20 0 00 002210 		CONO	PI,LCHNON!LPION!10
  3448	033713	7 000 20 0 00 110404 		CONO	APR,LSPAER!LEPAER!4
  3449	033714	201 07 0 00 001000 		MOVEI	AC,1000
  3450	033715	367 07 0 00 033715 		SOJG	AC,.
  3451	033716	254 04 0 00 033716 		HALT	.			;IF NO INTERRUPT, FATAL
  3452					^
  3453	033717				RLITR4:	RLITRC	(4)^
  3454					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 4
  3455
  3456	033717	000000	000000			0				;RETURN, CHANNEL 4
  3457	033720	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  3458	033721	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3459					^
  3460
  3461	033722				RLINT7:	RLITRX	(20,3)^
  3462					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3463					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3464					;*PAGE MAP RELOCATED TO PAGE 76.
  3465					;*INTERRUPT CHANNEL = 3
  3466
  3467	033722	7 004 20 0 00 002220 		CONO	PI,LCHNON!LPION!20
  3468	033723	7 000 20 0 00 110403 		CONO	APR,LSPAER!LEPAER!3
  3469	033724	201 07 0 00 001000 		MOVEI	AC,1000
  3470	033725	367 07 0 00 033725 		SOJG	AC,.
  3471	033726	254 04 0 00 033726 		HALT	.			;IF NO INTERRUPT, FATAL
  3472					^
  3473	033727				RLITR3:	RLITRC	(3)^
  3474					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 3
  3475
  3476	033727	000000	000000			0				;RETURN, CHANNEL 3
  3477	033730	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  3478	033731	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3479					^
  3480
  3481	033732				RLINT8:	RLITRX	(40,2)^
  3482					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3483					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3484					;*PAGE MAP RELOCATED TO PAGE 76.
  3485					;*INTERRUPT CHANNEL = 2
  3486
  3487	033732	7 004 20 0 00 002240 		CONO	PI,LCHNON!LPION!40
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 71-2
DFKEAM	MAC	15-Sep-81 09:29		TEST INTERRUPT RELOCATION                                                          SEQ 0125

  3488	033733	7 000 20 0 00 110402 		CONO	APR,LSPAER!LEPAER!2
  3489	033734	201 07 0 00 001000 		MOVEI	AC,1000
  3490	033735	367 07 0 00 033735 		SOJG	AC,.
  3491	033736	254 04 0 00 033736 		HALT	.			;IF NO INTERRUPT, FATAL
  3492					^
  3493	033737				RLITR2:	RLITRC	(2)^
  3494					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 2
  3495
  3496	033737	000000	000000			0				;RETURN, CHANNEL 2
  3497	033740	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  3498	033741	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3499					^
  3500
  3501	033742				RLINT9:	RLITRX	(100,1)^
  3502					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  3503					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  3504					;*PAGE MAP RELOCATED TO PAGE 76.
  3505					;*INTERRUPT CHANNEL = 1
  3506
  3507	033742	7 004 20 0 00 002300 		CONO	PI,LCHNON!LPION!100
  3508	033743	7 000 20 0 00 110401 		CONO	APR,LSPAER!LEPAER!1
  3509	033744	201 07 0 00 001000 		MOVEI	AC,1000
  3510	033745	367 07 0 00 033745 		SOJG	AC,.
  3511	033746	254 04 0 00 033746 		HALT	.			;IF NO INTERRUPT, FATAL
  3512					^
  3513	033747				RLITR1:	RLITRC	(1)^
  3514					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 1
  3515
  3516	033747	000000	000000			0				;RETURN, CHANNEL 1
  3517	033750	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  3518	033751	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  3519					^
  3520
  3521	033752	367 15 0 00 033646 		REPTLP	RLINT1
  3522
  3523	033753	7 010 20 0 00 020000 	RLINTA:	CONO	PAG,LTRPEN
  3524	033754	7 004 20 0 00 071400 		CONO	PI,LDPAER!LCPAER!LPICLR!LCHNOF!LPIOFF
  3525	033755	7 000 20 0 00 200000 		CONO	APR,LIOCLR
  3526
  3527	033756	200 07 0 00 037454 		MOVE	AC,[JSR ITRCH1]		;RESET INTERRUPTS
  3528	033757	202 07 0 00 000042 		MOVEM	AC,42
  3529	033760	7 000 20 0 00 127760 		CONO	APR,LAPRAL
  3530	033761	7 004 20 0 00 002300 		CONO	PI,LCHNON!LPION!LPICH1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 72
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE REFILL RELOCATION                                                        SEQ 0126

  3531					SUBTTL	TEST PAGE REFILL RELOCATION
  3532
  3533					;*BY PUTTING REFILL DATA IN PAGE 76.
  3534					;*AND RELOCATING EXEC BASE REGISTER
  3535
  3536					SALL
  3537			037455		T=SIXBTZ	RELOCATED EPMP REFILL PAGING
  3538					LALL
  3539
  3540						SUBTST^
  3541	033762	201 00 0 00 033762 		MOVEI	.
  3542	033763	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3543	033764	200 15 0 00 042233 	RLEPM0:	MOVE	REPT,RPEAT
  3544	033765	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL=100 PASSES
  3545	033766	205 05 0 00 777600 		MOVSI	INDX,-400/2
  3546	033767	201 07 0 00 000400 		MOVEI	AC,400
  3547
  3548	033770	201 11 0 05 042235 	RLEPM1:	MOVEI	AC2,PGWRTB(INDX)	;SETUP RELOCATION DATA
  3549	033771	242 11 0 00 777767 		LSH	AC2,-^D9
  3550	033772	271 11 0 00 740000 		ADDI	AC2,740000
  3551	033773	504 12 0 00 000011 		HRL	AC3,AC2
  3552	033774	201 11 0 05 042236 		MOVEI	AC2,PGWRTB+1(INDX)
  3553	033775	242 11 0 00 777767 		LSH	AC2,-^D9
  3554	033776	271 11 0 00 740000 		ADDI	AC2,740000
  3555	033777	540 12 0 00 000011 		HRR	AC3,AC2
  3556	034000	550 10 0 00 000007 		HRRZ	AC1,AC			;SETUP PAGE MAP ADDRESS
  3557	034001	242 10 0 00 777777 		LSH	AC1,-1
  3558	034002	202 12 0 10 076000 		MOVEM	AC3,76000(AC1)		;PUT MAPPING DATA IN PAGE 76.
  3559	034003	271 07 0 00 000002 		ADDI	AC,2
  3560	034004	350 00 0 00 000005 		AOS	INDX
  3561	034005	253 05 0 00 033770 		AOBJN	INDX,RLEPM1
  3562
  3563	034006	7 010 20 0 00 020000 	RLEPM2:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  3564	034007	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3565	034010	402 00 0 00 042235 		SETZM	PGWRTB			;CLEAR DATA AREA
  3566	034011	200 07 0 00 037035 		MOVE	AC,[PGWRTB,,PGWRTB+1]
  3567	034012	251 07 0 00 042635 		BLT	AC,PGWRTB+400
  3568	034013	205 05 0 00 777400 		MOVSI	INDX,-400
  3569	034014	201 07 0 00 000400 		MOVEI	AC,400
  3570	034015	7 010 20 0 00 020076 		CONO	PAG,LTRPEN!76		;RELOC EXEC BASE REG
  3571	034016	7 010 14 0 00 037250 		DATAO	PAG,[LLDUSB,,400076]
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 73
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE REFILL RELOCATION                                                        SEQ 0127

  3572	034017	200 14 0 00 000007 	RLEPM3:	MOVE	COR,AC			;SETUP DATA
  3573	034020	242 14 0 00 000011 		LSH	COR,^D9
  3574	034021	661 14 0 00 777777 		TLO	COR,-1
  3575	034022	621 14 0 14 000000 		TLZ	COR,(COR)
  3576	034023	201 10 0 05 042235 		MOVEI	AC1,PGWRTB(INDX)	;SETUP PAGING ADDRESS
  3577	034024	405 10 0 00 000777 		ANDI	AC1,777
  3578	034025	271 10 0 14 000000 		ADDI	AC1,(COR)
  3579	034026	202 14 0 10 000000 		MOVEM	COR,(AC1)		;MAKE PAGED MEMORY WRITE
  3580	034027	200 13 0 10 000000 		MOVE	ACT,(AC1)		;PAGED READ VERIFY
  3581	034030	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3582	034031	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3583	034032	312 14 0 00 000013 		CAME	COR,ACT
  3584						ERROR	RLEPM3-2,13,COR,ACT,DATA ERROR,PAGED REREAD,PGWRTX^
  3585												SALL
  3586	034033	036 13 0 00 037462 
  3587	034034	035 00 0 00 034015 		ERLOOP	RLEPM3-2		;IF ERROR, LOOP TO RLEPM3-2
  3588	034035	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  3589	034036	312 14 0 00 000013 		CAME	COR,ACT
  3590						ERROR	RLEPM3-2,13,COR,ACT,DATA ERROR,DIRECT REREAD,PGWRTY^
  3591	034037	036 13 0 00 037465 
  3592	034040	035 00 0 00 034015 		ERLOOP	RLEPM3-2		;IF ERROR, LOOP TO RLEPM3-2
  3593	034041	350 00 0 00 000007 		AOS	AC
  3594	034042	253 05 0 00 034015 		AOBJN	INDX,RLEPM3-2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 74
DFKEAM	MAC	15-Sep-81 09:29		TEST PAGE REFILL RELOCATION                                                        SEQ 0128

  3595	034043	7 010 20 0 00 020000 	RLEPM4:	CONO	PAG,LTRPEN
  3596	034044	205 05 0 00 777400 		MOVSI	INDX,-400		;CHECK DATA BLOCK
  3597	034045	201 07 0 00 000400 		MOVEI	AC,400			;USING DIRECT ADDRESSING
  3598	034046	200 14 0 00 000007 		MOVE	COR,AC
  3599	034047	242 14 0 00 000011 		LSH	COR,^D9			;SETUP COMPARE WORD
  3600	034050	661 14 0 00 777777 		TLO	COR,-1
  3601	034051	621 14 0 14 000000 		TLZ	COR,(COR)
  3602	034052	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  3603	034053	312 14 0 00 000013 		CAME	COR,ACT
  3604						ERROR	RLEPM2,13,COR,ACT,DATA ERROR,DIRECT READ,PGWRTY^
  3605	034054	036 13 0 00 037470 
  3606	034055	035 00 0 00 034006 		ERLOOP	RLEPM2		;IF ERROR, LOOP TO RLEPM2
  3607	034056	350 00 0 00 000007 		AOS	AC
  3608	034057	253 05 0 00 034046 		AOBJN	INDX,RLEPM4+3
  3609
  3610	034060	367 15 0 00 033766 		REPTLP	RLEPM0+2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 75
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0129

  3611					SUBTTL	INSTRUCTION PAGE FAIL TESTING
  3612
  3613					;*TEST BLOCK TRANSFER PAGE FAIL
  3614					;*SETUP 5 WORD BLT ACROSS PAGE BOUNDRY
  3615					;*FIRST PAGE DATA RELOCATION DATA IN PAGE MAP
  3616					;*SECOND PAGE DATA RELOCATION DATA NOT IN PAGE MAP
  3617					;*PERFORM BLT
  3618					;*SHOULD PAGE FAIL AFTER TRANSFERING 3 WORDS.
  3619					;*TEST PAGE FAIL, BLT AC, ETC.
  3620					;*REDO BLT, ON PAGE FAIL SETUP 2ND PAGE RELOCATION DATA AND CONTINUE BLT.
  3621					;*TEST FOR PROPER COMPLETION.
  3622
  3623					SALL
  3624			037473		T=SIXBTZ	BLT PAGE FAIL
  3625					LALL
  3626
  3627						SUBTST^
  3628	034061	201 00 0 00 034061 		MOVEI	.
  3629	034062	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3630	034063	200 15 0 00 042233 	PFBLT0:	MOVE	REPT,RPEAT
  3631	034064	402 00 0 00 000200 		SETZM	200			;CLEAR AND SETUP PAGE MAP
  3632	034065	200 07 0 00 036532 		MOVE	AC,[200,,201]
  3633	034066	251 07 0 00 000417 		BLT	AC,417
  3634	034067	205 07 0 00 740075 		MOVSI	AC,740000!75
  3635	034070	202 07 0 00 000200 		MOVEM	AC,200			;ADDRESSES 400XXX RELOCATE TO PAGE 75.
  3636	034071	201 07 0 00 034113 		MOVEI	AC,PFBLT3
  3637	034072	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  3638
  3639	034073	403 14 0 00 075775 	PFBLT1:	SETZB	COR,75775		;CLEAR BLT DATA AREA
  3640	034074	402 00 0 00 075776 		SETZM	75776
  3641	034075	402 00 0 00 075777 		SETZM	75777
  3642	034076	402 00 0 00 076000 		SETZM	76000
  3643	034077	402 00 0 00 076001 		SETZM	76001
  3644	034100	402 00 0 00 076002 		SETZM	76002
  3645	034101	476 00 0 00 000500 		SETOM	LEUPFW
  3646	034102	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  3647	034103	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3648	034104	254 02 1 00 034105 		JRSTF	@.+1
  3649	034105	000000	034106			0,,.+1
  3650	034106	476 00 0 00 400775 		SETOM	400775			;SET FIRST BLT ADDRESS
  3651	034107	200 13 0 00 037476 		MOVE	ACT,[400775,,400776]
  3652
  3653	034110	251 13 0 00 401001 	PFBLT2:	BLT	ACT,401001		;DO PAGED BLT
  3654						ERROR1	13,COR,ACT,TRAP FAILED,<ACT=BLT AC>^
  3655												SALL
  3656	034111	036 13 0 00 037501 
  3657	034112	254 00 0 00 034073 		JRST	PFBLT1			;FATAL
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 76
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0130

  3658					;*BLT PAGE FAIL RETURN
  3659
  3660	034113	200 14 0 00 037504 	PFBLT3:	MOVE	COR,[400777,,401000]
  3661	034114	312 14 0 00 000013 		CAME	COR,ACT
  3662						ERROR1	13,COR,ACT,BLT AC WRONG,^
  3663	034115	036 13 0 00 037510 
  3664
  3665	034116	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  3666	034117	200 14 0 00 037513 		MOVE	COR,[011000,,401000]
  3667	034120	312 14 0 00 000013 		CAME	COR,ACT
  3668						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  3669	034121	036 13 0 00 037514 
  3670
  3671	034122	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  3672	034123	200 14 0 00 037517 		MOVE	COR,[0,,PFBLT2]
  3673	034124	312 14 0 00 000013 		CAME	COR,ACT
  3674						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  3675	034125	036 13 0 00 037524 
  3676
  3677	034126	476 00 0 00 000014 		SETOM	COR
  3678	034127	200 13 0 00 075775 		MOVE	ACT,75775
  3679	034130	312 14 0 00 000013 		CAME	COR,ACT
  3680						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 400775^
  3681	034131	036 13 0 00 037534 
  3682
  3683	034132	200 13 0 00 075776 		MOVE	ACT,75776
  3684	034133	312 14 0 00 000013 		CAME	COR,ACT
  3685						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 400776^
  3686	034134	036 13 0 00 037541 
  3687
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 77
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0131

  3688	034135	200 13 0 00 075777 		MOVE	ACT,75777
  3689	034136	312 14 0 00 000013 		CAME	COR,ACT
  3690						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 400777^
  3691	034137	036 13 0 00 037546 
  3692
  3693	034140	402 00 0 00 000014 		SETZM	COR
  3694	034141	200 13 0 00 076000 		MOVE	ACT,76000
  3695	034142	312 14 0 00 000013 		CAME	COR,ACT
  3696						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 401000^
  3697	034143	036 13 0 00 037553 
  3698
  3699	034144	200 13 0 00 076001 		MOVE	ACT,76001
  3700	034145	312 14 0 00 000013 		CAME	COR,ACT
  3701						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 401001^
  3702	034146	036 13 0 00 037560 
  3703
  3704	034147	200 13 0 00 076002 		MOVE	ACT,76002
  3705	034150	312 14 0 00 000013 		CAME	COR,ACT
  3706						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 401002^
  3707	034151	036 13 0 00 037565 
  3708
  3709	034152	035 00 0 00 034073 		ERLOOP	PFBLT1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 78
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0132

  3710					;*TEST BLT PAGE FAIL CONTINUE
  3711
  3712	034153	201 07 0 00 034223 	PFBLT4:	MOVEI	AC,PFBLT5
  3713	034154	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP PAGE FAIL TRAP
  3714	034155	402 00 0 00 075775 		SETZM	75775			;CLEAR DATA AREA
  3715	034156	402 00 0 00 075776 		SETZM	75776
  3716	034157	402 00 0 00 075777 		SETZM	75777
  3717	034160	402 00 0 00 076000 		SETZM	76000
  3718	034161	402 00 0 00 076001 		SETZM	76001
  3719	034162	402 00 0 00 076002 		SETZM	76002
  3720	034163	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  3721	034164	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3722	034165	254 02 1 00 034166 		JRSTF	@.+1
  3723	034166	000000	034167			0,,.+1
  3724	034167	476 00 0 00 400775 		SETOM	400775			;SET FIRST BLT ADDRESS
  3725	034170	200 07 0 00 037476 		MOVE	AC,[400775,,400776]
  3726
  3727	034171	251 07 0 00 401001 		BLT	AC,401001		;PERFORM PAGED BLT
  3728
  3729					;*BLT SHOULD PAGE FAIL
  3730					;*PAGE MAP IS THEN SETUP
  3731					;*AND BLT CONTINUED
  3732
  3733	034172	476 00 0 00 000014 		SETOM	COR
  3734	034173	200 13 0 00 075775 		MOVE	ACT,75775
  3735	034174	312 14 0 00 000013 		CAME	COR,ACT
  3736						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 400775^
  3737	034175	036 13 0 00 037534 
  3738
  3739	034176	200 13 0 00 075776 		MOVE	ACT,75776
  3740	034177	312 14 0 00 000013 		CAME	COR,ACT
  3741						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 400776^
  3742	034200	036 13 0 00 037541 
  3743
  3744	034201	200 13 0 00 075777 		MOVE	ACT,75777
  3745	034202	312 14 0 00 000013 		CAME	COR,ACT
  3746						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 400777^
  3747	034203	036 13 0 00 037546 
  3748
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 79
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0133

  3749	034204	200 13 0 00 076000 		MOVE	ACT,76000
  3750	034205	312 14 0 00 000013 		CAME	COR,ACT
  3751						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 401000^
  3752	034206	036 13 0 00 037553 
  3753
  3754	034207	200 13 0 00 076001 		MOVE	ACT,76001
  3755	034210	312 14 0 00 000013 		CAME	COR,ACT
  3756						ERROR1	13,COR,ACT,BLT DATA WRONG,ADR 401001^
  3757	034211	036 13 0 00 037560 
  3758
  3759	034212	402 00 0 00 000014 		SETZM	COR
  3760	034213	200 13 0 00 076002 		MOVE	ACT,76002
  3761	034214	312 14 0 00 000013 		CAME	COR,ACT
  3762						ERROR1	13,COR,ACT,BLT WENT TOO FAR,ADR 401002^
  3763	034215	036 13 0 00 037573 
  3764
  3765	034216	035 00 0 00 034113 		ERLOOP	PFBLT3
  3766
  3767	034217	367 15 0 00 034064 		REPTLP	PFBLT0+1
  3768
  3769	034220	200 07 0 00 042232 		MOVE	AC,PGFAIL
  3770	034221	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;RESET PAGE FAIL TRAP
  3771	034222	254 00 0 00 034227 		JRST	PFBYT0-2
  3772
  3773					;*ON PAGE FAIL, SETUP NEXT PAGE FOR BLT
  3774
  3775	034223	200 10 0 00 037576 	PFBLT5:	MOVE	AC1,[740000!75,,740000!76]
  3776	034224	202 10 0 00 000200 		MOVEM	AC1,200			;SETUP PAGE MAP
  3777	034225	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  3778	034226	254 02 1 00 000501 		JRSTF	@LPFWPC			;RETURN
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 80
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0134

  3779					;*TEST BYTE PAGE FAIL
  3780					;*FIRST TEST WITH BYTE DATA IN UNMAPPED PAGE
  3781					;*THEN TEST WITH BYTE POINTER IN UNMAPPED PAGE.
  3782
  3783					SALL
  3784			037577		T=SIXBTZ	BYTE PAGE FAIL
  3785					LALL
  3786
  3787						SUBTST^
  3788	034227	201 00 0 00 034227 		MOVEI	.
  3789	034230	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3790	034231	200 15 0 00 042233 	PFBYT0:	MOVE	REPT,RPEAT
  3791	034232	402 00 0 00 000200 		SETZM	200			;CLEAR PAGE MAP
  3792	034233	200 07 0 00 036532 		MOVE	AC,[200,,201]
  3793	034234	251 07 0 00 000417 		BLT	AC,417
  3794	034235	201 07 0 00 034252 		MOVEI	AC,PFBYT3
  3795	034236	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  3796
  3797	034237	402 00 0 00 000014 	PFBYT1:	SETZM	COR			;SETUP DATA AREA AND AC
  3798	034240	476 00 0 00 076000 		SETOM	76000
  3799	034241	476 00 0 00 000500 		SETOM	LEUPFW
  3800	034242	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  3801	034243	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3802	034244	254 02 1 00 034245 		JRSTF	@.+1
  3803	034245	000000	034246			0,,.+1
  3804	034246	200 13 0 00 037602 		MOVE	ACT,[POINT 6,400000]
  3805
  3806	034247	134 14 0 00 000013 	PFBYT2:	ILDB	COR,ACT			;PERFORM BYTE INSTRUCTION
  3807						ERROR1	13,COR,ACT,ILDB TRAP FAILED,<ACT=POINTER, COR=BYTE AC>^
  3808												SALL
  3809	034250	036 13 0 00 037613 
  3810	034251	254 00 0 00 034237 		JRST	PFBYT1			;FATAL
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 81
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0135

  3811					;*ILDB PAGE FAIL RETURN
  3812					;*BYTE POINTER SHOULD HAVE BEEN INCREMENTED
  3813					;*PAGE FAIL SHOULD HAVE OCCURRED WHEN DATA WAS FETCHED.
  3814
  3815	034252	332 00 0 00 000014 	PFBYT3:	SKIPE	COR
  3816						ERROR1	13,COR,ACT,ILDB CHANGED BYTE AC,<ACT=POINTER, COR=BYTE AC>^
  3817	034253	036 13 0 00 037622 
  3818	034254	200 14 0 00 037625 		MOVE	COR,[POINT 6,400000,5]
  3819	034255	312 14 0 00 000013 		CAME	COR,ACT
  3820						ERROR1	13,COR,ACT,ILDB POINTER WRONG,^
  3821	034256	036 13 0 00 037632 
  3822	034257	476 00 0 00 000014 		SETOM	COR
  3823	034260	200 13 0 00 076000 		MOVE	ACT,76000
  3824	034261	312 14 0 00 000013 		CAME	COR,ACT
  3825						ERROR1	13,COR,ACT,ILDB MODIFIED BYTE SOURCE,ADR 400000^
  3826	034262	036 13 0 00 037644 
  3827	034263	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  3828	034264	200 14 0 00 036615 		MOVE	COR,[1000,,400000]
  3829	034265	312 14 0 00 000013 		CAME	COR,ACT
  3830						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  3831	034266	036 13 0 00 037647 
  3832	034267	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  3833	034270	200 14 0 00 037652 		MOVE	COR,[BIS,,PFBYT2]
  3834	034271	312 14 0 00 000013 		CAME	COR,ACT
  3835						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  3836	034272	036 13 0 00 037653 
  3837
  3838	034273	035 00 0 00 034237 		ERLOOP	PFBYT1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 82
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0136

  3839					;*TEST DEPOSIT BYTE PAGE FAIL
  3840
  3841	034274	201 07 0 00 034307 	PFBYT4:	MOVEI	AC,PFBYT6
  3842	034275	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  3843	034276	402 00 0 00 000014 		SETZM	COR
  3844	034277	476 00 0 00 076000 		SETOM	76000			;SETUP DATA
  3845	034300	476 00 0 00 000500 		SETOM	LEUPFW
  3846	034301	254 02 1 00 034302 		JRSTF	@.+1
  3847	034302	000000	034303			0,,.+1
  3848	034303	200 13 0 00 037602 		MOVE	ACT,[POINT 6,400000]
  3849
  3850	034304	136 14 0 00 000013 	PFBYT5:	IDPB	COR,ACT			;PERFORM DEPOSIT BYTE
  3851						ERROR1	13,COR,ACT,IDPB TRAP FAILED,<ACT=POINTER, COR=BYTE AC>^
  3852	034305	036 13 0 00 037661 
  3853	034306	254 00 0 00 034274 		JRST	PFBYT4			;FATAL
  3854
  3855					;*IDPB PAGE FAIL RETURN
  3856
  3857	034307	332 00 0 00 000014 	PFBYT6:	SKIPE	COR
  3858						ERROR1	13,COR,ACT,IDPB CHANGED BYTE AC,<ACT=POINTER, COR=BYTE AC>^
  3859	034310	036 13 0 00 037670 
  3860
  3861	034311	200 14 0 00 037625 		MOVE	COR,[POINT 6,400000,5]
  3862	034312	312 14 0 00 000013 		CAME	COR,ACT
  3863						ERROR1	13,COR,ACT,IDPB POINTER WRONG,^
  3864	034313	036 13 0 00 037677 
  3865
  3866	034314	476 00 0 00 000014 		SETOM	COR
  3867	034315	200 13 0 00 076000 		MOVE	ACT,76000
  3868	034316	312 14 0 00 000013 		CAME	COR,ACT
  3869						ERROR1	13,COR,ACT,IDPB MODIFIED BYTE DESTINATION,ADR 400000^
  3870	034317	036 13 0 00 037710 
  3871
  3872	034320	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  3873	034321	200 14 0 00 036615 		MOVE	COR,[1000,,400000]
  3874	034322	402 00 0 00 042222 		SETZM	FLG157#			;ZERO FLAG
  3875	034323	700 00 0 00 000000 		APRID	0			;SEE IF MODEL A OR B
  3876	034324	202 00 0 00 042221 		MOVEM	APRIDF#			;SAVE IT
  3877	034325	135 01 0 00 037713 		LDB	1,[POINT 9,0,17]	;GET VERSION BITS
  3878	034326	306 01 0 00 000157 		CAIN	1,157			;157 MICROCODE?
  3879	034327	476 00 0 00 042222 		SETOM	FLG157#			;YES
  3880	034330	332 00 0 00 042222 		SKIPE	FLG157
  3881	034331	254 00 0 00 034334 		JRST	PFPY
  3882	034332	606 00 0 00 040000 		TRNN	1B21			;IF = 0 MUST BE MODEL A
  3883	034333	661 14 0 00 010000 		TLO	COR,10000		;SET WRREF BIT
  3884	034334	312 14 0 00 000013 	PFPY:	CAME	COR,ACT
  3885						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  3886	034335	036 13 0 00 037647 
  3887
  3888	034336	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  3889	034337	200 14 0 00 037714 		MOVE	COR,[BIS,,PFBYT5]
  3890	034340	312 14 0 00 000013 		CAME	COR,ACT
  3891						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  3892	034341	036 13 0 00 037653 
  3893
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 82-1
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0137

  3894	034342	035 00 0 00 034274 		ERLOOP	PFBYT4
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 83
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0138

  3895					;*TEST BYTE POINTER FETCH PAGE FAIL
  3896					;*BYTE POINTER IN PAGED AREA WITH PAGE MAP CLEARED
  3897					;*THEREFORE PAGE FAIL SHOULD OCCUR ON POINTER FETCH
  3898					;*AND POINTER SHOULD NOT BE INCREMENTED.
  3899
  3900	034343	201 07 0 00 034360 	PFBYT7:	MOVEI	AC,PFBYT9
  3901	034344	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  3902	034345	402 00 0 00 000014 		SETZM	COR
  3903	034346	200 13 0 00 037715 		MOVE	ACT,[POINT 6,COR]
  3904	034347	202 13 0 00 076000 		MOVEM	ACT,76000		;SETUP POINTER
  3905	034350	476 00 0 00 000500 		SETOM	LEUPFW
  3906	034351	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  3907	034352	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3908	034353	254 02 1 00 034354 		JRSTF	@.+1
  3909	034354	000000	034355			0,,.+1
  3910
  3911	034355	134 14 0 00 400000 	PFBYT8:	ILDB	COR,400000		;PERFORM BYTE INSTRUCTION
  3912						ERROR1	13,COR,ACT,POINTER FETCH TRAP FAILED,ADR 400000^
  3913	034356	036 13 0 00 037723 
  3914	034357	254 00 0 00 034343 		JRST	PFBYT7			;FATAL
  3915
  3916					;*POINTER FETCH PAGE FAIL RETURN
  3917
  3918	034360	332 00 0 00 000014 	PFBYT9:	SKIPE	COR
  3919						ERROR1	13,COR,ACT,POINTER FETCH MODIFIED BYTE AC,^
  3920	034361	036 13 0 00 037734 
  3921
  3922	034362	200 14 0 00 037715 		MOVE	COR,[POINT 6,COR]
  3923	034363	312 14 0 00 000013 		CAME	COR,ACT
  3924						ERROR1	13,COR,ACT,AC 'ACT' MODIFIED,^
  3925	034364	036 13 0 00 037742 
  3926
  3927	034365	200 13 0 00 076000 		MOVE	ACT,76000
  3928	034366	312 14 0 00 000013 		CAME	COR,ACT
  3929						ERROR1	13,COR,ACT,POINTER WRONG,ADR 400000^
  3930	034367	036 13 0 00 037750 
  3931
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 84
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0139

  3932	034370	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  3933	034371	200 14 0 00 037753 		MOVE	COR,[011000,,400000]
  3934	034372	312 14 0 00 000013 		CAME	COR,ACT
  3935						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  3936	034373	036 13 0 00 037647 
  3937
  3938	034374	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  3939	034375	200 14 0 00 037754 		MOVE	COR,[0,,PFBYT8]
  3940	034376	312 14 0 00 000013 		CAME	COR,ACT
  3941						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  3942	034377	036 13 0 00 037653 
  3943
  3944	034400	035 00 0 00 034343 		ERLOOP	PFBYT7
  3945
  3946	034401	367 15 0 00 034232 		REPTLP	PFBYT0+1
  3947
  3948	034402	200 07 0 00 042232 		MOVE	AC,PGFAIL
  3949	034403	202 00 0 00 000502 		MOVEM	LPGFTR			;RESET PAGE FAIL
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 85
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0140

  3950					;*TEST DOUBLE MOVE PAGE FAIL
  3951					;*FIRST PAGE FAIL ON FIRST OPERAND FETCH
  3952					;*OPERANDS FETCHED FROM PAGED AREA WITH PAGE MAP CLEAR.
  3953
  3954					SALL
  3955			037755		T=SIXBTZ	DOUBLE MOVE PAGE FAIL
  3956					LALL
  3957
  3958						SUBTST^
  3959	034404	201 00 0 00 034404 		MOVEI	.
  3960	034405	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  3961	034406	200 15 0 00 042233 	PFDMV0:	MOVE	REPT,RPEAT
  3962	034407	402 00 0 00 000200 		SETZM	200			;CLEAR PAGE MAP
  3963	034410	200 07 0 00 036532 		MOVE	AC,[200,,201]
  3964	034411	251 07 0 00 000417 		BLT	AC,417
  3965	034412	201 07 0 00 034427 		MOVEI	AC,PFDMV3
  3966	034413	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  3967	034414	403 13 0 00 076000 	PFDMV1:	SETZB	ACT,76000
  3968	034415	403 14 0 00 076001 		SETZB	COR,76001
  3969	034416	477 07 0 00 000010 		SETOB	AC,AC1			;SETUP OPERANDS
  3970	034417	476 00 0 00 000500 		SETOM	LEUPFW
  3971	034420	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  3972	034421	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  3973	034422	254 02 1 00 034423 		JRSTF	@.+1
  3974	034423	000000	034424			0,,.+1
  3975
  3976	034424	120 07 0 00 400000 	PFDMV2:	DMOVE	AC,400000		;PERFORM DOUBLE MOVE
  3977						ERROR1	13,COR,ACT,TRAP FAILED,ADR 400000^
  3978												SALL
  3979	034425	036 13 0 00 037761 
  3980	034426	254 00 0 00 034414 		JRST	PFDMV1			;FATAL
  3981
  3982					;*PAGE FAIL RETURN
  3983
  3984	034427	476 00 0 00 000014 	PFDMV3:	SETOM	COR
  3985	034430	200 13 0 00 000007 		MOVE	ACT,AC
  3986	034431	312 14 0 00 000013 		CAME	COR,ACT
  3987						ERROR1	13,COR,ACT,DMOVE MODIFIED AC,FETCH FROM 400000^
  3988	034432	036 13 0 00 037772 
  3989	034433	200 13 0 00 000010 		MOVE	ACT,AC1
  3990	034434	312 14 0 00 000013 		CAME	COR,ACT
  3991						ERROR1	13,COR,ACT,DMOVE MODIFIED AC1,FETCH FROM 400001^
  3992	034435	036 13 0 00 040004 
  3993
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 86
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0141

  3994	034436	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  3995	034437	200 14 0 00 036615 		MOVE	COR,[1000,,400000]
  3996	034440	312 14 0 00 000013 		CAME	COR,ACT
  3997						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  3998	034441	036 13 0 00 040007 
  3999
  4000	034442	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4001	034443	200 14 0 00 040012 		MOVE	COR,[0,,PFDMV2]
  4002	034444	312 14 0 00 000013 		CAME	COR,ACT
  4003						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  4004	034445	036 13 0 00 040013 
  4005
  4006	034446	035 00 0 00 034414 		ERLOOP	PFDMV1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 87
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0142

  4007					;*PAGE FAIL DOUBLE MOVE ON SECOND WORD
  4008					;*DATA FOR FIRST OPERAND IN PAGE WITH RELOCATION DATA IN PAGE MAP.
  4009					;*DATA FOR SECOND OPERAND ACROSS PAGE BOUNDRY
  4010					;*PAGE MAP CLEAR FOR THAT PAGE.
  4011
  4012	034447	201 07 0 00 034467 	PFDMV4:	MOVEI	AC,PFDMV6
  4013	034450	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  4014	034451	205 07 0 00 740075 		MOVSI	AC,740000!75
  4015	034452	202 07 0 00 000200 		MOVEM	AC,200			;SETUP 1ST WORD PAGE MAP
  4016	034453	403 14 0 00 000013 		SETZB	COR,ACT
  4017	034454	402 00 0 00 075777 		SETZM	75777			;SETUP OPERANDS
  4018	034455	402 00 0 00 076000 		SETZM	76000
  4019	034456	477 07 0 00 000010 		SETOB	AC,AC1
  4020	034457	476 00 0 00 000500 		SETOM	LEUPFW
  4021	034460	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  4022	034461	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4023	034462	254 02 1 00 034463 		JRSTF	@.+1
  4024	034463	000000	034464			0,,.+1
  4025
  4026	034464	120 07 0 00 400777 	PFDMV5:	DMOVE	AC,400777		;PERFORM DOUBLE MOVE
  4027						ERROR1	13,COR,ACT,TRAP FAILED,^
  4028	034465	036 13 0 00 040016 
  4029	034466	254 00 0 00 034447 		JRST	PFDMV4			;FATAL
  4030
  4031					;*PAGE FAIL RETURN
  4032
  4033	034467	476 00 0 00 000014 	PFDMV6:	SETOM	COR
  4034	034470	200 13 0 00 000007 		MOVE	ACT,AC
  4035	034471	312 14 0 00 000013 		CAME	COR,ACT
  4036						ERROR1	13,COR,ACT,DMOVE MODIFIED AC,FETCH FROM 400777^
  4037	034472	036 13 0 00 040024 
  4038
  4039	034473	200 13 0 00 000010 		MOVE	ACT,AC1
  4040	034474	312 14 0 00 000013 		CAME	COR,ACT
  4041						ERROR1	13,COR,ACT,DMOVE MODIFIED AC1,FETCH FROM 401000^
  4042	034475	036 13 0 00 040032 
  4043
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 88
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0143

  4044	034476	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  4045	034477	200 14 0 00 040035 		MOVE	COR,[1000,,401000]
  4046	034500	312 14 0 00 000013 		CAME	COR,ACT
  4047						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  4048	034501	036 13 0 00 040007 
  4049
  4050	034502	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4051	034503	200 14 0 00 040036 		MOVE	COR,[0,,PFDMV5]
  4052	034504	312 14 0 00 000013 		CAME	COR,ACT
  4053						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  4054	034505	036 13 0 00 040013 
  4055
  4056	034506	035 00 0 00 034447 		ERLOOP	PFDMV4
  4057
  4058	034507	367 15 0 00 034407 		REPTLP	PFDMV0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 89
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0144

  4059					;*TEST DOUBLE MOVE TO MEMORY PAGE FAIL
  4060					;*FIRST TEST WITH DATA DESTINATION ADDRESSES IN A PAGED AREA
  4061					;*WITH THE PAGE MAP CLEAR.
  4062
  4063					SALL
  4064			040037		T=SIXBTZ	DBL MOVE TO MEM PAGE FAIL
  4065					LALL
  4066
  4067						SUBTST^
  4068	034510	201 00 0 00 034510 		MOVEI	.
  4069	034511	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4070	034512	200 15 0 00 042233 	PFDMM0:	MOVE	REPT,RPEAT
  4071	034513	402 00 0 00 000200 		SETZM	200			;CLEAR PAGE MAP
  4072	034514	200 07 0 00 036532 		MOVE	AC,[200,,201]
  4073	034515	251 07 0 00 000417 		BLT	AC,417
  4074	034516	201 07 0 00 034535 		MOVEI	AC,PFDMM3
  4075	034517	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP FOR PAGE FAIL
  4076
  4077	034520	7 010 20 0 00 020000 	PFDMM1:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  4078	034521	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4079	034522	403 13 0 00 076000 		SETZB	ACT,76000
  4080	034523	403 14 0 00 076001 		SETZB	COR,76001		;SETUP OPERANDS
  4081	034524	477 07 0 00 000010 		SETOB	AC,AC1
  4082	034525	476 00 0 00 000500 		SETOM	LEUPFW
  4083	034526	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  4084	034527	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4085	034530	254 02 1 00 034531 		JRSTF	@.+1
  4086	034531	000000	034532			0,,.+1
  4087
  4088	034532	124 07 0 00 400000 	PFDMM2:	DMOVEM	AC,400000		;PERFORM DOUBLE MOVE
  4089						ERROR1	13,COR,ACT,TRAP FAILED,ADR 400000^
  4090												SALL
  4091	034533	036 13 0 00 040044 
  4092	034534	254 00 0 00 034520 		JRST	PFDMM1			;FATAL
  4093
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 90
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0145

  4094					;*PAGE FAIL RETURN
  4095
  4096	034535	402 00 0 00 000014 	PFDMM3:	SETZM	COR
  4097	034536	200 13 0 00 076000 		MOVE	ACT,76000
  4098	034537	312 14 0 00 000013 		CAME	COR,ACT
  4099						ERROR1	13,COR,ACT,DMOVEM MODIFIED AC DESTINATION,ADR 400000^
  4100	034540	036 13 0 00 040055 
  4101
  4102	034541	200 13 0 00 076001 		MOVE	ACT,76001
  4103	034542	312 14 0 00 000013 		CAME	COR,ACT
  4104						ERROR1	13,COR,ACT,DMOVEM MODIFIED AC1 DESTINATION,ADR 400001^
  4105	034543	036 13 0 00 040070 
  4106
  4107	034544	476 00 0 00 000014 		SETOM	COR
  4108	034545	200 13 0 00 000007 		MOVE	ACT,AC
  4109	034546	312 14 0 00 000013 		CAME	COR,ACT
  4110						ERROR1	13,COR,ACT,DMOVEM MODIFIED AC,^
  4111	034547	036 13 0 00 040077 
  4112
  4113	034550	200 13 0 00 000010 		MOVE	ACT,AC1
  4114	034551	312 14 0 00 000013 		CAME	COR,ACT
  4115						ERROR1	13,COR,ACT,DMOVEM MODIFIED AC1,^
  4116	034552	036 13 0 00 040106 
  4117
  4118	034553	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  4119	034554	200 14 0 00 037753 		MOVE	COR,[011000,,400000]
  4120	034555	312 14 0 00 000013 		CAME	COR,ACT
  4121						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  4122	034556	036 13 0 00 040111 
  4123
  4124	034557	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4125	034560	200 14 0 00 040114 		MOVE	COR,[0,,PFDMM2]
  4126	034561	312 14 0 00 000013 		CAME	COR,ACT
  4127						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  4128	034562	036 13 0 00 040115 
  4129
  4130	034563	035 00 0 00 034520 		ERLOOP	PFDMM1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 91
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0146

  4131					;*TEST DOUBLE MOVE TO MEMORY PAGE FAIL
  4132					;*PAGE FAIL ON SECOND WORD.
  4133					;*PAGE MAP SETUP SO FIRST OPERAND IS STORED IN PAGE
  4134					;*WITH RELOCATION DATA IN PAGE MAP.
  4135					;*SECOND OPERAND STORE IS ACROSS PAGE BOUNDRY WITH
  4136					;*PAGE MAP CLEAR FOR THAT PAGE.
  4137
  4138	034564	201 07 0 00 034603 	PFDMM4:	MOVEI	AC,PFDMM6
  4139	034565	202 07 0 00 000502 		MOVEM	AC,LPGFTR
  4140	034566	205 07 0 00 740075 		MOVSI	AC,740000!75
  4141	034567	202 07 0 00 000200 		MOVEM	AC,200			;SETUP 1ST WORD PAGE MAP
  4142	034570	402 00 0 00 075777 		SETZM	75777
  4143	034571	402 00 0 00 076000 		SETZM	76000
  4144	034572	477 07 0 00 000010 		SETOB	AC,AC1
  4145	034573	476 00 0 00 000500 		SETOM	LEUPFW
  4146	034574	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  4147	034575	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4148	034576	254 02 1 00 034577 		JRSTF	@.+1
  4149	034577	000000	034600			0,,.+1
  4150
  4151	034600	124 07 0 00 400777 	PFDMM5:	DMOVEM	AC,400777		;PERFORM DOUBLE MOVE
  4152						ERROR1	13,COR,ACT,TRAP FAILED,2ND WORD DMOVEM^
  4153	034601	036 13 0 00 040123 
  4154	034602	254 00 0 00 034564 		JRST	PFDMM4			;FATAL
  4155
  4156					;*PAGE FAIL RETURN
  4157
  4158	034603	476 00 0 00 000014 	PFDMM6:	SETOM	COR
  4159	034604	200 13 0 00 075777 		MOVE	ACT,75777
  4160	034605	312 14 0 00 000013 		CAME	COR,ACT
  4161						ERROR1	13,COR,ACT,DMOVEM DID NOT TRANSFER AC,ADR 400777^
  4162	034606	036 13 0 00 040133 
  4163
  4164	034607	402 00 0 00 000014 		SETZM	COR
  4165	034610	200 13 0 00 076000 		MOVE	ACT,76000
  4166	034611	312 14 0 00 000013 		CAME	COR,ACT
  4167						ERROR1	13,COR,ACT,DMOVEM MODIFIED AC1 DESTINATION,ADR 401000^
  4168	034612	036 13 0 00 040136 
  4169
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 92
DFKEAM	MAC	15-Sep-81 09:29		INSTRUCTION PAGE FAIL TESTING                                                      SEQ 0147

  4170	034613	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  4171	034614	200 14 0 00 037513 		MOVE	COR,[011000,,401000]
  4172	034615	312 14 0 00 000013 		CAME	COR,ACT
  4173						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,^
  4174	034616	036 13 0 00 040111 
  4175
  4176	034617	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4177	034620	200 14 0 00 040141 		MOVE	COR,[0,,PFDMM5]
  4178	034621	312 14 0 00 000013 		CAME	COR,ACT
  4179						ERROR1	13,COR,ACT,<SAVED FLAGS,,PC WRONG>,^
  4180	034622	036 13 0 00 040115 
  4181
  4182	034623	035 00 0 00 034564 		ERLOOP	PFDMM4
  4183
  4184	034624	367 15 0 00 034513 		REPTLP	PFDMM0+1
  4185
  4186	034625	200 07 0 00 042232 		MOVE	AC,PGFAIL
  4187	034626	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;RESET PAGE FAIL
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 93
DFKEAM	MAC	15-Sep-81 09:29		TRAP INSTRUCTION PAGE FAIL TEST                                                    SEQ 0148

  4188					SUBTTL	TRAP INSTRUCTION PAGE FAIL TEST
  4189
  4190					;*CAUSE A TRAP, THE TRAP "JSR" IS TO A PAGED ADDRESS THAT PAGE FAILS
  4191					;*PAGE FAIL ROUTINE VERIFIES PAGE FAIL INFO & CORRECT PC WORD
  4192					;*PAGE TABLE THEN SETUP AND TRAP CONTINUED
  4193					;*TRAP SHOULD THEN COMPLETE
  4194					;*TRAP HANDLER THEN VERIFIES CORRECT PC WORD
  4195
  4196					SALL
  4197			040142		T=	SIXBTZ	TRAP INSTRUCTION PAGE FAIL
  4198					LALL
  4199
  4200						SUBTST^
  4201	034627	201 00 0 00 034627 		MOVEI	.
  4202	034630	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4203	034631	200 15 0 00 042233 	TIPF0:	MOVE	REPT,RPEAT
  4204	034632	402 00 0 00 000200 		SETZM	200			;CLEAR PAGE MAP
  4205	034633	200 07 0 00 036532 		MOVE	AC,[200,,201]
  4206	034634	251 07 0 00 000417 		BLT	AC,417
  4207
  4208	034635	201 07 0 00 034655 		MOVEI	AC,TIPF2		;SETUP PAGE FAIL TRANSFER
  4209	034636	202 07 0 00 000502 		MOVEM	AC,LPGFTR
  4210	034637	200 07 0 00 040147 		MOVE	AC,[JSR	400000!<TIPF4&777>]
  4211	034640	202 07 0 00 000423 		MOVEM	AC,LTRP3T		;SETUP TRAP 3 TRANSFER
  4212
  4213	034641	476 00 0 00 000500 		SETOM	LEUPFW			;PRESET PAGE FAIL WORDS
  4214	034642	476 00 0 00 000501 		SETOM	LPFWPC
  4215
  4216	034643	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;ENABLE TRAPPING
  4217	034644	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4218
  4219	034645	254 02 1 00 034646 		JRSTF	@.+1			;CAUSE TRAP 3
  4220	034646	000600	034652			TN0!TN1,,TIPFX
  4221
  4222	034647	7 010 20 0 00 020000 	TIPF1:	CONO	PAG,LTRPEN		;IF GET HERE, TRAP DID NOT HAPPEN
  4223						ERROR1	13,0,0,TRAP FAILED,FATAL^
  4224												SALL
  4225	034650	036 13 0 00 040150 
  4226	034651	254 00 0 00 034631 		JRST	TIPF0
  4227
  4228	034652	7 010 20 0 00 020000 	TIPFX:	CONO	PAG,LTRPEN
  4229						ERROR1	13,0,0,JRSTF HAPPENED,NO TRAP^
  4230	034653	036 13 0 00 040160 
  4231	034654	254 00 0 00 034631 		JRST	TIPF0
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 94
DFKEAM	MAC	15-Sep-81 09:29		TRAP INSTRUCTION PAGE FAIL TEST                                                    SEQ 0149

  4232					;*HERE IF PAGE FAIL TRAP HAPPENED
  4233
  4234	034655	200 00 0 00 042232 	TIPF2:	MOVE	PGFAIL			;RESTORE PAGE FAIL TRAP
  4235	034656	202 00 0 00 000502 		MOVEM	LPGFTR
  4236
  4237	034657	200 14 0 00 040163 		MOVE	COR,[011000,,400000!<TIPF4&777>]
  4238	034660	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  4239	034661	312 14 0 00 000013 		CAME	COR,ACT
  4240						ERROR	TIPF0+1,13,COR,ACT,PAGE FAIL WORD WRONG^
  4241	034662	036 13 0 00 040164 
  4242	034663	035 00 0 00 034632 		ERLOOP	TIPF0+1		;IF ERROR, LOOP TO TIPF0+1
  4243
  4244	034664	200 14 0 00 040167 		MOVE	COR,[TN0!TN1,,TIPFX]
  4245	034665	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4246	034666	312 14 0 00 000013 		CAME	COR,ACT
  4247						ERROR	TIPF0+1,13,COR,ACT,<SAVED FLAGS,,PC WRONG>,PAGE FAIL^
  4248	034667	036 13 0 00 040170 
  4249	034670	035 00 0 00 034632 		ERLOOP	TIPF0+1		;IF ERROR, LOOP TO TIPF0+1
  4250
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 95
DFKEAM	MAC	15-Sep-81 09:29		TRAP INSTRUCTION PAGE FAIL TEST                                                    SEQ 0150

  4251					;*SETUP FOR PAGE FAIL TRAP CONTINUE
  4252
  4253	034671	205 07 0 00 540034 	TIPF3:	MOVSI	AC,540000!<TIPFX_-^D9>
  4254	034672	202 07 0 00 000200 		MOVEM	AC,200			;SETUP PAGE MAP
  4255	034673	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;***CAUSE REFILL***
  4256
  4257	034674	254 02 1 00 000501 		JRSTF	@LPFWPC			;CONTINUE TRAP
  4258
  4259						ERROR1	13,0,0,PAGE FAIL CONTINUE FAILED,FATAL^
  4260	034675	036 13 0 00 040200 
  4261	034676	254 00 0 00 034631 		JRST	TIPF0
  4262
  4263					;*HERE IF TRAP CONTINUED PROPERLY
  4264
  4265	034677	000000	000000		TIPF4:	0				;JSR SHOULD COME HERE
  4266	034700	200 00 0 00 042226 		MOVE	LTRP3SV
  4267	034701	202 00 0 00 000423 		MOVEM	LTRP3T			;RESET TRAP
  4268	034702	265 13 0 00 034703 		JSP	ACT,TIPF5		;GET CURRENT RELOCATED PC
  4269	034703	200 14 0 00 040203 	TIPF5:	MOVE	COR,[0,,400000!<TIPF5&777>]
  4270	034704	312 14 0 00 000013 		CAME 	COR,ACT
  4271						ERROR	TIPF0+1,13,COR,ACT,RELOCATION INCORRECT,PF CONTINUE^
  4272	034705	036 13 0 00 040212 
  4273	034706	035 00 0 00 034632 		ERLOOP	TIPF0+1		;IF ERROR, LOOP TO TIPF0+1
  4274	034707	200 14 0 00 040215 		MOVE	COR,[0,,TIPFX]
  4275	034710	200 13 0 00 034677 		MOVE	ACT,TIPF4
  4276	034711	312 14 0 00 000013 		CAME	COR,ACT
  4277						ERROR	TIPF0+1,13,COR,ACT,TRAP SAVED PC WRONG,PF CONTINUE^
  4278	034712	036 13 0 00 040222 
  4279	034713	035 00 0 00 034632 		ERLOOP	TIPF0+1		;IF ERROR, LOOP TO TIPF0+1
  4280
  4281	034714	367 15 0 00 034632 		REPTLP	TIPF0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 96
DFKEAM	MAC	15-Sep-81 09:29		TRAP INSTRUCTION PAGE FAIL TEST                                                    SEQ 0151

  4282					;*CAUSE A TRAP TO A PAGE FAIL PAGE
  4283					;*TRAP HANDLER THEN VERIFIES CORRECT PC WORD
  4284
  4285					SALL
  4286			040225		T=SIXBTZ	TRAP PAGE FAIL
  4287					LALL
  4288
  4289						SUBTST^
  4290	034715	201 00 0 00 034715 		MOVEI	.
  4291	034716	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4292	034717	200 15 0 00 042233 	TIPF10:	MOVE	REPT,RPEAT
  4293	034720	402 00 0 00 000200 		SETZM	200
  4294	034721	200 07 0 00 036532 		MOVE	AC,[200,,201]
  4295	034722	251 07 0 00 000417 		BLT	AC,417			;CLEAR PAGE MAP
  4296
  4297	034723	201 07 0 00 034761 		MOVEI	AC,TIPF12		;SETUP PAGE FAIL TRANSFER
  4298	034724	202 07 0 00 000502 		MOVEM	AC,LPGFTR
  4299	034725	200 07 0 00 040230 		MOVE	AC,[JSR TIPF14]
  4300	034726	202 07 0 00 000423 		MOVEM	AC,LTRP3T		;SETUP TRAP 3 TRANSFER
  4301
  4302	034727	476 00 0 00 000500 		SETOM	LEUPFW			;PRESET PAGE FAIL WORD
  4303	034730	476 00 0 00 000501 		SETOM	LPFWPC	
  4304
  4305	034731	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  4306	034732	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4307
  4308	034733	254 02 1 00 034734 		JRSTF	@.+1			;CAUSE TRAP 3
  4309	034734	000600	400744			TN0!TN1,,400000!<TIPF1X&777>
  4310
  4311	034735	7 010 20 0 00 020000 	TIPF11:	CONO	PAG,LTRPEN
  4312	034736	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4313	034737	200 00 0 00 042232 		MOVE	PGFAIL
  4314	034740	202 00 0 00 000502 		MOVEM	LPGFTRP
  4315						ERROR	TIPF10,13,0,0,TRAP FAILED,FATAL^
  4316												SALL
  4317	034741	036 13 0 00 040231 
  4318	034742	035 00 0 00 034717 		ERLOOP	TIPF10		;IF ERROR, LOOP TO TIPF10
  4319	034743	254 00 0 00 034717 		JRST	TIPF10
  4320
  4321	034744	7 010 20 0 00 020000 	TIPF1X:	CONO	PAG,LTRPEN
  4322	034745	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4323	034746	200 00 0 00 042232 		MOVE	PGFAIL
  4324	034747	202 00 0 00 000502 		MOVEM	LPGFTR
  4325						ERROR	TIPF10,13,0,0,JRSTF HAPPENED,NO TRAP^
  4326	034750	036 13 0 00 040234 
  4327	034751	035 00 0 00 034717 		ERLOOP	TIPF10		;IF ERROR, LOOP TO TIPF10
  4328	034752	254 00 0 00 034717 		JRST	TIPF10
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 97
DFKEAM	MAC	15-Sep-81 09:29		TRAP INSTRUCTION PAGE FAIL TEST                                                    SEQ 0152

  4329					;*HERE IF TRAP HAPPENED WITHOUT PAGE FAIL
  4330
  4331	034753	000000	000000		TIPF14:	0
  4332	034754	200 00 0 00 042232 		MOVE	PGFAIL
  4333	034755	202 00 0 00 000502 		MOVEM	LPGFTR
  4334						ERROR	TIPF10,13,0,0,TRAP 3 HAPPENED,NO PAGE FAIL^
  4335	034756	036 13 0 00 040245 
  4336	034757	035 00 0 00 034717 		ERLOOP	TIPF10		;IF ERROR, LOOP TO TIPF10
  4337	034760	254 00 0 00 034717 		JRST	TIPF10
  4338
  4339					;*HERE IF PAGE FAIL TRAP HAPPENED
  4340
  4341	034761	200 00 0 00 042232 	TIPF12:	MOVE	PGFAIL
  4342	034762	202 00 0 00 000502 		MOVEM	LPGFTR
  4343
  4344	034763	200 14 0 00 040250 		MOVE	COR,[001000,,400000!<TIPF1X&777>]
  4345	034764	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  4346	034765	312 14 0 00 000013 		CAME	COR,ACT
  4347						ERROR	TIPF10+1,13,COR,ACT,PAGE FAIL WORD WRONG^
  4348	034766	036 13 0 00 040251 
  4349	034767	035 00 0 00 034720 		ERLOOP	TIPF10+1		;IF ERROR, LOOP TO TIPF10+1
  4350
  4351	034770	200 14 0 00 040254 		MOVE	COR,[TN0!TN1,,400000!<TIPF1X&777>]
  4352	034771	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4353	034772	312 14 0 00 000013 		CAME	COR,ACT
  4354						ERROR	TIPF10+1,13,COR,ACT,<SAVED FLAGS,,PC WRONG>,PAGE FAIL^
  4355	034773	036 13 0 00 040255 
  4356	034774	035 00 0 00 034720 		ERLOOP	TIPF10+1		;IF ERROR, LOOP TO TIPF10+1
  4357
  4358	034775	367 15 0 00 034720 		REPTLP	TIPF10+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 98
DFKEAM	MAC	15-Sep-81 09:29		TRAP INSTRUCTION PAGE FAIL TEST                                                    SEQ 0153

  4359					;*TEST I/O INSTRUCTION PAGE FAIL
  4360
  4361					SALL
  4362			040260		T=SIXBTZ	<I/O INST PAGE FAIL>
  4363					LALL
  4364
  4365						SUBTST^
  4366	034776	201 00 0 00 034776 		MOVEI	.
  4367	034777	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4368	035000	200 15 0 00 042233 	PFIO0:	MOVE	REPT,RPEAT
  4369	035001	402 00 0 00 000200 		SETZM	200
  4370	035002	200 00 0 00 036532 		MOVE	[200,,201]
  4371	035003	251 00 0 00 000417 		BLT	417			;CLEAR PAGE MAP
  4372
  4373	035004	201 00 0 00 035017 		MOVEI	PFIO3
  4374	035005	202 00 0 00 000502 		MOVEM	LPGFTR			;SETUP FOR PAGE FAIL
  4375
  4376	035006	476 00 0 00 000500 	PFIO1:	SETOM	LEUPFW			;SETUP PAGING
  4377	035007	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  4378	035010	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4379	035011	254 02 1 00 035012 		JRSTF	@.+1
  4380	035012	000000	035013			0,,.+1
  4381
  4382	035013	7 000 04 0 00 400000 	PFIO2:	DATAI	APR,400000		;PERFORM I/O INST PAGE FAIL
  4383						ERROR	PFIO1,13,0,0,DATAI TRAP FAILED,FATAL^
  4384												SALL
  4385	035014	036 13 0 00 040267 
  4386	035015	035 00 0 00 035006 		ERLOOP	PFIO1		;IF ERROR, LOOP TO PFIO1
  4387	035016	254 00 0 00 035006 		JRST	PFIO1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 99
DFKEAM	MAC	15-Sep-81 09:29		TRAP INSTRUCTION PAGE FAIL TEST                                                    SEQ 0154

  4388	035017	200 13 0 00 000500 	PFIO3:	MOVE	ACT,LEUPFW
  4389	035020	200 14 0 00 037753 		MOVE	COR,[011000,,400000]
  4390	035021	312 14 0 00 000013 		CAME	COR,ACT
  4391						ERROR	PFIO1,13,COR,ACT,PAGE FAIL WORD WRONG,DATAI^
  4392	035022	036 13 0 00 040273 
  4393	035023	035 00 0 00 035006 		ERLOOP	PFIO1		;IF ERROR, LOOP TO PFIO1
  4394
  4395	035024	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4396	035025	200 14 0 00 040276 		MOVE	COR,[0,,PFIO2]
  4397	035026	312 14 0 00 000013 		CAME	COR,ACT
  4398						ERROR	PFIO1,13,COR,ACT,<SAVED FLAGS,,PC WRONG>,DATAI^
  4399	035027	036 13 0 00 040277 
  4400	035030	035 00 0 00 035006 		ERLOOP	PFIO1		;IF ERROR, LOOP TO PFIO1
  4401
  4402	035031	367 15 0 00 035001 		REPTLP	PFIO0+1
  4403
  4404	035032	200 00 0 00 042232 		MOVE	PGFAIL
  4405	035033	202 00 0 00 000502 		MOVEM	LPGFTR
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 100
DFKEAM	MAC	15-Sep-81 09:29		INTERRUPT INSTRUCTION PAGE FAIL                                                    SEQ 0155

  4406					SUBTTL	INTERRUPT INSTRUCTION PAGE FAIL
  4407
  4408					SALL
  4409			040302		T=SIXBTZ	INTERRUPT INST PAGE FAIL
  4410					LALL
  4411
  4412					;*CAUSE AN INTERRUPT THAT HAS FOR ITS INTERRUPT HANDLING
  4413					;*INSTRUCTION A "JSR" TO A PAGE FAIL ADDRESS.
  4414					;*A PAGE FAIL SHOULD OCCUR.
  4415
  4416						SUBTST^
  4417	035034	201 00 0 00 035034 		MOVEI	.
  4418	035035	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4419	035036	200 15 0 00 042233 	INTPF0:	MOVE	REPT,RPEAT
  4420
  4421					;*FIRST VERIFY THAT THE METER CAN CAUSE AN INTERRUPT
  4422
  4423	035037	7 004 20 0 00 010000 		CONO	PI,LPICLR
  4424	035040	7 000 20 0 00 127761 		CONO	APR,LAPRAL!LAPRP1
  4425	035041	7 004 20 0 00 002377 		CONO	PI,LCHNON!LPION!LPICHA
  4426	035042	200 00 0 00 040307 		MOVE	[JSR INTPFA]
  4427	035043	202 00 0 00 000514 		MOVEM	514			;SETUP METER VECTOR
  4428
  4429	035044	205 00 0 00 000077 		MOVSI	0,77
  4430	035045	7 020 20 0 00 063203 		CONO	TIM,63203
  4431	035046	7 024 20 0 00 000007 		CONO	MTR,7			;ASSIGN METER CHAN 7
  4432	035047	365 00 0 00 035047 		SOJGE	0,.			;WAIT FOR METER INTERRUPT
  4433	035050	7 004 20 0 00 010000 		CONO	PI,PICLR
  4434						ERROR	INTPF0+1,13,0,0,NO METER INTERRUPT,FATAL^
  4435												SALL
  4436	035051	036 13 0 00 040314 
  4437	035052	035 00 0 00 035037 		ERLOOP	INTPF0+1		;IF ERROR, LOOP TO INTPF0+1
  4438	035053	254 00 0 00 035131 		JRST	INTPF3
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 101
DFKEAM	MAC	15-Sep-81 09:29		INTERRUPT INSTRUCTION PAGE FAIL                                                    SEQ 0156

  4439					;*NOW USE IT TO CAUSE I/O PAGE FAIL
  4440
  4441	035054	000000	000000		INTPFA:	0				;METER CAUSED INTERRUPT
  4442	035055	7 024 20 0 00 000000 		CONO	MTR,0			;GO AHEAD AND USE IT
  4443	035056	7 004 20 0 00 010000 		CONO	PI,LPICLR
  4444	035057	7 000 20 0 00 127761 		CONO	APR,LAPRAL!LAPRP1
  4445	035060	7 004 20 0 00 002377 		CONO	PI,LCHNON!LPION!LPICHA
  4446
  4447	035061	402 00 0 00 000200 		SETZM	200
  4448	035062	200 00 0 00 036532 		MOVE	[200,,201]
  4449	035063	251 00 0 00 000417 		BLT	417			;CLEAR PAGE MAP
  4450
  4451	035064	201 00 0 00 035104 		MOVEI	INTPF1
  4452	035065	202 00 0 00 000502 		MOVEM	LPGFTR			;SETUP PAGE FAIL TRAP
  4453
  4454	035066	200 00 0 00 040317 		MOVE	[JSR 400000]
  4455	035067	202 00 0 00 000514 		MOVEM	514			;SETUP METER INTERRUPT
  4456
  4457	035070	200 00 0 00 040320 		MOVE	[JSR INTPF2]
  4458	035071	202 00 0 00 000042 		MOVEM	42			;SETUP I/O PAGE FAIL ERROR INTERRUPT
  4459
  4460	035072	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  4461	035073	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4462
  4463	035074	205 00 0 00 000077 		MOVSI	0,77			;WAIT FOR METER INTERRUPT
  4464	035075	7 020 20 0 00 063203 		CONO	TIM,63203
  4465	035076	7 024 20 0 00 000007 		CONO	MTR,7
  4466	035077	365 00 0 00 035077 	INTPFB:	SOJGE	0,.
  4467	035100	7 004 20 0 00 010000 		CONO	PI,PICLR
  4468						ERROR	INTPF0+1,13,0,0,NO INTERRUPT,FATAL^
  4469	035101	036 13 0 00 040324 
  4470	035102	035 00 0 00 035037 		ERLOOP	INTPF0+1		;IF ERROR, LOOP TO INTPF0+1
  4471	035103	254 00 0 00 035131 		JRST	INTPF3
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 102
DFKEAM	MAC	15-Sep-81 09:29		INTERRUPT INSTRUCTION PAGE FAIL                                                    SEQ 0157

  4472					;*IF PAGE FAIL HAPPENED, CHECK PROPER CONDITIONS
  4473
  4474	035104	7 024 20 0 00 000000 	INTPF1:	CONO	MTR,0
  4475	035105	7 004 20 0 00 010000 		CONO	PI,PICLR
  4476	035106	200 13 0 00 000500 		MOVE	ACT,LEUPFW
  4477	035107	200 14 0 00 037753 		MOVE	COR,[11000,,400000]
  4478	035110	312 14 0 00 000013 		CAME	COR,ACT
  4479						ERROR	INTPF0+1,13,COR,ACT,PAGE FAIL WORD WRONG^
  4480	035111	036 13 0 00 040327 
  4481	035112	035 00 0 00 035037 		ERLOOP	INTPF0+1		;IF ERROR, LOOP TO INTPF0+1
  4482
  4483	035113	200 13 0 00 000501 		MOVE	ACT,LPFWPC
  4484	035114	200 14 0 00 040332 		MOVE	COR,[300000,,INTPFB]
  4485	035115	312 14 0 00 000013 		CAME	COR,ACT
  4486						ERROR	INTPF0+1,13,COR,ACT,PAGE FAIL PC WRONG^
  4487	035116	036 13 0 00 040337 
  4488	035117	035 00 0 00 035037 		ERLOOP	INTPF0+1		;IF ERROR, LOOP TO INTPF0+1
  4489	035120	367 15 0 00 035037 		REPTLP	INTPF0+1
  4490	035121	254 00 0 00 035131 		JRST	INTPF3
  4491
  4492					;*APR ERROR INTERRUPT,ERROR
  4493
  4494	035122	000000	000000		INTPF2:	0
  4495	035123	7 024 20 0 00 000000 		CONO	MTR,0
  4496	035124	7 004 20 0 00 010000 		CONO	PI,PICLR
  4497	035125	7 000 24 0 00 000013 		CONI	APR,ACT
  4498	035126	200 14 0 00 035122 		MOVE	COR,INTPF2
  4499						ERROR	INTPF0+1,13,COR,ACT,IO PAGE FAIL INTERRUPTED,<COR=INTERRUPT PC,ACT=CONI APR
  4500					>^
  4501	035127	036 13 0 00 040354 
  4502	035130	035 00 0 00 035037 		ERLOOP	INTPF0+1		;IF ERROR, LOOP TO INTPF0+1
  4503
  4504	035131	7 024 20 0 00 000000 	INTPF3:	CONO	MTR,0
  4505	035132	7 004 20 0 00 010000 		CONO	PI,LPICLR
  4506	035133	7 004 20 0 00 002377 		CONO	PI,LCHNON!LPION!LPICHA
  4507	035134	7 000 20 0 00 127761 		CONO	APR,LAPRAL!LAPRP1
  4508	035135	200 00 0 00 037454 		MOVE	[JSR ITRCH1]
  4509	035136	202 00 0 00 000042 		MOVEM	42			;RESET INTERRUPT SYSTEM
  4510
  4511	035137	254 00 0 00 035216 		JRST	MAXQ
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 103
DFKEAM	MAC	15-Sep-81 09:29		ASSOCIATIVE MEMORY FLOATING BIT TEST TABLE                                         SEQ 0158

  4512					SUBTTL	ASSOCIATIVE MEMORY FLOATING BIT TEST TABLE
  4513
  4514					;*LH = SCRATCHPAD DATA
  4515					;*RH = PAGING ADDRESS
  4516
  4517	035140	777777	000400		AMTAB1:	777777,,400
  4518	035141	757776	000600			757776,,600
  4519	035142	737775	000500			737775,,500
  4520	035143	577773	000440			577773,,440
  4521	035144	517767	000420			517767,,420
  4522	035145	777757	000410			777757,,410
  4523	035146	577737	000404			577737,,404
  4524	035147	737677	000402			737677,,402
  4525	035150	757577	000401			757577,,401
  4526	035151	660000	000340			660000,,340
  4527	035152	757377	000777			757377,,777
  4528	035153	736777	000577			736777,,577
  4529	035154	575777	000677			575777,,677
  4530	035155	773777	000737			773777,,737
  4531	035156	567777	000757			567777,,757
  4532	035157	730000	000767			730000,,767
  4533	035160	744000	000773			744000,,773
  4534	035161	762000	000775			762000,,775
  4535	035162	501000	000776			501000,,776
  4536	035163	677777	000501			677777,,501
  4537	035164	500400	000640			500400,,640
  4538	035165	760200	000700			760200,,700
  4539	035166	720100	000740			720100,,740
  4540	035167	440000	000760			440000,,760
  4541	035170	720040	000770			720040,,770
  4542	035171	540020	000774			540020,,774
  4543	035172	720010	000772			720010,,772
  4544	035173	417777	000341			417777,,341
  4545	035174	760004	000342			760004,,342
  4546	035175	660000	000345			660000,,345
  4547	035176	500002	000352			500002,,352
  4548	035177	500001	000525			500001,,525
  4549	035200	777777	000376			777777,,376
  4550	035201	517777	000463			517777,,463
  4551	035202	620000	000632			620000,,632
  4552	035203	552525	000505			552525,,505
  4553	035204	637777	000362			637777,,362
  4554	035205	545252	000623			545252,,623
  4555	035206	400000	000551			400000,,551
  4556	035207	772525	000624			772525,,624
  4557	035210	417777	000353			417777,,353
  4558	035211	760000	000603			760000,,603
  4559	035212	000000	000000			0
  4560	035213	000000	000000			0
  4561	035214	000000	000000			0
  4562	035215	000000	000000			0
  4563
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 104
DFKEAM	MAC	15-Sep-81 09:29		MAXIMUM PAGING AND BASE REGISTER RELOCATION TEST.                                  SEQ 0159

  4564					SUBTTL	MAXIMUM PAGING AND BASE REGISTER RELOCATION TEST.
  4565
  4566					;*"OPRSEL" SWITCH SET ALLOWS THE FOLLOWING MAXIMUM TESTS
  4567					;*PERFORM TEST UNLESS INHIBITED BY "INHMAX" SWITCH.
  4568					;*ALLOW FOR REQUIRED OPERATOR ACTION ON FIRST PASS
  4569					;*TO RESELECT A MEMORY FOR MAXIMUM 4 MILLION ADDRESSING.
  4570					;*IF "INHMXQ" SWITCH IS SET, "INHMAX" CLEAR, ASSUME THAT
  4571					;*MEMORY IS CORRECTLY SETUP.
  4572
  4573	035216				MAXQ:	SUBTST^
  4574	035216	201 00 0 00 035216 		MOVEI	.
  4575	035217	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4576	035220	037 10 0 00 000002 		SWITCH
  4577	035221	607 00 0 00 000010 		TLNN	OPRSEL			;OPERATOR TEST SELECTION ?
  4578	035222	254 00 0 00 030057 		JRST	BEGEND			;NO, DON'T RUN MAXIMUM
  4579	035223	602 00 0 00 000001 		TRNE	INHMAX			;IS MAXIMUM TEST INHIBITED ?
  4580	035224	254 00 0 00 030057 		JRST	BEGEND			;YES
  4581
  4582	035225	332 00 0 00 030047 		SKIPE	PASCNT			;IS THIS FIRST PASS ?
  4583	035226	254 00 0 00 035242 		JRST	MAXQ1			;NO
  4584	035227	602 00 0 00 000002 		TRNE	INHMXQ			;RECONFIGURATION QUESTION INHIBITED ?
  4585	035230	254 00 0 00 035241 		JRST	MAXQ1-1			;YES
  4586						MOVEI	[ASCIZ/
  4587	035231	201 00 0 00 040357 	ALLOW MAXIMUM ADDRESS TESTING ?/]
  4588	035232	037 17 0 00 000001 		PNTALF
  4589	035233	037 01 0 00 000003 		TTIYES				;ASK QUESTION
  4590	035234	254 00 0 00 030057 		JRST	BEGEND			;NO
  4591						MOVEI	[ASCIZ/
  4592					SELECT A MEMORY FOR ADDRESS 17740000 (4080K)
  4593					TYPE AN ALT-MODE WHEN READY.
  4594	035235	201 00 0 00 040366 	/]
  4595	035236	037 17 0 00 000001 		PNTALF
  4596	035237	037 00 0 00 000003 		TTICHR
  4597	035240	254 00 0 00 035237 		JRST	.-1			;NO RESPONSE YET
  4598
  4599	035241	476 00 0 00 042231 		SETOM	MXFLG
  4600	035242	336 00 0 00 042231 	MAXQ1:	SKIPN	MXFLG			;PERFORM TEST
  4601	035243	254 00 0 00 030057 		JRST	BEGEND			;NO
  4602	035244	402 00 0 00 000200 		SETZM	200
  4603	035245	200 07 0 00 036532 		MOVE	AC,[200,,201]
  4604	035246	251 07 0 00 000417 		BLT	AC,417			;CLEAR PAGE 0 PAGE MAP
  4605	035247	402 00 0 00 042235 		SETZM	PGRDTB
  4606	035250	200 07 0 00 037035 		MOVE	AC,[PGRDTB,,PGRDTB+1]
  4607	035251	251 07 0 00 042674 		BLT	AC,PGRDTB+437		;CLEAR PREVIOUS DATA AREA
  4608	035252	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR MEMORIES, ETC.
  4609	035253	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 105
DFKEAM	MAC	15-Sep-81 09:29		MAXIMUM PAGING AND BASE REGISTER RELOCATION TEST.                                  SEQ 0160

  4610					;*TEST MAXIMUM ADDRESS PAGING
  4611					;*PAGING ADDRESS 400000 RELOCATES TO 17740000
  4612					;*PAGING ADDRESS 777777 RELOCATES TO 17777777
  4613
  4614					SALL
  4615			040406		T=SIXBTZ	MAXIMUM PAGING TEST
  4616					LALL
  4617
  4618						SUBTST^
  4619	035254	201 00 0 00 035254 		MOVEI	.
  4620	035255	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4621	035256	200 15 0 00 042233 	MXPAG1:	MOVE	REPT,RPEAT
  4622	035257	205 07 0 00 757740 		MOVSI	AC,757740		;SETUP PAGE MAP FOR 4080K
  4623	035260	202 07 0 00 000200 		MOVEM	AC,200
  4624	035261	201 07 0 00 757777 		MOVEI	AC,757777		;SETUP PAGE MAP FOR 4096K-1
  4625	035262	202 07 0 00 000377 		MOVEM	AC,377
  4626
  4627	035263	7 010 20 0 00 020000 	MXPAG2:	CONO	PAG,LTRPEN
  4628	035264	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4629	035265	200 14 0 00 040412 		MOVE	COR,[000017,,740000]
  4630	035266	202 14 0 00 400000 		MOVEM	COR,400000		;MAKE PAGED WRITE
  4631	035267	476 00 0 00 000013 		SETOM	ACT
  4632	035270	200 13 0 00 400000 		MOVE	ACT,400000		;PAGE REREAD VERIFY
  4633	035271	312 14 0 00 000013 		CAME	COR,ACT
  4634						ERROR1	13,COR,ACT,PAGING ADR 400000,RELOC ADR 17740000^
  4635												SALL
  4636	035272	036 13 0 00 040422 
  4637	035273	035 00 0 00 035263 		ERLOOP	MXPAG2
  4638
  4639	035274	200 14 0 00 040425 	MXPAG3:	MOVE	COR,[000017,,777777]
  4640	035275	202 14 0 00 777777 		MOVEM	COR,777777		;MAKE PAGED WRITE
  4641	035276	476 00 0 00 000013 		SETOM	ACT
  4642	035277	200 13 0 00 777777 		MOVE	ACT,777777		;PAGED REREAD VERIFY
  4643	035300	312 14 0 00 000013 		CAME	COR,ACT
  4644						ERROR1	13,COR,ACT,PAGING ADR 777777,RELOC ADR 17777777^
  4645	035301	036 13 0 00 040435 
  4646	035302	035 00 0 00 035274 		ERLOOP	MXPAG3
  4647
  4648	035303	367 15 0 00 035257 		REPTLP	MXPAG1+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 106
DFKEAM	MAC	15-Sep-81 09:29		MAXIMUM PAGING AND BASE REGISTER RELOCATION TEST.                                  SEQ 0161

  4649					;*TEST MAXIMUM ADDRESS PAGING.
  4650					;*USING PAGING ADDRESSES 340XXX THRU 777XXX
  4651					;*WRITE DATA INTO MAXIMUM MEMORY.
  4652					;*RELOCATION STARTS AT 17740000 AND GOES TO 17777740
  4653					;*IN INCREMENTS OF 40(8) ADDRESSES.
  4654
  4655					SALL
  4656			040440		T=SIXBTZ	MAXIMUM RELOCATION PAGING TEST
  4657					LALL
  4658
  4659						SUBTST^
  4660	035304	201 00 0 00 035304 		MOVEI	.
  4661	035305	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4662	035306	200 15 0 00 042233 	MXADR0:	MOVE	REPT,RPEAT
  4663	035307	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL=100 PASSES
  4664	035310	205 05 0 00 777560 		MOVSI	INDX,-440/2
  4665	035311	201 07 0 00 000340 		MOVEI	AC,340
  4666	035312	200 13 0 00 040412 		MOVE	ACT,[17740000]
  4667
  4668	035313	200 11 0 00 000013 	MXADR1:	MOVE	AC2,ACT			;SETUP PAGE MAP
  4669	035314	242 11 0 00 777767 		LSH	AC2,-^D9		;RELOCATION 17740000
  4670	035315	271 11 0 00 740000 		ADDI	AC2,740000		;TO 17777740
  4671	035316	504 12 0 00 000011 		HRL	AC3,AC2			;IN INCREMENTS OF 40
  4672	035317	271 13 0 00 000040 		ADDI	ACT,40
  4673	035320	200 11 0 00 000013 		MOVE	AC2,ACT
  4674	035321	242 11 0 00 777767 		LSH	AC2,-^D9
  4675	035322	271 11 0 00 740000 		ADDI	AC2,740000
  4676	035323	540 12 0 00 000011 		HRR	AC3,AC2
  4677	035324	271 13 0 00 000040 		ADDI	ACT,40
  4678	035325	550 10 0 00 000007 		HRRZ	AC1,AC
  4679	035326	242 10 0 00 777777 		LSH	AC1,-1
  4680	035327	305 10 0 00 000200 		CAIGE	AC1,200
  4681	035330	271 10 0 00 000220 		ADDI	AC1,220
  4682	035331	202 12 0 10 000000 		MOVEM	AC3,(AC1)		;PUT RELOC DATA IN PAGE MAP
  4683	035332	271 07 0 00 000002 		ADDI	AC,2
  4684	035333	253 05 0 00 035313 		AOBJN	INDX,MXADR1
  4685
  4686	035334	7 010 20 0 00 020000 	MXADR2:	CONO	PAG,LTRPEN		;CLEAR MEMORIES, ETC.
  4687	035335	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4688	035336	205 05 0 00 777340 		MOVSI	INDX,-440
  4689	035337	201 07 0 00 000340 		MOVEI	AC,340
  4690	035340	402 00 0 00 000011 		SETZM	AC2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 107
DFKEAM	MAC	15-Sep-81 09:29		MAXIMUM PAGING AND BASE REGISTER RELOCATION TEST.                                  SEQ 0162

  4691	035341	200 14 0 00 000007 	MXADR3:	MOVE	COR,AC			;SETUP DATA
  4692	035342	242 14 0 00 000011 		LSH	COR,^D9			;LOW ORDER ADR,,HIGH ORDER
  4693	035343	504 14 0 00 000011 		HRL	COR,AC2
  4694	035344	200 10 0 00 000011 		MOVE	AC1,AC2			;SETUP PAGING ADR
  4695	035345	405 10 0 00 000777 		ANDI	AC1,777
  4696	035346	271 10 0 14 000000 		ADDI	AC1,(COR)
  4697
  4698	035347	202 14 0 10 000000 		MOVEM	COR,(AC1)		;MAKE PAGED MEMORY WRITE
  4699	035350	402 00 0 00 000013 		SETZM	ACT
  4700	035351	200 13 0 10 000000 		MOVE	ACT,(AC1)		;PAGED READ VERIFY
  4701	035352	312 14 0 00 000013 		CAME	COR,ACT
  4702						ERROR1	13,COR,ACT,PAGED READ VERIFY,^
  4703												SALL
  4704	035353	036 13 0 00 040451 
  4705	035354	035 00 0 00 035341 		ERLOOP	MXADR3
  4706
  4707	035355	350 00 0 00 000007 		AOS	AC
  4708	035356	271 11 0 00 000040 		ADDI	AC2,40
  4709	035357	253 05 0 00 035341 		AOBJN	INDX,MXADR3
  4710
  4711	035360	367 15 0 00 035310 		REPTLP	MXADR0+2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 108
DFKEAM	MAC	15-Sep-81 09:29		PAGING AND ADDRESSING TEST WITH 128K 'BLT'.                                        SEQ 0163

  4712					SUBTTL	PAGING AND ADDRESSING TEST WITH 128K 'BLT'.
  4713
  4714					;*CHECKS THAT ADDRESSING FROM 400000 TO 777777 WORKS
  4715					;*ALSO CHECKS THAT 'BLT' OPERATES AND TERMINATES CORRECTLY.
  4716					;*CLEAR MAXIMUM MEMORY USING A PAGED 'BLT'.
  4717					;*PAGE MAP SHOULD STILL BE SETUP FROM PREVIOUS TEST.
  4718
  4719					SALL
  4720			037155		T=SIXBTZ	PAGED BLT TEST
  4721					LALL
  4722
  4723						SUBTST^
  4724	035361	201 00 0 00 035361 		MOVEI	.
  4725	035362	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4726	035363	200 15 0 00 042233 	MXBLT0:	MOVE	REPT,RPEAT
  4727	035364	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  4728	035365	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4729	035366	476 00 0 00 777776 		SETOM	777776			;SETUP LAST TWO WORDS
  4730	035367	476 00 0 00 777777 		SETOM	777777
  4731	035370	402 00 0 00 400000 		SETZM	400000			;CLEAR FIRST WORD
  4732	035371	200 07 0 00 040454 		MOVE	AC,[400000,,400001]
  4733	035372	251 07 0 00 777777 		BLT	AC,777777		;DO 128K BLT
  4734
  4735	035373	402 00 0 00 000014 	MXBLT1:	SETZM	COR
  4736	035374	200 13 0 00 400000 		MOVE	ACT,400000
  4737	035375	332 00 0 00 400000 		SKIPE	400000
  4738						ERROR1	13,COR,ACT,ADR 400000,NOT CLEAR^
  4739												SALL
  4740	035376	036 13 0 00 040457 
  4741
  4742	035377	402 00 0 00 000014 		SETZM	COR
  4743	035400	200 13 0 00 777776 		MOVE	ACT,777776
  4744	035401	332 00 0 00 777776 		SKIPE	777776
  4745						ERROR1	13,COR,ACT,ADR 777776,NOT CLEAR^
  4746	035402	036 13 0 00 040464 
  4747
  4748	035403	402 00 0 00 000014 		SETZM	COR
  4749	035404	200 13 0 00 777777 		MOVE	ACT,777777
  4750	035405	332 00 0 00 777777 		SKIPE	777777
  4751						ERROR1	13,COR,ACT,ADR 777777,NOT CLEAR^
  4752	035406	036 13 0 00 040471 
  4753
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 109
DFKEAM	MAC	15-Sep-81 09:29		PAGING AND ADDRESSING TEST WITH 128K 'BLT'.                                        SEQ 0164

  4754	035407	205 05 0 00 400000 		MOVSI	INDX,-400000
  4755	035410	201 14 0 05 400000 	MXBLT2:	MOVEI	COR,400000(INDX)
  4756	035411	200 13 0 05 400000 		MOVE	ACT,400000(INDX)
  4757	035412	332 00 0 05 400000 		SKIPE	400000(INDX)
  4758						ERROR1	13,COR,ACT,NOT CLEAR,<REF TO (CORRECT)>^
  4759	035413	036 13 0 00 040474 
  4760
  4761	035414	035 00 0 00 035364 		ERLOOP	MXBLT0+1
  4762	035415	253 05 0 00 035410 		AOBJN	INDX,MXBLT2
  4763
  4764					;*SET MAXIMUM MEMORY TO ALL ONES USING A PAGED 'BLT'.
  4765					;*PAGE MAP SETUP FROM PREVIOUS TEST.
  4766
  4767	035416	7 010 20 0 00 020000 	MXBLT3:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  4768	035417	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4769	035420	476 00 0 00 400000 		SETOM	400000			;SET FIRST WORD
  4770	035421	200 07 0 00 040454 		MOVE	AC,[400000,,400001]
  4771	035422	251 07 0 00 777777 		BLT	AC,777777		;DO 128K BLT
  4772
  4773	035423	205 05 0 00 400000 	MXBLT4:	MOVSI	INDX,-400000
  4774	035424	201 14 0 05 400000 		MOVEI	COR,400000(INDX)
  4775	035425	200 13 0 05 400000 		MOVE	ACT,400000(INDX)
  4776	035426	336 00 0 05 400000 		SKIPN	400000(INDX)
  4777						ERROR1	13,COR,ACT,NOT SET,<REF TO (CORRECT)>^
  4778	035427	036 13 0 00 040501 
  4779
  4780	035430	035 00 0 00 035416 		ERLOOP	MXBLT3
  4781	035431	253 05 0 00 035424 		AOBJN	INDX,MXBLT4+1
  4782
  4783	035432	367 15 0 00 035364 		REPTLP	MXBLT0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 110
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0165

  4784					SUBTTL	TEST MAXIMUM BASE REGISTER RELOCATION
  4785
  4786					;*SETUP PAGE MAP PAGES AS THE MAXIMUM PAGE
  4787					;*SETUP PAGE 0 PAGE MAP FOR ERRORS
  4788					;*SETUP BASE REGISTERS
  4789					;*TEST MUUO FOR PAGE 0 AND FOR MAX PAGE
  4790					;*TEST THAT EXEC PAGE FAIL WORD STORES CORRECTLY
  4791					;*IN MAX PAGE USING MAXIMUM USER BASE REGISTER RELOCATION.
  4792
  4793					SALL
  4794			040504		T=SIXBTZ	MAXIMUM BASE REGISTER RELOCATION TEST
  4795					LALL
  4796
  4797						SUBTST^
  4798	035433	201 00 0 00 035433 		MOVEI	.
  4799	035434	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4800	035435	200 15 0 00 042233 	MXBAS0:	MOVE	REPT,RPEAT
  4801	035436	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  4802	035437	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4803	035440	402 00 0 00 000200 		SETZM	200			;CLEAR PAGE 0 PAGE MAP
  4804	035441	200 07 0 00 036532 		MOVE	AC,[200,,201]
  4805	035442	251 07 0 00 000417 		BLT	AC,417
  4806	035443	205 07 0 00 757777 		MOVSI	AC,740000!17777
  4807	035444	202 07 0 00 000200 		MOVEM	AC,200			;SETUP FOR MAXIMUM PAGE
  4808	035445	200 00 0 00 037215 		MOVE	[540000,,540001]
  4809	035446	202 00 0 00 400600 		MOVEM	400000!600
  4810	035447	205 01 0 00 777621 		MOVSI	1,-157
  4811	035450	270 00 0 00 037216 		ADD	[2,,2]			;SETUP 0 TO 112K PAGE MAP
  4812	035451	202 00 0 01 400601 		MOVEM	400000!601(1)
  4813	035452	253 01 0 00 035450 		AOBJN	1,.-2
  4814	035453	200 00 0 00 000041 		MOVE	41
  4815	035454	202 00 0 00 400041 		MOVEM	400000!LUUOI		;SETUP LUUO
  4816	035455	200 00 0 00 000042 		MOVE	42
  4817	035456	202 00 0 00 400042 		MOVEM	400000!42		;SETUP INTERRUPT
  4818	035457	200 00 0 00 000502 		MOVE	LPGFTR
  4819	035460	202 00 0 00 400502 		MOVEM	400000!LPGFTR		;SETUP PAGE FAIL
  4820	035461	200 00 0 00 037217 		MOVE	[JFCL]
  4821	035462	202 00 0 00 400421 		MOVEM	400000!LAROVTP		;SETUP ARITH TRAP
  4822	035463	200 00 0 00 000422 		MOVE	LPDOVT
  4823	035464	202 00 0 00 400422 		MOVEM	400000!LPDOVTP		;SETUP PDL OV TRAP
  4824	035465	200 00 0 00 000423 		MOVE	LTRP3T
  4825	035466	202 00 0 00 400423 		MOVEM	400000!LTRP3TP		;SETUP TRAP 3 TRAP
  4826	035467	200 00 0 00 042230 		MOVE	MUUOER
  4827	035470	202 00 0 00 400430 		MOVEM	400000!LKNTRP		;SETUP MUUO AS ERROR
  4828	035471	202 00 0 00 400431 		MOVEM	400000!LKTRP
  4829	035472	202 00 0 00 400432 		MOVEM	400000!LSNTRP
  4830	035473	202 00 0 00 400433 		MOVEM	400000!LSTRP
  4831	035474	202 00 0 00 400434 		MOVEM	400000!LCNTRP
  4832	035475	202 00 0 00 400435 		MOVEM	400000!LCTRP
  4833	035476	202 00 0 00 400436 		MOVEM	400000!LPNTRP
  4834	035477	202 00 0 00 400437 		MOVEM	400000!LPTRP
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 111
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0166

  4835					;*TEST USER BASE REGISTER RELOCATION
  4836					;*BY USING AN MUUO OF 0.
  4837
  4838					;*TEST MUUO FIRST WITH EPMP & UPMP AS PAGE 0.
  4839
  4840	035500	201 07 0 00 035513 	MXBAS1:	MOVEI	AC,MXBMU1		;SETUP MUUO TO RETURN
  4841	035501	202 07 0 00 000430 		MOVEM	AC,LKNTRP		;FROM PAGE 0
  4842	035502	201 07 0 00 035535 		MOVEI	AC,MXBMU3
  4843	035503	202 07 0 00 400430 		MOVEM	AC,400000!LKNTRP	;FROM MAX PAGE
  4844
  4845	035504	402 00 0 00 000014 	MXBAS2:	SETZM	COR
  4846	035505	201 13 0 00 035510 		MOVEI	ACT,.+3
  4847	035506	254 02 1 00 035507 		JRSTF	@.+1			;CLEAR FLAGS
  4848	035507	000000	035510				.+1
  4849	035510	000000	000000		MXBMU0:	0				;DO AN MUUO OF 0
  4850						ERROR1	13,COR,ACT,MUUO FAILED,<COR=MUUO, ACT=MUUO ADR>^
  4851												SALL
  4852	035511	036 13 0 00 040513 
  4853	035512	035 00 0 00 035504 		ERLOOP	MXBAS2
  4854
  4855	035513	201 14 0 00 000000 	MXBMU1:	MOVEI	COR,0
  4856	035514	200 13 0 00 000424 		MOVE	ACT,LMUUO
  4857	035515	312 14 0 00 000013 		CAME	COR,ACT
  4858						ERROR1	13,COR,ACT,MUUO STORED WRONG,PAGE 0^
  4859	035516	036 13 0 00 040516 
  4860	035517	201 14 0 00 035511 		MOVEI	COR,MXBMU0+1
  4861	035520	200 13 0 00 000425 		MOVE	ACT,LMUUOPC
  4862	035521	312 14 0 00 000013 		CAME	COR,ACT
  4863						ERROR1	13,COR,ACT,MUUO PC STORED WRONG,PAGE 0^
  4864	035522	036 13 0 00 040521 
  4865	035523	035 00 0 00 035504 		ERLOOP	MXBAS2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 112
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0167

  4866					;*TEST THAT WITH UPMP RELOCATED TO MAXIMUM PAGE
  4867					;*AN MUUO TRAPS CORRECTLY AND RETRIEVES NEW PC
  4868					;*FROM RELOCATED USER PAGE MAP PAGE.
  4869					;*ALSO TEST THAT MUUO AND TRAPPED PC GET STORED CORRECTLY
  4870					;*IN RELOCATED UPMP.
  4871
  4872	035524	7 010 14 0 00 036346 	MXBAS3:	DATAO	PAG,[LLDUSB,,417777]	;RELOCATE USER BASE REG
  4873	035525	402 00 0 00 000014 		SETZM	COR
  4874	035526	201 13 0 00 035531 		MOVEI	ACT,.+3
  4875	035527	254 02 1 00 035530 		JRSTF	@.+1
  4876	035530	000000	035531				.+1
  4877	035531	000000	000000		MXBMU2:	0				;DO AN MUUO OF 0
  4878	035532	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4879						ERROR1	13,COR,ACT,MUUO FAILED,<COR=MUUO, ACT=MUUO ADR>^
  4880	035533	036 13 0 00 040513 
  4881	035534	035 00 0 00 035524 		ERLOOP	MXBAS3
  4882
  4883	035535	7 010 14 0 00 036337 	MXBMU3:	DATAO	PAG,[LLDUSB,,400000]
  4884	035536	201 14 0 00 000000 		MOVEI	COR,0
  4885	035537	200 13 0 00 400424 		MOVE	ACT,400000!LMUUO
  4886	035540	312 14 0 00 000013 		CAME	COR,ACT
  4887						ERROR1	13,COR,ACT,MUUO STORED WRONG,MAX PAGE^
  4888	035541	036 13 0 00 040526 
  4889	035542	201 14 0 00 035532 		MOVEI	COR,MXBMU2+1
  4890	035543	200 13 0 00 400425 		MOVE	ACT,400000!LMUUOPC
  4891	035544	312 14 0 00 000013 		CAME	COR,ACT
  4892						ERROR1	13,COR,ACT,MUUO PC STORED WRONG,MAX PAGE^
  4893	035545	036 13 0 00 040531 
  4894	035546	035 00 0 00 035524 		ERLOOP	MXBAS3
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 113
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0168

  4895					;*TEST USER BASE REGISTER RELOCATION
  4896					;*BY USING EXEC PAGE FAIL WORD
  4897
  4898	035547	201 07 0 00 042230 	MXBAS4:	MOVEI	AC,MUUOER
  4899	035550	202 07 0 00 000430 		MOVEM	AC,LKNTRP
  4900	035551	202 07 0 00 400430 		MOVEM	AC,400000!LKNTRP
  4901	035552	201 07 0 00 035564 		MOVEI	AC,MXPFL
  4902	035553	202 07 0 00 400502 		MOVEM	AC,400000!LPGFTR	;SETUP PAGE FAIL TRAP
  4903	035554	476 00 0 00 400500 	MXPF1:	SETOM	400000!LEUPFW
  4904	035555	201 14 0 00 777777 		MOVEI	COR,777777
  4905	035556	476 00 0 00 000013 		SETOM	ACT
  4906	035557	7 010 14 0 00 036346 		DATAO	PAG,[LLDUSB,,417777]
  4907	035560	200 13 0 00 777777 		MOVE	ACT,777777		;SHOULD PAGE FAIL
  4908						ERROR1	13,COR,ACT,PAGE FAIL FAILED,REF TO 777777^
  4909	035561	036 13 0 00 040534 
  4910	035562	035 00 0 00 035554 		ERLOOP	MXPF1
  4911	035563	254 00 0 00 035547 		JRST	MXBAS4
  4912
  4913	035564	476 00 0 00 000014 	MXPFL:	SETOM	COR
  4914	035565	312 14 0 00 000013 		CAME	COR,ACT
  4915						ERROR1	13,COR,ACT,PAGE FAIL STORED IN AC,REF TO 777777^
  4916	035566	036 13 0 00 040537 
  4917	035567	200 14 0 00 036646 		MOVE	COR,[1000,,777777]	;SETUP CORRECT WORD
  4918	035570	200 13 0 00 400500 		MOVE	ACT,400000!LEUPFW
  4919	035571	312 14 0 00 000013 		CAME	COR,ACT
  4920						ERROR1	13,COR,ACT,PAGE FAIL WORD WRONG,REF TO 777777^
  4921	035572	036 13 0 00 040542 
  4922	035573	035 00 0 00 035554 		ERLOOP	MXPF1
  4923
  4924	035574	7 010 14 0 00 036337 	MXBAS5:	DATAO	PAG,[LLDUSB,,400000]
  4925	035575	200 07 0 00 042232 		MOVE	AC,PGFAIL
  4926	035576	202 07 0 00 000502 		MOVEM	AC,LPGFTR
  4927
  4928	035577	367 15 0 00 035436 		REPTLP	MXBAS0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 114
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0169

  4929					;*TEST MAXIMUM BASE REGISTER RELOCATION
  4930					;*BY USING EXEC-PER-PROCESS PAGING
  4931					;*AND PAGING REFILL DATA FROM MAXIMUM PAGE
  4932					;*WITH USER BASE REGISTER SET TO MAXIMUM.
  4933
  4934					SALL
  4935			040545		T=SIXBTZ	MAXIMUM EXEC-PER-PROCESS PAGING
  4936					LALL
  4937
  4938						SUBTST^
  4939	035600	201 00 0 00 035600 		MOVEI	.
  4940	035601	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  4941	035602	200 15 0 00 042233 	MXBAS6:	MOVE	REPT,RPEAT
  4942	035603	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL=100 PASSES
  4943	035604	205 05 0 00 777760 		MOVSI	INDX,-40/2
  4944	035605	201 07 0 00 000340 		MOVEI	AC,340
  4945
  4946	035606	201 11 0 05 042235 	MXWRT1:	MOVEI	AC2,PGWRTB(INDX)
  4947	035607	242 11 0 00 777767 		LSH	AC2,-^D9		;SETUP MAX PAGE PAGE MAP
  4948	035610	271 11 0 00 740000 		ADDI	AC2,740000		;FOR RELOCATION OF PAGES
  4949	035611	504 12 0 00 000011 		HRL	AC3,AC2			;340-377 TO EXEC DATA AREA
  4950	035612	201 11 0 05 042236 		MOVEI	AC2,PGWRTB+1(INDX)
  4951	035613	242 11 0 00 777767 		LSH	AC2,-^D9
  4952	035614	271 11 0 00 740000 		ADDI	AC2,740000
  4953	035615	540 12 0 00 000011 		HRR	AC3,AC2
  4954	035616	550 10 0 00 000007 		HRRZ	AC1,AC
  4955	035617	242 10 0 00 777777 		LSH	AC1,-1
  4956	035620	271 10 0 00 000220 		ADDI	AC1,220
  4957	035621	202 12 0 10 400000 		MOVEM	AC3,400000(AC1)		;PAGED WRITE OF PAGING DATA
  4958	035622	271 07 0 00 000002 		ADDI	AC,2
  4959	035623	350 00 0 00 000005 		AOS	INDX
  4960	035624	253 05 0 00 035606 		AOBJN	INDX,MXWRT1
  4961
  4962	035625	402 00 0 00 042235 	MXWRT2:	SETZM	PGWRTB
  4963	035626	200 07 0 00 037035 		MOVE	AC,[PGWRTB,,PGWRTB+1]
  4964	035627	251 07 0 00 042274 		BLT	AC,PGWRTB+37		;CLEAR DATA AREA
  4965	035630	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  4966	035631	7 010 14 0 00 036346 		DATAO	PAG,[LLDUSB,,417777]
  4967	035632	205 05 0 00 777740 		MOVSI	INDX,-40
  4968	035633	201 07 0 00 000340 		MOVEI	AC,340
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 115
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0170

  4969	035634	200 14 0 00 000007 	MXWRT3:	MOVE	COR,AC			;SETUP DATA
  4970	035635	242 14 0 00 000011 		LSH	COR,^D9			;AND PAGING ADDRESS
  4971	035636	661 14 0 00 777777 		TLO	COR,-1
  4972	035637	621 14 0 14 000000 		TLZ	COR,(COR)
  4973	035640	201 10 0 05 042235 		MOVEI	AC1,PGWRTB(INDX)
  4974	035641	405 10 0 00 000777 		ANDI	AC1,777
  4975	035642	271 10 0 14 000000 		ADDI	AC1,(COR)
  4976
  4977	035643	202 14 0 10 000000 		MOVEM	COR,(AC1)		;MAKE PAGED MEMORY WRITE
  4978	035644	200 13 0 10 000000 		MOVE	ACT,(AC1)		;PAGED READ VERIFY
  4979	035645	312 14 0 00 000013 		CAME	COR,ACT
  4980						ERROR1	13,COR,ACT,DATA ERROR,PAGED REREAD^
  4981												SALL
  4982	035646	036 13 0 00 040553 
  4983	035647	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  4984	035650	312 14 0 00 000013 		CAME	COR,ACT
  4985						ERROR1	13,COR,ACT,DATA ERROR,DIRECT REREAD^
  4986	035651	036 13 0 00 040556 
  4987	035652	035 00 0 00 035634 		ERLOOP	MXWRT3
  4988	035653	350 00 0 00 000007 		AOS	AC
  4989	035654	253 05 0 00 035634 		AOBJN	INDX,MXWRT3
  4990
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 116
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0171

  4991	035655	7 010 20 0 00 020000 	MXWRT4:	CONO	PAG,LTRPEN
  4992	035656	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  4993	035657	205 05 0 00 777740 		MOVSI	INDX,-40		;CHECK DATA BLOCK USING
  4994	035660	201 07 0 00 000340 		MOVEI	AC,340			;DIRECT ADDRESSING
  4995
  4996	035661	200 14 0 00 000007 		MOVE	COR,AC
  4997	035662	242 14 0 00 000011 		LSH	COR,^D9
  4998	035663	661 14 0 00 777777 		TLO	COR,-1
  4999	035664	621 14 0 14 000000 		TLZ	COR,(COR)
  5000	035665	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  5001	035666	312 14 0 00 000013 		CAME	COR,ACT
  5002						ERROR1	13,COR,ACT,DATA ERROR,DIRECT READ^
  5003	035667	036 13 0 00 040561 
  5004	035670	035 00 0 00 035625 		ERLOOP	MXWRT2
  5005	035671	350 00 0 00 000007 		AOS	AC
  5006	035672	253 05 0 00 035661 		AOBJN	INDX,MXWRT4+4
  5007
  5008	035673	367 15 0 00 035604 		REPTLP	MXBAS6+2
  5009
  5010					XLIST
  5011					LIST
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 119
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0172

  5012					;*TEST MAXIMUM BASE REGISTER RELOCATION
  5013					;*BY USING PAGE FAULT TRAP
  5014
  5015						SUBTST^
  5016	035674	201 00 0 00 035674 		MOVEI	.
  5017	035675	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  5018	035676	200 15 0 00 042233 	MXPFT0:	MOVE	REPT,RPEAT
  5019	035677	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5020	035700	402 00 0 00 000200 		SETZM	200
  5021	035701	200 07 0 00 036532 		MOVE	AC,[200,,201]
  5022	035702	251 07 0 00 000417 		BLT	AC,417			;CLEAR PAGE TABLE
  5023	035703	205 07 0 00 757777 		MOVSI	AC,740000!17777
  5024	035704	202 07 0 00 000200 		MOVEM	AC,200			;SET FOR MAXIMUM PAGING
  5025	035705	402 00 0 00 400400 		SETZM	400000!400		;CLEAR EXEC PER PROCESS MAP
  5026	035706	201 07 0 00 035725 		MOVEI	AC,MXPFT1
  5027	035707	202 07 0 00 400502 		MOVEM	AC,400000!LPGFTR	;SETUP MAX PAGE PAGE FAULT
  5028	035710	201 07 0 00 035720 		MOVEI	AC,MXPFT2
  5029	035711	202 07 0 00 000502 		MOVEM	AC,LPGFTR		;SETUP PAGE 0 PAGE FAULT
  5030
  5031	035712	7 010 20 0 00 020000 		CONO	PAG,LTRPEN		;SETUP BASE REG
  5032	035713	7 010 14 0 00 036346 		DATAO	PAG,[LLDUSB,,417777]
  5033	035714	200 13 0 00 340000 	MXPFT3:	MOVE	ACT,340000		;DO PAGING, SHOULD FAULT
  5034	035715	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5035						ERROR1	13,COR,ACT,PAGE FAULT FAILED,FATAL^
  5036	035716	036 13 0 00 040564 
  5037	035717	254 00 0 00 035676 		JRST	MXPFT0
  5038
  5039	035720	7 010 20 0 00 020000 	MXPFT2:	CONO	PAG,LTRPEN
  5040	035721	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  5041	035722	200 14 0 00 000500 		MOVE	COR,LEUPFW
  5042						ERROR1	13,COR,ACT,RELOCATION FAILED,PAGE FAIL TRAPPED TO PAGE 0^
  5043	035723	036 13 0 00 040567 
  5044	035724	254 00 0 00 035676 		JRST	MXPFT0			;FATAL
  5045
  5046	035725	7 010 20 0 00 020000 	MXPFT1:	CONO	PAG,LTRPEN
  5047	035726	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  5048	035727	200 14 0 00 037365 		MOVE	COR,[1000,,340000]
  5049	035730	200 13 0 00 400500 		MOVE	ACT,400000!LEUPFW
  5050	035731	312 14 0 00 000013 		CAME	COR,ACT
  5051						ERROR1	13,COR,ACT,RELOCATION SUCCEEDED,PAGE FAIL WORD WRONG^
  5052	035732	036 13 0 00 040572 
  5053	035733	035 00 0 00 035713 		ERLOOP	MXPFT3-1
  5054
  5055	035734	367 15 0 00 035677 		REPTLP	MXPFT0+1
  5056
  5057	035735	200 00 0 00 042232 		MOVE	PGFAIL
  5058	035736	202 00 0 00 000502 		MOVEM	LPGFTR
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 120
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0173

  5059					;*TEST MAXIMUM BASE REGISTER RELOCATION
  5060					;*BY USING TRAPPING
  5061
  5062						SUBTST^
  5063	035737	201 00 0 00 035737 		MOVEI	.
  5064	035740	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  5065	035741	200 15 0 00 042233 	MXTRP0:	MOVE	REPT,RPEAT
  5066	035742	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5067	035743	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  5068	035744	205 07 0 00 757777 		MOVSI	AC,740000!17777
  5069	035745	202 07 0 00 000200 		MOVEM	AC,200
  5070
  5071					;*TEST RELOCATED TRAP 3
  5072
  5073	035746	200 07 0 00 040575 	MXTRP1:	MOVE	AC,[JSR	MXTP3]
  5074	035747	202 07 0 00 400423 		MOVEM	AC,400000!LTRP3TP
  5075	035750	7 010 20 0 00 037777 		CONO	PAG,LTRPEN!17777
  5076	035751	254 02 1 00 035752 		JRSTF	@.+1
  5077	035752	000600	035753			TN0!TN1,,.+1
  5078	035753	7 010 20 0 00 020000 	MXTP3X:	CONO	PAG,LTRPEN
  5079						ERROR1	13,COR,ACT,TRAP 3 FAILED,FATAL^
  5080	035754	036 13 0 00 040576 
  5081	035755	254 00 0 00 035741 		JRST	MXTRP0
  5082
  5083	035756	000000	000000		MXTP3:	0
  5084	035757	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5085	035760	200 14 0 00 040601 		MOVE	COR,[0,,MXTP3X]
  5086	035761	200 13 0 00 035756 		MOVE	ACT,MXTP3
  5087	035762	312 14 0 00 000013 		CAME	COR,ACT
  5088						ERROR	MXTRP1,13,COR,ACT,TRAP 3 SAVED PC^
  5089	035763	036 13 0 00 040602 
  5090	035764	035 00 0 00 035746 		ERLOOP	MXTRP1		;IF ERROR, LOOP TO MXTRP1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 121
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM BASE REGISTER RELOCATION                                              SEQ 0174

  5091					;*TEST RELOCATED TRAP 2
  5092
  5093	035765	200 07 0 00 040605 		MOVE	AC,[JSR MXPDL]
  5094	035766	202 07 0 00 400422 		MOVEM	AC,400000!LPDOVTP
  5095	035767	7 010 20 0 00 037777 		CONO	PAG,LTRPEN!17777
  5096	035770	254 02 1 00 035771 		JRSTF	@.+1
  5097	035771	000400	035772			TN0,,.+1
  5098	035772	7 010 20 0 00 020000 	MXPDLX:	CONO	PAG,LTRPEN
  5099						ERROR1	13,COR,ACT,TRAP 2 FAILED,FATAL^
  5100	035773	036 13 0 00 040606 
  5101	035774	254 00 0 00 035741 		JRST	MXTRP0
  5102
  5103	035775	000000	000000		MXPDL:	0
  5104	035776	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5105	035777	200 14 0 00 040611 		MOVE	COR,[0,,MXPDLX]
  5106	036000	200 13 0 00 035775 		MOVE	ACT,MXPDL
  5107	036001	312 14 0 00 000013 		CAME	COR,ACT
  5108						ERROR	MXTRP1,13,COR,ACT,TRAP 2 SAVED PC^
  5109	036002	036 13 0 00 040612 
  5110	036003	035 00 0 00 035746 		ERLOOP	MXTRP1		;IF ERROR, LOOP TO MXTRP1
  5111
  5112					;*TEST RELOCATED TRAP 1
  5113
  5114	036004	200 07 0 00 040615 		MOVE	AC,[JSR MXAROV]
  5115	036005	202 07 0 00 400421 		MOVEM	AC,400000!LAROVTP
  5116	036006	7 010 20 0 00 037777 		CONO	PAG,LTRPEN!17777
  5117	036007	254 02 1 00 036010 		JRSTF	@.+1
  5118	036010	000200	036011			TN1,,.+1
  5119	036011	7 010 20 0 00 020000 	MXAROX:	CONO	PAG,LTRPEN
  5120						ERROR1	13,COR,ACT,TRAP 1 FAILED,FATAL^
  5121	036012	036 13 0 00 040616 
  5122	036013	254 00 0 00 035741 		JRST	MXTRP0
  5123
  5124	036014	000000	000000		MXAROV:	0
  5125	036015	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5126	036016	200 14 0 00 040621 		MOVE	COR,[0,,MXAROX]
  5127	036017	200 13 0 00 036014 		MOVE	ACT,MXAROV
  5128	036020	312 14 0 00 000013 		CAME	COR,ACT
  5129						ERROR	MXTRP1,13,COR,ACT,TRAP 1 SAVED PC^
  5130	036021	036 13 0 00 040622 
  5131	036022	035 00 0 00 035746 		ERLOOP	MXTRP1		;IF ERROR, LOOP TO MXTRP1
  5132
  5133	036023	200 07 0 00 037217 		MOVE	AC,[JFCL]
  5134	036024	202 07 0 00 400421 		MOVEM	AC,400000!LAROVTP
  5135
  5136	036025	367 15 0 00 035742 		REPTLP	MXTRP0+1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 122
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM PAGE INTERRUPT RELOCATION                                             SEQ 0175

  5137					SUBTTL	TEST MAXIMUM PAGE INTERRUPT RELOCATION
  5138
  5139					;*SET PAGE 0 INTERRUPT LOCATIONS AS ERRORS
  5140					;*SETUP MAX PAGE INTERRUPT LOCATION FOR TESTING
  5141					;*RELOCATE EXEC BASE REGISTER
  5142					;*TEST INTERRUPTS
  5143
  5144					SALL
  5145			040625		T=SIXBTZ	MAXIMUM PAGE INTERRUPT TEST
  5146					LALL
  5147
  5148						SUBTST^
  5149	036026	201 00 0 00 036026 		MOVEI	.
  5150	036027	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  5151	036030	200 15 0 00 042233 	MXINT0:	MOVE	REPT,RPEAT
  5152	036031	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL =100 PASSES
  5153	036032	200 00 0 00 040632 		MOVE	[JSR MXITR1]		;SETUP MAX PAGE INTERRUPTS
  5154	036033	202 00 0 00 400042 		MOVEM	400000!42
  5155	036034	200 00 0 00 040633 		MOVE	[JSR MXITR2]
  5156	036035	202 00 0 00 400044 		MOVEM	400000!44
  5157	036036	200 00 0 00 040634 		MOVE	[JSR MXITR3]
  5158	036037	202 00 0 00 400046 		MOVEM	400000!46
  5159	036040	200 00 0 00 040635 		MOVE	[JSR MXITR4]
  5160	036041	202 00 0 00 400050 		MOVEM	400000!50
  5161	036042	200 00 0 00 040636 		MOVE	[JSR MXITR5]
  5162	036043	202 00 0 00 400052 		MOVEM	400000!52
  5163	036044	200 00 0 00 040637 		MOVE	[JSR MXITR6]
  5164	036045	202 00 0 00 400054 		MOVEM	400000!54
  5165	036046	200 00 0 00 040640 		MOVE	[JSR MXITR7]
  5166	036047	202 00 0 00 400056 		MOVEM	400000!56
  5167
  5168	036050	200 00 0 00 040641 		MOVE	[JSR MXIERR]		;SETUP PAGE 0 FOR ERROR
  5169	036051	202 00 0 00 000056 		MOVEM	56
  5170	036052	202 00 0 00 000054 		MOVEM	54
  5171	036053	202 00 0 00 000052 		MOVEM	52
  5172	036054	202 00 0 00 000050 		MOVEM	50
  5173	036055	202 00 0 00 000046 		MOVEM	46
  5174	036056	202 00 0 00 000044 		MOVEM	44
  5175	036057	202 00 0 00 000042 		MOVEM	42
  5176
  5177	036060	7 004 20 0 00 011400 	MXINT1:	CONO	PI,LPICLR!LCHNOF!LPIOFF
  5178	036061	7 000 20 0 00 200000 		CONO	APR,LIOCLR
  5179	036062	254 00 0 00 036073 		JRST	MXINT2
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 123
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM PAGE INTERRUPT RELOCATION                                             SEQ 0176

  5180					;*PAGE 0 INTERRUPT ERROR HANDLER
  5181
  5182	036063	000000	000000		MXIERR:	0
  5183	036064	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5184	036065	7 000 24 0 00 000014 		CONI	APR,COR
  5185	036066	7 004 24 0 00 000013 		CONI	PI,ACT
  5186	036067	7 000 20 0 00 200000 		CONO	APR,LIOCLR
  5187	036070	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5188						ERROR1	13,COR,ACT,PAGE 0 INTERRUPT ERROR,<COR=APR, ACT=PI>^
  5189												SALL
  5190	036071	036 13 0 00 040642 
  5191	036072	254 00 0 00 036060 		JRST	MXINT1
  5192
  5193					;*MAXIMUM INTERRUPT MACRO'S
  5194
  5195					DEFINE	MXITRX	(PICHN,APRCHN)<
  5196					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5197					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5198					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5199					;*INTERRUPT CHANNEL = APRCHN.
  5200					
  5201						CONO	PI,LCHNON!LPION!PICHN
  5202						CONO	APR,LSPAER!LEPAER!APRCHN
  5203						MOVEI	AC,1000
  5204						SOJG	AC,.
  5205						HALT	.			;IF NO INTERRUPT, FATAL
  5206					>
  5207
  5208					DEFINE	MXITRC	(ITRCHN)<
  5209					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = ITRCHN
  5210					
  5211						0				;RETURN, CHANNEL ITRCHN
  5212						CONO	APR,LDPAER!LCPAER
  5213						CONO	PI,LPICLR!LCHNOF!LPIOFF
  5214					>
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 124
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM PAGE INTERRUPT RELOCATION                                             SEQ 0177

  5215	036073	7 010 20 0 00 037777 	MXINT2:	CONO	PAG,LTRPEN!17777
  5216
  5217						LALL
  5218	036074				MXINT3:	MXITRX	(1,7)^
  5219					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5220					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5221					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5222					;*INTERRUPT CHANNEL = 7
  5223
  5224	036074	7 004 20 0 00 002201 		CONO	PI,LCHNON!LPION!1
  5225	036075	7 000 20 0 00 110407 		CONO	APR,LSPAER!LEPAER!7
  5226	036076	201 07 0 00 001000 		MOVEI	AC,1000
  5227	036077	367 07 0 00 036077 		SOJG	AC,.
  5228	036100	254 04 0 00 036100 		HALT	.			;IF NO INTERRUPT, FATAL
  5229					^
  5230	036101				MXITR7:	MXITRC	(7)^
  5231					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 7
  5232
  5233	036101	000000	000000			0				;RETURN, CHANNEL 7
  5234	036102	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  5235	036103	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5236					^
  5237
  5238	036104				MXINT4:	MXITRX	(2,6)^
  5239					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5240					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5241					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5242					;*INTERRUPT CHANNEL = 6
  5243
  5244	036104	7 004 20 0 00 002202 		CONO	PI,LCHNON!LPION!2
  5245	036105	7 000 20 0 00 110406 		CONO	APR,LSPAER!LEPAER!6
  5246	036106	201 07 0 00 001000 		MOVEI	AC,1000
  5247	036107	367 07 0 00 036107 		SOJG	AC,.
  5248	036110	254 04 0 00 036110 		HALT	.			;IF NO INTERRUPT, FATAL
  5249					^
  5250	036111				MXITR6:	MXITRC	(6)^
  5251					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 6
  5252
  5253	036111	000000	000000			0				;RETURN, CHANNEL 6
  5254	036112	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  5255	036113	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5256					^
  5257
  5258	036114				MXINT5:	MXITRX	(4,5)^
  5259					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5260					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5261					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5262					;*INTERRUPT CHANNEL = 5
  5263
  5264	036114	7 004 20 0 00 002204 		CONO	PI,LCHNON!LPION!4
  5265	036115	7 000 20 0 00 110405 		CONO	APR,LSPAER!LEPAER!5
  5266	036116	201 07 0 00 001000 		MOVEI	AC,1000
  5267	036117	367 07 0 00 036117 		SOJG	AC,.
  5268	036120	254 04 0 00 036120 		HALT	.			;IF NO INTERRUPT, FATAL
  5269					^
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 124-1
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM PAGE INTERRUPT RELOCATION                                             SEQ 0178

  5270	036121				MXITR5:	MXITRC	(5)^
  5271					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 5
  5272
  5273	036121	000000	000000			0				;RETURN, CHANNEL 5
  5274	036122	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  5275	036123	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5276					^
  5277
  5278	036124				MXINT6:	MXITRX	(10,4)^
  5279					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5280					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5281					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5282					;*INTERRUPT CHANNEL = 4
  5283
  5284	036124	7 004 20 0 00 002210 		CONO	PI,LCHNON!LPION!10
  5285	036125	7 000 20 0 00 110404 		CONO	APR,LSPAER!LEPAER!4
  5286	036126	201 07 0 00 001000 		MOVEI	AC,1000
  5287	036127	367 07 0 00 036127 		SOJG	AC,.
  5288	036130	254 04 0 00 036130 		HALT	.			;IF NO INTERRUPT, FATAL
  5289					^
  5290	036131				MXITR4:	MXITRC	(4)^
  5291					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 4
  5292
  5293	036131	000000	000000			0				;RETURN, CHANNEL 4
  5294	036132	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  5295	036133	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5296					^
  5297
  5298	036134				MXINT7:	MXITRX	(20,3)^
  5299					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5300					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5301					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5302					;*INTERRUPT CHANNEL = 3
  5303
  5304	036134	7 004 20 0 00 002220 		CONO	PI,LCHNON!LPION!20
  5305	036135	7 000 20 0 00 110403 		CONO	APR,LSPAER!LEPAER!3
  5306	036136	201 07 0 00 001000 		MOVEI	AC,1000
  5307	036137	367 07 0 00 036137 		SOJG	AC,.
  5308	036140	254 04 0 00 036140 		HALT	.			;IF NO INTERRUPT, FATAL
  5309					^
  5310	036141				MXITR3:	MXITRC	(3)^
  5311					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 3
  5312
  5313	036141	000000	000000			0				;RETURN, CHANNEL 3
  5314	036142	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  5315	036143	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5316					^
  5317
  5318	036144				MXINT8:	MXITRX	(40,2)^
  5319					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5320					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5321					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5322					;*INTERRUPT CHANNEL = 2
  5323
  5324	036144	7 004 20 0 00 002240 		CONO	PI,LCHNON!LPION!40
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 124-2
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM PAGE INTERRUPT RELOCATION                                             SEQ 0179

  5325	036145	7 000 20 0 00 110402 		CONO	APR,LSPAER!LEPAER!2
  5326	036146	201 07 0 00 001000 		MOVEI	AC,1000
  5327	036147	367 07 0 00 036147 		SOJG	AC,.
  5328	036150	254 04 0 00 036150 		HALT	.			;IF NO INTERRUPT, FATAL
  5329					^
  5330	036151				MXITR2:	MXITRC	(2)^
  5331					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 2
  5332
  5333	036151	000000	000000			0				;RETURN, CHANNEL 2
  5334	036152	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  5335	036153	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5336					^
  5337
  5338	036154				MXINT9:	MXITRX	(100,1)^
  5339					;*SETUP PI AND APR SO CLOCK INTERRUPTS ON PROPER CHANNEL.
  5340					;*INTERRUPT SHOULD PERFORM JSR INSTRUCTION FROM
  5341					;*PAGE MAP RELOCATED TO MAXIMUM PAGE.
  5342					;*INTERRUPT CHANNEL = 1
  5343
  5344	036154	7 004 20 0 00 002300 		CONO	PI,LCHNON!LPION!100
  5345	036155	7 000 20 0 00 110401 		CONO	APR,LSPAER!LEPAER!1
  5346	036156	201 07 0 00 001000 		MOVEI	AC,1000
  5347	036157	367 07 0 00 036157 		SOJG	AC,.
  5348	036160	254 04 0 00 036160 		HALT	.			;IF NO INTERRUPT, FATAL
  5349					^
  5350	036161				MXITR1:	MXITRC	(1)^
  5351					;*INTERRUPT RETURNED PROPERLY, INTERRUPT CHANNEL = 1
  5352
  5353	036161	000000	000000			0				;RETURN, CHANNEL 1
  5354	036162	7 000 20 0 00 060400 		CONO	APR,LDPAER!LCPAER
  5355	036163	7 004 20 0 00 011400 		CONO	PI,LPICLR!LCHNOF!LPIOFF
  5356					^
  5357
  5358	036164	367 15 0 00 036060 		REPTLP	MXINT1
  5359
  5360	036165	7 010 20 0 00 020000 	MXINTA:	CONO	PAG,LTRPEN
  5361	036166	7 004 20 0 00 071400 		CONO	PI,LDPAER!LCPAER!LPICLR!LCHNOF!LPIOFF
  5362	036167	7 000 20 0 00 200000 		CONO	APR,LIOCLR
  5363	036170	200 07 0 00 037454 		MOVE	AC,[JSR ITRCH1]		;RESET INTERRUPTS
  5364	036171	202 07 0 00 000042 		MOVEM	AC,42
  5365	036172	7 000 20 0 00 127760 		CONO	APR,LAPRAL
  5366	036173	7 004 20 0 00 002300 		CONO	PI,LCHNON!LPION!LPICH1
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 125
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM PAGE REFILL RELOCATION                                                SEQ 0180

  5367					SUBTTL	TEST MAXIMUM PAGE REFILL RELOCATION
  5368
  5369					;*BY PUTTING REFILL DATA IN MAX PAGE
  5370					;*AND RELOCATING EXEC BASE REGISTER
  5371
  5372					SALL
  5373			040645		T=SIXBTZ	MAXIMUM EPMP REFILL PAGING
  5374					LALL
  5375
  5376						SUBTST^
  5377	036174	201 00 0 00 036174 		MOVEI	.
  5378	036175	202 00 0 00 030051 		MOVEM	TESTPC			;SETUP SUBTEST PC ^
  5379	036176	200 15 0 00 042233 	MXEPM0:	MOVE	REPT,RPEAT
  5380	036177	221 15 0 00 000012 		IMULI	REPT,^D10		;FSTCYL=10 PASSES, REL=100 PASSES
  5381	036200	205 05 0 00 777600 		MOVSI	INDX,-400/2
  5382	036201	201 07 0 00 000400 		MOVEI	AC,400
  5383
  5384	036202	201 11 0 05 042235 	MXEPM1:	MOVEI	AC2,PGWRTB(INDX)	;SETUP RELOCATION DATA
  5385	036203	242 11 0 00 777767 		LSH	AC2,-^D9
  5386	036204	271 11 0 00 740000 		ADDI	AC2,740000
  5387	036205	504 12 0 00 000011 		HRL	AC3,AC2
  5388	036206	201 11 0 05 042236 		MOVEI	AC2,PGWRTB+1(INDX)
  5389	036207	242 11 0 00 777767 		LSH	AC2,-^D9
  5390	036210	271 11 0 00 740000 		ADDI	AC2,740000
  5391	036211	540 12 0 00 000011 		HRR	AC3,AC2
  5392	036212	550 10 0 00 000007 		HRRZ	AC1,AC			;SETUP PAGE MAP ADDRESS
  5393	036213	242 10 0 00 777777 		LSH	AC1,-1
  5394	036214	202 12 0 10 400000 		MOVEM	AC3,400000(AC1)		;PUT MAPPING DATA IN MAX PAGE
  5395	036215	271 07 0 00 000002 		ADDI	AC,2
  5396	036216	350 00 0 00 000005 		AOS	INDX
  5397	036217	253 05 0 00 036202 		AOBJN	INDX,MXEPM1
  5398
  5399	036220	7 010 20 0 00 020000 	MXEPM2:	CONO	PAG,LTRPEN		;CLEAR AM, ETC.
  5400	036221	7 010 14 0 00 036337 		DATAO	PAG,[LLDUSB,,400000]
  5401	036222	402 00 0 00 042235 		SETZM	PGWRTB			;CLEAR DATA AREA
  5402	036223	200 07 0 00 037035 		MOVE	AC,[PGWRTB,,PGWRTB+1]
  5403	036224	251 07 0 00 042635 		BLT	AC,PGWRTB+400
  5404	036225	205 05 0 00 777400 		MOVSI	INDX,-400
  5405	036226	201 07 0 00 000400 		MOVEI	AC,400
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 126
DFKEAM	MAC	15-Sep-81 09:29		TEST MAXIMUM PAGE REFILL RELOCATION                                                SEQ 0181

  5406	036227	7 010 20 0 00 037777 	MXEPM3:	CONO	PAG,LTRPEN!17777	;RELOC EXEC BASE REG
  5407	036230	200 14 0 00 000007 		MOVE	COR,AC			;SETUP DATA
  5408	036231	242 14 0 00 000011 		LSH	COR,^D9
  5409	036232	661 14 0 00 777777 		TLO	COR,-1
  5410	036233	621 14 0 14 000000 		TLZ	COR,(COR)
  5411	036234	201 10 0 05 042235 		MOVEI	AC1,PGWRTB(INDX)	;SETUP PAGING ADDRESS
  5412	036235	405 10 0 00 000777 		ANDI	AC1,777
  5413	036236	271 10 0 14 000000 		ADDI	AC1,(COR)
  5414	036237	202 14 0 10 000000 		MOVEM	COR,(AC1)		;MAKE PAGED MEMORY WRITE
  5415	036240	200 13 0 10 000000 		MOVE	ACT,(AC1)		;PAGED READ VERIFY
  5416	036241	7 010 20 0 00 020000 		CONO	PAG,LTRPEN
  5417	036242	312 14 0 00 000013 		CAME	COR,ACT
  5418						ERROR1	13,COR,ACT,DATA ERROR,PAGED REREAD^
  5419												SALL
  5420	036243	036 13 0 00 040652 
  5421	036244	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  5422	036245	312 14 0 00 000013 		CAME	COR,ACT
  5423						ERROR1	13,COR,ACT,DATA ERROR,DIRECT REREAD^
  5424	036246	036 13 0 00 040655 
  5425	036247	035 00 0 00 036227 		ERLOOP	MXEPM3
  5426	036250	350 00 0 00 000007 		AOS	AC
  5427	036251	253 05 0 00 036227 		AOBJN	INDX,MXEPM3
  5428
  5429	036252	7 010 20 0 00 020000 	MXEPM4:	CONO	PAG,LTRPEN
  5430	036253	205 05 0 00 777400 		MOVSI	INDX,-400		;CHECK DATA BLOCK
  5431	036254	201 07 0 00 000400 		MOVEI	AC,400			;USING DIRECT ADDRESSING
  5432	036255	200 14 0 00 000007 		MOVE	COR,AC
  5433	036256	242 14 0 00 000011 		LSH	COR,^D9			;SETUP COMPARE WORD
  5434	036257	661 14 0 00 777777 		TLO	COR,-1
  5435	036260	621 14 0 14 000000 		TLZ	COR,(COR)
  5436	036261	200 13 0 05 042235 		MOVE	ACT,PGWRTB(INDX)
  5437	036262	312 14 0 00 000013 		CAME	COR,ACT
  5438						ERROR1	13,COR,ACT,DATA ERROR,DIRECT READ^
  5439	036263	036 13 0 00 040660 
  5440	036264	035 00 0 00 036220 		ERLOOP	MXEPM2
  5441	036265	350 00 0 00 000007 		AOS	AC
  5442	036266	253 05 0 00 036255 		AOBJN	INDX,MXEPM4+3
  5443	036267	367 15 0 00 036200 		REPTLP	MXEPM0+2
  5444
  5445	036270	254 00 0 00 030057 		JRST	BEGEND			;TEST COMPLETED, RECYCLE !
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0182

  5446					SUBTTL	*STOR* RESERVED STORAGE, SEPT 18,1979
  5447
  5448					;PROGRAM LITERALS
  5449
  5450						XLIST
  5451					IFNDEF	$LPAPER,<LIST>
  5452	036271					LIT
  5453	036271	33 03 0 00 000000 
  5454	036272	11 03 0 00 042223 
  5455	036273	42 41 63 45 00 62 
  5456	036274	45 47 51 63 64 45 
  5457	036275	62 00 64 45 63 64 
  5458	036276	77 00 00 00 00 00 
  5459	036277	45 42 62 77 00 00 
  5460	036300	41 54 54 00 00 20 
  5461	036301	07 63 77 00 00 00 
  5462	036302	036273	036277
  5463	036303	000014	000013
  5464	036304	036300	000000
  5465	036305	56 57 00 42 51 64 
  5466	036306	63 00 63 45 64 77 
  5467	036307	036273	036277
  5468	036310	000014	000013
  5469	036311	036305	000000
  5470	036312	64 62 41 60 00 45 
  5471	036313	56 41 42 54 45 00 
  5472	036314	42 51 64 77 00 00 
  5473	036315	036273	036277
  5474	036316	000014	000013
  5475	036317	036312	000000
  5476	036320	46 54 57 41 64 51 
  5477	036321	56 47 00 21 77 00 
  5478	036322	036273	036277
  5479	036323	000014	000013
  5480	036324	036320	000000
  5481	036325	41 54 54 00 21 07 
  5482	036326	63 77 00 00 00 00 
  5483	036327	036273	036277
  5484	036330	000014	000013
  5485	036331	036325	000000
  5486	036332	46 54 57 41 64 51 
  5487	036333	56 47 00 20 77 00 
  5488	036334	036273	036277
  5489	036335	000014	000013
  5490	036336	036332	000000
  5491	036337	100000	400000
  5492	036340	65 42 62 77 00 00 
  5493	036341	41 54 54 00 20 07 
  5494	036342	63 77 00 00 00 00 
  5495	036343	036273	036340
  5496	036344	000014	000013
  5497	036345	036341	000000
  5498	036346	100000	417777
  5499	036347	036273	036340
  5500	036350	000014	000013
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-1
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0183

  5501	036351	036305	000000
  5502	036352	100000	400001
  5503	036353	036273	036340
  5504	036354	000014	000013
  5505	036355	036320	000000
  5506	036356	100000	400002
  5507	036357	100000	400004
  5508	036360	100000	400010
  5509	036361	100000	400020
  5510	036362	100000	400040
  5511	036363	100000	400100
  5512	036364	100000	400200
  5513	036365	100000	400400
  5514	036366	100000	401000
  5515	036367	100000	402000
  5516	036370	100000	404000
  5517	036371	100000	410000
  5518	036372	036273	036340
  5519	036373	000014	000013
  5520	036374	036325	000000
  5521	036375	100000	417776
  5522	036376	036273	036340
  5523	036377	000014	000013
  5524	036400	036332	000000
  5525	036401	100000	417775
  5526	036402	100000	417773
  5527	036403	100000	417767
  5528	036404	100000	417757
  5529	036405	100000	417737
  5530	036406	100000	417677
  5531	036407	100000	417577
  5532	036410	100000	417377
  5533	036411	100000	416777
  5534	036412	100000	415777
  5535	036413	100000	413777
  5536	036414	100000	407777
  5537	036415	60 62 57 43 45 63 
  5538	036416	63 57 62 00 64 62 
  5539	036417	41 60 00 64 45 63 
  5540	036420	64 77 00 00 00 00 
  5541	036421	264 00 0 00 031642 
  5542	036422	64 62 41 60 00 23 
  5543	036423	00 46 41 51 54 45 
  5544	036424	44 77 00 00 00 00 
  5545	036425	46 41 64 41 54 77 
  5546	036426	036415	036422
  5547	036427	000000	000000
  5548	036430	036425	000000
  5549	036431	000000	031636
  5550	036432	64 62 41 60 00 23 
  5551	036433	00 63 41 66 45 44 
  5552	036434	00 60 43 77 00 00 
  5553	036435	036415	036432
  5554	036436	000014	000013
  5555	036437	036276	000000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-2
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0184

  5556	036440	264 00 0 00 031664 
  5557	036441	64 62 41 60 00 22 
  5558	036442	00 46 41 51 54 45 
  5559	036443	44 77 00 00 00 00 
  5560	036444	036415	036441
  5561	036445	000000	000000
  5562	036446	036425	000000
  5563	036447	000000	031660
  5564	036450	64 62 41 60 00 22 
  5565	036451	00 63 41 66 45 44 
  5566	036452	00 60 43 77 00 00 
  5567	036453	036415	036450
  5568	036454	000014	000013
  5569	036455	036276	000000
  5570	036456	264 00 0 00 031706 
  5571	036457	64 62 41 60 00 21 
  5572	036460	00 46 41 51 54 45 
  5573	036461	44 77 00 00 00 00 
  5574	036462	036415	036457
  5575	036463	000000	000000
  5576	036464	036425	000000
  5577	036465	000000	031702
  5578	036466	64 62 41 60 00 21 
  5579	036467	00 63 41 66 45 44 
  5580	036470	00 60 43 77 00 00 
  5581	036471	036415	036466
  5582	036472	000014	000013
  5583	036473	036276	000000
  5584	036474	55 41 60 00 51 56 
  5585	036475	63 64 00 64 45 63 
  5586	036476	64 77 00 00 00 00 
  5587	036477	161000	000000
  5588	036500	55 41 60 00 41 44 
  5589	036501	62 00 20 77 00 00 
  5590	036502	036474	036500
  5591	036503	000014	000013
  5592	036504	036276	000000
  5593	036505	161000	337000
  5594	036506	55 41 60 00 41 44 
  5595	036507	62 00 23 23 27 20 
  5596	036510	20 20 77 00 00 00 
  5597	036511	036474	036506
  5598	036512	000014	000013
  5599	036513	036276	000000
  5600	036514	161000	252525
  5601	036515	55 41 60 00 41 44 
  5602	036516	62 00 22 25 22 25 
  5603	036517	22 25 77 00 00 00 
  5604	036520	036474	036515
  5605	036521	000014	000013
  5606	036522	036276	000000
  5607	036523	161000	125252
  5608	036524	55 41 60 00 41 44 
  5609	036525	62 00 21 22 25 22 
  5610	036526	25 22 77 00 00 00 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-3
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0185

  5611	036527	036474	036524
  5612	036530	000014	000013
  5613	036531	036276	000000
  5614	036532	000200	000201
  5615	036533	55 41 60 00 41 44 
  5616	036534	62 00 24 20 20 20 
  5617	036535	20 20 77 00 00 00 
  5618	036536	60 41 47 45 00 55 
  5619	036537	41 60 00 43 54 45 
  5620	036540	41 62 77 00 00 00 
  5621	036541	036474	036533
  5622	036542	000014	000013
  5623	036543	036536	000000
  5624	036544	55 41 60 00 41 44 
  5625	036545	62 00 27 27 27 20 
  5626	036546	20 20 77 00 00 00 
  5627	036547	036474	036544
  5628	036550	000014	000013
  5629	036551	036536	000000
  5630	036552	41 54 54 00 42 65 
  5631	036553	64 00 41 43 43 45 
  5632	036554	63 63 77 00 00 00 
  5633	036555	036474	036533
  5634	036556	000014	000013
  5635	036557	036552	000000
  5636	036560	036474	036544
  5637	036561	000014	000013
  5638	036562	036552	000000
  5639	036563	60 41 47 45 00 46 
  5640	036564	41 51 54 00 64 62 
  5641	036565	41 60 00 64 45 63 
  5642	036566	64 77 00 00 00 00 
  5643	036567	64 62 41 60 00 46 
  5644	036570	41 51 54 45 44 77 
  5645	036571	62 45 46 00 64 57 
  5646	036572	00 24 20 20 20 20 
  5647	036573	20 77 00 00 00 00 
  5648	036574	036563	036567
  5649	036575	000000	000013
  5650	036576	036571	000000
  5651	036577	60 41 47 45 00 46 
  5652	036600	41 51 54 00 63 64 
  5653	036601	57 62 45 44 00 51 
  5654	036602	56 00 41 43 77 00 
  5655	036603	036563	036577
  5656	036604	000014	000013
  5657	036605	036571	000000
  5658	036606	60 41 47 45 00 46 
  5659	036607	41 51 54 00 63 64 
  5660	036610	57 62 45 44 00 51 
  5661	036611	56 00 20 77 00 00 
  5662	036612	036563	036606
  5663	036613	000014	000013
  5664	036614	036571	000000
  5665	036615	001000	400000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-4
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0186

  5666	036616	60 41 47 45 00 46 
  5667	036617	41 51 54 00 67 57 
  5668	036620	62 44 00 67 62 57 
  5669	036621	56 47 77 00 00 00 
  5670	036622	036563	036616
  5671	036623	000014	000013
  5672	036624	036571	000000
  5673	036625	56 57 56 15 70 15 
  5674	036626	55 45 55 77 00 00 
  5675	036627	036563	036625
  5676	036630	000014	000013
  5677	036631	036571	000000
  5678	036632	62 45 46 00 64 57 
  5679	036633	00 27 27 27 27 27 
  5680	036634	27 77 00 00 00 00 
  5681	036635	036563	036567
  5682	036636	000000	000013
  5683	036637	036632	000000
  5684	036640	036563	036577
  5685	036641	000014	000013
  5686	036642	036632	000000
  5687	036643	036563	036606
  5688	036644	000014	000013
  5689	036645	036632	000000
  5690	036646	001000	777777
  5691	036647	036563	036616
  5692	036650	000014	000013
  5693	036651	036632	000000
  5694	036652	036563	036625
  5695	036653	000014	000013
  5696	036654	036632	000000
  5697	036655	45 70 45 43 15 60 
  5698	036656	45 62 15 60 62 57 
  5699	036657	43 45 63 63 00 55 
  5700	036660	41 60 00 64 45 63 
  5701	036661	64 77 00 00 00 00 
  5702	036662	55 41 60 00 41 44 
  5703	036663	62 00 23 24 20 20 
  5704	036664	20 20 77 00 00 00 
  5705	036665	036655	036662
  5706	036666	000014	000013
  5707	036667	036536	000000
  5708	036670	55 41 60 00 41 44 
  5709	036671	62 00 23 27 27 20 
  5710	036672	20 20 77 00 00 00 
  5711	036673	036655	036670
  5712	036674	000014	000013
  5713	036675	036536	000000
  5714	036676	036655	036662
  5715	036677	000014	000013
  5716	036700	036552	000000
  5717	036701	036655	036670
  5718	036702	000014	000013
  5719	036703	036552	000000
  5720	036704	165000	000000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-5
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0187

  5721	036705	55 41 60 00 62 45 
  5722	036706	41 44 57 65 64 00 
  5723	036707	46 41 51 54 65 62 
  5724	036710	45 77 00 00 00 00 
  5725	036711	036655	036705
  5726	036712	000014	000013
  5727	036713	036670	000000
  5728	036714	165017	777000
  5729	036715	036655	036705
  5730	036716	000014	000013
  5731	036717	036662	000000
  5732	036720	46 54 57 41 64 51 
  5733	036721	56 47 00 42 51 64 
  5734	036722	00 64 45 63 64 77 
  5735	036723	036720	036705
  5736	036724	000014	000013
  5737	036725	036276	032250
  5738	036726	62 45 46 00 64 57 
  5739	036727	00 77 00 00 00 00 
  5740	036730	64 62 41 60 00 64 
  5741	036731	45 63 64 77 00 00 
  5742	036732	62 45 46 00 64 57 
  5743	036733	00 10 43 57 62 62 
  5744	036734	45 43 64 11 77 00 
  5745	036735	036730	036567
  5746	036736	000014	000013
  5747	036737	036732	000000
  5748	036740	036730	036577
  5749	036741	000014	000013
  5750	036742	036276	000000
  5751	036743	036730	036606
  5752	036744	000014	000013
  5753	036745	036276	000000
  5754	036746	036730	036616
  5755	036747	000014	000013
  5756	036750	036276	000000
  5757	036751	60 41 47 45 44 00 
  5758	036752	44 41 64 41 00 62 
  5759	036753	45 41 44 00 64 45 
  5760	036754	63 64 77 00 00 00 
  5761	036755	44 41 64 41 00 45 
  5762	036756	62 62 57 62 77 00 
  5763	036757	41 44 62 00 24 20 
  5764	036760	20 70 70 70 77 00 
  5765	036761	036751	036755
  5766	036762	000014	000013
  5767	036763	036757	000000
  5768	036764	41 44 62 00 27 27 
  5769	036765	27 70 70 70 77 00 
  5770	036766	036751	036755
  5771	036767	000014	000013
  5772	036770	036764	000000
  5773	036771	51 56 43 00 60 41 
  5774	036772	47 51 56 47 00 41 
  5775	036773	44 62 07 63 77 00 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-6
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0188

  5776	036774	036751	036755
  5777	036775	000014	000013
  5778	036776	036771	032456
  5779	036777	62 45 66 45 62 63 
  5780	037000	45 00 62 45 41 44 
  5781	037001	77 00 00 00 00 00 
  5782	037002	036751	036755
  5783	037003	000014	000013
  5784	037004	036777	032456
  5785	037005	60 41 47 45 44 00 
  5786	037006	44 41 64 41 00 67 
  5787	037007	62 51 64 45 00 64 
  5788	037010	45 63 64 77 00 00 
  5789	037011	377000	400777
  5790	037012	60 41 47 45 44 00 
  5791	037013	62 45 62 45 41 44 
  5792	037014	77 00 00 00 00 00 
  5793	037015	037005	037012
  5794	037016	000014	000013
  5795	037017	036757	000000
  5796	037020	44 51 62 45 43 64 
  5797	037021	00 62 45 62 45 41 
  5798	037022	44 77 00 00 00 00 
  5799	037023	037005	037020
  5800	037024	000014	000013
  5801	037025	036757	000000
  5802	037026	000777	777000
  5803	037027	037005	037012
  5804	037030	000014	000013
  5805	037031	036764	000000
  5806	037032	037005	037020
  5807	037033	000014	000013
  5808	037034	036764	000000
  5809	037035	042235	042236
  5810	037036	037005	036755
  5811	037037	000014	000013
  5812	037040	037012	032700
  5813	037041	037005	036755
  5814	037042	000014	000013
  5815	037043	037020	032700
  5816	037044	44 51 62 45 43 64 
  5817	037045	00 62 45 41 44 77 
  5818	037046	037005	036755
  5819	037047	000014	000013
  5820	037050	037044	032705
  5821	037051	62 45 66 45 62 63 
  5822	037052	45 00 60 41 47 45 
  5823	037053	44 00 62 45 62 45 
  5824	037054	41 44 77 00 00 00 
  5825	037055	037005	036755
  5826	037056	000014	000013
  5827	037057	037051	032700
  5828	037060	62 45 66 45 62 63 
  5829	037061	45 00 44 51 62 45 
  5830	037062	43 64 00 62 45 62 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-7
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0189

  5831	037063	45 41 44 77 00 00 
  5832	037064	037005	036755
  5833	037065	000014	000013
  5834	037066	037060	032712
  5835	037067	60 41 47 45 00 46 
  5836	037070	41 51 54 00 67 57 
  5837	037071	62 44 00 64 45 63 
  5838	037072	64 77 00 00 00 00 
  5839	037073	000000	000201
  5840	037074	037067	036567
  5841	037075	000014	000013
  5842	037076	036425	000000
  5843	037077	037067	036577
  5844	037100	000014	000013
  5845	037101	036276	000000
  5846	037102	037067	036606
  5847	037103	000014	000013
  5848	037104	036276	000000
  5849	037105	067000	400531
  5850	037106	037067	036616
  5851	037107	000014	000013
  5852	037110	036276	000000
  5853	037111	67 62 51 64 45 00 
  5854	037112	60 62 57 64 45 43 
  5855	037113	64 00 64 45 63 64 
  5856	037114	77 00 00 00 00 00 
  5857	037115	037111	036567
  5858	037116	000014	000013
  5859	037117	036757	000000
  5860	037120	037111	036577
  5861	037121	000014	000013
  5862	037122	036757	000000
  5863	037123	037111	036606
  5864	037124	000014	000013
  5865	037125	036757	000000
  5866	037126	135000	400531
  5867	037127	037111	036616
  5868	037130	000014	000013
  5869	037131	036757	000000
  5870	037132	44 41 64 41 00 67 
  5871	037133	57 62 44 00 67 62 
  5872	037134	57 56 47 77 00 00 
  5873	037135	037111	037132
  5874	037136	000014	000013
  5875	037137	036757	000000
  5876	037140	037111	036567
  5877	037141	000014	000013
  5878	037142	036764	000000
  5879	037143	037111	036577
  5880	037144	000014	000013
  5881	037145	036764	000000
  5882	037146	111000	777532
  5883	037147	037111	036616
  5884	037150	000014	000013
  5885	037151	036764	000000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-8
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0190

  5886	037152	037111	037132
  5887	037153	000014	000013
  5888	037154	036764	000000
  5889	037155	60 41 47 45 44 00 
  5890	037156	42 54 64 00 64 45 
  5891	037157	63 64 77 00 00 00 
  5892	037160	740076	740076
  5893	037161	340000	340001
  5894	037162	56 57 64 00 41 54 
  5895	037163	54 00 72 45 62 57 
  5896	037164	63 77 00 00 00 00 
  5897	037165	037155	037162
  5898	037166	000014	000013
  5899	037167	036732	000000
  5900	037170	777777	777777
  5901	037171	56 57 64 00 41 54 
  5902	037172	54 00 57 56 45 63 
  5903	037173	77 00 00 00 00 00 
  5904	037174	037155	037171
  5905	037175	000014	000013
  5906	037176	036732	000000
  5907	037177	525252	525252
  5908	037200	56 57 64 00 41 54 
  5909	037201	64 00 42 51 64 63 
  5910	037202	77 00 00 00 00 00 
  5911	037203	037155	037200
  5912	037204	000014	000013
  5913	037205	036732	000000
  5914	037206	252525	252525
  5915	037207	42 41 63 45 00 62 
  5916	037210	45 47 51 63 64 45 
  5917	037211	62 00 62 45 54 57 
  5918	037212	43 41 64 51 57 56 
  5919	037213	00 64 45 63 64 77 
  5920	037214	076200	076201
  5921	037215	540000	540001
  5922	037216	000002	000002
  5923	037217	255 00 0 00 000000 
  5924	037220	55 65 65 57 00 46 
  5925	037221	41 51 54 45 44 77 
  5926	037222	43 57 62 35 55 65 
  5927	037223	65 57 14 00 41 43 
  5928	037224	64 35 55 65 65 57 
  5929	037225	00 41 44 62 77 00 
  5930	037226	037207	037220
  5931	037227	000014	000013
  5932	037230	037222	000000
  5933	037231	55 65 65 57 00 63 
  5934	037232	64 57 62 45 44 00 
  5935	037233	67 62 57 56 47 77 
  5936	037234	60 41 47 45 00 20 
  5937	037235	77 00 00 00 00 00 
  5938	037236	037207	037231
  5939	037237	000014	000013
  5940	037240	037234	000000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-9
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0191

  5941	037241	55 65 65 57 00 60 
  5942	037242	43 00 63 64 57 62 
  5943	037243	45 44 00 67 62 57 
  5944	037244	56 47 77 00 00 00 
  5945	037245	037207	037241
  5946	037246	000014	000013
  5947	037247	037234	000000
  5948	037250	100000	400076
  5949	037251	62 45 54 57 43 41 
  5950	037252	64 45 44 00 60 41 
  5951	037253	47 45 77 00 00 00 
  5952	037254	037207	037231
  5953	037255	000014	000013
  5954	037256	037251	000000
  5955	037257	037207	037241
  5956	037260	000014	000013
  5957	037261	037251	000000
  5958	037262	60 41 47 45 00 46 
  5959	037263	41 51 54 00 46 41 
  5960	037264	51 54 45 44 77 00 
  5961	037265	037207	037262
  5962	037266	000014	000013
  5963	037267	036632	000000
  5964	037270	037207	036577
  5965	037271	000014	000013
  5966	037272	036632	000000
  5967	037273	037207	036616
  5968	037274	000014	000013
  5969	037275	036632	000000
  5970	037276	62 45 54 57 43 41 
  5971	037277	64 45 44 00 45 70 
  5972	037300	45 43 15 60 45 62 
  5973	037301	15 60 62 57 43 45 
  5974	037302	63 63 00 60 41 47 
  5975	037303	51 56 47 77 00 00 
  5976	037304	037276	036755
  5977	037305	000014	000013
  5978	037306	037012	032700
  5979	037307	037276	036755
  5980	037310	000014	000013
  5981	037311	037020	032705
  5982	037312	037276	036755
  5983	037313	000014	000013
  5984	037314	037044	032705
  5985	037315	254 01 0 00 340001 
  5986	037316	254 02 1 00 340002 
  5987	037317	000600	340003
  5988	037320	254 00 0 00 340003 
  5989	037321	264 00 0 00 033454 
  5990	037322	264 00 0 00 033446 
  5991	037323	45 60 60 00 41 44 
  5992	037324	62 00 64 62 41 60 
  5993	037325	00 45 62 62 57 62 
  5994	037326	77 00 00 00 00 00 
  5995	037327	64 62 41 60 60 45 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-10
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0192

  5996	037330	44 00 65 63 51 56 
  5997	037331	47 00 65 42 62 77 
  5998	037332	037276	037323
  5999	037333	000000	000000
  6000	037334	037327	000000
  6001	037335	000000	340003
  6002	037336	63 41 66 45 44 00 
  6003	037337	60 43 00 67 62 57 
  6004	037340	56 47 77 00 00 00 
  6005	037341	037276	037323
  6006	037342	000014	000013
  6007	037343	037336	000000
  6008	037344	60 41 47 45 00 46 
  6009	037345	41 65 54 64 00 46 
  6010	037346	41 51 54 45 44 77 
  6011	037347	037276	037344
  6012	037350	000014	000013
  6013	037351	036425	000000
  6014	037352	62 45 54 57 43 41 
  6015	037353	64 51 57 56 00 46 
  6016	037354	41 51 54 45 44 77 
  6017	037355	60 41 47 45 00 46 
  6018	037356	41 51 54 00 64 62 
  6019	037357	41 60 60 45 44 00 
  6020	037360	64 57 00 60 41 47 
  6021	037361	45 00 20 77 00 00 
  6022	037362	037276	037352
  6023	037363	000014	000013
  6024	037364	037355	000000
  6025	037365	001000	340000
  6026	037366	62 45 54 57 43 41 
  6027	037367	64 51 57 56 00 63 
  6028	037370	65 43 43 45 45 44 
  6029	037371	45 44 77 00 00 00 
  6030	037372	037276	037366
  6031	037373	000014	000013
  6032	037374	036616	000000
  6033	037375	264 00 0 00 033544 
  6034	037376	037276	036422
  6035	037377	000000	000000
  6036	037400	036425	000000
  6037	037401	000000	033541
  6038	037402	037276	036432
  6039	037403	000014	000013
  6040	037404	036276	000000
  6041	037405	264 00 0 00 033563 
  6042	037406	037276	036441
  6043	037407	000000	000000
  6044	037410	036425	000000
  6045	037411	000000	033560
  6046	037412	037276	036450
  6047	037413	000014	000013
  6048	037414	036276	000000
  6049	037415	264 00 0 00 033602 
  6050	037416	037276	036457
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-11
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0193

  6051	037417	000000	000000
  6052	037420	036425	000000
  6053	037421	000000	033577
  6054	037422	037276	036466
  6055	037423	000014	000013
  6056	037424	036276	000000
  6057	037425	62 45 54 57 43 41 
  6058	037426	64 45 44 00 51 56 
  6059	037427	64 45 62 62 65 60 
  6060	037430	64 00 64 45 63 64 
  6061	037431	77 00 00 00 00 00 
  6062	037432	264 00 0 00 033747 
  6063	037433	264 00 0 00 033737 
  6064	037434	264 00 0 00 033727 
  6065	037435	264 00 0 00 033717 
  6066	037436	264 00 0 00 033707 
  6067	037437	264 00 0 00 033677 
  6068	037440	264 00 0 00 033667 
  6069	037441	264 00 0 00 033651 
  6070	037442	60 41 47 45 00 20 
  6071	037443	00 51 56 64 45 62 
  6072	037444	62 65 60 64 00 45 
  6073	037445	62 62 57 62 77 00 
  6074	037446	43 57 62 35 41 60 
  6075	037447	62 14 00 41 43 64 
  6076	037450	35 60 51 77 00 00 
  6077	037451	037425	037442
  6078	037452	000014	000013
  6079	037453	037446	000000
  6080	037454	264 00 0 00 030104 
  6081	037455	62 45 54 57 43 41 
  6082	037456	64 45 44 00 45 60 
  6083	037457	55 60 00 62 45 46 
  6084	037460	51 54 54 00 60 41 
  6085	037461	47 51 56 47 77 00 
  6086	037462	037455	036755
  6087	037463	000014	000013
  6088	037464	037012	032700
  6089	037465	037455	036755
  6090	037466	000014	000013
  6091	037467	037020	032705
  6092	037470	037455	036755
  6093	037471	000014	000013
  6094	037472	037044	032705
  6095	037473	42 54 64 00 60 41 
  6096	037474	47 45 00 46 41 51 
  6097	037475	54 77 00 00 00 00 
  6098	037476	400775	400776
  6099	037477	41 43 64 35 42 54 
  6100	037500	64 00 41 43 77 00 
  6101	037501	037473	036567
  6102	037502	000014	000013
  6103	037503	037477	000000
  6104	037504	400777	401000
  6105	037505	42 54 64 00 41 43 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-12
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0194

  6106	037506	00 67 62 57 56 47 
  6107	037507	77 00 00 00 00 00 
  6108	037510	037473	037505
  6109	037511	000014	000013
  6110	037512	036276	000000
  6111	037513	011000	401000
  6112	037514	037473	036616
  6113	037515	000014	000013
  6114	037516	036276	000000
  6115	037517	000000	034110
  6116	037520	63 41 66 45 44 00 
  6117	037521	46 54 41 47 63 14 
  6118	037522	14 60 43 00 67 62 
  6119	037523	57 56 47 77 00 00 
  6120	037524	037473	037520
  6121	037525	000014	000013
  6122	037526	036276	000000
  6123	037527	42 54 64 00 44 41 
  6124	037530	64 41 00 67 62 57 
  6125	037531	56 47 77 00 00 00 
  6126	037532	41 44 62 00 24 20 
  6127	037533	20 27 27 25 77 00 
  6128	037534	037473	037527
  6129	037535	000014	000013
  6130	037536	037532	000000
  6131	037537	41 44 62 00 24 20 
  6132	037540	20 27 27 26 77 00 
  6133	037541	037473	037527
  6134	037542	000014	000013
  6135	037543	037537	000000
  6136	037544	41 44 62 00 24 20 
  6137	037545	20 27 27 27 77 00 
  6138	037546	037473	037527
  6139	037547	000014	000013
  6140	037550	037544	000000
  6141	037551	41 44 62 00 24 20 
  6142	037552	21 20 20 20 77 00 
  6143	037553	037473	037527
  6144	037554	000014	000013
  6145	037555	037551	000000
  6146	037556	41 44 62 00 24 20 
  6147	037557	21 20 20 21 77 00 
  6148	037560	037473	037527
  6149	037561	000014	000013
  6150	037562	037556	000000
  6151	037563	41 44 62 00 24 20 
  6152	037564	21 20 20 22 77 00 
  6153	037565	037473	037527
  6154	037566	000014	000013
  6155	037567	037563	000000
  6156	037570	42 54 64 00 67 45 
  6157	037571	56 64 00 64 57 57 
  6158	037572	00 46 41 62 77 00 
  6159	037573	037473	037570
  6160	037574	000014	000013
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-13
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0195

  6161	037575	037563	000000
  6162	037576	740075	740076
  6163	037577	42 71 64 45 00 60 
  6164	037600	41 47 45 00 46 41 
  6165	037601	51 54 77 00 00 00 
  6166	037602	44 06 0 00 400000 
  6167	037603	51 54 44 42 00 64 
  6168	037604	62 41 60 00 46 41 
  6169	037605	51 54 45 44 77 00 
  6170	037606	41 43 64 35 60 57 
  6171	037607	51 56 64 45 62 14 
  6172	037610	00 43 57 62 35 42 
  6173	037611	71 64 45 00 41 43 
  6174	037612	77 00 00 00 00 00 
  6175	037613	037577	037603
  6176	037614	000014	000013
  6177	037615	037606	000000
  6178	037616	51 54 44 42 00 43 
  6179	037617	50 41 56 47 45 44 
  6180	037620	00 42 71 64 45 00 
  6181	037621	41 43 77 00 00 00 
  6182	037622	037577	037616
  6183	037623	000014	000013
  6184	037624	037606	000000
  6185	037625	36 06 0 00 400000 
  6186	037626	51 54 44 42 00 60 
  6187	037627	57 51 56 64 45 62 
  6188	037630	00 67 62 57 56 47 
  6189	037631	77 00 00 00 00 00 
  6190	037632	037577	037626
  6191	037633	000014	000013
  6192	037634	036276	000000
  6193	037635	51 54 44 42 00 55 
  6194	037636	57 44 51 46 51 45 
  6195	037637	44 00 42 71 64 45 
  6196	037640	00 63 57 65 62 43 
  6197	037641	45 77 00 00 00 00 
  6198	037642	41 44 62 00 24 20 
  6199	037643	20 20 20 20 77 00 
  6200	037644	037577	037635
  6201	037645	000014	000013
  6202	037646	037642	000000
  6203	037647	037577	036616
  6204	037650	000014	000013
  6205	037651	036276	000000
  6206	037652	020000	034247
  6207	037653	037577	037520
  6208	037654	000014	000013
  6209	037655	036276	000000
  6210	037656	51 44 60 42 00 64 
  6211	037657	62 41 60 00 46 41 
  6212	037660	51 54 45 44 77 00 
  6213	037661	037577	037656
  6214	037662	000014	000013
  6215	037663	037606	000000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-14
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0196

  6216	037664	51 44 60 42 00 43 
  6217	037665	50 41 56 47 45 44 
  6218	037666	00 42 71 64 45 00 
  6219	037667	41 43 77 00 00 00 
  6220	037670	037577	037664
  6221	037671	000014	000013
  6222	037672	037606	000000
  6223	037673	51 44 60 42 00 60 
  6224	037674	57 51 56 64 45 62 
  6225	037675	00 67 62 57 56 47 
  6226	037676	77 00 00 00 00 00 
  6227	037677	037577	037673
  6228	037700	000014	000013
  6229	037701	036276	000000
  6230	037702	51 44 60 42 00 55 
  6231	037703	57 44 51 46 51 45 
  6232	037704	44 00 42 71 64 45 
  6233	037705	00 44 45 63 64 51 
  6234	037706	56 41 64 51 57 56 
  6235	037707	77 00 00 00 00 00 
  6236	037710	037577	037702
  6237	037711	000014	000013
  6238	037712	037642	000000
  6239	037713	22 11 0 00 000000 
  6240	037714	020000	034304
  6241	037715	44 06 0 00 000014 
  6242	037716	60 57 51 56 64 45 
  6243	037717	62 00 46 45 64 43 
  6244	037720	50 00 64 62 41 60 
  6245	037721	00 46 41 51 54 45 
  6246	037722	44 77 00 00 00 00 
  6247	037723	037577	037716
  6248	037724	000014	000013
  6249	037725	037642	000000
  6250	037726	60 57 51 56 64 45 
  6251	037727	62 00 46 45 64 43 
  6252	037730	50 00 55 57 44 51 
  6253	037731	46 51 45 44 00 42 
  6254	037732	71 64 45 00 41 43 
  6255	037733	77 00 00 00 00 00 
  6256	037734	037577	037726
  6257	037735	000014	000013
  6258	037736	036276	000000
  6259	037737	41 43 00 07 41 43 
  6260	037740	64 07 00 55 57 44 
  6261	037741	51 46 51 45 44 77 
  6262	037742	037577	037737
  6263	037743	000014	000013
  6264	037744	036276	000000
  6265	037745	60 57 51 56 64 45 
  6266	037746	62 00 67 62 57 56 
  6267	037747	47 77 00 00 00 00 
  6268	037750	037577	037745
  6269	037751	000014	000013
  6270	037752	037642	000000
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-15
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0197

  6271	037753	011000	400000
  6272	037754	000000	034355
  6273	037755	44 57 65 42 54 45 
  6274	037756	00 55 57 66 45 00 
  6275	037757	60 41 47 45 00 46 
  6276	037760	41 51 54 77 00 00 
  6277	037761	037755	036567
  6278	037762	000014	000013
  6279	037763	037642	000000
  6280	037764	44 55 57 66 45 00 
  6281	037765	55 57 44 51 46 51 
  6282	037766	45 44 00 41 43 77 
  6283	037767	46 45 64 43 50 00 
  6284	037770	46 62 57 55 00 24 
  6285	037771	20 20 20 20 20 77 
  6286	037772	037755	037764
  6287	037773	000014	000013
  6288	037774	037767	000000
  6289	037775	44 55 57 66 45 00 
  6290	037776	55 57 44 51 46 51 
  6291	037777	45 44 00 41 43 21 
  6292	040000	77 00 00 00 00 00 
  6293	040001	46 45 64 43 50 00 
  6294	040002	46 62 57 55 00 24 
  6295	040003	20 20 20 20 21 77 
  6296	040004	037755	037775
  6297	040005	000014	000013
  6298	040006	040001	000000
  6299	040007	037755	036616
  6300	040010	000014	000013
  6301	040011	036276	000000
  6302	040012	000000	034424
  6303	040013	037755	037520
  6304	040014	000014	000013
  6305	040015	036276	000000
  6306	040016	037755	036567
  6307	040017	000014	000013
  6308	040020	036276	000000
  6309	040021	46 45 64 43 50 00 
  6310	040022	46 62 57 55 00 24 
  6311	040023	20 20 27 27 27 77 
  6312	040024	037755	037764
  6313	040025	000014	000013
  6314	040026	040021	000000
  6315	040027	46 45 64 43 50 00 
  6316	040030	46 62 57 55 00 24 
  6317	040031	20 21 20 20 20 77 
  6318	040032	037755	037775
  6319	040033	000014	000013
  6320	040034	040027	000000
  6321	040035	001000	401000
  6322	040036	000000	034464
  6323	040037	44 42 54 00 55 57 
  6324	040040	66 45 00 64 57 00 
  6325	040041	55 45 55 00 60 41 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-16
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0198

  6326	040042	47 45 00 46 41 51 
  6327	040043	54 77 00 00 00 00 
  6328	040044	040037	036567
  6329	040045	000014	000013
  6330	040046	037642	000000
  6331	040047	44 55 57 66 45 55 
  6332	040050	00 55 57 44 51 46 
  6333	040051	51 45 44 00 41 43 
  6334	040052	00 44 45 63 64 51 
  6335	040053	56 41 64 51 57 56 
  6336	040054	77 00 00 00 00 00 
  6337	040055	040037	040047
  6338	040056	000014	000013
  6339	040057	037642	000000
  6340	040060	44 55 57 66 45 55 
  6341	040061	00 55 57 44 51 46 
  6342	040062	51 45 44 00 41 43 
  6343	040063	21 00 44 45 63 64 
  6344	040064	51 56 41 64 51 57 
  6345	040065	56 77 00 00 00 00 
  6346	040066	41 44 62 00 24 20 
  6347	040067	20 20 20 21 77 00 
  6348	040070	040037	040060
  6349	040071	000014	000013
  6350	040072	040066	000000
  6351	040073	44 55 57 66 45 55 
  6352	040074	00 55 57 44 51 46 
  6353	040075	51 45 44 00 41 43 
  6354	040076	77 00 00 00 00 00 
  6355	040077	040037	040073
  6356	040100	000014	000013
  6357	040101	036276	000000
  6358	040102	44 55 57 66 45 55 
  6359	040103	00 55 57 44 51 46 
  6360	040104	51 45 44 00 41 43 
  6361	040105	21 77 00 00 00 00 
  6362	040106	040037	040102
  6363	040107	000014	000013
  6364	040110	036276	000000
  6365	040111	040037	036616
  6366	040112	000014	000013
  6367	040113	036276	000000
  6368	040114	000000	034532
  6369	040115	040037	037520
  6370	040116	000014	000013
  6371	040117	036276	000000
  6372	040120	22 56 44 00 67 57 
  6373	040121	62 44 00 44 55 57 
  6374	040122	66 45 55 77 00 00 
  6375	040123	040037	036567
  6376	040124	000014	000013
  6377	040125	040120	000000
  6378	040126	44 55 57 66 45 55 
  6379	040127	00 44 51 44 00 56 
  6380	040130	57 64 00 64 62 41 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-17
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0199

  6381	040131	56 63 46 45 62 00 
  6382	040132	41 43 77 00 00 00 
  6383	040133	040037	040126
  6384	040134	000014	000013
  6385	040135	037544	000000
  6386	040136	040037	040060
  6387	040137	000014	000013
  6388	040140	037551	000000
  6389	040141	000000	034600
  6390	040142	64 62 41 60 00 51 
  6391	040143	56 63 64 62 65 43 
  6392	040144	64 51 57 56 00 60 
  6393	040145	41 47 45 00 46 41 
  6394	040146	51 54 77 00 00 00 
  6395	040147	264 00 0 00 400677 
  6396	040150	040142	036567
  6397	040151	000000	000000
  6398	040152	036425	000000
  6399	040153	52 62 63 64 46 00 
  6400	040154	50 41 60 60 45 56 
  6401	040155	45 44 77 00 00 00 
  6402	040156	56 57 00 64 62 41 
  6403	040157	60 77 00 00 00 00 
  6404	040160	040142	040153
  6405	040161	000000	000000
  6406	040162	040156	000000
  6407	040163	011000	400677
  6408	040164	040142	036616
  6409	040165	000014	000013
  6410	040166	036276	000000
  6411	040167	000600	034652
  6412	040170	040142	037520
  6413	040171	000014	000013
  6414	040172	037757	000000
  6415	040173	60 41 47 45 00 46 
  6416	040174	41 51 54 00 43 57 
  6417	040175	56 64 51 56 65 45 
  6418	040176	00 46 41 51 54 45 
  6419	040177	44 77 00 00 00 00 
  6420	040200	040142	040173
  6421	040201	000000	000000
  6422	040202	036425	000000
  6423	040203	000000	400703
  6424	040204	62 45 54 57 43 41 
  6425	040205	64 51 57 56 00 51 
  6426	040206	56 43 57 62 62 45 
  6427	040207	43 64 77 00 00 00 
  6428	040210	60 46 00 43 57 56 
  6429	040211	64 51 56 65 45 77 
  6430	040212	040142	040204
  6431	040213	000014	000013
  6432	040214	040210	000000
  6433	040215	000000	034652
  6434	040216	64 62 41 60 00 63 
  6435	040217	41 66 45 44 00 60 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-18
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0200

  6436	040220	43 00 67 62 57 56 
  6437	040221	47 77 00 00 00 00 
  6438	040222	040142	040216
  6439	040223	000014	000013
  6440	040224	040210	000000
  6441	040225	64 62 41 60 00 60 
  6442	040226	41 47 45 00 46 41 
  6443	040227	51 54 77 00 00 00 
  6444	040230	264 00 0 00 034753 
  6445	040231	040225	036567
  6446	040232	000000	000000
  6447	040233	036425	000000
  6448	040234	040225	040153
  6449	040235	000000	000000
  6450	040236	040156	000000
  6451	040237	64 62 41 60 00 23 
  6452	040240	00 50 41 60 60 45 
  6453	040241	56 45 44 77 00 00 
  6454	040242	56 57 00 60 41 47 
  6455	040243	45 00 46 41 51 54 
  6456	040244	77 00 00 00 00 00 
  6457	040245	040225	040237
  6458	040246	000000	000000
  6459	040247	040242	000000
  6460	040250	001000	400744
  6461	040251	040225	036616
  6462	040252	000014	000013
  6463	040253	036276	000000
  6464	040254	000600	400744
  6465	040255	040225	037520
  6466	040256	000014	000013
  6467	040257	037757	000000
  6468	040260	51 17 57 00 51 56 
  6469	040261	63 64 00 60 41 47 
  6470	040262	45 00 46 41 51 54 
  6471	040263	77 00 00 00 00 00 
  6472	040264	44 41 64 41 51 00 
  6473	040265	64 62 41 60 00 46 
  6474	040266	41 51 54 45 44 77 
  6475	040267	040260	040264
  6476	040270	000000	000000
  6477	040271	036425	000000
  6478	040272	44 41 64 41 51 77 
  6479	040273	040260	036616
  6480	040274	000014	000013
  6481	040275	040272	000000
  6482	040276	000000	035013
  6483	040277	040260	037520
  6484	040300	000014	000013
  6485	040301	040272	000000
  6486	040302	51 56 64 45 62 62 
  6487	040303	65 60 64 00 51 56 
  6488	040304	63 64 00 60 41 47 
  6489	040305	45 00 46 41 51 54 
  6490	040306	77 00 00 00 00 00 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-19
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0201

  6491	040307	264 00 0 00 035054 
  6492	040310	56 57 00 55 45 64 
  6493	040311	45 62 00 51 56 64 
  6494	040312	45 62 62 65 60 64 
  6495	040313	77 00 00 00 00 00 
  6496	040314	040302	040310
  6497	040315	000000	000000
  6498	040316	036425	000000
  6499	040317	264 00 0 00 400000 
  6500	040320	264 00 0 00 035122 
  6501	040321	56 57 00 51 56 64 
  6502	040322	45 62 62 65 60 64 
  6503	040323	77 00 00 00 00 00 
  6504	040324	040302	040321
  6505	040325	000000	000000
  6506	040326	036425	000000
  6507	040327	040302	036616
  6508	040330	000014	000013
  6509	040331	036276	000000
  6510	040332	300000	035077
  6511	040333	60 41 47 45 00 46 
  6512	040334	41 51 54 00 60 43 
  6513	040335	00 67 62 57 56 47 
  6514	040336	77 00 00 00 00 00 
  6515	040337	040302	040333
  6516	040340	000014	000013
  6517	040341	036276	000000
  6518	040342	51 57 00 60 41 47 
  6519	040343	45 00 46 41 51 54 
  6520	040344	00 51 56 64 45 62 
  6521	040345	62 65 60 64 45 44 
  6522	040346	77 00 00 00 00 00 
  6523	040347	43 57 62 35 51 56 
  6524	040350	64 45 62 62 65 60 
  6525	040351	64 00 60 43 14 41 
  6526	040352	43 64 35 43 57 56 
  6527	040353	51 00 41 60 62 77 
  6528	040354	040302	040342
  6529	040355	000014	000013
  6530	040356	040347	000000
  6531	040357	015 012 101 114 114 
  6532	040360	117 127 040 115 101 
  6533	040361	130 111 115 125 115 
  6534	040362	040 101 104 104 122 
  6535	040363	105 123 123 040 124 
  6536	040364	105 123 124 111 116 
  6537	040365	107 040 077 000 000 
  6538	040366	015 012 123 105 114 
  6539	040367	105 103 124 040 101 
  6540	040370	040 115 105 115 117 
  6541	040371	122 131 040 106 117 
  6542	040372	122 040 101 104 104 
  6543	040373	122 105 123 123 040 
  6544	040374	061 067 067 064 060 
  6545	040375	060 060 060 040 050 
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-20
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0202

  6546	040376	064 060 070 060 113 
  6547	040377	051 015 012 124 131 
  6548	040400	120 105 040 101 116 
  6549	040401	040 101 114 124 055 
  6550	040402	115 117 104 105 040 
  6551	040403	127 110 105 116 040 
  6552	040404	122 105 101 104 131 
  6553	040405	056 015 012 000 000 
  6554	040406	55 41 70 51 55 65 
  6555	040407	55 00 60 41 47 51 
  6556	040410	56 47 00 64 45 63 
  6557	040411	64 77 00 00 00 00 
  6558	040412	000017	740000
  6559	040413	60 41 47 51 56 47 
  6560	040414	00 41 44 62 00 24 
  6561	040415	20 20 20 20 20 77 
  6562	040416	62 45 54 57 43 00 
  6563	040417	41 44 62 00 21 27 
  6564	040420	27 24 20 20 20 20 
  6565	040421	77 00 00 00 00 00 
  6566	040422	040406	040413
  6567	040423	000014	000013
  6568	040424	040416	000000
  6569	040425	000017	777777
  6570	040426	60 41 47 51 56 47 
  6571	040427	00 41 44 62 00 27 
  6572	040430	27 27 27 27 27 77 
  6573	040431	62 45 54 57 43 00 
  6574	040432	41 44 62 00 21 27 
  6575	040433	27 27 27 27 27 27 
  6576	040434	77 00 00 00 00 00 
  6577	040435	040406	040426
  6578	040436	000014	000013
  6579	040437	040431	000000
  6580	040440	55 41 70 51 55 65 
  6581	040441	55 00 62 45 54 57 
  6582	040442	43 41 64 51 57 56 
  6583	040443	00 60 41 47 51 56 
  6584	040444	47 00 64 45 63 64 
  6585	040445	77 00 00 00 00 00 
  6586	040446	60 41 47 45 44 00 
  6587	040447	62 45 41 44 00 66 
  6588	040450	45 62 51 46 71 77 
  6589	040451	040440	040446
  6590	040452	000014	000013
  6591	040453	036276	000000
  6592	040454	400000	400001
  6593	040455	56 57 64 00 43 54 
  6594	040456	45 41 62 77 00 00 
  6595	040457	037155	037642
  6596	040460	000014	000013
  6597	040461	040455	000000
  6598	040462	41 44 62 00 27 27 
  6599	040463	27 27 27 26 77 00 
  6600	040464	037155	040462
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-21
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0203

  6601	040465	000014	000013
  6602	040466	040455	000000
  6603	040467	41 44 62 00 27 27 
  6604	040470	27 27 27 27 77 00 
  6605	040471	037155	040467
  6606	040472	000014	000013
  6607	040473	040455	000000
  6608	040474	037155	040455
  6609	040475	000014	000013
  6610	040476	036732	000000
  6611	040477	56 57 64 00 63 45 
  6612	040500	64 77 00 00 00 00 
  6613	040501	037155	040477
  6614	040502	000014	000013
  6615	040503	036732	000000
  6616	040504	55 41 70 51 55 65 
  6617	040505	55 00 42 41 63 45 
  6618	040506	00 62 45 47 51 63 
  6619	040507	64 45 62 00 62 45 
  6620	040510	54 57 43 41 64 51 
  6621	040511	57 56 00 64 45 63 
  6622	040512	64 77 00 00 00 00 
  6623	040513	040504	037220
  6624	040514	000014	000013
  6625	040515	037222	000000
  6626	040516	040504	037231
  6627	040517	000014	000013
  6628	040520	037234	000000
  6629	040521	040504	037241
  6630	040522	000014	000013
  6631	040523	037234	000000
  6632	040524	55 41 70 00 60 41 
  6633	040525	47 45 77 00 00 00 
  6634	040526	040504	037231
  6635	040527	000014	000013
  6636	040530	040524	000000
  6637	040531	040504	037241
  6638	040532	000014	000013
  6639	040533	040524	000000
  6640	040534	040504	037262
  6641	040535	000014	000013
  6642	040536	036632	000000
  6643	040537	040504	036577
  6644	040540	000014	000013
  6645	040541	036632	000000
  6646	040542	040504	036616
  6647	040543	000014	000013
  6648	040544	036632	000000
  6649	040545	55 41 70 51 55 65 
  6650	040546	55 00 45 70 45 43 
  6651	040547	15 60 45 62 15 60 
  6652	040550	62 57 43 45 63 63 
  6653	040551	00 60 41 47 51 56 
  6654	040552	47 77 00 00 00 00 
  6655	040553	040545	036755
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-22
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0204

  6656	040554	000014	000013
  6657	040555	037012	000000
  6658	040556	040545	036755
  6659	040557	000014	000013
  6660	040560	037020	000000
  6661	040561	040545	036755
  6662	040562	000014	000013
  6663	040563	037044	000000
  6664	040564	040545	037344
  6665	040565	000014	000013
  6666	040566	036425	000000
  6667	040567	040545	037352
  6668	040570	000014	000013
  6669	040571	037355	000000
  6670	040572	040545	037366
  6671	040573	000014	000013
  6672	040574	036616	000000
  6673	040575	264 00 0 00 035756 
  6674	040576	040545	036422
  6675	040577	000014	000013
  6676	040600	036425	000000
  6677	040601	000000	035753
  6678	040602	040545	036432
  6679	040603	000014	000013
  6680	040604	036276	000000
  6681	040605	264 00 0 00 035775 
  6682	040606	040545	036441
  6683	040607	000014	000013
  6684	040610	036425	000000
  6685	040611	000000	035772
  6686	040612	040545	036450
  6687	040613	000014	000013
  6688	040614	036276	000000
  6689	040615	264 00 0 00 036014 
  6690	040616	040545	036457
  6691	040617	000014	000013
  6692	040620	036425	000000
  6693	040621	000000	036011
  6694	040622	040545	036466
  6695	040623	000014	000013
  6696	040624	036276	000000
  6697	040625	55 41 70 51 55 65 
  6698	040626	55 00 60 41 47 45 
  6699	040627	00 51 56 64 45 62 
  6700	040630	62 65 60 64 00 64 
  6701	040631	45 63 64 77 00 00 
  6702	040632	264 00 0 00 036161 
  6703	040633	264 00 0 00 036151 
  6704	040634	264 00 0 00 036141 
  6705	040635	264 00 0 00 036131 
  6706	040636	264 00 0 00 036121 
  6707	040637	264 00 0 00 036111 
  6708	040640	264 00 0 00 036101 
  6709	040641	264 00 0 00 036063 
  6710	040642	040625	037442
DFKEA	DECSYSTEM KL10 PAGING HARDWARE DIAGNOSTIC - VERSION 0,5	MACRO %53(1026) 09:29 15-Sep-81 Page 1-23
STOR	KLM	18-Sep-79 17:18		*STOR* RESERVED STORAGE, SEPT 18,1979                                              SEQ 0205

  6711	040643	000014	000013
  6712	040644	037446	000000
  6713	040645	55 41 70 51 55 65 
  6714	040646	55 00 45 60 55 60 
  6715	040647	00 62 45 46 51 54 
  6716	040650	54 00 60 41 47 51 
  6717	040651	56 47 77 00 00 00 
  6718	040652	040645	036755
  6719	040653	000014	000013
  6720	040654	037012	000000
  6721	040655	040645	036755
  6722	040656	000014	000013
  6723	040657	037020	000000
  6724	040660	040645	036755
  6725	040661	000014	000013
  6726	040662	037044	000000
  6727						LIST
  6728	042120	000000	000000		ENDSLD:	0
  6729
  6730					IFDEF	DEBUG,<
  6731	042121				PATCH:	BLOCK DEBUG		;PATCHING AREA
  6732					>
  6733
  6734					;PROGRAM VARIABLES
  6735	042221					VAR
  6736
  6737					IFDEF	PGMEND,<
  6738	042234	000000	000000		END:	0
  6739			030000			END	BEGIN	>

NO ERRORS DETECTED

PROGRAM BREAK IS 000000
ABSOLUTE BREAK IS 042235
CPU TIME USED 00:24.601

32P CORE USED

ABORT	   146#
AC	    39#	   765	   766	   783	   785	   786	  1763	  1764	  1787	  1788	  1810	  1811	  1894	  1895     SEQ 0206
	  1929	  1930	  1944	  1945	  1970	  1971	  1979	  1980	  2021	  2022	  2058	  2059	  2077	  2078
	  2112	  2113	  2125	  2126	  2133	  2134	  2135	  2136	  2198	  2199	  2202	  2203	  2207	  2208
	  2209	  2210	  2231	  2232	  2233	  2248	  2265	  2266	  2267	  2268	  2270	  2273	  2274	  2308
	  2309	  2323	  2324	  2325	  2326	  2327	  2328	  2383	  2385	  2390	  2400	  2405	  2411	  2412
	  2424	  2428	  2430	  2443	  2468	  2469	  2470	  2471	  2472	  2473	  2542	  2552	  2557	  2564
	  2565	  2567	  2569	  2589	  2593	  2595	  2604	  2608	  2609	  2611	  2613	  2635	  2638	  2640
	  2649	  2746	  2747	  2748	  2749	  2750	  2751	  2752	  2753	  2791	  2792	  2821	  2822	  2838
	  2840	  2845	  2851	  2852	  2866	  2867	  2882	  2883	  2897	  2898	  2930	  2931	  2933	  2934
	  2967	  2968	  2969	  2970	  3027	  3028	  3029	  3030	  3031	  3054	  3055	  3072	  3082	  3086
	  3091	  3092	  3096	  3097	  3117	  3123	  3125	  3134	  3190	  3191	  3192	  3193	  3237	  3238
	  3257	  3258	  3277	  3278	  3296	  3297	  3389	  3390	  3409	  3410	  3429	  3430	  3449	  3450
	  3469	  3470	  3489	  3490	  3509	  3510	  3527	  3528	  3546	  3556	  3559	  3566	  3567	  3569
	  3572	  3593	  3597	  3598	  3607	  3632	  3633	  3634	  3635	  3636	  3637	  3712	  3713	  3725
	  3727	  3769	  3770	  3792	  3793	  3794	  3795	  3841	  3842	  3900	  3901	  3948	  3963	  3964
	  3965	  3966	  3969	  3976	  3985	  4012	  4013	  4014	  4015	  4019	  4026	  4034	  4072	  4073
	  4074	  4075	  4081	  4088	  4108	  4138	  4139	  4140	  4141	  4144	  4151	  4186	  4187	  4205
	  4206	  4208	  4209	  4210	  4211	  4253	  4254	  4294	  4295	  4297	  4298	  4299	  4300	  4603
	  4604	  4606	  4607	  4622	  4623	  4624	  4625	  4665	  4678	  4683	  4689	  4691	  4707	  4732
	  4733	  4770	  4771	  4804	  4805	  4806	  4807	  4840	  4841	  4842	  4843	  4898	  4899	  4900
	  4901	  4902	  4925	  4926	  4944	  4954	  4958	  4963	  4964	  4968	  4969	  4988	  4994	  4996
	  5005	  5021	  5022	  5023	  5024	  5026	  5027	  5028	  5029	  5068	  5069	  5073	  5074	  5093
	  5094	  5114	  5115	  5133	  5134	  5226	  5227	  5246	  5247	  5266	  5267	  5286	  5287	  5306
	  5307	  5326	  5327	  5346	  5347	  5363	  5364	  5382	  5392	  5395	  5402	  5403	  5405	  5407
	  5426	  5431	  5432	  5441
AC1	    40#	  2203	  2204	  2205	  2206	  2208	  2210	  2385	  2386	  2387	  2388	  2389	  2400	  2401
	  2402	  2403	  2404	  2416	  2417	  2418	  2419	  2434	  2435	  2436	  2437	  2438	  2450	  2552
	  2553	  2554	  2555	  2556	  2573	  2574	  2575	  2577	  2579	  2617	  2618	  2619	  2620	  2621
	  2623	  2656	  2840	  2841	  2842	  2843	  2844	  3082	  3083	  3084	  3085	  3101	  3102	  3103
	  3105	  3106	  3556	  3557	  3558	  3576	  3577	  3578	  3579	  3580	  3775	  3776	  3969	  3989
	  4019	  4039	  4081	  4113	  4144	  4678	  4679	  4680	  4681	  4682	  4694	  4695	  4696	  4698
	  4700	  4954	  4955	  4956	  4957	  4973	  4974	  4975	  4977	  4978	  5392	  5393	  5394	  5411
	  5412	  5413	  5414	  5415
AC2	    41#	  2215	  2392	  2393	  2394	  2395	  2396	  2397	  2398	  2399	  2544	  2545	  2546	  2547
	  2548	  2549	  2550	  2551	  2628	  2629	  2630	  2668	  2839	  2844	  3074	  3075	  3076	  3077
	  3078	  3079	  3080	  3081	  3548	  3549	  3550	  3551	  3552	  3553	  3554	  3555	  4668	  4669
	  4670	  4671	  4673	  4674	  4675	  4676	  4690	  4693	  4694	  4708	  4946	  4947	  4948	  4949
	  4950	  4951	  4952	  4953	  5384	  5385	  5386	  5387	  5388	  5389	  5390	  5391
AC3	    42#	  2395	  2399	  2404	  2547	  2551	  2556	  3077	  3081	  3085	  3551	  3555	  3558	  4671
	  4676	  4682	  4949	  4953	  4957	  5387	  5391	  5394
ACT	    43#	   807	   808	   811	   822	   824	   826	   836	   838	   840	   865	   867	   870	   879
	   881	   884	   893	   895	   898	   907	   909	   912	   921	   923	   926	   935	   937	   940
	   949	   951	   954	   963	   965	   968	   977	   979	   982	   991	   993	   996	  1005	  1007
	  1010	  1019	  1021	  1024	  1033	  1035	  1038	  1045	  1047	  1049	  1074	  1076	  1079	  1088
	  1090	  1093	  1102	  1104	  1107	  1116	  1118	  1121	  1130	  1132	  1135	  1144	  1146	  1149
	  1158	  1160	  1163	  1172	  1174	  1177	  1186	  1188	  1191	  1200	  1202	  1205	  1214	  1216
	  1219	  1228	  1230	  1233	  1242	  1244	  1247	  1261	  1264	  1266	  1274	  1278	  1280	  1307
	  1311	  1314	  1323	  1327	  1330	  1339	  1343	  1346	  1355	  1359	  1362	  1371	  1375	  1378
	  1387	  1391	  1394	  1403	  1407	  1410	  1419	  1423	  1426	  1435	  1439	  1442	  1451	  1455
	  1458	  1467	  1471	  1474	  1483	  1487	  1490	  1499	  1503	  1506	  1512	  1516	  1518	  1543
	  1547	  1550	  1559	  1563	  1566	  1575	  1579	  1582	  1591	  1595	  1598	  1607	  1611	  1614
	  1623	  1627	  1630	  1639	  1643	  1646	  1655	  1659	  1662	  1671	  1675	  1678	  1687	  1691
	  1694	  1703	  1707	  1710	  1719	  1723	  1726	  1735	  1739	  1742	  1780	  1781	  1783	  1803
	  1804	  1806	  1826	  1827	  1829	  1848	  1849	  1852	  1861	  1862	  1864	  1873	  1874	  1876     SEQ 0207
	  1885	  1886	  1888	  1905	  1906	  1908	  1918	  1919	  1921	  1932	  1933	  1935	  1947	  1948
	  1950	  1982	  1983	  1986	  1992	  1994	  1996	  1997	  1999	  2002	  2003	  2005	  2012	  2023
	  2024	  2026	  2033	  2035	  2037	  2038	  2040	  2043	  2044	  2046	  2053	  2089	  2090	  2093
	  2103	  2104	  2106	  2115	  2116	  2118	  2128	  2129	  2131	  2153	  2154	  2156	  2173	  2174
	  2176	  2233	  2234	  2237	  2278	  2279	  2282	  2286	  2288	  2290	  2291	  2293	  2298	  2299
	  2301	  2342	  2343	  2346	  2358	  2359	  2361	  2419	  2420	  2422	  2438	  2439	  2441	  2489
	  2490	  2491	  2494	  2496	  2497	  2499	  2513	  2514	  2515	  2517	  2519	  2520	  2522	  2578
	  2579	  2580	  2582	  2584	  2585	  2587	  2599	  2600	  2602	  2622	  2623	  2624	  2626	  2630
	  2631	  2633	  2644	  2645	  2647	  2700	  2702	  2704	  2707	  2710	  2712	  2715	  2716	  2718
	  2722	  2723	  2725	  2759	  2761	  2764	  2769	  2771	  2773	  2774	  2776	  2779	  2780	  2782
	  2785	  2786	  2788	  2795	  2797	  2799	  2801	  2803	  2806	  2807	  2809	  2813	  2814	  2816
	  2856	  2857	  2860	  2871	  2872	  2874	  2880	  2881	  2886	  2887	  2889	  2895	  2896	  2902
	  2903	  2905	  2973	  2979	  2983	  2984	  2986	  2989	  2990	  2992	  3002	  3008	  3013	  3014
	  3016	  3019	  3020	  3022	  3034	  3036	  3038	  3042	  3044	  3047	  3048	  3050	  3106	  3107
	  3110	  3112	  3113	  3115	  3129	  3130	  3132	  3171	  3172	  3174	  3198	  3202	  3209	  3215
	  3216	  3218	  3250	  3251	  3253	  3270	  3271	  3273	  3290	  3291	  3293	  3348	  3353	  3580
	  3583	  3586	  3588	  3589	  3591	  3602	  3603	  3605	  3651	  3653	  3656	  3661	  3663	  3665
	  3667	  3669	  3671	  3673	  3675	  3678	  3679	  3681	  3683	  3684	  3686	  3688	  3689	  3691
	  3694	  3695	  3697	  3699	  3700	  3702	  3704	  3705	  3707	  3734	  3735	  3737	  3739	  3740
	  3742	  3744	  3745	  3747	  3749	  3750	  3752	  3754	  3755	  3757	  3760	  3761	  3763	  3804
	  3806	  3809	  3817	  3819	  3821	  3823	  3824	  3826	  3827	  3829	  3831	  3832	  3834	  3836
	  3848	  3850	  3852	  3859	  3862	  3864	  3867	  3868	  3870	  3872	  3884	  3886	  3888	  3890
	  3892	  3903	  3904	  3913	  3920	  3923	  3925	  3927	  3928	  3930	  3932	  3934	  3936	  3938
	  3940	  3942	  3967	  3979	  3985	  3986	  3988	  3989	  3990	  3992	  3994	  3996	  3998	  4000
	  4002	  4004	  4016	  4028	  4034	  4035	  4037	  4039	  4040	  4042	  4044	  4046	  4048	  4050
	  4052	  4054	  4079	  4091	  4097	  4098	  4100	  4102	  4103	  4105	  4108	  4109	  4111	  4113
	  4114	  4116	  4118	  4120	  4122	  4124	  4126	  4128	  4153	  4159	  4160	  4162	  4165	  4166
	  4168	  4170	  4172	  4174	  4176	  4178	  4180	  4238	  4239	  4241	  4245	  4246	  4248	  4268
	  4270	  4272	  4275	  4276	  4278	  4345	  4346	  4348	  4352	  4353	  4355	  4388	  4390	  4392
	  4395	  4397	  4399	  4476	  4478	  4480	  4483	  4485	  4487	  4497	  4501	  4631	  4632	  4633
	  4636	  4641	  4642	  4643	  4645	  4666	  4668	  4672	  4673	  4677	  4699	  4700	  4701	  4704
	  4736	  4740	  4743	  4746	  4749	  4752	  4756	  4759	  4775	  4778	  4846	  4852	  4856	  4857
	  4859	  4861	  4862	  4864	  4874	  4880	  4885	  4886	  4888	  4890	  4891	  4893	  4905	  4907
	  4909	  4914	  4916	  4918	  4919	  4921	  4978	  4979	  4982	  4983	  4984	  4986	  5000	  5001
	  5003	  5033	  5036	  5043	  5049	  5050	  5052	  5080	  5086	  5087	  5089	  5100	  5106	  5107
	  5109	  5121	  5127	  5128	  5130	  5185	  5190	  5415	  5417	  5420	  5421	  5422	  5424	  5436
	  5437	  5439
ALTMGO	   500#
AMTAB1	  2202	  2218	  2231	  2276	  2295	  4517#
AMTST4	  2196#	  2244
AMTST5	  2201#	  2211
AMTST6	  2218#	  2238	  2240	  2242
AMTST7	  2245	  2263#	  2289	  2294	  2302	  2306
AMTST8	  2276#	  2283	  2304
AMTST9	  2273	  2285#
AMTSTA	  2284	  2304#
AMTSTX	  2237	  2247#
ANXM	   414#
APR	  1974	  2010	  2017	  2051	  2060	  3341	  3347	  3349	  3388	  3397	  3408	  3417	  3428	  3437
	  3448	  3457	  3468	  3477	  3488	  3497	  3508	  3517	  3525	  3529	  4382	  4424	  4444	  4497
	  4507	  5178	  5184	  5186	  5225	  5234	  5245	  5254	  5265	  5274	  5285	  5294	  5305	  5314
	  5325	  5334	  5345	  5354	  5362	  5365
APRIDF	  3876#	  3876                                                                                                     SEQ 0208
AROV	   414#
AROVU	   414#
AST	   615#
ATSIN	   616#
BEGEND	   496#	  4578	  4580	  4590	  4601	  5445
BEGIN	    33	    34	   110	   111	   112	   113	   114	   115	   116	   117	   118	   427#	  6739
BEGIN1	   443#	   497	   791
BELL	   619#
BIS	   414#	  3833	  3889
BLT0	  2836#	  2909
BLT1	  2840#	  2846	  2861
BLT2	  2848#
BLT3	  2854#	  2862
BLT4	  2863#	  2875
BLT5	  2869#	  2876
BLT6	  2878#	  2890
BLT7	  2884#	  2891
BLT8	  2893#	  2906
BLT9	  2900#	  2907
CCA	   414#
CHAIN	   166#
CHNOFF	   414#	  1973
CHNON	   414#
CLK	   414#
CLKCLR	   414#
CLKDIS	   414#
CLKENB	   414#
CLKU	   414#
CLOCKF	   482#
CNTLC	   499#
CNTR	    38#	  2213	  2242
COMMA	   608#
CONSW	   483#
COR	    44#	   805	   806	   808	   811	   820	   821	   826	   834	   835	   838	   840	   863	   864
	   867	   870	   877	   878	   881	   884	   891	   892	   895	   898	   905	   906	   909	   912
	   919	   920	   923	   926	   933	   934	   937	   940	   947	   948	   951	   954	   961	   962
	   965	   968	   975	   976	   979	   982	   989	   990	   993	   996	  1003	  1004	  1007	  1010
	  1017	  1018	  1021	  1024	  1031	  1032	  1035	  1038	  1043	  1044	  1047	  1049	  1072	  1073
	  1076	  1079	  1086	  1087	  1090	  1093	  1100	  1101	  1104	  1107	  1114	  1115	  1118	  1121
	  1128	  1129	  1132	  1135	  1142	  1143	  1146	  1149	  1156	  1157	  1160	  1163	  1170	  1171
	  1174	  1177	  1184	  1185	  1188	  1191	  1198	  1199	  1202	  1205	  1212	  1213	  1216	  1219
	  1226	  1227	  1230	  1233	  1240	  1241	  1244	  1247	  1259	  1260	  1262	  1263	  1264	  1266
	  1272	  1273	  1276	  1277	  1280	  1305	  1306	  1309	  1310	  1311	  1314	  1321	  1322	  1325
	  1326	  1327	  1330	  1337	  1338	  1341	  1342	  1343	  1346	  1353	  1354	  1357	  1358	  1359
	  1362	  1369	  1370	  1373	  1374	  1375	  1378	  1385	  1386	  1389	  1390	  1391	  1394	  1401
	  1402	  1405	  1406	  1407	  1410	  1417	  1418	  1421	  1422	  1423	  1426	  1433	  1434	  1437
	  1438	  1439	  1442	  1449	  1450	  1453	  1454	  1455	  1458	  1465	  1466	  1469	  1470	  1471
	  1474	  1481	  1482	  1485	  1486	  1487	  1490	  1497	  1498	  1501	  1502	  1503	  1506	  1510
	  1511	  1514	  1515	  1516	  1518	  1541	  1542	  1545	  1546	  1547	  1550	  1557	  1558	  1561
	  1562	  1563	  1566	  1573	  1574	  1577	  1578	  1579	  1582	  1589	  1590	  1593	  1594	  1595
	  1598	  1605	  1606	  1609	  1610	  1611	  1614	  1621	  1622	  1625	  1626	  1627	  1630	  1637
	  1638	  1641	  1642	  1643	  1646	  1653	  1654	  1657	  1658	  1659	  1662	  1669	  1670	  1673
	  1674	  1675	  1678	  1685	  1686	  1689	  1690	  1691	  1694	  1701	  1702	  1705	  1706	  1707     SEQ 0209
	  1710	  1717	  1718	  1721	  1722	  1723	  1726	  1733	  1734	  1737	  1738	  1739	  1742	  1779
	  1781	  1783	  1802	  1804	  1806	  1825	  1827	  1829	  1847	  1849	  1852	  1860	  1862	  1864
	  1872	  1874	  1876	  1884	  1886	  1888	  1904	  1906	  1908	  1917	  1919	  1921	  1931	  1933
	  1935	  1946	  1948	  1950	  1991	  1992	  1994	  1997	  1999	  2001	  2003	  2005	  2012	  2032
	  2033	  2035	  2038	  2040	  2042	  2044	  2046	  2053	  2088	  2090	  2093	  2102	  2104	  2106
	  2114	  2116	  2118	  2127	  2129	  2131	  2152	  2154	  2156	  2172	  2174	  2176	  2218	  2219
	  2220	  2221	  2222	  2223	  2224	  2225	  2226	  2227	  2228	  2229	  2230	  2234	  2237	  2276
	  2277	  2279	  2282	  2285	  2286	  2288	  2291	  2293	  2295	  2296	  2297	  2299	  2301	  2341
	  2343	  2346	  2357	  2359	  2361	  2412	  2413	  2414	  2415	  2418	  2420	  2422	  2430	  2431
	  2432	  2433	  2437	  2439	  2441	  2487	  2488	  2491	  2494	  2497	  2499	  2511	  2512	  2515
	  2517	  2520	  2522	  2569	  2570	  2571	  2572	  2575	  2577	  2580	  2582	  2585	  2587	  2595
	  2596	  2597	  2598	  2600	  2602	  2613	  2614	  2615	  2616	  2620	  2621	  2624	  2626	  2631
	  2633	  2640	  2641	  2642	  2643	  2645	  2647	  2699	  2707	  2710	  2712	  2716	  2718	  2721
	  2723	  2725	  2758	  2764	  2768	  2769	  2771	  2774	  2776	  2778	  2780	  2782	  2784	  2786
	  2788	  2794	  2799	  2801	  2803	  2805	  2807	  2809	  2812	  2814	  2816	  2855	  2860	  2870
	  2874	  2885	  2889	  2901	  2905	  2972	  2979	  2982	  2984	  2986	  2988	  2990	  2992	  3001
	  3008	  3012	  3014	  3016	  3018	  3020	  3022	  3033	  3038	  3041	  3042	  3044	  3046	  3048
	  3050	  3097	  3098	  3099	  3100	  3103	  3105	  3107	  3110	  3113	  3115	  3125	  3126	  3127
	  3128	  3130	  3132	  3170	  3172	  3174	  3202	  3207	  3209	  3214	  3216	  3218	  3249	  3251
	  3253	  3269	  3271	  3273	  3289	  3291	  3293	  3347	  3353	  3572	  3573	  3574	  3575	  3578
	  3579	  3583	  3586	  3589	  3591	  3598	  3599	  3600	  3601	  3603	  3605	  3639	  3656	  3660
	  3661	  3663	  3666	  3667	  3669	  3672	  3673	  3675	  3677	  3679	  3681	  3684	  3686	  3689
	  3691	  3693	  3695	  3697	  3700	  3702	  3705	  3707	  3733	  3735	  3737	  3740	  3742	  3745
	  3747	  3750	  3752	  3755	  3757	  3759	  3761	  3763	  3797	  3806	  3809	  3815	  3817	  3818
	  3819	  3821	  3822	  3824	  3826	  3828	  3829	  3831	  3833	  3834	  3836	  3843	  3850	  3852
	  3857	  3859	  3861	  3862	  3864	  3866	  3868	  3870	  3873	  3883	  3884	  3886	  3889	  3890
	  3892	  3902	  3903	  3911	  3913	  3918	  3920	  3922	  3923	  3925	  3928	  3930	  3933	  3934
	  3936	  3939	  3940	  3942	  3968	  3979	  3984	  3986	  3988	  3990	  3992	  3995	  3996	  3998
	  4001	  4002	  4004	  4016	  4028	  4033	  4035	  4037	  4040	  4042	  4045	  4046	  4048	  4051
	  4052	  4054	  4080	  4091	  4096	  4098	  4100	  4103	  4105	  4107	  4109	  4111	  4114	  4116
	  4119	  4120	  4122	  4125	  4126	  4128	  4153	  4158	  4160	  4162	  4164	  4166	  4168	  4171
	  4172	  4174	  4177	  4178	  4180	  4237	  4239	  4241	  4244	  4246	  4248	  4269	  4270	  4272
	  4274	  4276	  4278	  4344	  4346	  4348	  4351	  4353	  4355	  4389	  4390	  4392	  4396	  4397
	  4399	  4477	  4478	  4480	  4484	  4485	  4487	  4498	  4501	  4629	  4630	  4633	  4636	  4639
	  4640	  4643	  4645	  4691	  4692	  4693	  4696	  4698	  4701	  4704	  4735	  4740	  4742	  4746
	  4748	  4752	  4755	  4759	  4774	  4778	  4845	  4852	  4855	  4857	  4859	  4860	  4862	  4864
	  4873	  4880	  4884	  4886	  4888	  4889	  4891	  4893	  4904	  4909	  4913	  4914	  4916	  4917
	  4919	  4921	  4969	  4970	  4971	  4972	  4975	  4977	  4979	  4982	  4984	  4986	  4996	  4997
	  4998	  4999	  5001	  5003	  5036	  5041	  5043	  5048	  5050	  5052	  5080	  5085	  5087	  5089
	  5100	  5105	  5107	  5109	  5121	  5126	  5128	  5130	  5184	  5190	  5407	  5408	  5409	  5410
	  5413	  5414	  5417	  5420	  5422	  5424	  5432	  5433	  5434	  5435	  5437	  5439
CPOPJ	   503#
CPOPJ1	   501#
CRLF	   296	   297	   603#
CRLF2	   300	   301	   605#
CRY0	   414#
CRY1	   414#
CSHFLG	   662#	   759
CSHMEM	   663#
CYCL60	   656#
DCK	   414#
DDTLNK	   180#	   441
DDTSRT	   441#                                                                                                            SEQ 0210
DEBUG	    30#	  6730	  6731
DECVER	     4#	    10	    15	   462
DF22F	   567#
DIAGMN	   430#
DING	   152#
DOLLAR	   622#
DSKUPD	   467
EBRC1A	   834#	   841
EBRCK0	   787	   804#	   812	  1249
EBRCK1	   820#	   827
EBRCK2	   847#
EBRCK3	  1043#	  1050
EBRCK4	  1056#
END	    52	    53	    54	  6738#
END1	    54#
ENDFIX	   742#
ENDSLD	  6728#
EPPM0	  2075#	  2179
EPPM1	  2088#
EPPM2	  2102#
EPPM3	  2112#
EPPM4	  2125#
EPPM5	  2133#
EPPM6	  2150#	  2157
EPPM7	  2170#	  2177
EPPM9	  2079#	  2094	  2107	  2119	  2132
EPPT0	  3139#
EPPT1	  3153	  3158#
EPPT2	  3151	  3165#	  3171
EPPT3	  3164	  3177#
ERMORE	   516#
ERRPC	   487#	   781
ERRTLS	   488#	   790
ERSTOP	   155#
EXCASB	    28#	   465
EXIOT	   414#
FLG157	  3874#	  3874	  3879#	  3879	  3880
FOV	   414#
FOVU	   414#
FRDLNK	   178#
FSELNK	   177#
FXU	   414#
HYPEN	   613#
INDX	    45#	  2201	  2202	  2211	  2214	  2218	  2231	  2240	  2272	  2276	  2295	  2304	  2382	  2389
	  2392	  2396	  2406	  2410	  2416	  2425	  2427	  2435	  2444	  2541	  2544	  2548	  2558	  2559
	  2566	  2573	  2584	  2590	  2592	  2599	  2605	  2610	  2618	  2629	  2636	  2637	  2644	  2650
	  2662	  2837	  2846	  2854	  2855	  2856	  2862	  2869	  2870	  2871	  2876	  2884	  2885	  2886
	  2891	  2900	  2901	  2902	  2907	  3071	  3074	  3078	  3087	  3088	  3095	  3101	  3112	  3118
	  3122	  3129	  3135	  3545	  3548	  3552	  3560	  3561	  3568	  3576	  3588	  3594	  3596	  3602
	  3608	  4664	  4684	  4688	  4709	  4754	  4755	  4756	  4757	  4762	  4773	  4774	  4775	  4776
	  4781	  4943	  4946	  4950	  4959	  4960	  4967	  4973	  4983	  4989	  4993	  5000	  5006	  5381
	  5384	  5388	  5396	  5397	  5404	  5411	  5421	  5427	  5430	  5436	  5442
INHCSH	   163#                                                                                                            SEQ 0211
INHMAX	   105#	  4579
INHMXQ	   104#	  4584
INHPAG	   160#
INTPF0	  4419#	  4437	  4470	  4481	  4488	  4489	  4502
INTPF1	  4451	  4474#
INTPF2	  4457	  4494#	  4498
INTPF3	  4438	  4471	  4490	  4504#
INTPFA	  4426	  4441#
INTPFB	  4466#	  4484
INXM	   414#
IOCLR	   414#
ITERAT	   127#	   460
ITRCH1	   520#	  3527	  4508	  5363
ITRCNT	   460#	  2267
JOB41	   414#
JOBAPR	   414#
JOBCNI	   414#
JOBDDT	   414#
JOBFF	   414#
JOBOPC	   414#
JOBREL	   414#
JOBREN	   414#
JOBSA	   414#
JOBSYM	   414#
JOBTPC	   414#
JOBUSY	   414#
JOBUUO	   414#
JOBVER	   414#
KA10	   414
KAHZ50	   168#
KAIFLG	   477#
KI10	   414
KL10	    31#	   414
KL10P0	    32#	   414
KLFLG	   478#
KLOLD	   376
KLUBRX	   763#	   763	   766	  1263	  1277	  1310	  1326	  1342	  1358	  1374	  1390	  1406	  1422	  1438
	  1454	  1470	  1486	  1502	  1515	  1546	  1562	  1578	  1594	  1610	  1626	  1642	  1658	  1674
	  1690	  1706	  1722	  1738
LAPRAL	   414#	  3529	  4424	  4444	  4507	  5365
LAPRP1	   414#	  4424	  4444	  4507
LAPRP2	   414#	  1974	  2017	  2060
LAPRP3	   414#
LAPRP4	   414#
LAPRP5	   414#
LAPRP6	   414#
LAPRP7	   414#
LAROVS	   778#	   778	  1815	  1823
LAROVT	   414#	   777	  1811	  1816	  1824	  2948	  3278	  3297	  4821	  5115	  5134
LCADEN	   414#
LCADRP	   414#
LCASDE	   414#
LCASLD	   414#                                                                                                            SEQ 0212
LCASLO	   414#
LCASWB	   414#
LCASWD	   414#
LCCAER	   414#
LCCASD	   414#
LCHNOF	   414#	  3340	  3350	  3398	  3418	  3438	  3458	  3478	  3498	  3518	  3524	  5177	  5187	  5235
	  5255	  5275	  5295	  5315	  5335	  5355	  5361
LCHNON	   414#	  2061	  3387	  3407	  3427	  3447	  3467	  3487	  3507	  3530	  4425	  4445	  4506	  5224
	  5244	  5264	  5284	  5304	  5324	  5344	  5366
LCIOPF	   414#
LCNTRP	   414#	  2958	  4831
LCNTXT	   414#
LCNXER	   414#	  1974	  2017	  2060
LCPAER	   414#	  3397	  3417	  3437	  3457	  3477	  3497	  3517	  3524	  5234	  5254	  5274	  5294	  5314
	  5334	  5354	  5361
LCPWRF	   414#
LCSAER	   414#
LCSBER	   414#
LCSLOA	   414#
LCSLOO	   414#
LCTRP	   414#	  2959	  4832
LCWSX	   414#
LDATAF	   414#
LDCAER	   414#
LDCASD	   414#
LDIOPF	   414#
LDLNK	   179#	   430	   432
LDNXER	   414#
LDPAER	   414#	  3397	  3417	  3437	  3457	  3477	  3497	  3517	  3524	  5234	  5254	  5274	  5294	  5314
	  5334	  5354	  5361
LDPWRF	   414#
LDSAER	   414#
LDSBER	   414#
LEBXMH	   414#
LEBXML	   414#
LECAER	   414#
LECASD	   414#
LEIOPF	   414#
LENXER	   414#
LEPAER	   414#	  3388	  3408	  3428	  3448	  3468	  3488	  3508	  5225	  5245	  5265	  5285	  5305	  5325
	  5345
LEPWRF	   414#
LESAER	   414#
LESBER	   414#
LEUPFW	   414#	  1975	  2002	  2018	  2043	  2298	  2722	  2779	  2806	  3032	  3047	  3207	  3215	  3645
	  3665	  3799	  3827	  3845	  3872	  3905	  3932	  3970	  3994	  4020	  4044	  4082	  4118	  4145
	  4170	  4213	  4238	  4302	  4345	  4376	  4388	  4476	  4903	  4918	  5041	  5049
LEVNCD	   414#
LEVNPA	   414#
LEVNPD	   414#
LEXCMP	   414#
LFLGCL	   414#
LFLGDS	   414#                                                                                                            SEQ 0213
LFLGEN	   414#
LFLGST	   414#
LFP	   617#
LINSTF	   414#
LINT	   414#
LIOCLR	   414#	  3341	  3349	  3525	  5178	  5186	  5362
LIOPFE	   414#
LKNTRP	   414#	   771	  2953	  2954	  2968	  2970	  3028	  3029	  4827	  4841	  4843	  4899	  4900
LKTRP	   414#	  2955	  4828
LLACBL	   414#
LLDUSB	   414#	  1259	  1272	  1275	  1305	  1308	  1321	  1324	  1337	  1340	  1353	  1356	  1369	  1372
	  1385	  1388	  1401	  1404	  1417	  1420	  1433	  1436	  1449	  1452	  1465	  1468	  1481	  1484
	  1497	  1500	  1510	  1513	  1541	  1544	  1557	  1560	  1573	  1576	  1589	  1592	  1605	  1608
	  1621	  1624	  1637	  1640	  1653	  1656	  1669	  1672	  1685	  1688	  1701	  1704	  1717	  1720
	  1733	  1736	  1759	  1897	  1978	  2020	  2080	  2151	  2171	  2217	  2271	  2340	  2409	  2485
	  2562	  2698	  2757	  2849	  2864	  2879	  2894	  2928	  3000	  3006	  3011	  3035	  3053	  3094
	  3121	  3140	  3160	  3167	  3189	  3197	  3200	  3206	  3213	  3233	  3564	  3571	  3582	  3647
	  3721	  3801	  3907	  3972	  4022	  4078	  4084	  4147	  4217	  4306	  4312	  4322	  4378	  4461
	  4609	  4628	  4687	  4728	  4768	  4802	  4872	  4878	  4883	  4906	  4924	  4966	  4992	  5032
	  5040	  5047	  5067	  5400
LLPRCN	   414#
LMBXMH	   414#
LMBXML	   414#
LMUUO	   414#	  2983	  3013	  4856	  4885
LMUUOP	   414#	  2989	  3019	  4861	  4890
LNXMEN	   414#
LNXMER	   414#	  2010	  2051
LOOPER	   154#
LPAREN	   414#
LPARER	   414#
LPDOVS	   776#	   776	  1792	  1800
LPDOVT	   414#	   775	  1788	  1793	  1801	  2949	  2950	  3258	  4822	  4823	  5094
LPFWPC	   414#	  1976	  3671	  3778	  3832	  3888	  3938	  4000	  4050	  4124	  4176	  4214	  4245	  4257
	  4303	  4352	  4395	  4483
LPGFTR	   414#	   769	  1980	  2022	  2059	  2274	  2309	  2694	  2731	  2753	  2792	  2822	  2945	  2946
	  3031	  3055	  3191	  3193	  3224	  3637	  3713	  3770	  3795	  3842	  3901	  3949	  3966	  4013
	  4075	  4139	  4187	  4209	  4235	  4298	  4314	  4324	  4333	  4342	  4374	  4405	  4452	  4818
	  4819	  4902	  4926	  5027	  5029	  5058
LPICH1	   414#	  3530	  5366
LPICH2	   414#	  2061
LPICH3	   414#
LPICH4	   414#
LPICH5	   414#
LPICH6	   414#
LPICH7	   414#
LPICHA	   414#	  4425	  4445	  4506
LPICLR	   414#	  3340	  3350	  3398	  3418	  3438	  3458	  3478	  3498	  3518	  3524	  4423	  4443	  4505
	  5177	  5187	  5235	  5255	  5275	  5295	  5315	  5335	  5355	  5361
LPIIP1	   414#
LPIIP2	   414#
LPIIP3	   414#
LPIIP4	   414#
LPIIP5	   414#                                                                                                            SEQ 0214
LPIIP6	   414#
LPIIP7	   414#
LPIOFF	   414#	  3340	  3350	  3398	  3418	  3438	  3458	  3478	  3498	  3518	  3524	  5177	  5187	  5235
	  5255	  5275	  5295	  5315	  5335	  5355	  5361
LPION	   414#	  3387	  3407	  3427	  3447	  3467	  3487	  3507	  3530	  4425	  4445	  4506	  5224	  5244
	  5264	  5284	  5304	  5324	  5344	  5366
LPNTRP	   414#	  2960	  4833
LPRCH1	   414#
LPRCH2	   414#
LPRCH3	   414#
LPRCH4	   414#
LPRCH5	   414#
LPRCH6	   414#
LPRCH7	   414#
LPRFMH	   414#
LPRFML	   414#
LPTRP	   414#	  2961	  4834
LPWRFE	   414#
LPWRFL	   414#
LREQSE	   414#
LRQCLR	   414#
LSADEN	   414#
LSADRP	   414#
LSBSEN	   414#
LSBUSE	   414#
LSCAER	   414#
LSCASD	   414#
LSECMO	   414#
LSIOPF	   414#
LSMODE	   414#
LSNTRP	   414#	  2956	  4829
LSNXER	   414#
LSPAER	   414#	  3388	  3408	  3428	  3448	  3468	  3488	  3508	  5225	  5245	  5265	  5285	  5305	  5325
	  5345
LSPWRF	   414#
LSSAER	   414#
LSSBER	   414#
LSTRP	   414#	  2957	  4830
LTBASH	   414#
LTBASL	   414#
LTRP3S	   774#	   774	  1768	  1777	  3168	  4266
LTRP3T	   414#	   773	  1764	  1769	  1778	  2951	  2952	  3152	  3154	  3169	  3238	  4211	  4267	  4300
	  4824	  4825	  5074
LTRPAE	   414#
LTRPEN	   414#	   834	   837	   866	   880	   894	   908	   922	   936	   950	   964	   978	   992	  1006
	  1020	  1034	  1046	  1075	  1089	  1103	  1117	  1131	  1145	  1159	  1173	  1187	  1201	  1215
	  1229	  1243	  1758	  1765	  1776	  1789	  1799	  1812	  1822	  1896	  1977	  2019	  2079	  2150
	  2170	  2216	  2269	  2339	  2408	  2484	  2561	  2697	  2756	  2848	  2863	  2878	  2893	  2927
	  3093	  3120	  3139	  3159	  3166	  3188	  3196	  3199	  3205	  3212	  3232	  3239	  3242	  3248
	  3259	  3262	  3268	  3279	  3282	  3288	  3346	  3378	  3523	  3563	  3570	  3581	  3595	  3646
	  3720	  3777	  3800	  3906	  3971	  4021	  4077	  4083	  4146	  4216	  4222	  4228	  4255	  4305
	  4311	  4321	  4377	  4460	  4608	  4627	  4686	  4727	  4767	  4801	  4965	  4991	  5019	  5031
	  5034	  5039	  5046	  5066	  5075	  5078	  5084	  5095	  5098	  5104	  5116	  5119	  5125	  5183     SEQ 0215
	  5215	  5360	  5399	  5406	  5416	  5429
LUSCMP	   414#
LUUO	   414#
LUUO1	   547	   548
LUUO10	   547	   552
LUUO11	   547	   552
LUUO12	   547	   553
LUUO13	   547	   553
LUUO14	   547	   554
LUUO15	   547	   554
LUUO16	   547	   555
LUUO17	   547	   555
LUUO2	   547	   549
LUUO20	   547	   556
LUUO21	   547	   556
LUUO22	   547	   557
LUUO23	   547	   557
LUUO24	   547	   558
LUUO25	   547	   558
LUUO26	   547	   559
LUUO27	   547	   559
LUUO3	   547	   549
LUUO30	   547	   560
LUUO31	   547	   560
LUUO32	   547	   561
LUUO33	   547	   561
LUUO4	   547	   550
LUUO5	   547	   550
LUUO6	   547	   551
LUUO7	   547	   551
LUUOI	   414#	   767	  2942	  4815
LUUOIS	   768#	   768
LWRITE	   414#
MAPCK0	  1846#	  1953
MAPCK1	  1860#
MAPCK2	  1893#
MAPCK3	  1904#
MAPCK4	  1917#
MAPCK5	  1929#
MAPCK6	  1944#
MAPCK9	  1896#	  1909	  1922	  1936	  1951
MAPCKA	  1872#
MAPCKB	  1884#
MAPNEW	   568#
MARGIN	   490#
MAXQ	  4511	  4573#
MAXQ1	  4583	  4585	  4600#
MCNVER	     3#	    10	    15	   462
MEMLOW	   570#
MEMMAP	   468
MEMSIZ	   571#
MEMTOT	   569#
MINUS	   612#                                                                                                            SEQ 0216
MODDVC	   162#
MODDVL	    33#	   361	   463
MODDVU	    34#	   362	   464
MODLNK	   181#	   427
MONCTL	   480#
MONFLG	   479#
MONTEN	   481#
MONTYP	   694#
MPVU	   414#
MTR	    59#	  4431	  4442	  4465	  4474	  4495	  4504
MUUOER	   772	  3027#	  3027	  4826	  4898
MXADR0	  4662#	  4711
MXADR1	  4668#	  4684
MXADR2	  4686#
MXADR3	  4691#	  4705	  4709
MXAROV	  5114	  5124#	  5127
MXAROX	  5119#	  5126
MXBAS0	  4800#	  4928
MXBAS1	  4840#
MXBAS2	  4845#	  4853	  4865
MXBAS3	  4872#	  4881	  4894
MXBAS4	  4898#	  4911
MXBAS5	  4924#
MXBAS6	  4941#	  5008
MXBLT0	  4726#	  4761	  4783
MXBLT1	  4735#
MXBLT2	  4755#	  4762
MXBLT3	  4767#	  4780
MXBLT4	  4773#	  4781
MXBMU0	  4849#	  4860
MXBMU1	  4840	  4855#
MXBMU2	  4877#	  4889
MXBMU3	  4842	  4883#
MXEPM0	  5379#	  5443
MXEPM1	  5384#	  5397
MXEPM2	  5399#	  5440
MXEPM3	  5406#	  5425	  5427
MXEPM4	  5429#	  5442
MXFLG	   779#	   779	  4599	  4600
MXIERR	  5168	  5182#
MXINT0	  5151#
MXINT1	  5177#	  5191	  5358
MXINT2	  5179	  5215#
MXINT3	  5218#
MXINT4	  5238#
MXINT5	  5258#
MXINT6	  5278#
MXINT7	  5298#
MXINT8	  5318#
MXINT9	  5338#
MXINTA	  5360#
MXITR1	  5153	  5350#
MXITR2	  5155	  5330#                                                                                                    SEQ 0217
MXITR3	  5157	  5310#
MXITR4	  5159	  5290#
MXITR5	  5161	  5270#
MXITR6	  5163	  5250#
MXITR7	  5165	  5230#
MXPAG1	  4621#	  4648
MXPAG2	  4627#	  4637
MXPAG3	  4639#	  4646
MXPDL	  5093	  5103#	  5106
MXPDLX	  5098#	  5105
MXPF1	  4903#	  4910	  4922
MXPFL	  4901	  4913#
MXPFT0	  5018#	  5037	  5044	  5055
MXPFT1	  5026	  5046#
MXPFT2	  5028	  5039#
MXPFT3	  5033#	  5053
MXTP3	  5073	  5083#	  5086
MXTP3X	  5078#	  5085
MXTRP0	  5065#	  5081	  5101	  5122	  5136
MXTRP1	  5073#	  5090	  5110	  5131
MXWRT1	  4946#	  4960
MXWRT2	  4962#	  5004
MXWRT3	  4969#	  4987	  4989
MXWRT4	  4991#	  5006
NOPNT	   150#
NXMU	   414#
OPRSEL	   164#	  4577
OPTIME	   582#
P	   207	   208	   209	   210	   414#	   502
P0AROV	  1810	  1821#	  1826
P0AROX	  1815#	  1825
P0PDL	  1787	  1798#	  1803
P0PDLX	  1792#	  1802
P0TP3	  1763	  1775#	  1780
P0TP3X	  1768#	  1779
P0TRP0	  1757#	  1773	  1796	  1819	  1832
P0TRP1	  1763#	  1784	  1807	  1830
PAG	   414#	   764	   806	   807	   821	   822	   823	   835	   836	   837	   864	   865	   866	   878
	   879	   880	   892	   893	   894	   906	   907	   908	   920	   921	   922	   934	   935	   936
	   948	   949	   950	   962	   963	   964	   976	   977	   978	   990	   991	   992	  1004	  1005
	  1006	  1018	  1019	  1020	  1032	  1033	  1034	  1044	  1045	  1046	  1073	  1074	  1075	  1087
	  1088	  1089	  1101	  1102	  1103	  1115	  1116	  1117	  1129	  1130	  1131	  1143	  1144	  1145
	  1157	  1158	  1159	  1171	  1172	  1173	  1185	  1186	  1187	  1199	  1200	  1201	  1213	  1214
	  1215	  1227	  1228	  1229	  1241	  1242	  1243	  1260	  1261	  1273	  1274	  1275	  1306	  1307
	  1308	  1322	  1323	  1324	  1338	  1339	  1340	  1354	  1355	  1356	  1370	  1371	  1372	  1386
	  1387	  1388	  1402	  1403	  1404	  1418	  1419	  1420	  1434	  1435	  1436	  1450	  1451	  1452
	  1466	  1467	  1468	  1482	  1483	  1484	  1498	  1499	  1500	  1511	  1512	  1513	  1542	  1543
	  1544	  1558	  1559	  1560	  1574	  1575	  1576	  1590	  1591	  1592	  1606	  1607	  1608	  1622
	  1623	  1624	  1638	  1639	  1640	  1654	  1655	  1656	  1670	  1671	  1672	  1686	  1687	  1688
	  1702	  1703	  1704	  1718	  1719	  1720	  1734	  1735	  1736	  1758	  1759	  1765	  1776	  1789
	  1799	  1812	  1822	  1896	  1897	  1977	  1978	  2019	  2020	  2079	  2080	  2150	  2151	  2170
	  2171	  2216	  2217	  2269	  2271	  2339	  2340	  2408	  2409	  2484	  2485	  2561	  2562	  2697
	  2698	  2756	  2757	  2848	  2849	  2863	  2864	  2878	  2879	  2893	  2894	  2927	  2928	  3000     SEQ 0218
	  3006	  3011	  3035	  3053	  3093	  3094	  3120	  3121	  3139	  3140	  3159	  3160	  3166	  3167
	  3188	  3189	  3196	  3197	  3199	  3200	  3205	  3206	  3212	  3213	  3232	  3233	  3239	  3242
	  3248	  3259	  3262	  3268	  3279	  3282	  3288	  3346	  3378	  3523	  3563	  3564	  3570	  3571
	  3581	  3582	  3595	  3646	  3647	  3720	  3721	  3777	  3800	  3801	  3906	  3907	  3971	  3972
	  4021	  4022	  4077	  4078	  4083	  4084	  4146	  4147	  4216	  4217	  4222	  4228	  4255	  4305
	  4306	  4311	  4312	  4321	  4322	  4377	  4378	  4460	  4461	  4608	  4609	  4627	  4628	  4686
	  4687	  4727	  4728	  4767	  4768	  4801	  4802	  4872	  4878	  4883	  4906	  4924	  4965	  4966
	  4991	  4992	  5019	  5031	  5032	  5034	  5039	  5040	  5046	  5047	  5066	  5067	  5075	  5078
	  5084	  5095	  5098	  5104	  5116	  5119	  5125	  5183	  5215	  5360	  5399	  5400	  5406	  5416
	  5429
PAGRD0	  2366	  2380#
PAGRD1	  2385#	  2406
PAGRD2	  2391	  2405#
PAGRD3	  2408#	  2446
PAGRD4	  2412#	  2423	  2425
PAGRD5	  2427#	  2442	  2444
PAGRDA	  2321#	  2364
PAGRDB	  2339#	  2347
PAGRDC	  2357#
PAGRDX	  2422	  2441	  2449#
PALERS	   156#
PARCLR	   414#
PARDIS	   414#
PAREA1	   120#	   458
PAREA2	   121#	   459
PAREA3	   122#	   456
PAREA4	   123#	   457
PAREA5	   124#	   469
PAREA6	   125#	   470
PAREA7	   469#
PAREA8	   470#
PARENB	   414#
PARU	   414#
PASCNT	   484#	   789	  4582
PATCH	  6731#
PDISF	   579#
PDLOVU	   414#
PERIOD	   609#
PFAIL0	  1967#	  1987	  1995	  2000	  2006	  2013	  2063
PFAIL1	  1979	  1991#
PFAIL2	  1988	  2010#
PFAIL3	  2017#	  2027	  2036	  2041	  2047	  2054
PFAIL4	  2021	  2032#
PFAIL5	  2028	  2051#
PFAIL6	  2058#
PFBLT0	  3630#	  3767
PFBLT1	  3639#	  3657	  3709
PFBLT2	  3653#	  3672
PFBLT3	  3636	  3660#	  3765
PFBLT4	  3712#
PFBLT5	  3712	  3775#
PFBYT0	  3771	  3790#	  3946
PFBYT1	  3797#	  3810	  3838                                                                                             SEQ 0219
PFBYT2	  3806#	  3833
PFBYT3	  3794	  3815#
PFBYT4	  3841#	  3853	  3894
PFBYT5	  3850#	  3889
PFBYT6	  3841	  3857#
PFBYT7	  3900#	  3914	  3944
PFBYT8	  3911#	  3939
PFBYT9	  3900	  3918#
PFDMM0	  4070#	  4184
PFDMM1	  4077#	  4092	  4130
PFDMM2	  4088#	  4125
PFDMM3	  4074	  4096#
PFDMM4	  4138#	  4154	  4182
PFDMM5	  4151#	  4177
PFDMM6	  4138	  4158#
PFDMV0	  3961#	  4058
PFDMV1	  3967#	  3980	  4006
PFDMV2	  3976#	  4001
PFDMV3	  3965	  3984#
PFDMV4	  4012#	  4029	  4056
PFDMV5	  4026#	  4051
PFDMV6	  4012	  4033#
PFIO0	  4368#	  4402
PFIO1	  4376#	  4386	  4387	  4393	  4400
PFIO2	  4382#	  4396
PFIO3	  4373	  4388#
PFPY	  3881	  3884#
PFSTRT	   436#
PFT0	  2653	  2685#	  2728
PFT1	  2696#	  2708	  2709	  2713	  2719	  2726
PFT2	  2693	  2710#
PGFAIL	   770#	   770	  2058	  2308	  2730	  2821	  3054	  3223	  3769	  3948	  4186	  4234	  4313	  4323
	  4332	  4341	  4404	  4925	  5057
PGMEND	    29#	  6737
PGMNAM	   461	   745#
PGR400	  2325	  2341	  2342	  2368#
PGR777	  2327	  2357	  2358	  2369#
PGRDTB	    52#	  2389	  2392	  2396	  2416	  2434	  4605	  4606	  4607
PGW400	  2470	  2486	  2488	  2490	  2496	  2529#	  2690	  2696	  2702	  2704	  2721	  2748	  2755	  2760
	  2761	  2778	  2785
PGW777	  2472	  2510	  2512	  2514	  2519	  2530#	  2750	  2793	  2796	  2797	  2805	  2813
PGWRT0	  2527	  2539#	  2652
PGWRT1	  2544#	  2559
PGWRT2	  2561#	  2603
PGWRT3	  2569#	  2583	  2588	  2590
PGWRT4	  2592#	  2605
PGWRT5	  2607#	  2648
PGWRT6	  2613#	  2627	  2634	  2636
PGWRT7	  2637#	  2650
PGWRTA	  2447	  2466#	  2525
PGWRTB	    53#	  2544	  2548	  2563	  2564	  2565	  2573	  2584	  2599	  2607	  2608	  2609	  2617	  2628
	  2644	  2662	  3074	  3078	  3090	  3091	  3092	  3101	  3112	  3129	  3548	  3552	  3565	  3566
	  3567	  3576	  3588	  3602	  4946	  4950	  4962	  4963	  4964	  4973	  4983	  5000	  5384	  5388     SEQ 0220
	  5401	  5402	  5403	  5411	  5421	  5436
PGWRTC	  2510#	  2518	  2523
PGWRTX	  2582	  2587	  2626	  2655#	  3110	  3586
PGWRTY	  2602	  2647	  2661#	  3115	  3132	  3591	  3605
PGWRTZ	  2633	  2667#
PGWTBB	  2484#	  2495	  2500
PI	  1973	  2061	  3340	  3348	  3350	  3387	  3398	  3407	  3418	  3427	  3438	  3447	  3458	  3467
	  3478	  3487	  3498	  3507	  3518	  3524	  3530	  4423	  4425	  4433	  4443	  4445	  4467	  4475
	  4496	  4505	  4506	  5177	  5185	  5187	  5224	  5235	  5244	  5255	  5264	  5275	  5284	  5295
	  5304	  5315	  5324	  5335	  5344	  5355	  5361	  5366
PICHN1	   414#
PICHN2	   414#	  1973
PICHN3	   414#
PICHN4	   414#
PICHN5	   414#
PICHN6	   414#
PICHN7	   414#
PICHNA	   414#
PICLR	   414#	  4433	  4467	  4475	  4496
PIOFF	   414#
PION	   414#
PLIST	   648#	   648
PLISTE	   648	   650#
PLISTS	   649#
PLUS	   614#
PNTENB	   578#
PNTEXT	   457#
PNTFLG	   577#
PNTINH	   580#
PNTLPT	   151#
PNTNAM	   456#
PNTSPC	   581#
PVPAGI	   675#	   760
PWFCLR	   414#
QUEST	   620#
RADIX	   623#
RADLSC	   625#
RADLSP	   624#
RANDBS	   458#
REENTR	   438#
RELIAB	   158#	   784
REPT	   135	   414#	   804	  1258	  1757	  1846	  1967	  2075	  2196	  2263	  2321	  2380	  2381	  2466
	  2539	  2540	  2685	  2744	  2836	  2926	  3069	  3070	  3187	  3231	  3314	  3315	  3543	  3544
	  3630	  3790	  3961	  4070	  4203	  4292	  4368	  4419	  4621	  4662	  4663	  4726	  4800	  4941
	  4942	  5018	  5065	  5151	  5152	  5379	  5380
REPT1	   414#
REPTU	   536#
REQSET	   414#
RESRT1	   109	   513#
RESRT2	   514#
RETURN	   445#
RLAROV	  3277	  3287#	  3290
RLAROX	  3282#	  3289                                                                                                     SEQ 0221
RLBAS0	  2926#	  3056
RLBAS1	  2967#
RLBAS2	  2972#	  2980	  2987	  2993
RLBAS3	  3000#	  3009	  3017	  3023
RLBAS4	  3027#
RLBAS5	  3053#
RLBAS6	  3069#	  3163	  3175	  3177
RLBMU0	  2976#	  2988
RLBMU1	  2967	  2982#
RLBMU2	  3005#	  3018
RLBMU3	  2969	  3011#
RLEPM0	  3543#	  3610
RLEPM1	  3548#	  3561
RLEPM2	  3563#	  3606
RLEPM3	  3572#	  3587	  3592	  3594
RLEPM4	  3595#	  3608
RLIERR	  3331	  3345#
RLINT0	  3314#
RLINT1	  3340#	  3354	  3521
RLINT2	  3342	  3378#
RLINT3	  3381#
RLINT4	  3401#
RLINT5	  3421#
RLINT6	  3441#
RLINT7	  3461#
RLINT8	  3481#
RLINT9	  3501#
RLINTA	  3523#
RLITR1	  3316	  3513#
RLITR2	  3318	  3493#
RLITR3	  3320	  3473#
RLITR4	  3322	  3453#
RLITR5	  3324	  3433#
RLITR6	  3326	  3413#
RLITR7	  3328	  3393#
RLPDL	  3257	  3267#	  3270
RLPDLX	  3262#	  3269
RLPF1	  3032#	  3039	  3045	  3051
RLPFL	  3030	  3041#
RLPFT0	  3187#	  3203	  3210	  3221
RLPFT1	  3190	  3212#
RLPFT2	  3192	  3205#
RLPFT3	  3198#	  3219
RLTP3	  3237	  3247#	  3250
RLTP3X	  3242#	  3249
RLTRP0	  3231#	  3245	  3265	  3285	  3299
RLTRP1	  3237#	  3254	  3274	  3294
RLWRT1	  3074#	  3088
RLWRT2	  3090#	  3111	  3116	  3133
RLWRT3	  3097#	  3118
RLWRT4	  3120#	  3135
RPEAT	   786#	   786	   804	  1258	  1757	  1846	  1967	  2075	  2196	  2321	  2380	  2466	  2539	  2685
	  2744	  2836	  2926	  3069	  3187	  3231	  3314	  3543	  3630	  3790	  3961	  4070	  4203	  4292     SEQ 0222
	  4368	  4419	  4621	  4662	  4726	  4800	  4941	  5018	  5065	  5151	  5379
RSTART	   147#
RTP	   618#
RUNFLG	   485#
SADR1	   108#	   434
SADR10	   117#	   450
SADR11	   118#	   451
SADR2	   109#	   436
SADR3	   110#	   438
SADR4	   111#
SADR5	   112#	   499
SADR6	   113#	   500
SADR7	   114#	   447
SADR8	   115#	   448
SADR9	   116#	   449
SBINIT	   220	   444#
SCOPE	   537#	   780
SFSRT1	   108	   789#
SFSTRT	   434#
SLASH	   621#
SM10	   725#
SPACE	   610#
SRTDDT	   440#
START	   428	   757#
START1	   447#
START2	   448#
START3	   449#
START4	   450#
START5	   451#
STARTA	   443	   780#
SUBLNK	   182#	   444
SWPTAB	   731#
SWTEXR	   459#
SYSEXR	   432#
T	   795#	   811	   826	   840	   870	   884	   898	   912	   926	   940	   954	   968	   982	   996
	  1010	  1024	  1038	  1049	  1079	  1093	  1107	  1121	  1135	  1149	  1163	  1177	  1191	  1205
	  1219	  1233	  1247	  1266	  1280	  1314	  1330	  1346	  1362	  1378	  1394	  1410	  1426	  1442
	  1458	  1474	  1490	  1506	  1518	  1550	  1566	  1582	  1598	  1614	  1630	  1646	  1662	  1678
	  1694	  1710	  1726	  1742	  1751#	  1772	  1783	  1795	  1806	  1818	  1829	  1836#	  1852	  1864
	  1876	  1888	  1908	  1921	  1935	  1950	  1958#	  1986	  1994	  1999	  2005	  2012	  2026	  2035
	  2040	  2046	  2053	  2069#	  2093	  2106	  2118	  2131	  2156	  2176	  2190#	  2237	  2257#	  2282
	  2288	  2293	  2301	  2315#	  2346	  2361	  2422	  2441	  2460#	  2494	  2499	  2517	  2522	  2582
	  2587	  2602	  2626	  2633	  2647	  2675#	  2707	  2712	  2718	  2725	  2738#	  2764	  2771	  2776
	  2782	  2788	  2799	  2803	  2809	  2816	  2830#	  2860	  2874	  2889	  2905	  2920#	  2979	  2986
	  2992	  3008	  3016	  3022	  3038	  3044	  3050	  3063#	  3110	  3115	  3132	  3162	  3174	  3202
	  3209	  3218	  3244	  3253	  3264	  3273	  3284	  3293	  3308#	  3353	  3537#	  3586	  3591	  3605
	  3624#	  3656	  3663	  3669	  3675	  3681	  3686	  3691	  3697	  3702	  3707	  3737	  3742	  3747
	  3752	  3757	  3763	  3784#	  3809	  3817	  3821	  3826	  3831	  3836	  3852	  3859	  3864	  3870
	  3886	  3892	  3913	  3920	  3925	  3930	  3936	  3942	  3955#	  3979	  3988	  3992	  3998	  4004
	  4028	  4037	  4042	  4048	  4054	  4064#	  4091	  4100	  4105	  4111	  4116	  4122	  4128	  4153
	  4162	  4168	  4174	  4180	  4197#	  4225	  4230	  4241	  4248	  4260	  4272	  4278	  4286#	  4317
	  4326	  4335	  4348	  4355	  4362#	  4385	  4392	  4399	  4409#	  4436	  4469	  4480	  4487	  4501
	  4615#	  4636	  4645	  4656#	  4704	  4720#	  4740	  4746	  4752	  4759	  4778	  4794#	  4852	  4859     SEQ 0223
	  4864	  4880	  4888	  4893	  4909	  4916	  4921	  4935#	  4982	  4986	  5003	  5036	  5043	  5052
	  5080	  5089	  5100	  5109	  5121	  5130	  5145#	  5190	  5373#	  5420	  5424	  5439
TAB	   611#
TESTPC	   486#	   758	   803	   819	   833	   846	  1055	  1257	  1286	  1756	  1845	  1966	  2074	  2195
	  2262	  2320	  2379	  2465	  2538	  2684	  2743	  2835	  2925	  3068	  3186	  3230	  3313	  3542
	  3629	  3789	  3960	  4069	  4202	  4291	  4367	  4418	  4575	  4620	  4661	  4725	  4799	  4940
	  5017	  5064	  5150	  5378
TICKS	   489#
TIM	    60#	  4430	  4464
TIPF0	  4203#	  4226	  4231	  4242	  4249	  4261	  4273	  4279	  4281
TIPF1	  4222#
TIPF10	  4292#	  4318	  4319	  4327	  4328	  4336	  4337	  4349	  4356	  4358
TIPF11	  4311#
TIPF12	  4297	  4341#
TIPF14	  4299	  4331#
TIPF1X	  4309	  4321#	  4344	  4351
TIPF2	  4208	  4234#
TIPF3	  4253#
TIPF4	  4210	  4237	  4265#	  4275
TIPF5	  4268	  4269#	  4269
TIPFX	  4220	  4228#	  4244	  4253	  4274
TN0	    56#	  1767	  1791	  3146	  3241	  3261	  4220	  4244	  4309	  4351	  5077	  5097
TN1	    57#	  1767	  1814	  3146	  3241	  3281	  4220	  4244	  4309	  4351	  5077	  5118
TOTALS	   148#
TTNBRF	   669#
TTYFIL	   585#
TTYSPD	   586#
TXTINH	   159#
UBRCK0	  1258#	  1267	  1744
UBRCK1	  1272#	  1281
UBRCK2	  1287#
UBRCK3	  1510#	  1519
UBRCK4	  1523#
USER	   476#
USERF	   414#
USRASB	   466
USRCRF	   595#
USRLFF	   594#
UUODIS	   548#
UUOEXT	   504#
UUORTN	   505#
UUOSKP	   502#
WRTP0	  2744#	  2819
WRTP1	  2755#	  2765	  2766	  2772	  2777	  2783	  2789	  2804	  2810	  2817
WRTP2	  2784#
WRTP3	  2791#	  2800
WRTP4	  2812#
WRTPF	  2752	  2768#
WRTPF1	  2791	  2801#
XX	   842#	   861	   861#	   862	   862#	   863	   875	   875#	   876	   877	   889	   889#	   890	   891
	   903	   903#	   904	   905	   917	   917#	   918	   919	   931	   931#	   932	   933	   945	   945#
	   946	   947	   959	   959#	   960	   961	   973	   973#	   974	   975	   987	   987#	   988	   989
	  1001	  1001#	  1002	  1003	  1015	  1015#	  1016	  1017	  1029	  1029#	  1030	  1031	  1051#	  1070     SEQ 0224
	  1070#	  1071	  1071#	  1072	  1084	  1084#	  1085	  1086	  1098	  1098#	  1099	  1100	  1112	  1112#
	  1113	  1114	  1126	  1126#	  1127	  1128	  1140	  1140#	  1141	  1142	  1154	  1154#	  1155	  1156
	  1168	  1168#	  1169	  1170	  1182	  1182#	  1183	  1184	  1196	  1196#	  1197	  1198	  1210	  1210#
	  1211	  1212	  1224	  1224#	  1225	  1226	  1238	  1238#	  1239	  1240	  1282#	  1303	  1303#	  1304
	  1304#	  1305	  1319	  1319#	  1320	  1321	  1335	  1335#	  1336	  1337	  1351	  1351#	  1352	  1353
	  1367	  1367#	  1368	  1369	  1383	  1383#	  1384	  1385	  1399	  1399#	  1400	  1401	  1415	  1415#
	  1416	  1417	  1431	  1431#	  1432	  1433	  1447	  1447#	  1448	  1449	  1463	  1463#	  1464	  1465
	  1479	  1479#	  1480	  1481	  1495	  1495#	  1496	  1497	  1521#	  1539	  1539#	  1540	  1540#	  1541
	  1555	  1555#	  1556	  1557	  1571	  1571#	  1572	  1573	  1587	  1587#	  1588	  1589	  1603	  1603#
	  1604	  1605	  1619	  1619#	  1620	  1621	  1635	  1635#	  1636	  1637	  1651	  1651#	  1652	  1653
	  1667	  1667#	  1668	  1669	  1683	  1683#	  1684	  1685	  1699	  1699#	  1700	  1701	  1715	  1715#
	  1716	  1717	  1731	  1731#	  1732	  1733
$$MUUO	   700#
$$OUTE	   706#
$$TAX1	   718#
$$TAX2	   719#
$$TOGG	   712#
$$UUO	   689#
$ACC0	   527#
$BEND1	   497#
$BEND2	   498#
$CHRIN	   588#
$CRLF	   590#
$DEVCH	   414#
$DSKUP	   467#
$DVCH1	   414#
$DVOFF	   584#
$EMODE	   465#
$FFF	   592#
$IBUF	   640#
$INEXT	   642#
$INNM	   641#
$ITRHL	   508#
$ITRX1	   509#
$LPAPE	  5451
$MMAP	   468#
$MODVL	   463#
$MODVU	   464#
$OBUF	   631#
$ONETM	   491#
$OUTEX	   633#
$OUTNM	   632#
$PAPER	   414
$PARER	   515#
$PNAME	   461#
$PSHER	   519#
$PVER	   462#
$RSRTX	   511#
$RSRTY	   512#
$SPAG1	   531#
$START	   428#
$SVAPR	   529#
$SVPAG	   530#                                                                                                            SEQ 0225
$SVPI	   528#
$SVUPC	   534#
$SVUUO	   533#
$TABF	   591#
$TTCHR	   587#
$TWCNT	   583#
$TYPNB	   589#
$UMODE	   466#
$UORTX	   506#
$USRHL	   510#
$UUOER	   507#	   548
$VTF	   593#
%ACTFL	   540#
%ACTUL	   541#
%COREC	   539#
%CORFL	   538#
%DISCR	   542#
%ERHI1	   681#
%ERHI2	   682#
%ERHI3	   683#
.JB41	   414#
.JBAPR	   414#
.JBCNI	   414#
.JBDDT	   414#
.JBFF	   414#
.JBOPC	   414#
.JBREL	   414#
.JBREN	   414#
.JBSA	   414#
.JBSYM	   414#
.JBTPC	   414#
.JBUSY	   414#
.JBUUO	   414#
.JBVER	   414#

APRID	    50#	  3875
CFLUSH	   332#                                                                                                            SEQ 0226
CINVAL	   331#
CLOKOP	   326#
CWRTBI	   333#
DROPDV	   293#
ENDUUO	   339#	   496
EOPUUO	   340#	   498
ERLOOP	   384#	   812	   827	   841	   871	   885	   899	   913	   927	   941	   955	   969	   983	   997
	  1011	  1025	  1039	  1050	  1080	  1094	  1108	  1122	  1136	  1150	  1164	  1178	  1192	  1206
	  1220	  1234	  1248	  1267	  1281	  1315	  1331	  1347	  1363	  1379	  1395	  1411	  1427	  1443
	  1459	  1475	  1491	  1507	  1519	  1551	  1567	  1583	  1599	  1615	  1631	  1647	  1663	  1679
	  1695	  1711	  1727	  1743	  1784	  1807	  1830	  1853	  1865	  1877	  1889	  1909	  1922	  1936
	  1951	  1987	  1995	  2000	  2006	  2013	  2027	  2036	  2041	  2047	  2054	  2094	  2107	  2119
	  2132	  2157	  2177	  2238	  2283	  2289	  2294	  2302	  2347	  2362	  2423	  2442	  2495	  2500
	  2518	  2523	  2583	  2588	  2603	  2627	  2634	  2648	  2708	  2713	  2719	  2726	  2765	  2772
	  2777	  2783	  2789	  2804	  2810	  2817	  2861	  2875	  2890	  2906	  2980	  2987	  2993	  3009
	  3017	  3023	  3039	  3045	  3051	  3111	  3116	  3133	  3163	  3175	  3219	  3254	  3274	  3294
	  3587	  3592	  3606	  3709	  3765	  3838	  3894	  3944	  4006	  4056	  4130	  4182	  4242	  4249
	  4273	  4279	  4318	  4327	  4336	  4349	  4356	  4386	  4393	  4400	  4437	  4470	  4481	  4488
	  4502	  4637	  4646	  4705	  4761	  4780	  4853	  4865	  4881	  4894	  4910	  4922	  4987	  5004
	  5053	  5090	  5110	  5131	  5425	  5440
ERLP1	   385#
ERLP2	   386#
ERRHLT	   227#
ERROR	   393#	   809	   825	   839	   868	   882	   896	   910	   924	   938	   952	   966	   980	   994
	  1008	  1022	  1036	  1048	  1077	  1091	  1105	  1119	  1133	  1147	  1161	  1175	  1189	  1203
	  1217	  1231	  1245	  1265	  1279	  1312	  1328	  1344	  1360	  1376	  1392	  1408	  1424	  1440
	  1456	  1472	  1488	  1504	  1517	  1548	  1564	  1580	  1596	  1612	  1628	  1644	  1660	  1676
	  1692	  1708	  1724	  1740	  1782	  1805	  1828	  1850	  1863	  1875	  1887	  1907	  1920	  1934
	  1949	  1984	  1993	  1998	  2004	  2011	  2025	  2034	  2039	  2045	  2052	  2091	  2105	  2117
	  2130	  2155	  2175	  2235	  2280	  2287	  2292	  2300	  2344	  2421	  2440	  2492	  2498	  2516
	  2521	  2581	  2586	  2601	  2625	  2632	  2646	  2705	  2711	  2717	  2724	  2762	  2770	  2775
	  2781	  2787	  2802	  2808	  2815	  2858	  2873	  2888	  2904	  2977	  2985	  2991	  3007	  3015
	  3021	  3037	  3043	  3049	  3108	  3114	  3131	  3161	  3173	  3252	  3272	  3292	  3584	  3590
	  3604	  4240	  4247	  4271	  4277	  4315	  4325	  4334	  4347	  4354	  4383	  4391	  4398	  4434
	  4468	  4479	  4486	  4499	  5088	  5108	  5129
ERROR1	   404#	  1770	  1794	  1817	  2360	  2798	  3201	  3208	  3217	  3243	  3263	  3283	  3351	  3654
	  3662	  3668	  3674	  3680	  3685	  3690	  3696	  3701	  3706	  3736	  3741	  3746	  3751	  3756
	  3762	  3807	  3816	  3820	  3825	  3830	  3835	  3851	  3858	  3863	  3869	  3885	  3891	  3912
	  3919	  3924	  3929	  3935	  3941	  3977	  3987	  3991	  3997	  4003	  4027	  4036	  4041	  4047
	  4053	  4089	  4099	  4104	  4110	  4115	  4121	  4127	  4152	  4161	  4167	  4173	  4179	  4223
	  4229	  4259	  4634	  4644	  4702	  4738	  4745	  4751	  4758	  4777	  4850	  4858	  4863	  4879
	  4887	  4892	  4908	  4915	  4920	  4980	  4985	  5002	  5035	  5042	  5051	  5079	  5099	  5120
	  5188	  5418	  5423	  5438
ERUUO	   383#	   811	   826	   840	   870	   884	   898	   912	   926	   940	   954	   968	   982	   996
	  1010	  1024	  1038	  1049	  1079	  1093	  1107	  1121	  1135	  1149	  1163	  1177	  1191	  1205
	  1219	  1233	  1247	  1266	  1280	  1314	  1330	  1346	  1362	  1378	  1394	  1410	  1426	  1442
	  1458	  1474	  1490	  1506	  1518	  1550	  1566	  1582	  1598	  1614	  1630	  1646	  1662	  1678
	  1694	  1710	  1726	  1742	  1772	  1783	  1795	  1806	  1818	  1829	  1852	  1864	  1876	  1888
	  1908	  1921	  1935	  1950	  1986	  1994	  1999	  2005	  2012	  2026	  2035	  2040	  2046	  2053
	  2093	  2106	  2118	  2131	  2156	  2176	  2237	  2282	  2288	  2293	  2301	  2346	  2361	  2422
	  2441	  2494	  2499	  2517	  2522	  2582	  2587	  2602	  2626	  2633	  2647	  2707	  2712	  2718
	  2725	  2764	  2771	  2776	  2782	  2788	  2799	  2803	  2809	  2816	  2860	  2874	  2889	  2905
	  2979	  2986	  2992	  3008	  3016	  3022	  3038	  3044	  3050	  3110	  3115	  3132	  3162	  3174     SEQ 0227
	  3202	  3209	  3218	  3244	  3253	  3264	  3273	  3284	  3293	  3353	  3586	  3591	  3605	  3656
	  3663	  3669	  3675	  3681	  3686	  3691	  3697	  3702	  3707	  3737	  3742	  3747	  3752	  3757
	  3763	  3809	  3817	  3821	  3826	  3831	  3836	  3852	  3859	  3864	  3870	  3886	  3892	  3913
	  3920	  3925	  3930	  3936	  3942	  3979	  3988	  3992	  3998	  4004	  4028	  4037	  4042	  4048
	  4054	  4091	  4100	  4105	  4111	  4116	  4122	  4128	  4153	  4162	  4168	  4174	  4180	  4225
	  4230	  4241	  4248	  4260	  4272	  4278	  4317	  4326	  4335	  4348	  4355	  4385	  4392	  4399
	  4436	  4469	  4480	  4487	  4501	  4636	  4645	  4704	  4740	  4746	  4752	  4759	  4778	  4852
	  4859	  4864	  4880	  4888	  4893	  4909	  4916	  4921	  4982	  4986	  5003	  5036	  5043	  5052
	  5080	  5089	  5100	  5109	  5121	  5130	  5190	  5420	  5424	  5439
FATAL	   226#
FRD36	   368#
FRD8	   369#
FREAD	   367#
FSELEC	   366#
GET	   210#
GO	   207#
HALT	   114	   115	   116	   117	   118	   212#	   517	  3391	  3411	  3431	  3451	  3471	  3491	  3511
	  5228	  5248	  5268	  5288	  5308	  5328	  5348
JEN	   214#
JRSTF	   213#	  1766	  1790	  1813	  2974	  3003	  3144	  3240	  3260	  3280	  3648	  3722	  3778	  3802
	  3846	  3908	  3973	  4023	  4085	  4148	  4219	  4257	  4308	  4379	  4847	  4875	  5076	  5096
	  5117
MAP	    49#	  1848	  1861	  1873	  1885	  1905	  1918	  1932	  1947	  2089	  2103	  2115	  2128	  2153
	  2173	  2233
MAPADR	   349#
MAPCNK	   350#
MAPMEM	   346#
MAPPNT	   352#
MAPSET	   351#
MEMSEG	   348#
MEMZRO	   347#
MODPCP	   359#
MODPCU	   358#
MTROP	   327#
MXITRC	  5208#	  5230	  5250	  5270	  5290	  5310	  5330	  5350
MXITRX	  5195#	  5218	  5238	  5258	  5278	  5298	  5318	  5338
NAME	     7#	    10
PBELL	   302#
PCRL	   296#	  2250	  2452	  2658	  2664	  2670
PCRL2	   300#
PCRL2F	   301#
PCRLF	   297#
PFORCE	   304#
PGMINT	   220#	   761
PJRST	   211#
PMSG	   306#
PMSGF	   309#
PNT1	   262#
PNT11	   276#
PNT11F	   277#
PNT1F	   263#
PNT2	   264#
PNT2F	   265#                                                                                                            SEQ 0228
PNT3	   266#
PNT3F	   267#
PNT4	   268#
PNT4F	   269#
PNT5	   270#
PNT5F	   271#
PNT6	   272#	  2249	  2451	  2657	  2663	  2669
PNT6F	   273#
PNT7	   274#
PNT7F	   275#
PNTA	   248#
PNTADF	   279#
PNTADR	   278#
PNTAF	   249#
PNTAL	   250#
PNTALF	   251#	  4588	  4595
PNTCHF	   261#
PNTCHR	   260#
PNTCI	   258#
PNTCIF	   259#
PNTCW	   294#
PNTCWF	   295#
PNTDCF	   287#
PNTDEC	   286#
PNTDS	   288#
PNTDSF	   289#
PNTHW	   282#
PNTHWF	   283#
PNTMGN	   373#
PNTMSF	   255#
PNTMSG	   254#
PNTNM	   290#
PNTOCF	   285#
PNTOCS	   284#
PNTOCT	   280#
PNTOTF	   281#
PNTSIX	   291#
PNTSXF	   292#
PSIXL	   252#
PSIXLF	   253#
PSIXM	   256#	  2247	  2449	  2655	  2661	  2667
PSIXMF	   257#
PSP	   298#
PSPF	   299#
PUT	   209#
REPTLP	   135#	  1249	  1744	  1832	  1953	  2063	  2179	  2244	  2306	  2364	  2446	  2525	  2652	  2728
	  2819	  2909	  3056	  3177	  3221	  3299	  3521	  3610	  3767	  3946	  4058	  4184	  4281	  4358
	  4402	  4489	  4648	  4711	  4783	  4928	  5008	  5055	  5136	  5358	  5443
REPTUO	   387#
RLITRC	  3371#	  3393	  3413	  3433	  3453	  3473	  3493	  3513
RLITRX	  3358#	  3381	  3401	  3421	  3441	  3461	  3481	  3501
RTN	   208#	   504	  2251	  2453	  2659	  2665	  2671
S	   138#                                                                                                            SEQ 0229
SIXBTZ	   315#	   795	  1751	  1836	  1958	  2069	  2190	  2247	  2257	  2315	  2449	  2460	  2655	  2661
	  2667	  2675	  2738	  2830	  2920	  3063	  3308	  3537	  3624	  3784	  3955	  4064	  4197	  4286
	  4362	  4409	  4615	  4656	  4720	  4794	  4935	  5145	  5373
SUBTST	   131#	   801	   817	   831	   844	  1053	  1255	  1284	  1754	  1843	  1964	  2072	  2193	  2260
	  2318	  2377	  2463	  2536	  2682	  2741	  2833	  2923	  3066	  3184	  3228	  3311	  3540	  3627
	  3787	  3958	  4067	  4200	  4289	  4365	  4416	  4573	  4618	  4659	  4723	  4797	  4938	  5015
	  5062	  5148	  5376
SWITCH	   321#	   782	  4576
TTALTM	   242#
TTICHR	   235#	  4596
TTICLR	   245#
TTICNV	   240#
TTIDEC	   239#
TTINO	   237#
TTIOCT	   238#
TTIYES	   236#	  4589
TTLOOK	   241#
TTSIXB	   243#
TTYINP	   244#