Google
 

Trailing-Edge - PDP-10 Archives - klad_sources - klad.sources/dbkag.seq
There are no other files named dbkag.seq in the archive.
MAINDEC-10-DBKAG.TXT
                                                                                                                           SEQ 0001





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


	PRODUCT CODE:	MAINDEC-10-DBKAG

	PRODUCT NAME:	DECSYSTEM10 PDP-10 KI10 BASIC
			INSTRUCTION DIAGNOSTIC (7)

	FUNCTION:	PUSH, POP, XCT, BASIC SHIFT/ROTATE

	VERSION:	0.2

	DATE RELEASED:	AUGUST,1976

	MAINTAINED BY:	DIAGNOSTIC ENGINEERING GROUP

	AUTHOR:		JOHN R. KIRCHOFF

COPYRIGHT(C) 1976
DIGITAL EQUIPMENT CORPORATION
MARLBORO, MASS. 01752

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 EXECPT 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 DEC.

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.

DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
							MAINDEC-10-DBKAG.TXT
							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	ERRORS

5.0	ITERATION COUNTER

6.0	CYCLE TIME

7.0	OPERATIONAL VARIATIONS

8.0	MISCELLANEOUS

9.0	LISTING
							MAINDEC-10-DBKAG.TXT
							PAGE 3                                                             SEQ 0003


1.0	ABSTRACT

	THIS PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC IS THE
	SEVENTH IN A SERIES OF PDP-10 KI10 PROCESSOR DIAGNOSTICS.
	THE DIAGNOSTIC TESTS THE PUSH, POP, XCT AND BASIC
	SHIFT ROTATE INSTRUCTIONS.

2.0	REQUIREMENTS

2.1	EQUIPMENT

	A PDP-10 KI10 WITH A MINIMUM OF 32K OF MEMORY

	PAPER TAPE READER (KI10)
	DECTAPE (OPTIONAL)
	CONSOLE TELETYPE

2.2	STORAGE

	THE PROGRAM RUNS WITHIN 32K OF MEMORY.

2.3	PRELIMINARY PROGRAMS

	CONSOLE FUNCTIONS WORKING PROPERLY
	PAPER TAPE READ-IN WORKING PROPERLY (KI10)
	PREVIOUS PROCESSOR DIAGNOSTICS
							MAINDEC-10-DBKAG.TXT
							PAGE 4                                                             SEQ 0004


3.0	PROGRAM PROCEDURES

3.1	LOADING PROCEDURE

	PAPER TAPE - HARDWARE READ-IN (READER DEVICE CODE 104)
	DECTAPE - LOAD WITH DIAMON (DECTAPE DEVICE CODE 320)

3.2	STARTING PROCEDURE

	STAND-ALONE STARTING ADDRESS IS 30000.

	IF THE DIAGNOSTIC FAILS TO START CORRECTLY TRY STARTING AT THE
	FIRST TEST INSTEAD OF AT THE BEGINNING OF THE CONTROL SEQUENCE.
	(SEE LISTING).

3.3	OPERATING PROCEDURE

	ONCE STARTED THE PROGRAM WILL CYCLE CONTINUALLY UNTIL STOPPED
	OR AN ERROR OCCURS.

4.0	ERRORS

	ERRORS ARE IN THE FORM OF HALT INSTRUCTIONS.  THE LISTING
	SHOULD BE CONSULTED TO DETERMINE THE CAUSE OF THE ERROR.  A
	NO OPERATION (JUMP) INSTRUCTION FOLLOWS EACH HALT.  THIS
	MAY BE USEFUL IN CONSTRUCTING A SCOPE LOOP TO CYCLE ON THE
	FAILING INSTRUCTION.

5.0	ITERATION COUNTER

	THE ITERATION COUNT OF THE PROGRAM IS DISPLAYED IN THE MEM-
	ORY INDICATORS (MI).  THIS COUNT IS A DECREMENTING COUNT AND
	INITIALLY STARTS AT -1 IN STAND-ALONE OPERATION.

6.0	CYCLE TIME

	THE CYCLE TIME OF THE PROGRAM IS IN THE MILLISECOND RANGE AND
	IS THEREFORE SUITABLE FOR TAKING MARGINS, VIBRATION TESTS, ETC.

							MAINDEC-10-DBKAG.TXT
							PAGE 5                                                             SEQ 0005


7.0	OPERATIONAL VARIATIONS

	A.  DIAGNOSTIC MONITOR

	    THE PROGRAM IS USABLE WITH THE DIAGNOSTIC MONITOR TO PRO-
	    VIDE RELIABILITY TESTS, ACCEPTANCE TESTS, AND/OR TO PRO-
	    VIDE A QUICK METHOD OF ISOLATION OF A FAULT TO A PARTICULAR
	    AREA OF THE PROCESSOR.  CERTAIN PROCEDURES ARE USED WHEN
	    THE PROGRAM IS USED IN THIS MANNER.  THEY ARE:

	    1.  THE DIAGNOSTIC MONITOR TRANSFERS CONTROL TO THE PRO-
		GRAM AND STARTS IT AT LOCATION 30002.

	    2.  MONCTL - LOCATION 30043 IS USED AS THE DIAGNOSTIC MON-
		ITOR CONTROL FLAG WORD.

	B.  USER MODE

	    THE PROGRAM WILL OPERATE IN USER MODE AND AS SUCH PROVIDES
	    ASSURANCE THAT THE PROCESSOR IS PERFORMING ALL FUNCTIONS
	    CORRECTLY.  USER MODE STARTING ADDRESS IS 30000.

	C.  SYSTEM EXERCISER

	    STARTING ADDRESS IS 30003.  NO DATA SWITCHES ARE USED BY
	    THIS PROGRAM.

8.0	MISCELLANEOUS

	NONE

9.0	LISTING
	THIS IS A HISTORY OF THE DEVELOPMENT OF MAINDEC-10-DBKAG
                                                                                                                           SEQ 0006
************************************************************************

PRODUCT CODE:		MAINDEC-10-DBKAG

PRODUCT NAME:		BASIC INSTRUCTION DIAGNOSTIC #7

DATE RELEASED:		AUGUST,1976

VERSION:		0.2

UPDATE AUTHOR:		EDWARD G. PRENTICE

CHANGES MADE:

	1. UPGRADE TO ALLOW COMPATABILITY WITH THE SUBROUTINE PACKAGE.

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

ORIGINAL VERSION:	0.1

ORIGINAL AUTHOR:	RICHARD MALISKA

ORIGINAL RELEASE:	16-MAR-72

************************************************************************
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 1
DBKAGT	MAC	30-JUL-76 12:36		DIAGNOSTIC PARAMETERS                                                              SEQ 0007

     1					;DBKAG
     2
     3
     4
     5
     6
     7
     8
     9
    10
    11
    12						XLIST
    13						LIST
    14						NAME	\MCNVER,\DECVER^
    15
    16					;COPYRIGHT 1972
    17					;DIGITAL EQUIPMENT CORPORATION
    18					;MAYNARD, MASS. 01754
    19
    20					;DICK MALISKA
    21
    22
    23					;ASSEBLE AS: DBKAGT,BEGIN,DBKAGM
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 2
DBKAGT	MAC	30-JUL-76 12:36		DIAGNOSTIC PARAMETERS                                                              SEQ 0008

    24					SUBTTL	DIAGNOSTIC PARAMETERS
    25
    26					;PARAMETER DEFINITIONS
    27			000001		EXCASB==1
    28			000001		USRASB==1
    29			000001		PGMEND==1
    30			000100		DEBUG==100
    31
    32					;FLAG DEFINITIONS
    33			010000		USERF=10000		;USER MODE FLAG
    34
    35
    36					;MACROS
    37
    38					;SPECIAL FEATURE PARAMETERS
    39
    40			030712		SADR1=START
    41			030712		SADR2=START
    42			030712		SADR3=START
    43			030712		SADR4=START
    44		254000	030712		SADR5=JRST START
    45		254000	030712		SADR6=JRST START
    46		254000	030712		SADR7=JRST START
    47		254000	030712		SADR8=JRST START
    48		254000	030712		SADR9=JRST START
    49		254000	030712		SADR10=JRST START
    50		254000	030712		SADR11=JRST START
    51
    52			000000		PAREA0=0
    53			000000		PAREA1=0
    54			000000		PAREA2=0
    55		444253	414700		PAREA3=SIXBIT/DBKAG/
    56		605664	000000		PAREA4=SIXBIT/PNT/
    57			000000		PAREA5=0
    58			000000		PAREA6=0
    59			001000		ITERAT==1000
    60			000001		PGMEND==1
    61						NOSYM
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 3
DBKAGT	MAC	30-JUL-76 12:36		DIAGNOSTIC PARAMETERS                                                              SEQ 0009

    62					SUBTTL	DIAGNOSTIC PARAMETERS
    63
    64					;ACCUMULATOR ASSIGNMENTS
    65
    66					;CONTROL WORDS
    67
    68			400000		AROV=400000		;ARITHMETIC OVERFLOW
    69			200000		CRY0=200000		;CARRY 0
    70			100000		CRY1=100000		;CARRY 1
    71			040000		FOV=40000		;FLOATING OVERFLOW
    72			020000		BIS=20000		;BYTE INTERRUPT
    73			010000		USERF=10000		;USER MODE FLAG
    74			004000		EXIOT=4000		;USER PRIV I/O FLAG
    75			000100		FXU=100			;FLOATING UNDERFLOW
    76			000040		DCK=40			;DIVIDE CHECK
    77
    78
    79					;MACROS
    80
    81					; STOP - USED FOR SCOPE LOOP, IF INSTRUCTION FAILS, CHANGE (JUMPA .+1)
    82					;	 TO A (JUMPA X) TO CYCLE ON FAILING INSTRUCTION
    83
    84					DEFINE	STOP	(A)<
    85						HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
    86						JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
    87									;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
    88									;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
    89									;AND CHANGE HALT INSTRUCTION TO JUMPA .+1>
    90
    91					; SFLAG - USED TO CLEAR ALL FLAGS THEN TO SET REQUESTED FLAG
    92
    93					DEFINE	SFLAG	(A)<
    94						MOVSI	1,A
    95						JFCL	17,.+1		;RESET ALL FLAGS
    96						JRST	2,.+1(1)	;SET A FLAG>
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 1
PARAM	KLM	26-FEB-76		*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976                               SEQ 0010

    97					SUBTTL	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976
    98
    99					DEFINE	S,<;*********************************************************************>
   100
   101					S^;*********************************************************************^
   102					;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
   103					;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
   104					;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
   105					S^;*********************************************************************^
   106
   107			400000		ABORT==	400000			;ABORT PROGRAM ON PASS COMPLETION
   108			200000		RSTART==200000			;RESTART TEST, PRINT TOTALS
   109			100000		TOTALS==100000			;PRINT TOTALS, CONTINUE
   110
   111			040000		NOPNT==	040000			;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
   112			020000		PNTLPT==020000			;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
   113			010000		DING==	010000			;RING BELL ON ERROR
   114
   115			004000		LOOPER==004000			;ENTER EXERCISE/CHECK LOOP ON ERROR
   116			002000		ERSTOP==002000			;HALT ON TEST ERROR
   117			001000		PALERS==001000			;PRINT ALL ERRORS
   118
   119			000400		RELIAB==000400			;RELIABILITY MODE
   120			000200		TXTINH==000200			;INHIBIT ERROR TEXT
   121			000100		INHPAG==000100			;INHIBIT PAGING
   122
   123			000040		MODDVC==000040			;MODIFY DEVICE CODE
   124			000020		INHCSH==000020			;INHIBIT CACHE
   125			000010		OPRSEL==000010			;OPERATOR SELECTION
   126
   127			000004		CHAIN==	000004			;CHAIN CONTROL SWITCH
   128
   129			000002		KAHZ50==000002			;KA10 50 HERTZ POWER
   130
   131									;SWITCH 17 RESERVED !!!
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 2
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0011

   132					SUBTTL	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976
   133
   134					S^;*********************************************************************^
   135					;*SPECIAL SUBPROGRAM LINKAGES
   136					S^;*********************************************************************^
   137
   138			027772		FSELNK=	27772	;FILE SELECT LINK
   139			027773		FRDLNK=	27773	;FILE READ LINK
   140			027774		LDLNK=	27774	;LOAD LINKAGE ADDRESS
   141			027775		DDTLNK=	27775	;DDT LINKAGE ADDRESS
   142			027776		MODLNK=	27776	;OPERATIONAL MODE CHECK LINKAGE ADDRESS
   143			027777		SUBLNK=	27777	;SUBROUTINE LINKAGE ADDRESS
   144
   145					S^;*********************************************************************^
   146					;*SPECIAL SUBROUTINE FATAL HALTS
   147					;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
   148					S^;*********************************************************************^
   149
   150					;ADDRESS   TAG	REASON
   151					;---------------------
   152
   153					; 1010 	NOEXEC	;PROGRAM NOT CODED FOR EXEC MODE OPERATION
   154					; 1011  PLERR	;FATAL PUSH LIST POINTER ERROR
   155					; 1012  PLERR1	;INITIAL PUSH LIST POINTER ERROR
   156					; 1013  MUOERR	;MUUO WITH LUUO HANDLER WIPED OUT
   157					; 1014  DTEBER	;DTE20 INTERRUPT WITHOUT DOORBELL
   158					; 1015  DTECER	;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
   159					; 1016  CPIERR	;CPU INITIALIZATION ERROR
   160					; 1017  EOPERR	;END OF PROGRAM ERROR
   161					; 1020  LUOERR	;INTERRUPT WITH LUUO HANDLER WIPED OUT
   162
   163					S^;*********************************************************************^
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 3
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0012

   164					S^;*********************************************************************^
   165					;OPERATOR DEFINITIONS (NON-UUO'S)
   166					S^;*********************************************************************^
   167
   168		260740	000000		OPDEF	GO	[PUSHJ	P,]	;SUBROUTINE CALL
   169		263740	000000		OPDEF	RTN	[POPJ	P,]	;SUBROUTINE RETURN 
   170		261740	000000		OPDEF	PUT	[PUSH	P,]	;PUT DATA ON PUSH LIST
   171		262740	000000		OPDEF	GET	[POP	P,]	;GET DATA FROM PUSH LIST 
   172		254000	000000		OPDEF	PJRST	[JRST	]	;JRST TO ROUTINE THAT RTN'S
   173		254200	000000		OPDEF	HALT	[JRST	4,]	;DEFINITION FOR DDT
   174		254100	000000		OPDEF	JRSTF	[JRST	2,]	;DEFINITION FOR DDT
   175		254500	000000		OPDEF	JEN	[JRST	12,]	;DEFINITION FOR DDT
   176
   177					S^;*********************************************************************^
   178					;*SUBROUTINE INITIALIZATION CALL
   179					S^;*********************************************************************^
   180
   181		265000	030011		OPDEF	PGMINT	[JSP	0,SBINIT]	;SUBROUTINE INITIALIZATION
   182
   183					S^;*********************************************************************^
   184					;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
   185					S^;*********************************************************************^
   186
   187		037640	000004		OPDEF	FATAL	[37B8!15B12!4]	;FATAL PROGRAMMING HALT
   188		037600	000004		OPDEF	ERRHLT	[37B8!14B12!4]	;PROGRAM ERROR HALT
   189
   190					S^;*********************************************************************^
   191					;*TERMINAL INPUT UUO'S
   192					;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
   193					;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
   194					S^;*********************************************************************^
   195
   196		037000	000003		OPDEF	TTICHR 	[37B8!0B12!3]	;TTY, INPUT ANY CHARACTER
   197		037040	000003		OPDEF	TTIYES	[37B8!1B12!3]	;TTY, NORMAL RETURN Y
   198		037100	000003		OPDEF	TTINO	[37B8!2B12!3]	;TTY, NORMAL RETURN N
   199		037140	000003		OPDEF	TTIOCT	[37B8!3B12!3]	;TTY, INPUT OCTAL WORD
   200		037200	000003		OPDEF	TTIDEC	[37B8!4B12!3]	;TTY, INPUT DECIMAL WORD
   201		037240	000003		OPDEF	TTICNV	[37B8!5B12!3]	;TTY, INPUT CONVERTABLE WORD
   202		037300	000003		OPDEF	TTLOOK	[37B8!6B12!3]	;TTY, KEYBOARD CHECK
   203		037340	000003		OPDEF	TTALTM	[37B8!7B12!3]	;TTY, ALT-MODE CHECK
   204		037400	000003		OPDEF	TTSIXB	[37B8!10B12!3]	;TTY, INPUT SIXBIT WORD
   205		037440	000003		OPDEF	TTYINP	[37B8!11B12!3]	;TTY, IMAGE MODE INPUT
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 4
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0013

   206					;*TERMINAL OUTPUT UUO'S.
   207
   208		037000	000000		OPDEF	PNTA	[37B8!0B12!0]	;PRINT ASCII WORD
   209		037000	000001		OPDEF	PNTAF	[37B8!0B12!1]	;PRINT ASCII WORD FORCED
   210		037740	000000		OPDEF	PNTAL	[37B8!17B12!0]	;PRINT ASCIZ LINE
   211		037740	000001		OPDEF	PNTALF	[37B8!17B12!1]	;PRINT ASCIZ LINE FORCED
   212		037600	000003		OPDEF	PSIXL	[37B8!14B12!3]	;PRINT SIXBIT'Z LINE
   213		037640	000003		OPDEF	PSIXLF	[37B8!15B12!3]	;PRINT SIXBIT'Z LINE FORCED
   214		037000	000000		OPDEF	PNTMSG	[37B8!0B12!0]	;PRINT MESSAGE IMMEDIATE
   215		037040	000000		OPDEF	PNTMSF	[37B8!1B12!0]	;PRINT MESSAGE IMMEDIATE FORCED
   216		037100	000000		OPDEF	PSIXM	[37B8!2B12!0]	;PRINT SIXBIT'Z MSG IMMEDIATE
   217		037200	000000		OPDEF	PSIXMF	[37B8!4B12!0]	;PRINT SIXBIT'Z MSG IMM FORCED
   218		037000	000000		OPDEF	PNTCI	[37B8!0B12!0]	;PRINT CHARACTER IMMEDIATE
   219		037040	000000		OPDEF	PNTCIF	[37B8!1B12!0]	;PRINT CHARACTER IMMEDIATE FORCED
   220		037500	000000		OPDEF	PNTCHR	[37B8!12B12!0]	;PRINT CHARACTER
   221		037500	000001		OPDEF	PNTCHF	[37B8!12B12!1]	;PRINT CHARACTER FORCED
   222		037040	000000		OPDEF	PNT1	[37B8!1B12!0]	;PRINT ONE OCTAL DIGIT
   223		037040	000001		OPDEF	PNT1F	[37B8!1B12!1]	;PRINT 1 OCTAL DIGIT FORCED	
   224		037100	000000		OPDEF	PNT2	[37B8!2B12!0]	;PRINT TWO OCTAL DIGITS
   225		037100	000001		OPDEF	PNT2F	[37B8!2B12!1]	;PRINT 2 OCTAL DIGITS FORCED	
   226		037140	000000		OPDEF	PNT3	[37B8!3B12!0]	;PRINT THREE OCTAL DIGITS
   227		037140	000001		OPDEF	PNT3F	[37B8!3B12!1]	;PRINT THREE OCTAL DIGITS FORCED	
   228		037200	000000		OPDEF	PNT4	[37B8!4B12!0]	;PRINT FOUR OCTAL DIGITS
   229		037200	000001		OPDEF	PNT4F	[37B8!4B12!1]	;PRINT FOUR OCTAL DIGITS FORCED
   230		037240	000000		OPDEF	PNT5	[37B8!5B12!0]	;PRINT FIVE OCTAL DIGITS
   231		037240	000001		OPDEF	PNT5F	[37B8!5B12!1]	;PRINT FIVE OCTAL DIGITS FORCED
   232		037300	000000		OPDEF	PNT6	[37B8!6B12!0]	;PRINT SIX OCTAL DIGITS
   233		037300	000001		OPDEF	PNT6F	[37B8!6B12!1]	;PRINT SIX OCTAL DIGITS FORCED
   234		037340	000000		OPDEF	PNT7	[37B8!7B12!0]	;PRINT 7 OCTAL DIGITS
   235		037340	000001		OPDEF	PNT7F	[37B8!7B12!1]	;PRINT 7 OCTAL DIGITS FORCED
   236		037440	000000		OPDEF	PNT11	[37B8!11B12!0]	;PRINT 11 OCTAL DIGITS
   237		037440	000001		OPDEF	PNT11F	[37B8!11B12!1]	;PRINT 11 OCTAL DIGITS FORCED.
   238		037400	000000		OPDEF	PNTADR	[37B8!10B12!0]	;PRINT PHYSICAL ADDRESS
   239		037400	000001		OPDEF	PNTADF	[37B8!10B12!1]	;PRINT PHYSICAL ADDRESS FORCED
   240		037600	000000		OPDEF	PNTOCT  [37B8!14B12!0]	;PRINT FULL WORD OCTAL
   241		037600	000001		OPDEF	PNTOTF	[37B8!14B12!1]	;PRINT FULL WORD OCTAL FORCED
   242		037540	000000		OPDEF	PNTHW	[37B8!13B12!0]	;PRINT OCTAL HALF WORDS, 6 SP 6
   243		037540	000001		OPDEF	PNTHWF	[37B8!13B12!1]	;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
   244		037700	000003		OPDEF	PNTOCS	[37B8!16B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S
   245		037740	000003		OPDEF	PNTOCF	[37B8!17B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
   246		037640	000000		OPDEF	PNTDEC	[37B8!15B12!0]	;PRINT DECIMAL, SUPRESS LEADING 0'S
   247		037640	000001		OPDEF	PNTDCF	[37B8!15B12!1]	;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
   248		037700	000000		OPDEF	PNTDS	[37B8!16B12!0]	;PRINT DECIMAL, SPACES FOR LD 0'S
   249		037700	000001		OPDEF	PNTDSF	[37B8!16B12!1]	;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 5
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0014

   250		037200	000002		OPDEF	PNTNM	[37B8!4B12!2]	;PRINT PROGRAM NAME
   251		037000	000002		OPDEF	PNTSIX	[37B8!0B12!2]	;PRINT SIXBIT WORD
   252		037040	000002		OPDEF	PNTSXF	[37B8!1B12!2]	;PRINT SIXBIT WORD FORCED
   253		037240	000002		OPDEF	DROPDV	[37B8!5B12!2]	;CLOSE LOGICAL FILE, USER MODE
   254		037100	000002		OPDEF	PNTCW	[37B8!2B12!2]	;PRINT DF10 CONTROL WORD
   255		037140	000002		OPDEF	PNTCWF	[37B8!3B12!2]	;PRINT DF10 CONTROL WORD FORCED
   256		037000	030242		OPDEF	PCRL	[37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
   257		037040	030242		OPDEF	PCRLF	[37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
   258		037000	000040		OPDEF	PSP	[37B8!0B12!40]	;PRINT SPACE
   259		037040	000040		OPDEF	PSPF	[37B8!1B12!40]	;PRINT SPACE FORCED
   260		037000	030243		OPDEF	PCRL2	[37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
   261		037040	030243		OPDEF	PCRL2F	[37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
   262		037040	000007		OPDEF	PBELL	[37B8!1B12!7]	;PRINT TTY BELL
   263
   264		037040	000026		OPDEF	PFORCE	[37B8!1B12!26]	;PRINT FORCE, CONTROL O OVERRIDE
   265
   266					DEFINE	PMSG	(ARG),<
   267						PSIXM	[SIXBIT\ARG'_\]>
   268
   269					DEFINE	PMSGF	(ARG),<
   270						PSIXMF	[SIXBIT\ARG'_\]>
   271
   272					;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
   273					;*	CONSERVES CORE OVER ASCIZ
   274
   275					DEFINE	SIXBTZ	(ARG),<	[SIXBIT\ARG'_\]>
   276
   277					;*CONSOLE SWITCH INPUT UUO.
   278					;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
   279					;* USER MODE.
   280
   281		037400	000002		OPDEF	SWITCH	[37B8!10B12!2]	;INPUT CONSOLE SWITCHES
   282
   283					;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
   284					;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
   285
   286		037540	000004		OPDEF	CLOKOP	[37B8!13B12!4]	;CLOCK OPERATION UUO - PDP-11 CLOCK
   287		037200	000004		OPDEF	MTROP	[37B8!4B12!4]	;CLOCK OPERATION UUO - DK20 METER
   288
   289					;*KL10 ONLY CACHE OPERATION UUO'S
   290
   291		037040	000004		OPDEF	CINVAL	[37B8!1B12!4]	;CACHE INVALIDATE
   292		037100	000004		OPDEF	CFLUSH	[37B8!2B12!4]	;CACHE FLUSH
   293		037140	000004		OPDEF	CWRTBI	[37B8!3B12!4]	;CACHE WRITE-BACK & INVALIDATE
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 6
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0015

   294					;*END OF PASS/PROGRAM UUOS
   295
   296					;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
   297					;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
   298
   299		037500	000004		OPDEF	ENDUUO	[37B8!12B12!4]	;UUO TO DISPLAY LIGHTS
   300		037700	000004		OPDEF	EOPUUO	[37B8!16B12!4]	;END OF PROGRAM UUO
   301
   302					;*MEMORY MANAGEMENT UUO'S
   303					;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
   304					;*ADDRESS CONVERSION, ETC...
   305
   306		037000	000004		OPDEF	MAPMEM	[37B8!0B12!4]	;MAP MEMORY
   307		037500	000002		OPDEF	MEMZRO	[37B8!12B12!2]	;ZERO MEMORY
   308		037440	000002		OPDEF	MEMSEG	[37B8!11B12!2]	;SETUP MEMORY SEGMENT
   309		037540	000002		OPDEF	MAPADR	[37B8!13B12!2]	;VIRTUAL TO PHYSICAL ADR CONVERT
   310		037640	000002		OPDEF	MAPCNK	[37B8!15B12!2]	;MAP MEMORY CHUNK
   311		037600	000002		OPDEF	MAPSET	[37B8!14B12!2]	;SET KI10 EXEC PAGE MAP
   312		037740	000002		OPDEF	MAPPNT	[37B8!17B12!2]	;PRINT MEMORY MAP
   313
   314					;*DEVICE CODE MODIFICATION UUO
   315					;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
   316					;*IOT'S TO A DIFFERENT DEVICE CODE.
   317
   318		037340	000002		OPDEF	MODPCU	[37B8!7B12!2]	;MODIFY PERHIPERAL CODE, USER
   319		037300	000002		OPDEF	MODPCP	[37B8!6B12!2]	;MODIFY PERHIPERAL CODE, PROGRAM
   320
   321			030000			IFNDEF	MODDVL,<MODDVL==BEGIN>
   322			030000			IFNDEF	MODDVU,<MODDVU==BEGIN>
   323
   324					;*"DIAMON" FILE SELECTION AND READ UUOS
   325
   326		037240	000004		OPDEF	FSELECT	[37B8!5B12!4]	;FILE SELECTION
   327		037300	000004		OPDEF	FREAD	[37B8!6B12!4]	;FILE READ - ASCII DATA
   328		037340	000004		OPDEF	FRD36	[37B8!7B12!4]	;FILE READ - 36 BIT DATA
   329		037400	000004		OPDEF	FRD8	[37B8!10B12!4]	;FILE READ - 8 BIT DATA
   330
   331					;*KI10 ONLY UUO FOR PRINTING MARGIN VALUES
   332
   333		037700	000002		OPDEF	PNTMGN	[37B8!16B12!2]	;PRINT MARGIN VALUE
   334
   335						XLIST
   336					IFNDEF	KLOLD,<LIST
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 7
PARAM	KLM	26-FEB-76		ERROR HANDLING UUO DEFINITIONS, JAN 5,1976                                         SEQ 0016

   337					SUBTTL	ERROR HANDLING UUO DEFINITIONS, JAN 5,1976
   338
   339					S^;*********************************************************************^
   340					;*ERROR HANDLER PARAMETERS
   341					S^;*********************************************************************^
   342
   343		036000	000000		OPDEF	ERUUO	[36B8]		;ERROR CALL UUO
   344		035000	000000		OPDEF	ERLOOP	[35B8]		;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
   345		035040	000000		OPDEF	ERLP1	[35B8!1B12]	;ERROR LOOP IF PC'S MATCH
   346		035100	000000		OPDEF	ERLP2	[35B8!2B12]	;ERROR LOOP IF ANY ERROR
   347		034000	000000		OPDEF	REPTUO	[34B8]		;REPEAT LOOP UUO
   348
   349					;*THE ERROR HANDLER MACROS
   350
   351					;*A MACRO TO REPORT AN ERROR AND LOOP
   352
   353						DEFINE	ERROR	(ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
   354						SALL
   355						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   356							   CORECT,,ACTUAL
   357							   [SIXBIT\D'_\],,ERR]
   358						XALL
   359					
   360						ERLOOP	ADR		;IF ERROR, LOOP TO ADR
   361					>
   362
   363					;*A MACRO TO REPORT AN ERROR AND NOT LOOP
   364
   365						DEFINE	ERROR1	(FORMAT,CORECT,ACTUAL,F,D,ERR)<
   366						SALL
   367						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   368							   CORECT,,ACTUAL
   369							   [SIXBIT\D'_\],,ERR]
   370						XALL	>
   371
   372					>;END OF KLOLD CONDITIONAL
   373
   374						XLIST
   375						LIST
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 1
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0017

   376					SUBTTL	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976
   377
   378	030000					LOC	30000
   379
   380					S^;*********************************************************************^
   381					;*PROGRAM STARTING ADDRESSES
   382					;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
   383					;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
   384					;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
   385					;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
   386					S^;*********************************************************************^
   387
   388	030000	254 00 1 00 027776 	BEGIN:	JRST	@MODLNK		;STAND-ALONE START
   389	030001	254 00 0 00 030712 	$START:	JRST	START		;MODE CHECK STARTING ADDRESS
   390
   391	030002	254 00 1 00 027774 	DIAGMN:	JRST	@LDLNK		;DIAGNOSTIC MONITOR START
   392
   393	030003	254 00 1 00 027774 	SYSEXR:	JRST	@LDLNK		;SYSTEM EXERCISER START
   394
   395	030004	254 00 0 00 030712 	SFSTRT:	JRST	SADR1		;SPECIAL FEATURE START
   396
   397	030005	254 00 0 00 030712 	PFSTRT:	JRST	SADR2		;POWER FAIL RESTART
   398
   399	030006	254 00 0 00 030712 	REENTR:	JRST	SADR3		;REENTER START(USUALLY USER MODE ONLY)
   400
   401	030007				SRTDDT:				;COMMONLY MISTAKEN NAME FOR "DDTSRT"
   402	030007	254 00 1 00 027775 	DDTSRT:	JRST	@DDTLNK		;DDT START
   403
   404	030010	254 00 0 00 030741 	BEGIN1:	JRST	STARTA		;LOOP START(END OF PASS COMES HERE)
   405	030011	254 00 1 00 027777 	SBINIT:	JRST	@SUBLNK		;PMGINT LINKAGE
   406	030012	000000	000000		RETURN:	0			;RETURN ADDRESS STORAGE
   407
   408	030013	254000	030712		START1:	SADR7			;OPTIONAL STARTING ADR/INSTRUCTIONS
   409	030014	254000	030712		START2:	SADR8			; "
   410	030015	254000	030712		START3:	SADR9			; "
   411	030016	254000	030712		START4:	SADR10			; "
   412	030017	254000	030712		START5:	SADR11			; "
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 2
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0018

   413					S^;*********************************************************************^
   414					;*PROGRAM FIXED PARAMETER AREA
   415					S^;*********************************************************************^
   416
   417	030020	444253	414700		PNTNAM:	PAREA3		;SIXBIT PROGRAM NAME
   418	030021	605664	000000		PNTEXT:	PAREA4		;SIXBIT PROGRAM EXTENSION
   419	030022	000000	000000		RANDBS:	PAREA1		;RANDOM BASE NUMBER
   420	030023	000000	000000		SWTEXR:	PAREA2		;SYSTEM EXERCISER SWITCHES
   421	030024	000000	001000		ITRCNT:	ITERAT		;PROGRAM ITERATIONS
   422	030025	000000	030725		$PNAME:	PGMNAM		;POINTER TO PROGRAMS NAME
   423	030026	000000	000002		$PVER:	MCNVER,,DECVER	;MCN & DEC VERSION LEVEL
   424	030027	000000	030000		$MODVL:	MODDVL		;DEVICE CODE CHANGE LOWER LIMIT
   425	030030	000000	030000		$MODVU:	MODDVU		;DEVICE CODE CHANGE UPPER LIMIT
   426	030031	777777	777777		$EMODE:	IFNDEF EXCASB,<0> IFDEF EXCASB,<-1>	;EXEC ALLOWED
   427	030032	777777	777777		$UMODE:	IFNDEF USRASB,<0> IFDEF USRASB,<-1>	;USER ALLOWED
   428	030033	000000	000000		$DSKUP:	IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1>	;DISK UPDATE MODE
   429	030034	000000	000000		$MMAP:	IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1>	;ALLOW MEMORY RTNS
   430	030035	000000	000000		PAREA7:	PAREA5		;OPTIONAL PARAMETER
   431	030036	000000	000000		PAREA8:	PAREA6		;OPTIONAL PARAMETER
   432
   433					S^;*********************************************************************^
   434					;*PROGRAM VARIABLE PARAMETER AREA
   435					S^;*********************************************************************^
   436
   437	030037	000000	000000		USER:	0		; 0 = EXEC, -1 = USER MODE FLAG
   438	030040	000000	000000		KAIFLG:	0		;PROCESSOR TYPE, 0 = KA10, -1 = KI10
   439	030041	000000	000000		KLFLG:	0		;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
   440	030042	777777	777777		MONFLG:	-1		;DIAG MONITOR SPECIAL USER FLAG
   441	030043	000000	000000		MONCTL:	0		;DIAG MON/SYS EXR FLAG
   442	030044	000000	000000		MONTEN:	0		;-1= LOADED BY 10
   443	030045	000000	000000		CLOCKF:	0		;CLOCK TICKED FLAG
   444	030046	000000	000000		CONSW:	0		;CONSOLE SWITCH SETTINGS
   445	030047	000000	000000		PASCNT:	0		;PROGRAM PASS COUNT
   446	030050	000000	000000		RUNFLG:	0		;PROGRAM RUN FLAG
   447	030051	000000	000000		TESTPC:	0		;SUBTEST PC
   448	030052	000000	000000		ERRPC:	0		;ERROR PC
   449	030053	000000	000000		ERRTLS:	0		;ERROR TOTALS
   450	030054	000000	000000		TICKS:	0		;PROGRAM RUNNING TIME
   451	030055	000000	000000		MARGIN:	0		;KI10 MARGIN WORD VALUE
   452	030056	000000	000000		$ONETM:	0		;SUBROUTINE INITIALIZATION FLAG
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 3
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0019

   453					S^;*********************************************************************^
   454					;*SPECIAL PROGRAM DISPATCH ADDRESSES
   455					S^;*********************************************************************^
   456
   457	030057	037 12 0 00 000004 	BEGEND:	ENDUUO		;END OF PASS
   458	030060	254 00 0 00 030010 	$BEND1:	JRST	BEGIN1	;KEEP RUNNING PROGRAM
   459	030061	037 16 0 00 000004 	$BEND2:	EOPUUO		;END OF PROGRAM - NO RETURN
   460	030062	254000	030712		CNTLC:	SADR5		;CONTROL C XFER ADDRESS
   461	030063	254000	030712		ALTMGO:	SADR6		;ALTMODE XFER ADDRESS
   462	030064				CPOPJ1:			;SKIP RETURN
   463	030064	350 00 0 17 000000 	UUOSKP:	AOS	(P)	;SKIP RETURN FROM UUO
   464	030065				CPOPJ:			;NON-SKIP REGULAR RETURN
   465	030065	263 17 0 00 000000 	UUOEXT:	RTN		;UUO RETURN
   466	030066	255 00 0 00 000000 	UUORTN:	JFCL		;ADDITIONAL USERS UUO ROUTINE
   467	030067	255 00 0 00 000000 	$UORTX:	JFCL		;ADDITIONAL UUO LINKAGE
   468	030070	255 00 0 00 000000 	$UUOER:	JFCL		;INITED AS (JRST $UOERX)
   469	030071	255 00 0 00 000000 	$ITRHL:	JFCL		;ADDITIONAL INTERRUPT LINKAGE
   470	030072	255 00 0 00 000000 	$ITRX1:	JFCL		; "
   471	030073	255 00 0 00 000000 	$USRHL:	JFCL		; "
   472	030074	255 00 0 00 000000 	$RSRTX:	JFCL		;ADDITIONAL POWER FAIL LINKAGE
   473	030075	255 00 0 00 000000 	$RSRTY:	JFCL		; "
   474	030076	255 00 0 00 000000 	RESRT1:	JFCL		; INITED AS (JRST RESRTX)
   475	030077	255 00 0 00 000000 	RESRT2:	JFCL		; "
   476	030100	255 00 0 00 000000 	$PARER:	JFCL		;ADDITIONAL PARITY ERROR LINKAGE
   477	030101	255 00 0 00 000000 	ERMORE:	JFCL		;ADDITIONAL ERROR HANDLER LINKAGE
   478	030102	254 04 0 00 030102 		HALT	.	;IMPROPER TRANSFER HALT
   479
   480	030103	000000	000000		$PSHER:	0		;INITED AS (JRST PSHERR)
   481	030104	000000	000000		ITRCH1:	0		;PC & FLAGS OF CURRENT INTERRUPT
   482	030105	000000	000000			0		;INITED AS (JRST $ITRC1)
   483
   484					S^;*********************************************************************^
   485					;*PROCESSOR CONTROL STORAGE
   486					S^;*********************************************************************^
   487
   488	030106	000000	000000		$ACC0:	0		;INTERRUPT SAVED AC0
   489	030107	000000	000000		$SVPI:	0		;INTERRUPT SAVED PI
   490	030110	000000	000000		$SVAPR:	0		;INTERRUPT SAVED APR
   491	030111	000000	000000		$SVPAG:	0		;INTERRUPT SAVED PAG (DATAI)
   492	030112	000000	000000		$SPAG1:	0		;INTERRUPT SAVED PAG (CONI)
   493
   494	030113	000000	000000		$SVUUO:	0		;CURRENT USERS UUO
   495	030114	000000	000000		$SVUPC:	0		;PC OF CURRENT USERS UUO
   496
   497	030115	000000	000000		REPTU:	0		;REPEAT UUO ITERATIONS
   498	030116	000000	000000		SCOPE:	0		;ERROR HANDLER SCOPE LOOP FLAG
   499	030117	000000	000000		%CORFLG:0		; " CORRECT FLAG
   500	030120	000000	000000		%COREC:	0		; " CORRECT DATA
   501	030121	000000	000000		%ACTFL:	0		; " ACTUAL FLAG
   502	030122	000000	000000		%ACTUL:	0		; " ACTUAL DATA
   503	030123	000000	000000		%DISCR:	0		; " DISCREPENCY DATA
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 4
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0020

   504					S^;*********************************************************************^
   505					;*UUO DISPATCH TABLE
   506					S^;*********************************************************************^
   507						XLIST
   508						LIST
   509	030124	030070	030070		UUODIS:	LUUO1,,$UUOER
   510	030125	030070	030070			LUUO3,,LUUO2
   511	030126	030070	030070			LUUO5,,LUUO4
   512	030127	030070	030070			LUUO7,,LUUO6
   513	030130	030070	030070			LUUO11,,LUUO10
   514	030131	030070	030070			LUUO13,,LUUO12
   515	030132	030070	030070			LUUO15,,LUUO14
   516	030133	030070	030070			LUUO17,,LUUO16
   517	030134	030070	030070			LUUO21,,LUUO20
   518	030135	030070	030070			LUUO23,,LUUO22
   519	030136	030070	030070			LUUO25,,LUUO24
   520	030137	030070	030070			LUUO27,,LUUO26
   521	030140	030070	030070			LUUO31,,LUUO30
   522	030141	030070	030070			LUUO33,,LUUO32
   523
   524					S^;*********************************************************************^
   525					;*MEMORY MANAGMENT STORAGE
   526					S^;*********************************************************************^
   527
   528	030142	000000	000000		DF22F:	0		;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
   529	030143	000000	000000		MAPNEW:	0		;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
   530	030144	000000	000000		MEMTOT:	0		;TOTAL MEMORY SIZE IN K (1024.)
   531	030145	000000	000000		MEMLOW:	0		;LOWEST USABLE MEMORY
   532	030146				MEMSIZ:	BLOCK ^D41	;MEMORY SEGMENT POINTER TABLE
   533
   534					S^;*********************************************************************^
   535					;*PRINT CONTROL STORAGE
   536					S^;*********************************************************************^
   537
   538	030217	000000	000000		PNTFLG:	0		;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
   539	030220	000000	000000		PNTENB:	0		;PRINT ENABLE
   540	030221	000000	000000		PDISF:	0		;PRINT DISABLED FLAG
   541	030222	000000	000000		PNTINH:	0		;INHIBIT PRINT INPUT CHECKS
   542	030223	000000	000000		PNTSPC:	0		;PRINT SPACE CONTROL
   543	030224	000000	000000		OPTIME:	0		;TYPE-IN WAIT TIME
   544	030225	000000	000000		$TWCNT:	0		;TIME WAITED
   545	030226	000000	000000		$DVOFF:	0		;LOGICAL DEVICE INITED FLAG
   546	030227	000000	000000		TTYFIL:	0		;TTY EXEC FILLERS FLAG
   547	030230	000000	000000		TTYSPD:	0		;TTY EXEC BAUD RATE
   548	030231	000000	000000		$TTCHR:	0		;ACTUAL TYPED IN CHAR
   549	030232	000000	000000		$CHRIN:	0		;UPPER CASED & PARITY STRIPPED CHAR
   550	030233	000000	000000		$TYPNB:	0		;TYPED IN NUMBER
   551	030234	000000	000000		$CRLF:	0		;FREE CR/LF FLAG
   552	030235	000000	000000		$TABF:	0		;TAB CONVERSION FLAG
   553	030236	000000	000000		$FFF:	0		;FORM FEED CONVERSION FLAG
   554	030237	000000	000000		$VTF:	0		;VERTICAL TAB CONVERSION FLAG
   555	030240	000000	000000		USRLFF:	0		;USER LF FILLERS
   556	030241	000000	000000		USRCRF:	0		;USER CR FILLERS
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 5
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0021

   557					S^;*********************************************************************^
   558					;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
   559					;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
   560					;*	MOVEI	NAME
   561					;*	PNTA		;OR PNTAF
   562					S^;*********************************************************************^
   563
   564	030242				CRLF:	ASCII/
   565	030242	015 012 000 000 000 	/
   566	030243				CRLF2:	ASCII/
   567
   568	030243	015 012 015 012 000 	/
   569	030244	054 000 000 000 000 	COMMA:	ASCII/,/
   570	030245	056 000 000 000 000 	PERIOD:	ASCII/./
   571	030246	040 000 000 000 000 	SPACE:	ASCII/ /
   572	030247	011 000 000 000 000 	TAB:	ASCII/	/
   573	030250				MINUS:
   574	030250	055 000 000 000 000 	HYPEN:	ASCII/-/
   575	030251	053 000 000 000 000 	PLUS:	ASCII/+/
   576	030252	052 000 000 000 000 	AST:	ASCII/*/
   577	030253	100 000 000 000 000 	ATSIN:	ASCII/@/
   578	030254	050 000 000 000 000 	LFP:	ASCII/(/
   579	030255	051 000 000 000 000 	RTP:	ASCII/)/
   580	030256	007 0000000000 		BELL:	BYTE (7) 007
   581	030257	077 000 000 000 000 	QUEST:	ASCII/?/
   582	030260	057 000 000 000 000 	SLASH:	ASCII!/!
   583	030261	044 000 000 000 000 	DOLLAR:	ASCII/$/
   584	030262	000000	000012		RADIX:	^D10			;DECIMAL PRINT RADIX
   585	030263	000000	000040		RADLSP:	40			;DECIMAL PRINT LEADING CHAR
   586	030264	000000	000012		RADLSC:	^D10			;DECIMAL PRINT LEADING CHAR COUNT
   587
   588					S^;*********************************************************************^
   589					;*USER MODE OUTPUT FILE INFORMATION
   590					S^;*********************************************************************^
   591
   592	030265				$OBUF:	BLOCK	3		;LOGICAL FILE OUTPUT BUFFER HEADER
   593	030270	60 62 51 56 64 00 	$OUTNM:	SIXBIT	/PRINT/		;FILE NAME
   594	030271	60 56 64 00 00 00 	$OUTEX:	SIXBIT	/PNT/		;FILE NAME EXTENSION
   595	030272					BLOCK	2
   596
   597					S^;*********************************************************************^
   598					;*DISK UPDATE MODE FILE INFORMATION
   599					S^;*********************************************************************^
   600
   601	030274				$IBUF:	BLOCK	3
   602	030277	60 62 51 56 64 00 	$INNM:	SIXBIT	/PRINT/
   603	030300	60 56 64 00 00 00 	$INEXT:	SIXBIT	/PNT/
   604	030301					BLOCK	2
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 6
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0022

   605					S^;*********************************************************************^
   606					;*PUSHDOWN LIST CONTROL INFORMATION
   607					S^;*********************************************************************^
   608
   609	030303	777577	030303		PLIST:	PLIST-PLISTE,,PLIST
   610	030304				PLISTS:	BLOCK	200
   611	030504	000000	000000		PLISTE:	0		;END OF PUSHDOWN LIST
   612
   613					S^;*********************************************************************^
   614					;*POWER LINE CLOCK FREQUENCY FLAG
   615					S^;*********************************************************************^
   616
   617	030505	000000	000000		CYCL60:	0	;0 = 60, -1 = 50 CYCLE
   618
   619					S^;*********************************************************************^
   620					;*KL10 CACHE CONTROL FLAGS
   621					S^;*********************************************************************^
   622
   623	030506	000000	000000		CSHFLG:	0	;ALLOW CACHE IF 0
   624	030507	000000	000000		CSHMEM:	0	;CACHE MEMORY SEGMENTS IF 0
   625
   626					S^;*********************************************************************^
   627					;*NUMBER INPUT DIGIT FLAG
   628					S^;*********************************************************************^
   629
   630	030510	000000	000000		TTNBRF:	0	;-1 IF ANY DIGIT TYPED
   631
   632					S^;*********************************************************************^
   633					;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
   634					S^;*********************************************************************^
   635
   636	030511	000000	000000		PVPAGI:	0	;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
   637
   638					S^;*********************************************************************^
   639					;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
   640					S^;*********************************************************************^
   641
   642	030512	000000	000000		%ERHI1:	0	;IF NON-ZERO, XCT'D AT START OF %ERUUO
   643	030513	000000	000000		%ERHI2:	0	;IF NON-ZERO, XCT'D AT END OF %ERUUO
   644	030514	000000	000000		%ERHI3:	0	;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
   645
   646					S^;*********************************************************************^
   647					;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
   648					S^;*********************************************************************^
   649
   650	030515	000000	000000		$$UUO:	0	;IF NON-ZERO, XCT'D AT START OF $UORTN
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 7
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0023

   651					S^;*********************************************************************^
   652					;*KL10 PROCESSOR TYPE FLAG, 0=P0, 1=BBD NEW, 2=BBD OLD
   653					S^;*********************************************************************^
   654
   655	030516	000000	000000		KLTYP:	0
   656
   657					S^;*********************************************************************^
   658					;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
   659					S^;*********************************************************************^
   660
   661	030517	000000	000000		$$MUUO:	0	;IF NON-ZERO, XCT'D AT START OF MUUOER
   662
   663					S^;*********************************************************************^
   664					;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
   665					S^;*********************************************************************^
   666
   667	030520	000000	000000		$$OUTER:0	;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
   668
   669					S^;*********************************************************************^
   670					;*"SWITCH" CALL USAGE CONTROL
   671					S^;*********************************************************************^
   672
   673	030521	000000	000000		$$TOGGLE:0	;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
   674
   675					S^;*********************************************************************^
   676					;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
   677					S^;*********************************************************************^
   678
   679	030522	000000	000000		$$TAX1:	0	;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
   680	030523	000000	000000		$$TAX2:	0	;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
   681
   682					S^;*********************************************************************^
   683					;*SPECIAL FUTURE EXPANSION ROOM
   684					;*IF ANY FIXED AREA TAGS ARE ADDED, REDUCE THE SIZE OF
   685					;*THIS BLOCK STATEMENT ACCORDINGLY.  THIS MUST BE DONE
   686					;*SO THAT PREVIOUS FIXED ASSIGNMENTS DO NOT CHANGE.
   687					S^;*********************************************************************^
   688
   689	030524					BLOCK	53	;HOPEFULLY THIS IS ENOUGH FOREVER
   690
   691					S^;*********************************************************************^
   692					;*END OF FIXED STORAGE
   693					S^;*********************************************************************^
   694
   695			030577			$ENDFX=<PLISTE+100>&<777700>-1
   696	030577					LOC	$ENDFX
   697	030577	000000	000000		ENDFIX:	0		;END OF FIXED STORAGE
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 1
SPCCPU	KLM	26-FEB-76		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0024

   698					SUBTTL	*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76
   699
   700					;NEW DEFINITIONS USED BY THE KL10 SUBROUTINE PACKAGE
   701
   702			000000		AC0=	0
   703			030000		DIAGNOS=30000		;PDP-10 DIAGNOSTIC START ADDRESS
   704			010000		DDT=	10000		;PDP-10 DDT START ADDRESS
   705			020000		DIAMON=	20000		;PDP-10 DIAMON LOADER START ADDRESS
   706			020000		DONG11=	1B22		;11 DOORBELL (FROM THE 10)
   707
   708					;DTE20 DEVICE CODES
   709
   710			000200		DTE==	200		;DTE0
   711			000204		DTE0==	204
   712			000204		DTE1==	204
   713			000210		DTE2==	210
   714			000214		DTE3==	214
   715
   716					;KL10 EPT COMMUNICATION AREA
   717
   718			000440		$STD=	440		;PDP-10 DIAGNOSTIC START ADDRESS
   719			000441		$DDT=	441		;PDP-10 DDT START ADDRESS
   720			000442		$STL=	442		;PDP-10 LOADER START ADDRESS
   721			000443		$STM=	443		;PDP-10 MONITOR START ADDRESS
   722
   723			000444		$DTFLG=	444		;DTE20 OPERATION COMPLETE FLAG
   724			000445		$DTCLK=	445		;DTE20 CLOCK INTERRUPT FLAG
   725			000446		$DTCI=	446		;DTE20 CLOCK INTERRUPT INSTRUCTION
   726			000447		$DTT11=	447		;DTE20 10 TO 11 ARGUMENT
   727			000450		$DTF11=	450		;DTE20 11 TO 10 ARGUMENT
   728			000451		$DTCMD=	451		;DTE20 TO 11 COMMAND WORD
   729			000452		$DTSEQ=	452		;DTE20 OPERATION SEQUENCE NUMBER
   730			000453		$DTOPR=	453		;DTE20 OPERATIONAL DTE #
   731			000454		$DTCHR=	454		;DTE20 LAST TYPED CHARACTER
   732			000455		$DTMTD=	455		;DTE20 MONITOR TTY OUTPUT COMPLETE FLAG
   733			000456		$DTMTI=	456		;DTE20 MONITOR TTY INPUT FLAG
   734
   735			000457		$DTSWR=	457		;DTE20 CONSOLE SWITCH REGISTER
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 2
SPCCPU	KLM	26-FEB-76		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0025

   736					;SPECIAL "FIXED" REASSIGNMENTS
   737
   738			030600			$$LOC=.			;SAVE CURRENT LOCATION
   739
   740	030000					LOC	30000
   741	030000	254 00 0 00 030600 	$$BEGIN:JRST	$$START		;SETUP SPECIAL START
   742	030001	254 00 0 00 030600 		JRST	$$START		;"DIAMON" CHAIN START ADDRESS
   743
   744	000440					LOC	440
   745	000440	254 00 0 00 030000 	$STD:	JRST	BEGIN		;SETUP FOR "STD"
   746	000443					LOC	443
   747	000443	254 00 0 00 030636 	$STM:	JRST	$SPEC		;SIMPLE RUN CONTROL
   748
   749	030057					LOC	30057
   750	030057	254 00 0 00 030641 	$BEGEND:JRST	$SPBEND		;SETUP SPECIAL "BEGEND"
   751
   752					;SPECIAL MUUO, TRAP & PAGE FAIL SETUP
   753
   754	000420					LOC	420
   755	000420	254 04 0 00 000420 	$$420:	HALT	.		;KI10 PAGE FAIL
   756	000421	255 00 0 00 000000 	$$421:	JFCL			;OVERFLOW
   757	000422	254 04 0 00 000422 	$$422:	HALT	.		;PUSHDOWN OVERFLOW
   758	000423	254 04 0 00 000423 	$$423:	HALT	.		;TRAP 3
   759	000424	000000	000000		$$424:	0			;MMUO
   760	000425	000000	000000		$$425:	0			;MMUO PC
   761	000426	000000	000000		$$426:	0			;KI10-PAGE FAIL, KL10-PROCESS CONTEXT
   762	000427	254 04 0 00 000427 	$$427:	HALT	.
   763	000430	000000	000427		$$430:	427			;MMUO NEW PC'S
   764	000431	000000	000427		$$431:	427
   765	000432	000000	000427		$$432:	427
   766	000433	000000	000427		$$433:	427
   767	000434	000000	000427		$$434:	427
   768	000435	000000	000427		$$435:	427
   769	000436	000000	000427		$$436:	427
   770	000437	000000	000427		$$437:	427
   771
   772	000500					LOC	500
   773	000500	000000	000000		$$500:	0			;KL10 PAGE FAIL WORD
   774	000501	000000	000000		$$501:	0			;KL10 PAGE FAIL PC
   775	000502	000000	000503		$$502:	503			;KL10 PAGE FAIL NEW PC
   776	000503	254 04 0 00 000503 	$$503:	HALT	.
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 3
SPCCPU	KLM	26-FEB-76		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0026

   777	030600					LOC	$$LOC		;RESET CURRENT LOCATION
   778
   779					;SPECIAL STARTUP SEQUENCE
   780
   781	030600	402 00 0 00 030037 	$$START:SETZM	USER
   782	030601	265 00 0 00 030602 		JSP	0,.+1		;IN USER MODE ?
   783	030602	603 00 0 00 010000 		TLNE	0,USERF
   784	030603	476 00 0 00 030037 		SETOM	USER		;YES, SET CONTROL WORD
   785	030604	336 00 0 00 030042 		SKIPN	MONFLG		;SPECIAL USER MODE ?
   786	030605	402 00 0 00 030037 		SETZM	USER		;YES, RUN AS EXEC
   787	030606	332 00 0 00 030037 		SKIPE	USER
   788	030607	254 00 0 00 030712 		JRST	START		;USER MODE, DON'T NEED CPU TYPE
   789
   790	030610	336 00 0 00 030044 	$STKIL:	SKIPN	MONTEN		;LOADED BY "DIAMON" ?
   791	030611	476 00 0 00 030024 		SETOM	ITRCNT		;NO, RUN FOREVER
   792	030612	402 00 0 00 030516 		SETZM	KLTYP
   793	030613	402 00 0 00 030041 		SETZM	KLFLG		;ASSUME KI10
   794	030614	200 01 0 00 032223 		MOVE	1,[1,,1]
   795	030615	251 01 0 00 000001 		BLT	1,1		;HOPE THIS WORKS
   796	030616	316 01 0 00 032223 		CAMN	1,[1,,1]	;IF AC NE 1,,1 AFTER BLT, KL10
   797	030617	254 00 0 00 030712 		JRST	START		;KI10, NO ADDITIONAL SETUP
   798
   799	030620	7 000 20 0 00 010040 	$STKL:	CONO	APR,10040	;SET BBD NOT BIT
   800	030621	7 000 24 0 00 000000 		CONI	APR,0
   801	030622	7 000 20 0 00 020040 		CONO	APR,20040	;CLEAR BBD NOT BIT
   802	030623	606 00 0 00 000040 		TRNN	0,40		;IF SET, KL10
   803	030624	350 00 0 00 030516 		AOS	KLTYP		;IF NOT, BBD
   804	030625	402 00 0 00 000444 		SETZM	$DTFLG
   805	030626	402 00 0 00 000445 		SETZM	$DTCLK
   806	030627	200 00 0 00 000453 		MOVE	$DTOPR		;GET DTE #
   807	030630	436 00 0 00 030670 		ORM	$$DTE0		;INSERT IN DTE I/O INSTS
   808	030631	436 00 0 00 030672 		ORM	$$DTE1
   809	030632	436 00 0 00 030704 		ORM	$$DTE2
   810	030633	436 00 0 00 030706 		ORM	$$DTE3
   811	030634	476 00 0 00 030041 		SETOM	KLFLG		;SET KL10 CONTROL FLAG
   812	030635	254 00 0 00 030712 		JRST	START
   813
   814	030636	200 00 0 00 032224 	$SPEC:	MOVE	[JRST STARTA]	;SIMPLE RUN CONTROL
   815	030637	202 00 0 00 030643 		MOVEM	$SPB1
   816	030640	254 00 0 00 030712 		JRST	START
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 4
SPCCPU	KLM	26-FEB-76		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0027

   817					;SPECIAL "BEGEND" ROUTINE
   818
   819	030641	350 00 0 00 030047 	$SPBEND:AOS	PASCNT		;INCREMENT PASS COUNT
   820	030642	370 00 0 00 030024 		SOS	ITRCNT		;DECREMENT ITERATION COUNT
   821	030643	336 00 0 00 030037 	$SPB1:	SKIPN	USER
   822	030644	254 00 0 00 030652 		JRST	$SPBEX		;EXEC MODE
   823
   824	030645	332 00 0 00 030024 	$SPBUS:	SKIPE	ITRCNT		;USER MODE, COMPLETED ?
   825	030646	254 00 0 00 030741 		JRST	STARTA		;NO, KEEP RUNNING
   826	030647	336 00 0 00 030044 		SKIPN	MONTEN		;DONE, LOADED BY "DIAMON" ?
   827	030650	047 00 0 00 000012 		EXIT			;NO, RETURN TO MONITOR
   828	030651	254 00 1 00 030012 		JRST	@RETURN		;YES, RETURN TO "DIAMON"
   829
   830	030652	332 00 0 00 030041 	$SPBEX:	SKIPE	KLFLG
   831	030653	254 00 0 00 030660 		JRST	$SPBKL		;KL10 & EXEC
   832	030654	7 004 14 0 00 030024 		DATAO	PI,ITRCNT	;KI10 & EXEC, DISPLAY ITER COUNT
   833	030655	332 00 0 00 030024 		SKIPE	ITRCNT
   834	030656	254 00 0 00 030741 		JRST	STARTA		;NOT COMPLETED YET
   835	030657	254 00 1 00 030012 		JRST	@RETURN		;DONE
   836
   837	030660	336 00 0 00 030024 	$SPBKL:	SKIPN	ITRCNT
   838	030661	254 00 0 00 030676 		JRST	$SPKLD		;KL10, EXEC & COMPLETED
   839
   840	030662	335 00 0 00 030043 		SKIPGE	MONCTL
   841	030663	254 00 0 00 030741 		JRST	STARTA		;"DIAMON" CONTROL
   842	030664	201 00 0 00 000404 		MOVEI	0,404		;NOTIFY PDP-11 OF END OF PASS
   843	030665	202 00 0 00 000451 		MOVEM	0,$DTCMD
   844	030666	402 00 0 00 000444 		SETZM	$DTFLG
   845	030667	336 00 0 00 030516 		SKIPN	KLTYP
   846	030670	7 200 20 0 00 020000 	$$DTE0:	CONO	DTE,DONG11
   847	030671	332 00 0 00 030516 		SKIPE	KLTYP
   848	030672	7 200 20 0 00 010000 	$$DTE1:	CONO	DTE,10000
   849	030673	336 00 0 00 000444 		SKIPN	$DTFLG		;WAIT TILL 11 RESPONDS
   850	030674	254 00 0 00 030673 		JRST	.-1
   851	030675	254 00 0 00 030741 		JRST	STARTA		;KEEP RUNNING
   852
   853					;SPECIAL KL10 COMPLETED ROUTINE
   854
   855	030676	332 00 0 00 030044 	$SPKLD:	SKIPE	MONTEN
   856	030677	254 00 1 00 030012 		JRST	@RETURN		;LOADED BY "DIAMON"
   857
   858	030700	201 00 0 00 000403 		MOVEI	0,403		;NOTIFY PDP-11 OF COMPLETION
   859	030701	202 00 0 00 000451 		MOVEM	0,$DTCMD
   860	030702	402 00 0 00 000444 		SETZM	$DTFLG
   861	030703	336 00 0 00 030516 		SKIPN	KLTYP
   862	030704	7 200 20 0 00 020000 	$$DTE2:	CONO	DTE,DONG11
   863	030705	332 00 0 00 030516 		SKIPE	KLTYP
   864	030706	7 200 20 0 00 010000 	$$DTE3:	CONO	DTE,10000
   865	030707	336 00 0 00 000444 		SKIPN	$DTFLG		;SHOULD NEVER HAPPEN
   866	030710	254 00 0 00 030707 		JRST	.-1		;11 NEVER RETURNS ON END OF PROGRAM
   867	030711	254 04 0 00 030000 		HALT	BEGIN		;IF IT DOES, HALT.
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 1
DBKAGM	MAC	30-APR-76 17:10		DIAGNOSTIC SECTION                                                                 SEQ 0028

   868					SUBTTL	DIAGNOSTIC SECTION
   869
   870	030712	402 00 0 00 030037 	START:	SETZM	USER#		;CLEAR USER CONTROL WORD
   871	030713	265 00 0 00 030714 		JSP	0,.+1		;GET FLAGS
   872	030714	603 00 0 00 010000 		TLNE	USERF		;IN USER MODE?
   873	030715	476 00 0 00 030037 		SETOM	USER		;YES, SET USER CONTROL WORD
   874	030716	336 00 0 00 030042 		SKIPN	MONFLG		;SPECIAL USER MODE?
   875	030717	402 00 0 00 030037 		SETZM	USER		;YES, CLEAR USER CONTROL WORD
   876	030720	336 00 0 00 030037 		SKIPN	USER
   877	030721	254 00 0 00 030741 		JRST	STARTA
   878	030722	331 00 0 00 030043 		SKIPL	MONCTL
   879	030723	051 03 0 00 030725 		TTCALL	3,PGMNAM	;MENTION OUR NAME
   880	030724	254 00 0 00 030741 		JRST	STARTA
   881
   882	030725				PGMNAM:	ASCIZ/
   883	030725	015 012 120 104 120 	PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) [DBKAG]
   884	030726	055 061 060 040 113 
   885	030727	111 061 060 040 102 
   886	030730	101 123 111 103 040 
   887	030731	111 116 123 124 122 
   888	030732	125 103 124 111 117 
   889	030733	116 040 104 111 101 
   890	030734	107 116 117 123 124 
   891	030735	111 103 040 050 067 
   892	030736	051 040 133 104 102 
   893	030737	113 101 107 135 015 
   894	030740	012 000 000 000 000 	/
   895
   896	030741	254 00 0 00 030742 	STARTA:	JRST	.+1
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 2
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSH INSTRUCTION                                                           SEQ 0029

   897					SUBTTL	TEST OF PUSH INSTRUCTION
   898
   899					;**********
   900
   901					;THIS TEST VERIFIES THAT PUSH DECODES CORRECTLY.
   902					;IF PUSH DECODES AS PUSHJ, THIS TEST FAILS.
   903
   904	030742	400 02 0 00 000000 	C27200:	SETZ	2,		;CLEAR AC
   905	030743	261 02 0 00 030745 		PUSH	2,.+2		;*PUSH SHOULD NOT JUMP
   906	030744	334 00 0 00 000000 		SKIPA			;PASS IF PUSH DID NOT JUMP
   907						STOP^
   908	030745	254 04 0 00 030746 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   909	030746	324 00 0 00 030747 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
   910
   911					;**********
   912
   913					;THIS TEST VERIFIES THAT PUSH DOES NOT MODIFY C(E).
   914					;CLEAR E AND AC; THEN, EXECUTE PUSH.
   915					;CHECK E FOR ORIGINAL CONTENTS ,0.
   916					;PASS IF C(E)=0.
   917
   918	030747	403 00 0 00 000002 	C27300:	SETZB	2		;CLEAR AC,E
   919	030750	261 02 0 00 000000 		PUSH	2,		;*PUSH SHOULD NOT ALTER C(E)
   920	030751	332 00 0 00 000000 		SKIPE			;PASS IF C(E)=0,,0
   921						STOP^
   922	030752	254 04 0 00 030753 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   923	030753	324 00 0 00 030754 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
   924
   925					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 3
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSH INSTRUCTION                                                           SEQ 0030

   926					;THIS TEST VERIFIES THAT PUSH ADDS 1,,1 TO THE AC.
   927					;FIRST THE AC IS CLEARED; THEN PUSH IS EXECUTED.
   928					;THE AC IS CHECKED FOR 1,,1.  IF C(AC)=1,,1, THIS TEST PASSES.
   929
   930	030754	400 02 0 00 000000 	C27400:	SETZ	2,		;CLEAR AC
   931	030755	261 02 0 00 030756 		PUSH	2,.+1		;*PUSH SHOULD ADD 1,,1 TO C(AC)
   932	030756	312 02 0 00 032223 		CAME	2,[XWD 1,1]	;PASS IF C(AC)=1,,1
   933						STOP^
   934	030757	254 04 0 00 030760 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   935	030760	324 00 0 00 030761 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
   936
   937					;**********
   938
   939					;THIS TEST VERIFIES THAT PUSH ADDS 1,,1 TO THE AC BEFORE MODIFYING C(C(AC-RIGHT)).
   940					;FIRST, THE AC AND AC0 ARE ZEROED; THEN PUSH IS EXECUTED.
   941					;C(C(AC-RIGHT)) [BEFORE AC UPDATING] (AC0) IS CHECKED FOR THE INITIAL VALUE, 0.
   942					;IF C(AC0)=0, THIS TEST PASSES
   943
   944	030761	403 00 0 00 000002 	C27500:	SETZB	2		;CLEAR AC AND AC0
   945	030762	261 02 0 00 032225 		PUSH	2,[16541320]	;*PUSH SHOULD NOT MODIFY C(AC0)
   946	030763	332 00 0 00 000000 		SKIPE			;PASS IF C(AC0)=0
   947						STOP^
   948	030764	254 04 0 00 030765 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   949	030765	324 00 0 00 030766 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
   950
   951					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 4
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSH INSTRUCTION                                                           SEQ 0031

   952					;THIS TEST VERIFIES THAT PUSH ADDS 1,,1 TO THE AC BEFORE MODIFYING C(C(AC-RIGHT)).
   953					;FIRST, THE AC AND AC0 ARE ZEROED; THEN PUSH IS EXECUTED.
   954					;C(C(AC-RIGHT)) [BEFORE AC UPDATING] (AC0) IS CHECKED FOR 
   955					;IF C(AC0)IS NOT EQUAL TO E, THIS TEST PASSES
   956
   957	030766	403 01 0 00 000002 	C27600:	SETZB	1,2		;CLEAR AC AND AC0
   958	030767	261 02 0 00 030770 		PUSH	2,.+1		;*PUSH SHOULD NOT MODIFY C(AC0)
   959	030770	306 00 0 00 030770 		CAIN	.		;FAIL IF C(AC0)=E
   960						STOP^
   961	030771	254 04 0 00 030772 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   962	030772	324 00 0 00 030773 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
   963
   964					;**********
   965
   966					;THIS TEST VERIFIES THAT PUSH ADDS 1,,1 TO THE AC; THEN, MOVES C(E) INTO
   967					;THE LOCATION SPECIFIED BY C(AC-RIGHT).  IN THIS CASE, AC AND THE LOCATION SPECIFIED
   968					;BY UPDATING C(AC-RIGHT) ARE CLEARED; THEN, PUSH IS EXECUTED WITH C(E)=-1,,-1.
   969					;THE LOCATION SPECIFIED BY C(AC-RIGHT) IS THEN CHECKED FOR -1,,-1, THE
   970					;ORIGINAL C(E).  IF C(C(AC-RIGHT))=-1,,-1, THIS TEST PASSES.
   971
   972	030773	403 01 0 00 000002 	C27700:	SETZB	1,2		;CLEAR AC, C(AC-RIGHT)
   973	030774	261 02 0 00 032226 		PUSH	2,[-1]		;*PUSH SHOULD PLACE -1,,-1 INTO AC1
   974	030775	312 01 0 00 032226 		CAME	1,[-1]		;PASS IF C(1)=-1,,-1
   975						STOP^
   976	030776	254 04 0 00 030777 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   977	030777	324 00 0 00 031000 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
   978
   979					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 5
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSH INSTRUCTION                                                           SEQ 0032

   980					;THIS TEST VERIFIES THAT PUSH ADDS 1,,1 TO THE AC; THEN, MOVES C(E) INTO
   981					;THE LOCATION SPECIFIED BY C(AC-RIGHT).  IN THIS CASE, AC
   982					;IS CLEARED; THEN, PUSH IS EXECUTED WITH C(E)=0.
   983					;THE LOCATION SPECIFIED BY C(AC-RIGHT) IS THEN CHECKED FOR 0, THE
   984					;ORIGINAL C(E).  IF C(C(AC-RIGHT))=0, THIS TEST PASSES.
   985
   986	031000	402 00 0 00 000002 	C30000:	SETZM	2		;CLEAR AC
   987	031001	261 02 0 00 032227 		PUSH	2,[0]		;*PUSH SHOULD PLACE 0 INTO AC1
   988	031002	332 00 0 00 000001 		SKIPE	1		;PASS IF C(1)=0
   989						STOP^
   990	031003	254 04 0 00 031004 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   991	031004	324 00 0 00 031005 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
   992
   993					;**********
   994
   995					;THIS TEST VERIFIES THAT PUSH ADDS 1,,1 TO THE AC; THEN, MOVES C(E) INTO
   996					;THE LOCATION SPECIFIED BY C(AC-RIGHT).  IN THIS CASE,
   997					;AC IS PRELOADED WITH 0,,-1, AND THE LOCATION SPECIFIED
   998					;BY UPDATING C(AC-RIGHT) IS CLEARED; THEN, PUSH IS EXECUTED WITH C(E)=-1,,-1.
   999					;THE LOCATION SPECIFIED BY C(AC-RIGHT) IS THEN CHECKED FOR -1,,-1, THE
  1000					;ORIGINAL C(E).  IF C(C(AC-RIGHT))=-1,,-1, THIS TEST PASSES.
  1001
  1002	031005	201 02 0 00 777777 	C30100:	MOVEI	2,-1		;PRELOAD AC WITH 0,,-1
  1003	031006	400 00 0 00 000000 		SETZ			;CLEAR AC, C(AC-RIGHT)
  1004	031007	261 02 0 00 032226 		PUSH	2,[-1]		;*PUSH SHOULD PLACE -1,,-1 INTO AC0
  1005	031010	312 00 0 00 032226 		CAME	[-1]		;PASS IF C(0)=-1,,-1
  1006						STOP^
  1007	031011	254 04 0 00 031012 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1008	031012	324 00 0 00 031013 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1009
  1010					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 6
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSH INSTRUCTION                                                           SEQ 0033

  1011					;THIS TEST VERIFIES THAT THERE IS NO CARRY FROM BIT 18 TO BIT 17 OF THE AC ON PUSH.
  1012					;THE AC IS PRELOADED WITH 0,,-1; THEN PUSH IS EXECUTED. PUSH SHOULD ADD ONE
  1013					;TO BOTH HALVES OF THE AC WITHOUT GENERATING A CARRY FROM BIT 18 TO BIT 17. IF NO
  1014					;CARRY WAS GENERATED, THIS TEST PASSES
  1015
  1016	031013	201 02 0 00 777777 	C30101:	MOVEI	2,-1		;PRELOAD AC WITH 0,, -1
  1017	031014	261 02 0 00 000000 		PUSH	2,0		;*PUSH SHOULD NOT GENERATE A CARRY FROM BIT 18 TO 17
  1018	031015	312 02 0 00 032230 		CAME	2,[1,,0]	;PASS IF C(AC)=1,,0 (NO CARRY WAS GENERATED)
  1019						STOP^
  1020	031016	254 04 0 00 031017 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1021	031017	324 00 0 00 031020 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1022
  1023					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 7
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSHJ INSTRUCTION                                                          SEQ 0034

  1024					SUBTTL	TEST OF PUSHJ INSTRUCTION
  1025
  1026					;**********
  1027
  1028					;THIS TEST VERIFIES THAT PUSHJ TRANSFERS CONTROL TO THE LOCATION ADDRESSED BY E.
  1029					;IF PUSHJ DOES NOT JUMP, THIS TEST FAILS
  1030
  1031	031020				C30200:	SFLAG	CRY0		^;SETS CRY0 FLAG
  1032	031020	205 01 0 00 200000 		MOVSI	1,CRY0		
  1033	031021	255 17 0 00 031022 		JFCL	17,.+1		;RESET ALL FLAGS
  1034	031022	254 02 0 01 031023 		JRST	2,.+1(1)	;SET CRY0		 FLAG
  1035	031023	400 00 0 00 000000 		SETZ			;CLEAR AC
  1036	031024	260 00 0 00 031026 		PUSHJ	.+2		;*PUSHJ SHOULD JUMP TO LOCATION E
  1037						STOP^
  1038	031025	254 04 0 00 031026 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1039	031026	324 00 0 00 031027 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1040
  1041					;**********
  1042
  1043					;THIS TEST VERIFIES THAT PUSHJ DOES NOT MODIFY C(PC) WHERE PC IS ONE GREATER
  1044					;THAN THE LOCATION OF THE PUSHJ INSTRUCTION.
  1045					;IF PUSHJ MODIFIES C(PC), THIS TEST FAILS
  1046
  1047	031027				C30300:	SFLAG	CRY0		^;SET CRY0
  1048	031027	205 01 0 00 200000 		MOVSI	1,CRY0		
  1049	031030	255 17 0 00 031031 		JFCL	17,.+1		;RESET ALL FLAGS
  1050	031031	254 02 0 01 031032 		JRST	2,.+1(1)	;SET CRY0		 FLAG
  1051	031032	403 01 0 00 031034 		SETZB	1,.+2		;CLEAR C(AC-RIGHT) AND C(PC)
  1052	031033	260 00 0 00 031036 		PUSHJ	.+3		;*PUSHJ SHOULD NOT MODIFY C(PC)
  1053	031034	000000	000000			0			;THIS LOCATION SHOULD NOT BE MODIFIED BY PUSHJ
  1054	031035	310 00 0 00 000000 		CAM			;PUSHJ SHOULD JUMP OVER THIS LOCATION
  1055	031036	332 00 0 00 031034 		SKIPE	.-2		;PASS IF PUSHJ DID NOT MODIFY C(PC)
  1056						STOP^
  1057	031037	254 04 0 00 031040 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1058	031040	324 00 0 00 031041 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1059
  1060					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 8
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSHJ INSTRUCTION                                                          SEQ 0035

  1061					;THIS TEST VERIFIES THAT PUSHJ DOES NOT STORE IN E
  1062					;IF PUSHJ STORED IN E, THIS TEST FAILS
  1063
  1064	031041				C30400:	SFLAG	CRY0		^;SET CRY0
  1065	031041	205 01 0 00 200000 		MOVSI	1,CRY0		
  1066	031042	255 17 0 00 031043 		JFCL	17,.+1		;RESET ALL FLAGS
  1067	031043	254 02 0 01 031044 		JRST	2,.+1(1)	;SET CRY0		 FLAG
  1068	031044	403 00 0 00 000001 		SETZB	1		;CLEAR AC AND C(AC-RIGHT
  1069	031045	260 00 0 00 031046 		PUSHJ	.+1		;*PUSHJ SHOULD NOT STORE IN E
  1070	031046	200 02 0 00 031046 		MOVE	2,.		;SAVE C(E)
  1071	031047	312 02 0 00 031046 		CAME	2,.-1		;FAIL IF PUSHJ STORED IN E
  1072						STOP^
  1073	031050	254 04 0 00 031051 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1074	031051	324 00 0 00 031052 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1075
  1076					;**********
  1077
  1078					;THIS TEST VERIFIES THAT PUSHJ DOES NOT STORE IN LOC 0
  1079					;PUSHJ SHOULD STORE PC IN C(AC-RIGHT) - LOCATION 2.
  1080					;IF PUSHJ STORES IN LOCATION 0, THIS TEST FAILS
  1081
  1082	031052	201 02 0 00 000001 	C30500:	MOVEI	2,1		;PRELOAD AC WITH 0,,1
  1083	031053	400 00 0 00 000000 		SETZ	0		;CLEAR 0
  1084	031054	260 02 0 00 031055 		PUSHJ	2,.+1		;*PUSHJ SHOULD NOT STORE IN LOCATION 0
  1085	031055	332 00 0 00 000000 		SKIPE			;FAIL IF PUSHJ STORED IN LOCATION 0
  1086						STOP^
  1087	031056	254 04 0 00 031057 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1088	031057	324 00 0 00 031060 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1089
  1090					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 9
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSHJ INSTRUCTION                                                          SEQ 0036

  1091					;THIS TEST VERIFIES THAT PUSHJ STORES THE PC IN THE LOCATION SPECIFIED
  1092					;BY C(AC-RIGHT) AFTER INCREMENTING AC.
  1093					;IN THIS TEST, AC AND C(AC-RIGHT) ARE CLEARED; THEN, PUSHJ IS EXECUTED.
  1094					;C(C(AC-RIGHT))IS THEN COMPARED TO ZERO.  IF C(C(AC-RIGHT)) IS NON-ZERO,
  1095					;A PC WAS STORED AND THIS TEST PASSES.
  1096
  1097	031060	403 00 0 00 000001 	C30600:	SETZB	1		;CLEAR AC, C(AC-RIGHT)
  1098	031061	260 00 0 00 031063 		PUSHJ	.+2		;*PUSHJ SHOULD STORE PC IN RIGHT HALF OF C(AC-RIGHT)
  1099	031062	254 04 0 00 031062 		HALT	.		;PUSHJ SHOULD JUMP OVER THIS INSTRUCTION
  1100	031063	405 01 0 00 777777 		ANDI	1,-1		;SAVE C(C(AC-RIGHT))
  1101	031064	306 01 0 00 031063 		CAIN	1,.-1		;FAIL IF PC WAS NOT STORED IN C(AC-RIGHT)
  1102						STOP^
  1103	031065	254 04 0 00 031066 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1104	031066	324 00 0 00 031067 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1105
  1106					;**********
  1107
  1108					;THIS TEST VERIFIES THAT PUSHJ ADDS 1,,1 TO THE AC
  1109					;THE AC IS CLEARED AND PUSHJ IS EXECUTED
  1110					;AC IS CHECKED FOR 1,,1 IF C(AC)=1,,1, THIS TEST PASSES
  1111
  1112	031067	400 00 0 00 000000 	C31000:	SETZ			;CLEAR AC
  1113	031070	260 00 0 00 031071 		PUSHJ	.+1		;*PUSHJ SHOULD PLACE 1,,1 INTO THE AC
  1114	031071	312 00 0 00 032223 		CAME	[1,,1]		;PASS IF C(AC)=1,,1
  1115						STOP^
  1116	031072	254 04 0 00 031073 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1117	031073	324 00 0 00 031074 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1118
  1119					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 10
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSHJ INSTRUCTION                                                          SEQ 0037

  1120					;THIS TEST VERIFIES THAT PUSHJ STORES THE FLAGS IN LEFT HALF OF C(AC-RIGHT)
  1121					;FIRST, CRY0 IS SET AND AC AND C(AC-RIGHT) ARE CLEARED; THEN, PUSHJ IS EXECUTED.
  1122					;C(C(AC-RIGHT)) IS THEN CHECKED FOR CRY0.  IF CRY0 IS SET, THIS TEST PASSES.
  1123
  1124	031074				C31100:	SFLAG	CRY0		^;SET CRY0
  1125	031074	205 01 0 00 200000 		MOVSI	1,CRY0		
  1126	031075	255 17 0 00 031076 		JFCL	17,.+1		;RESET ALL FLAGS
  1127	031076	254 02 0 01 031077 		JRST	2,.+1(1)	;SET CRY0		 FLAG
  1128	031077	403 00 0 00 000001 		SETZB	1		;CLEAR AC AND C(AC-RIGHT)
  1129	031100	260 00 0 00 031101 		PUSHJ	.+1		;*PUSHJ SHOULD STORE FLAGS IN LEFT HALF OF C(AC-RIGHT)
  1130	031101	607 01 0 00 200000 		TLNN	1,CRY0		;PASS IF CRY0 STORED CORRECTLY
  1131						STOP^
  1132	031102	254 04 0 00 031103 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1133	031103	324 00 0 00 031104 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1134
  1135					;**********
  1136
  1137					;THIS TEST VERIFIES THAT PUSHJ ADDS 1,,1 TO THE AC
  1138					;THE AC IS PRELOADED WITH 0,,1 AND PUSHJ IS EXECUTED
  1139					;AC IS CHECKED FOR 1,,2 IF C(AC)=1,,2, THIS TEST PASSES
  1140
  1141	031104	201 01 0 00 000001 	C31400:	MOVEI	1,1		;PRELOAD AC WITH 0,,1
  1142	031105	260 01 0 00 031107 		PUSHJ	1,.+2		;*PUSHJ SHOULD PLACE 1,,2 INTO THE AC
  1143	031106	254 04 0 00 000000 		HALT			;PUSHJ SHOULD JUMP OVER THIS INSTRUCTION
  1144	031107	312 01 0 00 032231 		CAME	1,[XWD 1,2]	;PASS IF AC WAS INCREMENTED CORRECTLY
  1145						STOP^
  1146	031110	254 04 0 00 031111 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1147	031111	324 00 0 00 031112 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1148
  1149					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 11
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSHJ INSTRUCTION                                                          SEQ 0038

  1150					;THIS TEST VERIFIES THAT PUSHJ STORES THE PC IN RIGHT HALF OF C(AC-RIGHT)
  1151					;THIS TEST PASSES IF THE PC WAS STORED CORRECTLY.
  1152
  1153	031112	201 01 0 00 000001 	C31500:	MOVEI	1,1		;PLACE 0,,1 INTO AC
  1154	031113	260 01 0 00 031115 		PUSHJ	1,.+2		;*PUSHJ SHOULD STORE .+1 INTO RIGHT HALF OF C(AC-RIGHT)
  1155	031114	254 04 0 00 000000 		HALT			;PUSHJ SHOULD JUMP OVER THIS PC
  1156	031115	405 02 0 00 777777 		ANDI	2,-1		;SAVE RIGHT HALF OF C(AC-RIGHT)
  1157	031116	302 02 0 00 031114 		CAIE	2,.-2		;PASS IF PC STORED CORRECTLY
  1158						STOP^
  1159	031117	254 04 0 00 031120 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1160	031120	324 00 0 00 031121 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1161
  1162					;**********
  1163
  1164					;THIS TEST VERIFIES THAT PUSHJ ALWAYS RESETS BIS.
  1165					;FIRST BIS IS SET; THEN PUSHJ IS EXECUTED.  THE FLAGS ARE
  1166					;THEN SAVED AND CHECKED.  IF BIS WAS RESET VIA PUSHJ, THIS TEST PASSES.
  1167
  1168	031121				C31501:	SFLAG	BIS		^;SET BIS
  1169	031121	205 01 0 00 020000 		MOVSI	1,BIS		
  1170	031122	255 17 0 00 031123 		JFCL	17,.+1		;RESET ALL FLAGS
  1171	031123	254 02 0 01 031124 		JRST	2,.+1(1)	;SET BIS		 FLAG
  1172	031124	400 00 0 00 000000 		SETZ			;CLEAR AC
  1173	031125	260 00 0 00 031126 		PUSHJ	.+1		;*PUSHJ SHOULD RESET BIS
  1174	031126	265 00 0 00 031127 		JSP	.+1		;SAVE FLAGS
  1175	031127	603 00 0 00 020000 		TLNE	BIS		;PASS IF BIS FLAG IS RESET
  1176						STOP^
  1177	031130	254 04 0 00 031131 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1178	031131	324 00 0 00 031132 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1179
  1180					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 12
DBKAGM	MAC	30-APR-76 17:10		TEST OF PUSHJ INSTRUCTION                                                          SEQ 0039

  1181					;THIS TEST VERIFIES THAT THERE IS NO CARRY FROM BIT 18 TO BIT 17 OF THE AC ON PUSHJ.
  1182					;THE AC IS PRELOADED WITH 0,,-1; THEN PUSHJ IS EXECUTED. PUSHJ SHOULD ADD ONE
  1183					;TO BOTH HALVES OF THE AC WITHOUT GENERATING A CARRY FROM BIT 18 TO BIT 17. IF NO
  1184					;CARRY WAS GENERATED, THIS TEST PASSES
  1185
  1186	031132	201 02 0 00 777777 	C31502:	MOVEI	2,-1		;PRELOAD AC WITH 0,,-1
  1187	031133	260 02 0 00 031134 		PUSHJ	2,.+1		;*PUSHJ SHOULD NOT GENERATE A CARRY FROM BIT 18 TO 17
  1188	031134	312 02 0 00 032230 		CAME	2,[1,,0]	;PASS IF C(AC)=1,,0 (NO CARRY WAS GENERATED)
  1189						STOP^
  1190	031135	254 04 0 00 031136 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1191	031136	324 00 0 00 031137 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1192
  1193					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 13
DBKAGM	MAC	30-APR-76 17:10		TEST OF POP INSTRUCTION                                                            SEQ 0040

  1194					SUBTTL	TEST OF POP INSTRUCTION
  1195
  1196					;**********
  1197
  1198					;THIS TEST VERIFIES THAT POP SUBTRACTS 1,,1 FROM THE AC
  1199					;THE AC IS PRELOADED WITH 1,,1; THEN, POP IS EXECUTED.
  1200					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  1201
  1202	031137	200 00 0 00 032223 	C31600:	MOVE	[XWD 1,1]	;PRELOAD AC WITH 1,,1
  1203	031140	262 00 0 00 000001 		POP	1		;*POP SHOULD SUBTRACT 1,,1 FROM THE AC
  1204	031141	332 00 0 00 000000 		SKIPE			;PASS IF AC WAS DECREMENTED CORRECTLY
  1205						STOP^
  1206	031142	254 04 0 00 031143 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1207	031143	324 00 0 00 031144 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1208
  1209					;**********
  1210
  1211					;THIS TEST VERIFIES THAT POP SUBTRACTS 1,,1 FROM THE AC
  1212					;THE AC IS PRELOADED WITH 2,,2; THEN, POP IS EXECUTED.
  1213					;THE AC IS CHECKED FOR 1,,1.  IF C(AC)=1,,1, THIS TEST PASSES.
  1214
  1215	031144	200 00 0 00 032232 	C31700:	MOVE	[XWD 2,2]	;PRELOAD AC WITH E,,E WHERE E=2
  1216	031145	201 02 0 00 000005 		MOVEI	2,5		;PRELOAD 2 WITH 0,,5
  1217	031146	262 00 0 00 000002 		POP	2		;*POP SHOULD SUBTRACT 1,,1 FROM THE AC
  1218	031147	312 00 0 00 032223 		CAME	[1,,1]		;PASS IF AC WAS DECREMENTED CORRECTLY
  1219						STOP^
  1220	031150	254 04 0 00 031151 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1221	031151	324 00 0 00 031152 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1222
  1223					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 14
DBKAGM	MAC	30-APR-76 17:10		TEST OF POP INSTRUCTION                                                            SEQ 0041

  1224					;THIS TEST VERIFIES THAT POP STORES C(C(AC-RIGHT)) INTO E
  1225					;IN THIS CASE, AC=0 AND AC IS PRELOADED WITH 2,,2; E=2 AND IS PRELOADED WITH 0.
  1226					;POP IS THEN EXECUTED.  POP SHOULD PLACE 0 INTO E.  IF C(E)=0, THIS TEST PASSES.
  1227
  1228	031152	200 00 0 00 032232 	C32300:	MOVE	[XWD 2,2]	;PRELOAD AC WITH 2,,2
  1229	031153	402 00 0 00 000002 		SETZM	2		;CLEAR E AND C(AC-RIGHT)
  1230	031154	262 00 0 00 000002 		POP	2		;*POP SHOULD PLACE 0 INTO E
  1231	031155	332 00 0 00 000002 		SKIPE	2		;PASS IF C(E)=0
  1232						STOP^
  1233	031156	254 04 0 00 031157 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1234	031157	324 00 0 00 031160 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1235
  1236					;**********
  1237
  1238					;THIS TEST VERIFIES THAT POP DOES NOT MODIFY C(C(AC-RIGHT)-1).
  1239					;THIS TEST FAILS IF C(C(AC-RIGHT)-1) IS MODIFIED BY POP.
  1240
  1241	031160	200 00 0 00 032232 	C32400:	MOVE	[XWD 2,2]	;PRELOAD AC WITH 2,,2
  1242	031161	201 02 0 00 000017 		MOVEI	2,17		;PRELOAD 2 WITH 0,,17
  1243	031162	402 00 0 00 000001 		SETZM	1		;CLEAR C(C(AC-RIGHT)-1)
  1244	031163	262 00 0 00 000002 		POP	2		;*POP SHOULD NOT MODIFY C(C(AC-RIGHT)-1)
  1245	031164	332 00 0 00 000001 		SKIPE	1		;PASS IF C(C(AC-RIGHT)-1) WAS UNALTERED
  1246						STOP^
  1247	031165	254 04 0 00 031166 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1248	031166	324 00 0 00 031167 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1249
  1250					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 15
DBKAGM	MAC	30-APR-76 17:10		TEST OF POP INSTRUCTION                                                            SEQ 0042

  1251					;THIS TEST VERIFIES THAT POP STORES C(C(AC-RIGHT)) INTO E.
  1252					;IN THIS CASE, AC IS PRELOADED WITH 2,,2 AND AC2 [C(AC-RIGHT)] IS PRELOADED WITH 0,,3.
  1253					;E IS CLEARED AND POP IS EXECUTED.  E IS THEN CHECKED FOR 0,,3 [C(C(AC-RIGHT))] .
  1254					;IF C(E)=0,,3, THIS TEST PASSES.
  1255
  1256	031167	200 00 0 00 032232 	C32500:	MOVE	[XWD 2,2]	;PRELOAD AC WITH 2,,2
  1257	031170	201 02 0 00 000003 		MOVEI	2,3		;PRELOAD C(AC-RIGHT) WITH 0,,3
  1258	031171	402 00 0 00 000003 		SETZM	3		;CLEAR E
  1259	031172	262 00 0 00 000003 		POP	3		;*POP SHOULD PLACE 0,,3 INTO E
  1260	031173	302 03 0 00 000003 		CAIE	3,3		;PASS IF C(E)=0,,3
  1261						STOP^
  1262	031174	254 04 0 00 031175 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1263	031175	324 00 0 00 031176 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1264
  1265					;**********
  1266
  1267					;THIS TEST VERIFIES THAT POP STORES C(C(AC-RIGHT)) INTO E.  IN THIS CASE,
  1268					;AC IS PRELOADED WITH 2,,2 AND AC2 [C(AC-RIGHT)] IS PRELOADED WITH 0,,17.
  1269					;E IS CLEARED AND POP IS EXECUTED.  E IS THEN CHECKED FOR 0,,17 [C(C(AC-RIGHT))] .
  1270					;IF C(E)=0,,17, THIS TEST PASSES.
  1271
  1272	031176	402 00 0 00 000002 	C32600:	SETZM	2		;CLEAR E
  1273	031177	200 00 0 00 032232 		MOVE	[XWD 2,2]	;PRELOAD AC WITH 2,,2
  1274	031200	201 02 0 00 000017 		MOVEI	2,17		;PRELOAD C(AC-RIGHT) WITH 0,,17
  1275	031201	262 00 0 00 000002 		POP	2		;*POP SHOULD PLACE 0,,17 INTO E
  1276	031202	302 02 0 00 000017 		CAIE	2,17		;PASS IF C(E)=0,,17
  1277						STOP^
  1278	031203	254 04 0 00 031204 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1279	031204	324 00 0 00 031205 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1280
  1281					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 16
DBKAGM	MAC	30-APR-76 17:10		TEST OF POP INSTRUCTION                                                            SEQ 0043

  1282					;THIS TEST VERIFIES THAT POP STORES C(C(AC-RIGHT)) INTO E.  IN THIS CASE,
  1283					;AC IS PRELOADED WITH 2,,2 AND AC2 [C(AC-RIGHT)] IS PRELOADED WITH -1,,-1.
  1284					;E IS CLEARED AND POP IS EXECUTED.  E IS THEN CHECKED FOR -1,,-1 [C(C(AC-RIGHT))] .
  1285					;IF C(E)=0,,3, THIS TEST PASSES.
  1286
  1287	031205	200 00 0 00 032232 	C33100:	MOVE	[XWD 2,2]	;PRELOAD AC WITH 2,,2
  1288	031206	476 00 0 00 000002 		SETOM	2		;PRELOAD C(AC-RIGHT) WITH -1,,-1
  1289	031207	402 00 0 00 000003 		SETZM	3		;CLEAR E
  1290	031210	262 00 0 00 000003 		POP	3		;*POP SHOULD PLACE -1,,-1 INTO E
  1291	031211	312 03 0 00 032226 		CAME	3,[-1]		;PASS IF C(E)=-1,,-1
  1292						STOP^
  1293	031212	254 04 0 00 031213 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1294	031213	324 00 0 00 031214 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1295
  1296					;**********
  1297
  1298					;THIS TEST VERIFIES THAT POP PLACES C(C(AC-RIGHT)) INTO E AND ADDS 1,,1 TO AC.
  1299					;IN THIS CASE, THE AC IS PRELOADED WITH 1,,17; E=1 AND E IS PRELOADED WITH 0;
  1300					;C(AC-RIGHT) IS PRELOADED WITH -1,,-1; AND POP IS EXECUTED.  POP SHOULD PLACE -1,,-1
  1301					;INTO E AND 0,,16 INTO AC.  IF AC AND E ARE UPDATED CORRECTLY, THIS TEST PASSES.
  1302
  1303	031214	200 00 0 00 032233 	C33300:	MOVE	[XWD 1,17]	;PRELOAD AC WITH 1,,17
  1304	031215	402 00 0 00 000001 		SETZM	1		;PRELOAD E WITH 0
  1305	031216	476 00 0 00 000017 		SETOM	17		;PRELOAD C(AC-RIGHT) WITH 1,,1
  1306	031217	262 00 0 00 000001 		POP	1		;*POP SHOULD PLACE -1,,-1 INTO E AND 0,,16 INTO AC
  1307	031220	312 01 0 00 032226 		CAME	1,[-1]		;PASS IF C(E)=-1,,-1
  1308						STOP^
  1309	031221	254 04 0 00 031222 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1310	031222	324 00 0 00 031223 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1311	031223	302 00 0 00 000016 	C33310:	CAIE	16		;PASS IF C(AC)=0,,16
  1312						STOP^
  1313	031224	254 04 0 00 031225 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1314	031225	324 00 0 00 031226 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1315
  1316					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 17
DBKAGM	MAC	30-APR-76 17:10		TEST OF POP INSTRUCTION                                                            SEQ 0044

  1317					;THIS TEST VERIFIES THAT POP PLACES C(C(AC-RIGHT)) INTO E AND ADDS 1,,1 TO AC
  1318					;IN THIS CASE, THE AC IS PRELOADED WITH -1,,0; E=17 
  1319					;C(AC-RIGHT) IS PRELOADED WITH 0; AND POP IS EXECUTED.  POP SHOULD PLACE 0
  1320					;INTO E.  IF AC IS UPDATED CORRECTLY, THIS TEST PASSES.
  1321
  1322	031226	205 01 0 00 777777 	C33400:	MOVSI	1,-1		;PRELOAD AC WITH -1,,0
  1323	031227	400 00 0 00 000000 		SETZ			;CLEAR C(AC-RIGHT)
  1324	031230	262 01 0 00 000017 		POP	1,17		;*POP SHOULD PLACE 0 INTO E
  1325	031231	332 00 0 00 000017 		SKIPE	17		;PASS IF C(E)=0
  1326						STOP^
  1327	031232	254 04 0 00 031233 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1328	031233	324 00 0 00 031234 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1329
  1330					;**********
  1331
  1332					;THIS TEST VERIFIES THAT THERE IS NO CARRY FROM BIT 18 TO BIT 17 OF THE AC ON POP.
  1333					;THE AC IS PRELOADED WITH 1,,0; THEN POP IS EXECUTED. POP SHOULD SUBTRACT ONE
  1334					;FROM BOTH HALVES OF THE AC WITHOUT GENERATING A CARRY FROM BIT 18 TO BIT 17. IF NO
  1335					;CARRY WAS GENERATED, THIS TEST PASSES
  1336
  1337	031234	515 02 0 00 000001 	C33401:	HRLZI	2,1		;PRELOAD AC WITH 1,,0
  1338	031235	262 02 0 00 000000 		POP	2,0		;*POP SHOULD NOT GENERATE A CARRY FROM BIT 18 TO 17
  1339	031236	302 02 0 00 777777 		CAIE	2,-1		;PASS IF C(AC)=0,,-1 (NO CARRY WAS GENERATED)
  1340						STOP^
  1341	031237	254 04 0 00 031240 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1342	031240	324 00 0 00 031241 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1343
  1344					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 18
DBKAGM	MAC	30-APR-76 17:10		TEST OF POPJ INSTRUCTION                                                           SEQ 0045

  1345					SUBTTL	TEST OF POPJ INSTRUCTION
  1346
  1347					;**********
  1348
  1349					;THIS TEST VERIFIES THAT POPJ JUMPS TO THE LOCATION ADDRESSED BY RIGHT HALF OF
  1350					;C(C(AC-RIGHT)) BEFORE POPJ DECREMENTED THE AC.
  1351					;THIS TEST PASSES IF POPJ JUMPS CORRECTLY.
  1352
  1353	031241	200 00 0 00 032223 	C33500:	MOVE	[XWD 1,1]	;PRELOAD AC WITH 1,,1
  1354	031242	201 01 0 00 031245 		MOVEI	1,.+3		;PRELOAD C(AC-RIGHT) WITH .+3
  1355	031243	263 00 0 00 031245 		POPJ	.+2		;*POPJ SHOULD JUMP TO LOCATION
  1356									;ADDRESSED BY C(C(AC-RIGHT))
  1357						STOP^
  1358	031244	254 04 0 00 031245 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1359	031245	324 00 0 00 031246 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1360
  1361					;**********
  1362
  1363					;THIS TEST VERIFIES THAT POPJ SUBTRACTS 1,,1 FROM THE AC
  1364					;THIS AC IS PRELOADED WITH 1,,1; THEN,POPJ IS EXECUTED.
  1365					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  1366
  1367	031246	200 00 0 00 032223 	C33600:	MOVE	[XWD 1,1]	;PRELOAD AC WITH 1,,1
  1368	031247	201 01 0 00 031251 		MOVEI	1,.+2		;PRELOAD C(AC-NIGHT)WITH .+2
  1369	031250	263 00 0 00 031251 		POPJ	.+1		;*POPJ SHOULD SUBTRACT 1,,1 FROM AC
  1370	031251	312 00 0 00 032227 		CAME	[0]		;PASS IF C(AC)=0
  1371						STOP^
  1372	031252	254 04 0 00 031253 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1373	031253	324 00 0 00 031254 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1374
  1375					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 19
DBKAGM	MAC	30-APR-76 17:10		TEST OF POPJ INSTRUCTION                                                           SEQ 0046

  1376					;THIS TEST VERIFIES THAT POPJ JUMPS TO THE LOCATION ADDRESSED BY RIGHT HALF OF
  1377					;C(C(AC-RIGHT)) BEFORE POPJ DECREMENTED THE AC.
  1378					;THIS TEST PASSES IF POPJ JUMPS CORRECTLY.
  1379
  1380	031254	200 00 0 00 032223 	C33700:	MOVE	[XWD 1,1]	;PRELOAD AC WITH 1,,1
  1381	031255	201 01 0 00 031257 		MOVEI	1,.+2		;PRELOAD C(AC-RIGHT) WITH C33700+3
  1382
  1383	031256	263 00 0 00 031260 		POPJ	.+2		;*POPJ SHOULD JUMP TO C33700+3
  1384	031257	334 00 0 00 000000 		SKIPA			;PASS IF POPJ JUMPED CORRECTLY
  1385						STOP^
  1386	031260	254 04 0 00 031261 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1387	031261	324 00 0 00 031262 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1388
  1389					;**********
  1390
  1391					;THIS TEST VERIFIES THAT THERE IS NO CARRY FROM BIT 18 TO BIT 17 OF THE AC ON POPJ.
  1392					;THE AC IS PRELOADED WITH 1,,0; THEN POPJ IS EXECUTED. POPJ SHOULD SUBTRACT ONE
  1393					;FROM BOTH HALVES OF THE AC WITHOUT GENERATING A CARRY FROM BIT 18 TO BIT 17. IF NO
  1394					;CARRY WAS GENERATED, THIS TEST PASSES
  1395
  1396	031262	515 02 0 00 000001 	C33701:	HRLZI	2,1		;PRELOAD AC WITH 1,,0
  1397	031263	201 00 0 00 031265 		MOVEI	0,.+2		;PRELOAD C(AC-RIGHT) WITH  C33701+3
  1398	031264	263 02 0 00 000000 		POPJ	2,0		;*POPJ SHOULD NOT GENERATE A CARRY FROM BIT 18 TO 17
  1399	031265	302 02 0 00 777777 		CAIE	2,-1		;PASS IF C(AC)=0,,-1 (NO CARRY WAS GENERATED)
  1400						STOP^
  1401	031266	254 04 0 00 031267 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1402	031267	324 00 0 00 031270 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1403
  1404					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 20
DBKAGM	MAC	30-APR-76 17:10		XCT INSTRUCTION - ADDITIONAL TESTS                                                 SEQ 0047

  1405					SUBTTL	XCT INSTRUCTION - ADDITIONAL TESTS
  1406
  1407					;**********
  1408
  1409					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A SKIP INSTRUCTION, THE SKIP IS RELATIVE
  1410					;TO THE LOCATION OF THE XCT.
  1411
  1412	031270	477 00 0 00 000001 	C34000:	SETOB	1
  1413	031271	256 00 0 00 032234 		XCT	[CAME 0,1]	;*CAME SHOULD SKIP TO C34000+3
  1414						STOP^
  1415	031272	254 04 0 00 031273 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1416	031273	324 00 0 00 031274 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1417
  1418					;**********
  1419
  1420					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A SKIP INSTRUCTION, THE SKIP IS RELATIVE
  1421					;TO THE LOCATION OF THE XCT.
  1422
  1423	031274	477 00 0 00 000001 	C34100:	SETOB	1
  1424	031275	256 00 0 00 032236 		XCT	[XCT[XCT[CAME 0,1]]]	;*CAME SHOULD SKIP TO C34100+3
  1425						STOP^
  1426	031276	254 04 0 00 031277 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1427	031277	324 00 0 00 031300 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1428
  1429					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 21
DBKAGM	MAC	30-APR-76 17:10		XCT INSTRUCTION - ADDITIONAL TESTS                                                 SEQ 0048

  1430					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A JUMP, PROGRAM FLOW IS ALTERED AS
  1431					;SPECIFIED BY THE JUMP.
  1432
  1433	031300	256 00 0 00 032237 	C34200:	XCT	[JRST .+4]	;*JRST SHOULD JUMP TO C34200+4
  1434
  1435	031301	254 04 0 00 000000 		HALT			;JRST SHOULD JUMP OVER THIS LOCATION
  1436	031302	254 04 0 00 000000 		HALT			;JRST SHOULD JUMP OVER THIS LOCATION
  1437						STOP^
  1438	031303	254 04 0 00 031304 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1439	031304	324 00 0 00 031305 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1440
  1441					;**********
  1442
  1443					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A JUMP, PROGRAM FLOW IS ALTERED AS
  1444					;SPECIFIED BY THE JUMP AND THAT WHEN THE PC IS SAVED IT CONTAINS AN
  1445					;ADDRESS ONE GREATER THAN THE LOCATION OF FIRST XCT OF THE CHAIN.
  1446
  1447	031305	402 00 0 00 000003 	C34300:	SETZM	3		;CLEAR AC OF JSP
  1448	031306	256 00 0 00 032242 		XCT	[XCT[XCT[JSP 3,.+3]]] ;*JSP SHOULD JUMP TO C34300+4 AND
  1449	031307	254 04 0 00 000000 		HALT			;THE SAVED PC SHOULD BE C 34300+2	
  1450	031310	254 04 0 00 000000 		HALT			;PASS IF JSP JUMPED CORRECTLY	
  1451	031311	620 03 0 00 031307 		TRZ	3,.-2		;AND SAVED PC=C34300+2
  1452	031312	602 03 0 00 777777 		TRNE	3,-1
  1453						STOP^
  1454	031313	254 04 0 00 031314 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1455	031314	324 00 0 00 031315 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1456
  1457					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 22
DBKAGM	MAC	30-APR-76 17:10		XCT INSTRUCTION - ADDITIONAL TESTS                                                 SEQ 0049

  1458					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A SKIP INSTRUCTION, THE SKIP IS RELATIVE
  1459					;TO THE LOCATION OF THE XCT.
  1460					;IN THIS CASE, NO SKIP SHOULD OCCUR  ;HENCE, THE INSTRUCTION
  1461					;FOLLOWING XCT SHOULD BE EXECUTED AFTER 'CAME' IS EXECUTED.
  1462
  1463	031315	403 00 0 00 000000 	C34400:	SETZB	0		;SET-UP AC,E SO THAT
  1464	031316	476 00 0 00 000001 		SETOM	1		;CAME WILL NOT SKIP
  1465	031317	256 00 0 00 032234 		XCT	[CAME 0,1]	;*CAME SHOULD CAUSE EXECUTION
  1466									;OF INSTRUCTION FOLLOWING XCT
  1467	031320	254 00 0 00 031322 		JRST	.+2		;PASS IF THIS INSTRUCTION IS EXECUTED
  1468						STOP^
  1469	031321	254 04 0 00 031322 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1470	031322	324 00 0 00 031323 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1471
  1472					;**********
  1473
  1474					;THIS TEST VERIFIES INDEXING FOR XCT OF AN ADD INSTRUCTION
  1475					;C(4)=10, AND C(6)=3, SO THE RESULT IN 6 (THE AC) SHOULD BE 16
  1476					;C(11)=13
  1477
  1478	031323	201 04 0 00 000010 	C34500:	MOVEI	4,10		;PRELOAD INDEX REG WITH 10
  1479	031324	201 11 0 00 000013 		MOVEI	11,13		;PRELOAD EFFECTIVE ADDRESS WITH 13
  1480	031325	201 06 0 00 000003 		MOVEI	6,3		;PRELOAD AC WITH 3
  1481	031326	256 00 0 00 032243 		XCT	[ADD 6,1(4)]	;*ADD SHOULD PLACE 16 IN AC
  1482	031327	302 06 0 00 000016 		CAIE	6,16		;PASS IF C(AC)=16
  1483						STOP^
  1484	031330	254 04 0 00 031331 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1485	031331	324 00 0 00 031332 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1486
  1487					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 23
DBKAGM	MAC	30-APR-76 17:10		XCT INSTRUCTION - ADDITIONAL TESTS                                                 SEQ 0050

  1488					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A SKIP INSTRUCTION, THE SKIP IS RELATIVE
  1489					;TO THE LOCATION OF THE XCT
  1490					;IN THIS CASE, NO SKIP SHOULD OCCUR  ;HENCE, THE INSTRUCTION
  1491					;FOLLOWING XCT SHOULD BE EXECUTED AFTER CAME IS EXECUTED.
  1492
  1493	031332	402 00 0 00 000002 	C34600:	SETZM	2		;SETUP E SO THAT SKIPL WILL NOT SKIP
  1494	031333	256 00 0 00 032244 		XCT	[SKIPL 1,2]	;*SKIPL SHOULD CAUSE INSTRUCTION
  1495									;OF FOLLOWING INSTRUCTION
  1496	031334	254 00 0 00 031336 		JRST	.+2		;PASS IF THIS INSTRUCTION IS EXECUTED.
  1497						STOP^
  1498	031335	254 04 0 00 031336 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1499	031336	324 00 0 00 031337 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1500	031337	332 00 0 00 000001 	C34610:	SKIPE	1		;*SKIPE SHOULD SKIP BECAUSE XCT OF SKIPL
  1501									;PLACED 0 INTO AC1
  1502						STOP^
  1503	031340	254 04 0 00 031341 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1504	031341	324 00 0 00 031342 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1505
  1506					;**********
  1507
  1508					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A SKIP INSTRUCTION, THE SKIP IS RELATIVE
  1509					;TO THE LOCATION OF THE XCT.
  1510
  1511	031342	476 00 0 00 000006 	C34700:	SETOM	6		;SETUP E SO THAT SKIPL WILL SKIP
  1512	031343	256 00 0 00 032245 		XCT	[SKIPL 3,6]	;*SKIPL SHOULD SKIP TO C34700+3
  1513						STOP^
  1514	031344	254 04 0 00 031345 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1515	031345	324 00 0 00 031346 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1516	031346	331 00 0 00 000003 	C34710:	SKIPL	3		;*SKIPE SHOULD SKIP BECAUSE XCT OF SKIPL
  1517									;PLACED 0 INTO AC1
  1518						STOP^
  1519	031347	254 04 0 00 031350 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1520	031350	324 00 0 00 031351 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1521
  1522					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 24
DBKAGM	MAC	30-APR-76 17:10		XCT INSTRUCTION - ADDITIONAL TESTS                                                 SEQ 0051

  1523					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A JUMP, PROGRAM FLOW IS ALTERED AS
  1524					;SPECIFIED BY THE JUMP.
  1525					;THIS TEST ALSO VERIFIES CORRECT UPDATING OF THE AC FOR AOBJN
  1526
  1527	031351	200 03 0 00 032246 	C35000:	MOVE	3,[-2,,5]	;SETUP AC SO THAT AOBJN WILL JUMP
  1528	031352	256 00 0 00 032247 		XCT	[AOBJN 3,.+3]	;*JUMP SHOULD BE TO C35000+4
  1529	031353	254 04 0 00 000000 		HALT			;JUMP OVER THIS INSTRUCTION
  1530	031354	254 04 0 00 000000 		HALT			;JUMP OVER THIS INSTRUCTION
  1531	031355	312 03 0 00 032250 		CAME	3,[-1,,6]	;PASS IF C(AC)=-1,,6 AND AOBJN JUMPED
  1532						STOP^
  1533	031356	254 04 0 00 031357 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1534	031357	324 00 0 00 031360 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1535
  1536					;**********
  1537
  1538					;THIS TEST VERIFIES THAT IF AN XCT EXECUTES A JUMP, PROGRAM FLOW IS ALTERED AS
  1539					;SPECIFIED BY THE JUMP.
  1540					;THIS TEST ALSO VERIFIES CORRECT UPDATING OF THE AC FOR AOBJN
  1541
  1542	031360	200 03 0 00 032250 	C35100:	MOVE	3,[-1,,6]	;SETUP AC SO THAT AOBJN WILL NOT JUMP
  1543	031361	256 00 0 00 032251 		XCT	[AOBJN 3,.+2]	;*AOBJN SHOULD NOT JUMP
  1544	031362	312 03 0 00 032252 		CAME	3,[0,,7]	;PASS IF AOBJN DID NOT JUMP AND C(AC)=0,,7
  1545						STOP^
  1546	031363	254 04 0 00 031364 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1547	031364	324 00 0 00 031365 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1548
  1549					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 25
DBKAGM	MAC	30-APR-76 17:10		TEST XCT INSTRUCTION WITH INDIRECT ADDRESSING AND INDEXING                         SEQ 0052

  1550					SUBTTL	TEST XCT INSTRUCTION WITH INDIRECT ADDRESSING AND INDEXING
  1551
  1552					;**********
  1553
  1554					;THIS TEST VERIFIES THAT XCT WILL EXECUTE AN INSTRUCTION
  1555					;FROM AN INDIRECTLY ADDRESSED LOCATION
  1556
  1557	031365	403 00 0 00 000002 	C35200:	SETZB	2
  1558	031366	254 00 0 00 031371 		JRST	.+3
  1559	031367	000000	031370				.+1
  1560	031370	476 00 0 00 000002 		SETOM	2		;THIS INSTRUCTION SHOULD BE EXECUTED
  1561	031371	256 00 1 00 031367 		XCT	@.-2
  1562	031372	312 02 0 00 032226 		CAME	2,[-1,,-1]	;PASS IF 'SETOM 2' WAS EXECUTED
  1563						STOP^
  1564	031373	254 04 0 00 031374 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1565	031374	324 00 0 00 031375 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1566
  1567					;**********
  1568
  1569					;THIS TEST VERIFIES THAT XCT WILL EXECUTE AN INSTRUCTION
  1570					;FROM AN INDEXED LOCATION
  1571
  1572	031375	201 04 0 00 031376 	C35300:	MOVEI	4,.+1
  1573	031376	254 00 0 00 031400 		JRST	.+2
  1574	031377	302 04 0 00 031376 		CAIE	4,.-1		;THIS INSTRUCTION SHOULD BE EXECUTED
  1575	031400	256 00 0 04 000001 		XCT	1(4)
  1576						STOP			^;PASS IF 'CAIE 4,,-1' WAS EXECUTED
  1577	031401	254 04 0 00 031402 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1578	031402	324 00 0 00 031403 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1579
  1580					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 26
DBKAGM	MAC	30-APR-76 17:10		TEST XCT INSTRUCTION WITH INDIRECT ADDRESSING AND INDEXING                         SEQ 0053

  1581					;THIS TEST VERIFIES THAT XCT WILL EXECUTE AN INSTRUCTION
  1582					;FROM AN INDIRECTLY ADDRESSED AND INDEXED LOCATION
  1583
  1584	031403	402 00 0 00 000005 	C35400:	SETZM	5
  1585	031404	201 03 0 00 031407 		MOVEI	3,.+3
  1586	031405	254 00 0 00 031407 		JRST	.+2
  1587	031406	201 05 0 00 031411 		MOVEI	5,.+3
  1588	031407	256 00 1 03 777777 		XCT	@-1(3)
  1589	031410	254 00 0 00 031412 		JRST	.+2
  1590	031411	476 00 0 00 000005 		SETOM	5		;THIS INSTRUCTION SHOULD BE EXECUTED
  1591	031412	312 05 0 00 032226 		CAME	5,[-1,,-1]	;PASS IF 'SETOM 5' WAS EXECUTED
  1592						STOP^
  1593	031413	254 04 0 00 031414 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1594	031414	324 00 0 00 031415 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1595
  1596					;**********
  1597
  1598					;THIS TEST VERIFIES THAT XCT WILL EXECUTE AN INDIRECTLY ADDRESSED
  1599					;AND INDEXED INSTRUCTION
  1600
  1601	031415	402 00 0 00 000003 	C35500:	SETZM	3
  1602	031416	201 10 0 00 000003 		MOVEI	10,3
  1603	031417	254 00 0 00 031424 		JRST	.+5
  1604	031420	254 04 0 00 000000 		HALT
  1605	031421	254 04 0 00 000000 		HALT
  1606	031422	200 03 1 10 031420 		MOVE	3,@.-2(10)	;THIS INSTRUCTION SHOULD BE EXECUTED
  1607	031423	254 04 0 00 032253 		HALT	[0,,707070]
  1608	031424	256 00 0 00 031422 		XCT	.-2
  1609	031425	302 03 0 00 707070 		CAIE	3,707070	;PASS IF 'MOVE 3,@.-2(10)' WAS EXECUTED
  1610						STOP^
  1611	031426	254 04 0 00 031427 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1612	031427	324 00 0 00 031430 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1613
  1614					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 27
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0054

  1615					SUBTTL	TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER
  1616
  1617					;**********
  1618
  1619					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1620					;IN THIS CASE, 0,,0 SHOULD BE ROTATED RIGHT 3 BIT POSITIONS
  1621					;SO THAT FINAL C(AC)=0,,0.
  1622					;C(AC+1) SHOULD NOT BE AFFECTED.
  1623
  1624	031430	200 00 0 00 032227 	C35600:	MOVE	0,[0,,0]	;PRELOAD AC WITH 0,,0
  1625	031431	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1626	031432	241 00 0 00 777775 		ROT	0,-3		;*ROT SHOULD ROTATE 0,,0 RIGHT 3 BIT POSITIONS
  1627	031433	312 00 0 00 032227 		CAME	0,[0,,0]	;PASS IF C(AC)=0,,0
  1628						STOP^
  1629	031434	254 04 0 00 031435 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1630	031435	324 00 0 00 031436 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1631	031436	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1632						STOP^
  1633	031437	254 04 0 00 031440 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1634	031440	324 00 0 00 031441 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1635
  1636					;**********
  1637
  1638					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1639					;IN THIS CASE, -1,,-1 SHOULD BE ROTATED RIGHT 3 BIT POSITIONS
  1640					;SO THAT FINAL C(AC)=-1,,-1.
  1641					;C(AC+1) SHOULD NOT BE AFFECTED.
  1642
  1643	031441	200 00 0 00 032226 	C35700:	MOVE	0,[-1,,-1]	;PRELOAD AC WITH 0,,0
  1644	031442	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1645	031443	241 00 0 00 777775 		ROT	0,-3		;*ROT SHOULD ROTATE -1,,-1 RIGHT 3 BIT POSITIONS
  1646	031444	312 00 0 00 032226 		CAME	0,[-1,,-1]	;PASS IF C(AC)=-1,,-1
  1647						STOP^
  1648	031445	254 04 0 00 031446 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1649	031446	324 00 0 00 031447 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1650	031447	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1651						STOP^
  1652	031450	254 04 0 00 031451 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1653	031451	324 00 0 00 031452 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1654
  1655					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 28
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0055

  1656					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1657					;IN THIS CASE, 252525,,252525 SHOULD BE ROTATED RIGHT 3 BIT POSITIONS
  1658					;SO THAT FINAL C(AC)=525252,,525252.
  1659					;C(AC+1) SHOULD NOT BE AFFECTED.
  1660
  1661	031452	200 00 0 00 032255 	C36000:	MOVE	0,[252525,,252525] ;PRELOAD AC WITH 252525,,252525
  1662	031453	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1663	031454	241 00 0 00 777775 		ROT	0,-3		;*ROT SHOULD ROTATE 252525,,252525
  1664									;RIGHT 3 BIT POSITIONS
  1665	031455	312 00 0 00 032256 		CAME	0,[525252,,525252] ;PASS IF C(AC)=525252,,525252
  1666						STOP^
  1667	031456	254 04 0 00 031457 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1668	031457	324 00 0 00 031460 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1669	031460	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1670						STOP^
  1671	031461	254 04 0 00 031462 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1672	031462	324 00 0 00 031463 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1673
  1674					;**********
  1675
  1676					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1677					;IN THIS CASE, 525252,,525252 SHOULD BE ROTATED RIGHT 3 BIT POSITIONS
  1678					;SO THAT FINAL C(AC)=252525,,252525.
  1679					;C(AC+1) SHOULD NOT BE AFFECTED.
  1680
  1681	031463	200 00 0 00 032256 	C36100:	MOVE	0,[525252,,525252] ;PRELOAD AC WITH 525252,,525252
  1682	031464	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1683	031465	241 00 0 00 777775 		ROT	0,-3		;*ROT SHOULD ROTATE 525252,,525252
  1684									;RIGHT 3 BIT POSITIONS
  1685	031466	312 00 0 00 032255 		CAME	0,[252525,,252525] ;PASS IF C(AC)=252525,,252525
  1686						STOP^
  1687	031467	254 04 0 00 031470 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1688	031470	324 00 0 00 031471 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1689	031471	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1690						STOP^
  1691	031472	254 04 0 00 031473 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1692	031473	324 00 0 00 031474 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1693
  1694					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 29
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0056

  1695					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1696					;IN THIS CASE, 230703,,603700 SHOULD BE ROTATED RIGHT 3 BIT POSITIONS
  1697					;SO THAT FINAL C(AC)=023070,,360370.
  1698					;C(AC+1) SHOULD NOT BE AFFECTED.
  1699
  1700	031474	200 00 0 00 032257 	C36200:	MOVE	0,[230703,,603700] ;PRELOAD AC WITH 230703,,603700
  1701	031475	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1702	031476	241 00 0 00 777775 		ROT	0,-3		;*ROT SHOULD ROTATE 230703,,603700
  1703									;RIGHT 3 BIT POSITIONS
  1704	031477	312 00 0 00 032260 		CAME	0,[023070,,360370] ;PASS IF C(AC)=023070,,360370
  1705						STOP^
  1706	031500	254 04 0 00 031501 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1707	031501	324 00 0 00 031502 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1708	031502	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1709						STOP^
  1710	031503	254 04 0 00 031504 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1711	031504	324 00 0 00 031505 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1712
  1713					;**********
  1714
  1715					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1716					;IN THIS CASE, 007603,,607062 SHOULD BE ROTATED RIGHT 3 BIT POSITIONS
  1717					;SO THAT FINAL C(AC)=200760,,360706.
  1718					;C(AC+1) SHOULD NOT BE AFFECTED.
  1719
  1720	031505	200 00 0 00 032261 	C36300:	MOVE	0,[007603,,607062] ;PRELOAD AC WITH 007603,,607062
  1721	031506	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1722	031507	241 00 0 00 777775 		ROT	0,-3		;*ROT SHOULD ROTATE 007603,,607062
  1723									;RIGHT 3 BIT POSITIONS
  1724	031510	312 00 0 00 032262 		CAME	0,[200760,,360706] ;PASS IF C(AC)=200760,,360706
  1725						STOP^
  1726	031511	254 04 0 00 031512 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1727	031512	324 00 0 00 031513 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1728	031513	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1729						STOP^
  1730	031514	254 04 0 00 031515 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1731	031515	324 00 0 00 031516 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1732
  1733					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 30
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0057

  1734					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1735					;IN THIS CASE, 0,,0 SHOULD BE ROTATED LEFT 15 BIT POSITIONS
  1736					;SO THAT FINAL C(AC)=0,,0.
  1737					;C(AC+1) SHOULD NOT BE AFFECTED.
  1738
  1739	031516	200 02 0 00 032227 	C36400:	MOVE	2,[0,,0]	;PRELOAD AC WITH 0,,0
  1740	031517	200 03 0 00 032254 		MOVE	3,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1741	031520	241 02 0 00 000015 		ROT	2,15		;*ROT SHOULD ROTATE 0,,0 LEFT 15 BIT POSITIONS
  1742	031521	312 02 0 00 032227 		CAME	2,[0,,0]	;PASS IF C(AC)=0,,0
  1743						STOP^
  1744	031522	254 04 0 00 031523 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1745	031523	324 00 0 00 031524 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1746	031524	312 03 0 00 032254 		CAME	3,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1747						STOP^
  1748	031525	254 04 0 00 031526 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1749	031526	324 00 0 00 031527 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1750
  1751					;**********
  1752
  1753					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1754					;IN THIS CASE, -1,,-1 SHOULD BE ROTATED LEFT 15 BIT POSITIONS
  1755					;SO THAT FINAL C(AC)=-1,,-1.
  1756					;C(AC+1) SHOULD NOT BE AFFECTED.
  1757
  1758	031527	200 02 0 00 032226 	C36500:	MOVE	2,[-1,,-1]	;PRELOAD AC WITH -1,,-1
  1759	031530	200 03 0 00 032254 		MOVE	3,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1760	031531	241 02 0 00 000015 		ROT	2,15		;*ROT SHOULD ROTATE -1,,-1 LEFT 15 BIT POSITIONS
  1761	031532	312 02 0 00 032226 		CAME	2,[-1,,-1]	;PASS IF C(AC)=-1,,-1
  1762						STOP^
  1763	031533	254 04 0 00 031534 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1764	031534	324 00 0 00 031535 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1765	031535	312 03 0 00 032254 		CAME	3,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1766						STOP^
  1767	031536	254 04 0 00 031537 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1768	031537	324 00 0 00 031540 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1769
  1770					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 31
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0058

  1771					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1772					;IN THIS CASE, 252525,,252525 SHOULD BE ROTATED LEFT 15 BIT POSITIONS
  1773					;SO THAT FINAL C(AC)=525252,,525252.
  1774					;C(AC+1) SHOULD NOT BE AFFECTED.
  1775
  1776	031540	200 02 0 00 032255 	C36600:	MOVE	2,[252525,,252525] ;PRELOAD AC WITH 252525,,252525
  1777	031541	200 03 0 00 032254 		MOVE	3,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1778	031542	241 02 0 00 000015 		ROT	2,15		;*ROT SHOULD ROTATE 252525,,252525
  1779									;LEFT 15 BIT POSITIONS
  1780	031543	312 02 0 00 032256 		CAME	2,[525252,,525252] ;PASS IF C(AC)=525252,,525252
  1781						STOP^
  1782	031544	254 04 0 00 031545 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1783	031545	324 00 0 00 031546 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1784	031546	312 03 0 00 032254 		CAME	3,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1785						STOP^
  1786	031547	254 04 0 00 031550 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1787	031550	324 00 0 00 031551 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1788
  1789					;**********
  1790
  1791					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1792					;IN THIS CASE, 525252,,525252 SHOULD BE ROTATED LEFT 15 BIT POSITIONS
  1793					;SO THAT FINAL C(AC)=252525,,252525.
  1794					;C(AC+1) SHOULD NOT BE AFFECTED.
  1795
  1796	031551	200 02 0 00 032256 	C36700:	MOVE	2,[525252,,525252] ;PRELOAD AC WITH 525252,,525252
  1797	031552	200 03 0 00 032254 		MOVE	3,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1798	031553	241 02 0 00 000015 		ROT	2,15		;*ROT SHOULD ROTATE 525252,,525252
  1799									;LEFT 15 BIT POSITIONS
  1800	031554	312 02 0 00 032255 		CAME	2,[252525,,252525] ;PASS IF C(AC)=252525,,252525
  1801						STOP^
  1802	031555	254 04 0 00 031556 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1803	031556	324 00 0 00 031557 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1804	031557	312 03 0 00 032254 		CAME	3,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1805						STOP^
  1806	031560	254 04 0 00 031561 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1807	031561	324 00 0 00 031562 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1808
  1809					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 32
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0059

  1810					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1811					;IN THIS CASE, 230703,,603700 SHOULD BE ROTATED LEFT 15 BIT POSITIONS
  1812					;SO THAT FINAL C(AC)074076,,004616.
  1813					;C(AC+1) SHOULD NOT BE AFFECTED.
  1814
  1815	031562	200 02 0 00 032257 	C37000:	MOVE	2,[230703,,603700] ;PRELOAD AC WITH 230703,,603700
  1816	031563	200 03 0 00 032254 		MOVE	3,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1817	031564	241 02 0 00 000015 		ROT	2,15		;*ROT SHOULD ROTATE 230703,,603700
  1818									;LEFT 15 BIT POSITIONS
  1819	031565	312 02 0 00 032263 		CAME	2,[074076,,004616] ;PASS IF C(AC)074076,,004616
  1820						STOP^
  1821	031566	254 04 0 00 031567 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1822	031567	324 00 0 00 031570 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1823	031570	312 03 0 00 032254 		CAME	3,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1824						STOP^
  1825	031571	254 04 0 00 031572 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1826	031572	324 00 0 00 031573 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1827
  1828					;**********
  1829
  1830					;THIS TEST VERIFIES THAT A ROT INSTRUCTION FUNCTIONS CORRECTLY.
  1831					;IN THIS CASE, 007603,,607062 SHOULD BE ROTATED LEFT 15 BIT POSITIONS
  1832					;SO THAT FINAL C(AC)074161,,440174.
  1833					;C(AC+1) SHOULD NOT BE AFFECTED.
  1834
  1835	031573	200 02 0 00 032261 	C37100:	MOVE	2,[007603,,607062] ;PRELOAD AC WITH 007603,,607062
  1836	031574	200 03 0 00 032254 		MOVE	3,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  1837	031575	241 02 0 00 000015 		ROT	2,15		;*ROT SHOULD ROTATE 007603,,607062
  1838									;LEFT 15 BIT POSITIONS
  1839	031576	312 02 0 00 032264 		CAME	2,[074161,,440174] ;PASS IF C(AC)074161,,440174
  1840						STOP^
  1841	031577	254 04 0 00 031600 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1842	031600	324 00 0 00 031601 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1843	031601	312 03 0 00 032254 		CAME	3,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  1844						STOP^
  1845	031602	254 04 0 00 031603 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1846	031603	324 00 0 00 031604 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1847
  1848					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 33
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0060

  1849					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1850					;IN THIS CASE, 0,,0 0,,0 SHOULD BE ROTATED LEFT 3 BIT POSITIONS
  1851					;SO THAT FINAL C(AC)=0,,0 AND FINAL C(AC+1)=0,,0
  1852
  1853	031604	200 00 0 00 032227 	C37200:	MOVE	0,[0,,0]	;PRELOAD AC WITH 0,,0
  1854	031605	200 01 0 00 032227 		MOVE	1,[0,,0]	;PRELOAD AC+1 WITH 0,,0
  1855	031606	245 00 0 00 000003 		ROTC	0,3		;*ROTC SHOULD ROTATE 0,,0 0,,0 LEFT 3 BIT POSITIONS
  1856	031607	312 00 0 00 032227 		CAME	0,[0,,0]	;PASS IF C(AC)=0,,0
  1857						STOP^
  1858	031610	254 04 0 00 031611 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1859	031611	324 00 0 00 031612 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1860	031612	312 01 0 00 032227 		CAME	1,[0,,0]	;PASS IF C(AC+1)=0,,0
  1861						STOP^
  1862	031613	254 04 0 00 031614 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1863	031614	324 00 0 00 031615 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1864
  1865					;**********
  1866
  1867					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1868					;IN THIS CASE, -1,,-1 -1,,-1 SHOULD BE ROTATED LEFT 3 BIT POSITIONS
  1869					;SO THAT FINAL C(AC)=-1,,-1 AND FINAL C(AC+1)=-1,,-1
  1870
  1871	031615	200 00 0 00 032226 	C37300:	MOVE	0,[-1,,-1]	;PRELOAD AC WITH -1,,-1
  1872	031616	200 01 0 00 032226 		MOVE	1,[-1,,-1]	;PRELOAD AC+1 WITH -1,,-1
  1873	031617	245 00 0 00 000003 		ROTC	0,3		;*ROTC SHOULD ROTATE -1,,-1
  1874									;-1,,-1 LEFT 3 BIT POSITIONS
  1875	031620	312 00 0 00 032226 		CAME	0,[-1,,-1]	;PASS IF C(AC)=-1,,-1
  1876						STOP^
  1877	031621	254 04 0 00 031622 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1878	031622	324 00 0 00 031623 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1879	031623	312 00 0 00 032226 		CAME	0,[-1,,-1]	;PASS IF C(AC+1)=-1,,-1
  1880						STOP^
  1881	031624	254 04 0 00 031625 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1882	031625	324 00 0 00 031626 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1883
  1884					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 34
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0061

  1885					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1886					;IN THIS CASE, 252525,,252525 252525,,252525 SHOULD BE ROTATED LEFT 3 BIT POSITIONS
  1887					;SO THAT FINAL C(AC)=525252,,525252 AND FINAL C(AC+1)=525252,,525252
  1888
  1889	031626	200 00 0 00 032255 	C37400:	MOVE	0,[252525,,252525]	;PRELOAD AC WITH 252525,,252525
  1890	031627	200 01 0 00 032255 		MOVE	1,[252525,,252525]	;PRELOAD AC+1 WITH 252525,,252525
  1891	031630	245 00 0 00 000003 		ROTC	0,3			;*ROTC SHOULD ROTATE 252525,,252525
  1892										;252525,,252525 LEFT 3 BIT POSITIONS
  1893	031631	312 00 0 00 032256 		CAME	0,[525252,,525252]	;PASS IF C(AC)=525252,,525252
  1894						STOP^
  1895	031632	254 04 0 00 031633 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1896	031633	324 00 0 00 031634 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1897	031634	312 01 0 00 032256 		CAME	1,[525252,,525252]	;PASS IF C(AC+1)=525252,,525252
  1898						STOP^
  1899	031635	254 04 0 00 031636 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1900	031636	324 00 0 00 031637 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1901
  1902					;**********
  1903
  1904					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1905					;IN THIS CASE, 525252,,525252 525252,,525252 SHOULD BE ROTATED LEFT 3 BIT POSITIONS
  1906					;SO THAT FINAL C(AC)=252525,,252525 AND FINAL C(AC+1)=252525,,252525
  1907
  1908	031637	200 00 0 00 032256 	C37500:	MOVE	0,[525252,,525252]	;PRELOAD AC WITH 525252,,525252
  1909	031640	200 01 0 00 032256 		MOVE	1,[525252,,525252]	;PRELOAD AC+1 WITH 525252,,525252
  1910	031641	245 00 0 00 000003 		ROTC	0,3			;*ROTC SHOULD ROTATE 525252,,525252
  1911										;525252,,525252 LEFT 3 BIT POSITIONS
  1912	031642	312 00 0 00 032255 		CAME	0,[252525,,252525]	;PASS IF C(AC)=252525,,252525
  1913						STOP^
  1914	031643	254 04 0 00 031644 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1915	031644	324 00 0 00 031645 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1916	031645	312 01 0 00 032255 		CAME	1,[252525,,252525]	;PASS IF C(AC+1)=252525,,252525
  1917						STOP^
  1918	031646	254 04 0 00 031647 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1919	031647	324 00 0 00 031650 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1920
  1921					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 35
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0062

  1922					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1923					;IN THIS CASE, 230703,,603700 770037,,600377 SHOULD BE ROTATED LEFT 3 BIT POSITIONS
  1924					;SO THAT FINAL C(AC)=307036,,37007 AND FINAL C(AC+1)=700376,,003772
  1925
  1926	031650	200 00 0 00 032257 	C37600:	MOVE	0,[230703,,603700]	;PRELOAD AC WITH 230703,,603700
  1927	031651	200 01 0 00 032265 		MOVE	1,[770037,,600377]	;PRELOAD AC+1 WITH 770037,,600377
  1928	031652	245 00 0 00 000003 		ROTC	0,3			;*ROTC SHOULD ROTATE 230703,,603700
  1929										;770037,,600377 LEFT 3 BIT POSITIONS
  1930	031653	312 00 0 00 032266 		CAME	0,[307036,,037007]	;PASS IF C(AC)=307036,,37007
  1931						STOP^
  1932	031654	254 04 0 00 031655 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1933	031655	324 00 0 00 031656 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1934	031656	312 01 0 00 032267 		CAME	1,[700376,,003772]	;PASS IF C(AC+1)=700376,,003772
  1935						STOP^
  1936	031657	254 04 0 00 031660 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1937	031660	324 00 0 00 031661 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1938
  1939					;**********
  1940
  1941					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1942					;IN THIS CASE, 776003,,760077 007603,,607062 SHOULD BE ROTATED LEFT 3 BIT POSITIONS
  1943					;SO THAT FINAL C(AC)=760037,,600770 AND FINAL C(AC+1)=076036,,070627
  1944
  1945	031661	200 00 0 00 032270 	C37700:	MOVE	0,[776003,,760077]	;PRELOAD AC WITH 776003,,760077
  1946	031662	200 01 0 00 032261 		MOVE	1,[007603,,607062]	;PRELOAD AC+1 WITH 007603,,607062
  1947	031663	245 00 0 00 000003 		ROTC	0,3			;*ROTC SHOULD ROTATE 776003,,760077
  1948										;007603,,607062 LEFT 3 BIT POSITIONS
  1949	031664	312 00 0 00 032271 		CAME	0,[760037,,600770]	;PASS IF C(AC)=076036,,070627
  1950						STOP^
  1951	031665	254 04 0 00 031666 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1952	031666	324 00 0 00 031667 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1953	031667	312 01 0 00 032272 		CAME	1,[076036,,070627]	;PASS IF C(AC+1)=760037,,600770
  1954						STOP^
  1955	031670	254 04 0 00 031671 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1956	031671	324 00 0 00 031672 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1957
  1958					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 36
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0063

  1959					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1960					;IN THIS CASE, 0,,0 0,,0 SHOULD BE ROTATED LEFT 7 BIT POSITIONS
  1961					;SO THAT FINAL C(AC)=0,,0 AND FINAL C(AC+1)=0,,0
  1962
  1963	031672	200 00 0 00 032227 	C40000:	MOVE	0,[0,,0]	;PRELOAD AC WITH 0,,0
  1964	031673	200 01 0 00 032227 		MOVE	1,[0,,0]	;PRELOAD AC+1 WITH 0,,0
  1965	031674	245 00 0 00 000007 		ROTC	0,7		;*ROTC SHOULD ROTATE 0,,0 0,,0 LEFT 7 BIT POSITIONS
  1966	031675	312 00 0 00 032227 		CAME	0,[0,,0]	;PASS IF C(AC)=0,,0
  1967						STOP^
  1968	031676	254 04 0 00 031677 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1969	031677	324 00 0 00 031700 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1970	031700	312 01 0 00 032227 		CAME	1,[0,,0]	;PASS IF C(AC+1)=0,,0
  1971						STOP^
  1972	031701	254 04 0 00 031702 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1973	031702	324 00 0 00 031703 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1974
  1975					;**********
  1976
  1977					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1978					;IN THIS CASE, -1,,-1 -1,,-1  SHOULD BE ROTATED LEFT 7 BIT POSITIONS
  1979					;SO THAT FINAL C(AC)=-1,,-1 AND FINAL C(AC+1)=-1,,-1
  1980
  1981	031703	200 00 0 00 032226 	C40100:	MOVE	0,[-1,,-1]	;PRELOAD AC WITH -1,,-1
  1982	031704	200 01 0 00 032226 		MOVE	1,[-1,,-1]	;PRELOAD AC+1 WITH -1,,-1
  1983	031705	245 00 0 00 000007 		ROTC	0,7		;*ROTC SHOULD ROTATE -1,,-1
  1984									;-1,,-1 LEFT 7 BIT POSITIONS
  1985	031706	312 00 0 00 032226 		CAME	0,[-1,,-1]	;PASS IF C(AC)=-1,,-1
  1986						STOP^
  1987	031707	254 04 0 00 031710 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1988	031710	324 00 0 00 031711 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1989	031711	312 01 0 00 032226 		CAME	1,[-1,,-1]	;PASS IF C(AC+1)=-1,,-1
  1990						STOP^
  1991	031712	254 04 0 00 031713 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1992	031713	324 00 0 00 031714 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  1993
  1994					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 37
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0064

  1995					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  1996					;IN THIS CASE, 252525,,252525 252525,,252525 SHOULD BE ROTATED LEFT 7 BIT POSITIONS
  1997					;SO THAT FINAL C(AC)=525252,,525252 AND FINAL C(AC+1)=525252,,525252
  1998
  1999	031714	200 00 0 00 032255 	C40200:	MOVE	0,[252525,,252525]	;PRELOAD AC WITH 252525,,252525
  2000	031715	200 01 0 00 032255 		MOVE	1,[252525,,252525]	;PRELOAD AC+1 WITH 252525,,252525
  2001	031716	245 00 0 00 000007 		ROTC	0,7			;*ROTC SHOULD ROTATE 252525,,252525
  2002										;252525,,252525 LEFT 7 BIT POSITIONS
  2003	031717	312 00 0 00 032256 		CAME	0,[525252,,525252]	;PASS IF C(AC)=525252,,525252
  2004						STOP^
  2005	031720	254 04 0 00 031721 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2006	031721	324 00 0 00 031722 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2007	031722	312 01 0 00 032256 		CAME	1,[525252,,525252]	;PASS IF C(AC+1)=525252,,525252
  2008						STOP^
  2009	031723	254 04 0 00 031724 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2010	031724	324 00 0 00 031725 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2011
  2012					;**********
  2013
  2014					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  2015					;IN THIS CASE, 525252,,525252 525252,,525252 SHOULD BE ROTATED LEFT 7 BIT POSITIONS
  2016					;SO THAT FINAL C(AC)=252525,,252525 AND FINAL C(AC+1)=252525,,252525 
  2017
  2018	031725	200 00 0 00 032256 	C40300:	MOVE	0,[525252,,525252]	;PRELOAD AC WITH 525252,,525252
  2019	031726	200 01 0 00 032256 		MOVE	1,[525252,,525252]	;PRELOAD AC+1 WITH 525252,,525252
  2020	031727	245 00 0 00 000007 		ROTC	0,7			;*ROTC SHOULD ROTATE 525252,,525252
  2021										;525252,,525252 LEFT 7 BIT POSITIONS
  2022	031730	312 00 0 00 032255 		CAME	0,[252525,,252525]	;PASS IF C(AC)=252525,,252525
  2023						STOP^
  2024	031731	254 04 0 00 031732 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2025	031732	324 00 0 00 031733 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2026	031733	312 01 0 00 032255 		CAME	1,[252525,,252525]	;PASS IF C(AC+1)=252525,,252525
  2027						STOP^
  2028	031734	254 04 0 00 031735 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2029	031735	324 00 0 00 031736 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2030
  2031					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 38
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0065

  2032					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  2033					;IN THIS CASE, 230703,,603700 770037,,600377 SHOULD BE ROTATED LEFT 7 BIT POSITIONS
  2034					;SO THAT FINAL C(AC)=160740,,760176 AND FINAL C(AC+1)=007740,,077646
  2035
  2036	031736	200 00 0 00 032257 	C40400:	MOVE	0,[230703,,603700]	;PRELOAD AC WITH 230703,,603700
  2037	031737	200 01 0 00 032265 		MOVE	1,[770037,,600377]	;PRELOAD AC+1 WITH 770037,,600377
  2038	031740	245 00 0 00 000007 		ROTC	0,7			;*ROTC SHOULD ROTATE 230703,,603700
  2039										;770037,,600377 LEFT 7 BIT POSITIONS
  2040	031741	312 00 0 00 032273 		CAME	0,[160740,,760176]	;PASS IF C(AC)=160740,,760176
  2041						STOP^
  2042	031742	254 04 0 00 031743 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2043	031743	324 00 0 00 031744 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2044	031744	312 01 0 00 032274 		CAME	1,[007740,,077646]	;PASS IF C(AC+1)=007740,,077646
  2045						STOP^
  2046	031745	254 04 0 00 031746 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2047	031746	324 00 0 00 031747 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2048
  2049					;**********
  2050
  2051					;THIS TEST VERIFIES THAT A ROTC INSTRUCTION FUNCTIONS CORRECTLY.
  2052					;IN THIS CASE, 776003,,760077 007603,,607063 SHOULD BE ROTATED LEFT 7 BIT POSITIONS
  2053					;SO THAT FINAL C(AC)=400774,,017610 AND FINAL C(AC+1)=740741,,614577
  2054
  2055	031747	200 00 0 00 032270 	C40500:	MOVE	0,[776003,,760077]	;PRELOAD AC WITH 776003,,760077
  2056	031750	200 01 0 00 032261 		MOVE	1,[007603,,607062]	;PRELOAD AC+1 WITH 007603,,607062
  2057	031751	245 00 0 00 000007 		ROTC	0,7			;*ROTC SHOULD ROTATE 776003,,760077
  2058										;007603,,607062 LEFT 7 BIT POSITIONS
  2059	031752	312 00 0 00 032275 		CAME	0,[400774,,017601]	;PASS IF C(AC)=400774,,017601
  2060						STOP^
  2061	031753	254 04 0 00 031754 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2062	031754	324 00 0 00 031755 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2063	031755	312 01 0 00 032276 		CAME	1,[740741,,614577]	;PASS IF C(AC+1)=740741,,614577
  2064						STOP^
  2065	031756	254 04 0 00 031757 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2066	031757	324 00 0 00 031760 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2067
  2068					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 39
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0066

  2069					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2070					;IN THIS CASE, 0,,0 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2071					;SO THAT FINAL C(AC)=0,,0.
  2072					;C(AC+1) SHOULD NOT BE AFFECTED
  2073
  2074	031760	200 00 0 00 032227 	C40600:	MOVE	0,[0,,0]	;PRELOAD AC WITH 0,,0
  2075	031761	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  2076	031762	242 00 0 00 777745 		LSH	0,-33		;*LSH SHOULD LOGICALLY SHIFT 0,,0
  2077									;RIGHT 33 OCTAL BIT POSITIONS
  2078	031763	312 00 0 00 032227 		CAME	0,[0,,0]	;PASS IF C(AC)=0,,0
  2079						STOP^
  2080	031764	254 04 0 00 031765 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2081	031765	324 00 0 00 031766 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2082	031766	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  2083						STOP^
  2084	031767	254 04 0 00 031770 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2085	031770	324 00 0 00 031771 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2086
  2087					;**********
  2088
  2089					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2090					;IN -1,,-1 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2091					;SO THAT FINAL C(AC)=0,,777.
  2092					;C(AC+1) SHOULD NOT BE AFFECTED
  2093
  2094	031771	200 00 0 00 032226 	C40700:	MOVE	0,[-1,,-1]	;PRELOAD AC WITH -1,,-1
  2095	031772	200 01 0 00 032254 		MOVE	1,[172737,,405060] ;PRELOAD AC+1 WITH 172737,,405060
  2096	031773	242 00 0 00 777745 		LSH	0,-33		;*LSH SHOULD LOGICALLY SHIFT -1,,-1
  2097									;RIGHT 33 OCTAL BIT POSITIONS
  2098	031774	312 00 0 00 032277 		CAME	0,[0,777]	;PASS IF C(AC)=0,,777
  2099						STOP^
  2100	031775	254 04 0 00 031776 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2101	031776	324 00 0 00 031777 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2102	031777	312 01 0 00 032254 		CAME	1,[172737,,405060] ;PASS IF C(AC+1) NOT AFFECTED
  2103						STOP^
  2104	032000	254 04 0 00 032001 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2105	032001	324 00 0 00 032002 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2106
  2107					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 40
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0067

  2108					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2109					;IN 252525,,252525 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2110					;SO THAT FINAL C(AC)=0,,252.
  2111					;C(AC+1) SHOULD NOT BE AFFECTED
  2112
  2113	032002	200 00 0 00 032255 	C41000:	MOVE	0,[252525,,252525]	;PRELOAD AC WITH 252525,,252525
  2114	032003	200 01 0 00 032254 		MOVE	1,[172737,,405060] 	;PRELOAD AC+1 WITH 172737,,405060
  2115	032004	242 00 0 00 777745 		LSH	0,-33			;*LSH SHOULD LOGICALLY SHIFT 252525,,252525
  2116										;RIGHT 33 OCTAL BIT POSITIONS
  2117	032005	312 00 0 00 032300 		CAME	0,[0,,252]		;PASS IF C(AC)=0,,252
  2118						STOP^
  2119	032006	254 04 0 00 032007 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2120	032007	324 00 0 00 032010 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2121	032010	312 01 0 00 032254 		CAME	1,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2122						STOP^
  2123	032011	254 04 0 00 032012 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2124	032012	324 00 0 00 032013 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2125
  2126					;**********
  2127
  2128					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2129					;IN THIS CASE, 525252,,525252 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2130					;SO THAT FINAL C(AC)=0,,525.
  2131					;C(AC+1) SHOULD NOT BE AFFECTED
  2132
  2133	032013	200 00 0 00 032256 	C41100:	MOVE	0,[525252,,525252]	;PRELOAD AC WITH 525252,,525252
  2134	032014	200 01 0 00 032254 		MOVE	1,[172737,,405060]	;PRELOAD AC+1 WITH 172737,,405060
  2135	032015	242 00 0 00 777745 		LSH	0,-33			;*LSH SHOULD LOGICALLY SHIFT 525252,,525252
  2136										;RIGHT 33 OCTAL BIT POSITIONS
  2137	032016	312 00 0 00 032301 		CAME	0,[0,,525]		;PASS IF C(AC)=0,,525
  2138						STOP^
  2139	032017	254 04 0 00 032020 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2140	032020	324 00 0 00 032021 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2141	032021	312 01 0 00 032254 		CAME	1,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2142						STOP^
  2143	032022	254 04 0 00 032023 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2144	032023	324 00 0 00 032024 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2145
  2146					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 41
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0068

  2147					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2148					;IN THIS CASE, 230703,,603700 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2149					;SO THAT FINAL C(AC)=0,,230.
  2150					;C(AC+1) SHOULD NOT BE AFFECTED
  2151
  2152	032024	200 00 0 00 032257 	C41200:	MOVE	0,[230703,,603700]	;PRELOAD AC WITH 230703,,603700
  2153	032025	200 01 0 00 032254 		MOVE	1,[172737,,405060]	;PRELOAD AC+1 WITH 172737,,405060
  2154	032026	242 00 0 00 777745 		LSH	0,-33			;*LSH SHOULD LOGICALLY SHIFT 230703,,603700
  2155										;RIGHT 33 OCTAL BIT POSITIONS
  2156	032027	312 00 0 00 032302 		CAME	0,[0,,230]		;PASS IF C(AC)=230703,,603700
  2157						STOP^
  2158	032030	254 04 0 00 032031 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2159	032031	324 00 0 00 032032 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2160	032032	312 01 0 00 032254 		CAME	1,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2161						STOP^
  2162	032033	254 04 0 00 032034 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2163	032034	324 00 0 00 032035 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2164
  2165					;**********
  2166
  2167					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2168					;IN THIS CASE, 007603,,607062 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2169					;SO THAT FINAL C(AC)=0,,7.
  2170					;C(AC+1) SHOULD NOT BE AFFECTED
  2171
  2172	032035	200 00 0 00 032261 	C41300:	MOVE	0,[007603,,607062]	;PRELOAD AC WITH 007603,,607062
  2173	032036	200 01 0 00 032254 		MOVE	1,[172737,,405060]	;PRELOAD AC+1 WITH 172737,,405060
  2174	032037	242 00 0 00 777745 		LSH	0,-33			;*LSH SHOULD LOGICALLY SHIFT 007603,,6070062
  2175										;RIGHT 33 OCTAL BIT POSITIONS
  2176	032040	312 00 0 00 032252 		CAME	0,[0,,7]		;PASS IF C(AC)=0,,7
  2177						STOP^
  2178	032041	254 04 0 00 032042 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2179	032042	324 00 0 00 032043 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2180	032043	312 01 0 00 032254 		CAME	1,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2181						STOP^
  2182	032044	254 04 0 00 032045 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2183	032045	324 00 0 00 032046 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2184
  2185					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 42
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0069

  2186					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2187					;IN THIS CASE, 0,,0 SHOULD BE LOGICALLY SHIFTED RIGHT 27 OCTAL BIT POSITIONS
  2188					;SO THAT FINAL C(AC)=0,,0.
  2189					;C(AC+1) SHOULD NOT BE AFFECTED
  2190
  2191	032046	200 01 0 00 032227 	C41400:	MOVE	1,[0,,0]	;PRELOAD AC WITH 0,,0
  2192	032047	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2193	032050	242 01 0 00 777751 		LSH	1,-27		;*LSH SHOULD LOGICALLY SHIFT 0,,0
  2194									;RIGHT 27 OCTAL BIT POSITIONS
  2195	032051	312 01 0 00 032227 		CAME	1,[0,,0]	;PASS IF C(AC)=0,,0
  2196						STOP^
  2197	032052	254 04 0 00 032053 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2198	032053	324 00 0 00 032054 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2199	032054	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2200						STOP^
  2201	032055	254 04 0 00 032056 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2202	032056	324 00 0 00 032057 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2203
  2204					;**********
  2205
  2206					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2207					;IN THIS CASE, -1,,-1 SHOULD BE LOGICALLY SHIFTED RIGHT 27 OCTAL BIT POSITIONS
  2208					;SO THAT FINAL C(AC)=0,,17777.
  2209					;C(AC+1) SHOULD NOT BE AFFECTED
  2210
  2211	032057	200 01 0 00 032226 	C41500:	MOVE	1,[-1,,-1]	;PRELOAD AC WITH -1,,-1
  2212	032060	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2213	032061	242 01 0 00 777751 		LSH	1,-27		;*LSH SHOULD LOGICALLY SHIFT -1,,-1
  2214									;RIGHT 27 OCTAL BIT POSITIONS
  2215	032062	312 01 0 00 032303 		CAME	1,[0,,17777]	;PASS IF C(AC)=0,17777
  2216						STOP^
  2217	032063	254 04 0 00 032064 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2218	032064	324 00 0 00 032065 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2219	032065	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2220						STOP^
  2221	032066	254 04 0 00 032067 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2222	032067	324 00 0 00 032070 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2223
  2224					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 43
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0070

  2225					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2226					;IN THIS CASE, 252525,,252525 SHOULD BE LOGICALLY SHIFTED RIGHT 27 OCTAL BIT POSITIONS
  2227					;SO THAT FINAL C(AC)=0,,5252.
  2228					;C(AC+1) SHOULD NOT BE AFFECTED
  2229
  2230	032070	200 01 0 00 032255 	C41600:	MOVE	1,[252525,,252525]	;PRELOAD AC WITH 252525,,252525
  2231	032071	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2232	032072	242 01 0 00 777751 		LSH	1,-27			;*LSH SHOULD LOGICALLY SHIFT 252525,,252525
  2233										;RIGHT 27 OCTAL BIT POSITIONS
  2234	032073	312 01 0 00 032304 		CAME	1,[0,,5252]		;PASS IF C(AC)=0,,5252
  2235						STOP^
  2236	032074	254 04 0 00 032075 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2237	032075	324 00 0 00 032076 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2238	032076	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2239						STOP^
  2240	032077	254 04 0 00 032100 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2241	032100	324 00 0 00 032101 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2242
  2243					;**********
  2244
  2245					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2246					;IN THIS CASE, 525252,,525252 SHOULD BE LOGICALLY SHIFTED RIGHT 27 OCTAL BIT POSITIONS
  2247					;SO THAT FINAL C(AC)=0,,12525.
  2248					;C(AC+1) SHOULD NOT BE AFFECTED
  2249
  2250	032101	200 01 0 00 032256 	C41700:	MOVE	1,[525252,,525252]	;PRELOAD AC WITH 525252,,525252
  2251	032102	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2252	032103	242 01 0 00 777751 		LSH	1,-27			;*LSH SHOULD LOGICALLY SHIFT 525252,,525252
  2253										;RIGHT 27 OCTAL BIT POSITIONS
  2254	032104	312 01 0 00 032305 		CAME	1,[0,,12525]		;PASS IF C(AC)=0,,12525
  2255						STOP^
  2256	032105	254 04 0 00 032106 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2257	032106	324 00 0 00 032107 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2258	032107	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2259						STOP^
  2260	032110	254 04 0 00 032111 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2261	032111	324 00 0 00 032112 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2262
  2263					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 44
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0071

  2264					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2265					;IN THIS CASE, 230703,602700 SHOULD BE LOGICALLY SHIFTED RIGHT 27 OCTAL BIT POSITIONS
  2266					;SO THAT FINAL C(AC)=0,,4616.
  2267					;C(AC+1) SHOULD NOT BE AFFECTED
  2268
  2269	032112	200 01 0 00 032257 	C42000:	MOVE	1,[230703,,603700]	;PRELOAD AC WITH 230703,603700
  2270	032113	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2271	032114	242 01 0 00 777751 		LSH	1,-27			;*LSH SHOULD LOGICALLY SHIFT 230703,,603700
  2272										;RIGHT 27 OCTAL BIT POSITIONS
  2273	032115	312 01 0 00 032306 		CAME	1,[0,,4616]		;PASS IF C(AC)=0,,4616
  2274						STOP^
  2275	032116	254 04 0 00 032117 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2276	032117	324 00 0 00 032120 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2277	032120	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2278						STOP^
  2279	032121	254 04 0 00 032122 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2280	032122	324 00 0 00 032123 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2281
  2282					;**********
  2283
  2284					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2285					;IN THIS CASE, 007603,,607062 SHOULD BE LOGICALLY SHIFTED RIGHT 27 OCTAL BIT POSITIONS
  2286					;SO THAT FINAL C(AC)=0,,174.
  2287					;C(AC+1) SHOULD NOT BE AFFECTED
  2288
  2289	032123	200 01 0 00 032261 	C42100:	MOVE	1,[007603,,607062]	;PRELOAD AC WITH 007603,,607062
  2290	032124	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2291	032125	242 01 0 00 777751 		LSH	1,-27			;*LSH SHOULD LOGICALLY SHIFT 007603,,607062
  2292										;RIGHT 27 OCTAL BIT POSITIONS
  2293	032126	312 01 0 00 032307 		CAME	1,[0,,174]		;PASS IF C(AC)=0,,174
  2294						STOP^
  2295	032127	254 04 0 00 032130 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2296	032130	324 00 0 00 032131 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2297	032131	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2298						STOP^
  2299	032132	254 04 0 00 032133 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2300	032133	324 00 0 00 032134 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2301
  2302					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 45
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0072

  2303					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2304					;IN THIS CASE, 0,,0 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2305					;SO THAT FINAL C(AC)=0,,0.
  2306					;C(AC+1) SHOULD NOT BE AFFECTED
  2307
  2308	032134	200 01 0 00 032227 	C42200:	MOVE	1,[0,0]		;PRELOAD AC WITH 0,,0
  2309	032135	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2310	032136	242 01 0 00 777745 		LSH	1,-33		;*LSH SHOULD LOGICALLY SHIFT 0,,0
  2311									;RIGHT 33 OCTAL BIT POSITIONS
  2312	032137	312 01 0 00 032227 		CAME	1,[0,,0]	;PASS IF C(AC)=0,,0
  2313						STOP^
  2314	032140	254 04 0 00 032141 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2315	032141	324 00 0 00 032142 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2316	032142	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2317						STOP^
  2318	032143	254 04 0 00 032144 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2319	032144	324 00 0 00 032145 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2320
  2321					;**********
  2322
  2323					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2324					;IN THIS CASE, -1,,-1 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2325					;SO THAT FINAL C(AC)=0,,777.
  2326					;C(AC+1) SHOULD NOT BE AFFECTED
  2327
  2328	032145	200 01 0 00 032226 	C42300:	MOVE	1,[-1,,-1]	;PRELOAD AC WITH -1,,-1
  2329	032146	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2330	032147	242 01 0 00 777745 		LSH	1,-33		;*LSH SHOULD LOGICALLY SHIFT -1,,-1
  2331									;RIGHT 33 OCTAL BIT POSITIONS
  2332	032150	312 01 0 00 032277 		CAME	1,[0,,777]	;PASS IF C(AC)=0,,777
  2333						STOP^
  2334	032151	254 04 0 00 032152 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2335	032152	324 00 0 00 032153 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2336	032153	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2337						STOP^
  2338	032154	254 04 0 00 032155 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2339	032155	324 00 0 00 032156 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2340
  2341					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 46
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0073

  2342					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2343					;IN THIS CASE, 252525,,252525 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2344					;SO THAT FINAL C(AC)=0,,252.
  2345					;C(AC+1) SHOULD NOT BE AFFECTED
  2346
  2347	032156	200 01 0 00 032255 	C42400:	MOVE	1,[252525,,252525]	;PRELOAD AC WITH 252525,,252525
  2348	032157	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2349	032160	242 01 0 00 777745 		LSH	1,-33			;*LSH SHOULD LOGICALLY SHIFT 252525,,252525
  2350										;RIGHT 33 OCTAL BIT POSITIONS
  2351	032161	312 01 0 00 032300 		CAME	1,[0,,252]		;PASS IF C(AC)=0,,252
  2352						STOP^
  2353	032162	254 04 0 00 032163 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2354	032163	324 00 0 00 032164 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2355	032164	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2356						STOP^
  2357	032165	254 04 0 00 032166 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2358	032166	324 00 0 00 032167 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2359
  2360					;**********
  2361
  2362					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2363					;IN THIS CASE, 525252,,525252 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2364					;SO THAT FINAL C(AC)=0,,525.
  2365					;C(AC+1) SHOULD NOT BE AFFECTED
  2366
  2367	032167	200 01 0 00 032256 	C42500:	MOVE	1,[525252,,525252]	;PRELOAD AC WITH 525252,,525252
  2368	032170	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2369	032171	242 01 0 00 777745 		LSH	1,-33			;*LSH SHOULD LOGICALLY SHIFT 525252,,525252
  2370										;RIGHT 33 OCTAL BIT POSITIONS
  2371	032172	312 01 0 00 032301 		CAME	1,[0,,525]		;PASS IF C(AC)=0,525
  2372						STOP^
  2373	032173	254 04 0 00 032174 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2374	032174	324 00 0 00 032175 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2375	032175	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2376						STOP^
  2377	032176	254 04 0 00 032177 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2378	032177	324 00 0 00 032200 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2379
  2380					;**********
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 47
DBKAGM	MAC	30-APR-76 17:10		TEST OF SHIFT/ROTATE INSTRUCTIONS USED IN THE ERROR HANDLER                        SEQ 0074

  2381					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2382					;IN THIS CASE, 230703,,603700 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2383					;SO THAT FINAL C(AC)=0,,230.
  2384					;C(AC+1) SHOULD NOT BE AFFECTED
  2385
  2386	032200	200 01 0 00 032257 	C42600:	MOVE	1,[230703,,603700]	;PRELOAD AC WITH 230703,,603700
  2387	032201	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2388	032202	242 01 0 00 777745 		LSH	1,-33			;*LSH SHOULD LOGICALLY SHIFT 230703,,603700
  2389										;RIGHT 33 OCTAL BIT POSITIONS
  2390	032203	312 01 0 00 032302 		CAME	1,[0,,230]		;PASS IF C(AC)=0,,230
  2391						STOP^
  2392	032204	254 04 0 00 032205 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2393	032205	324 00 0 00 032206 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2394	032206	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2395						STOP^
  2396	032207	254 04 0 00 032210 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2397	032210	324 00 0 00 032211 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2398
  2399					;**********
  2400
  2401					;THIS TEST VERIFIES THAT THE LSH INSTRUCTION FUNCTIONS CORRECTLY
  2402					;IN THIS CASE, 007603,,607062 SHOULD BE LOGICALLY SHIFTED RIGHT 33 OCTAL BIT POSITIONS
  2403					;SO THAT FINAL C(AC)=0,,7.
  2404					;C(AC+1) SHOULD NOT BE AFFECTED
  2405
  2406	032211	200 01 0 00 032261 	C42700:	MOVE	1,[007603,,607062]	;PRELOAD AC WITH 007603,,607062
  2407	032212	200 02 0 00 032254 		MOVE	2,[172737,,405060]	;PRELOAD C(AC+1) WITH 172737,,405060
  2408	032213	242 01 0 00 777745 		LSH	1,-33			;*LSH SHOULD LOGICALLY SHIFT 007603,,607062
  2409										;RIGHT 33 OCTAL BIT POSITIONS
  2410	032214	312 01 0 00 032252 		CAME	1,[0,,7]		;PASS IF C(AC)=0,,7
  2411						STOP^
  2412	032215	254 04 0 00 032216 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2413	032216	324 00 0 00 032217 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2414	032217	312 02 0 00 032254 		CAME	2,[172737,,405060]	;PASS IF C(AC+1) NOT AFFECTED
  2415						STOP^
  2416	032220	254 04 0 00 032221 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2417	032221	324 00 0 00 032222 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
  2418
  2419	032222	254 00 0 00 030057 		JRST	BEGEND		;REPEAT TEST
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 1
STOR	KLM	 5-JAN-76		*STOR* RESERVED STORAGE, JAN 5,1976                                                SEQ 0075

  2420					SUBTTL	*STOR* RESERVED STORAGE, JAN 5,1976
  2421
  2422					;PROGRAM LITERALS
  2423
  2424						XLIST
  2425					IFNDEF	$LPAPER,<LIST>
  2426	032223					LIT
  2427	032223	000001	000001
  2428	032224	254 00 0 00 030741 
  2429	032225	000016	541320
  2430	032226	777777	777777
  2431	032227	000000	000000
  2432	032230	000001	000000
  2433	032231	000001	000002
  2434	032232	000002	000002
  2435	032233	000001	000017
  2436	032234	312 00 0 00 000001 
  2437	032235	256 00 0 00 032234 
  2438	032236	256 00 0 00 032235 
  2439	032237	254 00 0 00 031304 
  2440	032240	265 03 0 00 031311 
  2441	032241	256 00 0 00 032240 
  2442	032242	256 00 0 00 032241 
  2443	032243	270 06 0 04 000001 
  2444	032244	331 01 0 00 000002 
  2445	032245	331 03 0 00 000006 
  2446	032246	777776	000005
  2447	032247	253 03 0 00 031355 
  2448	032250	777777	000006
  2449	032251	253 03 0 00 031363 
  2450	032252	000000	000007
  2451	032253	000000	707070
  2452	032254	172737	405060
  2453	032255	252525	252525
  2454	032256	525252	525252
  2455	032257	230703	603700
  2456	032260	023070	360370
  2457	032261	007603	607062
  2458	032262	200760	360706
  2459	032263	074076	004616
  2460	032264	074161	440174
  2461	032265	770037	600377
  2462	032266	307036	037007
  2463	032267	700376	003772
  2464	032270	776003	760077
  2465	032271	760037	600770
  2466	032272	076036	070627
  2467	032273	160740	760176
  2468	032274	007740	077646
  2469	032275	400774	017601
  2470	032276	740741	614577
  2471	032277	000000	000777
  2472	032300	000000	000252
  2473	032301	000000	000525
  2474	032302	000000	000230
DBKAG PDP-10 KI10 BASIC INSTRUCTION DIAGNOSTIC (7) MCNVER,DECVER	MACRO %50A(432) 09:58  5-AUG-76 PAGE 1-1
STOR	KLM	 5-JAN-76		*STOR* RESERVED STORAGE, JAN 5,1976                                                SEQ 0076

  2475	032303	000000	017777
  2476	032304	000000	005252
  2477	032305	000000	012525
  2478	032306	000000	004616
  2479	032307	000000	000174
  2480						LIST
  2481	032310	000000	000000		ENDSLD:	0
  2482
  2483					IFDEF	DEBUG,<
  2484	032311				PATCH:	BLOCK DEBUG		;PATCHING AREA
  2485					>
  2486
  2487					;PROGRAM VARIABLES
  2488	032411					VAR
  2489
  2490					IFDEF	PGMEND,<
  2491	032411	000000	000000		END:	0
  2492			030000			END	BEGIN	>

NO ERRORS DETECTED

PROGRAM BREAK IS 000000
ABSLUTE BREAK IS 032412
CPU TIME USED 00:09.103

5K CORE USED

ABORT	   107#
AC0	   702#                                                                                                            SEQ 0077
ALTMGO	   461#
ANXM	   375#
APR	   799	   800	   801
AROV	    68#	   375#
AROVU	   375#
AST	   576#
ATSIN	   577#
BEGEND	   457#	  2419
BEGIN	   321	   322	   388#	   745	   867	  2492
BEGIN1	   404#	   458
BELL	   580#
BIS	    72#	   375#	  1169	  1175
C27200	   904#
C27300	   918#
C27400	   930#
C27500	   944#
C27600	   957#
C27700	   972#
C30000	   986#
C30100	  1002#
C30101	  1016#
C30200	  1031#
C30300	  1047#
C30400	  1064#
C30500	  1082#
C30600	  1097#
C31000	  1112#
C31100	  1124#
C31400	  1141#
C31500	  1153#
C31501	  1168#
C31502	  1186#
C31600	  1202#
C31700	  1215#
C32300	  1228#
C32400	  1241#
C32500	  1256#
C32600	  1272#
C33100	  1287#
C33300	  1303#
C33310	  1311#
C33400	  1322#
C33401	  1337#
C33500	  1353#
C33600	  1367#
C33700	  1380#
C33701	  1396#
C34000	  1412#
C34100	  1423#
C34200	  1433#
C34300	  1447#
C34400	  1463#
C34500	  1478#                                                                                                            SEQ 0078
C34600	  1493#
C34610	  1500#
C34700	  1511#
C34710	  1516#
C35000	  1527#
C35100	  1542#
C35200	  1557#
C35300	  1572#
C35400	  1584#
C35500	  1601#
C35600	  1624#
C35700	  1643#
C36000	  1661#
C36100	  1681#
C36200	  1700#
C36300	  1720#
C36400	  1739#
C36500	  1758#
C36600	  1776#
C36700	  1796#
C37000	  1815#
C37100	  1835#
C37200	  1853#
C37300	  1871#
C37400	  1889#
C37500	  1908#
C37600	  1926#
C37700	  1945#
C40000	  1963#
C40100	  1981#
C40200	  1999#
C40300	  2018#
C40400	  2036#
C40500	  2055#
C40600	  2074#
C40700	  2094#
C41000	  2113#
C41100	  2133#
C41200	  2152#
C41300	  2172#
C41400	  2191#
C41500	  2211#
C41600	  2230#
C41700	  2250#
C42000	  2269#
C42100	  2289#
C42200	  2308#
C42300	  2328#
C42400	  2347#
C42500	  2367#
C42600	  2386#
C42700	  2406#
CCA	   375#                                                                                                            SEQ 0079
CHAIN	   127#
CHNOFF	   375#
CHNON	   375#
CLK	   375#
CLKCLR	   375#
CLKDIS	   375#
CLKENB	   375#
CLKU	   375#
CLOCKF	   443#
CNTLC	   460#
COMMA	   569#
CONSW	   444#
CPOPJ	   464#
CPOPJ1	   462#
CRLF	   256	   257	   564#
CRLF2	   260	   261	   566#
CRY0	    69#	   375#	  1032	  1048	  1065	  1125	  1130
CRY1	    70#	   375#
CSHFLG	   623#
CSHMEM	   624#
CYCL60	   617#
DCK	    76#	   375#
DDT	   704#
DDTLNK	   141#	   402
DDTSRT	   402#
DEBUG	    30#	  2483	  2484
DECVER	    13#	    13	    14	   423
DF22F	   528#
DIAGMN	   391#
DIAGNO	   703#
DIAMON	   705#
DING	   113#
DOLLAR	   583#
DONG11	   706#	   846	   862
DSKUPD	   428
DTE	   710#	   846	   848	   862	   864
DTE0	   711#
DTE1	   712#
DTE2	   713#
DTE3	   714#
END	  2491#
ENDFIX	   697#
ENDSLD	  2481#
ERMORE	   477#
ERRPC	   448#
ERRTLS	   449#
ERSTOP	   116#
EXCASB	    27#	   426
EXIOT	    74#	   375#
FOV	    71#	   375#
FOVU	   375#
FRDLNK	   139#
FSELNK	   138#                                                                                                            SEQ 0080
FXU	    75#	   375#
HYPEN	   574#
INHCSH	   124#
INHPAG	   121#
INXM	   375#
IOCLR	   375#
ITERAT	    59#	   421
ITRCH1	   481#
ITRCNT	   421#	   791	   820	   824	   832	   833	   837
JOB41	   375#
JOBAPR	   375#
JOBCNI	   375#
JOBDDT	   375#
JOBFF	   375#
JOBOPC	   375#
JOBREL	   375#
JOBREN	   375#
JOBSA	   375#
JOBSYM	   375#
JOBTPC	   375#
JOBUSY	   375#
JOBUUO	   375#
JOBVER	   375#
KA10	   375
KAHZ50	   129#
KAIFLG	   438#
KI10	   375
KL10	   375
KLFLG	   439#	   793	   811	   830
KLOLD	   336
KLTYP	   655#	   792	   803	   845	   847	   861	   863
LDLNK	   140#	   391	   393
LFP	   578#
LOOPER	   115#
LUUO	   375#
LUUO1	   508	   509
LUUO10	   508	   513
LUUO11	   508	   513
LUUO12	   508	   514
LUUO13	   508	   514
LUUO14	   508	   515
LUUO15	   508	   515
LUUO16	   508	   516
LUUO17	   508	   516
LUUO2	   508	   510
LUUO20	   508	   517
LUUO21	   508	   517
LUUO22	   508	   518
LUUO23	   508	   518
LUUO24	   508	   519
LUUO25	   508	   519
LUUO26	   508	   520
LUUO27	   508	   520                                                                                                     SEQ 0081
LUUO3	   508	   510
LUUO30	   508	   521
LUUO31	   508	   521
LUUO32	   508	   522
LUUO33	   508	   522
LUUO4	   508	   511
LUUO5	   508	   511
LUUO6	   508	   512
LUUO7	   508	   512
LUUOI	   375#
MAPNEW	   529#
MARGIN	   451#
MCNVER	    13#	    13	    14	   423
MEMLOW	   531#
MEMMAP	   429
MEMSIZ	   532#
MEMTOT	   530#
MINUS	   573#
MODDVC	   123#
MODDVL	   321	   321#	   424
MODDVU	   322	   322#	   425
MODLNK	   142#	   388
MONCTL	   441#	   840	   878
MONFLG	   440#	   785	   874
MONTEN	   442#	   790	   826	   855
MPVU	   375#
NOPNT	   111#
NXMU	   375#
OPRSEL	   125#
OPTIME	   543#
P	   168	   169	   170	   171	   375#	   463
PAG	   375#
PALERS	   117#
PARCLR	   375#
PARDIS	   375#
PAREA0	    52#
PAREA1	    53#	   419
PAREA2	    54#	   420
PAREA3	    55#	   417
PAREA4	    56#	   418
PAREA5	    57#	   430
PAREA6	    58#	   431
PAREA7	   430#
PAREA8	   431#
PARENB	   375#
PARU	   375#
PASCNT	   445#	   819
PATCH	  2484#
PDISF	   540#
PDLOVU	   375#
PERIOD	   570#
PFSTRT	   397#
PGMEND	    29#	    60#	  2490                                                                                             SEQ 0082
PGMNAM	   422	   879	   882#
PI	   832
PICHN1	   375#
PICHN2	   375#
PICHN3	   375#
PICHN4	   375#
PICHN5	   375#
PICHN6	   375#
PICHN7	   375#
PICHNA	   375#
PICLR	   375#
PIOFF	   375#
PION	   375#
PLIST	   609#	   609
PLISTE	   609	   611#	   695
PLISTS	   610#
PLUS	   575#
PNTENB	   539#
PNTEXT	   418#
PNTFLG	   538#
PNTINH	   541#
PNTLPT	   112#
PNTNAM	   417#
PNTSPC	   542#
PVPAGI	   636#
PWFCLR	   375#
QUEST	   581#
RADIX	   584#
RADLSC	   586#
RADLSP	   585#
RANDBS	   419#
REENTR	   399#
RELIAB	   119#
REPT	   375#
REPT1	   375#
REPTU	   497#
REQSET	   375#
RESRT1	   474#
RESRT2	   475#
RETURN	   406#	   828	   835	   856
RSTART	   108#
RTP	   579#
RUNFLG	   446#
SADR1	    40#	   395
SADR10	    49#	   411
SADR11	    50#	   412
SADR2	    41#	   397
SADR3	    42#	   399
SADR4	    43#
SADR5	    44#	   460
SADR6	    45#	   461
SADR7	    46#	   408
SADR8	    47#	   409                                                                                                     SEQ 0083
SADR9	    48#	   410
SBINIT	   181	   405#
SCOPE	   498#
SFSTRT	   395#
SLASH	   582#
SPACE	   571#
SRTDDT	   401#
START	    40	    41	    42	    43	    44	    45	    46	    47	    48	    49	    50	   389	   788	   797
	   812	   816	   870#
START1	   408#
START2	   409#
START3	   410#
START4	   411#
START5	   412#
STARTA	   404	   814	   825	   834	   841	   851	   877	   880	   896#
SUBLNK	   143#	   405
SWTEXR	   420#
SYSEXR	   393#
TAB	   572#
TESTPC	   447#
TICKS	   450#
TOTALS	   109#
TTNBRF	   630#
TTYFIL	   546#
TTYSPD	   547#
TXTINH	   120#
USER	   437#	   781	   784	   786	   787	   821	   870#	   870	   873	   875	   876
USERF	    33#	    73#	   375#	   783	   872
USRASB	    28#	   427
USRCRF	   556#
USRLFF	   555#
UUODIS	   509#
UUOEXT	   465#
UUORTN	   466#
UUOSKP	   463#
$$420	   755#
$$421	   756#
$$422	   757#
$$423	   758#
$$424	   759#
$$425	   760#
$$426	   761#
$$427	   762#
$$430	   763#
$$431	   764#
$$432	   765#
$$433	   766#
$$434	   767#
$$435	   768#
$$436	   769#
$$437	   770#
$$500	   773#
$$501	   774#                                                                                                            SEQ 0084
$$502	   775#
$$503	   776#
$$BEGI	   741#
$$DTE0	   807	   846#
$$DTE1	   808	   848#
$$DTE2	   809	   862#
$$DTE3	   810	   864#
$$LOC	   738#	   777
$$MUUO	   661#
$$OUTE	   667#
$$STAR	   741	   742	   781#
$$TAX1	   679#
$$TAX2	   680#
$$TOGG	   673#
$$UUO	   650#
$ACC0	   488#
$BEGEN	   750#
$BEND1	   458#
$BEND2	   459#
$CHRIN	   549#
$CRLF	   551#
$DDT	   719#
$DEVCH	   375#
$DSKUP	   428#
$DTCHR	   731#
$DTCI	   725#
$DTCLK	   724#	   805
$DTCMD	   728#	   843	   859
$DTF11	   727#
$DTFLG	   723#	   804	   844	   849	   860	   865
$DTMTD	   732#
$DTMTI	   733#
$DTOPR	   730#	   806
$DTSEQ	   729#
$DTSWR	   735#
$DTT11	   726#
$DVCH1	   375#
$DVOFF	   545#
$EMODE	   426#
$ENDFX	   695#	   696
$FFF	   553#
$IBUF	   601#
$INEXT	   603#
$INNM	   602#
$ITRHL	   469#
$ITRX1	   470#
$LPAPE	  2425
$MMAP	   429#
$MODVL	   424#
$MODVU	   425#
$OBUF	   592#
$ONETM	   452#
$OUTEX	   594#                                                                                                            SEQ 0085
$OUTNM	   593#
$PAPER	   375
$PARER	   476#
$PNAME	   422#
$PSHER	   480#
$PVER	   423#
$RSRTX	   472#
$RSRTY	   473#
$SPAG1	   492#
$SPB1	   815	   821#
$SPBEN	   750	   819#
$SPBEX	   822	   830#
$SPBKL	   831	   837#
$SPBUS	   824#
$SPEC	   747	   814#
$SPKLD	   838	   855#
$START	   389#
$STD	   718#	   745#
$STKIL	   790#
$STKL	   799#
$STL	   720#
$STM	   721#	   747#
$SVAPR	   490#
$SVPAG	   491#
$SVPI	   489#
$SVUPC	   495#
$SVUUO	   494#
$TABF	   552#
$TTCHR	   548#
$TWCNT	   544#
$TYPNB	   550#
$UMODE	   427#
$UORTX	   467#
$USRHL	   471#
$UUOER	   468#	   509
$VTF	   554#
%ACTFL	   501#
%ACTUL	   502#
%COREC	   500#
%CORFL	   499#
%DISCR	   503#
%ERHI1	   642#
%ERHI2	   643#
%ERHI3	   644#
.JB41	   375#
.JBAPR	   375#
.JBCNI	   375#
.JBDDT	   375#
.JBFF	   375#
.JBOPC	   375#
.JBREL	   375#
.JBREN	   375#
.JBSA	   375#                                                                                                            SEQ 0086
.JBSYM	   375#
.JBTPC	   375#
.JBUSY	   375#
.JBUUO	   375#
.JBVER	   375#

CFLUSH	   292#
CINVAL	   291#                                                                                                            SEQ 0087
CLOKOP	   286#
CWRTBI	   293#
DROPDV	   253#
ENDUUO	   299#	   457
EOPUUO	   300#	   459
ERLOOP	   344#
ERLP1	   345#
ERLP2	   346#
ERRHLT	   188#
ERROR	   353#
ERROR1	   365#
ERUUO	   343#
EXIT	   827
FATAL	   187#
FRD36	   328#
FRD8	   329#
FREAD	   327#
FSELEC	   326#
GET	   171#
GO	   168#
HALT	   173#	   478	   755	   757	   758	   762	   776	   867	   908	   922	   934	   948	   961	   976
	   990	  1007	  1020	  1038	  1057	  1073	  1087	  1099	  1103	  1116	  1132	  1143	  1146	  1155
	  1159	  1177	  1190	  1206	  1220	  1233	  1247	  1262	  1278	  1293	  1309	  1313	  1327	  1341
	  1358	  1372	  1386	  1401	  1415	  1426	  1435	  1436	  1438	  1449	  1450	  1454	  1469	  1484
	  1498	  1503	  1514	  1519	  1529	  1530	  1533	  1546	  1564	  1577	  1593	  1604	  1605	  1607
	  1611	  1629	  1633	  1648	  1652	  1667	  1671	  1687	  1691	  1706	  1710	  1726	  1730	  1744
	  1748	  1763	  1767	  1782	  1786	  1802	  1806	  1821	  1825	  1841	  1845	  1858	  1862	  1877
	  1881	  1895	  1899	  1914	  1918	  1932	  1936	  1951	  1955	  1968	  1972	  1987	  1991	  2005
	  2009	  2024	  2028	  2042	  2046	  2061	  2065	  2080	  2084	  2100	  2104	  2119	  2123	  2139
	  2143	  2158	  2162	  2178	  2182	  2197	  2201	  2217	  2221	  2236	  2240	  2256	  2260	  2275
	  2279	  2295	  2299	  2314	  2318	  2334	  2338	  2353	  2357	  2373	  2377	  2392	  2396	  2412
	  2416
JEN	   175#
JRSTF	   174#
MAPADR	   309#
MAPCNK	   310#
MAPMEM	   306#
MAPPNT	   312#
MAPSET	   311#
MEMSEG	   308#
MEMZRO	   307#
MODPCP	   319#
MODPCU	   318#
MTROP	   287#
NAME	    13#	    14
PBELL	   262#
PCRL	   256#
PCRL2	   260#
PCRL2F	   261#
PCRLF	   257#
PFORCE	   264#
PGMINT	   181#
PJRST	   172#                                                                                                            SEQ 0088
PMSG	   266#
PMSGF	   269#
PNT1	   222#
PNT11	   236#
PNT11F	   237#
PNT1F	   223#
PNT2	   224#
PNT2F	   225#
PNT3	   226#
PNT3F	   227#
PNT4	   228#
PNT4F	   229#
PNT5	   230#
PNT5F	   231#
PNT6	   232#
PNT6F	   233#
PNT7	   234#
PNT7F	   235#
PNTA	   208#
PNTADF	   239#
PNTADR	   238#
PNTAF	   209#
PNTAL	   210#
PNTALF	   211#
PNTCHF	   221#
PNTCHR	   220#
PNTCI	   218#
PNTCIF	   219#
PNTCW	   254#
PNTCWF	   255#
PNTDCF	   247#
PNTDEC	   246#
PNTDS	   248#
PNTDSF	   249#
PNTHW	   242#
PNTHWF	   243#
PNTMGN	   333#
PNTMSF	   215#
PNTMSG	   214#
PNTNM	   250#
PNTOCF	   245#
PNTOCS	   244#
PNTOCT	   240#
PNTOTF	   241#
PNTSIX	   251#
PNTSXF	   252#
PSIXL	   212#
PSIXLF	   213#
PSIXM	   216#
PSIXMF	   217#
PSP	   258#
PSPF	   259#
PUT	   170#                                                                                                            SEQ 0089
REPTUO	   347#
RTN	   169#	   465
S	    99#	   101	   105	   134	   136	   145	   148	   163	   164	   166	   177	   179	   183	   185
	   190	   194	   339	   341	   375	   380	   386	   413	   415	   433	   435	   453	   455	   484
	   486	   504	   506	   524	   526	   534	   536	   557	   562	   588	   590	   597	   599	   605
	   607	   613	   615	   619	   621	   626	   628	   632	   634	   638	   640	   646	   648	   651
	   653	   657	   659	   663	   665	   669	   671	   675	   677	   682	   687	   691	   693
SFLAG	    93#	  1031	  1047	  1064	  1124	  1168
SIXBTZ	   275#
STOP	    84#	   907	   921	   933	   947	   960	   975	   989	  1006	  1019	  1037	  1056	  1072	  1086
	  1102	  1115	  1131	  1145	  1158	  1176	  1189	  1205	  1219	  1232	  1246	  1261	  1277	  1292
	  1308	  1312	  1326	  1340	  1357	  1371	  1385	  1400	  1414	  1425	  1437	  1453	  1468	  1483
	  1497	  1502	  1513	  1518	  1532	  1545	  1563	  1576	  1592	  1610	  1628	  1632	  1647	  1651
	  1666	  1670	  1686	  1690	  1705	  1709	  1725	  1729	  1743	  1747	  1762	  1766	  1781	  1785
	  1801	  1805	  1820	  1824	  1840	  1844	  1857	  1861	  1876	  1880	  1894	  1898	  1913	  1917
	  1931	  1935	  1950	  1954	  1967	  1971	  1986	  1990	  2004	  2008	  2023	  2027	  2041	  2045
	  2060	  2064	  2079	  2083	  2099	  2103	  2118	  2122	  2138	  2142	  2157	  2161	  2177	  2181
	  2196	  2200	  2216	  2220	  2235	  2239	  2255	  2259	  2274	  2278	  2294	  2298	  2313	  2317
	  2333	  2337	  2352	  2356	  2372	  2376	  2391	  2395	  2411	  2415
SWITCH	   281#
TTALTM	   203#
TTICHR	   196#
TTICNV	   201#
TTIDEC	   200#
TTINO	   198#
TTIOCT	   199#
TTIYES	   197#
TTLOOK	   202#
TTSIXB	   204#
TTYINP	   205#
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC                                                         SEQ 0090
DBKAG	000000 000000  000000 000000  000000 000000  000000  777777 

*030001  JRST	0,030600

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030001 030001 030001 254000030600 777777777777 0                0            0            0            0   0   777 
IT1	*      *      030600 *            254000030600 0                0            0            0            0   0   *   
ET2	030600 030600 *      402000030037 777777777777 254000030600     0            0            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 030600 
----------

*030600  SETZM	0,030037

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030600 030600 030600 402000030037 254000030600 000000030002     0            254000030600 0            0   0   777 
IT1	*      *      030037 *            402000030037 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030037     0            *            0            0   0   *   
FT6	*      030037 *      *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                0            *            0            0   0   *   
ST5	030601 030601 030601 265000030602 *            0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(E) =000000 000000 
----------

*030601  JSP	0,030602

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030601 030601 030601 265000030602 777777777777 0                0            254000030600 0            0   0   777 
IT1	*      *      030602 *            265000030602 0                0            *            0            0   0   *   
ET2	*      *      777777 *            777777777777 000000030602     0            *            0            0   0   *   
ST1	*      *      030602 *            000000030602 *                000000030602 000000030602 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 030602 
FINAL
C(AC)=000000 030602 
----------

*030602  TLNE	0,010000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030602 030602 030602 603000010000 777777777777 000000030602     000000030602 000000030602 0            0   0   777 
IT1	*      *      010000 *            603000010000 *                *            *            0            0   0   *   
ET0	*      *      030603 *            000000010000 000000010000     *            *            0            0   0   *   
ET1	*      *      *      *            000000000000 010000000000     *            *            0            0   0   *   
ET2	030603 *      030604 *            777777777777 *                *            010000000000 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 E    =000000 010000                                                                                    SEQ 0091
FINAL
C(AC)=000000 030602 
----------

*030604  SKIPN	0,030042

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030604 030604 030604 336000030042 777777777777 777777777777     000000030602 010000000000 0            0   0   777 
IT1	*      *      030042 *            336000030042 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030042     *            *            0            0   0   *   
FT6	*      030042 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      030605 *            *            *                *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	030605 *      030606 *            *            *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 C(E) =777777 777777 
FINAL
C(AC)=000000 030602 
----------

*030606  SKIPE	0,030037

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030606 030606 030606 332000030037 777777777777 777777777777     000000030602 010000000000 0            0   0   777 
IT1	*      *      030037 *            332000030037 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030037     *            *            0            0   0   *   
FT6	*      030037 *      000000000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      030607 0            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      0            0            0                *            *            0            0   0   *   
ST1	030607 *      030610 0            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 C(E) =000000 000000 
FINAL
C(AC)=000000 030602 
----------

*030610  SKIPN	0,030044

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030610 030610 030610 336000030044 777777777777 0                000000030602 010000000000 0            0   0   777 
IT1	*      *      030044 *            336000030044 0                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030044     *            *            0            0   0   *   
FT6	*      030044 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      030611 *            *            *                *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	030611 *      030612 *            *            *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 C(E) =777777 777777 
FINAL
C(AC)=000000 030602 
----------

*030612  SETZM	0,030516
                                                                                                                           SEQ 0092
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030612 030612 030612 402000030516 777777777777 777777777777     000000030602 010000000000 0            0   0   777 
IT1	*      *      030516 *            402000030516 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030516     *            *            0            0   0   *   
FT6	*      030516 *      *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                *            *            0            0   0   *   
ST5	030613 030613 030613 402000030041 *            0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 C(E) =000000 000000 
FINAL
C(E) =000000 000000 
----------

*030613  SETZM	0,030041

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030613 030613 030613 402000030041 777777777777 0                000000030602 010000000000 0            0   0   777 
IT1	*      *      030041 *            402000030041 0                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030041     *            *            0            0   0   *   
FT6	*      030041 *      *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                *            *            0            0   0   *   
ST5	030614 030614 030614 200040032223 *            0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 C(E) =000000 000000 
FINAL
C(E) =000000 000000 
----------

*030614  MOVE 	1,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030614 030614 030614 200040032223 777777777777 0                000000030602 010000000000 0            0   0   777 
IT1	*      *      032223 *            200040032223 0                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     0            *            0            0   0   *   
FT6	030615 030615 030615 251040000001 777777777777 000001000001     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000001 000001 
FINAL
C(AC)=000001 000001 
----------

*030615  BLT	1,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030615 030615 030615 251040000001 777777777777 000001000001     000001000001 010000000000 0            0   0   777 
IT1	*      *      000001 *            251040000001 *                *            *            0            0   0   *   
ET0	*      *      777777 *            000001777777 000000000001     *            *            0            0   0   *   
ET1	*      *      *      *            777777777777 000001777777     *            *            0            0   0   *   SEQ 0093
ET2	*      *      000000 *            000001000000 777777000001     *            *            0            0   0   *   
BLTT0	000000 *      030615 *            000000030615 000000030615     *            777777000001 0            0   0   *   
BLTT1	0      *      000001 *            777777000001 *                *            *            000000030615 0   0   *   
BLTT2	0      *      *      *            *            777777000001     *            *            *            0   0   *   
MEMST	0      *      *      *            777777777777 *                *            *            *            0   0   *   
BLTT3	0      000001 *      *            *            000001000001     *            *            *            0   0   *   
BLTT4	0      *      *      *            *            *                *            *            *            0   0   *   
MEMST	0      *      *      *            *            *                *            *            *            0   0   *   
ST1	0      *      *      *            *            *                *            *            *            0   0   *   
ST2	000001 *      *      000001000001 *            *                *            *            *            0   0   *   
BLTT1	*      *      000002 *            000000000002 *                *            *            *            0   0   *   
BLTT8	*      *      777777 *            777777777777 000000000002     *            *            *            0   0   *   
BLTT9	*      *      030615 *            000000030615 000000030615     *            *            777777777777 0   0   *   
ST1	030615 *      030616 *            777777777777 *                *            *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 000001 
FINAL
C(AC)=000001 000001 
----------

*030616  CAMN	1,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030616 030616 030616 316040032223 777777777777 000000030615     000001000001 777777000001 777777777777 0   0   777 
IT1	*      *      032223 *            316040032223 *                *            *            *            0   0   *   
MEMST	*      *      *      *            *            000000032223     *            *            000000000000 0   0   *   
FT6	*      032223 *      000001000001 777777777777 000001000001     *            *            0            0   0   *   
ET0	*      *      030617 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000001 
----------

*030617  JRST	0,030712

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030617 030617 030617 254000030712 777777777777 000001000001     000001000001 777777000001 0            0   0   777 
IT1	*      *      030712 *            254000030712 *                000000030602 *            0            0   0   *   
ET2	030712 030712 *      402000030037 777777777777 254000030712     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 030712 
----------

*030712  SETZM	0,030037

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030712 030712 030712 402000030037 254000030712 000000030620     000000030602 254000030712 0            0   0   777 
IT1	*      *      030037 *            402000030037 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030037     *            *            0            0   0   *   
FT6	*      030037 *      *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                *            *            0            0   0   *   SEQ 0094
ST5	030713 030713 030713 265000030714 *            0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 C(E) =000000 000000 
FINAL
C(E) =000000 000000 
----------

*030713  JSP	0,030714

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030713 030713 030713 265000030714 777777777777 0                000000030602 254000030712 0            0   0   777 
IT1	*      *      030714 *            265000030714 0                *            *            0            0   0   *   
ET2	*      *      777777 *            777777777777 000000030714     *            *            0            0   0   *   
ST1	*      *      030714 *            000000030714 *                000000030714 000000030714 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030602 E    =000000 030714 
FINAL
C(AC)=000000 030714 
----------

*030714  TLNE	0,010000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030714 030714 030714 603000010000 777777777777 000000030714     000000030714 000000030714 0            0   0   777 
IT1	*      *      010000 *            603000010000 *                *            *            0            0   0   *   
ET0	*      *      030715 *            000000010000 000000010000     *            *            0            0   0   *   
ET1	*      *      *      *            000000000000 010000000000     *            *            0            0   0   *   
ET2	030715 *      030716 *            777777777777 *                *            010000000000 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030714 E    =000000 010000 
FINAL
C(AC)=000000 030714 
----------

*030716  SKIPN	0,030042

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030716 030716 030716 336000030042 777777777777 777777777777     000000030714 010000000000 0            0   0   777 
IT1	*      *      030042 *            336000030042 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030042     *            *            0            0   0   *   
FT6	*      030042 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      030717 *            *            *                *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	030717 *      030720 *            *            *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030714 C(E) =777777 777777 
FINAL
C(AC)=000000 030714 
----------

*030720  SKIPN	0,030037
                                                                                                                           SEQ 0095
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030720 030720 030720 336000030037 777777777777 777777777777     000000030714 010000000000 0            0   0   777 
IT1	*      *      030037 *            336000030037 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030037     *            *            0            0   0   *   
FT6	*      030037 *      000000000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      030721 0            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      0            0            0                *            *            0            0   0   *   
ST1	*      *      *      0            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030714 C(E) =000000 000000 
FINAL
C(AC)=000000 030714 
----------

*030721  JRST	0,030741

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030721 030721 030721 254000030741 777777777777 0                000000030714 010000000000 0            0   0   777 
IT1	*      *      030741 *            254000030741 0                *            *            0            0   0   *   
ET2	030741 030741 *      254000030742 777777777777 254000030741     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 030741 
----------

*030741  JRST	0,030742

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030741 030741 030741 254000030742 254000030741 000000030722     000000030714 254000030741 0            0   0   777 
IT1	*      *      030742 *            254000030742 *                *            *            0            0   0   *   
ET2	030742 030742 *      400100000000 777777777777 254000030742     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 030742 
----------

*030742  SETZ 	2,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030742 030742 030742 400100000000 254000030742 000000030742     000000030714 254000030742 0            0   0   777 
IT1	*      *      000000 *            400100000000 *                000000000000 *            0            0   0   *   
ET2	*      *      030743 *            000000000000 000000000000     0            *            0            0   0   *   
ST1	030743 030743 *      261100030745 777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 030714 
FINAL
C(AC)=000000 000000 
----------

*030743  PUSH	2,030745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030743 030743 030743 261100030745 777777777777 0                0            254000030742 0            0   0   777 
IT1	*      *      030745 *            261100030745 0                0            *            0            0   0   *   SEQ 0096
MEMST	*      *      *      *            *            000000030745     0            *            0            0   0   *   
FT6	*      030745 *      254200030746 777777777777 254200030746     0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            254200030746 0            0   0   *   
ET1	*      000001 030744 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            254200030746 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 254200030746     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      *            *            *                *            *            0            0   0   *   
ST5	030744 030744 *      334000000000 *            *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000001 000001 C(E) =254200 030746 
FINAL
C(AC)=000001 000001 C(C(ACR))=254200 030746 
----------

*030744  SKIPA	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030744 030744 030744 334000000000 777777777777 254200030746     000001000001 000001000001 0            0   0   777 
IT1	*      *      000000 *            334000000000 *                000000030714 *            0            0   0   *   
MEMST	*      *      0      *            *            000000000000     *            *            0            0   0   *   
FT6	*      000000 0      *            777777777777 000000030714     *            *            0            0   0   *   
ET0	*      0      030745 *            000000030714 *                *            *            0            0   0   *   
ET2	*      0      *      *            *            *                *            *            0            0   0   *   
ST1	030745 0      030746 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030714 C(E) =000000 030714 
FINAL
C(AC)=000000 030714 
----------

*030746  JUMPA	0,030747

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030746 030746 030746 324000030747 777777777777 000000030714     000000030714 000001000001 0            0   0   777 
IT1	*      *      030747 *            324000030747 *                *            *            0            0   0   *   
ET0	*      *      030714 *            000000030714 000000030747     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      030747 *            000000030747 000000030714     *            000000030747 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030714 E    =000000 030747 
----------

*030747  SETZB	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030747 030747 030747 403000000002 777777777777 000000030714     000000030714 000000030747 0            0   0   777 
IT1	*      *      000002 *            403000000002 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 030750 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000001000001 *            0            0   0   *   
ST5	030750 030750 *      261100000000 *            0                000000000000 *            0            0   0   *   SEQ 0097

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 030714 C(E) =000001 000001 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*030750  PUSH	2,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030750 030750 030750 261100000000 777777777777 0                0            000000030747 0            0   0   777 
IT1	*      *      000000 *            261100000000 0                0            *            0            0   0   *   
MEMST	*      *      0      *            *            0                0            *            0            0   0   *   
FT6	*      000000 0      *            777777777777 0                0            *            0            0   0   *   
ET0	*      0      000001 *            000001000001 0                0            *            0            0   0   *   
MEMST	*      0      *      *            *            000001000001     0            000000000000 0            0   0   *   
ET1	*      000001 030751 *            777777777777 *                0            0            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            0            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      000000000000 *            0                254200030746 *            0            0   0   *   
ST5	030751 030751 *      332000000000 *            0                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=254200 030746 C(E) =000000 000000 
FINAL
C(AC)=000001 000001 C(C(ACR))=000000 000000 
----------

*030751  SKIPE	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030751 030751 030751 332000000000 777777777777 0                000001000001 000001000001 0            0   0   777 
IT1	*      *      000000 *            332000000000 0                000000000000 *            0            0   0   *   
MEMST	*      *      0      *            *            0                0            *            0            0   0   *   
FT6	*      000000 0      *            777777777777 0                0            *            0            0   0   *   
ET0	*      0      030752 *            000000000000 0                0            *            0            0   0   *   
ET2	*      0      *      *            0            0                0            *            0            0   0   *   
ST1	030752 0      030753 *            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*030753  JUMPA	0,030754

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030753 030753 030753 324000030754 777777777777 0                0            000001000001 0            0   0   777 
IT1	*      *      030754 *            324000030754 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000030754     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      030754 *            000000030754 000000000000     0            000000030754 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 030754                                                                                    SEQ 0098
----------

*030754  SETZ 	2,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030754 030754 030754 400100000000 777777777777 0                0            000000030754 0            0   0   777 
IT1	*      *      000000 *            400100000000 0                000001000001 *            0            0   0   *   
ET2	*      *      030755 *            000000000000 0                *            *            0            0   0   *   
ST1	030755 030755 *      261100030756 777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*030755  PUSH	2,030756

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030755 030755 030755 261100030756 777777777777 0                0            000000030754 0            0   0   777 
IT1	*      *      030756 *            261100030756 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030756     0            *            0            0   0   *   
FT6	*      030756 *      312100032223 777777777777 312100032223     0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            312100032223 0            0   0   *   
ET1	*      000001 030756 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            312100032223 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 312100032223     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      *            *            *                000000000000 *            0            0   0   *   
ST5	030756 030756 *      *            *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000000 000000 C(E) =312100 032223 
FINAL
C(AC)=000001 000001 C(C(ACR))=312100 032223 
----------

*030756  CAME	2,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030756 030756 030756 312100032223 777777777777 312100032223     000001000001 000001000001 0            0   0   777 
IT1	*      *      032223 *            312100032223 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     *            *            0            0   0   *   
FT6	*      032223 *      000001000001 777777777777 000001000001     *            *            0            0   0   *   
ET0	*      *      030757 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	030757 *      030760 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000001 
----------

*030760  JUMPA	0,030761

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030760 030760 030760 324000030761 777777777777 000001000001     000001000001 000001000001 0            0   0   777 
IT1	*      *      030761 *            324000030761 *                000000000000 *            0            0   0   *   SEQ 0099
ET0	*      *      000000 *            000000000000 000000030761     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      030761 *            000000030761 000000000000     0            000000030761 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 030761 
----------

*030761  SETZB	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030761 030761 030761 403000000002 777777777777 0                0            000000030761 0            0   0   777 
IT1	*      *      000002 *            403000000002 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   0   *   
FT6	*      000002 030762 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000001000001 *            0            0   0   *   
ST5	030762 030762 *      261100032225 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000001 000001 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*030762  PUSH	2,032225

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030762 030762 030762 261100032225 777777777777 0                0            000000030761 0            0   0   777 
IT1	*      *      032225 *            261100032225 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032225     0            *            0            0   0   *   
FT6	*      032225 *      000016541320 777777777777 000016541320     0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            000016541320 0            0   0   *   
ET1	*      000001 030763 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000016541320 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000016541320     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      *            *            *                312100032223 *            0            0   0   *   
ST5	030763 030763 *      332000000000 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=312100 032223 C(E) =000016 541320 
FINAL
C(AC)=000001 000001 C(C(ACR))=000016 541320 
----------

*030763  SKIPE	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030763 030763 030763 332000000000 777777777777 000016541320     000001000001 000001000001 0            0   0   777 
IT1	*      *      000000 *            332000000000 *                000000000000 *            0            0   0   *   
MEMST	*      *      0      *            *            000000000000     0            *            0            0   0   *   
FT6	*      000000 0      *            777777777777 0                0            *            0            0   0   *   
ET0	*      0      030764 *            000000000000 0                0            *            0            0   0   *   
ET2	*      0      *      *            0            0                0            *            0            0   0   *   
ST1	030764 0      030765 *            777777777777 0                0            *            0            0   0   *   SEQ 0100

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*030765  JUMPA	0,030766

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030765 030765 030765 324000030766 777777777777 0                0            000001000001 0            0   0   777 
IT1	*      *      030766 *            324000030766 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000030766     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      030766 *            000000030766 000000000000     0            000000030766 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 030766 
----------

*030766  SETZB	1,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030766 030766 030766 403040000002 777777777777 0                0            000000030766 0            0   0   777 
IT1	*      *      000002 *            403040000002 0                000016541320 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 030767 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000001000001 *            0            0   0   *   
ST5	030767 030767 *      261100030770 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000016 541320 C(E) =000001 000001 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*030767  PUSH	2,030770

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030767 030767 030767 261100030770 777777777777 0                0            000000030766 0            0   0   777 
IT1	*      *      030770 *            261100030770 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030770     0            *            0            0   0   *   
FT6	*      030770 *      306000030770 777777777777 306000030770     0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            306000030770 0            0   0   *   
ET1	*      000001 030770 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            306000030770 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 306000030770     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      *            *            *                000000000000 *            0            0   0   *   
ST5	030770 030770 *      *            *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000000 000000 C(E) =306000 030770 
FINAL                                                                                                                      SEQ 0101
C(AC)=000001 000001 C(C(ACR))=306000 030770 
----------

*030770  CAIN	0,030770

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030770 030770 030770 306000030770 777777777777 306000030770     000001000001 000001000001 0            0   0   777 
IT1	*      *      *      *            306000030770 *                000000000000 *            0            0   0   *   
ET0	*      *      030771 *            777777747010 000000030770     0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	030771 *      030772 *            777777777777 *                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 030770 
----------

*030772  JUMPA	0,030773

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030772 030772 030772 324000030773 777777777777 000000030770     0            000001000001 0            0   0   777 
IT1	*      *      030773 *            324000030773 *                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000030773     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      030773 *            000000030773 000000000000     0            000000030773 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 030773 
----------

*030773  SETZB	1,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030773 030773 030773 403040000002 777777777777 0                0            000000030773 0            0   0   777 
IT1	*      *      000002 *            403040000002 0                306000030770 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 030774 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000001000001 *            0            0   0   *   
ST5	030774 030774 *      261100032226 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=306000 030770 C(E) =000001 000001 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*030774  PUSH	2,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030774 030774 030774 261100032226 777777777777 0                0            000000030773 0            0   0   777 
IT1	*      *      032226 *            261100032226 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            777777777777 0            0   0   *   
ET1	*      000001 030775 *            777777777777 *                0            *            0            0   0   *   SEQ 0102
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      *            *            *                000000000000 *            0            0   0   *   
ST5	030775 030775 *      312040032226 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=000001 000001 C(C(ACR))=777777 777777 
----------

*030775  CAME	1,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030775 030775 030775 312040032226 777777777777 777777777777     000001000001 000001000001 0            0   0   777 
IT1	*      *      032226 *            312040032226 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      030776 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	030776 *      030777 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*030777  JUMPA	0,031000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030777 030777 030777 324000031000 777777777777 777777777777     777777777777 000001000001 0            0   0   777 
IT1	*      *      031000 *            324000031000 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031000     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031000 *            000000031000 000000000000     0            000000031000 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031000 
----------

*031000  SETZM	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031000 031000 031000 402000000002 777777777777 0                0            000000031000 0            0   0   777 
IT1	*      *      000002 *            402000000002 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   0   *   
FT6	*      000002 031001 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000001000001 *            0            0   0   *   
ST5	031001 031001 *      261100032227 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000001 000001 
FINAL
C(E) =000000 000000 
----------                                                                                                                 SEQ 0103

*031001  PUSH	2,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031001 031001 031001 261100032227 777777777777 0                0            000000031000 0            0   0   777 
IT1	*      *      032227 *            261100032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      000001 0            000001000001 0                0            *            0            0   0   *   
MEMST	*      *      *      0            *            000001000001     0            000000000000 0            0   0   *   
ET1	*      000001 031002 0            777777777777 *                0            0            0            0   0   *   
ET2	*      *      *      0            000000000000 *                0            0            0            0   0   *   
ST1	*      *      *      0            777777777777 000000000000     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      0            *            0                777777777777 *            0            0   0   *   
ST5	031002 031002 *      332000000001 *            0                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=777777 777777 C(E) =000000 000000 
FINAL
C(AC)=000001 000001 C(C(ACR))=000000 000000 
----------

*031002  SKIPE	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031002 031002 031002 332000000001 777777777777 0                000001000001 000001000001 0            0   0   777 
IT1	*      *      000001 *            332000000001 0                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     0            *            0            0   0   *   
FT6	*      000001 *      *            777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031003 *            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      *            0            0                0            *            0            0   0   *   
ST1	031003 *      031004 *            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031004  JUMPA	0,031005

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031004 031004 031004 324000031005 777777777777 0                0            000001000001 0            0   0   777 
IT1	*      *      031005 *            324000031005 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031005     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031005 *            000000031005 000000000000     0            000000031005 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031005 
----------

*031005  MOVEI	2,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031005 031005 031005 201100777777 777777777777 0                0            000000031005 0            0   0   777 
IT1	*      *      777777 *            201100777777 0                000001000001 *            0            0   0   *   SEQ 0104
ET2	*      *      031006 *            000001000001 000000777777     *            *            0            0   0   *   
ST1	031006 031006 *      400000000000 777777777777 *                000000777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 777777 
FINAL
C(AC)=000000 777777 
----------

*031006  SETZ 	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031006 031006 031006 400000000000 777777777777 000000777777     000000777777 000000031005 0            0   0   777 
IT1	*      *      000000 *            400000000000 *                000000000000 *            0            0   0   *   
ET2	*      *      031007 *            000000000000 000000000000     0            *            0            0   0   *   
ST1	031007 031007 *      261100032226 777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031007  PUSH	2,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031007 031007 031007 261100032226 777777777777 0                0            000000031005 0            0   0   777 
IT1	*      *      032226 *            261100032226 0                000000777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      000000 *            000001000000 *                *            *            0            0   0   *   
MEMST	*      *      0      *            *            000001000000     *            777777777777 0            0   0   *   
ET1	*      000000 031010 *            777777777777 *                *            *            0            0   0   *   
ET2	*      0      *      *            *            *                *            *            0            0   0   *   
ST1	*      0      *      *            *            777777777777     000001000000 000001000000 0            0   0   *   
ST2	*      0      *      *            *            *                000000000000 *            0            0   0   *   
ST5	031010 031010 *      312000032226 *            *                000001000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 777777 C(C(ACR+1))=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=000001 000000 C(C(ACR))=777777 777777 
----------

*031010  CAME	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031010 031010 031010 312000032226 777777777777 777777777777     000001000000 000001000000 0            0   0   777 
IT1	*      *      032226 *            312000032226 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031011 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031011 *      031012 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0105
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031012  JUMPA	0,031013

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031012 031012 031012 324000031013 777777777777 777777777777     777777777777 000001000000 0            0   0   777 
IT1	*      *      031013 *            324000031013 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031013     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031013 *            000000031013 777777777777     *            000000031013 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031013 
----------

*031013  MOVEI	2,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031013 031013 031013 201100777777 777777777777 777777777777     777777777777 000000031013 0            0   0   777 
IT1	*      *      777777 *            201100777777 *                000001000000 *            0            0   0   *   
ET2	*      *      031014 *            000001000000 000000777777     *            *            0            0   0   *   
ST1	031014 031014 *      261100000000 777777777777 *                000000777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000000 E    =000000 777777 
FINAL
C(AC)=000000 777777 
----------

*031014  PUSH	2,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031014 031014 031014 261100000000 777777777777 000000777777     000000777777 000000031013 0            0   0   777 
IT1	*      *      000000 *            261100000000 *                *            *            0            0   0   *   
MEMST	*      *      0      *            *            000000000000     *            *            0            0   0   *   
FT6	*      000000 0      *            777777777777 777777777777     *            *            0            0   0   *   
ET0	*      0      0      *            000001000000 *                *            *            0            0   0   *   
MEMST	*      0      0      *            *            000001000000     *            777777777777 0            0   0   *   
ET1	*      0      031015 *            777777777777 *                *            *            0            0   0   *   
ET2	*      0      *      *            *            *                *            *            0            0   0   *   
ST1	*      0      *      *            *            777777777777     000001000000 000001000000 0            0   0   *   
ST2	*      0      *      777777777777 *            *                777777777777 *            0            0   0   *   
ST5	031015 031015 *      312100032230 *            *                000001000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 777777 C(C(ACR+1))=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=000001 000000 C(C(ACR))=777777 777777 
----------

*031015  CAME	2,032230

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031015 031015 031015 312100032230 777777777777 777777777777     000001000000 000001000000 0            0   0   777 
IT1	*      *      032230 *            312100032230 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032230     *            *            0            0   0   *   SEQ 0106
FT6	*      032230 *      000001000000 777777777777 000001000000     *            *            0            0   0   *   
ET0	*      *      031016 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031016 *      031017 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000000 C(E) =000001 000000 
----------

*031017  JUMPA	0,031020

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031017 031017 031017 324000031020 777777777777 000001000000     000001000000 000001000000 0            0   0   777 
IT1	*      *      031020 *            324000031020 *                777777777777 *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031020     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031020 *            000000031020 777777777777     *            000000031020 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031020 
----------

*031020  MOVSI	1,200000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031020 031020 031020 205040200000 777777777777 777777777777     777777777777 000000031020 0            0   0   777 
IT1	*      *      200000 *            205040200000 *                000000000000 *            0            0   0   *   
ET2	*      *      031021 *            000000000000 000000200000     0            *            0            0   0   *   
ST1	031021 031021 *      255740031022 777777777777 200000000000     200000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 200000 
FINAL
C(AC)=200000 000000 
----------

*031021  JFCL	17,031022

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031021 031021 031021 255740031022 777777777777 200000000000     200000000000 000000031020 0            0   0   777 
IT1	*      *      031022 *            255740031022 *                000000000000 *            0            0   0   *   
ET2	*      *      *      *            777777777777 000000031022     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031022 
----------

*031022  JRST	2,031023(1)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031022 031022 031022 254101031023 777777777777 000000031022     0            000000031020 0            0   0   777 
IT1	*      *      031023 *            200000031023 *                200000000000 *            0            0   0   *   
FT6	*      *      *      *            *            200000031023     000001000000 *            0            0   0   *   
ET2	*      *      777777 *            777777777777 *                *            *            0            0   0   *   
ST1	031022 *      031023 *            200000031023 000000031023     *            200000031023 0            0   0   *   
                                                                                                                           SEQ 0107
FLAGS - INT/FINAL   000000 200000 
INITIAL
E    =000000 031023 
----------

*031023  SETZ 	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031023 031023 031023 400000000000 777777777777 000000031023     000001000000 200000031023 0            0   0   777 
IT1	*      *      000000 *            400000000000 *                777777777777 *            0            0   0   *   
ET2	*      *      031024 *            000000000000 000000000000     *            *            0            0   0   *   
ST1	031024 031024 *      260000031026 777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
FINAL
C(AC)=000000 000000 
----------

*031024  PUSHJ	0,031026

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031024 031024 031024 260000031026 777777777777 0                0            200000031023 0            0   0   777 
IT1	*      *      031026 *            260000031026 0                0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031026     0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            000000031026 0            0   0   *   
ET1	*      000001 *      *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      031026 *            000000031026 *                0            *            0            0   0   *   
ST1	031026 *      *      *            777777777777 200000031025     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      200000031025 *            *                200000000000 *            0            0   0   *   
ST5	*      031026 *      324000031027 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=200000 000000 
FINAL
C(AC)=000001 000001 C(C(ACR))=200000 031025 
----------

*031026  JUMPA	0,031027

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031026 031026 031026 324000031027 777777777777 200000031025     000001000001 000001000001 0            0   0   777 
IT1	*      *      031027 *            324000031027 *                *            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031027     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031027 *            000000031027 000001000001     *            000000031027 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 E    =000000 031027 
----------

*031027  MOVSI	1,200000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031027 031027 031027 205040200000 777777777777 000001000001     000001000001 000000031027 0            0   0   777 
IT1	*      *      200000 *            205040200000 *                200000031025 *            0            0   0   *   
ET2	*      *      031030 *            200000031025 000000200000     *            *            0            0   0   *   SEQ 0108
ST1	031030 031030 *      255740031031 777777777777 200000000000     200000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 031025 E    =000000 200000 
FINAL
C(AC)=200000 000000 
----------

*031030  JFCL	17,031031

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031030 031030 031030 255740031031 777777777777 200000000000     200000000000 000000031027 0            0   0   777 
IT1	*      *      031031 *            255740031031 *                000000000000 *            0            0   0   *   
ET2	031031 031031 *      254101031032 777777777777 000000031031     0            *            0            0   0   *   

FLAGS - INT/FINAL   200000 000000 
INITIAL
E    =000000 031031 
----------

*031031  JRST	2,031032(1)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031031 031031 031031 254101031032 777777777777 000000031031     0            000000031027 0            0   0   777 
IT1	*      *      031032 *            200000031032 *                200000000000 *            0            0   0   *   
FT6	*      *      *      *            *            200000031032     000001000000 *            0            0   0   *   
ET2	*      *      777777 *            777777777777 *                *            *            0            0   0   *   
ST1	031031 *      031032 *            200000031032 000000031032     *            200000031032 0            0   0   *   

FLAGS - INT/FINAL   000000 200000 
INITIAL
E    =000000 031032 
----------

*031032  SETZB	1,031034

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031032 031032 031032 403040031034 777777777777 000000031032     000001000000 200000031032 0            0   0   777 
IT1	*      *      031034 *            403040031034 *                200000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000031034     *            *            0            0   0   *   
FT6	*      031034 *      *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                0            *            0            0   0   *   
ST5	031033 031033 031033 260000031036 *            0                0            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031033  PUSHJ	0,031036

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031033 031033 031033 260000031036 777777777777 0                0            200000031032 0            0   0   777 
IT1	*      *      031036 *            260000031036 0                000001000001 *            0            0   0   *   
ET0	*      *      000002 *            000002000002 000000031036     *            *            0            0   0   *   SEQ 0109
MEMST	*      *      *      *            *            000002000002     *            000000031036 0            0   0   *   
ET1	*      000002 *      *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      031036 *            000000031036 *                *            *            0            0   0   *   
ST1	031036 *      *      *            777777777777 200000031034     000002000002 000002000002 0            0   0   *   
ST2	*      *      *      200000031034 *            *                000001000000 *            0            0   0   *   
ST5	*      031036 *      332000031034 *            *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 C(C(ACR+1))=000001 000000 
FINAL
C(AC)=000002 000002 C(C(ACR))=200000 031034 
----------

*031036  SKIPE	0,031034

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031036 031036 031036 332000031034 777777777777 200000031034     000002000002 000002000002 0            0   0   777 
IT1	*      *      031034 *            332000031034 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000031034     *            *            0            0   0   *   
FT6	*      031034 *      000000000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      031037 0            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      0            0            0                *            *            0            0   0   *   
ST1	031037 *      031040 0            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000002 000002 C(E) =000000 000000 
FINAL
C(AC)=000002 000002 
----------

*031040  JUMPA	0,031041

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031040 031040 031040 324000031041 777777777777 0                000002000002 000002000002 0            0   0   777 
IT1	*      *      031041 *            324000031041 0                *            *            0            0   0   *   
ET0	*      *      000002 *            000002000002 000000031041     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031041 *            000000031041 000002000002     *            000000031041 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000002 000002 E    =000000 031041 
----------

*031041  MOVSI	1,200000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031041 031041 031041 205040200000 777777777777 000002000002     000002000002 000000031041 0            0   0   777 
IT1	*      *      200000 *            205040200000 *                000000000000 *            0            0   0   *   
ET2	*      *      031042 *            000000000000 000000200000     0            *            0            0   0   *   
ST1	031042 031042 *      255740031043 777777777777 200000000000     200000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 E    =000000 200000 
FINAL
C(AC)=200000 000000 
----------                                                                                                                 SEQ 0110

*031042  JFCL	17,031043

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031042 031042 031042 255740031043 777777777777 200000000000     200000000000 000000031041 0            0   0   777 
IT1	*      *      031043 *            255740031043 *                000000000000 *            0            0   0   *   
ET2	031043 031043 *      254101031044 777777777777 000000031043     0            *            0            0   0   *   

FLAGS - INT/FINAL   200000 000000 
INITIAL
E    =000000 031043 
----------

*031043  JRST	2,031044(1)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031043 031043 031043 254101031044 777777777777 000000031043     0            000000031041 0            0   0   777 
IT1	*      *      031044 *            200000031044 *                200000000000 *            0            0   0   *   
FT6	*      *      *      *            *            200000031044     200000031034 *            0            0   0   *   
ET2	*      *      777777 *            777777777777 *                *            *            0            0   0   *   
ST1	031043 *      031044 *            200000031044 000000031044     *            200000031044 0            0   0   *   

FLAGS - INT/FINAL   000000 200000 
INITIAL
E    =000000 031044 
----------

*031044  SETZB	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031044 031044 031044 403000000001 777777777777 000000031044     200000031034 200000031044 0            0   0   777 
IT1	*      *      000001 *            403000000001 *                000002000002 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 031045 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                200000000000 *            0            0   0   *   
ST5	031045 031045 *      260000031046 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000002 000002 C(E) =200000 000000 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031045  PUSHJ	0,031046

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031045 031045 031045 260000031046 777777777777 0                0            200000031044 0            0   0   777 
IT1	*      *      031046 *            260000031046 0                0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031046     0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            000000031046 0            0   0   *   
ET1	*      000001 *      *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      031046 *            000000031046 *                0            *            0            0   0   *   
ST1	031046 *      *      *            777777777777 200000031046     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      200000031046 *            *                000000000000 *            0            0   0   *   
ST5	*      031046 *      200100031046 *            *                000001000001 *            0            0   0   *   
FLAGS - INT/FINAL   200000 200000                                                                                          SEQ 0111
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000000 000000 
FINAL
C(AC)=000001 000001 C(C(ACR))=200000 031046 
----------

*031046  MOVE 	2,031046

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031046 031046 031046 200100031046 777777777777 200000031046     000001000001 000001000001 0            0   0   777 
IT1	*      *      *      *            200100031046 *                200000031034 *            0            0   0   *   
MEMST	*      *      *      *            *            000000031046     *            *            0            0   0   *   
FT6	031047 031047 031047 312100031046 777777777777 200100031046     *            *            0            0   0   *   
ET2	*      *      *      *            200000031034 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                200100031046 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 031034 C(E) =200100 031046 
FINAL
C(AC)=200100 031046 
----------

*031047  CAME	2,031046

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031047 031047 031047 312100031046 777777777777 200100031046     200100031046 000001000001 0            0   0   777 
IT1	*      *      031046 *            312100031046 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000031046     *            *            0            0   0   *   
FT6	*      031046 *      200100031046 777777777777 200100031046     *            *            0            0   0   *   
ET0	*      *      031050 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031050 *      031051 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200100 031046 C(E) =200100 031046 
----------

*031051  JUMPA	0,031052

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031051 031051 031051 324000031052 777777777777 200100031046     200100031046 000001000001 0            0   0   777 
IT1	*      *      031052 *            324000031052 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031052     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031052 *            000000031052 000001000001     *            000000031052 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 E    =000000 031052 
----------

*031052  MOVEI	2,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031052 031052 031052 201100000001 777777777777 000001000001     000001000001 000000031052 0            0   0   777 
IT1	*      *      000001 *            201100000001 *                200100031046 *            0            0   0   *   
ET2	*      *      031053 *            200100031046 000000000001     *            *            0            0   0   *   
ST1	031053 031053 *      400000000000 777777777777 *                000000000001 *            0            0   0   *   SEQ 0112

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200100 031046 E    =000000 000001 
FINAL
C(AC)=000000 000001 
----------

*031053  SETZ 	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031053 031053 031053 400000000000 777777777777 000000000001     000000000001 000000031052 0            0   0   777 
IT1	*      *      000000 *            400000000000 *                000001000001 *            0            0   0   *   
ET2	*      *      031054 *            000000000000 000000000000     *            *            0            0   0   *   
ST1	031054 031054 *      260100031055 777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000001 
FINAL
C(AC)=000000 000000 
----------

*031054  PUSHJ	2,031055

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031054 031054 031054 260100031055 777777777777 0                0            000000031052 0            0   0   777 
IT1	*      *      031055 *            260100031055 0                000000000001 *            0            0   0   *   
ET0	*      *      000002 *            000001000002 000000031055     *            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000002     *            000000031055 0            0   0   *   
ET1	*      000002 *      *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      031055 *            000000031055 *                *            *            0            0   0   *   
ST1	031055 *      *      *            777777777777 200000031055     000001000002 000001000002 0            0   0   *   
ST2	*      *      *      200000031055 *            *                *            *            0            0   0   *   
ST5	*      031055 *      332000000000 *            *                200000031055 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000001 C(C(ACR+1))=000000 000001 
FINAL
C(AC)=200000 031055 C(C(ACR))=332000 000000 
----------

*031055  SKIPE	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031055 031055 031055 332000000000 777777777777 200000031055     200000031055 000001000002 0            0   0   777 
IT1	*      *      000000 *            332000000000 *                000000000000 *            0            0   0   *   
MEMST	*      *      0      *            *            000000000000     0            *            0            0   0   *   
FT6	*      000000 0      *            777777777777 0                0            *            0            0   0   *   
ET0	*      0      031056 *            000000000000 0                0            *            0            0   0   *   
ET2	*      0      *      *            0            0                0            *            0            0   0   *   
ST1	031056 0      031057 *            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------                                                                                                                 SEQ 0113

*031057  JUMPA	0,031060

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031057 031057 031057 324000031060 777777777777 0                0            000001000002 0            0   0   777 
IT1	*      *      031060 *            324000031060 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031060     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031060 *            000000031060 000000000000     0            000000031060 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 E    =000000 031060 
----------

*031060  SETZB	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031060 031060 031060 403000000001 777777777777 0                0            000000031060 0            0   0   777 
IT1	*      *      000001 *            403000000001 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     0            *            0            0   0   *   
FT6	*      000001 031061 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                200000031046 *            0            0   0   *   
ST5	031061 031061 *      260000031063 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 C(E) =200000 031046 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031061  PUSHJ	0,031063

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031061 031061 031061 260000031063 777777777777 0                0            000000031060 0            0   0   777 
IT1	*      *      031063 *            260000031063 0                0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031063     0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            000000031063 0            0   0   *   
ET1	*      000001 *      *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      031063 *            000000031063 *                0            *            0            0   0   *   
ST1	031063 *      *      *            777777777777 200000031062     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      200000031062 *            *                000000000000 *            0            0   0   *   
ST5	*      031063 *      405040777777 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000000 000000 
FINAL
C(AC)=000001 000001 C(C(ACR))=200000 031062 
----------

*031063  ANDI	1,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031063 031063 031063 405040777777 777777777777 200000031062     000001000001 000001000001 0            0   0   777 
IT1	*      *      777777 *            405040777777 *                200000031062 *            0            0   0   *   
ET2	*      *      031064 *            000000031062 000000777777     *            *            0            0   0   *   SEQ 0114
ST1	031064 031064 *      306040031063 777777777777 000000031062     000000031062 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 031062 E    =000000 777777 
FINAL
C(AC)=000000 031062 
----------

*031064  CAIN	1,031063

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031064 031064 031064 306040031063 777777777777 000000031062     000000031062 000001000001 0            0   0   777 
IT1	*      *      031063 *            306040031063 *                *            *            0            0   0   *   
ET0	*      *      031065 *            777777777777 000000031063     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	031065 *      031066 *            *            *                *            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 031062 E    =000000 031063 
----------

*031066  JUMPA	0,031067

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031066 031066 031066 324000031067 777777777777 000000031063     000000031062 000001000001 0            0   0   777 
IT1	*      *      031067 *            324000031067 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031067     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031067 *            000000031067 000001000001     *            000000031067 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 E    =000000 031067 
----------

*031067  SETZ 	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031067 031067 031067 400000000000 777777777777 000001000001     000001000001 000000031067 0            0   0   777 
IT1	*      *      000000 *            400000000000 *                *            *            0            0   0   *   
ET2	*      *      031070 *            000000000000 000000000000     *            *            0            0   0   *   
ST1	031070 031070 *      260000031071 777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000001 
FINAL
C(AC)=000000 000000 
----------

*031070  PUSHJ	0,031071

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031070 031070 031070 260000031071 777777777777 0                0            000000031067 0            0   0   777 
IT1	*      *      031071 *            260000031071 0                0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031071     0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            000000031071 0            0   0   *   
ET1	*      000001 *      *            777777777777 *                0            *            0            0   0   *   SEQ 0115
ET2	*      *      031071 *            000000031071 *                0            *            0            0   0   *   
ST1	031071 *      *      *            777777777777 200000031071     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      200000031071 *            *                000000031062 *            0            0   0   *   
ST5	*      031071 *      312000032223 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000000 031062 
FINAL
C(AC)=000001 000001 C(C(ACR))=200000 031071 
----------

*031071  CAME	0,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031071 031071 031071 312000032223 777777777777 200000031071     000001000001 000001000001 0            0   0   777 
IT1	*      *      032223 *            312000032223 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     *            *            0            0   0   *   
FT6	*      032223 *      000001000001 777777777777 000001000001     *            *            0            0   0   *   
ET0	*      *      031072 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031072 *      031073 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000001 
----------

*031073  JUMPA	0,031074

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031073 031073 031073 324000031074 777777777777 000001000001     000001000001 000001000001 0            0   0   777 
IT1	*      *      031074 *            324000031074 *                *            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031074     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031074 *            000000031074 000001000001     *            000000031074 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 E    =000000 031074 
----------

*031074  MOVSI	1,200000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031074 031074 031074 205040200000 777777777777 000001000001     000001000001 000000031074 0            0   0   777 
IT1	*      *      200000 *            205040200000 *                200000031071 *            0            0   0   *   
ET2	*      *      031075 *            200000031071 000000200000     *            *            0            0   0   *   
ST1	031075 031075 *      255740031076 777777777777 200000000000     200000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 031071 E    =000000 200000 
FINAL
C(AC)=200000 000000 
----------

*031075  JFCL	17,031076
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0116
IT0	031075 031075 031075 255740031076 777777777777 200000000000     200000000000 000000031074 0            0   0   777 
IT1	*      *      031076 *            255740031076 *                000000000000 *            0            0   0   *   
ET2	031076 031076 *      254101031077 777777777777 000000031076     0            *            0            0   0   *   

FLAGS - INT/FINAL   200000 000000 
INITIAL
E    =000000 031076 
----------

*031076  JRST	2,031077(1)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031076 031076 031076 254101031077 777777777777 000000031076     0            000000031074 0            0   0   777 
IT1	*      *      031077 *            200000031077 *                200000000000 *            0            0   0   *   
FT6	*      *      *      *            *            200000031077     200000031055 *            0            0   0   *   
ET2	*      *      777777 *            777777777777 *                *            *            0            0   0   *   
ST1	031076 *      031077 *            200000031077 000000031077     *            200000031077 0            0   0   *   

FLAGS - INT/FINAL   000000 200000 
INITIAL
E    =000000 031077 
----------

*031077  SETZB	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031077 031077 031077 403000000001 777777777777 000000031077     200000031055 200000031077 0            0   0   777 
IT1	*      *      000001 *            403000000001 *                000001000001 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 031100 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                200000000000 *            0            0   0   *   
ST5	031100 031100 *      260000031101 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 C(E) =200000 000000 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031100  PUSHJ	0,031101

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031100 031100 031100 260000031101 777777777777 0                0            200000031077 0            0   0   777 
IT1	*      *      031101 *            260000031101 0                0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031101     0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            000000031101 0            0   0   *   
ET1	*      000001 *      *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      031101 *            000000031101 *                0            *            0            0   0   *   
ST1	031101 *      *      *            777777777777 200000031101     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      200000031101 *            *                000000000000 *            0            0   0   *   
ST5	*      031101 *      607040200000 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=000000 000000 
FINAL
C(AC)=000001 000001 C(C(ACR))=200000 031101                                                                                SEQ 0117
----------

*031101  TLNN	1,200000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031101 031101 031101 607040200000 777777777777 200000031101     000001000001 000001000001 0            0   0   777 
IT1	*      *      200000 *            607040200000 *                200000031101 *            0            0   0   *   
ET0	*      *      031102 *            000000000000 000000200000     *            *            0            0   0   *   
ET1	*      *      *      *            200000000000 200000000000     *            *            0            0   0   *   
ET2	031102 *      031103 *            777777777777 *                *            200000000000 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 031101 E    =000000 200000 
FINAL
C(AC)=200000 031101 
----------

*031103  JUMPA	0,031104

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031103 031103 031103 324000031104 777777777777 777777777777     200000031101 200000000000 0            0   0   777 
IT1	*      *      031104 *            324000031104 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031104     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031104 *            000000031104 000001000001     *            000000031104 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 E    =000000 031104 
----------

*031104  MOVEI	1,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031104 031104 031104 201040000001 777777777777 000001000001     000001000001 000000031104 0            0   0   777 
IT1	*      *      000001 *            201040000001 *                200000031101 *            0            0   0   *   
ET2	*      *      031105 *            200000031101 000000000001     *            *            0            0   0   *   
ST1	031105 031105 *      260040031107 777777777777 *                000000000001 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 031101 E    =000000 000001 
FINAL
C(AC)=000000 000001 
----------

*031105  PUSHJ	1,031107

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031105 031105 031105 260040031107 777777777777 000000000001     000000000001 000000031104 0            0   0   777 
IT1	*      *      031107 *            260040031107 *                *            *            0            0   0   *   
ET0	*      *      000002 *            000001000002 000000031107     *            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000002     *            000000031107 0            0   0   *   
ET1	*      000002 *      *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      031107 *            000000031107 *                *            *            0            0   0   *   
ST1	031107 *      *      *            777777777777 200000031106     000001000002 000001000002 0            0   0   *   
ST2	*      *      *      200000031106 *            *                200000031055 *            0            0   0   *   
ST5	*      031107 *      312040032231 *            *                000001000002 *            0            0   0   *   
                                                                                                                           SEQ 0118
FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000001 C(C(ACR+1))=200000 031055 
FINAL
C(AC)=000001 000002 C(C(ACR))=200000 031106 
----------

*031107  CAME	1,032231

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031107 031107 031107 312040032231 777777777777 200000031106     000001000002 000001000002 0            0   0   777 
IT1	*      *      032231 *            312040032231 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032231     *            *            0            0   0   *   
FT6	*      032231 *      000001000002 777777777777 000001000002     *            *            0            0   0   *   
ET0	*      *      031110 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031110 *      031111 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000002 C(E) =000001 000002 
----------

*031111  JUMPA	0,031112

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031111 031111 031111 324000031112 777777777777 000001000002     000001000002 000001000002 0            0   0   777 
IT1	*      *      031112 *            324000031112 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031112     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031112 *            000000031112 000001000001     *            000000031112 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 E    =000000 031112 
----------

*031112  MOVEI	1,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031112 031112 031112 201040000001 777777777777 000001000001     000001000001 000000031112 0            0   0   777 
IT1	*      *      000001 *            201040000001 *                000001000002 *            0            0   0   *   
ET2	*      *      031113 *            000001000002 000000000001     *            *            0            0   0   *   
ST1	031113 031113 *      260040031115 777777777777 *                000000000001 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000002 E    =000000 000001 
FINAL
C(AC)=000000 000001 
----------

*031113  PUSHJ	1,031115

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031113 031113 031113 260040031115 777777777777 000000000001     000000000001 000000031112 0            0   0   777 
IT1	*      *      031115 *            260040031115 *                *            *            0            0   0   *   
ET0	*      *      000002 *            000001000002 000000031115     *            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000002     *            000000031115 0            0   0   *   
ET1	*      000002 *      *            777777777777 *                *            *            0            0   0   *   SEQ 0119
ET2	*      *      031115 *            000000031115 *                *            *            0            0   0   *   
ST1	031115 *      *      *            777777777777 200000031114     000001000002 000001000002 0            0   0   *   
ST2	*      *      *      200000031114 *            *                200000031106 *            0            0   0   *   
ST5	*      031115 *      405100777777 *            *                000001000002 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 000001 C(C(ACR+1))=200000 031106 
FINAL
C(AC)=000001 000002 C(C(ACR))=200000 031114 
----------

*031115  ANDI	2,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031115 031115 031115 405100777777 777777777777 200000031114     000001000002 000001000002 0            0   0   777 
IT1	*      *      777777 *            405100777777 *                200000031114 *            0            0   0   *   
ET2	*      *      031116 *            000000031114 000000777777     *            *            0            0   0   *   
ST1	031116 031116 *      302100031114 777777777777 000000031114     000000031114 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=200000 031114 E    =000000 777777 
FINAL
C(AC)=000000 031114 
----------

*031116  CAIE	2,031114

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031116 031116 031116 302100031114 777777777777 000000031114     000000031114 000001000002 0            0   0   777 
IT1	*      *      031114 *            302100031114 *                *            *            0            0   0   *   
ET0	*      *      031117 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031117 *      031120 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000000 031114 E    =000000 031114 
----------

*031120  JUMPA	0,031121

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031120 031120 031120 324000031121 777777777777 000000031114     000000031114 000001000002 0            0   0   777 
IT1	*      *      031121 *            324000031121 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031121     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031121 *            000000031121 000001000001     *            000000031121 0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000001 E    =000000 031121 
----------

*031121  MOVSI	1,020000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031121 031121 031121 205040020000 777777777777 000001000001     000001000001 000000031121 0            0   0   777 
IT1	*      *      020000 *            205040020000 *                000001000002 *            0            0   0   *   SEQ 0120
ET2	*      *      031122 *            000001000002 000000020000     *            *            0            0   0   *   
ST1	031122 031122 *      255740031123 777777777777 020000000000     020000000000 *            0            0   0   *   

FLAGS - INT/FINAL   200000 200000 
INITIAL
C(AC)=000001 000002 E    =000000 020000 
FINAL
C(AC)=020000 000000 
----------

*031122  JFCL	17,031123

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031122 031122 031122 255740031123 777777777777 020000000000     020000000000 000000031121 0            0   0   777 
IT1	*      *      031123 *            255740031123 *                000000000000 *            0            0   0   *   
ET2	031123 031123 *      254101031124 777777777777 000000031123     0            *            0            0   0   *   

FLAGS - INT/FINAL   200000 000000 
INITIAL
E    =000000 031123 
----------

*031123  JRST	2,031124(1)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031123 031123 031123 254101031124 777777777777 000000031123     0            000000031121 0            0   0   777 
IT1	*      *      031124 *            020000031124 *                020000000000 *            0            0   0   *   
FT6	*      *      *      *            *            020000031124     000000031114 *            0            0   0   *   
ET2	*      *      777777 *            777777777777 *                *            *            0            0   0   *   
ST1	031123 *      031124 *            020000031124 000000031124     *            020000031124 0            0   0   *   

FLAGS - INT/FINAL   000000 020000 
INITIAL
E    =000000 031124 
----------

*031124  SETZ 	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031124 031124 031124 400000000000 777777777777 000000031124     000000031114 020000031124 0            0   0   777 
IT1	*      *      000000 *            400000000000 *                000001000001 *            0            0   0   *   
ET2	*      *      031125 *            000000000000 000000000000     *            *            0            0   0   *   
ST1	031125 031125 *      260000031126 777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   020000 020000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000001 
FINAL
C(AC)=000000 000000 
----------

*031125  PUSHJ	0,031126

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031125 031125 031125 260000031126 777777777777 0                0            020000031124 0            0   0   777 
IT1	*      *      031126 *            260000031126 0                0            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031126     0            *            0            0   0   *   
MEMST	*      *      *      *            *            000001000001     0            000000031126 0            0   0   *   
ET1	*      000001 *      *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      031126 *            000000031126 *                0            *            0            0   0   *   SEQ 0121
ST1	031126 *      *      *            777777777777 020000031126     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      020000031126 *            *                020000000000 *            0            0   0   *   
ST5	*      031126 *      265000031127 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   020000 000000 
INITIAL
C(AC)=000000 000000 C(C(ACR+1))=020000 000000 
FINAL
C(AC)=000001 000001 C(C(ACR))=020000 031126 
----------

*031126  JSP	0,031127

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031126 031126 031126 265000031127 777777777777 020000031126     000001000001 000001000001 0            0   0   777 
IT1	*      *      031127 *            265000031127 *                *            *            0            0   0   *   
ET2	*      *      777777 *            777777777777 000000031127     *            *            0            0   0   *   
ST1	*      *      031127 *            000000031127 *                000000031127 000000031127 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 031127 
FINAL
C(AC)=000000 031127 
----------

*031127  TLNE	0,020000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031127 031127 031127 603000020000 777777777777 000000031127     000000031127 000000031127 0            0   0   777 
IT1	*      *      020000 *            603000020000 *                *            *            0            0   0   *   
ET0	*      *      031130 *            000000020000 000000020000     *            *            0            0   0   *   
ET1	*      *      *      *            000000000000 020000000000     *            *            0            0   0   *   
ET2	031130 *      031131 *            777777777777 *                *            020000000000 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031127 E    =000000 020000 
FINAL
C(AC)=000000 031127 
----------

*031131  JUMPA	0,031132

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031131 031131 031131 324000031132 777777777777 777777777777     000000031127 020000000000 0            0   0   777 
IT1	*      *      031132 *            324000031132 *                *            *            0            0   0   *   
ET0	*      *      031127 *            000000031127 000000031132     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031132 *            000000031132 000000031127     *            000000031132 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031127 E    =000000 031132 
----------

*031132  MOVEI	2,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031132 031132 031132 201100777777 777777777777 000000031127     000000031127 000000031132 0            0   0   77  SEQ 0122
IT1	*      *      777777 *            201100777777 *                000000031114 *            0            0   0   *   
ET2	*      *      031133 *            000000031114 000000777777     *            *            0            0   0   *   
ST1	031133 031133 *      260100031134 777777777777 *                000000777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031114 E    =000000 777777 
FINAL
C(AC)=000000 777777 
----------

*031133  PUSHJ	2,031134

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031133 031133 031133 260100031134 777777777777 000000777777     000000777777 000000031132 0            0   0   777 
IT1	*      *      031134 *            260100031134 *                *            *            0            0   0   *   
ET0	*      *      000000 *            000001000000 000000031134     *            *            0            0   0   *   
MEMST	*      *      0      *            *            000001000000     *            000000031134 0            0   0   *   
ET1	*      000000 0      *            777777777777 *                *            *            0            0   0   *   
ET2	*      0      031134 *            000000031134 *                *            *            0            0   0   *   
ST1	031134 0      *      *            777777777777 000000031134     000001000000 000001000000 0            0   0   *   
ST2	*      0      *      000000031134 *            *                000000031127 *            0            0   0   *   
ST5	*      031134 *      312100032230 *            *                000001000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 777777 C(C(ACR+1))=000000 000000 
FINAL
C(AC)=000001 000000 C(C(ACR))=000000 031134 
----------

*031134  CAME	2,032230

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031134 031134 031134 312100032230 777777777777 000000031134     000001000000 000001000000 0            0   0   777 
IT1	*      *      032230 *            312100032230 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032230     *            *            0            0   0   *   
FT6	*      032230 *      000001000000 777777777777 000001000000     *            *            0            0   0   *   
ET0	*      *      031135 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031135 *      031136 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000000 C(E) =000001 000000 
----------

*031136  JUMPA	0,031137

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031136 031136 031136 324000031137 777777777777 000001000000     000001000000 000001000000 0            0   0   777 
IT1	*      *      031137 *            324000031137 *                000000031134 *            0            0   0   *   
ET0	*      *      031134 *            000000031134 000000031137     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031137 *            000000031137 000000031134     *            000000031137 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031134 E    =000000 031137 
----------                                                                                                                 SEQ 0123

*031137  MOVE 	0,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031137 031137 031137 200000032223 777777777777 000000031134     000000031134 000000031137 0            0   0   777 
IT1	*      *      032223 *            200000032223 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     *            *            0            0   0   *   
FT6	031140 031140 031140 262000000001 777777777777 000001000001     *            *            0            0   0   *   
ET2	*      *      *      *            000000031134 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031134 C(E) =000001 000001 
FINAL
C(AC)=000001 000001 
----------

*031140  POP	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031140 031140 031140 262000000001 777777777777 000001000001     000001000001 000000031137 0            0   0   777 
IT1	*      *      000001 *            262000000001 *                *            *            0            0   0   *   
FT3	*      *      *      *            000001000001 000000000001     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000001 0            0   0   *   
FT4	*      000001 *      *            777777777777 020000031126     *            *            0            0   0   777 
FT5	*      *      *      *            000000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   
FT6	*      *      031141 *            777777777777 *                *            *            0            0   0   *   
ET0	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            020000031126 000000000000     *            020000031126 0            0   0   *   
ST1	*      *      *      *            777777777777 020000031126     000000000000 000000000000 0            0   0   *   
ST2	*      *      *      020000031126 *            *                020000031126 0            0            0   0   *   
ST5	031141 031141 *      332000000000 *            *                000000000000 0            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(C(ACR))=020000 031126 C(E) =020000 031126 
FINAL
C(AC)=000000 000000 C(E) =020000 031126 
----------

*031141  SKIPE	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031141 031141 031141 332000000000 777777777777 020000031126     0            0            0            0   0   777 
IT1	*      *      000000 *            332000000000 *                0            0            0            0   0   *   
MEMST	*      *      0      *            *            000000000000     0            0            0            0   0   *   
FT6	*      000000 0      *            777777777777 0                0            0            0            0   0   *   
ET0	*      0      031142 *            000000000000 0                0            0            0            0   0   *   
ET2	*      0      *      *            0            0                0            0            0            0   0   *   
ST1	031142 0      031143 *            777777777777 0                0            0            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------
                                                                                                                           SEQ 0124
*031143  JUMPA	0,031144

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031143 031143 031143 324000031144 777777777777 0                0            0            0            0   0   777 
IT1	*      *      031144 *            324000031144 0                0            0            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031144     0            0            0            0   0   *   
ET2	*      *      0      *            0            *                0            0            0            0   0   *   
ST1	*      *      031144 *            000000031144 000000000000     0            000000031144 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031144 
----------

*031144  MOVE 	0,032232

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031144 031144 031144 200000032232 777777777777 0                0            000000031144 0            0   0   777 
IT1	*      *      032232 *            200000032232 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032232     0            *            0            0   0   *   
FT6	031145 031145 031145 201100000005 777777777777 000002000002     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000002 000002 
FINAL
C(AC)=000002 000002 
----------

*031145  MOVEI	2,000005

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031145 031145 031145 201100000005 777777777777 000002000002     000002000002 000000031144 0            0   0   777 
IT1	*      *      000005 *            201100000005 *                000001000000 *            0            0   0   *   
ET2	*      *      031146 *            000001000000 000000000005     *            *            0            0   0   *   
ST1	031146 031146 *      262000000002 777777777777 *                000000000005 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000000 E    =000000 000005 
FINAL
C(AC)=000000 000005 
----------

*031146  POP	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031146 031146 031146 262000000002 777777777777 000000000005     000000000005 000000031144 0            0   0   777 
IT1	*      *      000002 *            262000000002 *                000002000002 *            0            0   0   *   
FT3	*      *      *      *            000002000002 000000000002     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000002 0            0   0   *   
FT4	*      000002 *      *            777777777777 000000000005     *            *            0            0   0   777 
FT5	*      *      *      *            000000000002 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   
FT6	*      *      031147 *            777777777777 *                *            *            0            0   0   *   
ET0	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000005 000001000001     *            000000000005 0            0   0   *   
ST1	*      *      *      *            777777777777 000000000005     000001000001 000001000001 0            0   0   *   SEQ 0125
ST2	*      *      *      000000000005 *            *                000000000005 *            0            0   0   *   
ST5	031147 031147 *      312000032223 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(C(ACR))=000000 000005 C(E) =000000 000005 
FINAL
C(AC)=000001 000001 C(E) =000000 000005 
----------

*031147  CAME	0,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031147 031147 031147 312000032223 777777777777 000000000005     000001000001 000001000001 0            0   0   777 
IT1	*      *      032223 *            312000032223 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     *            *            0            0   0   *   
FT6	*      032223 *      000001000001 777777777777 000001000001     *            *            0            0   0   *   
ET0	*      *      031150 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031150 *      031151 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000001 
----------

*031151  JUMPA	0,031152

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031151 031151 031151 324000031152 777777777777 000001000001     000001000001 000001000001 0            0   0   777 
IT1	*      *      031152 *            324000031152 *                *            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031152     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031152 *            000000031152 000001000001     *            000000031152 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 031152 
----------

*031152  MOVE 	0,032232

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031152 031152 031152 200000032232 777777777777 000001000001     000001000001 000000031152 0            0   0   777 
IT1	*      *      032232 *            200000032232 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032232     *            *            0            0   0   *   
FT6	031153 031153 031153 402000000002 777777777777 000002000002     *            *            0            0   0   *   
ET2	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000002 000002 
FINAL
C(AC)=000002 000002 
----------

*031153  SETZM	0,000002
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0126
IT0	031153 031153 031153 402000000002 777777777777 000002000002     000002000002 000000031152 0            0   0   777 
IT1	*      *      000002 *            402000000002 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 031154 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000000005 *            0            0   0   *   
ST5	031154 031154 *      262000000002 *            0                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(E) =000000 000005 
FINAL
C(E) =000000 000000 
----------

*031154  POP	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031154 031154 031154 262000000002 777777777777 0                000002000002 000000031152 0            0   0   777 
IT1	*      *      000002 *            262000000002 0                *            *            0            0   0   *   
FT3	*      *      *      *            000002000002 000000000002     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000002 0            0   0   *   
FT4	*      000002 *      *            777777777777 000000000000     *            *            0            0   0   777 
FT5	*      *      *      *            000000000002 0                *            *            0            0   0   *   
MEMST	*      *      *      *            *            0                *            *            0            0   0   *   
FT6	*      *      031155 *            777777777777 0                *            *            0            0   0   *   
ET0	*      *      *      *            000001000001 0                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 000001000001     *            000000000000 0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000000000 *            0            0   0   *   
ST5	031155 031155 *      332000000002 *            0                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(C(ACR))=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000001 000001 C(E) =000000 000000 
----------

*031155  SKIPE	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031155 031155 031155 332000000002 777777777777 0                000001000001 000001000001 0            0   0   777 
IT1	*      *      000002 *            332000000002 0                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 *      *            777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      031156 *            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      *            0            0                *            *            0            0   0   *   
ST1	031156 *      031157 *            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000000 000000 
FINAL
C(AC)=000001 000001 
----------

*031157  JUMPA	0,031160
                                                                                                                           SEQ 0127
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031157 031157 031157 324000031160 777777777777 0                000001000001 000001000001 0            0   0   777 
IT1	*      *      031160 *            324000031160 0                *            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031160     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031160 *            000000031160 000001000001     *            000000031160 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 031160 
----------

*031160  MOVE 	0,032232

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031160 031160 031160 200000032232 777777777777 000001000001     000001000001 000000031160 0            0   0   777 
IT1	*      *      032232 *            200000032232 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032232     *            *            0            0   0   *   
FT6	031161 031161 031161 201100000017 777777777777 000002000002     *            *            0            0   0   *   
ET2	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000002 000002 
FINAL
C(AC)=000002 000002 
----------

*031161  MOVEI	2,000017

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031161 031161 031161 201100000017 777777777777 000002000002     000002000002 000000031160 0            0   0   777 
IT1	*      *      000017 *            201100000017 *                000000000000 *            0            0   0   *   
ET2	*      *      031162 *            000000000000 000000000017     0            *            0            0   0   *   
ST1	031162 031162 *      402000000001 777777777777 *                000000000017 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 000017 
FINAL
C(AC)=000000 000017 
----------

*031162  SETZM	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031162 031162 031162 402000000001 777777777777 000000000017     000000000017 000000031160 0            0   0   777 
IT1	*      *      000001 *            402000000001 *                000002000002 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 031163 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                020000031126 *            0            0   0   *   
ST5	031163 031163 *      262000000002 *            0                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(E) =020000 031126 
FINAL                                                                                                                      SEQ 0128
C(E) =000000 000000 
----------

*031163  POP	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031163 031163 031163 262000000002 777777777777 0                000002000002 000000031160 0            0   0   777 
IT1	*      *      000002 *            262000000002 0                *            *            0            0   0   *   
FT3	*      *      *      *            000002000002 000000000002     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000002 0            0   0   *   
FT4	*      000002 *      *            777777777777 000000000017     *            *            0            0   0   777 
FT5	*      *      *      *            000000000002 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   
FT6	*      *      031164 *            777777777777 *                *            *            0            0   0   *   
ET0	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000017 000001000001     *            000000000017 0            0   0   *   
ST1	*      *      *      *            777777777777 000000000017     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      000000000017 *            *                000000000017 *            0            0   0   *   
ST5	031164 031164 *      332000000001 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(C(ACR))=000000 000017 C(E) =000000 000017 
FINAL
C(AC)=000001 000001 C(E) =000000 000017 
----------

*031164  SKIPE	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031164 031164 031164 332000000001 777777777777 000000000017     000001000001 000001000001 0            0   0   777 
IT1	*      *      000001 *            332000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 *      *            777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      031165 *            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      *            0            0                *            *            0            0   0   *   
ST1	031165 *      031166 *            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000000 000000 
FINAL
C(AC)=000001 000001 
----------

*031166  JUMPA	0,031167

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031166 031166 031166 324000031167 777777777777 0                000001000001 000001000001 0            0   0   777 
IT1	*      *      031167 *            324000031167 0                *            *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031167     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031167 *            000000031167 000001000001     *            000000031167 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 031167 
----------
*031167  MOVE 	0,032232                                                                                                   SEQ 0129

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031167 031167 031167 200000032232 777777777777 000001000001     000001000001 000000031167 0            0   0   777 
IT1	*      *      032232 *            200000032232 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032232     *            *            0            0   0   *   
FT6	031170 031170 031170 201100000003 777777777777 000002000002     *            *            0            0   0   *   
ET2	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000002 000002 
FINAL
C(AC)=000002 000002 
----------

*031170  MOVEI	2,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031170 031170 031170 201100000003 777777777777 000002000002     000002000002 000000031167 0            0   0   777 
IT1	*      *      000003 *            201100000003 *                000000000017 *            0            0   0   *   
ET2	*      *      031171 *            000000000017 000000000003     *            *            0            0   0   *   
ST1	031171 031171 *      402000000003 777777777777 *                000000000003 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000017 E    =000000 000003 
FINAL
C(AC)=000000 000003 
----------

*031171  SETZM	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031171 031171 031171 402000000003 777777777777 000000000003     000000000003 000000031167 0            0   0   777 
IT1	*      *      000003 *            402000000003 *                000002000002 *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   
FT6	*      000003 031172 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000000000 *            0            0   0   *   
ST5	031172 031172 *      262000000003 *            0                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(E) =000000 000000 
FINAL
C(E) =000000 000000 
----------

*031172  POP	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031172 031172 031172 262000000003 777777777777 0                000002000002 000000031167 0            0   0   777 
IT1	*      *      000003 *            262000000003 0                *            *            0            0   0   *   
FT3	*      *      000002 *            000002000002 000000000003     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000003 0            0   0   *   
FT4	*      000002 *      *            777777777777 *                *            *            0            0   0   777 
FT5	*      *      000003 *            000000000003 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   SEQ 0130
FT6	*      000003 031173 *            777777777777 *                *            *            0            0   0   *   
ET0	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000003 000001000001     *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000003     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      000000000003 *            *                000000000000 *            0            0   0   *   
ST5	031173 031173 *      302140000003 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(C(ACR))=000000 000003 C(E) =000000 000000 
FINAL
C(AC)=000001 000001 C(E) =000000 000003 
----------

*031173  CAIE	3,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031173 031173 031173 302140000003 777777777777 000000000003     000001000001 000001000001 0            0   0   777 
IT1	*      *      000003 *            302140000003 *                000000000003 *            0            0   0   *   
ET0	*      *      031174 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031174 *      031175 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000003 E    =000000 000003 
----------

*031175  JUMPA	0,031176

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031175 031175 031175 324000031176 777777777777 000000000003     000000000003 000001000001 0            0   0   777 
IT1	*      *      031176 *            324000031176 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031176     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031176 *            000000031176 000001000001     *            000000031176 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 031176 
----------

*031176  SETZM	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031176 031176 031176 402000000002 777777777777 000001000001     000001000001 000000031176 0            0   0   777 
IT1	*      *      000002 *            402000000002 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 031177 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000000003 *            0            0   0   *   
ST5	031177 031177 *      200000032232 *            0                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000000 000003 
FINAL
C(E) =000000 000000 
----------                                                                                                                 SEQ 0131

*031177  MOVE 	0,032232

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031177 031177 031177 200000032232 777777777777 0                000001000001 000000031176 0            0   0   777 
IT1	*      *      032232 *            200000032232 0                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032232     *            *            0            0   0   *   
FT6	031200 031200 031200 201100000017 777777777777 000002000002     *            *            0            0   0   *   
ET2	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000002 000002 
FINAL
C(AC)=000002 000002 
----------

*031200  MOVEI	2,000017

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031200 031200 031200 201100000017 777777777777 000002000002     000002000002 000000031176 0            0   0   777 
IT1	*      *      000017 *            201100000017 *                000000000000 *            0            0   0   *   
ET2	*      *      031201 *            000000000000 000000000017     0            *            0            0   0   *   
ST1	031201 031201 *      262000000002 777777777777 *                000000000017 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 000017 
FINAL
C(AC)=000000 000017 
----------

*031201  POP	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031201 031201 031201 262000000002 777777777777 000000000017     000000000017 000000031176 0            0   0   777 
IT1	*      *      000002 *            262000000002 *                000002000002 *            0            0   0   *   
FT3	*      *      *      *            000002000002 000000000002     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000002 0            0   0   *   
FT4	*      000002 *      *            777777777777 000000000017     *            *            0            0   0   777 
FT5	*      *      *      *            000000000002 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   
FT6	*      *      031202 *            777777777777 *                *            *            0            0   0   *   
ET0	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000017 000001000001     *            000000000017 0            0   0   *   
ST1	*      *      *      *            777777777777 000000000017     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      000000000017 *            *                000000000017 *            0            0   0   *   
ST5	031202 031202 *      302100000017 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(C(ACR))=000000 000017 C(E) =000000 000017 
FINAL
C(AC)=000001 000001 C(E) =000000 000017 
----------

*031202  CAIE	2,000017
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0132
IT0	031202 031202 031202 302100000017 777777777777 000000000017     000001000001 000001000001 0            0   0   777 
IT1	*      *      000017 *            302100000017 *                000000000017 *            0            0   0   *   
ET0	*      *      031203 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031203 *      031204 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000017 E    =000000 000017 
----------

*031204  JUMPA	0,031205

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031204 031204 031204 324000031205 777777777777 000000000017     000000000017 000001000001 0            0   0   777 
IT1	*      *      031205 *            324000031205 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031205     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031205 *            000000031205 000001000001     *            000000031205 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 031205 
----------

*031205  MOVE 	0,032232

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031205 031205 031205 200000032232 777777777777 000001000001     000001000001 000000031205 0            0   0   777 
IT1	*      *      032232 *            200000032232 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032232     *            *            0            0   0   *   
FT6	031206 031206 031206 476000000002 777777777777 000002000002     *            *            0            0   0   *   
ET2	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000002 000002 
FINAL
C(AC)=000002 000002 
----------

*031206  SETOM	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031206 031206 031206 476000000002 777777777777 000002000002     000002000002 000000031205 0            0   0   777 
IT1	*      *      000002 *            476000000002 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 031207 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     *            *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                000000000017 *            0            0   0   *   
ST5	031207 031207 *      402000000003 *            *                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(E) =000000 000017 
FINAL
C(E) =777777 777777 
----------                                                                                                                 SEQ 0133

*031207  SETZM	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031207 031207 031207 402000000003 777777777777 777777777777     000002000002 000000031205 0            0   0   777 
IT1	*      *      000003 *            402000000003 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000003     *            *            0            0   0   *   
FT6	*      000003 031210 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000000003 *            0            0   0   *   
ST5	031210 031210 *      262000000003 *            0                000002000002 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(E) =000000 000003 
FINAL
C(E) =000000 000000 
----------

*031210  POP	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031210 031210 031210 262000000003 777777777777 0                000002000002 000000031205 0            0   0   777 
IT1	*      *      000003 *            262000000003 0                *            *            0            0   0   *   
FT3	*      *      000002 *            000002000002 000000000003     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000003 0            0   0   *   
FT4	*      000002 *      *            777777777777 777777777777     *            *            0            0   0   777 
FT5	*      *      000003 *            000000000003 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   
FT6	*      000003 031211 *            777777777777 *                *            *            0            0   0   *   
ET0	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ET2	*      *      *      *            777777777777 000001000001     *            777777777777 0            0   0   *   
ST1	*      *      *      *            *            777777777777     000001000001 000001000001 0            0   0   *   
ST2	*      *      *      777777777777 *            *                000000000000 *            0            0   0   *   
ST5	031211 031211 *      312140032226 *            *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000002 C(C(ACR))=777777 777777 C(E) =000000 000000 
FINAL
C(AC)=000001 000001 C(E) =777777 777777 
----------

*031211  CAME	3,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031211 031211 031211 312140032226 777777777777 777777777777     000001000001 000001000001 0            0   0   777 
IT1	*      *      032226 *            312140032226 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031212 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031212 *      031213 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------
                                                                                                                           SEQ 0134
*031213  JUMPA	0,031214

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031213 031213 031213 324000031214 777777777777 777777777777     777777777777 000001000001 0            0   0   777 
IT1	*      *      031214 *            324000031214 *                000001000001 *            0            0   0   *   
ET0	*      *      000001 *            000001000001 000000031214     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031214 *            000000031214 000001000001     *            000000031214 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 E    =000000 031214 
----------

*031214  MOVE 	0,032233

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031214 031214 031214 200000032233 777777777777 000001000001     000001000001 000000031214 0            0   0   777 
IT1	*      *      032233 *            200000032233 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032233     *            *            0            0   0   *   
FT6	031215 031215 031215 402000000001 777777777777 000001000017     *            *            0            0   0   *   
ET2	*      *      *      *            000001000001 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000001000017 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(E) =000001 000017 
FINAL
C(AC)=000001 000017 
----------

*031215  SETZM	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031215 031215 031215 402000000001 777777777777 000001000017     000001000017 000000031214 0            0   0   777 
IT1	*      *      000001 *            402000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 031216 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000000000 *            0            0   0   *   
ST5	031216 031216 *      476000000017 *            0                000001000017 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000017 C(E) =000000 000000 
FINAL
C(E) =000000 000000 
----------

*031216  SETOM	0,000017

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031216 031216 031216 476000000017 777777777777 0                000001000017 000000031214 0            0   0   777 
IT1	*      *      000017 *            476000000017 0                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000017     *            *            0            0   0   *   
FT6	*      000017 031217 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     *            *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                000000000000 *            0            0   0   *   SEQ 0135
ST5	031217 031217 *      262000000001 *            *                000001000017 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000017 C(E) =000000 000000 
FINAL
C(E) =777777 777777 
----------

*031217  POP	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031217 031217 031217 262000000001 777777777777 777777777777     000001000017 000000031214 0            0   0   777 
IT1	*      *      000001 *            262000000001 *                *            *            0            0   0   *   
FT3	*      *      000017 *            000001000017 000000000001     *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000000001 0            0   0   *   
FT4	*      000017 *      *            777777777777 777777777777     *            *            0            0   0   777 
FT5	*      *      000001 *            000000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            *            0            0   0   *   
FT6	*      000001 031220 *            777777777777 *                *            *            0            0   0   *   
ET0	*      *      *      *            000000000016 *                *            *            0            0   0   *   
ET2	*      *      *      *            777777777777 000000000016     *            777777777777 0            0   0   *   
ST1	*      *      *      *            *            777777777777     000000000016 000000000016 0            0   0   *   
ST2	*      *      *      777777777777 *            *                000000000000 *            0            0   0   *   
ST5	031220 031220 *      312040032226 *            *                000000000016 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000017 C(C(ACR))=777777 777777 C(E) =000000 000000 
FINAL
C(AC)=000000 000016 C(E) =777777 777777 
----------

*031220  CAME	1,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031220 031220 031220 312040032226 777777777777 777777777777     000000000016 000000000016 0            0   0   777 
IT1	*      *      032226 *            312040032226 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031221 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031221 *      031222 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031222  JUMPA	0,031223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031222 031222 031222 324000031223 777777777777 777777777777     777777777777 000000000016 0            0   0   777 
IT1	*      *      031223 *            324000031223 *                000000000016 *            0            0   0   *   
ET0	*      *      000016 *            000000000016 000000031223     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031223 *            000000031223 000000000016     *            000000031223 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0136
C(AC)=000000 000016 E    =000000 031223 
----------

*031223  CAIE	0,000016

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031223 031223 031223 302000000016 777777777777 000000000016     000000000016 000000031223 0            0   0   777 
IT1	*      *      000016 *            302000000016 *                *            *            0            0   0   *   
ET0	*      *      031224 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031224 *      031225 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000016 E    =000000 000016 
----------

*031225  JUMPA	0,031226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031225 031225 031225 324000031226 777777777777 000000000016     000000000016 000000031223 0            0   0   777 
IT1	*      *      031226 *            324000031226 *                *            *            0            0   0   *   
ET0	*      *      000016 *            000000000016 000000031226     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031226 *            000000031226 000000000016     *            000000031226 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000016 E    =000000 031226 
----------

*031226  MOVSI	1,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031226 031226 031226 205040777777 777777777777 000000000016     000000000016 000000031226 0            0   0   777 
IT1	*      *      777777 *            205040777777 *                777777777777 *            0            0   0   *   
ET2	*      *      031227 *            777777777777 000000777777     *            *            0            0   0   *   
ST1	031227 031227 *      400000000000 *            777777000000     777777000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 777777 
FINAL
C(AC)=777777 000000 
----------

*031227  SETZ 	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031227 031227 031227 400000000000 777777777777 777777000000     777777000000 000000031226 0            0   0   777 
IT1	*      *      000000 *            400000000000 *                000000000016 *            0            0   0   *   
ET2	*      *      031230 *            000000000000 000000000000     *            *            0            0   0   *   
ST1	031230 031230 *      262040000017 777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000016 C(E) =000000 000016 
FINAL
C(AC)=000000 000000 
----------                                                                                                                 SEQ 0137

*031230  POP	1,000017

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031230 031230 031230 262040000017 777777777777 0                0            000000031226 0            0   0   777 
IT1	*      *      000017 *            262040000017 0                777777000000 *            0            0   0   *   
FT3	*      *      000000 *            777777000000 000000000017     *            *            0            0   0   776 
MEMST	*      *      0      *            *            *                *            000000000017 0            0   0   *   
FT4	*      000000 0      *            777777777777 000000000000     *            *            0            0   0   777 
FT5	*      0      000017 *            000000000017 0                *            *            0            0   0   *   
MEMST	*      0      *      *            *            0                *            *            0            0   0   *   
FT6	*      000017 031231 *            777777777777 0                *            *            0            0   0   *   
ET0	*      *      *      *            777776777777 0                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 777776777777     *            000000000000 0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     777776777777 777776777777 0            0   0   *   
ST2	*      *      *      000000000000 *            0                777777777777 *            0            0   0   *   
ST5	031231 031231 *      332000000017 *            0                777776777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 000000 C(C(ACR))=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777776 777777 C(E) =000000 000000 
----------

*031231  SKIPE	0,000017

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031231 031231 031231 332000000017 777777777777 0                777776777777 777776777777 0            0   0   777 
IT1	*      *      000017 *            332000000017 0                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000017     0            *            0            0   0   *   
FT6	*      000017 *      *            777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031232 *            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      *            0            0                0            *            0            0   0   *   
ST1	031232 *      031233 *            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031233  JUMPA	0,031234

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031233 031233 031233 324000031234 777777777777 0                0            777776777777 0            0   0   777 
IT1	*      *      031234 *            324000031234 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031234     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031234 *            000000031234 000000000000     0            000000031234 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031234 
----------

*031234  HRLZI	2,000001
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0138
IT0	031234 031234 031234 515100000001 777777777777 0                0            000000031234 0            0   0   777 
IT1	*      *      000001 *            515100000001 0                777777777777 *            0            0   0   *   
ET2	*      *      031235 *            777777777777 000000000001     *            *            0            0   0   *   
ST1	031235 031235 *      262100000000 *            000001000000     000001000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 000001 
FINAL
C(AC)=000001 000000 
----------

*031235  POP	2,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031235 031235 031235 262100000000 777777777777 000001000000     000001000000 000000031234 0            0   0   777 
IT1	*      *      000000 *            262100000000 *                *            *            0            0   0   *   
FT3	*      *      0      *            000001000000 000000000000     *            *            0            0   0   *   
MEMST	*      *      0      *            *            0                *            000000000000 0            0   0   *   
FT4	*      000000 0      *            777777777777 0                *            0            0            0   0   *   
FT5	*      0      0      *            000000000000 0                *            0            0            0   0   *   
MEMST	*      0      0      *            0            0                *            0            0            0   0   *   
FT6	*      0      031236 *            777777777777 0                *            0            0            0   0   *   
ET0	*      0      *      *            000000777777 0                *            0            0            0   0   *   
ET2	*      0      *      *            000000000000 000000777777     *            0            0            0   0   *   
ST1	*      0      *      *            777777777777 000000000000     000000777777 000000777777 0            0   0   *   
ST2	*      0      *      000000000000 *            0                000000000000 *            0            0   0   *   
ST5	031236 031236 *      302100777777 *            0                000000777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000000 C(C(ACR))=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 777777 C(E) =000000 000000 
----------

*031236  CAIE	2,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031236 031236 031236 302100777777 777777777777 0                000000777777 000000777777 0            0   0   777 
IT1	*      *      777777 *            302100777777 0                *            *            0            0   0   *   
ET0	*      *      031237 *            000000000000 000000777777     *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031237 *      031240 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 777777 E    =000000 777777 
----------

*031240  JUMPA	0,031241

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031240 031240 031240 324000031241 777777777777 000000777777     000000777777 000000777777 0            0   0   777 
IT1	*      *      031241 *            324000031241 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031241     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031241 *            000000031241 000000000000     0            000000031241 0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0139
INITIAL
C(AC)=000000 000000 E    =000000 031241 
----------

*031241  MOVE 	0,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031241 031241 031241 200000032223 777777777777 0                0            000000031241 0            0   0   777 
IT1	*      *      032223 *            200000032223 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     0            *            0            0   0   *   
FT6	031242 031242 031242 201040031245 777777777777 000001000001     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000001 000001 
FINAL
C(AC)=000001 000001 
----------

*031242  MOVEI	1,031245

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031242 031242 031242 201040031245 777777777777 000001000001     000001000001 000000031241 0            0   0   777 
IT1	*      *      031245 *            201040031245 *                777776777777 *            0            0   0   *   
ET2	*      *      031243 *            777776777777 000000031245     *            *            0            0   0   *   
ST1	031243 031243 *      263000031245 777777777777 *                000000031245 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777776 777777 E    =000000 031245 
FINAL
C(AC)=000000 031245 
----------

*031243  POPJ	0,031245

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031243 031243 031243 263000031245 777777777777 000000031245     000000031245 000000031241 0            0   0   777 
IT1	*      *      031245 *            263000031245 *                000001000001 *            0            0   0   *   
FT3	*      *      000001 *            000001000001 *                *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000031245 0            0   0   *   
FT6	*      000001 *      *            777777777777 *                *            *            0            0   0   777 
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      031245 *            000000031245 000000000000     000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(C(ACR))=000000 031245 
FINAL
C(AC)=000000 000000 
----------

*031245  JUMPA	0,031246

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031245 031245 031245 324000031246 777777777777 0                0            000000031245 0            0   0   777 
IT1	*      *      031246 *            324000031246 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031246     0            *            0            0   0   *   SEQ 0140
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031246 *            000000031246 000000000000     0            000000031246 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031246 
----------

*031246  MOVE 	0,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031246 031246 031246 200000032223 777777777777 0                0            000000031246 0            0   0   777 
IT1	*      *      032223 *            200000032223 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     0            *            0            0   0   *   
FT6	031247 031247 031247 201040031251 777777777777 000001000001     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000001 000001 
FINAL
C(AC)=000001 000001 
----------

*031247  MOVEI	1,031251

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031247 031247 031247 201040031251 777777777777 000001000001     000001000001 000000031246 0            0   0   777 
IT1	*      *      031251 *            201040031251 *                000000031245 *            0            0   0   *   
ET2	*      *      031250 *            000000031245 000000031251     *            *            0            0   0   *   
ST1	031250 031250 *      263000031251 777777777777 *                000000031251 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031245 E    =000000 031251 
FINAL
C(AC)=000000 031251 
----------

*031250  POPJ	0,031251

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031250 031250 031250 263000031251 777777777777 000000031251     000000031251 000000031246 0            0   0   777 
IT1	*      *      031251 *            263000031251 *                000001000001 *            0            0   0   *   
FT3	*      *      000001 *            000001000001 *                *            *            0            0   0   776 
MEMST	*      *      *      *            *            *                *            000000031251 0            0   0   *   
FT6	*      000001 *      *            777777777777 *                *            *            0            0   0   777 
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      031251 *            000000031251 000000000000     000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(C(ACR))=000000 031251 
FINAL
C(AC)=000000 000000 
----------

*031251  CAME	0,032227
                                                                                                                           SEQ 0141
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031251 031251 031251 312000032227 777777777777 0                0            000000031251 0            0   0   777 
IT1	*      *      032227 *            312000032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031252 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031252 *      031253 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031253  JUMPA	0,031254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031253 031253 031253 324000031254 777777777777 0                0            000000031251 0            0   0   777 
IT1	*      *      031254 *            324000031254 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031254     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031254 *            000000031254 000000000000     0            000000031254 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031254 
----------

*031254  MOVE 	0,032223

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031254 031254 031254 200000032223 777777777777 0                0            000000031254 0            0   0   777 
IT1	*      *      032223 *            200000032223 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032223     0            *            0            0   0   *   
FT6	031255 031255 031255 201040031257 777777777777 000001000001     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000001000001 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000001 000001 
FINAL
C(AC)=000001 000001 
----------

*031255  MOVEI	1,031257

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031255 031255 031255 201040031257 777777777777 000001000001     000001000001 000000031254 0            0   0   777 
IT1	*      *      031257 *            201040031257 *                000000031251 *            0            0   0   *   
ET2	*      *      031256 *            000000031251 000000031257     *            *            0            0   0   *   
ST1	031256 031256 *      263000031260 777777777777 *                000000031257 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031251 E    =000000 031257 
FINAL
C(AC)=000000 031257 
----------
                                                                                                                           SEQ 0142
*031256  POPJ	0,031260

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031256 031256 031256 263000031260 777777777777 000000031257     000000031257 000000031254 0            0   0   777 
IT1	*      *      031260 *            263000031260 *                000001000001 *            0            0   0   *   
FT3	*      *      000001 *            000001000001 000000031260     *            *            0            0   0   *   
MEMST	*      *      *      *            *            *                *            000000031260 0            0   0   *   
FT6	*      000001 *      *            777777777777 000000031257     *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      031257 *            000000031257 000000000000     000000000000 000000031257 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000001 C(C(ACR))=000000 031257 
FINAL
C(AC)=000000 000000 
----------

*031257  SKIPA	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031257 031257 031257 334000000000 777777777777 0                0            000000031257 0            0   0   777 
IT1	*      *      000000 *            334000000000 0                0            *            0            0   0   *   
MEMST	*      *      0      *            *            0                0            *            0            0   0   *   
FT6	*      000000 0      *            777777777777 0                0            *            0            0   0   *   
ET0	*      0      031260 *            000000000000 0                0            *            0            0   0   *   
ET2	*      0      *      *            0            0                0            *            0            0   0   *   
ST1	031260 0      031261 *            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031261  JUMPA	0,031262

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031261 031261 031261 324000031262 777777777777 0                0            000000031257 0            0   0   777 
IT1	*      *      031262 *            324000031262 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031262     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031262 *            000000031262 000000000000     0            000000031262 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031262 
----------

*031262  HRLZI	2,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031262 031262 031262 515100000001 777777777777 0                0            000000031262 0            0   0   777 
IT1	*      *      000001 *            515100000001 0                000000777777 *            0            0   0   *   
ET2	*      *      031263 *            777777777777 000000000001     *            *            0            0   0   *   
ST1	031263 031263 *      201000031265 *            000001000000     000001000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0143
C(AC)=000000 777777 E    =000000 000001 
FINAL
C(AC)=000001 000000 
----------

*031263  MOVEI	0,031265

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031263 031263 031263 201000031265 777777777777 000001000000     000001000000 000000031262 0            0   0   777 
IT1	*      *      031265 *            201000031265 *                000000000000 *            0            0   0   *   
ET2	*      *      031264 *            000000000000 000000031265     0            *            0            0   0   *   
ST1	031264 031264 *      263100000000 777777777777 *                000000031265 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031265 
FINAL
C(AC)=000000 031265 
----------

*031264  POPJ	2,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031264 031264 031264 263100000000 777777777777 000000031265     000000031265 000000031262 0            0   0   777 
IT1	*      *      000000 *            263100000000 *                000001000000 *            0            0   0   *   
FT3	*      *      0      *            000001000000 000000000000     *            *            0            0   0   *   
MEMST	*      *      0      *            *            0                *            000000000000 0            0   0   *   
FT6	*      000000 0      *            777777777777 000000031265     *            0            0            0   0   *   
ET2	*      0      0      *            000000777777 *                *            0            0            0   0   *   
ST1	*      0      031265 *            000000031265 000000777777     000000777777 000000031265 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000000 C(C(ACR))=000000 031265 
FINAL
C(AC)=000000 777777 
----------

*031265  CAIE	2,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031265 031265 031265 302100777777 777777777777 000000777777     000000777777 000000031265 0            0   0   777 
IT1	*      *      777777 *            302100777777 *                *            *            0            0   0   *   
ET0	*      *      031266 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031266 *      031267 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 777777 E    =000000 777777 
----------

*031267  JUMPA	0,031270

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031267 031267 031267 324000031270 777777777777 000000777777     000000777777 000000031265 0            0   0   777 
IT1	*      *      031270 *            324000031270 *                000000031265 *            0            0   0   *   
ET0	*      *      031265 *            000000031265 000000031270     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031270 *            000000031270 000000031265     *            000000031270 0            0   0   *   SEQ 0144

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031265 E    =000000 031270 
----------

*031270  SETOB	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031270 031270 031270 477000000001 777777777777 000000031265     000000031265 000000031270 0            0   0   777 
IT1	*      *      000001 *            477000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 031271 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     777777777777 *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                000000031257 *            0            0   0   *   
ST5	031271 031271 *      256000032234 *            *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031265 C(E) =000000 031257 
FINAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031271  XCT	0,032234

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031271 031271 031271 256000032234 777777777777 777777777777     777777777777 000000031270 0            0   0   777 
IT1	*      *      032234 *            256000032234 *                *            *            0            0   0   *   
ET2	*      032234 *      312000000001 777777777777 000000032234     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032234 
FINAL
C(E) =312000 000001 
----------

*031271  CAME	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031271 032234 032234 312000000001 777777777777 000000032234     777777777777 000000031270 0            0   0   777 
IT1	*      *      000001 *            312000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 *      *            777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031272 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031272 *      031273 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031273  JUMPA	0,031274

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031273 031273 031273 324000031274 777777777777 777777777777     777777777777 000000031270 0            0   0   777 
IT1	*      *      031274 *            324000031274 *                *            *            0            0   0   *   SEQ 0145
ET0	*      *      777777 *            777777777777 000000031274     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031274 *            000000031274 777777777777     *            000000031274 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031274 
----------

*031274  SETOB	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031274 031274 031274 477000000001 777777777777 777777777777     777777777777 000000031274 0            0   0   777 
IT1	*      *      000001 *            477000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 031275 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     *            *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                *            *            0            0   0   *   
ST5	031275 031275 *      256000032236 *            *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031275  XCT	0,032236

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031275 031275 031275 256000032236 777777777777 777777777777     777777777777 000000031274 0            0   0   777 
IT1	*      *      032236 *            256000032236 *                *            *            0            0   0   *   
ET2	*      032236 *      256000032235 777777777777 000000032236     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032236 
FINAL
C(E) =256000 032235 
----------

*031275  XCT	0,032235

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031275 032236 032236 256000032235 777777777777 000000032236     777777777777 000000031274 0            0   0   777 
IT1	*      *      032235 *            256000032235 *                *            *            0            0   0   *   
ET2	*      032235 *      256000032234 777777777777 000000032235     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032235 
FINAL
C(E) =256000 032234 
----------

*031275  XCT	0,032234

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031275 032235 032235 256000032234 777777777777 000000032235     777777777777 000000031274 0            0   0   77  SEQ 0146
IT1	*      *      032234 *            256000032234 *                *            *            0            0   0   *   
ET2	*      032234 *      312000000001 777777777777 000000032234     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032234 
FINAL
C(E) =312000 000001 
----------

*031275  CAME	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031275 032234 032234 312000000001 777777777777 000000032234     777777777777 000000031274 0            0   0   777 
IT1	*      *      000001 *            312000000001 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     *            *            0            0   0   *   
FT6	*      000001 *      *            777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031276 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031276 *      031277 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031277  JUMPA	0,031300

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031277 031277 031277 324000031300 777777777777 777777777777     777777777777 000000031274 0            0   0   777 
IT1	*      *      031300 *            324000031300 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031300     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031300 *            000000031300 777777777777     *            000000031300 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031300 
----------

*031300  XCT	0,032237

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031300 031300 031300 256000032237 777777777777 777777777777     777777777777 000000031300 0            0   0   777 
IT1	*      *      032237 *            256000032237 *                *            *            0            0   0   *   
ET2	*      032237 *      254000031304 777777777777 000000032237     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032237 
FINAL
C(E) =254000 031304 
----------

*031300  JRST	0,031304

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031300 032237 032237 254000031304 777777777777 000000032237     777777777777 000000031300 0            0   0   777 
IT1	*      *      031304 *            254000031304 *                *            *            0            0   0   *   
ET2	031304 031304 *      324000031305 777777777777 254000031304     *            *            0            0   0   *   SEQ 0147

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031304 
----------

*031304  JUMPA	0,031305

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031304 031304 031304 324000031305 254000031304 000000031301     777777777777 254000031304 0            0   0   777 
IT1	*      *      031305 *            324000031305 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031305     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031305 *            000000031305 777777777777     *            000000031305 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031305 
----------

*031305  SETZM	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031305 031305 031305 402000000003 777777777777 777777777777     777777777777 000000031305 0            0   0   777 
IT1	*      *      000003 *            402000000003 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000003     *            *            0            0   0   *   
FT6	*      000003 031306 *            777777777777 *                *            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                *            *            0            0   0   *   
ST5	031306 031306 *      256000032242 *            0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
FINAL
C(E) =000000 000000 
----------

*031306  XCT	0,032242

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031306 031306 031306 256000032242 777777777777 0                777777777777 000000031305 0            0   0   777 
IT1	*      *      032242 *            256000032242 0                *            *            0            0   0   *   
ET2	*      032242 *      256000032241 777777777777 000000032242     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032242 
FINAL
C(E) =256000 032241 
----------

*031306  XCT	0,032241

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031306 032242 032242 256000032241 777777777777 000000032242     777777777777 000000031305 0            0   0   777 
IT1	*      *      032241 *            256000032241 *                *            *            0            0   0   *   
ET2	*      032241 *      256000032240 777777777777 000000032241     *            *            0            0   0   *   
                                                                                                                           SEQ 0148
FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032241 
FINAL
C(E) =256000 032240 
----------

*031306  XCT	0,032240

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031306 032241 032241 256000032240 777777777777 000000032241     777777777777 000000031305 0            0   0   777 
IT1	*      *      032240 *            256000032240 *                *            *            0            0   0   *   
ET2	*      032240 *      265140031311 777777777777 000000032240     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032240 
FINAL
C(E) =265140 031311 
----------

*031306  JSP	3,031311

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031306 032240 032240 265140031311 777777777777 000000032240     777777777777 000000031305 0            0   0   777 
IT1	*      *      031311 *            265140031311 *                000000000000 *            0            0   0   *   
ET2	*      *      777777 *            777777777777 000000031311     0            *            0            0   0   *   
ST1	*      *      031311 *            000000031311 000000031307     000000031307 000000031311 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031311 
FINAL
C(AC)=000000 031307 
----------

*031311  TRZ 	3,031307

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031311 031311 031311 620140031307 777777777777 000000031307     000000031307 000000031311 0            0   0   777 
IT1	*      *      031307 *            620140031307 *                *            *            0            0   0   *   
ET2	*      *      031312 *            000000000000 *                *            *            0            0   0   *   
ST1	031312 031312 *      602140777777 777777777777 000000000000     000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031307 E    =000000 031307 
FINAL
C(AC)=000000 000000 
----------

*031312  TRNE	3,777777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031312 031312 031312 602140777777 777777777777 0                0            000000031311 0            0   0   777 
IT1	*      *      777777 *            602140777777 0                0            *            0            0   0   *   
ET1	*      *      031313 *            000000000000 000000777777     0            *            0            0   0   *   
ET2	031313 *      031314 *            777777777777 *                0            000000777777 0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0149
INITIAL
C(AC)=000000 000000 E    =000000 777777 
FINAL
C(AC)=000000 000000 
----------

*031314  JUMPA	0,031315

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031314 031314 031314 324000031315 777777777777 777777777777     0            000000777777 0            0   0   777 
IT1	*      *      031315 *            324000031315 *                777777777777 *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031315     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031315 *            000000031315 777777777777     *            000000031315 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031315 
----------

*031315  SETZB	0,000000

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031315 031315 031315 403000000000 777777777777 777777777777     777777777777 000000031315 0            0   0   777 
IT1	*      *      000000 *            403000000000 *                *            *            0            0   0   *   
MEMST	*      *      0      *            *            000000000000     *            *            0            0   0   *   
FT6	*      000000 031316 *            777777777777 0                *            *            0            0   0   *   
ET2	*      0      *      *            000000000000 0                *            *            0            0   0   *   
ST1	*      0      *      *            777777777777 0                000000000000 *            0            0   0   *   
ST2	*      0      *      000000000000 *            0                0            *            0            0   0   *   
ST5	031316 031316 *      476000000001 *            0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031316  SETOM	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031316 031316 031316 476000000001 777777777777 0                0            000000031315 0            0   0   777 
IT1	*      *      000001 *            476000000001 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     0            *            0            0   0   *   
FT6	*      000001 031317 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     0            *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                777777777777 *            0            0   0   *   
ST5	031317 031317 *      256000032234 *            *                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(E) =777777 777777 
----------

*031317  XCT	0,032234
                                                                                                                           SEQ 0150
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031317 031317 031317 256000032234 777777777777 777777777777     0            000000031315 0            0   0   777 
IT1	*      *      032234 *            256000032234 *                0            *            0            0   0   *   
ET2	*      032234 *      312000000001 777777777777 000000032234     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032234 
FINAL
C(E) =312000 000001 
----------

*031317  CAME	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031317 032234 032234 312000000001 777777777777 000000032234     0            000000031315 0            0   0   777 
IT1	*      *      000001 *            312000000001 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000001     0            *            0            0   0   *   
FT6	*      000001 *      *            777777777777 777777777777     0            *            0            0   0   *   
ET0	*      *      031320 *            000000000001 *                0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
----------

*031320  JRST	0,031322

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031320 031320 031320 254000031322 777777777777 777777777777     0            000000031315 0            0   0   777 
IT1	*      *      031322 *            254000031322 *                0            *            0            0   0   *   
ET2	031322 031322 *      324000031323 777777777777 254000031322     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031322 
----------

*031322  JUMPA	0,031323

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031322 031322 031322 324000031323 254000031322 000000031321     0            254000031322 0            0   0   777 
IT1	*      *      031323 *            324000031323 *                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031323     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031323 *            000000031323 000000000000     0            000000031323 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031323 
----------

*031323  MOVEI	4,000010

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031323 031323 031323 201200000010 777777777777 0                0            000000031323 0            0   0   777 
IT1	*      *      000010 *            201200000010 0                0            *            0            0   0   *   
ET2	*      *      031324 *            000000000000 000000000010     0            *            0            0   0   *   SEQ 0151
ST1	031324 031324 *      201440000013 777777777777 *                000000000010 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 000010 
FINAL
C(AC)=000000 000010 
----------

*031324  MOVEI	11,000013

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031324 031324 031324 201440000013 777777777777 000000000010     000000000010 000000031323 0            0   0   777 
IT1	*      *      000013 *            201440000013 *                000000000000 *            0            0   0   *   
ET2	*      *      031325 *            000000000000 000000000013     0            *            0            0   0   *   
ST1	031325 031325 *      201300000003 777777777777 *                000000000013 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 000013 
FINAL
C(AC)=000000 000013 
----------

*031325  MOVEI	6,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031325 031325 031325 201300000003 777777777777 000000000013     000000000013 000000031323 0            0   0   777 
IT1	*      *      000003 *            201300000003 *                000000000000 *            0            0   0   *   
ET2	*      *      031326 *            000000000000 000000000003     0            *            0            0   0   *   
ST1	031326 031326 *      256000032243 777777777777 *                000000000003 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 000003 
FINAL
C(AC)=000000 000003 
----------

*031326  XCT	0,032243

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031326 031326 031326 256000032243 777777777777 000000000003     000000000003 000000031323 0            0   0   777 
IT1	*      *      032243 *            256000032243 *                000000000000 *            0            0   0   *   
ET2	*      032243 *      270304000001 777777777777 000000032243     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032243 
FINAL
C(E) =270304 000001 
----------

*031326  ADD 	6,000001(4)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031326 032243 032243 270304000001 777777777777 000000032243     0            000000031323 0            0   0   777 
IT1	*      *      000011 *            000000000011 *                000000000010 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000011     *            *            0            0   0   *   
FT6	031327 031327 031327 302300000016 777777777777 000000000013     *            *            0            0   0   *   SEQ 0152
ET2	*      *      *      *            000000000016 *                000000000003 *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000016     000000000016 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000003 C(E) =000000 000013 
FINAL
C(AC)=000000 000016 
----------

*031327  CAIE	6,000016

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031327 031327 031327 302300000016 777777777777 000000000016     000000000016 000000031323 0            0   0   777 
IT1	*      *      000016 *            302300000016 *                *            *            0            0   0   *   
ET0	*      *      031330 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031330 *      031331 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000016 E    =000000 000016 
----------

*031331  JUMPA	0,031332

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031331 031331 031331 324000031332 777777777777 000000000016     000000000016 000000031323 0            0   0   777 
IT1	*      *      031332 *            324000031332 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031332     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031332 *            000000031332 000000000000     0            000000031332 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031332 
----------

*031332  SETZM	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031332 031332 031332 402000000002 777777777777 0                0            000000031332 0            0   0   777 
IT1	*      *      000002 *            402000000002 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   0   *   
FT6	*      000002 031333 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000777777 *            0            0   0   *   
ST5	031333 031333 *      256000032244 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 777777 
FINAL
C(E) =000000 000000 
----------

*031333  XCT	0,032244
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0153
IT0	031333 031333 031333 256000032244 777777777777 0                0            000000031332 0            0   0   777 
IT1	*      *      032244 *            256000032244 0                0            *            0            0   0   *   
ET2	*      032244 *      331040000002 777777777777 000000032244     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032244 
FINAL
C(E) =331040 000002 
----------

*031333  SKIPL	1,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031333 032244 032244 331040000002 777777777777 000000032244     0            000000031332 0            0   0   777 
IT1	*      *      000002 *            331040000002 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	*      000002 *      *            777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      031334 *            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      *            0            0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031334  JRST	0,031336

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031334 031334 031334 254000031336 777777777777 0                0            000000031332 0            0   0   777 
IT1	*      *      031336 *            254000031336 0                0            *            0            0   0   *   
ET2	031336 031336 *      324000031337 777777777777 254000031336     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031336 
----------

*031336  JUMPA	0,031337

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031336 031336 031336 324000031337 254000031336 000000031335     0            254000031336 0            0   0   777 
IT1	*      *      031337 *            324000031337 *                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031337     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031337 *            000000031337 000000000000     0            000000031337 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031337 
----------

*031337  SKIPE	0,000001

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031337 031337 031337 332000000001 777777777777 0                0            000000031337 0            0   0   777 
IT1	*      *      000001 *            332000000001 0                0            *            0            0   0   *   SEQ 0154
MEMST	*      *      *      *            *            000000000001     0            *            0            0   0   *   
FT6	*      000001 *      *            777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031340 *            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      *            0            0                0            *            0            0   0   *   
ST1	031340 *      031341 *            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031341  JUMPA	0,031342

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031341 031341 031341 324000031342 777777777777 0                0            000000031337 0            0   0   777 
IT1	*      *      031342 *            324000031342 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031342     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031342 *            000000031342 000000000000     0            000000031342 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031342 
----------

*031342  SETOM	0,000006

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031342 031342 031342 476000000006 777777777777 0                0            000000031342 0            0   0   777 
IT1	*      *      000006 *            476000000006 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000006     0            *            0            0   0   *   
FT6	*      000006 031343 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     0            *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                000000000016 *            0            0   0   *   
ST5	031343 031343 *      256000032245 *            *                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000016 
FINAL
C(E) =777777 777777 
----------

*031343  XCT	0,032245

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031343 031343 031343 256000032245 777777777777 777777777777     0            000000031342 0            0   0   777 
IT1	*      *      032245 *            256000032245 *                0            *            0            0   0   *   
ET2	*      032245 *      331140000006 777777777777 000000032245     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032245 
FINAL
C(E) =331140 000006 
----------
                                                                                                                           SEQ 0155
*031343  SKIPL	3,000006

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031343 032245 032245 331140000006 777777777777 000000032245     0            000000031342 0            0   0   777 
IT1	*      *      000006 *            331140000006 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000006     0            *            0            0   0   *   
FT6	*      000006 *      *            777777777777 777777777777     0            *            0            0   0   *   
ET0	*      *      031344 *            *            *                0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	031344 *      031345 *            *            *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*031345  JUMPA	0,031346

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031345 031345 031345 324000031346 777777777777 777777777777     777777777777 000000031342 0            0   0   777 
IT1	*      *      031346 *            324000031346 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031346     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031346 *            000000031346 000000000000     0            000000031346 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031346 
----------

*031346  SKIPL	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031346 031346 031346 331000000003 777777777777 0                0            000000031346 0            0   0   777 
IT1	*      *      000003 *            331000000003 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000003     0            *            0            0   0   *   
FT6	*      000003 *      *            777777777777 777777777777     0            *            0            0   0   *   
ET0	*      *      031347 *            *            *                0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	031347 *      031350 *            *            *                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=000000 000000 
----------

*031350  JUMPA	0,031351

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031350 031350 031350 324000031351 777777777777 777777777777     0            000000031346 0            0   0   777 
IT1	*      *      031351 *            324000031351 *                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031351     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031351 *            000000031351 000000000000     0            000000031351 0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0156
INITIAL
C(AC)=000000 000000 E    =000000 031351 
----------

*031351  MOVE 	3,032246

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031351 031351 031351 200140032246 777777777777 0                0            000000031351 0            0   0   777 
IT1	*      *      032246 *            200140032246 0                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032246     *            *            0            0   0   *   
FT6	031352 031352 031352 256000032247 777777777777 777776000005     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            *                777776000005 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777776 000005 
FINAL
C(AC)=777776 000005 
----------

*031352  XCT	0,032247

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031352 031352 031352 256000032247 777777777777 777776000005     777776000005 000000031351 0            0   0   777 
IT1	*      *      032247 *            256000032247 *                000000000000 *            0            0   0   *   
ET2	*      032247 *      253140031355 777777777777 000000032247     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032247 
FINAL
C(E) =253140 031355 
----------

*031352  AOBJN	3,031355

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031352 032247 032247 253140031355 777777777777 000000032247     0            000000031351 0            0   0   777 
IT1	*      *      031355 *            253140031355 *                777776000005 *            0            0   0   *   
ET2	*      *      000006 *            777777000006 000000031355     *            *            0            0   0   *   
ST1	*      *      031355 *            000000031355 777777000006     777777000006 000000031355 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777776 000005 E    =000000 031355 
FINAL
C(AC)=777777 000006 
----------

*031355  CAME	3,032250

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031355 031355 031355 312140032250 777777777777 777777000006     777777000006 000000031355 0            0   0   777 
IT1	*      *      032250 *            312140032250 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032250     *            *            0            0   0   *   
FT6	*      032250 *      777777000006 777777777777 777777000006     *            *            0            0   0   *   
ET0	*      *      031356 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031356 *      031357 *            777777777777 *                *            *            0            0   0   *   SEQ 0157

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 000006 C(E) =777777 000006 
----------

*031357  JUMPA	0,031360

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031357 031357 031357 324000031360 777777777777 777777000006     777777000006 000000031355 0            0   0   777 
IT1	*      *      031360 *            324000031360 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031360     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031360 *            000000031360 000000000000     0            000000031360 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031360 
----------

*031360  MOVE 	3,032250

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031360 031360 031360 200140032250 777777777777 0                0            000000031360 0            0   0   777 
IT1	*      *      032250 *            200140032250 0                777777000006 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032250     *            *            0            0   0   *   
FT6	031361 031361 031361 256000032251 777777777777 777777000006     *            *            0            0   0   *   
ET2	*      *      *      *            777777000006 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 000006 C(E) =777777 000006 
FINAL
C(AC)=777777 000006 
----------

*031361  XCT	0,032251

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031361 031361 031361 256000032251 777777777777 777777000006     777777000006 000000031360 0            0   0   777 
IT1	*      *      032251 *            256000032251 *                000000000000 *            0            0   0   *   
ET2	*      032251 *      253140031363 777777777777 000000032251     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 032251 
FINAL
C(E) =253140 031363 
----------

*031361  AOBJN	3,031363

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031361 032251 032251 253140031363 777777777777 000000032251     0            000000031360 0            0   0   777 
IT1	*      *      031363 *            253140031363 *                777777000006 *            0            0   0   *   
ET2	*      *      000007 *            000000000007 000000031363     *            *            0            0   0   *   
ST1	*      *      031362 *            000000031363 000000000007     000000000007 000000031363 0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0158
INITIAL
C(AC)=777777 000006 E    =000000 031363 
FINAL
C(AC)=000000 000007 
----------

*031362  CAME	3,032252

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031362 031362 031362 312140032252 777777777777 000000000007     000000000007 000000031363 0            0   0   777 
IT1	*      *      032252 *            312140032252 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032252     *            *            0            0   0   *   
FT6	*      032252 *      000000000007 777777777777 000000000007     *            *            0            0   0   *   
ET0	*      *      031363 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031363 *      031364 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000007 
----------

*031364  JUMPA	0,031365

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031364 031364 031364 324000031365 777777777777 000000000007     000000000007 000000031363 0            0   0   777 
IT1	*      *      031365 *            324000031365 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031365     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031365 *            000000031365 000000000000     0            000000031365 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031365 
----------

*031365  SETZB	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031365 031365 031365 403000000002 777777777777 0                0            000000031365 0            0   0   777 
IT1	*      *      000002 *            403000000002 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   0   *   
FT6	*      000002 031366 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                0            *            0            0   0   *   
ST5	031366 031366 *      254000031371 *            0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031366  JRST	0,031371

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031366 031366 031366 254000031371 777777777777 0                0            000000031365 0            0   0   777 
IT1	*      *      031371 *            254000031371 0                0            *            0            0   0   *   SEQ 0159
ET2	031371 031371 *      256020031367 777777777777 254000031371     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031371 
----------

*031371  XCT	0,@031367

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031371 031371 031371 256020031367 254000031371 000000031367     0            254000031371 0            0   0   777 
IT1	*      *      031367 *            256020031367 *                0            *            0            0   0   *   
MEMST	*      031367 *      000000031370 *            *                0            *            0            0   0   *   
IT0	*      *      *      *            777777777777 *                0            *            0            0   0   *   
IT1	*      *      031370 *            000000031370 *                0            *            0            0   0   *   
ET2	*      *      *      *            777777777777 000000031370     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031370 
FINAL
C(E) =476000 000002 
----------

*031371  SETOM	0,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031371 031370 031370 476000000002 777777777777 000000031370     0            254000031371 0            0   0   777 
IT1	*      *      000002 *            476000000002 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   0   *   
FT6	*      000002 031372 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     0            *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                0            *            0            0   0   *   
ST5	031372 031372 *      312100032226 *            *                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(E) =777777 777777 
----------

*031372  CAME	2,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031372 031372 031372 312100032226 777777777777 777777777777     0            254000031371 0            0   0   777 
IT1	*      *      032226 *            312100032226 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031373 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031373 *      031374 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------
*031374  JUMPA	0,031375                                                                                                   SEQ 0160

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031374 031374 031374 324000031375 777777777777 777777777777     777777777777 254000031371 0            0   0   777 
IT1	*      *      031375 *            324000031375 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031375     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031375 *            000000031375 000000000000     0            000000031375 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031375 
----------

*031375  MOVEI	4,031376

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031375 031375 031375 201200031376 777777777777 0                0            000000031375 0            0   0   777 
IT1	*      *      031376 *            201200031376 0                000000000010 *            0            0   0   *   
ET2	*      *      *      *            000000000010 000000031376     *            *            0            0   0   *   
ST1	031376 031376 *      254000031400 777777777777 *                000000031376 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000010 E    =000000 031376 
FINAL
C(AC)=000000 031376 
----------

*031376  JRST	0,031400

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031376 031376 031376 254000031400 777777777777 000000031376     000000031376 000000031375 0            0   0   777 
IT1	*      *      031400 *            254000031400 *                000000000000 *            0            0   0   *   
ET2	031400 031400 *      256004000001 777777777777 254000031400     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031400 
----------

*031400  XCT	0,000001(4)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031400 031400 031400 256004000001 254000031400 000000031377     0            254000031400 0            0   0   777 
IT1	*      *      031377 *            000000031377 *                000000031376 *            0            0   0   *   
FT6	*      *      *      *            *            *                000000000000 *            0            0   0   *   
ET2	*      031377 *      302200031376 777777777777 *                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031377 
FINAL
C(E) =302200 031376 
----------

*031400  CAIE	4,031376

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031400 031377 031377 302200031376 777777777777 000000031377     0            254000031400 0            0   0   777 
IT1	*      *      031376 *            302200031376 *                000000031376 *            0            0   0   *   SEQ 0161
ET0	*      *      031401 *            000000000000 000000031376     *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031401 *      031402 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 031376 E    =000000 031376 
----------

*031402  JUMPA	0,031403

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031402 031402 031402 324000031403 777777777777 000000031376     000000031376 254000031400 0            0   0   777 
IT1	*      *      031403 *            324000031403 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031403     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031403 *            000000031403 000000000000     0            000000031403 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031403 
----------

*031403  SETZM	0,000005

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031403 031403 031403 402000000005 777777777777 0                0            000000031403 0            0   0   777 
IT1	*      *      000005 *            402000000005 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000005     0            *            0            0   0   *   
FT6	*      000005 031404 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                0            *            0            0   0   *   
ST5	031404 031404 *      201140031407 *            0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(E) =000000 000000 
----------

*031404  MOVEI	3,031407

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031404 031404 031404 201140031407 777777777777 0                0            000000031403 0            0   0   777 
IT1	*      *      031407 *            201140031407 0                000000000007 *            0            0   0   *   
ET2	*      *      031405 *            000000000007 000000031407     *            *            0            0   0   *   
ST1	031405 031405 *      254000031407 777777777777 *                000000031407 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 031407 
FINAL
C(AC)=000000 031407 
----------

*031405  JRST	0,031407
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0162
IT0	031405 031405 031405 254000031407 777777777777 000000031407     000000031407 000000031403 0            0   0   777 
IT1	*      *      031407 *            254000031407 *                000000000000 *            0            0   0   *   
ET2	031407 031407 *      256023777777 777777777777 254000031407     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031407 
----------

*031407  XCT	0,@777777(3)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031407 031407 031407 256023777777 254000031407 000000031406     0            254000031407 0            0   0   777 
IT1	*      *      031406 *            000000031406 *                000000031407 *            0            0   0   *   
MEMST	*      031406 *      201240031411 *            *                *            *            0            0   0   *   
IT0	*      *      *      *            777777777777 *                000000000000 *            0            0   0   *   
IT1	*      *      031411 *            201240031411 *                0            *            0            0   0   *   
ET2	*      *      *      *            777777777777 000000031411     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031411 
FINAL
C(E) =476000 000005 
----------

*031407  SETOM	0,000005

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031407 031411 031411 476000000005 777777777777 000000031411     0            254000031407 0            0   0   777 
IT1	*      *      000005 *            476000000005 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000005     0            *            0            0   0   *   
FT6	*      000005 031410 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            *            *                0            *            0            0   0   *   
ST1	*      *      *      *            *            777777777777     0            *            0            0   0   *   
ST2	*      *      *      777777777777 *            *                0            *            0            0   0   *   
ST5	031410 031410 *      254000031412 *            *                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(E) =777777 777777 
----------

*031410  JRST	0,031412

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031410 031410 031410 254000031412 777777777777 777777777777     0            254000031407 0            0   0   777 
IT1	*      *      031412 *            254000031412 *                0            *            0            0   0   *   
ET2	031412 031412 *      312240032226 777777777777 254000031412     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031412 
----------

*031412  CAME	5,032226
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0163
IT0	031412 031412 031412 312240032226 254000031412 000000031411     0            254000031412 0            0   0   777 
IT1	*      *      032226 *            312240032226 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031413 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031413 *      031414 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031414  JUMPA	0,031415

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031414 031414 031414 324000031415 777777777777 777777777777     777777777777 254000031412 0            0   0   777 
IT1	*      *      031415 *            324000031415 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031415     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031415 *            000000031415 000000000000     0            000000031415 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031415 
----------

*031415  SETZM	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031415 031415 031415 402000000003 777777777777 0                0            000000031415 0            0   0   777 
IT1	*      *      000003 *            402000000003 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000000003     0            *            0            0   0   *   
FT6	*      000003 031416 *            777777777777 *                0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                000000031407 *            0            0   0   *   
ST5	031416 031416 *      201400000003 *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 031407 
FINAL
C(E) =000000 000000 
----------

*031416  MOVEI	10,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031416 031416 031416 201400000003 777777777777 0                0            000000031415 0            0   0   777 
IT1	*      *      000003 *            201400000003 0                0            *            0            0   0   *   
ET2	*      *      031417 *            000000000000 000000000003     0            *            0            0   0   *   
ST1	031417 031417 *      254000031424 777777777777 *                000000000003 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 000003 
FINAL
C(AC)=000000 000003 
----------                                                                                                                 SEQ 0164

*031417  JRST	0,031424

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031417 031417 031417 254000031424 777777777777 000000000003     000000000003 000000031415 0            0   0   777 
IT1	*      *      031424 *            254000031424 *                000000000000 *            0            0   0   *   
ET2	031424 031424 *      256000031422 777777777777 254000031424     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031424 
----------

*031424  XCT	0,031422

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031424 031424 031424 256000031422 254000031424 000000031420     0            254000031424 0            0   0   777 
IT1	*      *      031422 *            256000031422 *                0            *            0            0   0   *   
ET2	*      031422 *      200170031420 777777777777 000000031422     0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 031422 
FINAL
C(E) =200170 031420 
----------

*031424  MOVE 	3,@031420(10)

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031424 031422 031422 200170031420 777777777777 000000031422     0            254000031424 0            0   0   777 
IT1	*      *      031423 *            000000031423 *                000000000003 *            0            0   0   *   
MEMST	*      031423 *      254200032253 *            000000031423     *            *            0            0   0   *   
IT0	*      *      *      *            777777777777 *                000000000000 *            0            0   0   *   
IT1	*      *      032253 *            254200032253 *                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032253     0            *            0            0   0   *   
FT6	031425 031425 031425 302140707070 777777777777 000000707070     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                000000707070 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 707070 
FINAL
C(AC)=000000 707070 
----------

*031425  CAIE	3,707070

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031425 031425 031425 302140707070 777777777777 000000707070     000000707070 254000031424 0            0   0   777 
IT1	*      *      707070 *            302140707070 *                *            *            0            0   0   *   
ET0	*      *      031426 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031426 *      031427 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 707070 E    =000000 707070 
----------                                                                                                                 SEQ 0165

*031427  JUMPA	0,031430

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031427 031427 031427 324000031430 777777777777 000000707070     000000707070 254000031424 0            0   0   777 
IT1	*      *      031430 *            324000031430 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031430     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031430 *            000000031430 000000000000     0            000000031430 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031430 
----------

*031430  MOVE 	0,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031430 031430 031430 200000032227 777777777777 0                0            000000031430 0            0   0   777 
IT1	*      *      032227 *            200000032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	031431 031431 031431 200040032254 777777777777 000000000000     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 0                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031431  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031431 031431 031431 200040032254 777777777777 0                0            000000031430 0            0   0   777 
IT1	*      *      032254 *            200040032254 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     0            *            0            0   0   *   
FT6	031432 031432 031432 241000777775 777777777777 172737405060     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                172737405060 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031432  ROT	0,777775

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031432 031432 031432 241000777775 777777777777 172737405060     172737405060 000000031430 0            0   0   777 
IT1	*      *      777775 *            241000777775 *                000000000000 *            0            0   0   *   
ET0	*      *      031433 *            000000000000 000000777775     0            *            0            0   0   *   
ET1	031433 031433 *      312000032227 777777777777 000000000000     0            000000777775 0            775 0   215 
ET2	*      *      *      *            *            0                0            *            0            *   0   105 
SRT1	*      *      *      *            *            0                0            *            0            *   0   775 
SCT1	*      *      *      *            000000000000 0                0            *            0            *   0   777 
SCT2	*      *      *      *            0            0                0            *            0            777 0   *   SEQ 0166
ST1	*      *      *      *            777777777777 0                0            *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 777775 
FINAL
C(AC)=000000 000000 
----------

*031433  CAME	0,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031433 031433 031433 312000032227 777777777777 0                0            000000777775 0            0   0   777 
IT1	*      *      032227 *            312000032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031434 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031434 *      031435 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031435  JUMPA	0,031436

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031435 031435 031435 324000031436 777777777777 0                0            000000777775 0            0   0   777 
IT1	*      *      031436 *            324000031436 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031436     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031436 *            000000031436 000000000000     0            000000031436 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031436 
----------

*031436  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031436 031436 031436 312040032254 777777777777 0                0            000000031436 0            0   0   777 
IT1	*      *      032254 *            312040032254 0                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031437 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031437 *      031440 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031440  JUMPA	0,031441

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031440 031440 031440 324000031441 777777777777 172737405060     172737405060 000000031436 0            0   0   777 
IT1	*      *      031441 *            324000031441 *                000000000000 *            0            0   0   *   SEQ 0167
ET0	*      *      000000 *            000000000000 000000031441     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031441 *            000000031441 000000000000     0            000000031441 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031441 
----------

*031441  MOVE 	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031441 031441 031441 200000032226 777777777777 0                0            000000031441 0            0   0   777 
IT1	*      *      032226 *            200000032226 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	031442 031442 031442 200040032254 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*031442  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031442 031442 031442 200040032254 777777777777 777777777777     777777777777 000000031441 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031443 031443 031443 241000777775 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031443  ROT	0,777775

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031443 031443 031443 241000777775 777777777777 172737405060     172737405060 000000031441 0            0   0   777 
IT1	*      *      777775 *            241000777775 *                777777777777 *            0            0   0   *   
ET0	*      *      031444 *            777777777777 000000777775     *            *            0            0   0   *   
ET1	031444 031444 *      312000032226 *            777777777777     *            000000777775 0            775 0   215 
ET2	*      *      *      *            *            *                *            *            0            *   0   105 
SRT1	*      *      *      *            *            *                *            *            0            *   0   775 
SCT1	*      *      *      *            *            *                *            *            0            *   0   777 
SCT2	*      *      *      *            *            *                *            *            0            777 0   *   
ST1	*      *      *      *            *            *                *            *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 777775 
FINAL                                                                                                                      SEQ 0168
C(AC)=777777 777777 
----------

*031444  CAME	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031444 031444 031444 312000032226 777777777777 777777777777     777777777777 000000777775 0            0   0   777 
IT1	*      *      032226 *            312000032226 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031445 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031445 *      031446 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031446  JUMPA	0,031447

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031446 031446 031446 324000031447 777777777777 777777777777     777777777777 000000777775 0            0   0   777 
IT1	*      *      031447 *            324000031447 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031447     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031447 *            000000031447 777777777777     *            000000031447 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031447 
----------

*031447  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031447 031447 031447 312040032254 777777777777 777777777777     777777777777 000000031447 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031450 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031450 *      031451 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031451  JUMPA	0,031452

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031451 031451 031451 324000031452 777777777777 172737405060     172737405060 000000031447 0            0   0   777 
IT1	*      *      031452 *            324000031452 *                777777777777 *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031452     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031452 *            000000031452 777777777777     *            000000031452 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0169
C(AC)=777777 777777 E    =000000 031452 
----------

*031452  MOVE 	0,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031452 031452 031452 200000032255 777777777777 777777777777     777777777777 000000031452 0            0   0   777 
IT1	*      *      032255 *            200000032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	031453 031453 031453 200040032254 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*031453  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031453 031453 031453 200040032254 777777777777 252525252525     252525252525 000000031452 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031454 031454 031454 241000777775 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031454  ROT	0,777775

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031454 031454 031454 241000777775 777777777777 172737405060     172737405060 000000031452 0            0   0   777 
IT1	*      *      777775 *            241000777775 *                252525252525 *            0            0   0   *   
ET0	*      *      031455 *            252525252525 000000777775     *            *            0            0   0   *   
ET1	031455 031455 *      312000032256 777777777777 252525252525     *            000000777775 0            775 0   215 
ET2	*      *      *      *            *            *                *            *            0            *   0   105 
SRT1	*      *      *      *            *            *                *            *            0            *   0   775 
SCT1	*      *      *      *            252525252525 *                *            *            0            *   0   777 
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 *                525252525252 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 777775 
FINAL
C(AC)=525252 525252 
----------

*031455  CAME	0,032256
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0170
IT0	031455 031455 031455 312000032256 777777777777 525252525252     525252525252 000000777775 0            0   0   777 
IT1	*      *      032256 *            312000032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	*      032256 *      525252525252 777777777777 525252525252     *            *            0            0   0   *   
ET0	*      *      031456 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031456 *      031457 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
----------

*031457  JUMPA	0,031460

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031457 031457 031457 324000031460 777777777777 525252525252     525252525252 000000777775 0            0   0   777 
IT1	*      *      031460 *            324000031460 *                *            *            0            0   0   *   
ET0	*      *      525252 *            525252525252 000000031460     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031460 *            000000031460 525252525252     *            000000031460 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 031460 
----------

*031460  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031460 031460 031460 312040032254 777777777777 525252525252     525252525252 000000031460 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031461 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031461 *      031462 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031462  JUMPA	0,031463

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031462 031462 031462 324000031463 777777777777 172737405060     172737405060 000000031460 0            0   0   777 
IT1	*      *      031463 *            324000031463 *                525252525252 *            0            0   0   *   
ET0	*      *      525252 *            525252525252 000000031463     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031463 *            000000031463 525252525252     *            000000031463 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 031463 
----------

*031463  MOVE 	0,032256
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0171
IT0	031463 031463 031463 200000032256 777777777777 525252525252     525252525252 000000031463 0            0   0   777 
IT1	*      *      032256 *            200000032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	031464 031464 031464 200040032254 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            525252525252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*031464  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031464 031464 031464 200040032254 777777777777 525252525252     525252525252 000000031463 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031465 031465 031465 241000777775 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031465  ROT	0,777775

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031465 031465 031465 241000777775 777777777777 172737405060     172737405060 000000031463 0            0   0   777 
IT1	*      *      777775 *            241000777775 *                525252525252 *            0            0   0   *   
ET0	*      *      031466 *            525252525252 000000777775     *            *            0            0   0   *   
ET1	031466 031466 *      312000032255 777777777777 525252525252     *            000000777775 0            775 0   215 
ET2	*      *      *      *            *            *                *            *            0            *   0   105 
SRT1	*      *      *      *            *            *                *            *            0            *   0   775 
SCT1	*      *      *      *            525252525252 *                *            *            0            *   0   777 
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 *                252525252525 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 777775 
FINAL
C(AC)=252525 252525 
----------

*031466  CAME	0,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031466 031466 031466 312000032255 777777777777 252525252525     252525252525 000000777775 0            0   0   777 
IT1	*      *      032255 *            312000032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	*      032255 *      252525252525 777777777777 252525252525     *            *            0            0   0   *   
ET0	*      *      031467 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   SEQ 0172
ST1	031467 *      031470 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =252525 252525 
----------

*031470  JUMPA	0,031471

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031470 031470 031470 324000031471 777777777777 252525252525     252525252525 000000777775 0            0   0   777 
IT1	*      *      031471 *            324000031471 *                *            *            0            0   0   *   
ET0	*      *      252525 *            252525252525 000000031471     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031471 *            000000031471 252525252525     *            000000031471 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 031471 
----------

*031471  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031471 031471 031471 312040032254 777777777777 252525252525     252525252525 000000031471 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031472 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031472 *      031473 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031473  JUMPA	0,031474

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031473 031473 031473 324000031474 777777777777 172737405060     172737405060 000000031471 0            0   0   777 
IT1	*      *      031474 *            324000031474 *                252525252525 *            0            0   0   *   
ET0	*      *      252525 *            252525252525 000000031474     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031474 *            000000031474 252525252525     *            000000031474 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 031474 
----------

*031474  MOVE 	0,032257

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031474 031474 031474 200000032257 777777777777 252525252525     252525252525 000000031474 0            0   0   777 
IT1	*      *      032257 *            200000032257 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032257     *            *            0            0   0   *   
FT6	031475 031475 031475 200040032254 777777777777 230703603700     *            *            0            0   0   *   
ET2	*      *      *      *            252525252525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                230703603700 *            0            0   0   *   SEQ 0173

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =230703 603700 
FINAL
C(AC)=230703 603700 
----------

*031475  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031475 031475 031475 200040032254 777777777777 230703603700     230703603700 000000031474 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031476 031476 031476 241000777775 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031476  ROT	0,777775

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031476 031476 031476 241000777775 777777777777 172737405060     172737405060 000000031474 0            0   0   777 
IT1	*      *      777775 *            241000777775 *                230703603700 *            0            0   0   *   
ET0	*      *      031477 *            230703603700 000000777775     *            *            0            0   0   *   
ET1	031477 031477 *      312000032260 777777777777 230703603700     *            000000777775 0            775 0   215 
ET2	*      *      *      *            *            *                *            *            0            *   0   105 
SRT1	*      *      *      *            *            *                *            *            0            *   0   775 
SCT1	*      *      *      *            230703603700 *                *            *            0            *   0   777 
SCT2	*      *      *      *            114341701740 114341701740     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 023070360370     023070360370 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=230703 603700 E    =000000 777775 
FINAL
C(AC)=023070 360370 
----------

*031477  CAME	0,032260

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031477 031477 031477 312000032260 777777777777 023070360370     023070360370 000000777775 0            0   0   777 
IT1	*      *      032260 *            312000032260 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032260     *            *            0            0   0   *   
FT6	*      032260 *      023070360370 777777777777 023070360370     *            *            0            0   0   *   
ET0	*      *      031500 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031500 *      031501 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=023070 360370 C(E) =023070 360370 
----------                                                                                                                 SEQ 0174

*031501  JUMPA	0,031502

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031501 031501 031501 324000031502 777777777777 023070360370     023070360370 000000777775 0            0   0   777 
IT1	*      *      031502 *            324000031502 *                *            *            0            0   0   *   
ET0	*      *      360370 *            023070360370 000000031502     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031502 *            000000031502 023070360370     *            000000031502 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=023070 360370 E    =000000 031502 
----------

*031502  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031502 031502 031502 312040032254 777777777777 023070360370     023070360370 000000031502 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031503 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031503 *      031504 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031504  JUMPA	0,031505

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031504 031504 031504 324000031505 777777777777 172737405060     172737405060 000000031502 0            0   0   777 
IT1	*      *      031505 *            324000031505 *                023070360370 *            0            0   0   *   
ET0	*      *      360370 *            023070360370 000000031505     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031505 *            000000031505 023070360370     *            000000031505 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=023070 360370 E    =000000 031505 
----------

*031505  MOVE 	0,032261

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031505 031505 031505 200000032261 777777777777 023070360370     023070360370 000000031505 0            0   0   777 
IT1	*      *      032261 *            200000032261 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032261     *            *            0            0   0   *   
FT6	031506 031506 031506 200040032254 777777777777 007603607062     *            *            0            0   0   *   
ET2	*      *      *      *            023070360370 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                007603607062 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=023070 360370 C(E) =007603 607062 
FINAL
C(AC)=007603 607062                                                                                                        SEQ 0175
----------

*031506  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031506 031506 031506 200040032254 777777777777 007603607062     007603607062 000000031505 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031507 031507 031507 241000777775 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031507  ROT	0,777775

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031507 031507 031507 241000777775 777777777777 172737405060     172737405060 000000031505 0            0   0   777 
IT1	*      *      777775 *            241000777775 *                007603607062 *            0            0   0   *   
ET0	*      *      031510 *            007603607062 000000777775     *            *            0            0   0   *   
ET1	031510 031510 *      312000032262 777777777777 007603607062     *            000000777775 0            775 0   215 
ET2	*      *      *      *            *            *                *            *            0            *   0   105 
SRT1	*      *      *      *            *            *                *            *            0            *   0   775 
SCT1	*      *      *      *            007603607062 *                *            *            0            *   0   777 
SCT2	*      *      *      *            003701703431 003701703431     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 200760360706     200760360706 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=007603 607062 E    =000000 777775 
FINAL
C(AC)=200760 360706 
----------

*031510  CAME	0,032262

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031510 031510 031510 312000032262 777777777777 200760360706     200760360706 000000777775 0            0   0   777 
IT1	*      *      032262 *            312000032262 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032262     *            *            0            0   0   *   
FT6	*      032262 *      200760360706 777777777777 200760360706     *            *            0            0   0   *   
ET0	*      *      031511 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031511 *      031512 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 C(E) =200760 360706 
----------

*031512  JUMPA	0,031513

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031512 031512 031512 324000031513 777777777777 200760360706     200760360706 000000777775 0            0   0   777 
IT1	*      *      031513 *            324000031513 *                *            *            0            0   0   *   SEQ 0176
ET0	*      *      360706 *            200760360706 000000031513     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031513 *            000000031513 200760360706     *            000000031513 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031513 
----------

*031513  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031513 031513 031513 312040032254 777777777777 200760360706     200760360706 000000031513 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031514 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031514 *      031515 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031515  JUMPA	0,031516

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031515 031515 031515 324000031516 777777777777 172737405060     172737405060 000000031513 0            0   0   777 
IT1	*      *      031516 *            324000031516 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031516     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031516 *            000000031516 200760360706     *            000000031516 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031516 
----------

*031516  MOVE 	2,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031516 031516 031516 200100032227 777777777777 200760360706     200760360706 000000031516 0            0   0   777 
IT1	*      *      032227 *            200100032227 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	031517 031517 031517 200140032254 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            *            0                *            *            0            0   0   *   
ST1	*      *      *      *            *            0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031517  MOVE 	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031517 031517 031517 200140032254 777777777777 0                0            000000031516 0            0   0   77  SEQ 0177
IT1	*      *      032254 *            200140032254 0                000000707070 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031520 031520 031520 241100000015 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            000000707070 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                172737405060 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 707070 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031520  ROT	2,000015

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031520 031520 031520 241100000015 777777777777 172737405060     172737405060 000000031516 0            0   0   777 
IT1	*      *      000015 *            241100000015 *                000000000000 *            0            0   0   *   
ET0	*      *      031521 *            000000000000 000000000015     0            *            0            0   0   *   
ET1	031521 031521 *      312100032227 777777777777 000000000000     0            000000000015 0            015 0   203 
ET2	*      *      *      *            *            0                0            *            0            *   0   073 
SRT1	*      *      *      *            *            0                0            *            0            *   0   763 
SCT2	*      *      *      *            000000000000 0                0            *            0            763 0   777 
SCT2	*      *      *      *            0            0                0            *            0            764 0   *   
SCT2	*      *      *      *            0            0                0            *            0            765 0   *   
SCT2	*      *      *      *            0            0                0            *            0            766 0   *   
SCT2	*      *      *      *            0            0                0            *            0            767 0   *   
SCT2	*      *      *      *            0            0                0            *            0            770 0   *   
SCT2	*      *      *      *            0            0                0            *            0            771 0   *   
SCT2	*      *      *      *            0            0                0            *            0            772 0   *   
SCT2	*      *      *      *            0            0                0            *            0            773 0   *   
SCT2	*      *      *      *            0            0                0            *            0            774 0   *   
SCT2	*      *      *      *            0            0                0            *            0            775 0   *   
SCT2	*      *      *      *            0            0                0            *            0            776 0   *   
SCT2	*      *      *      *            0            0                0            *            0            777 0   *   
ST1	*      *      *      *            777777777777 0                0            *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 000015 
FINAL
C(AC)=000000 000000 
----------

*031521  CAME	2,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031521 031521 031521 312100032227 777777777777 0                0            000000000015 0            0   0   777 
IT1	*      *      032227 *            312100032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031522 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031522 *      031523 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------
                                                                                                                           SEQ 0178
*031523  JUMPA	0,031524

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031523 031523 031523 324000031524 777777777777 0                0            000000000015 0            0   0   777 
IT1	*      *      031524 *            324000031524 0                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031524     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031524 *            000000031524 200760360706     *            000000031524 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031524 
----------

*031524  CAME	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031524 031524 031524 312140032254 777777777777 200760360706     200760360706 000000031524 0            0   0   777 
IT1	*      *      032254 *            312140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031525 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031525 *      031526 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031526  JUMPA	0,031527

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031526 031526 031526 324000031527 777777777777 172737405060     172737405060 000000031524 0            0   0   777 
IT1	*      *      031527 *            324000031527 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031527     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031527 *            000000031527 200760360706     *            000000031527 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031527 
----------

*031527  MOVE 	2,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031527 031527 031527 200100032226 777777777777 200760360706     200760360706 000000031527 0            0   0   777 
IT1	*      *      032226 *            200100032226 *                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	031530 031530 031530 200140032254 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------                                                                                                                 SEQ 0179

*031530  MOVE 	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031530 031530 031530 200140032254 777777777777 777777777777     777777777777 000000031527 0            0   0   777 
IT1	*      *      032254 *            200140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031531 031531 031531 241100000015 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031531  ROT	2,000015

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031531 031531 031531 241100000015 777777777777 172737405060     172737405060 000000031527 0            0   0   777 
IT1	*      *      000015 *            241100000015 *                777777777777 *            0            0   0   *   
ET0	*      *      031532 *            777777777777 000000000015     *            *            0            0   0   *   
ET1	031532 031532 *      312100032226 *            777777777777     *            000000000015 0            015 0   203 
ET2	*      *      *      *            *            *                *            *            0            *   0   073 
SRT1	*      *      *      *            *            *                *            *            0            *   0   763 
SCT2	*      *      *      *            *            *                *            *            0            763 0   777 
SCT2	*      *      *      *            *            *                *            *            0            764 0   *   
SCT2	*      *      *      *            *            *                *            *            0            765 0   *   
SCT2	*      *      *      *            *            *                *            *            0            766 0   *   
SCT2	*      *      *      *            *            *                *            *            0            767 0   *   
SCT2	*      *      *      *            *            *                *            *            0            770 0   *   
SCT2	*      *      *      *            *            *                *            *            0            771 0   *   
SCT2	*      *      *      *            *            *                *            *            0            772 0   *   
SCT2	*      *      *      *            *            *                *            *            0            773 0   *   
SCT2	*      *      *      *            *            *                *            *            0            774 0   *   
SCT2	*      *      *      *            *            *                *            *            0            775 0   *   
SCT2	*      *      *      *            *            *                *            *            0            776 0   *   
SCT2	*      *      *      *            *            *                *            *            0            777 0   *   
ST1	*      *      *      *            *            *                *            *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 000015 
FINAL
C(AC)=777777 777777 
----------

*031532  CAME	2,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031532 031532 031532 312100032226 777777777777 777777777777     777777777777 000000000015 0            0   0   777 
IT1	*      *      032226 *            312100032226 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031533 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031533 *      031534 *            777777777777 *                *            *            0            0   0   *   
                                                                                                                           SEQ 0180
FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031534  JUMPA	0,031535

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031534 031534 031534 324000031535 777777777777 777777777777     777777777777 000000000015 0            0   0   777 
IT1	*      *      031535 *            324000031535 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031535     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031535 *            000000031535 200760360706     *            000000031535 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031535 
----------

*031535  CAME	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031535 031535 031535 312140032254 777777777777 200760360706     200760360706 000000031535 0            0   0   777 
IT1	*      *      032254 *            312140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031536 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031536 *      031537 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031537  JUMPA	0,031540

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031537 031537 031537 324000031540 777777777777 172737405060     172737405060 000000031535 0            0   0   777 
IT1	*      *      031540 *            324000031540 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031540     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031540 *            000000031540 200760360706     *            000000031540 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031540 
----------

*031540  MOVE 	2,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031540 031540 031540 200100032255 777777777777 200760360706     200760360706 000000031540 0            0   0   777 
IT1	*      *      032255 *            200100032255 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	031541 031541 031541 200140032254 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            *                252525252525 *            0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0181
INITIAL
C(AC)=777777 777777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*031541  MOVE 	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031541 031541 031541 200140032254 777777777777 252525252525     252525252525 000000031540 0            0   0   777 
IT1	*      *      032254 *            200140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031542 031542 031542 241100000015 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031542  ROT	2,000015

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031542 031542 031542 241100000015 777777777777 172737405060     172737405060 000000031540 0            0   0   777 
IT1	*      *      000015 *            241100000015 *                252525252525 *            0            0   0   *   
ET0	*      *      031543 *            252525252525 000000000015     *            *            0            0   0   *   
ET1	031543 031543 *      312100032256 777777777777 252525252525     *            000000000015 0            015 0   203 
ET2	*      *      *      *            *            *                *            *            0            *   0   073 
SRT1	*      *      *      *            *            *                *            *            0            *   0   763 
SCT2	*      *      *      *            252525252525 *                *            *            0            763 0   777 
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            764 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            765 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            766 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            767 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            770 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            771 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            772 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            773 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            774 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            775 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            776 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 525252525252     525252525252 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 000015 
FINAL
C(AC)=525252 525252 
----------

*031543  CAME	2,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031543 031543 031543 312100032256 777777777777 525252525252     525252525252 000000000015 0            0   0   777 
IT1	*      *      032256 *            312100032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   SEQ 0182
FT6	*      032256 *      525252525252 777777777777 525252525252     *            *            0            0   0   *   
ET0	*      *      031544 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031544 *      031545 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
----------

*031545  JUMPA	0,031546

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031545 031545 031545 324000031546 777777777777 525252525252     525252525252 000000000015 0            0   0   777 
IT1	*      *      031546 *            324000031546 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031546     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031546 *            000000031546 200760360706     *            000000031546 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031546 
----------

*031546  CAME	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031546 031546 031546 312140032254 777777777777 200760360706     200760360706 000000031546 0            0   0   777 
IT1	*      *      032254 *            312140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031547 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031547 *      031550 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031550  JUMPA	0,031551

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031550 031550 031550 324000031551 777777777777 172737405060     172737405060 000000031546 0            0   0   777 
IT1	*      *      031551 *            324000031551 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031551     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031551 *            000000031551 200760360706     *            000000031551 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031551 
----------

*031551  MOVE 	2,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031551 031551 031551 200100032256 777777777777 200760360706     200760360706 000000031551 0            0   0   777 
IT1	*      *      032256 *            200100032256 *                525252525252 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   SEQ 0183
FT6	031552 031552 031552 200140032254 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            525252525252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*031552  MOVE 	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031552 031552 031552 200140032254 777777777777 525252525252     525252525252 000000031551 0            0   0   777 
IT1	*      *      032254 *            200140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031553 031553 031553 241100000015 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031553  ROT	2,000015

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031553 031553 031553 241100000015 777777777777 172737405060     172737405060 000000031551 0            0   0   777 
IT1	*      *      000015 *            241100000015 *                525252525252 *            0            0   0   *   
ET0	*      *      031554 *            525252525252 000000000015     *            *            0            0   0   *   
ET1	031554 031554 *      312100032255 777777777777 525252525252     *            000000000015 0            015 0   203 
ET2	*      *      *      *            *            *                *            *            0            *   0   073 
SRT1	*      *      *      *            *            *                *            *            0            *   0   763 
SCT2	*      *      *      *            525252525252 *                *            *            0            763 0   777 
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            764 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            765 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            766 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            767 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            770 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            771 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            772 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            773 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            774 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            775 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            776 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 252525252525     252525252525 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 000015 
FINAL
C(AC)=252525 252525 
----------
*031554  CAME	2,032255                                                                                                   SEQ 0184

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031554 031554 031554 312100032255 777777777777 252525252525     252525252525 000000000015 0            0   0   777 
IT1	*      *      032255 *            312100032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	*      032255 *      252525252525 777777777777 252525252525     *            *            0            0   0   *   
ET0	*      *      031555 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031555 *      031556 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =252525 252525 
----------

*031556  JUMPA	0,031557

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031556 031556 031556 324000031557 777777777777 252525252525     252525252525 000000000015 0            0   0   777 
IT1	*      *      031557 *            324000031557 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031557     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031557 *            000000031557 200760360706     *            000000031557 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031557 
----------

*031557  CAME	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031557 031557 031557 312140032254 777777777777 200760360706     200760360706 000000031557 0            0   0   777 
IT1	*      *      032254 *            312140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031560 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031560 *      031561 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031561  JUMPA	0,031562

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031561 031561 031561 324000031562 777777777777 172737405060     172737405060 000000031557 0            0   0   777 
IT1	*      *      031562 *            324000031562 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031562     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031562 *            000000031562 200760360706     *            000000031562 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031562 
----------
*031562  MOVE 	2,032257                                                                                                   SEQ 0185

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031562 031562 031562 200100032257 777777777777 200760360706     200760360706 000000031562 0            0   0   777 
IT1	*      *      032257 *            200100032257 *                252525252525 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032257     *            *            0            0   0   *   
FT6	031563 031563 031563 200140032254 777777777777 230703603700     *            *            0            0   0   *   
ET2	*      *      *      *            252525252525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                230703603700 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =230703 603700 
FINAL
C(AC)=230703 603700 
----------

*031563  MOVE 	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031563 031563 031563 200140032254 777777777777 230703603700     230703603700 000000031562 0            0   0   777 
IT1	*      *      032254 *            200140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031564 031564 031564 241100000015 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031564  ROT	2,000015

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031564 031564 031564 241100000015 777777777777 172737405060     172737405060 000000031562 0            0   0   777 
IT1	*      *      000015 *            241100000015 *                230703603700 *            0            0   0   *   
ET0	*      *      031565 *            230703603700 000000000015     *            *            0            0   0   *   
ET1	031565 031565 *      312100032263 777777777777 230703603700     *            000000000015 0            015 0   203 
ET2	*      *      *      *            *            *                *            *            0            *   0   073 
SRT1	*      *      *      *            *            *                *            *            0            *   0   763 
SCT2	*      *      *      *            230703603700 *                *            *            0            763 0   777 
SCT2	*      *      *      *            461607407600 461607407600     *            *            0            764 0   *   
SCT2	*      *      *      *            143417017401 143417017401     *            *            0            765 0   *   
SCT2	*      *      *      *            307036037002 307036037002     *            *            0            766 0   *   
SCT2	*      *      *      *            616074076004 616074076004     *            *            0            767 0   *   
SCT2	*      *      *      *            434170174011 434170174011     *            *            0            770 0   *   
SCT2	*      *      *      *            070360370023 070360370023     *            *            0            771 0   *   
SCT2	*      *      *      *            160740760046 160740760046     *            *            0            772 0   *   
SCT2	*      *      *      *            341701740114 341701740114     *            *            0            773 0   *   
SCT2	*      *      *      *            703603700230 703603700230     *            *            0            774 0   *   
SCT2	*      *      *      *            607407600461 607407600461     *            *            0            775 0   *   
SCT2	*      *      *      *            417017401143 417017401143     *            *            0            776 0   *   
SCT2	*      *      *      *            036037002307 036037002307     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 074076004616     074076004616 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=230703 603700 E    =000000 000015                                                                                    SEQ 0186
FINAL
C(AC)=074076 004616 
----------

*031565  CAME	2,032263

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031565 031565 031565 312100032263 777777777777 074076004616     074076004616 000000000015 0            0   0   777 
IT1	*      *      032263 *            312100032263 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032263     *            *            0            0   0   *   
FT6	*      032263 *      074076004616 777777777777 074076004616     *            *            0            0   0   *   
ET0	*      *      031566 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031566 *      031567 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=074076 004616 C(E) =074076 004616 
----------

*031567  JUMPA	0,031570

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031567 031567 031567 324000031570 777777777777 074076004616     074076004616 000000000015 0            0   0   777 
IT1	*      *      031570 *            324000031570 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031570     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031570 *            000000031570 200760360706     *            000000031570 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031570 
----------

*031570  CAME	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031570 031570 031570 312140032254 777777777777 200760360706     200760360706 000000031570 0            0   0   777 
IT1	*      *      032254 *            312140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031571 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031571 *      031572 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031572  JUMPA	0,031573

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031572 031572 031572 324000031573 777777777777 172737405060     172737405060 000000031570 0            0   0   777 
IT1	*      *      031573 *            324000031573 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031573     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031573 *            000000031573 200760360706     *            000000031573 0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0187
INITIAL
C(AC)=200760 360706 E    =000000 031573 
----------

*031573  MOVE 	2,032261

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031573 031573 031573 200100032261 777777777777 200760360706     200760360706 000000031573 0            0   0   777 
IT1	*      *      032261 *            200100032261 *                074076004616 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032261     *            *            0            0   0   *   
FT6	031574 031574 031574 200140032254 777777777777 007603607062     *            *            0            0   0   *   
ET2	*      *      *      *            074076004616 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                007603607062 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=074076 004616 C(E) =007603 607062 
FINAL
C(AC)=007603 607062 
----------

*031574  MOVE 	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031574 031574 031574 200140032254 777777777777 007603607062     007603607062 000000031573 0            0   0   777 
IT1	*      *      032254 *            200140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031575 031575 031575 241100000015 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031575  ROT	2,000015

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031575 031575 031575 241100000015 777777777777 172737405060     172737405060 000000031573 0            0   0   777 
IT1	*      *      000015 *            241100000015 *                007603607062 *            0            0   0   *   
ET0	*      *      031576 *            007603607062 000000000015     *            *            0            0   0   *   
ET1	031576 031576 *      312100032264 777777777777 007603607062     *            000000000015 0            015 0   203 
ET2	*      *      *      *            *            *                *            *            0            *   0   073 
SRT1	*      *      *      *            *            *                *            *            0            *   0   763 
SCT2	*      *      *      *            007603607062 *                *            *            0            763 0   777 
SCT2	*      *      *      *            017407416144 017407416144     *            *            0            764 0   *   
SCT2	*      *      *      *            037017034310 037017034310     *            *            0            765 0   *   
SCT2	*      *      *      *            076036070620 076036070620     *            *            0            766 0   *   
SCT2	*      *      *      *            174074161440 174074161440     *            *            0            767 0   *   
SCT2	*      *      *      *            370170343100 370170343100     *            *            0            770 0   *   
SCT2	*      *      *      *            760360706200 760360706200     *            *            0            771 0   *   
SCT2	*      *      *      *            740741614401 740741614401     *            *            0            772 0   *   
SCT2	*      *      *      *            701703431003 701703431003     *            *            0            773 0   *   
SCT2	*      *      *      *            603607062007 603607062007     *            *            0            774 0   *   
SCT2	*      *      *      *            407416144017 407416144017     *            *            0            775 0   *   
SCT2	*      *      *      *            017034310037 017034310037     *            *            0            776 0   *   
SCT2	*      *      *      *            036070620076 036070620076     *            *            0            777 0   *   SEQ 0188
ST1	*      *      *      *            777777777777 074161440174     074161440174 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=007603 607062 E    =000000 000015 
FINAL
C(AC)=074161 440174 
----------

*031576  CAME	2,032264

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031576 031576 031576 312100032264 777777777777 074161440174     074161440174 000000000015 0            0   0   777 
IT1	*      *      032264 *            312100032264 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032264     *            *            0            0   0   *   
FT6	*      032264 *      074161440174 777777777777 074161440174     *            *            0            0   0   *   
ET0	*      *      031577 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031577 *      031600 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=074161 440174 C(E) =074161 440174 
----------

*031600  JUMPA	0,031601

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031600 031600 031600 324000031601 777777777777 074161440174     074161440174 000000000015 0            0   0   777 
IT1	*      *      031601 *            324000031601 *                200760360706 *            0            0   0   *   
ET0	*      *      360706 *            200760360706 000000031601     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031601 *            000000031601 200760360706     *            000000031601 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031601 
----------

*031601  CAME	3,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031601 031601 031601 312140032254 777777777777 200760360706     200760360706 000000031601 0            0   0   777 
IT1	*      *      032254 *            312140032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031602 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031602 *      031603 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031603  JUMPA	0,031604

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031603 031603 031603 324000031604 777777777777 172737405060     172737405060 000000031601 0            0   0   777 
IT1	*      *      031604 *            324000031604 *                200760360706 *            0            0   0   *   SEQ 0189
ET0	*      *      360706 *            200760360706 000000031604     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031604 *            000000031604 200760360706     *            000000031604 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 E    =000000 031604 
----------

*031604  MOVE 	0,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031604 031604 031604 200000032227 777777777777 200760360706     200760360706 000000031604 0            0   0   777 
IT1	*      *      032227 *            200000032227 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	031605 031605 031605 200040032227 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            200760360706 0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200760 360706 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031605  MOVE 	1,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031605 031605 031605 200040032227 777777777777 0                0            000000031604 0            0   0   777 
IT1	*      *      032227 *            200040032227 0                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	031606 031606 031606 245000000003 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031606  ROTC	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031606 031606 031606 245000000003 777777777777 0                0            000000031604 0            0   0   777 
IT1	*      *      000003 *            245000000003 0                0            *            0            0   0   *   
ET0	*      *      031607 *            000000000000 000000000003     0            *            0            0   0   *   
ET1	031607 031607 *      312000032227 777777777777 000000000000     0            000000000003 0            003 0   215 
ET2	*      *      *      *            000000000000 0                0            *            0            *   0   105 
SRT1	*      *      *      *            777777777777 0                0            *            0            *   0   775 
SCT2	*      *      *      *            000000000000 0                0            *            0            775 0   777 
SCT2	*      *      *      *            0            0                0            *            0            776 0   *   
SCT2	*      *      *      *            0            0                0            *            0            777 0   *   
ST1	*      *      *      *            777777777777 0                0            *            0            000 0   *   
ST4	*      *      *      *            *            0                0            *            0            0   0   *   
ST5	*      *      *      *            *            0                0            *            0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0190
INITIAL
C(AC)=000000 000000 C(AC+1)=000000 000000 E    =000000 000003 
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000 
----------

*031607  CAME	0,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031607 031607 031607 312000032227 777777777777 0                0            000000000003 0            0   0   777 
IT1	*      *      032227 *            312000032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031610 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031610 *      031611 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031611  JUMPA	0,031612

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031611 031611 031611 324000031612 777777777777 0                0            000000000003 0            0   0   777 
IT1	*      *      031612 *            324000031612 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031612     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031612 *            000000031612 000000000000     0            000000031612 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031612 
----------

*031612  CAME	1,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031612 031612 031612 312040032227 777777777777 0                0            000000031612 0            0   0   777 
IT1	*      *      032227 *            312040032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031613 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031613 *      031614 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031614  JUMPA	0,031615

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031614 031614 031614 324000031615 777777777777 0                0            000000031612 0            0   0   777 
IT1	*      *      031615 *            324000031615 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031615     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031615 *            000000031615 000000000000     0            000000031615 0            0   0   *   SEQ 0191

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031615 
----------

*031615  MOVE 	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031615 031615 031615 200000032226 777777777777 0                0            000000031615 0            0   0   777 
IT1	*      *      032226 *            200000032226 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	031616 031616 031616 200040032226 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*031616  MOVE 	1,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031616 031616 031616 200040032226 777777777777 777777777777     777777777777 000000031615 0            0   0   777 
IT1	*      *      032226 *            200040032226 *                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	031617 031617 031617 245000000003 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*031617  ROTC	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031617 031617 031617 245000000003 777777777777 777777777777     777777777777 000000031615 0            0   0   777 
IT1	*      *      000003 *            245000000003 *                *            *            0            0   0   *   
ET0	*      *      031620 *            777777777777 000000000003     *            *            0            0   0   *   
ET1	031620 031620 *      312000032226 *            777777777777     *            000000000003 0            003 0   215 
ET2	*      *      *      *            *            *                *            *            0            *   0   105 
SRT1	*      *      *      *            *            *                *            *            777777777777 *   0   775 
SCT2	*      *      *      *            *            *                *            *            *            775 0   777 
SCT2	*      *      *      *            *            *                *            *            *            776 0   *   
SCT2	*      *      *      *            *            *                *            *            *            777 0   *   
ST1	*      *      *      *            *            *                *            *            *            000 0   *   
ST4	*      *      *      *            *            *                *            *            *            0   0   *   
ST5	*      *      *      *            *            *                *            *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(AC+1)=777777 777777 E    =000000 000003 
FINAL                                                                                                                      SEQ 0192
C(AC)=777777 777777 C(AC+1)=777777 777777 
----------

*031620  CAME	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031620 031620 031620 312000032226 777777777777 777777777777     777777777777 000000000003 777777777777 0   0   777 
IT1	*      *      032226 *            312000032226 *                *            *            *            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            000000000000 0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031621 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031621 *      031622 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031622  JUMPA	0,031623

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031622 031622 031622 324000031623 777777777777 777777777777     777777777777 000000000003 0            0   0   777 
IT1	*      *      031623 *            324000031623 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031623     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031623 *            000000031623 777777777777     *            000000031623 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031623 
----------

*031623  CAME	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031623 031623 031623 312000032226 777777777777 777777777777     777777777777 000000031623 0            0   0   777 
IT1	*      *      032226 *            312000032226 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031624 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031624 *      031625 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031625  JUMPA	0,031626

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031625 031625 031625 324000031626 777777777777 777777777777     777777777777 000000031623 0            0   0   777 
IT1	*      *      031626 *            324000031626 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031626     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031626 *            000000031626 777777777777     *            000000031626 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0193
C(AC)=777777 777777 E    =000000 031626 
----------

*031626  MOVE 	0,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031626 031626 031626 200000032255 777777777777 777777777777     777777777777 000000031626 0            0   0   777 
IT1	*      *      032255 *            200000032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	031627 031627 031627 200040032255 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*031627  MOVE 	1,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031627 031627 031627 200040032255 777777777777 252525252525     252525252525 000000031626 0            0   0   777 
IT1	*      *      032255 *            200040032255 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	031630 031630 031630 245000000003 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*031630  ROTC	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031630 031630 031630 245000000003 777777777777 252525252525     252525252525 000000031626 0            0   0   777 
IT1	*      *      000003 *            245000000003 *                *            *            0            0   0   *   
ET0	*      *      031631 *            252525252525 000000000003     *            *            0            0   0   *   
ET1	031631 031631 *      312000032256 777777777777 252525252525     *            000000000003 0            003 0   215 
ET2	*      *      *      *            252525252525 *                *            *            0            *   0   105 
SRT1	*      *      *      *            777777777777 *                *            *            252525252525 *   0   775 
SCT2	*      *      *      *            252525252525 *                *            *            *            775 0   777 
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 776 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 777 0   *   
ST1	*      *      *      *            777777777777 525252525252     525252525252 *            525252525252 000 0   *   
ST4	*      *      *      *            *            *                252525252525 *            *            0   0   *   
ST5	*      *      *      *            *            *                525252525252 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(AC+1)=252525 252525 E    =000000 000003 
FINAL
C(AC)=525252 525252 C(AC+1)=525252 525252 
----------
                                                                                                                           SEQ 0194
*031631  CAME	0,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031631 031631 031631 312000032256 777777777777 525252525252     525252525252 000000000003 525252525252 0   0   777 
IT1	*      *      032256 *            312000032256 *                *            *            *            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            000000000000 0   0   *   
FT6	*      032256 *      525252525252 777777777777 525252525252     *            *            0            0   0   *   
ET0	*      *      031632 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031632 *      031633 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
----------

*031633  JUMPA	0,031634

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031633 031633 031633 324000031634 777777777777 525252525252     525252525252 000000000003 0            0   0   777 
IT1	*      *      031634 *            324000031634 *                *            *            0            0   0   *   
ET0	*      *      525252 *            525252525252 000000031634     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031634 *            000000031634 525252525252     *            000000031634 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 031634 
----------

*031634  CAME	1,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031634 031634 031634 312040032256 777777777777 525252525252     525252525252 000000031634 0            0   0   777 
IT1	*      *      032256 *            312040032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	*      032256 *      525252525252 777777777777 525252525252     *            *            0            0   0   *   
ET0	*      *      031635 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031635 *      031636 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
----------

*031636  JUMPA	0,031637

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031636 031636 031636 324000031637 777777777777 525252525252     525252525252 000000031634 0            0   0   777 
IT1	*      *      031637 *            324000031637 *                *            *            0            0   0   *   
ET0	*      *      525252 *            525252525252 000000031637     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031637 *            000000031637 525252525252     *            000000031637 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 031637 
----------
                                                                                                                           SEQ 0195
*031637  MOVE 	0,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031637 031637 031637 200000032256 777777777777 525252525252     525252525252 000000031637 0            0   0   777 
IT1	*      *      032256 *            200000032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	031640 031640 031640 200040032256 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            525252525252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*031640  MOVE 	1,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031640 031640 031640 200040032256 777777777777 525252525252     525252525252 000000031637 0            0   0   777 
IT1	*      *      032256 *            200040032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	031641 031641 031641 245000000003 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            525252525252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*031641  ROTC	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031641 031641 031641 245000000003 777777777777 525252525252     525252525252 000000031637 0            0   0   777 
IT1	*      *      000003 *            245000000003 *                *            *            0            0   0   *   
ET0	*      *      031642 *            525252525252 000000000003     *            *            0            0   0   *   
ET1	031642 031642 *      312000032255 777777777777 525252525252     *            000000000003 0            003 0   215 
ET2	*      *      *      *            525252525252 *                *            *            0            *   0   105 
SRT1	*      *      *      *            777777777777 *                *            *            525252525252 *   0   775 
SCT2	*      *      *      *            525252525252 *                *            *            *            775 0   777 
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 776 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 777 0   *   
ST1	*      *      *      *            777777777777 252525252525     252525252525 *            252525252525 000 0   *   
ST4	*      *      *      *            *            *                525252525252 *            *            0   0   *   
ST5	*      *      *      *            *            *                252525252525 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(AC+1)=525252 525252 E    =000000 000003 
FINAL
C(AC)=252525 252525 C(AC+1)=252525 252525 
----------

*031642  CAME	0,032255
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0196
IT0	031642 031642 031642 312000032255 777777777777 252525252525     252525252525 000000000003 252525252525 0   0   777 
IT1	*      *      032255 *            312000032255 *                *            *            *            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            000000000000 0   0   *   
FT6	*      032255 *      252525252525 777777777777 252525252525     *            *            0            0   0   *   
ET0	*      *      031643 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031643 *      031644 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =252525 252525 
----------

*031644  JUMPA	0,031645

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031644 031644 031644 324000031645 777777777777 252525252525     252525252525 000000000003 0            0   0   777 
IT1	*      *      031645 *            324000031645 *                *            *            0            0   0   *   
ET0	*      *      252525 *            252525252525 000000031645     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031645 *            000000031645 252525252525     *            000000031645 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 031645 
----------

*031645  CAME	1,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031645 031645 031645 312040032255 777777777777 252525252525     252525252525 000000031645 0            0   0   777 
IT1	*      *      032255 *            312040032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	*      032255 *      252525252525 777777777777 252525252525     *            *            0            0   0   *   
ET0	*      *      031646 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031646 *      031647 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =252525 252525 
----------

*031647  JUMPA	0,031650

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031647 031647 031647 324000031650 777777777777 252525252525     252525252525 000000031645 0            0   0   777 
IT1	*      *      031650 *            324000031650 *                *            *            0            0   0   *   
ET0	*      *      252525 *            252525252525 000000031650     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031650 *            000000031650 252525252525     *            000000031650 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 031650 
----------

*031650  MOVE 	0,032257
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0197
IT0	031650 031650 031650 200000032257 777777777777 252525252525     252525252525 000000031650 0            0   0   777 
IT1	*      *      032257 *            200000032257 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032257     *            *            0            0   0   *   
FT6	031651 031651 031651 200040032265 777777777777 230703603700     *            *            0            0   0   *   
ET2	*      *      *      *            252525252525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                230703603700 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =230703 603700 
FINAL
C(AC)=230703 603700 
----------

*031651  MOVE 	1,032265

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031651 031651 031651 200040032265 777777777777 230703603700     230703603700 000000031650 0            0   0   777 
IT1	*      *      032265 *            200040032265 *                252525252525 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032265     *            *            0            0   0   *   
FT6	031652 031652 031652 245000000003 777777777777 770037600377     *            *            0            0   0   *   
ET2	*      *      *      *            252525252525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                770037600377 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =770037 600377 
FINAL
C(AC)=770037 600377 
----------

*031652  ROTC	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031652 031652 031652 245000000003 777777777777 770037600377     770037600377 000000031650 0            0   0   777 
IT1	*      *      000003 *            245000000003 *                230703603700 *            0            0   0   *   
ET0	*      *      031653 *            230703603700 000000000003     *            *            0            0   0   *   
ET1	031653 031653 *      312000032266 777777777777 230703603700     770037600377 000000000003 0            003 0   215 
ET2	*      *      *      *            770037600377 *                *            *            0            *   0   105 
SRT1	*      *      *      *            777777777777 *                230703603700 *            770037600377 *   0   775 
SCT2	*      *      *      *            230703603700 *                *            *            *            775 0   777 
SCT2	*      *      *      *            461607407601 461607407601     *            *            760077400776 776 0   *   
SCT2	*      *      *      *            143417017403 143417017403     *            *            740177001775 777 0   *   
ST1	*      *      *      *            777777777777 307036037007     307036037007 *            700376003772 000 0   *   
ST4	*      *      *      *            *            *                770037600377 *            *            0   0   *   
ST5	*      *      *      *            *            700376003772     700376003772 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=230703 603700 C(AC+1)=770037 600377 E    =000000 000003 
FINAL
C(AC)=307036 037007 C(AC+1)=700376 003772 
----------

*031653  CAME	0,032266

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031653 031653 031653 312000032266 777777777777 700376003772     700376003772 000000000003 700376003772 0   0   777 
IT1	*      *      032266 *            312000032266 *                307036037007 *            *            0   0   *   
MEMST	*      *      *      *            *            000000032266     *            *            000000000000 0   0   *   SEQ 0198
FT6	*      032266 *      307036037007 777777777777 307036037007     *            *            0            0   0   *   
ET0	*      *      031654 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031654 *      031655 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=307036 037007 C(E) =307036 037007 
----------

*031655  JUMPA	0,031656

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031655 031655 031655 324000031656 777777777777 307036037007     307036037007 000000000003 0            0   0   777 
IT1	*      *      031656 *            324000031656 *                *            *            0            0   0   *   
ET0	*      *      037007 *            307036037007 000000031656     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031656 *            000000031656 307036037007     *            000000031656 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=307036 037007 E    =000000 031656 
----------

*031656  CAME	1,032267

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031656 031656 031656 312040032267 777777777777 307036037007     307036037007 000000031656 0            0   0   777 
IT1	*      *      032267 *            312040032267 *                700376003772 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032267     *            *            0            0   0   *   
FT6	*      032267 *      700376003772 777777777777 700376003772     *            *            0            0   0   *   
ET0	*      *      031657 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031657 *      031660 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=700376 003772 C(E) =700376 003772 
----------

*031660  JUMPA	0,031661

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031660 031660 031660 324000031661 777777777777 700376003772     700376003772 000000031656 0            0   0   777 
IT1	*      *      031661 *            324000031661 *                307036037007 *            0            0   0   *   
ET0	*      *      037007 *            307036037007 000000031661     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031661 *            000000031661 307036037007     *            000000031661 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=307036 037007 E    =000000 031661 
----------

*031661  MOVE 	0,032270

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031661 031661 031661 200000032270 777777777777 307036037007     307036037007 000000031661 0            0   0   777 
IT1	*      *      032270 *            200000032270 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032270     *            *            0            0   0   *   SEQ 0199
FT6	031662 031662 031662 200040032261 777777777777 776003760077     *            *            0            0   0   *   
ET2	*      *      *      *            307036037007 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                776003760077 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=307036 037007 C(E) =776003 760077 
FINAL
C(AC)=776003 760077 
----------

*031662  MOVE 	1,032261

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031662 031662 031662 200040032261 777777777777 776003760077     776003760077 000000031661 0            0   0   777 
IT1	*      *      032261 *            200040032261 *                700376003772 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032261     *            *            0            0   0   *   
FT6	031663 031663 031663 245000000003 777777777777 007603607062     *            *            0            0   0   *   
ET2	*      *      *      *            700376003772 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                007603607062 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=700376 003772 C(E) =007603 607062 
FINAL
C(AC)=007603 607062 
----------

*031663  ROTC	0,000003

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031663 031663 031663 245000000003 777777777777 007603607062     007603607062 000000031661 0            0   0   777 
IT1	*      *      000003 *            245000000003 *                776003760077 *            0            0   0   *   
ET0	*      *      031664 *            776003760077 000000000003     *            *            0            0   0   *   
ET1	031664 031664 *      312000032271 777777777777 776003760077     007603607062 000000000003 0            003 0   215 
ET2	*      *      *      *            007603607062 *                *            *            0            *   0   105 
SRT1	*      *      *      *            777777777777 *                776003760077 *            007603607062 *   0   775 
SCT2	*      *      *      *            776003760077 *                *            *            *            775 0   777 
SCT2	*      *      *      *            774007740176 774007740176     *            *            017407416145 776 0   *   
SCT2	*      *      *      *            770017700374 770017700374     *            *            037017034313 777 0   *   
ST1	*      *      *      *            777777777777 760037600770     760037600770 *            076036070627 000 0   *   
ST4	*      *      *      *            *            *                007603607062 *            *            0   0   *   
ST5	*      *      *      *            *            076036070627     076036070627 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=776003 760077 C(AC+1)=007603 607062 E    =000000 000003 
FINAL
C(AC)=760037 600770 C(AC+1)=076036 070627 
----------

*031664  CAME	0,032271

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031664 031664 031664 312000032271 777777777777 076036070627     076036070627 000000000003 076036070627 0   0   777 
IT1	*      *      032271 *            312000032271 *                760037600770 *            *            0   0   *   
MEMST	*      *      *      *            *            000000032271     *            *            000000000000 0   0   *   
FT6	*      032271 *      760037600770 777777777777 760037600770     *            *            0            0   0   *   
ET0	*      *      031665 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   SEQ 0200
ST1	031665 *      031666 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=760037 600770 C(E) =760037 600770 
----------

*031666  JUMPA	0,031667

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031666 031666 031666 324000031667 777777777777 760037600770     760037600770 000000000003 0            0   0   777 
IT1	*      *      031667 *            324000031667 *                *            *            0            0   0   *   
ET0	*      *      600770 *            760037600770 000000031667     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031667 *            000000031667 760037600770     *            000000031667 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=760037 600770 E    =000000 031667 
----------

*031667  CAME	1,032272

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031667 031667 031667 312040032272 777777777777 760037600770     760037600770 000000031667 0            0   0   777 
IT1	*      *      032272 *            312040032272 *                076036070627 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032272     *            *            0            0   0   *   
FT6	*      032272 *      076036070627 777777777777 076036070627     *            *            0            0   0   *   
ET0	*      *      031670 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031670 *      031671 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=076036 070627 C(E) =076036 070627 
----------

*031671  JUMPA	0,031672

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031671 031671 031671 324000031672 777777777777 076036070627     076036070627 000000031667 0            0   0   777 
IT1	*      *      031672 *            324000031672 *                760037600770 *            0            0   0   *   
ET0	*      *      600770 *            760037600770 000000031672     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031672 *            000000031672 760037600770     *            000000031672 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=760037 600770 E    =000000 031672 
----------

*031672  MOVE 	0,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031672 031672 031672 200000032227 777777777777 760037600770     760037600770 000000031672 0            0   0   777 
IT1	*      *      032227 *            200000032227 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	031673 031673 031673 200040032227 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            760037600770 0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   SEQ 0201

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=760037 600770 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031673  MOVE 	1,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031673 031673 031673 200040032227 777777777777 0                0            000000031672 0            0   0   777 
IT1	*      *      032227 *            200040032227 0                076036070627 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	031674 031674 031674 245000000007 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            076036070627 0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=076036 070627 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031674  ROTC	0,000007

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031674 031674 031674 245000000007 777777777777 0                0            000000031672 0            0   0   777 
IT1	*      *      000007 *            245000000007 0                0            *            0            0   0   *   
ET0	*      *      031675 *            000000000000 000000000007     0            *            0            0   0   *   
ET1	031675 031675 *      312000032227 777777777777 000000000000     0            000000000007 0            007 0   211 
ET2	*      *      *      *            000000000000 0                0            *            0            *   0   101 
SRT1	*      *      *      *            777777777777 0                0            *            0            *   0   771 
SCT2	*      *      *      *            000000000000 0                0            *            0            771 0   777 
SCT2	*      *      *      *            0            0                0            *            0            772 0   *   
SCT2	*      *      *      *            0            0                0            *            0            773 0   *   
SCT2	*      *      *      *            0            0                0            *            0            774 0   *   
SCT2	*      *      *      *            0            0                0            *            0            775 0   *   
SCT2	*      *      *      *            0            0                0            *            0            776 0   *   
SCT2	*      *      *      *            0            0                0            *            0            777 0   *   
ST1	*      *      *      *            777777777777 0                0            *            0            000 0   *   
ST4	*      *      *      *            *            0                0            *            0            0   0   *   
ST5	*      *      *      *            *            0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(AC+1)=000000 000000 E    =000000 000007 
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000 
----------

*031675  CAME	0,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031675 031675 031675 312000032227 777777777777 0                0            000000000007 0            0   0   777 
IT1	*      *      032227 *            312000032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031676 0            000000000000 0                0            *            0            0   0   *   SEQ 0202
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031676 *      031677 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031677  JUMPA	0,031700

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031677 031677 031677 324000031700 777777777777 0                0            000000000007 0            0   0   777 
IT1	*      *      031700 *            324000031700 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031700     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031700 *            000000031700 000000000000     0            000000031700 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031700 
----------

*031700  CAME	1,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031700 031700 031700 312040032227 777777777777 0                0            000000031700 0            0   0   777 
IT1	*      *      032227 *            312040032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031701 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031701 *      031702 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031702  JUMPA	0,031703

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031702 031702 031702 324000031703 777777777777 0                0            000000031700 0            0   0   777 
IT1	*      *      031703 *            324000031703 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031703     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031703 *            000000031703 000000000000     0            000000031703 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031703 
----------

*031703  MOVE 	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031703 031703 031703 200000032226 777777777777 0                0            000000031703 0            0   0   777 
IT1	*      *      032226 *            200000032226 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	031704 031704 031704 200040032226 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   SEQ 0203
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*031704  MOVE 	1,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031704 031704 031704 200040032226 777777777777 777777777777     777777777777 000000031703 0            0   0   777 
IT1	*      *      032226 *            200040032226 *                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	031705 031705 031705 245000000007 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*031705  ROTC	0,000007

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031705 031705 031705 245000000007 777777777777 777777777777     777777777777 000000031703 0            0   0   777 
IT1	*      *      000007 *            245000000007 *                *            *            0            0   0   *   
ET0	*      *      031706 *            777777777777 000000000007     *            *            0            0   0   *   
ET1	031706 031706 *      312000032226 *            777777777777     *            000000000007 0            007 0   211 
ET2	*      *      *      *            *            *                *            *            0            *   0   101 
SRT1	*      *      *      *            *            *                *            *            777777777777 *   0   771 
SCT2	*      *      *      *            *            *                *            *            *            771 0   777 
SCT2	*      *      *      *            *            *                *            *            *            772 0   *   
SCT2	*      *      *      *            *            *                *            *            *            773 0   *   
SCT2	*      *      *      *            *            *                *            *            *            774 0   *   
SCT2	*      *      *      *            *            *                *            *            *            775 0   *   
SCT2	*      *      *      *            *            *                *            *            *            776 0   *   
SCT2	*      *      *      *            *            *                *            *            *            777 0   *   
ST1	*      *      *      *            *            *                *            *            *            000 0   *   
ST4	*      *      *      *            *            *                *            *            *            0   0   *   
ST5	*      *      *      *            *            *                *            *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(AC+1)=777777 777777 E    =000000 000007 
FINAL
C(AC)=777777 777777 C(AC+1)=777777 777777 
----------

*031706  CAME	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031706 031706 031706 312000032226 777777777777 777777777777     777777777777 000000000007 777777777777 0   0   777 
IT1	*      *      032226 *            312000032226 *                *            *            *            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            000000000000 0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   SEQ 0204
ET0	*      *      031707 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031707 *      031710 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031710  JUMPA	0,031711

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031710 031710 031710 324000031711 777777777777 777777777777     777777777777 000000000007 0            0   0   777 
IT1	*      *      031711 *            324000031711 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031711     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031711 *            000000031711 777777777777     *            000000031711 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031711 
----------

*031711  CAME	1,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031711 031711 031711 312040032226 777777777777 777777777777     777777777777 000000031711 0            0   0   777 
IT1	*      *      032226 *            312040032226 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     *            *            0            0   0   *   
FT6	*      032226 *      777777777777 777777777777 777777777777     *            *            0            0   0   *   
ET0	*      *      031712 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031712 *      031713 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =777777 777777 
----------

*031713  JUMPA	0,031714

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031713 031713 031713 324000031714 777777777777 777777777777     777777777777 000000031711 0            0   0   777 
IT1	*      *      031714 *            324000031714 *                *            *            0            0   0   *   
ET0	*      *      777777 *            777777777777 000000031714     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031714 *            000000031714 777777777777     *            000000031714 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 031714 
----------

*031714  MOVE 	0,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031714 031714 031714 200000032255 777777777777 777777777777     777777777777 000000031714 0            0   0   777 
IT1	*      *      032255 *            200000032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	031715 031715 031715 200040032255 777777777777 252525252525     *            *            0            0   0   *   SEQ 0205
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*031715  MOVE 	1,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031715 031715 031715 200040032255 777777777777 252525252525     252525252525 000000031714 0            0   0   777 
IT1	*      *      032255 *            200040032255 *                777777777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	031716 031716 031716 245000000007 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      *      *            *            *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*031716  ROTC	0,000007

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031716 031716 031716 245000000007 777777777777 252525252525     252525252525 000000031714 0            0   0   777 
IT1	*      *      000007 *            245000000007 *                *            *            0            0   0   *   
ET0	*      *      031717 *            252525252525 000000000007     *            *            0            0   0   *   
ET1	031717 031717 *      312000032256 777777777777 252525252525     *            000000000007 0            007 0   211 
ET2	*      *      *      *            252525252525 *                *            *            0            *   0   101 
SRT1	*      *      *      *            777777777777 *                *            *            252525252525 *   0   771 
SCT2	*      *      *      *            252525252525 *                *            *            *            771 0   777 
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 772 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 773 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 774 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 775 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 776 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 777 0   *   
ST1	*      *      *      *            777777777777 525252525252     525252525252 *            525252525252 000 0   *   
ST4	*      *      *      *            *            *                252525252525 *            *            0   0   *   
ST5	*      *      *      *            *            *                525252525252 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(AC+1)=252525 252525 E    =000000 000007 
FINAL
C(AC)=525252 525252 C(AC+1)=525252 525252 
----------

*031717  CAME	0,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031717 031717 031717 312000032256 777777777777 525252525252     525252525252 000000000007 525252525252 0   0   777 
IT1	*      *      032256 *            312000032256 *                *            *            *            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            000000000000 0   0   *   SEQ 0206
FT6	*      032256 *      525252525252 777777777777 525252525252     *            *            0            0   0   *   
ET0	*      *      031720 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031720 *      031721 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
----------

*031721  JUMPA	0,031722

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031721 031721 031721 324000031722 777777777777 525252525252     525252525252 000000000007 0            0   0   777 
IT1	*      *      031722 *            324000031722 *                *            *            0            0   0   *   
ET0	*      *      525252 *            525252525252 000000031722     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031722 *            000000031722 525252525252     *            000000031722 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 031722 
----------

*031722  CAME	1,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031722 031722 031722 312040032256 777777777777 525252525252     525252525252 000000031722 0            0   0   777 
IT1	*      *      032256 *            312040032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	*      032256 *      525252525252 777777777777 525252525252     *            *            0            0   0   *   
ET0	*      *      031723 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031723 *      031724 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
----------

*031724  JUMPA	0,031725

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031724 031724 031724 324000031725 777777777777 525252525252     525252525252 000000031722 0            0   0   777 
IT1	*      *      031725 *            324000031725 *                *            *            0            0   0   *   
ET0	*      *      525252 *            525252525252 000000031725     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031725 *            000000031725 525252525252     *            000000031725 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 031725 
----------

*031725  MOVE 	0,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031725 031725 031725 200000032256 777777777777 525252525252     525252525252 000000031725 0            0   0   777 
IT1	*      *      032256 *            200000032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   SEQ 0207
FT6	031726 031726 031726 200040032256 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            525252525252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*031726  MOVE 	1,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031726 031726 031726 200040032256 777777777777 525252525252     525252525252 000000031725 0            0   0   777 
IT1	*      *      032256 *            200040032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	031727 031727 031727 245000000007 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            525252525252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*031727  ROTC	0,000007

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031727 031727 031727 245000000007 777777777777 525252525252     525252525252 000000031725 0            0   0   777 
IT1	*      *      000007 *            245000000007 *                *            *            0            0   0   *   
ET0	*      *      031730 *            525252525252 000000000007     *            *            0            0   0   *   
ET1	031730 031730 *      312000032255 777777777777 525252525252     *            000000000007 0            007 0   211 
ET2	*      *      *      *            525252525252 *                *            *            0            *   0   101 
SRT1	*      *      *      *            777777777777 *                *            *            525252525252 *   0   771 
SCT2	*      *      *      *            525252525252 *                *            *            *            771 0   777 
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 772 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 773 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 774 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 775 0   *   
SCT2	*      *      *      *            252525252525 252525252525     *            *            252525252525 776 0   *   
SCT2	*      *      *      *            525252525252 525252525252     *            *            525252525252 777 0   *   
ST1	*      *      *      *            777777777777 252525252525     252525252525 *            252525252525 000 0   *   
ST4	*      *      *      *            *            *                525252525252 *            *            0   0   *   
ST5	*      *      *      *            *            *                252525252525 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 C(AC+1)=525252 525252 E    =000000 000007 
FINAL
C(AC)=252525 252525 C(AC+1)=252525 252525 
----------

*031730  CAME	0,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031730 031730 031730 312000032255 777777777777 252525252525     252525252525 000000000007 252525252525 0   0   777 
IT1	*      *      032255 *            312000032255 *                *            *            *            0   0   *   SEQ 0208
MEMST	*      *      *      *            *            000000032255     *            *            000000000000 0   0   *   
FT6	*      032255 *      252525252525 777777777777 252525252525     *            *            0            0   0   *   
ET0	*      *      031731 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031731 *      031732 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =252525 252525 
----------

*031732  JUMPA	0,031733

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031732 031732 031732 324000031733 777777777777 252525252525     252525252525 000000000007 0            0   0   777 
IT1	*      *      031733 *            324000031733 *                *            *            0            0   0   *   
ET0	*      *      252525 *            252525252525 000000031733     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031733 *            000000031733 252525252525     *            000000031733 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 031733 
----------

*031733  CAME	1,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031733 031733 031733 312040032255 777777777777 252525252525     252525252525 000000031733 0            0   0   777 
IT1	*      *      032255 *            312040032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	*      032255 *      252525252525 777777777777 252525252525     *            *            0            0   0   *   
ET0	*      *      031734 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031734 *      031735 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =252525 252525 
----------

*031735  JUMPA	0,031736

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031735 031735 031735 324000031736 777777777777 252525252525     252525252525 000000031733 0            0   0   777 
IT1	*      *      031736 *            324000031736 *                *            *            0            0   0   *   
ET0	*      *      252525 *            252525252525 000000031736     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031736 *            000000031736 252525252525     *            000000031736 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 031736 
----------

*031736  MOVE 	0,032257

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031736 031736 031736 200000032257 777777777777 252525252525     252525252525 000000031736 0            0   0   777 
IT1	*      *      032257 *            200000032257 *                *            *            0            0   0   *   SEQ 0209
MEMST	*      *      *      *            *            000000032257     *            *            0            0   0   *   
FT6	031737 031737 031737 200040032265 777777777777 230703603700     *            *            0            0   0   *   
ET2	*      *      *      *            252525252525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                230703603700 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =230703 603700 
FINAL
C(AC)=230703 603700 
----------

*031737  MOVE 	1,032265

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031737 031737 031737 200040032265 777777777777 230703603700     230703603700 000000031736 0            0   0   777 
IT1	*      *      032265 *            200040032265 *                252525252525 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032265     *            *            0            0   0   *   
FT6	031740 031740 031740 245000000007 777777777777 770037600377     *            *            0            0   0   *   
ET2	*      *      *      *            252525252525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                770037600377 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 C(E) =770037 600377 
FINAL
C(AC)=770037 600377 
----------

*031740  ROTC	0,000007

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031740 031740 031740 245000000007 777777777777 770037600377     770037600377 000000031736 0            0   0   777 
IT1	*      *      000007 *            245000000007 *                230703603700 *            0            0   0   *   
ET0	*      *      031741 *            230703603700 000000000007     *            *            0            0   0   *   
ET1	031741 031741 *      312000032273 777777777777 230703603700     770037600377 000000000007 0            007 0   211 
ET2	*      *      *      *            770037600377 *                *            *            0            *   0   101 
SRT1	*      *      *      *            777777777777 *                230703603700 *            770037600377 *   0   771 
SCT2	*      *      *      *            230703603700 *                *            *            *            771 0   777 
SCT2	*      *      *      *            461607407601 461607407601     *            *            760077400776 772 0   *   
SCT2	*      *      *      *            143417017403 143417017403     *            *            740177001775 773 0   *   
SCT2	*      *      *      *            307036037007 307036037007     *            *            700376003772 774 0   *   
SCT2	*      *      *      *            616074076017 616074076017     *            *            600774007764 775 0   *   
SCT2	*      *      *      *            434170174037 434170174037     *            *            401770017751 776 0   *   
SCT2	*      *      *      *            070360370077 070360370077     *            *            003760037723 777 0   *   
ST1	*      *      *      *            777777777777 160740760176     160740760176 *            007740077646 000 0   *   
ST4	*      *      *      *            *            *                770037600377 *            *            0   0   *   
ST5	*      *      *      *            *            007740077646     007740077646 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=230703 603700 C(AC+1)=770037 600377 E    =000000 000007 
FINAL
C(AC)=160740 760176 C(AC+1)=007740 077646 
----------

*031741  CAME	0,032273

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031741 031741 031741 312000032273 777777777777 007740077646     007740077646 000000000007 007740077646 0   0   77  SEQ 0210
IT1	*      *      032273 *            312000032273 *                160740760176 *            *            0   0   *   
MEMST	*      *      *      *            *            000000032273     *            *            000000000000 0   0   *   
FT6	*      032273 *      160740760176 777777777777 160740760176     *            *            0            0   0   *   
ET0	*      *      031742 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031742 *      031743 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=160740 760176 C(E) =160740 760176 
----------

*031743  JUMPA	0,031744

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031743 031743 031743 324000031744 777777777777 160740760176     160740760176 000000000007 0            0   0   777 
IT1	*      *      031744 *            324000031744 *                *            *            0            0   0   *   
ET0	*      *      760176 *            160740760176 000000031744     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031744 *            000000031744 160740760176     *            000000031744 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=160740 760176 E    =000000 031744 
----------

*031744  CAME	1,032274

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031744 031744 031744 312040032274 777777777777 160740760176     160740760176 000000031744 0            0   0   777 
IT1	*      *      032274 *            312040032274 *                007740077646 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032274     *            *            0            0   0   *   
FT6	*      032274 *      007740077646 777777777777 007740077646     *            *            0            0   0   *   
ET0	*      *      031745 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031745 *      031746 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=007740 077646 C(E) =007740 077646 
----------

*031746  JUMPA	0,031747

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031746 031746 031746 324000031747 777777777777 007740077646     007740077646 000000031744 0            0   0   777 
IT1	*      *      031747 *            324000031747 *                160740760176 *            0            0   0   *   
ET0	*      *      760176 *            160740760176 000000031747     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031747 *            000000031747 160740760176     *            000000031747 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=160740 760176 E    =000000 031747 
----------

*031747  MOVE 	0,032270

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031747 031747 031747 200000032270 777777777777 160740760176     160740760176 000000031747 0            0   0   77  SEQ 0211
IT1	*      *      032270 *            200000032270 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032270     *            *            0            0   0   *   
FT6	031750 031750 031750 200040032261 777777777777 776003760077     *            *            0            0   0   *   
ET2	*      *      *      *            160740760176 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                776003760077 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=160740 760176 C(E) =776003 760077 
FINAL
C(AC)=776003 760077 
----------

*031750  MOVE 	1,032261

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031750 031750 031750 200040032261 777777777777 776003760077     776003760077 000000031747 0            0   0   777 
IT1	*      *      032261 *            200040032261 *                007740077646 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032261     *            *            0            0   0   *   
FT6	031751 031751 031751 245000000007 777777777777 007603607062     *            *            0            0   0   *   
ET2	*      *      *      *            007740077646 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                007603607062 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=007740 077646 C(E) =007603 607062 
FINAL
C(AC)=007603 607062 
----------

*031751  ROTC	0,000007

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031751 031751 031751 245000000007 777777777777 007603607062     007603607062 000000031747 0            0   0   777 
IT1	*      *      000007 *            245000000007 *                776003760077 *            0            0   0   *   
ET0	*      *      031752 *            776003760077 000000000007     *            *            0            0   0   *   
ET1	031752 031752 *      312000032275 777777777777 776003760077     007603607062 000000000007 0            007 0   211 
ET2	*      *      *      *            007603607062 *                *            *            0            *   0   101 
SRT1	*      *      *      *            777777777777 *                776003760077 *            007603607062 *   0   771 
SCT2	*      *      *      *            776003760077 *                *            *            *            771 0   777 
SCT2	*      *      *      *            774007740176 774007740176     *            *            017407416145 772 0   *   
SCT2	*      *      *      *            770017700374 770017700374     *            *            037017034313 773 0   *   
SCT2	*      *      *      *            760037600770 760037600770     *            *            076036070627 774 0   *   
SCT2	*      *      *      *            740077401760 740077401760     *            *            174074161457 775 0   *   
SCT2	*      *      *      *            700177003740 700177003740     *            *            370170343137 776 0   *   
SCT2	*      *      *      *            600376007700 600376007700     *            *            760360706277 777 0   *   
ST1	*      *      *      *            777777777777 400774017601     400774017601 *            740741614577 000 0   *   
ST4	*      *      *      *            *            *                007603607062 *            *            0   0   *   
ST5	*      *      *      *            *            740741614577     740741614577 *            *            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=776003 760077 C(AC+1)=007603 607062 E    =000000 000007 
FINAL
C(AC)=400774 017601 C(AC+1)=740741 614577 
----------

*031752  CAME	0,032275
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0212
IT0	031752 031752 031752 312000032275 777777777777 740741614577     740741614577 000000000007 740741614577 0   0   777 
IT1	*      *      032275 *            312000032275 *                400774017601 *            *            0   0   *   
MEMST	*      *      *      *            *            000000032275     *            *            000000000000 0   0   *   
FT6	*      032275 *      400774017601 777777777777 400774017601     *            *            0            0   0   *   
ET0	*      *      031753 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031753 *      031754 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=400774 017601 C(E) =400774 017601 
----------

*031754  JUMPA	0,031755

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031754 031754 031754 324000031755 777777777777 400774017601     400774017601 000000000007 0            0   0   777 
IT1	*      *      031755 *            324000031755 *                *            *            0            0   0   *   
ET0	*      *      017601 *            400774017601 000000031755     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031755 *            000000031755 400774017601     *            000000031755 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=400774 017601 E    =000000 031755 
----------

*031755  CAME	1,032276

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031755 031755 031755 312040032276 777777777777 400774017601     400774017601 000000031755 0            0   0   777 
IT1	*      *      032276 *            312040032276 *                740741614577 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032276     *            *            0            0   0   *   
FT6	*      032276 *      740741614577 777777777777 740741614577     *            *            0            0   0   *   
ET0	*      *      031756 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031756 *      031757 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=740741 614577 C(E) =740741 614577 
----------

*031757  JUMPA	0,031760

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031757 031757 031757 324000031760 777777777777 740741614577     740741614577 000000031755 0            0   0   777 
IT1	*      *      031760 *            324000031760 *                400774017601 *            0            0   0   *   
ET0	*      *      017601 *            400774017601 000000031760     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031760 *            000000031760 400774017601     *            000000031760 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=400774 017601 E    =000000 031760 
----------

*031760  MOVE 	0,032227
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0213
IT0	031760 031760 031760 200000032227 777777777777 400774017601     400774017601 000000031760 0            0   0   777 
IT1	*      *      032227 *            200000032227 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	031761 031761 031761 200040032254 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            400774017601 0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=400774 017601 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*031761  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031761 031761 031761 200040032254 777777777777 0                0            000000031760 0            0   0   777 
IT1	*      *      032254 *            200040032254 0                740741614577 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031762 031762 031762 242000777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            740741614577 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                172737405060 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=740741 614577 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031762  LSH	0,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031762 031762 031762 242000777745 777777777777 172737405060     172737405060 000000031760 0            0   0   777 
IT1	*      *      777745 *            242000777745 *                000000000000 *            0            0   0   *   
ET0	*      *      031763 *            000000000000 000000777745     0            *            0            0   0   *   
ET1	031763 031763 *      312000032227 777777777777 000000000000     0            000000777745 0            745 0   165 
ET2	*      *      *      *            *            0                0            *            0            *   0   055 
SRT1	*      *      *      *            *            0                0            *            0            *   0   745 
SCT1	*      *      *      *            000000000000 0                0            *            0            *   0   777 
SCT2	*      *      *      *            0            0                0            *            0            763 0   *   
SCT2	*      *      *      *            0            0                0            *            0            764 0   *   
SCT2	*      *      *      *            0            0                0            *            0            765 0   *   
SCT2	*      *      *      *            0            0                0            *            0            766 0   *   
SCT2	*      *      *      *            0            0                0            *            0            767 0   *   
SCT2	*      *      *      *            0            0                0            *            0            770 0   *   
SCT2	*      *      *      *            0            0                0            *            0            771 0   *   
SCT2	*      *      *      *            0            0                0            *            0            772 0   *   
SCT2	*      *      *      *            0            0                0            *            0            773 0   *   
SCT2	*      *      *      *            0            0                0            *            0            774 0   *   
SCT2	*      *      *      *            0            0                0            *            0            775 0   *   
SCT2	*      *      *      *            0            0                0            *            0            776 0   *   
SCT2	*      *      *      *            0            0                0            *            0            777 0   *   
ST1	*      *      *      *            777777777777 0                0            *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 777745 
FINAL                                                                                                                      SEQ 0214
C(AC)=000000 000000 
----------

*031763  CAME	0,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031763 031763 031763 312000032227 777777777777 0                0            000000777745 0            0   0   777 
IT1	*      *      032227 *            312000032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      031764 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	031764 *      031765 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*031765  JUMPA	0,031766

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031765 031765 031765 324000031766 777777777777 0                0            000000777745 0            0   0   777 
IT1	*      *      031766 *            324000031766 0                0            *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031766     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031766 *            000000031766 000000000000     0            000000031766 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 031766 
----------

*031766  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031766 031766 031766 312040032254 777777777777 0                0            000000031766 0            0   0   777 
IT1	*      *      032254 *            312040032254 0                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      031767 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031767 *      031770 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*031770  JUMPA	0,031771

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031770 031770 031770 324000031771 777777777777 172737405060     172737405060 000000031766 0            0   0   777 
IT1	*      *      031771 *            324000031771 *                000000000000 *            0            0   0   *   
ET0	*      *      000000 *            000000000000 000000031771     0            *            0            0   0   *   
ET2	*      *      0      *            0            *                0            *            0            0   0   *   
ST1	*      *      031771 *            000000031771 000000000000     0            000000031771 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0215
C(AC)=000000 000000 E    =000000 031771 
----------

*031771  MOVE 	0,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031771 031771 031771 200000032226 777777777777 0                0            000000031771 0            0   0   777 
IT1	*      *      032226 *            200000032226 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	031772 031772 031772 200040032254 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*031772  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031772 031772 031772 200040032254 777777777777 777777777777     777777777777 000000031771 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	031773 031773 031773 242000777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*031773  LSH	0,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031773 031773 031773 242000777745 777777777777 172737405060     172737405060 000000031771 0            0   0   777 
IT1	*      *      777745 *            242000777745 *                777777777777 *            0            0   0   *   
ET0	*      *      031774 *            777777777777 000000777745     *            *            0            0   0   *   
ET1	031774 031774 *      312000032277 *            777777777777     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            *            *                *            *            0            *   0   777 
SCT2	*      *      *      *            377777777777 377777777777     *            *            0            763 0   *   
SCT2	*      *      *      *            077777777777 077777777777     *            *            0            764 0   *   
SCT2	*      *      *      *            017777777777 017777777777     *            *            0            765 0   *   
SCT2	*      *      *      *            003777777777 003777777777     *            *            0            766 0   *   
SCT2	*      *      *      *            000777777777 000777777777     *            *            0            767 0   *   
SCT2	*      *      *      *            000177777777 000177777777     *            *            0            770 0   *   
SCT2	*      *      *      *            000037777777 000037777777     *            *            0            771 0   *   
SCT2	*      *      *      *            000007777777 000007777777     *            *            0            772 0   *   
SCT2	*      *      *      *            000001777777 000001777777     *            *            0            773 0   *   
SCT2	*      *      *      *            000000377777 000000377777     *            *            0            774 0   *   
SCT2	*      *      *      *            000000077777 000000077777     *            *            0            775 0   *   
SCT2	*      *      *      *            000000017777 000000017777     *            *            0            776 0   *   
SCT2	*      *      *      *            000000003777 000000003777     *            *            0            777 0   *   SEQ 0216
ST1	*      *      *      *            777777777777 000000000777     000000000777 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 777745 
FINAL
C(AC)=000000 000777 
----------

*031774  CAME	0,032277

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031774 031774 031774 312000032277 777777777777 000000000777     000000000777 000000777745 0            0   0   777 
IT1	*      *      032277 *            312000032277 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032277     *            *            0            0   0   *   
FT6	*      032277 *      000000000777 777777777777 000000000777     *            *            0            0   0   *   
ET0	*      *      031775 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	031775 *      031776 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000777 C(E) =000000 000777 
----------

*031776  JUMPA	0,031777

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031776 031776 031776 324000031777 777777777777 000000000777     000000000777 000000777745 0            0   0   777 
IT1	*      *      031777 *            324000031777 *                *            *            0            0   0   *   
ET0	*      *      000777 *            000000000777 000000031777     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      031777 *            000000031777 000000000777     *            000000031777 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000777 E    =000000 031777 
----------

*031777  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031777 031777 031777 312040032254 777777777777 000000000777     000000000777 000000031777 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032000 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032000 *      032001 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032001  JUMPA	0,032002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032001 032001 032001 324000032002 777777777777 172737405060     172737405060 000000031777 0            0   0   777 
IT1	*      *      032002 *            324000032002 *                000000000777 *            0            0   0   *   SEQ 0217
ET0	*      *      000777 *            000000000777 000000032002     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032002 *            000000032002 000000000777     *            000000032002 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000777 E    =000000 032002 
----------

*032002  MOVE 	0,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032002 032002 032002 200000032255 777777777777 000000000777     000000000777 000000032002 0            0   0   777 
IT1	*      *      032255 *            200000032255 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	032003 032003 032003 200040032254 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            000000000777 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*032003  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032003 032003 032003 200040032254 777777777777 252525252525     252525252525 000000032002 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032004 032004 032004 242000777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032004  LSH	0,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032004 032004 032004 242000777745 777777777777 172737405060     172737405060 000000032002 0            0   0   777 
IT1	*      *      777745 *            242000777745 *                252525252525 *            0            0   0   *   
ET0	*      *      032005 *            252525252525 000000777745     *            *            0            0   0   *   
ET1	032005 032005 *      312000032300 777777777777 252525252525     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            252525252525 *                *            *            0            *   0   777 
SCT2	*      *      *      *            125252525252 125252525252     *            *            0            763 0   *   
SCT2	*      *      *      *            025252525252 025252525252     *            *            0            764 0   *   
SCT2	*      *      *      *            005252525252 005252525252     *            *            0            765 0   *   
SCT2	*      *      *      *            001252525252 001252525252     *            *            0            766 0   *   
SCT2	*      *      *      *            000252525252 000252525252     *            *            0            767 0   *   
SCT2	*      *      *      *            000052525252 000052525252     *            *            0            770 0   *   
SCT2	*      *      *      *            000012525252 000012525252     *            *            0            771 0   *   SEQ 0218
SCT2	*      *      *      *            000002525252 000002525252     *            *            0            772 0   *   
SCT2	*      *      *      *            000000525252 000000525252     *            *            0            773 0   *   
SCT2	*      *      *      *            000000125252 000000125252     *            *            0            774 0   *   
SCT2	*      *      *      *            000000025252 000000025252     *            *            0            775 0   *   
SCT2	*      *      *      *            000000005252 000000005252     *            *            0            776 0   *   
SCT2	*      *      *      *            000000001252 000000001252     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000252     000000000252 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 777745 
FINAL
C(AC)=000000 000252 
----------

*032005  CAME	0,032300

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032005 032005 032005 312000032300 777777777777 000000000252     000000000252 000000777745 0            0   0   777 
IT1	*      *      032300 *            312000032300 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032300     *            *            0            0   0   *   
FT6	*      032300 *      000000000252 777777777777 000000000252     *            *            0            0   0   *   
ET0	*      *      032006 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032006 *      032007 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000252 C(E) =000000 000252 
----------

*032007  JUMPA	0,032010

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032007 032007 032007 324000032010 777777777777 000000000252     000000000252 000000777745 0            0   0   777 
IT1	*      *      032010 *            324000032010 *                *            *            0            0   0   *   
ET0	*      *      000252 *            000000000252 000000032010     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032010 *            000000032010 000000000252     *            000000032010 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000252 E    =000000 032010 
----------

*032010  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032010 032010 032010 312040032254 777777777777 000000000252     000000000252 000000032010 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032011 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032011 *      032012 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------                                                                                                                 SEQ 0219

*032012  JUMPA	0,032013

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032012 032012 032012 324000032013 777777777777 172737405060     172737405060 000000032010 0            0   0   777 
IT1	*      *      032013 *            324000032013 *                000000000252 *            0            0   0   *   
ET0	*      *      000252 *            000000000252 000000032013     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032013 *            000000032013 000000000252     *            000000032013 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000252 E    =000000 032013 
----------

*032013  MOVE 	0,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032013 032013 032013 200000032256 777777777777 000000000252     000000000252 000000032013 0            0   0   777 
IT1	*      *      032256 *            200000032256 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	032014 032014 032014 200040032254 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            000000000252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                525252525252 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*032014  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032014 032014 032014 200040032254 777777777777 525252525252     525252525252 000000032013 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032015 032015 032015 242000777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032015  LSH	0,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032015 032015 032015 242000777745 777777777777 172737405060     172737405060 000000032013 0            0   0   777 
IT1	*      *      777745 *            242000777745 *                525252525252 *            0            0   0   *   
ET0	*      *      032016 *            525252525252 000000777745     *            *            0            0   0   *   
ET1	032016 032016 *      312000032301 777777777777 525252525252     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            525252525252 *                *            *            0            *   0   777 
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            763 0   *   SEQ 0220
SCT2	*      *      *      *            052525252525 052525252525     *            *            0            764 0   *   
SCT2	*      *      *      *            012525252525 012525252525     *            *            0            765 0   *   
SCT2	*      *      *      *            002525252525 002525252525     *            *            0            766 0   *   
SCT2	*      *      *      *            000525252525 000525252525     *            *            0            767 0   *   
SCT2	*      *      *      *            000125252525 000125252525     *            *            0            770 0   *   
SCT2	*      *      *      *            000025252525 000025252525     *            *            0            771 0   *   
SCT2	*      *      *      *            000005252525 000005252525     *            *            0            772 0   *   
SCT2	*      *      *      *            000001252525 000001252525     *            *            0            773 0   *   
SCT2	*      *      *      *            000000252525 000000252525     *            *            0            774 0   *   
SCT2	*      *      *      *            000000052525 000000052525     *            *            0            775 0   *   
SCT2	*      *      *      *            000000012525 000000012525     *            *            0            776 0   *   
SCT2	*      *      *      *            000000002525 000000002525     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000525     000000000525 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 777745 
FINAL
C(AC)=000000 000525 
----------

*032016  CAME	0,032301

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032016 032016 032016 312000032301 777777777777 000000000525     000000000525 000000777745 0            0   0   777 
IT1	*      *      032301 *            312000032301 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032301     *            *            0            0   0   *   
FT6	*      032301 *      000000000525 777777777777 000000000525     *            *            0            0   0   *   
ET0	*      *      032017 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032017 *      032020 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000525 C(E) =000000 000525 
----------

*032020  JUMPA	0,032021

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032020 032020 032020 324000032021 777777777777 000000000525     000000000525 000000777745 0            0   0   777 
IT1	*      *      032021 *            324000032021 *                *            *            0            0   0   *   
ET0	*      *      000525 *            000000000525 000000032021     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032021 *            000000032021 000000000525     *            000000032021 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000525 E    =000000 032021 
----------

*032021  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032021 032021 032021 312040032254 777777777777 000000000525     000000000525 000000032021 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032022 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   SEQ 0221
ST1	032022 *      032023 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032023  JUMPA	0,032024

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032023 032023 032023 324000032024 777777777777 172737405060     172737405060 000000032021 0            0   0   777 
IT1	*      *      032024 *            324000032024 *                000000000525 *            0            0   0   *   
ET0	*      *      000525 *            000000000525 000000032024     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032024 *            000000032024 000000000525     *            000000032024 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000525 E    =000000 032024 
----------

*032024  MOVE 	0,032257

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032024 032024 032024 200000032257 777777777777 000000000525     000000000525 000000032024 0            0   0   777 
IT1	*      *      032257 *            200000032257 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032257     *            *            0            0   0   *   
FT6	032025 032025 032025 200040032254 777777777777 230703603700     *            *            0            0   0   *   
ET2	*      *      *      *            000000000525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                230703603700 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000525 C(E) =230703 603700 
FINAL
C(AC)=230703 603700 
----------

*032025  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032025 032025 032025 200040032254 777777777777 230703603700     230703603700 000000032024 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032026 032026 032026 242000777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032026  LSH	0,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032026 032026 032026 242000777745 777777777777 172737405060     172737405060 000000032024 0            0   0   777 
IT1	*      *      777745 *            242000777745 *                230703603700 *            0            0   0   *   SEQ 0222
ET0	*      *      032027 *            230703603700 000000777745     *            *            0            0   0   *   
ET1	032027 032027 *      312000032302 777777777777 230703603700     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            230703603700 *                *            *            0            *   0   777 
SCT2	*      *      *      *            114341701740 114341701740     *            *            0            763 0   *   
SCT2	*      *      *      *            023070360370 023070360370     *            *            0            764 0   *   
SCT2	*      *      *      *            004616074076 004616074076     *            *            0            765 0   *   
SCT2	*      *      *      *            001143417017 001143417017     *            *            0            766 0   *   
SCT2	*      *      *      *            000230703603 000230703603     *            *            0            767 0   *   
SCT2	*      *      *      *            000046160740 000046160740     *            *            0            770 0   *   
SCT2	*      *      *      *            000011434170 000011434170     *            *            0            771 0   *   
SCT2	*      *      *      *            000002307036 000002307036     *            *            0            772 0   *   
SCT2	*      *      *      *            000000461607 000000461607     *            *            0            773 0   *   
SCT2	*      *      *      *            000000114341 000000114341     *            *            0            774 0   *   
SCT2	*      *      *      *            000000023070 000000023070     *            *            0            775 0   *   
SCT2	*      *      *      *            000000004616 000000004616     *            *            0            776 0   *   
SCT2	*      *      *      *            000000001143 000000001143     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000230     000000000230 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=230703 603700 E    =000000 777745 
FINAL
C(AC)=000000 000230 
----------

*032027  CAME	0,032302

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032027 032027 032027 312000032302 777777777777 000000000230     000000000230 000000777745 0            0   0   777 
IT1	*      *      032302 *            312000032302 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032302     *            *            0            0   0   *   
FT6	*      032302 *      000000000230 777777777777 000000000230     *            *            0            0   0   *   
ET0	*      *      032030 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032030 *      032031 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000230 C(E) =000000 000230 
----------

*032031  JUMPA	0,032032

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032031 032031 032031 324000032032 777777777777 000000000230     000000000230 000000777745 0            0   0   777 
IT1	*      *      032032 *            324000032032 *                *            *            0            0   0   *   
ET0	*      *      000230 *            000000000230 000000032032     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032032 *            000000032032 000000000230     *            000000032032 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000230 E    =000000 032032 
----------

*032032  CAME	1,032254
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0223
IT0	032032 032032 032032 312040032254 777777777777 000000000230     000000000230 000000032032 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032033 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032033 *      032034 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032034  JUMPA	0,032035

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032034 032034 032034 324000032035 777777777777 172737405060     172737405060 000000032032 0            0   0   777 
IT1	*      *      032035 *            324000032035 *                000000000230 *            0            0   0   *   
ET0	*      *      000230 *            000000000230 000000032035     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032035 *            000000032035 000000000230     *            000000032035 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000230 E    =000000 032035 
----------

*032035  MOVE 	0,032261

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032035 032035 032035 200000032261 777777777777 000000000230     000000000230 000000032035 0            0   0   777 
IT1	*      *      032261 *            200000032261 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032261     *            *            0            0   0   *   
FT6	032036 032036 032036 200040032254 777777777777 007603607062     *            *            0            0   0   *   
ET2	*      *      *      *            000000000230 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                007603607062 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000230 C(E) =007603 607062 
FINAL
C(AC)=007603 607062 
----------

*032036  MOVE 	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032036 032036 032036 200040032254 777777777777 007603607062     007603607062 000000032035 0            0   0   777 
IT1	*      *      032254 *            200040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032037 032037 032037 242000777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------                                                                                                                 SEQ 0224

*032037  LSH	0,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032037 032037 032037 242000777745 777777777777 172737405060     172737405060 000000032035 0            0   0   777 
IT1	*      *      777745 *            242000777745 *                007603607062 *            0            0   0   *   
ET0	*      *      032040 *            007603607062 000000777745     *            *            0            0   0   *   
ET1	032040 032040 *      312000032252 777777777777 007603607062     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            007603607062 *                *            *            0            *   0   777 
SCT2	*      *      *      *            003701703431 003701703431     *            *            0            763 0   *   
SCT2	*      *      *      *            000760360706 000760360706     *            *            0            764 0   *   
SCT2	*      *      *      *            000174074161 000174074161     *            *            0            765 0   *   
SCT2	*      *      *      *            000037017034 000037017034     *            *            0            766 0   *   
SCT2	*      *      *      *            000007603607 000007603607     *            *            0            767 0   *   
SCT2	*      *      *      *            000001740741 000001740741     *            *            0            770 0   *   
SCT2	*      *      *      *            000000370170 000000370170     *            *            0            771 0   *   
SCT2	*      *      *      *            000000076036 000000076036     *            *            0            772 0   *   
SCT2	*      *      *      *            000000017407 000000017407     *            *            0            773 0   *   
SCT2	*      *      *      *            000000003701 000000003701     *            *            0            774 0   *   
SCT2	*      *      *      *            000000000760 000000000760     *            *            0            775 0   *   
SCT2	*      *      *      *            000000000174 000000000174     *            *            0            776 0   *   
SCT2	*      *      *      *            000000000037 000000000037     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000007     000000000007 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=007603 607062 E    =000000 777745 
FINAL
C(AC)=000000 000007 
----------

*032040  CAME	0,032252

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032040 032040 032040 312000032252 777777777777 000000000007     000000000007 000000777745 0            0   0   777 
IT1	*      *      032252 *            312000032252 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032252     *            *            0            0   0   *   
FT6	*      032252 *      000000000007 777777777777 000000000007     *            *            0            0   0   *   
ET0	*      *      032041 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032041 *      032042 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000007 
----------

*032042  JUMPA	0,032043

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032042 032042 032042 324000032043 777777777777 000000000007     000000000007 000000777745 0            0   0   777 
IT1	*      *      032043 *            324000032043 *                *            *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032043     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032043 *            000000032043 000000000007     *            000000032043 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0225
C(AC)=000000 000007 E    =000000 032043 
----------

*032043  CAME	1,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032043 032043 032043 312040032254 777777777777 000000000007     000000000007 000000032043 0            0   0   777 
IT1	*      *      032254 *            312040032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032044 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032044 *      032045 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032045  JUMPA	0,032046

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032045 032045 032045 324000032046 777777777777 172737405060     172737405060 000000032043 0            0   0   777 
IT1	*      *      032046 *            324000032046 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032046     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032046 *            000000032046 000000000007     *            000000032046 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032046 
----------

*032046  MOVE 	1,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032046 032046 032046 200040032227 777777777777 000000000007     000000000007 000000032046 0            0   0   777 
IT1	*      *      032227 *            200040032227 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	032047 032047 032047 200100032254 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*032047  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032047 032047 032047 200100032254 777777777777 0                0            000000032046 0            0   0   777 
IT1	*      *      032254 *            200100032254 0                074161440174 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032050 032050 032050 242040777751 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            074161440174 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                172737405060 *            0            0   0   *   
                                                                                                                           SEQ 0226
FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=074161 440174 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032050  LSH	1,777751

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032050 032050 032050 242040777751 777777777777 172737405060     172737405060 000000032046 0            0   0   777 
IT1	*      *      777751 *            242040777751 *                000000000000 *            0            0   0   *   
ET0	*      *      032051 *            000000000000 000000777751     0            *            0            0   0   *   
ET1	032051 032051 *      312040032227 777777777777 000000000000     0            000000777751 0            751 0   171 
ET2	*      *      *      *            *            0                0            *            0            *   0   061 
SRT1	*      *      *      *            *            0                0            *            0            *   0   751 
SCT1	*      *      *      *            000000000000 0                0            *            0            *   0   777 
SCT2	*      *      *      *            0            0                0            *            0            765 0   *   
SCT2	*      *      *      *            0            0                0            *            0            766 0   *   
SCT2	*      *      *      *            0            0                0            *            0            767 0   *   
SCT2	*      *      *      *            0            0                0            *            0            770 0   *   
SCT2	*      *      *      *            0            0                0            *            0            771 0   *   
SCT2	*      *      *      *            0            0                0            *            0            772 0   *   
SCT2	*      *      *      *            0            0                0            *            0            773 0   *   
SCT2	*      *      *      *            0            0                0            *            0            774 0   *   
SCT2	*      *      *      *            0            0                0            *            0            775 0   *   
SCT2	*      *      *      *            0            0                0            *            0            776 0   *   
SCT2	*      *      *      *            0            0                0            *            0            777 0   *   
ST1	*      *      *      *            777777777777 0                0            *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 777751 
FINAL
C(AC)=000000 000000 
----------

*032051  CAME	1,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032051 032051 032051 312040032227 777777777777 0                0            000000777751 0            0   0   777 
IT1	*      *      032227 *            312040032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      032052 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	032052 *      032053 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*032053  JUMPA	0,032054

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032053 032053 032053 324000032054 777777777777 0                0            000000777751 0            0   0   777 
IT1	*      *      032054 *            324000032054 0                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032054     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   SEQ 0227
ST1	*      *      032054 *            000000032054 000000000007     *            000000032054 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032054 
----------

*032054  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032054 032054 032054 312100032254 777777777777 000000000007     000000000007 000000032054 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032055 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032055 *      032056 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032056  JUMPA	0,032057

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032056 032056 032056 324000032057 777777777777 172737405060     172737405060 000000032054 0            0   0   777 
IT1	*      *      032057 *            324000032057 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032057     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032057 *            000000032057 000000000007     *            000000032057 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032057 
----------

*032057  MOVE 	1,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032057 032057 032057 200040032226 777777777777 000000000007     000000000007 000000032057 0            0   0   777 
IT1	*      *      032226 *            200040032226 *                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	032060 032060 032060 200100032254 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*032060  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032060 032060 032060 200100032254 777777777777 777777777777     777777777777 000000032057 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   SEQ 0228
FT6	032061 032061 032061 242040777751 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032061  LSH	1,777751

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032061 032061 032061 242040777751 777777777777 172737405060     172737405060 000000032057 0            0   0   777 
IT1	*      *      777751 *            242040777751 *                777777777777 *            0            0   0   *   
ET0	*      *      032062 *            777777777777 000000777751     *            *            0            0   0   *   
ET1	032062 032062 *      312040032303 *            777777777777     *            000000777751 0            751 0   171 
ET2	*      *      *      *            *            *                *            *            0            *   0   061 
SRT1	*      *      *      *            *            *                *            *            0            *   0   751 
SCT1	*      *      *      *            *            *                *            *            0            *   0   777 
SCT2	*      *      *      *            377777777777 377777777777     *            *            0            765 0   *   
SCT2	*      *      *      *            077777777777 077777777777     *            *            0            766 0   *   
SCT2	*      *      *      *            017777777777 017777777777     *            *            0            767 0   *   
SCT2	*      *      *      *            003777777777 003777777777     *            *            0            770 0   *   
SCT2	*      *      *      *            000777777777 000777777777     *            *            0            771 0   *   
SCT2	*      *      *      *            000177777777 000177777777     *            *            0            772 0   *   
SCT2	*      *      *      *            000037777777 000037777777     *            *            0            773 0   *   
SCT2	*      *      *      *            000007777777 000007777777     *            *            0            774 0   *   
SCT2	*      *      *      *            000001777777 000001777777     *            *            0            775 0   *   
SCT2	*      *      *      *            000000377777 000000377777     *            *            0            776 0   *   
SCT2	*      *      *      *            000000077777 000000077777     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000017777     000000017777 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 777751 
FINAL
C(AC)=000000 017777 
----------

*032062  CAME	1,032303

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032062 032062 032062 312040032303 777777777777 000000017777     000000017777 000000777751 0            0   0   777 
IT1	*      *      032303 *            312040032303 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032303     *            *            0            0   0   *   
FT6	*      032303 *      000000017777 777777777777 000000017777     *            *            0            0   0   *   
ET0	*      *      032063 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032063 *      032064 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 017777 C(E) =000000 017777 
----------

*032064  JUMPA	0,032065
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0229
IT0	032064 032064 032064 324000032065 777777777777 000000017777     000000017777 000000777751 0            0   0   777 
IT1	*      *      032065 *            324000032065 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032065     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032065 *            000000032065 000000000007     *            000000032065 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032065 
----------

*032065  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032065 032065 032065 312100032254 777777777777 000000000007     000000000007 000000032065 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032066 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032066 *      032067 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032067  JUMPA	0,032070

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032067 032067 032067 324000032070 777777777777 172737405060     172737405060 000000032065 0            0   0   777 
IT1	*      *      032070 *            324000032070 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032070     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032070 *            000000032070 000000000007     *            000000032070 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032070 
----------

*032070  MOVE 	1,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032070 032070 032070 200040032255 777777777777 000000000007     000000000007 000000032070 0            0   0   777 
IT1	*      *      032255 *            200040032255 *                000000017777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	032071 032071 032071 200100032254 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            000000017777 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 017777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*032071  MOVE 	2,032254
                                                                                                                           SEQ 0230
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032071 032071 032071 200100032254 777777777777 252525252525     252525252525 000000032070 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032072 032072 032072 242040777751 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032072  LSH	1,777751

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032072 032072 032072 242040777751 777777777777 172737405060     172737405060 000000032070 0            0   0   777 
IT1	*      *      777751 *            242040777751 *                252525252525 *            0            0   0   *   
ET0	*      *      032073 *            252525252525 000000777751     *            *            0            0   0   *   
ET1	032073 032073 *      312040032304 777777777777 252525252525     *            000000777751 0            751 0   171 
ET2	*      *      *      *            *            *                *            *            0            *   0   061 
SRT1	*      *      *      *            *            *                *            *            0            *   0   751 
SCT1	*      *      *      *            252525252525 *                *            *            0            *   0   777 
SCT2	*      *      *      *            125252525252 125252525252     *            *            0            765 0   *   
SCT2	*      *      *      *            025252525252 025252525252     *            *            0            766 0   *   
SCT2	*      *      *      *            005252525252 005252525252     *            *            0            767 0   *   
SCT2	*      *      *      *            001252525252 001252525252     *            *            0            770 0   *   
SCT2	*      *      *      *            000252525252 000252525252     *            *            0            771 0   *   
SCT2	*      *      *      *            000052525252 000052525252     *            *            0            772 0   *   
SCT2	*      *      *      *            000012525252 000012525252     *            *            0            773 0   *   
SCT2	*      *      *      *            000002525252 000002525252     *            *            0            774 0   *   
SCT2	*      *      *      *            000000525252 000000525252     *            *            0            775 0   *   
SCT2	*      *      *      *            000000125252 000000125252     *            *            0            776 0   *   
SCT2	*      *      *      *            000000025252 000000025252     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000005252     000000005252 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 777751 
FINAL
C(AC)=000000 005252 
----------

*032073  CAME	1,032304

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032073 032073 032073 312040032304 777777777777 000000005252     000000005252 000000777751 0            0   0   777 
IT1	*      *      032304 *            312040032304 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032304     *            *            0            0   0   *   
FT6	*      032304 *      000000005252 777777777777 000000005252     *            *            0            0   0   *   
ET0	*      *      032074 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032074 *      032075 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 005252 C(E) =000000 005252 
----------                                                                                                                 SEQ 0231

*032075  JUMPA	0,032076

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032075 032075 032075 324000032076 777777777777 000000005252     000000005252 000000777751 0            0   0   777 
IT1	*      *      032076 *            324000032076 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032076     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032076 *            000000032076 000000000007     *            000000032076 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032076 
----------

*032076  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032076 032076 032076 312100032254 777777777777 000000000007     000000000007 000000032076 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032077 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032077 *      032100 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032100  JUMPA	0,032101

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032100 032100 032100 324000032101 777777777777 172737405060     172737405060 000000032076 0            0   0   777 
IT1	*      *      032101 *            324000032101 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032101     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032101 *            000000032101 000000000007     *            000000032101 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032101 
----------

*032101  MOVE 	1,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032101 032101 032101 200040032256 777777777777 000000000007     000000000007 000000032101 0            0   0   777 
IT1	*      *      032256 *            200040032256 *                000000005252 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	032102 032102 032102 200100032254 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            000000005252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                525252525252 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 005252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252                                                                                                        SEQ 0232
----------

*032102  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032102 032102 032102 200100032254 777777777777 525252525252     525252525252 000000032101 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032103 032103 032103 242040777751 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032103  LSH	1,777751

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032103 032103 032103 242040777751 777777777777 172737405060     172737405060 000000032101 0            0   0   777 
IT1	*      *      777751 *            242040777751 *                525252525252 *            0            0   0   *   
ET0	*      *      032104 *            525252525252 000000777751     *            *            0            0   0   *   
ET1	032104 032104 *      312040032305 777777777777 525252525252     *            000000777751 0            751 0   171 
ET2	*      *      *      *            *            *                *            *            0            *   0   061 
SRT1	*      *      *      *            *            *                *            *            0            *   0   751 
SCT1	*      *      *      *            525252525252 *                *            *            0            *   0   777 
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            765 0   *   
SCT2	*      *      *      *            052525252525 052525252525     *            *            0            766 0   *   
SCT2	*      *      *      *            012525252525 012525252525     *            *            0            767 0   *   
SCT2	*      *      *      *            002525252525 002525252525     *            *            0            770 0   *   
SCT2	*      *      *      *            000525252525 000525252525     *            *            0            771 0   *   
SCT2	*      *      *      *            000125252525 000125252525     *            *            0            772 0   *   
SCT2	*      *      *      *            000025252525 000025252525     *            *            0            773 0   *   
SCT2	*      *      *      *            000005252525 000005252525     *            *            0            774 0   *   
SCT2	*      *      *      *            000001252525 000001252525     *            *            0            775 0   *   
SCT2	*      *      *      *            000000252525 000000252525     *            *            0            776 0   *   
SCT2	*      *      *      *            000000052525 000000052525     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000012525     000000012525 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 777751 
FINAL
C(AC)=000000 012525 
----------

*032104  CAME	1,032305

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032104 032104 032104 312040032305 777777777777 000000012525     000000012525 000000777751 0            0   0   777 
IT1	*      *      032305 *            312040032305 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032305     *            *            0            0   0   *   
FT6	*      032305 *      000000012525 777777777777 000000012525     *            *            0            0   0   *   
ET0	*      *      032105 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032105 *      032106 *            777777777777 *                *            *            0            0   0   *   
                                                                                                                           SEQ 0233
FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 012525 C(E) =000000 012525 
----------

*032106  JUMPA	0,032107

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032106 032106 032106 324000032107 777777777777 000000012525     000000012525 000000777751 0            0   0   777 
IT1	*      *      032107 *            324000032107 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032107     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032107 *            000000032107 000000000007     *            000000032107 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032107 
----------

*032107  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032107 032107 032107 312100032254 777777777777 000000000007     000000000007 000000032107 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032110 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032110 *      032111 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032111  JUMPA	0,032112

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032111 032111 032111 324000032112 777777777777 172737405060     172737405060 000000032107 0            0   0   777 
IT1	*      *      032112 *            324000032112 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032112     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032112 *            000000032112 000000000007     *            000000032112 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032112 
----------

*032112  MOVE 	1,032257

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032112 032112 032112 200040032257 777777777777 000000000007     000000000007 000000032112 0            0   0   777 
IT1	*      *      032257 *            200040032257 *                000000012525 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032257     *            *            0            0   0   *   
FT6	032113 032113 032113 200100032254 777777777777 230703603700     *            *            0            0   0   *   
ET2	*      *      *      *            000000012525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                230703603700 *            0            0   0   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0234
INITIAL
C(AC)=000000 012525 C(E) =230703 603700 
FINAL
C(AC)=230703 603700 
----------

*032113  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032113 032113 032113 200100032254 777777777777 230703603700     230703603700 000000032112 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032114 032114 032114 242040777751 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032114  LSH	1,777751

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032114 032114 032114 242040777751 777777777777 172737405060     172737405060 000000032112 0            0   0   777 
IT1	*      *      777751 *            242040777751 *                230703603700 *            0            0   0   *   
ET0	*      *      032115 *            230703603700 000000777751     *            *            0            0   0   *   
ET1	032115 032115 *      312040032306 777777777777 230703603700     *            000000777751 0            751 0   171 
ET2	*      *      *      *            *            *                *            *            0            *   0   061 
SRT1	*      *      *      *            *            *                *            *            0            *   0   751 
SCT1	*      *      *      *            230703603700 *                *            *            0            *   0   777 
SCT2	*      *      *      *            114341701740 114341701740     *            *            0            765 0   *   
SCT2	*      *      *      *            023070360370 023070360370     *            *            0            766 0   *   
SCT2	*      *      *      *            004616074076 004616074076     *            *            0            767 0   *   
SCT2	*      *      *      *            001143417017 001143417017     *            *            0            770 0   *   
SCT2	*      *      *      *            000230703603 000230703603     *            *            0            771 0   *   
SCT2	*      *      *      *            000046160740 000046160740     *            *            0            772 0   *   
SCT2	*      *      *      *            000011434170 000011434170     *            *            0            773 0   *   
SCT2	*      *      *      *            000002307036 000002307036     *            *            0            774 0   *   
SCT2	*      *      *      *            000000461607 000000461607     *            *            0            775 0   *   
SCT2	*      *      *      *            000000114341 000000114341     *            *            0            776 0   *   
SCT2	*      *      *      *            000000023070 000000023070     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000004616     000000004616 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=230703 603700 E    =000000 777751 
FINAL
C(AC)=000000 004616 
----------

*032115  CAME	1,032306

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032115 032115 032115 312040032306 777777777777 000000004616     000000004616 000000777751 0            0   0   777 
IT1	*      *      032306 *            312040032306 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032306     *            *            0            0   0   *   
FT6	*      032306 *      000000004616 777777777777 000000004616     *            *            0            0   0   *   SEQ 0235
ET0	*      *      032116 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032116 *      032117 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 004616 C(E) =000000 004616 
----------

*032117  JUMPA	0,032120

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032117 032117 032117 324000032120 777777777777 000000004616     000000004616 000000777751 0            0   0   777 
IT1	*      *      032120 *            324000032120 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032120     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032120 *            000000032120 000000000007     *            000000032120 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032120 
----------

*032120  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032120 032120 032120 312100032254 777777777777 000000000007     000000000007 000000032120 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032121 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032121 *      032122 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032122  JUMPA	0,032123

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032122 032122 032122 324000032123 777777777777 172737405060     172737405060 000000032120 0            0   0   777 
IT1	*      *      032123 *            324000032123 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032123     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032123 *            000000032123 000000000007     *            000000032123 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032123 
----------

*032123  MOVE 	1,032261

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032123 032123 032123 200040032261 777777777777 000000000007     000000000007 000000032123 0            0   0   777 
IT1	*      *      032261 *            200040032261 *                000000004616 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032261     *            *            0            0   0   *   
FT6	032124 032124 032124 200100032254 777777777777 007603607062     *            *            0            0   0   *   SEQ 0236
ET2	*      *      *      *            000000004616 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                007603607062 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 004616 C(E) =007603 607062 
FINAL
C(AC)=007603 607062 
----------

*032124  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032124 032124 032124 200100032254 777777777777 007603607062     007603607062 000000032123 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032125 032125 032125 242040777751 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032125  LSH	1,777751

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032125 032125 032125 242040777751 777777777777 172737405060     172737405060 000000032123 0            0   0   777 
IT1	*      *      777751 *            242040777751 *                007603607062 *            0            0   0   *   
ET0	*      *      032126 *            007603607062 000000777751     *            *            0            0   0   *   
ET1	032126 032126 *      312040032307 777777777777 007603607062     *            000000777751 0            751 0   171 
ET2	*      *      *      *            *            *                *            *            0            *   0   061 
SRT1	*      *      *      *            *            *                *            *            0            *   0   751 
SCT1	*      *      *      *            007603607062 *                *            *            0            *   0   777 
SCT2	*      *      *      *            003701703431 003701703431     *            *            0            765 0   *   
SCT2	*      *      *      *            000760360706 000760360706     *            *            0            766 0   *   
SCT2	*      *      *      *            000174074161 000174074161     *            *            0            767 0   *   
SCT2	*      *      *      *            000037017034 000037017034     *            *            0            770 0   *   
SCT2	*      *      *      *            000007603607 000007603607     *            *            0            771 0   *   
SCT2	*      *      *      *            000001740741 000001740741     *            *            0            772 0   *   
SCT2	*      *      *      *            000000370170 000000370170     *            *            0            773 0   *   
SCT2	*      *      *      *            000000076036 000000076036     *            *            0            774 0   *   
SCT2	*      *      *      *            000000017407 000000017407     *            *            0            775 0   *   
SCT2	*      *      *      *            000000003701 000000003701     *            *            0            776 0   *   
SCT2	*      *      *      *            000000000760 000000000760     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000174     000000000174 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=007603 607062 E    =000000 777751 
FINAL
C(AC)=000000 000174 
----------

*032126  CAME	1,032307
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0237
IT0	032126 032126 032126 312040032307 777777777777 000000000174     000000000174 000000777751 0            0   0   777 
IT1	*      *      032307 *            312040032307 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032307     *            *            0            0   0   *   
FT6	*      032307 *      000000000174 777777777777 000000000174     *            *            0            0   0   *   
ET0	*      *      032127 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032127 *      032130 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000174 C(E) =000000 000174 
----------

*032130  JUMPA	0,032131

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032130 032130 032130 324000032131 777777777777 000000000174     000000000174 000000777751 0            0   0   777 
IT1	*      *      032131 *            324000032131 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032131     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032131 *            000000032131 000000000007     *            000000032131 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032131 
----------

*032131  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032131 032131 032131 312100032254 777777777777 000000000007     000000000007 000000032131 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032132 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032132 *      032133 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032133  JUMPA	0,032134

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032133 032133 032133 324000032134 777777777777 172737405060     172737405060 000000032131 0            0   0   777 
IT1	*      *      032134 *            324000032134 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032134     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032134 *            000000032134 000000000007     *            000000032134 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032134 
----------

*032134  MOVE 	1,032227
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0238
IT0	032134 032134 032134 200040032227 777777777777 000000000007     000000000007 000000032134 0            0   0   777 
IT1	*      *      032227 *            200040032227 *                000000000174 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     *            *            0            0   0   *   
FT6	032135 032135 032135 200100032254 777777777777 000000000000     *            *            0            0   0   *   
ET2	*      *      *      *            000000000174 0                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 0                000000000000 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000174 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*032135  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032135 032135 032135 200100032254 777777777777 0                0            000000032134 0            0   0   777 
IT1	*      *      032254 *            200100032254 0                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032136 032136 032136 242040777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032136  LSH	1,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032136 032136 032136 242040777745 777777777777 172737405060     172737405060 000000032134 0            0   0   777 
IT1	*      *      777745 *            242040777745 *                000000000000 *            0            0   0   *   
ET0	*      *      032137 *            000000000000 000000777745     0            *            0            0   0   *   
ET1	032137 032137 *      312040032227 777777777777 000000000000     0            000000777745 0            745 0   165 
ET2	*      *      *      *            *            0                0            *            0            *   0   055 
SRT1	*      *      *      *            *            0                0            *            0            *   0   745 
SCT1	*      *      *      *            000000000000 0                0            *            0            *   0   777 
SCT2	*      *      *      *            0            0                0            *            0            763 0   *   
SCT2	*      *      *      *            0            0                0            *            0            764 0   *   
SCT2	*      *      *      *            0            0                0            *            0            765 0   *   
SCT2	*      *      *      *            0            0                0            *            0            766 0   *   
SCT2	*      *      *      *            0            0                0            *            0            767 0   *   
SCT2	*      *      *      *            0            0                0            *            0            770 0   *   
SCT2	*      *      *      *            0            0                0            *            0            771 0   *   
SCT2	*      *      *      *            0            0                0            *            0            772 0   *   
SCT2	*      *      *      *            0            0                0            *            0            773 0   *   
SCT2	*      *      *      *            0            0                0            *            0            774 0   *   
SCT2	*      *      *      *            0            0                0            *            0            775 0   *   
SCT2	*      *      *      *            0            0                0            *            0            776 0   *   
SCT2	*      *      *      *            0            0                0            *            0            777 0   *   
ST1	*      *      *      *            777777777777 0                0            *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 E    =000000 777745 
FINAL                                                                                                                      SEQ 0239
C(AC)=000000 000000 
----------

*032137  CAME	1,032227

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032137 032137 032137 312040032227 777777777777 0                0            000000777745 0            0   0   777 
IT1	*      *      032227 *            312040032227 0                0            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032227     0            *            0            0   0   *   
FT6	*      032227 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET0	*      *      032140 0            000000000000 0                0            *            0            0   0   *   
ET2	*      *      *      0            0            0                0            *            0            0   0   *   
ST1	032140 *      032141 0            777777777777 0                0            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =000000 000000 
----------

*032141  JUMPA	0,032142

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032141 032141 032141 324000032142 777777777777 0                0            000000777745 0            0   0   777 
IT1	*      *      032142 *            324000032142 0                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032142     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032142 *            000000032142 000000000007     *            000000032142 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032142 
----------

*032142  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032142 032142 032142 312100032254 777777777777 000000000007     000000000007 000000032142 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032143 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032143 *      032144 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032144  JUMPA	0,032145

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032144 032144 032144 324000032145 777777777777 172737405060     172737405060 000000032142 0            0   0   777 
IT1	*      *      032145 *            324000032145 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032145     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032145 *            000000032145 000000000007     *            000000032145 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0240
C(AC)=000000 000007 E    =000000 032145 
----------

*032145  MOVE 	1,032226

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032145 032145 032145 200040032226 777777777777 000000000007     000000000007 000000032145 0            0   0   777 
IT1	*      *      032226 *            200040032226 *                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032226     0            *            0            0   0   *   
FT6	032146 032146 032146 200100032254 777777777777 777777777777     0            *            0            0   0   *   
ET2	*      *      *      *            000000000000 *                0            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =777777 777777 
FINAL
C(AC)=777777 777777 
----------

*032146  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032146 032146 032146 200100032254 777777777777 777777777777     777777777777 000000032145 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032147 032147 032147 242040777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032147  LSH	1,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032147 032147 032147 242040777745 777777777777 172737405060     172737405060 000000032145 0            0   0   777 
IT1	*      *      777745 *            242040777745 *                777777777777 *            0            0   0   *   
ET0	*      *      032150 *            777777777777 000000777745     *            *            0            0   0   *   
ET1	032150 032150 *      312040032277 *            777777777777     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            *            *                *            *            0            *   0   777 
SCT2	*      *      *      *            377777777777 377777777777     *            *            0            763 0   *   
SCT2	*      *      *      *            077777777777 077777777777     *            *            0            764 0   *   
SCT2	*      *      *      *            017777777777 017777777777     *            *            0            765 0   *   
SCT2	*      *      *      *            003777777777 003777777777     *            *            0            766 0   *   
SCT2	*      *      *      *            000777777777 000777777777     *            *            0            767 0   *   
SCT2	*      *      *      *            000177777777 000177777777     *            *            0            770 0   *   
SCT2	*      *      *      *            000037777777 000037777777     *            *            0            771 0   *   
SCT2	*      *      *      *            000007777777 000007777777     *            *            0            772 0   *   
SCT2	*      *      *      *            000001777777 000001777777     *            *            0            773 0   *   
SCT2	*      *      *      *            000000377777 000000377777     *            *            0            774 0   *   
SCT2	*      *      *      *            000000077777 000000077777     *            *            0            775 0   *   
SCT2	*      *      *      *            000000017777 000000017777     *            *            0            776 0   *   
SCT2	*      *      *      *            000000003777 000000003777     *            *            0            777 0   *   SEQ 0241
ST1	*      *      *      *            777777777777 000000000777     000000000777 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 E    =000000 777745 
FINAL
C(AC)=000000 000777 
----------

*032150  CAME	1,032277

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032150 032150 032150 312040032277 777777777777 000000000777     000000000777 000000777745 0            0   0   777 
IT1	*      *      032277 *            312040032277 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032277     *            *            0            0   0   *   
FT6	*      032277 *      000000000777 777777777777 000000000777     *            *            0            0   0   *   
ET0	*      *      032151 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032151 *      032152 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000777 C(E) =000000 000777 
----------

*032152  JUMPA	0,032153

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032152 032152 032152 324000032153 777777777777 000000000777     000000000777 000000777745 0            0   0   777 
IT1	*      *      032153 *            324000032153 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032153     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032153 *            000000032153 000000000007     *            000000032153 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032153 
----------

*032153  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032153 032153 032153 312100032254 777777777777 000000000007     000000000007 000000032153 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032154 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032154 *      032155 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032155  JUMPA	0,032156

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032155 032155 032155 324000032156 777777777777 172737405060     172737405060 000000032153 0            0   0   777 
IT1	*      *      032156 *            324000032156 *                000000000007 *            0            0   0   *   SEQ 0242
ET0	*      *      000007 *            000000000007 000000032156     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032156 *            000000032156 000000000007     *            000000032156 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032156 
----------

*032156  MOVE 	1,032255

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032156 032156 032156 200040032255 777777777777 000000000007     000000000007 000000032156 0            0   0   777 
IT1	*      *      032255 *            200040032255 *                000000000777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032255     *            *            0            0   0   *   
FT6	032157 032157 032157 200100032254 777777777777 252525252525     *            *            0            0   0   *   
ET2	*      *      *      *            000000000777 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                252525252525 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000777 C(E) =252525 252525 
FINAL
C(AC)=252525 252525 
----------

*032157  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032157 032157 032157 200100032254 777777777777 252525252525     252525252525 000000032156 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032160 032160 032160 242040777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032160  LSH	1,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032160 032160 032160 242040777745 777777777777 172737405060     172737405060 000000032156 0            0   0   777 
IT1	*      *      777745 *            242040777745 *                252525252525 *            0            0   0   *   
ET0	*      *      032161 *            252525252525 000000777745     *            *            0            0   0   *   
ET1	032161 032161 *      312040032300 777777777777 252525252525     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            252525252525 *                *            *            0            *   0   777 
SCT2	*      *      *      *            125252525252 125252525252     *            *            0            763 0   *   
SCT2	*      *      *      *            025252525252 025252525252     *            *            0            764 0   *   
SCT2	*      *      *      *            005252525252 005252525252     *            *            0            765 0   *   
SCT2	*      *      *      *            001252525252 001252525252     *            *            0            766 0   *   
SCT2	*      *      *      *            000252525252 000252525252     *            *            0            767 0   *   
SCT2	*      *      *      *            000052525252 000052525252     *            *            0            770 0   *   
SCT2	*      *      *      *            000012525252 000012525252     *            *            0            771 0   *   SEQ 0243
SCT2	*      *      *      *            000002525252 000002525252     *            *            0            772 0   *   
SCT2	*      *      *      *            000000525252 000000525252     *            *            0            773 0   *   
SCT2	*      *      *      *            000000125252 000000125252     *            *            0            774 0   *   
SCT2	*      *      *      *            000000025252 000000025252     *            *            0            775 0   *   
SCT2	*      *      *      *            000000005252 000000005252     *            *            0            776 0   *   
SCT2	*      *      *      *            000000001252 000000001252     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000252     000000000252 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=252525 252525 E    =000000 777745 
FINAL
C(AC)=000000 000252 
----------

*032161  CAME	1,032300

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032161 032161 032161 312040032300 777777777777 000000000252     000000000252 000000777745 0            0   0   777 
IT1	*      *      032300 *            312040032300 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032300     *            *            0            0   0   *   
FT6	*      032300 *      000000000252 777777777777 000000000252     *            *            0            0   0   *   
ET0	*      *      032162 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032162 *      032163 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000252 C(E) =000000 000252 
----------

*032163  JUMPA	0,032164

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032163 032163 032163 324000032164 777777777777 000000000252     000000000252 000000777745 0            0   0   777 
IT1	*      *      032164 *            324000032164 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032164     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032164 *            000000032164 000000000007     *            000000032164 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032164 
----------

*032164  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032164 032164 032164 312100032254 777777777777 000000000007     000000000007 000000032164 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032165 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032165 *      032166 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------                                                                                                                 SEQ 0244

*032166  JUMPA	0,032167

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032166 032166 032166 324000032167 777777777777 172737405060     172737405060 000000032164 0            0   0   777 
IT1	*      *      032167 *            324000032167 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032167     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032167 *            000000032167 000000000007     *            000000032167 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032167 
----------

*032167  MOVE 	1,032256

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032167 032167 032167 200040032256 777777777777 000000000007     000000000007 000000032167 0            0   0   777 
IT1	*      *      032256 *            200040032256 *                000000000252 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032256     *            *            0            0   0   *   
FT6	032170 032170 032170 200100032254 777777777777 525252525252     *            *            0            0   0   *   
ET2	*      *      *      *            000000000252 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                525252525252 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000252 C(E) =525252 525252 
FINAL
C(AC)=525252 525252 
----------

*032170  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032170 032170 032170 200100032254 777777777777 525252525252     525252525252 000000032167 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032171 032171 032171 242040777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032171  LSH	1,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032171 032171 032171 242040777745 777777777777 172737405060     172737405060 000000032167 0            0   0   777 
IT1	*      *      777745 *            242040777745 *                525252525252 *            0            0   0   *   
ET0	*      *      032172 *            525252525252 000000777745     *            *            0            0   0   *   
ET1	032172 032172 *      312040032301 777777777777 525252525252     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            525252525252 *                *            *            0            *   0   777 
SCT2	*      *      *      *            252525252525 252525252525     *            *            0            763 0   *   SEQ 0245
SCT2	*      *      *      *            052525252525 052525252525     *            *            0            764 0   *   
SCT2	*      *      *      *            012525252525 012525252525     *            *            0            765 0   *   
SCT2	*      *      *      *            002525252525 002525252525     *            *            0            766 0   *   
SCT2	*      *      *      *            000525252525 000525252525     *            *            0            767 0   *   
SCT2	*      *      *      *            000125252525 000125252525     *            *            0            770 0   *   
SCT2	*      *      *      *            000025252525 000025252525     *            *            0            771 0   *   
SCT2	*      *      *      *            000005252525 000005252525     *            *            0            772 0   *   
SCT2	*      *      *      *            000001252525 000001252525     *            *            0            773 0   *   
SCT2	*      *      *      *            000000252525 000000252525     *            *            0            774 0   *   
SCT2	*      *      *      *            000000052525 000000052525     *            *            0            775 0   *   
SCT2	*      *      *      *            000000012525 000000012525     *            *            0            776 0   *   
SCT2	*      *      *      *            000000002525 000000002525     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000525     000000000525 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=525252 525252 E    =000000 777745 
FINAL
C(AC)=000000 000525 
----------

*032172  CAME	1,032301

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032172 032172 032172 312040032301 777777777777 000000000525     000000000525 000000777745 0            0   0   777 
IT1	*      *      032301 *            312040032301 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032301     *            *            0            0   0   *   
FT6	*      032301 *      000000000525 777777777777 000000000525     *            *            0            0   0   *   
ET0	*      *      032173 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032173 *      032174 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000525 C(E) =000000 000525 
----------

*032174  JUMPA	0,032175

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032174 032174 032174 324000032175 777777777777 000000000525     000000000525 000000777745 0            0   0   777 
IT1	*      *      032175 *            324000032175 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032175     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032175 *            000000032175 000000000007     *            000000032175 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032175 
----------

*032175  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032175 032175 032175 312100032254 777777777777 000000000007     000000000007 000000032175 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032176 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   SEQ 0246
ST1	032176 *      032177 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032177  JUMPA	0,032200

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032177 032177 032177 324000032200 777777777777 172737405060     172737405060 000000032175 0            0   0   777 
IT1	*      *      032200 *            324000032200 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032200     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032200 *            000000032200 000000000007     *            000000032200 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032200 
----------

*032200  MOVE 	1,032257

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032200 032200 032200 200040032257 777777777777 000000000007     000000000007 000000032200 0            0   0   777 
IT1	*      *      032257 *            200040032257 *                000000000525 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032257     *            *            0            0   0   *   
FT6	032201 032201 032201 200100032254 777777777777 230703603700     *            *            0            0   0   *   
ET2	*      *      *      *            000000000525 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                230703603700 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000525 C(E) =230703 603700 
FINAL
C(AC)=230703 603700 
----------

*032201  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032201 032201 032201 200100032254 777777777777 230703603700     230703603700 000000032200 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032202 032202 032202 242040777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------

*032202  LSH	1,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032202 032202 032202 242040777745 777777777777 172737405060     172737405060 000000032200 0            0   0   777 
IT1	*      *      777745 *            242040777745 *                230703603700 *            0            0   0   *   SEQ 0247
ET0	*      *      032203 *            230703603700 000000777745     *            *            0            0   0   *   
ET1	032203 032203 *      312040032302 777777777777 230703603700     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            230703603700 *                *            *            0            *   0   777 
SCT2	*      *      *      *            114341701740 114341701740     *            *            0            763 0   *   
SCT2	*      *      *      *            023070360370 023070360370     *            *            0            764 0   *   
SCT2	*      *      *      *            004616074076 004616074076     *            *            0            765 0   *   
SCT2	*      *      *      *            001143417017 001143417017     *            *            0            766 0   *   
SCT2	*      *      *      *            000230703603 000230703603     *            *            0            767 0   *   
SCT2	*      *      *      *            000046160740 000046160740     *            *            0            770 0   *   
SCT2	*      *      *      *            000011434170 000011434170     *            *            0            771 0   *   
SCT2	*      *      *      *            000002307036 000002307036     *            *            0            772 0   *   
SCT2	*      *      *      *            000000461607 000000461607     *            *            0            773 0   *   
SCT2	*      *      *      *            000000114341 000000114341     *            *            0            774 0   *   
SCT2	*      *      *      *            000000023070 000000023070     *            *            0            775 0   *   
SCT2	*      *      *      *            000000004616 000000004616     *            *            0            776 0   *   
SCT2	*      *      *      *            000000001143 000000001143     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000230     000000000230 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=230703 603700 E    =000000 777745 
FINAL
C(AC)=000000 000230 
----------

*032203  CAME	1,032302

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032203 032203 032203 312040032302 777777777777 000000000230     000000000230 000000777745 0            0   0   777 
IT1	*      *      032302 *            312040032302 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032302     *            *            0            0   0   *   
FT6	*      032302 *      000000000230 777777777777 000000000230     *            *            0            0   0   *   
ET0	*      *      032204 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032204 *      032205 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000230 C(E) =000000 000230 
----------

*032205  JUMPA	0,032206

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032205 032205 032205 324000032206 777777777777 000000000230     000000000230 000000777745 0            0   0   777 
IT1	*      *      032206 *            324000032206 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032206     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032206 *            000000032206 000000000007     *            000000032206 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032206 
----------

*032206  CAME	2,032254
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0248
IT0	032206 032206 032206 312100032254 777777777777 000000000007     000000000007 000000032206 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032207 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032207 *      032210 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032210  JUMPA	0,032211

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032210 032210 032210 324000032211 777777777777 172737405060     172737405060 000000032206 0            0   0   777 
IT1	*      *      032211 *            324000032211 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032211     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032211 *            000000032211 000000000007     *            000000032211 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032211 
----------

*032211  MOVE 	1,032261

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032211 032211 032211 200040032261 777777777777 000000000007     000000000007 000000032211 0            0   0   777 
IT1	*      *      032261 *            200040032261 *                000000000230 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032261     *            *            0            0   0   *   
FT6	032212 032212 032212 200100032254 777777777777 007603607062     *            *            0            0   0   *   
ET2	*      *      *      *            000000000230 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                007603607062 *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000230 C(E) =007603 607062 
FINAL
C(AC)=007603 607062 
----------

*032212  MOVE 	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032212 032212 032212 200100032254 777777777777 007603607062     007603607062 000000032211 0            0   0   777 
IT1	*      *      032254 *            200100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	032213 032213 032213 242040777745 777777777777 172737405060     *            *            0            0   0   *   
ET2	*      *      *      *            172737405060 *                *            *            0            0   0   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
FINAL
C(AC)=172737 405060 
----------                                                                                                                 SEQ 0249

*032213  LSH	1,777745

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032213 032213 032213 242040777745 777777777777 172737405060     172737405060 000000032211 0            0   0   777 
IT1	*      *      777745 *            242040777745 *                007603607062 *            0            0   0   *   
ET0	*      *      032214 *            007603607062 000000777745     *            *            0            0   0   *   
ET1	032214 032214 *      312040032252 777777777777 007603607062     *            000000777745 0            745 0   165 
ET2	*      *      *      *            *            *                *            *            0            *   0   055 
SRT1	*      *      *      *            *            *                *            *            0            *   0   745 
SCT1	*      *      *      *            007603607062 *                *            *            0            *   0   777 
SCT2	*      *      *      *            003701703431 003701703431     *            *            0            763 0   *   
SCT2	*      *      *      *            000760360706 000760360706     *            *            0            764 0   *   
SCT2	*      *      *      *            000174074161 000174074161     *            *            0            765 0   *   
SCT2	*      *      *      *            000037017034 000037017034     *            *            0            766 0   *   
SCT2	*      *      *      *            000007603607 000007603607     *            *            0            767 0   *   
SCT2	*      *      *      *            000001740741 000001740741     *            *            0            770 0   *   
SCT2	*      *      *      *            000000370170 000000370170     *            *            0            771 0   *   
SCT2	*      *      *      *            000000076036 000000076036     *            *            0            772 0   *   
SCT2	*      *      *      *            000000017407 000000017407     *            *            0            773 0   *   
SCT2	*      *      *      *            000000003701 000000003701     *            *            0            774 0   *   
SCT2	*      *      *      *            000000000760 000000000760     *            *            0            775 0   *   
SCT2	*      *      *      *            000000000174 000000000174     *            *            0            776 0   *   
SCT2	*      *      *      *            000000000037 000000000037     *            *            0            777 0   *   
ST1	*      *      *      *            777777777777 000000000007     000000000007 *            0            000 0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=007603 607062 E    =000000 777745 
FINAL
C(AC)=000000 000007 
----------

*032214  CAME	1,032252

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032214 032214 032214 312040032252 777777777777 000000000007     000000000007 000000777745 0            0   0   777 
IT1	*      *      032252 *            312040032252 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000032252     *            *            0            0   0   *   
FT6	*      032252 *      000000000007 777777777777 000000000007     *            *            0            0   0   *   
ET0	*      *      032215 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032215 *      032216 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000007 
----------

*032216  JUMPA	0,032217

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032216 032216 032216 324000032217 777777777777 000000000007     000000000007 000000777745 0            0   0   777 
IT1	*      *      032217 *            324000032217 *                *            *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032217     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032217 *            000000032217 000000000007     *            000000032217 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0250
C(AC)=000000 000007 E    =000000 032217 
----------

*032217  CAME	2,032254

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032217 032217 032217 312100032254 777777777777 000000000007     000000000007 000000032217 0            0   0   777 
IT1	*      *      032254 *            312100032254 *                172737405060 *            0            0   0   *   
MEMST	*      *      *      *            *            000000032254     *            *            0            0   0   *   
FT6	*      032254 *      172737405060 777777777777 172737405060     *            *            0            0   0   *   
ET0	*      *      032220 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	032220 *      032221 *            777777777777 *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=172737 405060 C(E) =172737 405060 
----------

*032221  JUMPA	0,032222

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032221 032221 032221 324000032222 777777777777 172737405060     172737405060 000000032217 0            0   0   777 
IT1	*      *      032222 *            324000032222 *                000000000007 *            0            0   0   *   
ET0	*      *      000007 *            000000000007 000000032222     *            *            0            0   0   *   
ET2	*      *      *      *            *            *                *            *            0            0   0   *   
ST1	*      *      032222 *            000000032222 000000000007     *            000000032222 0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 E    =000000 032222 
----------

*032222  JRST	0,030057

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032222 032222 032222 254000030057 777777777777 000000000007     000000000007 000000032222 0            0   0   777 
IT1	*      *      030057 *            254000030057 *                *            *            0            0   0   *   
ET2	030057 030057 *      254000030641 777777777777 254000030057     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 030057 
----------

*030057  JRST	0,030641

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030057 030057 030057 254000030641 254000030057 000000032223     000000000007 254000030057 0            0   0   777 
IT1	*      *      030641 *            254000030641 *                *            *            0            0   0   *   
ET2	030641 030641 *      350000030047 777777777777 254000030641     *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
E    =000000 030641 
----------

*030641  AOS 	0,030047
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0251
IT0	030641 030641 030641 350000030047 254000030641 000000030060     000000000007 254000030641 0            0   0   777 
IT1	*      *      030047 *            350000030047 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030047     *            *            0            0   0   *   
FT6	*      030047 *      000000000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      030642 0            000000000001 0                *            *            0            0   0   *   
ET2	*      *      *      0            *            0                *            *            0            0   0   *   
ST1	*      *      *      0            777777777777 000000000001     *            *            0            0   0   *   
ST2	*      *      *      000000000001 *            *                *            *            0            0   0   *   
ST5	030642 030642 *      370000030024 *            *                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000000 
FINAL
C(AC)=000000 000007 C(E) =000000 000001 
----------

*030642  SOS 	0,030024

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030642 030642 030642 370000030024 777777777777 000000000001     000000000007 254000030641 0            0   0   777 
IT1	*      *      030024 *            370000030024 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030024     *            *            0            0   0   *   
FT6	*      030024 *      000000000001 777777777777 000000000001     *            *            0            0   0   *   
ET0	*      *      030643 *            000000000000 *                *            *            0            0   0   *   
ET2	*      *      *      *            0            *                *            *            0            0   0   *   
ST1	030642 *      *      *            777777777777 000000000000     *            *            0            0   0   *   
ST2	*      *      *      000000000000 *            0                *            *            0            0   0   *   
ST5	030643 030643 *      336000030037 *            0                *            *            0            0   0   *   

FLAGS - INT/FINAL   000000 300000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000001 
FINAL
C(AC)=000000 000007 C(E) =000000 000000 
----------

*030643  SKIPN	0,030037

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030643 030643 030643 336000030037 777777777777 0                000000000007 254000030641 0            0   0   777 
IT1	*      *      030037 *            336000030037 0                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030037     *            *            0            0   0   *   
FT6	*      030037 *      000000000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      030644 0            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      0            0            0                *            *            0            0   0   *   
ST1	*      *      *      0            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   300000 300000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000000 
FINAL
C(AC)=000000 000007 
----------

*030644  JRST	0,030652

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030644 030644 030644 254000030652 777777777777 0                000000000007 254000030641 0            0   0   777 
IT1	*      *      030652 *            254000030652 0                *            *            0            0   0   *   SEQ 0252
ET2	030652 030652 *      332000030041 777777777777 254000030652     *            *            0            0   0   *   

FLAGS - INT/FINAL   300000 300000 
INITIAL
E    =000000 030652 
----------

*030652  SKIPE	0,030041

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030652 030652 030652 332000030041 254000030652 000000030645     000000000007 254000030652 0            0   0   777 
IT1	*      *      030041 *            332000030041 *                *            *            0            0   0   *   
MEMST	*      *      *      *            *            000000030041     *            *            0            0   0   *   
FT6	*      030041 *      000000000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      030653 0            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      0            0            0                *            *            0            0   0   *   
ST1	030653 *      030654 0            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   300000 300000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000000 
FINAL
C(AC)=000000 000007 
----------

*030654  DATAO	4,030024

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030654 030654 030654 700540030024 777777777777 0                000000000007 254000030652 0            0   0   777 
IT1	*      *      030024 *            700540030024 0                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000030024     0            *            0            0   0   *   
FT6	*      030024 *      000000000000 777777777777 000000000000     0            *            0            0   0   *   
ET1	*      *      030655 0            *            0                0            *            0            0   0   *   
DATAO	*      *      *      0            *            0                0            *            0            0   0   *   
ET2	030655 030655 *      332000030024 *            777777777777     0            *            0            0   0   *   

FLAGS - INT/FINAL   300000 300000 
INITIAL
C(E) =000000 000000 
----------

*030655  SKIPE	0,030024

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030655 030655 030655 332000030024 777777777777 777777777777     0            254000030652 0            0   0   777 
IT1	*      *      030024 *            332000030024 *                000000000007 *            0            0   0   *   
MEMST	*      *      *      *            *            000000030024     *            *            0            0   0   *   
FT6	*      030024 *      000000000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      030656 0            000000000000 0                *            *            0            0   0   *   
ET2	*      *      *      0            0            0                *            *            0            0   0   *   
ST1	030656 *      030657 0            777777777777 0                *            *            0            0   0   *   

FLAGS - INT/FINAL   300000 300000 
INITIAL
C(AC)=000000 000007 C(E) =000000 000000 
FINAL
C(AC)=000000 000007 
----------
*030657  JRST	0,@030012                                                                                                  SEQ 0253

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030657 030657 030657 254020030012 777777777777 0                000000000007 254000030652 0            0   0   777 
IT1	*      *      030012 *            254020030012 0                *            *            0            0   0   *   
MEMST	*      030012 *      000000431057 *            254020030012     *            *            0            0   0   *   
IT0	*      *      *      *            777777777777 *                *            *            0            0   0   *   
IT1	*      *      431057 *            000000431057 *                *            *            0            0   0   *   
ET2	*      *      *      *            777777777777 000000431057     *            *            0            0   0   *   

FLAGS - INT/FINAL   300000 300000 
INITIAL
E    =000000 431057 
----------