Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/dakad.seq
There are no other files named dakad.seq in the archive.
MAINDEC-10-DAKAD.TXT
SEQ 0001
IDENTIFICATION
--------------
PRODUCT CODE: MAINDEC-10-DAKAD-B-D
PRODUCT NAME: DECSYSTEM10 PDP-10 KA10 BASIC
INSTRUCTION DIAGNOSTIC (4)
FUNCTION: REGISTER ADDRESSING, PC CHANGE, XCT
VERSION: 0.2
DATE RELEASED: JANUARY 1977
MAINTAINED BY: DIAGNOSTIC ENGINEERING GROUP
AUTHOR: JOHN R. KIRCHOFF
COPYRIGHT(C) 1976,1977
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-DAKAD.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-DAKAD.TXT
PAGE 3 SEQ 0003
1.0 ABSTRACT
THIS PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC IS THE
FOURTH IN A SERIES OF PDP-10 KA10 PROCESSOR DIAGNOSTICS.
THE DIAGNOSTIC TESTS REGISTER ADDRESSING, JFCL, AR FLAGS,
AOS, SOS, JRST, AOBJX, JSP, XCT, INDIRECT AND
INDEXED ADDRESSING.
2.0 REQUIREMENTS
2.1 EQUIPMENT
A PDP-10 KA10 WITH A MINIMUM OF 32K OF MEMORY
PAPER-TAPE READER
DECTAPE (OPTIONAL)
CONSOLE TELETYPE
2.2 STORAGE
THE PROGRAM RUNS WITHIN 32K OF MEMORY.
2.3 PRELIMINARY PROGRAMS
CONSOLE FUNCTIONS WORKING PROPERLY
PAPER-TAPE OR DECTAPE READ-IN WORKING PROPERLY
PREVIOUS PROCESSOR DIAGNOSTICS
MAINDEC-10-DAKAD.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-DAKAD.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-DAKAD
SEQ 0006
************************************************************************
PRODUCT CODE: MAINDEC-10-DAKAD
PRODUCT NAME: BASIC INSTRUCTION DIAGNOSTIC #4
DATE RELEASED: JANUARY 1977
VERSION: 0.2
UPDATE AUTHOR: JOHN R. KIRCHOFF
CHANGES MADE:
1. UPGRADE TO ALLOW COMPATABILITY WITH THE SUBROUTINE PACKAGE.
************************************************************************
ORIGINAL VERSION: 0.1
ORIGINAL AUTHOR: RICHARD MALISKA
ORIGINAL RELEASE: 16-MAR-72
************************************************************************
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 1
DAKADT MAC 19-JAN-77 13:37 DIAGNOSTIC PARAMETERS SEQ 0007
1 ;DAKAD
2
3
4
5 000002 DECVER==2
6 000000 MCNVER==0
7
8 XLIST
9 LIST
10 LALL
11 NAME \MCNVER,\DECVER^
12
13 TITLE DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2
14 ^
15
16 ;TEST DESIGNED FOR INITIAL DEBUGGING OF PROCESSOR HARDWARE
17 ;AND TO DETECT (SOLID) FAILURES IN THE FIELD.
18
19 ;COPYRIGHT 1972,1977
20 ;DIGITAL EQUIPMENT CORPORATION
21 ;MARLBORO, MASS. 01752
22
23 ;JOHN R. KIRCHOFF
24 ;DICK MALISKA
25
26 000137 LOC 137
27 000137 000000 000002 MCNVER,,DECVER
28
29 NOSYM
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 2
DAKADT MAC 19-JAN-77 13:37 DIAGNOSTIC PARAMETERS SEQ 0008
30 SUBTTL DIAGNOSTIC PARAMETERS
31
32 ;PARAMETER DEFINITIONS
33 000001 EXCASB==1
34 000001 USRASB==1
35 000001 PGMEND==1
36 000100 DEBUG==100
37
38 ;FLAG DEFINITIONS
39 010000 USERF=10000 ;USER MODE FLAG
40
41
42 ;MACROS
43
44 ;SPECIAL FEATURE PARAMETERS
45
46 030712 SADR1=START
47 030712 SADR2=START
48 030712 SADR3=START
49 030712 SADR4=START
50 254000 030712 SADR5=JRST START
51 254000 030712 SADR6=JRST START
52 254000 030712 SADR7=JRST START
53 254000 030712 SADR8=JRST START
54 254000 030712 SADR9=JRST START
55 254000 030712 SADR10=JRST START
56 254000 030712 SADR11=JRST START
57
58 000000 PAREA0=0
59 000000 PAREA1=0
60 000000 PAREA2=0
61 444253 414400 PAREA3=SIXBIT/DBKAD/
62 645560 000000 PAREA4=SIXBIT/TMP/
63 000000 PAREA5=0
64 000000 PAREA6=0
65 001000 ITERAT==1000
66 000001 PGMEND=1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 1
PARAM KLM 18-JAN-77 11:38 *PARAM* CONSOLE DATA SWITCH ASSIGNMENTS, JAN 18,1977 SEQ 0009
67 SUBTTL *PARAM* CONSOLE DATA SWITCH ASSIGNMENTS, JAN 18,1977
68
69 DEFINE S,<;*********************************************************************>
70
71 S^;*********************************************************************^
72 ;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
73 ;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
74 ;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
75 S^;*********************************************************************^
76
77 400000 ABORT== 400000 ;ABORT PROGRAM ON PASS COMPLETION
78 200000 RSTART==200000 ;RESTART TEST, PRINT TOTALS
79 100000 TOTALS==100000 ;PRINT TOTALS, CONTINUE
80
81 040000 NOPNT== 040000 ;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
82 020000 PNTLPT==020000 ;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
83 010000 DING== 010000 ;RING BELL ON ERROR
84
85 004000 LOOPER==004000 ;ENTER EXERCISE/CHECK LOOP ON ERROR
86 002000 ERSTOP==002000 ;HALT ON TEST ERROR
87 001000 PALERS==001000 ;PRINT ALL ERRORS
88
89 000400 RELIAB==000400 ;RELIABILITY MODE
90 000200 TXTINH==000200 ;INHIBIT ERROR TEXT
91 000100 INHPAG==000100 ;INHIBIT PAGING
92
93 000040 MODDVC==000040 ;MODIFY DEVICE CODE
94 000020 INHCSH==000020 ;INHIBIT CACHE
95 000010 OPRSEL==000010 ;OPERATOR SELECTION
96
97 000004 CHAIN== 000004 ;CHAIN CONTROL SWITCH
98
99 000002 KAHZ50==000002 ;KA10 50 HERTZ POWER
100
101 ;SWITCH 17 RESERVED !!!
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 2
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0010
102 SUBTTL *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977
103
104 S^;*********************************************************************^
105 ;*SPECIAL SUBPROGRAM LINKAGES
106 S^;*********************************************************************^
107
108 027772 FSELNK= 27772 ;FILE SELECT LINK
109 027773 FRDLNK= 27773 ;FILE READ LINK
110 027774 LDLNK= 27774 ;LOAD LINKAGE ADDRESS
111 027775 DDTLNK= 27775 ;DDT LINKAGE ADDRESS
112 027776 MODLNK= 27776 ;OPERATIONAL MODE CHECK LINKAGE ADDRESS
113 027777 SUBLNK= 27777 ;SUBROUTINE LINKAGE ADDRESS
114
115 S^;*********************************************************************^
116 ;*SPECIAL SUBROUTINE FATAL HALTS
117 ;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
118 S^;*********************************************************************^
119
120 ;ADDRESS TAG REASON
121 ;---------------------
122
123 ; 1010 NOEXEC ;PROGRAM NOT CODED FOR EXEC MODE OPERATION
124 ; 1011 PLERR ;FATAL PUSH LIST POINTER ERROR
125 ; 1012 PLERR1 ;INITIAL PUSH LIST POINTER ERROR
126 ; 1013 MUOERR ;MUUO WITH LUUO HANDLER WIPED OUT
127 ; 1014 DTEBER ;DTE20 INTERRUPT WITHOUT DOORBELL
128 ; 1015 DTECER ;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
129 ; 1016 CPIERR ;CPU INITIALIZATION ERROR
130 ; 1017 EOPERR ;END OF PROGRAM ERROR
131 ; 1020 LUOERR ;INTERRUPT WITH LUUO HANDLER WIPED OUT
132
133 S^;*********************************************************************^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 3
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0011
134 S^;*********************************************************************^
135 ;OPERATOR DEFINITIONS (NON-UUO'S)
136 S^;*********************************************************************^
137
138 260740 000000 OPDEF GO [PUSHJ P,] ;SUBROUTINE CALL
139 263740 000000 OPDEF RTN [POPJ P,] ;SUBROUTINE RETURN
140 261740 000000 OPDEF PUT [PUSH P,] ;PUT DATA ON PUSH LIST
141 262740 000000 OPDEF GET [POP P,] ;GET DATA FROM PUSH LIST
142 254000 000000 OPDEF PJRST [JRST ] ;JRST TO ROUTINE THAT RTN'S
143 254200 000000 OPDEF HALT [JRST 4,] ;DEFINITION FOR DDT
144 254100 000000 OPDEF JRSTF [JRST 2,] ;DEFINITION FOR DDT
145 254500 000000 OPDEF JEN [JRST 12,] ;DEFINITION FOR DDT
146
147 S^;*********************************************************************^
148 ;*SUBROUTINE INITIALIZATION CALL
149 S^;*********************************************************************^
150
151 265000 030011 OPDEF PGMINT [JSP 0,SBINIT] ;SUBROUTINE INITIALIZATION
152
153 S^;*********************************************************************^
154 ;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
155 S^;*********************************************************************^
156
157 037640 000004 OPDEF FATAL [37B8!15B12!4] ;FATAL PROGRAMMING HALT
158 037600 000004 OPDEF ERRHLT [37B8!14B12!4] ;PROGRAM ERROR HALT
159
160 S^;*********************************************************************^
161 ;*TERMINAL INPUT UUO'S
162 ;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
163 ;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
164 S^;*********************************************************************^
165
166 037000 000003 OPDEF TTICHR [37B8!0B12!3] ;TTY, INPUT ANY CHARACTER
167 037040 000003 OPDEF TTIYES [37B8!1B12!3] ;TTY, NORMAL RETURN Y
168 037100 000003 OPDEF TTINO [37B8!2B12!3] ;TTY, NORMAL RETURN N
169 037140 000003 OPDEF TTIOCT [37B8!3B12!3] ;TTY, INPUT OCTAL WORD
170 037200 000003 OPDEF TTIDEC [37B8!4B12!3] ;TTY, INPUT DECIMAL WORD
171 037240 000003 OPDEF TTICNV [37B8!5B12!3] ;TTY, INPUT CONVERTABLE WORD
172 037300 000003 OPDEF TTLOOK [37B8!6B12!3] ;TTY, KEYBOARD CHECK
173 037340 000003 OPDEF TTALTM [37B8!7B12!3] ;TTY, ALT-MODE CHECK
174 037400 000003 OPDEF TTSIXB [37B8!10B12!3] ;TTY, INPUT SIXBIT WORD
175 037440 000003 OPDEF TTYINP [37B8!11B12!3] ;TTY, IMAGE MODE INPUT
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 4
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0012
176 ;*TERMINAL OUTPUT UUO'S.
177
178 037000 000000 OPDEF PNTA [37B8!0B12!0] ;PRINT ASCII WORD
179 037000 000001 OPDEF PNTAF [37B8!0B12!1] ;PRINT ASCII WORD FORCED
180 037740 000000 OPDEF PNTAL [37B8!17B12!0] ;PRINT ASCIZ LINE
181 037740 000001 OPDEF PNTALF [37B8!17B12!1] ;PRINT ASCIZ LINE FORCED
182 037600 000003 OPDEF PSIXL [37B8!14B12!3] ;PRINT SIXBIT'Z LINE
183 037640 000003 OPDEF PSIXLF [37B8!15B12!3] ;PRINT SIXBIT'Z LINE FORCED
184 037000 000000 OPDEF PNTMSG [37B8!0B12!0] ;PRINT MESSAGE IMMEDIATE
185 037040 000000 OPDEF PNTMSF [37B8!1B12!0] ;PRINT MESSAGE IMMEDIATE FORCED
186 037100 000000 OPDEF PSIXM [37B8!2B12!0] ;PRINT SIXBIT'Z MSG IMMEDIATE
187 037200 000000 OPDEF PSIXMF [37B8!4B12!0] ;PRINT SIXBIT'Z MSG IMM FORCED
188 037000 000000 OPDEF PNTCI [37B8!0B12!0] ;PRINT CHARACTER IMMEDIATE
189 037040 000000 OPDEF PNTCIF [37B8!1B12!0] ;PRINT CHARACTER IMMEDIATE FORCED
190 037500 000000 OPDEF PNTCHR [37B8!12B12!0] ;PRINT CHARACTER
191 037500 000001 OPDEF PNTCHF [37B8!12B12!1] ;PRINT CHARACTER FORCED
192 037040 000000 OPDEF PNT1 [37B8!1B12!0] ;PRINT ONE OCTAL DIGIT
193 037040 000001 OPDEF PNT1F [37B8!1B12!1] ;PRINT 1 OCTAL DIGIT FORCED
194 037100 000000 OPDEF PNT2 [37B8!2B12!0] ;PRINT TWO OCTAL DIGITS
195 037100 000001 OPDEF PNT2F [37B8!2B12!1] ;PRINT 2 OCTAL DIGITS FORCED
196 037140 000000 OPDEF PNT3 [37B8!3B12!0] ;PRINT THREE OCTAL DIGITS
197 037140 000001 OPDEF PNT3F [37B8!3B12!1] ;PRINT THREE OCTAL DIGITS FORCED
198 037200 000000 OPDEF PNT4 [37B8!4B12!0] ;PRINT FOUR OCTAL DIGITS
199 037200 000001 OPDEF PNT4F [37B8!4B12!1] ;PRINT FOUR OCTAL DIGITS FORCED
200 037240 000000 OPDEF PNT5 [37B8!5B12!0] ;PRINT FIVE OCTAL DIGITS
201 037240 000001 OPDEF PNT5F [37B8!5B12!1] ;PRINT FIVE OCTAL DIGITS FORCED
202 037300 000000 OPDEF PNT6 [37B8!6B12!0] ;PRINT SIX OCTAL DIGITS
203 037300 000001 OPDEF PNT6F [37B8!6B12!1] ;PRINT SIX OCTAL DIGITS FORCED
204 037340 000000 OPDEF PNT7 [37B8!7B12!0] ;PRINT 7 OCTAL DIGITS
205 037340 000001 OPDEF PNT7F [37B8!7B12!1] ;PRINT 7 OCTAL DIGITS FORCED
206 037440 000000 OPDEF PNT11 [37B8!11B12!0] ;PRINT 11 OCTAL DIGITS
207 037440 000001 OPDEF PNT11F [37B8!11B12!1] ;PRINT 11 OCTAL DIGITS FORCED.
208 037400 000000 OPDEF PNTADR [37B8!10B12!0] ;PRINT PHYSICAL ADDRESS
209 037400 000001 OPDEF PNTADF [37B8!10B12!1] ;PRINT PHYSICAL ADDRESS FORCED
210 037600 000000 OPDEF PNTOCT [37B8!14B12!0] ;PRINT FULL WORD OCTAL
211 037600 000001 OPDEF PNTOTF [37B8!14B12!1] ;PRINT FULL WORD OCTAL FORCED
212 037540 000000 OPDEF PNTHW [37B8!13B12!0] ;PRINT OCTAL HALF WORDS, 6 SP 6
213 037540 000001 OPDEF PNTHWF [37B8!13B12!1] ;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
214 037700 000003 OPDEF PNTOCS [37B8!16B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S
215 037740 000003 OPDEF PNTOCF [37B8!17B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
216 037640 000000 OPDEF PNTDEC [37B8!15B12!0] ;PRINT DECIMAL, SUPRESS LEADING 0'S
217 037640 000001 OPDEF PNTDCF [37B8!15B12!1] ;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
218 037700 000000 OPDEF PNTDS [37B8!16B12!0] ;PRINT DECIMAL, SPACES FOR LD 0'S
219 037700 000001 OPDEF PNTDSF [37B8!16B12!1] ;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
220 037200 000002 OPDEF PNTNM [37B8!4B12!2] ;PRINT PROGRAM NAME
221 037000 000002 OPDEF PNTSIX [37B8!0B12!2] ;PRINT SIXBIT WORD
222 037040 000002 OPDEF PNTSXF [37B8!1B12!2] ;PRINT SIXBIT WORD FORCED
223 037240 000002 OPDEF DROPDV [37B8!5B12!2] ;CLOSE LOGICAL FILE, USER MODE
224 037100 000002 OPDEF PNTCW [37B8!2B12!2] ;PRINT DF10 CONTROL WORD
225 037140 000002 OPDEF PNTCWF [37B8!3B12!2] ;PRINT DF10 CONTROL WORD FORCED
226 037000 030242 OPDEF PCRL [37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
227 037040 030242 OPDEF PCRLF [37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
228 037000 000040 OPDEF PSP [37B8!0B12!40] ;PRINT SPACE
229 037040 000040 OPDEF PSPF [37B8!1B12!40] ;PRINT SPACE FORCED
230 037000 030243 OPDEF PCRL2 [37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 4-1
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0013
231 037040 030243 OPDEF PCRL2F [37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
232 037040 000007 OPDEF PBELL [37B8!1B12!7] ;PRINT TTY BELL
233
234 037040 000026 OPDEF PFORCE [37B8!1B12!26] ;PRINT FORCE, CONTROL O OVERRIDE
235
236 DEFINE PMSG (ARG),<
237 PSIXM [SIXBIT\ARG'_\]>
238
239 DEFINE PMSGF (ARG),<
240 PSIXMF [SIXBIT\ARG'_\]>
241
242 ;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
243 ;* CONSERVES CORE OVER ASCIZ
244
245 DEFINE SIXBTZ (ARG),< [SIXBIT\ARG'_\]>
246
247 ;*CONSOLE SWITCH INPUT UUO.
248 ;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
249 ;* USER MODE.
250
251 037400 000002 OPDEF SWITCH [37B8!10B12!2] ;INPUT CONSOLE SWITCHES
252
253 ;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
254 ;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
255
256 037540 000004 OPDEF CLOKOP [37B8!13B12!4] ;CLOCK OPERATION UUO - PDP-11 CLOCK
257 037200 000004 OPDEF MTROP [37B8!4B12!4] ;CLOCK OPERATION UUO - DK20 METER
258
259 ;*KL10 ONLY CACHE OPERATION UUO'S
260
261 037040 000004 OPDEF CINVAL [37B8!1B12!4] ;CACHE INVALIDATE
262 037100 000004 OPDEF CFLUSH [37B8!2B12!4] ;CACHE FLUSH
263 037140 000004 OPDEF CWRTBI [37B8!3B12!4] ;CACHE WRITE-BACK & INVALIDATE
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0014
264 ;*END OF PASS/PROGRAM UUOS
265
266 ;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
267 ;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
268
269 037500 000004 OPDEF ENDUUO [37B8!12B12!4] ;UUO TO DISPLAY LIGHTS
270 037700 000004 OPDEF EOPUUO [37B8!16B12!4] ;END OF PROGRAM UUO
271
272 ;*MEMORY MANAGEMENT UUO'S
273 ;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
274 ;*ADDRESS CONVERSION, ETC...
275
276 037000 000004 OPDEF MAPMEM [37B8!0B12!4] ;MAP MEMORY
277 037500 000002 OPDEF MEMZRO [37B8!12B12!2] ;ZERO MEMORY
278 037440 000002 OPDEF MEMSEG [37B8!11B12!2] ;SETUP MEMORY SEGMENT
279 037540 000002 OPDEF MAPADR [37B8!13B12!2] ;VIRTUAL TO PHYSICAL ADR CONVERT
280 037640 000002 OPDEF MAPCNK [37B8!15B12!2] ;MAP MEMORY CHUNK
281 037600 000002 OPDEF MAPSET [37B8!14B12!2] ;SET KI10 EXEC PAGE MAP
282 037740 000002 OPDEF MAPPNT [37B8!17B12!2] ;PRINT MEMORY MAP
283
284 ;*DEVICE CODE MODIFICATION UUO
285 ;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
286 ;*IOT'S TO A DIFFERENT DEVICE CODE.
287
288 037340 000002 OPDEF MODPCU [37B8!7B12!2] ;MODIFY PERHIPERAL CODE, USER
289 037300 000002 OPDEF MODPCP [37B8!6B12!2] ;MODIFY PERHIPERAL CODE, PROGRAM
290
291 030000 IFNDEF MODDVL,<MODDVL==BEGIN>
292 030000 IFNDEF MODDVU,<MODDVU==BEGIN>
293
294 ;*"DIAMON" FILE SELECTION AND READ UUOS
295
296 037240 000004 OPDEF FSELECT [37B8!5B12!4] ;FILE SELECTION
297 037300 000004 OPDEF FREAD [37B8!6B12!4] ;FILE READ - ASCII DATA
298 037340 000004 OPDEF FRD36 [37B8!7B12!4] ;FILE READ - 36 BIT DATA
299 037400 000004 OPDEF FRD8 [37B8!10B12!4] ;FILE READ - 8 BIT DATA
300
301 ;*KI10 ONLY UUO FOR PRINTING MARGIN VALUES
302
303 037700 000002 OPDEF PNTMGN [37B8!16B12!2] ;PRINT MARGIN VALUE
304
305 XLIST
306 IFNDEF KLOLD,<LIST
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6
PARAM KLM 18-JAN-77 11:38 ERROR HANDLING UUO DEFINITIONS, JAN 18,1977 SEQ 0015
307 SUBTTL ERROR HANDLING UUO DEFINITIONS, JAN 18,1977
308
309 S^;*********************************************************************^
310 ;*ERROR HANDLER PARAMETERS
311 S^;*********************************************************************^
312
313 036000 000000 OPDEF ERUUO [36B8] ;ERROR CALL UUO
314 035000 000000 OPDEF ERLOOP [35B8] ;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
315 035040 000000 OPDEF ERLP1 [35B8!1B12] ;ERROR LOOP IF PC'S MATCH
316 035100 000000 OPDEF ERLP2 [35B8!2B12] ;ERROR LOOP IF ANY ERROR
317 034000 000000 OPDEF REPTUO [34B8] ;REPEAT LOOP UUO
318
319 ;*THE ERROR HANDLER MACROS
320
321 ;*A MACRO TO REPORT AN ERROR AND LOOP
322
323 DEFINE ERROR (ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
324 SALL
325 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
326 CORECT,,ACTUAL
327 [SIXBIT\D'_\],,ERR]
328 XALL
329
330 ERLOOP ADR ;IF ERROR, LOOP TO ADR
331 >
332
333 ;*A MACRO TO REPORT AN ERROR AND NOT LOOP
334
335 DEFINE ERROR1 (FORMAT,CORECT,ACTUAL,F,D,ERR)<
336 SALL
337 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
338 CORECT,,ACTUAL
339 [SIXBIT\D'_\],,ERR]
340 XALL >
341
342 >;END OF KLOLD CONDITIONAL
343
344 XLIST
345 LIST
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 1
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0016
346 SUBTTL *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977
347
348 030000 LOC 30000
349
350 S^;*********************************************************************^
351 ;*PROGRAM STARTING ADDRESSES
352 ;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
353 ;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
354 ;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
355 ;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
356 S^;*********************************************************************^
357
358 030000 254 00 1 00 027776 BEGIN: JRST @MODLNK ;STAND-ALONE START
359 030001 254 00 0 00 030712 $START: JRST START ;MODE CHECK STARTING ADDRESS
360
361 030002 254 00 1 00 027774 DIAGMN: JRST @LDLNK ;DIAGNOSTIC MONITOR START
362
363 030003 254 00 1 00 027774 SYSEXR: JRST @LDLNK ;SYSTEM EXERCISER START
364
365 030004 254 00 0 00 030712 SFSTRT: JRST SADR1 ;SPECIAL FEATURE START
366
367 030005 254 00 0 00 030712 PFSTRT: JRST SADR2 ;POWER FAIL RESTART
368
369 030006 254 00 0 00 030712 REENTR: JRST SADR3 ;REENTER START(USUALLY USER MODE ONLY)
370
371 030007 SRTDDT: ;COMMONLY MISTAKEN NAME FOR "DDTSRT"
372 030007 254 00 1 00 027775 DDTSRT: JRST @DDTLNK ;DDT START
373
374 030010 254 00 0 00 030741 BEGIN1: JRST STARTA ;LOOP START(END OF PASS COMES HERE)
375 030011 254 00 1 00 027777 SBINIT: JRST @SUBLNK ;PMGINT LINKAGE
376 030012 000000 000000 RETURN: 0 ;RETURN ADDRESS STORAGE
377
378 030013 254000 030712 START1: SADR7 ;OPTIONAL STARTING ADR/INSTRUCTIONS
379 030014 254000 030712 START2: SADR8 ; "
380 030015 254000 030712 START3: SADR9 ; "
381 030016 254000 030712 START4: SADR10 ; "
382 030017 254000 030712 START5: SADR11 ; "
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 2
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0017
383 S^;*********************************************************************^
384 ;*PROGRAM FIXED PARAMETER AREA
385 S^;*********************************************************************^
386
387 030020 444253 414400 PNTNAM: PAREA3 ;SIXBIT PROGRAM NAME
388 030021 645560 000000 PNTEXT: PAREA4 ;SIXBIT PROGRAM EXTENSION
389 030022 000000 000000 RANDBS: PAREA1 ;RANDOM BASE NUMBER
390 030023 000000 000000 SWTEXR: PAREA2 ;SYSTEM EXERCISER SWITCHES
391 030024 000000 001000 ITRCNT: ITERAT ;PROGRAM ITERATIONS
392 030025 000000 030725 $PNAME: PGMNAM ;POINTER TO PROGRAMS NAME
393 030026 000000 000002 $PVER: MCNVER,,DECVER ;MCN & DEC VERSION LEVEL
394 030027 000000 030000 $MODVL: MODDVL ;DEVICE CODE CHANGE LOWER LIMIT
395 030030 000000 030000 $MODVU: MODDVU ;DEVICE CODE CHANGE UPPER LIMIT
396 030031 777777 777777 $EMODE: IFNDEF EXCASB,<0> IFDEF EXCASB,<-1> ;EXEC ALLOWED
397 030032 777777 777777 $UMODE: IFNDEF USRASB,<0> IFDEF USRASB,<-1> ;USER ALLOWED
398 030033 000000 000000 $DSKUP: IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1> ;DISK UPDATE MODE
399 030034 000000 000000 $MMAP: IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1> ;ALLOW MEMORY RTNS
400 030035 000000 000000 PAREA7: PAREA5 ;OPTIONAL PARAMETER
401 030036 000000 000000 PAREA8: PAREA6 ;OPTIONAL PARAMETER
402
403 S^;*********************************************************************^
404 ;*PROGRAM VARIABLE PARAMETER AREA
405 S^;*********************************************************************^
406
407 030037 000000 000000 USER: 0 ; 0 = EXEC, -1 = USER MODE FLAG
408 030040 000000 000000 KAIFLG: 0 ;PROCESSOR TYPE, 0 = KA10, -1 = KI10
409 030041 000000 000000 KLFLG: 0 ;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
410 030042 777777 777777 MONFLG: -1 ;DIAG MONITOR SPECIAL USER FLAG
411 030043 000000 000000 MONCTL: 0 ;DIAG MON/SYS EXR FLAG
412 030044 000000 000000 MONTEN: 0 ;-1= LOADED BY 10
413 030045 000000 000000 CLOCKF: 0 ;CLOCK TICKED FLAG
414 030046 000000 000000 CONSW: 0 ;CONSOLE SWITCH SETTINGS
415 030047 000000 000000 PASCNT: 0 ;PROGRAM PASS COUNT
416 030050 000000 000000 RUNFLG: 0 ;PROGRAM RUN FLAG
417 030051 000000 000000 TESTPC: 0 ;SUBTEST PC
418 030052 000000 000000 ERRPC: 0 ;ERROR PC
419 030053 000000 000000 ERRTLS: 0 ;ERROR TOTALS
420 030054 000000 000000 TICKS: 0 ;PROGRAM RUNNING TIME
421 030055 000000 000000 MARGIN: 0 ;KI10 MARGIN WORD VALUE
422 030056 000000 000000 $ONETM: 0 ;SUBROUTINE INITIALIZATION FLAG
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 3
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0018
423 S^;*********************************************************************^
424 ;*SPECIAL PROGRAM DISPATCH ADDRESSES
425 S^;*********************************************************************^
426
427 030057 037 12 0 00 000004 BEGEND: ENDUUO ;END OF PASS
428 030060 254 00 0 00 030010 $BEND1: JRST BEGIN1 ;KEEP RUNNING PROGRAM
429 030061 037 16 0 00 000004 $BEND2: EOPUUO ;END OF PROGRAM - NO RETURN
430 030062 254000 030712 CNTLC: SADR5 ;CONTROL C XFER ADDRESS
431 030063 254000 030712 ALTMGO: SADR6 ;ALTMODE XFER ADDRESS
432 030064 CPOPJ1: ;SKIP RETURN
433 030064 350 00 0 17 000000 UUOSKP: AOS (P) ;SKIP RETURN FROM UUO
434 030065 CPOPJ: ;NON-SKIP REGULAR RETURN
435 030065 263 17 0 00 000000 UUOEXT: RTN ;UUO RETURN
436 030066 255 00 0 00 000000 UUORTN: JFCL ;ADDITIONAL USERS UUO ROUTINE
437 030067 255 00 0 00 000000 $UORTX: JFCL ;ADDITIONAL UUO LINKAGE
438 030070 255 00 0 00 000000 $UUOER: JFCL ;INITED AS (JRST $UOERX)
439 030071 255 00 0 00 000000 $ITRHL: JFCL ;ADDITIONAL INTERRUPT LINKAGE
440 030072 255 00 0 00 000000 $ITRX1: JFCL ; "
441 030073 255 00 0 00 000000 $USRHL: JFCL ; "
442 030074 255 00 0 00 000000 $RSRTX: JFCL ;ADDITIONAL POWER FAIL LINKAGE
443 030075 255 00 0 00 000000 $RSRTY: JFCL ; "
444 030076 255 00 0 00 000000 RESRT1: JFCL ; INITED AS (JRST RESRTX)
445 030077 255 00 0 00 000000 RESRT2: JFCL ; "
446 030100 255 00 0 00 000000 $PARER: JFCL ;ADDITIONAL PARITY ERROR LINKAGE
447 030101 255 00 0 00 000000 ERMORE: JFCL ;ADDITIONAL ERROR HANDLER LINKAGE
448 030102 254 04 0 00 030102 HALT . ;IMPROPER TRANSFER HALT
449
450 030103 000000 000000 $PSHER: 0 ;INITED AS (JRST PSHERR)
451 030104 000000 000000 ITRCH1: 0 ;PC & FLAGS OF CURRENT INTERRUPT
452 030105 000000 000000 0 ;INITED AS (JRST $ITRC1)
453
454 S^;*********************************************************************^
455 ;*PROCESSOR CONTROL STORAGE
456 S^;*********************************************************************^
457
458 030106 000000 000000 $ACC0: 0 ;INTERRUPT SAVED AC0
459 030107 000000 000000 $SVPI: 0 ;INTERRUPT SAVED PI
460 030110 000000 000000 $SVAPR: 0 ;INTERRUPT SAVED APR
461 030111 000000 000000 $SVPAG: 0 ;INTERRUPT SAVED PAG (DATAI)
462 030112 000000 000000 $SPAG1: 0 ;INTERRUPT SAVED PAG (CONI)
463
464 030113 000000 000000 $SVUUO: 0 ;CURRENT USERS UUO
465 030114 000000 000000 $SVUPC: 0 ;PC OF CURRENT USERS UUO
466
467 030115 000000 000000 REPTU: 0 ;REPEAT UUO ITERATIONS
468 030116 000000 000000 SCOPE: 0 ;ERROR HANDLER SCOPE LOOP FLAG
469 030117 000000 000000 %CORFLG:0 ; " CORRECT FLAG
470 030120 000000 000000 %COREC: 0 ; " CORRECT DATA
471 030121 000000 000000 %ACTFL: 0 ; " ACTUAL FLAG
472 030122 000000 000000 %ACTUL: 0 ; " ACTUAL DATA
473 030123 000000 000000 %DISCR: 0 ; " DISCREPENCY DATA
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 4
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0019
474 S^;*********************************************************************^
475 ;*UUO DISPATCH TABLE
476 S^;*********************************************************************^
477 XLIST
478 LIST
479 030124 030070 030070 UUODIS: LUUO1,,$UUOER
480 030125 030070 030070 LUUO3,,LUUO2
481 030126 030070 030070 LUUO5,,LUUO4
482 030127 030070 030070 LUUO7,,LUUO6
483 030130 030070 030070 LUUO11,,LUUO10
484 030131 030070 030070 LUUO13,,LUUO12
485 030132 030070 030070 LUUO15,,LUUO14
486 030133 030070 030070 LUUO17,,LUUO16
487 030134 030070 030070 LUUO21,,LUUO20
488 030135 030070 030070 LUUO23,,LUUO22
489 030136 030070 030070 LUUO25,,LUUO24
490 030137 030070 030070 LUUO27,,LUUO26
491 030140 030070 030070 LUUO31,,LUUO30
492 030141 030070 030070 LUUO33,,LUUO32
493
494 S^;*********************************************************************^
495 ;*MEMORY MANAGMENT STORAGE
496 S^;*********************************************************************^
497
498 030142 000000 000000 DF22F: 0 ;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
499 030143 000000 000000 MAPNEW: 0 ;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
500 030144 000000 000000 MEMTOT: 0 ;TOTAL MEMORY SIZE IN K (1024.)
501 030145 000000 000000 MEMLOW: 0 ;LOWEST USABLE MEMORY
502 030146 MEMSIZ: BLOCK ^D41 ;MEMORY SEGMENT POINTER TABLE
503
504 S^;*********************************************************************^
505 ;*PRINT CONTROL STORAGE
506 S^;*********************************************************************^
507
508 030217 000000 000000 PNTFLG: 0 ;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
509 030220 000000 000000 PNTENB: 0 ;PRINT ENABLE
510 030221 000000 000000 PDISF: 0 ;PRINT DISABLED FLAG
511 030222 000000 000000 PNTINH: 0 ;INHIBIT PRINT INPUT CHECKS
512 030223 000000 000000 PNTSPC: 0 ;PRINT SPACE CONTROL
513 030224 000000 000000 OPTIME: 0 ;TYPE-IN WAIT TIME
514 030225 000000 000000 $TWCNT: 0 ;TIME WAITED
515 030226 000000 000000 $DVOFF: 0 ;LOGICAL DEVICE INITED FLAG
516 030227 000000 000000 TTYFIL: 0 ;TTY EXEC FILLERS FLAG
517 030230 000000 000000 TTYSPD: 0 ;TTY EXEC BAUD RATE
518 030231 000000 000000 $TTCHR: 0 ;ACTUAL TYPED IN CHAR
519 030232 000000 000000 $CHRIN: 0 ;UPPER CASED & PARITY STRIPPED CHAR
520 030233 000000 000000 $TYPNB: 0 ;TYPED IN NUMBER
521 030234 000000 000000 $CRLF: 0 ;FREE CR/LF FLAG
522 030235 000000 000000 $TABF: 0 ;TAB CONVERSION FLAG
523 030236 000000 000000 $FFF: 0 ;FORM FEED CONVERSION FLAG
524 030237 000000 000000 $VTF: 0 ;VERTICAL TAB CONVERSION FLAG
525 030240 000000 000000 USRLFF: 0 ;USER LF FILLERS
526 030241 000000 000000 USRCRF: 0 ;USER CR FILLERS
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0020
527 S^;*********************************************************************^
528 ;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
529 ;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
530 ;* MOVEI NAME
531 ;* PNTA ;OR PNTAF
532 S^;*********************************************************************^
533
534 030242 CRLF: ASCII/
535 030242 015 012 000 000 000 /
536 030243 CRLF2: ASCII/
537
538 030243 015 012 015 012 000 /
539 030244 054 000 000 000 000 COMMA: ASCII/,/
540 030245 056 000 000 000 000 PERIOD: ASCII/./
541 030246 040 000 000 000 000 SPACE: ASCII/ /
542 030247 011 000 000 000 000 TAB: ASCII/ /
543 030250 MINUS:
544 030250 055 000 000 000 000 HYPEN: ASCII/-/
545 030251 053 000 000 000 000 PLUS: ASCII/+/
546 030252 052 000 000 000 000 AST: ASCII/*/
547 030253 100 000 000 000 000 ATSIN: ASCII/@/
548 030254 050 000 000 000 000 LFP: ASCII/(/
549 030255 051 000 000 000 000 RTP: ASCII/)/
550 030256 007 0000000000 BELL: BYTE (7) 007
551 030257 077 000 000 000 000 QUEST: ASCII/?/
552 030260 057 000 000 000 000 SLASH: ASCII!/!
553 030261 044 000 000 000 000 DOLLAR: ASCII/$/
554 030262 000000 000012 RADIX: ^D10 ;DECIMAL PRINT RADIX
555 030263 000000 000040 RADLSP: 40 ;DECIMAL PRINT LEADING CHAR
556 030264 000000 000012 RADLSC: ^D10 ;DECIMAL PRINT LEADING CHAR COUNT
557
558 S^;*********************************************************************^
559 ;*USER MODE OUTPUT FILE INFORMATION
560 S^;*********************************************************************^
561
562 030265 $OBUF: BLOCK 3 ;LOGICAL FILE OUTPUT BUFFER HEADER
563 030270 60 62 51 56 64 00 $OUTNM: SIXBIT /PRINT/ ;FILE NAME
564 030271 60 56 64 00 00 00 $OUTEX: SIXBIT /PNT/ ;FILE NAME EXTENSION
565 030272 BLOCK 2
566
567 S^;*********************************************************************^
568 ;*DISK UPDATE MODE FILE INFORMATION
569 S^;*********************************************************************^
570
571 030274 $IBUF: BLOCK 3
572 030277 60 62 51 56 64 00 $INNM: SIXBIT /PRINT/
573 030300 60 56 64 00 00 00 $INEXT: SIXBIT /PNT/
574 030301 BLOCK 2
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0021
575 S^;*********************************************************************^
576 ;*PUSHDOWN LIST CONTROL INFORMATION
577 S^;*********************************************************************^
578
579 030303 777577 030303 PLIST: PLIST-PLISTE,,PLIST
580 030304 PLISTS: BLOCK 200
581 030504 000000 000000 PLISTE: 0 ;END OF PUSHDOWN LIST
582
583 S^;*********************************************************************^
584 ;*POWER LINE CLOCK FREQUENCY FLAG
585 S^;*********************************************************************^
586
587 030505 000000 000000 CYCL60: 0 ;0 = 60, -1 = 50 CYCLE
588
589 S^;*********************************************************************^
590 ;*KL10 CACHE CONTROL FLAGS
591 S^;*********************************************************************^
592
593 030506 000000 000000 CSHFLG: 0 ;ALLOW CACHE IF 0
594 030507 000000 000000 CSHMEM: 0 ;CACHE MEMORY SEGMENTS IF 0
595
596 S^;*********************************************************************^
597 ;*NUMBER INPUT DIGIT FLAG
598 S^;*********************************************************************^
599
600 030510 000000 000000 TTNBRF: 0 ;-1 IF ANY DIGIT TYPED
601
602 S^;*********************************************************************^
603 ;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
604 S^;*********************************************************************^
605
606 030511 000000 000000 PVPAGI: 0 ;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
607
608 S^;*********************************************************************^
609 ;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
610 S^;*********************************************************************^
611
612 030512 000000 000000 %ERHI1: 0 ;IF NON-ZERO, XCT'D AT START OF %ERUUO
613 030513 000000 000000 %ERHI2: 0 ;IF NON-ZERO, XCT'D AT END OF %ERUUO
614 030514 000000 000000 %ERHI3: 0 ;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
615
616 S^;*********************************************************************^
617 ;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
618 S^;*********************************************************************^
619
620 030515 000000 000000 $$UUO: 0 ;IF NON-ZERO, XCT'D AT START OF $UORTN
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 7
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0022
621 S^;*********************************************************************^
622 ;*KL10 PROCESSOR TYPE FLAG, 0=P0, 1=BBD NEW, 2=BBD OLD
623 S^;*********************************************************************^
624
625 030516 000000 000000 KLTYP: 0
626
627 S^;*********************************************************************^
628 ;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
629 S^;*********************************************************************^
630
631 030517 000000 000000 $$MUUO: 0 ;IF NON-ZERO, XCT'D AT START OF MUUOER
632
633 S^;*********************************************************************^
634 ;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
635 S^;*********************************************************************^
636
637 030520 000000 000000 $$OUTER:0 ;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
638
639 S^;*********************************************************************^
640 ;*"SWITCH" CALL USAGE CONTROL
641 S^;*********************************************************************^
642
643 030521 000000 000000 $$TOGGLE:0 ;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
644
645 S^;*********************************************************************^
646 ;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
647 S^;*********************************************************************^
648
649 030522 000000 000000 $$TAX1: 0 ;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
650 030523 000000 000000 $$TAX2: 0 ;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
651
652 S^;*********************************************************************^
653 ;*SPECIAL FUTURE EXPANSION ROOM
654 ;*IF ANY FIXED AREA TAGS ARE ADDED, REDUCE THE SIZE OF
655 ;*THIS BLOCK STATEMENT ACCORDINGLY. THIS MUST BE DONE
656 ;*SO THAT PREVIOUS FIXED ASSIGNMENTS DO NOT CHANGE.
657 S^;*********************************************************************^
658
659 030524 BLOCK 53 ;HOPEFULLY THIS IS ENOUGH FOREVER
660
661 S^;*********************************************************************^
662 ;*END OF FIXED STORAGE
663 S^;*********************************************************************^
664
665 030577 $ENDFX=<PLISTE+100>&<777700>-1
666 030577 LOC $ENDFX
667 030577 000000 000000 ENDFIX: 0 ;END OF FIXED STORAGE
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 1
SPCCPU KLM 26-FEB-76 05:50 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0023
668 SUBTTL *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76
669
670 ;NEW DEFINITIONS USED BY THE KL10 SUBROUTINE PACKAGE
671
672 000000 AC0= 0
673 030000 DIAGNOS=30000 ;PDP-10 DIAGNOSTIC START ADDRESS
674 010000 DDT= 10000 ;PDP-10 DDT START ADDRESS
675 020000 DIAMON= 20000 ;PDP-10 DIAMON LOADER START ADDRESS
676 020000 DONG11= 1B22 ;11 DOORBELL (FROM THE 10)
677
678 ;DTE20 DEVICE CODES
679
680 000200 DTE== 200 ;DTE0
681 000204 DTE0== 204
682 000204 DTE1== 204
683 000210 DTE2== 210
684 000214 DTE3== 214
685
686 ;KL10 EPT COMMUNICATION AREA
687
688 000440 $STD= 440 ;PDP-10 DIAGNOSTIC START ADDRESS
689 000441 $DDT= 441 ;PDP-10 DDT START ADDRESS
690 000442 $STL= 442 ;PDP-10 LOADER START ADDRESS
691 000443 $STM= 443 ;PDP-10 MONITOR START ADDRESS
692
693 000444 $DTFLG= 444 ;DTE20 OPERATION COMPLETE FLAG
694 000445 $DTCLK= 445 ;DTE20 CLOCK INTERRUPT FLAG
695 000446 $DTCI= 446 ;DTE20 CLOCK INTERRUPT INSTRUCTION
696 000447 $DTT11= 447 ;DTE20 10 TO 11 ARGUMENT
697 000450 $DTF11= 450 ;DTE20 11 TO 10 ARGUMENT
698 000451 $DTCMD= 451 ;DTE20 TO 11 COMMAND WORD
699 000452 $DTSEQ= 452 ;DTE20 OPERATION SEQUENCE NUMBER
700 000453 $DTOPR= 453 ;DTE20 OPERATIONAL DTE #
701 000454 $DTCHR= 454 ;DTE20 LAST TYPED CHARACTER
702 000455 $DTMTD= 455 ;DTE20 MONITOR TTY OUTPUT COMPLETE FLAG
703 000456 $DTMTI= 456 ;DTE20 MONITOR TTY INPUT FLAG
704
705 000457 $DTSWR= 457 ;DTE20 CONSOLE SWITCH REGISTER
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 2
SPCCPU KLM 26-FEB-76 05:50 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0024
706 ;SPECIAL "FIXED" REASSIGNMENTS
707
708 030600 $$LOC=. ;SAVE CURRENT LOCATION
709
710 030000 LOC 30000
711 030000 254 00 0 00 030600 $$BEGIN:JRST $$START ;SETUP SPECIAL START
712 030001 254 00 0 00 030600 JRST $$START ;"DIAMON" CHAIN START ADDRESS
713
714 000440 LOC 440
715 000440 254 00 0 00 030000 $STD: JRST BEGIN ;SETUP FOR "STD"
716 000443 LOC 443
717 000443 254 00 0 00 030636 $STM: JRST $SPEC ;SIMPLE RUN CONTROL
718
719 030057 LOC 30057
720 030057 254 00 0 00 030641 $BEGEND:JRST $SPBEND ;SETUP SPECIAL "BEGEND"
721
722 ;SPECIAL MUUO, TRAP & PAGE FAIL SETUP
723
724 000420 LOC 420
725 000420 254 04 0 00 000420 $$420: HALT . ;KI10 PAGE FAIL
726 000421 255 00 0 00 000000 $$421: JFCL ;OVERFLOW
727 000422 254 04 0 00 000422 $$422: HALT . ;PUSHDOWN OVERFLOW
728 000423 254 04 0 00 000423 $$423: HALT . ;TRAP 3
729 000424 000000 000000 $$424: 0 ;MMUO
730 000425 000000 000000 $$425: 0 ;MMUO PC
731 000426 000000 000000 $$426: 0 ;KI10-PAGE FAIL, KL10-PROCESS CONTEXT
732 000427 254 04 0 00 000427 $$427: HALT .
733 000430 000000 000427 $$430: 427 ;MMUO NEW PC'S
734 000431 000000 000427 $$431: 427
735 000432 000000 000427 $$432: 427
736 000433 000000 000427 $$433: 427
737 000434 000000 000427 $$434: 427
738 000435 000000 000427 $$435: 427
739 000436 000000 000427 $$436: 427
740 000437 000000 000427 $$437: 427
741
742 000500 LOC 500
743 000500 000000 000000 $$500: 0 ;KL10 PAGE FAIL WORD
744 000501 000000 000000 $$501: 0 ;KL10 PAGE FAIL PC
745 000502 000000 000503 $$502: 503 ;KL10 PAGE FAIL NEW PC
746 000503 254 04 0 00 000503 $$503: HALT .
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 3
SPCCPU KLM 26-FEB-76 05:50 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0025
747 030600 LOC $$LOC ;RESET CURRENT LOCATION
748
749 ;SPECIAL STARTUP SEQUENCE
750
751 030600 402 00 0 00 030037 $$START:SETZM USER
752 030601 265 00 0 00 030602 JSP 0,.+1 ;IN USER MODE ?
753 030602 603 00 0 00 010000 TLNE 0,USERF
754 030603 476 00 0 00 030037 SETOM USER ;YES, SET CONTROL WORD
755 030604 336 00 0 00 030042 SKIPN MONFLG ;SPECIAL USER MODE ?
756 030605 402 00 0 00 030037 SETZM USER ;YES, RUN AS EXEC
757 030606 332 00 0 00 030037 SKIPE USER
758 030607 254 00 0 00 030712 JRST START ;USER MODE, DON'T NEED CPU TYPE
759
760 030610 336 00 0 00 030044 $STKIL: SKIPN MONTEN ;LOADED BY "DIAMON" ?
761 030611 476 00 0 00 030024 SETOM ITRCNT ;NO, RUN FOREVER
762 030612 402 00 0 00 030516 SETZM KLTYP
763 030613 402 00 0 00 030041 SETZM KLFLG ;ASSUME KI10
764 030614 200 01 0 00 034442 MOVE 1,[1,,1]
765 030615 251 01 0 00 000001 BLT 1,1 ;HOPE THIS WORKS
766 030616 316 01 0 00 034442 CAMN 1,[1,,1] ;IF AC NE 1,,1 AFTER BLT, KL10
767 030617 254 00 0 00 030712 JRST START ;KI10, NO ADDITIONAL SETUP
768
769 030620 7 000 20 0 00 010040 $STKL: CONO APR,10040 ;SET BBD NOT BIT
770 030621 7 000 24 0 00 000000 CONI APR,0
771 030622 7 000 20 0 00 020040 CONO APR,20040 ;CLEAR BBD NOT BIT
772 030623 606 00 0 00 000040 TRNN 0,40 ;IF SET, KL10
773 030624 350 00 0 00 030516 AOS KLTYP ;IF NOT, BBD
774 030625 402 00 0 00 000444 SETZM $DTFLG
775 030626 402 00 0 00 000445 SETZM $DTCLK
776 030627 200 00 0 00 000453 MOVE $DTOPR ;GET DTE #
777 030630 436 00 0 00 030670 ORM $$DTE0 ;INSERT IN DTE I/O INSTS
778 030631 436 00 0 00 030672 ORM $$DTE1
779 030632 436 00 0 00 030704 ORM $$DTE2
780 030633 436 00 0 00 030706 ORM $$DTE3
781 030634 476 00 0 00 030041 SETOM KLFLG ;SET KL10 CONTROL FLAG
782 030635 254 00 0 00 030712 JRST START
783
784 030636 200 00 0 00 034443 $SPEC: MOVE [JRST STARTA] ;SIMPLE RUN CONTROL
785 030637 202 00 0 00 030643 MOVEM $SPB1
786 030640 254 00 0 00 030712 JRST START
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 4
SPCCPU KLM 26-FEB-76 05:50 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0026
787 ;SPECIAL "BEGEND" ROUTINE
788
789 030641 350 00 0 00 030047 $SPBEND:AOS PASCNT ;INCREMENT PASS COUNT
790 030642 370 00 0 00 030024 SOS ITRCNT ;DECREMENT ITERATION COUNT
791 030643 336 00 0 00 030037 $SPB1: SKIPN USER
792 030644 254 00 0 00 030652 JRST $SPBEX ;EXEC MODE
793
794 030645 332 00 0 00 030024 $SPBUS: SKIPE ITRCNT ;USER MODE, COMPLETED ?
795 030646 254 00 0 00 030741 JRST STARTA ;NO, KEEP RUNNING
796 030647 336 00 0 00 030044 SKIPN MONTEN ;DONE, LOADED BY "DIAMON" ?
797 030650 047 00 0 00 000012 EXIT ;NO, RETURN TO MONITOR
798 030651 254 00 1 00 030012 JRST @RETURN ;YES, RETURN TO "DIAMON"
799
800 030652 332 00 0 00 030041 $SPBEX: SKIPE KLFLG
801 030653 254 00 0 00 030660 JRST $SPBKL ;KL10 & EXEC
802 030654 7 004 14 0 00 030024 DATAO PI,ITRCNT ;KI10 & EXEC, DISPLAY ITER COUNT
803 030655 332 00 0 00 030024 SKIPE ITRCNT
804 030656 254 00 0 00 030741 JRST STARTA ;NOT COMPLETED YET
805 030657 254 00 1 00 030012 JRST @RETURN ;DONE
806
807 030660 336 00 0 00 030024 $SPBKL: SKIPN ITRCNT
808 030661 254 00 0 00 030676 JRST $SPKLD ;KL10, EXEC & COMPLETED
809
810 030662 335 00 0 00 030043 SKIPGE MONCTL
811 030663 254 00 0 00 030741 JRST STARTA ;"DIAMON" CONTROL
812 030664 201 00 0 00 000404 MOVEI 0,404 ;NOTIFY PDP-11 OF END OF PASS
813 030665 202 00 0 00 000451 MOVEM 0,$DTCMD
814 030666 402 00 0 00 000444 SETZM $DTFLG
815 030667 336 00 0 00 030516 SKIPN KLTYP
816 030670 7 200 20 0 00 020000 $$DTE0: CONO DTE,DONG11
817 030671 332 00 0 00 030516 SKIPE KLTYP
818 030672 7 200 20 0 00 010000 $$DTE1: CONO DTE,10000
819 030673 336 00 0 00 000444 SKIPN $DTFLG ;WAIT TILL 11 RESPONDS
820 030674 254 00 0 00 030673 JRST .-1
821 030675 254 00 0 00 030741 JRST STARTA ;KEEP RUNNING
822
823 ;SPECIAL KL10 COMPLETED ROUTINE
824
825 030676 332 00 0 00 030044 $SPKLD: SKIPE MONTEN
826 030677 254 00 1 00 030012 JRST @RETURN ;LOADED BY "DIAMON"
827
828 030700 201 00 0 00 000403 MOVEI 0,403 ;NOTIFY PDP-11 OF COMPLETION
829 030701 202 00 0 00 000451 MOVEM 0,$DTCMD
830 030702 402 00 0 00 000444 SETZM $DTFLG
831 030703 336 00 0 00 030516 SKIPN KLTYP
832 030704 7 200 20 0 00 020000 $$DTE2: CONO DTE,DONG11
833 030705 332 00 0 00 030516 SKIPE KLTYP
834 030706 7 200 20 0 00 010000 $$DTE3: CONO DTE,10000
835 030707 336 00 0 00 000444 SKIPN $DTFLG ;SHOULD NEVER HAPPEN
836 030710 254 00 0 00 030707 JRST .-1 ;11 NEVER RETURNS ON END OF PROGRAM
837 030711 254 04 0 00 030000 HALT BEGIN ;IF IT DOES, HALT.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 1
DAKADM MAC 19-JAN-77 13:41 DIAGNOSTIC PARAMETERS SEQ 0027
838 SUBTTL DIAGNOSTIC PARAMETERS
839
840 ;ACCUMULATOR ASSIGNMENTS
841
842 ;CONTROL WORDS
843
844 400000 AROV=400000 ;ARITHMETIC OVERFLOW
845 200000 CRY0=200000 ;CARRY 0
846 100000 CRY1=100000 ;CARRY 1
847 040000 FOV=40000 ;FLOATING OVERFLOW
848 020000 BIS=20000 ;BYTE INTERRUPT
849 010000 USERF=10000 ;USER MODE FLAG
850 004000 EXIOT=4000 ;USER PRIV I/O FLAG
851 000100 FXU=100 ;FLOATING UNDERFLOW
852 000040 DCK=40 ;DIVIDE CHECK
853
854
855 ;MACROS
856
857 ; STOP - USED FOR SCOPE LOOP, IF INSTRUCTION FAILS, CHANGE (JUMPA .+1)
858 ; TO A (JUMPA X) TO CYCLE ON FAILING INSTRUCTION
859
860 DEFINE STOP (A)<
861 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
862 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
863 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
864 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
865 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1>
866
867 ; SFLAG - USED TO CLEAR ALL FLAGS THEN TO SET REQUESTED FLAG
868
869 DEFINE SFLAG (A)<
870 MOVSI 1,A
871 JFCL 17,.+1 ;RESET ALL FLAGS
872 JRST 2,.+1(1) ;SET A FLAG>
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 2
DAKADM MAC 19-JAN-77 13:41 DIAGNOSTIC SECTION SEQ 0028
873 SUBTTL DIAGNOSTIC SECTION
874
875 030712 402 00 0 00 030037 START: SETZM USER# ;CLEAR USER CONTROL WORD
876 030713 265 00 0 00 030714 JSP 0,.+1 ;GET FLAGS
877 030714 603 00 0 00 010000 TLNE USERF ;IN USER MODE?
878 030715 476 00 0 00 030037 SETOM USER ;YES, SET USER CONTROL WORD
879 030716 336 00 0 00 030042 SKIPN MONFLG ;SPECIAL USER MODE?
880 030717 402 00 0 00 030037 SETZM USER ;YES, CLEAR USER CONTROL WORD
881 030720 336 00 0 00 030037 SKIPN USER
882 030721 254 00 0 00 030742 JRST C00
883 030722 331 00 0 00 030043 SKIPL MONCTL
884 030723 051 03 0 00 030725 TTCALL 3,PGMNAM ;MENTION OUR NAME
885 030724 254 00 0 00 030741 JRST STARTA
886
887 030725 PGMNAM: ASCIZ/
888 030725 015 012 120 104 120 PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) [DAKAD]
889 030726 055 061 060 040 113
890 030727 101 061 060 040 102
891 030730 101 123 111 103 040
892 030731 111 116 123 124 122
893 030732 125 103 124 111 117
894 030733 116 040 104 111 101
895 030734 107 116 117 123 124
896 030735 111 103 040 050 064
897 030736 051 040 133 104 101
898 030737 113 101 104 135 015
899 030740 012 000 000 000 000 /
900
901 ;BASIC INSTRUCTION TEST (3)
902 ;THE TEST IS DESIGNED FOR INITIAL DEBUGGING OF
903 ;PROCESSOR HARDWARE AND TO DETECT (SOLID) FAILURES
904 ;IN THE FIELD.
905
906 030741 254 00 0 00 030742 STARTA: JRST .+1
907 030742 C00:
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 3
DAKADM MAC 19-JAN-77 13:41 DIAGNOSTIC SECTION SEQ 0029
908 ;TESTING BEGINS HERE
909
910 ;IF ANY LOADING PROBLEMS OCCUR, START PROGRAM HERE.
911
912 ;NOTE: AN "*" IN THE COMMENT FIELD OF AN INSTRUCTION INDICATES THAT
913 ; IT IS THE TESTED INSTRUCTION.
914
915 SUBTTL TEST OF AC HARDWARE AND INDEX REGISTERS
916
917 ;**********
918
919 ;THIS TEST VERIFIES THAT AC1 IS ACCESSABLE
920 ;IN THIS CASE, AC1 IS PRELOADED WITH 1.
921 ;C(AC1) IS THEN CHECKED FOR A1. THIS TEST PASSES IF C(AC1)=1.
922 ;IF THIS TEST FAILS, THE AC HARDWARE IS PROBABLY FAULTY
923
924 030742 400 00 0 00 000000 C100: SETZ ;CLEAR AC0
925 030743 201 01 0 00 000001 MOVEI 1,1 ;PRELOAD AC1 WITH 1
926 030744 302 01 0 00 000001 CAIE 1,1 ;PASS IF C(AC1)=1
927 STOP^
928 030745 254 04 0 00 030746 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
929 030746 324 00 0 00 030747 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
930 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
931 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
932 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
933
934 ;**********
935
936 ;THIS TEST VERIFIES THAT AC2 IS ACCESSABLE.
937 ;IN THIS CASE, AC2 IS PRELOADED WITH 2.
938 ;C(AC2) IS THEN CHECKED FOR 2. THIS TEST PASSES IF C(AC2)=2.
939 ;IF THIS TEST FAILS, THE AC HARDWARE IS PROBABLY FAULTY
940
941 030747 201 02 0 00 000002 C200: MOVEI 2,2 ;PRELOAD AC2 WITH 2
942 030750 302 02 0 00 000002 CAIE 2,2 ;PASS IF C(AC2)=2
943 STOP^
944 030751 254 04 0 00 030752 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
945 030752 324 00 0 00 030753 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
946 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
947 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
948 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
949
950 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 4
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0030
951 ;THIS TEST VERIFIES THAT AC4 IS ACCESSABLE.
952 ;IN THIS CASE, AC4 IS PRELOADED WITH 4.
953 ;C(AC4) IS THEN CHECKED FOR 4. THIS TEST PASSES IF C(AC4)=4.
954 ;IF THIS TEST FAILS, THE AC HARDWARE IS PROBABLY FAULTY
955
956 030753 201 04 0 00 000004 C300: MOVEI 4,4 ;PRELOAD AC4 WITH 4
957 030754 302 04 0 00 000004 CAIE 4,4 ;PASS IF C(AC4)=4
958 STOP^
959 030755 254 04 0 00 030756 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
960 030756 324 00 0 00 030757 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
961 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
962 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
963 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
964
965 ;**********
966
967 ;THIS TEST VERIFIES THAT AC10 IS ACCESSABLE.
968 ;IN THIS CASE, AC10 IS PRELOADED WITH 10.
969 ;C(AC10) IS THEN CHECKED FOR 10. THIS TEST PASSES IF C(AC10)=10.
970 ;IF THIS TEST FAILS, THE AC HARDWARE IS PROBABLY FAULTY
971
972 030757 201 10 0 00 000010 C400: MOVEI 10,10 ;PRELOAD AC10 WITH 10
973 030760 302 10 0 00 000010 CAIE 10,10 ;PASS IF C(AC10)=10
974 STOP^
975 030761 254 04 0 00 030762 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
976 030762 324 00 0 00 030763 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
977 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
978 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
979 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
980
981 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0031
982 000500 SN=500
983 777777 777777 ZZ=-1
984
985 ;THIS TEST VERIFIES THAT ALL ACS EXIST
986 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
987 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
988 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
989
990 C500: REPEAT ^D16,
991 < ZZ=ZZ+1
992 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR>
993 000000 ZZ=ZZ+1
994 030763 201 00 0 00 000000 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
995 000001 ZZ=ZZ+1
996 030764 201 01 0 00 000001 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
997 000002 ZZ=ZZ+1
998 030765 201 02 0 00 000002 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
999 000003 ZZ=ZZ+1
1000 030766 201 03 0 00 000003 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1001 000004 ZZ=ZZ+1
1002 030767 201 04 0 00 000004 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1003 000005 ZZ=ZZ+1
1004 030770 201 05 0 00 000005 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1005 000006 ZZ=ZZ+1
1006 030771 201 06 0 00 000006 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1007 000007 ZZ=ZZ+1
1008 030772 201 07 0 00 000007 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1009 000010 ZZ=ZZ+1
1010 030773 201 10 0 00 000010 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1011 000011 ZZ=ZZ+1
1012 030774 201 11 0 00 000011 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1013 000012 ZZ=ZZ+1
1014 030775 201 12 0 00 000012 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1015 000013 ZZ=ZZ+1
1016 030776 201 13 0 00 000013 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1017 000014 ZZ=ZZ+1
1018 030777 201 14 0 00 000014 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1019 000015 ZZ=ZZ+1
1020 031000 201 15 0 00 000015 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1021 000016 ZZ=ZZ+1
1022 031001 201 16 0 00 000016 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1023 000017 ZZ=ZZ+1
1024 031002 201 17 0 00 000017 MOVEI ZZ,ZZ ;PRELOAD EACH AC WITH ITS ADDR
1025 PAGE
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5-1
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0032
1026 000020 ZZ=20
1027
1028 REPEAT ^D16,<
1029 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1030 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1031 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1032 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1033
1034 SN=SN+1
1035 ZZ=ZZ-1
1036 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1037 STOP
1038 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1039
1040 ;**********
1041 >
1042
1043 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1044 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1045 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1046 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1047
1048 000501 SN=SN+1
1049 000017 ZZ=ZZ-1
1050 031003 302 17 0 00 000017 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1051 STOP^
1052 031004 254 04 0 00 031005 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1053 031005 324 00 0 00 031006 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1054 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1055 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1056 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1057 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1058
1059 ;**********
1060
1061
1062 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1063 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1064 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1065 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1066
1067 000502 SN=SN+1
1068 000016 ZZ=ZZ-1
1069 031006 302 16 0 00 000016 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1070 STOP^
1071 031007 254 04 0 00 031010 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1072 031010 324 00 0 00 031011 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1073 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1074 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1075 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1076 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1077
1078 ;**********
1079
1080
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5-2
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0033
1081 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1082 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1083 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1084 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1085
1086 000503 SN=SN+1
1087 000015 ZZ=ZZ-1
1088 031011 302 15 0 00 000015 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1089 STOP^
1090 031012 254 04 0 00 031013 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1091 031013 324 00 0 00 031014 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1092 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1093 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1094 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1095 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1096
1097 ;**********
1098
1099
1100 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1101 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1102 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1103 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1104
1105 000504 SN=SN+1
1106 000014 ZZ=ZZ-1
1107 031014 302 14 0 00 000014 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1108 STOP^
1109 031015 254 04 0 00 031016 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1110 031016 324 00 0 00 031017 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1111 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1112 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1113 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1114 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1115
1116 ;**********
1117
1118
1119 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1120 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1121 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1122 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1123
1124 000505 SN=SN+1
1125 000013 ZZ=ZZ-1
1126 031017 302 13 0 00 000013 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1127 STOP^
1128 031020 254 04 0 00 031021 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1129 031021 324 00 0 00 031022 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1130 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1131 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1132 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1133 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1134
1135 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5-3
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0034
1136
1137
1138 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1139 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1140 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1141 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1142
1143 000506 SN=SN+1
1144 000012 ZZ=ZZ-1
1145 031022 302 12 0 00 000012 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1146 STOP^
1147 031023 254 04 0 00 031024 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1148 031024 324 00 0 00 031025 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1149 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1150 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1151 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1152 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1153
1154 ;**********
1155
1156
1157 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1158 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1159 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1160 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1161
1162 000507 SN=SN+1
1163 000011 ZZ=ZZ-1
1164 031025 302 11 0 00 000011 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1165 STOP^
1166 031026 254 04 0 00 031027 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1167 031027 324 00 0 00 031030 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1168 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1169 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1170 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1171 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1172
1173 ;**********
1174
1175
1176 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1177 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1178 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1179 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1180
1181 000510 SN=SN+1
1182 000010 ZZ=ZZ-1
1183 031030 302 10 0 00 000010 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1184 STOP^
1185 031031 254 04 0 00 031032 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1186 031032 324 00 0 00 031033 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1187 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1188 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1189 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1190 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5-4
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0035
1191
1192 ;**********
1193
1194
1195 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1196 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1197 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1198 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1199
1200 000511 SN=SN+1
1201 000007 ZZ=ZZ-1
1202 031033 302 07 0 00 000007 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1203 STOP^
1204 031034 254 04 0 00 031035 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1205 031035 324 00 0 00 031036 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1206 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1207 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1208 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1209 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1210
1211 ;**********
1212
1213
1214 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1215 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1216 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1217 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1218
1219 000512 SN=SN+1
1220 000006 ZZ=ZZ-1
1221 031036 302 06 0 00 000006 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1222 STOP^
1223 031037 254 04 0 00 031040 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1224 031040 324 00 0 00 031041 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1225 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1226 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1227 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1228 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1229
1230 ;**********
1231
1232
1233 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1234 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1235 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1236 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1237
1238 000513 SN=SN+1
1239 000005 ZZ=ZZ-1
1240 031041 302 05 0 00 000005 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1241 STOP^
1242 031042 254 04 0 00 031043 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1243 031043 324 00 0 00 031044 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1244 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1245 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5-5
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0036
1246 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1247 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1248
1249 ;**********
1250
1251
1252 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1253 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1254 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1255 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1256
1257 000514 SN=SN+1
1258 000004 ZZ=ZZ-1
1259 031044 302 04 0 00 000004 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1260 STOP^
1261 031045 254 04 0 00 031046 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1262 031046 324 00 0 00 031047 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1263 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1264 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1265 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1266 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1267
1268 ;**********
1269
1270
1271 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1272 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1273 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1274 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1275
1276 000515 SN=SN+1
1277 000003 ZZ=ZZ-1
1278 031047 302 03 0 00 000003 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1279 STOP^
1280 031050 254 04 0 00 031051 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1281 031051 324 00 0 00 031052 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1282 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1283 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1284 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1285 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1286
1287 ;**********
1288
1289
1290 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1291 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1292 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1293 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1294
1295 000516 SN=SN+1
1296 000002 ZZ=ZZ-1
1297 031052 302 02 0 00 000002 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1298 STOP^
1299 031053 254 04 0 00 031054 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1300 031054 324 00 0 00 031055 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 5-6
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0037
1301 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1302 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1303 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1304 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1305
1306 ;**********
1307
1308
1309 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1310 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1311 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1312 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1313
1314 000517 SN=SN+1
1315 000001 ZZ=ZZ-1
1316 031055 302 01 0 00 000001 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1317 STOP^
1318 031056 254 04 0 00 031057 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1319 031057 324 00 0 00 031060 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1320 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1321 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1322 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1323 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1324
1325 ;**********
1326
1327
1328 ;THIS TEST VERIFIES THAT ALL ACS EXIST.
1329 ;FIRST, EACH AC IS PRELOADED WITH ITS OWN ADDRESS;
1330 ;THEN, THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1331 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS
1332
1333 000520 SN=SN+1
1334 000000 ZZ=ZZ-1
1335 031060 302 00 0 00 000000 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1336 STOP^
1337 031061 254 04 0 00 031062 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1338 031062 324 00 0 00 031063 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1339 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1340 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1341 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1342 ;IN CASE OF FAILURE, LOOP TO C500 ADDRESS
1343
1344 ;**********
1345
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0038
1346 000600 SN=600
1347 000000 ZZ=0
1348
1349 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1350 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1351 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS; THEN THE CONTENTS OF EACH
1352 ;AC IS CHECKED FOR ITS ADDRESS. IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1353
1354 C600: REPEAT ^D15,
1355 < ZZ=ZZ+1
1356 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1357 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.>
1358 000001 ZZ=ZZ+1
1359 031063 201 00 0 00 000001 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1360 031064 202 00 0 00 000001 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1361 000002 ZZ=ZZ+1
1362 031065 201 00 0 00 000002 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1363 031066 202 00 0 00 000002 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1364 000003 ZZ=ZZ+1
1365 031067 201 00 0 00 000003 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1366 031070 202 00 0 00 000003 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1367 000004 ZZ=ZZ+1
1368 031071 201 00 0 00 000004 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1369 031072 202 00 0 00 000004 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1370 000005 ZZ=ZZ+1
1371 031073 201 00 0 00 000005 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1372 031074 202 00 0 00 000005 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1373 000006 ZZ=ZZ+1
1374 031075 201 00 0 00 000006 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1375 031076 202 00 0 00 000006 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1376 000007 ZZ=ZZ+1
1377 031077 201 00 0 00 000007 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1378 031100 202 00 0 00 000007 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1379 000010 ZZ=ZZ+1
1380 031101 201 00 0 00 000010 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1381 031102 202 00 0 00 000010 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1382 000011 ZZ=ZZ+1
1383 031103 201 00 0 00 000011 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1384 031104 202 00 0 00 000011 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1385 000012 ZZ=ZZ+1
1386 031105 201 00 0 00 000012 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1387 031106 202 00 0 00 000012 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1388 000013 ZZ=ZZ+1
1389 031107 201 00 0 00 000013 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1390 031110 202 00 0 00 000013 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1391 000014 ZZ=ZZ+1
1392 031111 201 00 0 00 000014 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1393 031112 202 00 0 00 000014 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1394 000015 ZZ=ZZ+1
1395 031113 201 00 0 00 000015 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1396 031114 202 00 0 00 000015 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1397 000016 ZZ=ZZ+1
1398 031115 201 00 0 00 000016 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1399 031116 202 00 0 00 000016 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1400 000017 ZZ=ZZ+1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6-1
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0039
1401 031117 201 00 0 00 000017 MOVEI ZZ ;PRELOAD EACH AC WITH ITS ADDRESS
1402 031120 202 00 0 00 000017 MOVEM ZZ ;BY REFERENCING EACH AC AS MEMORY.
1403
1404 000020 ZZ=20
1405
1406 REPEAT ^D15,<
1407 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1408 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1409 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1410 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1411 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1412
1413 SN=SN+1
1414 ZZ=ZZ-1
1415 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1416 STOP
1417 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1418
1419 ;**********
1420 >
1421
1422 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1423 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1424 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1425 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1426 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1427
1428 000601 SN=SN+1
1429 000017 ZZ=ZZ-1
1430 031121 302 17 0 00 000017 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1431 STOP^
1432 031122 254 04 0 00 031123 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1433 031123 324 00 0 00 031124 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1434 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1435 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1436 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1437 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1438
1439 ;**********
1440
1441
1442 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1443 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1444 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1445 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1446 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1447
1448 000602 SN=SN+1
1449 000016 ZZ=ZZ-1
1450 031124 302 16 0 00 000016 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1451 STOP^
1452 031125 254 04 0 00 031126 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1453 031126 324 00 0 00 031127 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1454 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1455 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6-2
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0040
1456 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1457 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1458
1459 ;**********
1460
1461
1462 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1463 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1464 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1465 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1466 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1467
1468 000603 SN=SN+1
1469 000015 ZZ=ZZ-1
1470 031127 302 15 0 00 000015 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1471 STOP^
1472 031130 254 04 0 00 031131 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1473 031131 324 00 0 00 031132 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1474 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1475 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1476 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1477 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1478
1479 ;**********
1480
1481
1482 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1483 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1484 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1485 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1486 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1487
1488 000604 SN=SN+1
1489 000014 ZZ=ZZ-1
1490 031132 302 14 0 00 000014 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1491 STOP^
1492 031133 254 04 0 00 031134 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1493 031134 324 00 0 00 031135 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1494 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1495 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1496 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1497 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1498
1499 ;**********
1500
1501
1502 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1503 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1504 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1505 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1506 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1507
1508 000605 SN=SN+1
1509 000013 ZZ=ZZ-1
1510 031135 302 13 0 00 000013 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6-3
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0041
1511 STOP^
1512 031136 254 04 0 00 031137 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1513 031137 324 00 0 00 031140 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1514 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1515 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1516 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1517 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1518
1519 ;**********
1520
1521
1522 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1523 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1524 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1525 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1526 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1527
1528 000606 SN=SN+1
1529 000012 ZZ=ZZ-1
1530 031140 302 12 0 00 000012 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1531 STOP^
1532 031141 254 04 0 00 031142 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1533 031142 324 00 0 00 031143 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1534 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1535 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1536 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1537 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1538
1539 ;**********
1540
1541
1542 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1543 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1544 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1545 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1546 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1547
1548 000607 SN=SN+1
1549 000011 ZZ=ZZ-1
1550 031143 302 11 0 00 000011 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1551 STOP^
1552 031144 254 04 0 00 031145 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1553 031145 324 00 0 00 031146 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1554 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1555 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1556 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1557 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1558
1559 ;**********
1560
1561
1562 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1563 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1564 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1565 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6-4
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0042
1566 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1567
1568 000610 SN=SN+1
1569 000010 ZZ=ZZ-1
1570 031146 302 10 0 00 000010 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1571 STOP^
1572 031147 254 04 0 00 031150 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1573 031150 324 00 0 00 031151 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1574 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1575 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1576 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1577 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1578
1579 ;**********
1580
1581
1582 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1583 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1584 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1585 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1586 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1587
1588 000611 SN=SN+1
1589 000007 ZZ=ZZ-1
1590 031151 302 07 0 00 000007 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1591 STOP^
1592 031152 254 04 0 00 031153 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1593 031153 324 00 0 00 031154 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1594 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1595 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1596 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1597 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1598
1599 ;**********
1600
1601
1602 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1603 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1604 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1605 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1606 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1607
1608 000612 SN=SN+1
1609 000006 ZZ=ZZ-1
1610 031154 302 06 0 00 000006 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1611 STOP^
1612 031155 254 04 0 00 031156 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1613 031156 324 00 0 00 031157 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1614 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1615 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1616 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1617 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1618
1619 ;**********
1620
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6-5
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0043
1621
1622 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1623 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1624 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1625 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1626 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1627
1628 000613 SN=SN+1
1629 000005 ZZ=ZZ-1
1630 031157 302 05 0 00 000005 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1631 STOP^
1632 031160 254 04 0 00 031161 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1633 031161 324 00 0 00 031162 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1634 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1635 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1636 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1637 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1638
1639 ;**********
1640
1641
1642 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1643 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1644 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1645 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1646 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1647
1648 000614 SN=SN+1
1649 000004 ZZ=ZZ-1
1650 031162 302 04 0 00 000004 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1651 STOP^
1652 031163 254 04 0 00 031164 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1653 031164 324 00 0 00 031165 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1654 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1655 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1656 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1657 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1658
1659 ;**********
1660
1661
1662 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1663 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1664 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1665 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1666 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1667
1668 000615 SN=SN+1
1669 000003 ZZ=ZZ-1
1670 031165 302 03 0 00 000003 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1671 STOP^
1672 031166 254 04 0 00 031167 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1673 031167 324 00 0 00 031170 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1674 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1675 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 6-6
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0044
1676 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1677 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1678
1679 ;**********
1680
1681
1682 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1683 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1684 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1685 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1686 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1687
1688 000616 SN=SN+1
1689 000002 ZZ=ZZ-1
1690 031170 302 02 0 00 000002 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1691 STOP^
1692 031171 254 04 0 00 031172 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1693 031172 324 00 0 00 031173 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1694 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1695 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1696 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1697 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1698
1699 ;**********
1700
1701
1702 ;THIS TEST VERIFIES THAT AN ADDRESS WITHIN THE AC RANGE MAY BE ACCESSED AS
1703 ;EITHER AN AC OR A MEMORY LOCATION AND THAT EITHER REFERENCE REFERS TO THE
1704 ;SAME HARDWARE. EACH AC IS PRELOADED WITH ITS ADDRESS
1705 ;THEN THE CONTENTS OF EACH AC IS CHECKED FOR ITS ADDRESS.
1706 ;IF ANY AC DOES NOT CONTAIN ITS ADDRESS, THIS TEST FAILS.
1707
1708 000617 SN=SN+1
1709 000001 ZZ=ZZ-1
1710 031173 302 01 0 00 000001 CAIE ZZ,ZZ ;CHECK THAT EACH AC CONTAINS ITS OWN ADDRESS
1711 STOP^
1712 031174 254 04 0 00 031175 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1713 031175 324 00 0 00 031176 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1714 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1715 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1716 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1717 ;IN CASE OF FAILURE, LOOP TO C600 ADDRESS
1718
1719 ;**********
1720
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 7
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0045
1721 000700 SN=700
1722 000000 ZZ=0
1723
1724 C700: REPEAT ^D15,<
1725 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1726 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1727 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1728 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1729
1730 SN=SN+1
1731 ZZ=ZZ+1
1732 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1733 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1734 STOP
1735
1736 ;**********
1737 >
1738
1739 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1740 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1741 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1742 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1743
1744 000701 SN=SN+1
1745 000001 ZZ=ZZ+1
1746 031176 201 01 0 00 000001 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1747 031177 302 01 0 01 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1748 STOP^
1749 031200 254 04 0 00 031201 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1750 031201 324 00 0 00 031202 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1751 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1752 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1753 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1754
1755 ;**********
1756
1757
1758 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1759 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1760 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1761 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1762
1763 000702 SN=SN+1
1764 000002 ZZ=ZZ+1
1765 031202 201 02 0 00 000002 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1766 031203 302 02 0 02 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1767 STOP^
1768 031204 254 04 0 00 031205 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1769 031205 324 00 0 00 031206 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1770 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1771 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1772 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1773
1774 ;**********
1775
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 7-1
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0046
1776
1777 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1778 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1779 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1780 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1781
1782 000703 SN=SN+1
1783 000003 ZZ=ZZ+1
1784 031206 201 03 0 00 000003 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1785 031207 302 03 0 03 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1786 STOP^
1787 031210 254 04 0 00 031211 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1788 031211 324 00 0 00 031212 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1789 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1790 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1791 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1792
1793 ;**********
1794
1795
1796 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1797 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1798 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1799 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1800
1801 000704 SN=SN+1
1802 000004 ZZ=ZZ+1
1803 031212 201 04 0 00 000004 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1804 031213 302 04 0 04 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1805 STOP^
1806 031214 254 04 0 00 031215 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1807 031215 324 00 0 00 031216 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1808 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1809 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1810 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1811
1812 ;**********
1813
1814
1815 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1816 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1817 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1818 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1819
1820 000705 SN=SN+1
1821 000005 ZZ=ZZ+1
1822 031216 201 05 0 00 000005 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1823 031217 302 05 0 05 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1824 STOP^
1825 031220 254 04 0 00 031221 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1826 031221 324 00 0 00 031222 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1827 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1828 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1829 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1830
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 7-2
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0047
1831 ;**********
1832
1833
1834 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1835 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1836 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1837 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1838
1839 000706 SN=SN+1
1840 000006 ZZ=ZZ+1
1841 031222 201 06 0 00 000006 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1842 031223 302 06 0 06 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1843 STOP^
1844 031224 254 04 0 00 031225 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1845 031225 324 00 0 00 031226 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1846 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1847 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1848 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1849
1850 ;**********
1851
1852
1853 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1854 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1855 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1856 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1857
1858 000707 SN=SN+1
1859 000007 ZZ=ZZ+1
1860 031226 201 07 0 00 000007 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1861 031227 302 07 0 07 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1862 STOP^
1863 031230 254 04 0 00 031231 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1864 031231 324 00 0 00 031232 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1865 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1866 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1867 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1868
1869 ;**********
1870
1871
1872 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1873 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1874 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1875 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1876
1877 000710 SN=SN+1
1878 000010 ZZ=ZZ+1
1879 031232 201 10 0 00 000010 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1880 031233 302 10 0 10 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1881 STOP^
1882 031234 254 04 0 00 031235 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1883 031235 324 00 0 00 031236 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1884 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1885 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 7-3
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0048
1886 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1887
1888 ;**********
1889
1890
1891 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1892 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1893 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1894 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1895
1896 000711 SN=SN+1
1897 000011 ZZ=ZZ+1
1898 031236 201 11 0 00 000011 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1899 031237 302 11 0 11 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1900 STOP^
1901 031240 254 04 0 00 031241 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1902 031241 324 00 0 00 031242 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1903 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1904 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1905 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1906
1907 ;**********
1908
1909
1910 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1911 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1912 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1913 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1914
1915 000712 SN=SN+1
1916 000012 ZZ=ZZ+1
1917 031242 201 12 0 00 000012 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1918 031243 302 12 0 12 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1919 STOP^
1920 031244 254 04 0 00 031245 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1921 031245 324 00 0 00 031246 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1922 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1923 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1924 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1925
1926 ;**********
1927
1928
1929 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1930 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1931 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1932 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1933
1934 000713 SN=SN+1
1935 000013 ZZ=ZZ+1
1936 031246 201 13 0 00 000013 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1937 031247 302 13 0 13 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1938 STOP^
1939 031250 254 04 0 00 031251 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1940 031251 324 00 0 00 031252 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 7-4
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0049
1941 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1942 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1943 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1944
1945 ;**********
1946
1947
1948 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1949 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1950 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1951 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1952
1953 000714 SN=SN+1
1954 000014 ZZ=ZZ+1
1955 031252 201 14 0 00 000014 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1956 031253 302 14 0 14 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1957 STOP^
1958 031254 254 04 0 00 031255 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1959 031255 324 00 0 00 031256 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1960 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1961 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1962 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1963
1964 ;**********
1965
1966
1967 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1968 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1969 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1970 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1971
1972 000715 SN=SN+1
1973 000015 ZZ=ZZ+1
1974 031256 201 15 0 00 000015 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1975 031257 302 15 0 15 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1976 STOP^
1977 031260 254 04 0 00 031261 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1978 031261 324 00 0 00 031262 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1979 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1980 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1981 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1982
1983 ;**********
1984
1985
1986 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
1987 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
1988 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
1989 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
1990
1991 000716 SN=SN+1
1992 000016 ZZ=ZZ+1
1993 031262 201 16 0 00 000016 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
1994 031263 302 16 0 16 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
1995 STOP^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 7-5
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0050
1996 031264 254 04 0 00 031265 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1997 031265 324 00 0 00 031266 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1998 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1999 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2000 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2001
2002 ;**********
2003
2004
2005 ;THIS TEST VERIFIES THAT THE INDEX REGISTERS ARE ACCESSABLE.
2006 ;FIRST, AN INDEX REGISTER IS PRELOADED WITH ITS ADDRESS; THEN,
2007 ;IT IS REFERENCED AS AN INDEX REGISTER. IF IT CONTAINS ITS ADDRESS, THIS TEST PASSES.
2008 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER.
2009
2010 000717 SN=SN+1
2011 000017 ZZ=ZZ+1
2012 031266 201 17 0 00 000017 MOVEI ZZ,ZZ ;PRELOAD INDEX REGISTER WITH ITS ADDRESS
2013 031267 302 17 0 17 000000 CAIE ZZ,(ZZ) ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2014 STOP^
2015 031270 254 04 0 00 031271 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2016 031271 324 00 0 00 031272 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2017 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2018 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2019 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2020
2021 ;**********
2022
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 8
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0051
2023 001000 SN=1000
2024 000000 ZZ=0
2025
2026 C1000: REPEAT ^D15,<
2027 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2028 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2029 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2030 .
2031 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2032 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2033
2034 SN=SN+1
2035 ZZ=ZZ+1
2036 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2037 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2038 CAME ZZ,(ZZ) ;IN BOTH HALVES
2039 STOP
2040
2041 ;**********
2042 >
2043
2044 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2045 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2046 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2047 .
2048 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2049 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2050
2051 001001 SN=SN+1
2052 000001 ZZ=ZZ+1
2053 031272 201 01 0 00 000001 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2054 031273 505 01 0 00 000001 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2055 031274 312 01 0 01 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2056 STOP^
2057 031275 254 04 0 00 031276 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2058 031276 324 00 0 00 031277 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2059 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2060 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2061 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2062
2063 ;**********
2064
2065
2066 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2067 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2068 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2069 .
2070 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2071 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2072
2073 001002 SN=SN+1
2074 000002 ZZ=ZZ+1
2075 031277 201 02 0 00 000002 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2076 031300 505 02 0 00 000002 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2077 031301 312 02 0 02 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 8-1
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0052
2078 STOP^
2079 031302 254 04 0 00 031303 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2080 031303 324 00 0 00 031304 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2081 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2082 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2083 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2084
2085 ;**********
2086
2087
2088 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2089 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2090 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2091 .
2092 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2093 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2094
2095 001003 SN=SN+1
2096 000003 ZZ=ZZ+1
2097 031304 201 03 0 00 000003 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2098 031305 505 03 0 00 000003 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2099 031306 312 03 0 03 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2100 STOP^
2101 031307 254 04 0 00 031310 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2102 031310 324 00 0 00 031311 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2103 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2104 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2105 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2106
2107 ;**********
2108
2109
2110 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2111 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2112 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2113 .
2114 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2115 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2116
2117 001004 SN=SN+1
2118 000004 ZZ=ZZ+1
2119 031311 201 04 0 00 000004 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2120 031312 505 04 0 00 000004 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2121 031313 312 04 0 04 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2122 STOP^
2123 031314 254 04 0 00 031315 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2124 031315 324 00 0 00 031316 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2125 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2126 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2127 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2128
2129 ;**********
2130
2131
2132 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 8-2
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0053
2133 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2134 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2135 .
2136 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2137 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2138
2139 001005 SN=SN+1
2140 000005 ZZ=ZZ+1
2141 031316 201 05 0 00 000005 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2142 031317 505 05 0 00 000005 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2143 031320 312 05 0 05 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2144 STOP^
2145 031321 254 04 0 00 031322 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2146 031322 324 00 0 00 031323 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2147 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2148 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2149 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2150
2151 ;**********
2152
2153
2154 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2155 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2156 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2157 .
2158 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2159 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2160
2161 001006 SN=SN+1
2162 000006 ZZ=ZZ+1
2163 031323 201 06 0 00 000006 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2164 031324 505 06 0 00 000006 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2165 031325 312 06 0 06 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2166 STOP^
2167 031326 254 04 0 00 031327 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2168 031327 324 00 0 00 031330 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2169 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2170 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2171 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2172
2173 ;**********
2174
2175
2176 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2177 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2178 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2179 .
2180 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2181 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2182
2183 001007 SN=SN+1
2184 000007 ZZ=ZZ+1
2185 031330 201 07 0 00 000007 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2186 031331 505 07 0 00 000007 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2187 031332 312 07 0 07 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 8-3
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0054
2188 STOP^
2189 031333 254 04 0 00 031334 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2190 031334 324 00 0 00 031335 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2191 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2192 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2193 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2194
2195 ;**********
2196
2197
2198 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2199 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2200 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2201 .
2202 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2203 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2204
2205 001010 SN=SN+1
2206 000010 ZZ=ZZ+1
2207 031335 201 10 0 00 000010 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2208 031336 505 10 0 00 000010 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2209 031337 312 10 0 10 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2210 STOP^
2211 031340 254 04 0 00 031341 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2212 031341 324 00 0 00 031342 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2213 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2214 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2215 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2216
2217 ;**********
2218
2219
2220 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2221 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2222 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2223 .
2224 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2225 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2226
2227 001011 SN=SN+1
2228 000011 ZZ=ZZ+1
2229 031342 201 11 0 00 000011 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2230 031343 505 11 0 00 000011 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2231 031344 312 11 0 11 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2232 STOP^
2233 031345 254 04 0 00 031346 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2234 031346 324 00 0 00 031347 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2235 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2236 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2237 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2238
2239 ;**********
2240
2241
2242 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 8-4
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0055
2243 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2244 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2245 .
2246 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2247 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2248
2249 001012 SN=SN+1
2250 000012 ZZ=ZZ+1
2251 031347 201 12 0 00 000012 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2252 031350 505 12 0 00 000012 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2253 031351 312 12 0 12 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2254 STOP^
2255 031352 254 04 0 00 031353 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2256 031353 324 00 0 00 031354 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2257 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2258 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2259 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2260
2261 ;**********
2262
2263
2264 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2265 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2266 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2267 .
2268 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2269 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2270
2271 001013 SN=SN+1
2272 000013 ZZ=ZZ+1
2273 031354 201 13 0 00 000013 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2274 031355 505 13 0 00 000013 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2275 031356 312 13 0 13 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2276 STOP^
2277 031357 254 04 0 00 031360 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2278 031360 324 00 0 00 031361 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2279 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2280 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2281 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2282
2283 ;**********
2284
2285
2286 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2287 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2288 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2289 .
2290 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2291 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2292
2293 001014 SN=SN+1
2294 000014 ZZ=ZZ+1
2295 031361 201 14 0 00 000014 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2296 031362 505 14 0 00 000014 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2297 031363 312 14 0 14 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 8-5
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0056
2298 STOP^
2299 031364 254 04 0 00 031365 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2300 031365 324 00 0 00 031366 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2301 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2302 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2303 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2304
2305 ;**********
2306
2307
2308 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2309 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2310 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2311 .
2312 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2313 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2314
2315 001015 SN=SN+1
2316 000015 ZZ=ZZ+1
2317 031366 201 15 0 00 000015 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2318 031367 505 15 0 00 000015 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2319 031370 312 15 0 15 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2320 STOP^
2321 031371 254 04 0 00 031372 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2322 031372 324 00 0 00 031373 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2323 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2324 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2325 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2326
2327 ;**********
2328
2329
2330 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
2331 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2332 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2333 .
2334 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2335 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2336
2337 001016 SN=SN+1
2338 000016 ZZ=ZZ+1
2339 031373 201 16 0 00 000016 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2340 031374 505 16 0 00 000016 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2341 031375 312 16 0 16 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2342 STOP^
2343 031376 254 04 0 00 031377 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2344 031377 324 00 0 00 031400 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2345 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2346 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2347 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2348
2349 ;**********
2350
2351
2352 ;THIS TEST VERIFIES THAT ALL INDEX REGISTERS INDEX CORRECTLY.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 8-6
DAKADM MAC 19-JAN-77 13:41 TEST OF AC HARDWARE AND INDEX REGISTERS SEQ 0057
2353 ;FIRST, BOTH HALVES OF THE INDEX REGISTER ARE PRELOADED WITH ITS ADDRESS.
2354 ;THEN, THE INDEX REGISTER IS REFERENCED. IT IS THEN CHECKED FOR ITS ADDRESS IN BOTH HALVES
2355 .
2356 ;IF IT CONTAINS ITS ADDRESS IN BOTH HALVES THIS TEST PASSES.
2357 ;THIS TEST IS REPEATED 15 TIMES IN ORDER TO TEST EACH INDEX REGISTER
2358
2359 001017 SN=SN+1
2360 000017 ZZ=ZZ+1
2361 031400 201 17 0 00 000017 MOVEI ZZ,ZZ ;PRELOAD BOTH HALVES OF INDEX REG WITH ITS ADDRESS
2362 031401 505 17 0 00 000017 HRLI ZZ,ZZ ;PASS IF INDEX REGISTER CONTAINS ITS ADDRESS
2363 031402 312 17 0 17 000000 CAME ZZ,(ZZ) ;IN BOTH HALVES
2364 STOP^
2365 031403 254 04 0 00 031404 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2366 031404 324 00 0 00 031405 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2367 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2368 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2369 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2370
2371 ;**********
2372
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0058
2373 SUBTTL TEST OF INDEX REGISTER ADDRESSING
2374
2375 ;**********
2376
2377 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2378 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2379 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2380 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A 0,
2381 ;THE FINAL RESULT IN AC3 SHOULD BE 0. IF C(AC3)=0, THIS TEST PASSES.
2382
2383 031405 476 00 0 00 000003 C1100: SETOM 3 ;PRELOAD AC3 WITH -1,,1
2384 031406 402 00 0 00 000001 SETZM 1 ;PRELOAD AC1 WITH 0
2385 031407 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER 2 WITH 1
2386 031410 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2387 031411 332 00 0 00 000003 SKIPE 3 ;TEST INDEXING
2388 STOP^
2389 031412 254 04 0 00 031413 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2390 031413 324 00 0 00 031414 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2391 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2392 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2393 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2394
2395 ;**********
2396
2397 001200 SN=1200
2398 000000 ZZ=0
2399
2400 C1200: REPEAT ^D18,<
2401 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2402 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2403 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2404 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2405 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2406 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2407
2408 SN=SN+1
2409 ZZ=ZZ+ZZ
2410 IFE ZZ,<ZZ=1>
2411 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2412 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2413 MOVEI 2,1 ;SETUP INDEX REGISTER
2414 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2415 CAIE 3,ZZ ;TEST INDEXING
2416 STOP
2417
2418 ;**********
2419 >
2420
2421 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2422 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2423 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2424 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2425 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2426 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2427
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-1
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0059
2428 001201 SN=SN+1
2429 000000 ZZ=ZZ+ZZ
2430 000001 IFE ZZ,<ZZ=1>
2431 031414 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2432 031415 201 01 0 00 000001 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2433 031416 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2434 031417 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2435 031420 302 03 0 00 000001 CAIE 3,ZZ ;TEST INDEXING
2436 STOP^
2437 031421 254 04 0 00 031422 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2438 031422 324 00 0 00 031423 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2439 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2440 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2441 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2442
2443 ;**********
2444
2445
2446 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2447 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2448 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2449 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2450 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2451 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2452
2453 001202 SN=SN+1
2454 000002 ZZ=ZZ+ZZ
2455 IFE ZZ,<ZZ=1>
2456 031423 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2457 031424 201 01 0 00 000002 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2458 031425 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2459 031426 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2460 031427 302 03 0 00 000002 CAIE 3,ZZ ;TEST INDEXING
2461 STOP^
2462 031430 254 04 0 00 031431 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2463 031431 324 00 0 00 031432 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2464 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2465 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2466 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2467
2468 ;**********
2469
2470
2471 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2472 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2473 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2474 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2475 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2476 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2477
2478 001203 SN=SN+1
2479 000004 ZZ=ZZ+ZZ
2480 IFE ZZ,<ZZ=1>
2481 031432 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2482 031433 201 01 0 00 000004 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-2
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0060
2483 031434 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2484 031435 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2485 031436 302 03 0 00 000004 CAIE 3,ZZ ;TEST INDEXING
2486 STOP^
2487 031437 254 04 0 00 031440 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2488 031440 324 00 0 00 031441 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2489 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2490 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2491 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2492
2493 ;**********
2494
2495
2496 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2497 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2498 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2499 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2500 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2501 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2502
2503 001204 SN=SN+1
2504 000010 ZZ=ZZ+ZZ
2505 IFE ZZ,<ZZ=1>
2506 031441 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2507 031442 201 01 0 00 000010 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2508 031443 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2509 031444 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2510 031445 302 03 0 00 000010 CAIE 3,ZZ ;TEST INDEXING
2511 STOP^
2512 031446 254 04 0 00 031447 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2513 031447 324 00 0 00 031450 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2514 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2515 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2516 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2517
2518 ;**********
2519
2520
2521 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2522 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2523 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2524 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2525 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2526 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2527
2528 001205 SN=SN+1
2529 000020 ZZ=ZZ+ZZ
2530 IFE ZZ,<ZZ=1>
2531 031450 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2532 031451 201 01 0 00 000020 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2533 031452 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2534 031453 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2535 031454 302 03 0 00 000020 CAIE 3,ZZ ;TEST INDEXING
2536 STOP^
2537 031455 254 04 0 00 031456 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-3
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0061
2538 031456 324 00 0 00 031457 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2539 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2540 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2541 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2542
2543 ;**********
2544
2545
2546 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2547 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2548 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2549 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2550 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2551 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2552
2553 001206 SN=SN+1
2554 000040 ZZ=ZZ+ZZ
2555 IFE ZZ,<ZZ=1>
2556 031457 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2557 031460 201 01 0 00 000040 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2558 031461 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2559 031462 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2560 031463 302 03 0 00 000040 CAIE 3,ZZ ;TEST INDEXING
2561 STOP^
2562 031464 254 04 0 00 031465 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2563 031465 324 00 0 00 031466 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2564 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2565 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2566 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2567
2568 ;**********
2569
2570
2571 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2572 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2573 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2574 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2575 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2576 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2577
2578 001207 SN=SN+1
2579 000100 ZZ=ZZ+ZZ
2580 IFE ZZ,<ZZ=1>
2581 031466 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2582 031467 201 01 0 00 000100 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2583 031470 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2584 031471 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2585 031472 302 03 0 00 000100 CAIE 3,ZZ ;TEST INDEXING
2586 STOP^
2587 031473 254 04 0 00 031474 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2588 031474 324 00 0 00 031475 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2589 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2590 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2591 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2592
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-4
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0062
2593 ;**********
2594
2595
2596 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2597 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2598 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2599 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2600 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2601 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2602
2603 001210 SN=SN+1
2604 000200 ZZ=ZZ+ZZ
2605 IFE ZZ,<ZZ=1>
2606 031475 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2607 031476 201 01 0 00 000200 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2608 031477 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2609 031500 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2610 031501 302 03 0 00 000200 CAIE 3,ZZ ;TEST INDEXING
2611 STOP^
2612 031502 254 04 0 00 031503 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2613 031503 324 00 0 00 031504 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2614 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2615 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2616 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2617
2618 ;**********
2619
2620
2621 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2622 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2623 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2624 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2625 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2626 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2627
2628 001211 SN=SN+1
2629 000400 ZZ=ZZ+ZZ
2630 IFE ZZ,<ZZ=1>
2631 031504 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2632 031505 201 01 0 00 000400 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2633 031506 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2634 031507 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2635 031510 302 03 0 00 000400 CAIE 3,ZZ ;TEST INDEXING
2636 STOP^
2637 031511 254 04 0 00 031512 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2638 031512 324 00 0 00 031513 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2639 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2640 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2641 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2642
2643 ;**********
2644
2645
2646 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2647 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-5
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0063
2648 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2649 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2650 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2651 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2652
2653 001212 SN=SN+1
2654 001000 ZZ=ZZ+ZZ
2655 IFE ZZ,<ZZ=1>
2656 031513 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2657 031514 201 01 0 00 001000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2658 031515 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2659 031516 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2660 031517 302 03 0 00 001000 CAIE 3,ZZ ;TEST INDEXING
2661 STOP^
2662 031520 254 04 0 00 031521 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2663 031521 324 00 0 00 031522 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2664 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2665 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2666 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2667
2668 ;**********
2669
2670
2671 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2672 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2673 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2674 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2675 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2676 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2677
2678 001213 SN=SN+1
2679 002000 ZZ=ZZ+ZZ
2680 IFE ZZ,<ZZ=1>
2681 031522 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2682 031523 201 01 0 00 002000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2683 031524 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2684 031525 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2685 031526 302 03 0 00 002000 CAIE 3,ZZ ;TEST INDEXING
2686 STOP^
2687 031527 254 04 0 00 031530 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2688 031530 324 00 0 00 031531 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2689 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2690 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2691 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2692
2693 ;**********
2694
2695
2696 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2697 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2698 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2699 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2700 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2701 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2702
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-6
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0064
2703 001214 SN=SN+1
2704 004000 ZZ=ZZ+ZZ
2705 IFE ZZ,<ZZ=1>
2706 031531 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2707 031532 201 01 0 00 004000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2708 031533 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2709 031534 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2710 031535 302 03 0 00 004000 CAIE 3,ZZ ;TEST INDEXING
2711 STOP^
2712 031536 254 04 0 00 031537 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2713 031537 324 00 0 00 031540 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2714 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2715 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2716 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2717
2718 ;**********
2719
2720
2721 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2722 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2723 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2724 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2725 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2726 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2727
2728 001215 SN=SN+1
2729 010000 ZZ=ZZ+ZZ
2730 IFE ZZ,<ZZ=1>
2731 031540 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2732 031541 201 01 0 00 010000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2733 031542 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2734 031543 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2735 031544 302 03 0 00 010000 CAIE 3,ZZ ;TEST INDEXING
2736 STOP^
2737 031545 254 04 0 00 031546 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2738 031546 324 00 0 00 031547 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2739 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2740 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2741 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2742
2743 ;**********
2744
2745
2746 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2747 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2748 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2749 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2750 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2751 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2752
2753 001216 SN=SN+1
2754 020000 ZZ=ZZ+ZZ
2755 IFE ZZ,<ZZ=1>
2756 031547 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2757 031550 201 01 0 00 020000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-7
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0065
2758 031551 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2759 031552 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2760 031553 302 03 0 00 020000 CAIE 3,ZZ ;TEST INDEXING
2761 STOP^
2762 031554 254 04 0 00 031555 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2763 031555 324 00 0 00 031556 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2764 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2765 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2766 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2767
2768 ;**********
2769
2770
2771 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2772 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2773 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2774 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2775 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2776 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2777
2778 001217 SN=SN+1
2779 040000 ZZ=ZZ+ZZ
2780 IFE ZZ,<ZZ=1>
2781 031556 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2782 031557 201 01 0 00 040000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2783 031560 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2784 031561 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2785 031562 302 03 0 00 040000 CAIE 3,ZZ ;TEST INDEXING
2786 STOP^
2787 031563 254 04 0 00 031564 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2788 031564 324 00 0 00 031565 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2789 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2790 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2791 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2792
2793 ;**********
2794
2795
2796 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2797 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2798 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2799 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2800 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2801 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2802
2803 001220 SN=SN+1
2804 100000 ZZ=ZZ+ZZ
2805 IFE ZZ,<ZZ=1>
2806 031565 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2807 031566 201 01 0 00 100000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2808 031567 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2809 031570 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2810 031571 302 03 0 00 100000 CAIE 3,ZZ ;TEST INDEXING
2811 STOP^
2812 031572 254 04 0 00 031573 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-8
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0066
2813 031573 324 00 0 00 031574 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2814 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2815 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2816 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2817
2818 ;**********
2819
2820
2821 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2822 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2823 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2824 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2825 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2826 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2827
2828 001221 SN=SN+1
2829 200000 ZZ=ZZ+ZZ
2830 IFE ZZ,<ZZ=1>
2831 031574 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2832 031575 201 01 0 00 200000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2833 031576 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2834 031577 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2835 031600 302 03 0 00 200000 CAIE 3,ZZ ;TEST INDEXING
2836 STOP^
2837 031601 254 04 0 00 031602 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2838 031602 324 00 0 00 031603 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2839 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2840 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2841 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2842
2843 ;**********
2844
2845
2846 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2847 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2848 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2849 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2850 ;FLOATING 1. THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2851 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2852
2853 001222 SN=SN+1
2854 400000 ZZ=ZZ+ZZ
2855 IFE ZZ,<ZZ=1>
2856 031603 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2857 031604 201 01 0 00 400000 MOVEI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2858 031605 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2859 031606 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2860 031607 302 03 0 00 400000 CAIE 3,ZZ ;TEST INDEXING
2861 STOP^
2862 031610 254 04 0 00 031611 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2863 031611 324 00 0 00 031612 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2864 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2865 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2866 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2867
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 9-9
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0067
2868 ;**********
2869
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0068
2870 001300 SN=1300
2871 000000 ZZ=0
2872
2873 C1300: REPEAT ^D18,<
2874 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2875 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2876 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2877 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2878 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2879 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2880
2881 SN=SN+1
2882 ZZ=ZZ+ZZ
2883 IFE ZZ,<ZZ=1>
2884 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2885 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2886 MOVEI 2,1 ;SETUP INDEX REGISTER
2887 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2888 CAME 3,[ZZ,,0] ;TEST INDEXING
2889 STOP
2890
2891 ;**********
2892 >
2893
2894 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2895 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2896 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2897 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2898 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2899 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2900
2901 001301 SN=SN+1
2902 000000 ZZ=ZZ+ZZ
2903 000001 IFE ZZ,<ZZ=1>
2904 031612 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2905 031613 205 01 0 00 000001 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2906 031614 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2907 031615 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2908 031616 312 03 0 00 034444 CAME 3,[ZZ,,0] ;TEST INDEXING
2909 STOP^
2910 031617 254 04 0 00 031620 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2911 031620 324 00 0 00 031621 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2912 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2913 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2914 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2915
2916 ;**********
2917
2918
2919 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2920 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2921 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2922 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2923 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2924 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-1
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0069
2925
2926 001302 SN=SN+1
2927 000002 ZZ=ZZ+ZZ
2928 IFE ZZ,<ZZ=1>
2929 031621 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2930 031622 205 01 0 00 000002 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2931 031623 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2932 031624 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2933 031625 312 03 0 00 034445 CAME 3,[ZZ,,0] ;TEST INDEXING
2934 STOP^
2935 031626 254 04 0 00 031627 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2936 031627 324 00 0 00 031630 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2937 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2938 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2939 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2940
2941 ;**********
2942
2943
2944 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2945 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2946 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2947 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2948 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2949 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2950
2951 001303 SN=SN+1
2952 000004 ZZ=ZZ+ZZ
2953 IFE ZZ,<ZZ=1>
2954 031630 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
2955 031631 205 01 0 00 000004 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2956 031632 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2957 031633 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2958 031634 312 03 0 00 034446 CAME 3,[ZZ,,0] ;TEST INDEXING
2959 STOP^
2960 031635 254 04 0 00 031636 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2961 031636 324 00 0 00 031637 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2962 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2963 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2964 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2965
2966 ;**********
2967
2968
2969 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2970 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2971 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2972 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2973 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2974 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
2975
2976 001304 SN=SN+1
2977 000010 ZZ=ZZ+ZZ
2978 IFE ZZ,<ZZ=1>
2979 031637 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-2
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0070
2980 031640 205 01 0 00 000010 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
2981 031641 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
2982 031642 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
2983 031643 312 03 0 00 034447 CAME 3,[ZZ,,0] ;TEST INDEXING
2984 STOP^
2985 031644 254 04 0 00 031645 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2986 031645 324 00 0 00 031646 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2987 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2988 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2989 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2990
2991 ;**********
2992
2993
2994 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
2995 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
2996 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
2997 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
2998 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
2999 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3000
3001 001305 SN=SN+1
3002 000020 ZZ=ZZ+ZZ
3003 IFE ZZ,<ZZ=1>
3004 031646 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3005 031647 205 01 0 00 000020 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3006 031650 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3007 031651 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3008 031652 312 03 0 00 034450 CAME 3,[ZZ,,0] ;TEST INDEXING
3009 STOP^
3010 031653 254 04 0 00 031654 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3011 031654 324 00 0 00 031655 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3012 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3013 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3014 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3015
3016 ;**********
3017
3018
3019 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3020 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3021 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3022 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3023 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3024 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3025
3026 001306 SN=SN+1
3027 000040 ZZ=ZZ+ZZ
3028 IFE ZZ,<ZZ=1>
3029 031655 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3030 031656 205 01 0 00 000040 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3031 031657 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3032 031660 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3033 031661 312 03 0 00 034451 CAME 3,[ZZ,,0] ;TEST INDEXING
3034 STOP^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-3
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0071
3035 031662 254 04 0 00 031663 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3036 031663 324 00 0 00 031664 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3037 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3038 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3039 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3040
3041 ;**********
3042
3043
3044 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3045 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3046 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3047 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3048 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3049 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3050
3051 001307 SN=SN+1
3052 000100 ZZ=ZZ+ZZ
3053 IFE ZZ,<ZZ=1>
3054 031664 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3055 031665 205 01 0 00 000100 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3056 031666 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3057 031667 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3058 031670 312 03 0 00 034452 CAME 3,[ZZ,,0] ;TEST INDEXING
3059 STOP^
3060 031671 254 04 0 00 031672 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3061 031672 324 00 0 00 031673 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3062 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3063 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3064 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3065
3066 ;**********
3067
3068
3069 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3070 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3071 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3072 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3073 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3074 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3075
3076 001310 SN=SN+1
3077 000200 ZZ=ZZ+ZZ
3078 IFE ZZ,<ZZ=1>
3079 031673 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3080 031674 205 01 0 00 000200 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3081 031675 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3082 031676 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3083 031677 312 03 0 00 034453 CAME 3,[ZZ,,0] ;TEST INDEXING
3084 STOP^
3085 031700 254 04 0 00 031701 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3086 031701 324 00 0 00 031702 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3087 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3088 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3089 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-4
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0072
3090
3091 ;**********
3092
3093
3094 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3095 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3096 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3097 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3098 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3099 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3100
3101 001311 SN=SN+1
3102 000400 ZZ=ZZ+ZZ
3103 IFE ZZ,<ZZ=1>
3104 031702 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3105 031703 205 01 0 00 000400 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3106 031704 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3107 031705 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3108 031706 312 03 0 00 034454 CAME 3,[ZZ,,0] ;TEST INDEXING
3109 STOP^
3110 031707 254 04 0 00 031710 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3111 031710 324 00 0 00 031711 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3112 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3113 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3114 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3115
3116 ;**********
3117
3118
3119 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3120 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3121 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3122 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3123 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3124 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3125
3126 001312 SN=SN+1
3127 001000 ZZ=ZZ+ZZ
3128 IFE ZZ,<ZZ=1>
3129 031711 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3130 031712 205 01 0 00 001000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3131 031713 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3132 031714 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3133 031715 312 03 0 00 034455 CAME 3,[ZZ,,0] ;TEST INDEXING
3134 STOP^
3135 031716 254 04 0 00 031717 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3136 031717 324 00 0 00 031720 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3137 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3138 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3139 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3140
3141 ;**********
3142
3143
3144 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-5
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0073
3145 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3146 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3147 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3148 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3149 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3150
3151 001313 SN=SN+1
3152 002000 ZZ=ZZ+ZZ
3153 IFE ZZ,<ZZ=1>
3154 031720 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3155 031721 205 01 0 00 002000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3156 031722 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3157 031723 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3158 031724 312 03 0 00 034456 CAME 3,[ZZ,,0] ;TEST INDEXING
3159 STOP^
3160 031725 254 04 0 00 031726 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3161 031726 324 00 0 00 031727 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3162 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3163 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3164 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3165
3166 ;**********
3167
3168
3169 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3170 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3171 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3172 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3173 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3174 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3175
3176 001314 SN=SN+1
3177 004000 ZZ=ZZ+ZZ
3178 IFE ZZ,<ZZ=1>
3179 031727 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3180 031730 205 01 0 00 004000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3181 031731 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3182 031732 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3183 031733 312 03 0 00 034457 CAME 3,[ZZ,,0] ;TEST INDEXING
3184 STOP^
3185 031734 254 04 0 00 031735 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3186 031735 324 00 0 00 031736 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3187 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3188 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3189 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3190
3191 ;**********
3192
3193
3194 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3195 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3196 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3197 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3198 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3199 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-6
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0074
3200
3201 001315 SN=SN+1
3202 010000 ZZ=ZZ+ZZ
3203 IFE ZZ,<ZZ=1>
3204 031736 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3205 031737 205 01 0 00 010000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3206 031740 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3207 031741 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3208 031742 312 03 0 00 034460 CAME 3,[ZZ,,0] ;TEST INDEXING
3209 STOP^
3210 031743 254 04 0 00 031744 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3211 031744 324 00 0 00 031745 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3212 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3213 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3214 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3215
3216 ;**********
3217
3218
3219 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3220 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3221 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3222 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3223 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3224 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3225
3226 001316 SN=SN+1
3227 020000 ZZ=ZZ+ZZ
3228 IFE ZZ,<ZZ=1>
3229 031745 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3230 031746 205 01 0 00 020000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3231 031747 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3232 031750 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3233 031751 312 03 0 00 034461 CAME 3,[ZZ,,0] ;TEST INDEXING
3234 STOP^
3235 031752 254 04 0 00 031753 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3236 031753 324 00 0 00 031754 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3237 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3238 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3239 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3240
3241 ;**********
3242
3243
3244 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3245 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3246 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3247 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3248 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3249 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3250
3251 001317 SN=SN+1
3252 040000 ZZ=ZZ+ZZ
3253 IFE ZZ,<ZZ=1>
3254 031754 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-7
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0075
3255 031755 205 01 0 00 040000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3256 031756 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3257 031757 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3258 031760 312 03 0 00 034462 CAME 3,[ZZ,,0] ;TEST INDEXING
3259 STOP^
3260 031761 254 04 0 00 031762 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3261 031762 324 00 0 00 031763 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3262 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3263 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3264 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3265
3266 ;**********
3267
3268
3269 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3270 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3271 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3272 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3273 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3274 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3275
3276 001320 SN=SN+1
3277 100000 ZZ=ZZ+ZZ
3278 IFE ZZ,<ZZ=1>
3279 031763 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3280 031764 205 01 0 00 100000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3281 031765 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3282 031766 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3283 031767 312 03 0 00 034463 CAME 3,[ZZ,,0] ;TEST INDEXING
3284 STOP^
3285 031770 254 04 0 00 031771 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3286 031771 324 00 0 00 031772 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3287 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3288 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3289 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3290
3291 ;**********
3292
3293
3294 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3295 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3296 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3297 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3298 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3299 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3300
3301 001321 SN=SN+1
3302 200000 ZZ=ZZ+ZZ
3303 IFE ZZ,<ZZ=1>
3304 031772 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3305 031773 205 01 0 00 200000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3306 031774 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3307 031775 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3308 031776 312 03 0 00 034464 CAME 3,[ZZ,,0] ;TEST INDEXING
3309 STOP^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 10-8
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0076
3310 031777 254 04 0 00 032000 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3311 032000 324 00 0 00 032001 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3312 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3313 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3314 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3315
3316 ;**********
3317
3318
3319 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3320 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3321 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3322 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3323 ;FLOATING 1, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 1.
3324 ;IF C(AC3)=A FLOATING 1, THIS TEST PASSES.
3325
3326 001322 SN=SN+1
3327 400000 ZZ=ZZ+ZZ
3328 IFE ZZ,<ZZ=1>
3329 032001 476 00 0 00 000003 SETOM 3 ;PRELOAD AC3 WITH -1,,-1
3330 032002 205 01 0 00 400000 MOVSI 1,ZZ ;PRELOAD AC1 WITH FLOATING 1
3331 032003 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3332 032004 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3333 032005 312 03 0 00 034465 CAME 3,[ZZ,,0] ;TEST INDEXING
3334 STOP^
3335 032006 254 04 0 00 032007 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3336 032007 324 00 0 00 032010 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3337 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3338 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3339 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3340
3341 ;**********
3342
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0077
3343 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3344 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3345 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3346 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH -1,,-1,
3347 ;THE FINAL RESULT IN AC3 SHOULD BE -1,,-1. IF C(AC3)=-1,,-1, THIS TEST PASSES.
3348
3349 032010 402 00 0 00 000003 C1400: SETZM 3 ;PRELOAD AC3 WITH 0
3350 032011 476 00 0 00 000001 SETOM 1 ;PRELOAD AC1 WITH -1,,-1
3351 032012 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3352 032013 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3353 032014 312 03 0 00 034466 CAME 3,[-1,,-1] ;TEST INDEXING
3354 STOP^
3355 032015 254 04 0 00 032016 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3356 032016 324 00 0 00 032017 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3357 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3358 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3359 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3360
3361 ;**********
3362
3363 001500 SN=1500
3364 000000 ZZ=0
3365
3366 C1500: REPEAT ^D18,<
3367 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3368 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3369 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3370 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3371 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3372 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3373
3374 SN=SN+1
3375 ZZ=<ZZ+ZZ+1>&777777
3376 IFE <ZZ-1>,<ZZ=777776>
3377 SETZM 3 ;PRELOAD AC3 WITH 0
3378 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3379 MOVEI 2,1 ;SETUP INDEX REGISTER
3380 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3381 CAME 3,[-1,,ZZ] ;TEST INDEXING
3382 STOP
3383
3384 ;**********
3385 >
3386
3387 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3388 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3389 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3390 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3391 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3392 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3393
3394 001501 SN=SN+1
3395 000001 ZZ=<ZZ+ZZ+1>&777777
3396 777776 IFE <ZZ-1>,<ZZ=777776>
3397 032017 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-1
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0078
3398 032020 561 01 0 00 777776 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3399 032021 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3400 032022 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3401 032023 312 03 0 00 034467 CAME 3,[-1,,ZZ] ;TEST INDEXING
3402 STOP^
3403 032024 254 04 0 00 032025 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3404 032025 324 00 0 00 032026 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3405 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3406 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3407 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3408
3409 ;**********
3410
3411
3412 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3413 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3414 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3415 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3416 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3417 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3418
3419 001502 SN=SN+1
3420 777775 ZZ=<ZZ+ZZ+1>&777777
3421 IFE <ZZ-1>,<ZZ=777776>
3422 032026 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3423 032027 561 01 0 00 777775 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3424 032030 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3425 032031 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3426 032032 312 03 0 00 034470 CAME 3,[-1,,ZZ] ;TEST INDEXING
3427 STOP^
3428 032033 254 04 0 00 032034 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3429 032034 324 00 0 00 032035 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3430 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3431 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3432 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3433
3434 ;**********
3435
3436
3437 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3438 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3439 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3440 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3441 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3442 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3443
3444 001503 SN=SN+1
3445 777773 ZZ=<ZZ+ZZ+1>&777777
3446 IFE <ZZ-1>,<ZZ=777776>
3447 032035 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3448 032036 561 01 0 00 777773 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3449 032037 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3450 032040 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3451 032041 312 03 0 00 034471 CAME 3,[-1,,ZZ] ;TEST INDEXING
3452 STOP^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-2
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0079
3453 032042 254 04 0 00 032043 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3454 032043 324 00 0 00 032044 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3455 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3456 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3457 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3458
3459 ;**********
3460
3461
3462 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3463 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3464 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3465 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3466 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3467 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3468
3469 001504 SN=SN+1
3470 777767 ZZ=<ZZ+ZZ+1>&777777
3471 IFE <ZZ-1>,<ZZ=777776>
3472 032044 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3473 032045 561 01 0 00 777767 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3474 032046 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3475 032047 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3476 032050 312 03 0 00 034472 CAME 3,[-1,,ZZ] ;TEST INDEXING
3477 STOP^
3478 032051 254 04 0 00 032052 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3479 032052 324 00 0 00 032053 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3480 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3481 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3482 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3483
3484 ;**********
3485
3486
3487 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3488 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3489 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3490 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3491 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3492 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3493
3494 001505 SN=SN+1
3495 777757 ZZ=<ZZ+ZZ+1>&777777
3496 IFE <ZZ-1>,<ZZ=777776>
3497 032053 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3498 032054 561 01 0 00 777757 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3499 032055 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3500 032056 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3501 032057 312 03 0 00 034473 CAME 3,[-1,,ZZ] ;TEST INDEXING
3502 STOP^
3503 032060 254 04 0 00 032061 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3504 032061 324 00 0 00 032062 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3505 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3506 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3507 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-3
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0080
3508
3509 ;**********
3510
3511
3512 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3513 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3514 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3515 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3516 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3517 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3518
3519 001506 SN=SN+1
3520 777737 ZZ=<ZZ+ZZ+1>&777777
3521 IFE <ZZ-1>,<ZZ=777776>
3522 032062 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3523 032063 561 01 0 00 777737 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3524 032064 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3525 032065 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3526 032066 312 03 0 00 034474 CAME 3,[-1,,ZZ] ;TEST INDEXING
3527 STOP^
3528 032067 254 04 0 00 032070 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3529 032070 324 00 0 00 032071 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3530 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3531 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3532 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3533
3534 ;**********
3535
3536
3537 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3538 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3539 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3540 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3541 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3542 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3543
3544 001507 SN=SN+1
3545 777677 ZZ=<ZZ+ZZ+1>&777777
3546 IFE <ZZ-1>,<ZZ=777776>
3547 032071 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3548 032072 561 01 0 00 777677 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3549 032073 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3550 032074 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3551 032075 312 03 0 00 034475 CAME 3,[-1,,ZZ] ;TEST INDEXING
3552 STOP^
3553 032076 254 04 0 00 032077 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3554 032077 324 00 0 00 032100 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3555 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3556 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3557 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3558
3559 ;**********
3560
3561
3562 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-4
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0081
3563 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3564 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3565 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3566 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3567 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3568
3569 001510 SN=SN+1
3570 777577 ZZ=<ZZ+ZZ+1>&777777
3571 IFE <ZZ-1>,<ZZ=777776>
3572 032100 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3573 032101 561 01 0 00 777577 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3574 032102 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3575 032103 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3576 032104 312 03 0 00 034476 CAME 3,[-1,,ZZ] ;TEST INDEXING
3577 STOP^
3578 032105 254 04 0 00 032106 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3579 032106 324 00 0 00 032107 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3580 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3581 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3582 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3583
3584 ;**********
3585
3586
3587 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3588 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3589 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3590 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3591 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3592 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3593
3594 001511 SN=SN+1
3595 777377 ZZ=<ZZ+ZZ+1>&777777
3596 IFE <ZZ-1>,<ZZ=777776>
3597 032107 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3598 032110 561 01 0 00 777377 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3599 032111 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3600 032112 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3601 032113 312 03 0 00 034477 CAME 3,[-1,,ZZ] ;TEST INDEXING
3602 STOP^
3603 032114 254 04 0 00 032115 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3604 032115 324 00 0 00 032116 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3605 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3606 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3607 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3608
3609 ;**********
3610
3611
3612 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3613 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3614 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3615 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3616 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3617 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-5
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0082
3618
3619 001512 SN=SN+1
3620 776777 ZZ=<ZZ+ZZ+1>&777777
3621 IFE <ZZ-1>,<ZZ=777776>
3622 032116 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3623 032117 561 01 0 00 776777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3624 032120 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3625 032121 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3626 032122 312 03 0 00 034500 CAME 3,[-1,,ZZ] ;TEST INDEXING
3627 STOP^
3628 032123 254 04 0 00 032124 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3629 032124 324 00 0 00 032125 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3630 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3631 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3632 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3633
3634 ;**********
3635
3636
3637 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3638 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3639 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3640 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3641 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3642 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3643
3644 001513 SN=SN+1
3645 775777 ZZ=<ZZ+ZZ+1>&777777
3646 IFE <ZZ-1>,<ZZ=777776>
3647 032125 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3648 032126 561 01 0 00 775777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3649 032127 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3650 032130 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3651 032131 312 03 0 00 034501 CAME 3,[-1,,ZZ] ;TEST INDEXING
3652 STOP^
3653 032132 254 04 0 00 032133 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3654 032133 324 00 0 00 032134 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3655 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3656 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3657 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3658
3659 ;**********
3660
3661
3662 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3663 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3664 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3665 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3666 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3667 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3668
3669 001514 SN=SN+1
3670 773777 ZZ=<ZZ+ZZ+1>&777777
3671 IFE <ZZ-1>,<ZZ=777776>
3672 032134 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-6
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0083
3673 032135 561 01 0 00 773777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3674 032136 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3675 032137 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3676 032140 312 03 0 00 034502 CAME 3,[-1,,ZZ] ;TEST INDEXING
3677 STOP^
3678 032141 254 04 0 00 032142 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3679 032142 324 00 0 00 032143 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3680 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3681 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3682 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3683
3684 ;**********
3685
3686
3687 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3688 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3689 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3690 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3691 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3692 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3693
3694 001515 SN=SN+1
3695 767777 ZZ=<ZZ+ZZ+1>&777777
3696 IFE <ZZ-1>,<ZZ=777776>
3697 032143 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3698 032144 561 01 0 00 767777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3699 032145 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3700 032146 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3701 032147 312 03 0 00 034503 CAME 3,[-1,,ZZ] ;TEST INDEXING
3702 STOP^
3703 032150 254 04 0 00 032151 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3704 032151 324 00 0 00 032152 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3705 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3706 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3707 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3708
3709 ;**********
3710
3711
3712 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3713 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3714 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3715 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3716 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3717 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3718
3719 001516 SN=SN+1
3720 757777 ZZ=<ZZ+ZZ+1>&777777
3721 IFE <ZZ-1>,<ZZ=777776>
3722 032152 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3723 032153 561 01 0 00 757777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3724 032154 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3725 032155 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3726 032156 312 03 0 00 034504 CAME 3,[-1,,ZZ] ;TEST INDEXING
3727 STOP^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-7
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0084
3728 032157 254 04 0 00 032160 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3729 032160 324 00 0 00 032161 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3730 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3731 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3732 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3733
3734 ;**********
3735
3736
3737 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3738 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3739 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3740 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3741 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3742 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3743
3744 001517 SN=SN+1
3745 737777 ZZ=<ZZ+ZZ+1>&777777
3746 IFE <ZZ-1>,<ZZ=777776>
3747 032161 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3748 032162 561 01 0 00 737777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3749 032163 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3750 032164 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3751 032165 312 03 0 00 034505 CAME 3,[-1,,ZZ] ;TEST INDEXING
3752 STOP^
3753 032166 254 04 0 00 032167 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3754 032167 324 00 0 00 032170 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3755 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3756 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3757 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3758
3759 ;**********
3760
3761
3762 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3763 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3764 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3765 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3766 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3767 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3768
3769 001520 SN=SN+1
3770 677777 ZZ=<ZZ+ZZ+1>&777777
3771 IFE <ZZ-1>,<ZZ=777776>
3772 032170 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3773 032171 561 01 0 00 677777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3774 032172 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3775 032173 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3776 032174 312 03 0 00 034506 CAME 3,[-1,,ZZ] ;TEST INDEXING
3777 STOP^
3778 032175 254 04 0 00 032176 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3779 032176 324 00 0 00 032177 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3780 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3781 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3782 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 11-8
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0085
3783
3784 ;**********
3785
3786
3787 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3788 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3789 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3790 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3791 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3792 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3793
3794 001521 SN=SN+1
3795 577777 ZZ=<ZZ+ZZ+1>&777777
3796 IFE <ZZ-1>,<ZZ=777776>
3797 032177 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3798 032200 561 01 0 00 577777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3799 032201 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3800 032202 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3801 032203 312 03 0 00 034507 CAME 3,[-1,,ZZ] ;TEST INDEXING
3802 STOP^
3803 032204 254 04 0 00 032205 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3804 032205 324 00 0 00 032206 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3805 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3806 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3807 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3808
3809 ;**********
3810
3811
3812 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3813 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3814 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3815 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3816 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3817 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3818
3819 001522 SN=SN+1
3820 377777 ZZ=<ZZ+ZZ+1>&777777
3821 IFE <ZZ-1>,<ZZ=777776>
3822 032206 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3823 032207 561 01 0 00 377777 HRROI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3824 032210 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3825 032211 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3826 032212 312 03 0 00 034510 CAME 3,[-1,,ZZ] ;TEST INDEXING
3827 STOP^
3828 032213 254 04 0 00 032214 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3829 032214 324 00 0 00 032215 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3830 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3831 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3832 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3833
3834 ;**********
3835
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0086
3836 001600 SN=1600
3837 000000 ZZ=0
3838
3839 C1600: REPEAT ^D18,<
3840 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3841 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3842 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3843 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3844 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3845 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3846
3847 SN=SN+1
3848 ZZ=<ZZ+ZZ+1>&777777
3849 IFE <ZZ-1>,<ZZ=777776>
3850 SETZM 3 ;PRELOAD AC3 WITH 0
3851 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3852 MOVEI 2,1 ;SETUP INDEX REGISTER
3853 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3854 CAME 3,[ZZ,,-1] ;TEST INDEXING
3855 STOP
3856
3857 ;**********
3858 >
3859
3860 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3861 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3862 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3863 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3864 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3865 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3866
3867 001601 SN=SN+1
3868 000001 ZZ=<ZZ+ZZ+1>&777777
3869 777776 IFE <ZZ-1>,<ZZ=777776>
3870 032215 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3871 032216 525 01 0 00 777776 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3872 032217 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3873 032220 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3874 032221 312 03 0 00 034511 CAME 3,[ZZ,,-1] ;TEST INDEXING
3875 STOP^
3876 032222 254 04 0 00 032223 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3877 032223 324 00 0 00 032224 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3878 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3879 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3880 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3881
3882 ;**********
3883
3884
3885 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3886 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3887 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3888 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3889 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3890 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-1
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0087
3891
3892 001602 SN=SN+1
3893 777775 ZZ=<ZZ+ZZ+1>&777777
3894 IFE <ZZ-1>,<ZZ=777776>
3895 032224 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3896 032225 525 01 0 00 777775 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3897 032226 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3898 032227 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3899 032230 312 03 0 00 034512 CAME 3,[ZZ,,-1] ;TEST INDEXING
3900 STOP^
3901 032231 254 04 0 00 032232 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3902 032232 324 00 0 00 032233 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3903 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3904 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3905 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3906
3907 ;**********
3908
3909
3910 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3911 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3912 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3913 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3914 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3915 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3916
3917 001603 SN=SN+1
3918 777773 ZZ=<ZZ+ZZ+1>&777777
3919 IFE <ZZ-1>,<ZZ=777776>
3920 032233 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3921 032234 525 01 0 00 777773 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3922 032235 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3923 032236 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3924 032237 312 03 0 00 034513 CAME 3,[ZZ,,-1] ;TEST INDEXING
3925 STOP^
3926 032240 254 04 0 00 032241 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3927 032241 324 00 0 00 032242 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3928 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3929 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3930 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3931
3932 ;**********
3933
3934
3935 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3936 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3937 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3938 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3939 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3940 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3941
3942 001604 SN=SN+1
3943 777767 ZZ=<ZZ+ZZ+1>&777777
3944 IFE <ZZ-1>,<ZZ=777776>
3945 032242 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-2
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0088
3946 032243 525 01 0 00 777767 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3947 032244 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3948 032245 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3949 032246 312 03 0 00 034514 CAME 3,[ZZ,,-1] ;TEST INDEXING
3950 STOP^
3951 032247 254 04 0 00 032250 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3952 032250 324 00 0 00 032251 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3953 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3954 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3955 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3956
3957 ;**********
3958
3959
3960 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3961 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3962 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3963 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3964 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3965 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3966
3967 001605 SN=SN+1
3968 777757 ZZ=<ZZ+ZZ+1>&777777
3969 IFE <ZZ-1>,<ZZ=777776>
3970 032251 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3971 032252 525 01 0 00 777757 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3972 032253 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3973 032254 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3974 032255 312 03 0 00 034515 CAME 3,[ZZ,,-1] ;TEST INDEXING
3975 STOP^
3976 032256 254 04 0 00 032257 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3977 032257 324 00 0 00 032260 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3978 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3979 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3980 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3981
3982 ;**********
3983
3984
3985 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
3986 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
3987 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
3988 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
3989 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
3990 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
3991
3992 001606 SN=SN+1
3993 777737 ZZ=<ZZ+ZZ+1>&777777
3994 IFE <ZZ-1>,<ZZ=777776>
3995 032260 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
3996 032261 525 01 0 00 777737 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
3997 032262 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
3998 032263 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
3999 032264 312 03 0 00 034516 CAME 3,[ZZ,,-1] ;TEST INDEXING
4000 STOP^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-3
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0089
4001 032265 254 04 0 00 032266 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4002 032266 324 00 0 00 032267 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4003 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4004 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4005 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4006
4007 ;**********
4008
4009
4010 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4011 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4012 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4013 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4014 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4015 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4016
4017 001607 SN=SN+1
4018 777677 ZZ=<ZZ+ZZ+1>&777777
4019 IFE <ZZ-1>,<ZZ=777776>
4020 032267 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4021 032270 525 01 0 00 777677 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4022 032271 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4023 032272 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4024 032273 312 03 0 00 034517 CAME 3,[ZZ,,-1] ;TEST INDEXING
4025 STOP^
4026 032274 254 04 0 00 032275 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4027 032275 324 00 0 00 032276 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4028 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4029 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4030 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4031
4032 ;**********
4033
4034
4035 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4036 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4037 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4038 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4039 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4040 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4041
4042 001610 SN=SN+1
4043 777577 ZZ=<ZZ+ZZ+1>&777777
4044 IFE <ZZ-1>,<ZZ=777776>
4045 032276 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4046 032277 525 01 0 00 777577 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4047 032300 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4048 032301 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4049 032302 312 03 0 00 034520 CAME 3,[ZZ,,-1] ;TEST INDEXING
4050 STOP^
4051 032303 254 04 0 00 032304 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4052 032304 324 00 0 00 032305 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4053 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4054 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4055 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-4
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0090
4056
4057 ;**********
4058
4059
4060 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4061 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4062 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4063 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4064 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4065 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4066
4067 001611 SN=SN+1
4068 777377 ZZ=<ZZ+ZZ+1>&777777
4069 IFE <ZZ-1>,<ZZ=777776>
4070 032305 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4071 032306 525 01 0 00 777377 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4072 032307 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4073 032310 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4074 032311 312 03 0 00 034521 CAME 3,[ZZ,,-1] ;TEST INDEXING
4075 STOP^
4076 032312 254 04 0 00 032313 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4077 032313 324 00 0 00 032314 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4078 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4079 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4080 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4081
4082 ;**********
4083
4084
4085 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4086 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4087 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4088 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4089 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4090 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4091
4092 001612 SN=SN+1
4093 776777 ZZ=<ZZ+ZZ+1>&777777
4094 IFE <ZZ-1>,<ZZ=777776>
4095 032314 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4096 032315 525 01 0 00 776777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4097 032316 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4098 032317 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4099 032320 312 03 0 00 034522 CAME 3,[ZZ,,-1] ;TEST INDEXING
4100 STOP^
4101 032321 254 04 0 00 032322 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4102 032322 324 00 0 00 032323 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4103 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4104 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4105 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4106
4107 ;**********
4108
4109
4110 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-5
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0091
4111 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4112 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4113 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4114 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4115 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4116
4117 001613 SN=SN+1
4118 775777 ZZ=<ZZ+ZZ+1>&777777
4119 IFE <ZZ-1>,<ZZ=777776>
4120 032323 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4121 032324 525 01 0 00 775777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4122 032325 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4123 032326 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4124 032327 312 03 0 00 034523 CAME 3,[ZZ,,-1] ;TEST INDEXING
4125 STOP^
4126 032330 254 04 0 00 032331 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4127 032331 324 00 0 00 032332 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4128 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4129 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4130 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4131
4132 ;**********
4133
4134
4135 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4136 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4137 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4138 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4139 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4140 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4141
4142 001614 SN=SN+1
4143 773777 ZZ=<ZZ+ZZ+1>&777777
4144 IFE <ZZ-1>,<ZZ=777776>
4145 032332 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4146 032333 525 01 0 00 773777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4147 032334 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4148 032335 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4149 032336 312 03 0 00 034524 CAME 3,[ZZ,,-1] ;TEST INDEXING
4150 STOP^
4151 032337 254 04 0 00 032340 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4152 032340 324 00 0 00 032341 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4153 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4154 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4155 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4156
4157 ;**********
4158
4159
4160 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4161 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4162 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4163 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4164 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4165 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-6
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0092
4166
4167 001615 SN=SN+1
4168 767777 ZZ=<ZZ+ZZ+1>&777777
4169 IFE <ZZ-1>,<ZZ=777776>
4170 032341 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4171 032342 525 01 0 00 767777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4172 032343 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4173 032344 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4174 032345 312 03 0 00 034525 CAME 3,[ZZ,,-1] ;TEST INDEXING
4175 STOP^
4176 032346 254 04 0 00 032347 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4177 032347 324 00 0 00 032350 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4178 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4179 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4180 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4181
4182 ;**********
4183
4184
4185 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4186 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4187 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4188 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4189 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4190 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4191
4192 001616 SN=SN+1
4193 757777 ZZ=<ZZ+ZZ+1>&777777
4194 IFE <ZZ-1>,<ZZ=777776>
4195 032350 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4196 032351 525 01 0 00 757777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4197 032352 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4198 032353 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4199 032354 312 03 0 00 034526 CAME 3,[ZZ,,-1] ;TEST INDEXING
4200 STOP^
4201 032355 254 04 0 00 032356 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4202 032356 324 00 0 00 032357 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4203 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4204 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4205 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4206
4207 ;**********
4208
4209
4210 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4211 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4212 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4213 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4214 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4215 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4216
4217 001617 SN=SN+1
4218 737777 ZZ=<ZZ+ZZ+1>&777777
4219 IFE <ZZ-1>,<ZZ=777776>
4220 032357 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-7
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0093
4221 032360 525 01 0 00 737777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4222 032361 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4223 032362 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4224 032363 312 03 0 00 034527 CAME 3,[ZZ,,-1] ;TEST INDEXING
4225 STOP^
4226 032364 254 04 0 00 032365 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4227 032365 324 00 0 00 032366 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4228 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4229 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4230 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4231
4232 ;**********
4233
4234
4235 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4236 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4237 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4238 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4239 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4240 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4241
4242 001620 SN=SN+1
4243 677777 ZZ=<ZZ+ZZ+1>&777777
4244 IFE <ZZ-1>,<ZZ=777776>
4245 032366 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4246 032367 525 01 0 00 677777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4247 032370 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4248 032371 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4249 032372 312 03 0 00 034530 CAME 3,[ZZ,,-1] ;TEST INDEXING
4250 STOP^
4251 032373 254 04 0 00 032374 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4252 032374 324 00 0 00 032375 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4253 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4254 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4255 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4256
4257 ;**********
4258
4259
4260 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4261 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4262 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4263 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4264 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4265 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4266
4267 001621 SN=SN+1
4268 577777 ZZ=<ZZ+ZZ+1>&777777
4269 IFE <ZZ-1>,<ZZ=777776>
4270 032375 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4271 032376 525 01 0 00 577777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4272 032377 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4273 032400 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4274 032401 312 03 0 00 034531 CAME 3,[ZZ,,-1] ;TEST INDEXING
4275 STOP^
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 12-8
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0094
4276 032402 254 04 0 00 032403 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4277 032403 324 00 0 00 032404 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4278 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4279 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4280 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4281
4282 ;**********
4283
4284
4285 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4286 ;IN THIS TEST, A MOVE INSTRUCTION USING INDEXING IS EXECUTED. THE MOVE INSTRUCTION
4287 ;SHOULD PLACE THE CONTENTS OF THE LOCATION SPECIFIED BY INDEX REGISTER 2 INTO AC3.
4288 ;SINCE INDEX REGISTER 2 WAS PRELOADED WITH A 1 AND AC1 WAS PRELOADED WITH A
4289 ;FLOATING 0, THE FINAL RESULT IN AC3 SHOULD BE A FLOATING 0.
4290 ;IF C(AC3)=A FLOATING 0, THIS TEST PASSES.
4291
4292 001622 SN=SN+1
4293 377777 ZZ=<ZZ+ZZ+1>&777777
4294 IFE <ZZ-1>,<ZZ=777776>
4295 032404 402 00 0 00 000003 SETZM 3 ;PRELOAD AC3 WITH 0
4296 032405 525 01 0 00 377777 HRLOI 1,ZZ ;PRELOAD AC1 WITH FLOATING 0
4297 032406 201 02 0 00 000001 MOVEI 2,1 ;SETUP INDEX REGISTER
4298 032407 200 03 0 02 000000 MOVE 3,(2) ;*FWT FROM INDEXED LOCATION
4299 032410 312 03 0 00 034532 CAME 3,[ZZ,,-1] ;TEST INDEXING
4300 STOP^
4301 032411 254 04 0 00 032412 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4302 032412 324 00 0 00 032413 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4303 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4304 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4305 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4306
4307 ;**********
4308
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0095
4309 ;VERIFY INDEXING WHERE 'E' IS NON-ZERO
4310
4311 001700 SN=1700
4312 777777 777777 ZZ=-1
4313 777777 777770 XX=-10
4314
4315 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4316 ;IN THIS TEST, THE INDEX REG IS SET-UP WITH MOVEI ZZ+1,ZZ-XX,
4317 ;WHERE ZZ+1 IS THE INDEX REG. THE AC IS PRELOADED WITH ITS OWN ADDRESS, 0,,ZZ.
4318 ;CAIE IS USED TO TEST THE INDEXING OPERATION.
4319 ;IF THE RESULT IN C(AC)=XX+C(ZZ+1 - RIGHT), THIS TEST PASSES.
4320 ;XX+C(ZZ+1 - RIGHT) SHOULD = ZZ.
4321
4322 C1700: REPEAT ^D15,
4323 <SN=SN+1
4324 ZZ=ZZ+1
4325 XX=XX+3
4326 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4327 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4328 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4329 STOP
4330
4331 ;**********
4332 >
4333 001701 SN=SN+1
4334 000000 ZZ=ZZ+1
4335 777777 777773 XX=XX+3
4336 032413 201 01 0 00 000005 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4337 032414 201 00 0 00 000000 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4338 032415 302 00 0 01 777773 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4339 STOP^
4340 032416 254 04 0 00 032417 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4341 032417 324 00 0 00 032420 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4342 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4343 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4344 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4345
4346 ;**********
4347
4348 001702 SN=SN+1
4349 000001 ZZ=ZZ+1
4350 777777 777776 XX=XX+3
4351 032420 201 02 0 00 000003 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4352 032421 201 01 0 00 000001 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4353 032422 302 01 0 02 777776 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4354 STOP^
4355 032423 254 04 0 00 032424 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4356 032424 324 00 0 00 032425 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4357 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4358 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4359 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4360
4361 ;**********
4362
4363 001703 SN=SN+1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-1
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0096
4364 000002 ZZ=ZZ+1
4365 000001 XX=XX+3
4366 032425 201 03 0 00 000001 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4367 032426 201 02 0 00 000002 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4368 032427 302 02 0 03 000001 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4369 STOP^
4370 032430 254 04 0 00 032431 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4371 032431 324 00 0 00 032432 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4372 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4373 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4374 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4375
4376 ;**********
4377
4378 001704 SN=SN+1
4379 000003 ZZ=ZZ+1
4380 000004 XX=XX+3
4381 032432 201 04 0 00 777777 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4382 032433 201 03 0 00 000003 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4383 032434 302 03 0 04 000004 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4384 STOP^
4385 032435 254 04 0 00 032436 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4386 032436 324 00 0 00 032437 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4387 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4388 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4389 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4390
4391 ;**********
4392
4393 001705 SN=SN+1
4394 000004 ZZ=ZZ+1
4395 000007 XX=XX+3
4396 032437 201 05 0 00 777775 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4397 032440 201 04 0 00 000004 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4398 032441 302 04 0 05 000007 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4399 STOP^
4400 032442 254 04 0 00 032443 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4401 032443 324 00 0 00 032444 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4402 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4403 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4404 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4405
4406 ;**********
4407
4408 001706 SN=SN+1
4409 000005 ZZ=ZZ+1
4410 000012 XX=XX+3
4411 032444 201 06 0 00 777773 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4412 032445 201 05 0 00 000005 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4413 032446 302 05 0 06 000012 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4414 STOP^
4415 032447 254 04 0 00 032450 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4416 032450 324 00 0 00 032451 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4417 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4418 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-2
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0097
4419 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4420
4421 ;**********
4422
4423 001707 SN=SN+1
4424 000006 ZZ=ZZ+1
4425 000015 XX=XX+3
4426 032451 201 07 0 00 777771 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4427 032452 201 06 0 00 000006 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4428 032453 302 06 0 07 000015 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4429 STOP^
4430 032454 254 04 0 00 032455 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4431 032455 324 00 0 00 032456 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4432 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4433 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4434 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4435
4436 ;**********
4437
4438 001710 SN=SN+1
4439 000007 ZZ=ZZ+1
4440 000020 XX=XX+3
4441 032456 201 10 0 00 777767 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4442 032457 201 07 0 00 000007 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4443 032460 302 07 0 10 000020 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4444 STOP^
4445 032461 254 04 0 00 032462 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4446 032462 324 00 0 00 032463 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4447 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4448 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4449 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4450
4451 ;**********
4452
4453 001711 SN=SN+1
4454 000010 ZZ=ZZ+1
4455 000023 XX=XX+3
4456 032463 201 11 0 00 777765 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4457 032464 201 10 0 00 000010 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4458 032465 302 10 0 11 000023 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4459 STOP^
4460 032466 254 04 0 00 032467 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4461 032467 324 00 0 00 032470 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4462 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4463 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4464 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4465
4466 ;**********
4467
4468 001712 SN=SN+1
4469 000011 ZZ=ZZ+1
4470 000026 XX=XX+3
4471 032470 201 12 0 00 777763 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4472 032471 201 11 0 00 000011 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4473 032472 302 11 0 12 000026 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-3
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0098
4474 STOP^
4475 032473 254 04 0 00 032474 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4476 032474 324 00 0 00 032475 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4477 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4478 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4479 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4480
4481 ;**********
4482
4483 001713 SN=SN+1
4484 000012 ZZ=ZZ+1
4485 000031 XX=XX+3
4486 032475 201 13 0 00 777761 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4487 032476 201 12 0 00 000012 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4488 032477 302 12 0 13 000031 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4489 STOP^
4490 032500 254 04 0 00 032501 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4491 032501 324 00 0 00 032502 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4492 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4493 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4494 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4495
4496 ;**********
4497
4498 001714 SN=SN+1
4499 000013 ZZ=ZZ+1
4500 000034 XX=XX+3
4501 032502 201 14 0 00 777757 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4502 032503 201 13 0 00 000013 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4503 032504 302 13 0 14 000034 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4504 STOP^
4505 032505 254 04 0 00 032506 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4506 032506 324 00 0 00 032507 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4507 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4508 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4509 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4510
4511 ;**********
4512
4513 001715 SN=SN+1
4514 000014 ZZ=ZZ+1
4515 000037 XX=XX+3
4516 032507 201 15 0 00 777755 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4517 032510 201 14 0 00 000014 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4518 032511 302 14 0 15 000037 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4519 STOP^
4520 032512 254 04 0 00 032513 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4521 032513 324 00 0 00 032514 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4522 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4523 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4524 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4525
4526 ;**********
4527
4528 001716 SN=SN+1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-4
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0099
4529 000015 ZZ=ZZ+1
4530 000042 XX=XX+3
4531 032514 201 16 0 00 777753 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4532 032515 201 15 0 00 000015 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4533 032516 302 15 0 16 000042 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4534 STOP^
4535 032517 254 04 0 00 032520 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4536 032520 324 00 0 00 032521 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4537 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4538 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4539 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4540
4541 ;**********
4542
4543 001717 SN=SN+1
4544 000016 ZZ=ZZ+1
4545 000045 XX=XX+3
4546 032521 201 17 0 00 777751 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4547 032522 201 16 0 00 000016 MOVEI ZZ,ZZ ;PRELOAD AC WITH 0,,ZZ
4548 032523 302 16 0 17 000045 CAIE ZZ,XX(ZZ+1) ;*TEST INDEXING
4549 STOP^
4550 032524 254 04 0 00 032525 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4551 032525 324 00 0 00 032526 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4552 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4553 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4554 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4555
4556 ;**********
4557
4558 PAGE
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-5
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0100
4559 002000 SN=2000
4560 777777 777777 ZZ=-1
4561 777777 777760 XX=-20
4562
4563 ;THIS TEST VERIFIES THAT INDEX REGISTER ADDRESSING FUNCTIONS CORRECTLY.
4564 ;IN THIS TEST, THE INDEX REG IS SET-UP WITH MOVEI ZZ+1,ZZ-XX,
4565 ;WHERE ZZ+1 IS THE INDEX REG. INDEXING IS TESTED BY LOADING
4566 ;THE AC VIA MOVEI ZZ,XX(ZZ+1), WHERE XX+C(ZZ+1)=ZZ.
4567 ;IF THE RESULT IN THE AC EQUALS 0,,ZZ, THIS TEST PASSES.
4568
4569 C2000: REPEAT ^D15,
4570 <SN=SN+1
4571 ZZ=ZZ+1
4572 XX=XX+5
4573 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4574 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4575 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4576 STOP
4577
4578 ;**********
4579 >
4580 002001 SN=SN+1
4581 000000 ZZ=ZZ+1
4582 777777 777765 XX=XX+5
4583 032526 201 01 0 00 000013 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4584 032527 201 00 0 01 777765 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4585 032530 302 00 0 00 000000 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4586 STOP^
4587 032531 254 04 0 00 032532 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4588 032532 324 00 0 00 032533 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4589 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4590 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4591 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4592
4593 ;**********
4594
4595 002002 SN=SN+1
4596 000001 ZZ=ZZ+1
4597 777777 777772 XX=XX+5
4598 032533 201 02 0 00 000007 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4599 032534 201 01 0 02 777772 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4600 032535 302 01 0 00 000001 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4601 STOP^
4602 032536 254 04 0 00 032537 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4603 032537 324 00 0 00 032540 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4604 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4605 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4606 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4607
4608 ;**********
4609
4610 002003 SN=SN+1
4611 000002 ZZ=ZZ+1
4612 777777 777777 XX=XX+5
4613 032540 201 03 0 00 000003 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-6
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0101
4614 032541 201 02 0 03 777777 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4615 032542 302 02 0 00 000002 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4616 STOP^
4617 032543 254 04 0 00 032544 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4618 032544 324 00 0 00 032545 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4619 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4620 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4621 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4622
4623 ;**********
4624
4625 002004 SN=SN+1
4626 000003 ZZ=ZZ+1
4627 000004 XX=XX+5
4628 032545 201 04 0 00 777777 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4629 032546 201 03 0 04 000004 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4630 032547 302 03 0 00 000003 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4631 STOP^
4632 032550 254 04 0 00 032551 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4633 032551 324 00 0 00 032552 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4634 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4635 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4636 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4637
4638 ;**********
4639
4640 002005 SN=SN+1
4641 000004 ZZ=ZZ+1
4642 000011 XX=XX+5
4643 032552 201 05 0 00 777773 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4644 032553 201 04 0 05 000011 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4645 032554 302 04 0 00 000004 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4646 STOP^
4647 032555 254 04 0 00 032556 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4648 032556 324 00 0 00 032557 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4649 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4650 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4651 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4652
4653 ;**********
4654
4655 002006 SN=SN+1
4656 000005 ZZ=ZZ+1
4657 000016 XX=XX+5
4658 032557 201 06 0 00 777767 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4659 032560 201 05 0 06 000016 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4660 032561 302 05 0 00 000005 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4661 STOP^
4662 032562 254 04 0 00 032563 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4663 032563 324 00 0 00 032564 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4664 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4665 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4666 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4667
4668 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-7
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0102
4669
4670 002007 SN=SN+1
4671 000006 ZZ=ZZ+1
4672 000023 XX=XX+5
4673 032564 201 07 0 00 777763 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4674 032565 201 06 0 07 000023 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4675 032566 302 06 0 00 000006 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4676 STOP^
4677 032567 254 04 0 00 032570 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4678 032570 324 00 0 00 032571 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4679 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4680 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4681 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4682
4683 ;**********
4684
4685 002010 SN=SN+1
4686 000007 ZZ=ZZ+1
4687 000030 XX=XX+5
4688 032571 201 10 0 00 777757 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4689 032572 201 07 0 10 000030 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4690 032573 302 07 0 00 000007 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4691 STOP^
4692 032574 254 04 0 00 032575 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4693 032575 324 00 0 00 032576 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4694 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4695 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4696 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4697
4698 ;**********
4699
4700 002011 SN=SN+1
4701 000010 ZZ=ZZ+1
4702 000035 XX=XX+5
4703 032576 201 11 0 00 777753 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4704 032577 201 10 0 11 000035 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4705 032600 302 10 0 00 000010 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4706 STOP^
4707 032601 254 04 0 00 032602 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4708 032602 324 00 0 00 032603 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4709 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4710 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4711 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4712
4713 ;**********
4714
4715 002012 SN=SN+1
4716 000011 ZZ=ZZ+1
4717 000042 XX=XX+5
4718 032603 201 12 0 00 777747 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4719 032604 201 11 0 12 000042 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4720 032605 302 11 0 00 000011 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4721 STOP^
4722 032606 254 04 0 00 032607 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4723 032607 324 00 0 00 032610 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-8
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0103
4724 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4725 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4726 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4727
4728 ;**********
4729
4730 002013 SN=SN+1
4731 000012 ZZ=ZZ+1
4732 000047 XX=XX+5
4733 032610 201 13 0 00 777743 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4734 032611 201 12 0 13 000047 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4735 032612 302 12 0 00 000012 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4736 STOP^
4737 032613 254 04 0 00 032614 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4738 032614 324 00 0 00 032615 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4739 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4740 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4741 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4742
4743 ;**********
4744
4745 002014 SN=SN+1
4746 000013 ZZ=ZZ+1
4747 000054 XX=XX+5
4748 032615 201 14 0 00 777737 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4749 032616 201 13 0 14 000054 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4750 032617 302 13 0 00 000013 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4751 STOP^
4752 032620 254 04 0 00 032621 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4753 032621 324 00 0 00 032622 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4754 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4755 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4756 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4757
4758 ;**********
4759
4760 002015 SN=SN+1
4761 000014 ZZ=ZZ+1
4762 000061 XX=XX+5
4763 032622 201 15 0 00 777733 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4764 032623 201 14 0 15 000061 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4765 032624 302 14 0 00 000014 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4766 STOP^
4767 032625 254 04 0 00 032626 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4768 032626 324 00 0 00 032627 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4769 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4770 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4771 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4772
4773 ;**********
4774
4775 002016 SN=SN+1
4776 000015 ZZ=ZZ+1
4777 000066 XX=XX+5
4778 032627 201 16 0 00 777727 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 13-9
DAKADM MAC 19-JAN-77 13:41 TEST OF INDEX REGISTER ADDRESSING SEQ 0104
4779 032630 201 15 0 16 000066 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4780 032631 302 15 0 00 000015 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4781 STOP^
4782 032632 254 04 0 00 032633 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4783 032633 324 00 0 00 032634 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4784 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4785 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4786 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4787
4788 ;**********
4789
4790 002017 SN=SN+1
4791 000016 ZZ=ZZ+1
4792 000073 XX=XX+5
4793 032634 201 17 0 00 777723 MOVEI ZZ+1,ZZ-XX ;SETUP INDEX REGISTER
4794 032635 201 16 0 17 000073 MOVEI ZZ,XX(ZZ+1) ;*TEST INDEXING
4795 032636 302 16 0 00 000016 CAIE ZZ,ZZ ;PASS IF C(AC)=0,,ADDRESS OF AC
4796 STOP^
4797 032637 254 04 0 00 032640 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4798 032640 324 00 0 00 032641 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4799 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4800 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4801 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4802
4803 ;**********
4804
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 14
DAKADM MAC 19-JAN-77 13:41 TEST OF EXCH INSTRUCTION SEQ 0105
4805 SUBTTL TEST OF EXCH INSTRUCTION
4806
4807 ;**********
4808
4809 ;THIS TEST VERIFIES THAT EXCH MOVES C(E) INTO AC AND
4810 ;MOVES C(AC) INTO E.
4811 ;IN THIS CASE, AC=E=0 AND C(AC)=C(E). HENCE, THE FINAL RESULT
4812 ;IN AC0 SHOULD BE 0. IF C(AC)=0, THE TEST PASSES.
4813
4814 032641 400 00 0 00 000000 C2100: SETZ ;PRELOAD AC,E WITH 0
4815 032642 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 0 INTO AC0
4816 032643 332 00 0 00 000000 SKIPE ;PASS IF C(AC0)=0
4817 STOP^
4818 032644 254 04 0 00 032645 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4819 032645 324 00 0 00 032646 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4820 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4821 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4822 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4823
4824 ;**********
4825
4826 ;THIS TEST VERIFIES THAT EXCH MOVES C(E) INTO AC AND
4827 ;MOVES C(AC) INTO E.
4828 ;IN THIS CASE, AC=E=-1,,-1 AND C(AC)=C(E). HENCE, THE FINAL RESULT
4829 ;IN AC0 SHOULD BE -1,,-1. IF C(AC)=-1,,-1, THE TEST PASSES.
4830
4831 032646 474 00 0 00 000000 C2200: SETO ;PRELOAD AC,E WITH -1,,-1
4832 032647 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE -1,,-1 INTO AC0
4833 032650 312 00 0 00 034466 CAME [-1] ;PASS IF C(AC0)=-1,,-1
4834 STOP^
4835 032651 254 04 0 00 032652 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4836 032652 324 00 0 00 032653 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4837 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4838 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4839 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4840
4841 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 15
DAKADM MAC 19-JAN-77 13:41 TEST OF EXCH INSTRUCTION SEQ 0106
4842 ;THIS TEST VERIFIES THAT EXCH MOVES C(E) INTO AC AND
4843 ;MOVES C(AC) INTO E.
4844 ;IN THIS CASE, C(AC)=-1,,0 AND C(E)=0,,-1. HENCE, THE FINAL RESULT
4845 ;IN THE AC SHOULD BE 0,,-1 AND THE RESULT IN E SHOULD BE -1,,0,
4846 ;IF THESE RESULTS OCCUR, THE TEST PASSES.
4847
4848 032653 205 00 0 00 777777 C2400: MOVSI -1 ;PRELOAD AC WITH -1,,0
4849 032654 201 01 0 00 777777 MOVEI 1,-1 ;PRELOAD E WITH 0,,-1
4850 032655 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD PLACE 0,,-1 INTO THE AC AND -1,,0 INTO E
4851 032656 312 01 0 00 034533 CAME 1,[-1,,0] ;PASS IF C(E)=-1,,0
4852 STOP^
4853 032657 254 04 0 00 032660 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4854 032660 324 00 0 00 032661 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4855 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4856 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4857 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4858 032661 312 00 0 00 034534 C2410: CAME 0,[0,,-1] ;PASS IF C(AC)=0,,-1
4859 STOP^
4860 032662 254 04 0 00 032663 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4861 032663 324 00 0 00 032664 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4862 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4863 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4864 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4865
4866 ;**********
4867
4868 ;THIS TEST VERIFIES THAT EXCH MOVES C(E) INTO AC AND
4869 ;MOVES C(AC) INTO E.
4870 ;IN THIS CASE, C(AC)=0,,-1 AND C(E)=-1,,0. HENCE, THE FINAL RESULT
4871 ;IN THE AC SHOULD BE -1,,0 AND THE RESULT IN E SHOULD BE 0,,-1.
4872 ;IF THESE RESULTS OCCUR, THE TEST PASSES.
4873
4874 032664 201 00 0 00 777777 C2700: MOVEI -1 ;PRELOAD AC WITH 0,,-1
4875 032665 205 01 0 00 777777 MOVSI 1,-1 ;PRELOAD E WITH -1,,0
4876 032666 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD PLACE -1,,0 INTO THE AC AND 0,,-1 INTO E
4877 032667 302 01 0 00 777777 CAIE 1,-1 ;PASS IF C(E)=0,,-1
4878 STOP^
4879 032670 254 04 0 00 032671 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4880 032671 324 00 0 00 032672 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4881 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4882 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4883 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4884 032672 312 00 0 00 034533 C2710: CAME ,[XWD -1,0] ;PASS IF C(AC)=-1,,0
4885 STOP^
4886 032673 254 04 0 00 032674 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4887 032674 324 00 0 00 032675 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4888 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4889 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4890 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4891
4892 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 16
DAKADM MAC 19-JAN-77 13:41 TEST OF EXCH INSTRUCTION SEQ 0107
4893 ;THIS TEST IS A RELIABILITY CHECK OF EXCH.
4894 ;FIRST, AC, E ARE PRELOADED WITH 252525,,252525. THERE, EXCH IS
4895 ;EXECUTED 7 TIMES. THE AC IS THEN CHECKED FOR 252525,,252525.
4896 ;IF C(AC)=C(E)=252525,,252525, THIS TEST PASSES.
4897 ;IN THIS TEST AC=E=AC0
4898
4899 032675 200 00 0 00 034535 C3000: MOVE [252525252525] ;PRELOAD AC,E WITH 252525,,252525
4900 REPEAT 7,
4901 < EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0>
4902 032676 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0
4903 032677 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0
4904 032700 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0
4905 032701 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0
4906 032702 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0
4907 032703 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0
4908 032704 250 00 0 00 000000 EXCH ;*EXCH SHOULD PLACE 252525,,252525 INTO AC0
4909 032705 312 00 0 00 034535 CAME [252525252525] ;PASS IF C(AC0)=252525,,252525
4910 STOP^
4911 032706 254 04 0 00 032707 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4912 032707 324 00 0 00 032710 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4913 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4914 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4915 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4916
4917 ;**********
4918 PAGE
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 16-1
DAKADM MAC 19-JAN-77 13:41 TEST OF EXCH INSTRUCTION SEQ 0108
4919 ;THIS TEST VERIFIES THAT EXCH MOVES C(AC) INTO E AND C(E) INTO THE AC.
4920 ;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1. EXCH IS EXECUTED 7 TIMES; THEN,
4921 ;THE AC IS CHECKED FOR -1,,-1 AND E IS CHECKED FOR 0. IF EITHER OF THESE
4922 ;RESULTS ARE NOT FOUND, THIS TEST FAILS.
4923
4924 032710 400 00 0 00 000000 C3100: SETZ ;PRELOAD AC WITH 0
4925 032711 474 01 0 00 000000 SETO 1,0 ;PRELOAD E WITH -1,,-1
4926 REPEAT 7,
4927 < EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)>
4928 032712 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)
4929 032713 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)
4930 032714 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)
4931 032715 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)
4932 032716 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)
4933 032717 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)
4934 032720 250 00 0 00 000001 EXCH 1 ;*EXCH SHOULD EXCHANGE C(AC) AND C(E)
4935 032721 312 00 0 00 034466 CAME [-1] ;PASS IF C(AC)=-1,,-1
4936 STOP^
4937 032722 254 04 0 00 032723 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4938 032723 324 00 0 00 032724 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4939 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4940 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4941 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4942 032724 312 01 0 00 034536 C3110: CAME 1,[0] ;PASS IF C(E)=0
4943 STOP^
4944 032725 254 04 0 00 032726 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4945 032726 324 00 0 00 032727 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4946 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4947 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4948 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4949
4950 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 17
DAKADM MAC 19-JAN-77 13:41 TEST OF MOVEM INSTRUCTION SEQ 0109
4951 SUBTTL TEST OF MOVEM INSTRUCTION
4952
4953 ;THIS TEST VERIFIES THAT MOVEM PLACES C(AC) INTO E AND DOES NOT MODIFY C(AC)
4954 ;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0. HENCE, THE RESULT IN AC AND E SHOULD
4955 ;BE -1,,-1. IF C(AC) AND C(E)=-1,,-1, THIS TEST PASSES
4956
4957 032727 474 00 0 00 000000 C3200: SETO ;PRELOAD AC WITH -1,,-1
4958 032730 400 01 0 00 000000 SETZ 1,0 ;PRELOAD E WITH 0
4959 032731 202 00 0 00 000001 MOVEM 1 ;*MOVEM SHOULD PLACE -1,,-1 INTO E
4960 032732 312 01 0 00 034466 CAME 1,[-1] ;PASS IF C(E)=-1,,-1
4961 STOP^
4962 032733 254 04 0 00 032734 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4963 032734 324 00 0 00 032735 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4964 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4965 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4966 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4967 032735 312 00 0 00 034466 C3210: CAME 0,[-1] ;PASS IF C(AC)=-1,,-1
4968 STOP^
4969 032736 254 04 0 00 032737 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4970 032737 324 00 0 00 032740 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4971 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4972 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4973 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4974
4975 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 18
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0110
4976 SUBTTL TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS
4977
4978 ;**********
4979
4980 ;THIS TEST VERIFIES THAT JFCL 17,.+1 ALWAYS RETURNS TO THE NEXT SEQUENTIAL INSTRUCTION
4981 ;IF JFCL SKIPS THE NEXT INSTRUCTION, THIS TEST FAILS
4982
4983 032740 200 00 0 00 034537 C3300: MOVE [HALT .+3] ;THIS INSTRUCTION SHOULD NOT AFFECT THE TEST
4984 032741 255 17 0 00 032742 JFCL 17,.+1 ;*JFCL SHOULD RETURN TO NEXT SEQUENTIAL INSTRUCTION
4985 032742 304 00 0 00 000000 CAIA ;SKIP HALT INSTRUCTION IF JFCL PASSES
4986 STOP^
4987 032743 254 04 0 00 032744 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4988 032744 324 00 0 00 032745 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4989 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4990 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4991 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4992
4993 ;**********
4994
4995 ;THIS TEST VERIFIES THAT JFCL 17,.+1 ALWAYS CLEARS THE CRY0 FLAG.
4996 ;ADDI IS USED TO SET CRY0. THEN, JFCL 17,.+1 IS EXECUTED TO CLEAR CRY0.
4997 ;JFCL 4,.+2 IS EXECUTED TO DETERMINE WHETHER CRY0 WAS RESET BY THE PREVIOUS JFCL.
4998 ;THIS TEST FAILS IF JFCL 17,.+1 DID NOT CLEAR CRY0
4999
5000 032745 200 00 0 00 034466 C3400: MOVE [-1] ;PRELOAD AC WITH -1,,-1
5001 032746 271 00 0 00 000001 ADDI 1 ;SET CRY0 FLAG
5002 032747 255 17 0 00 032750 JFCL 17,.+1 ;*CLEAR ARITHMETIC FLAGS
5003 032750 255 04 0 00 032752 JFCL 4,.+2 ;PASS IF CRY0 WAS RESET BY PREVIOUS INSTRUCTION
5004 032751 334 00 0 00 000000 SKIPA ;SKIP HALT IF CRY0 WAS CLEARED
5005 STOP^
5006 032752 254 04 0 00 032753 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5007 032753 324 00 0 00 032754 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5008 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5009 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5010 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5011
5012 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 19
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0111
5013 ;THIS TEST VERIFIES THAT JFCL 17,.+1 ALWAYS CLEARS THE CRY1 FLAG.
5014 ;ADDI IS USED TO SET CRY1. THEN, JFCL 17,.+1 IS EXECUTED TO CLEAR CRY1.
5015 ;JFCL 4,.+2 IS EXECUTED TO DETERMINE WHETHER CRY1 WAS RESET BY THE PREVIOUS JFCL.
5016 ;THIS TEST FAILS IF JFCL 17,.+1 DID NOT CLEAR CRY1
5017
5018 032754 200 00 0 00 034466 C3500: MOVE [-1] ;PRELOAD AC WITH -1,,-1
5019 032755 271 00 0 00 000001 ADDI 1 ;SET CRY1 FLAG
5020 032756 255 17 0 00 032757 JFCL 17,.+1 ;*CLEAR ARITHMETIC FLAGS
5021 032757 255 02 0 00 032761 JFCL 2,.+2 ;PASS IF CRY1 WAS RESET BY PREVIOUS INSTRUCTION
5022 032760 334 00 0 00 000000 SKIPA ;SKIP HALT IF CRY1 WAS CLEARED
5023 STOP^
5024 032761 254 04 0 00 032762 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5025 032762 324 00 0 00 032763 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5026 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5027 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5028 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5029
5030 ;**********
5031
5032 ;THIS TEST VERIFIES THAT JFCL 17,.+1 ALWAYS CLEARS THE AROV FLAG.
5033 ;ADDI IS USED TO SET AROV. THEN, JFCL 17,.+1 IS EXECUTED TO CLEAR AROV.
5034 ;JFCL 4,.+2 IS EXECUTED TO DETERMINE WHETHER AROV WAS RESET BY THE PREVIOUS JFCL.
5035 ;THIS TEST FAILS IF JFCL 17,.+1 DID NOT CLEAR AROV
5036
5037 032763 205 00 0 00 400000 C3600: MOVSI 400000 ;PRELOAD AC WITH -1,,-1
5038 032764 270 00 0 00 034465 ADD [XWD 400000,0] ;SET AROV FLAG
5039 032765 255 17 0 00 032766 JFCL 17,.+1 ;*CLEAR ARITHMETIC FLAGS
5040 032766 255 10 0 00 032770 JFCL 10,.+2 ;PASS IF AROV WAS RESET BY PREVIOUS INSTRUCTION
5041 032767 334 00 0 00 000000 SKIPA ;SKIP HALT IF AROV WAS CLEARED
5042 STOP^
5043 032770 254 04 0 00 032771 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5044 032771 324 00 0 00 032772 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5045 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5046 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5047 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5048
5049 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 20
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0112
5050 ;THIS TEST VERIFIES THAT JFCL 0, IS A NO-OP.
5051 ;IN THIS TEST, ADD IS USED TO SET CRY0. THEN JFCL 0,.+2 IS EXECUTED.
5052 ;IF JFCL 0,.+2 DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES
5053
5054 032772 205 00 0 00 400000 C3700: MOVSI 400000 ;PRELOAD AC WITH MOST NEGATIVE NUMBER
5055 032773 270 00 0 00 034466 ADD [-1] ;SET CRY0 FLAG
5056 032774 255 00 0 00 032776 JFCL .+2 ;*JFCL SHOULD RETURN TO NEXT SEQUENTIAL INSTRUCTION
5057 032775 334 00 0 00 000000 SKIPA ;PASS IF JFCL DID NOT SKIP
5058 STOP^
5059 032776 254 04 0 00 032777 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5060 032777 324 00 0 00 033000 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5061 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5062 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5063 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5064
5065 ;**********
5066
5067 ;THIS TEST VERIFIES THAT JFCL 0, IS A NO-OP.
5068 ;IN THIS TEST, ADD IS USED TO SET CRY1. THEN JFCL 0,.+2 IS EXECUTED.
5069 ;IF JFCL 0,.+2 DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES
5070
5071 033000 205 00 0 00 200000 C4000: MOVSI 200000 ;PRELOAD AC WITH MOST NEGATIVE NUMBER
5072 033001 270 00 0 00 034464 ADD [XWD 200000,0] ;SET CRY1 FLAG
5073 033002 255 00 0 00 033004 JFCL .+2 ;*JFCL SHOULD RETURN TO NEXT SEQUENTIAL INSTRUCTION
5074 033003 334 00 0 00 000000 SKIPA ;PASS IF JFCL DID NOT SKIP
5075 STOP^
5076 033004 254 04 0 00 033005 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5077 033005 324 00 0 00 033006 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5078 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5079 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5080 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5081
5082 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 21
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0113
5083 ;THIS TEST VERIFIES THAT ADDI HAS THE ABILITY TO SET AN ARITHMETIC FLAG AND
5084 ;THAT 'JFCL 17,.+2' JUMPS WHENEVER ANY ARITHMETIC FLAG IS SET.
5085 ;IN THIS TEST, ADDI SHOULD SET CRY0 AND CRY1. THEN, JFCL SHOULD SKIP
5086 ;BECAUSE A FLAG WAS SET BY ADDI
5087 ;IF THIS TEST FAILS, ADDI COULD HAVE FAILED TO SET A FLAG OR
5088 ;JFCL COULD HAVE FAILED TO JUMP WHEN A FLAG WAS SET
5089
5090 033006 200 00 0 00 034466 C4100: MOVE [-1] ;PRELOAD AC WITH ALL ONES
5091 033007 271 00 0 00 000001 ADDI 1 ;*ADDI SHOULD SET CRY0/1 FLAGS
5092 033010 255 17 0 00 033012 JFCL 17,.+2 ;*JFCL SHOULD JUMP BECAUSE FLAGS ARE SET
5093 STOP^
5094 033011 254 04 0 00 033012 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5095 033012 324 00 0 00 033013 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5096 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5097 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5098 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5099
5100 ;**********
5101
5102 ;THIS TEST VERIFIES THAT CAI DOES NOT CLEAR ANY ARITHMETIC FLAGS.
5103 ;FIRST, CRY0 AND CRY1 ARE SET BY ADDI; THEN CAI IS EXECUTED.
5104 ;JFCL SHOULD JUMP BECAUSE FLAGS ARE SET. IF JFCL DOES NOT JUMP,
5105 ;THE FLAGS WERE CLEARED BY CAI. HENCE, CAI FAILED
5106
5107 033013 200 00 0 00 034466 C4200: MOVE [-1] ;PRELOAD AC WITH -1,,-1
5108 033014 271 00 0 00 000001 ADDI 1 ;SET CYR0/1 FLAGS
5109 033015 300 17 0 00 000017 CAI 17,17 ;*CAI SHOULD NOT CLEAR FLAGS
5110 033016 255 17 0 00 033020 JFCL 17,.+2 ;PASS IF CAI CLEARED FLAGS
5111 STOP^
5112 033017 254 04 0 00 033020 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5113 033020 324 00 0 00 033021 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5114 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5115 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5116 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5117
5118 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 22
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0114
5119 ;THIS TEST VERIFIES THAT ADDI HAS THE ABILITY TO SET AN ARITHMETIC FLAG AND
5120 ;THAT 'JFCL 17,.+2' JUMPS WHENEVER ANY ARITHMETIC FLAG IS SET.
5121 ;IN THIS TEST, ADDI SHOULD SET CRY0 AND CRY1. THEN JFCL SHOULD SKIP
5122 ;BECAUSE A FLAG WAS SET BY ADDI
5123 ;IF THIS TEST FAILS, ADDI COULD HAVE FAILED TO SET A FLAG OR
5124 ;JFCL COULD HAVE FAILED TO JUMP WHEN A FLAG WAS SET
5125
5126 033021 200 00 0 00 034466 C4300: MOVE [-1] ;PRELOAD AC WITH ALL ONES
5127 033022 271 00 0 00 000001 ADDI 1 ;*ADDI SHOULD SET CRY1 FLAGS
5128 033023 255 02 0 00 033025 JFCL 2,.+2 ;*JFCL SHOULD JUMP BECAUSE CRY1 FLAG IS SET
5129 STOP^
5130 033024 254 04 0 00 033025 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5131 033025 324 00 0 00 033026 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5132 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5133 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5134 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5135
5136 ;**********
5137
5138 ;THIS TEST VERIFIES THAT ADDI HAS THE ABILITY TO SET AN ARITHMETIC FLAG AND
5139 ;THAT 'JFCL 17,.+2' JUMPS WHENEVER ANY ARITHMETIC FLAG IS SET.
5140 ;IN THIS TEST, ADDI SHOULD SET CRY0 AND CRY1. THEN, JFCL SHOULD SKIP
5141 ;BECAUSE A FLAG WAS SET BY ADDI
5142 ;IF THIS TEST FAILS, ADDI COULD HAVE FAILED TO SET A FLAG OR
5143 ;JFCL COULD HAVE FAILED TO JUMP WHEN A FLAG WAS SET
5144
5145 033026 200 00 0 00 034466 C4400: MOVE [-1] ;PRELOAD AC WITH ALL ONES
5146 033027 271 00 0 00 000001 ADDI 1 ;*ADDI SHOULD SET CRY0 FLAG
5147 033030 255 04 0 00 033032 JFCL 4,.+2 ;*JFCL SHOULD JUMP BECAUSE CRY0 FLAG IS SET
5148 STOP^
5149 033031 254 04 0 00 033032 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5150 033032 324 00 0 00 033033 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5151 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5152 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5153 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5154
5155 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 23
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0115
5156 ;THIS TEST VERIFIES THAT ADDI HAS THE ABILITY TO SET AN ARITHMETIC FLAG AND
5157 ;THAT 'JFCL 17,.+2' JUMPS WHENEVER ANY ARITHMETIC FLAG IS SET.
5158 ;BECAUSE A FLAG WAS SET BY ADD
5159 ;IF THIS TEST FAILS, ADDI COULD HAVE FAILED TO SET A FLAG OR
5160 ;JFCL COULD HAVE FAILED TO JUMP WHEN A FLAG WAS SET
5161
5162 033033 205 00 0 00 400000 C4500: MOVSI 400000 ;PRELOAD AC WITH ALL ONES
5163 033034 270 00 0 00 034465 ADD [XWD 400000,0] ;*ADD SHOULD SET AROV FLAG
5164 033035 255 10 0 00 033037 JFCL 10,.+2 ;*JFCL SHOULD JUMP BECAUSE AROV FLAG IS SET
5165 STOP^
5166 033036 254 04 0 00 033037 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5167 033037 324 00 0 00 033040 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5168 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5169 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5170 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5171
5172 ;**********
5173
5174 ;THIS TEST VERIFIES THAT JFCL 17,.+1 ALWAYS CLEARS THE FLOATING OVERFLOW FLAG (FOV).
5175 ;FIRST JFCL 17,.+1 IS EXECUTED TO CLEAR FOV. THEN, JFCL 1,.+2 IS EXECUTED TO DETERMINE
5176 ;WHETHER FOV WAS CLEARED. IF FOV WAS CLEAR, THIS TEST PASSES
5177
5178 033040 255 17 0 00 033041 C4600: JFCL 17,.+1 ;*CLEAR ARITHMETIC FLAGS
5179 033041 255 01 0 00 033043 JFCL 1,.+2 ;PASS IF FOV WAS CLEARED
5180 033042 334 00 0 00 000000 SKIPA ;SKIP HALT IF TEST PASSED
5181 STOP^
5182 033043 254 04 0 00 033044 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5183 033044 324 00 0 00 033045 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5184 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5185 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5186 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5187
5188 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 24
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0116
5189 ;THIS TEST VERIFIES THAT JFCL 13, DOES NOT RESET CRY0.
5190 ;FIRST CRY0 AND CRY1 ARE SET BY ADDI; THEN, JFCL 13,.+2 IS EXECUTED
5191 ;TO CLEAR ALL ARITHMETIC FLAGS EXCEPT CRY0.
5192 ;THIS TEST PASSES IF JFCL 13,.+1 DID NOT RESET CRY0.
5193
5194 033045 200 00 0 00 034466 C4700: MOVE [-1] ;RELOAD AC WITH -1,,-1
5195 033046 271 00 0 00 000001 ADDI 1 ;SET CRY0/1
5196 033047 255 13 0 00 033050 JFCL 13,.+1 ;*JFCL 13, SHOULD NOT RESET CRY0
5197 033050 255 04 0 00 033052 JFCL 4,.+2 ;FAIL IF CRY 0 WAS RESET
5198 STOP^
5199 033051 254 04 0 00 033052 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5200 033052 324 00 0 00 033053 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5201 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5202 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5203 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5204
5205 ;**********
5206
5207 ;THIS TEST VERIFIES THAT JFCL 15, DOES NOT RESET CRY1.
5208 ;FIRST CRY0 AND CRY1 ARE SET BY ADDI; THEN, JFCL15,.+2 IS EXECUTED
5209 ;TO CLEAR ALL ARITHMETIC FLAGS EXCEPT CRY1.
5210 ;THIS TEST PASSES IF JFCL 15,.+1 DID NOT RESET CRY1.
5211
5212 033053 200 00 0 00 034466 C5000: MOVE [-1] ;PRELOAD AC WITH -1,,-1
5213 033054 271 00 0 00 000001 ADDI 1 ;SET CRY0/1
5214 033055 255 15 0 00 033056 JFCL 15,.+1 ;*JFCL15, SHOULD NOT RESET CRY0
5215 033056 255 02 0 00 033060 JFCL 2,.+2 ;FAIL IF CRY1 WAS RESET
5216 STOP^
5217 033057 254 04 0 00 033060 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5218 033060 324 00 0 00 033061 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5219 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5220 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5221 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5222
5223 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 25
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0117
5224 ;THIS TEST VERIFIES THAT JFCL 17, DOES NOT RESET AROV.
5225 ;FIRST AROV IS SET BY ADD; THEN, JFCL 17,.+2 IS EXECUTED
5226 ;TO CLEAR ALL ARITHMETIC FLAGS EXCEPT AROV.
5227 ;THIS TEST PASSES IF JFCL 17,.+1 DID NOT RESET AROV.
5228
5229 033061 205 00 0 00 400000 C5100: MOVSI 400000 ;PRELOAD AC WITH -1,,-1
5230 033062 270 00 0 00 034465 ADD [XWD 400000,0] ;SET AROV
5231 033063 255 07 0 00 033064 JFCL 7,.+1 ;*JFCL 17, SHOULD NOT RESET AROV
5232 033064 255 10 0 00 033066 JFCL 10,.+2 ;FAIL IF AROV WAS RESET
5233 STOP^
5234 033065 254 04 0 00 033066 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5235 033066 324 00 0 00 033067 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5236 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5237 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5238 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5239
5240 ;**********
5241
5242 ;THIS TEST VERIFIES THAT ADD OF 0 TO 0 WILL NOT SET AROV.
5243 ;FIRST, ALL FLAGS ARE RESET, THEN 0 IS ADDED TO 0 VIA ADD.
5244 ;AROV IS THEN CHECKED. IF AROV IS SET, THIS TEST FAILS.
5245
5246 033067 255 17 0 00 033070 C5200: JFCL 17,.+1 ;RESET ARITHMETIC FLAGS
5247 033070 400 00 0 00 000000 SETZ ;PRELOAD AC,E WITH 0
5248 033071 270 00 0 00 000000 ADD ;*ADD SHOULD NOT SET AROV
5249 033072 255 10 0 00 033074 JFCL 10,.+2 ;PASS IF AROV WAS RESET
5250 033073 334 00 0 00 000000 SKIPA ;SKIP HALT IF ADD PASSED
5251 STOP^
5252 033074 254 04 0 00 033075 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5253 033075 324 00 0 00 033076 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5254 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5255 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5256 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5257
5258 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 26
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0118
5259 ;THIS TEST VERIFIES THAT ADD OF 0 TO 0 WILL NOT SET CRY0.
5260 ;FIRST, ALL FLAGS ARE RESET, THEN 0 IS ADDED TO 0 VIA ADD.
5261 ;CRY0 IS THEN CHECKED. IF CRY0 IS SET, THIS TEST FAILS.
5262
5263
5264 033076 400 00 0 00 000000 C5300: SETZ ;RESET ARITHMETIC FLAGS
5265 033077 255 17 0 00 033100 JFCL 17,.+1 ;PRELOAD AC,E WITH 0
5266 033100 270 00 0 00 000000 ADD ;*ADD SHOULD NOT SET CRY0
5267 033101 255 04 0 00 033103 JFCL 4,.+2 ;PASS IF CRY0 WAS RESET
5268 033102 334 00 0 00 000000 SKIPA ;SKIP HALT IF ADD PASSED
5269 STOP^
5270 033103 254 04 0 00 033104 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5271 033104 324 00 0 00 033105 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5272 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5273 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5274 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5275
5276 ;**********
5277
5278 ;THIS TEST VERIFIES THAT ADD OF 0 TO 0 WILL NOT SET CRY1.
5279 ;FIRST, ALL FLAGS ARE RESET, THEN 0 IS ADDED TO 0 VIA ADD.
5280 ;CRY1 IS THEN CHECKED. IF CRY1 IS SET, THIS TEST FAILS.
5281
5282 033105 400 00 0 00 000000 C5400: SETZ ;RESET ARITHMETIC FLAGS
5283 033106 255 17 0 00 033107 JFCL 17,.+1 ;PRELOAD AC,E WITH 0
5284 033107 270 00 0 00 000000 ADD ;*ADD SHOULD NOT SET CRY1
5285 033110 255 02 0 00 033112 JFCL 2,.+2 ;PASS IF CRY1 WAS RESET
5286 033111 334 00 0 00 000000 SKIPA ;SKIP HALT IF ADD PASSED
5287 STOP^
5288 033112 254 04 0 00 033113 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5289 033113 324 00 0 00 033114 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5290 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5291 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5292 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5293
5294 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 27
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0119
5295 ;THIS TEST VERIFIES THAT THE 30X AND THE 31X INSTRUCTION GROUPS DO NOT AFFECT
5296 ;THE ARITHMETIC FLAGS. FIRST, THE FLAGS ARE CLEARED AND AC0 IS CLEARED; THEN, CAI
5297 ;AND CAM ARE EXECUTED. THE FLAGS ARE THEN CHECKED. IF ANY OF THE FLAGS ARE SET,
5298 ;THIS TEST FAILS AND CAI OR CAM IS CONSIDERED TO HAVE ERRONEOUSLY SET THE FLAGS
5299
5300 033114 255 17 0 00 033115 C5500: JFCL 17,.+1 ;CLEAR ALL FLAGS
5301 033115 400 00 0 00 000000 SETZ ;CLEAR AC,0
5302 033116 300 00 0 00 000000 CAI ;*CAI SHOULD NOT SET ANY ARITHMETIC FLAG
5303 033117 310 00 0 00 034466 CAM [-1] ;*CAM SHOULD NOT SET ANY ARITHMETIC FLAG
5304 033120 255 17 0 00 033122 JFCL 17,.+2 ;FAIL IF ANY FLAG WAS SET
5305 033121 334 00 0 00 000000 SKIPA ;SKIP HALT IF TEST PASSED
5306 STOP^
5307 033122 254 04 0 00 033123 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5308 033123 324 00 0 00 033124 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5309 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5310 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5311 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5312
5313 ;**********
5314
5315 ;THIS TEST VERIFIES THAT THE BOOLEAN INSTRUCTION GROUPS DO NOT AFFECT
5316 ;THE ARITHMETIC FLAGS. FIRST THE FLAGS ARE CLEARED AND AC0 IS CLEARED; THEN, XOR [0]
5317 ;AND XOR [-1] ARE EXECUTED. THE FLAGS ARE THEN CHECKED. IF ANY OF THE FLAGS ARE SET,
5318 ;THIS TEST FAILS AND XOR IS CONSIDERED TO HAVE ERRONEOUSLY SET THE FLAGS
5319
5320 033124 255 17 0 00 033125 C5600: JFCL 17,.+1 ;CLEAR ALL FLAGS
5321 033125 474 00 0 00 000000 SETO ;CLEAR AC,0
5322 033126 430 00 0 00 034536 XOR [0] ;*XOR SHOULD NOT SET ANY ARITHMETIC FLAG
5323 033127 430 00 0 00 034466 XOR [-1] ;*XOR SHOULD NOT SET ANY ARITHMETIC FLAG
5324 033130 255 17 0 00 033132 JFCL 17,.+2 ;FAIL IF ANY FLAG WAS SET
5325 033131 334 00 0 00 000000 SKIPA ;SKIP HALT IF TEST PASSED
5326 STOP^
5327 033132 254 04 0 00 033133 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5328 033133 324 00 0 00 033134 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5329 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5330 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5331 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5332
5333 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 28
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0120
5334 ;THIS TEST VERIFIES THAT THE AOBJX INSTRUCTION GROUP DOES DO NOT AFFECT
5335 ;THE ARITHMETIC FLAGS. FIRST THE FLAGS ARE CLEARED AND AC0 IS CLEARED; THEN, AOBJN
5336 ;AND AOBJP ARE EXECUTED. THE FLAGS ARE THEN CHECKED. IF ANY OF THE FLAGS ARE SET,
5337 ;THIS TEST FAILS AND AOBJN OR AOBJP IS CONSIDERED TO HAVE ERRONEOUSLY SET THE FLAGS
5338
5339 033134 474 00 0 00 000000 C5700: SETO ;CLEAR ALL FLAGS
5340 033135 255 17 0 00 033136 JFCL 17,.+1 ;CLEAR AC,0
5341 033136 253 00 0 00 033137 AOBJN .+1 ;*AOBJN SHOULD NOT SET ANY ARITHMETIC ARITHMETIC
5342 033137 252 00 0 00 033140 AOBJP .+1 ;*AOBJP SHOULD NOT SET ANY ARITHMETIC FLAG
5343 033140 255 17 0 00 033142 JFCL 17,.+2 ;FAIL IF ANY FLAG WAS SET
5344 033141 334 00 0 00 000000 SKIPA ;SKIP HALT IF TST PASSED
5345 STOP^
5346 033142 254 04 0 00 033143 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5347 033143 324 00 0 00 033144 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5348 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5349 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5350 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5351
5352 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 29
DAKADM MAC 19-JAN-77 13:41 TEST OF JFCL INSTRUCTION AND ARITHMETIC FLAGS SEQ 0121
5353 ;THIS TEST VERIFIES THAT SKIP DOES NOT AFFECT THE FLAGS.
5354 ;FIRST, THE ARITHMETIC FLAGS ARE CLEARED; THEN, SKIP IS EXECUTED.
5355 ;IF SKIP SETS AROV, CRYO, CRY1 OR FOV, THIS TEST FAILS.
5356
5357 033144 255 17 0 00 033145 C5701: JFCL 17,.+1 ;CLEAR ALL FLAGS
5358 033145 330 00 0 00 034466 SKIP 0,[-1] ;*SKIP SHOULD NOT SET ANY FLAGS
5359 033146 255 17 0 00 033150 JFCL 17,.+2 ;FAIL IF ANY FLAG IS SET
5360 033147 334 00 0 00 000000 SKIPA ;PASS IF NO FLAG IS SET
5361 STOP^
5362 033150 254 04 0 00 033151 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5363 033151 324 00 0 00 033152 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5364 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5365 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5366 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5367
5368 ;**********
5369
5370 ;THIS TEST VERIFIES THAT JUMP DOES NOT AFFECT THE FLAGS.
5371 ;FIRST, THE ARITHMETIC FLAGS ARE CLEARED; THEN, JUMP IS EXECUTED.
5372 ;IF JUMP SETS AROV, CRYO, CRY1 OR FOV, THIS TEST FAILS.
5373
5374 033152 255 17 0 00 033153 C5702: JFCL 17,.+1 ;CLEAR ALL FLAGS
5375 033153 320 00 0 00 034466 JUMP 0,[-1] ;*JUMP SHOULD NOT SET ANY FLAGS
5376 033154 255 17 0 00 033156 JFCL 17,.+2 ;FAIL IF ANY FLAG IS SET
5377 033155 334 00 0 00 000000 SKIPA ;PASS IF NO FLAG IS SET
5378 STOP^
5379 033156 254 04 0 00 033157 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5380 033157 324 00 0 00 033160 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5381 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5382 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5383 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5384
5385 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 30
DAKADM MAC 19-JAN-77 13:41 TEST OF JRST INSTRUCTION AND ARITHMETIC FLAGS SEQ 0122
5386 SUBTTL TEST OF JRST INSTRUCTION AND ARITHMETIC FLAGS
5387
5388 ;**********
5389
5390 ;THIS TEST VERIFIES THAT 'JRST, 0' DOES NOT SET ANY FLAGS.
5391 ;FIRST THE ARITHMETIC FLAGS ARE RESET; THEN, 'JRST 0,.+1' IS EXECUTED
5392 ;THE AROV,CRY0 AND CRY1 FLAGS ARE THEN CHECKED. IF ANY
5393 ;OF THESE FLAGS ARE SET, THIS TEST FAILS
5394
5395 033160 255 17 0 00 033161 C6000: JFCL 17,.+1 ;RESET ALL FLAGS
5396 033161 254 00 0 00 033162 JRST .+1 ;*JRST SHOULD NOT SET ANY FLAGS
5397 033162 255 16 0 00 033164 JFCL 16,.+2 ;PASS IF NO FLAGS ARE SET
5398 033163 334 00 0 00 000000 SKIPA ;SKIP HALT IF JRST PASSES
5399 STOP^
5400 033164 254 04 0 00 033165 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5401 033165 324 00 0 00 033166 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5402 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5403 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5404 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5405
5406 ;**********
5407
5408 ;THIS TEST VERIFIES THAT 'MOVE 2,2' DOES NOT SET ANY FLAGS.
5409 ;FIRST, THE ARITHMETIC FLAGS ARE RESET; THEN, 'MOVE 2,2' IS EXECUTED.
5410 ;THE FOV,AROV,CRY0 AND CRY1 FLAGS ARE THEN CHECKED. IF ANY
5411 ;OF THESE FLAGS ARE SET, THIS TEST FAILS
5412
5413 033166 255 17 0 00 033167 C6100: JFCL 17,.+1 ;RESET ALL FLAGS
5414 033167 200 02 0 00 000002 MOVE 2,2 ;*MOVE SHOULD NOT SET ANY FLAGS
5415 033170 255 17 0 00 033172 JFCL 17,.+2 ;PASS IF NO FLAGS ARE SET
5416 033171 334 00 0 00 000000 SKIPA ;SKIP HALT IF MOVE PASSED
5417 STOP^
5418 033172 254 04 0 00 033173 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5419 033173 324 00 0 00 033174 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5420 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5421 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5422 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5423
5424 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 31
DAKADM MAC 19-JAN-77 13:41 TEST OF JRST INSTRUCTION AND ARITHMETIC FLAGS SEQ 0123
5425 ;THIS TEST VERIFIES THAT JRST 2,.+1(1) WILL SET THE ARITHMETIC FLAG
5426 ;SPECIFIED IN AC1. IN THIS CASE, AC1 SPECIFIES THE CRY0 FLAG.
5427 ;FIRST, ALL FLAGS ARE RESET; THEN AC1 IS SET TO SPECIFY CRY0.
5428 ;NEXT, JRST 2,.+1(1) IS EXECUTED TO SET CRY0. CRY0 IS THEN CHECKED. IF
5429 ;CRY0 IS SET, THIS TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5430
5431 033174 255 17 0 00 033175 C6200: JFCL 17,.+1 ;CLEAR ALL FLAGS
5432 SFLAG CRY0 ^;SET CRY0 FLAG
5433
5434 033175 205 01 0 00 200000 MOVSI 1,CRY0
5435 033176 255 17 0 00 033177 JFCL 17,.+1 ;RESET ALL FLAGS
5436 033177 254 02 0 01 033200 JRST 2,.+1(1) ;SET CRY0 FLAG
5437 033200 255 04 0 00 033202 JFCL 4,.+2 ;PASS IF CRY0 IS SET
5438 STOP^
5439 033201 254 04 0 00 033202 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5440 033202 324 00 0 00 033203 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5441 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5442 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5443 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5444
5445 ;**********
5446
5447 ;THIS TEST VERIFIES THAT JRST 2,.+(1) WILL SET THE ARITHMETIC FLAG
5448 ;SPECIFIED IN AC1. IN THIS CASE, AC1 CONTAIN 0. HENCE, JRST 2,.+1(1)
5449 ;SHOULD RESET THE ARITHMETIC FLAGS. FIRST, THE CRY0/1, FLAGS ARE SET BY ADDI;
5450 ;THEN THE FLAGS SHOULD BE CLEARED BY JRST 2,.+1. IF CRY1 WAS CLEARED, THE
5451 ;TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5452
5453 033203 200 00 0 00 034466 C6300: MOVE [-1] ;PRELOAD AC0 WITH -1,,-1
5454 033204 271 00 0 00 000001 ADDI 1 ;SET CRY0/1 FLAGS
5455 SFLAG 0 ^;RESET ALL ARITHMETIC FLAGS
5456
5457 033205 205 01 0 00 000000 MOVSI 1,0
5458 033206 255 17 0 00 033207 JFCL 17,.+1 ;RESET ALL FLAGS
5459 033207 254 02 0 01 033210 JRST 2,.+1(1) ;SET 0 FLAG
5460 033210 255 02 0 00 033212 JFCL 2,.+2 ;PASS IF CRY1 IS RESET
5461 033211 334 00 0 00 000000 SKIPA ;SKIP HALT INSTRUCTION IF TEST PASSED
5462 STOP^
5463 033212 254 04 0 00 033213 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5464 033213 324 00 0 00 033214 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5465 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5466 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5467 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5468
5469 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 32
DAKADM MAC 19-JAN-77 13:41 TEST OF JRST INSTRUCTION AND ARITHMETIC FLAGS SEQ 0124
5470
5471 ;THIS TEST VERIFIES THAT JRST 2,.+(1) WILL SET THE ARITHMETIC FLAG
5472 ;SPECIFIED IN AC1. IN THIS CASE, AC1 CONTAIN 0. HENCE, JRST 2,.+1(1)
5473 ;SHOULD RESET THE ARITHMETIC FLAGS. FIRST, THE CRY0/1, FLAGS ARE SET BY ADD
5474 ;THEN THE FLAGS SHOULD BE CLEARED BY JRST 2,.+1. IF AROV WAS CLEARED, THE
5475 ;TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5476
5477 033214 205 00 0 00 400000 C6400: MOVSI 400000 ;PRELOAD AC0 WITH -1,,-1
5478 033215 270 00 0 00 034466 ADD [-1] ;SET CRY0 AND AROV FLAGS
5479 SFLAG 0 ^;RESET ALL ARITHMETIC FLAGS
5480
5481 033216 205 01 0 00 000000 MOVSI 1,0
5482 033217 255 17 0 00 033220 JFCL 17,.+1 ;RESET ALL FLAGS
5483 033220 254 02 0 01 033221 JRST 2,.+1(1) ;SET 0 FLAG
5484 033221 255 10 0 00 033223 JFCL 10,.+2 ;PASS IF AROV IS RESET
5485 033222 334 00 0 00 000000 SKIPA ;SKIP HALT INSTRUCTION IF TEST PASSED
5486 STOP^
5487 033223 254 04 0 00 033224 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5488 033224 324 00 0 00 033225 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5489 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5490 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5491 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5492
5493 ;**********
5494
5495 ;THIS TEST VERIFIES THAT JRST 2,.+1(1) WILL SET THE ARITHMETIC FLAG
5496 ;SPECIFIED IN AC1. IN THIS CASE, AC1 SPECIFIES THE AROV FLAG.
5497 ;FIRST, ALL FLAGS ARE RESET; THEN AC1 SET TO SPECIFY AROV.
5498 ;NEXT, JRST 2,.+1(1) IS EXECUTED TO SET AROV. AROV IS THEN CHECKED. IF
5499 ;AROV IS SET, THIS TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5500
5501 033225 C6500: SFLAG AROV ^;SET AROV FLAG
5502
5503 033225 205 01 0 00 400000 MOVSI 1,AROV
5504 033226 255 17 0 00 033227 JFCL 17,.+1 ;RESET ALL FLAGS
5505 033227 254 02 0 01 033230 JRST 2,.+1(1) ;SET AROV FLAG
5506 033230 255 10 0 00 033232 JFCL 10,.+2 ;PASS IF AROV WAS SET
5507 STOP^
5508 033231 254 04 0 00 033232 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5509 033232 324 00 0 00 033233 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5510 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5511 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5512 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5513
5514 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 33
DAKADM MAC 19-JAN-77 13:41 TEST OF JRST INSTRUCTION AND ARITHMETIC FLAGS SEQ 0125
5515 ;THIS TEST VERIFIES THAT JRST 2,.+1(1) WILL SET THE ARITHMETIC FLAG
5516 ;SPECIFIED IN AC1. IN THIS CASE, AC1 SPECIFIES THE CRY1 FLAG.
5517 ;FIRST, ALL FLAGS ARE RESET; THEN AC1 SET TO SPECIFY CRY1.
5518 ;NEXT, JRST 2,.+1(1) IS EXECUTED TO SET CRY1. CRY1 IS THEN CHECKED. IF
5519 ;CRY1 IS SET, THIS TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5520
5521 033233 C6600: SFLAG CRY1 ^;SET CRY1 FLAG
5522
5523 033233 205 01 0 00 100000 MOVSI 1,CRY1
5524 033234 255 17 0 00 033235 JFCL 17,.+1 ;RESET ALL FLAGS
5525 033235 254 02 0 01 033236 JRST 2,.+1(1) ;SET CRY1 FLAG
5526 033236 255 02 0 00 033240 JFCL 2,.+2 ;PASS IF CRY1 WAS SET
5527 STOP^
5528 033237 254 04 0 00 033240 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5529 033240 324 00 0 00 033241 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5530 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5531 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5532 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5533
5534 ;**********
5535
5536 ;THIS TEST VERIFIES THAT JRST 2,.+1(1) WILL SET THE ARITHMETIC FLAG
5537 ;SPECIFIED IN AC1. IN THIS CASE, AC1 SPECIFIES THE FOV FLAG.
5538 ;FIRST, ALL FLAGS ARE RESET; THEN AC1 SET TO SPECIFY FOV.
5539 ;NEXT, JRST 2,.+1(1) IS EXECUTED TO SET FOV. FOV IS THEN CHECKED. IF
5540 ;FOV IS SET, THIS TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5541
5542 033241 C6700: SFLAG FOV ^;SET FOV FLAG
5543
5544 033241 205 01 0 00 040000 MOVSI 1,FOV
5545 033242 255 17 0 00 033243 JFCL 17,.+1 ;RESET ALL FLAGS
5546 033243 254 02 0 01 033244 JRST 2,.+1(1) ;SET FOV FLAG
5547 033244 255 01 0 00 033246 JFCL 1,.+2 ;PASS IF FOV WAS SET
5548 STOP^
5549 033245 254 04 0 00 033246 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5550 033246 324 00 0 00 033247 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5551 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5552 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5553 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5554
5555 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 34
DAKADM MAC 19-JAN-77 13:41 TEST OF JRST INSTRUCTION AND ARITHMETIC FLAGS SEQ 0126
5556 ;THIS TEST VERIFIES THAT JFCL 0, SHOULD NEVER JUMP.
5557 ;FIRST, FOV IS SET VIA JRST2, ;THEN JFCL 0,
5558 ;IS EXECUTED. IF JFCL 0, DOES NOT SKIP, THIS TEST PASSES
5559
5560 033247 C7000: SFLAG FOV ^;SET FOV FLAG
5561
5562 033247 205 01 0 00 040000 MOVSI 1,FOV
5563 033250 255 17 0 00 033251 JFCL 17,.+1 ;RESET ALL FLAGS
5564 033251 254 02 0 01 033252 JRST 2,.+1(1) ;SET FOV FLAG
5565 033252 255 00 0 00 033254 JFCL ,.+2 ;*JFCL SHOULD NOT JUMP
5566 033253 334 00 0 00 000000 SKIPA ;PASS IF JFCL DID NOT JUMP
5567 STOP^
5568 033254 254 04 0 00 033255 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5569 033255 324 00 0 00 033256 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5570 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5571 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5572 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5573
5574 ;**********
5575
5576 ;THIS TEST VERIFIES THAT JRST 2,.+1(1) WILL SET THE ARITHMETIC FLAG
5577 ;SPECIFIED IN AC1. IN THIS CASE, AC1 CONTAINS 0. HENCE, JRST 2,.+1(1)
5578 ;SHOULD RESET THE ARITHMETIC FLAGS. FIRST, THE CRY0, FLAG IS SET BY JRST 2,.+1(1)
5579 ;WITH C(AC1)=CRY0. THEN, THE FLAGS SHOULD BE CLEARED BY JRST 2,.+1 WITH C(AC1)=0.
5580 ;IF CRY0 WAS CLEARED, THE TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5581
5582 033256 C7100: SFLAG CRY0 ^;SET CRY0 FLAGS
5583
5584 033256 205 01 0 00 200000 MOVSI 1,CRY0
5585 033257 255 17 0 00 033260 JFCL 17,.+1 ;RESET ALL FLAGS
5586 033260 254 02 0 01 033261 JRST 2,.+1(1) ;SET CRY0 FLAG
5587 033261 400 01 0 00 000000 SETZ 1, ;SETUP MASK TO CLEAR ARITHMETIC FLAGS
5588 033262 254 02 0 01 033263 JRST 2,.+1(1) ;*RESET ARITHMETIC FLAGS
5589 033263 255 04 0 00 033265 JFCL 4,.+2 ;PASS IF CRY0 FLAG WAS RESET
5590 033264 334 00 0 00 000000 SKIPA ;SKIP HALT INSTRUCTION IF TEST PSSED
5591 STOP^
5592 033265 254 04 0 00 033266 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5593 033266 324 00 0 00 033267 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5594 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5595 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5596 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5597
5598 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 35
DAKADM MAC 19-JAN-77 13:41 TEST OF JRST INSTRUCTION AND ARITHMETIC FLAGS SEQ 0127
5599 ;THIS TEST VERIFIES THAT JRST 2,.+1(1) WILL SET THE ARITHMETIC FLAG
5600 ;SPECIFIED IN AC1. IN THIS CASE, AC1 CONTAINS 0. HENCE, JRST 2,.+1(1)
5601 ;SHOULD RESET THE ARITHMETIC FLAGS. FIRST, THE FOV, FLAG IS SET BY JRST 2,.+1(1)
5602 ;WITH C(AC1)=FOV. THEN, THE FLAGS SHOULD BE CLEARED BY JRST 2,.+1 WITH C(AC1)=0.
5603 ;IF FOV WAS CLEARED, THE TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5604
5605 033267 C7200: SFLAG FOV ^;SET FOV FLAG
5606
5607 033267 205 01 0 00 040000 MOVSI 1,FOV
5608 033270 255 17 0 00 033271 JFCL 17,.+1 ;RESET ALL FLAGS
5609 033271 254 02 0 01 033272 JRST 2,.+1(1) ;SET FOV FLAG
5610 033272 400 01 0 00 000000 SETZ 1, ;SETUP MASK TO CLEAR ARITHMETIC FLAGS,
5611 033273 254 02 0 01 033274 JRST 2,.+1(1) ;*RESET ARITHMETIC FLAGS
5612 033274 255 01 0 00 033276 JFCL 1,.+2 ;PASS IF FOV FLAG WAS RESET
5613 033275 334 00 0 00 000000 SKIPA ;SKIP HALT INSTRUCTION IF TEST PSSED
5614 STOP^
5615 033276 254 04 0 00 033277 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5616 033277 324 00 0 00 033300 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5617 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5618 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5619 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5620
5621 ;**********
5622
5623 ;THIS TEST VERIFIES THAT JRST 2,.+1(1) WILL SET THE ARITHMETIC FLAG
5624 ;SPECIFIED IN AC1. IN THIS CASE, AC1 CONTAINS 0. HENCE, JRST 2,.+1(1)
5625 ;SHOULD RESET THE ARITHMETIC FLAGS. FIRST, THE ARITHMETIC FLAGS ARE RESET BY
5626 ;JFCL 17,.+1. THEN, THE FLAGS SHOULD BE CLEARED BY JRST 2,.+1.
5627 ;IF ALL THE ARITHMETIC FLAGS WERE CLEARED,
5628 ;THE TEST PASSES. OTHERWISE, JRST 2,.+1 IS FAULTY
5629
5630 033300 255 17 0 00 033301 C7300: JFCL 17,.+1 ;CLEAR FLAGS
5631 033301 400 01 0 00 000000 SETZ 1, ;SETUP MASK TO CLEAR ARITMETIC FLAGS
5632 033302 254 02 0 01 033303 JRST 2,.+1(1) ;*RESET ARITHMETIC FLAGS
5633 033303 255 17 0 00 033305 JFCL 17,.+2 ;PASS IF ALL FLAGS ARE RESET
5634 033304 334 00 0 00 000000 SKIPA ;SKIP HALT INSTRUCTION IF TEST PASSED
5635 STOP^
5636 033305 254 04 0 00 033306 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5637 033306 324 00 0 00 033307 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5638 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5639 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5640 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5641
5642 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 36
DAKADM MAC 19-JAN-77 13:41 TEST OF JSP INSTRUCTION SEQ 0128
5643 SUBTTL TEST OF JSP INSTRUCTION
5644
5645 ;**********
5646
5647 ;THIS TEST VERIFIES THAT JSP ALWAYS STORES THE FLAGS AND PC IN THE AC.
5648 ;IN THIS CASE, THE FLAGS ARE RESET; THEN, JSP IS EXECUTED. THE AC IS THEN
5649 ;CHECKED FOR ITS CONTENTS NON-ZERO. IF C(AC)=0, IT INDICATES
5650 ;THAT NEITHER THE FLAGS NOR THE PC WAS SAVED. HENCE, THIS TEST FAILS.
5651
5652 033307 403 00 0 00 000001 C7400: SETZB 1 ;CLEAR AC AND SETUP MASK TO RESET FLAGS
5653 033310 254 02 0 01 033311 JRST 2,.+1(1) ;RESET FLAGS
5654 033311 265 00 0 00 033312 JSP .+1 ;*JSP SHOULD STORE FLAGS AND PC IN THE AC
5655 033312 336 00 0 00 000000 SKIPN ;PASS IF C(AC) IS NON-ZERO
5656 STOP ^;IT DID NOT STORE ANY FLAGS OR PC
5657
5658 033313 254 04 0 00 033314 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5659 033314 324 00 0 00 033315 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5660 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5661 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5662 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1
5663
5664 ;**********
5665
5666 ;THIS TEST VERIFIES THAT JSP ALWAYS STORES THE PC IN THE RIGHT HALF OF THE AC.
5667 ;IN THIS CASE, THE AC IS CLEARED, THEN, JSP IS EXECUTED. THE RIGHT HALF OF
5668 ;THE AC IS THEN CHECKED FOR ITS CONTENTS NON-ZERO. IF C(AC RIGHT HALF)
5669 ;IS NON-ZERO, IT INDICATED THAT THE PC WAS SAVED; AND THIS TEST PASSES.
5670
5671 033315 400 00 0 00 000000 C7500: SETZ ;CLEAN AC
5672 033316 265 00 0 00 033317 JSP .+1 ;*JSP SHOULD STORE THE PC IN THE AC
5673 033317 606 00 0 00 777777 TRNN -1 ;PASS IF C(AC) IN NON-ZERO
5674 STOP^
5675 033320 254 04 0 00 033321 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5676 033321 324 00 0 00 033322 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5677 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5678 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5679 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5680
5681 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 37
DAKADM MAC 19-JAN-77 13:41 TEST OF JSP INSTRUCTION SEQ 0129
5682 ;THIS TEST VERIFIES THAT JSP ALWAYS STORES THE FLAGS IN THE LEFT HALF OF THE AC.
5683 ;FIST, THE AC IS CLEARED; THEN, SOME FLAGS ARE SET AND JSP IS EXECUTED.
5684 ;THE LEFT HALF OF THE AC IS CHECKED FOR ITS CONTENTS NON-ZERO TO DETERMINE
5685 ;WHETHER THE FLAGS WERE SAVED. IF C(AC-LEFT) IS NON-ZERO, THIS TEST PASSES
5686
5687 033322 402 00 0 00 000000 C7600: SETZM 0 ;CLEAR AC
5688 033323 205 01 0 00 740000 MOVSI 1,740000 ;SET UP MASK TO SET FLAGS
5689 033324 254 02 0 01 033325 JRST 2,.+1(1) ;SET SOME ARITHMETIC FLAGS
5690 033325 265 00 0 00 033326 JSP .+1 ;*JSP SHOULD STORE FLAGS IN THE AC
5691 033326 607 00 0 00 777777 TLNN -1 ;PASS IF C(AC) IS NON-ZERO
5692 STOP^
5693 033327 254 04 0 00 033330 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5694 033330 324 00 0 00 033331 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5695 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5696 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5697 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5698
5699 ;**********
5700
5701 ;THIS TEST VERIFIES THAT JSP ALWAYS STORES THE FLAGS IN THE LEFT HALF OF THE AC.
5702 ;FIRST, THE AC IS CLEARED; THEN, THE AROV FLAG IS SET AND JSP IS EXECUTED.
5703 ;THEN, THE AROV FLAG BIT OF
5704 ;THE LEFT HALF OF THE AC IS CHECKED FOR ITS CONTENTS NON-ZERO TO DETERMINE
5705 ;WHETHER THE AROV FLAG WAS SAVED. IF THE AROV FLAG BIT OF THE AC IS SET, THIS TEST PASSES
5706
5707 033331 402 00 0 00 000000 C7700: SETZM 0 ;CLEAR THE AC
5708 SFLAG AROV ^;SET AROV FLAG
5709
5710 033332 205 01 0 00 400000 MOVSI 1,AROV
5711 033333 255 17 0 00 033334 JFCL 17,.+1 ;RESET ALL FLAGS
5712 033334 254 02 0 01 033335 JRST 2,.+1(1) ;SET AROV FLAG
5713 033335 265 00 0 00 033336 JSP .+1 ;*JSP SHOULD SAVE THE FLAGS IN THE AC-LEFT
5714 033336 607 00 0 00 400000 TLNN AROV ;PASS IF AROV WAS SAVED
5715 STOP^
5716 033337 254 04 0 00 033340 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5717 033340 324 00 0 00 033341 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5718 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5719 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5720 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5721
5722 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 38
DAKADM MAC 19-JAN-77 13:41 TEST OF JSP INSTRUCTION SEQ 0130
5723 ;THIS TEST VERIFIES THAT JSP ALWAYS STORES THE FLAGS IN THE LEFT HALF OF THE AC.
5724 ;FIRST, THE AC IS CLEARED; THEN, THE CRY0 FLAG IS SET AND JSP IS EXECUTED.
5725 ;THEN, THE CRY0 FLAG BIT OF
5726 ;THE LEFT HALF OF THE AC IS CHECKED FOR ITS CONTENTS NON-ZERO TO DETERMINE
5727 ;WHETHER THE CRY0 FLAG WAS SAVED. IF THE CRY0 FLAG BIT OF THE AC IS SET, THIS TEST PASSES
5728
5729 033341 402 00 0 00 000000 C10000: SETZM 0 ;CLEAR THE AC
5730 SFLAG CRY0 ^;SET CRY0 FLAG
5731
5732 033342 205 01 0 00 200000 MOVSI 1,CRY0
5733 033343 255 17 0 00 033344 JFCL 17,.+1 ;RESET ALL FLAGS
5734 033344 254 02 0 01 033345 JRST 2,.+1(1) ;SET CRY0 FLAG
5735 033345 265 00 0 00 033346 JSP .+1 ;*JSP SHOULD SAVE THE FLAGS IN THE AC-LEFT
5736 033346 607 00 0 00 200000 TLNN CRY0 ;PASS IF CRY0 WAS SAVED
5737 STOP^
5738 033347 254 04 0 00 033350 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5739 033350 324 00 0 00 033351 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5740 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5741 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5742 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5743
5744 ;**********
5745
5746 ;THIS TEST VERIFIES THAT JSP ALWAYS STORES THE FLAGS IN THE LEFT HALF OF THE AC.
5747 ;FIRST, THE AC IS CLEARED; THEN, THE CRY1 FLAG IS SET AND JSP IS EXECUTED.
5748 ;THEN, THE CRY1 FLAG BIT OF
5749 ;THE LEFT HALF OF THE AC IS CHECKED FOR ITS CONTENTS NON-ZERO TO DETERMINE
5750 ;WHETHER THE FLAG WAS SAVED. IF THE CRY1 FLAG BIT OF THE AC IS SET, THIS TEST PASSES
5751
5752 033351 400 00 0 00 000000 C10100: SETZ ;CLEAR AC
5753 SFLAG CRY1 ^;SET CRY1 FLAG
5754
5755 033352 205 01 0 00 100000 MOVSI 1,CRY1
5756 033353 255 17 0 00 033354 JFCL 17,.+1 ;RESET ALL FLAGS
5757 033354 254 02 0 01 033355 JRST 2,.+1(1) ;SET CRY1 FLAG
5758 033355 265 00 0 00 033356 JSP .+1 ;*JSP SHOULD SAVE THE FLAGS IN THE AC-LEFT
5759 033356 607 00 0 00 100000 TLNN CRY1 ;PASS IF AROV WAS SAVED
5760 STOP^
5761 033357 254 04 0 00 033360 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5762 033360 324 00 0 00 033361 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5763 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5764 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5765 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5766
5767 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 39
DAKADM MAC 19-JAN-77 13:41 TEST OF JSP INSTRUCTION SEQ 0131
5768 ;THIS TEST VERIFIES THAT JSP ALWAYS STORES THE FLAGS IN THE LEFT HALF OF THE AC.
5769 ;FRIST, THE AC IS CLEARED; THEN, THE FOV FLAG IS SET AND JSP IS EXECUTED.
5770 ;THEN, THE FOV FLAG BIT OF THE LEFT HALF OF THE AC IS CHECKED FOR
5771 ;ITS CONTENTS NON-ZERO TO DETERMINE WHETHER THE FOV FLAG WAS SAVED.
5772 ;IF THE FOV FLAG BIT OF THE AC IS SET, THIS TEST PASSES
5773
5774 033361 400 00 0 00 000000 C10200: SETZ ;CLEAR THE AC
5775 SFLAG FOV ^;SET FOV FLAG
5776
5777 033362 205 01 0 00 040000 MOVSI 1,FOV
5778 033363 255 17 0 00 033364 JFCL 17,.+1 ;RESET ALL FLAGS
5779 033364 254 02 0 01 033365 JRST 2,.+1(1) ;SET FOV FLAG
5780 033365 265 00 0 00 033366 JSP .+1 ;*JSP SHOULD SAVE THE FLAGS IN THE AC-LEFT
5781 033366 607 00 0 00 040000 TLNN FOV ;PASS IF FOV WAS SAVED
5782 STOP^
5783 033367 254 04 0 00 033370 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5784 033370 324 00 0 00 033371 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5785 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5786 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5787 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5788
5789 ;**********
5790
5791 ;THIS TEST VERIFIES THAT JSP WILL STORE ONLY FLAGS THAT EXIST.
5792 ;I.E. RESET FLAGS WILL NOT BE SET IN THE AC. ONLY FLAGS THAT ARE
5793 ;CLEARABLE BY JRSTF WILL BE CHECKED HERE. FIRST ALL CLEARABLE
5794 ;FLAGS ARE RESET BY JRSTF; THEN JSP IS EXECUTED. THE AC IS THEN CHECKED.
5795 ;IF ANY CLEARABLE FLAGS ARE SET IN THE AC, THIS TEST FAILS.
5796
5797 033371 C10300: SFLAG 0 ^;CLEAR ALL CLEARABLE FLAGS
5798
5799 033371 205 01 0 00 000000 MOVSI 1,0
5800 033372 255 17 0 00 033373 JFCL 17,.+1 ;RESET ALL FLAGS
5801 033373 254 02 0 01 033374 JRST 2,.+1(1) ;SET 0 FLAG
5802 033374 265 00 0 00 033375 JSP .+1 ;*JSP SHOULD NOT STORE CLEARABLE FALGS
5803 033375 603 00 0 00 761777 TLNE 761777 ;FAIL IF ANY CLEARABLE FLAG IS SET
5804 STOP^
5805 033376 254 04 0 00 033377 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5806 033377 324 00 0 00 033400 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5807 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5808 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5809 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5810
5811 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 40
DAKADM MAC 19-JAN-77 13:41 TEST OF JSP INSTRUCTION SEQ 0132
5812 ;THIS TEST VERIFIES THAT JSP ALWAYS JUMPS.
5813 ;IN THIS TEST, JSP .+2 IS EXECUTED. IF JSP JUMPS, THE TEST PASSES;
5814 ;OTHERWISE, THIS TEST HALTS
5815
5816 033400 265 00 0 00 033402 C10400: JSP .+2 ;*JSP SHOULD ALWAYS JUMP
5817 STOP^
5818 033401 254 04 0 00 033402 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5819 033402 324 00 0 00 033403 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5820 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5821 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5822 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5823
5824 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 41
DAKADM MAC 19-JAN-77 13:41 TEST JRST INSTRUCTION SEQ 0133
5825 SUBTTL TEST JRST INSTRUCTION
5826
5827 ;**********
5828
5829 ;THIS TEST VERIFIES THAT JRST ALWAYS JUMPS.
5830 ;IN THIS TEST, JRST .+2 IS EXECUTED. IF JRST JUMPS, THE TEST PASSES;
5831 ;OTHERWISE, THIS TEST HALTS
5832
5833 033403 254 00 0 00 033405 C10500: JRST .+2 ;*JRST 0, SHOULD ALWAYS JUMP
5834 STOP^
5835 033404 254 04 0 00 033405 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5836 033405 324 00 0 00 033406 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5837 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5838 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5839 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5840
5841 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 42
DAKADM MAC 19-JAN-77 13:41 TEST OF AOBJX INSTRUCTIONS SEQ 0134
5842 SUBTTL TEST OF AOBJX INSTRUCTIONS
5843
5844 ;**********
5845
5846 ;THIS TEST VERIFIES THAT AOBJN ALWAYS ADDS 1 TO BOTH HALVES OF THE AC.
5847 ;FIRST, THE AC IS CLEARED; THEN, AOBJN IS EXECUTED AND THE AC IS CHECKED
5848 ;FOR 1,,1. IF C(AC)=1,,1, THIS TEST PASSES.
5849
5850 033406 400 00 0 00 000000 C11200: SETZ ;CLEAR THE AC
5851 033407 253 00 0 00 033410 AOBJN .+1 ;*AOBJN SHOULD ADD 1 TO BOTH HALVES OF THE AC
5852 033410 312 00 0 00 034442 CAME [XWD 1,1] ;PASS IF C(AC)=1,,1
5853 STOP^
5854 033411 254 04 0 00 033412 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5855 033412 324 00 0 00 033413 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5856 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5857 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5858 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5859
5860 ;**********
5861
5862 ;THIS TEST VERIFIES THAT AOBJP ALWAYS ADDS 1 TO BOTH HALVES OF THE AC.
5863 ;FIRST, THE AC IS CLEARED; THEN AOBJP IS EXECUTED AND THE AC IS CHECKED
5864 ;FOR 1,,1. IF C(AC)=1,,1, THIS TEST PASSES.
5865
5866 033413 200 00 0 00 034540 C11300: MOVE [XWD 377777,377777] ;PRELOAD AC WITH 377777,,377777
5867 033414 252 00 0 00 033415 AOBJP .+1 ;*AOBJP SHOULD ADD, TO BOTH HALVES OF THE AC
5868 033415 312 00 0 00 034541 CAME [XWD 400000,400000] ;PASS IF C(AC)=400000,400000
5869 STOP^
5870 033416 254 04 0 00 033417 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5871 033417 324 00 0 00 033420 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5872 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5873 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5874 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5875
5876 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 43
DAKADM MAC 19-JAN-77 13:41 TEST OF AOBJX INSTRUCTIONS SEQ 0135
5877 ;THIS TEST VERIFIES THAT AOBJN WILL NOT JUMP WHEN C(AC) IS POSITIVE
5878 ;FIRST, THE AC IS CLEARED; AND AOBJN IS EXECUTED. AOBJN SHOULD NOT JUMP
5879 ;BECAUSE C(AC) IS POSITIVE. IF AOBJN JUMPS, THIS TEST FAILS
5880
5881 033420 400 00 0 00 000000 C11400: SETZ ;CLEAR THE AC
5882 033421 253 00 0 00 033423 AOBJN .+2 ;*AOBJN SHOULD NOT JUMP WHEN C(AC) IS POSITIVE
5883 033422 334 00 0 00 000000 SKIPA ;PASS IF AOBJN DOES NOT JUMP
5884 STOP^
5885 033423 254 04 0 00 033424 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5886 033424 324 00 0 00 033425 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5887 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5888 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5889 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5890
5891 ;**********
5892
5893 ;THIS TEST VERIFIES THAT AOBJP WILL JUMP WHEN C(AC) IS POSITIVE
5894 ;FIRST, THE AC IS CLEARED; AND AOBJP IS EXECUTED. AOBJP SHOULD JUMP
5895 ;BECAUSE C(AC) IS POSITIVE. IF AOBJP DOES NOT JUMP, THIS TEST FAILS
5896
5897 033425 400 00 0 00 000000 C11500: SETZ ;CLEAR THE AC
5898 033426 252 00 0 00 033430 AOBJP .+2 ;*AOBJP SHOULD JUMP BECAUSE C(AC) IS POSITIVE
5899 STOP^
5900 033427 254 04 0 00 033430 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5901 033430 324 00 0 00 033431 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5902 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5903 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5904 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5905
5906 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 44
DAKADM MAC 19-JAN-77 13:41 TEST OF AOBJX INSTRUCTIONS SEQ 0136
5907 ;THIS TEST VERIFIES THAT AOBJN WILL JUMP WHEN C(AC) IS NEGATIVE
5908 ;FIRST, THE AC IS PRELOADED WITH 400000,,0; AND AOBJN IS EXECUTED. AOBJN SHOULD JUMP
5909 ;BECAUSE C(AC) IS NEGATIVE. IF AOBJN DOES NOT JUMP, THIS TEST FAILS
5910
5911 033431 200 00 0 00 034541 C11600: MOVE [XWD 400000,400000] ;PRELOAD AC WITH 400000,,400000
5912 033432 253 00 0 00 033434 AOBJN .+2 ;*AOBJN SHOULD JUMP BECAUSE C(AC) IS NEGATIVE
5913 STOP^
5914 033433 254 04 0 00 033434 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5915 033434 324 00 0 00 033435 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5916 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5917 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5918 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5919
5920 ;**********
5921
5922 ;THIS TEST VERIFIES THAT AOBJP WILL NOT JUMP WHEN C(AC) IS NEGATIVE. FIRST,
5923 ;THE AC IS PRELOADED WITH 400000,,0; AND AOBJP IS EXECUTED. AOBJP SHOULD NOT JUMP
5924 ;BECAUSE C(AC) IS NEGATIVE. IF AOBJP JUMPS, THIS TEST FAILS
5925
5926 033435 200 00 0 00 034541 C11700: MOVE [XWD 400000,400000] ;PRELOAD AC WITH 400000,,400000
5927 033436 252 00 0 00 033440 AOBJP .+2 ;*AOBJP SHOULD NOT JUMP BECAUSE C(AC) IS NEGATIVE
5928 033437 334 00 0 00 000000 SKIPA ;PASS IF AOBJP DOES NOT JUMP
5929 STOP^
5930 033440 254 04 0 00 033441 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5931 033441 324 00 0 00 033442 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5932 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5933 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5934 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5935
5936 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 45
DAKADM MAC 19-JAN-77 13:41 TEST OF AOBJX INSTRUCTIONS SEQ 0137
5937 ;THIS TEST VERIFIES THAT THERE IS A CARRY FROM BIT 18 TO BIT 17 OF THE AC ON AOBJN.
5938 ;THE AC IS PRELOADED WITH -1,,-1; THEN AOBJN IS EXECUTED. AOBJN SHOULD ADD ONE
5939 ;TO BOTH HALVES OF THE AC, GENERATING A CARRY FROM BIT 18 TO BIT 17. IF A
5940 ;CARRY WAS GENERATED, THIS TEST PASSES
5941
5942 033442 474 00 0 00 000000 C12000: SETO ;PRELOAD AC WITH -1,, -1
5943 033443 253 00 0 00 033444 AOBJN .+1 ;*AOBJN SHOULD GENERATE A CARRY FROM BIT 18 TO 17
5944 033444 312 00 0 00 034444 CAME [1,,0] ;PASS IF C(AC)=1,,0 (CARRY WAS GENERATED)
5945 STOP^
5946 033445 254 04 0 00 033446 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5947 033446 324 00 0 00 033447 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5948 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5949 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5950 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5951
5952 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 46
DAKADM MAC 19-JAN-77 13:41 TEST SETTING OF ARITHMETIC FLAGS VIA MOVNX AND MOVMX SEQ 0138
5953 SUBTTL TEST SETTING OF ARITHMETIC FLAGS VIA MOVNX AND MOVMX
5954
5955 ;THIS TEST VERIFIES THAT MOVNI SETS CRY0 AND CRY1 FLAGS ONLY WHEN THE DATA IS 0.
5956 ;FIRST, THE ARITHMETIC FLAGS ARE RESET; THEN, MOVNI IS EXECUTED WITH DATA OF ZEROS.
5957 ;THE ARITHMETIC FLAGS ARE CHECKED.
5958 ; CRY0/1 ARE SET AND AROV AND FOV RESET, THIS TEST PASSES.
5959
5960 033447 255 17 0 00 033450 C12100: JFCL 17,.+1 ;CLEAR FLAGS
5961 033450 211 00 0 00 000000 MOVNI 0 ;* MOVNI 0 SHOULD SET CRY0/1
5962 033451 255 04 0 00 033453 JCRY0 .+2 ;PASS IF CRY0 IS SET
5963 STOP^
5964 033452 254 04 0 00 033453 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5965 033453 324 00 0 00 033454 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5966 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5967 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5968 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5969 033454 255 02 0 00 033456 JCRY1 .+2 ;PASS IF CRY1 IS SET
5970 STOP^
5971 033455 254 04 0 00 033456 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5972 033456 324 00 0 00 033457 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5973 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5974 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5975 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5976 033457 255 10 0 00 033461 JOV .+2 ;PASS IF AROV RESET
5977 033460 334 00 0 00 000000 SKIPA
5978 STOP^
5979 033461 254 04 0 00 033462 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5980 033462 324 00 0 00 033463 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5981 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5982 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5983 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5984 033463 255 01 0 00 033465 JFOV .+2 ;PASS IF FOV RESET
5985 033464 334 00 0 00 000000 SKIPA
5986 STOP^
5987 033465 254 04 0 00 033466 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5988 033466 324 00 0 00 033467 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5989 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5990 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5991 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5992
5993 ;**********
5994
5995 ;THIS TEST VERIFIES THAT MOVN WILL NOT SET ARITHMETIC FLAGS WHEN THE DATA IS -1,,-1.
5996 ;FIRST, THE FLAGS ARE RESET; THEN, MOVN [-1,,-1] IS EXECUTED.
5997 ;THE ARITHMETIC FLAGS ARE CHECKED.
5998 ;IF ANY ARITHMETIC FLAG IS SET, THIS TEST FAILS.
5999
6000 033467 255 17 0 00 033470 C12200: JFCL 17,.+1 ;CLEAR FLAGS
6001 033470 210 00 0 00 034466 MOVN [-1] ;*MOVN [-1,,-1] SHOULD SET ARITHMETIC FLAGS
6002 033471 255 17 0 00 033473 JFCL 17,.+2 ;FAIL IF AN ARITHMETIC FLAG IS SET
6003 033472 334 00 0 00 000000 SKIPA ;SKIP HALT INSTRUCTION IF MOVN PASSED.
6004 STOP^
6005 033473 254 04 0 00 033474 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6006 033474 324 00 0 00 033475 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6007 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 46-1
DAKADM MAC 19-JAN-77 13:41 TEST SETTING OF ARITHMETIC FLAGS VIA MOVNX AND MOVMX SEQ 0139
6008 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6009 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6010
6011 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 47
DAKADM MAC 19-JAN-77 13:41 TEST SETTING OF ARITHMETIC FLAGS VIA MOVNX AND MOVMX SEQ 0140
6012 ;THIS TEST VERIFIES THAT MOVN WILL SET THE AROV AND
6013 ;CRY1 FLAGS ONLY WHEN THE DATA IS 400000,,0
6014 ;FIRST, THE FLAGS ARE RESET; THEN, MOVN [400000,,0] IS EXECUTED.
6015 ;THE ARITHMETIC FLAGS ARE CHECKED.
6016 ;IF AROV AND CRY1 ARE SET AND CRY0 AND FOV ARE RESET, THIS TEST PASSES.
6017
6018 033475 255 17 0 00 033476 C12300: JFCL 17,.+1 ;CLEAR ARITHMETIC FLAGS
6019 033476 210 00 0 00 034465 MOVN [XWD 400000,0] ;*MOVN [400000,,0] SHOULD SET AROV AND CRY1 ONLY
6020 033477 255 10 0 00 033501 JOV .+2 ;PASS IF AROV IS SET
6021 STOP^
6022 033500 254 04 0 00 033501 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6023 033501 324 00 0 00 033502 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6024 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6025 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6026 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6027 033502 255 02 0 00 033504 JCRY1 .+2 ;PASS IF CRY0 IS SET
6028 STOP^
6029 033503 254 04 0 00 033504 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6030 033504 324 00 0 00 033505 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6031 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6032 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6033 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6034 033505 255 04 0 00 033507 JCRY0 .+2 ;PASS IF CRY0 IS RESET
6035 033506 334 00 0 00 000000 SKIPA
6036 STOP^
6037 033507 254 04 0 00 033510 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6038 033510 324 00 0 00 033511 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6039 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6040 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6041 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6042 033511 255 01 0 00 033513 JFOV .+2 ;PASS IF FOV IS RESET
6043 033512 334 00 0 00 000000 SKIPA
6044 STOP^
6045 033513 254 04 0 00 033514 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6046 033514 324 00 0 00 033515 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6047 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6048 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6049 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6050
6051 ;**********
6052
6053 ;THIS TEST VERIFIES THAT MOVM WILL SET THE AROV AND
6054 ;CRY1 FLAGS ONLY WHEN THE DATA IS 400000,,0
6055 ;FIRST, THE FLAGS ARE RESET; THEN, MOVM [400000,,0] IS EXECUTED.
6056 ;THE ARITHMETIC FLAGS ARE CHECKED.
6057 ;IF AROV AND CRY1 ARE SET AND CRY0 AND FOV ARE RESET, THIS TEST PASSES.
6058
6059 033515 255 17 0 00 033516 C12301: JFCL 17,.+1 ;CLEAR ARITHMETIC FLAGS
6060 033516 214 00 0 00 034465 MOVM [XWD 400000,0] ;*MOVM [400000,,0] SHOULD SET AROV AND CRY1 ONLY
6061 033517 255 10 0 00 033521 JOV .+2 ;PASS IF AROV IS SET
6062 STOP^
6063 033520 254 04 0 00 033521 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6064 033521 324 00 0 00 033522 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6065 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6066 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 47-1
DAKADM MAC 19-JAN-77 13:41 TEST SETTING OF ARITHMETIC FLAGS VIA MOVNX AND MOVMX SEQ 0141
6067 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6068 033522 255 02 0 00 033524 JCRY1 .+2 ;PASS IF CRY0 IS SET
6069 STOP^
6070 033523 254 04 0 00 033524 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6071 033524 324 00 0 00 033525 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6072 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6073 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6074 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6075 033525 255 04 0 00 033527 JCRY0 .+2 ;PASS IF CRY0 IS RESET
6076 033526 334 00 0 00 000000 SKIPA
6077 STOP^
6078 033527 254 04 0 00 033530 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6079 033530 324 00 0 00 033531 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6080 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6081 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6082 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6083 033531 255 01 0 00 033533 JFOV .+2 ;PASS IF FOV IS RESET
6084 033532 334 00 0 00 000000 SKIPA
6085 STOP^
6086 033533 254 04 0 00 033534 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6087 033534 324 00 0 00 033535 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6088 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6089 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6090 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6091
6092 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 48
DAKADM MAC 19-JAN-77 13:41 TEST OF AOS AND SOS INSTRUCTIONS SEQ 0142
6093 SUBTTL TEST OF AOS AND SOS INSTRUCTIONS
6094
6095 ;**********
6096
6097 ;THIS TEST VERIFIES THAT AOS ADDS 1 TO MEMORY AND DOES NOT SKIP.
6098 ;FIRST, E IS CLEARED; THEN, AOS IS EXECUTED. NEXT E IS CHECKED FOR 1.
6099 ;IF C(E) IS NOT 1 OR AOS SKIPPED, THIS TEST FAILS
6100
6101 033535 400 00 0 00 000000 C12600: SETZ ;CLEAR E
6102 033536 350 00 0 00 000000 AOS ;*AOS SHOULD ADD 1 TO C(E) AND NOT SKIP
6103 033537 302 00 0 00 000001 CAIE 1 ;PASS IF C(E)=0,,1 ANDAOS DID NOT SKIP
6104 STOP^
6105 033540 254 04 0 00 033541 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6106 033541 324 00 0 00 033542 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6107 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6108 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6109 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6110
6111 ;**********
6112
6113 ;THIS TEST VERIFIES THAT AOS ADDS 1 TO MEMORY AND DOES NOT SKIP.
6114 ;FIRST, E IS PRELOADED WITH -1,,-1; THEN, AOS IS EXECUTED. NEXT E IS CHECKED FOR 0.
6115 ;IF C(E) IS NOT 0 OR AOS SKIPPED, THIS TEST FAILS
6116
6117 033542 474 00 0 00 000000 C12700: SETO ;PRELOAD E WITH -1,,-1
6118 033543 350 00 0 00 000000 AOS ;*AOS SHOULD ADD 1 TO C(E) AND NOT SKIP
6119 033544 302 00 0 00 000000 CAIE ;PASS IF C(E)=0,,0 AND AOS DID NOT SKIP
6120 STOP^
6121 033545 254 04 0 00 033546 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6122 033546 324 00 0 00 033547 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6123 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6124 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6125 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6126
6127 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 49
DAKADM MAC 19-JAN-77 13:41 TEST OF AOS AND SOS INSTRUCTIONS SEQ 0143
6128 ;THIS TEST VERIFIES THAT SOS SUBTRACTS 1 FROM MEMORY AND DOES NOT SKIP.
6129 ;FIRST, E IS CLEARED; THEN, SOS IS EXECUTED. NEXT E IS CHECKED FOR -1,,-1.
6130 ;IF C(E) IS NOT -1,,-1 OR SOS SKIPPED, THIS TEST FAILS
6131
6132 033547 400 00 0 00 000000 C13100: SETZ ;CLEAR E
6133 033550 370 00 0 00 000000 SOS ;*SOS SHOULD SUBTRACT 1 FROM C(E) AND NOT SKIP
6134 033551 312 00 0 00 034466 CAME [-1] ;PASS IF C(E)=-1,,-1 AND SOS DID NOT SKIP
6135 STOP^
6136 033552 254 04 0 00 033553 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6137 033553 324 00 0 00 033554 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6138 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6139 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6140 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6141
6142 ;**********
6143
6144 ;THIS TEST VERIFIES THAT SOS SUBTRACTS 1 FROM MEMORY AND DOES NOT SKIP.
6145 ;FIRST, E IS PRELOADED WITH A; THEN, SOS IS EXECUTED. NEXT E IS CHECKED FOR 0.
6146 ;IF C(E) IS NOT 0 OR SOS SKIPPED, THIS TEST FAILS
6147
6148 033554 201 00 0 00 000001 C13200: MOVEI 1 ;PRELOAD E WITH 1
6149 033555 370 00 0 00 000000 SOS ;*SOS SHOULD SUBTRACT 1 FROM C(E) AND DID NOT SKIP
6150 033556 302 00 0 00 000000 CAIE 0 ;PASS IF C(E)=0 AND SOS DID NOT SKIP
6151 STOP^
6152 033557 254 04 0 00 033560 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6153 033560 324 00 0 00 033561 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6154 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6155 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6156 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6157
6158 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 50
DAKADM MAC 19-JAN-77 13:41 TEST OF AOS AND SOS INSTRUCTIONS SEQ 0144
6159 ;THIS TEST VERIFIES THAT SOS SETS CRY0/1 FLAGS IF C(E) IS A NON-ZERO NUMBER OTHER
6160 ;THAN 400000,,0. IN THIS CASE, C(E)=1. FIRST THE FLAGS ARE RESET; THEN
6161 ;SOS IS EXECUTED. THE FLAGS ARE CHECKED. IF CRY0 AND CRY1 ARE SET
6162 ;AND AROV AND FOV ARE RESET, THIS TEST PASSES.
6163
6164 033561 255 17 0 00 033562 C13300: JFCL 17,.+1 ;RESET ARITHMETIC FLAGS
6165 033562 201 00 0 00 000001 MOVEI 1 ;PRELOAD E WITH 1
6166 033563 370 00 0 00 000000 SOS ;*SOS SHOULD SET CRY0/1
6167 033564 255 04 0 00 033566 JCRY0 .+2 ;PASS IF CRY0 IS SET
6168 STOP^
6169 033565 254 04 0 00 033566 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6170 033566 324 00 0 00 033567 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6171 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6172 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6173 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6174 033567 255 02 0 00 033571 JCRY1 .+2 ;PASS IF CRY1 IS SET
6175 STOP^
6176 033570 254 04 0 00 033571 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6177 033571 324 00 0 00 033572 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6178 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6179 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6180 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6181 033572 255 10 0 00 033574 JOV .+2 ;PASS IF AROV IS RESET
6182 033573 334 00 0 00 000000 SKIPA
6183 STOP^
6184 033574 254 04 0 00 033575 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6185 033575 324 00 0 00 033576 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6186 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6187 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6188 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6189 033576 255 01 0 00 033600 JFOV .+2 ;PASS IF FOV IS RESET
6190 033577 334 00 0 00 000000 SKIPA
6191 STOP^
6192 033600 254 04 0 00 033601 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6193 033601 324 00 0 00 033602 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6194 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6195 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6196 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6197
6198 ;**********
6199
6200 ;THIS TEST VERIFIES THAT AOS SETS CRY0 AND CRY1 FLAG IF C(E) IS -1,,-1
6201 ;FIRST THE FLAGS ARE RESET; THEN
6202 ;AOS IS EXECUTED. THE FLAGS ARE CHECKED.
6203 ;IF CRY0 AND CRY1 ARE SET AND AROV AND FOV ARE RESET, THIS TEST PASSES.
6204
6205 033602 255 17 0 00 033603 C13400: JFCL 17,.+1 ;RESET ARITHMETIC FLAGS
6206 033603 474 00 0 00 000000 SETO ;PRELOAD E WITH 1
6207 033604 350 00 0 00 000000 AOS ;*AOS SHOULD SET CRY0 AND CRY1
6208 033605 255 04 0 00 033607 JCRY0 .+2 ;PASS IF CRY0 IS SET
6209 STOP^
6210 033606 254 04 0 00 033607 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6211 033607 324 00 0 00 033610 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6212 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6213 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 50-1
DAKADM MAC 19-JAN-77 13:41 TEST OF AOS AND SOS INSTRUCTIONS SEQ 0145
6214 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6215 033610 255 02 0 00 033612 JCRY1 .+2 ;PASS IF CRY1 IS SET
6216 STOP^
6217 033611 254 04 0 00 033612 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6218 033612 324 00 0 00 033613 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6219 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6220 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6221 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6222 033613 255 10 0 00 033615 JOV .+2 ;PASS IF AROV IS RESET
6223 033614 334 00 0 00 000000 SKIPA
6224 STOP^
6225 033615 254 04 0 00 033616 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6226 033616 324 00 0 00 033617 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6227 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6228 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6229 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6230 033617 255 01 0 00 033621 JFOV .+2 ;PASS IF FOV IS RESET
6231 033620 334 00 0 00 000000 SKIPA
6232 STOP^
6233 033621 254 04 0 00 033622 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6234 033622 324 00 0 00 033623 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6235 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6236 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6237 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6238
6239 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 51
DAKADM MAC 19-JAN-77 13:41 TEST OF INTERACTION OF JFCL, JRST, AND JSP WITH ARITHMETIC FLAGS SEQ 0146
6240 SUBTTL TEST OF INTERACTION OF JFCL, JRST, AND JSP WITH ARITHMETIC FLAGS
6241
6242 ;**********
6243
6244 ;THIS TEST VERIFIES THAT JFCL 1, WILL ALWAYS CLEAR FOV FLAG.
6245 ;FIRST, FOV IS SET VIA JRST 2, ;THEN JFCL 1,.+1 IS EXECUTED TO CLEAR FOV.
6246 ;IF FOV WAS CLEARED, THIS TEST PASSES.
6247
6248 033623 C13600: SFLAG FOV ^;SET FOV FLAG
6249
6250 033623 205 01 0 00 040000 MOVSI 1,FOV
6251 033624 255 17 0 00 033625 JFCL 17,.+1 ;RESET ALL FLAGS
6252 033625 254 02 0 01 033626 JRST 2,.+1(1) ;SET FOV FLAG
6253 033626 255 01 0 00 033627 JFCL 1,.+1 ;*JFCL SHOULD RESET FOV
6254 033627 255 01 0 00 033631 JFCL 1,.+2 ;PASS IF FOV IS RESET
6255 033630 334 00 0 00 000000 SKIPA ;SKIP HALT IF JFCL 1,.+1 PASSED
6256 STOP^
6257 033631 254 04 0 00 033632 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6258 033632 324 00 0 00 033633 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6259 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6260 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6261 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6262
6263 ;**********
6264
6265 ;THIS TEST VERIFIES THAT JRST 2, CAN SET FXU AND JSP CAN SAVE FXU IN THE AC.
6266 ;FIRST, FXU IS SET VIA JRST 2, ;THEN, JSP IS EXECUTED. THE AC IS CHECKED
6267 ;FOR FXU. IF FXU IS SET, THIS TEST PASSES; OTHERWISE, EITHER JRST 2, OR JSP FAILED.
6268
6269 033633 C13700: SFLAG FXU ^;*SET FXU FLAG
6270
6271 033633 205 01 0 00 000100 MOVSI 1,FXU
6272 033634 255 17 0 00 033635 JFCL 17,.+1 ;RESET ALL FLAGS
6273 033635 254 02 0 01 033636 JRST 2,.+1(1) ;SET FXU FLAG
6274 033636 265 00 0 00 033637 JSP .+1 ;*STORE FXU FLAG IN AC
6275 033637 607 00 0 00 000100 TLNN FXU ;PASS IF FXU IS SET IN THE AC
6276 STOP^
6277 033640 254 04 0 00 033641 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6278 033641 324 00 0 00 033642 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6279 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6280 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6281 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6282
6283 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 52
DAKADM MAC 19-JAN-77 13:41 TEST OF INTERACTION OF JFCL, JRST, AND JSP WITH ARITHMETIC FLAGS SEQ 0147
6284 ;THIS TEST VERIFIES THAT JRST 2, CAN RESET FXU AND JSP CAN SAVE FXU IN THE AC.
6285 ;FIRST, FXU IS SET; THEN, FXU IS RESET VIA JRST 2,. NEXT, JSP IS EXECUTED; AND
6286 ;THE AC IS CHECKED FOR FXU RESET. IF FXU IS RESET IN THE AC, THIS TEST PASSES;
6287 ;OTHERWISE, JRST 2, FAILED TO CLEAR FXU OR JSP STORED FXU INCORECTLY.
6288
6289 033642 C14000: SFLAG FXU ^;SET FXU FLAG
6290
6291 033642 205 01 0 00 000100 MOVSI 1,FXU
6292 033643 255 17 0 00 033644 JFCL 17,.+1 ;RESET ALL FLAGS
6293 033644 254 02 0 01 033645 JRST 2,.+1(1) ;SET FXU FLAG
6294 SFLAG ^;*RESET FXU FLAG
6295
6296 033645 205 01 0 00 000000 MOVSI 1,
6297 033646 255 17 0 00 033647 JFCL 17,.+1 ;RESET ALL FLAGS
6298 033647 254 02 0 01 033650 JRST 2,.+1(1) ;SET FLAG
6299 033650 265 00 0 00 033651 JSP .+1 ;*STORE FXU FLAG IN THE AC
6300 033651 603 00 0 00 000100 TLNE FXU ;PASS IF FXU IS RESET IN THE AC
6301 STOP^
6302 033652 254 04 0 00 033653 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6303 033653 324 00 0 00 033654 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6304 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6305 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6306 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6307
6308 ;**********
6309
6310 ;THIS TEST VERIFIES THAT JRST 2, CAN SET DCK AND JSP CAN SAVE DCK IN THE AC.
6311 ;FIRST, DCK IS SET VIA JRST 2, ;THEN JSP IS EXECUTED. THE AC IS CHECKED
6312 ;FOR DCK. IF DCK IS SET, THIS TEST PASSES, OTHERWISE JRST 2, OR JSP FAILED.
6313
6314 033654 C14100: SFLAG DCK ^;*SET DCK FLAG
6315
6316 033654 205 01 0 00 000040 MOVSI 1,DCK
6317 033655 255 17 0 00 033656 JFCL 17,.+1 ;RESET ALL FLAGS
6318 033656 254 02 0 01 033657 JRST 2,.+1(1) ;SET DCK FLAG
6319 033657 265 00 0 00 033660 JSP .+1 ;*STORE FXU FLAG IN AC
6320 033660 607 00 0 00 000040 TLNN DCK ;PASS IF FXU IS SET IN THE AC
6321 STOP^
6322 033661 254 04 0 00 033662 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6323 033662 324 00 0 00 033663 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6324 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6325 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6326 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6327
6328 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 53
DAKADM MAC 19-JAN-77 13:41 TEST OF INTERACTION OF JFCL, JRST, AND JSP WITH ARITHMETIC FLAGS SEQ 0148
6329 ;THIS TEST VERIFIES THAT JRST 2, CAN RESET DCK AND JSP CAN SAVE DCK IN THE AC.
6330 ;FIRST, FXU IS SET; THEN, DCK IS RESET VIA JRST 2,. NEXT, JSP IS EXPECTED; AND
6331 ;THE AC IS CHECKED FOR DCK RESET. IF DCK IS RESET IN THE AC, THIS TEST PASSES;
6332 ;OTHERWISE, JRST 2, FAILED TO CLEAR DCK OR JSP STORED DCK INCORRECTLY.
6333
6334 033663 C14200: SFLAG DCK ^;SET DCK FLAG
6335
6336 033663 205 01 0 00 000040 MOVSI 1,DCK
6337 033664 255 17 0 00 033665 JFCL 17,.+1 ;RESET ALL FLAGS
6338 033665 254 02 0 01 033666 JRST 2,.+1(1) ;SET DCK FLAG
6339 SFLAG ^;*RESET DCK FLAG
6340
6341 033666 205 01 0 00 000000 MOVSI 1,
6342 033667 255 17 0 00 033670 JFCL 17,.+1 ;RESET ALL FLAGS
6343 033670 254 02 0 01 033671 JRST 2,.+1(1) ;SET FLAG
6344 033671 265 00 0 00 033672 JSP .+1 ;*STORE DCK FLAG IN THE AC
6345 033672 603 00 0 00 000040 TLNE DCK ;PASS IF DCK IS RESET IN THE AC
6346 STOP^
6347 033673 254 04 0 00 033674 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6348 033674 324 00 0 00 033675 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6349 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6350 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6351 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6352
6353 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 54
DAKADM MAC 19-JAN-77 13:41 TEST OF JUMPX INSTRUCTIONS SEQ 0149
6354 SUBTTL TEST OF JUMPX INSTRUCTIONS
6355
6356 ;**********
6357
6358 ;THIS TEST VERIFIES THAT JUMPL IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6359 ;C(AC) IS NEGATIVE. IN THIS TEST, THE AC CONTAINS -1,,-1. HENCE,
6360 ;JUMPL SHOULD JUMP. IF JUMPL JUMPS, THIS TEST PASSES.
6361
6362 033675 474 00 0 00 000000 C14500: SETO ;PRELOAD AC WITH -1,,-1
6363 033676 321 00 0 00 033700 JUMPL .+2 ;*JUMPL SHOULD JUMP BECAUSE C(AC) IS NEGATIVE
6364 STOP^
6365 033677 254 04 0 00 033700 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6366 033700 324 00 0 00 033701 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6367 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6368 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6369 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6370
6371 ;**********
6372
6373 ;THIS TEST VERIFIES THAT JUMPL IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6374 ;C(AC) IS NEGATIVE. IN THIS TEST, THE AC CONTAINS 0. HENCE,
6375 ;JUMPL SHOULD NOT JUMP. IF JUMPL DOES NOT JUMP, THIS TEST PASSES.
6376
6377 033701 400 00 0 00 000000 C14600: SETZ ;PRELOAD AC WITH 0
6378 033702 321 00 0 00 033704 JUMPL .+2 ;*JUMPL SHOULD NOT JUMP
6379 033703 334 00 0 00 000000 SKIPA ;PASS IF JUMPL DOES NOT JUMP
6380 STOP^
6381 033704 254 04 0 00 033705 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6382 033705 324 00 0 00 033706 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6383 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6384 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6385 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6386
6387 ;**********
6388
6389 ;THIS TEST VERIFIES THAT JUMPE IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6390 ;C(AC)=0. IN THIS TEST, THE AC CONTAINS 0. HENCE,
6391 ;JUMPE SHOULD JUMP. IF JUMPE JUMPS, THIS TEST PASSES.
6392
6393 033706 400 00 0 00 000000 C14700: SETZ ;PRELOAD AC WITH 0
6394 033707 322 00 0 00 033711 JUMPE .+2 ;*JUMPE SHOULD JUMP
6395 STOP^
6396 033710 254 04 0 00 033711 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6397 033711 324 00 0 00 033712 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6398 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6399 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6400 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6401
6402 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 55
DAKADM MAC 19-JAN-77 13:41 TEST OF JUMPX INSTRUCTIONS SEQ 0150
6403 ;THIS TEST VERIFIES THAT JUMPN IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6404 ;C(AC) IS NON-ZERO. IN THIS TEST, THE AC CONTAINS 1. HENCE,
6405 ;JUMPN SHOULD JUMP. IF JUMPN JUMPS, THIS TEST PASSES.
6406
6407 033712 201 00 0 00 000001 C15000: MOVEI 1 ;PRELOAD AC WITH 1
6408 033713 326 00 0 00 033715 JUMPN .+2 ;*JUMPN SHOULD JUMP
6409 STOP^
6410 033714 254 04 0 00 033715 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6411 033715 324 00 0 00 033716 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6412 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6413 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6414 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6415
6416 ;**********
6417
6418 ;THIS TEST VERIFIES THAT JUMPE IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6419 ;C(AC)=0. IN THIS TEST, THE AC CONTAINS 2. HENCE,
6420 ;JUMPL SHOULD NOT JUMP. IF JUMPE DOES NOT JUMP, THIS TEST PASSES.
6421
6422 033716 201 00 0 00 000002 C15100: MOVEI 2 ;PRELOAD AC WITH 2
6423 033717 322 00 0 00 033721 JUMPE .+2 ;*JUMPE SHOULD NOT JUMP
6424 033720 334 00 0 00 000000 SKIPA ;PASS IF JUMPE DID NOT JUMP
6425 STOP^
6426 033721 254 04 0 00 033722 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6427 033722 324 00 0 00 033723 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6428 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6429 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6430 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6431
6432 ;**********
6433
6434 ;THIS TEST VERIFIES THAT JUMPN IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6435 ;C(AC) IS NON-ZERO. IN THIS TEST, THE AC CONTAINS 0. HENCE,
6436 ;JUMPN SHOULD NOT JUMP. IF JUMPN DOES NOT JUMP, THIS TEST PASSES.
6437
6438 033723 400 00 0 00 000000 C15200: SETZ ;PRELOAD AC WITH 0
6439 033724 326 00 0 00 033726 JUMPN .+2 ;*JUMPN SHOULD NOT JUMP
6440 033725 334 00 0 00 000000 SKIPA ;PASS IF JUMPN DID NOT JUMP
6441 STOP^
6442 033726 254 04 0 00 033727 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6443 033727 324 00 0 00 033730 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6444 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6445 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6446 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6447
6448 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 56
DAKADM MAC 19-JAN-77 13:41 TEST OF JUMPX INSTRUCTIONS SEQ 0151
6449 ;THIS TEST VERIFIES THAT JUMPG IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6450 ;C(AC) IS GREATER THAN 0. IN THIS TEST, THE AC CONTAINS 1. HENCE,
6451 ;JUMPG SHOULD JUMP. IF JUMPG JUMPS, THIS TEST PASSES.
6452
6453 033730 201 00 0 00 000001 C15300: MOVEI 1 ;PRELOAD AC WITH 1
6454 033731 327 00 0 00 033733 JUMPG .+2 ;*JUMPG SHOULD JUMP
6455 STOP^
6456 033732 254 04 0 00 033733 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6457 033733 324 00 0 00 033734 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6458 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6459 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6460 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6461
6462 ;**********
6463
6464 ;THIS TEST VERIFIES THAT JUMPG IS DATA DEPENDENT. IT WILL JUMP IF AND ONLY IF
6465 ;C(AC) IS GREATER THAN 0. IN THIS TEST, THE AC CONTAINS -1,,0. HENCE,
6466 ;JUMPG SHOULD NOT JUMP. IF JUMPG DOES NOT JUMP, THIS TEST PASSES.
6467
6468 033734 205 00 0 00 777777 C15400: MOVSI -1 ;PRELOAD AC WITH -1,,0
6469 033735 327 00 0 00 033737 JUMPG .+2 ;*JUMPG SHOULD NOT JUMP
6470 033736 334 00 0 00 000000 SKIPA ;PASS IF JUMPG DID NOT JUMP
6471 STOP^
6472 033737 254 04 0 00 033740 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6473 033740 324 00 0 00 033741 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6474 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6475 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6476 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6477
6478 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 57
DAKADM MAC 19-JAN-77 13:41 TEST OF AOJ AND SOJ INSTRUCTIONS SEQ 0152
6479 SUBTTL TEST OF AOJ AND SOJ INSTRUCTIONS
6480
6481 ;**********
6482
6483 ;THIS TEST VERIFIES THAT AOJ ADDS 1 TO THE AC AND DOES NOT JUMP.
6484 ;FIRST, THE AC IS PRELOADED WITH 0; THEN, AOJ IS EXECUTED. NEXT, THE
6485 ;AC IS CHECKED FOR 1. IF C(AC) IS NOT 1 OR AOJ SKIPPED, THIS TEST FAILS.
6486
6487 033741 400 00 0 00 000000 C15500: SETZ ;PRELOAD AC WITH 0
6488 033742 340 00 0 00 033744 AOJ .+2 ;*AOJ SHOULD ADD 1 TO THE AC AND NOT JUMP
6489 033743 302 00 0 00 000001 CAIE 1 ;PASS IF C(AC)=1 AND AOJ DID NOT JUMP
6490 STOP^
6491 033744 254 04 0 00 033745 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6492 033745 324 00 0 00 033746 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6493 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6494 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6495 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6496
6497 ;**********
6498
6499 ;THIS TEST VERIFIES THAT AOJ ADDS 1 TO THE AC AND DOES NOT JUMP.
6500 ;FIRST, THE AC IS PRELOADED WITH -1,,-1; THEN, AOJ IS EXECUTED. NEXT, THE
6501 ;AC IS CHECKED FOR 0. IF C(AC) IS NOT 0 OR AOJ SKIPPED, THIS TEST FAILS.
6502
6503 033746 474 00 0 00 000000 C15600: SETO ;PRELOAD AC WITH 0
6504 033747 340 00 0 00 033751 AOJ .+2 ;*AOJ SHOULD ADD 1 TO THE AC AND NOT JUMP
6505 033750 302 00 0 00 000000 CAIE 0 ;PASS IF C(AC)=1 AND AOJ DID NOT JUMP
6506 STOP^
6507 033751 254 04 0 00 033752 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6508 033752 324 00 0 00 033753 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6509 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6510 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6511 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6512
6513 ;**********
6514
6515 ;THIS TEST VERIFIES THAT SOJ SUBTRACTS 1 FROM THE AC AND DOES NOT JUMP.
6516 ;FIRST, THE AC IS PRELOADED WITH 0; THEN, SOJ IS EXECUTED. NEXT, THE
6517 ;AC IS CHECKED FOR -1,,-1. IF C(AC) IS NOT -1,,-1 OR SOJ SKIPPED, THIS TEST FAILS.
6518
6519 033753 400 00 0 00 000000 C15700: SETZ ;PRELOAD AC WITH 0
6520 033754 360 00 0 00 033756 SOJ .+2 ;*SOJ SHOULD SUBTRACT 1 FROM THE AC AND NOT JUMP
6521 033755 312 00 0 00 034466 CAME [-1] ;PASS IF C(AC)=-1,,-1 AND SOJ DID NOT JUMP
6522 STOP^
6523 033756 254 04 0 00 033757 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6524 033757 324 00 0 00 033760 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6525 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6526 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6527 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6528
6529 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 58
DAKADM MAC 19-JAN-77 13:41 TEST OF AOJ AND SOJ INSTRUCTIONS SEQ 0153
6530 ;THIS TEST VERIFIES THAT SOJ SUBTRACTS 1 FROM THE AC AND DOES NOT JUMP.
6531 ;FIRST, THE AC IS PRELOADED WITH -1,,-1; THEN, SOJ IS EXECUTED. NEXT, THE
6532 ;AC IS CHECKED FOR -1,,-2. IF C(AC) IS NOT -1,,-2 OR SOJ SKIPPED, THIS TEST FAILS.
6533
6534 033760 474 00 0 00 000000 C16000: SETO ;PRELOAD AC WITH -1,,-1
6535 033761 360 00 0 00 033763 SOJ .+2 ;*SOJ SHOULD SUBTRACT 1 FROM THE AC AND NOT JUMP
6536 033762 312 00 0 00 034467 CAME [-2] ;PASS IF C(AC)=-1,,-2 AND SOJ DID NOT JUMP
6537 STOP^
6538 033763 254 04 0 00 033764 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6539 033764 324 00 0 00 033765 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6540 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6541 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6542 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6543
6544 ;**********
6545
6546 ;THIS TEST VERIFIES THAT SOJ SUBTRACTS 1 FROM THE AC AND DOES NOT JUMP.
6547 ;FIRST, THE AC IS PRELOADED WITH 0,,1; THEN, SOJ IS EXECUTED. NEXT, THE
6548 ;AC IS CHECKED FOR 0. IF C(AC) IS NOT 0 OR SOJ SKIPPED, THIS TEST FAILS.
6549
6550 033765 201 00 0 00 000001 C16100: MOVEI 1 ;PRELOAD AC WITH 1
6551 033766 360 00 0 00 033770 SOJ .+2 ;*SOJ SHOULD SUBTRACT 1 FROM THE AC AND NOT JUMP
6552 033767 302 00 0 00 000000 CAIE 0 ;PASS IF C(AC)=0 AND SOJ DID NOT JUMP
6553 STOP^
6554 033770 254 04 0 00 033771 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6555 033771 324 00 0 00 033772 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6556 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6557 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6558 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6559
6560 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 59
DAKADM MAC 19-JAN-77 13:41 TEST OF AOJ AND SOJ INSTRUCTIONS SEQ 0154
6561 ;THIS TEST VERIFIES THAT SOJ AC, FOLLOWED BY AOJ AC, HAS NO NET EFFECT ON C(AC).
6562 ;IN THIS CASE, THE AC IS PRELOADED WITH 0; THEN, SOJ AC, FOLLOWED BY AOJ.
6563 ;AC, IS REPEATED 7 TIMES. THE AC IS THEN CHECKED FOR ITS ORIGINAL CONTENTS, 0.
6564 ;IF C(AC)=0, THIS TEST PASSES; OTHERWISE AOJ OR SOJ FAILED.
6565
6566 000017 C16200: AC=17
6567 033772 400 17 0 00 000000 SETZ AC, ;PRELOAD AC WITH 0
6568 REPEAT ^D10,<
6569 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6570 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC>
6571
6572 033773 360 17 0 00 033773 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6573 033774 340 17 0 00 033774 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6574
6575 033775 360 17 0 00 033775 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6576 033776 340 17 0 00 033776 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6577
6578 033777 360 17 0 00 033777 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6579 034000 340 17 0 00 034000 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6580
6581 034001 360 17 0 00 034001 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6582 034002 340 17 0 00 034002 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6583
6584 034003 360 17 0 00 034003 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6585 034004 340 17 0 00 034004 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6586
6587 034005 360 17 0 00 034005 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6588 034006 340 17 0 00 034006 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6589
6590 034007 360 17 0 00 034007 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6591 034010 340 17 0 00 034010 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6592
6593 034011 360 17 0 00 034011 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6594 034012 340 17 0 00 034012 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6595
6596 034013 360 17 0 00 034013 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6597 034014 340 17 0 00 034014 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6598
6599 034015 360 17 0 00 034015 SOJ AC,. ;*SOJ SHOULD SUBTRACT 1 FROM THE AC
6600 034016 340 17 0 00 034016 AOJ AC,. ;*AOJ SHOULD ADD 1 TO THE AC
6601 034017 332 00 0 00 000017 SKIPE AC ;PASS IF C(AC) IS UNCHANGED. I.E. C(AC)=0
6602 STOP^
6603 034020 254 04 0 00 034021 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6604 034021 324 00 0 00 034022 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6605 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6606 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6607 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6608
6609 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 60
DAKADM MAC 19-JAN-77 13:41 TEST OF AOJ AND SOJ INSTRUCTIONS SEQ 0155
6610 ;THIS TEST VERIFIES THAT SOJ SETS CRY0/1 FLAGS IF C(E) IS A NON-ZERO NUMBER OTHER
6611 ;THAN 400000,,0. IN THIS CASE, C(E)=1. FIRST THE FLAGS ARE RESET; THEN
6612 ;SOJ IS EXECUTED. THE FLAGS ARE CHECKED. IF CRY0 AND CRY1 ARE SET
6613 ;AND AROV AND FOV ARE RESET, THIS TEST PASSES.
6614
6615 034022 255 17 0 00 034023 C16201: JFCL 17,.+1 ;RESET ARITHMETIC FLAGS
6616 034023 201 00 0 00 000001 MOVEI 1 ;PRELOAD E WITH 1
6617 034024 360 00 0 00 000000 SOJ ;*SOJ SHOULD SET CRY0/1
6618 034025 255 04 0 00 034027 JCRY0 .+2 ;PASS IF CRY0 IS SET
6619 STOP^
6620 034026 254 04 0 00 034027 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6621 034027 324 00 0 00 034030 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6622 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6623 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6624 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6625 034030 255 02 0 00 034032 JCRY1 .+2 ;PASS IF CRY1 IS SET
6626 STOP^
6627 034031 254 04 0 00 034032 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6628 034032 324 00 0 00 034033 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6629 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6630 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6631 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6632 034033 255 10 0 00 034035 JOV .+2 ;PASS IF AROV IS RESET
6633 034034 334 00 0 00 000000 SKIPA
6634 STOP^
6635 034035 254 04 0 00 034036 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6636 034036 324 00 0 00 034037 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6637 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6638 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6639 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6640 034037 255 01 0 00 034041 JFOV .+2 ;PASS IF FOV IS RESET
6641 034040 334 00 0 00 000000 SKIPA
6642 STOP^
6643 034041 254 04 0 00 034042 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6644 034042 324 00 0 00 034043 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6645 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6646 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6647 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6648
6649 ;**********
6650
6651 ;THIS TEST VERIFIES THAT AOJ SETS CRY0 AND CRY1 FLAG IF C(E) IS -1,,-1
6652 ;FIRST THE FLAGS ARE RESET; THEN
6653 ;AOJ IS EXECUTED. THE FLAGS ARE CHECKED.
6654 ;IF CRY0 AND CRY1 ARE SET AND AROV AND FOV ARE RESET, THIS TEST PASSES.
6655
6656 034043 255 17 0 00 034044 C16202: JFCL 17,.+1 ;RESET ARITHMETIC FLAGS
6657 034044 474 00 0 00 000000 SETO ;PRELOAD E WITH 1
6658 034045 340 00 0 00 000000 AOJ ;*AOJ SHOULD SET CRY0 AND CRY1
6659 034046 255 04 0 00 034050 JCRY0 .+2 ;PASS IF CRY0 IS SET
6660 STOP^
6661 034047 254 04 0 00 034050 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6662 034050 324 00 0 00 034051 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6663 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6664 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 60-1
DAKADM MAC 19-JAN-77 13:41 TEST OF AOJ AND SOJ INSTRUCTIONS SEQ 0156
6665 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6666 034051 255 02 0 00 034053 JCRY1 .+2 ;PASS IF CRY1 IS SET
6667 STOP^
6668 034052 254 04 0 00 034053 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6669 034053 324 00 0 00 034054 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6670 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6671 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6672 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6673 034054 255 10 0 00 034056 JOV .+2 ;PASS IF AROV IS RESET
6674 034055 334 00 0 00 000000 SKIPA
6675 STOP^
6676 034056 254 04 0 00 034057 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6677 034057 324 00 0 00 034060 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6678 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6679 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6680 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6681 034060 255 01 0 00 034062 JFOV .+2 ;PASS IF FOV IS RESET
6682 034061 334 00 0 00 000000 SKIPA
6683 STOP^
6684 034062 254 04 0 00 034063 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6685 034063 324 00 0 00 034064 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6686 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6687 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6688 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6689
6690 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 61
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0157
6691 SUBTTL TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS
6692
6693 ;**********
6694
6695 ;THIS TEST VERIFIES THAT ADDM DOES NOT MODIFY C(AC)
6696 ;BOTH AC AND E ARE PRELOADED WITH -1,,-1. THEN ADDM IS EXECUTED.
6697 ;THIS TEST PASSES IF C(AC) ARE UNCHANGED
6698
6699 034064 477 00 0 00 000001 C16400: SETOB 1 ;PRELOAD AC, E WITH -1,,-1
6700 034065 272 00 0 00 000001 ADDM 1 ;*ADDM SHOULD NOT AFFECT C(AC)
6701 034066 312 00 0 00 034466 CAME [-1] ;PASS IF C(AC) IS UNMODIFIED BY ADDM
6702 STOP^
6703 034067 254 04 0 00 034070 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6704 034070 324 00 0 00 034071 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6705 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6706 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6707 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6708
6709 ;**********
6710
6711 ;THIS TEST VERIFIES THAT HRREM DOES NOT MODIFY C(AC)
6712 ;THE AC IS PRELOADED WITH 0,,-1. THEN HRRM IS EXECUTED.
6713 ;THIS TEST PASSES IF C(AC) ARE UNCHANGED
6714
6715 034071 201 00 0 00 777777 C16500: MOVEI -1 ;PRELOAD AC WITH 0,,-1
6716 034072 572 00 0 00 000001 HRREM 1 ;*HRRM SHOULD NOT AFFECT C(AC)
6717 034073 302 00 0 00 777777 CAIE -1 ;PASS IF C(AC) IS UNMODIFIED BY HRRM
6718 STOP^
6719 034074 254 04 0 00 034075 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6720 034075 324 00 0 00 034076 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6721 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6722 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6723 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6724
6725 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 62
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0158
6726 ;THIS TEST VERIFIES THAT MOVSM DOES NOT MODIFY C(AC)
6727 ;THE AC IS PRELOADED WITH 0,,-1. THEN MOVSM IS EXECUTED.
6728 ;THIS TEST PASSES IF C(AC) ARE UNCHANGED
6729
6730 034076 201 00 0 00 777777 C16600: MOVEI -1 ;PRELOAD AC WITH 0,,-1
6731 034077 206 00 0 00 000001 MOVSM 1 ;*MOVSM SHOULD NOT AFFECT C(AC)
6732 034100 302 00 0 00 777777 CAIE -1 ;PASS IF C(AC) IS UNMODIFIED BY MOVSM
6733 STOP^
6734 034101 254 04 0 00 034102 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6735 034102 324 00 0 00 034103 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6736 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6737 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6738 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6739
6740 ;**********
6741
6742 ;THIS TEST VERIFIES THAT XORM DOES NOT MODIFY C(AC)
6743 ;BOTH AC AND E ARE PRELOADED WITH -1,,-1. THEN XORM IS EXECUTED.
6744 ;THIS TEST PASSES IF C(AC) ARE UNCHANGED
6745
6746 034103 477 00 0 00 000001 C16700: SETOB 1 ;PRELOAD AC, E WITH -1,,-1
6747 034104 432 00 0 00 000001 XORM 1 ;*XORM SHOULD NOT AFFECT C(AC)
6748 034105 312 00 0 00 034466 CAME [-1] ;PASS IF C(AC) IS UNMODIFIED BY XORM
6749 STOP^
6750 034106 254 04 0 00 034107 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6751 034107 324 00 0 00 034110 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6752 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6753 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6754 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6755
6756 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 63
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0159
6757 ;THIS TEST VERIFIES THAT ADDB ADDS C(AC) TO C(E) AND PLACES THE
6758 ;RESULT IN BOTH AC AND E. IN THIS TEST, BOTH AC AND E ARE PRELOADED
6759 ;WITH -1,,-1, THEN, ADDB IS EXECUTED. C(AC) IS THEN COMPARED TO C(E);
6760 ;AND C(AC) IS THEN COMPARED TO -2. IF BOTH OF THESE COMPARISONS SUCCEED, THIS
6761 ;TEST PASSES; OTHERWISE, ADDB FAILED
6762
6763 034110 477 00 0 00 000001 C17000: SETOB 1 ;PRELOAD AC, E WITH -1,,-1
6764 034111 273 00 0 00 000001 ADDB 1 ;*ADDB SHOULD ADD C(AC) TO C(E) AND PLACE RESULT
6765 ;INTO BOTH AC AND E
6766 034112 312 00 0 00 000001 CAME 1 ;PASS IF C(AC)=C(E)
6767 STOP^
6768 034113 254 04 0 00 034114 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6769 034114 324 00 0 00 034115 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6770 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6771 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6772 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6773 034115 312 00 0 00 034467 CAME [-2] ;PASS IF C(AC)=-2
6774 STOP^
6775 034116 254 04 0 00 034117 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6776 034117 324 00 0 00 034120 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6777 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6778 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6779 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6780
6781 ;**********
6782
6783 ;THIS TEST VERIFIES THAT ADDM ADDS C(AC) TO C(E) AND PLACES THE RESULT IN E
6784 ;IN THIS CASE, AC, E ARE BOTH PRELOADED WITH -1; THEN, ADDM IS EXECUTED.
6785 ;E IS THEN CHECKED FOR -2. IF C(E)=-2, THIS TEST PASSES; OTHERWISE, ADDM FAILED
6786
6787 034120 477 00 0 00 000001 C17100: SETOB 1 ;PRELOAD AC, E WITH -1,,-1
6788 034121 272 00 0 00 000001 ADDM 1 ;*ADDM SHOULD ADD C(AC) TO C(E)
6789 034122 312 01 0 00 034467 CAME 1,[-2] ;PASS IF C(E)=-2
6790 STOP^
6791 034123 254 04 0 00 034124 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6792 034124 324 00 0 00 034125 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6793 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6794 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6795 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6796
6797 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 64
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0160
6798 ;THIS TEST VERIFIES THAT HLLOS PLACES ONES ON THE RIGHT HALF OF E
6799 ;BUT DOES NOT AFFECT THE LEFT HALF OF E. IN THIS CASE,
6800 ;E IS PRELOADED WITH 0; THE, HLLOS IS EXECUTED. THE RESULT
6801 ;IN E SHOULD BE 0,,-1. IF C(E)=0,,-1, THIS TEST PASSES
6802
6803 034125 402 00 0 00 000001 C17200: SETZM 1 ;PRELOAD E WITH 0
6804 034126 523 00 0 00 000001 HLLOS 1 ;*HLLOS SHOULD PLACE 0,,-1 INTO E
6805 034127 302 01 0 00 777777 CAIE 1,-1 ;PASS IF C(E)=0,,-1
6806 STOP^
6807 034130 254 04 0 00 034131 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6808 034131 324 00 0 00 034132 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6809 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6810 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6811 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6812
6813 ;**********
6814
6815 ;THIS TEST VERIFIES THAT MOVSS SWAPS BOTHS HALVES OF E AND
6816 ;PLACES THE RESULT IN E. IN THIS CASE, E IS PRELOADED WITH
6817 ;-1,,0; THEN, MOVSS IS EXECUTED. THE RESULT IN E SHOULD BE 0,,-1.
6818 ;IF C(E)=0,,-1, THIS TEST PASSES
6819
6820 034132 205 01 0 00 777777 C17300: MOVSI 1,-1 ;PRELOAD E WITH -1,,0
6821 034133 207 00 0 00 000001 MOVSS 1 ;*MOVSS SHOULD PLACE 0,,-1 INTO E
6822 034134 302 01 0 00 777777 CAIE 1,-1 ;PASS IF C(E)=0,,-1
6823 STOP^
6824 034135 254 04 0 00 034136 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6825 034136 324 00 0 00 034137 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6826 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6827 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6828 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6829
6830 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 65
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0161
6831 ;THIS TEST VERIFIES THAT AOS ADDS ONE TO MEMORY BUT DOES NOT SKIP
6832 ;FIRST, E IS PRELOADED WITH -1,-1; THEN, AOS IS EXECUTED. NEXT, E IS CHECKED FOR 0.
6833 ;IF C(E) IS NOT 0 OR AOS SKIPPED, THIS TEST FAILS
6834
6835 034137 477 00 0 00 000001 C17400: SETOB 1 ;PRELOAD E WITH -1,,-1
6836 034140 350 00 0 00 000001 AOS 1 ;*AOS SHOULD ADD TO C(E) AND NOT SKIP
6837 034141 302 01 0 00 000000 CAIE 1,0 ;PASS IF C(E)=0,,0 AND AOS DID NOT SKIP
6838 STOP^
6839 034142 254 04 0 00 034143 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6840 034143 324 00 0 00 034144 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6841 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6842 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6843 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6844
6845 ;**********
6846
6847 ;THIS TEST VERIFIES THAT HRLM PLACES C(AC-RIGHT) INTO E-LEFT AND DOES
6848 ;NOT MODIFY E-RIGHT. IN THIS CASE, AC IS PRELOADED WITH 0 AND E IS PRELOADED
6849 ;WITH -1,,-1. THEN, HRLM IS EXECUTED. E IS THEN CHECKED FOR 0,,-1. IF
6850 ;C(E)=0,,-1, THIS TEST PASSES
6851
6852 034144 400 00 0 00 000000 C17500: SETZ ;PRELOAD AC WITH 0
6853 034145 474 01 0 00 000000 SETO 1, ;PRELOAD E WITH -1,,-1
6854 034146 506 00 0 00 000001 HRLM 1 ;*HRLM SHOULD PLACE 0,,-1 INTO E
6855 034147 302 01 0 00 777777 CAIE 1,-1 ;PASS IF C(E)=0,,-1
6856 STOP^
6857 034150 254 04 0 00 034151 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6858 034151 324 00 0 00 034152 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6859 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6860 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6861 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6862
6863 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 66
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0162
6864 ;THIS TEST VERIFIES THAT HRRS DOES NOT MODIFY E
6865 ;E IS PRELOADED WITH 0 AND AC IS PRELOADED WITH -1,,-1.
6866 ;HRRS IS EXECUTED; THEN E IS CHECKED. IF C(E) DOES
6867 ;NOT CHANGE, THIS TEST PASSES
6868
6869 034152 474 00 0 00 000000 C17600: SETO ;PRELOAD AC WITH -1,,-1
6870 034153 400 01 0 00 000000 SETZ 1, ;PRELOAD E WITH 0,,0
6871 034154 543 00 0 00 000001 HRRS 1 ;*HRRS SHOULD PLACE 0,,0 INTO E
6872 034155 332 00 0 00 000001 SKIPE 1
6873 STOP^
6874 034156 254 04 0 00 034157 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6875 034157 324 00 0 00 034160 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6876 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6877 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6878 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6879
6880 ;**********
6881
6882 ;THIS TEST VERIFIES THAT HRRZM PLACES C(AC-RIGHT) INTO E-RIGHT AND PLACES
6883 ;ZEROS INTO E-LEFT. IN THIS CASE, AC=E=AC1 AND C(AC)=C(E)=-1,,0. HRRZM
6884 ;IS EXECUTED AND AC1 IS CHECKED FOR 0. IF AC1=0, THIS TEST PASSES.
6885
6886 034160 474 00 0 00 000000 C17700: SETO ;PRELOAD AC0 WITH -1,,-1
6887 034161 205 01 0 00 777777 MOVSI 1,-1 ;PRELOAD AC1 WITH -1,,0
6888 034162 552 01 0 00 000001 HRRZM 1,1 ;*HRRZM SHOULD PLACE 0 INTO AC1
6889 034163 332 00 0 00 000001 SKIPE 1 ;PASS IF C(AC1)=0
6890 STOP^
6891 034164 254 04 0 00 034165 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6892 034165 324 00 0 00 034166 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6893 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6894 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6895 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6896
6897 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 67
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0163
6898 ;THIS TEST VERIFIES THAT JFCL 17,.+1 NEVER JUMPS AND DOES NOT MODIFY C(AC0).
6899 ;FIRST, AC0 IS PRELOADED; THEN, JFCL IS EXECUTED. IF AC0 IS MODIFIED
6900 ;OR JFCL SKIPS, THIS TEST FAILS
6901
6902 034166 400 00 0 00 000000 C20000: SETZ ;CLEAR AC0
6903 034167 255 17 0 00 034170 JFCL 17,.+1 ;*JFCL SHOULD NOT JUMP OR MODIFY C(AC0).
6904 034170 332 00 0 00 000000 SKIPE ;PASS IF C(AC0)=0 AND JFCL DID NOT JUMP
6905 STOP^
6906 034171 254 04 0 00 034172 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6907 034172 324 00 0 00 034173 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6908 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6909 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6910 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6911
6912 ;**********
6913
6914 ;THIS TEST VERIFIES THAT XORM PERFORMS THE LOGICAL EXCLUSIVE OR FUNCTION
6915 ;BETWEEN C(AC) AND C(E) AND PLACES THE RESULT INTO E
6916 ;IN THIS CASE, AC AND E ARE PRELOADED WITH -1,,-1; THEN, XORM IS
6917 ;EXECUTED. IF THE RESULT IN E IS 0, THE TEST PASSES
6918
6919 034173 477 00 0 00 000001 C20100: SETOB 1 ;PRELOAD AC,E WITH -1,,-1
6920 034174 432 00 0 00 000001 XORM 1 ;*XORM SHOULD PLACE 0 INTO E
6921 034175 302 01 0 00 000000 CAIE 1,0 ;PASS IF C(E)=0
6922 STOP^
6923 034176 254 04 0 00 034177 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6924 034177 324 00 0 00 034200 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6925 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6926 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6927 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6928
6929 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 68
DAKADM MAC 19-JAN-77 13:41 TEST OF MEMORY, BOTH AND SELF MODE INSTRUCTIONS SEQ 0164
6930 ;THIS TEST VERIFIES THAT SETZB PLACES ZEROS INTO BOTH AC AND E.
6931 ;AFTER SETZB IS EXECUTED, BOTH AC AND E ARE CHECKED
6932 ;FOR 0. IF EITHER AC OR E CONTAINS ANY ONES, THIS TEST FAILS
6933
6934 034200 403 00 0 00 000001 C20200: SETZB 1 ;*SETZB SHOULD PLACE ZEROES IN BOTH AC AND E
6935 034201 316 00 0 00 034536 CAMN [0] ;FAIL IF C(AC) IS NON-ZERO
6936 034202 312 00 0 00 000001 CAME 1 ;FAIL IF C(E) IS NON-ZERO
6937 STOP^
6938 034203 254 04 0 00 034204 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6939 034204 324 00 0 00 034205 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6940 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6941 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6942 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6943
6944 ;**********
6945
6946 ;THIS TEST VERIFIES THAT SETAB PLACES C(AC) INTO BOTH AC AND E.
6947 ;FIRST, AC IS PRELOADED WITH -1,,-1 AND E IS PRELOADED WITH 0;
6948 ;THEN, SETAB IS EXECUTED. BOTH AC AND E ARE CHECKED FOR -1,,-1
6949 ;IF EITHER AC OR E CONTAIN ANY ZEROS, THIS TEST FAILS.
6950
6951 034205 400 01 0 00 000000 C20300: SETZ 1, ;PRELOAD E WITH 0
6952 034206 474 00 0 00 000000 SETO ;PRELOAD AC WITH -1,,-1
6953 034207 427 00 0 00 000001 SETAB 1 ;*SETAB SHOULD PLACE -1,,-1 INTO BOTH AC AND E
6954 034210 316 00 0 00 034466 CAMN [-1] ;FAIL IF C(AC) IS NOT -1,-1
6955 034211 312 00 0 00 000001 CAME 1 ;FAIL IF C(E) IS NOT -1,,-1
6956 STOP^
6957 034212 254 04 0 00 034213 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6958 034213 324 00 0 00 034214 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6959 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6960 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6961 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6962
6963 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 69
DAKADM MAC 19-JAN-77 13:41 XCT INSTRUCTION - BASIC TESTS SEQ 0165
6964 SUBTTL XCT INSTRUCTION - BASIC TESTS
6965
6966 ;**********
6967
6968 ;THIS TEST VERIFIES THAT XCT WILL EXECUTE THE INSTRUCTION SPECIFIED BY C(E)
6969 ;IN THIS CASE, C(E) SPECIFIES A MOVEI INSTRUCTION
6970 ;AFTER EXECUTING MOVEI, CONTROL SHOULD RETURN TO
6971 ;THE NEXT SEQUENTIAL INSTRUCTION FOLLOWING XCT.
6972 ;THIS TEST PASSES IF CONTROL RETURNS TO THE NEXT SEQUENTIAL INSTRUCTION FOLLOWING XCT
6973
6974 034214 403 00 0 00 000001 C20400: SETZB 1 ;CLEAR AC0 AND AC1
6975 034215 256 00 0 00 034542 XCT [MOVEI 1,.+2] ;*XCT SHOULD RETURN CONTROL TO NEXT INSTRUCTION
6976 034216 334 00 0 00 000000 SKIPA
6977 STOP^
6978 034217 254 04 0 00 034220 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6979 034220 324 00 0 00 034221 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6980 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6981 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6982 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
6983
6984 ;**********
6985
6986 ;THIS TEST VERIFIES THAT XCT WILL EXECUTE THE INSTRUCTION SPECIFIED BY C(E)
6987 ;IN THIS CASE, C(E) SPECIFIES A MOVEI INSTRUCTION.
6988 ;AFTER EXECUTING MOVEI, THE AC SPECIFIED BY MOVEI IS CHECKED FOR
6989 ;0,,1 (THE EXPECTED RESULT). IF C(AC)=0,,1, THIS TEST PASSES
6990
6991 034221 403 00 0 00 000001 C20500: SETZB 1 ;CLEAR AC
6992 034222 256 00 0 00 034543 XCT [MOVEI 1,1] ;*XCT OF MOVEI SHOULD PLACE 1 IN THE AC
6993 034223 302 01 0 00 000001 CAIE 1,1 ;PASS IF C(AC)=1
6994 STOP^
6995 034224 254 04 0 00 034225 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
6996 034225 324 00 0 00 034226 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
6997 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
6998 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
6999 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7000
7001 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 70
DAKADM MAC 19-JAN-77 13:41 XCT INSTRUCTION - BASIC TESTS SEQ 0166
7002 ;THIS TEST VERIFIES THAT A NEST OF XCT INSTRUCTIONS WILL EXECUTE
7003 ;THE INSTRUCTION SPECIFIED BY THE MOST NESTED XCT AND RETURN CONTROL TO
7004 ;THE NEXT SEQUENTIAL INSTRUCTION FOLLOWING THE FIRST XCT.
7005 ;IN THIS CASE, THE EXECUTED INSTRUCTION IS MOVEI. AFTER EXECUTING THE MOVEI,
7006 ;C(AC) IS CHECKED FOR 0,,-1 (THE EXPECTED RESULT). IF C(AC)=0,,-1, THIS TEST PASSES
7007
7008 034226 403 00 0 00 000001 C20600: SETZB 1 ;CLEAR AC
7009 034227 256 00 0 00 034550 XCT [XCT[XCT[XCT[XCT[MOVEI 1,-1]]]]] ;*NESTED XCT OF MOVEI
7010 ;SHOULD PLACE 0,,-1 INTO AC
7011 034230 302 01 0 00 777777 CAIE 1,-1 ;PASS IF C(AC)=0,,-1
7012 STOP^
7013 034231 254 04 0 00 034232 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7014 034232 324 00 0 00 034233 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7015 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7016 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7017 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7018
7019 ;**********
7020
7021 ;THIS TEST VERIFIES THAT XCT WILL NOT MODIFY AN AC WHICH IS NOT SPECIFIED BY THE
7022 ;EXECUTED INSTRUCTION. IN THIS CASE, AC0 IS CLEARED AND THEN CHECKED FOR ZERO AFTER
7023 ;THE XCT INSTRUCTION IS EXECUTED. AC0 SHOULD NOT BE MODIFIED.
7024
7025 034233 403 00 0 00 000001 C20700: SETZB 1 ;CLEAR AC0,AC1
7026 034234 256 00 0 00 034551 XCT [MOVE 1,[-1]] ;*XCT SHOULD NOT MODIFY AC0
7027 034235 332 00 0 00 000000 SKIPE ;PASS IF AC0 WAS NOT MODIFIED
7028 STOP^
7029 034236 254 04 0 00 034237 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7030 034237 324 00 0 00 034240 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7031 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7032 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7033 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7034
7035 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 71
DAKADM MAC 19-JAN-77 13:41 XCT INSTRUCTION - BASIC TESTS SEQ 0167
7036 ;THIS TEST VERIFIES THAT XCT OF SKIPA SHOULD RETURN CONTROL TO THE
7037 ;SECOND SEQUENTIAL INSTRUCTION FOLLOWING XCT
7038
7039 034240 256 00 0 00 034552 C21000: XCT [SKIPA] ;XCT OF SKIPA SHOULD RETURN CONTROL TO .+2
7040 STOP^
7041 034241 254 04 0 00 034242 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7042 034242 324 00 0 00 034243 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7043 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7044 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7045 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7046
7047 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 72
DAKADM MAC 19-JAN-77 13:41 INDIRECT ADDRESSING - BASIC TESTS SEQ 0168
7048 SUBTTL INDIRECT ADDRESSING - BASIC TESTS
7049
7050 ;**********
7051
7052 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING WORKS WHEN BOTH E AND @E
7053 ;ARE WITHIN THE AC RANGE.
7054 ;THE INSTRUCTION SPECIFYING INDIRECT ADDRESSING IS A MOVE.
7055 ;AFTER MOVE IS EXECUTED, C(AC) IS CHECKED FOR 0,
7056 ;THE INITIAL CONTENTS OF THE INDIRECT ADDRESS
7057
7058 034243 476 00 0 00 000001 C21100: SETOM 1 ;PRELOAD AC WITH -1,,-1
7059 034244 201 07 0 00 000003 MOVEI 7,3 ;SETUP DIRECT ADDRESS WITH INDIRECT ADDRESS
7060 034245 402 00 0 00 000003 SETZM 3 ;PRELOAD INDIRECT ADDRESS WITH 0
7061 034246 200 01 1 00 000007 MOVE 1,@7 ;*FWT FROM INDIRECT ADDRESSS SHOULD
7062 ;PLACE 0 INTO THE AC
7063 034247 332 00 0 00 000001 SKIPE 1 ;PASS IF C(AC)=0
7064 STOP^
7065 034250 254 04 0 00 034251 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7066 034251 324 00 0 00 034252 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7067 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7068 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7069 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7070
7071 ;**********
7072
7073 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING WORKS WHEN BOTH E AND @E
7074 ;ARE WITHIN THE AC RANGE.
7075 ;THE INSTRUCTION SPECIFYING INDIRECT ADDRESSING IS A MOVE.
7076 ;AFTER MOVE IS EXECUTED, C(AC) IS CHECKED FOR -1,,-1,
7077 ;THE INITIAL CONTENTS OF THE INDIRECT ADDRESS
7078
7079 034252 402 00 0 00 000001 C21200: SETZM 1 ;PRELOAD AC WITH -1,,-1
7080 034253 201 07 0 00 000003 MOVEI 7,3 ;SETUP DIRECT ADDRESS WITH INDIRECT ADDRESS
7081 034254 476 00 0 00 000003 SETOM 3 ;PRELOAD INDIRECT ADDRESS WITH -1,,-1
7082 034255 200 01 1 00 000007 MOVE 1,@7 ;*FWT FROM INDIRECT ADDRESS SHOULD
7083 ;PLACE -1,,-1 INTO THE AC
7084 034256 312 01 0 00 034466 CAME 1,[-1,,-1] ;PASS IF C(AC)=-1,,-1
7085 STOP^
7086 034257 254 04 0 00 034260 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7087 034260 324 00 0 00 034261 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7088 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7089 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7090 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7091
7092 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 73
DAKADM MAC 19-JAN-77 13:41 INDIRECT ADDRESSING - BASIC TESTS SEQ 0169
7093 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING WORKS WHEN BOTH E AND @E
7094 ;ARE WITHIN THE AC RANGE.
7095 ;THE INSTRUCTION SPECIFYING INDIRECT ADDRESSING IS A MOVE.
7096 ;AFTER MOVE IS EXECUTED, C(AC) IS CHECKED FOR 707070,,707070,
7097 ;THE INITIAL CONTENTS OF THE INDIRECT ADDRESS
7098
7099 034261 402 00 0 00 000001 C21300: SETZM 1 ;PRELOAD AC WITH 0
7100 034262 201 07 0 00 000003 MOVEI 7,3 ;SETUP DIRECT ADDRESS WITH INDIRECT ADDRESS
7101 034263 200 03 0 00 034553 MOVE 3,[707070,,707070] ;PRELOAD INDIRECT ADDRESS WITH 707070,,707070
7102 034264 200 01 1 00 000007 MOVE 1,@7 ;*FWT FROM INDIRECT ADDRESS SHOULD
7103 ;PLACE 707070,,707070 INTO THE AC
7104 034265 312 01 0 00 034553 CAME 1,[707070,,707070] ;PASS IF C(AC)=707070,,707070
7105 STOP^
7106 034266 254 04 0 00 034267 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7107 034267 324 00 0 00 034270 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7108 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7109 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7110 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7111
7112 ;**********
7113
7114 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING WORKS WHEN E IS WITHIN THE AC RANGE
7115 ;AND @E IS BEYOND THE AC RANGE.
7116 ;THE INSTRUCTION SPECIFYING INDIRECT ADDRESSING IS A MOVE.
7117 ;AFTER MOVE IS EXECUTED, C(AC) IS CHECKED FOR 707070,,707070,
7118 ;THE INITIAL CONTENTS OF THE INDIRECT ADDRESS
7119
7120 034270 254 00 0 00 034272 C21400: JRST .+2
7121 034271 707070 707070 XWD 707070,707070 ;INDIRECT ADDRESS AND ITS DATA
7122 034272 402 00 0 00 000001 SETZM 1 ;PRELOAD AC WITH 0
7123 034273 201 07 0 00 034271 MOVEI 7,C21400+1 ;SETUP DIRECT ADDRESS WITH INDIRECT ADDRESS
7124 034274 200 01 1 00 000007 MOVE 1,@7 ;*FWT FROM INDIRECT ADDRESS SHOULD
7125 ;PLACE 707070,,707070 INTO AC
7126 034275 312 01 0 00 034271 CAME 1,C21400+1 ;PASS IF C(AC)=707070,,707070
7127 STOP^
7128 034276 254 04 0 00 034277 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7129 034277 324 00 0 00 034300 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7130 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7131 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7132 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7133
7134 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 74
DAKADM MAC 19-JAN-77 13:41 INDIRECT ADDRESSING - BASIC TESTS SEQ 0170
7135 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING WORKS WHEN BOTH E AND @E
7136 ;ARE BEYOND THE AC RANGE.
7137 ;THE INSTRUCTION SPECIFYING INDIRECT ADDRESSING IS A MOVE.
7138 ;AFTER MOVE IS EXECUTED, C(AC) IS CHECKED FOR 202020,,202020,
7139 ;THE INITIAL CONTENTS OF THE INDIRECT ADDRESS
7140
7141 034300 254 00 0 00 034303 C21500: JRST .+3
7142 034301 000000 034302 .+1 ;DIRECT ADDRESS AND ITS DATA
7143 034302 202020 202020 XWD 202020,202020 ;INDIRECT ADDRESS AND ITS DATA
7144 034303 402 00 0 00 000001 SETZM 1 ;PRELOAD AC WITH 0
7145 034304 200 01 1 00 034301 MOVE 1,@C21500+1 ;*FWT FROM INDIRECT ADDRESS SHOULD
7146 ;PLACE 202020,,202020 INTO AC
7147 034305 312 01 0 00 034302 CAME 1,C21500+2 ;PASS IF C(AC)=202020,,202020
7148 STOP^
7149 034306 254 04 0 00 034307 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7150 034307 324 00 0 00 034310 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7151 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7152 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7153 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7154
7155 ;**********
7156
7157 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING WORKS WHEN BOTH E AND @E
7158 ;ARE BEYOND THE AC RANGE.
7159 ;THE INSTRUCTION SPECIFYING INDIRECT ADDRESSING IS A CAME.
7160
7161 034310 254 00 0 00 034313 C21600: JRST .+3
7162 034311 000000 034312 .+1 ;DIRECT ADDRESS AND ITS DATA
7163 034312 272727 272727 XWD 272727,272727 ;INDIRECT ADDRESS AND ITS DATA
7164 034313 200 01 0 00 034312 MOVE 1,C21600+2 ;PRELOAD AC
7165 034314 312 01 1 00 034311 CAME 1,@C21600+1 ;*CAME OF DATA FROM INDIRECT ADDRESS - NON-AC RANGE
7166 STOP^
7167 034315 254 04 0 00 034316 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7168 034316 324 00 0 00 034317 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7169 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7170 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7171 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7172
7173 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 75
DAKADM MAC 19-JAN-77 13:41 INDIRECT ADDRESSING - BASIC TESTS SEQ 0171
7174 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING WORKS WHEN E IS WITHIN THE AC RANGE
7175 ;AND @E IS BEYOND THE AC RANGE.
7176 ;THE INSTRUCTION SPECIFYING INDIRECT ADDRESSING IS A CAME.
7177
7178 034317 254 00 0 00 034321 C21700: JRST .+2
7179 034320 252525 252525 XWD 252525,252525 ;INDIRECT ADDRESS AND ITS DATA
7180 034321 201 07 0 00 034320 MOVEI 7,C21700+1 ;SETUP DIRECT ADDRESS WITH INDIRECT ADDRESS
7181 034322 200 01 0 00 034320 MOVE 1,C21700+1 ;SETUP AC
7182 034323 312 01 1 00 000007 CAME 1,@7 ;*CAME IF DATA FROM INDIRECT ADDRESS - AC RANGE
7183 STOP^
7184 034324 254 04 0 00 034325 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7185 034325 324 00 0 00 034326 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7186 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7187 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7188 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7189
7190 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 76
DAKADM MAC 19-JAN-77 13:41 TEST INDIRECT ADDRESSING WITH INDEXING SEQ 0172
7191 SUBTTL TEST INDIRECT ADDRESSING WITH INDEXING
7192
7193 ;SETUP INDEX REGISTERS
7194
7195 034326 201 01 0 00 777774 MOVEI 1,-4
7196 034327 201 03 0 00 000002 MOVEI 3,2
7197 034330 201 04 0 00 000010 MOVEI 4,10
7198 034331 201 05 0 00 000001 MOVEI 5,1
7199 034332 201 06 0 00 000005 MOVEI 6,5
7200 034333 201 07 0 00 000007 MOVEI 7,7
7201 034334 201 10 0 00 000004 MOVEI 10,4
7202 034335 201 11 0 00 777772 MOVEI 11,-6
7203 034336 201 12 0 00 000005 MOVEI 12,5
7204 034337 201 13 0 00 000002 MOVEI 13,2
7205
7206 034340 254 00 0 00 034371 JRST C22000 ;RESUME TEST
7207
7208 ;INDIRECT ADDRESSING/INDEXING TEST TABLE
7209
7210 ;;;;;;;;;;; ;;;;;;;;;; ;;;;;;;;;;
7211
7212 ;DO NOT MODIFY THIS TABLE OR TESTS C21700 THRU C22600 INDEPENDENTLY !
7213
7214 ;;;;;;;;;; ;;;;;;;;;; ;;;;;;;;;;
7215
7216 034341 000003 034344 E217: E217A(3)
7217 034342 000020 034347 E220: @E220A
7218 034343 220220 220220 E220B: 220220,,220220
7219 034344 000020 034351 E217A: @E221A ;E221-4
7220 034345 221221 221221 E221B: 221221,,221221
7221 034346 217217 217217 E222A: 217217,,217217 ;E217A+2
7222 034347 000000 034343 E220A: E220B
7223 034350 000000 034350 E221: E221
7224 034351 000000 034345 E221A: E221B
7225 034352 000000 034350 E222: E221
7226 034353 223223 223223 E223A: 223223,,223223
7227 034354 000004 034354 E224A: E224A(4) ;E223-6
7228 034355 222222 222222 222222,,222222 ;E222A+7
7229 034356 000000 034356 E225: E225
7230 034357 000007 034346 E222A(7) ;E222+5
7231 034360 000020 034363 @E225A ;E225+2
7232 034361 225225 225225 E225B: 225225,,225225
7233 034362 000000 034362 E223: E223
7234 034363 000000 034361 E225A: E225B
7235 034364 224224 224224 224224,,224224 ;E224A+10
7236 034365 226226 226226 E226B: 226226,,226226
7237 034366 000000 034353 E223A ;E223+4
7238 034367 000025 034367 E226A: @E226A(5) ;E223+5
7239 034370 000000 034365 E226B ;E226A+1
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 77
DAKADM MAC 19-JAN-77 13:41 TEST INDIRECT ADDRESSING WITH INDEXING SEQ 0173
7240 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7241 LY.
7242 ;IN THIS CASE, MOVE 2,@E217 IS TESTED WHERE C(E217)=E217A(3) AND C(3)=0,,2.
7243 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E217A+2)=217217,,217217
7244
7245 034371 476 00 0 00 000002 C22000: SETOM 2 ;INITIALIZE AC
7246 034372 200 02 1 00 034341 MOVE 2,@E217 ;TEST INDIRECT ADDRESSING WITH INDEXING
7247 034373 312 02 0 00 034346 CAME 2,E217A+2 ;PASS IF C(AC)=217217,,217217
7248 STOP^
7249 034374 254 04 0 00 034375 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7250 034375 324 00 0 00 034376 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7251 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7252 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7253 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7254
7255 ;**********
7256
7257 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7258 LY.
7259 ;IN THIS CASE, MOVE 2,@E220 IS TESTED WHERE C(E220)=@E220A AND C(E220A)=E220B.
7260 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E220B)=220220,,220220
7261
7262 034376 402 00 0 00 000002 C22100: SETZM 2 ;INITIALIZE AC
7263 034377 200 02 1 00 034342 MOVE 2,@E220 ;TEST INDIRECT ADDRESSING WITH INDEXING
7264 034400 312 02 0 00 034343 CAME 2,E220B ;PASS IF C(AC)=220220,,220220
7265 STOP^
7266 034401 254 04 0 00 034402 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7267 034402 324 00 0 00 034403 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7268 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7269 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7270 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7271
7272 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 78
DAKADM MAC 19-JAN-77 13:41 TEST INDIRECT ADDRESSING WITH INDEXING SEQ 0174
7273 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7274 LY.
7275 ;IN THIS CASE,E221(1) 2,@E217 IS TESTED WHERE C(1)=-4 AND E221-4=E217A
7276 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E217A)=@E221A=20,,E221A
7277
7278 034403 476 00 0 00 000002 C22200: SETOM 2 ;INITIALIZE AC
7279 034404 200 02 0 01 034350 MOVE 2,E221(1) ;TEST INDIRECT ADDRESSING WITH INDEXING
7280 034405 312 02 0 00 034344 CAME 2,E217A ;PASS IF C(AC)=@E221A=20,,E221A
7281 STOP^
7282 034406 254 04 0 00 034407 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7283 034407 324 00 0 00 034410 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7284 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7285 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7286 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7287
7288 ;**********
7289
7290 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7291 LY.
7292 ;IN THIS CASE, MOVE 2,E222(6) IS TESTED WHERE C(6)=5
7293 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E222+5)=E222A(7)=7,,E222A
7294
7295 034410 402 00 0 00 000002 C22300: SETZM 2 ;INITIALIZE AC
7296 034411 200 02 0 06 034352 MOVE 2,E222(6) ;TEST INDIRECT ADDRESSING WITH INDEXING
7297 034412 312 02 0 00 034357 CAME 2,E222+5 ;PASS IF C(AC)=E222A(7)=7,,E222A
7298 STOP^
7299 034413 254 04 0 00 034414 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7300 034414 324 00 0 00 034415 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7301 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7302 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7303 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7304
7305 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 79
DAKADM MAC 19-JAN-77 13:41 TEST INDIRECT ADDRESSING WITH INDEXING SEQ 0175
7306 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7307 LY.
7308 ;IN THIS CASE, MOVE 2,@E223(10) IS TESTED WHERE C(10)=4 AND C(E223+4)=E223A
7309 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E223A)=223223,,223223
7310
7311 034415 476 00 0 00 000002 C22400: SETOM 2 ;INITIALIZE AC
7312 034416 200 02 1 10 034362 MOVE 2,@E223(10) ;TEST INDIRECT ADDRESSING WITH INDEXING
7313 034417 312 02 0 00 034353 CAME 2,E223A ;PASS IF C(AC)=223223,,223223
7314 STOP^
7315 034420 254 04 0 00 034421 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7316 034421 324 00 0 00 034422 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7317 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7318 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7319 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7320
7321 ;**********
7322
7323 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7324 LY.
7325 ;IN THIS CASE, MOVE 2,@E223(11) IS TESTED WHERE C(11)=-6, C(E223-6)=E224A(4) AND C(4)=10
7326 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E224A+10)=224224,,224224
7327
7328 034422 402 00 0 00 000002 C22500: SETZM 2 ;INITIALIZE AC
7329 034423 200 02 1 11 034362 MOVE 2,@E223(11) ;TEST INDIRECT ADDRESSING WITH INDEXING
7330 034424 312 02 0 00 034364 CAME 2,E224A+10 ;PASS IF C(AC)=224224,,224224
7331 STOP^
7332 034425 254 04 0 00 034426 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7333 034426 324 00 0 00 034427 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7334 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7335 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7336 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7337
7338 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 80
DAKADM MAC 19-JAN-77 13:41 TEST INDIRECT ADDRESSING WITH INDEXING SEQ 0176
7339 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7340 LY.
7341 ;IN THIS CASE, MOVE 2,@E225(13) IS TESTED WHERE C(13)=2, C(E225+2)=@E225A
7342 ;AND C(E225A)=E225B
7343 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E225B)=225225,,225225
7344
7345 034427 476 00 0 00 000002 C22600: SETOM 2 ;INITIALIZE AC
7346 034430 200 02 1 13 034356 MOVE 2,@E225(13) ;TEST INDIRECT ADDRESSING WITH INDEXING
7347 034431 312 02 0 00 034361 CAME 2,E225B ;PASS IF C(AC)=225225,,225225
7348 STOP^
7349 034432 254 04 0 00 034433 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7350 034433 324 00 0 00 034434 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7351 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7352 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7353 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7354
7355 ;**********
7356
7357 ;THIS TEST VERIFIES THAT INDIRECT ADDRESSING IN COMBINATION WITH INDEXING FUNCTIONS CORRECT
7358 LY.
7359 ;IN THIS CASE, MOVE 2,@E223(12) IS TESTED WHERE C(12)=5, C(E223+5)=@E226A(5),
7360 ;C(5)=1 AND C(E226A+1)=E226B
7361 ;HENCE, THE RESULT IN THE AC SHOULD BE C(E226B)=226226,,226226
7362
7363 034434 402 00 0 00 000002 C22700: SETZM 2 ;INITIALIZE AC
7364 034435 200 02 1 12 034362 MOVE 2,@E223(12) ;TEST INDIRECT ADDRESSING WITH INDEXING
7365 034436 312 02 0 00 034365 CAME 2,E226B ;PASS IF C(AC)=226226,,226226
7366 STOP^
7367 034437 254 04 0 00 034440 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
7368 034440 324 00 0 00 034441 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
7369 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
7370 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
7371 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
7372
7373 ;**********
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 81
DAKADM MAC 19-JAN-77 13:41 TEST INDIRECT ADDRESSING WITH INDEXING SEQ 0177
7374
7375 034441 254 00 0 00 030057 JRST BEGEND
7376 SUBTTL *STOR* RESERVED STORAGE, JAN 18,1977
7377
7378 ;PROGRAM LITERALS
7379
7380 XLIST
7381 IFNDEF $LPAPER,<LIST>
7382 034442 LIT
7383 034442 000001 000001
7384 034443 254 00 0 00 030741
7385 034444 000001 000000
7386 034445 000002 000000
7387 034446 000004 000000
7388 034447 000010 000000
7389 034450 000020 000000
7390 034451 000040 000000
7391 034452 000100 000000
7392 034453 000200 000000
7393 034454 000400 000000
7394 034455 001000 000000
7395 034456 002000 000000
7396 034457 004000 000000
7397 034460 010000 000000
7398 034461 020000 000000
7399 034462 040000 000000
7400 034463 100000 000000
7401 034464 200000 000000
7402 034465 400000 000000
7403 034466 777777 777777
7404 034467 777777 777776
7405 034470 777777 777775
7406 034471 777777 777773
7407 034472 777777 777767
7408 034473 777777 777757
7409 034474 777777 777737
7410 034475 777777 777677
7411 034476 777777 777577
7412 034477 777777 777377
7413 034500 777777 776777
7414 034501 777777 775777
7415 034502 777777 773777
7416 034503 777777 767777
7417 034504 777777 757777
7418 034505 777777 737777
7419 034506 777777 677777
7420 034507 777777 577777
7421 034510 777777 377777
7422 034511 777776 777777
7423 034512 777775 777777
7424 034513 777773 777777
7425 034514 777767 777777
7426 034515 777757 777777
7427 034516 777737 777777
7428 034517 777677 777777
DAKAD PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (4) 0,2 MACRO %52(537) 14:33 19-JAN-77 PAGE 1
STOR KLM 18-JAN-77 11:42 *STOR* RESERVED STORAGE, JAN 18,1977 SEQ 0178
7429 034520 777577 777777
7430 034521 777377 777777
7431 034522 776777 777777
7432 034523 775777 777777
7433 034524 773777 777777
7434 034525 767777 777777
7435 034526 757777 777777
7436 034527 737777 777777
7437 034530 677777 777777
7438 034531 577777 777777
7439 034532 377777 777777
7440 034533 777777 000000
7441 034534 000000 777777
7442 034535 252525 252525
7443 034536 000000 000000
7444 034537 254 04 0 00 032743
7445 034540 377777 377777
7446 034541 400000 400000
7447 034542 201 01 0 00 034217
7448 034543 201 01 0 00 000001
7449 034544 201 01 0 00 777777
7450 034545 256 00 0 00 034544
7451 034546 256 00 0 00 034545
7452 034547 256 00 0 00 034546
7453 034550 256 00 0 00 034547
7454 034551 200 01 0 00 034466
7455 034552 334 00 0 00 000000
7456 034553 707070 707070
7457 LIST
7458 034554 000000 000000 ENDSLD: 0
7459
7460 IFDEF DEBUG,<
7461 034555 PATCH: BLOCK DEBUG ;PATCHING AREA
7462 >
7463
7464 ;PROGRAM VARIABLES
7465 034655 VAR
7466
7467 IFDEF PGMEND,<
7468 034655 000000 000000 END: 0
7469 030000 END BEGIN >
NO ERRORS DETECTED
PROGRAM BREAK IS 000000
ABSLUTE BREAK IS 034656
CPU TIME USED 00:28.911
11K CORE USED
ABORT 77#
AC 6566# 6567 6572 6573 6575 6576 6578 6579 6581 6582 6584 6585 6587 6588 SEQ 0179
6590 6591 6593 6594 6596 6597 6599 6600 6601
AC0 672#
ALTMGO 431#
ANXM 345#
APR 769 770 771
AROV 345# 844# 5503 5710 5714
AROVU 345#
AST 546#
ATSIN 547#
BEGEND 427# 7375
BEGIN 291 292 358# 715 837 7469
BEGIN1 374# 428
BELL 550#
BIS 345# 848#
C00 882 907#
C100 924#
C1000 2026#
C10000 5729#
C10100 5752#
C10200 5774#
C10300 5797#
C10400 5816#
C10500 5833#
C1100 2383#
C11200 5850#
C11300 5866#
C11400 5881#
C11500 5897#
C11600 5911#
C11700 5926#
C1200 2400#
C12000 5942#
C12100 5960#
C12200 6000#
C12300 6018#
C12301 6059#
C12600 6101#
C12700 6117#
C1300 2873#
C13100 6132#
C13200 6148#
C13300 6164#
C13400 6205#
C13600 6248#
C13700 6269#
C1400 3349#
C14000 6289#
C14100 6314#
C14200 6334#
C14500 6362#
C14600 6377#
C14700 6393#
C1500 3366# SEQ 0180
C15000 6407#
C15100 6422#
C15200 6438#
C15300 6453#
C15400 6468#
C15500 6487#
C15600 6503#
C15700 6519#
C1600 3839#
C16000 6534#
C16100 6550#
C16200 6566#
C16201 6615#
C16202 6656#
C16400 6699#
C16500 6715#
C16600 6730#
C16700 6746#
C1700 4322#
C17000 6763#
C17100 6787#
C17200 6803#
C17300 6820#
C17400 6835#
C17500 6852#
C17600 6869#
C17700 6886#
C200 941#
C2000 4569#
C20000 6902#
C20100 6919#
C20200 6934#
C20300 6951#
C20400 6974#
C20500 6991#
C20600 7008#
C20700 7025#
C2100 4814#
C21000 7039#
C21100 7058#
C21200 7079#
C21300 7099#
C21400 7120# 7123 7126
C21500 7141# 7145 7147
C21600 7161# 7164 7165
C21700 7178# 7180 7181
C2200 4831#
C22000 7206 7245#
C22100 7262#
C22200 7278#
C22300 7295#
C22400 7311#
C22500 7328# SEQ 0181
C22600 7345#
C22700 7363#
C2400 4848#
C2410 4858#
C2700 4874#
C2710 4884#
C300 956#
C3000 4899#
C3100 4924#
C3110 4942#
C3200 4957#
C3210 4967#
C3300 4983#
C3400 5000#
C3500 5018#
C3600 5037#
C3700 5054#
C400 972#
C4000 5071#
C4100 5090#
C4200 5107#
C4300 5126#
C4400 5145#
C4500 5162#
C4600 5178#
C4700 5194#
C500 990#
C5000 5212#
C5100 5229#
C5200 5246#
C5300 5264#
C5400 5282#
C5500 5300#
C5600 5320#
C5700 5339#
C5701 5357#
C5702 5374#
C600 1354#
C6000 5395#
C6100 5413#
C6200 5431#
C6300 5453#
C6400 5477#
C6500 5501#
C6600 5521#
C6700 5542#
C700 1724#
C7000 5560#
C7100 5582#
C7200 5605#
C7300 5630#
C7400 5652#
C7500 5671# SEQ 0182
C7600 5687#
C7700 5707#
CCA 345#
CHAIN 97#
CHNOFF 345#
CHNON 345#
CLK 345#
CLKCLR 345#
CLKDIS 345#
CLKENB 345#
CLKU 345#
CLOCKF 413#
CNTLC 430#
COMMA 539#
CONSW 414#
CPOPJ 434#
CPOPJ1 432#
CRLF 226 227 534#
CRLF2 230 231 536#
CRY0 345# 845# 5434 5584 5732 5736
CRY1 345# 846# 5523 5755 5759
CSHFLG 593#
CSHMEM 594#
CYCL60 587#
DCK 345# 852# 6316 6320 6336 6345
DDT 674#
DDTLNK 111# 372
DDTSRT 372#
DEBUG 36# 7460 7461
DECVER 5# 11 27 393
DF22F 498#
DIAGMN 361#
DIAGNO 673#
DIAMON 675#
DING 83#
DOLLAR 553#
DONG11 676# 816 832
DSKUPD 398
DTE 680# 816 818 832 834
DTE0 681#
DTE1 682#
DTE2 683#
DTE3 684#
E217 7216# 7246
E217A 7216 7219# 7247 7280
E220 7217# 7263
E220A 7217 7222#
E220B 7218# 7222 7264
E221 7223# 7223 7225 7279
E221A 7219 7224#
E221B 7220# 7224
E222 7225# 7296 7297
E222A 7221# 7230 SEQ 0183
E223 7233# 7233 7312 7329 7364
E223A 7226# 7237 7313
E224A 7227# 7227 7330
E225 7229# 7229 7346
E225A 7231 7234#
E225B 7232# 7234 7347
E226A 7238# 7238
E226B 7236# 7239 7365
END 7468#
ENDFIX 667#
ENDSLD 7458#
ERMORE 447#
ERRPC 418#
ERRTLS 419#
ERSTOP 86#
EXCASB 33# 396
EXIOT 345# 850#
FOV 345# 847# 5544 5562 5607 5777 5781 6250
FOVU 345#
FRDLNK 109#
FSELNK 108#
FXU 345# 851# 6271 6275 6291 6300
HYPEN 544#
INHCSH 94#
INHPAG 91#
INXM 345#
IOCLR 345#
ITERAT 65# 391
ITRCH1 451#
ITRCNT 391# 761 790 794 802 803 807
JOB41 345#
JOBAPR 345#
JOBCNI 345#
JOBDDT 345#
JOBFF 345#
JOBOPC 345#
JOBREL 345#
JOBREN 345#
JOBSA 345#
JOBSYM 345#
JOBTPC 345#
JOBUSY 345#
JOBUUO 345#
JOBVER 345#
KA10 345
KAHZ50 99#
KAIFLG 408#
KI10 345
KL10 345
KLFLG 409# 763 781 800
KLOLD 306
KLTYP 625# 762 773 815 817 831 833
LDLNK 110# 361 363 SEQ 0184
LFP 548#
LOOPER 85#
LUUO 345#
LUUO1 478 479
LUUO10 478 483
LUUO11 478 483
LUUO12 478 484
LUUO13 478 484
LUUO14 478 485
LUUO15 478 485
LUUO16 478 486
LUUO17 478 486
LUUO2 478 480
LUUO20 478 487
LUUO21 478 487
LUUO22 478 488
LUUO23 478 488
LUUO24 478 489
LUUO25 478 489
LUUO26 478 490
LUUO27 478 490
LUUO3 478 480
LUUO30 478 491
LUUO31 478 491
LUUO32 478 492
LUUO33 478 492
LUUO4 478 481
LUUO5 478 481
LUUO6 478 482
LUUO7 478 482
LUUOI 345#
MAPNEW 499#
MARGIN 421#
MCNVER 6# 11 27 393
MEMLOW 501#
MEMMAP 399
MEMSIZ 502#
MEMTOT 500#
MINUS 543#
MODDVC 93#
MODDVL 291 291# 394
MODDVU 292 292# 395
MODLNK 112# 358
MONCTL 411# 810 883
MONFLG 410# 755 879
MONTEN 412# 760 796 825
MPVU 345#
NOPNT 81#
NXMU 345#
OPRSEL 95#
OPTIME 513#
P 138 139 140 141 345# 433
PAG 345# SEQ 0185
PALERS 87#
PARCLR 345#
PARDIS 345#
PAREA0 58#
PAREA1 59# 389
PAREA2 60# 390
PAREA3 61# 387
PAREA4 62# 388
PAREA5 63# 400
PAREA6 64# 401
PAREA7 400#
PAREA8 401#
PARENB 345#
PARU 345#
PASCNT 415# 789
PATCH 7461#
PDISF 510#
PDLOVU 345#
PERIOD 540#
PFSTRT 367#
PGMEND 35# 66# 7467
PGMNAM 392 884 887#
PI 802
PICHN1 345#
PICHN2 345#
PICHN3 345#
PICHN4 345#
PICHN5 345#
PICHN6 345#
PICHN7 345#
PICHNA 345#
PICLR 345#
PIOFF 345#
PION 345#
PLIST 579# 579
PLISTE 579 581# 665
PLISTS 580#
PLUS 545#
PNTENB 509#
PNTEXT 388#
PNTFLG 508#
PNTINH 511#
PNTLPT 82#
PNTNAM 387#
PNTSPC 512#
PVPAGI 606#
PWFCLR 345#
QUEST 551#
RADIX 554#
RADLSC 556#
RADLSP 555#
RANDBS 389#
REENTR 369# SEQ 0186
RELIAB 89#
REPT 345#
REPT1 345#
REPTU 467#
REQSET 345#
RESRT1 444#
RESRT2 445#
RETURN 376# 798 805 826
RSTART 78#
RTP 549#
RUNFLG 416#
SADR1 46# 365
SADR10 55# 381
SADR11 56# 382
SADR2 47# 367
SADR3 48# 369
SADR4 49#
SADR5 50# 430
SADR6 51# 431
SADR7 52# 378
SADR8 53# 379
SADR9 54# 380
SBINIT 151 375#
SCOPE 468#
SFSTRT 365#
SLASH 552#
SN 982# 1048 1048# 1067 1067# 1086 1086# 1105 1105# 1124 1124# 1143 1143# 1162
1162# 1181 1181# 1200 1200# 1219 1219# 1238 1238# 1257 1257# 1276 1276# 1295
1295# 1314 1314# 1333 1333# 1346# 1428 1428# 1448 1448# 1468 1468# 1488 1488#
1508 1508# 1528 1528# 1548 1548# 1568 1568# 1588 1588# 1608 1608# 1628 1628#
1648 1648# 1668 1668# 1688 1688# 1708 1708# 1721# 1744 1744# 1763 1763# 1782
1782# 1801 1801# 1820 1820# 1839 1839# 1858 1858# 1877 1877# 1896 1896# 1915
1915# 1934 1934# 1953 1953# 1972 1972# 1991 1991# 2010 2010# 2023# 2051 2051#
2073 2073# 2095 2095# 2117 2117# 2139 2139# 2161 2161# 2183 2183# 2205 2205#
2227 2227# 2249 2249# 2271 2271# 2293 2293# 2315 2315# 2337 2337# 2359 2359#
2397# 2428 2428# 2453 2453# 2478 2478# 2503 2503# 2528 2528# 2553 2553# 2578
2578# 2603 2603# 2628 2628# 2653 2653# 2678 2678# 2703 2703# 2728 2728# 2753
2753# 2778 2778# 2803 2803# 2828 2828# 2853 2853# 2870# 2901 2901# 2926 2926#
2951 2951# 2976 2976# 3001 3001# 3026 3026# 3051 3051# 3076 3076# 3101 3101#
3126 3126# 3151 3151# 3176 3176# 3201 3201# 3226 3226# 3251 3251# 3276 3276#
3301 3301# 3326 3326# 3363# 3394 3394# 3419 3419# 3444 3444# 3469 3469# 3494
3494# 3519 3519# 3544 3544# 3569 3569# 3594 3594# 3619 3619# 3644 3644# 3669
3669# 3694 3694# 3719 3719# 3744 3744# 3769 3769# 3794 3794# 3819 3819# 3836#
3867 3867# 3892 3892# 3917 3917# 3942 3942# 3967 3967# 3992 3992# 4017 4017#
4042 4042# 4067 4067# 4092 4092# 4117 4117# 4142 4142# 4167 4167# 4192 4192#
4217 4217# 4242 4242# 4267 4267# 4292 4292# 4311# 4333 4333# 4348 4348# 4363
4363# 4378 4378# 4393 4393# 4408 4408# 4423 4423# 4438 4438# 4453 4453# 4468
4468# 4483 4483# 4498 4498# 4513 4513# 4528 4528# 4543 4543# 4559# 4580 4580#
4595 4595# 4610 4610# 4625 4625# 4640 4640# 4655 4655# 4670 4670# 4685 4685#
4700 4700# 4715 4715# 4730 4730# 4745 4745# 4760 4760# 4775 4775# 4790 4790#
SPACE 541#
SRTDDT 371#
START 46 47 48 49 50 51 52 53 54 55 56 359 758 767 SEQ 0187
782 786 875#
START1 378#
START2 379#
START3 380#
START4 381#
START5 382#
STARTA 374 784 795 804 811 821 885 906#
SUBLNK 113# 375
SWTEXR 390#
SYSEXR 363#
TAB 542#
TESTPC 417#
TICKS 420#
TOTALS 79#
TTNBRF 600#
TTYFIL 516#
TTYSPD 517#
TXTINH 90#
USER 407# 751 754 756 757 791 875# 875 878 880 881
USERF 39# 345# 753 849# 877
USRASB 34# 397
USRCRF 526#
USRLFF 525#
UUODIS 479#
UUOEXT 435#
UUORTN 436#
UUOSKP 433#
XX 4313# 4335 4335# 4336 4338 4350 4350# 4351 4353 4365 4365# 4366 4368 4380
4380# 4381 4383 4395 4395# 4396 4398 4410 4410# 4411 4413 4425 4425# 4426
4428 4440 4440# 4441 4443 4455 4455# 4456 4458 4470 4470# 4471 4473 4485
4485# 4486 4488 4500 4500# 4501 4503 4515 4515# 4516 4518 4530 4530# 4531
4533 4545 4545# 4546 4548 4561# 4582 4582# 4583 4584 4597 4597# 4598 4599
4612 4612# 4613 4614 4627 4627# 4628 4629 4642 4642# 4643 4644 4657 4657#
4658 4659 4672 4672# 4673 4674 4687 4687# 4688 4689 4702 4702# 4703 4704
4717 4717# 4718 4719 4732 4732# 4733 4734 4747 4747# 4748 4749 4762 4762#
4763 4764 4777 4777# 4778 4779 4792 4792# 4793 4794
ZZ 983# 993 993# 994 995 995# 996 997 997# 998 999 999# 1000 1001
1001# 1002 1003 1003# 1004 1005 1005# 1006 1007 1007# 1008 1009 1009# 1010
1011 1011# 1012 1013 1013# 1014 1015 1015# 1016 1017 1017# 1018 1019 1019#
1020 1021 1021# 1022 1023 1023# 1024 1026# 1049 1049# 1050 1068 1068# 1069
1087 1087# 1088 1106 1106# 1107 1125 1125# 1126 1144 1144# 1145 1163 1163#
1164 1182 1182# 1183 1201 1201# 1202 1220 1220# 1221 1239 1239# 1240 1258
1258# 1259 1277 1277# 1278 1296 1296# 1297 1315 1315# 1316 1334 1334# 1335
1347# 1358 1358# 1359 1360 1361 1361# 1362 1363 1364 1364# 1365 1366 1367
1367# 1368 1369 1370 1370# 1371 1372 1373 1373# 1374 1375 1376 1376# 1377
1378 1379 1379# 1380 1381 1382 1382# 1383 1384 1385 1385# 1386 1387 1388
1388# 1389 1390 1391 1391# 1392 1393 1394 1394# 1395 1396 1397 1397# 1398
1399 1400 1400# 1401 1402 1404# 1429 1429# 1430 1449 1449# 1450 1469 1469#
1470 1489 1489# 1490 1509 1509# 1510 1529 1529# 1530 1549 1549# 1550 1569
1569# 1570 1589 1589# 1590 1609 1609# 1610 1629 1629# 1630 1649 1649# 1650
1669 1669# 1670 1689 1689# 1690 1709 1709# 1710 1722# 1745 1745# 1746 1747
1764 1764# 1765 1766 1783 1783# 1784 1785 1802 1802# 1803 1804 1821 1821#
1822 1823 1840 1840# 1841 1842 1859 1859# 1860 1861 1878 1878# 1879 1880 SEQ 0188
1897 1897# 1898 1899 1916 1916# 1917 1918 1935 1935# 1936 1937 1954 1954#
1955 1956 1973 1973# 1974 1975 1992 1992# 1993 1994 2011 2011# 2012 2013
2024# 2052 2052# 2053 2054 2055 2074 2074# 2075 2076 2077 2096 2096# 2097
2098 2099 2118 2118# 2119 2120 2121 2140 2140# 2141 2142 2143 2162 2162#
2163 2164 2165 2184 2184# 2185 2186 2187 2206 2206# 2207 2208 2209 2228
2228# 2229 2230 2231 2250 2250# 2251 2252 2253 2272 2272# 2273 2274 2275
2294 2294# 2295 2296 2297 2316 2316# 2317 2318 2319 2338 2338# 2339 2340
2341 2360 2360# 2361 2362 2363 2398# 2429 2429# 2430 2430# 2432 2435 2454
2454# 2455 2457 2460 2479 2479# 2480 2482 2485 2504 2504# 2505 2507 2510
2529 2529# 2530 2532 2535 2554 2554# 2555 2557 2560 2579 2579# 2580 2582
2585 2604 2604# 2605 2607 2610 2629 2629# 2630 2632 2635 2654 2654# 2655
2657 2660 2679 2679# 2680 2682 2685 2704 2704# 2705 2707 2710 2729 2729#
2730 2732 2735 2754 2754# 2755 2757 2760 2779 2779# 2780 2782 2785 2804
2804# 2805 2807 2810 2829 2829# 2830 2832 2835 2854 2854# 2855 2857 2860
2871# 2902 2902# 2903 2903# 2905 2908 2927 2927# 2928 2930 2933 2952 2952#
2953 2955 2958 2977 2977# 2978 2980 2983 3002 3002# 3003 3005 3008 3027
3027# 3028 3030 3033 3052 3052# 3053 3055 3058 3077 3077# 3078 3080 3083
3102 3102# 3103 3105 3108 3127 3127# 3128 3130 3133 3152 3152# 3153 3155
3158 3177 3177# 3178 3180 3183 3202 3202# 3203 3205 3208 3227 3227# 3228
3230 3233 3252 3252# 3253 3255 3258 3277 3277# 3278 3280 3283 3302 3302#
3303 3305 3308 3327 3327# 3328 3330 3333 3364# 3395 3395# 3396 3396# 3398
3401 3420 3420# 3421 3423 3426 3445 3445# 3446 3448 3451 3470 3470# 3471
3473 3476 3495 3495# 3496 3498 3501 3520 3520# 3521 3523 3526 3545 3545#
3546 3548 3551 3570 3570# 3571 3573 3576 3595 3595# 3596 3598 3601 3620
3620# 3621 3623 3626 3645 3645# 3646 3648 3651 3670 3670# 3671 3673 3676
3695 3695# 3696 3698 3701 3720 3720# 3721 3723 3726 3745 3745# 3746 3748
3751 3770 3770# 3771 3773 3776 3795 3795# 3796 3798 3801 3820 3820# 3821
3823 3826 3837# 3868 3868# 3869 3869# 3871 3874 3893 3893# 3894 3896 3899
3918 3918# 3919 3921 3924 3943 3943# 3944 3946 3949 3968 3968# 3969 3971
3974 3993 3993# 3994 3996 3999 4018 4018# 4019 4021 4024 4043 4043# 4044
4046 4049 4068 4068# 4069 4071 4074 4093 4093# 4094 4096 4099 4118 4118#
4119 4121 4124 4143 4143# 4144 4146 4149 4168 4168# 4169 4171 4174 4193
4193# 4194 4196 4199 4218 4218# 4219 4221 4224 4243 4243# 4244 4246 4249
4268 4268# 4269 4271 4274 4293 4293# 4294 4296 4299 4312# 4334 4334# 4336
4337 4338 4349 4349# 4351 4352 4353 4364 4364# 4366 4367 4368 4379 4379#
4381 4382 4383 4394 4394# 4396 4397 4398 4409 4409# 4411 4412 4413 4424
4424# 4426 4427 4428 4439 4439# 4441 4442 4443 4454 4454# 4456 4457 4458
4469 4469# 4471 4472 4473 4484 4484# 4486 4487 4488 4499 4499# 4501 4502
4503 4514 4514# 4516 4517 4518 4529 4529# 4531 4532 4533 4544 4544# 4546
4547 4548 4560# 4581 4581# 4583 4584 4585 4596 4596# 4598 4599 4600 4611
4611# 4613 4614 4615 4626 4626# 4628 4629 4630 4641 4641# 4643 4644 4645
4656 4656# 4658 4659 4660 4671 4671# 4673 4674 4675 4686 4686# 4688 4689
4690 4701 4701# 4703 4704 4705 4716 4716# 4718 4719 4720 4731 4731# 4733
4734 4735 4746 4746# 4748 4749 4750 4761 4761# 4763 4764 4765 4776 4776#
4778 4779 4780 4791 4791# 4793 4794 4795
$$420 725#
$$421 726#
$$422 727#
$$423 728#
$$424 729#
$$425 730#
$$426 731#
$$427 732# SEQ 0189
$$430 733#
$$431 734#
$$432 735#
$$433 736#
$$434 737#
$$435 738#
$$436 739#
$$437 740#
$$500 743#
$$501 744#
$$502 745#
$$503 746#
$$BEGI 711#
$$DTE0 777 816#
$$DTE1 778 818#
$$DTE2 779 832#
$$DTE3 780 834#
$$LOC 708# 747
$$MUUO 631#
$$OUTE 637#
$$STAR 711 712 751#
$$TAX1 649#
$$TAX2 650#
$$TOGG 643#
$$UUO 620#
$ACC0 458#
$BEGEN 720#
$BEND1 428#
$BEND2 429#
$CHRIN 519#
$CRLF 521#
$DDT 689#
$DEVCH 345#
$DSKUP 398#
$DTCHR 701#
$DTCI 695#
$DTCLK 694# 775
$DTCMD 698# 813 829
$DTF11 697#
$DTFLG 693# 774 814 819 830 835
$DTMTD 702#
$DTMTI 703#
$DTOPR 700# 776
$DTSEQ 699#
$DTSWR 705#
$DTT11 696#
$DVCH1 345#
$DVOFF 515#
$EMODE 396#
$ENDFX 665# 666
$FFF 523#
$IBUF 571#
$INEXT 573# SEQ 0190
$INNM 572#
$ITRHL 439#
$ITRX1 440#
$LPAPE 7381
$MMAP 399#
$MODVL 394#
$MODVU 395#
$OBUF 562#
$ONETM 422#
$OUTEX 564#
$OUTNM 563#
$PAPER 345
$PARER 446#
$PNAME 392#
$PSHER 450#
$PVER 393#
$RSRTX 442#
$RSRTY 443#
$SPAG1 462#
$SPB1 785 791#
$SPBEN 720 789#
$SPBEX 792 800#
$SPBKL 801 807#
$SPBUS 794#
$SPEC 717 784#
$SPKLD 808 825#
$START 359#
$STD 688# 715#
$STKIL 760#
$STKL 769#
$STL 690#
$STM 691# 717#
$SVAPR 460#
$SVPAG 461#
$SVPI 459#
$SVUPC 465#
$SVUUO 464#
$TABF 522#
$TTCHR 518#
$TWCNT 514#
$TYPNB 520#
$UMODE 397#
$UORTX 437#
$USRHL 441#
$UUOER 438# 479
$VTF 524#
%ACTFL 471#
%ACTUL 472#
%COREC 470#
%CORFL 469#
%DISCR 473#
%ERHI1 612#
%ERHI2 613# SEQ 0191
%ERHI3 614#
.JB41 345#
.JBAPR 345#
.JBCNI 345#
.JBDDT 345#
.JBFF 345#
.JBOPC 345#
.JBREL 345#
.JBREN 345#
.JBSA 345#
.JBSYM 345#
.JBTPC 345#
.JBUSY 345#
.JBUUO 345#
.JBVER 345#
CFLUSH 262#
CINVAL 261# SEQ 0192
CLOKOP 256#
CWRTBI 263#
DROPDV 223#
ENDUUO 269# 427
EOPUUO 270# 429
ERLOOP 314#
ERLP1 315#
ERLP2 316#
ERRHLT 158#
ERROR 323#
ERROR1 335#
ERUUO 313#
EXIT 797
FATAL 157#
FRD36 298#
FRD8 299#
FREAD 297#
FSELEC 296#
GET 141#
GO 138#
HALT 143# 448 725 727 728 732 746 837 928 944 959 975 1052 1071
1090 1109 1128 1147 1166 1185 1204 1223 1242 1261 1280 1299 1318 1337
1432 1452 1472 1492 1512 1532 1552 1572 1592 1612 1632 1652 1672 1692
1712 1749 1768 1787 1806 1825 1844 1863 1882 1901 1920 1939 1958 1977
1996 2015 2057 2079 2101 2123 2145 2167 2189 2211 2233 2255 2277 2299
2321 2343 2365 2389 2437 2462 2487 2512 2537 2562 2587 2612 2637 2662
2687 2712 2737 2762 2787 2812 2837 2862 2910 2935 2960 2985 3010 3035
3060 3085 3110 3135 3160 3185 3210 3235 3260 3285 3310 3335 3355 3403
3428 3453 3478 3503 3528 3553 3578 3603 3628 3653 3678 3703 3728 3753
3778 3803 3828 3876 3901 3926 3951 3976 4001 4026 4051 4076 4101 4126
4151 4176 4201 4226 4251 4276 4301 4340 4355 4370 4385 4400 4415 4430
4445 4460 4475 4490 4505 4520 4535 4550 4587 4602 4617 4632 4647 4662
4677 4692 4707 4722 4737 4752 4767 4782 4797 4818 4835 4853 4860 4879
4886 4911 4937 4944 4962 4969 4983 4987 5006 5024 5043 5059 5076 5094
5112 5130 5149 5166 5182 5199 5217 5234 5252 5270 5288 5307 5327 5346
5362 5379 5400 5418 5439 5463 5487 5508 5528 5549 5568 5592 5615 5636
5658 5675 5693 5716 5738 5761 5783 5805 5818 5835 5854 5870 5885 5900
5914 5930 5946 5964 5971 5979 5987 6005 6022 6029 6037 6045 6063 6070
6078 6086 6105 6121 6136 6152 6169 6176 6184 6192 6210 6217 6225 6233
6257 6277 6302 6322 6347 6365 6381 6396 6410 6426 6442 6456 6472 6491
6507 6523 6538 6554 6603 6620 6627 6635 6643 6661 6668 6676 6684 6703
6719 6734 6750 6768 6775 6791 6807 6824 6839 6857 6874 6891 6906 6923
6938 6957 6978 6995 7013 7029 7041 7065 7086 7106 7128 7149 7167 7184
7249 7266 7282 7299 7315 7332 7349 7367
JEN 145#
JRSTF 144#
MAPADR 279#
MAPCNK 280#
MAPMEM 276#
MAPPNT 282#
MAPSET 281#
MEMSEG 278#
MEMZRO 277# SEQ 0193
MODPCP 289#
MODPCU 288#
MTROP 257#
NAME 9# 11
PBELL 232#
PCRL 226#
PCRL2 230#
PCRL2F 231#
PCRLF 227#
PFORCE 234#
PGMINT 151#
PJRST 142#
PMSG 236#
PMSGF 239#
PNT1 192#
PNT11 206#
PNT11F 207#
PNT1F 193#
PNT2 194#
PNT2F 195#
PNT3 196#
PNT3F 197#
PNT4 198#
PNT4F 199#
PNT5 200#
PNT5F 201#
PNT6 202#
PNT6F 203#
PNT7 204#
PNT7F 205#
PNTA 178#
PNTADF 209#
PNTADR 208#
PNTAF 179#
PNTAL 180#
PNTALF 181#
PNTCHF 191#
PNTCHR 190#
PNTCI 188#
PNTCIF 189#
PNTCW 224#
PNTCWF 225#
PNTDCF 217#
PNTDEC 216#
PNTDS 218#
PNTDSF 219#
PNTHW 212#
PNTHWF 213#
PNTMGN 303#
PNTMSF 185#
PNTMSG 184#
PNTNM 220#
PNTOCF 215# SEQ 0194
PNTOCS 214#
PNTOCT 210#
PNTOTF 211#
PNTSIX 221#
PNTSXF 222#
PSIXL 182#
PSIXLF 183#
PSIXM 186#
PSIXMF 187#
PSP 228#
PSPF 229#
PUT 140#
REPTUO 317#
RTN 139# 435
S 69# 71 75 104 106 115 118 133 134 136 147 149 153 155
160 164 309 311 345 350 356 383 385 403 405 423 425 454
456 474 476 494 496 504 506 527 532 558 560 567 569 575
577 583 585 589 591 596 598 602 604 608 610 616 618 621
623 627 629 633 635 639 641 645 647 652 657 661 663
SFLAG 869# 5432 5455 5479 5501 5521 5542 5560 5582 5605 5708 5730 5753 5775
5797 6248 6269 6289 6294 6314 6334 6339
SIXBTZ 245#
STOP 860# 927 943 958 974 1051 1070 1089 1108 1127 1146 1165 1184 1203
1222 1241 1260 1279 1298 1317 1336 1431 1451 1471 1491 1511 1531 1551
1571 1591 1611 1631 1651 1671 1691 1711 1748 1767 1786 1805 1824 1843
1862 1881 1900 1919 1938 1957 1976 1995 2014 2056 2078 2100 2122 2144
2166 2188 2210 2232 2254 2276 2298 2320 2342 2364 2388 2436 2461 2486
2511 2536 2561 2586 2611 2636 2661 2686 2711 2736 2761 2786 2811 2836
2861 2909 2934 2959 2984 3009 3034 3059 3084 3109 3134 3159 3184 3209
3234 3259 3284 3309 3334 3354 3402 3427 3452 3477 3502 3527 3552 3577
3602 3627 3652 3677 3702 3727 3752 3777 3802 3827 3875 3900 3925 3950
3975 4000 4025 4050 4075 4100 4125 4150 4175 4200 4225 4250 4275 4300
4339 4354 4369 4384 4399 4414 4429 4444 4459 4474 4489 4504 4519 4534
4549 4586 4601 4616 4631 4646 4661 4676 4691 4706 4721 4736 4751 4766
4781 4796 4817 4834 4852 4859 4878 4885 4910 4936 4943 4961 4968 4986
5005 5023 5042 5058 5075 5093 5111 5129 5148 5165 5181 5198 5216 5233
5251 5269 5287 5306 5326 5345 5361 5378 5399 5417 5438 5462 5486 5507
5527 5548 5567 5591 5614 5635 5656 5674 5692 5715 5737 5760 5782 5804
5817 5834 5853 5869 5884 5899 5913 5929 5945 5963 5970 5978 5986 6004
6021 6028 6036 6044 6062 6069 6077 6085 6104 6120 6135 6151 6168 6175
6183 6191 6209 6216 6224 6232 6256 6276 6301 6321 6346 6364 6380 6395
6409 6425 6441 6455 6471 6490 6506 6522 6537 6553 6602 6619 6626 6634
6642 6660 6667 6675 6683 6702 6718 6733 6749 6767 6774 6790 6806 6823
6838 6856 6873 6890 6905 6922 6937 6956 6977 6994 7012 7028 7040 7064
7085 7105 7127 7148 7166 7183 7248 7265 7281 7298 7314 7331 7348 7366
SWITCH 251#
TTALTM 173#
TTICHR 166#
TTICNV 171#
TTIDEC 170#
TTINO 168#
TTIOCT 169#
TTIYES 167# SEQ 0195
TTLOOK 172#
TTSIXB 174#
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 1
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0196
*030001 JRST 0,030600
INITIAL
C(AC)=000000 000000
C(E)=402000 030037
FINAL
C(E)=402000 030037
TIME PC MA SC FE AR MQ BR
IT0 030001 030001 0 0 254000030600 0 254000030600
IT1 030001 0 0 0 254000030600 0 254000030600
AT3 030001 0 0 0 000000030600 0 254000030600
AT6 030001 0 0 0 000000030600 0 254000030600
FT1A 030001 0 0 0 000000030600 0 254000030600
FT9 030002 0 0 0 000000030600 0 254000030600
ET0 0 030002 0 0 000000030600 0 254000030600
ST1A 0 030002 0 0 000000030600 0 254000030600
ST9 0 030002 0 0 000000030600 0 254000030600
*030600 SETZM 0,030037
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 402000030037 0 000000030037
IT1 0 0 0 0 402000030037 0 000000030037
AT3 0 0 0 0 000000030037 0 402000030037
AT6 0 030037 0 0 000000030037 0 402000030037
FT1A 0 030037 0 0 000000030037 0 000000030037
FT9 030601 030037 0 0 000000030037 0 000000030037
ET0 030601 030037 0 0 0 0 000000030037
ST6 030601 030037 0 0 0 0 000000030037
ST6A 030601 030037 0 0 0 0 000000030037
ST9 030601 030037 0 0 0 0 000000030037
*030601 JSP 0,030602
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 030602
TIME PC MA SC FE AR MQ BR
IT0 030601 030601 0 0 265000030602 0 000000030602
IT1 030601 0 0 0 265000030602 0 000000030602
AT3 030601 0 0 0 000000030602 0 265000030602
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 2
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0197
AT6 030601 030602 0 0 000000030602 0 265000030602
FT1A 030601 030602 0 0 000000030602 0 000000030602
FT9 030602 030602 0 0 000000030602 0 000000030602
ET0 030602 030602 0 0 000000030602 0 000000030602
ST1 030602 030602 0 0 000000030602 0 000000030602
ST2 030602 030602 0 0 000000030602 0 000000030602
ST9 030602 030602 0 0 000000030602 0 000000030602
*030602 TLNE 0,010000
INITIAL
C(AC)=000000 030602
FINAL
C(AC)=000000 030602
TIME PC MA SC FE AR MQ BR
IT0 030602 030602 0 0 603000010000 0 0
IT1 030602 0 0 0 603000010000 0 0
AT3 030602 0 0 0 000000010000 0 603000010000
AT6 030602 0 0 0 000000010000 0 603000010000
FT1A 030602 0 0 0 000000010000 0 000000010000
FT2 030602 0 0 0 0 0 000000010000
FT2RQ 030602 0 0 0 000000030602 0 000000010000
FT3 030602 0 0 0 000000030602 0 000000010000
FT9 030603 0 0 0 000000030602 0 000000010000
ET0 030603 0 0 0 030602000000 0 000000010000
ET1 030603 0 0 0 030602000000 0 0
ET2 030604 0 0 0 000000030602 0 0
ST1A 030604 0 0 0 000000030602 0 0
ST9 030604 0 0 0 000000030602 0 0
*030604 SKIPN 0,030042
INITIAL
C(AC)=000000 030602
C(E)=777777 777777
FINAL
C(AC)=000000 030602
TIME PC MA SC FE AR MQ BR
IT0 030604 030604 0 0 336000030042 0 777777777777
IT1 030604 0 0 0 336000030042 0 777777777777
AT3 030604 0 0 0 000000030042 0 336000030042
AT6 030604 030042 0 0 000000030042 0 336000030042
FT0 030604 030042 0 0 777777777777 0 336000030042
FT1A 030604 030042 0 0 777777777777 0 777777777777
FT9 030605 030042 0 0 777777777777 0 777777777777
ET0 030606 030042 0 0 777777777777 0 777777777777
ST1A 030606 030042 0 0 777777777777 0 777777777777
ST9 030606 030042 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 3
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0198
*030606 SKIPE 0,030037
INITIAL
C(AC)=000000 030602
C(E)=000000 000000
FINAL
C(AC)=000000 030602
TIME PC MA SC FE AR MQ BR
IT0 030606 030606 0 0 332000030037 0 0
IT1 030606 0 0 0 332000030037 0 0
AT3 030606 0 0 0 000000030037 0 332000030037
AT6 030606 030037 0 0 000000030037 0 332000030037
FT0 030606 030037 0 0 0 0 332000030037
FT1A 030606 030037 0 0 0 0 0
FT9 030607 030037 0 0 0 0 0
ET0 030610 030037 0 0 0 0 0
ST1A 030610 030037 0 0 0 0 0
ST9 030610 030037 0 0 0 0 0
*030610 SKIPN 0,030044
INITIAL
C(AC)=000000 030602
C(E)=777777 777777
FINAL
C(AC)=000000 030602
TIME PC MA SC FE AR MQ BR
IT0 030610 030610 0 0 336000030044 0 777777777777
IT1 030610 0 0 0 336000030044 0 777777777777
AT3 030610 0 0 0 000000030044 0 336000030044
AT6 030610 030044 0 0 000000030044 0 336000030044
FT0 030610 030044 0 0 777777777777 0 336000030044
FT1A 030610 030044 0 0 777777777777 0 777777777777
FT9 030611 030044 0 0 777777777777 0 777777777777
ET0 030612 030044 0 0 777777777777 0 777777777777
ST1A 030612 030044 0 0 777777777777 0 777777777777
ST9 030612 030044 0 0 777777777777 0 777777777777
*030612 SETZM 0,030516
INITIAL
C(AC)=000000 030602
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030612 030612 0 0 402000030516 0 000000030516
IT1 030612 0 0 0 402000030516 0 000000030516
AT3 030612 0 0 0 000000030516 0 402000030516
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 4
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0199
AT6 030612 030516 0 0 000000030516 0 402000030516
FT1A 030612 030516 0 0 000000030516 0 000000030516
FT9 030613 030516 0 0 000000030516 0 000000030516
ET0 030613 030516 0 0 0 0 000000030516
ST6 030613 030516 0 0 0 0 000000030516
ST6A 030613 030516 0 0 0 0 000000030516
ST9 030613 030516 0 0 0 0 000000030516
*030613 SETZM 0,030041
INITIAL
C(AC)=000000 030602
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030613 030613 0 0 402000030041 0 000000030041
IT1 030613 0 0 0 402000030041 0 000000030041
AT3 030613 0 0 0 000000030041 0 402000030041
AT6 030613 030041 0 0 000000030041 0 402000030041
FT1A 030613 030041 0 0 000000030041 0 000000030041
FT9 030614 030041 0 0 000000030041 0 000000030041
ET0 030614 030041 0 0 0 0 000000030041
ST6 030614 030041 0 0 0 0 000000030041
ST6A 030614 030041 0 0 0 0 000000030041
ST9 030614 030041 0 0 0 0 000000030041
*030614 MOVE 1,034442
INITIAL
C(AC)=000000 000000
C(E)=000001 000001
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 030614 030614 0 0 200040034442 0 000001000001
IT1 030614 0 0 0 200040034442 0 000001000001
AT3 030614 0 0 0 000000034442 0 200040034442
AT6 030614 034442 0 0 000000034442 0 200040034442
FT0 030614 034442 0 0 000001000001 0 200040034442
FT1A 030614 034442 0 0 000001000001 0 000001000001
FT9 030615 034442 0 0 000001000001 0 000001000001
ET0 030615 034442 0 0 000001000001 0 000001000001
ST1 030615 034442 0 0 000001000001 0 000001000001
ST2 030615 034442 0 0 000001000001 0 000001000001
ST9 030615 034442 0 0 000001000001 0 000001000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 5
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0200
*030615 BLT 1,000001
INITIAL
C(AC)=000001 000001
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 030615 030615 0 0 251040000001 0 000000000001
IT1 030615 0 0 0 251040000001 0 000000000001
AT3 030615 0 0 0 000000000001 0 251040000001
AT6 030615 000001 0 0 000000000001 0 251040000001
FT1A 030615 000001 0 0 000000000001 0 000000000001
FT2 030615 000001 0 0 0 0 000000000001
FT2RQ 030615 000001 0 0 000001000001 0 000000000001
FT3 030615 000001 0 0 000001000001 0 000000000001
FT6 030615 000001 0 0 000001000001 0 000000000001
FT7 030615 000001 0 0 000001000001 000001000001 000000000001
FT4RQ 030615 000001 0 0 000001000001 000001000001 000000000001
FT4A 030615 000001 0 0 000001000001 000001000001 000000000001
FT9 030615 000001 0 0 000001000001 000001000001 000000000001
ET0 030615 000001 0 0 000001000001 000001000001 000000000001
ET1 030615 000001 0 0 000001000001 000001000001 000000000001
ET2 030615 000001 0 0 000001000001 000002000002 000000000001
BLTT1 030615 000001 0 0 000000000002 000002000002 000000000001
BLTT2 030616 000001 0 0 000000000002 000002000002 000000000001
ST9 030616 000001 0 0 000000000002 000002000002 000000000001
*030616 CAMN 1,034442
INITIAL
C(AC)=000001 000001
C(E)=000001 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030616 030616 0 0 316040034442 0 000001000001
IT1 030616 0 0 0 316040034442 0 000001000001
AT3 030616 0 0 0 000000034442 0 316040034442
AT6 030616 034442 0 0 000000034442 0 316040034442
FT0 030616 034442 0 0 000001000001 0 316040034442
FT1A 030616 034442 0 0 000001000001 0 000001000001
FT2 030616 034442 0 0 0 0 000001000001
FT2RQ 030616 034442 0 0 000001000001 0 000001000001
FT3 030616 034442 0 0 000001000001 0 000001000001
FT9 030617 034442 0 0 000001000001 0 000001000001
ET0 030617 034442 0 0 0 0 000001000001
ST1A 030617 034442 0 0 0 0 000001000001
ST9 030617 034442 0 0 0 0 000001000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 6
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0201
*030617 JRST 0,030712
INITIAL
C(AC)=000000 030602
C(E)=402000 030037
FINAL
C(E)=402000 030037
TIME PC MA SC FE AR MQ BR
IT0 030617 030617 0 0 254000030712 0 254000030712
IT1 030617 0 0 0 254000030712 0 254000030712
AT3 030617 0 0 0 000000030712 0 254000030712
AT6 030617 030712 0 0 000000030712 0 254000030712
FT1A 030617 030712 0 0 000000030712 0 254000030712
FT9 030620 030712 0 0 000000030712 0 254000030712
ET0 030712 030620 0 0 000000030712 0 254000030712
ST1A 030712 030620 0 0 000000030712 0 254000030712
ST9 030712 030620 0 0 000000030712 0 254000030712
*030712 SETZM 0,030037
INITIAL
C(AC)=000000 030602
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030712 030712 0 0 402000030037 0 000000030037
IT1 030712 0 0 0 402000030037 0 000000030037
AT3 030712 0 0 0 000000030037 0 402000030037
AT6 030712 030037 0 0 000000030037 0 402000030037
FT1A 030712 030037 0 0 000000030037 0 000000030037
FT9 030713 030037 0 0 000000030037 0 000000030037
ET0 030713 030037 0 0 0 0 000000030037
ST6 030713 030037 0 0 0 0 000000030037
ST6A 030713 030037 0 0 0 0 000000030037
ST9 030713 030037 0 0 0 0 000000030037
*030713 JSP 0,030714
INITIAL
C(AC)=000000 030602
FINAL
C(AC)=000000 030714
TIME PC MA SC FE AR MQ BR
IT0 030713 030713 0 0 265000030714 0 000000030714
IT1 030713 0 0 0 265000030714 0 000000030714
AT3 030713 0 0 0 000000030714 0 265000030714
AT6 030713 030714 0 0 000000030714 0 265000030714
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 7
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0202
FT1A 030713 030714 0 0 000000030714 0 000000030714
FT9 030714 030714 0 0 000000030714 0 000000030714
ET0 030714 030714 0 0 000000030714 0 000000030714
ST1 030714 030714 0 0 000000030714 0 000000030714
ST2 030714 030714 0 0 000000030714 0 000000030714
ST9 030714 030714 0 0 000000030714 0 000000030714
*030714 TLNE 0,010000
INITIAL
C(AC)=000000 030714
FINAL
C(AC)=000000 030714
TIME PC MA SC FE AR MQ BR
IT0 030714 030714 0 0 603000010000 0 0
IT1 030714 0 0 0 603000010000 0 0
AT3 030714 0 0 0 000000010000 0 603000010000
AT6 030714 0 0 0 000000010000 0 603000010000
FT1A 030714 0 0 0 000000010000 0 000000010000
FT2 030714 0 0 0 0 0 000000010000
FT2RQ 030714 0 0 0 000000030714 0 000000010000
FT3 030714 0 0 0 000000030714 0 000000010000
FT9 030715 0 0 0 000000030714 0 000000010000
ET0 030715 0 0 0 030714000000 0 000000010000
ET1 030715 0 0 0 030714000000 0 0
ET2 030716 0 0 0 000000030714 0 0
ST1A 030716 0 0 0 000000030714 0 0
ST9 030716 0 0 0 000000030714 0 0
*030716 SKIPN 0,030042
INITIAL
C(AC)=000000 030714
C(E)=777777 777777
FINAL
C(AC)=000000 030714
TIME PC MA SC FE AR MQ BR
IT0 030716 030716 0 0 336000030042 0 777777777777
IT1 030716 0 0 0 336000030042 0 777777777777
AT3 030716 0 0 0 000000030042 0 336000030042
AT6 030716 030042 0 0 000000030042 0 336000030042
FT0 030716 030042 0 0 777777777777 0 336000030042
FT1A 030716 030042 0 0 777777777777 0 777777777777
FT9 030717 030042 0 0 777777777777 0 777777777777
ET0 030720 030042 0 0 777777777777 0 777777777777
ST1A 030720 030042 0 0 777777777777 0 777777777777
ST9 030720 030042 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 8
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0203
*030720 SKIPN 0,030037
INITIAL
C(AC)=000000 030714
C(E)=000000 000000
FINAL
C(AC)=000000 030714
TIME PC MA SC FE AR MQ BR
IT0 030720 030720 0 0 336000030037 0 0
IT1 030720 0 0 0 336000030037 0 0
AT3 030720 0 0 0 000000030037 0 336000030037
AT6 030720 030037 0 0 000000030037 0 336000030037
FT0 030720 030037 0 0 0 0 336000030037
FT1A 030720 030037 0 0 0 0 0
FT9 030721 030037 0 0 0 0 0
ET0 030721 030037 0 0 0 0 0
ST1A 030721 030037 0 0 0 0 0
ST9 030721 030037 0 0 0 0 0
*030721 JRST 0,030742
INITIAL
C(AC)=000000 030714
C(E)=400000 000000
FINAL
C(E)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 030721 030721 0 0 254000030742 0 254000030742
IT1 030721 0 0 0 254000030742 0 254000030742
AT3 030721 0 0 0 000000030742 0 254000030742
AT6 030721 030742 0 0 000000030742 0 254000030742
FT1A 030721 030742 0 0 000000030742 0 254000030742
FT9 030722 030742 0 0 000000030742 0 254000030742
ET0 030742 030722 0 0 000000030742 0 254000030742
ST1A 030742 030722 0 0 000000030742 0 254000030742
ST9 030742 030722 0 0 000000030742 0 254000030742
*030742 SETZ 0,000000
INITIAL
C(AC)=000000 030714
C(E)=000000 030714
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030742 030742 0 0 400000000000 0 0
IT1 030742 0 0 0 400000000000 0 0
AT3 030742 0 0 0 0 0 400000000000
AT6 030742 0 0 0 0 0 400000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 9
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0204
FT1A 030742 0 0 0 0 0 0
FT9 030743 0 0 0 0 0 0
ET0 030743 0 0 0 0 0 0
ST1 030743 0 0 0 0 0 0
ST2 030743 0 0 0 0 0 0
ST9 030743 0 0 0 0 0 0
*030743 MOVEI 1,000001
INITIAL
C(AC)=000001 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 030743 030743 0 0 201040000001 0 000000000001
IT1 030743 0 0 0 201040000001 0 000000000001
AT3 030743 0 0 0 000000000001 0 201040000001
AT6 030743 000001 0 0 000000000001 0 201040000001
FT1A 030743 000001 0 0 000000000001 0 000000000001
FT9 030744 000001 0 0 000000000001 0 000000000001
ET0 030744 000001 0 0 000000000001 0 000000000001
ST1 030744 000001 0 0 000000000001 0 000000000001
ST2 030744 000001 0 0 000000000001 0 000000000001
ST9 030744 000001 0 0 000000000001 0 000000000001
*030744 CAIE 1,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030744 030744 0 0 302040000001 0 000000000001
IT1 030744 0 0 0 302040000001 0 000000000001
AT3 030744 0 0 0 000000000001 0 302040000001
AT6 030744 000001 0 0 000000000001 0 302040000001
FT1A 030744 000001 0 0 000000000001 0 000000000001
FT2 030744 000001 0 0 0 0 000000000001
FT2RQ 030744 000001 0 0 000000000001 0 000000000001
FT3 030744 000001 0 0 000000000001 0 000000000001
FT9 030745 000001 0 0 000000000001 0 000000000001
ET0 030746 000001 0 0 0 0 000000000001
ST1A 030746 000001 0 0 0 0 000000000001
ST9 030746 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 10
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0205
*030746 JUMPA 0,030747
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030746 030746 0 0 324000030747 0 000000030747
IT1 030746 0 0 0 324000030747 0 000000030747
AT3 030746 0 0 0 000000030747 0 324000030747
AT6 030746 030747 0 0 000000030747 0 324000030747
FT1A 030746 030747 0 0 000000030747 0 000000030747
FT2 030746 030747 0 0 0 0 000000030747
FT2RQ 030746 030747 0 0 0 0 000000030747
FT3 030746 030747 0 0 0 0 000000030747
FT9 030747 030747 0 0 0 0 000000030747
ET0 030747 030747 0 0 0 0 000000030747
ST1A 030747 030747 0 0 0 0 000000030747
ST9 030747 030747 0 0 0 0 000000030747
*030747 MOVEI 2,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 030747 030747 0 0 201100000002 0 000000000002
IT1 030747 0 0 0 201100000002 0 000000000002
AT3 030747 0 0 0 000000000002 0 201100000002
AT6 030747 000002 0 0 000000000002 0 201100000002
FT1A 030747 000002 0 0 000000000002 0 000000000002
FT9 030750 000002 0 0 000000000002 0 000000000002
ET0 030750 000002 0 0 000000000002 0 000000000002
ST1 030750 000002 0 0 000000000002 0 000000000002
ST2 030750 000002 0 0 000000000002 0 000000000002
ST9 030750 000002 0 0 000000000002 0 000000000002
*030750 CAIE 2,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030750 030750 0 0 302100000002 0 000000000002
IT1 030750 0 0 0 302100000002 0 000000000002
AT3 030750 0 0 0 000000000002 0 302100000002
AT6 030750 000002 0 0 000000000002 0 302100000002
FT1A 030750 000002 0 0 000000000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 11
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0206
FT2 030750 000002 0 0 0 0 000000000002
FT2RQ 030750 000002 0 0 000000000002 0 000000000002
FT3 030750 000002 0 0 000000000002 0 000000000002
FT9 030751 000002 0 0 000000000002 0 000000000002
ET0 030752 000002 0 0 0 0 000000000002
ST1A 030752 000002 0 0 0 0 000000000002
ST9 030752 000002 0 0 0 0 000000000002
*030752 JUMPA 0,030753
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030752 030752 0 0 324000030753 0 000000030753
IT1 030752 0 0 0 324000030753 0 000000030753
AT3 030752 0 0 0 000000030753 0 324000030753
AT6 030752 030753 0 0 000000030753 0 324000030753
FT1A 030752 030753 0 0 000000030753 0 000000030753
FT2 030752 030753 0 0 0 0 000000030753
FT2RQ 030752 030753 0 0 0 0 000000030753
FT3 030752 030753 0 0 0 0 000000030753
FT9 030753 030753 0 0 0 0 000000030753
ET0 030753 030753 0 0 0 0 000000030753
ST1A 030753 030753 0 0 0 0 000000030753
ST9 030753 030753 0 0 0 0 000000030753
*030753 MOVEI 4,000004
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 030753 030753 0 0 201200000004 0 000000000004
IT1 030753 0 0 0 201200000004 0 000000000004
AT3 030753 0 0 0 000000000004 0 201200000004
AT6 030753 000004 0 0 000000000004 0 201200000004
FT1A 030753 000004 0 0 000000000004 0 000000000004
FT9 030754 000004 0 0 000000000004 0 000000000004
ET0 030754 000004 0 0 000000000004 0 000000000004
ST1 030754 000004 0 0 000000000004 0 000000000004
ST2 030754 000004 0 0 000000000004 0 000000000004
ST9 030754 000004 0 0 000000000004 0 000000000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 12
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0207
*030754 CAIE 4,000004
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030754 030754 0 0 302200000004 0 000000000004
IT1 030754 0 0 0 302200000004 0 000000000004
AT3 030754 0 0 0 000000000004 0 302200000004
AT6 030754 000004 0 0 000000000004 0 302200000004
FT1A 030754 000004 0 0 000000000004 0 000000000004
FT2 030754 000004 0 0 0 0 000000000004
FT2RQ 030754 000004 0 0 000000000004 0 000000000004
FT3 030754 000004 0 0 000000000004 0 000000000004
FT9 030755 000004 0 0 000000000004 0 000000000004
ET0 030756 000004 0 0 0 0 000000000004
ST1A 030756 000004 0 0 0 0 000000000004
ST9 030756 000004 0 0 0 0 000000000004
*030756 JUMPA 0,030757
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030756 030756 0 0 324000030757 0 000000030757
IT1 030756 0 0 0 324000030757 0 000000030757
AT3 030756 0 0 0 000000030757 0 324000030757
AT6 030756 030757 0 0 000000030757 0 324000030757
FT1A 030756 030757 0 0 000000030757 0 000000030757
FT2 030756 030757 0 0 0 0 000000030757
FT2RQ 030756 030757 0 0 0 0 000000030757
FT3 030756 030757 0 0 0 0 000000030757
FT9 030757 030757 0 0 0 0 000000030757
ET0 030757 030757 0 0 0 0 000000030757
ST1A 030757 030757 0 0 0 0 000000030757
ST9 030757 030757 0 0 0 0 000000030757
*030757 MOVEI 10,000010
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 030757 030757 0 0 201400000010 0 000000000010
IT1 030757 0 0 0 201400000010 0 000000000010
AT3 030757 0 0 0 000000000010 0 201400000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 13
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0208
AT6 030757 000010 0 0 000000000010 0 201400000010
FT1A 030757 000010 0 0 000000000010 0 000000000010
FT9 030760 000010 0 0 000000000010 0 000000000010
ET0 030760 000010 0 0 000000000010 0 000000000010
ST1 030760 000010 0 0 000000000010 0 000000000010
ST2 030760 000010 0 0 000000000010 0 000000000010
ST9 030760 000010 0 0 000000000010 0 000000000010
*030760 CAIE 10,000010
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030760 030760 0 0 302400000010 0 000000000010
IT1 030760 0 0 0 302400000010 0 000000000010
AT3 030760 0 0 0 000000000010 0 302400000010
AT6 030760 000010 0 0 000000000010 0 302400000010
FT1A 030760 000010 0 0 000000000010 0 000000000010
FT2 030760 000010 0 0 0 0 000000000010
FT2RQ 030760 000010 0 0 000000000010 0 000000000010
FT3 030760 000010 0 0 000000000010 0 000000000010
FT9 030761 000010 0 0 000000000010 0 000000000010
ET0 030762 000010 0 0 0 0 000000000010
ST1A 030762 000010 0 0 0 0 000000000010
ST9 030762 000010 0 0 0 0 000000000010
*030762 JUMPA 0,030763
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030762 030762 0 0 324000030763 0 000000030763
IT1 030762 0 0 0 324000030763 0 000000030763
AT3 030762 0 0 0 000000030763 0 324000030763
AT6 030762 030763 0 0 000000030763 0 324000030763
FT1A 030762 030763 0 0 000000030763 0 000000030763
FT2 030762 030763 0 0 0 0 000000030763
FT2RQ 030762 030763 0 0 0 0 000000030763
FT3 030762 030763 0 0 0 0 000000030763
FT9 030763 030763 0 0 0 0 000000030763
ET0 030763 030763 0 0 0 0 000000030763
ST1A 030763 030763 0 0 0 0 000000030763
ST9 030763 030763 0 0 0 0 000000030763
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 14
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0209
*030763 MOVEI 0,000000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030763 030763 0 0 201000000000 0 0
IT1 030763 0 0 0 201000000000 0 0
AT3 030763 0 0 0 0 0 201000000000
AT6 030763 0 0 0 0 0 201000000000
FT1A 030763 0 0 0 0 0 0
FT9 030764 0 0 0 0 0 0
ET0 030764 0 0 0 0 0 0
ST1 030764 0 0 0 0 0 0
ST2 030764 0 0 0 0 0 0
ST9 030764 0 0 0 0 0 0
*030764 MOVEI 1,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 030764 030764 0 0 201040000001 0 000000000001
IT1 030764 0 0 0 201040000001 0 000000000001
AT3 030764 0 0 0 000000000001 0 201040000001
AT6 030764 000001 0 0 000000000001 0 201040000001
FT1A 030764 000001 0 0 000000000001 0 000000000001
FT9 030765 000001 0 0 000000000001 0 000000000001
ET0 030765 000001 0 0 000000000001 0 000000000001
ST1 030765 000001 0 0 000000000001 0 000000000001
ST2 030765 000001 0 0 000000000001 0 000000000001
ST9 030765 000001 0 0 000000000001 0 000000000001
*030765 MOVEI 2,000002
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 030765 030765 0 0 201100000002 0 000000000002
IT1 030765 0 0 0 201100000002 0 000000000002
AT3 030765 0 0 0 000000000002 0 201100000002
AT6 030765 000002 0 0 000000000002 0 201100000002
FT1A 030765 000002 0 0 000000000002 0 000000000002
FT9 030766 000002 0 0 000000000002 0 000000000002
ET0 030766 000002 0 0 000000000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 15
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0210
ST1 030766 000002 0 0 000000000002 0 000000000002
ST2 030766 000002 0 0 000000000002 0 000000000002
ST9 030766 000002 0 0 000000000002 0 000000000002
*030766 MOVEI 3,000003
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 030766 030766 0 0 201140000003 0 000000000003
IT1 030766 0 0 0 201140000003 0 000000000003
AT3 030766 0 0 0 000000000003 0 201140000003
AT6 030766 000003 0 0 000000000003 0 201140000003
FT1A 030766 000003 0 0 000000000003 0 000000000003
FT9 030767 000003 0 0 000000000003 0 000000000003
ET0 030767 000003 0 0 000000000003 0 000000000003
ST1 030767 000003 0 0 000000000003 0 000000000003
ST2 030767 000003 0 0 000000000003 0 000000000003
ST9 030767 000003 0 0 000000000003 0 000000000003
*030767 MOVEI 4,000004
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 030767 030767 0 0 201200000004 0 000000000004
IT1 030767 0 0 0 201200000004 0 000000000004
AT3 030767 0 0 0 000000000004 0 201200000004
AT6 030767 000004 0 0 000000000004 0 201200000004
FT1A 030767 000004 0 0 000000000004 0 000000000004
FT9 030770 000004 0 0 000000000004 0 000000000004
ET0 030770 000004 0 0 000000000004 0 000000000004
ST1 030770 000004 0 0 000000000004 0 000000000004
ST2 030770 000004 0 0 000000000004 0 000000000004
ST9 030770 000004 0 0 000000000004 0 000000000004
*030770 MOVEI 5,000005
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 030770 030770 0 0 201240000005 0 000000000005
IT1 030770 0 0 0 201240000005 0 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 16
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0211
AT3 030770 0 0 0 000000000005 0 201240000005
AT6 030770 000005 0 0 000000000005 0 201240000005
FT1A 030770 000005 0 0 000000000005 0 000000000005
FT9 030771 000005 0 0 000000000005 0 000000000005
ET0 030771 000005 0 0 000000000005 0 000000000005
ST1 030771 000005 0 0 000000000005 0 000000000005
ST2 030771 000005 0 0 000000000005 0 000000000005
ST9 030771 000005 0 0 000000000005 0 000000000005
*030771 MOVEI 6,000006
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 030771 030771 0 0 201300000006 0 000000000006
IT1 030771 0 0 0 201300000006 0 000000000006
AT3 030771 0 0 0 000000000006 0 201300000006
AT6 030771 000006 0 0 000000000006 0 201300000006
FT1A 030771 000006 0 0 000000000006 0 000000000006
FT9 030772 000006 0 0 000000000006 0 000000000006
ET0 030772 000006 0 0 000000000006 0 000000000006
ST1 030772 000006 0 0 000000000006 0 000000000006
ST2 030772 000006 0 0 000000000006 0 000000000006
ST9 030772 000006 0 0 000000000006 0 000000000006
*030772 MOVEI 7,000007
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 030772 030772 0 0 201340000007 0 000000000007
IT1 030772 0 0 0 201340000007 0 000000000007
AT3 030772 0 0 0 000000000007 0 201340000007
AT6 030772 000007 0 0 000000000007 0 201340000007
FT1A 030772 000007 0 0 000000000007 0 000000000007
FT9 030773 000007 0 0 000000000007 0 000000000007
ET0 030773 000007 0 0 000000000007 0 000000000007
ST1 030773 000007 0 0 000000000007 0 000000000007
ST2 030773 000007 0 0 000000000007 0 000000000007
ST9 030773 000007 0 0 000000000007 0 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 17
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0212
*030773 MOVEI 10,000010
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 030773 030773 0 0 201400000010 0 000000000010
IT1 030773 0 0 0 201400000010 0 000000000010
AT3 030773 0 0 0 000000000010 0 201400000010
AT6 030773 000010 0 0 000000000010 0 201400000010
FT1A 030773 000010 0 0 000000000010 0 000000000010
FT9 030774 000010 0 0 000000000010 0 000000000010
ET0 030774 000010 0 0 000000000010 0 000000000010
ST1 030774 000010 0 0 000000000010 0 000000000010
ST2 030774 000010 0 0 000000000010 0 000000000010
ST9 030774 000010 0 0 000000000010 0 000000000010
*030774 MOVEI 11,000011
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 030774 030774 0 0 201440000011 0 000000000011
IT1 030774 0 0 0 201440000011 0 000000000011
AT3 030774 0 0 0 000000000011 0 201440000011
AT6 030774 000011 0 0 000000000011 0 201440000011
FT1A 030774 000011 0 0 000000000011 0 000000000011
FT9 030775 000011 0 0 000000000011 0 000000000011
ET0 030775 000011 0 0 000000000011 0 000000000011
ST1 030775 000011 0 0 000000000011 0 000000000011
ST2 030775 000011 0 0 000000000011 0 000000000011
ST9 030775 000011 0 0 000000000011 0 000000000011
*030775 MOVEI 12,000012
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 030775 030775 0 0 201500000012 0 000000000012
IT1 030775 0 0 0 201500000012 0 000000000012
AT3 030775 0 0 0 000000000012 0 201500000012
AT6 030775 000012 0 0 000000000012 0 201500000012
FT1A 030775 000012 0 0 000000000012 0 000000000012
FT9 030776 000012 0 0 000000000012 0 000000000012
ET0 030776 000012 0 0 000000000012 0 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 18
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0213
ST1 030776 000012 0 0 000000000012 0 000000000012
ST2 030776 000012 0 0 000000000012 0 000000000012
ST9 030776 000012 0 0 000000000012 0 000000000012
*030776 MOVEI 13,000013
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 030776 030776 0 0 201540000013 0 000000000013
IT1 030776 0 0 0 201540000013 0 000000000013
AT3 030776 0 0 0 000000000013 0 201540000013
AT6 030776 000013 0 0 000000000013 0 201540000013
FT1A 030776 000013 0 0 000000000013 0 000000000013
FT9 030777 000013 0 0 000000000013 0 000000000013
ET0 030777 000013 0 0 000000000013 0 000000000013
ST1 030777 000013 0 0 000000000013 0 000000000013
ST2 030777 000013 0 0 000000000013 0 000000000013
ST9 030777 000013 0 0 000000000013 0 000000000013
*030777 MOVEI 14,000014
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 030777 030777 0 0 201600000014 0 000000000014
IT1 030777 0 0 0 201600000014 0 000000000014
AT3 030777 0 0 0 000000000014 0 201600000014
AT6 030777 000014 0 0 000000000014 0 201600000014
FT1A 030777 000014 0 0 000000000014 0 000000000014
FT9 0 000014 0 0 000000000014 0 000000000014
ET0 0 000014 0 0 000000000014 0 000000000014
ST1 0 000014 0 0 000000000014 0 000000000014
ST2 0 000014 0 0 000000000014 0 000000000014
ST9 0 000014 0 0 000000000014 0 000000000014
*031000 MOVEI 15,000015
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 201640000015 0 000000000015
IT1 0 0 0 0 201640000015 0 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 19
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0214
AT3 0 0 0 0 000000000015 0 201640000015
AT6 0 000015 0 0 000000000015 0 201640000015
FT1A 0 000015 0 0 000000000015 0 000000000015
FT9 031001 000015 0 0 000000000015 0 000000000015
ET0 031001 000015 0 0 000000000015 0 000000000015
ST1 031001 000015 0 0 000000000015 0 000000000015
ST2 031001 000015 0 0 000000000015 0 000000000015
ST9 031001 000015 0 0 000000000015 0 000000000015
*031001 MOVEI 16,000016
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000016
TIME PC MA SC FE AR MQ BR
IT0 031001 031001 0 0 201700000016 0 000000000016
IT1 031001 0 0 0 201700000016 0 000000000016
AT3 031001 0 0 0 000000000016 0 201700000016
AT6 031001 000016 0 0 000000000016 0 201700000016
FT1A 031001 000016 0 0 000000000016 0 000000000016
FT9 031002 000016 0 0 000000000016 0 000000000016
ET0 031002 000016 0 0 000000000016 0 000000000016
ST1 031002 000016 0 0 000000000016 0 000000000016
ST2 031002 000016 0 0 000000000016 0 000000000016
ST9 031002 000016 0 0 000000000016 0 000000000016
*031002 MOVEI 17,000017
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000017
TIME PC MA SC FE AR MQ BR
IT0 031002 031002 0 0 201740000017 0 000000000017
IT1 031002 0 0 0 201740000017 0 000000000017
AT3 031002 0 0 0 000000000017 0 201740000017
AT6 031002 000017 0 0 000000000017 0 201740000017
FT1A 031002 000017 0 0 000000000017 0 000000000017
FT9 031003 000017 0 0 000000000017 0 000000000017
ET0 031003 000017 0 0 000000000017 0 000000000017
ST1 031003 000017 0 0 000000000017 0 000000000017
ST2 031003 000017 0 0 000000000017 0 000000000017
ST9 031003 000017 0 0 000000000017 0 000000000017
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 20
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0215
*031003 CAIE 17,000017
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031003 031003 0 0 302740000017 0 000000000017
IT1 031003 0 0 0 302740000017 0 000000000017
AT3 031003 0 0 0 000000000017 0 302740000017
AT6 031003 000017 0 0 000000000017 0 302740000017
FT1A 031003 000017 0 0 000000000017 0 000000000017
FT2 031003 000017 0 0 0 0 000000000017
FT2RQ 031003 000017 0 0 000000000017 0 000000000017
FT3 031003 000017 0 0 000000000017 0 000000000017
FT9 031004 000017 0 0 000000000017 0 000000000017
ET0 031005 000017 0 0 0 0 000000000017
ST1A 031005 000017 0 0 0 0 000000000017
ST9 031005 000017 0 0 0 0 000000000017
*031005 JUMPA 0,031006
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031005 031005 0 0 324000031006 0 000000031006
IT1 031005 0 0 0 324000031006 0 000000031006
AT3 031005 0 0 0 000000031006 0 324000031006
AT6 031005 031006 0 0 000000031006 0 324000031006
FT1A 031005 031006 0 0 000000031006 0 000000031006
FT2 031005 031006 0 0 0 0 000000031006
FT2RQ 031005 031006 0 0 0 0 000000031006
FT3 031005 031006 0 0 0 0 000000031006
FT9 031006 031006 0 0 0 0 000000031006
ET0 031006 031006 0 0 0 0 000000031006
ST1A 031006 031006 0 0 0 0 000000031006
ST9 031006 031006 0 0 0 0 000000031006
*031006 CAIE 16,000016
INITIAL
C(AC)=000000 000016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031006 031006 0 0 302700000016 0 000000000016
IT1 031006 0 0 0 302700000016 0 000000000016
AT3 031006 0 0 0 000000000016 0 302700000016
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 21
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0216
AT6 031006 000016 0 0 000000000016 0 302700000016
FT1A 031006 000016 0 0 000000000016 0 000000000016
FT2 031006 000016 0 0 0 0 000000000016
FT2RQ 031006 000016 0 0 000000000016 0 000000000016
FT3 031006 000016 0 0 000000000016 0 000000000016
FT9 031007 000016 0 0 000000000016 0 000000000016
ET0 031010 000016 0 0 0 0 000000000016
ST1A 031010 000016 0 0 0 0 000000000016
ST9 031010 000016 0 0 0 0 000000000016
*031010 JUMPA 0,031011
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031010 031010 0 0 324000031011 0 000000031011
IT1 031010 0 0 0 324000031011 0 000000031011
AT3 031010 0 0 0 000000031011 0 324000031011
AT6 031010 031011 0 0 000000031011 0 324000031011
FT1A 031010 031011 0 0 000000031011 0 000000031011
FT2 031010 031011 0 0 0 0 000000031011
FT2RQ 031010 031011 0 0 0 0 000000031011
FT3 031010 031011 0 0 0 0 000000031011
FT9 031011 031011 0 0 0 0 000000031011
ET0 031011 031011 0 0 0 0 000000031011
ST1A 031011 031011 0 0 0 0 000000031011
ST9 031011 031011 0 0 0 0 000000031011
*031011 CAIE 15,000015
INITIAL
C(AC)=000000 000015
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031011 031011 0 0 302640000015 0 000000000015
IT1 031011 0 0 0 302640000015 0 000000000015
AT3 031011 0 0 0 000000000015 0 302640000015
AT6 031011 000015 0 0 000000000015 0 302640000015
FT1A 031011 000015 0 0 000000000015 0 000000000015
FT2 031011 000015 0 0 0 0 000000000015
FT2RQ 031011 000015 0 0 000000000015 0 000000000015
FT3 031011 000015 0 0 000000000015 0 000000000015
FT9 031012 000015 0 0 000000000015 0 000000000015
ET0 031013 000015 0 0 0 0 000000000015
ST1A 031013 000015 0 0 0 0 000000000015
ST9 031013 000015 0 0 0 0 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 22
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0217
*031013 JUMPA 0,031014
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031013 031013 0 0 324000031014 0 000000031014
IT1 031013 0 0 0 324000031014 0 000000031014
AT3 031013 0 0 0 000000031014 0 324000031014
AT6 031013 031014 0 0 000000031014 0 324000031014
FT1A 031013 031014 0 0 000000031014 0 000000031014
FT2 031013 031014 0 0 0 0 000000031014
FT2RQ 031013 031014 0 0 0 0 000000031014
FT3 031013 031014 0 0 0 0 000000031014
FT9 031014 031014 0 0 0 0 000000031014
ET0 031014 031014 0 0 0 0 000000031014
ST1A 031014 031014 0 0 0 0 000000031014
ST9 031014 031014 0 0 0 0 000000031014
*031014 CAIE 14,000014
INITIAL
C(AC)=000000 000014
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031014 031014 0 0 302600000014 0 000000000014
IT1 031014 0 0 0 302600000014 0 000000000014
AT3 031014 0 0 0 000000000014 0 302600000014
AT6 031014 000014 0 0 000000000014 0 302600000014
FT1A 031014 000014 0 0 000000000014 0 000000000014
FT2 031014 000014 0 0 0 0 000000000014
FT2RQ 031014 000014 0 0 000000000014 0 000000000014
FT3 031014 000014 0 0 000000000014 0 000000000014
FT9 031015 000014 0 0 000000000014 0 000000000014
ET0 031016 000014 0 0 0 0 000000000014
ST1A 031016 000014 0 0 0 0 000000000014
ST9 031016 000014 0 0 0 0 000000000014
*031016 JUMPA 0,031017
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031016 031016 0 0 324000031017 0 000000031017
IT1 031016 0 0 0 324000031017 0 000000031017
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 23
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0218
AT3 031016 0 0 0 000000031017 0 324000031017
AT6 031016 031017 0 0 000000031017 0 324000031017
FT1A 031016 031017 0 0 000000031017 0 000000031017
FT2 031016 031017 0 0 0 0 000000031017
FT2RQ 031016 031017 0 0 0 0 000000031017
FT3 031016 031017 0 0 0 0 000000031017
FT9 031017 031017 0 0 0 0 000000031017
ET0 031017 031017 0 0 0 0 000000031017
ST1A 031017 031017 0 0 0 0 000000031017
ST9 031017 031017 0 0 0 0 000000031017
*031017 CAIE 13,000013
INITIAL
C(AC)=000000 000013
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031017 031017 0 0 302540000013 0 000000000013
IT1 031017 0 0 0 302540000013 0 000000000013
AT3 031017 0 0 0 000000000013 0 302540000013
AT6 031017 000013 0 0 000000000013 0 302540000013
FT1A 031017 000013 0 0 000000000013 0 000000000013
FT2 031017 000013 0 0 0 0 000000000013
FT2RQ 031017 000013 0 0 000000000013 0 000000000013
FT3 031017 000013 0 0 000000000013 0 000000000013
FT9 031020 000013 0 0 000000000013 0 000000000013
ET0 031021 000013 0 0 0 0 000000000013
ST1A 031021 000013 0 0 0 0 000000000013
ST9 031021 000013 0 0 0 0 000000000013
*031021 JUMPA 0,031022
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031021 031021 0 0 324000031022 0 000000031022
IT1 031021 0 0 0 324000031022 0 000000031022
AT3 031021 0 0 0 000000031022 0 324000031022
AT6 031021 031022 0 0 000000031022 0 324000031022
FT1A 031021 031022 0 0 000000031022 0 000000031022
FT2 031021 031022 0 0 0 0 000000031022
FT2RQ 031021 031022 0 0 0 0 000000031022
FT3 031021 031022 0 0 0 0 000000031022
FT9 031022 031022 0 0 0 0 000000031022
ET0 031022 031022 0 0 0 0 000000031022
ST1A 031022 031022 0 0 0 0 000000031022
ST9 031022 031022 0 0 0 0 000000031022
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 24
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0219
*031022 CAIE 12,000012
INITIAL
C(AC)=000000 000012
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031022 031022 0 0 302500000012 0 000000000012
IT1 031022 0 0 0 302500000012 0 000000000012
AT3 031022 0 0 0 000000000012 0 302500000012
AT6 031022 000012 0 0 000000000012 0 302500000012
FT1A 031022 000012 0 0 000000000012 0 000000000012
FT2 031022 000012 0 0 0 0 000000000012
FT2RQ 031022 000012 0 0 000000000012 0 000000000012
FT3 031022 000012 0 0 000000000012 0 000000000012
FT9 031023 000012 0 0 000000000012 0 000000000012
ET0 031024 000012 0 0 0 0 000000000012
ST1A 031024 000012 0 0 0 0 000000000012
ST9 031024 000012 0 0 0 0 000000000012
*031024 JUMPA 0,031025
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031024 031024 0 0 324000031025 0 000000031025
IT1 031024 0 0 0 324000031025 0 000000031025
AT3 031024 0 0 0 000000031025 0 324000031025
AT6 031024 031025 0 0 000000031025 0 324000031025
FT1A 031024 031025 0 0 000000031025 0 000000031025
FT2 031024 031025 0 0 0 0 000000031025
FT2RQ 031024 031025 0 0 0 0 000000031025
FT3 031024 031025 0 0 0 0 000000031025
FT9 031025 031025 0 0 0 0 000000031025
ET0 031025 031025 0 0 0 0 000000031025
ST1A 031025 031025 0 0 0 0 000000031025
ST9 031025 031025 0 0 0 0 000000031025
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 25
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0220
*031025 CAIE 11,000011
INITIAL
C(AC)=000000 000011
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031025 031025 0 0 302440000011 0 000000000011
IT1 031025 0 0 0 302440000011 0 000000000011
AT3 031025 0 0 0 000000000011 0 302440000011
AT6 031025 000011 0 0 000000000011 0 302440000011
FT1A 031025 000011 0 0 000000000011 0 000000000011
FT2 031025 000011 0 0 0 0 000000000011
FT2RQ 031025 000011 0 0 000000000011 0 000000000011
FT3 031025 000011 0 0 000000000011 0 000000000011
FT9 031026 000011 0 0 000000000011 0 000000000011
ET0 031027 000011 0 0 0 0 000000000011
ST1A 031027 000011 0 0 0 0 000000000011
ST9 031027 000011 0 0 0 0 000000000011
*031027 JUMPA 0,031030
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031027 031027 0 0 324000031030 0 000000031030
IT1 031027 0 0 0 324000031030 0 000000031030
AT3 031027 0 0 0 000000031030 0 324000031030
AT6 031027 031030 0 0 000000031030 0 324000031030
FT1A 031027 031030 0 0 000000031030 0 000000031030
FT2 031027 031030 0 0 0 0 000000031030
FT2RQ 031027 031030 0 0 0 0 000000031030
FT3 031027 031030 0 0 0 0 000000031030
FT9 031030 031030 0 0 0 0 000000031030
ET0 031030 031030 0 0 0 0 000000031030
ST1A 031030 031030 0 0 0 0 000000031030
ST9 031030 031030 0 0 0 0 000000031030
*031030 CAIE 10,000010
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031030 031030 0 0 302400000010 0 000000000010
IT1 031030 0 0 0 302400000010 0 000000000010
AT3 031030 0 0 0 000000000010 0 302400000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 26
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0221
AT6 031030 000010 0 0 000000000010 0 302400000010
FT1A 031030 000010 0 0 000000000010 0 000000000010
FT2 031030 000010 0 0 0 0 000000000010
FT2RQ 031030 000010 0 0 000000000010 0 000000000010
FT3 031030 000010 0 0 000000000010 0 000000000010
FT9 031031 000010 0 0 000000000010 0 000000000010
ET0 031032 000010 0 0 0 0 000000000010
ST1A 031032 000010 0 0 0 0 000000000010
ST9 031032 000010 0 0 0 0 000000000010
*031032 JUMPA 0,031033
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031032 031032 0 0 324000031033 0 000000031033
IT1 031032 0 0 0 324000031033 0 000000031033
AT3 031032 0 0 0 000000031033 0 324000031033
AT6 031032 031033 0 0 000000031033 0 324000031033
FT1A 031032 031033 0 0 000000031033 0 000000031033
FT2 031032 031033 0 0 0 0 000000031033
FT2RQ 031032 031033 0 0 0 0 000000031033
FT3 031032 031033 0 0 0 0 000000031033
FT9 031033 031033 0 0 0 0 000000031033
ET0 031033 031033 0 0 0 0 000000031033
ST1A 031033 031033 0 0 0 0 000000031033
ST9 031033 031033 0 0 0 0 000000031033
*031033 CAIE 7,000007
INITIAL
C(AC)=000000 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031033 031033 0 0 302340000007 0 000000000007
IT1 031033 0 0 0 302340000007 0 000000000007
AT3 031033 0 0 0 000000000007 0 302340000007
AT6 031033 000007 0 0 000000000007 0 302340000007
FT1A 031033 000007 0 0 000000000007 0 000000000007
FT2 031033 000007 0 0 0 0 000000000007
FT2RQ 031033 000007 0 0 000000000007 0 000000000007
FT3 031033 000007 0 0 000000000007 0 000000000007
FT9 031034 000007 0 0 000000000007 0 000000000007
ET0 031035 000007 0 0 0 0 000000000007
ST1A 031035 000007 0 0 0 0 000000000007
ST9 031035 000007 0 0 0 0 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 27
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0222
*031035 JUMPA 0,031036
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031035 031035 0 0 324000031036 0 000000031036
IT1 031035 0 0 0 324000031036 0 000000031036
AT3 031035 0 0 0 000000031036 0 324000031036
AT6 031035 031036 0 0 000000031036 0 324000031036
FT1A 031035 031036 0 0 000000031036 0 000000031036
FT2 031035 031036 0 0 0 0 000000031036
FT2RQ 031035 031036 0 0 0 0 000000031036
FT3 031035 031036 0 0 0 0 000000031036
FT9 031036 031036 0 0 0 0 000000031036
ET0 031036 031036 0 0 0 0 000000031036
ST1A 031036 031036 0 0 0 0 000000031036
ST9 031036 031036 0 0 0 0 000000031036
*031036 CAIE 6,000006
INITIAL
C(AC)=000000 000006
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031036 031036 0 0 302300000006 0 000000000006
IT1 031036 0 0 0 302300000006 0 000000000006
AT3 031036 0 0 0 000000000006 0 302300000006
AT6 031036 000006 0 0 000000000006 0 302300000006
FT1A 031036 000006 0 0 000000000006 0 000000000006
FT2 031036 000006 0 0 0 0 000000000006
FT2RQ 031036 000006 0 0 000000000006 0 000000000006
FT3 031036 000006 0 0 000000000006 0 000000000006
FT9 031037 000006 0 0 000000000006 0 000000000006
ET0 031040 000006 0 0 0 0 000000000006
ST1A 031040 000006 0 0 0 0 000000000006
ST9 031040 000006 0 0 0 0 000000000006
*031040 JUMPA 0,031041
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031040 031040 0 0 324000031041 0 000000031041
IT1 031040 0 0 0 324000031041 0 000000031041
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 28
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0223
AT3 031040 0 0 0 000000031041 0 324000031041
AT6 031040 031041 0 0 000000031041 0 324000031041
FT1A 031040 031041 0 0 000000031041 0 000000031041
FT2 031040 031041 0 0 0 0 000000031041
FT2RQ 031040 031041 0 0 0 0 000000031041
FT3 031040 031041 0 0 0 0 000000031041
FT9 031041 031041 0 0 0 0 000000031041
ET0 031041 031041 0 0 0 0 000000031041
ST1A 031041 031041 0 0 0 0 000000031041
ST9 031041 031041 0 0 0 0 000000031041
*031041 CAIE 5,000005
INITIAL
C(AC)=000000 000005
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031041 031041 0 0 302240000005 0 000000000005
IT1 031041 0 0 0 302240000005 0 000000000005
AT3 031041 0 0 0 000000000005 0 302240000005
AT6 031041 000005 0 0 000000000005 0 302240000005
FT1A 031041 000005 0 0 000000000005 0 000000000005
FT2 031041 000005 0 0 0 0 000000000005
FT2RQ 031041 000005 0 0 000000000005 0 000000000005
FT3 031041 000005 0 0 000000000005 0 000000000005
FT9 031042 000005 0 0 000000000005 0 000000000005
ET0 031043 000005 0 0 0 0 000000000005
ST1A 031043 000005 0 0 0 0 000000000005
ST9 031043 000005 0 0 0 0 000000000005
*031043 JUMPA 0,031044
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031043 031043 0 0 324000031044 0 000000031044
IT1 031043 0 0 0 324000031044 0 000000031044
AT3 031043 0 0 0 000000031044 0 324000031044
AT6 031043 031044 0 0 000000031044 0 324000031044
FT1A 031043 031044 0 0 000000031044 0 000000031044
FT2 031043 031044 0 0 0 0 000000031044
FT2RQ 031043 031044 0 0 0 0 000000031044
FT3 031043 031044 0 0 0 0 000000031044
FT9 031044 031044 0 0 0 0 000000031044
ET0 031044 031044 0 0 0 0 000000031044
ST1A 031044 031044 0 0 0 0 000000031044
ST9 031044 031044 0 0 0 0 000000031044
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 29
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0224
*031044 CAIE 4,000004
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031044 031044 0 0 302200000004 0 000000000004
IT1 031044 0 0 0 302200000004 0 000000000004
AT3 031044 0 0 0 000000000004 0 302200000004
AT6 031044 000004 0 0 000000000004 0 302200000004
FT1A 031044 000004 0 0 000000000004 0 000000000004
FT2 031044 000004 0 0 0 0 000000000004
FT2RQ 031044 000004 0 0 000000000004 0 000000000004
FT3 031044 000004 0 0 000000000004 0 000000000004
FT9 031045 000004 0 0 000000000004 0 000000000004
ET0 031046 000004 0 0 0 0 000000000004
ST1A 031046 000004 0 0 0 0 000000000004
ST9 031046 000004 0 0 0 0 000000000004
*031046 JUMPA 0,031047
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031046 031046 0 0 324000031047 0 000000031047
IT1 031046 0 0 0 324000031047 0 000000031047
AT3 031046 0 0 0 000000031047 0 324000031047
AT6 031046 031047 0 0 000000031047 0 324000031047
FT1A 031046 031047 0 0 000000031047 0 000000031047
FT2 031046 031047 0 0 0 0 000000031047
FT2RQ 031046 031047 0 0 0 0 000000031047
FT3 031046 031047 0 0 0 0 000000031047
FT9 031047 031047 0 0 0 0 000000031047
ET0 031047 031047 0 0 0 0 000000031047
ST1A 031047 031047 0 0 0 0 000000031047
ST9 031047 031047 0 0 0 0 000000031047
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 30
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0225
*031047 CAIE 3,000003
INITIAL
C(AC)=000000 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031047 031047 0 0 302140000003 0 000000000003
IT1 031047 0 0 0 302140000003 0 000000000003
AT3 031047 0 0 0 000000000003 0 302140000003
AT6 031047 000003 0 0 000000000003 0 302140000003
FT1A 031047 000003 0 0 000000000003 0 000000000003
FT2 031047 000003 0 0 0 0 000000000003
FT2RQ 031047 000003 0 0 000000000003 0 000000000003
FT3 031047 000003 0 0 000000000003 0 000000000003
FT9 031050 000003 0 0 000000000003 0 000000000003
ET0 031051 000003 0 0 0 0 000000000003
ST1A 031051 000003 0 0 0 0 000000000003
ST9 031051 000003 0 0 0 0 000000000003
*031051 JUMPA 0,031052
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031051 031051 0 0 324000031052 0 000000031052
IT1 031051 0 0 0 324000031052 0 000000031052
AT3 031051 0 0 0 000000031052 0 324000031052
AT6 031051 031052 0 0 000000031052 0 324000031052
FT1A 031051 031052 0 0 000000031052 0 000000031052
FT2 031051 031052 0 0 0 0 000000031052
FT2RQ 031051 031052 0 0 0 0 000000031052
FT3 031051 031052 0 0 0 0 000000031052
FT9 031052 031052 0 0 0 0 000000031052
ET0 031052 031052 0 0 0 0 000000031052
ST1A 031052 031052 0 0 0 0 000000031052
ST9 031052 031052 0 0 0 0 000000031052
*031052 CAIE 2,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031052 031052 0 0 302100000002 0 000000000002
IT1 031052 0 0 0 302100000002 0 000000000002
AT3 031052 0 0 0 000000000002 0 302100000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 31
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0226
AT6 031052 000002 0 0 000000000002 0 302100000002
FT1A 031052 000002 0 0 000000000002 0 000000000002
FT2 031052 000002 0 0 0 0 000000000002
FT2RQ 031052 000002 0 0 000000000002 0 000000000002
FT3 031052 000002 0 0 000000000002 0 000000000002
FT9 031053 000002 0 0 000000000002 0 000000000002
ET0 031054 000002 0 0 0 0 000000000002
ST1A 031054 000002 0 0 0 0 000000000002
ST9 031054 000002 0 0 0 0 000000000002
*031054 JUMPA 0,031055
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031054 031054 0 0 324000031055 0 000000031055
IT1 031054 0 0 0 324000031055 0 000000031055
AT3 031054 0 0 0 000000031055 0 324000031055
AT6 031054 031055 0 0 000000031055 0 324000031055
FT1A 031054 031055 0 0 000000031055 0 000000031055
FT2 031054 031055 0 0 0 0 000000031055
FT2RQ 031054 031055 0 0 0 0 000000031055
FT3 031054 031055 0 0 0 0 000000031055
FT9 031055 031055 0 0 0 0 000000031055
ET0 031055 031055 0 0 0 0 000000031055
ST1A 031055 031055 0 0 0 0 000000031055
ST9 031055 031055 0 0 0 0 000000031055
*031055 CAIE 1,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031055 031055 0 0 302040000001 0 000000000001
IT1 031055 0 0 0 302040000001 0 000000000001
AT3 031055 0 0 0 000000000001 0 302040000001
AT6 031055 000001 0 0 000000000001 0 302040000001
FT1A 031055 000001 0 0 000000000001 0 000000000001
FT2 031055 000001 0 0 0 0 000000000001
FT2RQ 031055 000001 0 0 000000000001 0 000000000001
FT3 031055 000001 0 0 000000000001 0 000000000001
FT9 031056 000001 0 0 000000000001 0 000000000001
ET0 031057 000001 0 0 0 0 000000000001
ST1A 031057 000001 0 0 0 0 000000000001
ST9 031057 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 32
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0227
*031057 JUMPA 0,031060
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031057 031057 0 0 324000031060 0 000000031060
IT1 031057 0 0 0 324000031060 0 000000031060
AT3 031057 0 0 0 000000031060 0 324000031060
AT6 031057 031060 0 0 000000031060 0 324000031060
FT1A 031057 031060 0 0 000000031060 0 000000031060
FT2 031057 031060 0 0 0 0 000000031060
FT2RQ 031057 031060 0 0 0 0 000000031060
FT3 031057 031060 0 0 0 0 000000031060
FT9 031060 031060 0 0 0 0 000000031060
ET0 031060 031060 0 0 0 0 000000031060
ST1A 031060 031060 0 0 0 0 000000031060
ST9 031060 031060 0 0 0 0 000000031060
*031060 CAIE 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031060 031060 0 0 302000000000 0 0
IT1 031060 0 0 0 302000000000 0 0
AT3 031060 0 0 0 0 0 302000000000
AT6 031060 0 0 0 0 0 302000000000
FT1A 031060 0 0 0 0 0 0
FT2 031060 0 0 0 0 0 0
FT2RQ 031060 0 0 0 0 0 0
FT3 031060 0 0 0 0 0 0
FT9 031061 0 0 0 0 0 0
ET0 031062 0 0 0 0 0 0
ST1A 031062 0 0 0 0 0 0
ST9 031062 0 0 0 0 0 0
*031062 JUMPA 0,031063
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031062 031062 0 0 324000031063 0 000000031063
IT1 031062 0 0 0 324000031063 0 000000031063
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 33
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0228
AT3 031062 0 0 0 000000031063 0 324000031063
AT6 031062 031063 0 0 000000031063 0 324000031063
FT1A 031062 031063 0 0 000000031063 0 000000031063
FT2 031062 031063 0 0 0 0 000000031063
FT2RQ 031062 031063 0 0 0 0 000000031063
FT3 031062 031063 0 0 0 0 000000031063
FT9 031063 031063 0 0 0 0 000000031063
ET0 031063 031063 0 0 0 0 000000031063
ST1A 031063 031063 0 0 0 0 000000031063
ST9 031063 031063 0 0 0 0 000000031063
*031063 MOVEI 0,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031063 031063 0 0 201000000001 0 000000000001
IT1 031063 0 0 0 201000000001 0 000000000001
AT3 031063 0 0 0 000000000001 0 201000000001
AT6 031063 000001 0 0 000000000001 0 201000000001
FT1A 031063 000001 0 0 000000000001 0 000000000001
FT9 031064 000001 0 0 000000000001 0 000000000001
ET0 031064 000001 0 0 000000000001 0 000000000001
ST1 031064 000001 0 0 000000000001 0 000000000001
ST2 031064 000001 0 0 000000000001 0 000000000001
ST9 031064 000001 0 0 000000000001 0 000000000001
*031064 MOVEM 0,000001
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031064 031064 0 0 202000000001 0 000000000001
IT1 031064 0 0 0 202000000001 0 000000000001
AT3 031064 0 0 0 000000000001 0 202000000001
AT6 031064 000001 0 0 000000000001 0 202000000001
FT1A 031064 000001 0 0 000000000001 0 000000000001
FT2 031064 000001 0 0 0 0 000000000001
FT2RQ 031064 000001 0 0 000000000001 0 000000000001
FT3 031064 000001 0 0 000000000001 0 000000000001
FT9 031065 000001 0 0 000000000001 0 000000000001
ET0 031065 000001 0 0 000000000001 0 000000000001
ST6 031065 000001 0 0 000000000001 0 000000000001
ST6A 031065 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 34
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0229
ST9 031065 000001 0 0 000000000001 0 000000000001
*031065 MOVEI 0,000002
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031065 031065 0 0 201000000002 0 000000000002
IT1 031065 0 0 0 201000000002 0 000000000002
AT3 031065 0 0 0 000000000002 0 201000000002
AT6 031065 000002 0 0 000000000002 0 201000000002
FT1A 031065 000002 0 0 000000000002 0 000000000002
FT9 031066 000002 0 0 000000000002 0 000000000002
ET0 031066 000002 0 0 000000000002 0 000000000002
ST1 031066 000002 0 0 000000000002 0 000000000002
ST2 031066 000002 0 0 000000000002 0 000000000002
ST9 031066 000002 0 0 000000000002 0 000000000002
*031066 MOVEM 0,000002
INITIAL
C(AC)=000000 000002
C(E)=000000 000002
FINAL
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031066 031066 0 0 202000000002 0 000000000002
IT1 031066 0 0 0 202000000002 0 000000000002
AT3 031066 0 0 0 000000000002 0 202000000002
AT6 031066 000002 0 0 000000000002 0 202000000002
FT1A 031066 000002 0 0 000000000002 0 000000000002
FT2 031066 000002 0 0 0 0 000000000002
FT2RQ 031066 000002 0 0 000000000002 0 000000000002
FT3 031066 000002 0 0 000000000002 0 000000000002
FT9 031067 000002 0 0 000000000002 0 000000000002
ET0 031067 000002 0 0 000000000002 0 000000000002
ST6 031067 000002 0 0 000000000002 0 000000000002
ST6A 031067 000002 0 0 000000000002 0 000000000002
ST9 031067 000002 0 0 000000000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 35
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0230
*031067 MOVEI 0,000003
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031067 031067 0 0 201000000003 0 000000000003
IT1 031067 0 0 0 201000000003 0 000000000003
AT3 031067 0 0 0 000000000003 0 201000000003
AT6 031067 000003 0 0 000000000003 0 201000000003
FT1A 031067 000003 0 0 000000000003 0 000000000003
FT9 031070 000003 0 0 000000000003 0 000000000003
ET0 031070 000003 0 0 000000000003 0 000000000003
ST1 031070 000003 0 0 000000000003 0 000000000003
ST2 031070 000003 0 0 000000000003 0 000000000003
ST9 031070 000003 0 0 000000000003 0 000000000003
*031070 MOVEM 0,000003
INITIAL
C(AC)=000000 000003
C(E)=000000 000003
FINAL
C(E)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031070 031070 0 0 202000000003 0 000000000003
IT1 031070 0 0 0 202000000003 0 000000000003
AT3 031070 0 0 0 000000000003 0 202000000003
AT6 031070 000003 0 0 000000000003 0 202000000003
FT1A 031070 000003 0 0 000000000003 0 000000000003
FT2 031070 000003 0 0 0 0 000000000003
FT2RQ 031070 000003 0 0 000000000003 0 000000000003
FT3 031070 000003 0 0 000000000003 0 000000000003
FT9 031071 000003 0 0 000000000003 0 000000000003
ET0 031071 000003 0 0 000000000003 0 000000000003
ST6 031071 000003 0 0 000000000003 0 000000000003
ST6A 031071 000003 0 0 000000000003 0 000000000003
ST9 031071 000003 0 0 000000000003 0 000000000003
*031071 MOVEI 0,000004
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031071 031071 0 0 201000000004 0 000000000004
IT1 031071 0 0 0 201000000004 0 000000000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 36
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0231
AT3 031071 0 0 0 000000000004 0 201000000004
AT6 031071 000004 0 0 000000000004 0 201000000004
FT1A 031071 000004 0 0 000000000004 0 000000000004
FT9 031072 000004 0 0 000000000004 0 000000000004
ET0 031072 000004 0 0 000000000004 0 000000000004
ST1 031072 000004 0 0 000000000004 0 000000000004
ST2 031072 000004 0 0 000000000004 0 000000000004
ST9 031072 000004 0 0 000000000004 0 000000000004
*031072 MOVEM 0,000004
INITIAL
C(AC)=000000 000004
C(E)=000000 000004
FINAL
C(E)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031072 031072 0 0 202000000004 0 000000000004
IT1 031072 0 0 0 202000000004 0 000000000004
AT3 031072 0 0 0 000000000004 0 202000000004
AT6 031072 000004 0 0 000000000004 0 202000000004
FT1A 031072 000004 0 0 000000000004 0 000000000004
FT2 031072 000004 0 0 0 0 000000000004
FT2RQ 031072 000004 0 0 000000000004 0 000000000004
FT3 031072 000004 0 0 000000000004 0 000000000004
FT9 031073 000004 0 0 000000000004 0 000000000004
ET0 031073 000004 0 0 000000000004 0 000000000004
ST6 031073 000004 0 0 000000000004 0 000000000004
ST6A 031073 000004 0 0 000000000004 0 000000000004
ST9 031073 000004 0 0 000000000004 0 000000000004
*031073 MOVEI 0,000005
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 031073 031073 0 0 201000000005 0 000000000005
IT1 031073 0 0 0 201000000005 0 000000000005
AT3 031073 0 0 0 000000000005 0 201000000005
AT6 031073 000005 0 0 000000000005 0 201000000005
FT1A 031073 000005 0 0 000000000005 0 000000000005
FT9 031074 000005 0 0 000000000005 0 000000000005
ET0 031074 000005 0 0 000000000005 0 000000000005
ST1 031074 000005 0 0 000000000005 0 000000000005
ST2 031074 000005 0 0 000000000005 0 000000000005
ST9 031074 000005 0 0 000000000005 0 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 37
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0232
*031074 MOVEM 0,000005
INITIAL
C(AC)=000000 000005
C(E)=000000 000005
FINAL
C(E)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 031074 031074 0 0 202000000005 0 000000000005
IT1 031074 0 0 0 202000000005 0 000000000005
AT3 031074 0 0 0 000000000005 0 202000000005
AT6 031074 000005 0 0 000000000005 0 202000000005
FT1A 031074 000005 0 0 000000000005 0 000000000005
FT2 031074 000005 0 0 0 0 000000000005
FT2RQ 031074 000005 0 0 000000000005 0 000000000005
FT3 031074 000005 0 0 000000000005 0 000000000005
FT9 031075 000005 0 0 000000000005 0 000000000005
ET0 031075 000005 0 0 000000000005 0 000000000005
ST6 031075 000005 0 0 000000000005 0 000000000005
ST6A 031075 000005 0 0 000000000005 0 000000000005
ST9 031075 000005 0 0 000000000005 0 000000000005
*031075 MOVEI 0,000006
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 031075 031075 0 0 201000000006 0 000000000006
IT1 031075 0 0 0 201000000006 0 000000000006
AT3 031075 0 0 0 000000000006 0 201000000006
AT6 031075 000006 0 0 000000000006 0 201000000006
FT1A 031075 000006 0 0 000000000006 0 000000000006
FT9 031076 000006 0 0 000000000006 0 000000000006
ET0 031076 000006 0 0 000000000006 0 000000000006
ST1 031076 000006 0 0 000000000006 0 000000000006
ST2 031076 000006 0 0 000000000006 0 000000000006
ST9 031076 000006 0 0 000000000006 0 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 38
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0233
*031076 MOVEM 0,000006
INITIAL
C(AC)=000000 000006
C(E)=000000 000006
FINAL
C(E)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 031076 031076 0 0 202000000006 0 000000000006
IT1 031076 0 0 0 202000000006 0 000000000006
AT3 031076 0 0 0 000000000006 0 202000000006
AT6 031076 000006 0 0 000000000006 0 202000000006
FT1A 031076 000006 0 0 000000000006 0 000000000006
FT2 031076 000006 0 0 0 0 000000000006
FT2RQ 031076 000006 0 0 000000000006 0 000000000006
FT3 031076 000006 0 0 000000000006 0 000000000006
FT9 031077 000006 0 0 000000000006 0 000000000006
ET0 031077 000006 0 0 000000000006 0 000000000006
ST6 031077 000006 0 0 000000000006 0 000000000006
ST6A 031077 000006 0 0 000000000006 0 000000000006
ST9 031077 000006 0 0 000000000006 0 000000000006
*031077 MOVEI 0,000007
INITIAL
C(AC)=000000 000006
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 031077 031077 0 0 201000000007 0 000000000007
IT1 031077 0 0 0 201000000007 0 000000000007
AT3 031077 0 0 0 000000000007 0 201000000007
AT6 031077 000007 0 0 000000000007 0 201000000007
FT1A 031077 000007 0 0 000000000007 0 000000000007
FT9 0 000007 0 0 000000000007 0 000000000007
ET0 0 000007 0 0 000000000007 0 000000000007
ST1 0 000007 0 0 000000000007 0 000000000007
ST2 0 000007 0 0 000000000007 0 000000000007
ST9 0 000007 0 0 000000000007 0 000000000007
*031100 MOVEM 0,000007
INITIAL
C(AC)=000000 000007
C(E)=000000 000007
FINAL
C(E)=000000 000007
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 39
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0234
IT0 0 0 0 0 202000000007 0 000000000007
IT1 0 0 0 0 202000000007 0 000000000007
AT3 0 0 0 0 000000000007 0 202000000007
AT6 0 000007 0 0 000000000007 0 202000000007
FT1A 0 000007 0 0 000000000007 0 000000000007
FT2 0 000007 0 0 0 0 000000000007
FT2RQ 0 000007 0 0 000000000007 0 000000000007
FT3 0 000007 0 0 000000000007 0 000000000007
FT9 031101 000007 0 0 000000000007 0 000000000007
ET0 031101 000007 0 0 000000000007 0 000000000007
ST6 031101 000007 0 0 000000000007 0 000000000007
ST6A 031101 000007 0 0 000000000007 0 000000000007
ST9 031101 000007 0 0 000000000007 0 000000000007
*031101 MOVEI 0,000010
INITIAL
C(AC)=000000 000007
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 031101 031101 0 0 201000000010 0 000000000010
IT1 031101 0 0 0 201000000010 0 000000000010
AT3 031101 0 0 0 000000000010 0 201000000010
AT6 031101 000010 0 0 000000000010 0 201000000010
FT1A 031101 000010 0 0 000000000010 0 000000000010
FT9 031102 000010 0 0 000000000010 0 000000000010
ET0 031102 000010 0 0 000000000010 0 000000000010
ST1 031102 000010 0 0 000000000010 0 000000000010
ST2 031102 000010 0 0 000000000010 0 000000000010
ST9 031102 000010 0 0 000000000010 0 000000000010
*031102 MOVEM 0,000010
INITIAL
C(AC)=000000 000010
C(E)=000000 000010
FINAL
C(E)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 031102 031102 0 0 202000000010 0 000000000010
IT1 031102 0 0 0 202000000010 0 000000000010
AT3 031102 0 0 0 000000000010 0 202000000010
AT6 031102 000010 0 0 000000000010 0 202000000010
FT1A 031102 000010 0 0 000000000010 0 000000000010
FT2 031102 000010 0 0 0 0 000000000010
FT2RQ 031102 000010 0 0 000000000010 0 000000000010
FT3 031102 000010 0 0 000000000010 0 000000000010
FT9 031103 000010 0 0 000000000010 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 40
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0235
ET0 031103 000010 0 0 000000000010 0 000000000010
ST6 031103 000010 0 0 000000000010 0 000000000010
ST6A 031103 000010 0 0 000000000010 0 000000000010
ST9 031103 000010 0 0 000000000010 0 000000000010
*031103 MOVEI 0,000011
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 031103 031103 0 0 201000000011 0 000000000011
IT1 031103 0 0 0 201000000011 0 000000000011
AT3 031103 0 0 0 000000000011 0 201000000011
AT6 031103 000011 0 0 000000000011 0 201000000011
FT1A 031103 000011 0 0 000000000011 0 000000000011
FT9 031104 000011 0 0 000000000011 0 000000000011
ET0 031104 000011 0 0 000000000011 0 000000000011
ST1 031104 000011 0 0 000000000011 0 000000000011
ST2 031104 000011 0 0 000000000011 0 000000000011
ST9 031104 000011 0 0 000000000011 0 000000000011
*031104 MOVEM 0,000011
INITIAL
C(AC)=000000 000011
C(E)=000000 000011
FINAL
C(E)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 031104 031104 0 0 202000000011 0 000000000011
IT1 031104 0 0 0 202000000011 0 000000000011
AT3 031104 0 0 0 000000000011 0 202000000011
AT6 031104 000011 0 0 000000000011 0 202000000011
FT1A 031104 000011 0 0 000000000011 0 000000000011
FT2 031104 000011 0 0 0 0 000000000011
FT2RQ 031104 000011 0 0 000000000011 0 000000000011
FT3 031104 000011 0 0 000000000011 0 000000000011
FT9 031105 000011 0 0 000000000011 0 000000000011
ET0 031105 000011 0 0 000000000011 0 000000000011
ST6 031105 000011 0 0 000000000011 0 000000000011
ST6A 031105 000011 0 0 000000000011 0 000000000011
ST9 031105 000011 0 0 000000000011 0 000000000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 41
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0236
*031105 MOVEI 0,000012
INITIAL
C(AC)=000000 000011
FINAL
C(AC)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 031105 031105 0 0 201000000012 0 000000000012
IT1 031105 0 0 0 201000000012 0 000000000012
AT3 031105 0 0 0 000000000012 0 201000000012
AT6 031105 000012 0 0 000000000012 0 201000000012
FT1A 031105 000012 0 0 000000000012 0 000000000012
FT9 031106 000012 0 0 000000000012 0 000000000012
ET0 031106 000012 0 0 000000000012 0 000000000012
ST1 031106 000012 0 0 000000000012 0 000000000012
ST2 031106 000012 0 0 000000000012 0 000000000012
ST9 031106 000012 0 0 000000000012 0 000000000012
*031106 MOVEM 0,000012
INITIAL
C(AC)=000000 000012
C(E)=000000 000012
FINAL
C(E)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 031106 031106 0 0 202000000012 0 000000000012
IT1 031106 0 0 0 202000000012 0 000000000012
AT3 031106 0 0 0 000000000012 0 202000000012
AT6 031106 000012 0 0 000000000012 0 202000000012
FT1A 031106 000012 0 0 000000000012 0 000000000012
FT2 031106 000012 0 0 0 0 000000000012
FT2RQ 031106 000012 0 0 000000000012 0 000000000012
FT3 031106 000012 0 0 000000000012 0 000000000012
FT9 031107 000012 0 0 000000000012 0 000000000012
ET0 031107 000012 0 0 000000000012 0 000000000012
ST6 031107 000012 0 0 000000000012 0 000000000012
ST6A 031107 000012 0 0 000000000012 0 000000000012
ST9 031107 000012 0 0 000000000012 0 000000000012
*031107 MOVEI 0,000013
INITIAL
C(AC)=000000 000012
FINAL
C(AC)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 031107 031107 0 0 201000000013 0 000000000013
IT1 031107 0 0 0 201000000013 0 000000000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 42
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0237
AT3 031107 0 0 0 000000000013 0 201000000013
AT6 031107 000013 0 0 000000000013 0 201000000013
FT1A 031107 000013 0 0 000000000013 0 000000000013
FT9 031110 000013 0 0 000000000013 0 000000000013
ET0 031110 000013 0 0 000000000013 0 000000000013
ST1 031110 000013 0 0 000000000013 0 000000000013
ST2 031110 000013 0 0 000000000013 0 000000000013
ST9 031110 000013 0 0 000000000013 0 000000000013
*031110 MOVEM 0,000013
INITIAL
C(AC)=000000 000013
C(E)=000000 000013
FINAL
C(E)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 031110 031110 0 0 202000000013 0 000000000013
IT1 031110 0 0 0 202000000013 0 000000000013
AT3 031110 0 0 0 000000000013 0 202000000013
AT6 031110 000013 0 0 000000000013 0 202000000013
FT1A 031110 000013 0 0 000000000013 0 000000000013
FT2 031110 000013 0 0 0 0 000000000013
FT2RQ 031110 000013 0 0 000000000013 0 000000000013
FT3 031110 000013 0 0 000000000013 0 000000000013
FT9 031111 000013 0 0 000000000013 0 000000000013
ET0 031111 000013 0 0 000000000013 0 000000000013
ST6 031111 000013 0 0 000000000013 0 000000000013
ST6A 031111 000013 0 0 000000000013 0 000000000013
ST9 031111 000013 0 0 000000000013 0 000000000013
*031111 MOVEI 0,000014
INITIAL
C(AC)=000000 000013
FINAL
C(AC)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 031111 031111 0 0 201000000014 0 000000000014
IT1 031111 0 0 0 201000000014 0 000000000014
AT3 031111 0 0 0 000000000014 0 201000000014
AT6 031111 000014 0 0 000000000014 0 201000000014
FT1A 031111 000014 0 0 000000000014 0 000000000014
FT9 031112 000014 0 0 000000000014 0 000000000014
ET0 031112 000014 0 0 000000000014 0 000000000014
ST1 031112 000014 0 0 000000000014 0 000000000014
ST2 031112 000014 0 0 000000000014 0 000000000014
ST9 031112 000014 0 0 000000000014 0 000000000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 43
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0238
*031112 MOVEM 0,000014
INITIAL
C(AC)=000000 000014
C(E)=000000 000014
FINAL
C(E)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 031112 031112 0 0 202000000014 0 000000000014
IT1 031112 0 0 0 202000000014 0 000000000014
AT3 031112 0 0 0 000000000014 0 202000000014
AT6 031112 000014 0 0 000000000014 0 202000000014
FT1A 031112 000014 0 0 000000000014 0 000000000014
FT2 031112 000014 0 0 0 0 000000000014
FT2RQ 031112 000014 0 0 000000000014 0 000000000014
FT3 031112 000014 0 0 000000000014 0 000000000014
FT9 031113 000014 0 0 000000000014 0 000000000014
ET0 031113 000014 0 0 000000000014 0 000000000014
ST6 031113 000014 0 0 000000000014 0 000000000014
ST6A 031113 000014 0 0 000000000014 0 000000000014
ST9 031113 000014 0 0 000000000014 0 000000000014
*031113 MOVEI 0,000015
INITIAL
C(AC)=000000 000014
FINAL
C(AC)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 031113 031113 0 0 201000000015 0 000000000015
IT1 031113 0 0 0 201000000015 0 000000000015
AT3 031113 0 0 0 000000000015 0 201000000015
AT6 031113 000015 0 0 000000000015 0 201000000015
FT1A 031113 000015 0 0 000000000015 0 000000000015
FT9 031114 000015 0 0 000000000015 0 000000000015
ET0 031114 000015 0 0 000000000015 0 000000000015
ST1 031114 000015 0 0 000000000015 0 000000000015
ST2 031114 000015 0 0 000000000015 0 000000000015
ST9 031114 000015 0 0 000000000015 0 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 44
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0239
*031114 MOVEM 0,000015
INITIAL
C(AC)=000000 000015
C(E)=000000 000015
FINAL
C(E)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 031114 031114 0 0 202000000015 0 000000000015
IT1 031114 0 0 0 202000000015 0 000000000015
AT3 031114 0 0 0 000000000015 0 202000000015
AT6 031114 000015 0 0 000000000015 0 202000000015
FT1A 031114 000015 0 0 000000000015 0 000000000015
FT2 031114 000015 0 0 0 0 000000000015
FT2RQ 031114 000015 0 0 000000000015 0 000000000015
FT3 031114 000015 0 0 000000000015 0 000000000015
FT9 031115 000015 0 0 000000000015 0 000000000015
ET0 031115 000015 0 0 000000000015 0 000000000015
ST6 031115 000015 0 0 000000000015 0 000000000015
ST6A 031115 000015 0 0 000000000015 0 000000000015
ST9 031115 000015 0 0 000000000015 0 000000000015
*031115 MOVEI 0,000016
INITIAL
C(AC)=000000 000015
FINAL
C(AC)=000000 000016
TIME PC MA SC FE AR MQ BR
IT0 031115 031115 0 0 201000000016 0 000000000016
IT1 031115 0 0 0 201000000016 0 000000000016
AT3 031115 0 0 0 000000000016 0 201000000016
AT6 031115 000016 0 0 000000000016 0 201000000016
FT1A 031115 000016 0 0 000000000016 0 000000000016
FT9 031116 000016 0 0 000000000016 0 000000000016
ET0 031116 000016 0 0 000000000016 0 000000000016
ST1 031116 000016 0 0 000000000016 0 000000000016
ST2 031116 000016 0 0 000000000016 0 000000000016
ST9 031116 000016 0 0 000000000016 0 000000000016
*031116 MOVEM 0,000016
INITIAL
C(AC)=000000 000016
C(E)=000000 000016
FINAL
C(E)=000000 000016
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 45
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0240
IT0 031116 031116 0 0 202000000016 0 000000000016
IT1 031116 0 0 0 202000000016 0 000000000016
AT3 031116 0 0 0 000000000016 0 202000000016
AT6 031116 000016 0 0 000000000016 0 202000000016
FT1A 031116 000016 0 0 000000000016 0 000000000016
FT2 031116 000016 0 0 0 0 000000000016
FT2RQ 031116 000016 0 0 000000000016 0 000000000016
FT3 031116 000016 0 0 000000000016 0 000000000016
FT9 031117 000016 0 0 000000000016 0 000000000016
ET0 031117 000016 0 0 000000000016 0 000000000016
ST6 031117 000016 0 0 000000000016 0 000000000016
ST6A 031117 000016 0 0 000000000016 0 000000000016
ST9 031117 000016 0 0 000000000016 0 000000000016
*031117 MOVEI 0,000017
INITIAL
C(AC)=000000 000016
FINAL
C(AC)=000000 000017
TIME PC MA SC FE AR MQ BR
IT0 031117 031117 0 0 201000000017 0 000000000017
IT1 031117 0 0 0 201000000017 0 000000000017
AT3 031117 0 0 0 000000000017 0 201000000017
AT6 031117 000017 0 0 000000000017 0 201000000017
FT1A 031117 000017 0 0 000000000017 0 000000000017
FT9 031120 000017 0 0 000000000017 0 000000000017
ET0 031120 000017 0 0 000000000017 0 000000000017
ST1 031120 000017 0 0 000000000017 0 000000000017
ST2 031120 000017 0 0 000000000017 0 000000000017
ST9 031120 000017 0 0 000000000017 0 000000000017
*031120 MOVEM 0,000017
INITIAL
C(AC)=000000 000017
C(E)=000000 000017
FINAL
C(E)=000000 000017
TIME PC MA SC FE AR MQ BR
IT0 031120 031120 0 0 202000000017 0 000000000017
IT1 031120 0 0 0 202000000017 0 000000000017
AT3 031120 0 0 0 000000000017 0 202000000017
AT6 031120 000017 0 0 000000000017 0 202000000017
FT1A 031120 000017 0 0 000000000017 0 000000000017
FT2 031120 000017 0 0 0 0 000000000017
FT2RQ 031120 000017 0 0 000000000017 0 000000000017
FT3 031120 000017 0 0 000000000017 0 000000000017
FT9 031121 000017 0 0 000000000017 0 000000000017
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 46
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0241
ET0 031121 000017 0 0 000000000017 0 000000000017
ST6 031121 000017 0 0 000000000017 0 000000000017
ST6A 031121 000017 0 0 000000000017 0 000000000017
ST9 031121 000017 0 0 000000000017 0 000000000017
*031121 CAIE 17,000017
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031121 031121 0 0 302740000017 0 000000000017
IT1 031121 0 0 0 302740000017 0 000000000017
AT3 031121 0 0 0 000000000017 0 302740000017
AT6 031121 000017 0 0 000000000017 0 302740000017
FT1A 031121 000017 0 0 000000000017 0 000000000017
FT2 031121 000017 0 0 0 0 000000000017
FT2RQ 031121 000017 0 0 000000000017 0 000000000017
FT3 031121 000017 0 0 000000000017 0 000000000017
FT9 031122 000017 0 0 000000000017 0 000000000017
ET0 031123 000017 0 0 0 0 000000000017
ST1A 031123 000017 0 0 0 0 000000000017
ST9 031123 000017 0 0 0 0 000000000017
*031123 JUMPA 0,031124
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031123 031123 0 0 324000031124 0 000000031124
IT1 031123 0 0 0 324000031124 0 000000031124
AT3 031123 0 0 0 000000031124 0 324000031124
AT6 031123 031124 0 0 000000031124 0 324000031124
FT1A 031123 031124 0 0 000000031124 0 000000031124
FT2 031123 031124 0 0 0 0 000000031124
FT2RQ 031123 031124 0 0 000000000017 0 000000031124
FT3 031123 031124 0 0 000000000017 0 000000031124
FT9 031124 031124 0 0 000000000017 0 000000031124
ET0 031124 031124 0 0 000000000017 0 000000031124
ST1A 031124 031124 0 0 000000000017 0 000000031124
ST9 031124 031124 0 0 000000000017 0 000000031124
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 47
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0242
*031124 CAIE 16,000016
INITIAL
C(AC)=000000 000016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031124 031124 0 0 302700000016 0 000000000016
IT1 031124 0 0 0 302700000016 0 000000000016
AT3 031124 0 0 0 000000000016 0 302700000016
AT6 031124 000016 0 0 000000000016 0 302700000016
FT1A 031124 000016 0 0 000000000016 0 000000000016
FT2 031124 000016 0 0 0 0 000000000016
FT2RQ 031124 000016 0 0 000000000016 0 000000000016
FT3 031124 000016 0 0 000000000016 0 000000000016
FT9 031125 000016 0 0 000000000016 0 000000000016
ET0 031126 000016 0 0 0 0 000000000016
ST1A 031126 000016 0 0 0 0 000000000016
ST9 031126 000016 0 0 0 0 000000000016
*031126 JUMPA 0,031127
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031126 031126 0 0 324000031127 0 000000031127
IT1 031126 0 0 0 324000031127 0 000000031127
AT3 031126 0 0 0 000000031127 0 324000031127
AT6 031126 031127 0 0 000000031127 0 324000031127
FT1A 031126 031127 0 0 000000031127 0 000000031127
FT2 031126 031127 0 0 0 0 000000031127
FT2RQ 031126 031127 0 0 000000000017 0 000000031127
FT3 031126 031127 0 0 000000000017 0 000000031127
FT9 031127 031127 0 0 000000000017 0 000000031127
ET0 031127 031127 0 0 000000000017 0 000000031127
ST1A 031127 031127 0 0 000000000017 0 000000031127
ST9 031127 031127 0 0 000000000017 0 000000031127
*031127 CAIE 15,000015
INITIAL
C(AC)=000000 000015
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031127 031127 0 0 302640000015 0 000000000015
IT1 031127 0 0 0 302640000015 0 000000000015
AT3 031127 0 0 0 000000000015 0 302640000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 48
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0243
AT6 031127 000015 0 0 000000000015 0 302640000015
FT1A 031127 000015 0 0 000000000015 0 000000000015
FT2 031127 000015 0 0 0 0 000000000015
FT2RQ 031127 000015 0 0 000000000015 0 000000000015
FT3 031127 000015 0 0 000000000015 0 000000000015
FT9 031130 000015 0 0 000000000015 0 000000000015
ET0 031131 000015 0 0 0 0 000000000015
ST1A 031131 000015 0 0 0 0 000000000015
ST9 031131 000015 0 0 0 0 000000000015
*031131 JUMPA 0,031132
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031131 031131 0 0 324000031132 0 000000031132
IT1 031131 0 0 0 324000031132 0 000000031132
AT3 031131 0 0 0 000000031132 0 324000031132
AT6 031131 031132 0 0 000000031132 0 324000031132
FT1A 031131 031132 0 0 000000031132 0 000000031132
FT2 031131 031132 0 0 0 0 000000031132
FT2RQ 031131 031132 0 0 000000000017 0 000000031132
FT3 031131 031132 0 0 000000000017 0 000000031132
FT9 031132 031132 0 0 000000000017 0 000000031132
ET0 031132 031132 0 0 000000000017 0 000000031132
ST1A 031132 031132 0 0 000000000017 0 000000031132
ST9 031132 031132 0 0 000000000017 0 000000031132
*031132 CAIE 14,000014
INITIAL
C(AC)=000000 000014
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031132 031132 0 0 302600000014 0 000000000014
IT1 031132 0 0 0 302600000014 0 000000000014
AT3 031132 0 0 0 000000000014 0 302600000014
AT6 031132 000014 0 0 000000000014 0 302600000014
FT1A 031132 000014 0 0 000000000014 0 000000000014
FT2 031132 000014 0 0 0 0 000000000014
FT2RQ 031132 000014 0 0 000000000014 0 000000000014
FT3 031132 000014 0 0 000000000014 0 000000000014
FT9 031133 000014 0 0 000000000014 0 000000000014
ET0 031134 000014 0 0 0 0 000000000014
ST1A 031134 000014 0 0 0 0 000000000014
ST9 031134 000014 0 0 0 0 000000000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 49
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0244
*031134 JUMPA 0,031135
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031134 031134 0 0 324000031135 0 000000031135
IT1 031134 0 0 0 324000031135 0 000000031135
AT3 031134 0 0 0 000000031135 0 324000031135
AT6 031134 031135 0 0 000000031135 0 324000031135
FT1A 031134 031135 0 0 000000031135 0 000000031135
FT2 031134 031135 0 0 0 0 000000031135
FT2RQ 031134 031135 0 0 000000000017 0 000000031135
FT3 031134 031135 0 0 000000000017 0 000000031135
FT9 031135 031135 0 0 000000000017 0 000000031135
ET0 031135 031135 0 0 000000000017 0 000000031135
ST1A 031135 031135 0 0 000000000017 0 000000031135
ST9 031135 031135 0 0 000000000017 0 000000031135
*031135 CAIE 13,000013
INITIAL
C(AC)=000000 000013
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031135 031135 0 0 302540000013 0 000000000013
IT1 031135 0 0 0 302540000013 0 000000000013
AT3 031135 0 0 0 000000000013 0 302540000013
AT6 031135 000013 0 0 000000000013 0 302540000013
FT1A 031135 000013 0 0 000000000013 0 000000000013
FT2 031135 000013 0 0 0 0 000000000013
FT2RQ 031135 000013 0 0 000000000013 0 000000000013
FT3 031135 000013 0 0 000000000013 0 000000000013
FT9 031136 000013 0 0 000000000013 0 000000000013
ET0 031137 000013 0 0 0 0 000000000013
ST1A 031137 000013 0 0 0 0 000000000013
ST9 031137 000013 0 0 0 0 000000000013
*031137 JUMPA 0,031140
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031137 031137 0 0 324000031140 0 000000031140
IT1 031137 0 0 0 324000031140 0 000000031140
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 50
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0245
AT3 031137 0 0 0 000000031140 0 324000031140
AT6 031137 031140 0 0 000000031140 0 324000031140
FT1A 031137 031140 0 0 000000031140 0 000000031140
FT2 031137 031140 0 0 0 0 000000031140
FT2RQ 031137 031140 0 0 000000000017 0 000000031140
FT3 031137 031140 0 0 000000000017 0 000000031140
FT9 031140 031140 0 0 000000000017 0 000000031140
ET0 031140 031140 0 0 000000000017 0 000000031140
ST1A 031140 031140 0 0 000000000017 0 000000031140
ST9 031140 031140 0 0 000000000017 0 000000031140
*031140 CAIE 12,000012
INITIAL
C(AC)=000000 000012
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031140 031140 0 0 302500000012 0 000000000012
IT1 031140 0 0 0 302500000012 0 000000000012
AT3 031140 0 0 0 000000000012 0 302500000012
AT6 031140 000012 0 0 000000000012 0 302500000012
FT1A 031140 000012 0 0 000000000012 0 000000000012
FT2 031140 000012 0 0 0 0 000000000012
FT2RQ 031140 000012 0 0 000000000012 0 000000000012
FT3 031140 000012 0 0 000000000012 0 000000000012
FT9 031141 000012 0 0 000000000012 0 000000000012
ET0 031142 000012 0 0 0 0 000000000012
ST1A 031142 000012 0 0 0 0 000000000012
ST9 031142 000012 0 0 0 0 000000000012
*031142 JUMPA 0,031143
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031142 031142 0 0 324000031143 0 000000031143
IT1 031142 0 0 0 324000031143 0 000000031143
AT3 031142 0 0 0 000000031143 0 324000031143
AT6 031142 031143 0 0 000000031143 0 324000031143
FT1A 031142 031143 0 0 000000031143 0 000000031143
FT2 031142 031143 0 0 0 0 000000031143
FT2RQ 031142 031143 0 0 000000000017 0 000000031143
FT3 031142 031143 0 0 000000000017 0 000000031143
FT9 031143 031143 0 0 000000000017 0 000000031143
ET0 031143 031143 0 0 000000000017 0 000000031143
ST1A 031143 031143 0 0 000000000017 0 000000031143
ST9 031143 031143 0 0 000000000017 0 000000031143
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 51
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0246
*031143 CAIE 11,000011
INITIAL
C(AC)=000000 000011
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031143 031143 0 0 302440000011 0 000000000011
IT1 031143 0 0 0 302440000011 0 000000000011
AT3 031143 0 0 0 000000000011 0 302440000011
AT6 031143 000011 0 0 000000000011 0 302440000011
FT1A 031143 000011 0 0 000000000011 0 000000000011
FT2 031143 000011 0 0 0 0 000000000011
FT2RQ 031143 000011 0 0 000000000011 0 000000000011
FT3 031143 000011 0 0 000000000011 0 000000000011
FT9 031144 000011 0 0 000000000011 0 000000000011
ET0 031145 000011 0 0 0 0 000000000011
ST1A 031145 000011 0 0 0 0 000000000011
ST9 031145 000011 0 0 0 0 000000000011
*031145 JUMPA 0,031146
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031145 031145 0 0 324000031146 0 000000031146
IT1 031145 0 0 0 324000031146 0 000000031146
AT3 031145 0 0 0 000000031146 0 324000031146
AT6 031145 031146 0 0 000000031146 0 324000031146
FT1A 031145 031146 0 0 000000031146 0 000000031146
FT2 031145 031146 0 0 0 0 000000031146
FT2RQ 031145 031146 0 0 000000000017 0 000000031146
FT3 031145 031146 0 0 000000000017 0 000000031146
FT9 031146 031146 0 0 000000000017 0 000000031146
ET0 031146 031146 0 0 000000000017 0 000000031146
ST1A 031146 031146 0 0 000000000017 0 000000031146
ST9 031146 031146 0 0 000000000017 0 000000031146
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 52
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0247
*031146 CAIE 10,000010
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031146 031146 0 0 302400000010 0 000000000010
IT1 031146 0 0 0 302400000010 0 000000000010
AT3 031146 0 0 0 000000000010 0 302400000010
AT6 031146 000010 0 0 000000000010 0 302400000010
FT1A 031146 000010 0 0 000000000010 0 000000000010
FT2 031146 000010 0 0 0 0 000000000010
FT2RQ 031146 000010 0 0 000000000010 0 000000000010
FT3 031146 000010 0 0 000000000010 0 000000000010
FT9 031147 000010 0 0 000000000010 0 000000000010
ET0 031150 000010 0 0 0 0 000000000010
ST1A 031150 000010 0 0 0 0 000000000010
ST9 031150 000010 0 0 0 0 000000000010
*031150 JUMPA 0,031151
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031150 031150 0 0 324000031151 0 000000031151
IT1 031150 0 0 0 324000031151 0 000000031151
AT3 031150 0 0 0 000000031151 0 324000031151
AT6 031150 031151 0 0 000000031151 0 324000031151
FT1A 031150 031151 0 0 000000031151 0 000000031151
FT2 031150 031151 0 0 0 0 000000031151
FT2RQ 031150 031151 0 0 000000000017 0 000000031151
FT3 031150 031151 0 0 000000000017 0 000000031151
FT9 031151 031151 0 0 000000000017 0 000000031151
ET0 031151 031151 0 0 000000000017 0 000000031151
ST1A 031151 031151 0 0 000000000017 0 000000031151
ST9 031151 031151 0 0 000000000017 0 000000031151
*031151 CAIE 7,000007
INITIAL
C(AC)=000000 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031151 031151 0 0 302340000007 0 000000000007
IT1 031151 0 0 0 302340000007 0 000000000007
AT3 031151 0 0 0 000000000007 0 302340000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 53
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0248
AT6 031151 000007 0 0 000000000007 0 302340000007
FT1A 031151 000007 0 0 000000000007 0 000000000007
FT2 031151 000007 0 0 0 0 000000000007
FT2RQ 031151 000007 0 0 000000000007 0 000000000007
FT3 031151 000007 0 0 000000000007 0 000000000007
FT9 031152 000007 0 0 000000000007 0 000000000007
ET0 031153 000007 0 0 0 0 000000000007
ST1A 031153 000007 0 0 0 0 000000000007
ST9 031153 000007 0 0 0 0 000000000007
*031153 JUMPA 0,031154
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031153 031153 0 0 324000031154 0 000000031154
IT1 031153 0 0 0 324000031154 0 000000031154
AT3 031153 0 0 0 000000031154 0 324000031154
AT6 031153 031154 0 0 000000031154 0 324000031154
FT1A 031153 031154 0 0 000000031154 0 000000031154
FT2 031153 031154 0 0 0 0 000000031154
FT2RQ 031153 031154 0 0 000000000017 0 000000031154
FT3 031153 031154 0 0 000000000017 0 000000031154
FT9 031154 031154 0 0 000000000017 0 000000031154
ET0 031154 031154 0 0 000000000017 0 000000031154
ST1A 031154 031154 0 0 000000000017 0 000000031154
ST9 031154 031154 0 0 000000000017 0 000000031154
*031154 CAIE 6,000006
INITIAL
C(AC)=000000 000006
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031154 031154 0 0 302300000006 0 000000000006
IT1 031154 0 0 0 302300000006 0 000000000006
AT3 031154 0 0 0 000000000006 0 302300000006
AT6 031154 000006 0 0 000000000006 0 302300000006
FT1A 031154 000006 0 0 000000000006 0 000000000006
FT2 031154 000006 0 0 0 0 000000000006
FT2RQ 031154 000006 0 0 000000000006 0 000000000006
FT3 031154 000006 0 0 000000000006 0 000000000006
FT9 031155 000006 0 0 000000000006 0 000000000006
ET0 031156 000006 0 0 0 0 000000000006
ST1A 031156 000006 0 0 0 0 000000000006
ST9 031156 000006 0 0 0 0 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 54
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0249
*031156 JUMPA 0,031157
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031156 031156 0 0 324000031157 0 000000031157
IT1 031156 0 0 0 324000031157 0 000000031157
AT3 031156 0 0 0 000000031157 0 324000031157
AT6 031156 031157 0 0 000000031157 0 324000031157
FT1A 031156 031157 0 0 000000031157 0 000000031157
FT2 031156 031157 0 0 0 0 000000031157
FT2RQ 031156 031157 0 0 000000000017 0 000000031157
FT3 031156 031157 0 0 000000000017 0 000000031157
FT9 031157 031157 0 0 000000000017 0 000000031157
ET0 031157 031157 0 0 000000000017 0 000000031157
ST1A 031157 031157 0 0 000000000017 0 000000031157
ST9 031157 031157 0 0 000000000017 0 000000031157
*031157 CAIE 5,000005
INITIAL
C(AC)=000000 000005
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031157 031157 0 0 302240000005 0 000000000005
IT1 031157 0 0 0 302240000005 0 000000000005
AT3 031157 0 0 0 000000000005 0 302240000005
AT6 031157 000005 0 0 000000000005 0 302240000005
FT1A 031157 000005 0 0 000000000005 0 000000000005
FT2 031157 000005 0 0 0 0 000000000005
FT2RQ 031157 000005 0 0 000000000005 0 000000000005
FT3 031157 000005 0 0 000000000005 0 000000000005
FT9 031160 000005 0 0 000000000005 0 000000000005
ET0 031161 000005 0 0 0 0 000000000005
ST1A 031161 000005 0 0 0 0 000000000005
ST9 031161 000005 0 0 0 0 000000000005
*031161 JUMPA 0,031162
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031161 031161 0 0 324000031162 0 000000031162
IT1 031161 0 0 0 324000031162 0 000000031162
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 55
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0250
AT3 031161 0 0 0 000000031162 0 324000031162
AT6 031161 031162 0 0 000000031162 0 324000031162
FT1A 031161 031162 0 0 000000031162 0 000000031162
FT2 031161 031162 0 0 0 0 000000031162
FT2RQ 031161 031162 0 0 000000000017 0 000000031162
FT3 031161 031162 0 0 000000000017 0 000000031162
FT9 031162 031162 0 0 000000000017 0 000000031162
ET0 031162 031162 0 0 000000000017 0 000000031162
ST1A 031162 031162 0 0 000000000017 0 000000031162
ST9 031162 031162 0 0 000000000017 0 000000031162
*031162 CAIE 4,000004
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031162 031162 0 0 302200000004 0 000000000004
IT1 031162 0 0 0 302200000004 0 000000000004
AT3 031162 0 0 0 000000000004 0 302200000004
AT6 031162 000004 0 0 000000000004 0 302200000004
FT1A 031162 000004 0 0 000000000004 0 000000000004
FT2 031162 000004 0 0 0 0 000000000004
FT2RQ 031162 000004 0 0 000000000004 0 000000000004
FT3 031162 000004 0 0 000000000004 0 000000000004
FT9 031163 000004 0 0 000000000004 0 000000000004
ET0 031164 000004 0 0 0 0 000000000004
ST1A 031164 000004 0 0 0 0 000000000004
ST9 031164 000004 0 0 0 0 000000000004
*031164 JUMPA 0,031165
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031164 031164 0 0 324000031165 0 000000031165
IT1 031164 0 0 0 324000031165 0 000000031165
AT3 031164 0 0 0 000000031165 0 324000031165
AT6 031164 031165 0 0 000000031165 0 324000031165
FT1A 031164 031165 0 0 000000031165 0 000000031165
FT2 031164 031165 0 0 0 0 000000031165
FT2RQ 031164 031165 0 0 000000000017 0 000000031165
FT3 031164 031165 0 0 000000000017 0 000000031165
FT9 031165 031165 0 0 000000000017 0 000000031165
ET0 031165 031165 0 0 000000000017 0 000000031165
ST1A 031165 031165 0 0 000000000017 0 000000031165
ST9 031165 031165 0 0 000000000017 0 000000031165
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 56
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0251
*031165 CAIE 3,000003
INITIAL
C(AC)=000000 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031165 031165 0 0 302140000003 0 000000000003
IT1 031165 0 0 0 302140000003 0 000000000003
AT3 031165 0 0 0 000000000003 0 302140000003
AT6 031165 000003 0 0 000000000003 0 302140000003
FT1A 031165 000003 0 0 000000000003 0 000000000003
FT2 031165 000003 0 0 0 0 000000000003
FT2RQ 031165 000003 0 0 000000000003 0 000000000003
FT3 031165 000003 0 0 000000000003 0 000000000003
FT9 031166 000003 0 0 000000000003 0 000000000003
ET0 031167 000003 0 0 0 0 000000000003
ST1A 031167 000003 0 0 0 0 000000000003
ST9 031167 000003 0 0 0 0 000000000003
*031167 JUMPA 0,031170
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031167 031167 0 0 324000031170 0 000000031170
IT1 031167 0 0 0 324000031170 0 000000031170
AT3 031167 0 0 0 000000031170 0 324000031170
AT6 031167 031170 0 0 000000031170 0 324000031170
FT1A 031167 031170 0 0 000000031170 0 000000031170
FT2 031167 031170 0 0 0 0 000000031170
FT2RQ 031167 031170 0 0 000000000017 0 000000031170
FT3 031167 031170 0 0 000000000017 0 000000031170
FT9 031170 031170 0 0 000000000017 0 000000031170
ET0 031170 031170 0 0 000000000017 0 000000031170
ST1A 031170 031170 0 0 000000000017 0 000000031170
ST9 031170 031170 0 0 000000000017 0 000000031170
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 57
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0252
*031170 CAIE 2,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031170 031170 0 0 302100000002 0 000000000002
IT1 031170 0 0 0 302100000002 0 000000000002
AT3 031170 0 0 0 000000000002 0 302100000002
AT6 031170 000002 0 0 000000000002 0 302100000002
FT1A 031170 000002 0 0 000000000002 0 000000000002
FT2 031170 000002 0 0 0 0 000000000002
FT2RQ 031170 000002 0 0 000000000002 0 000000000002
FT3 031170 000002 0 0 000000000002 0 000000000002
FT9 031171 000002 0 0 000000000002 0 000000000002
ET0 031172 000002 0 0 0 0 000000000002
ST1A 031172 000002 0 0 0 0 000000000002
ST9 031172 000002 0 0 0 0 000000000002
*031172 JUMPA 0,031173
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031172 031172 0 0 324000031173 0 000000031173
IT1 031172 0 0 0 324000031173 0 000000031173
AT3 031172 0 0 0 000000031173 0 324000031173
AT6 031172 031173 0 0 000000031173 0 324000031173
FT1A 031172 031173 0 0 000000031173 0 000000031173
FT2 031172 031173 0 0 0 0 000000031173
FT2RQ 031172 031173 0 0 000000000017 0 000000031173
FT3 031172 031173 0 0 000000000017 0 000000031173
FT9 031173 031173 0 0 000000000017 0 000000031173
ET0 031173 031173 0 0 000000000017 0 000000031173
ST1A 031173 031173 0 0 000000000017 0 000000031173
ST9 031173 031173 0 0 000000000017 0 000000031173
*031173 CAIE 1,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031173 031173 0 0 302040000001 0 000000000001
IT1 031173 0 0 0 302040000001 0 000000000001
AT3 031173 0 0 0 000000000001 0 302040000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 58
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0253
AT6 031173 000001 0 0 000000000001 0 302040000001
FT1A 031173 000001 0 0 000000000001 0 000000000001
FT2 031173 000001 0 0 0 0 000000000001
FT2RQ 031173 000001 0 0 000000000001 0 000000000001
FT3 031173 000001 0 0 000000000001 0 000000000001
FT9 031174 000001 0 0 000000000001 0 000000000001
ET0 031175 000001 0 0 0 0 000000000001
ST1A 031175 000001 0 0 0 0 000000000001
ST9 031175 000001 0 0 0 0 000000000001
*031175 JUMPA 0,031176
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031175 031175 0 0 324000031176 0 000000031176
IT1 031175 0 0 0 324000031176 0 000000031176
AT3 031175 0 0 0 000000031176 0 324000031176
AT6 031175 031176 0 0 000000031176 0 324000031176
FT1A 031175 031176 0 0 000000031176 0 000000031176
FT2 031175 031176 0 0 0 0 000000031176
FT2RQ 031175 031176 0 0 000000000017 0 000000031176
FT3 031175 031176 0 0 000000000017 0 000000031176
FT9 031176 031176 0 0 000000000017 0 000000031176
ET0 031176 031176 0 0 000000000017 0 000000031176
ST1A 031176 031176 0 0 000000000017 0 000000031176
ST9 031176 031176 0 0 000000000017 0 000000031176
*031176 MOVEI 1,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031176 031176 0 0 201040000001 0 000000000001
IT1 031176 0 0 0 201040000001 0 000000000001
AT3 031176 0 0 0 000000000001 0 201040000001
AT6 031176 000001 0 0 000000000001 0 201040000001
FT1A 031176 000001 0 0 000000000001 0 000000000001
FT9 031177 000001 0 0 000000000001 0 000000000001
ET0 031177 000001 0 0 000000000001 0 000000000001
ST1 031177 000001 0 0 000000000001 0 000000000001
ST2 031177 000001 0 0 000000000001 0 000000000001
ST9 031177 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 59
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0254
*031177 CAIE 1,000000(1)
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031177 031177 0 0 302041000000 0 000000000001
IT1 031177 0 0 0 302041000000 0 000000000001
AT1 031177 0 0 0 0 0 302041000000
AT2 031177 0 0 0 000000000001 0 302041000000
AT3 031177 0 0 0 000000000001 0 000000000001
AT6 031177 000001 0 0 000000000001 0 000000000001
FT1A 031177 000001 0 0 000000000001 0 000000000001
FT2 031177 000001 0 0 0 0 000000000001
FT2RQ 031177 000001 0 0 000000000001 0 000000000001
FT3 031177 000001 0 0 000000000001 0 000000000001
FT9 0 000001 0 0 000000000001 0 000000000001
ET0 031201 000001 0 0 0 0 000000000001
ST1A 031201 000001 0 0 0 0 000000000001
ST9 031201 000001 0 0 0 0 000000000001
*031201 JUMPA 0,031202
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031201 031201 0 0 324000031202 0 000000031202
IT1 031201 0 0 0 324000031202 0 000000031202
AT3 031201 0 0 0 000000031202 0 324000031202
AT6 031201 031202 0 0 000000031202 0 324000031202
FT1A 031201 031202 0 0 000000031202 0 000000031202
FT2 031201 031202 0 0 0 0 000000031202
FT2RQ 031201 031202 0 0 000000000017 0 000000031202
FT3 031201 031202 0 0 000000000017 0 000000031202
FT9 031202 031202 0 0 000000000017 0 000000031202
ET0 031202 031202 0 0 000000000017 0 000000031202
ST1A 031202 031202 0 0 000000000017 0 000000031202
ST9 031202 031202 0 0 000000000017 0 000000031202
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 60
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0255
*031202 MOVEI 2,000002
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031202 031202 0 0 201100000002 0 000000000002
IT1 031202 0 0 0 201100000002 0 000000000002
AT3 031202 0 0 0 000000000002 0 201100000002
AT6 031202 000002 0 0 000000000002 0 201100000002
FT1A 031202 000002 0 0 000000000002 0 000000000002
FT9 031203 000002 0 0 000000000002 0 000000000002
ET0 031203 000002 0 0 000000000002 0 000000000002
ST1 031203 000002 0 0 000000000002 0 000000000002
ST2 031203 000002 0 0 000000000002 0 000000000002
ST9 031203 000002 0 0 000000000002 0 000000000002
*031203 CAIE 2,000000(2)
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031203 031203 0 0 302102000000 0 000000000002
IT1 031203 0 0 0 302102000000 0 000000000002
AT1 031203 0 0 0 0 0 302102000000
AT2 031203 0 0 0 000000000002 0 302102000000
AT3 031203 0 0 0 000000000002 0 000000000002
AT6 031203 000002 0 0 000000000002 0 000000000002
FT1A 031203 000002 0 0 000000000002 0 000000000002
FT2 031203 000002 0 0 0 0 000000000002
FT2RQ 031203 000002 0 0 000000000002 0 000000000002
FT3 031203 000002 0 0 000000000002 0 000000000002
FT9 031204 000002 0 0 000000000002 0 000000000002
ET0 031205 000002 0 0 0 0 000000000002
ST1A 031205 000002 0 0 0 0 000000000002
ST9 031205 000002 0 0 0 0 000000000002
*031205 JUMPA 0,031206
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031205 031205 0 0 324000031206 0 000000031206
IT1 031205 0 0 0 324000031206 0 000000031206
AT3 031205 0 0 0 000000031206 0 324000031206
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 61
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0256
AT6 031205 031206 0 0 000000031206 0 324000031206
FT1A 031205 031206 0 0 000000031206 0 000000031206
FT2 031205 031206 0 0 0 0 000000031206
FT2RQ 031205 031206 0 0 000000000017 0 000000031206
FT3 031205 031206 0 0 000000000017 0 000000031206
FT9 031206 031206 0 0 000000000017 0 000000031206
ET0 031206 031206 0 0 000000000017 0 000000031206
ST1A 031206 031206 0 0 000000000017 0 000000031206
ST9 031206 031206 0 0 000000000017 0 000000031206
*031206 MOVEI 3,000003
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031206 031206 0 0 201140000003 0 000000000003
IT1 031206 0 0 0 201140000003 0 000000000003
AT3 031206 0 0 0 000000000003 0 201140000003
AT6 031206 000003 0 0 000000000003 0 201140000003
FT1A 031206 000003 0 0 000000000003 0 000000000003
FT9 031207 000003 0 0 000000000003 0 000000000003
ET0 031207 000003 0 0 000000000003 0 000000000003
ST1 031207 000003 0 0 000000000003 0 000000000003
ST2 031207 000003 0 0 000000000003 0 000000000003
ST9 031207 000003 0 0 000000000003 0 000000000003
*031207 CAIE 3,000000(3)
INITIAL
C(AC)=000000 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031207 031207 0 0 302143000000 0 000000000003
IT1 031207 0 0 0 302143000000 0 000000000003
AT1 031207 0 0 0 0 0 302143000000
AT2 031207 0 0 0 000000000003 0 302143000000
AT3 031207 0 0 0 000000000003 0 000000000003
AT6 031207 000003 0 0 000000000003 0 000000000003
FT1A 031207 000003 0 0 000000000003 0 000000000003
FT2 031207 000003 0 0 0 0 000000000003
FT2RQ 031207 000003 0 0 000000000003 0 000000000003
FT3 031207 000003 0 0 000000000003 0 000000000003
FT9 031210 000003 0 0 000000000003 0 000000000003
ET0 031211 000003 0 0 0 0 000000000003
ST1A 031211 000003 0 0 0 0 000000000003
ST9 031211 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 62
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0257
*031211 JUMPA 0,031212
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031211 031211 0 0 324000031212 0 000000031212
IT1 031211 0 0 0 324000031212 0 000000031212
AT3 031211 0 0 0 000000031212 0 324000031212
AT6 031211 031212 0 0 000000031212 0 324000031212
FT1A 031211 031212 0 0 000000031212 0 000000031212
FT2 031211 031212 0 0 0 0 000000031212
FT2RQ 031211 031212 0 0 000000000017 0 000000031212
FT3 031211 031212 0 0 000000000017 0 000000031212
FT9 031212 031212 0 0 000000000017 0 000000031212
ET0 031212 031212 0 0 000000000017 0 000000031212
ST1A 031212 031212 0 0 000000000017 0 000000031212
ST9 031212 031212 0 0 000000000017 0 000000031212
*031212 MOVEI 4,000004
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031212 031212 0 0 201200000004 0 000000000004
IT1 031212 0 0 0 201200000004 0 000000000004
AT3 031212 0 0 0 000000000004 0 201200000004
AT6 031212 000004 0 0 000000000004 0 201200000004
FT1A 031212 000004 0 0 000000000004 0 000000000004
FT9 031213 000004 0 0 000000000004 0 000000000004
ET0 031213 000004 0 0 000000000004 0 000000000004
ST1 031213 000004 0 0 000000000004 0 000000000004
ST2 031213 000004 0 0 000000000004 0 000000000004
ST9 031213 000004 0 0 000000000004 0 000000000004
*031213 CAIE 4,000000(4)
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031213 031213 0 0 302204000000 0 000000000004
IT1 031213 0 0 0 302204000000 0 000000000004
AT1 031213 0 0 0 0 0 302204000000
AT2 031213 0 0 0 000000000004 0 302204000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 63
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0258
AT3 031213 0 0 0 000000000004 0 000000000004
AT6 031213 000004 0 0 000000000004 0 000000000004
FT1A 031213 000004 0 0 000000000004 0 000000000004
FT2 031213 000004 0 0 0 0 000000000004
FT2RQ 031213 000004 0 0 000000000004 0 000000000004
FT3 031213 000004 0 0 000000000004 0 000000000004
FT9 031214 000004 0 0 000000000004 0 000000000004
ET0 031215 000004 0 0 0 0 000000000004
ST1A 031215 000004 0 0 0 0 000000000004
ST9 031215 000004 0 0 0 0 000000000004
*031215 JUMPA 0,031216
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031215 031215 0 0 324000031216 0 000000031216
IT1 031215 0 0 0 324000031216 0 000000031216
AT3 031215 0 0 0 000000031216 0 324000031216
AT6 031215 031216 0 0 000000031216 0 324000031216
FT1A 031215 031216 0 0 000000031216 0 000000031216
FT2 031215 031216 0 0 0 0 000000031216
FT2RQ 031215 031216 0 0 000000000017 0 000000031216
FT3 031215 031216 0 0 000000000017 0 000000031216
FT9 031216 031216 0 0 000000000017 0 000000031216
ET0 031216 031216 0 0 000000000017 0 000000031216
ST1A 031216 031216 0 0 000000000017 0 000000031216
ST9 031216 031216 0 0 000000000017 0 000000031216
*031216 MOVEI 5,000005
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 031216 031216 0 0 201240000005 0 000000000005
IT1 031216 0 0 0 201240000005 0 000000000005
AT3 031216 0 0 0 000000000005 0 201240000005
AT6 031216 000005 0 0 000000000005 0 201240000005
FT1A 031216 000005 0 0 000000000005 0 000000000005
FT9 031217 000005 0 0 000000000005 0 000000000005
ET0 031217 000005 0 0 000000000005 0 000000000005
ST1 031217 000005 0 0 000000000005 0 000000000005
ST2 031217 000005 0 0 000000000005 0 000000000005
ST9 031217 000005 0 0 000000000005 0 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 64
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0259
*031217 CAIE 5,000000(5)
INITIAL
C(AC)=000000 000005
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031217 031217 0 0 302245000000 0 000000000005
IT1 031217 0 0 0 302245000000 0 000000000005
AT1 031217 0 0 0 0 0 302245000000
AT2 031217 0 0 0 000000000005 0 302245000000
AT3 031217 0 0 0 000000000005 0 000000000005
AT6 031217 000005 0 0 000000000005 0 000000000005
FT1A 031217 000005 0 0 000000000005 0 000000000005
FT2 031217 000005 0 0 0 0 000000000005
FT2RQ 031217 000005 0 0 000000000005 0 000000000005
FT3 031217 000005 0 0 000000000005 0 000000000005
FT9 031220 000005 0 0 000000000005 0 000000000005
ET0 031221 000005 0 0 0 0 000000000005
ST1A 031221 000005 0 0 0 0 000000000005
ST9 031221 000005 0 0 0 0 000000000005
*031221 JUMPA 0,031222
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031221 031221 0 0 324000031222 0 000000031222
IT1 031221 0 0 0 324000031222 0 000000031222
AT3 031221 0 0 0 000000031222 0 324000031222
AT6 031221 031222 0 0 000000031222 0 324000031222
FT1A 031221 031222 0 0 000000031222 0 000000031222
FT2 031221 031222 0 0 0 0 000000031222
FT2RQ 031221 031222 0 0 000000000017 0 000000031222
FT3 031221 031222 0 0 000000000017 0 000000031222
FT9 031222 031222 0 0 000000000017 0 000000031222
ET0 031222 031222 0 0 000000000017 0 000000031222
ST1A 031222 031222 0 0 000000000017 0 000000031222
ST9 031222 031222 0 0 000000000017 0 000000031222
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 65
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0260
*031222 MOVEI 6,000006
INITIAL
C(AC)=000000 000006
FINAL
C(AC)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 031222 031222 0 0 201300000006 0 000000000006
IT1 031222 0 0 0 201300000006 0 000000000006
AT3 031222 0 0 0 000000000006 0 201300000006
AT6 031222 000006 0 0 000000000006 0 201300000006
FT1A 031222 000006 0 0 000000000006 0 000000000006
FT9 031223 000006 0 0 000000000006 0 000000000006
ET0 031223 000006 0 0 000000000006 0 000000000006
ST1 031223 000006 0 0 000000000006 0 000000000006
ST2 031223 000006 0 0 000000000006 0 000000000006
ST9 031223 000006 0 0 000000000006 0 000000000006
*031223 CAIE 6,000000(6)
INITIAL
C(AC)=000000 000006
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031223 031223 0 0 302306000000 0 000000000006
IT1 031223 0 0 0 302306000000 0 000000000006
AT1 031223 0 0 0 0 0 302306000000
AT2 031223 0 0 0 000000000006 0 302306000000
AT3 031223 0 0 0 000000000006 0 000000000006
AT6 031223 000006 0 0 000000000006 0 000000000006
FT1A 031223 000006 0 0 000000000006 0 000000000006
FT2 031223 000006 0 0 0 0 000000000006
FT2RQ 031223 000006 0 0 000000000006 0 000000000006
FT3 031223 000006 0 0 000000000006 0 000000000006
FT9 031224 000006 0 0 000000000006 0 000000000006
ET0 031225 000006 0 0 0 0 000000000006
ST1A 031225 000006 0 0 0 0 000000000006
ST9 031225 000006 0 0 0 0 000000000006
*031225 JUMPA 0,031226
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031225 031225 0 0 324000031226 0 000000031226
IT1 031225 0 0 0 324000031226 0 000000031226
AT3 031225 0 0 0 000000031226 0 324000031226
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 66
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0261
AT6 031225 031226 0 0 000000031226 0 324000031226
FT1A 031225 031226 0 0 000000031226 0 000000031226
FT2 031225 031226 0 0 0 0 000000031226
FT2RQ 031225 031226 0 0 000000000017 0 000000031226
FT3 031225 031226 0 0 000000000017 0 000000031226
FT9 031226 031226 0 0 000000000017 0 000000031226
ET0 031226 031226 0 0 000000000017 0 000000031226
ST1A 031226 031226 0 0 000000000017 0 000000031226
ST9 031226 031226 0 0 000000000017 0 000000031226
*031226 MOVEI 7,000007
INITIAL
C(AC)=000000 000007
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 031226 031226 0 0 201340000007 0 000000000007
IT1 031226 0 0 0 201340000007 0 000000000007
AT3 031226 0 0 0 000000000007 0 201340000007
AT6 031226 000007 0 0 000000000007 0 201340000007
FT1A 031226 000007 0 0 000000000007 0 000000000007
FT9 031227 000007 0 0 000000000007 0 000000000007
ET0 031227 000007 0 0 000000000007 0 000000000007
ST1 031227 000007 0 0 000000000007 0 000000000007
ST2 031227 000007 0 0 000000000007 0 000000000007
ST9 031227 000007 0 0 000000000007 0 000000000007
*031227 CAIE 7,000000(7)
INITIAL
C(AC)=000000 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031227 031227 0 0 302347000000 0 000000000007
IT1 031227 0 0 0 302347000000 0 000000000007
AT1 031227 0 0 0 0 0 302347000000
AT2 031227 0 0 0 000000000007 0 302347000000
AT3 031227 0 0 0 000000000007 0 000000000007
AT6 031227 000007 0 0 000000000007 0 000000000007
FT1A 031227 000007 0 0 000000000007 0 000000000007
FT2 031227 000007 0 0 0 0 000000000007
FT2RQ 031227 000007 0 0 000000000007 0 000000000007
FT3 031227 000007 0 0 000000000007 0 000000000007
FT9 031230 000007 0 0 000000000007 0 000000000007
ET0 031231 000007 0 0 0 0 000000000007
ST1A 031231 000007 0 0 0 0 000000000007
ST9 031231 000007 0 0 0 0 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 67
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0262
*031231 JUMPA 0,031232
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031231 031231 0 0 324000031232 0 000000031232
IT1 031231 0 0 0 324000031232 0 000000031232
AT3 031231 0 0 0 000000031232 0 324000031232
AT6 031231 031232 0 0 000000031232 0 324000031232
FT1A 031231 031232 0 0 000000031232 0 000000031232
FT2 031231 031232 0 0 0 0 000000031232
FT2RQ 031231 031232 0 0 000000000017 0 000000031232
FT3 031231 031232 0 0 000000000017 0 000000031232
FT9 031232 031232 0 0 000000000017 0 000000031232
ET0 031232 031232 0 0 000000000017 0 000000031232
ST1A 031232 031232 0 0 000000000017 0 000000031232
ST9 031232 031232 0 0 000000000017 0 000000031232
*031232 MOVEI 10,000010
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 031232 031232 0 0 201400000010 0 000000000010
IT1 031232 0 0 0 201400000010 0 000000000010
AT3 031232 0 0 0 000000000010 0 201400000010
AT6 031232 000010 0 0 000000000010 0 201400000010
FT1A 031232 000010 0 0 000000000010 0 000000000010
FT9 031233 000010 0 0 000000000010 0 000000000010
ET0 031233 000010 0 0 000000000010 0 000000000010
ST1 031233 000010 0 0 000000000010 0 000000000010
ST2 031233 000010 0 0 000000000010 0 000000000010
ST9 031233 000010 0 0 000000000010 0 000000000010
*031233 CAIE 10,000000(10)
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031233 031233 0 0 302410000000 0 000000000010
IT1 031233 0 0 0 302410000000 0 000000000010
AT1 031233 0 0 0 0 0 302410000000
AT2 031233 0 0 0 000000000010 0 302410000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 68
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0263
AT3 031233 0 0 0 000000000010 0 000000000010
AT6 031233 000010 0 0 000000000010 0 000000000010
FT1A 031233 000010 0 0 000000000010 0 000000000010
FT2 031233 000010 0 0 0 0 000000000010
FT2RQ 031233 000010 0 0 000000000010 0 000000000010
FT3 031233 000010 0 0 000000000010 0 000000000010
FT9 031234 000010 0 0 000000000010 0 000000000010
ET0 031235 000010 0 0 0 0 000000000010
ST1A 031235 000010 0 0 0 0 000000000010
ST9 031235 000010 0 0 0 0 000000000010
*031235 JUMPA 0,031236
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031235 031235 0 0 324000031236 0 000000031236
IT1 031235 0 0 0 324000031236 0 000000031236
AT3 031235 0 0 0 000000031236 0 324000031236
AT6 031235 031236 0 0 000000031236 0 324000031236
FT1A 031235 031236 0 0 000000031236 0 000000031236
FT2 031235 031236 0 0 0 0 000000031236
FT2RQ 031235 031236 0 0 000000000017 0 000000031236
FT3 031235 031236 0 0 000000000017 0 000000031236
FT9 031236 031236 0 0 000000000017 0 000000031236
ET0 031236 031236 0 0 000000000017 0 000000031236
ST1A 031236 031236 0 0 000000000017 0 000000031236
ST9 031236 031236 0 0 000000000017 0 000000031236
*031236 MOVEI 11,000011
INITIAL
C(AC)=000000 000011
FINAL
C(AC)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 031236 031236 0 0 201440000011 0 000000000011
IT1 031236 0 0 0 201440000011 0 000000000011
AT3 031236 0 0 0 000000000011 0 201440000011
AT6 031236 000011 0 0 000000000011 0 201440000011
FT1A 031236 000011 0 0 000000000011 0 000000000011
FT9 031237 000011 0 0 000000000011 0 000000000011
ET0 031237 000011 0 0 000000000011 0 000000000011
ST1 031237 000011 0 0 000000000011 0 000000000011
ST2 031237 000011 0 0 000000000011 0 000000000011
ST9 031237 000011 0 0 000000000011 0 000000000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 69
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0264
*031237 CAIE 11,000000(11)
INITIAL
C(AC)=000000 000011
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031237 031237 0 0 302451000000 0 000000000011
IT1 031237 0 0 0 302451000000 0 000000000011
AT1 031237 0 0 0 0 0 302451000000
AT2 031237 0 0 0 000000000011 0 302451000000
AT3 031237 0 0 0 000000000011 0 000000000011
AT6 031237 000011 0 0 000000000011 0 000000000011
FT1A 031237 000011 0 0 000000000011 0 000000000011
FT2 031237 000011 0 0 0 0 000000000011
FT2RQ 031237 000011 0 0 000000000011 0 000000000011
FT3 031237 000011 0 0 000000000011 0 000000000011
FT9 031240 000011 0 0 000000000011 0 000000000011
ET0 031241 000011 0 0 0 0 000000000011
ST1A 031241 000011 0 0 0 0 000000000011
ST9 031241 000011 0 0 0 0 000000000011
*031241 JUMPA 0,031242
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031241 031241 0 0 324000031242 0 000000031242
IT1 031241 0 0 0 324000031242 0 000000031242
AT3 031241 0 0 0 000000031242 0 324000031242
AT6 031241 031242 0 0 000000031242 0 324000031242
FT1A 031241 031242 0 0 000000031242 0 000000031242
FT2 031241 031242 0 0 0 0 000000031242
FT2RQ 031241 031242 0 0 000000000017 0 000000031242
FT3 031241 031242 0 0 000000000017 0 000000031242
FT9 031242 031242 0 0 000000000017 0 000000031242
ET0 031242 031242 0 0 000000000017 0 000000031242
ST1A 031242 031242 0 0 000000000017 0 000000031242
ST9 031242 031242 0 0 000000000017 0 000000031242
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 70
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0265
*031242 MOVEI 12,000012
INITIAL
C(AC)=000000 000012
FINAL
C(AC)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 031242 031242 0 0 201500000012 0 000000000012
IT1 031242 0 0 0 201500000012 0 000000000012
AT3 031242 0 0 0 000000000012 0 201500000012
AT6 031242 000012 0 0 000000000012 0 201500000012
FT1A 031242 000012 0 0 000000000012 0 000000000012
FT9 031243 000012 0 0 000000000012 0 000000000012
ET0 031243 000012 0 0 000000000012 0 000000000012
ST1 031243 000012 0 0 000000000012 0 000000000012
ST2 031243 000012 0 0 000000000012 0 000000000012
ST9 031243 000012 0 0 000000000012 0 000000000012
*031243 CAIE 12,000000(12)
INITIAL
C(AC)=000000 000012
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031243 031243 0 0 302512000000 0 000000000012
IT1 031243 0 0 0 302512000000 0 000000000012
AT1 031243 0 0 0 0 0 302512000000
AT2 031243 0 0 0 000000000012 0 302512000000
AT3 031243 0 0 0 000000000012 0 000000000012
AT6 031243 000012 0 0 000000000012 0 000000000012
FT1A 031243 000012 0 0 000000000012 0 000000000012
FT2 031243 000012 0 0 0 0 000000000012
FT2RQ 031243 000012 0 0 000000000012 0 000000000012
FT3 031243 000012 0 0 000000000012 0 000000000012
FT9 031244 000012 0 0 000000000012 0 000000000012
ET0 031245 000012 0 0 0 0 000000000012
ST1A 031245 000012 0 0 0 0 000000000012
ST9 031245 000012 0 0 0 0 000000000012
*031245 JUMPA 0,031246
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031245 031245 0 0 324000031246 0 000000031246
IT1 031245 0 0 0 324000031246 0 000000031246
AT3 031245 0 0 0 000000031246 0 324000031246
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 71
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0266
AT6 031245 031246 0 0 000000031246 0 324000031246
FT1A 031245 031246 0 0 000000031246 0 000000031246
FT2 031245 031246 0 0 0 0 000000031246
FT2RQ 031245 031246 0 0 000000000017 0 000000031246
FT3 031245 031246 0 0 000000000017 0 000000031246
FT9 031246 031246 0 0 000000000017 0 000000031246
ET0 031246 031246 0 0 000000000017 0 000000031246
ST1A 031246 031246 0 0 000000000017 0 000000031246
ST9 031246 031246 0 0 000000000017 0 000000031246
*031246 MOVEI 13,000013
INITIAL
C(AC)=000000 000013
FINAL
C(AC)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 031246 031246 0 0 201540000013 0 000000000013
IT1 031246 0 0 0 201540000013 0 000000000013
AT3 031246 0 0 0 000000000013 0 201540000013
AT6 031246 000013 0 0 000000000013 0 201540000013
FT1A 031246 000013 0 0 000000000013 0 000000000013
FT9 031247 000013 0 0 000000000013 0 000000000013
ET0 031247 000013 0 0 000000000013 0 000000000013
ST1 031247 000013 0 0 000000000013 0 000000000013
ST2 031247 000013 0 0 000000000013 0 000000000013
ST9 031247 000013 0 0 000000000013 0 000000000013
*031247 CAIE 13,000000(13)
INITIAL
C(AC)=000000 000013
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031247 031247 0 0 302553000000 0 000000000013
IT1 031247 0 0 0 302553000000 0 000000000013
AT1 031247 0 0 0 0 0 302553000000
AT2 031247 0 0 0 000000000013 0 302553000000
AT3 031247 0 0 0 000000000013 0 000000000013
AT6 031247 000013 0 0 000000000013 0 000000000013
FT1A 031247 000013 0 0 000000000013 0 000000000013
FT2 031247 000013 0 0 0 0 000000000013
FT2RQ 031247 000013 0 0 000000000013 0 000000000013
FT3 031247 000013 0 0 000000000013 0 000000000013
FT9 031250 000013 0 0 000000000013 0 000000000013
ET0 031251 000013 0 0 0 0 000000000013
ST1A 031251 000013 0 0 0 0 000000000013
ST9 031251 000013 0 0 0 0 000000000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 72
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0267
*031251 JUMPA 0,031252
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031251 031251 0 0 324000031252 0 000000031252
IT1 031251 0 0 0 324000031252 0 000000031252
AT3 031251 0 0 0 000000031252 0 324000031252
AT6 031251 031252 0 0 000000031252 0 324000031252
FT1A 031251 031252 0 0 000000031252 0 000000031252
FT2 031251 031252 0 0 0 0 000000031252
FT2RQ 031251 031252 0 0 000000000017 0 000000031252
FT3 031251 031252 0 0 000000000017 0 000000031252
FT9 031252 031252 0 0 000000000017 0 000000031252
ET0 031252 031252 0 0 000000000017 0 000000031252
ST1A 031252 031252 0 0 000000000017 0 000000031252
ST9 031252 031252 0 0 000000000017 0 000000031252
*031252 MOVEI 14,000014
INITIAL
C(AC)=000000 000014
FINAL
C(AC)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 031252 031252 0 0 201600000014 0 000000000014
IT1 031252 0 0 0 201600000014 0 000000000014
AT3 031252 0 0 0 000000000014 0 201600000014
AT6 031252 000014 0 0 000000000014 0 201600000014
FT1A 031252 000014 0 0 000000000014 0 000000000014
FT9 031253 000014 0 0 000000000014 0 000000000014
ET0 031253 000014 0 0 000000000014 0 000000000014
ST1 031253 000014 0 0 000000000014 0 000000000014
ST2 031253 000014 0 0 000000000014 0 000000000014
ST9 031253 000014 0 0 000000000014 0 000000000014
*031253 CAIE 14,000000(14)
INITIAL
C(AC)=000000 000014
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031253 031253 0 0 302614000000 0 000000000014
IT1 031253 0 0 0 302614000000 0 000000000014
AT1 031253 0 0 0 0 0 302614000000
AT2 031253 0 0 0 000000000014 0 302614000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 73
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0268
AT3 031253 0 0 0 000000000014 0 000000000014
AT6 031253 000014 0 0 000000000014 0 000000000014
FT1A 031253 000014 0 0 000000000014 0 000000000014
FT2 031253 000014 0 0 0 0 000000000014
FT2RQ 031253 000014 0 0 000000000014 0 000000000014
FT3 031253 000014 0 0 000000000014 0 000000000014
FT9 031254 000014 0 0 000000000014 0 000000000014
ET0 031255 000014 0 0 0 0 000000000014
ST1A 031255 000014 0 0 0 0 000000000014
ST9 031255 000014 0 0 0 0 000000000014
*031255 JUMPA 0,031256
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031255 031255 0 0 324000031256 0 000000031256
IT1 031255 0 0 0 324000031256 0 000000031256
AT3 031255 0 0 0 000000031256 0 324000031256
AT6 031255 031256 0 0 000000031256 0 324000031256
FT1A 031255 031256 0 0 000000031256 0 000000031256
FT2 031255 031256 0 0 0 0 000000031256
FT2RQ 031255 031256 0 0 000000000017 0 000000031256
FT3 031255 031256 0 0 000000000017 0 000000031256
FT9 031256 031256 0 0 000000000017 0 000000031256
ET0 031256 031256 0 0 000000000017 0 000000031256
ST1A 031256 031256 0 0 000000000017 0 000000031256
ST9 031256 031256 0 0 000000000017 0 000000031256
*031256 MOVEI 15,000015
INITIAL
C(AC)=000000 000015
FINAL
C(AC)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 031256 031256 0 0 201640000015 0 000000000015
IT1 031256 0 0 0 201640000015 0 000000000015
AT3 031256 0 0 0 000000000015 0 201640000015
AT6 031256 000015 0 0 000000000015 0 201640000015
FT1A 031256 000015 0 0 000000000015 0 000000000015
FT9 031257 000015 0 0 000000000015 0 000000000015
ET0 031257 000015 0 0 000000000015 0 000000000015
ST1 031257 000015 0 0 000000000015 0 000000000015
ST2 031257 000015 0 0 000000000015 0 000000000015
ST9 031257 000015 0 0 000000000015 0 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 74
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0269
*031257 CAIE 15,000000(15)
INITIAL
C(AC)=000000 000015
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031257 031257 0 0 302655000000 0 000000000015
IT1 031257 0 0 0 302655000000 0 000000000015
AT1 031257 0 0 0 0 0 302655000000
AT2 031257 0 0 0 000000000015 0 302655000000
AT3 031257 0 0 0 000000000015 0 000000000015
AT6 031257 000015 0 0 000000000015 0 000000000015
FT1A 031257 000015 0 0 000000000015 0 000000000015
FT2 031257 000015 0 0 0 0 000000000015
FT2RQ 031257 000015 0 0 000000000015 0 000000000015
FT3 031257 000015 0 0 000000000015 0 000000000015
FT9 031260 000015 0 0 000000000015 0 000000000015
ET0 031261 000015 0 0 0 0 000000000015
ST1A 031261 000015 0 0 0 0 000000000015
ST9 031261 000015 0 0 0 0 000000000015
*031261 JUMPA 0,031262
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031261 031261 0 0 324000031262 0 000000031262
IT1 031261 0 0 0 324000031262 0 000000031262
AT3 031261 0 0 0 000000031262 0 324000031262
AT6 031261 031262 0 0 000000031262 0 324000031262
FT1A 031261 031262 0 0 000000031262 0 000000031262
FT2 031261 031262 0 0 0 0 000000031262
FT2RQ 031261 031262 0 0 000000000017 0 000000031262
FT3 031261 031262 0 0 000000000017 0 000000031262
FT9 031262 031262 0 0 000000000017 0 000000031262
ET0 031262 031262 0 0 000000000017 0 000000031262
ST1A 031262 031262 0 0 000000000017 0 000000031262
ST9 031262 031262 0 0 000000000017 0 000000031262
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 75
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0270
*031262 MOVEI 16,000016
INITIAL
C(AC)=000000 000016
FINAL
C(AC)=000000 000016
TIME PC MA SC FE AR MQ BR
IT0 031262 031262 0 0 201700000016 0 000000000016
IT1 031262 0 0 0 201700000016 0 000000000016
AT3 031262 0 0 0 000000000016 0 201700000016
AT6 031262 000016 0 0 000000000016 0 201700000016
FT1A 031262 000016 0 0 000000000016 0 000000000016
FT9 031263 000016 0 0 000000000016 0 000000000016
ET0 031263 000016 0 0 000000000016 0 000000000016
ST1 031263 000016 0 0 000000000016 0 000000000016
ST2 031263 000016 0 0 000000000016 0 000000000016
ST9 031263 000016 0 0 000000000016 0 000000000016
*031263 CAIE 16,000000(16)
INITIAL
C(AC)=000000 000016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031263 031263 0 0 302716000000 0 000000000016
IT1 031263 0 0 0 302716000000 0 000000000016
AT1 031263 0 0 0 0 0 302716000000
AT2 031263 0 0 0 000000000016 0 302716000000
AT3 031263 0 0 0 000000000016 0 000000000016
AT6 031263 000016 0 0 000000000016 0 000000000016
FT1A 031263 000016 0 0 000000000016 0 000000000016
FT2 031263 000016 0 0 0 0 000000000016
FT2RQ 031263 000016 0 0 000000000016 0 000000000016
FT3 031263 000016 0 0 000000000016 0 000000000016
FT9 031264 000016 0 0 000000000016 0 000000000016
ET0 031265 000016 0 0 0 0 000000000016
ST1A 031265 000016 0 0 0 0 000000000016
ST9 031265 000016 0 0 0 0 000000000016
*031265 JUMPA 0,031266
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031265 031265 0 0 324000031266 0 000000031266
IT1 031265 0 0 0 324000031266 0 000000031266
AT3 031265 0 0 0 000000031266 0 324000031266
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 76
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0271
AT6 031265 031266 0 0 000000031266 0 324000031266
FT1A 031265 031266 0 0 000000031266 0 000000031266
FT2 031265 031266 0 0 0 0 000000031266
FT2RQ 031265 031266 0 0 000000000017 0 000000031266
FT3 031265 031266 0 0 000000000017 0 000000031266
FT9 031266 031266 0 0 000000000017 0 000000031266
ET0 031266 031266 0 0 000000000017 0 000000031266
ST1A 031266 031266 0 0 000000000017 0 000000031266
ST9 031266 031266 0 0 000000000017 0 000000031266
*031266 MOVEI 17,000017
INITIAL
C(AC)=000000 000017
FINAL
C(AC)=000000 000017
TIME PC MA SC FE AR MQ BR
IT0 031266 031266 0 0 201740000017 0 000000000017
IT1 031266 0 0 0 201740000017 0 000000000017
AT3 031266 0 0 0 000000000017 0 201740000017
AT6 031266 000017 0 0 000000000017 0 201740000017
FT1A 031266 000017 0 0 000000000017 0 000000000017
FT9 031267 000017 0 0 000000000017 0 000000000017
ET0 031267 000017 0 0 000000000017 0 000000000017
ST1 031267 000017 0 0 000000000017 0 000000000017
ST2 031267 000017 0 0 000000000017 0 000000000017
ST9 031267 000017 0 0 000000000017 0 000000000017
*031267 CAIE 17,000000(17)
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031267 031267 0 0 302757000000 0 000000000017
IT1 031267 0 0 0 302757000000 0 000000000017
AT1 031267 0 0 0 0 0 302757000000
AT2 031267 0 0 0 000000000017 0 302757000000
AT3 031267 0 0 0 000000000017 0 000000000017
AT6 031267 000017 0 0 000000000017 0 000000000017
FT1A 031267 000017 0 0 000000000017 0 000000000017
FT2 031267 000017 0 0 0 0 000000000017
FT2RQ 031267 000017 0 0 000000000017 0 000000000017
FT3 031267 000017 0 0 000000000017 0 000000000017
FT9 031270 000017 0 0 000000000017 0 000000000017
ET0 031271 000017 0 0 0 0 000000000017
ST1A 031271 000017 0 0 0 0 000000000017
ST9 031271 000017 0 0 0 0 000000000017
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 77
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0272
*031271 JUMPA 0,031272
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031271 031271 0 0 324000031272 0 000000031272
IT1 031271 0 0 0 324000031272 0 000000031272
AT3 031271 0 0 0 000000031272 0 324000031272
AT6 031271 031272 0 0 000000031272 0 324000031272
FT1A 031271 031272 0 0 000000031272 0 000000031272
FT2 031271 031272 0 0 0 0 000000031272
FT2RQ 031271 031272 0 0 000000000017 0 000000031272
FT3 031271 031272 0 0 000000000017 0 000000031272
FT9 031272 031272 0 0 000000000017 0 000000031272
ET0 031272 031272 0 0 000000000017 0 000000031272
ST1A 031272 031272 0 0 000000000017 0 000000031272
ST9 031272 031272 0 0 000000000017 0 000000031272
*031272 MOVEI 1,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031272 031272 0 0 201040000001 0 000000000001
IT1 031272 0 0 0 201040000001 0 000000000001
AT3 031272 0 0 0 000000000001 0 201040000001
AT6 031272 000001 0 0 000000000001 0 201040000001
FT1A 031272 000001 0 0 000000000001 0 000000000001
FT9 031273 000001 0 0 000000000001 0 000000000001
ET0 031273 000001 0 0 000000000001 0 000000000001
ST1 031273 000001 0 0 000000000001 0 000000000001
ST2 031273 000001 0 0 000000000001 0 000000000001
ST9 031273 000001 0 0 000000000001 0 000000000001
*031273 HRLI 1,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 031273 031273 0 0 505040000001 0 000000000001
IT1 031273 0 0 0 505040000001 0 000000000001
AT3 031273 0 0 0 000000000001 0 505040000001
AT6 031273 000001 0 0 000000000001 0 505040000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 78
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0273
FT1A 031273 000001 0 0 000000000001 0 000000000001
FT2 031273 000001 0 0 0 0 000000000001
FT2RQ 031273 000001 0 0 000000000001 0 000000000001
FT3 031273 000001 0 0 000000000001 0 000000000001
FT9 031274 000001 0 0 000000000001 0 000000000001
ET0 031274 000001 0 0 000000000001 0 000000000001
ET1 031274 000001 0 0 000001000001 0 000000000001
ST1 031274 000001 0 0 000001000001 0 000000000001
ST2 031274 000001 0 0 000001000001 0 000000000001
ST9 031274 000001 0 0 000001000001 0 000000000001
*031274 CAME 1,000000(1)
INITIAL
C(AC)=000001 000001
C(E)=000001 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031274 031274 0 0 312041000000 0 000001000001
IT1 031274 0 0 0 312041000000 0 000001000001
AT1 031274 0 0 0 0 0 312041000000
AT2 031274 0 0 0 000001000001 0 312041000000
AT3 031274 0 0 0 000000000001 0 000001000001
AT6 031274 000001 0 0 000000000001 0 000001000001
FT0 031274 000001 0 0 000001000001 0 000001000001
FT1A 031274 000001 0 0 000001000001 0 000001000001
FT2 031274 000001 0 0 0 0 000001000001
FT2RQ 031274 000001 0 0 000001000001 0 000001000001
FT3 031274 000001 0 0 000001000001 0 000001000001
FT9 031275 000001 0 0 000001000001 0 000001000001
ET0 031276 000001 0 0 0 0 000001000001
ST1A 031276 000001 0 0 0 0 000001000001
ST9 031276 000001 0 0 0 0 000001000001
*031276 JUMPA 0,031277
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031276 031276 0 0 324000031277 0 000000031277
IT1 031276 0 0 0 324000031277 0 000000031277
AT3 031276 0 0 0 000000031277 0 324000031277
AT6 031276 031277 0 0 000000031277 0 324000031277
FT1A 031276 031277 0 0 000000031277 0 000000031277
FT2 031276 031277 0 0 0 0 000000031277
FT2RQ 031276 031277 0 0 000000000017 0 000000031277
FT3 031276 031277 0 0 000000000017 0 000000031277
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 79
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0274
FT9 031277 031277 0 0 000000000017 0 000000031277
ET0 031277 031277 0 0 000000000017 0 000000031277
ST1A 031277 031277 0 0 000000000017 0 000000031277
ST9 031277 031277 0 0 000000000017 0 000000031277
*031277 MOVEI 2,000002
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031277 031277 0 0 201100000002 0 000000000002
IT1 031277 0 0 0 201100000002 0 000000000002
AT3 031277 0 0 0 000000000002 0 201100000002
AT6 031277 000002 0 0 000000000002 0 201100000002
FT1A 031277 000002 0 0 000000000002 0 000000000002
FT9 0 000002 0 0 000000000002 0 000000000002
ET0 0 000002 0 0 000000000002 0 000000000002
ST1 0 000002 0 0 000000000002 0 000000000002
ST2 0 000002 0 0 000000000002 0 000000000002
ST9 0 000002 0 0 000000000002 0 000000000002
*031300 HRLI 2,000002
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000002 000002
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 505100000002 0 000000000002
IT1 0 0 0 0 505100000002 0 000000000002
AT3 0 0 0 0 000000000002 0 505100000002
AT6 0 000002 0 0 000000000002 0 505100000002
FT1A 0 000002 0 0 000000000002 0 000000000002
FT2 0 000002 0 0 0 0 000000000002
FT2RQ 0 000002 0 0 000000000002 0 000000000002
FT3 0 000002 0 0 000000000002 0 000000000002
FT9 031301 000002 0 0 000000000002 0 000000000002
ET0 031301 000002 0 0 000000000002 0 000000000002
ET1 031301 000002 0 0 000002000002 0 000000000002
ST1 031301 000002 0 0 000002000002 0 000000000002
ST2 031301 000002 0 0 000002000002 0 000000000002
ST9 031301 000002 0 0 000002000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 80
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0275
*031301 CAME 2,000000(2)
INITIAL
C(AC)=000002 000002
C(E)=000002 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031301 031301 0 0 312102000000 0 000002000002
IT1 031301 0 0 0 312102000000 0 000002000002
AT1 031301 0 0 0 0 0 312102000000
AT2 031301 0 0 0 000002000002 0 312102000000
AT3 031301 0 0 0 000000000002 0 000002000002
AT6 031301 000002 0 0 000000000002 0 000002000002
FT0 031301 000002 0 0 000002000002 0 000002000002
FT1A 031301 000002 0 0 000002000002 0 000002000002
FT2 031301 000002 0 0 0 0 000002000002
FT2RQ 031301 000002 0 0 000002000002 0 000002000002
FT3 031301 000002 0 0 000002000002 0 000002000002
FT9 031302 000002 0 0 000002000002 0 000002000002
ET0 031303 000002 0 0 0 0 000002000002
ST1A 031303 000002 0 0 0 0 000002000002
ST9 031303 000002 0 0 0 0 000002000002
*031303 JUMPA 0,031304
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031303 031303 0 0 324000031304 0 000000031304
IT1 031303 0 0 0 324000031304 0 000000031304
AT3 031303 0 0 0 000000031304 0 324000031304
AT6 031303 031304 0 0 000000031304 0 324000031304
FT1A 031303 031304 0 0 000000031304 0 000000031304
FT2 031303 031304 0 0 0 0 000000031304
FT2RQ 031303 031304 0 0 000000000017 0 000000031304
FT3 031303 031304 0 0 000000000017 0 000000031304
FT9 031304 031304 0 0 000000000017 0 000000031304
ET0 031304 031304 0 0 000000000017 0 000000031304
ST1A 031304 031304 0 0 000000000017 0 000000031304
ST9 031304 031304 0 0 000000000017 0 000000031304
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 81
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0276
*031304 MOVEI 3,000003
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031304 031304 0 0 201140000003 0 000000000003
IT1 031304 0 0 0 201140000003 0 000000000003
AT3 031304 0 0 0 000000000003 0 201140000003
AT6 031304 000003 0 0 000000000003 0 201140000003
FT1A 031304 000003 0 0 000000000003 0 000000000003
FT9 031305 000003 0 0 000000000003 0 000000000003
ET0 031305 000003 0 0 000000000003 0 000000000003
ST1 031305 000003 0 0 000000000003 0 000000000003
ST2 031305 000003 0 0 000000000003 0 000000000003
ST9 031305 000003 0 0 000000000003 0 000000000003
*031305 HRLI 3,000003
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000003 000003
TIME PC MA SC FE AR MQ BR
IT0 031305 031305 0 0 505140000003 0 000000000003
IT1 031305 0 0 0 505140000003 0 000000000003
AT3 031305 0 0 0 000000000003 0 505140000003
AT6 031305 000003 0 0 000000000003 0 505140000003
FT1A 031305 000003 0 0 000000000003 0 000000000003
FT2 031305 000003 0 0 0 0 000000000003
FT2RQ 031305 000003 0 0 000000000003 0 000000000003
FT3 031305 000003 0 0 000000000003 0 000000000003
FT9 031306 000003 0 0 000000000003 0 000000000003
ET0 031306 000003 0 0 000000000003 0 000000000003
ET1 031306 000003 0 0 000003000003 0 000000000003
ST1 031306 000003 0 0 000003000003 0 000000000003
ST2 031306 000003 0 0 000003000003 0 000000000003
ST9 031306 000003 0 0 000003000003 0 000000000003
*031306 CAME 3,000000(3)
INITIAL
C(AC)=000003 000003
C(E)=000003 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031306 031306 0 0 312143000000 0 000003000003
IT1 031306 0 0 0 312143000000 0 000003000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 82
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0277
AT1 031306 0 0 0 0 0 312143000000
AT2 031306 0 0 0 000003000003 0 312143000000
AT3 031306 0 0 0 000000000003 0 000003000003
AT6 031306 000003 0 0 000000000003 0 000003000003
FT0 031306 000003 0 0 000003000003 0 000003000003
FT1A 031306 000003 0 0 000003000003 0 000003000003
FT2 031306 000003 0 0 0 0 000003000003
FT2RQ 031306 000003 0 0 000003000003 0 000003000003
FT3 031306 000003 0 0 000003000003 0 000003000003
FT9 031307 000003 0 0 000003000003 0 000003000003
ET0 031310 000003 0 0 0 0 000003000003
ST1A 031310 000003 0 0 0 0 000003000003
ST9 031310 000003 0 0 0 0 000003000003
*031310 JUMPA 0,031311
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031310 031310 0 0 324000031311 0 000000031311
IT1 031310 0 0 0 324000031311 0 000000031311
AT3 031310 0 0 0 000000031311 0 324000031311
AT6 031310 031311 0 0 000000031311 0 324000031311
FT1A 031310 031311 0 0 000000031311 0 000000031311
FT2 031310 031311 0 0 0 0 000000031311
FT2RQ 031310 031311 0 0 000000000017 0 000000031311
FT3 031310 031311 0 0 000000000017 0 000000031311
FT9 031311 031311 0 0 000000000017 0 000000031311
ET0 031311 031311 0 0 000000000017 0 000000031311
ST1A 031311 031311 0 0 000000000017 0 000000031311
ST9 031311 031311 0 0 000000000017 0 000000031311
*031311 MOVEI 4,000004
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031311 031311 0 0 201200000004 0 000000000004
IT1 031311 0 0 0 201200000004 0 000000000004
AT3 031311 0 0 0 000000000004 0 201200000004
AT6 031311 000004 0 0 000000000004 0 201200000004
FT1A 031311 000004 0 0 000000000004 0 000000000004
FT9 031312 000004 0 0 000000000004 0 000000000004
ET0 031312 000004 0 0 000000000004 0 000000000004
ST1 031312 000004 0 0 000000000004 0 000000000004
ST2 031312 000004 0 0 000000000004 0 000000000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 83
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0278
ST9 031312 000004 0 0 000000000004 0 000000000004
*031312 HRLI 4,000004
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000004 000004
TIME PC MA SC FE AR MQ BR
IT0 031312 031312 0 0 505200000004 0 000000000004
IT1 031312 0 0 0 505200000004 0 000000000004
AT3 031312 0 0 0 000000000004 0 505200000004
AT6 031312 000004 0 0 000000000004 0 505200000004
FT1A 031312 000004 0 0 000000000004 0 000000000004
FT2 031312 000004 0 0 0 0 000000000004
FT2RQ 031312 000004 0 0 000000000004 0 000000000004
FT3 031312 000004 0 0 000000000004 0 000000000004
FT9 031313 000004 0 0 000000000004 0 000000000004
ET0 031313 000004 0 0 000000000004 0 000000000004
ET1 031313 000004 0 0 000004000004 0 000000000004
ST1 031313 000004 0 0 000004000004 0 000000000004
ST2 031313 000004 0 0 000004000004 0 000000000004
ST9 031313 000004 0 0 000004000004 0 000000000004
*031313 CAME 4,000000(4)
INITIAL
C(AC)=000004 000004
C(E)=000004 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031313 031313 0 0 312204000000 0 000004000004
IT1 031313 0 0 0 312204000000 0 000004000004
AT1 031313 0 0 0 0 0 312204000000
AT2 031313 0 0 0 000004000004 0 312204000000
AT3 031313 0 0 0 000000000004 0 000004000004
AT6 031313 000004 0 0 000000000004 0 000004000004
FT0 031313 000004 0 0 000004000004 0 000004000004
FT1A 031313 000004 0 0 000004000004 0 000004000004
FT2 031313 000004 0 0 0 0 000004000004
FT2RQ 031313 000004 0 0 000004000004 0 000004000004
FT3 031313 000004 0 0 000004000004 0 000004000004
FT9 031314 000004 0 0 000004000004 0 000004000004
ET0 031315 000004 0 0 0 0 000004000004
ST1A 031315 000004 0 0 0 0 000004000004
ST9 031315 000004 0 0 0 0 000004000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 84
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0279
*031315 JUMPA 0,031316
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031315 031315 0 0 324000031316 0 000000031316
IT1 031315 0 0 0 324000031316 0 000000031316
AT3 031315 0 0 0 000000031316 0 324000031316
AT6 031315 031316 0 0 000000031316 0 324000031316
FT1A 031315 031316 0 0 000000031316 0 000000031316
FT2 031315 031316 0 0 0 0 000000031316
FT2RQ 031315 031316 0 0 000000000017 0 000000031316
FT3 031315 031316 0 0 000000000017 0 000000031316
FT9 031316 031316 0 0 000000000017 0 000000031316
ET0 031316 031316 0 0 000000000017 0 000000031316
ST1A 031316 031316 0 0 000000000017 0 000000031316
ST9 031316 031316 0 0 000000000017 0 000000031316
*031316 MOVEI 5,000005
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 031316 031316 0 0 201240000005 0 000000000005
IT1 031316 0 0 0 201240000005 0 000000000005
AT3 031316 0 0 0 000000000005 0 201240000005
AT6 031316 000005 0 0 000000000005 0 201240000005
FT1A 031316 000005 0 0 000000000005 0 000000000005
FT9 031317 000005 0 0 000000000005 0 000000000005
ET0 031317 000005 0 0 000000000005 0 000000000005
ST1 031317 000005 0 0 000000000005 0 000000000005
ST2 031317 000005 0 0 000000000005 0 000000000005
ST9 031317 000005 0 0 000000000005 0 000000000005
*031317 HRLI 5,000005
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000005 000005
TIME PC MA SC FE AR MQ BR
IT0 031317 031317 0 0 505240000005 0 000000000005
IT1 031317 0 0 0 505240000005 0 000000000005
AT3 031317 0 0 0 000000000005 0 505240000005
AT6 031317 000005 0 0 000000000005 0 505240000005
FT1A 031317 000005 0 0 000000000005 0 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 85
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0280
FT2 031317 000005 0 0 0 0 000000000005
FT2RQ 031317 000005 0 0 000000000005 0 000000000005
FT3 031317 000005 0 0 000000000005 0 000000000005
FT9 031320 000005 0 0 000000000005 0 000000000005
ET0 031320 000005 0 0 000000000005 0 000000000005
ET1 031320 000005 0 0 000005000005 0 000000000005
ST1 031320 000005 0 0 000005000005 0 000000000005
ST2 031320 000005 0 0 000005000005 0 000000000005
ST9 031320 000005 0 0 000005000005 0 000000000005
*031320 CAME 5,000000(5)
INITIAL
C(AC)=000005 000005
C(E)=000005 000005
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031320 031320 0 0 312245000000 0 000005000005
IT1 031320 0 0 0 312245000000 0 000005000005
AT1 031320 0 0 0 0 0 312245000000
AT2 031320 0 0 0 000005000005 0 312245000000
AT3 031320 0 0 0 000000000005 0 000005000005
AT6 031320 000005 0 0 000000000005 0 000005000005
FT0 031320 000005 0 0 000005000005 0 000005000005
FT1A 031320 000005 0 0 000005000005 0 000005000005
FT2 031320 000005 0 0 0 0 000005000005
FT2RQ 031320 000005 0 0 000005000005 0 000005000005
FT3 031320 000005 0 0 000005000005 0 000005000005
FT9 031321 000005 0 0 000005000005 0 000005000005
ET0 031322 000005 0 0 0 0 000005000005
ST1A 031322 000005 0 0 0 0 000005000005
ST9 031322 000005 0 0 0 0 000005000005
*031322 JUMPA 0,031323
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031322 031322 0 0 324000031323 0 000000031323
IT1 031322 0 0 0 324000031323 0 000000031323
AT3 031322 0 0 0 000000031323 0 324000031323
AT6 031322 031323 0 0 000000031323 0 324000031323
FT1A 031322 031323 0 0 000000031323 0 000000031323
FT2 031322 031323 0 0 0 0 000000031323
FT2RQ 031322 031323 0 0 000000000017 0 000000031323
FT3 031322 031323 0 0 000000000017 0 000000031323
FT9 031323 031323 0 0 000000000017 0 000000031323
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 86
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0281
ET0 031323 031323 0 0 000000000017 0 000000031323
ST1A 031323 031323 0 0 000000000017 0 000000031323
ST9 031323 031323 0 0 000000000017 0 000000031323
*031323 MOVEI 6,000006
INITIAL
C(AC)=000000 000006
FINAL
C(AC)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 031323 031323 0 0 201300000006 0 000000000006
IT1 031323 0 0 0 201300000006 0 000000000006
AT3 031323 0 0 0 000000000006 0 201300000006
AT6 031323 000006 0 0 000000000006 0 201300000006
FT1A 031323 000006 0 0 000000000006 0 000000000006
FT9 031324 000006 0 0 000000000006 0 000000000006
ET0 031324 000006 0 0 000000000006 0 000000000006
ST1 031324 000006 0 0 000000000006 0 000000000006
ST2 031324 000006 0 0 000000000006 0 000000000006
ST9 031324 000006 0 0 000000000006 0 000000000006
*031324 HRLI 6,000006
INITIAL
C(AC)=000000 000006
FINAL
C(AC)=000006 000006
TIME PC MA SC FE AR MQ BR
IT0 031324 031324 0 0 505300000006 0 000000000006
IT1 031324 0 0 0 505300000006 0 000000000006
AT3 031324 0 0 0 000000000006 0 505300000006
AT6 031324 000006 0 0 000000000006 0 505300000006
FT1A 031324 000006 0 0 000000000006 0 000000000006
FT2 031324 000006 0 0 0 0 000000000006
FT2RQ 031324 000006 0 0 000000000006 0 000000000006
FT3 031324 000006 0 0 000000000006 0 000000000006
FT9 031325 000006 0 0 000000000006 0 000000000006
ET0 031325 000006 0 0 000000000006 0 000000000006
ET1 031325 000006 0 0 000006000006 0 000000000006
ST1 031325 000006 0 0 000006000006 0 000000000006
ST2 031325 000006 0 0 000006000006 0 000000000006
ST9 031325 000006 0 0 000006000006 0 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 87
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0282
*031325 CAME 6,000000(6)
INITIAL
C(AC)=000006 000006
C(E)=000006 000006
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031325 031325 0 0 312306000000 0 000006000006
IT1 031325 0 0 0 312306000000 0 000006000006
AT1 031325 0 0 0 0 0 312306000000
AT2 031325 0 0 0 000006000006 0 312306000000
AT3 031325 0 0 0 000000000006 0 000006000006
AT6 031325 000006 0 0 000000000006 0 000006000006
FT0 031325 000006 0 0 000006000006 0 000006000006
FT1A 031325 000006 0 0 000006000006 0 000006000006
FT2 031325 000006 0 0 0 0 000006000006
FT2RQ 031325 000006 0 0 000006000006 0 000006000006
FT3 031325 000006 0 0 000006000006 0 000006000006
FT9 031326 000006 0 0 000006000006 0 000006000006
ET0 031327 000006 0 0 0 0 000006000006
ST1A 031327 000006 0 0 0 0 000006000006
ST9 031327 000006 0 0 0 0 000006000006
*031327 JUMPA 0,031330
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031327 031327 0 0 324000031330 0 000000031330
IT1 031327 0 0 0 324000031330 0 000000031330
AT3 031327 0 0 0 000000031330 0 324000031330
AT6 031327 031330 0 0 000000031330 0 324000031330
FT1A 031327 031330 0 0 000000031330 0 000000031330
FT2 031327 031330 0 0 0 0 000000031330
FT2RQ 031327 031330 0 0 000000000017 0 000000031330
FT3 031327 031330 0 0 000000000017 0 000000031330
FT9 031330 031330 0 0 000000000017 0 000000031330
ET0 031330 031330 0 0 000000000017 0 000000031330
ST1A 031330 031330 0 0 000000000017 0 000000031330
ST9 031330 031330 0 0 000000000017 0 000000031330
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 88
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0283
*031330 MOVEI 7,000007
INITIAL
C(AC)=000000 000007
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 031330 031330 0 0 201340000007 0 000000000007
IT1 031330 0 0 0 201340000007 0 000000000007
AT3 031330 0 0 0 000000000007 0 201340000007
AT6 031330 000007 0 0 000000000007 0 201340000007
FT1A 031330 000007 0 0 000000000007 0 000000000007
FT9 031331 000007 0 0 000000000007 0 000000000007
ET0 031331 000007 0 0 000000000007 0 000000000007
ST1 031331 000007 0 0 000000000007 0 000000000007
ST2 031331 000007 0 0 000000000007 0 000000000007
ST9 031331 000007 0 0 000000000007 0 000000000007
*031331 HRLI 7,000007
INITIAL
C(AC)=000000 000007
FINAL
C(AC)=000007 000007
TIME PC MA SC FE AR MQ BR
IT0 031331 031331 0 0 505340000007 0 000000000007
IT1 031331 0 0 0 505340000007 0 000000000007
AT3 031331 0 0 0 000000000007 0 505340000007
AT6 031331 000007 0 0 000000000007 0 505340000007
FT1A 031331 000007 0 0 000000000007 0 000000000007
FT2 031331 000007 0 0 0 0 000000000007
FT2RQ 031331 000007 0 0 000000000007 0 000000000007
FT3 031331 000007 0 0 000000000007 0 000000000007
FT9 031332 000007 0 0 000000000007 0 000000000007
ET0 031332 000007 0 0 000000000007 0 000000000007
ET1 031332 000007 0 0 000007000007 0 000000000007
ST1 031332 000007 0 0 000007000007 0 000000000007
ST2 031332 000007 0 0 000007000007 0 000000000007
ST9 031332 000007 0 0 000007000007 0 000000000007
*031332 CAME 7,000000(7)
INITIAL
C(AC)=000007 000007
C(E)=000007 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031332 031332 0 0 312347000000 0 000007000007
IT1 031332 0 0 0 312347000000 0 000007000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 89
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0284
AT1 031332 0 0 0 0 0 312347000000
AT2 031332 0 0 0 000007000007 0 312347000000
AT3 031332 0 0 0 000000000007 0 000007000007
AT6 031332 000007 0 0 000000000007 0 000007000007
FT0 031332 000007 0 0 000007000007 0 000007000007
FT1A 031332 000007 0 0 000007000007 0 000007000007
FT2 031332 000007 0 0 0 0 000007000007
FT2RQ 031332 000007 0 0 000007000007 0 000007000007
FT3 031332 000007 0 0 000007000007 0 000007000007
FT9 031333 000007 0 0 000007000007 0 000007000007
ET0 031334 000007 0 0 0 0 000007000007
ST1A 031334 000007 0 0 0 0 000007000007
ST9 031334 000007 0 0 0 0 000007000007
*031334 JUMPA 0,031335
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031334 031334 0 0 324000031335 0 000000031335
IT1 031334 0 0 0 324000031335 0 000000031335
AT3 031334 0 0 0 000000031335 0 324000031335
AT6 031334 031335 0 0 000000031335 0 324000031335
FT1A 031334 031335 0 0 000000031335 0 000000031335
FT2 031334 031335 0 0 0 0 000000031335
FT2RQ 031334 031335 0 0 000000000017 0 000000031335
FT3 031334 031335 0 0 000000000017 0 000000031335
FT9 031335 031335 0 0 000000000017 0 000000031335
ET0 031335 031335 0 0 000000000017 0 000000031335
ST1A 031335 031335 0 0 000000000017 0 000000031335
ST9 031335 031335 0 0 000000000017 0 000000031335
*031335 MOVEI 10,000010
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 031335 031335 0 0 201400000010 0 000000000010
IT1 031335 0 0 0 201400000010 0 000000000010
AT3 031335 0 0 0 000000000010 0 201400000010
AT6 031335 000010 0 0 000000000010 0 201400000010
FT1A 031335 000010 0 0 000000000010 0 000000000010
FT9 031336 000010 0 0 000000000010 0 000000000010
ET0 031336 000010 0 0 000000000010 0 000000000010
ST1 031336 000010 0 0 000000000010 0 000000000010
ST2 031336 000010 0 0 000000000010 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 90
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0285
ST9 031336 000010 0 0 000000000010 0 000000000010
*031336 HRLI 10,000010
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000010 000010
TIME PC MA SC FE AR MQ BR
IT0 031336 031336 0 0 505400000010 0 000000000010
IT1 031336 0 0 0 505400000010 0 000000000010
AT3 031336 0 0 0 000000000010 0 505400000010
AT6 031336 000010 0 0 000000000010 0 505400000010
FT1A 031336 000010 0 0 000000000010 0 000000000010
FT2 031336 000010 0 0 0 0 000000000010
FT2RQ 031336 000010 0 0 000000000010 0 000000000010
FT3 031336 000010 0 0 000000000010 0 000000000010
FT9 031337 000010 0 0 000000000010 0 000000000010
ET0 031337 000010 0 0 000000000010 0 000000000010
ET1 031337 000010 0 0 000010000010 0 000000000010
ST1 031337 000010 0 0 000010000010 0 000000000010
ST2 031337 000010 0 0 000010000010 0 000000000010
ST9 031337 000010 0 0 000010000010 0 000000000010
*031337 CAME 10,000000(10)
INITIAL
C(AC)=000010 000010
C(E)=000010 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031337 031337 0 0 312410000000 0 000010000010
IT1 031337 0 0 0 312410000000 0 000010000010
AT1 031337 0 0 0 0 0 312410000000
AT2 031337 0 0 0 000010000010 0 312410000000
AT3 031337 0 0 0 000000000010 0 000010000010
AT6 031337 000010 0 0 000000000010 0 000010000010
FT0 031337 000010 0 0 000010000010 0 000010000010
FT1A 031337 000010 0 0 000010000010 0 000010000010
FT2 031337 000010 0 0 0 0 000010000010
FT2RQ 031337 000010 0 0 000010000010 0 000010000010
FT3 031337 000010 0 0 000010000010 0 000010000010
FT9 031340 000010 0 0 000010000010 0 000010000010
ET0 031341 000010 0 0 0 0 000010000010
ST1A 031341 000010 0 0 0 0 000010000010
ST9 031341 000010 0 0 0 0 000010000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 91
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0286
*031341 JUMPA 0,031342
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031341 031341 0 0 324000031342 0 000000031342
IT1 031341 0 0 0 324000031342 0 000000031342
AT3 031341 0 0 0 000000031342 0 324000031342
AT6 031341 031342 0 0 000000031342 0 324000031342
FT1A 031341 031342 0 0 000000031342 0 000000031342
FT2 031341 031342 0 0 0 0 000000031342
FT2RQ 031341 031342 0 0 000000000017 0 000000031342
FT3 031341 031342 0 0 000000000017 0 000000031342
FT9 031342 031342 0 0 000000000017 0 000000031342
ET0 031342 031342 0 0 000000000017 0 000000031342
ST1A 031342 031342 0 0 000000000017 0 000000031342
ST9 031342 031342 0 0 000000000017 0 000000031342
*031342 MOVEI 11,000011
INITIAL
C(AC)=000000 000011
FINAL
C(AC)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 031342 031342 0 0 201440000011 0 000000000011
IT1 031342 0 0 0 201440000011 0 000000000011
AT3 031342 0 0 0 000000000011 0 201440000011
AT6 031342 000011 0 0 000000000011 0 201440000011
FT1A 031342 000011 0 0 000000000011 0 000000000011
FT9 031343 000011 0 0 000000000011 0 000000000011
ET0 031343 000011 0 0 000000000011 0 000000000011
ST1 031343 000011 0 0 000000000011 0 000000000011
ST2 031343 000011 0 0 000000000011 0 000000000011
ST9 031343 000011 0 0 000000000011 0 000000000011
*031343 HRLI 11,000011
INITIAL
C(AC)=000000 000011
FINAL
C(AC)=000011 000011
TIME PC MA SC FE AR MQ BR
IT0 031343 031343 0 0 505440000011 0 000000000011
IT1 031343 0 0 0 505440000011 0 000000000011
AT3 031343 0 0 0 000000000011 0 505440000011
AT6 031343 000011 0 0 000000000011 0 505440000011
FT1A 031343 000011 0 0 000000000011 0 000000000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 92
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0287
FT2 031343 000011 0 0 0 0 000000000011
FT2RQ 031343 000011 0 0 000000000011 0 000000000011
FT3 031343 000011 0 0 000000000011 0 000000000011
FT9 031344 000011 0 0 000000000011 0 000000000011
ET0 031344 000011 0 0 000000000011 0 000000000011
ET1 031344 000011 0 0 000011000011 0 000000000011
ST1 031344 000011 0 0 000011000011 0 000000000011
ST2 031344 000011 0 0 000011000011 0 000000000011
ST9 031344 000011 0 0 000011000011 0 000000000011
*031344 CAME 11,000000(11)
INITIAL
C(AC)=000011 000011
C(E)=000011 000011
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031344 031344 0 0 312451000000 0 000011000011
IT1 031344 0 0 0 312451000000 0 000011000011
AT1 031344 0 0 0 0 0 312451000000
AT2 031344 0 0 0 000011000011 0 312451000000
AT3 031344 0 0 0 000000000011 0 000011000011
AT6 031344 000011 0 0 000000000011 0 000011000011
FT0 031344 000011 0 0 000011000011 0 000011000011
FT1A 031344 000011 0 0 000011000011 0 000011000011
FT2 031344 000011 0 0 0 0 000011000011
FT2RQ 031344 000011 0 0 000011000011 0 000011000011
FT3 031344 000011 0 0 000011000011 0 000011000011
FT9 031345 000011 0 0 000011000011 0 000011000011
ET0 031346 000011 0 0 0 0 000011000011
ST1A 031346 000011 0 0 0 0 000011000011
ST9 031346 000011 0 0 0 0 000011000011
*031346 JUMPA 0,031347
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031346 031346 0 0 324000031347 0 000000031347
IT1 031346 0 0 0 324000031347 0 000000031347
AT3 031346 0 0 0 000000031347 0 324000031347
AT6 031346 031347 0 0 000000031347 0 324000031347
FT1A 031346 031347 0 0 000000031347 0 000000031347
FT2 031346 031347 0 0 0 0 000000031347
FT2RQ 031346 031347 0 0 000000000017 0 000000031347
FT3 031346 031347 0 0 000000000017 0 000000031347
FT9 031347 031347 0 0 000000000017 0 000000031347
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 93
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0288
ET0 031347 031347 0 0 000000000017 0 000000031347
ST1A 031347 031347 0 0 000000000017 0 000000031347
ST9 031347 031347 0 0 000000000017 0 000000031347
*031347 MOVEI 12,000012
INITIAL
C(AC)=000000 000012
FINAL
C(AC)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 031347 031347 0 0 201500000012 0 000000000012
IT1 031347 0 0 0 201500000012 0 000000000012
AT3 031347 0 0 0 000000000012 0 201500000012
AT6 031347 000012 0 0 000000000012 0 201500000012
FT1A 031347 000012 0 0 000000000012 0 000000000012
FT9 031350 000012 0 0 000000000012 0 000000000012
ET0 031350 000012 0 0 000000000012 0 000000000012
ST1 031350 000012 0 0 000000000012 0 000000000012
ST2 031350 000012 0 0 000000000012 0 000000000012
ST9 031350 000012 0 0 000000000012 0 000000000012
*031350 HRLI 12,000012
INITIAL
C(AC)=000000 000012
FINAL
C(AC)=000012 000012
TIME PC MA SC FE AR MQ BR
IT0 031350 031350 0 0 505500000012 0 000000000012
IT1 031350 0 0 0 505500000012 0 000000000012
AT3 031350 0 0 0 000000000012 0 505500000012
AT6 031350 000012 0 0 000000000012 0 505500000012
FT1A 031350 000012 0 0 000000000012 0 000000000012
FT2 031350 000012 0 0 0 0 000000000012
FT2RQ 031350 000012 0 0 000000000012 0 000000000012
FT3 031350 000012 0 0 000000000012 0 000000000012
FT9 031351 000012 0 0 000000000012 0 000000000012
ET0 031351 000012 0 0 000000000012 0 000000000012
ET1 031351 000012 0 0 000012000012 0 000000000012
ST1 031351 000012 0 0 000012000012 0 000000000012
ST2 031351 000012 0 0 000012000012 0 000000000012
ST9 031351 000012 0 0 000012000012 0 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 94
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0289
*031351 CAME 12,000000(12)
INITIAL
C(AC)=000012 000012
C(E)=000012 000012
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031351 031351 0 0 312512000000 0 000012000012
IT1 031351 0 0 0 312512000000 0 000012000012
AT1 031351 0 0 0 0 0 312512000000
AT2 031351 0 0 0 000012000012 0 312512000000
AT3 031351 0 0 0 000000000012 0 000012000012
AT6 031351 000012 0 0 000000000012 0 000012000012
FT0 031351 000012 0 0 000012000012 0 000012000012
FT1A 031351 000012 0 0 000012000012 0 000012000012
FT2 031351 000012 0 0 0 0 000012000012
FT2RQ 031351 000012 0 0 000012000012 0 000012000012
FT3 031351 000012 0 0 000012000012 0 000012000012
FT9 031352 000012 0 0 000012000012 0 000012000012
ET0 031353 000012 0 0 0 0 000012000012
ST1A 031353 000012 0 0 0 0 000012000012
ST9 031353 000012 0 0 0 0 000012000012
*031353 JUMPA 0,031354
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031353 031353 0 0 324000031354 0 000000031354
IT1 031353 0 0 0 324000031354 0 000000031354
AT3 031353 0 0 0 000000031354 0 324000031354
AT6 031353 031354 0 0 000000031354 0 324000031354
FT1A 031353 031354 0 0 000000031354 0 000000031354
FT2 031353 031354 0 0 0 0 000000031354
FT2RQ 031353 031354 0 0 000000000017 0 000000031354
FT3 031353 031354 0 0 000000000017 0 000000031354
FT9 031354 031354 0 0 000000000017 0 000000031354
ET0 031354 031354 0 0 000000000017 0 000000031354
ST1A 031354 031354 0 0 000000000017 0 000000031354
ST9 031354 031354 0 0 000000000017 0 000000031354
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 95
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0290
*031354 MOVEI 13,000013
INITIAL
C(AC)=000000 000013
FINAL
C(AC)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 031354 031354 0 0 201540000013 0 000000000013
IT1 031354 0 0 0 201540000013 0 000000000013
AT3 031354 0 0 0 000000000013 0 201540000013
AT6 031354 000013 0 0 000000000013 0 201540000013
FT1A 031354 000013 0 0 000000000013 0 000000000013
FT9 031355 000013 0 0 000000000013 0 000000000013
ET0 031355 000013 0 0 000000000013 0 000000000013
ST1 031355 000013 0 0 000000000013 0 000000000013
ST2 031355 000013 0 0 000000000013 0 000000000013
ST9 031355 000013 0 0 000000000013 0 000000000013
*031355 HRLI 13,000013
INITIAL
C(AC)=000000 000013
FINAL
C(AC)=000013 000013
TIME PC MA SC FE AR MQ BR
IT0 031355 031355 0 0 505540000013 0 000000000013
IT1 031355 0 0 0 505540000013 0 000000000013
AT3 031355 0 0 0 000000000013 0 505540000013
AT6 031355 000013 0 0 000000000013 0 505540000013
FT1A 031355 000013 0 0 000000000013 0 000000000013
FT2 031355 000013 0 0 0 0 000000000013
FT2RQ 031355 000013 0 0 000000000013 0 000000000013
FT3 031355 000013 0 0 000000000013 0 000000000013
FT9 031356 000013 0 0 000000000013 0 000000000013
ET0 031356 000013 0 0 000000000013 0 000000000013
ET1 031356 000013 0 0 000013000013 0 000000000013
ST1 031356 000013 0 0 000013000013 0 000000000013
ST2 031356 000013 0 0 000013000013 0 000000000013
ST9 031356 000013 0 0 000013000013 0 000000000013
*031356 CAME 13,000000(13)
INITIAL
C(AC)=000013 000013
C(E)=000013 000013
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031356 031356 0 0 312553000000 0 000013000013
IT1 031356 0 0 0 312553000000 0 000013000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 96
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0291
AT1 031356 0 0 0 0 0 312553000000
AT2 031356 0 0 0 000013000013 0 312553000000
AT3 031356 0 0 0 000000000013 0 000013000013
AT6 031356 000013 0 0 000000000013 0 000013000013
FT0 031356 000013 0 0 000013000013 0 000013000013
FT1A 031356 000013 0 0 000013000013 0 000013000013
FT2 031356 000013 0 0 0 0 000013000013
FT2RQ 031356 000013 0 0 000013000013 0 000013000013
FT3 031356 000013 0 0 000013000013 0 000013000013
FT9 031357 000013 0 0 000013000013 0 000013000013
ET0 031360 000013 0 0 0 0 000013000013
ST1A 031360 000013 0 0 0 0 000013000013
ST9 031360 000013 0 0 0 0 000013000013
*031360 JUMPA 0,031361
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031360 031360 0 0 324000031361 0 000000031361
IT1 031360 0 0 0 324000031361 0 000000031361
AT3 031360 0 0 0 000000031361 0 324000031361
AT6 031360 031361 0 0 000000031361 0 324000031361
FT1A 031360 031361 0 0 000000031361 0 000000031361
FT2 031360 031361 0 0 0 0 000000031361
FT2RQ 031360 031361 0 0 000000000017 0 000000031361
FT3 031360 031361 0 0 000000000017 0 000000031361
FT9 031361 031361 0 0 000000000017 0 000000031361
ET0 031361 031361 0 0 000000000017 0 000000031361
ST1A 031361 031361 0 0 000000000017 0 000000031361
ST9 031361 031361 0 0 000000000017 0 000000031361
*031361 MOVEI 14,000014
INITIAL
C(AC)=000000 000014
FINAL
C(AC)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 031361 031361 0 0 201600000014 0 000000000014
IT1 031361 0 0 0 201600000014 0 000000000014
AT3 031361 0 0 0 000000000014 0 201600000014
AT6 031361 000014 0 0 000000000014 0 201600000014
FT1A 031361 000014 0 0 000000000014 0 000000000014
FT9 031362 000014 0 0 000000000014 0 000000000014
ET0 031362 000014 0 0 000000000014 0 000000000014
ST1 031362 000014 0 0 000000000014 0 000000000014
ST2 031362 000014 0 0 000000000014 0 000000000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 97
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0292
ST9 031362 000014 0 0 000000000014 0 000000000014
*031362 HRLI 14,000014
INITIAL
C(AC)=000000 000014
FINAL
C(AC)=000014 000014
TIME PC MA SC FE AR MQ BR
IT0 031362 031362 0 0 505600000014 0 000000000014
IT1 031362 0 0 0 505600000014 0 000000000014
AT3 031362 0 0 0 000000000014 0 505600000014
AT6 031362 000014 0 0 000000000014 0 505600000014
FT1A 031362 000014 0 0 000000000014 0 000000000014
FT2 031362 000014 0 0 0 0 000000000014
FT2RQ 031362 000014 0 0 000000000014 0 000000000014
FT3 031362 000014 0 0 000000000014 0 000000000014
FT9 031363 000014 0 0 000000000014 0 000000000014
ET0 031363 000014 0 0 000000000014 0 000000000014
ET1 031363 000014 0 0 000014000014 0 000000000014
ST1 031363 000014 0 0 000014000014 0 000000000014
ST2 031363 000014 0 0 000014000014 0 000000000014
ST9 031363 000014 0 0 000014000014 0 000000000014
*031363 CAME 14,000000(14)
INITIAL
C(AC)=000014 000014
C(E)=000014 000014
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031363 031363 0 0 312614000000 0 000014000014
IT1 031363 0 0 0 312614000000 0 000014000014
AT1 031363 0 0 0 0 0 312614000000
AT2 031363 0 0 0 000014000014 0 312614000000
AT3 031363 0 0 0 000000000014 0 000014000014
AT6 031363 000014 0 0 000000000014 0 000014000014
FT0 031363 000014 0 0 000014000014 0 000014000014
FT1A 031363 000014 0 0 000014000014 0 000014000014
FT2 031363 000014 0 0 0 0 000014000014
FT2RQ 031363 000014 0 0 000014000014 0 000014000014
FT3 031363 000014 0 0 000014000014 0 000014000014
FT9 031364 000014 0 0 000014000014 0 000014000014
ET0 031365 000014 0 0 0 0 000014000014
ST1A 031365 000014 0 0 0 0 000014000014
ST9 031365 000014 0 0 0 0 000014000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 98
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0293
*031365 JUMPA 0,031366
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031365 031365 0 0 324000031366 0 000000031366
IT1 031365 0 0 0 324000031366 0 000000031366
AT3 031365 0 0 0 000000031366 0 324000031366
AT6 031365 031366 0 0 000000031366 0 324000031366
FT1A 031365 031366 0 0 000000031366 0 000000031366
FT2 031365 031366 0 0 0 0 000000031366
FT2RQ 031365 031366 0 0 000000000017 0 000000031366
FT3 031365 031366 0 0 000000000017 0 000000031366
FT9 031366 031366 0 0 000000000017 0 000000031366
ET0 031366 031366 0 0 000000000017 0 000000031366
ST1A 031366 031366 0 0 000000000017 0 000000031366
ST9 031366 031366 0 0 000000000017 0 000000031366
*031366 MOVEI 15,000015
INITIAL
C(AC)=000000 000015
FINAL
C(AC)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 031366 031366 0 0 201640000015 0 000000000015
IT1 031366 0 0 0 201640000015 0 000000000015
AT3 031366 0 0 0 000000000015 0 201640000015
AT6 031366 000015 0 0 000000000015 0 201640000015
FT1A 031366 000015 0 0 000000000015 0 000000000015
FT9 031367 000015 0 0 000000000015 0 000000000015
ET0 031367 000015 0 0 000000000015 0 000000000015
ST1 031367 000015 0 0 000000000015 0 000000000015
ST2 031367 000015 0 0 000000000015 0 000000000015
ST9 031367 000015 0 0 000000000015 0 000000000015
*031367 HRLI 15,000015
INITIAL
C(AC)=000000 000015
FINAL
C(AC)=000015 000015
TIME PC MA SC FE AR MQ BR
IT0 031367 031367 0 0 505640000015 0 000000000015
IT1 031367 0 0 0 505640000015 0 000000000015
AT3 031367 0 0 0 000000000015 0 505640000015
AT6 031367 000015 0 0 000000000015 0 505640000015
FT1A 031367 000015 0 0 000000000015 0 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 99
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0294
FT2 031367 000015 0 0 0 0 000000000015
FT2RQ 031367 000015 0 0 000000000015 0 000000000015
FT3 031367 000015 0 0 000000000015 0 000000000015
FT9 031370 000015 0 0 000000000015 0 000000000015
ET0 031370 000015 0 0 000000000015 0 000000000015
ET1 031370 000015 0 0 000015000015 0 000000000015
ST1 031370 000015 0 0 000015000015 0 000000000015
ST2 031370 000015 0 0 000015000015 0 000000000015
ST9 031370 000015 0 0 000015000015 0 000000000015
*031370 CAME 15,000000(15)
INITIAL
C(AC)=000015 000015
C(E)=000015 000015
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031370 031370 0 0 312655000000 0 000015000015
IT1 031370 0 0 0 312655000000 0 000015000015
AT1 031370 0 0 0 0 0 312655000000
AT2 031370 0 0 0 000015000015 0 312655000000
AT3 031370 0 0 0 000000000015 0 000015000015
AT6 031370 000015 0 0 000000000015 0 000015000015
FT0 031370 000015 0 0 000015000015 0 000015000015
FT1A 031370 000015 0 0 000015000015 0 000015000015
FT2 031370 000015 0 0 0 0 000015000015
FT2RQ 031370 000015 0 0 000015000015 0 000015000015
FT3 031370 000015 0 0 000015000015 0 000015000015
FT9 031371 000015 0 0 000015000015 0 000015000015
ET0 031372 000015 0 0 0 0 000015000015
ST1A 031372 000015 0 0 0 0 000015000015
ST9 031372 000015 0 0 0 0 000015000015
*031372 JUMPA 0,031373
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031372 031372 0 0 324000031373 0 000000031373
IT1 031372 0 0 0 324000031373 0 000000031373
AT3 031372 0 0 0 000000031373 0 324000031373
AT6 031372 031373 0 0 000000031373 0 324000031373
FT1A 031372 031373 0 0 000000031373 0 000000031373
FT2 031372 031373 0 0 0 0 000000031373
FT2RQ 031372 031373 0 0 000000000017 0 000000031373
FT3 031372 031373 0 0 000000000017 0 000000031373
FT9 031373 031373 0 0 000000000017 0 000000031373
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 100
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0295
ET0 031373 031373 0 0 000000000017 0 000000031373
ST1A 031373 031373 0 0 000000000017 0 000000031373
ST9 031373 031373 0 0 000000000017 0 000000031373
*031373 MOVEI 16,000016
INITIAL
C(AC)=000000 000016
FINAL
C(AC)=000000 000016
TIME PC MA SC FE AR MQ BR
IT0 031373 031373 0 0 201700000016 0 000000000016
IT1 031373 0 0 0 201700000016 0 000000000016
AT3 031373 0 0 0 000000000016 0 201700000016
AT6 031373 000016 0 0 000000000016 0 201700000016
FT1A 031373 000016 0 0 000000000016 0 000000000016
FT9 031374 000016 0 0 000000000016 0 000000000016
ET0 031374 000016 0 0 000000000016 0 000000000016
ST1 031374 000016 0 0 000000000016 0 000000000016
ST2 031374 000016 0 0 000000000016 0 000000000016
ST9 031374 000016 0 0 000000000016 0 000000000016
*031374 HRLI 16,000016
INITIAL
C(AC)=000000 000016
FINAL
C(AC)=000016 000016
TIME PC MA SC FE AR MQ BR
IT0 031374 031374 0 0 505700000016 0 000000000016
IT1 031374 0 0 0 505700000016 0 000000000016
AT3 031374 0 0 0 000000000016 0 505700000016
AT6 031374 000016 0 0 000000000016 0 505700000016
FT1A 031374 000016 0 0 000000000016 0 000000000016
FT2 031374 000016 0 0 0 0 000000000016
FT2RQ 031374 000016 0 0 000000000016 0 000000000016
FT3 031374 000016 0 0 000000000016 0 000000000016
FT9 031375 000016 0 0 000000000016 0 000000000016
ET0 031375 000016 0 0 000000000016 0 000000000016
ET1 031375 000016 0 0 000016000016 0 000000000016
ST1 031375 000016 0 0 000016000016 0 000000000016
ST2 031375 000016 0 0 000016000016 0 000000000016
ST9 031375 000016 0 0 000016000016 0 000000000016
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 101
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0296
*031375 CAME 16,000000(16)
INITIAL
C(AC)=000016 000016
C(E)=000016 000016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031375 031375 0 0 312716000000 0 000016000016
IT1 031375 0 0 0 312716000000 0 000016000016
AT1 031375 0 0 0 0 0 312716000000
AT2 031375 0 0 0 000016000016 0 312716000000
AT3 031375 0 0 0 000000000016 0 000016000016
AT6 031375 000016 0 0 000000000016 0 000016000016
FT0 031375 000016 0 0 000016000016 0 000016000016
FT1A 031375 000016 0 0 000016000016 0 000016000016
FT2 031375 000016 0 0 0 0 000016000016
FT2RQ 031375 000016 0 0 000016000016 0 000016000016
FT3 031375 000016 0 0 000016000016 0 000016000016
FT9 031376 000016 0 0 000016000016 0 000016000016
ET0 031377 000016 0 0 0 0 000016000016
ST1A 031377 000016 0 0 0 0 000016000016
ST9 031377 000016 0 0 0 0 000016000016
*031377 JUMPA 0,031400
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031377 031377 0 0 324000031400 0 000000031400
IT1 031377 0 0 0 324000031400 0 000000031400
AT3 031377 0 0 0 000000031400 0 324000031400
AT6 031377 0 0 0 000000031400 0 324000031400
FT1A 031377 0 0 0 000000031400 0 000000031400
FT2 031377 0 0 0 0 0 000000031400
FT2RQ 031377 0 0 0 000000000017 0 000000031400
FT3 031377 0 0 0 000000000017 0 000000031400
FT9 0 0 0 0 000000000017 0 000000031400
ET0 0 0 0 0 000000000017 0 000000031400
ST1A 0 0 0 0 000000000017 0 000000031400
ST9 0 0 0 0 000000000017 0 000000031400
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 102
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0297
*031400 MOVEI 17,000017
INITIAL
C(AC)=000000 000017
FINAL
C(AC)=000000 000017
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 201740000017 0 000000000017
IT1 0 0 0 0 201740000017 0 000000000017
AT3 0 0 0 0 000000000017 0 201740000017
AT6 0 000017 0 0 000000000017 0 201740000017
FT1A 0 000017 0 0 000000000017 0 000000000017
FT9 031401 000017 0 0 000000000017 0 000000000017
ET0 031401 000017 0 0 000000000017 0 000000000017
ST1 031401 000017 0 0 000000000017 0 000000000017
ST2 031401 000017 0 0 000000000017 0 000000000017
ST9 031401 000017 0 0 000000000017 0 000000000017
*031401 HRLI 17,000017
INITIAL
C(AC)=000000 000017
FINAL
C(AC)=000017 000017
TIME PC MA SC FE AR MQ BR
IT0 031401 031401 0 0 505740000017 0 000000000017
IT1 031401 0 0 0 505740000017 0 000000000017
AT3 031401 0 0 0 000000000017 0 505740000017
AT6 031401 000017 0 0 000000000017 0 505740000017
FT1A 031401 000017 0 0 000000000017 0 000000000017
FT2 031401 000017 0 0 0 0 000000000017
FT2RQ 031401 000017 0 0 000000000017 0 000000000017
FT3 031401 000017 0 0 000000000017 0 000000000017
FT9 031402 000017 0 0 000000000017 0 000000000017
ET0 031402 000017 0 0 000000000017 0 000000000017
ET1 031402 000017 0 0 000017000017 0 000000000017
ST1 031402 000017 0 0 000017000017 0 000000000017
ST2 031402 000017 0 0 000017000017 0 000000000017
ST9 031402 000017 0 0 000017000017 0 000000000017
*031402 CAME 17,000000(17)
INITIAL
C(AC)=000017 000017
C(E)=000017 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031402 031402 0 0 312757000000 0 000017000017
IT1 031402 0 0 0 312757000000 0 000017000017
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 103
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0298
AT1 031402 0 0 0 0 0 312757000000
AT2 031402 0 0 0 000017000017 0 312757000000
AT3 031402 0 0 0 000000000017 0 000017000017
AT6 031402 000017 0 0 000000000017 0 000017000017
FT0 031402 000017 0 0 000017000017 0 000017000017
FT1A 031402 000017 0 0 000017000017 0 000017000017
FT2 031402 000017 0 0 0 0 000017000017
FT2RQ 031402 000017 0 0 000017000017 0 000017000017
FT3 031402 000017 0 0 000017000017 0 000017000017
FT9 031403 000017 0 0 000017000017 0 000017000017
ET0 031404 000017 0 0 0 0 000017000017
ST1A 031404 000017 0 0 0 0 000017000017
ST9 031404 000017 0 0 0 0 000017000017
*031404 JUMPA 0,031405
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031404 031404 0 0 324000031405 0 000000031405
IT1 031404 0 0 0 324000031405 0 000000031405
AT3 031404 0 0 0 000000031405 0 324000031405
AT6 031404 031405 0 0 000000031405 0 324000031405
FT1A 031404 031405 0 0 000000031405 0 000000031405
FT2 031404 031405 0 0 0 0 000000031405
FT2RQ 031404 031405 0 0 000000000017 0 000000031405
FT3 031404 031405 0 0 000000000017 0 000000031405
FT9 031405 031405 0 0 000000000017 0 000000031405
ET0 031405 031405 0 0 000000000017 0 000000031405
ST1A 031405 031405 0 0 000000000017 0 000000031405
ST9 031405 031405 0 0 000000000017 0 000000031405
*031405 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000003 000003
FINAL
C(E)=000003 000003
TIME PC MA SC FE AR MQ BR
IT0 031405 031405 0 0 476000000003 0 000000000003
IT1 031405 0 0 0 476000000003 0 000000000003
AT3 031405 0 0 0 000000000003 0 476000000003
AT6 031405 000003 0 0 000000000003 0 476000000003
FT1A 031405 000003 0 0 000000000003 0 000000000003
FT9 031406 000003 0 0 000000000003 0 000000000003
ET0 031406 000003 0 0 777777777777 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 104
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0299
ST6 031406 000003 0 0 777777777777 0 000000000003
ST6A 031406 000003 0 0 777777777777 0 000000000003
ST9 031406 000003 0 0 777777777777 0 000000000003
*031406 SETZM 0,000001
INITIAL
C(AC)=000000 000017
C(E)=000001 000001
FINAL
C(E)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 031406 031406 0 0 402000000001 0 000000000001
IT1 031406 0 0 0 402000000001 0 000000000001
AT3 031406 0 0 0 000000000001 0 402000000001
AT6 031406 000001 0 0 000000000001 0 402000000001
FT1A 031406 000001 0 0 000000000001 0 000000000001
FT9 031407 000001 0 0 000000000001 0 000000000001
ET0 031407 000001 0 0 0 0 000000000001
ST6 031407 000001 0 0 0 0 000000000001
ST6A 031407 000001 0 0 0 0 000000000001
ST9 031407 000001 0 0 0 0 000000000001
*031407 MOVEI 2,000001
INITIAL
C(AC)=000002 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031407 031407 0 0 201100000001 0 000000000001
IT1 031407 0 0 0 201100000001 0 000000000001
AT3 031407 0 0 0 000000000001 0 201100000001
AT6 031407 000001 0 0 000000000001 0 201100000001
FT1A 031407 000001 0 0 000000000001 0 000000000001
FT9 031410 000001 0 0 000000000001 0 000000000001
ET0 031410 000001 0 0 000000000001 0 000000000001
ST1 031410 000001 0 0 000000000001 0 000000000001
ST2 031410 000001 0 0 000000000001 0 000000000001
ST9 031410 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 105
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0300
*031410 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031410 031410 0 0 200142000000 0 0
IT1 031410 0 0 0 200142000000 0 0
AT1 031410 0 0 0 0 0 200142000000
AT2 031410 0 0 0 000000000001 0 200142000000
AT3 031410 0 0 0 000000000001 0 000000000001
AT6 031410 000001 0 0 000000000001 0 000000000001
FT0 031410 000001 0 0 0 0 000000000001
FT1A 031410 000001 0 0 0 0 0
FT9 031411 000001 0 0 0 0 0
ET0 031411 000001 0 0 0 0 0
ST1 031411 000001 0 0 0 0 0
ST2 031411 000001 0 0 0 0 0
ST9 031411 000001 0 0 0 0 0
*031411 SKIPE 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000000
FINAL
C(AC)=000000 000017
TIME PC MA SC FE AR MQ BR
IT0 031411 031411 0 0 332000000003 0 0
IT1 031411 0 0 0 332000000003 0 0
AT3 031411 0 0 0 000000000003 0 332000000003
AT6 031411 000003 0 0 000000000003 0 332000000003
FT0 031411 000003 0 0 0 0 332000000003
FT1A 031411 000003 0 0 0 0 0
FT9 031412 000003 0 0 0 0 0
ET0 031413 000003 0 0 0 0 0
ST1A 031413 000003 0 0 0 0 0
ST9 031413 000003 0 0 0 0 0
*031413 JUMPA 0,031414
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031413 031413 0 0 324000031414 0 000000031414
IT1 031413 0 0 0 324000031414 0 000000031414
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 106
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0301
AT3 031413 0 0 0 000000031414 0 324000031414
AT6 031413 031414 0 0 000000031414 0 324000031414
FT1A 031413 031414 0 0 000000031414 0 000000031414
FT2 031413 031414 0 0 0 0 000000031414
FT2RQ 031413 031414 0 0 000000000017 0 000000031414
FT3 031413 031414 0 0 000000000017 0 000000031414
FT9 031414 031414 0 0 000000000017 0 000000031414
ET0 031414 031414 0 0 000000000017 0 000000031414
ST1A 031414 031414 0 0 000000000017 0 000000031414
ST9 031414 031414 0 0 000000000017 0 000000031414
*031414 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031414 031414 0 0 476000000003 0 000000000003
IT1 031414 0 0 0 476000000003 0 000000000003
AT3 031414 0 0 0 000000000003 0 476000000003
AT6 031414 000003 0 0 000000000003 0 476000000003
FT1A 031414 000003 0 0 000000000003 0 000000000003
FT9 031415 000003 0 0 000000000003 0 000000000003
ET0 031415 000003 0 0 777777777777 0 000000000003
ST6 031415 000003 0 0 777777777777 0 000000000003
ST6A 031415 000003 0 0 777777777777 0 000000000003
ST9 031415 000003 0 0 777777777777 0 000000000003
*031415 MOVEI 1,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031415 031415 0 0 201040000001 0 000000000001
IT1 031415 0 0 0 201040000001 0 000000000001
AT3 031415 0 0 0 000000000001 0 201040000001
AT6 031415 000001 0 0 000000000001 0 201040000001
FT1A 031415 000001 0 0 000000000001 0 000000000001
FT9 031416 000001 0 0 000000000001 0 000000000001
ET0 031416 000001 0 0 000000000001 0 000000000001
ST1 031416 000001 0 0 000000000001 0 000000000001
ST2 031416 000001 0 0 000000000001 0 000000000001
ST9 031416 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 107
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0302
*031416 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031416 031416 0 0 201100000001 0 000000000001
IT1 031416 0 0 0 201100000001 0 000000000001
AT3 031416 0 0 0 000000000001 0 201100000001
AT6 031416 000001 0 0 000000000001 0 201100000001
FT1A 031416 000001 0 0 000000000001 0 000000000001
FT9 031417 000001 0 0 000000000001 0 000000000001
ET0 031417 000001 0 0 000000000001 0 000000000001
ST1 031417 000001 0 0 000000000001 0 000000000001
ST2 031417 000001 0 0 000000000001 0 000000000001
ST9 031417 000001 0 0 000000000001 0 000000000001
*031417 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031417 031417 0 0 200142000000 0 000000000001
IT1 031417 0 0 0 200142000000 0 000000000001
AT1 031417 0 0 0 0 0 200142000000
AT2 031417 0 0 0 000000000001 0 200142000000
AT3 031417 0 0 0 000000000001 0 000000000001
AT6 031417 000001 0 0 000000000001 0 000000000001
FT0 031417 000001 0 0 000000000001 0 000000000001
FT1A 031417 000001 0 0 000000000001 0 000000000001
FT9 031420 000001 0 0 000000000001 0 000000000001
ET0 031420 000001 0 0 000000000001 0 000000000001
ST1 031420 000001 0 0 000000000001 0 000000000001
ST2 031420 000001 0 0 000000000001 0 000000000001
ST9 031420 000001 0 0 000000000001 0 000000000001
*031420 CAIE 3,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031420 031420 0 0 302140000001 0 000000000001
IT1 031420 0 0 0 302140000001 0 000000000001
AT3 031420 0 0 0 000000000001 0 302140000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 108
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0303
AT6 031420 000001 0 0 000000000001 0 302140000001
FT1A 031420 000001 0 0 000000000001 0 000000000001
FT2 031420 000001 0 0 0 0 000000000001
FT2RQ 031420 000001 0 0 000000000001 0 000000000001
FT3 031420 000001 0 0 000000000001 0 000000000001
FT9 031421 000001 0 0 000000000001 0 000000000001
ET0 031422 000001 0 0 0 0 000000000001
ST1A 031422 000001 0 0 0 0 000000000001
ST9 031422 000001 0 0 0 0 000000000001
*031422 JUMPA 0,031423
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031422 031422 0 0 324000031423 0 000000031423
IT1 031422 0 0 0 324000031423 0 000000031423
AT3 031422 0 0 0 000000031423 0 324000031423
AT6 031422 031423 0 0 000000031423 0 324000031423
FT1A 031422 031423 0 0 000000031423 0 000000031423
FT2 031422 031423 0 0 0 0 000000031423
FT2RQ 031422 031423 0 0 000000000017 0 000000031423
FT3 031422 031423 0 0 000000000017 0 000000031423
FT9 031423 031423 0 0 000000000017 0 000000031423
ET0 031423 031423 0 0 000000000017 0 000000031423
ST1A 031423 031423 0 0 000000000017 0 000000031423
ST9 031423 031423 0 0 000000000017 0 000000031423
*031423 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000001
FINAL
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031423 031423 0 0 476000000003 0 000000000003
IT1 031423 0 0 0 476000000003 0 000000000003
AT3 031423 0 0 0 000000000003 0 476000000003
AT6 031423 000003 0 0 000000000003 0 476000000003
FT1A 031423 000003 0 0 000000000003 0 000000000003
FT9 031424 000003 0 0 000000000003 0 000000000003
ET0 031424 000003 0 0 777777777777 0 000000000003
ST6 031424 000003 0 0 777777777777 0 000000000003
ST6A 031424 000003 0 0 777777777777 0 000000000003
ST9 031424 000003 0 0 777777777777 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 109
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0304
*031424 MOVEI 1,000002
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031424 031424 0 0 201040000002 0 000000000002
IT1 031424 0 0 0 201040000002 0 000000000002
AT3 031424 0 0 0 000000000002 0 201040000002
AT6 031424 000002 0 0 000000000002 0 201040000002
FT1A 031424 000002 0 0 000000000002 0 000000000002
FT9 031425 000002 0 0 000000000002 0 000000000002
ET0 031425 000002 0 0 000000000002 0 000000000002
ST1 031425 000002 0 0 000000000002 0 000000000002
ST2 031425 000002 0 0 000000000002 0 000000000002
ST9 031425 000002 0 0 000000000002 0 000000000002
*031425 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031425 031425 0 0 201100000001 0 000000000001
IT1 031425 0 0 0 201100000001 0 000000000001
AT3 031425 0 0 0 000000000001 0 201100000001
AT6 031425 000001 0 0 000000000001 0 201100000001
FT1A 031425 000001 0 0 000000000001 0 000000000001
FT9 031426 000001 0 0 000000000001 0 000000000001
ET0 031426 000001 0 0 000000000001 0 000000000001
ST1 031426 000001 0 0 000000000001 0 000000000001
ST2 031426 000001 0 0 000000000001 0 000000000001
ST9 031426 000001 0 0 000000000001 0 000000000001
*031426 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031426 031426 0 0 200142000000 0 000000000002
IT1 031426 0 0 0 200142000000 0 000000000002
AT1 031426 0 0 0 0 0 200142000000
AT2 031426 0 0 0 000000000001 0 200142000000
AT3 031426 0 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 110
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0305
AT6 031426 000001 0 0 000000000001 0 000000000001
FT0 031426 000001 0 0 000000000002 0 000000000001
FT1A 031426 000001 0 0 000000000002 0 000000000002
FT9 031427 000001 0 0 000000000002 0 000000000002
ET0 031427 000001 0 0 000000000002 0 000000000002
ST1 031427 000001 0 0 000000000002 0 000000000002
ST2 031427 000001 0 0 000000000002 0 000000000002
ST9 031427 000001 0 0 000000000002 0 000000000002
*031427 CAIE 3,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031427 031427 0 0 302140000002 0 000000000002
IT1 031427 0 0 0 302140000002 0 000000000002
AT3 031427 0 0 0 000000000002 0 302140000002
AT6 031427 000002 0 0 000000000002 0 302140000002
FT1A 031427 000002 0 0 000000000002 0 000000000002
FT2 031427 000002 0 0 0 0 000000000002
FT2RQ 031427 000002 0 0 000000000002 0 000000000002
FT3 031427 000002 0 0 000000000002 0 000000000002
FT9 031430 000002 0 0 000000000002 0 000000000002
ET0 031431 000002 0 0 0 0 000000000002
ST1A 031431 000002 0 0 0 0 000000000002
ST9 031431 000002 0 0 0 0 000000000002
*031431 JUMPA 0,031432
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031431 031431 0 0 324000031432 0 000000031432
IT1 031431 0 0 0 324000031432 0 000000031432
AT3 031431 0 0 0 000000031432 0 324000031432
AT6 031431 031432 0 0 000000031432 0 324000031432
FT1A 031431 031432 0 0 000000031432 0 000000031432
FT2 031431 031432 0 0 0 0 000000031432
FT2RQ 031431 031432 0 0 000000000017 0 000000031432
FT3 031431 031432 0 0 000000000017 0 000000031432
FT9 031432 031432 0 0 000000000017 0 000000031432
ET0 031432 031432 0 0 000000000017 0 000000031432
ST1A 031432 031432 0 0 000000000017 0 000000031432
ST9 031432 031432 0 0 000000000017 0 000000031432
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 111
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0306
*031432 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000002
FINAL
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031432 031432 0 0 476000000003 0 000000000003
IT1 031432 0 0 0 476000000003 0 000000000003
AT3 031432 0 0 0 000000000003 0 476000000003
AT6 031432 000003 0 0 000000000003 0 476000000003
FT1A 031432 000003 0 0 000000000003 0 000000000003
FT9 031433 000003 0 0 000000000003 0 000000000003
ET0 031433 000003 0 0 777777777777 0 000000000003
ST6 031433 000003 0 0 777777777777 0 000000000003
ST6A 031433 000003 0 0 777777777777 0 000000000003
ST9 031433 000003 0 0 777777777777 0 000000000003
*031433 MOVEI 1,000004
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031433 031433 0 0 201040000004 0 000000000004
IT1 031433 0 0 0 201040000004 0 000000000004
AT3 031433 0 0 0 000000000004 0 201040000004
AT6 031433 000004 0 0 000000000004 0 201040000004
FT1A 031433 000004 0 0 000000000004 0 000000000004
FT9 031434 000004 0 0 000000000004 0 000000000004
ET0 031434 000004 0 0 000000000004 0 000000000004
ST1 031434 000004 0 0 000000000004 0 000000000004
ST2 031434 000004 0 0 000000000004 0 000000000004
ST9 031434 000004 0 0 000000000004 0 000000000004
*031434 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031434 031434 0 0 201100000001 0 000000000001
IT1 031434 0 0 0 201100000001 0 000000000001
AT3 031434 0 0 0 000000000001 0 201100000001
AT6 031434 000001 0 0 000000000001 0 201100000001
FT1A 031434 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 112
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0307
FT9 031435 000001 0 0 000000000001 0 000000000001
ET0 031435 000001 0 0 000000000001 0 000000000001
ST1 031435 000001 0 0 000000000001 0 000000000001
ST2 031435 000001 0 0 000000000001 0 000000000001
ST9 031435 000001 0 0 000000000001 0 000000000001
*031435 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031435 031435 0 0 200142000000 0 000000000004
IT1 031435 0 0 0 200142000000 0 000000000004
AT1 031435 0 0 0 0 0 200142000000
AT2 031435 0 0 0 000000000001 0 200142000000
AT3 031435 0 0 0 000000000001 0 000000000001
AT6 031435 000001 0 0 000000000001 0 000000000001
FT0 031435 000001 0 0 000000000004 0 000000000001
FT1A 031435 000001 0 0 000000000004 0 000000000004
FT9 031436 000001 0 0 000000000004 0 000000000004
ET0 031436 000001 0 0 000000000004 0 000000000004
ST1 031436 000001 0 0 000000000004 0 000000000004
ST2 031436 000001 0 0 000000000004 0 000000000004
ST9 031436 000001 0 0 000000000004 0 000000000004
*031436 CAIE 3,000004
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031436 031436 0 0 302140000004 0 000000000004
IT1 031436 0 0 0 302140000004 0 000000000004
AT3 031436 0 0 0 000000000004 0 302140000004
AT6 031436 000004 0 0 000000000004 0 302140000004
FT1A 031436 000004 0 0 000000000004 0 000000000004
FT2 031436 000004 0 0 0 0 000000000004
FT2RQ 031436 000004 0 0 000000000004 0 000000000004
FT3 031436 000004 0 0 000000000004 0 000000000004
FT9 031437 000004 0 0 000000000004 0 000000000004
ET0 031440 000004 0 0 0 0 000000000004
ST1A 031440 000004 0 0 0 0 000000000004
ST9 031440 000004 0 0 0 0 000000000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 113
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0308
*031440 JUMPA 0,031441
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031440 031440 0 0 324000031441 0 000000031441
IT1 031440 0 0 0 324000031441 0 000000031441
AT3 031440 0 0 0 000000031441 0 324000031441
AT6 031440 031441 0 0 000000031441 0 324000031441
FT1A 031440 031441 0 0 000000031441 0 000000031441
FT2 031440 031441 0 0 0 0 000000031441
FT2RQ 031440 031441 0 0 000000000017 0 000000031441
FT3 031440 031441 0 0 000000000017 0 000000031441
FT9 031441 031441 0 0 000000000017 0 000000031441
ET0 031441 031441 0 0 000000000017 0 000000031441
ST1A 031441 031441 0 0 000000000017 0 000000031441
ST9 031441 031441 0 0 000000000017 0 000000031441
*031441 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000004
FINAL
C(E)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031441 031441 0 0 476000000003 0 000000000003
IT1 031441 0 0 0 476000000003 0 000000000003
AT3 031441 0 0 0 000000000003 0 476000000003
AT6 031441 000003 0 0 000000000003 0 476000000003
FT1A 031441 000003 0 0 000000000003 0 000000000003
FT9 031442 000003 0 0 000000000003 0 000000000003
ET0 031442 000003 0 0 777777777777 0 000000000003
ST6 031442 000003 0 0 777777777777 0 000000000003
ST6A 031442 000003 0 0 777777777777 0 000000000003
ST9 031442 000003 0 0 777777777777 0 000000000003
*031442 MOVEI 1,000010
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 031442 031442 0 0 201040000010 0 000000000010
IT1 031442 0 0 0 201040000010 0 000000000010
AT3 031442 0 0 0 000000000010 0 201040000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 114
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0309
AT6 031442 000010 0 0 000000000010 0 201040000010
FT1A 031442 000010 0 0 000000000010 0 000000000010
FT9 031443 000010 0 0 000000000010 0 000000000010
ET0 031443 000010 0 0 000000000010 0 000000000010
ST1 031443 000010 0 0 000000000010 0 000000000010
ST2 031443 000010 0 0 000000000010 0 000000000010
ST9 031443 000010 0 0 000000000010 0 000000000010
*031443 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031443 031443 0 0 201100000001 0 000000000001
IT1 031443 0 0 0 201100000001 0 000000000001
AT3 031443 0 0 0 000000000001 0 201100000001
AT6 031443 000001 0 0 000000000001 0 201100000001
FT1A 031443 000001 0 0 000000000001 0 000000000001
FT9 031444 000001 0 0 000000000001 0 000000000001
ET0 031444 000001 0 0 000000000001 0 000000000001
ST1 031444 000001 0 0 000000000001 0 000000000001
ST2 031444 000001 0 0 000000000001 0 000000000001
ST9 031444 000001 0 0 000000000001 0 000000000001
*031444 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 031444 031444 0 0 200142000000 0 000000000010
IT1 031444 0 0 0 200142000000 0 000000000010
AT1 031444 0 0 0 0 0 200142000000
AT2 031444 0 0 0 000000000001 0 200142000000
AT3 031444 0 0 0 000000000001 0 000000000001
AT6 031444 000001 0 0 000000000001 0 000000000001
FT0 031444 000001 0 0 000000000010 0 000000000001
FT1A 031444 000001 0 0 000000000010 0 000000000010
FT9 031445 000001 0 0 000000000010 0 000000000010
ET0 031445 000001 0 0 000000000010 0 000000000010
ST1 031445 000001 0 0 000000000010 0 000000000010
ST2 031445 000001 0 0 000000000010 0 000000000010
ST9 031445 000001 0 0 000000000010 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 115
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0310
*031445 CAIE 3,000010
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031445 031445 0 0 302140000010 0 000000000010
IT1 031445 0 0 0 302140000010 0 000000000010
AT3 031445 0 0 0 000000000010 0 302140000010
AT6 031445 000010 0 0 000000000010 0 302140000010
FT1A 031445 000010 0 0 000000000010 0 000000000010
FT2 031445 000010 0 0 0 0 000000000010
FT2RQ 031445 000010 0 0 000000000010 0 000000000010
FT3 031445 000010 0 0 000000000010 0 000000000010
FT9 031446 000010 0 0 000000000010 0 000000000010
ET0 031447 000010 0 0 0 0 000000000010
ST1A 031447 000010 0 0 0 0 000000000010
ST9 031447 000010 0 0 0 0 000000000010
*031447 JUMPA 0,031450
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031447 031447 0 0 324000031450 0 000000031450
IT1 031447 0 0 0 324000031450 0 000000031450
AT3 031447 0 0 0 000000031450 0 324000031450
AT6 031447 031450 0 0 000000031450 0 324000031450
FT1A 031447 031450 0 0 000000031450 0 000000031450
FT2 031447 031450 0 0 0 0 000000031450
FT2RQ 031447 031450 0 0 000000000017 0 000000031450
FT3 031447 031450 0 0 000000000017 0 000000031450
FT9 031450 031450 0 0 000000000017 0 000000031450
ET0 031450 031450 0 0 000000000017 0 000000031450
ST1A 031450 031450 0 0 000000000017 0 000000031450
ST9 031450 031450 0 0 000000000017 0 000000031450
*031450 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000010
FINAL
C(E)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 031450 031450 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 116
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0311
IT1 031450 0 0 0 476000000003 0 000000000003
AT3 031450 0 0 0 000000000003 0 476000000003
AT6 031450 000003 0 0 000000000003 0 476000000003
FT1A 031450 000003 0 0 000000000003 0 000000000003
FT9 031451 000003 0 0 000000000003 0 000000000003
ET0 031451 000003 0 0 777777777777 0 000000000003
ST6 031451 000003 0 0 777777777777 0 000000000003
ST6A 031451 000003 0 0 777777777777 0 000000000003
ST9 031451 000003 0 0 777777777777 0 000000000003
*031451 MOVEI 1,000020
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000000 000020
TIME PC MA SC FE AR MQ BR
IT0 031451 031451 0 0 201040000020 0 000000000020
IT1 031451 0 0 0 201040000020 0 000000000020
AT3 031451 0 0 0 000000000020 0 201040000020
AT6 031451 000020 0 0 000000000020 0 201040000020
FT1A 031451 000020 0 0 000000000020 0 000000000020
FT9 031452 000020 0 0 000000000020 0 000000000020
ET0 031452 000020 0 0 000000000020 0 000000000020
ST1 031452 000020 0 0 000000000020 0 000000000020
ST2 031452 000020 0 0 000000000020 0 000000000020
ST9 031452 000020 0 0 000000000020 0 000000000020
*031452 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031452 031452 0 0 201100000001 0 000000000001
IT1 031452 0 0 0 201100000001 0 000000000001
AT3 031452 0 0 0 000000000001 0 201100000001
AT6 031452 000001 0 0 000000000001 0 201100000001
FT1A 031452 000001 0 0 000000000001 0 000000000001
FT9 031453 000001 0 0 000000000001 0 000000000001
ET0 031453 000001 0 0 000000000001 0 000000000001
ST1 031453 000001 0 0 000000000001 0 000000000001
ST2 031453 000001 0 0 000000000001 0 000000000001
ST9 031453 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 117
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0312
*031453 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000020
TIME PC MA SC FE AR MQ BR
IT0 031453 031453 0 0 200142000000 0 000000000020
IT1 031453 0 0 0 200142000000 0 000000000020
AT1 031453 0 0 0 0 0 200142000000
AT2 031453 0 0 0 000000000001 0 200142000000
AT3 031453 0 0 0 000000000001 0 000000000001
AT6 031453 000001 0 0 000000000001 0 000000000001
FT0 031453 000001 0 0 000000000020 0 000000000001
FT1A 031453 000001 0 0 000000000020 0 000000000020
FT9 031454 000001 0 0 000000000020 0 000000000020
ET0 031454 000001 0 0 000000000020 0 000000000020
ST1 031454 000001 0 0 000000000020 0 000000000020
ST2 031454 000001 0 0 000000000020 0 000000000020
ST9 031454 000001 0 0 000000000020 0 000000000020
*031454 CAIE 3,000020
INITIAL
C(AC)=000000 000020
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031454 031454 0 0 302140000020 0 000000000020
IT1 031454 0 0 0 302140000020 0 000000000020
AT3 031454 0 0 0 000000000020 0 302140000020
AT6 031454 000020 0 0 000000000020 0 302140000020
FT1A 031454 000020 0 0 000000000020 0 000000000020
FT2 031454 000020 0 0 0 0 000000000020
FT2RQ 031454 000020 0 0 000000000020 0 000000000020
FT3 031454 000020 0 0 000000000020 0 000000000020
FT9 031455 000020 0 0 000000000020 0 000000000020
ET0 031456 000020 0 0 0 0 000000000020
ST1A 031456 000020 0 0 0 0 000000000020
ST9 031456 000020 0 0 0 0 000000000020
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 118
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0313
*031456 JUMPA 0,031457
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031456 031456 0 0 324000031457 0 000000031457
IT1 031456 0 0 0 324000031457 0 000000031457
AT3 031456 0 0 0 000000031457 0 324000031457
AT6 031456 031457 0 0 000000031457 0 324000031457
FT1A 031456 031457 0 0 000000031457 0 000000031457
FT2 031456 031457 0 0 0 0 000000031457
FT2RQ 031456 031457 0 0 000000000017 0 000000031457
FT3 031456 031457 0 0 000000000017 0 000000031457
FT9 031457 031457 0 0 000000000017 0 000000031457
ET0 031457 031457 0 0 000000000017 0 000000031457
ST1A 031457 031457 0 0 000000000017 0 000000031457
ST9 031457 031457 0 0 000000000017 0 000000031457
*031457 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000020
FINAL
C(E)=000000 000020
TIME PC MA SC FE AR MQ BR
IT0 031457 031457 0 0 476000000003 0 000000000003
IT1 031457 0 0 0 476000000003 0 000000000003
AT3 031457 0 0 0 000000000003 0 476000000003
AT6 031457 000003 0 0 000000000003 0 476000000003
FT1A 031457 000003 0 0 000000000003 0 000000000003
FT9 031460 000003 0 0 000000000003 0 000000000003
ET0 031460 000003 0 0 777777777777 0 000000000003
ST6 031460 000003 0 0 777777777777 0 000000000003
ST6A 031460 000003 0 0 777777777777 0 000000000003
ST9 031460 000003 0 0 777777777777 0 000000000003
*031460 MOVEI 1,000040
INITIAL
C(AC)=000000 000020
FINAL
C(AC)=000000 000040
TIME PC MA SC FE AR MQ BR
IT0 031460 031460 0 0 201040000040 0 000000000040
IT1 031460 0 0 0 201040000040 0 000000000040
AT3 031460 0 0 0 000000000040 0 201040000040
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 119
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0314
AT6 031460 000040 0 0 000000000040 0 201040000040
FT1A 031460 000040 0 0 000000000040 0 000000000040
FT9 031461 000040 0 0 000000000040 0 000000000040
ET0 031461 000040 0 0 000000000040 0 000000000040
ST1 031461 000040 0 0 000000000040 0 000000000040
ST2 031461 000040 0 0 000000000040 0 000000000040
ST9 031461 000040 0 0 000000000040 0 000000000040
*031461 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031461 031461 0 0 201100000001 0 000000000001
IT1 031461 0 0 0 201100000001 0 000000000001
AT3 031461 0 0 0 000000000001 0 201100000001
AT6 031461 000001 0 0 000000000001 0 201100000001
FT1A 031461 000001 0 0 000000000001 0 000000000001
FT9 031462 000001 0 0 000000000001 0 000000000001
ET0 031462 000001 0 0 000000000001 0 000000000001
ST1 031462 000001 0 0 000000000001 0 000000000001
ST2 031462 000001 0 0 000000000001 0 000000000001
ST9 031462 000001 0 0 000000000001 0 000000000001
*031462 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000040
TIME PC MA SC FE AR MQ BR
IT0 031462 031462 0 0 200142000000 0 000000000040
IT1 031462 0 0 0 200142000000 0 000000000040
AT1 031462 0 0 0 0 0 200142000000
AT2 031462 0 0 0 000000000001 0 200142000000
AT3 031462 0 0 0 000000000001 0 000000000001
AT6 031462 000001 0 0 000000000001 0 000000000001
FT0 031462 000001 0 0 000000000040 0 000000000001
FT1A 031462 000001 0 0 000000000040 0 000000000040
FT9 031463 000001 0 0 000000000040 0 000000000040
ET0 031463 000001 0 0 000000000040 0 000000000040
ST1 031463 000001 0 0 000000000040 0 000000000040
ST2 031463 000001 0 0 000000000040 0 000000000040
ST9 031463 000001 0 0 000000000040 0 000000000040
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 120
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0315
*031463 CAIE 3,000040
INITIAL
C(AC)=000000 000040
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031463 031463 0 0 302140000040 0 000000000040
IT1 031463 0 0 0 302140000040 0 000000000040
AT3 031463 0 0 0 000000000040 0 302140000040
AT6 031463 000040 0 0 000000000040 0 302140000040
FT1A 031463 000040 0 0 000000000040 0 000000000040
FT2 031463 000040 0 0 0 0 000000000040
FT2RQ 031463 000040 0 0 000000000040 0 000000000040
FT3 031463 000040 0 0 000000000040 0 000000000040
FT9 031464 000040 0 0 000000000040 0 000000000040
ET0 031465 000040 0 0 0 0 000000000040
ST1A 031465 000040 0 0 0 0 000000000040
ST9 031465 000040 0 0 0 0 000000000040
*031465 JUMPA 0,031466
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031465 031465 0 0 324000031466 0 000000031466
IT1 031465 0 0 0 324000031466 0 000000031466
AT3 031465 0 0 0 000000031466 0 324000031466
AT6 031465 031466 0 0 000000031466 0 324000031466
FT1A 031465 031466 0 0 000000031466 0 000000031466
FT2 031465 031466 0 0 0 0 000000031466
FT2RQ 031465 031466 0 0 000000000017 0 000000031466
FT3 031465 031466 0 0 000000000017 0 000000031466
FT9 031466 031466 0 0 000000000017 0 000000031466
ET0 031466 031466 0 0 000000000017 0 000000031466
ST1A 031466 031466 0 0 000000000017 0 000000031466
ST9 031466 031466 0 0 000000000017 0 000000031466
*031466 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000040
FINAL
C(E)=000000 000040
TIME PC MA SC FE AR MQ BR
IT0 031466 031466 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 121
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0316
IT1 031466 0 0 0 476000000003 0 000000000003
AT3 031466 0 0 0 000000000003 0 476000000003
AT6 031466 000003 0 0 000000000003 0 476000000003
FT1A 031466 000003 0 0 000000000003 0 000000000003
FT9 031467 000003 0 0 000000000003 0 000000000003
ET0 031467 000003 0 0 777777777777 0 000000000003
ST6 031467 000003 0 0 777777777777 0 000000000003
ST6A 031467 000003 0 0 777777777777 0 000000000003
ST9 031467 000003 0 0 777777777777 0 000000000003
*031467 MOVEI 1,000100
INITIAL
C(AC)=000000 000040
FINAL
C(AC)=000000 000100
TIME PC MA SC FE AR MQ BR
IT0 031467 031467 0 0 201040000100 0 000000000100
IT1 031467 0 0 0 201040000100 0 000000000100
AT3 031467 0 0 0 000000000100 0 201040000100
AT6 031467 0 0 0 000000000100 0 201040000100
FT1A 031467 0 0 0 000000000100 0 000000000100
FT9 031470 0 0 0 000000000100 0 000000000100
ET0 031470 0 0 0 000000000100 0 000000000100
ST1 031470 0 0 0 000000000100 0 000000000100
ST2 031470 0 0 0 000000000100 0 000000000100
ST9 031470 0 0 0 000000000100 0 000000000100
*031470 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031470 031470 0 0 201100000001 0 000000000001
IT1 031470 0 0 0 201100000001 0 000000000001
AT3 031470 0 0 0 000000000001 0 201100000001
AT6 031470 000001 0 0 000000000001 0 201100000001
FT1A 031470 000001 0 0 000000000001 0 000000000001
FT9 031471 000001 0 0 000000000001 0 000000000001
ET0 031471 000001 0 0 000000000001 0 000000000001
ST1 031471 000001 0 0 000000000001 0 000000000001
ST2 031471 000001 0 0 000000000001 0 000000000001
ST9 031471 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 122
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0317
*031471 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000100
TIME PC MA SC FE AR MQ BR
IT0 031471 031471 0 0 200142000000 0 000000000100
IT1 031471 0 0 0 200142000000 0 000000000100
AT1 031471 0 0 0 0 0 200142000000
AT2 031471 0 0 0 000000000001 0 200142000000
AT3 031471 0 0 0 000000000001 0 000000000001
AT6 031471 000001 0 0 000000000001 0 000000000001
FT0 031471 000001 0 0 000000000100 0 000000000001
FT1A 031471 000001 0 0 000000000100 0 000000000100
FT9 031472 000001 0 0 000000000100 0 000000000100
ET0 031472 000001 0 0 000000000100 0 000000000100
ST1 031472 000001 0 0 000000000100 0 000000000100
ST2 031472 000001 0 0 000000000100 0 000000000100
ST9 031472 000001 0 0 000000000100 0 000000000100
*031472 CAIE 3,000100
INITIAL
C(AC)=000000 000100
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031472 031472 0 0 302140000100 0 000000000100
IT1 031472 0 0 0 302140000100 0 000000000100
AT3 031472 0 0 0 000000000100 0 302140000100
AT6 031472 0 0 0 000000000100 0 302140000100
FT1A 031472 0 0 0 000000000100 0 000000000100
FT2 031472 0 0 0 0 0 000000000100
FT2RQ 031472 0 0 0 000000000100 0 000000000100
FT3 031472 0 0 0 000000000100 0 000000000100
FT9 031473 0 0 0 000000000100 0 000000000100
ET0 031474 0 0 0 0 0 000000000100
ST1A 031474 0 0 0 0 0 000000000100
ST9 031474 0 0 0 0 0 000000000100
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 123
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0318
*031474 JUMPA 0,031475
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031474 031474 0 0 324000031475 0 000000031475
IT1 031474 0 0 0 324000031475 0 000000031475
AT3 031474 0 0 0 000000031475 0 324000031475
AT6 031474 031475 0 0 000000031475 0 324000031475
FT1A 031474 031475 0 0 000000031475 0 000000031475
FT2 031474 031475 0 0 0 0 000000031475
FT2RQ 031474 031475 0 0 000000000017 0 000000031475
FT3 031474 031475 0 0 000000000017 0 000000031475
FT9 031475 031475 0 0 000000000017 0 000000031475
ET0 031475 031475 0 0 000000000017 0 000000031475
ST1A 031475 031475 0 0 000000000017 0 000000031475
ST9 031475 031475 0 0 000000000017 0 000000031475
*031475 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000100
FINAL
C(E)=000000 000100
TIME PC MA SC FE AR MQ BR
IT0 031475 031475 0 0 476000000003 0 000000000003
IT1 031475 0 0 0 476000000003 0 000000000003
AT3 031475 0 0 0 000000000003 0 476000000003
AT6 031475 000003 0 0 000000000003 0 476000000003
FT1A 031475 000003 0 0 000000000003 0 000000000003
FT9 031476 000003 0 0 000000000003 0 000000000003
ET0 031476 000003 0 0 777777777777 0 000000000003
ST6 031476 000003 0 0 777777777777 0 000000000003
ST6A 031476 000003 0 0 777777777777 0 000000000003
ST9 031476 000003 0 0 777777777777 0 000000000003
*031476 MOVEI 1,000200
INITIAL
C(AC)=000000 000100
FINAL
C(AC)=000000 000200
TIME PC MA SC FE AR MQ BR
IT0 031476 031476 0 0 201040000200 0 000000000200
IT1 031476 0 0 0 201040000200 0 000000000200
AT3 031476 0 0 0 000000000200 0 201040000200
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 124
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0319
AT6 031476 0 0 0 000000000200 0 201040000200
FT1A 031476 0 0 0 000000000200 0 000000000200
FT9 031477 0 0 0 000000000200 0 000000000200
ET0 031477 0 0 0 000000000200 0 000000000200
ST1 031477 0 0 0 000000000200 0 000000000200
ST2 031477 0 0 0 000000000200 0 000000000200
ST9 031477 0 0 0 000000000200 0 000000000200
*031477 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031477 031477 0 0 201100000001 0 000000000001
IT1 031477 0 0 0 201100000001 0 000000000001
AT3 031477 0 0 0 000000000001 0 201100000001
AT6 031477 000001 0 0 000000000001 0 201100000001
FT1A 031477 000001 0 0 000000000001 0 000000000001
FT9 0 000001 0 0 000000000001 0 000000000001
ET0 0 000001 0 0 000000000001 0 000000000001
ST1 0 000001 0 0 000000000001 0 000000000001
ST2 0 000001 0 0 000000000001 0 000000000001
ST9 0 000001 0 0 000000000001 0 000000000001
*031500 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000200
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 200142000000 0 000000000200
IT1 0 0 0 0 200142000000 0 000000000200
AT1 0 0 0 0 0 0 200142000000
AT2 0 0 0 0 000000000001 0 200142000000
AT3 0 0 0 0 000000000001 0 000000000001
AT6 0 000001 0 0 000000000001 0 000000000001
FT0 0 000001 0 0 000000000200 0 000000000001
FT1A 0 000001 0 0 000000000200 0 000000000200
FT9 031501 000001 0 0 000000000200 0 000000000200
ET0 031501 000001 0 0 000000000200 0 000000000200
ST1 031501 000001 0 0 000000000200 0 000000000200
ST2 031501 000001 0 0 000000000200 0 000000000200
ST9 031501 000001 0 0 000000000200 0 000000000200
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 125
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0320
*031501 CAIE 3,000200
INITIAL
C(AC)=000000 000200
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031501 031501 0 0 302140000200 0 000000000200
IT1 031501 0 0 0 302140000200 0 000000000200
AT3 031501 0 0 0 000000000200 0 302140000200
AT6 031501 0 0 0 000000000200 0 302140000200
FT1A 031501 0 0 0 000000000200 0 000000000200
FT2 031501 0 0 0 0 0 000000000200
FT2RQ 031501 0 0 0 000000000200 0 000000000200
FT3 031501 0 0 0 000000000200 0 000000000200
FT9 031502 0 0 0 000000000200 0 000000000200
ET0 031503 0 0 0 0 0 000000000200
ST1A 031503 0 0 0 0 0 000000000200
ST9 031503 0 0 0 0 0 000000000200
*031503 JUMPA 0,031504
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031503 031503 0 0 324000031504 0 000000031504
IT1 031503 0 0 0 324000031504 0 000000031504
AT3 031503 0 0 0 000000031504 0 324000031504
AT6 031503 031504 0 0 000000031504 0 324000031504
FT1A 031503 031504 0 0 000000031504 0 000000031504
FT2 031503 031504 0 0 0 0 000000031504
FT2RQ 031503 031504 0 0 000000000017 0 000000031504
FT3 031503 031504 0 0 000000000017 0 000000031504
FT9 031504 031504 0 0 000000000017 0 000000031504
ET0 031504 031504 0 0 000000000017 0 000000031504
ST1A 031504 031504 0 0 000000000017 0 000000031504
ST9 031504 031504 0 0 000000000017 0 000000031504
*031504 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000200
FINAL
C(E)=000000 000200
TIME PC MA SC FE AR MQ BR
IT0 031504 031504 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 126
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0321
IT1 031504 0 0 0 476000000003 0 000000000003
AT3 031504 0 0 0 000000000003 0 476000000003
AT6 031504 000003 0 0 000000000003 0 476000000003
FT1A 031504 000003 0 0 000000000003 0 000000000003
FT9 031505 000003 0 0 000000000003 0 000000000003
ET0 031505 000003 0 0 777777777777 0 000000000003
ST6 031505 000003 0 0 777777777777 0 000000000003
ST6A 031505 000003 0 0 777777777777 0 000000000003
ST9 031505 000003 0 0 777777777777 0 000000000003
*031505 MOVEI 1,000400
INITIAL
C(AC)=000000 000200
FINAL
C(AC)=000000 000400
TIME PC MA SC FE AR MQ BR
IT0 031505 031505 0 0 201040000400 0 000000000400
IT1 031505 0 0 0 201040000400 0 000000000400
AT3 031505 0 0 0 000000000400 0 201040000400
AT6 031505 0 0 0 000000000400 0 201040000400
FT1A 031505 0 0 0 000000000400 0 000000000400
FT9 031506 0 0 0 000000000400 0 000000000400
ET0 031506 0 0 0 000000000400 0 000000000400
ST1 031506 0 0 0 000000000400 0 000000000400
ST2 031506 0 0 0 000000000400 0 000000000400
ST9 031506 0 0 0 000000000400 0 000000000400
*031506 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031506 031506 0 0 201100000001 0 000000000001
IT1 031506 0 0 0 201100000001 0 000000000001
AT3 031506 0 0 0 000000000001 0 201100000001
AT6 031506 000001 0 0 000000000001 0 201100000001
FT1A 031506 000001 0 0 000000000001 0 000000000001
FT9 031507 000001 0 0 000000000001 0 000000000001
ET0 031507 000001 0 0 000000000001 0 000000000001
ST1 031507 000001 0 0 000000000001 0 000000000001
ST2 031507 000001 0 0 000000000001 0 000000000001
ST9 031507 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 127
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0322
*031507 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 000400
TIME PC MA SC FE AR MQ BR
IT0 031507 031507 0 0 200142000000 0 000000000400
IT1 031507 0 0 0 200142000000 0 000000000400
AT1 031507 0 0 0 0 0 200142000000
AT2 031507 0 0 0 000000000001 0 200142000000
AT3 031507 0 0 0 000000000001 0 000000000001
AT6 031507 000001 0 0 000000000001 0 000000000001
FT0 031507 000001 0 0 000000000400 0 000000000001
FT1A 031507 000001 0 0 000000000400 0 000000000400
FT9 031510 000001 0 0 000000000400 0 000000000400
ET0 031510 000001 0 0 000000000400 0 000000000400
ST1 031510 000001 0 0 000000000400 0 000000000400
ST2 031510 000001 0 0 000000000400 0 000000000400
ST9 031510 000001 0 0 000000000400 0 000000000400
*031510 CAIE 3,000400
INITIAL
C(AC)=000000 000400
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031510 031510 0 0 302140000400 0 000000000400
IT1 031510 0 0 0 302140000400 0 000000000400
AT3 031510 0 0 0 000000000400 0 302140000400
AT6 031510 0 0 0 000000000400 0 302140000400
FT1A 031510 0 0 0 000000000400 0 000000000400
FT2 031510 0 0 0 0 0 000000000400
FT2RQ 031510 0 0 0 000000000400 0 000000000400
FT3 031510 0 0 0 000000000400 0 000000000400
FT9 031511 0 0 0 000000000400 0 000000000400
ET0 031512 0 0 0 0 0 000000000400
ST1A 031512 0 0 0 0 0 000000000400
ST9 031512 0 0 0 0 0 000000000400
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 128
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0323
*031512 JUMPA 0,031513
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031512 031512 0 0 324000031513 0 000000031513
IT1 031512 0 0 0 324000031513 0 000000031513
AT3 031512 0 0 0 000000031513 0 324000031513
AT6 031512 031513 0 0 000000031513 0 324000031513
FT1A 031512 031513 0 0 000000031513 0 000000031513
FT2 031512 031513 0 0 0 0 000000031513
FT2RQ 031512 031513 0 0 000000000017 0 000000031513
FT3 031512 031513 0 0 000000000017 0 000000031513
FT9 031513 031513 0 0 000000000017 0 000000031513
ET0 031513 031513 0 0 000000000017 0 000000031513
ST1A 031513 031513 0 0 000000000017 0 000000031513
ST9 031513 031513 0 0 000000000017 0 000000031513
*031513 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 000400
FINAL
C(E)=000000 000400
TIME PC MA SC FE AR MQ BR
IT0 031513 031513 0 0 476000000003 0 000000000003
IT1 031513 0 0 0 476000000003 0 000000000003
AT3 031513 0 0 0 000000000003 0 476000000003
AT6 031513 000003 0 0 000000000003 0 476000000003
FT1A 031513 000003 0 0 000000000003 0 000000000003
FT9 031514 000003 0 0 000000000003 0 000000000003
ET0 031514 000003 0 0 777777777777 0 000000000003
ST6 031514 000003 0 0 777777777777 0 000000000003
ST6A 031514 000003 0 0 777777777777 0 000000000003
ST9 031514 000003 0 0 777777777777 0 000000000003
*031514 MOVEI 1,001000
INITIAL
C(AC)=000000 000400
FINAL
C(AC)=000000 001000
TIME PC MA SC FE AR MQ BR
IT0 031514 031514 0 0 201040001000 0 000000001000
IT1 031514 0 0 0 201040001000 0 000000001000
AT3 031514 0 0 0 000000001000 0 201040001000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 129
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0324
AT6 031514 0 0 0 000000001000 0 201040001000
FT1A 031514 0 0 0 000000001000 0 000000001000
FT9 031515 0 0 0 000000001000 0 000000001000
ET0 031515 0 0 0 000000001000 0 000000001000
ST1 031515 0 0 0 000000001000 0 000000001000
ST2 031515 0 0 0 000000001000 0 000000001000
ST9 031515 0 0 0 000000001000 0 000000001000
*031515 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031515 031515 0 0 201100000001 0 000000000001
IT1 031515 0 0 0 201100000001 0 000000000001
AT3 031515 0 0 0 000000000001 0 201100000001
AT6 031515 000001 0 0 000000000001 0 201100000001
FT1A 031515 000001 0 0 000000000001 0 000000000001
FT9 031516 000001 0 0 000000000001 0 000000000001
ET0 031516 000001 0 0 000000000001 0 000000000001
ST1 031516 000001 0 0 000000000001 0 000000000001
ST2 031516 000001 0 0 000000000001 0 000000000001
ST9 031516 000001 0 0 000000000001 0 000000000001
*031516 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 001000
TIME PC MA SC FE AR MQ BR
IT0 031516 031516 0 0 200142000000 0 000000001000
IT1 031516 0 0 0 200142000000 0 000000001000
AT1 031516 0 0 0 0 0 200142000000
AT2 031516 0 0 0 000000000001 0 200142000000
AT3 031516 0 0 0 000000000001 0 000000000001
AT6 031516 000001 0 0 000000000001 0 000000000001
FT0 031516 000001 0 0 000000001000 0 000000000001
FT1A 031516 000001 0 0 000000001000 0 000000001000
FT9 031517 000001 0 0 000000001000 0 000000001000
ET0 031517 000001 0 0 000000001000 0 000000001000
ST1 031517 000001 0 0 000000001000 0 000000001000
ST2 031517 000001 0 0 000000001000 0 000000001000
ST9 031517 000001 0 0 000000001000 0 000000001000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 130
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0325
*031517 CAIE 3,001000
INITIAL
C(AC)=000000 001000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031517 031517 0 0 302140001000 0 000000001000
IT1 031517 0 0 0 302140001000 0 000000001000
AT3 031517 0 0 0 000000001000 0 302140001000
AT6 031517 0 0 0 000000001000 0 302140001000
FT1A 031517 0 0 0 000000001000 0 000000001000
FT2 031517 0 0 0 0 0 000000001000
FT2RQ 031517 0 0 0 000000001000 0 000000001000
FT3 031517 0 0 0 000000001000 0 000000001000
FT9 031520 0 0 0 000000001000 0 000000001000
ET0 031521 0 0 0 0 0 000000001000
ST1A 031521 0 0 0 0 0 000000001000
ST9 031521 0 0 0 0 0 000000001000
*031521 JUMPA 0,031522
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031521 031521 0 0 324000031522 0 000000031522
IT1 031521 0 0 0 324000031522 0 000000031522
AT3 031521 0 0 0 000000031522 0 324000031522
AT6 031521 031522 0 0 000000031522 0 324000031522
FT1A 031521 031522 0 0 000000031522 0 000000031522
FT2 031521 031522 0 0 0 0 000000031522
FT2RQ 031521 031522 0 0 000000000017 0 000000031522
FT3 031521 031522 0 0 000000000017 0 000000031522
FT9 031522 031522 0 0 000000000017 0 000000031522
ET0 031522 031522 0 0 000000000017 0 000000031522
ST1A 031522 031522 0 0 000000000017 0 000000031522
ST9 031522 031522 0 0 000000000017 0 000000031522
*031522 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 001000
FINAL
C(E)=000000 001000
TIME PC MA SC FE AR MQ BR
IT0 031522 031522 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 131
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0326
IT1 031522 0 0 0 476000000003 0 000000000003
AT3 031522 0 0 0 000000000003 0 476000000003
AT6 031522 000003 0 0 000000000003 0 476000000003
FT1A 031522 000003 0 0 000000000003 0 000000000003
FT9 031523 000003 0 0 000000000003 0 000000000003
ET0 031523 000003 0 0 777777777777 0 000000000003
ST6 031523 000003 0 0 777777777777 0 000000000003
ST6A 031523 000003 0 0 777777777777 0 000000000003
ST9 031523 000003 0 0 777777777777 0 000000000003
*031523 MOVEI 1,002000
INITIAL
C(AC)=000000 001000
FINAL
C(AC)=000000 002000
TIME PC MA SC FE AR MQ BR
IT0 031523 031523 0 0 201040002000 0 000000002000
IT1 031523 0 0 0 201040002000 0 000000002000
AT3 031523 0 0 0 000000002000 0 201040002000
AT6 031523 0 0 0 000000002000 0 201040002000
FT1A 031523 0 0 0 000000002000 0 000000002000
FT9 031524 0 0 0 000000002000 0 000000002000
ET0 031524 0 0 0 000000002000 0 000000002000
ST1 031524 0 0 0 000000002000 0 000000002000
ST2 031524 0 0 0 000000002000 0 000000002000
ST9 031524 0 0 0 000000002000 0 000000002000
*031524 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031524 031524 0 0 201100000001 0 000000000001
IT1 031524 0 0 0 201100000001 0 000000000001
AT3 031524 0 0 0 000000000001 0 201100000001
AT6 031524 000001 0 0 000000000001 0 201100000001
FT1A 031524 000001 0 0 000000000001 0 000000000001
FT9 031525 000001 0 0 000000000001 0 000000000001
ET0 031525 000001 0 0 000000000001 0 000000000001
ST1 031525 000001 0 0 000000000001 0 000000000001
ST2 031525 000001 0 0 000000000001 0 000000000001
ST9 031525 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 132
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0327
*031525 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 002000
TIME PC MA SC FE AR MQ BR
IT0 031525 031525 0 0 200142000000 0 000000002000
IT1 031525 0 0 0 200142000000 0 000000002000
AT1 031525 0 0 0 0 0 200142000000
AT2 031525 0 0 0 000000000001 0 200142000000
AT3 031525 0 0 0 000000000001 0 000000000001
AT6 031525 000001 0 0 000000000001 0 000000000001
FT0 031525 000001 0 0 000000002000 0 000000000001
FT1A 031525 000001 0 0 000000002000 0 000000002000
FT9 031526 000001 0 0 000000002000 0 000000002000
ET0 031526 000001 0 0 000000002000 0 000000002000
ST1 031526 000001 0 0 000000002000 0 000000002000
ST2 031526 000001 0 0 000000002000 0 000000002000
ST9 031526 000001 0 0 000000002000 0 000000002000
*031526 CAIE 3,002000
INITIAL
C(AC)=000000 002000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031526 031526 0 0 302140002000 0 000000002000
IT1 031526 0 0 0 302140002000 0 000000002000
AT3 031526 0 0 0 000000002000 0 302140002000
AT6 031526 0 0 0 000000002000 0 302140002000
FT1A 031526 0 0 0 000000002000 0 000000002000
FT2 031526 0 0 0 0 0 000000002000
FT2RQ 031526 0 0 0 000000002000 0 000000002000
FT3 031526 0 0 0 000000002000 0 000000002000
FT9 031527 0 0 0 000000002000 0 000000002000
ET0 031530 0 0 0 0 0 000000002000
ST1A 031530 0 0 0 0 0 000000002000
ST9 031530 0 0 0 0 0 000000002000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 133
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0328
*031530 JUMPA 0,031531
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031530 031530 0 0 324000031531 0 000000031531
IT1 031530 0 0 0 324000031531 0 000000031531
AT3 031530 0 0 0 000000031531 0 324000031531
AT6 031530 031531 0 0 000000031531 0 324000031531
FT1A 031530 031531 0 0 000000031531 0 000000031531
FT2 031530 031531 0 0 0 0 000000031531
FT2RQ 031530 031531 0 0 000000000017 0 000000031531
FT3 031530 031531 0 0 000000000017 0 000000031531
FT9 031531 031531 0 0 000000000017 0 000000031531
ET0 031531 031531 0 0 000000000017 0 000000031531
ST1A 031531 031531 0 0 000000000017 0 000000031531
ST9 031531 031531 0 0 000000000017 0 000000031531
*031531 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 002000
FINAL
C(E)=000000 002000
TIME PC MA SC FE AR MQ BR
IT0 031531 031531 0 0 476000000003 0 000000000003
IT1 031531 0 0 0 476000000003 0 000000000003
AT3 031531 0 0 0 000000000003 0 476000000003
AT6 031531 000003 0 0 000000000003 0 476000000003
FT1A 031531 000003 0 0 000000000003 0 000000000003
FT9 031532 000003 0 0 000000000003 0 000000000003
ET0 031532 000003 0 0 777777777777 0 000000000003
ST6 031532 000003 0 0 777777777777 0 000000000003
ST6A 031532 000003 0 0 777777777777 0 000000000003
ST9 031532 000003 0 0 777777777777 0 000000000003
*031532 MOVEI 1,004000
INITIAL
C(AC)=000000 002000
FINAL
C(AC)=000000 004000
TIME PC MA SC FE AR MQ BR
IT0 031532 031532 0 0 201040004000 0 000000004000
IT1 031532 0 0 0 201040004000 0 000000004000
AT3 031532 0 0 0 000000004000 0 201040004000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 134
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0329
AT6 031532 0 0 0 000000004000 0 201040004000
FT1A 031532 0 0 0 000000004000 0 000000004000
FT9 031533 0 0 0 000000004000 0 000000004000
ET0 031533 0 0 0 000000004000 0 000000004000
ST1 031533 0 0 0 000000004000 0 000000004000
ST2 031533 0 0 0 000000004000 0 000000004000
ST9 031533 0 0 0 000000004000 0 000000004000
*031533 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031533 031533 0 0 201100000001 0 000000000001
IT1 031533 0 0 0 201100000001 0 000000000001
AT3 031533 0 0 0 000000000001 0 201100000001
AT6 031533 000001 0 0 000000000001 0 201100000001
FT1A 031533 000001 0 0 000000000001 0 000000000001
FT9 031534 000001 0 0 000000000001 0 000000000001
ET0 031534 000001 0 0 000000000001 0 000000000001
ST1 031534 000001 0 0 000000000001 0 000000000001
ST2 031534 000001 0 0 000000000001 0 000000000001
ST9 031534 000001 0 0 000000000001 0 000000000001
*031534 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 004000
TIME PC MA SC FE AR MQ BR
IT0 031534 031534 0 0 200142000000 0 000000004000
IT1 031534 0 0 0 200142000000 0 000000004000
AT1 031534 0 0 0 0 0 200142000000
AT2 031534 0 0 0 000000000001 0 200142000000
AT3 031534 0 0 0 000000000001 0 000000000001
AT6 031534 000001 0 0 000000000001 0 000000000001
FT0 031534 000001 0 0 000000004000 0 000000000001
FT1A 031534 000001 0 0 000000004000 0 000000004000
FT9 031535 000001 0 0 000000004000 0 000000004000
ET0 031535 000001 0 0 000000004000 0 000000004000
ST1 031535 000001 0 0 000000004000 0 000000004000
ST2 031535 000001 0 0 000000004000 0 000000004000
ST9 031535 000001 0 0 000000004000 0 000000004000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 135
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0330
*031535 CAIE 3,004000
INITIAL
C(AC)=000000 004000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031535 031535 0 0 302140004000 0 000000004000
IT1 031535 0 0 0 302140004000 0 000000004000
AT3 031535 0 0 0 000000004000 0 302140004000
AT6 031535 0 0 0 000000004000 0 302140004000
FT1A 031535 0 0 0 000000004000 0 000000004000
FT2 031535 0 0 0 0 0 000000004000
FT2RQ 031535 0 0 0 000000004000 0 000000004000
FT3 031535 0 0 0 000000004000 0 000000004000
FT9 031536 0 0 0 000000004000 0 000000004000
ET0 031537 0 0 0 0 0 000000004000
ST1A 031537 0 0 0 0 0 000000004000
ST9 031537 0 0 0 0 0 000000004000
*031537 JUMPA 0,031540
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031537 031537 0 0 324000031540 0 000000031540
IT1 031537 0 0 0 324000031540 0 000000031540
AT3 031537 0 0 0 000000031540 0 324000031540
AT6 031537 031540 0 0 000000031540 0 324000031540
FT1A 031537 031540 0 0 000000031540 0 000000031540
FT2 031537 031540 0 0 0 0 000000031540
FT2RQ 031537 031540 0 0 000000000017 0 000000031540
FT3 031537 031540 0 0 000000000017 0 000000031540
FT9 031540 031540 0 0 000000000017 0 000000031540
ET0 031540 031540 0 0 000000000017 0 000000031540
ST1A 031540 031540 0 0 000000000017 0 000000031540
ST9 031540 031540 0 0 000000000017 0 000000031540
*031540 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 004000
FINAL
C(E)=000000 004000
TIME PC MA SC FE AR MQ BR
IT0 031540 031540 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 136
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0331
IT1 031540 0 0 0 476000000003 0 000000000003
AT3 031540 0 0 0 000000000003 0 476000000003
AT6 031540 000003 0 0 000000000003 0 476000000003
FT1A 031540 000003 0 0 000000000003 0 000000000003
FT9 031541 000003 0 0 000000000003 0 000000000003
ET0 031541 000003 0 0 777777777777 0 000000000003
ST6 031541 000003 0 0 777777777777 0 000000000003
ST6A 031541 000003 0 0 777777777777 0 000000000003
ST9 031541 000003 0 0 777777777777 0 000000000003
*031541 MOVEI 1,010000
INITIAL
C(AC)=000000 004000
FINAL
C(AC)=000000 010000
TIME PC MA SC FE AR MQ BR
IT0 031541 031541 0 0 201040010000 0 000000010000
IT1 031541 0 0 0 201040010000 0 000000010000
AT3 031541 0 0 0 000000010000 0 201040010000
AT6 031541 0 0 0 000000010000 0 201040010000
FT1A 031541 0 0 0 000000010000 0 000000010000
FT9 031542 0 0 0 000000010000 0 000000010000
ET0 031542 0 0 0 000000010000 0 000000010000
ST1 031542 0 0 0 000000010000 0 000000010000
ST2 031542 0 0 0 000000010000 0 000000010000
ST9 031542 0 0 0 000000010000 0 000000010000
*031542 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031542 031542 0 0 201100000001 0 000000000001
IT1 031542 0 0 0 201100000001 0 000000000001
AT3 031542 0 0 0 000000000001 0 201100000001
AT6 031542 000001 0 0 000000000001 0 201100000001
FT1A 031542 000001 0 0 000000000001 0 000000000001
FT9 031543 000001 0 0 000000000001 0 000000000001
ET0 031543 000001 0 0 000000000001 0 000000000001
ST1 031543 000001 0 0 000000000001 0 000000000001
ST2 031543 000001 0 0 000000000001 0 000000000001
ST9 031543 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 137
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0332
*031543 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 010000
TIME PC MA SC FE AR MQ BR
IT0 031543 031543 0 0 200142000000 0 000000010000
IT1 031543 0 0 0 200142000000 0 000000010000
AT1 031543 0 0 0 0 0 200142000000
AT2 031543 0 0 0 000000000001 0 200142000000
AT3 031543 0 0 0 000000000001 0 000000000001
AT6 031543 000001 0 0 000000000001 0 000000000001
FT0 031543 000001 0 0 000000010000 0 000000000001
FT1A 031543 000001 0 0 000000010000 0 000000010000
FT9 031544 000001 0 0 000000010000 0 000000010000
ET0 031544 000001 0 0 000000010000 0 000000010000
ST1 031544 000001 0 0 000000010000 0 000000010000
ST2 031544 000001 0 0 000000010000 0 000000010000
ST9 031544 000001 0 0 000000010000 0 000000010000
*031544 CAIE 3,010000
INITIAL
C(AC)=000000 010000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031544 031544 0 0 302140010000 0 000000010000
IT1 031544 0 0 0 302140010000 0 000000010000
AT3 031544 0 0 0 000000010000 0 302140010000
AT6 031544 0 0 0 000000010000 0 302140010000
FT1A 031544 0 0 0 000000010000 0 000000010000
FT2 031544 0 0 0 0 0 000000010000
FT2RQ 031544 0 0 0 000000010000 0 000000010000
FT3 031544 0 0 0 000000010000 0 000000010000
FT9 031545 0 0 0 000000010000 0 000000010000
ET0 031546 0 0 0 0 0 000000010000
ST1A 031546 0 0 0 0 0 000000010000
ST9 031546 0 0 0 0 0 000000010000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 138
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0333
*031546 JUMPA 0,031547
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031546 031546 0 0 324000031547 0 000000031547
IT1 031546 0 0 0 324000031547 0 000000031547
AT3 031546 0 0 0 000000031547 0 324000031547
AT6 031546 031547 0 0 000000031547 0 324000031547
FT1A 031546 031547 0 0 000000031547 0 000000031547
FT2 031546 031547 0 0 0 0 000000031547
FT2RQ 031546 031547 0 0 000000000017 0 000000031547
FT3 031546 031547 0 0 000000000017 0 000000031547
FT9 031547 031547 0 0 000000000017 0 000000031547
ET0 031547 031547 0 0 000000000017 0 000000031547
ST1A 031547 031547 0 0 000000000017 0 000000031547
ST9 031547 031547 0 0 000000000017 0 000000031547
*031547 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 010000
FINAL
C(E)=000000 010000
TIME PC MA SC FE AR MQ BR
IT0 031547 031547 0 0 476000000003 0 000000000003
IT1 031547 0 0 0 476000000003 0 000000000003
AT3 031547 0 0 0 000000000003 0 476000000003
AT6 031547 000003 0 0 000000000003 0 476000000003
FT1A 031547 000003 0 0 000000000003 0 000000000003
FT9 031550 000003 0 0 000000000003 0 000000000003
ET0 031550 000003 0 0 777777777777 0 000000000003
ST6 031550 000003 0 0 777777777777 0 000000000003
ST6A 031550 000003 0 0 777777777777 0 000000000003
ST9 031550 000003 0 0 777777777777 0 000000000003
*031550 MOVEI 1,020000
INITIAL
C(AC)=000000 010000
FINAL
C(AC)=000000 020000
TIME PC MA SC FE AR MQ BR
IT0 031550 031550 0 0 201040020000 0 000000020000
IT1 031550 0 0 0 201040020000 0 000000020000
AT3 031550 0 0 0 000000020000 0 201040020000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 139
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0334
AT6 031550 0 0 0 000000020000 0 201040020000
FT1A 031550 0 0 0 000000020000 0 000000020000
FT9 031551 0 0 0 000000020000 0 000000020000
ET0 031551 0 0 0 000000020000 0 000000020000
ST1 031551 0 0 0 000000020000 0 000000020000
ST2 031551 0 0 0 000000020000 0 000000020000
ST9 031551 0 0 0 000000020000 0 000000020000
*031551 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031551 031551 0 0 201100000001 0 000000000001
IT1 031551 0 0 0 201100000001 0 000000000001
AT3 031551 0 0 0 000000000001 0 201100000001
AT6 031551 000001 0 0 000000000001 0 201100000001
FT1A 031551 000001 0 0 000000000001 0 000000000001
FT9 031552 000001 0 0 000000000001 0 000000000001
ET0 031552 000001 0 0 000000000001 0 000000000001
ST1 031552 000001 0 0 000000000001 0 000000000001
ST2 031552 000001 0 0 000000000001 0 000000000001
ST9 031552 000001 0 0 000000000001 0 000000000001
*031552 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 020000
TIME PC MA SC FE AR MQ BR
IT0 031552 031552 0 0 200142000000 0 000000020000
IT1 031552 0 0 0 200142000000 0 000000020000
AT1 031552 0 0 0 0 0 200142000000
AT2 031552 0 0 0 000000000001 0 200142000000
AT3 031552 0 0 0 000000000001 0 000000000001
AT6 031552 000001 0 0 000000000001 0 000000000001
FT0 031552 000001 0 0 000000020000 0 000000000001
FT1A 031552 000001 0 0 000000020000 0 000000020000
FT9 031553 000001 0 0 000000020000 0 000000020000
ET0 031553 000001 0 0 000000020000 0 000000020000
ST1 031553 000001 0 0 000000020000 0 000000020000
ST2 031553 000001 0 0 000000020000 0 000000020000
ST9 031553 000001 0 0 000000020000 0 000000020000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 140
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0335
*031553 CAIE 3,020000
INITIAL
C(AC)=000000 020000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031553 031553 0 0 302140020000 0 000000020000
IT1 031553 0 0 0 302140020000 0 000000020000
AT3 031553 0 0 0 000000020000 0 302140020000
AT6 031553 0 0 0 000000020000 0 302140020000
FT1A 031553 0 0 0 000000020000 0 000000020000
FT2 031553 0 0 0 0 0 000000020000
FT2RQ 031553 0 0 0 000000020000 0 000000020000
FT3 031553 0 0 0 000000020000 0 000000020000
FT9 031554 0 0 0 000000020000 0 000000020000
ET0 031555 0 0 0 0 0 000000020000
ST1A 031555 0 0 0 0 0 000000020000
ST9 031555 0 0 0 0 0 000000020000
*031555 JUMPA 0,031556
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031555 031555 0 0 324000031556 0 000000031556
IT1 031555 0 0 0 324000031556 0 000000031556
AT3 031555 0 0 0 000000031556 0 324000031556
AT6 031555 031556 0 0 000000031556 0 324000031556
FT1A 031555 031556 0 0 000000031556 0 000000031556
FT2 031555 031556 0 0 0 0 000000031556
FT2RQ 031555 031556 0 0 000000000017 0 000000031556
FT3 031555 031556 0 0 000000000017 0 000000031556
FT9 031556 031556 0 0 000000000017 0 000000031556
ET0 031556 031556 0 0 000000000017 0 000000031556
ST1A 031556 031556 0 0 000000000017 0 000000031556
ST9 031556 031556 0 0 000000000017 0 000000031556
*031556 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 020000
FINAL
C(E)=000000 020000
TIME PC MA SC FE AR MQ BR
IT0 031556 031556 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 141
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0336
IT1 031556 0 0 0 476000000003 0 000000000003
AT3 031556 0 0 0 000000000003 0 476000000003
AT6 031556 000003 0 0 000000000003 0 476000000003
FT1A 031556 000003 0 0 000000000003 0 000000000003
FT9 031557 000003 0 0 000000000003 0 000000000003
ET0 031557 000003 0 0 777777777777 0 000000000003
ST6 031557 000003 0 0 777777777777 0 000000000003
ST6A 031557 000003 0 0 777777777777 0 000000000003
ST9 031557 000003 0 0 777777777777 0 000000000003
*031557 MOVEI 1,040000
INITIAL
C(AC)=000000 020000
FINAL
C(AC)=000000 040000
TIME PC MA SC FE AR MQ BR
IT0 031557 031557 0 0 201040040000 0 000000040000
IT1 031557 0 0 0 201040040000 0 000000040000
AT3 031557 0 0 0 000000040000 0 201040040000
AT6 031557 0 0 0 000000040000 0 201040040000
FT1A 031557 0 0 0 000000040000 0 000000040000
FT9 031560 0 0 0 000000040000 0 000000040000
ET0 031560 0 0 0 000000040000 0 000000040000
ST1 031560 0 0 0 000000040000 0 000000040000
ST2 031560 0 0 0 000000040000 0 000000040000
ST9 031560 0 0 0 000000040000 0 000000040000
*031560 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031560 031560 0 0 201100000001 0 000000000001
IT1 031560 0 0 0 201100000001 0 000000000001
AT3 031560 0 0 0 000000000001 0 201100000001
AT6 031560 000001 0 0 000000000001 0 201100000001
FT1A 031560 000001 0 0 000000000001 0 000000000001
FT9 031561 000001 0 0 000000000001 0 000000000001
ET0 031561 000001 0 0 000000000001 0 000000000001
ST1 031561 000001 0 0 000000000001 0 000000000001
ST2 031561 000001 0 0 000000000001 0 000000000001
ST9 031561 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 142
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0337
*031561 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 040000
TIME PC MA SC FE AR MQ BR
IT0 031561 031561 0 0 200142000000 0 000000040000
IT1 031561 0 0 0 200142000000 0 000000040000
AT1 031561 0 0 0 0 0 200142000000
AT2 031561 0 0 0 000000000001 0 200142000000
AT3 031561 0 0 0 000000000001 0 000000000001
AT6 031561 000001 0 0 000000000001 0 000000000001
FT0 031561 000001 0 0 000000040000 0 000000000001
FT1A 031561 000001 0 0 000000040000 0 000000040000
FT9 031562 000001 0 0 000000040000 0 000000040000
ET0 031562 000001 0 0 000000040000 0 000000040000
ST1 031562 000001 0 0 000000040000 0 000000040000
ST2 031562 000001 0 0 000000040000 0 000000040000
ST9 031562 000001 0 0 000000040000 0 000000040000
*031562 CAIE 3,040000
INITIAL
C(AC)=000000 040000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031562 031562 0 0 302140040000 0 000000040000
IT1 031562 0 0 0 302140040000 0 000000040000
AT3 031562 0 0 0 000000040000 0 302140040000
AT6 031562 0 0 0 000000040000 0 302140040000
FT1A 031562 0 0 0 000000040000 0 000000040000
FT2 031562 0 0 0 0 0 000000040000
FT2RQ 031562 0 0 0 000000040000 0 000000040000
FT3 031562 0 0 0 000000040000 0 000000040000
FT9 031563 0 0 0 000000040000 0 000000040000
ET0 031564 0 0 0 0 0 000000040000
ST1A 031564 0 0 0 0 0 000000040000
ST9 031564 0 0 0 0 0 000000040000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 143
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0338
*031564 JUMPA 0,031565
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031564 031564 0 0 324000031565 0 000000031565
IT1 031564 0 0 0 324000031565 0 000000031565
AT3 031564 0 0 0 000000031565 0 324000031565
AT6 031564 031565 0 0 000000031565 0 324000031565
FT1A 031564 031565 0 0 000000031565 0 000000031565
FT2 031564 031565 0 0 0 0 000000031565
FT2RQ 031564 031565 0 0 000000000017 0 000000031565
FT3 031564 031565 0 0 000000000017 0 000000031565
FT9 031565 031565 0 0 000000000017 0 000000031565
ET0 031565 031565 0 0 000000000017 0 000000031565
ST1A 031565 031565 0 0 000000000017 0 000000031565
ST9 031565 031565 0 0 000000000017 0 000000031565
*031565 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 040000
FINAL
C(E)=000000 040000
TIME PC MA SC FE AR MQ BR
IT0 031565 031565 0 0 476000000003 0 000000000003
IT1 031565 0 0 0 476000000003 0 000000000003
AT3 031565 0 0 0 000000000003 0 476000000003
AT6 031565 000003 0 0 000000000003 0 476000000003
FT1A 031565 000003 0 0 000000000003 0 000000000003
FT9 031566 000003 0 0 000000000003 0 000000000003
ET0 031566 000003 0 0 777777777777 0 000000000003
ST6 031566 000003 0 0 777777777777 0 000000000003
ST6A 031566 000003 0 0 777777777777 0 000000000003
ST9 031566 000003 0 0 777777777777 0 000000000003
*031566 MOVEI 1,100000
INITIAL
C(AC)=000000 040000
FINAL
C(AC)=000000 100000
TIME PC MA SC FE AR MQ BR
IT0 031566 031566 0 0 201040100000 0 000000100000
IT1 031566 0 0 0 201040100000 0 000000100000
AT3 031566 0 0 0 000000100000 0 201040100000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 144
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0339
AT6 031566 0 0 0 000000100000 0 201040100000
FT1A 031566 0 0 0 000000100000 0 000000100000
FT9 031567 0 0 0 000000100000 0 000000100000
ET0 031567 0 0 0 000000100000 0 000000100000
ST1 031567 0 0 0 000000100000 0 000000100000
ST2 031567 0 0 0 000000100000 0 000000100000
ST9 031567 0 0 0 000000100000 0 000000100000
*031567 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031567 031567 0 0 201100000001 0 000000000001
IT1 031567 0 0 0 201100000001 0 000000000001
AT3 031567 0 0 0 000000000001 0 201100000001
AT6 031567 000001 0 0 000000000001 0 201100000001
FT1A 031567 000001 0 0 000000000001 0 000000000001
FT9 031570 000001 0 0 000000000001 0 000000000001
ET0 031570 000001 0 0 000000000001 0 000000000001
ST1 031570 000001 0 0 000000000001 0 000000000001
ST2 031570 000001 0 0 000000000001 0 000000000001
ST9 031570 000001 0 0 000000000001 0 000000000001
*031570 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 100000
TIME PC MA SC FE AR MQ BR
IT0 031570 031570 0 0 200142000000 0 000000100000
IT1 031570 0 0 0 200142000000 0 000000100000
AT1 031570 0 0 0 0 0 200142000000
AT2 031570 0 0 0 000000000001 0 200142000000
AT3 031570 0 0 0 000000000001 0 000000000001
AT6 031570 000001 0 0 000000000001 0 000000000001
FT0 031570 000001 0 0 000000100000 0 000000000001
FT1A 031570 000001 0 0 000000100000 0 000000100000
FT9 031571 000001 0 0 000000100000 0 000000100000
ET0 031571 000001 0 0 000000100000 0 000000100000
ST1 031571 000001 0 0 000000100000 0 000000100000
ST2 031571 000001 0 0 000000100000 0 000000100000
ST9 031571 000001 0 0 000000100000 0 000000100000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 145
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0340
*031571 CAIE 3,100000
INITIAL
C(AC)=000000 100000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031571 031571 0 0 302140100000 0 000000100000
IT1 031571 0 0 0 302140100000 0 000000100000
AT3 031571 0 0 0 000000100000 0 302140100000
AT6 031571 0 0 0 000000100000 0 302140100000
FT1A 031571 0 0 0 000000100000 0 000000100000
FT2 031571 0 0 0 0 0 000000100000
FT2RQ 031571 0 0 0 000000100000 0 000000100000
FT3 031571 0 0 0 000000100000 0 000000100000
FT9 031572 0 0 0 000000100000 0 000000100000
ET0 031573 0 0 0 0 0 000000100000
ST1A 031573 0 0 0 0 0 000000100000
ST9 031573 0 0 0 0 0 000000100000
*031573 JUMPA 0,031574
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031573 031573 0 0 324000031574 0 000000031574
IT1 031573 0 0 0 324000031574 0 000000031574
AT3 031573 0 0 0 000000031574 0 324000031574
AT6 031573 031574 0 0 000000031574 0 324000031574
FT1A 031573 031574 0 0 000000031574 0 000000031574
FT2 031573 031574 0 0 0 0 000000031574
FT2RQ 031573 031574 0 0 000000000017 0 000000031574
FT3 031573 031574 0 0 000000000017 0 000000031574
FT9 031574 031574 0 0 000000000017 0 000000031574
ET0 031574 031574 0 0 000000000017 0 000000031574
ST1A 031574 031574 0 0 000000000017 0 000000031574
ST9 031574 031574 0 0 000000000017 0 000000031574
*031574 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 100000
FINAL
C(E)=000000 100000
TIME PC MA SC FE AR MQ BR
IT0 031574 031574 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 146
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0341
IT1 031574 0 0 0 476000000003 0 000000000003
AT3 031574 0 0 0 000000000003 0 476000000003
AT6 031574 000003 0 0 000000000003 0 476000000003
FT1A 031574 000003 0 0 000000000003 0 000000000003
FT9 031575 000003 0 0 000000000003 0 000000000003
ET0 031575 000003 0 0 777777777777 0 000000000003
ST6 031575 000003 0 0 777777777777 0 000000000003
ST6A 031575 000003 0 0 777777777777 0 000000000003
ST9 031575 000003 0 0 777777777777 0 000000000003
*031575 MOVEI 1,200000
INITIAL
C(AC)=000000 100000
FINAL
C(AC)=000000 200000
TIME PC MA SC FE AR MQ BR
IT0 031575 031575 0 0 201040200000 0 000000200000
IT1 031575 0 0 0 201040200000 0 000000200000
AT3 031575 0 0 0 000000200000 0 201040200000
AT6 031575 0 0 0 000000200000 0 201040200000
FT1A 031575 0 0 0 000000200000 0 000000200000
FT9 031576 0 0 0 000000200000 0 000000200000
ET0 031576 0 0 0 000000200000 0 000000200000
ST1 031576 0 0 0 000000200000 0 000000200000
ST2 031576 0 0 0 000000200000 0 000000200000
ST9 031576 0 0 0 000000200000 0 000000200000
*031576 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031576 031576 0 0 201100000001 0 000000000001
IT1 031576 0 0 0 201100000001 0 000000000001
AT3 031576 0 0 0 000000000001 0 201100000001
AT6 031576 000001 0 0 000000000001 0 201100000001
FT1A 031576 000001 0 0 000000000001 0 000000000001
FT9 031577 000001 0 0 000000000001 0 000000000001
ET0 031577 000001 0 0 000000000001 0 000000000001
ST1 031577 000001 0 0 000000000001 0 000000000001
ST2 031577 000001 0 0 000000000001 0 000000000001
ST9 031577 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 147
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0342
*031577 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 200000
TIME PC MA SC FE AR MQ BR
IT0 031577 031577 0 0 200142000000 0 000000200000
IT1 031577 0 0 0 200142000000 0 000000200000
AT1 031577 0 0 0 0 0 200142000000
AT2 031577 0 0 0 000000000001 0 200142000000
AT3 031577 0 0 0 000000000001 0 000000000001
AT6 031577 000001 0 0 000000000001 0 000000000001
FT0 031577 000001 0 0 000000200000 0 000000000001
FT1A 031577 000001 0 0 000000200000 0 000000200000
FT9 0 000001 0 0 000000200000 0 000000200000
ET0 0 000001 0 0 000000200000 0 000000200000
ST1 0 000001 0 0 000000200000 0 000000200000
ST2 0 000001 0 0 000000200000 0 000000200000
ST9 0 000001 0 0 000000200000 0 000000200000
*031600 CAIE 3,200000
INITIAL
C(AC)=000000 200000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 302140200000 0 000000200000
IT1 0 0 0 0 302140200000 0 000000200000
AT3 0 0 0 0 000000200000 0 302140200000
AT6 0 0 0 0 000000200000 0 302140200000
FT1A 0 0 0 0 000000200000 0 000000200000
FT2 0 0 0 0 0 0 000000200000
FT2RQ 0 0 0 0 000000200000 0 000000200000
FT3 0 0 0 0 000000200000 0 000000200000
FT9 031601 0 0 0 000000200000 0 000000200000
ET0 031602 0 0 0 0 0 000000200000
ST1A 031602 0 0 0 0 0 000000200000
ST9 031602 0 0 0 0 0 000000200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 148
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0343
*031602 JUMPA 0,031603
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031602 031602 0 0 324000031603 0 000000031603
IT1 031602 0 0 0 324000031603 0 000000031603
AT3 031602 0 0 0 000000031603 0 324000031603
AT6 031602 031603 0 0 000000031603 0 324000031603
FT1A 031602 031603 0 0 000000031603 0 000000031603
FT2 031602 031603 0 0 0 0 000000031603
FT2RQ 031602 031603 0 0 000000000017 0 000000031603
FT3 031602 031603 0 0 000000000017 0 000000031603
FT9 031603 031603 0 0 000000000017 0 000000031603
ET0 031603 031603 0 0 000000000017 0 000000031603
ST1A 031603 031603 0 0 000000000017 0 000000031603
ST9 031603 031603 0 0 000000000017 0 000000031603
*031603 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 200000
FINAL
C(E)=000000 200000
TIME PC MA SC FE AR MQ BR
IT0 031603 031603 0 0 476000000003 0 000000000003
IT1 031603 0 0 0 476000000003 0 000000000003
AT3 031603 0 0 0 000000000003 0 476000000003
AT6 031603 000003 0 0 000000000003 0 476000000003
FT1A 031603 000003 0 0 000000000003 0 000000000003
FT9 031604 000003 0 0 000000000003 0 000000000003
ET0 031604 000003 0 0 777777777777 0 000000000003
ST6 031604 000003 0 0 777777777777 0 000000000003
ST6A 031604 000003 0 0 777777777777 0 000000000003
ST9 031604 000003 0 0 777777777777 0 000000000003
*031604 MOVEI 1,400000
INITIAL
C(AC)=000000 200000
FINAL
C(AC)=000000 400000
TIME PC MA SC FE AR MQ BR
IT0 031604 031604 0 0 201040400000 0 000000400000
IT1 031604 0 0 0 201040400000 0 000000400000
AT3 031604 0 0 0 000000400000 0 201040400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 149
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0344
AT6 031604 0 0 0 000000400000 0 201040400000
FT1A 031604 0 0 0 000000400000 0 000000400000
FT9 031605 0 0 0 000000400000 0 000000400000
ET0 031605 0 0 0 000000400000 0 000000400000
ST1 031605 0 0 0 000000400000 0 000000400000
ST2 031605 0 0 0 000000400000 0 000000400000
ST9 031605 0 0 0 000000400000 0 000000400000
*031605 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031605 031605 0 0 201100000001 0 000000000001
IT1 031605 0 0 0 201100000001 0 000000000001
AT3 031605 0 0 0 000000000001 0 201100000001
AT6 031605 000001 0 0 000000000001 0 201100000001
FT1A 031605 000001 0 0 000000000001 0 000000000001
FT9 031606 000001 0 0 000000000001 0 000000000001
ET0 031606 000001 0 0 000000000001 0 000000000001
ST1 031606 000001 0 0 000000000001 0 000000000001
ST2 031606 000001 0 0 000000000001 0 000000000001
ST9 031606 000001 0 0 000000000001 0 000000000001
*031606 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000000 400000
TIME PC MA SC FE AR MQ BR
IT0 031606 031606 0 0 200142000000 0 000000400000
IT1 031606 0 0 0 200142000000 0 000000400000
AT1 031606 0 0 0 0 0 200142000000
AT2 031606 0 0 0 000000000001 0 200142000000
AT3 031606 0 0 0 000000000001 0 000000000001
AT6 031606 000001 0 0 000000000001 0 000000000001
FT0 031606 000001 0 0 000000400000 0 000000000001
FT1A 031606 000001 0 0 000000400000 0 000000400000
FT9 031607 000001 0 0 000000400000 0 000000400000
ET0 031607 000001 0 0 000000400000 0 000000400000
ST1 031607 000001 0 0 000000400000 0 000000400000
ST2 031607 000001 0 0 000000400000 0 000000400000
ST9 031607 000001 0 0 000000400000 0 000000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 150
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0345
*031607 CAIE 3,400000
INITIAL
C(AC)=000000 400000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031607 031607 0 0 302140400000 0 000000400000
IT1 031607 0 0 0 302140400000 0 000000400000
AT3 031607 0 0 0 000000400000 0 302140400000
AT6 031607 0 0 0 000000400000 0 302140400000
FT1A 031607 0 0 0 000000400000 0 000000400000
FT2 031607 0 0 0 0 0 000000400000
FT2RQ 031607 0 0 0 000000400000 0 000000400000
FT3 031607 0 0 0 000000400000 0 000000400000
FT9 031610 0 0 0 000000400000 0 000000400000
ET0 031611 0 0 0 0 0 000000400000
ST1A 031611 0 0 0 0 0 000000400000
ST9 031611 0 0 0 0 0 000000400000
*031611 JUMPA 0,031612
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031611 031611 0 0 324000031612 0 000000031612
IT1 031611 0 0 0 324000031612 0 000000031612
AT3 031611 0 0 0 000000031612 0 324000031612
AT6 031611 031612 0 0 000000031612 0 324000031612
FT1A 031611 031612 0 0 000000031612 0 000000031612
FT2 031611 031612 0 0 0 0 000000031612
FT2RQ 031611 031612 0 0 000000000017 0 000000031612
FT3 031611 031612 0 0 000000000017 0 000000031612
FT9 031612 031612 0 0 000000000017 0 000000031612
ET0 031612 031612 0 0 000000000017 0 000000031612
ST1A 031612 031612 0 0 000000000017 0 000000031612
ST9 031612 031612 0 0 000000000017 0 000000031612
*031612 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000000 400000
FINAL
C(E)=000000 400000
TIME PC MA SC FE AR MQ BR
IT0 031612 031612 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 151
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0346
IT1 031612 0 0 0 476000000003 0 000000000003
AT3 031612 0 0 0 000000000003 0 476000000003
AT6 031612 000003 0 0 000000000003 0 476000000003
FT1A 031612 000003 0 0 000000000003 0 000000000003
FT9 031613 000003 0 0 000000000003 0 000000000003
ET0 031613 000003 0 0 777777777777 0 000000000003
ST6 031613 000003 0 0 777777777777 0 000000000003
ST6A 031613 000003 0 0 777777777777 0 000000000003
ST9 031613 000003 0 0 777777777777 0 000000000003
*031613 MOVSI 1,000001
INITIAL
C(AC)=000000 400000
FINAL
C(AC)=000001 000000
TIME PC MA SC FE AR MQ BR
IT0 031613 031613 0 0 205040000001 0 000000000001
IT1 031613 0 0 0 205040000001 0 000000000001
AT3 031613 0 0 0 000000000001 0 205040000001
AT6 031613 000001 0 0 000000000001 0 205040000001
FT1A 031613 000001 0 0 000000000001 0 000000000001
FT9 031614 000001 0 0 000000000001 0 000000000001
ET0 031614 000001 0 0 000001000000 0 000000000001
ST1 031614 000001 0 0 000001000000 0 000000000001
ST2 031614 000001 0 0 000001000000 0 000000000001
ST9 031614 000001 0 0 000001000000 0 000000000001
*031614 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031614 031614 0 0 201100000001 0 000000000001
IT1 031614 0 0 0 201100000001 0 000000000001
AT3 031614 0 0 0 000000000001 0 201100000001
AT6 031614 000001 0 0 000000000001 0 201100000001
FT1A 031614 000001 0 0 000000000001 0 000000000001
FT9 031615 000001 0 0 000000000001 0 000000000001
ET0 031615 000001 0 0 000000000001 0 000000000001
ST1 031615 000001 0 0 000000000001 0 000000000001
ST2 031615 000001 0 0 000000000001 0 000000000001
ST9 031615 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 152
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0347
*031615 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000001 000000
TIME PC MA SC FE AR MQ BR
IT0 031615 031615 0 0 200142000000 0 000001000000
IT1 031615 0 0 0 200142000000 0 000001000000
AT1 031615 0 0 0 0 0 200142000000
AT2 031615 0 0 0 000000000001 0 200142000000
AT3 031615 0 0 0 000000000001 0 000000000001
AT6 031615 000001 0 0 000000000001 0 000000000001
FT0 031615 000001 0 0 000001000000 0 000000000001
FT1A 031615 000001 0 0 000001000000 0 000001000000
FT9 031616 000001 0 0 000001000000 0 000001000000
ET0 031616 000001 0 0 000001000000 0 000001000000
ST1 031616 000001 0 0 000001000000 0 000001000000
ST2 031616 000001 0 0 000001000000 0 000001000000
ST9 031616 000001 0 0 000001000000 0 000001000000
*031616 CAME 3,034444
INITIAL
C(AC)=000001 000000
C(E)=000001 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031616 031616 0 0 312140034444 0 000001000000
IT1 031616 0 0 0 312140034444 0 000001000000
AT3 031616 0 0 0 000000034444 0 312140034444
AT6 031616 034444 0 0 000000034444 0 312140034444
FT0 031616 034444 0 0 000001000000 0 312140034444
FT1A 031616 034444 0 0 000001000000 0 000001000000
FT2 031616 034444 0 0 0 0 000001000000
FT2RQ 031616 034444 0 0 000001000000 0 000001000000
FT3 031616 034444 0 0 000001000000 0 000001000000
FT9 031617 034444 0 0 000001000000 0 000001000000
ET0 031620 034444 0 0 0 0 000001000000
ST1A 031620 034444 0 0 0 0 000001000000
ST9 031620 034444 0 0 0 0 000001000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 153
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0348
*031620 JUMPA 0,031621
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031620 031620 0 0 324000031621 0 000000031621
IT1 031620 0 0 0 324000031621 0 000000031621
AT3 031620 0 0 0 000000031621 0 324000031621
AT6 031620 031621 0 0 000000031621 0 324000031621
FT1A 031620 031621 0 0 000000031621 0 000000031621
FT2 031620 031621 0 0 0 0 000000031621
FT2RQ 031620 031621 0 0 000000000017 0 000000031621
FT3 031620 031621 0 0 000000000017 0 000000031621
FT9 031621 031621 0 0 000000000017 0 000000031621
ET0 031621 031621 0 0 000000000017 0 000000031621
ST1A 031621 031621 0 0 000000000017 0 000000031621
ST9 031621 031621 0 0 000000000017 0 000000031621
*031621 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000001 000000
FINAL
C(E)=000001 000000
TIME PC MA SC FE AR MQ BR
IT0 031621 031621 0 0 476000000003 0 000000000003
IT1 031621 0 0 0 476000000003 0 000000000003
AT3 031621 0 0 0 000000000003 0 476000000003
AT6 031621 000003 0 0 000000000003 0 476000000003
FT1A 031621 000003 0 0 000000000003 0 000000000003
FT9 031622 000003 0 0 000000000003 0 000000000003
ET0 031622 000003 0 0 777777777777 0 000000000003
ST6 031622 000003 0 0 777777777777 0 000000000003
ST6A 031622 000003 0 0 777777777777 0 000000000003
ST9 031622 000003 0 0 777777777777 0 000000000003
*031622 MOVSI 1,000002
INITIAL
C(AC)=000001 000000
FINAL
C(AC)=000002 000000
TIME PC MA SC FE AR MQ BR
IT0 031622 031622 0 0 205040000002 0 000000000002
IT1 031622 0 0 0 205040000002 0 000000000002
AT3 031622 0 0 0 000000000002 0 205040000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 154
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0349
AT6 031622 000002 0 0 000000000002 0 205040000002
FT1A 031622 000002 0 0 000000000002 0 000000000002
FT9 031623 000002 0 0 000000000002 0 000000000002
ET0 031623 000002 0 0 000002000000 0 000000000002
ST1 031623 000002 0 0 000002000000 0 000000000002
ST2 031623 000002 0 0 000002000000 0 000000000002
ST9 031623 000002 0 0 000002000000 0 000000000002
*031623 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031623 031623 0 0 201100000001 0 000000000001
IT1 031623 0 0 0 201100000001 0 000000000001
AT3 031623 0 0 0 000000000001 0 201100000001
AT6 031623 000001 0 0 000000000001 0 201100000001
FT1A 031623 000001 0 0 000000000001 0 000000000001
FT9 031624 000001 0 0 000000000001 0 000000000001
ET0 031624 000001 0 0 000000000001 0 000000000001
ST1 031624 000001 0 0 000000000001 0 000000000001
ST2 031624 000001 0 0 000000000001 0 000000000001
ST9 031624 000001 0 0 000000000001 0 000000000001
*031624 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000002 000000
TIME PC MA SC FE AR MQ BR
IT0 031624 031624 0 0 200142000000 0 000002000000
IT1 031624 0 0 0 200142000000 0 000002000000
AT1 031624 0 0 0 0 0 200142000000
AT2 031624 0 0 0 000000000001 0 200142000000
AT3 031624 0 0 0 000000000001 0 000000000001
AT6 031624 000001 0 0 000000000001 0 000000000001
FT0 031624 000001 0 0 000002000000 0 000000000001
FT1A 031624 000001 0 0 000002000000 0 000002000000
FT9 031625 000001 0 0 000002000000 0 000002000000
ET0 031625 000001 0 0 000002000000 0 000002000000
ST1 031625 000001 0 0 000002000000 0 000002000000
ST2 031625 000001 0 0 000002000000 0 000002000000
ST9 031625 000001 0 0 000002000000 0 000002000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 155
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0350
*031625 CAME 3,034445
INITIAL
C(AC)=000002 000000
C(E)=000002 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031625 031625 0 0 312140034445 0 000002000000
IT1 031625 0 0 0 312140034445 0 000002000000
AT3 031625 0 0 0 000000034445 0 312140034445
AT6 031625 034445 0 0 000000034445 0 312140034445
FT0 031625 034445 0 0 000002000000 0 312140034445
FT1A 031625 034445 0 0 000002000000 0 000002000000
FT2 031625 034445 0 0 0 0 000002000000
FT2RQ 031625 034445 0 0 000002000000 0 000002000000
FT3 031625 034445 0 0 000002000000 0 000002000000
FT9 031626 034445 0 0 000002000000 0 000002000000
ET0 031627 034445 0 0 0 0 000002000000
ST1A 031627 034445 0 0 0 0 000002000000
ST9 031627 034445 0 0 0 0 000002000000
*031627 JUMPA 0,031630
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031627 031627 0 0 324000031630 0 000000031630
IT1 031627 0 0 0 324000031630 0 000000031630
AT3 031627 0 0 0 000000031630 0 324000031630
AT6 031627 031630 0 0 000000031630 0 324000031630
FT1A 031627 031630 0 0 000000031630 0 000000031630
FT2 031627 031630 0 0 0 0 000000031630
FT2RQ 031627 031630 0 0 000000000017 0 000000031630
FT3 031627 031630 0 0 000000000017 0 000000031630
FT9 031630 031630 0 0 000000000017 0 000000031630
ET0 031630 031630 0 0 000000000017 0 000000031630
ST1A 031630 031630 0 0 000000000017 0 000000031630
ST9 031630 031630 0 0 000000000017 0 000000031630
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 156
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0351
*031630 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000002 000000
FINAL
C(E)=000002 000000
TIME PC MA SC FE AR MQ BR
IT0 031630 031630 0 0 476000000003 0 000000000003
IT1 031630 0 0 0 476000000003 0 000000000003
AT3 031630 0 0 0 000000000003 0 476000000003
AT6 031630 000003 0 0 000000000003 0 476000000003
FT1A 031630 000003 0 0 000000000003 0 000000000003
FT9 031631 000003 0 0 000000000003 0 000000000003
ET0 031631 000003 0 0 777777777777 0 000000000003
ST6 031631 000003 0 0 777777777777 0 000000000003
ST6A 031631 000003 0 0 777777777777 0 000000000003
ST9 031631 000003 0 0 777777777777 0 000000000003
*031631 MOVSI 1,000004
INITIAL
C(AC)=000002 000000
FINAL
C(AC)=000004 000000
TIME PC MA SC FE AR MQ BR
IT0 031631 031631 0 0 205040000004 0 000000000004
IT1 031631 0 0 0 205040000004 0 000000000004
AT3 031631 0 0 0 000000000004 0 205040000004
AT6 031631 000004 0 0 000000000004 0 205040000004
FT1A 031631 000004 0 0 000000000004 0 000000000004
FT9 031632 000004 0 0 000000000004 0 000000000004
ET0 031632 000004 0 0 000004000000 0 000000000004
ST1 031632 000004 0 0 000004000000 0 000000000004
ST2 031632 000004 0 0 000004000000 0 000000000004
ST9 031632 000004 0 0 000004000000 0 000000000004
*031632 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031632 031632 0 0 201100000001 0 000000000001
IT1 031632 0 0 0 201100000001 0 000000000001
AT3 031632 0 0 0 000000000001 0 201100000001
AT6 031632 000001 0 0 000000000001 0 201100000001
FT1A 031632 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 157
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0352
FT9 031633 000001 0 0 000000000001 0 000000000001
ET0 031633 000001 0 0 000000000001 0 000000000001
ST1 031633 000001 0 0 000000000001 0 000000000001
ST2 031633 000001 0 0 000000000001 0 000000000001
ST9 031633 000001 0 0 000000000001 0 000000000001
*031633 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000004 000000
TIME PC MA SC FE AR MQ BR
IT0 031633 031633 0 0 200142000000 0 000004000000
IT1 031633 0 0 0 200142000000 0 000004000000
AT1 031633 0 0 0 0 0 200142000000
AT2 031633 0 0 0 000000000001 0 200142000000
AT3 031633 0 0 0 000000000001 0 000000000001
AT6 031633 000001 0 0 000000000001 0 000000000001
FT0 031633 000001 0 0 000004000000 0 000000000001
FT1A 031633 000001 0 0 000004000000 0 000004000000
FT9 031634 000001 0 0 000004000000 0 000004000000
ET0 031634 000001 0 0 000004000000 0 000004000000
ST1 031634 000001 0 0 000004000000 0 000004000000
ST2 031634 000001 0 0 000004000000 0 000004000000
ST9 031634 000001 0 0 000004000000 0 000004000000
*031634 CAME 3,034446
INITIAL
C(AC)=000004 000000
C(E)=000004 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031634 031634 0 0 312140034446 0 000004000000
IT1 031634 0 0 0 312140034446 0 000004000000
AT3 031634 0 0 0 000000034446 0 312140034446
AT6 031634 034446 0 0 000000034446 0 312140034446
FT0 031634 034446 0 0 000004000000 0 312140034446
FT1A 031634 034446 0 0 000004000000 0 000004000000
FT2 031634 034446 0 0 0 0 000004000000
FT2RQ 031634 034446 0 0 000004000000 0 000004000000
FT3 031634 034446 0 0 000004000000 0 000004000000
FT9 031635 034446 0 0 000004000000 0 000004000000
ET0 031636 034446 0 0 0 0 000004000000
ST1A 031636 034446 0 0 0 0 000004000000
ST9 031636 034446 0 0 0 0 000004000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 158
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0353
*031636 JUMPA 0,031637
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031636 031636 0 0 324000031637 0 000000031637
IT1 031636 0 0 0 324000031637 0 000000031637
AT3 031636 0 0 0 000000031637 0 324000031637
AT6 031636 031637 0 0 000000031637 0 324000031637
FT1A 031636 031637 0 0 000000031637 0 000000031637
FT2 031636 031637 0 0 0 0 000000031637
FT2RQ 031636 031637 0 0 000000000017 0 000000031637
FT3 031636 031637 0 0 000000000017 0 000000031637
FT9 031637 031637 0 0 000000000017 0 000000031637
ET0 031637 031637 0 0 000000000017 0 000000031637
ST1A 031637 031637 0 0 000000000017 0 000000031637
ST9 031637 031637 0 0 000000000017 0 000000031637
*031637 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000004 000000
FINAL
C(E)=000004 000000
TIME PC MA SC FE AR MQ BR
IT0 031637 031637 0 0 476000000003 0 000000000003
IT1 031637 0 0 0 476000000003 0 000000000003
AT3 031637 0 0 0 000000000003 0 476000000003
AT6 031637 000003 0 0 000000000003 0 476000000003
FT1A 031637 000003 0 0 000000000003 0 000000000003
FT9 031640 000003 0 0 000000000003 0 000000000003
ET0 031640 000003 0 0 777777777777 0 000000000003
ST6 031640 000003 0 0 777777777777 0 000000000003
ST6A 031640 000003 0 0 777777777777 0 000000000003
ST9 031640 000003 0 0 777777777777 0 000000000003
*031640 MOVSI 1,000010
INITIAL
C(AC)=000004 000000
FINAL
C(AC)=000010 000000
TIME PC MA SC FE AR MQ BR
IT0 031640 031640 0 0 205040000010 0 000000000010
IT1 031640 0 0 0 205040000010 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 159
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0354
AT3 031640 0 0 0 000000000010 0 205040000010
AT6 031640 000010 0 0 000000000010 0 205040000010
FT1A 031640 000010 0 0 000000000010 0 000000000010
FT9 031641 000010 0 0 000000000010 0 000000000010
ET0 031641 000010 0 0 000010000000 0 000000000010
ST1 031641 000010 0 0 000010000000 0 000000000010
ST2 031641 000010 0 0 000010000000 0 000000000010
ST9 031641 000010 0 0 000010000000 0 000000000010
*031641 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031641 031641 0 0 201100000001 0 000000000001
IT1 031641 0 0 0 201100000001 0 000000000001
AT3 031641 0 0 0 000000000001 0 201100000001
AT6 031641 000001 0 0 000000000001 0 201100000001
FT1A 031641 000001 0 0 000000000001 0 000000000001
FT9 031642 000001 0 0 000000000001 0 000000000001
ET0 031642 000001 0 0 000000000001 0 000000000001
ST1 031642 000001 0 0 000000000001 0 000000000001
ST2 031642 000001 0 0 000000000001 0 000000000001
ST9 031642 000001 0 0 000000000001 0 000000000001
*031642 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000010 000000
TIME PC MA SC FE AR MQ BR
IT0 031642 031642 0 0 200142000000 0 000010000000
IT1 031642 0 0 0 200142000000 0 000010000000
AT1 031642 0 0 0 0 0 200142000000
AT2 031642 0 0 0 000000000001 0 200142000000
AT3 031642 0 0 0 000000000001 0 000000000001
AT6 031642 000001 0 0 000000000001 0 000000000001
FT0 031642 000001 0 0 000010000000 0 000000000001
FT1A 031642 000001 0 0 000010000000 0 000010000000
FT9 031643 000001 0 0 000010000000 0 000010000000
ET0 031643 000001 0 0 000010000000 0 000010000000
ST1 031643 000001 0 0 000010000000 0 000010000000
ST2 031643 000001 0 0 000010000000 0 000010000000
ST9 031643 000001 0 0 000010000000 0 000010000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 160
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0355
*031643 CAME 3,034447
INITIAL
C(AC)=000010 000000
C(E)=000010 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031643 031643 0 0 312140034447 0 000010000000
IT1 031643 0 0 0 312140034447 0 000010000000
AT3 031643 0 0 0 000000034447 0 312140034447
AT6 031643 034447 0 0 000000034447 0 312140034447
FT0 031643 034447 0 0 000010000000 0 312140034447
FT1A 031643 034447 0 0 000010000000 0 000010000000
FT2 031643 034447 0 0 0 0 000010000000
FT2RQ 031643 034447 0 0 000010000000 0 000010000000
FT3 031643 034447 0 0 000010000000 0 000010000000
FT9 031644 034447 0 0 000010000000 0 000010000000
ET0 031645 034447 0 0 0 0 000010000000
ST1A 031645 034447 0 0 0 0 000010000000
ST9 031645 034447 0 0 0 0 000010000000
*031645 JUMPA 0,031646
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031645 031645 0 0 324000031646 0 000000031646
IT1 031645 0 0 0 324000031646 0 000000031646
AT3 031645 0 0 0 000000031646 0 324000031646
AT6 031645 031646 0 0 000000031646 0 324000031646
FT1A 031645 031646 0 0 000000031646 0 000000031646
FT2 031645 031646 0 0 0 0 000000031646
FT2RQ 031645 031646 0 0 000000000017 0 000000031646
FT3 031645 031646 0 0 000000000017 0 000000031646
FT9 031646 031646 0 0 000000000017 0 000000031646
ET0 031646 031646 0 0 000000000017 0 000000031646
ST1A 031646 031646 0 0 000000000017 0 000000031646
ST9 031646 031646 0 0 000000000017 0 000000031646
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 161
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0356
*031646 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000010 000000
FINAL
C(E)=000010 000000
TIME PC MA SC FE AR MQ BR
IT0 031646 031646 0 0 476000000003 0 000000000003
IT1 031646 0 0 0 476000000003 0 000000000003
AT3 031646 0 0 0 000000000003 0 476000000003
AT6 031646 000003 0 0 000000000003 0 476000000003
FT1A 031646 000003 0 0 000000000003 0 000000000003
FT9 031647 000003 0 0 000000000003 0 000000000003
ET0 031647 000003 0 0 777777777777 0 000000000003
ST6 031647 000003 0 0 777777777777 0 000000000003
ST6A 031647 000003 0 0 777777777777 0 000000000003
ST9 031647 000003 0 0 777777777777 0 000000000003
*031647 MOVSI 1,000020
INITIAL
C(AC)=000010 000000
FINAL
C(AC)=000020 000000
TIME PC MA SC FE AR MQ BR
IT0 031647 031647 0 0 205040000020 0 000000000020
IT1 031647 0 0 0 205040000020 0 000000000020
AT3 031647 0 0 0 000000000020 0 205040000020
AT6 031647 000020 0 0 000000000020 0 205040000020
FT1A 031647 000020 0 0 000000000020 0 000000000020
FT9 031650 000020 0 0 000000000020 0 000000000020
ET0 031650 000020 0 0 000020000000 0 000000000020
ST1 031650 000020 0 0 000020000000 0 000000000020
ST2 031650 000020 0 0 000020000000 0 000000000020
ST9 031650 000020 0 0 000020000000 0 000000000020
*031650 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031650 031650 0 0 201100000001 0 000000000001
IT1 031650 0 0 0 201100000001 0 000000000001
AT3 031650 0 0 0 000000000001 0 201100000001
AT6 031650 000001 0 0 000000000001 0 201100000001
FT1A 031650 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 162
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0357
FT9 031651 000001 0 0 000000000001 0 000000000001
ET0 031651 000001 0 0 000000000001 0 000000000001
ST1 031651 000001 0 0 000000000001 0 000000000001
ST2 031651 000001 0 0 000000000001 0 000000000001
ST9 031651 000001 0 0 000000000001 0 000000000001
*031651 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000020 000000
TIME PC MA SC FE AR MQ BR
IT0 031651 031651 0 0 200142000000 0 000020000000
IT1 031651 0 0 0 200142000000 0 000020000000
AT1 031651 0 0 0 0 0 200142000000
AT2 031651 0 0 0 000000000001 0 200142000000
AT3 031651 0 0 0 000000000001 0 000000000001
AT6 031651 000001 0 0 000000000001 0 000000000001
FT0 031651 000001 0 0 000020000000 0 000000000001
FT1A 031651 000001 0 0 000020000000 0 000020000000
FT9 031652 000001 0 0 000020000000 0 000020000000
ET0 031652 000001 0 0 000020000000 0 000020000000
ST1 031652 000001 0 0 000020000000 0 000020000000
ST2 031652 000001 0 0 000020000000 0 000020000000
ST9 031652 000001 0 0 000020000000 0 000020000000
*031652 CAME 3,034450
INITIAL
C(AC)=000020 000000
C(E)=000020 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031652 031652 0 0 312140034450 0 000020000000
IT1 031652 0 0 0 312140034450 0 000020000000
AT3 031652 0 0 0 000000034450 0 312140034450
AT6 031652 034450 0 0 000000034450 0 312140034450
FT0 031652 034450 0 0 000020000000 0 312140034450
FT1A 031652 034450 0 0 000020000000 0 000020000000
FT2 031652 034450 0 0 0 0 000020000000
FT2RQ 031652 034450 0 0 000020000000 0 000020000000
FT3 031652 034450 0 0 000020000000 0 000020000000
FT9 031653 034450 0 0 000020000000 0 000020000000
ET0 031654 034450 0 0 0 0 000020000000
ST1A 031654 034450 0 0 0 0 000020000000
ST9 031654 034450 0 0 0 0 000020000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 163
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0358
*031654 JUMPA 0,031655
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031654 031654 0 0 324000031655 0 000000031655
IT1 031654 0 0 0 324000031655 0 000000031655
AT3 031654 0 0 0 000000031655 0 324000031655
AT6 031654 031655 0 0 000000031655 0 324000031655
FT1A 031654 031655 0 0 000000031655 0 000000031655
FT2 031654 031655 0 0 0 0 000000031655
FT2RQ 031654 031655 0 0 000000000017 0 000000031655
FT3 031654 031655 0 0 000000000017 0 000000031655
FT9 031655 031655 0 0 000000000017 0 000000031655
ET0 031655 031655 0 0 000000000017 0 000000031655
ST1A 031655 031655 0 0 000000000017 0 000000031655
ST9 031655 031655 0 0 000000000017 0 000000031655
*031655 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000020 000000
FINAL
C(E)=000020 000000
TIME PC MA SC FE AR MQ BR
IT0 031655 031655 0 0 476000000003 0 000000000003
IT1 031655 0 0 0 476000000003 0 000000000003
AT3 031655 0 0 0 000000000003 0 476000000003
AT6 031655 000003 0 0 000000000003 0 476000000003
FT1A 031655 000003 0 0 000000000003 0 000000000003
FT9 031656 000003 0 0 000000000003 0 000000000003
ET0 031656 000003 0 0 777777777777 0 000000000003
ST6 031656 000003 0 0 777777777777 0 000000000003
ST6A 031656 000003 0 0 777777777777 0 000000000003
ST9 031656 000003 0 0 777777777777 0 000000000003
*031656 MOVSI 1,000040
INITIAL
C(AC)=000020 000000
FINAL
C(AC)=000040 000000
TIME PC MA SC FE AR MQ BR
IT0 031656 031656 0 0 205040000040 0 000000000040
IT1 031656 0 0 0 205040000040 0 000000000040
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 164
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0359
AT3 031656 0 0 0 000000000040 0 205040000040
AT6 031656 000040 0 0 000000000040 0 205040000040
FT1A 031656 000040 0 0 000000000040 0 000000000040
FT9 031657 000040 0 0 000000000040 0 000000000040
ET0 031657 000040 0 0 000040000000 0 000000000040
ST1 031657 000040 0 0 000040000000 0 000000000040
ST2 031657 000040 0 0 000040000000 0 000000000040
ST9 031657 000040 0 0 000040000000 0 000000000040
*031657 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031657 031657 0 0 201100000001 0 000000000001
IT1 031657 0 0 0 201100000001 0 000000000001
AT3 031657 0 0 0 000000000001 0 201100000001
AT6 031657 000001 0 0 000000000001 0 201100000001
FT1A 031657 000001 0 0 000000000001 0 000000000001
FT9 031660 000001 0 0 000000000001 0 000000000001
ET0 031660 000001 0 0 000000000001 0 000000000001
ST1 031660 000001 0 0 000000000001 0 000000000001
ST2 031660 000001 0 0 000000000001 0 000000000001
ST9 031660 000001 0 0 000000000001 0 000000000001
*031660 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000040 000000
TIME PC MA SC FE AR MQ BR
IT0 031660 031660 0 0 200142000000 0 000040000000
IT1 031660 0 0 0 200142000000 0 000040000000
AT1 031660 0 0 0 0 0 200142000000
AT2 031660 0 0 0 000000000001 0 200142000000
AT3 031660 0 0 0 000000000001 0 000000000001
AT6 031660 000001 0 0 000000000001 0 000000000001
FT0 031660 000001 0 0 000040000000 0 000000000001
FT1A 031660 000001 0 0 000040000000 0 000040000000
FT9 031661 000001 0 0 000040000000 0 000040000000
ET0 031661 000001 0 0 000040000000 0 000040000000
ST1 031661 000001 0 0 000040000000 0 000040000000
ST2 031661 000001 0 0 000040000000 0 000040000000
ST9 031661 000001 0 0 000040000000 0 000040000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 165
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0360
*031661 CAME 3,034451
INITIAL
C(AC)=000040 000000
C(E)=000040 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031661 031661 0 0 312140034451 0 000040000000
IT1 031661 0 0 0 312140034451 0 000040000000
AT3 031661 0 0 0 000000034451 0 312140034451
AT6 031661 034451 0 0 000000034451 0 312140034451
FT0 031661 034451 0 0 000040000000 0 312140034451
FT1A 031661 034451 0 0 000040000000 0 000040000000
FT2 031661 034451 0 0 0 0 000040000000
FT2RQ 031661 034451 0 0 000040000000 0 000040000000
FT3 031661 034451 0 0 000040000000 0 000040000000
FT9 031662 034451 0 0 000040000000 0 000040000000
ET0 031663 034451 0 0 0 0 000040000000
ST1A 031663 034451 0 0 0 0 000040000000
ST9 031663 034451 0 0 0 0 000040000000
*031663 JUMPA 0,031664
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031663 031663 0 0 324000031664 0 000000031664
IT1 031663 0 0 0 324000031664 0 000000031664
AT3 031663 0 0 0 000000031664 0 324000031664
AT6 031663 031664 0 0 000000031664 0 324000031664
FT1A 031663 031664 0 0 000000031664 0 000000031664
FT2 031663 031664 0 0 0 0 000000031664
FT2RQ 031663 031664 0 0 000000000017 0 000000031664
FT3 031663 031664 0 0 000000000017 0 000000031664
FT9 031664 031664 0 0 000000000017 0 000000031664
ET0 031664 031664 0 0 000000000017 0 000000031664
ST1A 031664 031664 0 0 000000000017 0 000000031664
ST9 031664 031664 0 0 000000000017 0 000000031664
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 166
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0361
*031664 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000040 000000
FINAL
C(E)=000040 000000
TIME PC MA SC FE AR MQ BR
IT0 031664 031664 0 0 476000000003 0 000000000003
IT1 031664 0 0 0 476000000003 0 000000000003
AT3 031664 0 0 0 000000000003 0 476000000003
AT6 031664 000003 0 0 000000000003 0 476000000003
FT1A 031664 000003 0 0 000000000003 0 000000000003
FT9 031665 000003 0 0 000000000003 0 000000000003
ET0 031665 000003 0 0 777777777777 0 000000000003
ST6 031665 000003 0 0 777777777777 0 000000000003
ST6A 031665 000003 0 0 777777777777 0 000000000003
ST9 031665 000003 0 0 777777777777 0 000000000003
*031665 MOVSI 1,000100
INITIAL
C(AC)=000040 000000
FINAL
C(AC)=000100 000000
TIME PC MA SC FE AR MQ BR
IT0 031665 031665 0 0 205040000100 0 000000000100
IT1 031665 0 0 0 205040000100 0 000000000100
AT3 031665 0 0 0 000000000100 0 205040000100
AT6 031665 0 0 0 000000000100 0 205040000100
FT1A 031665 0 0 0 000000000100 0 000000000100
FT9 031666 0 0 0 000000000100 0 000000000100
ET0 031666 0 0 0 000100000000 0 000000000100
ST1 031666 0 0 0 000100000000 0 000000000100
ST2 031666 0 0 0 000100000000 0 000000000100
ST9 031666 0 0 0 000100000000 0 000000000100
*031666 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031666 031666 0 0 201100000001 0 000000000001
IT1 031666 0 0 0 201100000001 0 000000000001
AT3 031666 0 0 0 000000000001 0 201100000001
AT6 031666 000001 0 0 000000000001 0 201100000001
FT1A 031666 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 167
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0362
FT9 031667 000001 0 0 000000000001 0 000000000001
ET0 031667 000001 0 0 000000000001 0 000000000001
ST1 031667 000001 0 0 000000000001 0 000000000001
ST2 031667 000001 0 0 000000000001 0 000000000001
ST9 031667 000001 0 0 000000000001 0 000000000001
*031667 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000100 000000
TIME PC MA SC FE AR MQ BR
IT0 031667 031667 0 0 200142000000 0 000100000000
IT1 031667 0 0 0 200142000000 0 000100000000
AT1 031667 0 0 0 0 0 200142000000
AT2 031667 0 0 0 000000000001 0 200142000000
AT3 031667 0 0 0 000000000001 0 000000000001
AT6 031667 000001 0 0 000000000001 0 000000000001
FT0 031667 000001 0 0 000100000000 0 000000000001
FT1A 031667 000001 0 0 000100000000 0 000100000000
FT9 031670 000001 0 0 000100000000 0 000100000000
ET0 031670 000001 0 0 000100000000 0 000100000000
ST1 031670 000001 0 0 000100000000 0 000100000000
ST2 031670 000001 0 0 000100000000 0 000100000000
ST9 031670 000001 0 0 000100000000 0 000100000000
*031670 CAME 3,034452
INITIAL
C(AC)=000100 000000
C(E)=000100 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031670 031670 0 0 312140034452 0 000100000000
IT1 031670 0 0 0 312140034452 0 000100000000
AT3 031670 0 0 0 000000034452 0 312140034452
AT6 031670 034452 0 0 000000034452 0 312140034452
FT0 031670 034452 0 0 000100000000 0 312140034452
FT1A 031670 034452 0 0 000100000000 0 000100000000
FT2 031670 034452 0 0 0 0 000100000000
FT2RQ 031670 034452 0 0 000100000000 0 000100000000
FT3 031670 034452 0 0 000100000000 0 000100000000
FT9 031671 034452 0 0 000100000000 0 000100000000
ET0 031672 034452 0 0 0 0 000100000000
ST1A 031672 034452 0 0 0 0 000100000000
ST9 031672 034452 0 0 0 0 000100000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 168
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0363
*031672 JUMPA 0,031673
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031672 031672 0 0 324000031673 0 000000031673
IT1 031672 0 0 0 324000031673 0 000000031673
AT3 031672 0 0 0 000000031673 0 324000031673
AT6 031672 031673 0 0 000000031673 0 324000031673
FT1A 031672 031673 0 0 000000031673 0 000000031673
FT2 031672 031673 0 0 0 0 000000031673
FT2RQ 031672 031673 0 0 000000000017 0 000000031673
FT3 031672 031673 0 0 000000000017 0 000000031673
FT9 031673 031673 0 0 000000000017 0 000000031673
ET0 031673 031673 0 0 000000000017 0 000000031673
ST1A 031673 031673 0 0 000000000017 0 000000031673
ST9 031673 031673 0 0 000000000017 0 000000031673
*031673 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000100 000000
FINAL
C(E)=000100 000000
TIME PC MA SC FE AR MQ BR
IT0 031673 031673 0 0 476000000003 0 000000000003
IT1 031673 0 0 0 476000000003 0 000000000003
AT3 031673 0 0 0 000000000003 0 476000000003
AT6 031673 000003 0 0 000000000003 0 476000000003
FT1A 031673 000003 0 0 000000000003 0 000000000003
FT9 031674 000003 0 0 000000000003 0 000000000003
ET0 031674 000003 0 0 777777777777 0 000000000003
ST6 031674 000003 0 0 777777777777 0 000000000003
ST6A 031674 000003 0 0 777777777777 0 000000000003
ST9 031674 000003 0 0 777777777777 0 000000000003
*031674 MOVSI 1,000200
INITIAL
C(AC)=000100 000000
FINAL
C(AC)=000200 000000
TIME PC MA SC FE AR MQ BR
IT0 031674 031674 0 0 205040000200 0 000000000200
IT1 031674 0 0 0 205040000200 0 000000000200
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 169
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0364
AT3 031674 0 0 0 000000000200 0 205040000200
AT6 031674 0 0 0 000000000200 0 205040000200
FT1A 031674 0 0 0 000000000200 0 000000000200
FT9 031675 0 0 0 000000000200 0 000000000200
ET0 031675 0 0 0 000200000000 0 000000000200
ST1 031675 0 0 0 000200000000 0 000000000200
ST2 031675 0 0 0 000200000000 0 000000000200
ST9 031675 0 0 0 000200000000 0 000000000200
*031675 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031675 031675 0 0 201100000001 0 000000000001
IT1 031675 0 0 0 201100000001 0 000000000001
AT3 031675 0 0 0 000000000001 0 201100000001
AT6 031675 000001 0 0 000000000001 0 201100000001
FT1A 031675 000001 0 0 000000000001 0 000000000001
FT9 031676 000001 0 0 000000000001 0 000000000001
ET0 031676 000001 0 0 000000000001 0 000000000001
ST1 031676 000001 0 0 000000000001 0 000000000001
ST2 031676 000001 0 0 000000000001 0 000000000001
ST9 031676 000001 0 0 000000000001 0 000000000001
*031676 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000200 000000
TIME PC MA SC FE AR MQ BR
IT0 031676 031676 0 0 200142000000 0 000200000000
IT1 031676 0 0 0 200142000000 0 000200000000
AT1 031676 0 0 0 0 0 200142000000
AT2 031676 0 0 0 000000000001 0 200142000000
AT3 031676 0 0 0 000000000001 0 000000000001
AT6 031676 000001 0 0 000000000001 0 000000000001
FT0 031676 000001 0 0 000200000000 0 000000000001
FT1A 031676 000001 0 0 000200000000 0 000200000000
FT9 031677 000001 0 0 000200000000 0 000200000000
ET0 031677 000001 0 0 000200000000 0 000200000000
ST1 031677 000001 0 0 000200000000 0 000200000000
ST2 031677 000001 0 0 000200000000 0 000200000000
ST9 031677 000001 0 0 000200000000 0 000200000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 170
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0365
*031677 CAME 3,034453
INITIAL
C(AC)=000200 000000
C(E)=000200 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031677 031677 0 0 312140034453 0 000200000000
IT1 031677 0 0 0 312140034453 0 000200000000
AT3 031677 0 0 0 000000034453 0 312140034453
AT6 031677 034453 0 0 000000034453 0 312140034453
FT0 031677 034453 0 0 000200000000 0 312140034453
FT1A 031677 034453 0 0 000200000000 0 000200000000
FT2 031677 034453 0 0 0 0 000200000000
FT2RQ 031677 034453 0 0 000200000000 0 000200000000
FT3 031677 034453 0 0 000200000000 0 000200000000
FT9 0 034453 0 0 000200000000 0 000200000000
ET0 031701 034453 0 0 0 0 000200000000
ST1A 031701 034453 0 0 0 0 000200000000
ST9 031701 034453 0 0 0 0 000200000000
*031701 JUMPA 0,031702
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031701 031701 0 0 324000031702 0 000000031702
IT1 031701 0 0 0 324000031702 0 000000031702
AT3 031701 0 0 0 000000031702 0 324000031702
AT6 031701 031702 0 0 000000031702 0 324000031702
FT1A 031701 031702 0 0 000000031702 0 000000031702
FT2 031701 031702 0 0 0 0 000000031702
FT2RQ 031701 031702 0 0 000000000017 0 000000031702
FT3 031701 031702 0 0 000000000017 0 000000031702
FT9 031702 031702 0 0 000000000017 0 000000031702
ET0 031702 031702 0 0 000000000017 0 000000031702
ST1A 031702 031702 0 0 000000000017 0 000000031702
ST9 031702 031702 0 0 000000000017 0 000000031702
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 171
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0366
*031702 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000200 000000
FINAL
C(E)=000200 000000
TIME PC MA SC FE AR MQ BR
IT0 031702 031702 0 0 476000000003 0 000000000003
IT1 031702 0 0 0 476000000003 0 000000000003
AT3 031702 0 0 0 000000000003 0 476000000003
AT6 031702 000003 0 0 000000000003 0 476000000003
FT1A 031702 000003 0 0 000000000003 0 000000000003
FT9 031703 000003 0 0 000000000003 0 000000000003
ET0 031703 000003 0 0 777777777777 0 000000000003
ST6 031703 000003 0 0 777777777777 0 000000000003
ST6A 031703 000003 0 0 777777777777 0 000000000003
ST9 031703 000003 0 0 777777777777 0 000000000003
*031703 MOVSI 1,000400
INITIAL
C(AC)=000200 000000
FINAL
C(AC)=000400 000000
TIME PC MA SC FE AR MQ BR
IT0 031703 031703 0 0 205040000400 0 000000000400
IT1 031703 0 0 0 205040000400 0 000000000400
AT3 031703 0 0 0 000000000400 0 205040000400
AT6 031703 0 0 0 000000000400 0 205040000400
FT1A 031703 0 0 0 000000000400 0 000000000400
FT9 031704 0 0 0 000000000400 0 000000000400
ET0 031704 0 0 0 000400000000 0 000000000400
ST1 031704 0 0 0 000400000000 0 000000000400
ST2 031704 0 0 0 000400000000 0 000000000400
ST9 031704 0 0 0 000400000000 0 000000000400
*031704 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031704 031704 0 0 201100000001 0 000000000001
IT1 031704 0 0 0 201100000001 0 000000000001
AT3 031704 0 0 0 000000000001 0 201100000001
AT6 031704 000001 0 0 000000000001 0 201100000001
FT1A 031704 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 172
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0367
FT9 031705 000001 0 0 000000000001 0 000000000001
ET0 031705 000001 0 0 000000000001 0 000000000001
ST1 031705 000001 0 0 000000000001 0 000000000001
ST2 031705 000001 0 0 000000000001 0 000000000001
ST9 031705 000001 0 0 000000000001 0 000000000001
*031705 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=000400 000000
TIME PC MA SC FE AR MQ BR
IT0 031705 031705 0 0 200142000000 0 000400000000
IT1 031705 0 0 0 200142000000 0 000400000000
AT1 031705 0 0 0 0 0 200142000000
AT2 031705 0 0 0 000000000001 0 200142000000
AT3 031705 0 0 0 000000000001 0 000000000001
AT6 031705 000001 0 0 000000000001 0 000000000001
FT0 031705 000001 0 0 000400000000 0 000000000001
FT1A 031705 000001 0 0 000400000000 0 000400000000
FT9 031706 000001 0 0 000400000000 0 000400000000
ET0 031706 000001 0 0 000400000000 0 000400000000
ST1 031706 000001 0 0 000400000000 0 000400000000
ST2 031706 000001 0 0 000400000000 0 000400000000
ST9 031706 000001 0 0 000400000000 0 000400000000
*031706 CAME 3,034454
INITIAL
C(AC)=000400 000000
C(E)=000400 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031706 031706 0 0 312140034454 0 000400000000
IT1 031706 0 0 0 312140034454 0 000400000000
AT3 031706 0 0 0 000000034454 0 312140034454
AT6 031706 034454 0 0 000000034454 0 312140034454
FT0 031706 034454 0 0 000400000000 0 312140034454
FT1A 031706 034454 0 0 000400000000 0 000400000000
FT2 031706 034454 0 0 0 0 000400000000
FT2RQ 031706 034454 0 0 000400000000 0 000400000000
FT3 031706 034454 0 0 000400000000 0 000400000000
FT9 031707 034454 0 0 000400000000 0 000400000000
ET0 031710 034454 0 0 0 0 000400000000
ST1A 031710 034454 0 0 0 0 000400000000
ST9 031710 034454 0 0 0 0 000400000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 173
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0368
*031710 JUMPA 0,031711
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031710 031710 0 0 324000031711 0 000000031711
IT1 031710 0 0 0 324000031711 0 000000031711
AT3 031710 0 0 0 000000031711 0 324000031711
AT6 031710 031711 0 0 000000031711 0 324000031711
FT1A 031710 031711 0 0 000000031711 0 000000031711
FT2 031710 031711 0 0 0 0 000000031711
FT2RQ 031710 031711 0 0 000000000017 0 000000031711
FT3 031710 031711 0 0 000000000017 0 000000031711
FT9 031711 031711 0 0 000000000017 0 000000031711
ET0 031711 031711 0 0 000000000017 0 000000031711
ST1A 031711 031711 0 0 000000000017 0 000000031711
ST9 031711 031711 0 0 000000000017 0 000000031711
*031711 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=000400 000000
FINAL
C(E)=000400 000000
TIME PC MA SC FE AR MQ BR
IT0 031711 031711 0 0 476000000003 0 000000000003
IT1 031711 0 0 0 476000000003 0 000000000003
AT3 031711 0 0 0 000000000003 0 476000000003
AT6 031711 000003 0 0 000000000003 0 476000000003
FT1A 031711 000003 0 0 000000000003 0 000000000003
FT9 031712 000003 0 0 000000000003 0 000000000003
ET0 031712 000003 0 0 777777777777 0 000000000003
ST6 031712 000003 0 0 777777777777 0 000000000003
ST6A 031712 000003 0 0 777777777777 0 000000000003
ST9 031712 000003 0 0 777777777777 0 000000000003
*031712 MOVSI 1,001000
INITIAL
C(AC)=000400 000000
FINAL
C(AC)=001000 000000
TIME PC MA SC FE AR MQ BR
IT0 031712 031712 0 0 205040001000 0 000000001000
IT1 031712 0 0 0 205040001000 0 000000001000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 174
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0369
AT3 031712 0 0 0 000000001000 0 205040001000
AT6 031712 0 0 0 000000001000 0 205040001000
FT1A 031712 0 0 0 000000001000 0 000000001000
FT9 031713 0 0 0 000000001000 0 000000001000
ET0 031713 0 0 0 001000000000 0 000000001000
ST1 031713 0 0 0 001000000000 0 000000001000
ST2 031713 0 0 0 001000000000 0 000000001000
ST9 031713 0 0 0 001000000000 0 000000001000
*031713 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031713 031713 0 0 201100000001 0 000000000001
IT1 031713 0 0 0 201100000001 0 000000000001
AT3 031713 0 0 0 000000000001 0 201100000001
AT6 031713 000001 0 0 000000000001 0 201100000001
FT1A 031713 000001 0 0 000000000001 0 000000000001
FT9 031714 000001 0 0 000000000001 0 000000000001
ET0 031714 000001 0 0 000000000001 0 000000000001
ST1 031714 000001 0 0 000000000001 0 000000000001
ST2 031714 000001 0 0 000000000001 0 000000000001
ST9 031714 000001 0 0 000000000001 0 000000000001
*031714 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=001000 000000
TIME PC MA SC FE AR MQ BR
IT0 031714 031714 0 0 200142000000 0 001000000000
IT1 031714 0 0 0 200142000000 0 001000000000
AT1 031714 0 0 0 0 0 200142000000
AT2 031714 0 0 0 000000000001 0 200142000000
AT3 031714 0 0 0 000000000001 0 000000000001
AT6 031714 000001 0 0 000000000001 0 000000000001
FT0 031714 000001 0 0 001000000000 0 000000000001
FT1A 031714 000001 0 0 001000000000 0 001000000000
FT9 031715 000001 0 0 001000000000 0 001000000000
ET0 031715 000001 0 0 001000000000 0 001000000000
ST1 031715 000001 0 0 001000000000 0 001000000000
ST2 031715 000001 0 0 001000000000 0 001000000000
ST9 031715 000001 0 0 001000000000 0 001000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 175
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0370
*031715 CAME 3,034455
INITIAL
C(AC)=001000 000000
C(E)=001000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031715 031715 0 0 312140034455 0 001000000000
IT1 031715 0 0 0 312140034455 0 001000000000
AT3 031715 0 0 0 000000034455 0 312140034455
AT6 031715 034455 0 0 000000034455 0 312140034455
FT0 031715 034455 0 0 001000000000 0 312140034455
FT1A 031715 034455 0 0 001000000000 0 001000000000
FT2 031715 034455 0 0 0 0 001000000000
FT2RQ 031715 034455 0 0 001000000000 0 001000000000
FT3 031715 034455 0 0 001000000000 0 001000000000
FT9 031716 034455 0 0 001000000000 0 001000000000
ET0 031717 034455 0 0 0 0 001000000000
ST1A 031717 034455 0 0 0 0 001000000000
ST9 031717 034455 0 0 0 0 001000000000
*031717 JUMPA 0,031720
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031717 031717 0 0 324000031720 0 000000031720
IT1 031717 0 0 0 324000031720 0 000000031720
AT3 031717 0 0 0 000000031720 0 324000031720
AT6 031717 031720 0 0 000000031720 0 324000031720
FT1A 031717 031720 0 0 000000031720 0 000000031720
FT2 031717 031720 0 0 0 0 000000031720
FT2RQ 031717 031720 0 0 000000000017 0 000000031720
FT3 031717 031720 0 0 000000000017 0 000000031720
FT9 031720 031720 0 0 000000000017 0 000000031720
ET0 031720 031720 0 0 000000000017 0 000000031720
ST1A 031720 031720 0 0 000000000017 0 000000031720
ST9 031720 031720 0 0 000000000017 0 000000031720
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 176
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0371
*031720 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=001000 000000
FINAL
C(E)=001000 000000
TIME PC MA SC FE AR MQ BR
IT0 031720 031720 0 0 476000000003 0 000000000003
IT1 031720 0 0 0 476000000003 0 000000000003
AT3 031720 0 0 0 000000000003 0 476000000003
AT6 031720 000003 0 0 000000000003 0 476000000003
FT1A 031720 000003 0 0 000000000003 0 000000000003
FT9 031721 000003 0 0 000000000003 0 000000000003
ET0 031721 000003 0 0 777777777777 0 000000000003
ST6 031721 000003 0 0 777777777777 0 000000000003
ST6A 031721 000003 0 0 777777777777 0 000000000003
ST9 031721 000003 0 0 777777777777 0 000000000003
*031721 MOVSI 1,002000
INITIAL
C(AC)=001000 000000
FINAL
C(AC)=002000 000000
TIME PC MA SC FE AR MQ BR
IT0 031721 031721 0 0 205040002000 0 000000002000
IT1 031721 0 0 0 205040002000 0 000000002000
AT3 031721 0 0 0 000000002000 0 205040002000
AT6 031721 0 0 0 000000002000 0 205040002000
FT1A 031721 0 0 0 000000002000 0 000000002000
FT9 031722 0 0 0 000000002000 0 000000002000
ET0 031722 0 0 0 002000000000 0 000000002000
ST1 031722 0 0 0 002000000000 0 000000002000
ST2 031722 0 0 0 002000000000 0 000000002000
ST9 031722 0 0 0 002000000000 0 000000002000
*031722 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031722 031722 0 0 201100000001 0 000000000001
IT1 031722 0 0 0 201100000001 0 000000000001
AT3 031722 0 0 0 000000000001 0 201100000001
AT6 031722 000001 0 0 000000000001 0 201100000001
FT1A 031722 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 177
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0372
FT9 031723 000001 0 0 000000000001 0 000000000001
ET0 031723 000001 0 0 000000000001 0 000000000001
ST1 031723 000001 0 0 000000000001 0 000000000001
ST2 031723 000001 0 0 000000000001 0 000000000001
ST9 031723 000001 0 0 000000000001 0 000000000001
*031723 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=002000 000000
TIME PC MA SC FE AR MQ BR
IT0 031723 031723 0 0 200142000000 0 002000000000
IT1 031723 0 0 0 200142000000 0 002000000000
AT1 031723 0 0 0 0 0 200142000000
AT2 031723 0 0 0 000000000001 0 200142000000
AT3 031723 0 0 0 000000000001 0 000000000001
AT6 031723 000001 0 0 000000000001 0 000000000001
FT0 031723 000001 0 0 002000000000 0 000000000001
FT1A 031723 000001 0 0 002000000000 0 002000000000
FT9 031724 000001 0 0 002000000000 0 002000000000
ET0 031724 000001 0 0 002000000000 0 002000000000
ST1 031724 000001 0 0 002000000000 0 002000000000
ST2 031724 000001 0 0 002000000000 0 002000000000
ST9 031724 000001 0 0 002000000000 0 002000000000
*031724 CAME 3,034456
INITIAL
C(AC)=002000 000000
C(E)=002000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031724 031724 0 0 312140034456 0 002000000000
IT1 031724 0 0 0 312140034456 0 002000000000
AT3 031724 0 0 0 000000034456 0 312140034456
AT6 031724 034456 0 0 000000034456 0 312140034456
FT0 031724 034456 0 0 002000000000 0 312140034456
FT1A 031724 034456 0 0 002000000000 0 002000000000
FT2 031724 034456 0 0 0 0 002000000000
FT2RQ 031724 034456 0 0 002000000000 0 002000000000
FT3 031724 034456 0 0 002000000000 0 002000000000
FT9 031725 034456 0 0 002000000000 0 002000000000
ET0 031726 034456 0 0 0 0 002000000000
ST1A 031726 034456 0 0 0 0 002000000000
ST9 031726 034456 0 0 0 0 002000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 178
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0373
*031726 JUMPA 0,031727
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031726 031726 0 0 324000031727 0 000000031727
IT1 031726 0 0 0 324000031727 0 000000031727
AT3 031726 0 0 0 000000031727 0 324000031727
AT6 031726 031727 0 0 000000031727 0 324000031727
FT1A 031726 031727 0 0 000000031727 0 000000031727
FT2 031726 031727 0 0 0 0 000000031727
FT2RQ 031726 031727 0 0 000000000017 0 000000031727
FT3 031726 031727 0 0 000000000017 0 000000031727
FT9 031727 031727 0 0 000000000017 0 000000031727
ET0 031727 031727 0 0 000000000017 0 000000031727
ST1A 031727 031727 0 0 000000000017 0 000000031727
ST9 031727 031727 0 0 000000000017 0 000000031727
*031727 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=002000 000000
FINAL
C(E)=002000 000000
TIME PC MA SC FE AR MQ BR
IT0 031727 031727 0 0 476000000003 0 000000000003
IT1 031727 0 0 0 476000000003 0 000000000003
AT3 031727 0 0 0 000000000003 0 476000000003
AT6 031727 000003 0 0 000000000003 0 476000000003
FT1A 031727 000003 0 0 000000000003 0 000000000003
FT9 031730 000003 0 0 000000000003 0 000000000003
ET0 031730 000003 0 0 777777777777 0 000000000003
ST6 031730 000003 0 0 777777777777 0 000000000003
ST6A 031730 000003 0 0 777777777777 0 000000000003
ST9 031730 000003 0 0 777777777777 0 000000000003
*031730 MOVSI 1,004000
INITIAL
C(AC)=002000 000000
FINAL
C(AC)=004000 000000
TIME PC MA SC FE AR MQ BR
IT0 031730 031730 0 0 205040004000 0 000000004000
IT1 031730 0 0 0 205040004000 0 000000004000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 179
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0374
AT3 031730 0 0 0 000000004000 0 205040004000
AT6 031730 0 0 0 000000004000 0 205040004000
FT1A 031730 0 0 0 000000004000 0 000000004000
FT9 031731 0 0 0 000000004000 0 000000004000
ET0 031731 0 0 0 004000000000 0 000000004000
ST1 031731 0 0 0 004000000000 0 000000004000
ST2 031731 0 0 0 004000000000 0 000000004000
ST9 031731 0 0 0 004000000000 0 000000004000
*031731 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031731 031731 0 0 201100000001 0 000000000001
IT1 031731 0 0 0 201100000001 0 000000000001
AT3 031731 0 0 0 000000000001 0 201100000001
AT6 031731 000001 0 0 000000000001 0 201100000001
FT1A 031731 000001 0 0 000000000001 0 000000000001
FT9 031732 000001 0 0 000000000001 0 000000000001
ET0 031732 000001 0 0 000000000001 0 000000000001
ST1 031732 000001 0 0 000000000001 0 000000000001
ST2 031732 000001 0 0 000000000001 0 000000000001
ST9 031732 000001 0 0 000000000001 0 000000000001
*031732 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=004000 000000
TIME PC MA SC FE AR MQ BR
IT0 031732 031732 0 0 200142000000 0 004000000000
IT1 031732 0 0 0 200142000000 0 004000000000
AT1 031732 0 0 0 0 0 200142000000
AT2 031732 0 0 0 000000000001 0 200142000000
AT3 031732 0 0 0 000000000001 0 000000000001
AT6 031732 000001 0 0 000000000001 0 000000000001
FT0 031732 000001 0 0 004000000000 0 000000000001
FT1A 031732 000001 0 0 004000000000 0 004000000000
FT9 031733 000001 0 0 004000000000 0 004000000000
ET0 031733 000001 0 0 004000000000 0 004000000000
ST1 031733 000001 0 0 004000000000 0 004000000000
ST2 031733 000001 0 0 004000000000 0 004000000000
ST9 031733 000001 0 0 004000000000 0 004000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 180
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0375
*031733 CAME 3,034457
INITIAL
C(AC)=004000 000000
C(E)=004000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031733 031733 0 0 312140034457 0 004000000000
IT1 031733 0 0 0 312140034457 0 004000000000
AT3 031733 0 0 0 000000034457 0 312140034457
AT6 031733 034457 0 0 000000034457 0 312140034457
FT0 031733 034457 0 0 004000000000 0 312140034457
FT1A 031733 034457 0 0 004000000000 0 004000000000
FT2 031733 034457 0 0 0 0 004000000000
FT2RQ 031733 034457 0 0 004000000000 0 004000000000
FT3 031733 034457 0 0 004000000000 0 004000000000
FT9 031734 034457 0 0 004000000000 0 004000000000
ET0 031735 034457 0 0 0 0 004000000000
ST1A 031735 034457 0 0 0 0 004000000000
ST9 031735 034457 0 0 0 0 004000000000
*031735 JUMPA 0,031736
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031735 031735 0 0 324000031736 0 000000031736
IT1 031735 0 0 0 324000031736 0 000000031736
AT3 031735 0 0 0 000000031736 0 324000031736
AT6 031735 031736 0 0 000000031736 0 324000031736
FT1A 031735 031736 0 0 000000031736 0 000000031736
FT2 031735 031736 0 0 0 0 000000031736
FT2RQ 031735 031736 0 0 000000000017 0 000000031736
FT3 031735 031736 0 0 000000000017 0 000000031736
FT9 031736 031736 0 0 000000000017 0 000000031736
ET0 031736 031736 0 0 000000000017 0 000000031736
ST1A 031736 031736 0 0 000000000017 0 000000031736
ST9 031736 031736 0 0 000000000017 0 000000031736
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 181
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0376
*031736 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=004000 000000
FINAL
C(E)=004000 000000
TIME PC MA SC FE AR MQ BR
IT0 031736 031736 0 0 476000000003 0 000000000003
IT1 031736 0 0 0 476000000003 0 000000000003
AT3 031736 0 0 0 000000000003 0 476000000003
AT6 031736 000003 0 0 000000000003 0 476000000003
FT1A 031736 000003 0 0 000000000003 0 000000000003
FT9 031737 000003 0 0 000000000003 0 000000000003
ET0 031737 000003 0 0 777777777777 0 000000000003
ST6 031737 000003 0 0 777777777777 0 000000000003
ST6A 031737 000003 0 0 777777777777 0 000000000003
ST9 031737 000003 0 0 777777777777 0 000000000003
*031737 MOVSI 1,010000
INITIAL
C(AC)=004000 000000
FINAL
C(AC)=010000 000000
TIME PC MA SC FE AR MQ BR
IT0 031737 031737 0 0 205040010000 0 000000010000
IT1 031737 0 0 0 205040010000 0 000000010000
AT3 031737 0 0 0 000000010000 0 205040010000
AT6 031737 0 0 0 000000010000 0 205040010000
FT1A 031737 0 0 0 000000010000 0 000000010000
FT9 031740 0 0 0 000000010000 0 000000010000
ET0 031740 0 0 0 010000000000 0 000000010000
ST1 031740 0 0 0 010000000000 0 000000010000
ST2 031740 0 0 0 010000000000 0 000000010000
ST9 031740 0 0 0 010000000000 0 000000010000
*031740 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031740 031740 0 0 201100000001 0 000000000001
IT1 031740 0 0 0 201100000001 0 000000000001
AT3 031740 0 0 0 000000000001 0 201100000001
AT6 031740 000001 0 0 000000000001 0 201100000001
FT1A 031740 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 182
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0377
FT9 031741 000001 0 0 000000000001 0 000000000001
ET0 031741 000001 0 0 000000000001 0 000000000001
ST1 031741 000001 0 0 000000000001 0 000000000001
ST2 031741 000001 0 0 000000000001 0 000000000001
ST9 031741 000001 0 0 000000000001 0 000000000001
*031741 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=010000 000000
TIME PC MA SC FE AR MQ BR
IT0 031741 031741 0 0 200142000000 0 010000000000
IT1 031741 0 0 0 200142000000 0 010000000000
AT1 031741 0 0 0 0 0 200142000000
AT2 031741 0 0 0 000000000001 0 200142000000
AT3 031741 0 0 0 000000000001 0 000000000001
AT6 031741 000001 0 0 000000000001 0 000000000001
FT0 031741 000001 0 0 010000000000 0 000000000001
FT1A 031741 000001 0 0 010000000000 0 010000000000
FT9 031742 000001 0 0 010000000000 0 010000000000
ET0 031742 000001 0 0 010000000000 0 010000000000
ST1 031742 000001 0 0 010000000000 0 010000000000
ST2 031742 000001 0 0 010000000000 0 010000000000
ST9 031742 000001 0 0 010000000000 0 010000000000
*031742 CAME 3,034460
INITIAL
C(AC)=010000 000000
C(E)=010000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031742 031742 0 0 312140034460 0 010000000000
IT1 031742 0 0 0 312140034460 0 010000000000
AT3 031742 0 0 0 000000034460 0 312140034460
AT6 031742 034460 0 0 000000034460 0 312140034460
FT0 031742 034460 0 0 010000000000 0 312140034460
FT1A 031742 034460 0 0 010000000000 0 010000000000
FT2 031742 034460 0 0 0 0 010000000000
FT2RQ 031742 034460 0 0 010000000000 0 010000000000
FT3 031742 034460 0 0 010000000000 0 010000000000
FT9 031743 034460 0 0 010000000000 0 010000000000
ET0 031744 034460 0 0 0 0 010000000000
ST1A 031744 034460 0 0 0 0 010000000000
ST9 031744 034460 0 0 0 0 010000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 183
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0378
*031744 JUMPA 0,031745
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031744 031744 0 0 324000031745 0 000000031745
IT1 031744 0 0 0 324000031745 0 000000031745
AT3 031744 0 0 0 000000031745 0 324000031745
AT6 031744 031745 0 0 000000031745 0 324000031745
FT1A 031744 031745 0 0 000000031745 0 000000031745
FT2 031744 031745 0 0 0 0 000000031745
FT2RQ 031744 031745 0 0 000000000017 0 000000031745
FT3 031744 031745 0 0 000000000017 0 000000031745
FT9 031745 031745 0 0 000000000017 0 000000031745
ET0 031745 031745 0 0 000000000017 0 000000031745
ST1A 031745 031745 0 0 000000000017 0 000000031745
ST9 031745 031745 0 0 000000000017 0 000000031745
*031745 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=010000 000000
FINAL
C(E)=010000 000000
TIME PC MA SC FE AR MQ BR
IT0 031745 031745 0 0 476000000003 0 000000000003
IT1 031745 0 0 0 476000000003 0 000000000003
AT3 031745 0 0 0 000000000003 0 476000000003
AT6 031745 000003 0 0 000000000003 0 476000000003
FT1A 031745 000003 0 0 000000000003 0 000000000003
FT9 031746 000003 0 0 000000000003 0 000000000003
ET0 031746 000003 0 0 777777777777 0 000000000003
ST6 031746 000003 0 0 777777777777 0 000000000003
ST6A 031746 000003 0 0 777777777777 0 000000000003
ST9 031746 000003 0 0 777777777777 0 000000000003
*031746 MOVSI 1,020000
INITIAL
C(AC)=010000 000000
FINAL
C(AC)=020000 000000
TIME PC MA SC FE AR MQ BR
IT0 031746 031746 0 0 205040020000 0 000000020000
IT1 031746 0 0 0 205040020000 0 000000020000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 184
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0379
AT3 031746 0 0 0 000000020000 0 205040020000
AT6 031746 0 0 0 000000020000 0 205040020000
FT1A 031746 0 0 0 000000020000 0 000000020000
FT9 031747 0 0 0 000000020000 0 000000020000
ET0 031747 0 0 0 020000000000 0 000000020000
ST1 031747 0 0 0 020000000000 0 000000020000
ST2 031747 0 0 0 020000000000 0 000000020000
ST9 031747 0 0 0 020000000000 0 000000020000
*031747 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031747 031747 0 0 201100000001 0 000000000001
IT1 031747 0 0 0 201100000001 0 000000000001
AT3 031747 0 0 0 000000000001 0 201100000001
AT6 031747 000001 0 0 000000000001 0 201100000001
FT1A 031747 000001 0 0 000000000001 0 000000000001
FT9 031750 000001 0 0 000000000001 0 000000000001
ET0 031750 000001 0 0 000000000001 0 000000000001
ST1 031750 000001 0 0 000000000001 0 000000000001
ST2 031750 000001 0 0 000000000001 0 000000000001
ST9 031750 000001 0 0 000000000001 0 000000000001
*031750 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=020000 000000
TIME PC MA SC FE AR MQ BR
IT0 031750 031750 0 0 200142000000 0 020000000000
IT1 031750 0 0 0 200142000000 0 020000000000
AT1 031750 0 0 0 0 0 200142000000
AT2 031750 0 0 0 000000000001 0 200142000000
AT3 031750 0 0 0 000000000001 0 000000000001
AT6 031750 000001 0 0 000000000001 0 000000000001
FT0 031750 000001 0 0 020000000000 0 000000000001
FT1A 031750 000001 0 0 020000000000 0 020000000000
FT9 031751 000001 0 0 020000000000 0 020000000000
ET0 031751 000001 0 0 020000000000 0 020000000000
ST1 031751 000001 0 0 020000000000 0 020000000000
ST2 031751 000001 0 0 020000000000 0 020000000000
ST9 031751 000001 0 0 020000000000 0 020000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 185
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0380
*031751 CAME 3,034461
INITIAL
C(AC)=020000 000000
C(E)=020000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031751 031751 0 0 312140034461 0 020000000000
IT1 031751 0 0 0 312140034461 0 020000000000
AT3 031751 0 0 0 000000034461 0 312140034461
AT6 031751 034461 0 0 000000034461 0 312140034461
FT0 031751 034461 0 0 020000000000 0 312140034461
FT1A 031751 034461 0 0 020000000000 0 020000000000
FT2 031751 034461 0 0 0 0 020000000000
FT2RQ 031751 034461 0 0 020000000000 0 020000000000
FT3 031751 034461 0 0 020000000000 0 020000000000
FT9 031752 034461 0 0 020000000000 0 020000000000
ET0 031753 034461 0 0 0 0 020000000000
ST1A 031753 034461 0 0 0 0 020000000000
ST9 031753 034461 0 0 0 0 020000000000
*031753 JUMPA 0,031754
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031753 031753 0 0 324000031754 0 000000031754
IT1 031753 0 0 0 324000031754 0 000000031754
AT3 031753 0 0 0 000000031754 0 324000031754
AT6 031753 031754 0 0 000000031754 0 324000031754
FT1A 031753 031754 0 0 000000031754 0 000000031754
FT2 031753 031754 0 0 0 0 000000031754
FT2RQ 031753 031754 0 0 000000000017 0 000000031754
FT3 031753 031754 0 0 000000000017 0 000000031754
FT9 031754 031754 0 0 000000000017 0 000000031754
ET0 031754 031754 0 0 000000000017 0 000000031754
ST1A 031754 031754 0 0 000000000017 0 000000031754
ST9 031754 031754 0 0 000000000017 0 000000031754
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 186
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0381
*031754 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=020000 000000
FINAL
C(E)=020000 000000
TIME PC MA SC FE AR MQ BR
IT0 031754 031754 0 0 476000000003 0 000000000003
IT1 031754 0 0 0 476000000003 0 000000000003
AT3 031754 0 0 0 000000000003 0 476000000003
AT6 031754 000003 0 0 000000000003 0 476000000003
FT1A 031754 000003 0 0 000000000003 0 000000000003
FT9 031755 000003 0 0 000000000003 0 000000000003
ET0 031755 000003 0 0 777777777777 0 000000000003
ST6 031755 000003 0 0 777777777777 0 000000000003
ST6A 031755 000003 0 0 777777777777 0 000000000003
ST9 031755 000003 0 0 777777777777 0 000000000003
*031755 MOVSI 1,040000
INITIAL
C(AC)=020000 000000
FINAL
C(AC)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 031755 031755 0 0 205040040000 0 000000040000
IT1 031755 0 0 0 205040040000 0 000000040000
AT3 031755 0 0 0 000000040000 0 205040040000
AT6 031755 0 0 0 000000040000 0 205040040000
FT1A 031755 0 0 0 000000040000 0 000000040000
FT9 031756 0 0 0 000000040000 0 000000040000
ET0 031756 0 0 0 040000000000 0 000000040000
ST1 031756 0 0 0 040000000000 0 000000040000
ST2 031756 0 0 0 040000000000 0 000000040000
ST9 031756 0 0 0 040000000000 0 000000040000
*031756 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031756 031756 0 0 201100000001 0 000000000001
IT1 031756 0 0 0 201100000001 0 000000000001
AT3 031756 0 0 0 000000000001 0 201100000001
AT6 031756 000001 0 0 000000000001 0 201100000001
FT1A 031756 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 187
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0382
FT9 031757 000001 0 0 000000000001 0 000000000001
ET0 031757 000001 0 0 000000000001 0 000000000001
ST1 031757 000001 0 0 000000000001 0 000000000001
ST2 031757 000001 0 0 000000000001 0 000000000001
ST9 031757 000001 0 0 000000000001 0 000000000001
*031757 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 031757 031757 0 0 200142000000 0 040000000000
IT1 031757 0 0 0 200142000000 0 040000000000
AT1 031757 0 0 0 0 0 200142000000
AT2 031757 0 0 0 000000000001 0 200142000000
AT3 031757 0 0 0 000000000001 0 000000000001
AT6 031757 000001 0 0 000000000001 0 000000000001
FT0 031757 000001 0 0 040000000000 0 000000000001
FT1A 031757 000001 0 0 040000000000 0 040000000000
FT9 031760 000001 0 0 040000000000 0 040000000000
ET0 031760 000001 0 0 040000000000 0 040000000000
ST1 031760 000001 0 0 040000000000 0 040000000000
ST2 031760 000001 0 0 040000000000 0 040000000000
ST9 031760 000001 0 0 040000000000 0 040000000000
*031760 CAME 3,034462
INITIAL
C(AC)=040000 000000
C(E)=040000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031760 031760 0 0 312140034462 0 040000000000
IT1 031760 0 0 0 312140034462 0 040000000000
AT3 031760 0 0 0 000000034462 0 312140034462
AT6 031760 034462 0 0 000000034462 0 312140034462
FT0 031760 034462 0 0 040000000000 0 312140034462
FT1A 031760 034462 0 0 040000000000 0 040000000000
FT2 031760 034462 0 0 0 0 040000000000
FT2RQ 031760 034462 0 0 040000000000 0 040000000000
FT3 031760 034462 0 0 040000000000 0 040000000000
FT9 031761 034462 0 0 040000000000 0 040000000000
ET0 031762 034462 0 0 0 0 040000000000
ST1A 031762 034462 0 0 0 0 040000000000
ST9 031762 034462 0 0 0 0 040000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 188
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0383
*031762 JUMPA 0,031763
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031762 031762 0 0 324000031763 0 000000031763
IT1 031762 0 0 0 324000031763 0 000000031763
AT3 031762 0 0 0 000000031763 0 324000031763
AT6 031762 031763 0 0 000000031763 0 324000031763
FT1A 031762 031763 0 0 000000031763 0 000000031763
FT2 031762 031763 0 0 0 0 000000031763
FT2RQ 031762 031763 0 0 000000000017 0 000000031763
FT3 031762 031763 0 0 000000000017 0 000000031763
FT9 031763 031763 0 0 000000000017 0 000000031763
ET0 031763 031763 0 0 000000000017 0 000000031763
ST1A 031763 031763 0 0 000000000017 0 000000031763
ST9 031763 031763 0 0 000000000017 0 000000031763
*031763 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=040000 000000
FINAL
C(E)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 031763 031763 0 0 476000000003 0 000000000003
IT1 031763 0 0 0 476000000003 0 000000000003
AT3 031763 0 0 0 000000000003 0 476000000003
AT6 031763 000003 0 0 000000000003 0 476000000003
FT1A 031763 000003 0 0 000000000003 0 000000000003
FT9 031764 000003 0 0 000000000003 0 000000000003
ET0 031764 000003 0 0 777777777777 0 000000000003
ST6 031764 000003 0 0 777777777777 0 000000000003
ST6A 031764 000003 0 0 777777777777 0 000000000003
ST9 031764 000003 0 0 777777777777 0 000000000003
*031764 MOVSI 1,100000
INITIAL
C(AC)=040000 000000
FINAL
C(AC)=100000 000000
TIME PC MA SC FE AR MQ BR
IT0 031764 031764 0 0 205040100000 0 000000100000
IT1 031764 0 0 0 205040100000 0 000000100000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 189
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0384
AT3 031764 0 0 0 000000100000 0 205040100000
AT6 031764 0 0 0 000000100000 0 205040100000
FT1A 031764 0 0 0 000000100000 0 000000100000
FT9 031765 0 0 0 000000100000 0 000000100000
ET0 031765 0 0 0 100000000000 0 000000100000
ST1 031765 0 0 0 100000000000 0 000000100000
ST2 031765 0 0 0 100000000000 0 000000100000
ST9 031765 0 0 0 100000000000 0 000000100000
*031765 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031765 031765 0 0 201100000001 0 000000000001
IT1 031765 0 0 0 201100000001 0 000000000001
AT3 031765 0 0 0 000000000001 0 201100000001
AT6 031765 000001 0 0 000000000001 0 201100000001
FT1A 031765 000001 0 0 000000000001 0 000000000001
FT9 031766 000001 0 0 000000000001 0 000000000001
ET0 031766 000001 0 0 000000000001 0 000000000001
ST1 031766 000001 0 0 000000000001 0 000000000001
ST2 031766 000001 0 0 000000000001 0 000000000001
ST9 031766 000001 0 0 000000000001 0 000000000001
*031766 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=100000 000000
TIME PC MA SC FE AR MQ BR
IT0 031766 031766 0 0 200142000000 0 100000000000
IT1 031766 0 0 0 200142000000 0 100000000000
AT1 031766 0 0 0 0 0 200142000000
AT2 031766 0 0 0 000000000001 0 200142000000
AT3 031766 0 0 0 000000000001 0 000000000001
AT6 031766 000001 0 0 000000000001 0 000000000001
FT0 031766 000001 0 0 100000000000 0 000000000001
FT1A 031766 000001 0 0 100000000000 0 100000000000
FT9 031767 000001 0 0 100000000000 0 100000000000
ET0 031767 000001 0 0 100000000000 0 100000000000
ST1 031767 000001 0 0 100000000000 0 100000000000
ST2 031767 000001 0 0 100000000000 0 100000000000
ST9 031767 000001 0 0 100000000000 0 100000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 190
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0385
*031767 CAME 3,034463
INITIAL
C(AC)=100000 000000
C(E)=100000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031767 031767 0 0 312140034463 0 100000000000
IT1 031767 0 0 0 312140034463 0 100000000000
AT3 031767 0 0 0 000000034463 0 312140034463
AT6 031767 034463 0 0 000000034463 0 312140034463
FT0 031767 034463 0 0 100000000000 0 312140034463
FT1A 031767 034463 0 0 100000000000 0 100000000000
FT2 031767 034463 0 0 0 0 100000000000
FT2RQ 031767 034463 0 0 100000000000 0 100000000000
FT3 031767 034463 0 0 100000000000 0 100000000000
FT9 031770 034463 0 0 100000000000 0 100000000000
ET0 031771 034463 0 0 0 0 100000000000
ST1A 031771 034463 0 0 0 0 100000000000
ST9 031771 034463 0 0 0 0 100000000000
*031771 JUMPA 0,031772
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031771 031771 0 0 324000031772 0 000000031772
IT1 031771 0 0 0 324000031772 0 000000031772
AT3 031771 0 0 0 000000031772 0 324000031772
AT6 031771 031772 0 0 000000031772 0 324000031772
FT1A 031771 031772 0 0 000000031772 0 000000031772
FT2 031771 031772 0 0 0 0 000000031772
FT2RQ 031771 031772 0 0 000000000017 0 000000031772
FT3 031771 031772 0 0 000000000017 0 000000031772
FT9 031772 031772 0 0 000000000017 0 000000031772
ET0 031772 031772 0 0 000000000017 0 000000031772
ST1A 031772 031772 0 0 000000000017 0 000000031772
ST9 031772 031772 0 0 000000000017 0 000000031772
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 191
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0386
*031772 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=100000 000000
FINAL
C(E)=100000 000000
TIME PC MA SC FE AR MQ BR
IT0 031772 031772 0 0 476000000003 0 000000000003
IT1 031772 0 0 0 476000000003 0 000000000003
AT3 031772 0 0 0 000000000003 0 476000000003
AT6 031772 000003 0 0 000000000003 0 476000000003
FT1A 031772 000003 0 0 000000000003 0 000000000003
FT9 031773 000003 0 0 000000000003 0 000000000003
ET0 031773 000003 0 0 777777777777 0 000000000003
ST6 031773 000003 0 0 777777777777 0 000000000003
ST6A 031773 000003 0 0 777777777777 0 000000000003
ST9 031773 000003 0 0 777777777777 0 000000000003
*031773 MOVSI 1,200000
INITIAL
C(AC)=100000 000000
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 031773 031773 0 0 205040200000 0 000000200000
IT1 031773 0 0 0 205040200000 0 000000200000
AT3 031773 0 0 0 000000200000 0 205040200000
AT6 031773 0 0 0 000000200000 0 205040200000
FT1A 031773 0 0 0 000000200000 0 000000200000
FT9 031774 0 0 0 000000200000 0 000000200000
ET0 031774 0 0 0 200000000000 0 000000200000
ST1 031774 0 0 0 200000000000 0 000000200000
ST2 031774 0 0 0 200000000000 0 000000200000
ST9 031774 0 0 0 200000000000 0 000000200000
*031774 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031774 031774 0 0 201100000001 0 000000000001
IT1 031774 0 0 0 201100000001 0 000000000001
AT3 031774 0 0 0 000000000001 0 201100000001
AT6 031774 000001 0 0 000000000001 0 201100000001
FT1A 031774 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 192
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0387
FT9 031775 000001 0 0 000000000001 0 000000000001
ET0 031775 000001 0 0 000000000001 0 000000000001
ST1 031775 000001 0 0 000000000001 0 000000000001
ST2 031775 000001 0 0 000000000001 0 000000000001
ST9 031775 000001 0 0 000000000001 0 000000000001
*031775 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 031775 031775 0 0 200142000000 0 200000000000
IT1 031775 0 0 0 200142000000 0 200000000000
AT1 031775 0 0 0 0 0 200142000000
AT2 031775 0 0 0 000000000001 0 200142000000
AT3 031775 0 0 0 000000000001 0 000000000001
AT6 031775 000001 0 0 000000000001 0 000000000001
FT0 031775 000001 0 0 200000000000 0 000000000001
FT1A 031775 000001 0 0 200000000000 0 200000000000
FT9 031776 000001 0 0 200000000000 0 200000000000
ET0 031776 000001 0 0 200000000000 0 200000000000
ST1 031776 000001 0 0 200000000000 0 200000000000
ST2 031776 000001 0 0 200000000000 0 200000000000
ST9 031776 000001 0 0 200000000000 0 200000000000
*031776 CAME 3,034464
INITIAL
C(AC)=200000 000000
C(E)=200000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031776 031776 0 0 312140034464 0 200000000000
IT1 031776 0 0 0 312140034464 0 200000000000
AT3 031776 0 0 0 000000034464 0 312140034464
AT6 031776 034464 0 0 000000034464 0 312140034464
FT0 031776 034464 0 0 200000000000 0 312140034464
FT1A 031776 034464 0 0 200000000000 0 200000000000
FT2 031776 034464 0 0 0 0 200000000000
FT2RQ 031776 034464 0 0 200000000000 0 200000000000
FT3 031776 034464 0 0 200000000000 0 200000000000
FT9 031777 034464 0 0 200000000000 0 200000000000
ET0 0 034464 0 0 0 0 200000000000
ST1A 0 034464 0 0 0 0 200000000000
ST9 0 034464 0 0 0 0 200000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 193
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0388
*032000 JUMPA 0,032001
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 324000032001 0 000000032001
IT1 0 0 0 0 324000032001 0 000000032001
AT3 0 0 0 0 000000032001 0 324000032001
AT6 0 032001 0 0 000000032001 0 324000032001
FT1A 0 032001 0 0 000000032001 0 000000032001
FT2 0 032001 0 0 0 0 000000032001
FT2RQ 0 032001 0 0 000000000017 0 000000032001
FT3 0 032001 0 0 000000000017 0 000000032001
FT9 032001 032001 0 0 000000000017 0 000000032001
ET0 032001 032001 0 0 000000000017 0 000000032001
ST1A 032001 032001 0 0 000000000017 0 000000032001
ST9 032001 032001 0 0 000000000017 0 000000032001
*032001 SETOM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=200000 000000
FINAL
C(E)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 032001 032001 0 0 476000000003 0 000000000003
IT1 032001 0 0 0 476000000003 0 000000000003
AT3 032001 0 0 0 000000000003 0 476000000003
AT6 032001 000003 0 0 000000000003 0 476000000003
FT1A 032001 000003 0 0 000000000003 0 000000000003
FT9 032002 000003 0 0 000000000003 0 000000000003
ET0 032002 000003 0 0 777777777777 0 000000000003
ST6 032002 000003 0 0 777777777777 0 000000000003
ST6A 032002 000003 0 0 777777777777 0 000000000003
ST9 032002 000003 0 0 777777777777 0 000000000003
*032002 MOVSI 1,400000
INITIAL
C(AC)=200000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 032002 032002 0 0 205040400000 0 000000400000
IT1 032002 0 0 0 205040400000 0 000000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 194
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0389
AT3 032002 0 0 0 000000400000 0 205040400000
AT6 032002 0 0 0 000000400000 0 205040400000
FT1A 032002 0 0 0 000000400000 0 000000400000
FT9 032003 0 0 0 000000400000 0 000000400000
ET0 032003 0 0 0 400000000000 0 000000400000
ST1 032003 0 0 0 400000000000 0 000000400000
ST2 032003 0 0 0 400000000000 0 000000400000
ST9 032003 0 0 0 400000000000 0 000000400000
*032003 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032003 032003 0 0 201100000001 0 000000000001
IT1 032003 0 0 0 201100000001 0 000000000001
AT3 032003 0 0 0 000000000001 0 201100000001
AT6 032003 000001 0 0 000000000001 0 201100000001
FT1A 032003 000001 0 0 000000000001 0 000000000001
FT9 032004 000001 0 0 000000000001 0 000000000001
ET0 032004 000001 0 0 000000000001 0 000000000001
ST1 032004 000001 0 0 000000000001 0 000000000001
ST2 032004 000001 0 0 000000000001 0 000000000001
ST9 032004 000001 0 0 000000000001 0 000000000001
*032004 MOVE 3,000000(2)
INITIAL
C(AC)=777777 777777
C(E)=000000 000017
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 032004 032004 0 0 200142000000 0 400000000000
IT1 032004 0 0 0 200142000000 0 400000000000
AT1 032004 0 0 0 0 0 200142000000
AT2 032004 0 0 0 000000000001 0 200142000000
AT3 032004 0 0 0 000000000001 0 000000000001
AT6 032004 000001 0 0 000000000001 0 000000000001
FT0 032004 000001 0 0 400000000000 0 000000000001
FT1A 032004 000001 0 0 400000000000 0 400000000000
FT9 032005 000001 0 0 400000000000 0 400000000000
ET0 032005 000001 0 0 400000000000 0 400000000000
ST1 032005 000001 0 0 400000000000 0 400000000000
ST2 032005 000001 0 0 400000000000 0 400000000000
ST9 032005 000001 0 0 400000000000 0 400000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 195
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0390
*032005 CAME 3,034465
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032005 032005 0 0 312140034465 0 400000000000
IT1 032005 0 0 0 312140034465 0 400000000000
AT3 032005 0 0 0 000000034465 0 312140034465
AT6 032005 034465 0 0 000000034465 0 312140034465
FT0 032005 034465 0 0 400000000000 0 312140034465
FT1A 032005 034465 0 0 400000000000 0 400000000000
FT2 032005 034465 0 0 0 0 400000000000
FT2RQ 032005 034465 0 0 400000000000 0 400000000000
FT3 032005 034465 0 0 400000000000 0 400000000000
FT9 032006 034465 0 0 400000000000 0 400000000000
ET0 032007 034465 0 0 0 0 400000000000
ST1A 032007 034465 0 0 0 0 400000000000
ST9 032007 034465 0 0 0 0 400000000000
*032007 JUMPA 0,032010
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032007 032007 0 0 324000032010 0 000000032010
IT1 032007 0 0 0 324000032010 0 000000032010
AT3 032007 0 0 0 000000032010 0 324000032010
AT6 032007 032010 0 0 000000032010 0 324000032010
FT1A 032007 032010 0 0 000000032010 0 000000032010
FT2 032007 032010 0 0 0 0 000000032010
FT2RQ 032007 032010 0 0 000000000017 0 000000032010
FT3 032007 032010 0 0 000000000017 0 000000032010
FT9 032010 032010 0 0 000000000017 0 000000032010
ET0 032010 032010 0 0 000000000017 0 000000032010
ST1A 032010 032010 0 0 000000000017 0 000000032010
ST9 032010 032010 0 0 000000000017 0 000000032010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 196
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0391
*032010 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=400000 000000
FINAL
C(E)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 032010 032010 0 0 402000000003 0 000000000003
IT1 032010 0 0 0 402000000003 0 000000000003
AT3 032010 0 0 0 000000000003 0 402000000003
AT6 032010 000003 0 0 000000000003 0 402000000003
FT1A 032010 000003 0 0 000000000003 0 000000000003
FT9 032011 000003 0 0 000000000003 0 000000000003
ET0 032011 000003 0 0 0 0 000000000003
ST6 032011 000003 0 0 0 0 000000000003
ST6A 032011 000003 0 0 0 0 000000000003
ST9 032011 000003 0 0 0 0 000000000003
*032011 SETOM 0,000001
INITIAL
C(AC)=000000 000017
C(E)=400000 000000
FINAL
C(E)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 032011 032011 0 0 476000000001 0 000000000001
IT1 032011 0 0 0 476000000001 0 000000000001
AT3 032011 0 0 0 000000000001 0 476000000001
AT6 032011 000001 0 0 000000000001 0 476000000001
FT1A 032011 000001 0 0 000000000001 0 000000000001
FT9 032012 000001 0 0 000000000001 0 000000000001
ET0 032012 000001 0 0 777777777777 0 000000000001
ST6 032012 000001 0 0 777777777777 0 000000000001
ST6A 032012 000001 0 0 777777777777 0 000000000001
ST9 032012 000001 0 0 777777777777 0 000000000001
*032012 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032012 032012 0 0 201100000001 0 000000000001
IT1 032012 0 0 0 201100000001 0 000000000001
AT3 032012 0 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 197
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0392
AT6 032012 000001 0 0 000000000001 0 201100000001
FT1A 032012 000001 0 0 000000000001 0 000000000001
FT9 032013 000001 0 0 000000000001 0 000000000001
ET0 032013 000001 0 0 000000000001 0 000000000001
ST1 032013 000001 0 0 000000000001 0 000000000001
ST2 032013 000001 0 0 000000000001 0 000000000001
ST9 032013 000001 0 0 000000000001 0 000000000001
*032013 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032013 032013 0 0 200142000000 0 777777777777
IT1 032013 0 0 0 200142000000 0 777777777777
AT1 032013 0 0 0 0 0 200142000000
AT2 032013 0 0 0 000000000001 0 200142000000
AT3 032013 0 0 0 000000000001 0 000000000001
AT6 032013 000001 0 0 000000000001 0 000000000001
FT0 032013 000001 0 0 777777777777 0 000000000001
FT1A 032013 000001 0 0 777777777777 0 777777777777
FT9 032014 000001 0 0 777777777777 0 777777777777
ET0 032014 000001 0 0 777777777777 0 777777777777
ST1 032014 000001 0 0 777777777777 0 777777777777
ST2 032014 000001 0 0 777777777777 0 777777777777
ST9 032014 000001 0 0 777777777777 0 777777777777
*032014 CAME 3,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032014 032014 0 0 312140034466 0 777777777777
IT1 032014 0 0 0 312140034466 0 777777777777
AT3 032014 0 0 0 000000034466 0 312140034466
AT6 032014 034466 0 0 000000034466 0 312140034466
FT0 032014 034466 0 0 777777777777 0 312140034466
FT1A 032014 034466 0 0 777777777777 0 777777777777
FT2 032014 034466 0 0 0 0 777777777777
FT2RQ 032014 034466 0 0 777777777777 0 777777777777
FT3 032014 034466 0 0 777777777777 0 777777777777
FT9 032015 034466 0 0 777777777777 0 777777777777
ET0 032016 034466 0 0 0 0 777777777777
ST1A 032016 034466 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 198
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0393
ST9 032016 034466 0 0 0 0 777777777777
*032016 JUMPA 0,032017
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032016 032016 0 0 324000032017 0 000000032017
IT1 032016 0 0 0 324000032017 0 000000032017
AT3 032016 0 0 0 000000032017 0 324000032017
AT6 032016 032017 0 0 000000032017 0 324000032017
FT1A 032016 032017 0 0 000000032017 0 000000032017
FT2 032016 032017 0 0 0 0 000000032017
FT2RQ 032016 032017 0 0 000000000017 0 000000032017
FT3 032016 032017 0 0 000000000017 0 000000032017
FT9 032017 032017 0 0 000000000017 0 000000032017
ET0 032017 032017 0 0 000000000017 0 000000032017
ST1A 032017 032017 0 0 000000000017 0 000000032017
ST9 032017 032017 0 0 000000000017 0 000000032017
*032017 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777777
FINAL
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032017 032017 0 0 402000000003 0 000000000003
IT1 032017 0 0 0 402000000003 0 000000000003
AT3 032017 0 0 0 000000000003 0 402000000003
AT6 032017 000003 0 0 000000000003 0 402000000003
FT1A 032017 000003 0 0 000000000003 0 000000000003
FT9 032020 000003 0 0 000000000003 0 000000000003
ET0 032020 000003 0 0 0 0 000000000003
ST6 032020 000003 0 0 0 0 000000000003
ST6A 032020 000003 0 0 0 0 000000000003
ST9 032020 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 199
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0394
*032020 HRROI 1,777776
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032020 032020 0 0 561040777776 0 000000777776
IT1 032020 0 0 0 561040777776 0 000000777776
AT3 032020 0 0 0 000000777776 0 561040777776
AT6 032020 777776 0 0 000000777776 0 561040777776
FT1A 032020 777776 0 0 000000777776 0 000000777776
FT9 032021 777776 0 0 000000777776 0 000000777776
ET0 032021 777776 0 0 777777777776 0 000000777776
ST1 032021 777776 0 0 777777777776 0 000000777776
ST2 032021 777776 0 0 777777777776 0 000000777776
ST9 032021 777776 0 0 777777777776 0 000000777776
*032021 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032021 032021 0 0 201100000001 0 000000000001
IT1 032021 0 0 0 201100000001 0 000000000001
AT3 032021 0 0 0 000000000001 0 201100000001
AT6 032021 000001 0 0 000000000001 0 201100000001
FT1A 032021 000001 0 0 000000000001 0 000000000001
FT9 032022 000001 0 0 000000000001 0 000000000001
ET0 032022 000001 0 0 000000000001 0 000000000001
ST1 032022 000001 0 0 000000000001 0 000000000001
ST2 032022 000001 0 0 000000000001 0 000000000001
ST9 032022 000001 0 0 000000000001 0 000000000001
*032022 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032022 032022 0 0 200142000000 0 777777777776
IT1 032022 0 0 0 200142000000 0 777777777776
AT1 032022 0 0 0 0 0 200142000000
AT2 032022 0 0 0 000000000001 0 200142000000
AT3 032022 0 0 0 000000000001 0 000000000001
AT6 032022 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 200
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0395
FT0 032022 000001 0 0 777777777776 0 000000000001
FT1A 032022 000001 0 0 777777777776 0 777777777776
FT9 032023 000001 0 0 777777777776 0 777777777776
ET0 032023 000001 0 0 777777777776 0 777777777776
ST1 032023 000001 0 0 777777777776 0 777777777776
ST2 032023 000001 0 0 777777777776 0 777777777776
ST9 032023 000001 0 0 777777777776 0 777777777776
*032023 CAME 3,034467
INITIAL
C(AC)=777777 777776
C(E)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032023 032023 0 0 312140034467 0 777777777776
IT1 032023 0 0 0 312140034467 0 777777777776
AT3 032023 0 0 0 000000034467 0 312140034467
AT6 032023 034467 0 0 000000034467 0 312140034467
FT0 032023 034467 0 0 777777777776 0 312140034467
FT1A 032023 034467 0 0 777777777776 0 777777777776
FT2 032023 034467 0 0 0 0 777777777776
FT2RQ 032023 034467 0 0 777777777776 0 777777777776
FT3 032023 034467 0 0 777777777776 0 777777777776
FT9 032024 034467 0 0 777777777776 0 777777777776
ET0 032025 034467 0 0 0 0 777777777776
ST1A 032025 034467 0 0 0 0 777777777776
ST9 032025 034467 0 0 0 0 777777777776
*032025 JUMPA 0,032026
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032025 032025 0 0 324000032026 0 000000032026
IT1 032025 0 0 0 324000032026 0 000000032026
AT3 032025 0 0 0 000000032026 0 324000032026
AT6 032025 032026 0 0 000000032026 0 324000032026
FT1A 032025 032026 0 0 000000032026 0 000000032026
FT2 032025 032026 0 0 0 0 000000032026
FT2RQ 032025 032026 0 0 000000000017 0 000000032026
FT3 032025 032026 0 0 000000000017 0 000000032026
FT9 032026 032026 0 0 000000000017 0 000000032026
ET0 032026 032026 0 0 000000000017 0 000000032026
ST1A 032026 032026 0 0 000000000017 0 000000032026
ST9 032026 032026 0 0 000000000017 0 000000032026
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 201
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0396
*032026 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777776
FINAL
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032026 032026 0 0 402000000003 0 000000000003
IT1 032026 0 0 0 402000000003 0 000000000003
AT3 032026 0 0 0 000000000003 0 402000000003
AT6 032026 000003 0 0 000000000003 0 402000000003
FT1A 032026 000003 0 0 000000000003 0 000000000003
FT9 032027 000003 0 0 000000000003 0 000000000003
ET0 032027 000003 0 0 0 0 000000000003
ST6 032027 000003 0 0 0 0 000000000003
ST6A 032027 000003 0 0 0 0 000000000003
ST9 032027 000003 0 0 0 0 000000000003
*032027 HRROI 1,777775
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777775
TIME PC MA SC FE AR MQ BR
IT0 032027 032027 0 0 561040777775 0 000000777775
IT1 032027 0 0 0 561040777775 0 000000777775
AT3 032027 0 0 0 000000777775 0 561040777775
AT6 032027 777775 0 0 000000777775 0 561040777775
FT1A 032027 777775 0 0 000000777775 0 000000777775
FT9 032030 777775 0 0 000000777775 0 000000777775
ET0 032030 777775 0 0 777777777775 0 000000777775
ST1 032030 777775 0 0 777777777775 0 000000777775
ST2 032030 777775 0 0 777777777775 0 000000777775
ST9 032030 777775 0 0 777777777775 0 000000777775
*032030 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032030 032030 0 0 201100000001 0 000000000001
IT1 032030 0 0 0 201100000001 0 000000000001
AT3 032030 0 0 0 000000000001 0 201100000001
AT6 032030 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 202
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0397
FT1A 032030 000001 0 0 000000000001 0 000000000001
FT9 032031 000001 0 0 000000000001 0 000000000001
ET0 032031 000001 0 0 000000000001 0 000000000001
ST1 032031 000001 0 0 000000000001 0 000000000001
ST2 032031 000001 0 0 000000000001 0 000000000001
ST9 032031 000001 0 0 000000000001 0 000000000001
*032031 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777775
TIME PC MA SC FE AR MQ BR
IT0 032031 032031 0 0 200142000000 0 777777777775
IT1 032031 0 0 0 200142000000 0 777777777775
AT1 032031 0 0 0 0 0 200142000000
AT2 032031 0 0 0 000000000001 0 200142000000
AT3 032031 0 0 0 000000000001 0 000000000001
AT6 032031 000001 0 0 000000000001 0 000000000001
FT0 032031 000001 0 0 777777777775 0 000000000001
FT1A 032031 000001 0 0 777777777775 0 777777777775
FT9 032032 000001 0 0 777777777775 0 777777777775
ET0 032032 000001 0 0 777777777775 0 777777777775
ST1 032032 000001 0 0 777777777775 0 777777777775
ST2 032032 000001 0 0 777777777775 0 777777777775
ST9 032032 000001 0 0 777777777775 0 777777777775
*032032 CAME 3,034470
INITIAL
C(AC)=777777 777775
C(E)=777777 777775
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032032 032032 0 0 312140034470 0 777777777775
IT1 032032 0 0 0 312140034470 0 777777777775
AT3 032032 0 0 0 000000034470 0 312140034470
AT6 032032 034470 0 0 000000034470 0 312140034470
FT0 032032 034470 0 0 777777777775 0 312140034470
FT1A 032032 034470 0 0 777777777775 0 777777777775
FT2 032032 034470 0 0 0 0 777777777775
FT2RQ 032032 034470 0 0 777777777775 0 777777777775
FT3 032032 034470 0 0 777777777775 0 777777777775
FT9 032033 034470 0 0 777777777775 0 777777777775
ET0 032034 034470 0 0 0 0 777777777775
ST1A 032034 034470 0 0 0 0 777777777775
ST9 032034 034470 0 0 0 0 777777777775
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 203
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0398
*032034 JUMPA 0,032035
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032034 032034 0 0 324000032035 0 000000032035
IT1 032034 0 0 0 324000032035 0 000000032035
AT3 032034 0 0 0 000000032035 0 324000032035
AT6 032034 032035 0 0 000000032035 0 324000032035
FT1A 032034 032035 0 0 000000032035 0 000000032035
FT2 032034 032035 0 0 0 0 000000032035
FT2RQ 032034 032035 0 0 000000000017 0 000000032035
FT3 032034 032035 0 0 000000000017 0 000000032035
FT9 032035 032035 0 0 000000000017 0 000000032035
ET0 032035 032035 0 0 000000000017 0 000000032035
ST1A 032035 032035 0 0 000000000017 0 000000032035
ST9 032035 032035 0 0 000000000017 0 000000032035
*032035 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777775
FINAL
C(E)=777777 777775
TIME PC MA SC FE AR MQ BR
IT0 032035 032035 0 0 402000000003 0 000000000003
IT1 032035 0 0 0 402000000003 0 000000000003
AT3 032035 0 0 0 000000000003 0 402000000003
AT6 032035 000003 0 0 000000000003 0 402000000003
FT1A 032035 000003 0 0 000000000003 0 000000000003
FT9 032036 000003 0 0 000000000003 0 000000000003
ET0 032036 000003 0 0 0 0 000000000003
ST6 032036 000003 0 0 0 0 000000000003
ST6A 032036 000003 0 0 0 0 000000000003
ST9 032036 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 204
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0399
*032036 HRROI 1,777773
INITIAL
C(AC)=777777 777775
FINAL
C(AC)=777777 777773
TIME PC MA SC FE AR MQ BR
IT0 032036 032036 0 0 561040777773 0 000000777773
IT1 032036 0 0 0 561040777773 0 000000777773
AT3 032036 0 0 0 000000777773 0 561040777773
AT6 032036 777773 0 0 000000777773 0 561040777773
FT1A 032036 777773 0 0 000000777773 0 000000777773
FT9 032037 777773 0 0 000000777773 0 000000777773
ET0 032037 777773 0 0 777777777773 0 000000777773
ST1 032037 777773 0 0 777777777773 0 000000777773
ST2 032037 777773 0 0 777777777773 0 000000777773
ST9 032037 777773 0 0 777777777773 0 000000777773
*032037 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032037 032037 0 0 201100000001 0 000000000001
IT1 032037 0 0 0 201100000001 0 000000000001
AT3 032037 0 0 0 000000000001 0 201100000001
AT6 032037 000001 0 0 000000000001 0 201100000001
FT1A 032037 000001 0 0 000000000001 0 000000000001
FT9 032040 000001 0 0 000000000001 0 000000000001
ET0 032040 000001 0 0 000000000001 0 000000000001
ST1 032040 000001 0 0 000000000001 0 000000000001
ST2 032040 000001 0 0 000000000001 0 000000000001
ST9 032040 000001 0 0 000000000001 0 000000000001
*032040 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777773
TIME PC MA SC FE AR MQ BR
IT0 032040 032040 0 0 200142000000 0 777777777773
IT1 032040 0 0 0 200142000000 0 777777777773
AT1 032040 0 0 0 0 0 200142000000
AT2 032040 0 0 0 000000000001 0 200142000000
AT3 032040 0 0 0 000000000001 0 000000000001
AT6 032040 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 205
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0400
FT0 032040 000001 0 0 777777777773 0 000000000001
FT1A 032040 000001 0 0 777777777773 0 777777777773
FT9 032041 000001 0 0 777777777773 0 777777777773
ET0 032041 000001 0 0 777777777773 0 777777777773
ST1 032041 000001 0 0 777777777773 0 777777777773
ST2 032041 000001 0 0 777777777773 0 777777777773
ST9 032041 000001 0 0 777777777773 0 777777777773
*032041 CAME 3,034471
INITIAL
C(AC)=777777 777773
C(E)=777777 777773
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032041 032041 0 0 312140034471 0 777777777773
IT1 032041 0 0 0 312140034471 0 777777777773
AT3 032041 0 0 0 000000034471 0 312140034471
AT6 032041 034471 0 0 000000034471 0 312140034471
FT0 032041 034471 0 0 777777777773 0 312140034471
FT1A 032041 034471 0 0 777777777773 0 777777777773
FT2 032041 034471 0 0 0 0 777777777773
FT2RQ 032041 034471 0 0 777777777773 0 777777777773
FT3 032041 034471 0 0 777777777773 0 777777777773
FT9 032042 034471 0 0 777777777773 0 777777777773
ET0 032043 034471 0 0 0 0 777777777773
ST1A 032043 034471 0 0 0 0 777777777773
ST9 032043 034471 0 0 0 0 777777777773
*032043 JUMPA 0,032044
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032043 032043 0 0 324000032044 0 000000032044
IT1 032043 0 0 0 324000032044 0 000000032044
AT3 032043 0 0 0 000000032044 0 324000032044
AT6 032043 032044 0 0 000000032044 0 324000032044
FT1A 032043 032044 0 0 000000032044 0 000000032044
FT2 032043 032044 0 0 0 0 000000032044
FT2RQ 032043 032044 0 0 000000000017 0 000000032044
FT3 032043 032044 0 0 000000000017 0 000000032044
FT9 032044 032044 0 0 000000000017 0 000000032044
ET0 032044 032044 0 0 000000000017 0 000000032044
ST1A 032044 032044 0 0 000000000017 0 000000032044
ST9 032044 032044 0 0 000000000017 0 000000032044
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 206
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0401
*032044 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777773
FINAL
C(E)=777777 777773
TIME PC MA SC FE AR MQ BR
IT0 032044 032044 0 0 402000000003 0 000000000003
IT1 032044 0 0 0 402000000003 0 000000000003
AT3 032044 0 0 0 000000000003 0 402000000003
AT6 032044 000003 0 0 000000000003 0 402000000003
FT1A 032044 000003 0 0 000000000003 0 000000000003
FT9 032045 000003 0 0 000000000003 0 000000000003
ET0 032045 000003 0 0 0 0 000000000003
ST6 032045 000003 0 0 0 0 000000000003
ST6A 032045 000003 0 0 0 0 000000000003
ST9 032045 000003 0 0 0 0 000000000003
*032045 HRROI 1,777767
INITIAL
C(AC)=777777 777773
FINAL
C(AC)=777777 777767
TIME PC MA SC FE AR MQ BR
IT0 032045 032045 0 0 561040777767 0 000000777767
IT1 032045 0 0 0 561040777767 0 000000777767
AT3 032045 0 0 0 000000777767 0 561040777767
AT6 032045 777767 0 0 000000777767 0 561040777767
FT1A 032045 777767 0 0 000000777767 0 000000777767
FT9 032046 777767 0 0 000000777767 0 000000777767
ET0 032046 777767 0 0 777777777767 0 000000777767
ST1 032046 777767 0 0 777777777767 0 000000777767
ST2 032046 777767 0 0 777777777767 0 000000777767
ST9 032046 777767 0 0 777777777767 0 000000777767
*032046 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032046 032046 0 0 201100000001 0 000000000001
IT1 032046 0 0 0 201100000001 0 000000000001
AT3 032046 0 0 0 000000000001 0 201100000001
AT6 032046 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 207
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0402
FT1A 032046 000001 0 0 000000000001 0 000000000001
FT9 032047 000001 0 0 000000000001 0 000000000001
ET0 032047 000001 0 0 000000000001 0 000000000001
ST1 032047 000001 0 0 000000000001 0 000000000001
ST2 032047 000001 0 0 000000000001 0 000000000001
ST9 032047 000001 0 0 000000000001 0 000000000001
*032047 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777767
TIME PC MA SC FE AR MQ BR
IT0 032047 032047 0 0 200142000000 0 777777777767
IT1 032047 0 0 0 200142000000 0 777777777767
AT1 032047 0 0 0 0 0 200142000000
AT2 032047 0 0 0 000000000001 0 200142000000
AT3 032047 0 0 0 000000000001 0 000000000001
AT6 032047 000001 0 0 000000000001 0 000000000001
FT0 032047 000001 0 0 777777777767 0 000000000001
FT1A 032047 000001 0 0 777777777767 0 777777777767
FT9 032050 000001 0 0 777777777767 0 777777777767
ET0 032050 000001 0 0 777777777767 0 777777777767
ST1 032050 000001 0 0 777777777767 0 777777777767
ST2 032050 000001 0 0 777777777767 0 777777777767
ST9 032050 000001 0 0 777777777767 0 777777777767
*032050 CAME 3,034472
INITIAL
C(AC)=777777 777767
C(E)=777777 777767
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032050 032050 0 0 312140034472 0 777777777767
IT1 032050 0 0 0 312140034472 0 777777777767
AT3 032050 0 0 0 000000034472 0 312140034472
AT6 032050 034472 0 0 000000034472 0 312140034472
FT0 032050 034472 0 0 777777777767 0 312140034472
FT1A 032050 034472 0 0 777777777767 0 777777777767
FT2 032050 034472 0 0 0 0 777777777767
FT2RQ 032050 034472 0 0 777777777767 0 777777777767
FT3 032050 034472 0 0 777777777767 0 777777777767
FT9 032051 034472 0 0 777777777767 0 777777777767
ET0 032052 034472 0 0 0 0 777777777767
ST1A 032052 034472 0 0 0 0 777777777767
ST9 032052 034472 0 0 0 0 777777777767
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 208
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0403
*032052 JUMPA 0,032053
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032052 032052 0 0 324000032053 0 000000032053
IT1 032052 0 0 0 324000032053 0 000000032053
AT3 032052 0 0 0 000000032053 0 324000032053
AT6 032052 032053 0 0 000000032053 0 324000032053
FT1A 032052 032053 0 0 000000032053 0 000000032053
FT2 032052 032053 0 0 0 0 000000032053
FT2RQ 032052 032053 0 0 000000000017 0 000000032053
FT3 032052 032053 0 0 000000000017 0 000000032053
FT9 032053 032053 0 0 000000000017 0 000000032053
ET0 032053 032053 0 0 000000000017 0 000000032053
ST1A 032053 032053 0 0 000000000017 0 000000032053
ST9 032053 032053 0 0 000000000017 0 000000032053
*032053 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777767
FINAL
C(E)=777777 777767
TIME PC MA SC FE AR MQ BR
IT0 032053 032053 0 0 402000000003 0 000000000003
IT1 032053 0 0 0 402000000003 0 000000000003
AT3 032053 0 0 0 000000000003 0 402000000003
AT6 032053 000003 0 0 000000000003 0 402000000003
FT1A 032053 000003 0 0 000000000003 0 000000000003
FT9 032054 000003 0 0 000000000003 0 000000000003
ET0 032054 000003 0 0 0 0 000000000003
ST6 032054 000003 0 0 0 0 000000000003
ST6A 032054 000003 0 0 0 0 000000000003
ST9 032054 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 209
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0404
*032054 HRROI 1,777757
INITIAL
C(AC)=777777 777767
FINAL
C(AC)=777777 777757
TIME PC MA SC FE AR MQ BR
IT0 032054 032054 0 0 561040777757 0 000000777757
IT1 032054 0 0 0 561040777757 0 000000777757
AT3 032054 0 0 0 000000777757 0 561040777757
AT6 032054 777757 0 0 000000777757 0 561040777757
FT1A 032054 777757 0 0 000000777757 0 000000777757
FT9 032055 777757 0 0 000000777757 0 000000777757
ET0 032055 777757 0 0 777777777757 0 000000777757
ST1 032055 777757 0 0 777777777757 0 000000777757
ST2 032055 777757 0 0 777777777757 0 000000777757
ST9 032055 777757 0 0 777777777757 0 000000777757
*032055 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032055 032055 0 0 201100000001 0 000000000001
IT1 032055 0 0 0 201100000001 0 000000000001
AT3 032055 0 0 0 000000000001 0 201100000001
AT6 032055 000001 0 0 000000000001 0 201100000001
FT1A 032055 000001 0 0 000000000001 0 000000000001
FT9 032056 000001 0 0 000000000001 0 000000000001
ET0 032056 000001 0 0 000000000001 0 000000000001
ST1 032056 000001 0 0 000000000001 0 000000000001
ST2 032056 000001 0 0 000000000001 0 000000000001
ST9 032056 000001 0 0 000000000001 0 000000000001
*032056 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777757
TIME PC MA SC FE AR MQ BR
IT0 032056 032056 0 0 200142000000 0 777777777757
IT1 032056 0 0 0 200142000000 0 777777777757
AT1 032056 0 0 0 0 0 200142000000
AT2 032056 0 0 0 000000000001 0 200142000000
AT3 032056 0 0 0 000000000001 0 000000000001
AT6 032056 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 210
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0405
FT0 032056 000001 0 0 777777777757 0 000000000001
FT1A 032056 000001 0 0 777777777757 0 777777777757
FT9 032057 000001 0 0 777777777757 0 777777777757
ET0 032057 000001 0 0 777777777757 0 777777777757
ST1 032057 000001 0 0 777777777757 0 777777777757
ST2 032057 000001 0 0 777777777757 0 777777777757
ST9 032057 000001 0 0 777777777757 0 777777777757
*032057 CAME 3,034473
INITIAL
C(AC)=777777 777757
C(E)=777777 777757
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032057 032057 0 0 312140034473 0 777777777757
IT1 032057 0 0 0 312140034473 0 777777777757
AT3 032057 0 0 0 000000034473 0 312140034473
AT6 032057 034473 0 0 000000034473 0 312140034473
FT0 032057 034473 0 0 777777777757 0 312140034473
FT1A 032057 034473 0 0 777777777757 0 777777777757
FT2 032057 034473 0 0 0 0 777777777757
FT2RQ 032057 034473 0 0 777777777757 0 777777777757
FT3 032057 034473 0 0 777777777757 0 777777777757
FT9 032060 034473 0 0 777777777757 0 777777777757
ET0 032061 034473 0 0 0 0 777777777757
ST1A 032061 034473 0 0 0 0 777777777757
ST9 032061 034473 0 0 0 0 777777777757
*032061 JUMPA 0,032062
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032061 032061 0 0 324000032062 0 000000032062
IT1 032061 0 0 0 324000032062 0 000000032062
AT3 032061 0 0 0 000000032062 0 324000032062
AT6 032061 032062 0 0 000000032062 0 324000032062
FT1A 032061 032062 0 0 000000032062 0 000000032062
FT2 032061 032062 0 0 0 0 000000032062
FT2RQ 032061 032062 0 0 000000000017 0 000000032062
FT3 032061 032062 0 0 000000000017 0 000000032062
FT9 032062 032062 0 0 000000000017 0 000000032062
ET0 032062 032062 0 0 000000000017 0 000000032062
ST1A 032062 032062 0 0 000000000017 0 000000032062
ST9 032062 032062 0 0 000000000017 0 000000032062
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 211
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0406
*032062 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777757
FINAL
C(E)=777777 777757
TIME PC MA SC FE AR MQ BR
IT0 032062 032062 0 0 402000000003 0 000000000003
IT1 032062 0 0 0 402000000003 0 000000000003
AT3 032062 0 0 0 000000000003 0 402000000003
AT6 032062 000003 0 0 000000000003 0 402000000003
FT1A 032062 000003 0 0 000000000003 0 000000000003
FT9 032063 000003 0 0 000000000003 0 000000000003
ET0 032063 000003 0 0 0 0 000000000003
ST6 032063 000003 0 0 0 0 000000000003
ST6A 032063 000003 0 0 0 0 000000000003
ST9 032063 000003 0 0 0 0 000000000003
*032063 HRROI 1,777737
INITIAL
C(AC)=777777 777757
FINAL
C(AC)=777777 777737
TIME PC MA SC FE AR MQ BR
IT0 032063 032063 0 0 561040777737 0 000000777737
IT1 032063 0 0 0 561040777737 0 000000777737
AT3 032063 0 0 0 000000777737 0 561040777737
AT6 032063 777737 0 0 000000777737 0 561040777737
FT1A 032063 777737 0 0 000000777737 0 000000777737
FT9 032064 777737 0 0 000000777737 0 000000777737
ET0 032064 777737 0 0 777777777737 0 000000777737
ST1 032064 777737 0 0 777777777737 0 000000777737
ST2 032064 777737 0 0 777777777737 0 000000777737
ST9 032064 777737 0 0 777777777737 0 000000777737
*032064 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032064 032064 0 0 201100000001 0 000000000001
IT1 032064 0 0 0 201100000001 0 000000000001
AT3 032064 0 0 0 000000000001 0 201100000001
AT6 032064 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 212
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0407
FT1A 032064 000001 0 0 000000000001 0 000000000001
FT9 032065 000001 0 0 000000000001 0 000000000001
ET0 032065 000001 0 0 000000000001 0 000000000001
ST1 032065 000001 0 0 000000000001 0 000000000001
ST2 032065 000001 0 0 000000000001 0 000000000001
ST9 032065 000001 0 0 000000000001 0 000000000001
*032065 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777737
TIME PC MA SC FE AR MQ BR
IT0 032065 032065 0 0 200142000000 0 777777777737
IT1 032065 0 0 0 200142000000 0 777777777737
AT1 032065 0 0 0 0 0 200142000000
AT2 032065 0 0 0 000000000001 0 200142000000
AT3 032065 0 0 0 000000000001 0 000000000001
AT6 032065 000001 0 0 000000000001 0 000000000001
FT0 032065 000001 0 0 777777777737 0 000000000001
FT1A 032065 000001 0 0 777777777737 0 777777777737
FT9 032066 000001 0 0 777777777737 0 777777777737
ET0 032066 000001 0 0 777777777737 0 777777777737
ST1 032066 000001 0 0 777777777737 0 777777777737
ST2 032066 000001 0 0 777777777737 0 777777777737
ST9 032066 000001 0 0 777777777737 0 777777777737
*032066 CAME 3,034474
INITIAL
C(AC)=777777 777737
C(E)=777777 777737
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032066 032066 0 0 312140034474 0 777777777737
IT1 032066 0 0 0 312140034474 0 777777777737
AT3 032066 0 0 0 000000034474 0 312140034474
AT6 032066 034474 0 0 000000034474 0 312140034474
FT0 032066 034474 0 0 777777777737 0 312140034474
FT1A 032066 034474 0 0 777777777737 0 777777777737
FT2 032066 034474 0 0 0 0 777777777737
FT2RQ 032066 034474 0 0 777777777737 0 777777777737
FT3 032066 034474 0 0 777777777737 0 777777777737
FT9 032067 034474 0 0 777777777737 0 777777777737
ET0 032070 034474 0 0 0 0 777777777737
ST1A 032070 034474 0 0 0 0 777777777737
ST9 032070 034474 0 0 0 0 777777777737
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 213
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0408
*032070 JUMPA 0,032071
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032070 032070 0 0 324000032071 0 000000032071
IT1 032070 0 0 0 324000032071 0 000000032071
AT3 032070 0 0 0 000000032071 0 324000032071
AT6 032070 032071 0 0 000000032071 0 324000032071
FT1A 032070 032071 0 0 000000032071 0 000000032071
FT2 032070 032071 0 0 0 0 000000032071
FT2RQ 032070 032071 0 0 000000000017 0 000000032071
FT3 032070 032071 0 0 000000000017 0 000000032071
FT9 032071 032071 0 0 000000000017 0 000000032071
ET0 032071 032071 0 0 000000000017 0 000000032071
ST1A 032071 032071 0 0 000000000017 0 000000032071
ST9 032071 032071 0 0 000000000017 0 000000032071
*032071 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777737
FINAL
C(E)=777777 777737
TIME PC MA SC FE AR MQ BR
IT0 032071 032071 0 0 402000000003 0 000000000003
IT1 032071 0 0 0 402000000003 0 000000000003
AT3 032071 0 0 0 000000000003 0 402000000003
AT6 032071 000003 0 0 000000000003 0 402000000003
FT1A 032071 000003 0 0 000000000003 0 000000000003
FT9 032072 000003 0 0 000000000003 0 000000000003
ET0 032072 000003 0 0 0 0 000000000003
ST6 032072 000003 0 0 0 0 000000000003
ST6A 032072 000003 0 0 0 0 000000000003
ST9 032072 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 214
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0409
*032072 HRROI 1,777677
INITIAL
C(AC)=777777 777737
FINAL
C(AC)=777777 777677
TIME PC MA SC FE AR MQ BR
IT0 032072 032072 0 0 561040777677 0 000000777677
IT1 032072 0 0 0 561040777677 0 000000777677
AT3 032072 0 0 0 000000777677 0 561040777677
AT6 032072 777677 0 0 000000777677 0 561040777677
FT1A 032072 777677 0 0 000000777677 0 000000777677
FT9 032073 777677 0 0 000000777677 0 000000777677
ET0 032073 777677 0 0 777777777677 0 000000777677
ST1 032073 777677 0 0 777777777677 0 000000777677
ST2 032073 777677 0 0 777777777677 0 000000777677
ST9 032073 777677 0 0 777777777677 0 000000777677
*032073 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032073 032073 0 0 201100000001 0 000000000001
IT1 032073 0 0 0 201100000001 0 000000000001
AT3 032073 0 0 0 000000000001 0 201100000001
AT6 032073 000001 0 0 000000000001 0 201100000001
FT1A 032073 000001 0 0 000000000001 0 000000000001
FT9 032074 000001 0 0 000000000001 0 000000000001
ET0 032074 000001 0 0 000000000001 0 000000000001
ST1 032074 000001 0 0 000000000001 0 000000000001
ST2 032074 000001 0 0 000000000001 0 000000000001
ST9 032074 000001 0 0 000000000001 0 000000000001
*032074 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777677
TIME PC MA SC FE AR MQ BR
IT0 032074 032074 0 0 200142000000 0 777777777677
IT1 032074 0 0 0 200142000000 0 777777777677
AT1 032074 0 0 0 0 0 200142000000
AT2 032074 0 0 0 000000000001 0 200142000000
AT3 032074 0 0 0 000000000001 0 000000000001
AT6 032074 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 215
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0410
FT0 032074 000001 0 0 777777777677 0 000000000001
FT1A 032074 000001 0 0 777777777677 0 777777777677
FT9 032075 000001 0 0 777777777677 0 777777777677
ET0 032075 000001 0 0 777777777677 0 777777777677
ST1 032075 000001 0 0 777777777677 0 777777777677
ST2 032075 000001 0 0 777777777677 0 777777777677
ST9 032075 000001 0 0 777777777677 0 777777777677
*032075 CAME 3,034475
INITIAL
C(AC)=777777 777677
C(E)=777777 777677
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032075 032075 0 0 312140034475 0 777777777677
IT1 032075 0 0 0 312140034475 0 777777777677
AT3 032075 0 0 0 000000034475 0 312140034475
AT6 032075 034475 0 0 000000034475 0 312140034475
FT0 032075 034475 0 0 777777777677 0 312140034475
FT1A 032075 034475 0 0 777777777677 0 777777777677
FT2 032075 034475 0 0 0 0 777777777677
FT2RQ 032075 034475 0 0 777777777677 0 777777777677
FT3 032075 034475 0 0 777777777677 0 777777777677
FT9 032076 034475 0 0 777777777677 0 777777777677
ET0 032077 034475 0 0 0 0 777777777677
ST1A 032077 034475 0 0 0 0 777777777677
ST9 032077 034475 0 0 0 0 777777777677
*032077 JUMPA 0,032100
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032077 032077 0 0 324000032100 0 000000032100
IT1 032077 0 0 0 324000032100 0 000000032100
AT3 032077 0 0 0 000000032100 0 324000032100
AT6 032077 0 0 0 000000032100 0 324000032100
FT1A 032077 0 0 0 000000032100 0 000000032100
FT2 032077 0 0 0 0 0 000000032100
FT2RQ 032077 0 0 0 000000000017 0 000000032100
FT3 032077 0 0 0 000000000017 0 000000032100
FT9 0 0 0 0 000000000017 0 000000032100
ET0 0 0 0 0 000000000017 0 000000032100
ST1A 0 0 0 0 000000000017 0 000000032100
ST9 0 0 0 0 000000000017 0 000000032100
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 216
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0411
*032100 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777677
FINAL
C(E)=777777 777677
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 402000000003 0 000000000003
IT1 0 0 0 0 402000000003 0 000000000003
AT3 0 0 0 0 000000000003 0 402000000003
AT6 0 000003 0 0 000000000003 0 402000000003
FT1A 0 000003 0 0 000000000003 0 000000000003
FT9 032101 000003 0 0 000000000003 0 000000000003
ET0 032101 000003 0 0 0 0 000000000003
ST6 032101 000003 0 0 0 0 000000000003
ST6A 032101 000003 0 0 0 0 000000000003
ST9 032101 000003 0 0 0 0 000000000003
*032101 HRROI 1,777577
INITIAL
C(AC)=777777 777677
FINAL
C(AC)=777777 777577
TIME PC MA SC FE AR MQ BR
IT0 032101 032101 0 0 561040777577 0 000000777577
IT1 032101 0 0 0 561040777577 0 000000777577
AT3 032101 0 0 0 000000777577 0 561040777577
AT6 032101 777577 0 0 000000777577 0 561040777577
FT1A 032101 777577 0 0 000000777577 0 000000777577
FT9 032102 777577 0 0 000000777577 0 000000777577
ET0 032102 777577 0 0 777777777577 0 000000777577
ST1 032102 777577 0 0 777777777577 0 000000777577
ST2 032102 777577 0 0 777777777577 0 000000777577
ST9 032102 777577 0 0 777777777577 0 000000777577
*032102 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032102 032102 0 0 201100000001 0 000000000001
IT1 032102 0 0 0 201100000001 0 000000000001
AT3 032102 0 0 0 000000000001 0 201100000001
AT6 032102 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 217
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0412
FT1A 032102 000001 0 0 000000000001 0 000000000001
FT9 032103 000001 0 0 000000000001 0 000000000001
ET0 032103 000001 0 0 000000000001 0 000000000001
ST1 032103 000001 0 0 000000000001 0 000000000001
ST2 032103 000001 0 0 000000000001 0 000000000001
ST9 032103 000001 0 0 000000000001 0 000000000001
*032103 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777577
TIME PC MA SC FE AR MQ BR
IT0 032103 032103 0 0 200142000000 0 777777777577
IT1 032103 0 0 0 200142000000 0 777777777577
AT1 032103 0 0 0 0 0 200142000000
AT2 032103 0 0 0 000000000001 0 200142000000
AT3 032103 0 0 0 000000000001 0 000000000001
AT6 032103 000001 0 0 000000000001 0 000000000001
FT0 032103 000001 0 0 777777777577 0 000000000001
FT1A 032103 000001 0 0 777777777577 0 777777777577
FT9 032104 000001 0 0 777777777577 0 777777777577
ET0 032104 000001 0 0 777777777577 0 777777777577
ST1 032104 000001 0 0 777777777577 0 777777777577
ST2 032104 000001 0 0 777777777577 0 777777777577
ST9 032104 000001 0 0 777777777577 0 777777777577
*032104 CAME 3,034476
INITIAL
C(AC)=777777 777577
C(E)=777777 777577
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032104 032104 0 0 312140034476 0 777777777577
IT1 032104 0 0 0 312140034476 0 777777777577
AT3 032104 0 0 0 000000034476 0 312140034476
AT6 032104 034476 0 0 000000034476 0 312140034476
FT0 032104 034476 0 0 777777777577 0 312140034476
FT1A 032104 034476 0 0 777777777577 0 777777777577
FT2 032104 034476 0 0 0 0 777777777577
FT2RQ 032104 034476 0 0 777777777577 0 777777777577
FT3 032104 034476 0 0 777777777577 0 777777777577
FT9 032105 034476 0 0 777777777577 0 777777777577
ET0 032106 034476 0 0 0 0 777777777577
ST1A 032106 034476 0 0 0 0 777777777577
ST9 032106 034476 0 0 0 0 777777777577
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 218
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0413
*032106 JUMPA 0,032107
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032106 032106 0 0 324000032107 0 000000032107
IT1 032106 0 0 0 324000032107 0 000000032107
AT3 032106 0 0 0 000000032107 0 324000032107
AT6 032106 032107 0 0 000000032107 0 324000032107
FT1A 032106 032107 0 0 000000032107 0 000000032107
FT2 032106 032107 0 0 0 0 000000032107
FT2RQ 032106 032107 0 0 000000000017 0 000000032107
FT3 032106 032107 0 0 000000000017 0 000000032107
FT9 032107 032107 0 0 000000000017 0 000000032107
ET0 032107 032107 0 0 000000000017 0 000000032107
ST1A 032107 032107 0 0 000000000017 0 000000032107
ST9 032107 032107 0 0 000000000017 0 000000032107
*032107 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777577
FINAL
C(E)=777777 777577
TIME PC MA SC FE AR MQ BR
IT0 032107 032107 0 0 402000000003 0 000000000003
IT1 032107 0 0 0 402000000003 0 000000000003
AT3 032107 0 0 0 000000000003 0 402000000003
AT6 032107 000003 0 0 000000000003 0 402000000003
FT1A 032107 000003 0 0 000000000003 0 000000000003
FT9 032110 000003 0 0 000000000003 0 000000000003
ET0 032110 000003 0 0 0 0 000000000003
ST6 032110 000003 0 0 0 0 000000000003
ST6A 032110 000003 0 0 0 0 000000000003
ST9 032110 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 219
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0414
*032110 HRROI 1,777377
INITIAL
C(AC)=777777 777577
FINAL
C(AC)=777777 777377
TIME PC MA SC FE AR MQ BR
IT0 032110 032110 0 0 561040777377 0 000000777377
IT1 032110 0 0 0 561040777377 0 000000777377
AT3 032110 0 0 0 000000777377 0 561040777377
AT6 032110 777377 0 0 000000777377 0 561040777377
FT1A 032110 777377 0 0 000000777377 0 000000777377
FT9 032111 777377 0 0 000000777377 0 000000777377
ET0 032111 777377 0 0 777777777377 0 000000777377
ST1 032111 777377 0 0 777777777377 0 000000777377
ST2 032111 777377 0 0 777777777377 0 000000777377
ST9 032111 777377 0 0 777777777377 0 000000777377
*032111 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032111 032111 0 0 201100000001 0 000000000001
IT1 032111 0 0 0 201100000001 0 000000000001
AT3 032111 0 0 0 000000000001 0 201100000001
AT6 032111 000001 0 0 000000000001 0 201100000001
FT1A 032111 000001 0 0 000000000001 0 000000000001
FT9 032112 000001 0 0 000000000001 0 000000000001
ET0 032112 000001 0 0 000000000001 0 000000000001
ST1 032112 000001 0 0 000000000001 0 000000000001
ST2 032112 000001 0 0 000000000001 0 000000000001
ST9 032112 000001 0 0 000000000001 0 000000000001
*032112 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 777377
TIME PC MA SC FE AR MQ BR
IT0 032112 032112 0 0 200142000000 0 777777777377
IT1 032112 0 0 0 200142000000 0 777777777377
AT1 032112 0 0 0 0 0 200142000000
AT2 032112 0 0 0 000000000001 0 200142000000
AT3 032112 0 0 0 000000000001 0 000000000001
AT6 032112 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 220
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0415
FT0 032112 000001 0 0 777777777377 0 000000000001
FT1A 032112 000001 0 0 777777777377 0 777777777377
FT9 032113 000001 0 0 777777777377 0 777777777377
ET0 032113 000001 0 0 777777777377 0 777777777377
ST1 032113 000001 0 0 777777777377 0 777777777377
ST2 032113 000001 0 0 777777777377 0 777777777377
ST9 032113 000001 0 0 777777777377 0 777777777377
*032113 CAME 3,034477
INITIAL
C(AC)=777777 777377
C(E)=777777 777377
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032113 032113 0 0 312140034477 0 777777777377
IT1 032113 0 0 0 312140034477 0 777777777377
AT3 032113 0 0 0 000000034477 0 312140034477
AT6 032113 034477 0 0 000000034477 0 312140034477
FT0 032113 034477 0 0 777777777377 0 312140034477
FT1A 032113 034477 0 0 777777777377 0 777777777377
FT2 032113 034477 0 0 0 0 777777777377
FT2RQ 032113 034477 0 0 777777777377 0 777777777377
FT3 032113 034477 0 0 777777777377 0 777777777377
FT9 032114 034477 0 0 777777777377 0 777777777377
ET0 032115 034477 0 0 0 0 777777777377
ST1A 032115 034477 0 0 0 0 777777777377
ST9 032115 034477 0 0 0 0 777777777377
*032115 JUMPA 0,032116
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032115 032115 0 0 324000032116 0 000000032116
IT1 032115 0 0 0 324000032116 0 000000032116
AT3 032115 0 0 0 000000032116 0 324000032116
AT6 032115 032116 0 0 000000032116 0 324000032116
FT1A 032115 032116 0 0 000000032116 0 000000032116
FT2 032115 032116 0 0 0 0 000000032116
FT2RQ 032115 032116 0 0 000000000017 0 000000032116
FT3 032115 032116 0 0 000000000017 0 000000032116
FT9 032116 032116 0 0 000000000017 0 000000032116
ET0 032116 032116 0 0 000000000017 0 000000032116
ST1A 032116 032116 0 0 000000000017 0 000000032116
ST9 032116 032116 0 0 000000000017 0 000000032116
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 221
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0416
*032116 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 777377
FINAL
C(E)=777777 777377
TIME PC MA SC FE AR MQ BR
IT0 032116 032116 0 0 402000000003 0 000000000003
IT1 032116 0 0 0 402000000003 0 000000000003
AT3 032116 0 0 0 000000000003 0 402000000003
AT6 032116 000003 0 0 000000000003 0 402000000003
FT1A 032116 000003 0 0 000000000003 0 000000000003
FT9 032117 000003 0 0 000000000003 0 000000000003
ET0 032117 000003 0 0 0 0 000000000003
ST6 032117 000003 0 0 0 0 000000000003
ST6A 032117 000003 0 0 0 0 000000000003
ST9 032117 000003 0 0 0 0 000000000003
*032117 HRROI 1,776777
INITIAL
C(AC)=777777 777377
FINAL
C(AC)=777777 776777
TIME PC MA SC FE AR MQ BR
IT0 032117 032117 0 0 561040776777 0 000000776777
IT1 032117 0 0 0 561040776777 0 000000776777
AT3 032117 0 0 0 000000776777 0 561040776777
AT6 032117 776777 0 0 000000776777 0 561040776777
FT1A 032117 776777 0 0 000000776777 0 000000776777
FT9 032120 776777 0 0 000000776777 0 000000776777
ET0 032120 776777 0 0 777777776777 0 000000776777
ST1 032120 776777 0 0 777777776777 0 000000776777
ST2 032120 776777 0 0 777777776777 0 000000776777
ST9 032120 776777 0 0 777777776777 0 000000776777
*032120 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032120 032120 0 0 201100000001 0 000000000001
IT1 032120 0 0 0 201100000001 0 000000000001
AT3 032120 0 0 0 000000000001 0 201100000001
AT6 032120 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 222
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0417
FT1A 032120 000001 0 0 000000000001 0 000000000001
FT9 032121 000001 0 0 000000000001 0 000000000001
ET0 032121 000001 0 0 000000000001 0 000000000001
ST1 032121 000001 0 0 000000000001 0 000000000001
ST2 032121 000001 0 0 000000000001 0 000000000001
ST9 032121 000001 0 0 000000000001 0 000000000001
*032121 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 776777
TIME PC MA SC FE AR MQ BR
IT0 032121 032121 0 0 200142000000 0 777777776777
IT1 032121 0 0 0 200142000000 0 777777776777
AT1 032121 0 0 0 0 0 200142000000
AT2 032121 0 0 0 000000000001 0 200142000000
AT3 032121 0 0 0 000000000001 0 000000000001
AT6 032121 000001 0 0 000000000001 0 000000000001
FT0 032121 000001 0 0 777777776777 0 000000000001
FT1A 032121 000001 0 0 777777776777 0 777777776777
FT9 032122 000001 0 0 777777776777 0 777777776777
ET0 032122 000001 0 0 777777776777 0 777777776777
ST1 032122 000001 0 0 777777776777 0 777777776777
ST2 032122 000001 0 0 777777776777 0 777777776777
ST9 032122 000001 0 0 777777776777 0 777777776777
*032122 CAME 3,034500
INITIAL
C(AC)=777777 776777
C(E)=777777 776777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032122 032122 0 0 312140034500 0 777777776777
IT1 032122 0 0 0 312140034500 0 777777776777
AT3 032122 0 0 0 000000034500 0 312140034500
AT6 032122 0 0 0 000000034500 0 312140034500
FT0 032122 0 0 0 777777776777 0 312140034500
FT1A 032122 0 0 0 777777776777 0 777777776777
FT2 032122 0 0 0 0 0 777777776777
FT2RQ 032122 0 0 0 777777776777 0 777777776777
FT3 032122 0 0 0 777777776777 0 777777776777
FT9 032123 0 0 0 777777776777 0 777777776777
ET0 032124 0 0 0 0 0 777777776777
ST1A 032124 0 0 0 0 0 777777776777
ST9 032124 0 0 0 0 0 777777776777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 223
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0418
*032124 JUMPA 0,032125
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032124 032124 0 0 324000032125 0 000000032125
IT1 032124 0 0 0 324000032125 0 000000032125
AT3 032124 0 0 0 000000032125 0 324000032125
AT6 032124 032125 0 0 000000032125 0 324000032125
FT1A 032124 032125 0 0 000000032125 0 000000032125
FT2 032124 032125 0 0 0 0 000000032125
FT2RQ 032124 032125 0 0 000000000017 0 000000032125
FT3 032124 032125 0 0 000000000017 0 000000032125
FT9 032125 032125 0 0 000000000017 0 000000032125
ET0 032125 032125 0 0 000000000017 0 000000032125
ST1A 032125 032125 0 0 000000000017 0 000000032125
ST9 032125 032125 0 0 000000000017 0 000000032125
*032125 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 776777
FINAL
C(E)=777777 776777
TIME PC MA SC FE AR MQ BR
IT0 032125 032125 0 0 402000000003 0 000000000003
IT1 032125 0 0 0 402000000003 0 000000000003
AT3 032125 0 0 0 000000000003 0 402000000003
AT6 032125 000003 0 0 000000000003 0 402000000003
FT1A 032125 000003 0 0 000000000003 0 000000000003
FT9 032126 000003 0 0 000000000003 0 000000000003
ET0 032126 000003 0 0 0 0 000000000003
ST6 032126 000003 0 0 0 0 000000000003
ST6A 032126 000003 0 0 0 0 000000000003
ST9 032126 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 224
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0419
*032126 HRROI 1,775777
INITIAL
C(AC)=777777 776777
FINAL
C(AC)=777777 775777
TIME PC MA SC FE AR MQ BR
IT0 032126 032126 0 0 561040775777 0 000000775777
IT1 032126 0 0 0 561040775777 0 000000775777
AT3 032126 0 0 0 000000775777 0 561040775777
AT6 032126 775777 0 0 000000775777 0 561040775777
FT1A 032126 775777 0 0 000000775777 0 000000775777
FT9 032127 775777 0 0 000000775777 0 000000775777
ET0 032127 775777 0 0 777777775777 0 000000775777
ST1 032127 775777 0 0 777777775777 0 000000775777
ST2 032127 775777 0 0 777777775777 0 000000775777
ST9 032127 775777 0 0 777777775777 0 000000775777
*032127 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032127 032127 0 0 201100000001 0 000000000001
IT1 032127 0 0 0 201100000001 0 000000000001
AT3 032127 0 0 0 000000000001 0 201100000001
AT6 032127 000001 0 0 000000000001 0 201100000001
FT1A 032127 000001 0 0 000000000001 0 000000000001
FT9 032130 000001 0 0 000000000001 0 000000000001
ET0 032130 000001 0 0 000000000001 0 000000000001
ST1 032130 000001 0 0 000000000001 0 000000000001
ST2 032130 000001 0 0 000000000001 0 000000000001
ST9 032130 000001 0 0 000000000001 0 000000000001
*032130 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 775777
TIME PC MA SC FE AR MQ BR
IT0 032130 032130 0 0 200142000000 0 777777775777
IT1 032130 0 0 0 200142000000 0 777777775777
AT1 032130 0 0 0 0 0 200142000000
AT2 032130 0 0 0 000000000001 0 200142000000
AT3 032130 0 0 0 000000000001 0 000000000001
AT6 032130 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 225
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0420
FT0 032130 000001 0 0 777777775777 0 000000000001
FT1A 032130 000001 0 0 777777775777 0 777777775777
FT9 032131 000001 0 0 777777775777 0 777777775777
ET0 032131 000001 0 0 777777775777 0 777777775777
ST1 032131 000001 0 0 777777775777 0 777777775777
ST2 032131 000001 0 0 777777775777 0 777777775777
ST9 032131 000001 0 0 777777775777 0 777777775777
*032131 CAME 3,034501
INITIAL
C(AC)=777777 775777
C(E)=777777 775777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032131 032131 0 0 312140034501 0 777777775777
IT1 032131 0 0 0 312140034501 0 777777775777
AT3 032131 0 0 0 000000034501 0 312140034501
AT6 032131 034501 0 0 000000034501 0 312140034501
FT0 032131 034501 0 0 777777775777 0 312140034501
FT1A 032131 034501 0 0 777777775777 0 777777775777
FT2 032131 034501 0 0 0 0 777777775777
FT2RQ 032131 034501 0 0 777777775777 0 777777775777
FT3 032131 034501 0 0 777777775777 0 777777775777
FT9 032132 034501 0 0 777777775777 0 777777775777
ET0 032133 034501 0 0 0 0 777777775777
ST1A 032133 034501 0 0 0 0 777777775777
ST9 032133 034501 0 0 0 0 777777775777
*032133 JUMPA 0,032134
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032133 032133 0 0 324000032134 0 000000032134
IT1 032133 0 0 0 324000032134 0 000000032134
AT3 032133 0 0 0 000000032134 0 324000032134
AT6 032133 032134 0 0 000000032134 0 324000032134
FT1A 032133 032134 0 0 000000032134 0 000000032134
FT2 032133 032134 0 0 0 0 000000032134
FT2RQ 032133 032134 0 0 000000000017 0 000000032134
FT3 032133 032134 0 0 000000000017 0 000000032134
FT9 032134 032134 0 0 000000000017 0 000000032134
ET0 032134 032134 0 0 000000000017 0 000000032134
ST1A 032134 032134 0 0 000000000017 0 000000032134
ST9 032134 032134 0 0 000000000017 0 000000032134
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 226
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0421
*032134 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 775777
FINAL
C(E)=777777 775777
TIME PC MA SC FE AR MQ BR
IT0 032134 032134 0 0 402000000003 0 000000000003
IT1 032134 0 0 0 402000000003 0 000000000003
AT3 032134 0 0 0 000000000003 0 402000000003
AT6 032134 000003 0 0 000000000003 0 402000000003
FT1A 032134 000003 0 0 000000000003 0 000000000003
FT9 032135 000003 0 0 000000000003 0 000000000003
ET0 032135 000003 0 0 0 0 000000000003
ST6 032135 000003 0 0 0 0 000000000003
ST6A 032135 000003 0 0 0 0 000000000003
ST9 032135 000003 0 0 0 0 000000000003
*032135 HRROI 1,773777
INITIAL
C(AC)=777777 775777
FINAL
C(AC)=777777 773777
TIME PC MA SC FE AR MQ BR
IT0 032135 032135 0 0 561040773777 0 000000773777
IT1 032135 0 0 0 561040773777 0 000000773777
AT3 032135 0 0 0 000000773777 0 561040773777
AT6 032135 773777 0 0 000000773777 0 561040773777
FT1A 032135 773777 0 0 000000773777 0 000000773777
FT9 032136 773777 0 0 000000773777 0 000000773777
ET0 032136 773777 0 0 777777773777 0 000000773777
ST1 032136 773777 0 0 777777773777 0 000000773777
ST2 032136 773777 0 0 777777773777 0 000000773777
ST9 032136 773777 0 0 777777773777 0 000000773777
*032136 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032136 032136 0 0 201100000001 0 000000000001
IT1 032136 0 0 0 201100000001 0 000000000001
AT3 032136 0 0 0 000000000001 0 201100000001
AT6 032136 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 227
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0422
FT1A 032136 000001 0 0 000000000001 0 000000000001
FT9 032137 000001 0 0 000000000001 0 000000000001
ET0 032137 000001 0 0 000000000001 0 000000000001
ST1 032137 000001 0 0 000000000001 0 000000000001
ST2 032137 000001 0 0 000000000001 0 000000000001
ST9 032137 000001 0 0 000000000001 0 000000000001
*032137 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 773777
TIME PC MA SC FE AR MQ BR
IT0 032137 032137 0 0 200142000000 0 777777773777
IT1 032137 0 0 0 200142000000 0 777777773777
AT1 032137 0 0 0 0 0 200142000000
AT2 032137 0 0 0 000000000001 0 200142000000
AT3 032137 0 0 0 000000000001 0 000000000001
AT6 032137 000001 0 0 000000000001 0 000000000001
FT0 032137 000001 0 0 777777773777 0 000000000001
FT1A 032137 000001 0 0 777777773777 0 777777773777
FT9 032140 000001 0 0 777777773777 0 777777773777
ET0 032140 000001 0 0 777777773777 0 777777773777
ST1 032140 000001 0 0 777777773777 0 777777773777
ST2 032140 000001 0 0 777777773777 0 777777773777
ST9 032140 000001 0 0 777777773777 0 777777773777
*032140 CAME 3,034502
INITIAL
C(AC)=777777 773777
C(E)=777777 773777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032140 032140 0 0 312140034502 0 777777773777
IT1 032140 0 0 0 312140034502 0 777777773777
AT3 032140 0 0 0 000000034502 0 312140034502
AT6 032140 034502 0 0 000000034502 0 312140034502
FT0 032140 034502 0 0 777777773777 0 312140034502
FT1A 032140 034502 0 0 777777773777 0 777777773777
FT2 032140 034502 0 0 0 0 777777773777
FT2RQ 032140 034502 0 0 777777773777 0 777777773777
FT3 032140 034502 0 0 777777773777 0 777777773777
FT9 032141 034502 0 0 777777773777 0 777777773777
ET0 032142 034502 0 0 0 0 777777773777
ST1A 032142 034502 0 0 0 0 777777773777
ST9 032142 034502 0 0 0 0 777777773777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 228
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0423
*032142 JUMPA 0,032143
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032142 032142 0 0 324000032143 0 000000032143
IT1 032142 0 0 0 324000032143 0 000000032143
AT3 032142 0 0 0 000000032143 0 324000032143
AT6 032142 032143 0 0 000000032143 0 324000032143
FT1A 032142 032143 0 0 000000032143 0 000000032143
FT2 032142 032143 0 0 0 0 000000032143
FT2RQ 032142 032143 0 0 000000000017 0 000000032143
FT3 032142 032143 0 0 000000000017 0 000000032143
FT9 032143 032143 0 0 000000000017 0 000000032143
ET0 032143 032143 0 0 000000000017 0 000000032143
ST1A 032143 032143 0 0 000000000017 0 000000032143
ST9 032143 032143 0 0 000000000017 0 000000032143
*032143 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 773777
FINAL
C(E)=777777 773777
TIME PC MA SC FE AR MQ BR
IT0 032143 032143 0 0 402000000003 0 000000000003
IT1 032143 0 0 0 402000000003 0 000000000003
AT3 032143 0 0 0 000000000003 0 402000000003
AT6 032143 000003 0 0 000000000003 0 402000000003
FT1A 032143 000003 0 0 000000000003 0 000000000003
FT9 032144 000003 0 0 000000000003 0 000000000003
ET0 032144 000003 0 0 0 0 000000000003
ST6 032144 000003 0 0 0 0 000000000003
ST6A 032144 000003 0 0 0 0 000000000003
ST9 032144 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 229
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0424
*032144 HRROI 1,767777
INITIAL
C(AC)=777777 773777
FINAL
C(AC)=777777 767777
TIME PC MA SC FE AR MQ BR
IT0 032144 032144 0 0 561040767777 0 000000767777
IT1 032144 0 0 0 561040767777 0 000000767777
AT3 032144 0 0 0 000000767777 0 561040767777
AT6 032144 767777 0 0 000000767777 0 561040767777
FT1A 032144 767777 0 0 000000767777 0 000000767777
FT9 032145 767777 0 0 000000767777 0 000000767777
ET0 032145 767777 0 0 777777767777 0 000000767777
ST1 032145 767777 0 0 777777767777 0 000000767777
ST2 032145 767777 0 0 777777767777 0 000000767777
ST9 032145 767777 0 0 777777767777 0 000000767777
*032145 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032145 032145 0 0 201100000001 0 000000000001
IT1 032145 0 0 0 201100000001 0 000000000001
AT3 032145 0 0 0 000000000001 0 201100000001
AT6 032145 000001 0 0 000000000001 0 201100000001
FT1A 032145 000001 0 0 000000000001 0 000000000001
FT9 032146 000001 0 0 000000000001 0 000000000001
ET0 032146 000001 0 0 000000000001 0 000000000001
ST1 032146 000001 0 0 000000000001 0 000000000001
ST2 032146 000001 0 0 000000000001 0 000000000001
ST9 032146 000001 0 0 000000000001 0 000000000001
*032146 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 767777
TIME PC MA SC FE AR MQ BR
IT0 032146 032146 0 0 200142000000 0 777777767777
IT1 032146 0 0 0 200142000000 0 777777767777
AT1 032146 0 0 0 0 0 200142000000
AT2 032146 0 0 0 000000000001 0 200142000000
AT3 032146 0 0 0 000000000001 0 000000000001
AT6 032146 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 230
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0425
FT0 032146 000001 0 0 777777767777 0 000000000001
FT1A 032146 000001 0 0 777777767777 0 777777767777
FT9 032147 000001 0 0 777777767777 0 777777767777
ET0 032147 000001 0 0 777777767777 0 777777767777
ST1 032147 000001 0 0 777777767777 0 777777767777
ST2 032147 000001 0 0 777777767777 0 777777767777
ST9 032147 000001 0 0 777777767777 0 777777767777
*032147 CAME 3,034503
INITIAL
C(AC)=777777 767777
C(E)=777777 767777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032147 032147 0 0 312140034503 0 777777767777
IT1 032147 0 0 0 312140034503 0 777777767777
AT3 032147 0 0 0 000000034503 0 312140034503
AT6 032147 034503 0 0 000000034503 0 312140034503
FT0 032147 034503 0 0 777777767777 0 312140034503
FT1A 032147 034503 0 0 777777767777 0 777777767777
FT2 032147 034503 0 0 0 0 777777767777
FT2RQ 032147 034503 0 0 777777767777 0 777777767777
FT3 032147 034503 0 0 777777767777 0 777777767777
FT9 032150 034503 0 0 777777767777 0 777777767777
ET0 032151 034503 0 0 0 0 777777767777
ST1A 032151 034503 0 0 0 0 777777767777
ST9 032151 034503 0 0 0 0 777777767777
*032151 JUMPA 0,032152
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032151 032151 0 0 324000032152 0 000000032152
IT1 032151 0 0 0 324000032152 0 000000032152
AT3 032151 0 0 0 000000032152 0 324000032152
AT6 032151 032152 0 0 000000032152 0 324000032152
FT1A 032151 032152 0 0 000000032152 0 000000032152
FT2 032151 032152 0 0 0 0 000000032152
FT2RQ 032151 032152 0 0 000000000017 0 000000032152
FT3 032151 032152 0 0 000000000017 0 000000032152
FT9 032152 032152 0 0 000000000017 0 000000032152
ET0 032152 032152 0 0 000000000017 0 000000032152
ST1A 032152 032152 0 0 000000000017 0 000000032152
ST9 032152 032152 0 0 000000000017 0 000000032152
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 231
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0426
*032152 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 767777
FINAL
C(E)=777777 767777
TIME PC MA SC FE AR MQ BR
IT0 032152 032152 0 0 402000000003 0 000000000003
IT1 032152 0 0 0 402000000003 0 000000000003
AT3 032152 0 0 0 000000000003 0 402000000003
AT6 032152 000003 0 0 000000000003 0 402000000003
FT1A 032152 000003 0 0 000000000003 0 000000000003
FT9 032153 000003 0 0 000000000003 0 000000000003
ET0 032153 000003 0 0 0 0 000000000003
ST6 032153 000003 0 0 0 0 000000000003
ST6A 032153 000003 0 0 0 0 000000000003
ST9 032153 000003 0 0 0 0 000000000003
*032153 HRROI 1,757777
INITIAL
C(AC)=777777 767777
FINAL
C(AC)=777777 757777
TIME PC MA SC FE AR MQ BR
IT0 032153 032153 0 0 561040757777 0 000000757777
IT1 032153 0 0 0 561040757777 0 000000757777
AT3 032153 0 0 0 000000757777 0 561040757777
AT6 032153 757777 0 0 000000757777 0 561040757777
FT1A 032153 757777 0 0 000000757777 0 000000757777
FT9 032154 757777 0 0 000000757777 0 000000757777
ET0 032154 757777 0 0 777777757777 0 000000757777
ST1 032154 757777 0 0 777777757777 0 000000757777
ST2 032154 757777 0 0 777777757777 0 000000757777
ST9 032154 757777 0 0 777777757777 0 000000757777
*032154 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032154 032154 0 0 201100000001 0 000000000001
IT1 032154 0 0 0 201100000001 0 000000000001
AT3 032154 0 0 0 000000000001 0 201100000001
AT6 032154 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 232
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0427
FT1A 032154 000001 0 0 000000000001 0 000000000001
FT9 032155 000001 0 0 000000000001 0 000000000001
ET0 032155 000001 0 0 000000000001 0 000000000001
ST1 032155 000001 0 0 000000000001 0 000000000001
ST2 032155 000001 0 0 000000000001 0 000000000001
ST9 032155 000001 0 0 000000000001 0 000000000001
*032155 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 757777
TIME PC MA SC FE AR MQ BR
IT0 032155 032155 0 0 200142000000 0 777777757777
IT1 032155 0 0 0 200142000000 0 777777757777
AT1 032155 0 0 0 0 0 200142000000
AT2 032155 0 0 0 000000000001 0 200142000000
AT3 032155 0 0 0 000000000001 0 000000000001
AT6 032155 000001 0 0 000000000001 0 000000000001
FT0 032155 000001 0 0 777777757777 0 000000000001
FT1A 032155 000001 0 0 777777757777 0 777777757777
FT9 032156 000001 0 0 777777757777 0 777777757777
ET0 032156 000001 0 0 777777757777 0 777777757777
ST1 032156 000001 0 0 777777757777 0 777777757777
ST2 032156 000001 0 0 777777757777 0 777777757777
ST9 032156 000001 0 0 777777757777 0 777777757777
*032156 CAME 3,034504
INITIAL
C(AC)=777777 757777
C(E)=777777 757777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032156 032156 0 0 312140034504 0 777777757777
IT1 032156 0 0 0 312140034504 0 777777757777
AT3 032156 0 0 0 000000034504 0 312140034504
AT6 032156 034504 0 0 000000034504 0 312140034504
FT0 032156 034504 0 0 777777757777 0 312140034504
FT1A 032156 034504 0 0 777777757777 0 777777757777
FT2 032156 034504 0 0 0 0 777777757777
FT2RQ 032156 034504 0 0 777777757777 0 777777757777
FT3 032156 034504 0 0 777777757777 0 777777757777
FT9 032157 034504 0 0 777777757777 0 777777757777
ET0 032160 034504 0 0 0 0 777777757777
ST1A 032160 034504 0 0 0 0 777777757777
ST9 032160 034504 0 0 0 0 777777757777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 233
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0428
*032160 JUMPA 0,032161
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032160 032160 0 0 324000032161 0 000000032161
IT1 032160 0 0 0 324000032161 0 000000032161
AT3 032160 0 0 0 000000032161 0 324000032161
AT6 032160 032161 0 0 000000032161 0 324000032161
FT1A 032160 032161 0 0 000000032161 0 000000032161
FT2 032160 032161 0 0 0 0 000000032161
FT2RQ 032160 032161 0 0 000000000017 0 000000032161
FT3 032160 032161 0 0 000000000017 0 000000032161
FT9 032161 032161 0 0 000000000017 0 000000032161
ET0 032161 032161 0 0 000000000017 0 000000032161
ST1A 032161 032161 0 0 000000000017 0 000000032161
ST9 032161 032161 0 0 000000000017 0 000000032161
*032161 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 757777
FINAL
C(E)=777777 757777
TIME PC MA SC FE AR MQ BR
IT0 032161 032161 0 0 402000000003 0 000000000003
IT1 032161 0 0 0 402000000003 0 000000000003
AT3 032161 0 0 0 000000000003 0 402000000003
AT6 032161 000003 0 0 000000000003 0 402000000003
FT1A 032161 000003 0 0 000000000003 0 000000000003
FT9 032162 000003 0 0 000000000003 0 000000000003
ET0 032162 000003 0 0 0 0 000000000003
ST6 032162 000003 0 0 0 0 000000000003
ST6A 032162 000003 0 0 0 0 000000000003
ST9 032162 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 234
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0429
*032162 HRROI 1,737777
INITIAL
C(AC)=777777 757777
FINAL
C(AC)=777777 737777
TIME PC MA SC FE AR MQ BR
IT0 032162 032162 0 0 561040737777 0 000000737777
IT1 032162 0 0 0 561040737777 0 000000737777
AT3 032162 0 0 0 000000737777 0 561040737777
AT6 032162 737777 0 0 000000737777 0 561040737777
FT1A 032162 737777 0 0 000000737777 0 000000737777
FT9 032163 737777 0 0 000000737777 0 000000737777
ET0 032163 737777 0 0 777777737777 0 000000737777
ST1 032163 737777 0 0 777777737777 0 000000737777
ST2 032163 737777 0 0 777777737777 0 000000737777
ST9 032163 737777 0 0 777777737777 0 000000737777
*032163 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032163 032163 0 0 201100000001 0 000000000001
IT1 032163 0 0 0 201100000001 0 000000000001
AT3 032163 0 0 0 000000000001 0 201100000001
AT6 032163 000001 0 0 000000000001 0 201100000001
FT1A 032163 000001 0 0 000000000001 0 000000000001
FT9 032164 000001 0 0 000000000001 0 000000000001
ET0 032164 000001 0 0 000000000001 0 000000000001
ST1 032164 000001 0 0 000000000001 0 000000000001
ST2 032164 000001 0 0 000000000001 0 000000000001
ST9 032164 000001 0 0 000000000001 0 000000000001
*032164 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 737777
TIME PC MA SC FE AR MQ BR
IT0 032164 032164 0 0 200142000000 0 777777737777
IT1 032164 0 0 0 200142000000 0 777777737777
AT1 032164 0 0 0 0 0 200142000000
AT2 032164 0 0 0 000000000001 0 200142000000
AT3 032164 0 0 0 000000000001 0 000000000001
AT6 032164 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 235
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0430
FT0 032164 000001 0 0 777777737777 0 000000000001
FT1A 032164 000001 0 0 777777737777 0 777777737777
FT9 032165 000001 0 0 777777737777 0 777777737777
ET0 032165 000001 0 0 777777737777 0 777777737777
ST1 032165 000001 0 0 777777737777 0 777777737777
ST2 032165 000001 0 0 777777737777 0 777777737777
ST9 032165 000001 0 0 777777737777 0 777777737777
*032165 CAME 3,034505
INITIAL
C(AC)=777777 737777
C(E)=777777 737777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032165 032165 0 0 312140034505 0 777777737777
IT1 032165 0 0 0 312140034505 0 777777737777
AT3 032165 0 0 0 000000034505 0 312140034505
AT6 032165 034505 0 0 000000034505 0 312140034505
FT0 032165 034505 0 0 777777737777 0 312140034505
FT1A 032165 034505 0 0 777777737777 0 777777737777
FT2 032165 034505 0 0 0 0 777777737777
FT2RQ 032165 034505 0 0 777777737777 0 777777737777
FT3 032165 034505 0 0 777777737777 0 777777737777
FT9 032166 034505 0 0 777777737777 0 777777737777
ET0 032167 034505 0 0 0 0 777777737777
ST1A 032167 034505 0 0 0 0 777777737777
ST9 032167 034505 0 0 0 0 777777737777
*032167 JUMPA 0,032170
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032167 032167 0 0 324000032170 0 000000032170
IT1 032167 0 0 0 324000032170 0 000000032170
AT3 032167 0 0 0 000000032170 0 324000032170
AT6 032167 032170 0 0 000000032170 0 324000032170
FT1A 032167 032170 0 0 000000032170 0 000000032170
FT2 032167 032170 0 0 0 0 000000032170
FT2RQ 032167 032170 0 0 000000000017 0 000000032170
FT3 032167 032170 0 0 000000000017 0 000000032170
FT9 032170 032170 0 0 000000000017 0 000000032170
ET0 032170 032170 0 0 000000000017 0 000000032170
ST1A 032170 032170 0 0 000000000017 0 000000032170
ST9 032170 032170 0 0 000000000017 0 000000032170
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 236
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0431
*032170 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 737777
FINAL
C(E)=777777 737777
TIME PC MA SC FE AR MQ BR
IT0 032170 032170 0 0 402000000003 0 000000000003
IT1 032170 0 0 0 402000000003 0 000000000003
AT3 032170 0 0 0 000000000003 0 402000000003
AT6 032170 000003 0 0 000000000003 0 402000000003
FT1A 032170 000003 0 0 000000000003 0 000000000003
FT9 032171 000003 0 0 000000000003 0 000000000003
ET0 032171 000003 0 0 0 0 000000000003
ST6 032171 000003 0 0 0 0 000000000003
ST6A 032171 000003 0 0 0 0 000000000003
ST9 032171 000003 0 0 0 0 000000000003
*032171 HRROI 1,677777
INITIAL
C(AC)=777777 737777
FINAL
C(AC)=777777 677777
TIME PC MA SC FE AR MQ BR
IT0 032171 032171 0 0 561040677777 0 000000677777
IT1 032171 0 0 0 561040677777 0 000000677777
AT3 032171 0 0 0 000000677777 0 561040677777
AT6 032171 677777 0 0 000000677777 0 561040677777
FT1A 032171 677777 0 0 000000677777 0 000000677777
FT9 032172 677777 0 0 000000677777 0 000000677777
ET0 032172 677777 0 0 777777677777 0 000000677777
ST1 032172 677777 0 0 777777677777 0 000000677777
ST2 032172 677777 0 0 777777677777 0 000000677777
ST9 032172 677777 0 0 777777677777 0 000000677777
*032172 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032172 032172 0 0 201100000001 0 000000000001
IT1 032172 0 0 0 201100000001 0 000000000001
AT3 032172 0 0 0 000000000001 0 201100000001
AT6 032172 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 237
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0432
FT1A 032172 000001 0 0 000000000001 0 000000000001
FT9 032173 000001 0 0 000000000001 0 000000000001
ET0 032173 000001 0 0 000000000001 0 000000000001
ST1 032173 000001 0 0 000000000001 0 000000000001
ST2 032173 000001 0 0 000000000001 0 000000000001
ST9 032173 000001 0 0 000000000001 0 000000000001
*032173 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 677777
TIME PC MA SC FE AR MQ BR
IT0 032173 032173 0 0 200142000000 0 777777677777
IT1 032173 0 0 0 200142000000 0 777777677777
AT1 032173 0 0 0 0 0 200142000000
AT2 032173 0 0 0 000000000001 0 200142000000
AT3 032173 0 0 0 000000000001 0 000000000001
AT6 032173 000001 0 0 000000000001 0 000000000001
FT0 032173 000001 0 0 777777677777 0 000000000001
FT1A 032173 000001 0 0 777777677777 0 777777677777
FT9 032174 000001 0 0 777777677777 0 777777677777
ET0 032174 000001 0 0 777777677777 0 777777677777
ST1 032174 000001 0 0 777777677777 0 777777677777
ST2 032174 000001 0 0 777777677777 0 777777677777
ST9 032174 000001 0 0 777777677777 0 777777677777
*032174 CAME 3,034506
INITIAL
C(AC)=777777 677777
C(E)=777777 677777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032174 032174 0 0 312140034506 0 777777677777
IT1 032174 0 0 0 312140034506 0 777777677777
AT3 032174 0 0 0 000000034506 0 312140034506
AT6 032174 034506 0 0 000000034506 0 312140034506
FT0 032174 034506 0 0 777777677777 0 312140034506
FT1A 032174 034506 0 0 777777677777 0 777777677777
FT2 032174 034506 0 0 0 0 777777677777
FT2RQ 032174 034506 0 0 777777677777 0 777777677777
FT3 032174 034506 0 0 777777677777 0 777777677777
FT9 032175 034506 0 0 777777677777 0 777777677777
ET0 032176 034506 0 0 0 0 777777677777
ST1A 032176 034506 0 0 0 0 777777677777
ST9 032176 034506 0 0 0 0 777777677777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 238
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0433
*032176 JUMPA 0,032177
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032176 032176 0 0 324000032177 0 000000032177
IT1 032176 0 0 0 324000032177 0 000000032177
AT3 032176 0 0 0 000000032177 0 324000032177
AT6 032176 032177 0 0 000000032177 0 324000032177
FT1A 032176 032177 0 0 000000032177 0 000000032177
FT2 032176 032177 0 0 0 0 000000032177
FT2RQ 032176 032177 0 0 000000000017 0 000000032177
FT3 032176 032177 0 0 000000000017 0 000000032177
FT9 032177 032177 0 0 000000000017 0 000000032177
ET0 032177 032177 0 0 000000000017 0 000000032177
ST1A 032177 032177 0 0 000000000017 0 000000032177
ST9 032177 032177 0 0 000000000017 0 000000032177
*032177 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 677777
FINAL
C(E)=777777 677777
TIME PC MA SC FE AR MQ BR
IT0 032177 032177 0 0 402000000003 0 000000000003
IT1 032177 0 0 0 402000000003 0 000000000003
AT3 032177 0 0 0 000000000003 0 402000000003
AT6 032177 000003 0 0 000000000003 0 402000000003
FT1A 032177 000003 0 0 000000000003 0 000000000003
FT9 0 000003 0 0 000000000003 0 000000000003
ET0 0 000003 0 0 0 0 000000000003
ST6 0 000003 0 0 0 0 000000000003
ST6A 0 000003 0 0 0 0 000000000003
ST9 0 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 239
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0434
*032200 HRROI 1,577777
INITIAL
C(AC)=777777 677777
FINAL
C(AC)=777777 577777
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 561040577777 0 000000577777
IT1 0 0 0 0 561040577777 0 000000577777
AT3 0 0 0 0 000000577777 0 561040577777
AT6 0 577777 0 0 000000577777 0 561040577777
FT1A 0 577777 0 0 000000577777 0 000000577777
FT9 032201 577777 0 0 000000577777 0 000000577777
ET0 032201 577777 0 0 777777577777 0 000000577777
ST1 032201 577777 0 0 777777577777 0 000000577777
ST2 032201 577777 0 0 777777577777 0 000000577777
ST9 032201 577777 0 0 777777577777 0 000000577777
*032201 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032201 032201 0 0 201100000001 0 000000000001
IT1 032201 0 0 0 201100000001 0 000000000001
AT3 032201 0 0 0 000000000001 0 201100000001
AT6 032201 000001 0 0 000000000001 0 201100000001
FT1A 032201 000001 0 0 000000000001 0 000000000001
FT9 032202 000001 0 0 000000000001 0 000000000001
ET0 032202 000001 0 0 000000000001 0 000000000001
ST1 032202 000001 0 0 000000000001 0 000000000001
ST2 032202 000001 0 0 000000000001 0 000000000001
ST9 032202 000001 0 0 000000000001 0 000000000001
*032202 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 577777
TIME PC MA SC FE AR MQ BR
IT0 032202 032202 0 0 200142000000 0 777777577777
IT1 032202 0 0 0 200142000000 0 777777577777
AT1 032202 0 0 0 0 0 200142000000
AT2 032202 0 0 0 000000000001 0 200142000000
AT3 032202 0 0 0 000000000001 0 000000000001
AT6 032202 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 240
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0435
FT0 032202 000001 0 0 777777577777 0 000000000001
FT1A 032202 000001 0 0 777777577777 0 777777577777
FT9 032203 000001 0 0 777777577777 0 777777577777
ET0 032203 000001 0 0 777777577777 0 777777577777
ST1 032203 000001 0 0 777777577777 0 777777577777
ST2 032203 000001 0 0 777777577777 0 777777577777
ST9 032203 000001 0 0 777777577777 0 777777577777
*032203 CAME 3,034507
INITIAL
C(AC)=777777 577777
C(E)=777777 577777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032203 032203 0 0 312140034507 0 777777577777
IT1 032203 0 0 0 312140034507 0 777777577777
AT3 032203 0 0 0 000000034507 0 312140034507
AT6 032203 034507 0 0 000000034507 0 312140034507
FT0 032203 034507 0 0 777777577777 0 312140034507
FT1A 032203 034507 0 0 777777577777 0 777777577777
FT2 032203 034507 0 0 0 0 777777577777
FT2RQ 032203 034507 0 0 777777577777 0 777777577777
FT3 032203 034507 0 0 777777577777 0 777777577777
FT9 032204 034507 0 0 777777577777 0 777777577777
ET0 032205 034507 0 0 0 0 777777577777
ST1A 032205 034507 0 0 0 0 777777577777
ST9 032205 034507 0 0 0 0 777777577777
*032205 JUMPA 0,032206
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032205 032205 0 0 324000032206 0 000000032206
IT1 032205 0 0 0 324000032206 0 000000032206
AT3 032205 0 0 0 000000032206 0 324000032206
AT6 032205 032206 0 0 000000032206 0 324000032206
FT1A 032205 032206 0 0 000000032206 0 000000032206
FT2 032205 032206 0 0 0 0 000000032206
FT2RQ 032205 032206 0 0 000000000017 0 000000032206
FT3 032205 032206 0 0 000000000017 0 000000032206
FT9 032206 032206 0 0 000000000017 0 000000032206
ET0 032206 032206 0 0 000000000017 0 000000032206
ST1A 032206 032206 0 0 000000000017 0 000000032206
ST9 032206 032206 0 0 000000000017 0 000000032206
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 241
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0436
*032206 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 577777
FINAL
C(E)=777777 577777
TIME PC MA SC FE AR MQ BR
IT0 032206 032206 0 0 402000000003 0 000000000003
IT1 032206 0 0 0 402000000003 0 000000000003
AT3 032206 0 0 0 000000000003 0 402000000003
AT6 032206 000003 0 0 000000000003 0 402000000003
FT1A 032206 000003 0 0 000000000003 0 000000000003
FT9 032207 000003 0 0 000000000003 0 000000000003
ET0 032207 000003 0 0 0 0 000000000003
ST6 032207 000003 0 0 0 0 000000000003
ST6A 032207 000003 0 0 0 0 000000000003
ST9 032207 000003 0 0 0 0 000000000003
*032207 HRROI 1,377777
INITIAL
C(AC)=777777 577777
FINAL
C(AC)=777777 377777
TIME PC MA SC FE AR MQ BR
IT0 032207 032207 0 0 561040377777 0 000000377777
IT1 032207 0 0 0 561040377777 0 000000377777
AT3 032207 0 0 0 000000377777 0 561040377777
AT6 032207 377777 0 0 000000377777 0 561040377777
FT1A 032207 377777 0 0 000000377777 0 000000377777
FT9 032210 377777 0 0 000000377777 0 000000377777
ET0 032210 377777 0 0 777777377777 0 000000377777
ST1 032210 377777 0 0 777777377777 0 000000377777
ST2 032210 377777 0 0 777777377777 0 000000377777
ST9 032210 377777 0 0 777777377777 0 000000377777
*032210 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032210 032210 0 0 201100000001 0 000000000001
IT1 032210 0 0 0 201100000001 0 000000000001
AT3 032210 0 0 0 000000000001 0 201100000001
AT6 032210 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 242
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0437
FT1A 032210 000001 0 0 000000000001 0 000000000001
FT9 032211 000001 0 0 000000000001 0 000000000001
ET0 032211 000001 0 0 000000000001 0 000000000001
ST1 032211 000001 0 0 000000000001 0 000000000001
ST2 032211 000001 0 0 000000000001 0 000000000001
ST9 032211 000001 0 0 000000000001 0 000000000001
*032211 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777777 377777
TIME PC MA SC FE AR MQ BR
IT0 032211 032211 0 0 200142000000 0 777777377777
IT1 032211 0 0 0 200142000000 0 777777377777
AT1 032211 0 0 0 0 0 200142000000
AT2 032211 0 0 0 000000000001 0 200142000000
AT3 032211 0 0 0 000000000001 0 000000000001
AT6 032211 000001 0 0 000000000001 0 000000000001
FT0 032211 000001 0 0 777777377777 0 000000000001
FT1A 032211 000001 0 0 777777377777 0 777777377777
FT9 032212 000001 0 0 777777377777 0 777777377777
ET0 032212 000001 0 0 777777377777 0 777777377777
ST1 032212 000001 0 0 777777377777 0 777777377777
ST2 032212 000001 0 0 777777377777 0 777777377777
ST9 032212 000001 0 0 777777377777 0 777777377777
*032212 CAME 3,034510
INITIAL
C(AC)=777777 377777
C(E)=777777 377777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032212 032212 0 0 312140034510 0 777777377777
IT1 032212 0 0 0 312140034510 0 777777377777
AT3 032212 0 0 0 000000034510 0 312140034510
AT6 032212 034510 0 0 000000034510 0 312140034510
FT0 032212 034510 0 0 777777377777 0 312140034510
FT1A 032212 034510 0 0 777777377777 0 777777377777
FT2 032212 034510 0 0 0 0 777777377777
FT2RQ 032212 034510 0 0 777777377777 0 777777377777
FT3 032212 034510 0 0 777777377777 0 777777377777
FT9 032213 034510 0 0 777777377777 0 777777377777
ET0 032214 034510 0 0 0 0 777777377777
ST1A 032214 034510 0 0 0 0 777777377777
ST9 032214 034510 0 0 0 0 777777377777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 243
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0438
*032214 JUMPA 0,032215
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032214 032214 0 0 324000032215 0 000000032215
IT1 032214 0 0 0 324000032215 0 000000032215
AT3 032214 0 0 0 000000032215 0 324000032215
AT6 032214 032215 0 0 000000032215 0 324000032215
FT1A 032214 032215 0 0 000000032215 0 000000032215
FT2 032214 032215 0 0 0 0 000000032215
FT2RQ 032214 032215 0 0 000000000017 0 000000032215
FT3 032214 032215 0 0 000000000017 0 000000032215
FT9 032215 032215 0 0 000000000017 0 000000032215
ET0 032215 032215 0 0 000000000017 0 000000032215
ST1A 032215 032215 0 0 000000000017 0 000000032215
ST9 032215 032215 0 0 000000000017 0 000000032215
*032215 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777777 377777
FINAL
C(E)=777777 377777
TIME PC MA SC FE AR MQ BR
IT0 032215 032215 0 0 402000000003 0 000000000003
IT1 032215 0 0 0 402000000003 0 000000000003
AT3 032215 0 0 0 000000000003 0 402000000003
AT6 032215 000003 0 0 000000000003 0 402000000003
FT1A 032215 000003 0 0 000000000003 0 000000000003
FT9 032216 000003 0 0 000000000003 0 000000000003
ET0 032216 000003 0 0 0 0 000000000003
ST6 032216 000003 0 0 0 0 000000000003
ST6A 032216 000003 0 0 0 0 000000000003
ST9 032216 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 244
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0439
*032216 HRLOI 1,777776
INITIAL
C(AC)=777777 377777
FINAL
C(AC)=777776 777777
TIME PC MA SC FE AR MQ BR
IT0 032216 032216 0 0 525040777776 0 000000777776
IT1 032216 0 0 0 525040777776 0 000000777776
AT3 032216 0 0 0 000000777776 0 525040777776
AT6 032216 777776 0 0 000000777776 0 525040777776
FT1A 032216 777776 0 0 000000777776 0 000000777776
FT9 032217 777776 0 0 000000777776 0 000000777776
ET0 032217 777776 0 0 777776777777 0 000000777776
ST1 032217 777776 0 0 777776777777 0 000000777776
ST2 032217 777776 0 0 777776777777 0 000000777776
ST9 032217 777776 0 0 777776777777 0 000000777776
*032217 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032217 032217 0 0 201100000001 0 000000000001
IT1 032217 0 0 0 201100000001 0 000000000001
AT3 032217 0 0 0 000000000001 0 201100000001
AT6 032217 000001 0 0 000000000001 0 201100000001
FT1A 032217 000001 0 0 000000000001 0 000000000001
FT9 032220 000001 0 0 000000000001 0 000000000001
ET0 032220 000001 0 0 000000000001 0 000000000001
ST1 032220 000001 0 0 000000000001 0 000000000001
ST2 032220 000001 0 0 000000000001 0 000000000001
ST9 032220 000001 0 0 000000000001 0 000000000001
*032220 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777776 777777
TIME PC MA SC FE AR MQ BR
IT0 032220 032220 0 0 200142000000 0 777776777777
IT1 032220 0 0 0 200142000000 0 777776777777
AT1 032220 0 0 0 0 0 200142000000
AT2 032220 0 0 0 000000000001 0 200142000000
AT3 032220 0 0 0 000000000001 0 000000000001
AT6 032220 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 245
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0440
FT0 032220 000001 0 0 777776777777 0 000000000001
FT1A 032220 000001 0 0 777776777777 0 777776777777
FT9 032221 000001 0 0 777776777777 0 777776777777
ET0 032221 000001 0 0 777776777777 0 777776777777
ST1 032221 000001 0 0 777776777777 0 777776777777
ST2 032221 000001 0 0 777776777777 0 777776777777
ST9 032221 000001 0 0 777776777777 0 777776777777
*032221 CAME 3,034511
INITIAL
C(AC)=777776 777777
C(E)=777776 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032221 032221 0 0 312140034511 0 777776777777
IT1 032221 0 0 0 312140034511 0 777776777777
AT3 032221 0 0 0 000000034511 0 312140034511
AT6 032221 034511 0 0 000000034511 0 312140034511
FT0 032221 034511 0 0 777776777777 0 312140034511
FT1A 032221 034511 0 0 777776777777 0 777776777777
FT2 032221 034511 0 0 0 0 777776777777
FT2RQ 032221 034511 0 0 777776777777 0 777776777777
FT3 032221 034511 0 0 777776777777 0 777776777777
FT9 032222 034511 0 0 777776777777 0 777776777777
ET0 032223 034511 0 0 0 0 777776777777
ST1A 032223 034511 0 0 0 0 777776777777
ST9 032223 034511 0 0 0 0 777776777777
*032223 JUMPA 0,032224
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032223 032223 0 0 324000032224 0 000000032224
IT1 032223 0 0 0 324000032224 0 000000032224
AT3 032223 0 0 0 000000032224 0 324000032224
AT6 032223 032224 0 0 000000032224 0 324000032224
FT1A 032223 032224 0 0 000000032224 0 000000032224
FT2 032223 032224 0 0 0 0 000000032224
FT2RQ 032223 032224 0 0 000000000017 0 000000032224
FT3 032223 032224 0 0 000000000017 0 000000032224
FT9 032224 032224 0 0 000000000017 0 000000032224
ET0 032224 032224 0 0 000000000017 0 000000032224
ST1A 032224 032224 0 0 000000000017 0 000000032224
ST9 032224 032224 0 0 000000000017 0 000000032224
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 246
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0441
*032224 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777776 777777
FINAL
C(E)=777776 777777
TIME PC MA SC FE AR MQ BR
IT0 032224 032224 0 0 402000000003 0 000000000003
IT1 032224 0 0 0 402000000003 0 000000000003
AT3 032224 0 0 0 000000000003 0 402000000003
AT6 032224 000003 0 0 000000000003 0 402000000003
FT1A 032224 000003 0 0 000000000003 0 000000000003
FT9 032225 000003 0 0 000000000003 0 000000000003
ET0 032225 000003 0 0 0 0 000000000003
ST6 032225 000003 0 0 0 0 000000000003
ST6A 032225 000003 0 0 0 0 000000000003
ST9 032225 000003 0 0 0 0 000000000003
*032225 HRLOI 1,777775
INITIAL
C(AC)=777776 777777
FINAL
C(AC)=777775 777777
TIME PC MA SC FE AR MQ BR
IT0 032225 032225 0 0 525040777775 0 000000777775
IT1 032225 0 0 0 525040777775 0 000000777775
AT3 032225 0 0 0 000000777775 0 525040777775
AT6 032225 777775 0 0 000000777775 0 525040777775
FT1A 032225 777775 0 0 000000777775 0 000000777775
FT9 032226 777775 0 0 000000777775 0 000000777775
ET0 032226 777775 0 0 777775777777 0 000000777775
ST1 032226 777775 0 0 777775777777 0 000000777775
ST2 032226 777775 0 0 777775777777 0 000000777775
ST9 032226 777775 0 0 777775777777 0 000000777775
*032226 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032226 032226 0 0 201100000001 0 000000000001
IT1 032226 0 0 0 201100000001 0 000000000001
AT3 032226 0 0 0 000000000001 0 201100000001
AT6 032226 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 247
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0442
FT1A 032226 000001 0 0 000000000001 0 000000000001
FT9 032227 000001 0 0 000000000001 0 000000000001
ET0 032227 000001 0 0 000000000001 0 000000000001
ST1 032227 000001 0 0 000000000001 0 000000000001
ST2 032227 000001 0 0 000000000001 0 000000000001
ST9 032227 000001 0 0 000000000001 0 000000000001
*032227 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777775 777777
TIME PC MA SC FE AR MQ BR
IT0 032227 032227 0 0 200142000000 0 777775777777
IT1 032227 0 0 0 200142000000 0 777775777777
AT1 032227 0 0 0 0 0 200142000000
AT2 032227 0 0 0 000000000001 0 200142000000
AT3 032227 0 0 0 000000000001 0 000000000001
AT6 032227 000001 0 0 000000000001 0 000000000001
FT0 032227 000001 0 0 777775777777 0 000000000001
FT1A 032227 000001 0 0 777775777777 0 777775777777
FT9 032230 000001 0 0 777775777777 0 777775777777
ET0 032230 000001 0 0 777775777777 0 777775777777
ST1 032230 000001 0 0 777775777777 0 777775777777
ST2 032230 000001 0 0 777775777777 0 777775777777
ST9 032230 000001 0 0 777775777777 0 777775777777
*032230 CAME 3,034512
INITIAL
C(AC)=777775 777777
C(E)=777775 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032230 032230 0 0 312140034512 0 777775777777
IT1 032230 0 0 0 312140034512 0 777775777777
AT3 032230 0 0 0 000000034512 0 312140034512
AT6 032230 034512 0 0 000000034512 0 312140034512
FT0 032230 034512 0 0 777775777777 0 312140034512
FT1A 032230 034512 0 0 777775777777 0 777775777777
FT2 032230 034512 0 0 0 0 777775777777
FT2RQ 032230 034512 0 0 777775777777 0 777775777777
FT3 032230 034512 0 0 777775777777 0 777775777777
FT9 032231 034512 0 0 777775777777 0 777775777777
ET0 032232 034512 0 0 0 0 777775777777
ST1A 032232 034512 0 0 0 0 777775777777
ST9 032232 034512 0 0 0 0 777775777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 248
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0443
*032232 JUMPA 0,032233
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032232 032232 0 0 324000032233 0 000000032233
IT1 032232 0 0 0 324000032233 0 000000032233
AT3 032232 0 0 0 000000032233 0 324000032233
AT6 032232 032233 0 0 000000032233 0 324000032233
FT1A 032232 032233 0 0 000000032233 0 000000032233
FT2 032232 032233 0 0 0 0 000000032233
FT2RQ 032232 032233 0 0 000000000017 0 000000032233
FT3 032232 032233 0 0 000000000017 0 000000032233
FT9 032233 032233 0 0 000000000017 0 000000032233
ET0 032233 032233 0 0 000000000017 0 000000032233
ST1A 032233 032233 0 0 000000000017 0 000000032233
ST9 032233 032233 0 0 000000000017 0 000000032233
*032233 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777775 777777
FINAL
C(E)=777775 777777
TIME PC MA SC FE AR MQ BR
IT0 032233 032233 0 0 402000000003 0 000000000003
IT1 032233 0 0 0 402000000003 0 000000000003
AT3 032233 0 0 0 000000000003 0 402000000003
AT6 032233 000003 0 0 000000000003 0 402000000003
FT1A 032233 000003 0 0 000000000003 0 000000000003
FT9 032234 000003 0 0 000000000003 0 000000000003
ET0 032234 000003 0 0 0 0 000000000003
ST6 032234 000003 0 0 0 0 000000000003
ST6A 032234 000003 0 0 0 0 000000000003
ST9 032234 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 249
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0444
*032234 HRLOI 1,777773
INITIAL
C(AC)=777775 777777
FINAL
C(AC)=777773 777777
TIME PC MA SC FE AR MQ BR
IT0 032234 032234 0 0 525040777773 0 000000777773
IT1 032234 0 0 0 525040777773 0 000000777773
AT3 032234 0 0 0 000000777773 0 525040777773
AT6 032234 777773 0 0 000000777773 0 525040777773
FT1A 032234 777773 0 0 000000777773 0 000000777773
FT9 032235 777773 0 0 000000777773 0 000000777773
ET0 032235 777773 0 0 777773777777 0 000000777773
ST1 032235 777773 0 0 777773777777 0 000000777773
ST2 032235 777773 0 0 777773777777 0 000000777773
ST9 032235 777773 0 0 777773777777 0 000000777773
*032235 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032235 032235 0 0 201100000001 0 000000000001
IT1 032235 0 0 0 201100000001 0 000000000001
AT3 032235 0 0 0 000000000001 0 201100000001
AT6 032235 000001 0 0 000000000001 0 201100000001
FT1A 032235 000001 0 0 000000000001 0 000000000001
FT9 032236 000001 0 0 000000000001 0 000000000001
ET0 032236 000001 0 0 000000000001 0 000000000001
ST1 032236 000001 0 0 000000000001 0 000000000001
ST2 032236 000001 0 0 000000000001 0 000000000001
ST9 032236 000001 0 0 000000000001 0 000000000001
*032236 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777773 777777
TIME PC MA SC FE AR MQ BR
IT0 032236 032236 0 0 200142000000 0 777773777777
IT1 032236 0 0 0 200142000000 0 777773777777
AT1 032236 0 0 0 0 0 200142000000
AT2 032236 0 0 0 000000000001 0 200142000000
AT3 032236 0 0 0 000000000001 0 000000000001
AT6 032236 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 250
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0445
FT0 032236 000001 0 0 777773777777 0 000000000001
FT1A 032236 000001 0 0 777773777777 0 777773777777
FT9 032237 000001 0 0 777773777777 0 777773777777
ET0 032237 000001 0 0 777773777777 0 777773777777
ST1 032237 000001 0 0 777773777777 0 777773777777
ST2 032237 000001 0 0 777773777777 0 777773777777
ST9 032237 000001 0 0 777773777777 0 777773777777
*032237 CAME 3,034513
INITIAL
C(AC)=777773 777777
C(E)=777773 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032237 032237 0 0 312140034513 0 777773777777
IT1 032237 0 0 0 312140034513 0 777773777777
AT3 032237 0 0 0 000000034513 0 312140034513
AT6 032237 034513 0 0 000000034513 0 312140034513
FT0 032237 034513 0 0 777773777777 0 312140034513
FT1A 032237 034513 0 0 777773777777 0 777773777777
FT2 032237 034513 0 0 0 0 777773777777
FT2RQ 032237 034513 0 0 777773777777 0 777773777777
FT3 032237 034513 0 0 777773777777 0 777773777777
FT9 032240 034513 0 0 777773777777 0 777773777777
ET0 032241 034513 0 0 0 0 777773777777
ST1A 032241 034513 0 0 0 0 777773777777
ST9 032241 034513 0 0 0 0 777773777777
*032241 JUMPA 0,032242
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032241 032241 0 0 324000032242 0 000000032242
IT1 032241 0 0 0 324000032242 0 000000032242
AT3 032241 0 0 0 000000032242 0 324000032242
AT6 032241 032242 0 0 000000032242 0 324000032242
FT1A 032241 032242 0 0 000000032242 0 000000032242
FT2 032241 032242 0 0 0 0 000000032242
FT2RQ 032241 032242 0 0 000000000017 0 000000032242
FT3 032241 032242 0 0 000000000017 0 000000032242
FT9 032242 032242 0 0 000000000017 0 000000032242
ET0 032242 032242 0 0 000000000017 0 000000032242
ST1A 032242 032242 0 0 000000000017 0 000000032242
ST9 032242 032242 0 0 000000000017 0 000000032242
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 251
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0446
*032242 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777773 777777
FINAL
C(E)=777773 777777
TIME PC MA SC FE AR MQ BR
IT0 032242 032242 0 0 402000000003 0 000000000003
IT1 032242 0 0 0 402000000003 0 000000000003
AT3 032242 0 0 0 000000000003 0 402000000003
AT6 032242 000003 0 0 000000000003 0 402000000003
FT1A 032242 000003 0 0 000000000003 0 000000000003
FT9 032243 000003 0 0 000000000003 0 000000000003
ET0 032243 000003 0 0 0 0 000000000003
ST6 032243 000003 0 0 0 0 000000000003
ST6A 032243 000003 0 0 0 0 000000000003
ST9 032243 000003 0 0 0 0 000000000003
*032243 HRLOI 1,777767
INITIAL
C(AC)=777773 777777
FINAL
C(AC)=777767 777777
TIME PC MA SC FE AR MQ BR
IT0 032243 032243 0 0 525040777767 0 000000777767
IT1 032243 0 0 0 525040777767 0 000000777767
AT3 032243 0 0 0 000000777767 0 525040777767
AT6 032243 777767 0 0 000000777767 0 525040777767
FT1A 032243 777767 0 0 000000777767 0 000000777767
FT9 032244 777767 0 0 000000777767 0 000000777767
ET0 032244 777767 0 0 777767777777 0 000000777767
ST1 032244 777767 0 0 777767777777 0 000000777767
ST2 032244 777767 0 0 777767777777 0 000000777767
ST9 032244 777767 0 0 777767777777 0 000000777767
*032244 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032244 032244 0 0 201100000001 0 000000000001
IT1 032244 0 0 0 201100000001 0 000000000001
AT3 032244 0 0 0 000000000001 0 201100000001
AT6 032244 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 252
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0447
FT1A 032244 000001 0 0 000000000001 0 000000000001
FT9 032245 000001 0 0 000000000001 0 000000000001
ET0 032245 000001 0 0 000000000001 0 000000000001
ST1 032245 000001 0 0 000000000001 0 000000000001
ST2 032245 000001 0 0 000000000001 0 000000000001
ST9 032245 000001 0 0 000000000001 0 000000000001
*032245 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777767 777777
TIME PC MA SC FE AR MQ BR
IT0 032245 032245 0 0 200142000000 0 777767777777
IT1 032245 0 0 0 200142000000 0 777767777777
AT1 032245 0 0 0 0 0 200142000000
AT2 032245 0 0 0 000000000001 0 200142000000
AT3 032245 0 0 0 000000000001 0 000000000001
AT6 032245 000001 0 0 000000000001 0 000000000001
FT0 032245 000001 0 0 777767777777 0 000000000001
FT1A 032245 000001 0 0 777767777777 0 777767777777
FT9 032246 000001 0 0 777767777777 0 777767777777
ET0 032246 000001 0 0 777767777777 0 777767777777
ST1 032246 000001 0 0 777767777777 0 777767777777
ST2 032246 000001 0 0 777767777777 0 777767777777
ST9 032246 000001 0 0 777767777777 0 777767777777
*032246 CAME 3,034514
INITIAL
C(AC)=777767 777777
C(E)=777767 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032246 032246 0 0 312140034514 0 777767777777
IT1 032246 0 0 0 312140034514 0 777767777777
AT3 032246 0 0 0 000000034514 0 312140034514
AT6 032246 034514 0 0 000000034514 0 312140034514
FT0 032246 034514 0 0 777767777777 0 312140034514
FT1A 032246 034514 0 0 777767777777 0 777767777777
FT2 032246 034514 0 0 0 0 777767777777
FT2RQ 032246 034514 0 0 777767777777 0 777767777777
FT3 032246 034514 0 0 777767777777 0 777767777777
FT9 032247 034514 0 0 777767777777 0 777767777777
ET0 032250 034514 0 0 0 0 777767777777
ST1A 032250 034514 0 0 0 0 777767777777
ST9 032250 034514 0 0 0 0 777767777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 253
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0448
*032250 JUMPA 0,032251
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032250 032250 0 0 324000032251 0 000000032251
IT1 032250 0 0 0 324000032251 0 000000032251
AT3 032250 0 0 0 000000032251 0 324000032251
AT6 032250 032251 0 0 000000032251 0 324000032251
FT1A 032250 032251 0 0 000000032251 0 000000032251
FT2 032250 032251 0 0 0 0 000000032251
FT2RQ 032250 032251 0 0 000000000017 0 000000032251
FT3 032250 032251 0 0 000000000017 0 000000032251
FT9 032251 032251 0 0 000000000017 0 000000032251
ET0 032251 032251 0 0 000000000017 0 000000032251
ST1A 032251 032251 0 0 000000000017 0 000000032251
ST9 032251 032251 0 0 000000000017 0 000000032251
*032251 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777767 777777
FINAL
C(E)=777767 777777
TIME PC MA SC FE AR MQ BR
IT0 032251 032251 0 0 402000000003 0 000000000003
IT1 032251 0 0 0 402000000003 0 000000000003
AT3 032251 0 0 0 000000000003 0 402000000003
AT6 032251 000003 0 0 000000000003 0 402000000003
FT1A 032251 000003 0 0 000000000003 0 000000000003
FT9 032252 000003 0 0 000000000003 0 000000000003
ET0 032252 000003 0 0 0 0 000000000003
ST6 032252 000003 0 0 0 0 000000000003
ST6A 032252 000003 0 0 0 0 000000000003
ST9 032252 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 254
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0449
*032252 HRLOI 1,777757
INITIAL
C(AC)=777767 777777
FINAL
C(AC)=777757 777777
TIME PC MA SC FE AR MQ BR
IT0 032252 032252 0 0 525040777757 0 000000777757
IT1 032252 0 0 0 525040777757 0 000000777757
AT3 032252 0 0 0 000000777757 0 525040777757
AT6 032252 777757 0 0 000000777757 0 525040777757
FT1A 032252 777757 0 0 000000777757 0 000000777757
FT9 032253 777757 0 0 000000777757 0 000000777757
ET0 032253 777757 0 0 777757777777 0 000000777757
ST1 032253 777757 0 0 777757777777 0 000000777757
ST2 032253 777757 0 0 777757777777 0 000000777757
ST9 032253 777757 0 0 777757777777 0 000000777757
*032253 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032253 032253 0 0 201100000001 0 000000000001
IT1 032253 0 0 0 201100000001 0 000000000001
AT3 032253 0 0 0 000000000001 0 201100000001
AT6 032253 000001 0 0 000000000001 0 201100000001
FT1A 032253 000001 0 0 000000000001 0 000000000001
FT9 032254 000001 0 0 000000000001 0 000000000001
ET0 032254 000001 0 0 000000000001 0 000000000001
ST1 032254 000001 0 0 000000000001 0 000000000001
ST2 032254 000001 0 0 000000000001 0 000000000001
ST9 032254 000001 0 0 000000000001 0 000000000001
*032254 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777757 777777
TIME PC MA SC FE AR MQ BR
IT0 032254 032254 0 0 200142000000 0 777757777777
IT1 032254 0 0 0 200142000000 0 777757777777
AT1 032254 0 0 0 0 0 200142000000
AT2 032254 0 0 0 000000000001 0 200142000000
AT3 032254 0 0 0 000000000001 0 000000000001
AT6 032254 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 255
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0450
FT0 032254 000001 0 0 777757777777 0 000000000001
FT1A 032254 000001 0 0 777757777777 0 777757777777
FT9 032255 000001 0 0 777757777777 0 777757777777
ET0 032255 000001 0 0 777757777777 0 777757777777
ST1 032255 000001 0 0 777757777777 0 777757777777
ST2 032255 000001 0 0 777757777777 0 777757777777
ST9 032255 000001 0 0 777757777777 0 777757777777
*032255 CAME 3,034515
INITIAL
C(AC)=777757 777777
C(E)=777757 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032255 032255 0 0 312140034515 0 777757777777
IT1 032255 0 0 0 312140034515 0 777757777777
AT3 032255 0 0 0 000000034515 0 312140034515
AT6 032255 034515 0 0 000000034515 0 312140034515
FT0 032255 034515 0 0 777757777777 0 312140034515
FT1A 032255 034515 0 0 777757777777 0 777757777777
FT2 032255 034515 0 0 0 0 777757777777
FT2RQ 032255 034515 0 0 777757777777 0 777757777777
FT3 032255 034515 0 0 777757777777 0 777757777777
FT9 032256 034515 0 0 777757777777 0 777757777777
ET0 032257 034515 0 0 0 0 777757777777
ST1A 032257 034515 0 0 0 0 777757777777
ST9 032257 034515 0 0 0 0 777757777777
*032257 JUMPA 0,032260
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032257 032257 0 0 324000032260 0 000000032260
IT1 032257 0 0 0 324000032260 0 000000032260
AT3 032257 0 0 0 000000032260 0 324000032260
AT6 032257 032260 0 0 000000032260 0 324000032260
FT1A 032257 032260 0 0 000000032260 0 000000032260
FT2 032257 032260 0 0 0 0 000000032260
FT2RQ 032257 032260 0 0 000000000017 0 000000032260
FT3 032257 032260 0 0 000000000017 0 000000032260
FT9 032260 032260 0 0 000000000017 0 000000032260
ET0 032260 032260 0 0 000000000017 0 000000032260
ST1A 032260 032260 0 0 000000000017 0 000000032260
ST9 032260 032260 0 0 000000000017 0 000000032260
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 256
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0451
*032260 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777757 777777
FINAL
C(E)=777757 777777
TIME PC MA SC FE AR MQ BR
IT0 032260 032260 0 0 402000000003 0 000000000003
IT1 032260 0 0 0 402000000003 0 000000000003
AT3 032260 0 0 0 000000000003 0 402000000003
AT6 032260 000003 0 0 000000000003 0 402000000003
FT1A 032260 000003 0 0 000000000003 0 000000000003
FT9 032261 000003 0 0 000000000003 0 000000000003
ET0 032261 000003 0 0 0 0 000000000003
ST6 032261 000003 0 0 0 0 000000000003
ST6A 032261 000003 0 0 0 0 000000000003
ST9 032261 000003 0 0 0 0 000000000003
*032261 HRLOI 1,777737
INITIAL
C(AC)=777757 777777
FINAL
C(AC)=777737 777777
TIME PC MA SC FE AR MQ BR
IT0 032261 032261 0 0 525040777737 0 000000777737
IT1 032261 0 0 0 525040777737 0 000000777737
AT3 032261 0 0 0 000000777737 0 525040777737
AT6 032261 777737 0 0 000000777737 0 525040777737
FT1A 032261 777737 0 0 000000777737 0 000000777737
FT9 032262 777737 0 0 000000777737 0 000000777737
ET0 032262 777737 0 0 777737777777 0 000000777737
ST1 032262 777737 0 0 777737777777 0 000000777737
ST2 032262 777737 0 0 777737777777 0 000000777737
ST9 032262 777737 0 0 777737777777 0 000000777737
*032262 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032262 032262 0 0 201100000001 0 000000000001
IT1 032262 0 0 0 201100000001 0 000000000001
AT3 032262 0 0 0 000000000001 0 201100000001
AT6 032262 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 257
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0452
FT1A 032262 000001 0 0 000000000001 0 000000000001
FT9 032263 000001 0 0 000000000001 0 000000000001
ET0 032263 000001 0 0 000000000001 0 000000000001
ST1 032263 000001 0 0 000000000001 0 000000000001
ST2 032263 000001 0 0 000000000001 0 000000000001
ST9 032263 000001 0 0 000000000001 0 000000000001
*032263 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777737 777777
TIME PC MA SC FE AR MQ BR
IT0 032263 032263 0 0 200142000000 0 777737777777
IT1 032263 0 0 0 200142000000 0 777737777777
AT1 032263 0 0 0 0 0 200142000000
AT2 032263 0 0 0 000000000001 0 200142000000
AT3 032263 0 0 0 000000000001 0 000000000001
AT6 032263 000001 0 0 000000000001 0 000000000001
FT0 032263 000001 0 0 777737777777 0 000000000001
FT1A 032263 000001 0 0 777737777777 0 777737777777
FT9 032264 000001 0 0 777737777777 0 777737777777
ET0 032264 000001 0 0 777737777777 0 777737777777
ST1 032264 000001 0 0 777737777777 0 777737777777
ST2 032264 000001 0 0 777737777777 0 777737777777
ST9 032264 000001 0 0 777737777777 0 777737777777
*032264 CAME 3,034516
INITIAL
C(AC)=777737 777777
C(E)=777737 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032264 032264 0 0 312140034516 0 777737777777
IT1 032264 0 0 0 312140034516 0 777737777777
AT3 032264 0 0 0 000000034516 0 312140034516
AT6 032264 034516 0 0 000000034516 0 312140034516
FT0 032264 034516 0 0 777737777777 0 312140034516
FT1A 032264 034516 0 0 777737777777 0 777737777777
FT2 032264 034516 0 0 0 0 777737777777
FT2RQ 032264 034516 0 0 777737777777 0 777737777777
FT3 032264 034516 0 0 777737777777 0 777737777777
FT9 032265 034516 0 0 777737777777 0 777737777777
ET0 032266 034516 0 0 0 0 777737777777
ST1A 032266 034516 0 0 0 0 777737777777
ST9 032266 034516 0 0 0 0 777737777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 258
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0453
*032266 JUMPA 0,032267
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032266 032266 0 0 324000032267 0 000000032267
IT1 032266 0 0 0 324000032267 0 000000032267
AT3 032266 0 0 0 000000032267 0 324000032267
AT6 032266 032267 0 0 000000032267 0 324000032267
FT1A 032266 032267 0 0 000000032267 0 000000032267
FT2 032266 032267 0 0 0 0 000000032267
FT2RQ 032266 032267 0 0 000000000017 0 000000032267
FT3 032266 032267 0 0 000000000017 0 000000032267
FT9 032267 032267 0 0 000000000017 0 000000032267
ET0 032267 032267 0 0 000000000017 0 000000032267
ST1A 032267 032267 0 0 000000000017 0 000000032267
ST9 032267 032267 0 0 000000000017 0 000000032267
*032267 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777737 777777
FINAL
C(E)=777737 777777
TIME PC MA SC FE AR MQ BR
IT0 032267 032267 0 0 402000000003 0 000000000003
IT1 032267 0 0 0 402000000003 0 000000000003
AT3 032267 0 0 0 000000000003 0 402000000003
AT6 032267 000003 0 0 000000000003 0 402000000003
FT1A 032267 000003 0 0 000000000003 0 000000000003
FT9 032270 000003 0 0 000000000003 0 000000000003
ET0 032270 000003 0 0 0 0 000000000003
ST6 032270 000003 0 0 0 0 000000000003
ST6A 032270 000003 0 0 0 0 000000000003
ST9 032270 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 259
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0454
*032270 HRLOI 1,777677
INITIAL
C(AC)=777737 777777
FINAL
C(AC)=777677 777777
TIME PC MA SC FE AR MQ BR
IT0 032270 032270 0 0 525040777677 0 000000777677
IT1 032270 0 0 0 525040777677 0 000000777677
AT3 032270 0 0 0 000000777677 0 525040777677
AT6 032270 777677 0 0 000000777677 0 525040777677
FT1A 032270 777677 0 0 000000777677 0 000000777677
FT9 032271 777677 0 0 000000777677 0 000000777677
ET0 032271 777677 0 0 777677777777 0 000000777677
ST1 032271 777677 0 0 777677777777 0 000000777677
ST2 032271 777677 0 0 777677777777 0 000000777677
ST9 032271 777677 0 0 777677777777 0 000000777677
*032271 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032271 032271 0 0 201100000001 0 000000000001
IT1 032271 0 0 0 201100000001 0 000000000001
AT3 032271 0 0 0 000000000001 0 201100000001
AT6 032271 000001 0 0 000000000001 0 201100000001
FT1A 032271 000001 0 0 000000000001 0 000000000001
FT9 032272 000001 0 0 000000000001 0 000000000001
ET0 032272 000001 0 0 000000000001 0 000000000001
ST1 032272 000001 0 0 000000000001 0 000000000001
ST2 032272 000001 0 0 000000000001 0 000000000001
ST9 032272 000001 0 0 000000000001 0 000000000001
*032272 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777677 777777
TIME PC MA SC FE AR MQ BR
IT0 032272 032272 0 0 200142000000 0 777677777777
IT1 032272 0 0 0 200142000000 0 777677777777
AT1 032272 0 0 0 0 0 200142000000
AT2 032272 0 0 0 000000000001 0 200142000000
AT3 032272 0 0 0 000000000001 0 000000000001
AT6 032272 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 260
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0455
FT0 032272 000001 0 0 777677777777 0 000000000001
FT1A 032272 000001 0 0 777677777777 0 777677777777
FT9 032273 000001 0 0 777677777777 0 777677777777
ET0 032273 000001 0 0 777677777777 0 777677777777
ST1 032273 000001 0 0 777677777777 0 777677777777
ST2 032273 000001 0 0 777677777777 0 777677777777
ST9 032273 000001 0 0 777677777777 0 777677777777
*032273 CAME 3,034517
INITIAL
C(AC)=777677 777777
C(E)=777677 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032273 032273 0 0 312140034517 0 777677777777
IT1 032273 0 0 0 312140034517 0 777677777777
AT3 032273 0 0 0 000000034517 0 312140034517
AT6 032273 034517 0 0 000000034517 0 312140034517
FT0 032273 034517 0 0 777677777777 0 312140034517
FT1A 032273 034517 0 0 777677777777 0 777677777777
FT2 032273 034517 0 0 0 0 777677777777
FT2RQ 032273 034517 0 0 777677777777 0 777677777777
FT3 032273 034517 0 0 777677777777 0 777677777777
FT9 032274 034517 0 0 777677777777 0 777677777777
ET0 032275 034517 0 0 0 0 777677777777
ST1A 032275 034517 0 0 0 0 777677777777
ST9 032275 034517 0 0 0 0 777677777777
*032275 JUMPA 0,032276
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032275 032275 0 0 324000032276 0 000000032276
IT1 032275 0 0 0 324000032276 0 000000032276
AT3 032275 0 0 0 000000032276 0 324000032276
AT6 032275 032276 0 0 000000032276 0 324000032276
FT1A 032275 032276 0 0 000000032276 0 000000032276
FT2 032275 032276 0 0 0 0 000000032276
FT2RQ 032275 032276 0 0 000000000017 0 000000032276
FT3 032275 032276 0 0 000000000017 0 000000032276
FT9 032276 032276 0 0 000000000017 0 000000032276
ET0 032276 032276 0 0 000000000017 0 000000032276
ST1A 032276 032276 0 0 000000000017 0 000000032276
ST9 032276 032276 0 0 000000000017 0 000000032276
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 261
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0456
*032276 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777677 777777
FINAL
C(E)=777677 777777
TIME PC MA SC FE AR MQ BR
IT0 032276 032276 0 0 402000000003 0 000000000003
IT1 032276 0 0 0 402000000003 0 000000000003
AT3 032276 0 0 0 000000000003 0 402000000003
AT6 032276 000003 0 0 000000000003 0 402000000003
FT1A 032276 000003 0 0 000000000003 0 000000000003
FT9 032277 000003 0 0 000000000003 0 000000000003
ET0 032277 000003 0 0 0 0 000000000003
ST6 032277 000003 0 0 0 0 000000000003
ST6A 032277 000003 0 0 0 0 000000000003
ST9 032277 000003 0 0 0 0 000000000003
*032277 HRLOI 1,777577
INITIAL
C(AC)=777677 777777
FINAL
C(AC)=777577 777777
TIME PC MA SC FE AR MQ BR
IT0 032277 032277 0 0 525040777577 0 000000777577
IT1 032277 0 0 0 525040777577 0 000000777577
AT3 032277 0 0 0 000000777577 0 525040777577
AT6 032277 777577 0 0 000000777577 0 525040777577
FT1A 032277 777577 0 0 000000777577 0 000000777577
FT9 0 777577 0 0 000000777577 0 000000777577
ET0 0 777577 0 0 777577777777 0 000000777577
ST1 0 777577 0 0 777577777777 0 000000777577
ST2 0 777577 0 0 777577777777 0 000000777577
ST9 0 777577 0 0 777577777777 0 000000777577
*032300 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 201100000001 0 000000000001
IT1 0 0 0 0 201100000001 0 000000000001
AT3 0 0 0 0 000000000001 0 201100000001
AT6 0 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 262
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0457
FT1A 0 000001 0 0 000000000001 0 000000000001
FT9 032301 000001 0 0 000000000001 0 000000000001
ET0 032301 000001 0 0 000000000001 0 000000000001
ST1 032301 000001 0 0 000000000001 0 000000000001
ST2 032301 000001 0 0 000000000001 0 000000000001
ST9 032301 000001 0 0 000000000001 0 000000000001
*032301 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777577 777777
TIME PC MA SC FE AR MQ BR
IT0 032301 032301 0 0 200142000000 0 777577777777
IT1 032301 0 0 0 200142000000 0 777577777777
AT1 032301 0 0 0 0 0 200142000000
AT2 032301 0 0 0 000000000001 0 200142000000
AT3 032301 0 0 0 000000000001 0 000000000001
AT6 032301 000001 0 0 000000000001 0 000000000001
FT0 032301 000001 0 0 777577777777 0 000000000001
FT1A 032301 000001 0 0 777577777777 0 777577777777
FT9 032302 000001 0 0 777577777777 0 777577777777
ET0 032302 000001 0 0 777577777777 0 777577777777
ST1 032302 000001 0 0 777577777777 0 777577777777
ST2 032302 000001 0 0 777577777777 0 777577777777
ST9 032302 000001 0 0 777577777777 0 777577777777
*032302 CAME 3,034520
INITIAL
C(AC)=777577 777777
C(E)=777577 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032302 032302 0 0 312140034520 0 777577777777
IT1 032302 0 0 0 312140034520 0 777577777777
AT3 032302 0 0 0 000000034520 0 312140034520
AT6 032302 034520 0 0 000000034520 0 312140034520
FT0 032302 034520 0 0 777577777777 0 312140034520
FT1A 032302 034520 0 0 777577777777 0 777577777777
FT2 032302 034520 0 0 0 0 777577777777
FT2RQ 032302 034520 0 0 777577777777 0 777577777777
FT3 032302 034520 0 0 777577777777 0 777577777777
FT9 032303 034520 0 0 777577777777 0 777577777777
ET0 032304 034520 0 0 0 0 777577777777
ST1A 032304 034520 0 0 0 0 777577777777
ST9 032304 034520 0 0 0 0 777577777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 263
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0458
*032304 JUMPA 0,032305
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032304 032304 0 0 324000032305 0 000000032305
IT1 032304 0 0 0 324000032305 0 000000032305
AT3 032304 0 0 0 000000032305 0 324000032305
AT6 032304 032305 0 0 000000032305 0 324000032305
FT1A 032304 032305 0 0 000000032305 0 000000032305
FT2 032304 032305 0 0 0 0 000000032305
FT2RQ 032304 032305 0 0 000000000017 0 000000032305
FT3 032304 032305 0 0 000000000017 0 000000032305
FT9 032305 032305 0 0 000000000017 0 000000032305
ET0 032305 032305 0 0 000000000017 0 000000032305
ST1A 032305 032305 0 0 000000000017 0 000000032305
ST9 032305 032305 0 0 000000000017 0 000000032305
*032305 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777577 777777
FINAL
C(E)=777577 777777
TIME PC MA SC FE AR MQ BR
IT0 032305 032305 0 0 402000000003 0 000000000003
IT1 032305 0 0 0 402000000003 0 000000000003
AT3 032305 0 0 0 000000000003 0 402000000003
AT6 032305 000003 0 0 000000000003 0 402000000003
FT1A 032305 000003 0 0 000000000003 0 000000000003
FT9 032306 000003 0 0 000000000003 0 000000000003
ET0 032306 000003 0 0 0 0 000000000003
ST6 032306 000003 0 0 0 0 000000000003
ST6A 032306 000003 0 0 0 0 000000000003
ST9 032306 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 264
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0459
*032306 HRLOI 1,777377
INITIAL
C(AC)=777577 777777
FINAL
C(AC)=777377 777777
TIME PC MA SC FE AR MQ BR
IT0 032306 032306 0 0 525040777377 0 000000777377
IT1 032306 0 0 0 525040777377 0 000000777377
AT3 032306 0 0 0 000000777377 0 525040777377
AT6 032306 777377 0 0 000000777377 0 525040777377
FT1A 032306 777377 0 0 000000777377 0 000000777377
FT9 032307 777377 0 0 000000777377 0 000000777377
ET0 032307 777377 0 0 777377777777 0 000000777377
ST1 032307 777377 0 0 777377777777 0 000000777377
ST2 032307 777377 0 0 777377777777 0 000000777377
ST9 032307 777377 0 0 777377777777 0 000000777377
*032307 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032307 032307 0 0 201100000001 0 000000000001
IT1 032307 0 0 0 201100000001 0 000000000001
AT3 032307 0 0 0 000000000001 0 201100000001
AT6 032307 000001 0 0 000000000001 0 201100000001
FT1A 032307 000001 0 0 000000000001 0 000000000001
FT9 032310 000001 0 0 000000000001 0 000000000001
ET0 032310 000001 0 0 000000000001 0 000000000001
ST1 032310 000001 0 0 000000000001 0 000000000001
ST2 032310 000001 0 0 000000000001 0 000000000001
ST9 032310 000001 0 0 000000000001 0 000000000001
*032310 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=777377 777777
TIME PC MA SC FE AR MQ BR
IT0 032310 032310 0 0 200142000000 0 777377777777
IT1 032310 0 0 0 200142000000 0 777377777777
AT1 032310 0 0 0 0 0 200142000000
AT2 032310 0 0 0 000000000001 0 200142000000
AT3 032310 0 0 0 000000000001 0 000000000001
AT6 032310 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 265
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0460
FT0 032310 000001 0 0 777377777777 0 000000000001
FT1A 032310 000001 0 0 777377777777 0 777377777777
FT9 032311 000001 0 0 777377777777 0 777377777777
ET0 032311 000001 0 0 777377777777 0 777377777777
ST1 032311 000001 0 0 777377777777 0 777377777777
ST2 032311 000001 0 0 777377777777 0 777377777777
ST9 032311 000001 0 0 777377777777 0 777377777777
*032311 CAME 3,034521
INITIAL
C(AC)=777377 777777
C(E)=777377 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032311 032311 0 0 312140034521 0 777377777777
IT1 032311 0 0 0 312140034521 0 777377777777
AT3 032311 0 0 0 000000034521 0 312140034521
AT6 032311 034521 0 0 000000034521 0 312140034521
FT0 032311 034521 0 0 777377777777 0 312140034521
FT1A 032311 034521 0 0 777377777777 0 777377777777
FT2 032311 034521 0 0 0 0 777377777777
FT2RQ 032311 034521 0 0 777377777777 0 777377777777
FT3 032311 034521 0 0 777377777777 0 777377777777
FT9 032312 034521 0 0 777377777777 0 777377777777
ET0 032313 034521 0 0 0 0 777377777777
ST1A 032313 034521 0 0 0 0 777377777777
ST9 032313 034521 0 0 0 0 777377777777
*032313 JUMPA 0,032314
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032313 032313 0 0 324000032314 0 000000032314
IT1 032313 0 0 0 324000032314 0 000000032314
AT3 032313 0 0 0 000000032314 0 324000032314
AT6 032313 032314 0 0 000000032314 0 324000032314
FT1A 032313 032314 0 0 000000032314 0 000000032314
FT2 032313 032314 0 0 0 0 000000032314
FT2RQ 032313 032314 0 0 000000000017 0 000000032314
FT3 032313 032314 0 0 000000000017 0 000000032314
FT9 032314 032314 0 0 000000000017 0 000000032314
ET0 032314 032314 0 0 000000000017 0 000000032314
ST1A 032314 032314 0 0 000000000017 0 000000032314
ST9 032314 032314 0 0 000000000017 0 000000032314
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 266
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0461
*032314 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=777377 777777
FINAL
C(E)=777377 777777
TIME PC MA SC FE AR MQ BR
IT0 032314 032314 0 0 402000000003 0 000000000003
IT1 032314 0 0 0 402000000003 0 000000000003
AT3 032314 0 0 0 000000000003 0 402000000003
AT6 032314 000003 0 0 000000000003 0 402000000003
FT1A 032314 000003 0 0 000000000003 0 000000000003
FT9 032315 000003 0 0 000000000003 0 000000000003
ET0 032315 000003 0 0 0 0 000000000003
ST6 032315 000003 0 0 0 0 000000000003
ST6A 032315 000003 0 0 0 0 000000000003
ST9 032315 000003 0 0 0 0 000000000003
*032315 HRLOI 1,776777
INITIAL
C(AC)=777377 777777
FINAL
C(AC)=776777 777777
TIME PC MA SC FE AR MQ BR
IT0 032315 032315 0 0 525040776777 0 000000776777
IT1 032315 0 0 0 525040776777 0 000000776777
AT3 032315 0 0 0 000000776777 0 525040776777
AT6 032315 776777 0 0 000000776777 0 525040776777
FT1A 032315 776777 0 0 000000776777 0 000000776777
FT9 032316 776777 0 0 000000776777 0 000000776777
ET0 032316 776777 0 0 776777777777 0 000000776777
ST1 032316 776777 0 0 776777777777 0 000000776777
ST2 032316 776777 0 0 776777777777 0 000000776777
ST9 032316 776777 0 0 776777777777 0 000000776777
*032316 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032316 032316 0 0 201100000001 0 000000000001
IT1 032316 0 0 0 201100000001 0 000000000001
AT3 032316 0 0 0 000000000001 0 201100000001
AT6 032316 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 267
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0462
FT1A 032316 000001 0 0 000000000001 0 000000000001
FT9 032317 000001 0 0 000000000001 0 000000000001
ET0 032317 000001 0 0 000000000001 0 000000000001
ST1 032317 000001 0 0 000000000001 0 000000000001
ST2 032317 000001 0 0 000000000001 0 000000000001
ST9 032317 000001 0 0 000000000001 0 000000000001
*032317 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=776777 777777
TIME PC MA SC FE AR MQ BR
IT0 032317 032317 0 0 200142000000 0 776777777777
IT1 032317 0 0 0 200142000000 0 776777777777
AT1 032317 0 0 0 0 0 200142000000
AT2 032317 0 0 0 000000000001 0 200142000000
AT3 032317 0 0 0 000000000001 0 000000000001
AT6 032317 000001 0 0 000000000001 0 000000000001
FT0 032317 000001 0 0 776777777777 0 000000000001
FT1A 032317 000001 0 0 776777777777 0 776777777777
FT9 032320 000001 0 0 776777777777 0 776777777777
ET0 032320 000001 0 0 776777777777 0 776777777777
ST1 032320 000001 0 0 776777777777 0 776777777777
ST2 032320 000001 0 0 776777777777 0 776777777777
ST9 032320 000001 0 0 776777777777 0 776777777777
*032320 CAME 3,034522
INITIAL
C(AC)=776777 777777
C(E)=776777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032320 032320 0 0 312140034522 0 776777777777
IT1 032320 0 0 0 312140034522 0 776777777777
AT3 032320 0 0 0 000000034522 0 312140034522
AT6 032320 034522 0 0 000000034522 0 312140034522
FT0 032320 034522 0 0 776777777777 0 312140034522
FT1A 032320 034522 0 0 776777777777 0 776777777777
FT2 032320 034522 0 0 0 0 776777777777
FT2RQ 032320 034522 0 0 776777777777 0 776777777777
FT3 032320 034522 0 0 776777777777 0 776777777777
FT9 032321 034522 0 0 776777777777 0 776777777777
ET0 032322 034522 0 0 0 0 776777777777
ST1A 032322 034522 0 0 0 0 776777777777
ST9 032322 034522 0 0 0 0 776777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 268
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0463
*032322 JUMPA 0,032323
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032322 032322 0 0 324000032323 0 000000032323
IT1 032322 0 0 0 324000032323 0 000000032323
AT3 032322 0 0 0 000000032323 0 324000032323
AT6 032322 032323 0 0 000000032323 0 324000032323
FT1A 032322 032323 0 0 000000032323 0 000000032323
FT2 032322 032323 0 0 0 0 000000032323
FT2RQ 032322 032323 0 0 000000000017 0 000000032323
FT3 032322 032323 0 0 000000000017 0 000000032323
FT9 032323 032323 0 0 000000000017 0 000000032323
ET0 032323 032323 0 0 000000000017 0 000000032323
ST1A 032323 032323 0 0 000000000017 0 000000032323
ST9 032323 032323 0 0 000000000017 0 000000032323
*032323 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=776777 777777
FINAL
C(E)=776777 777777
TIME PC MA SC FE AR MQ BR
IT0 032323 032323 0 0 402000000003 0 000000000003
IT1 032323 0 0 0 402000000003 0 000000000003
AT3 032323 0 0 0 000000000003 0 402000000003
AT6 032323 000003 0 0 000000000003 0 402000000003
FT1A 032323 000003 0 0 000000000003 0 000000000003
FT9 032324 000003 0 0 000000000003 0 000000000003
ET0 032324 000003 0 0 0 0 000000000003
ST6 032324 000003 0 0 0 0 000000000003
ST6A 032324 000003 0 0 0 0 000000000003
ST9 032324 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 269
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0464
*032324 HRLOI 1,775777
INITIAL
C(AC)=776777 777777
FINAL
C(AC)=775777 777777
TIME PC MA SC FE AR MQ BR
IT0 032324 032324 0 0 525040775777 0 000000775777
IT1 032324 0 0 0 525040775777 0 000000775777
AT3 032324 0 0 0 000000775777 0 525040775777
AT6 032324 775777 0 0 000000775777 0 525040775777
FT1A 032324 775777 0 0 000000775777 0 000000775777
FT9 032325 775777 0 0 000000775777 0 000000775777
ET0 032325 775777 0 0 775777777777 0 000000775777
ST1 032325 775777 0 0 775777777777 0 000000775777
ST2 032325 775777 0 0 775777777777 0 000000775777
ST9 032325 775777 0 0 775777777777 0 000000775777
*032325 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032325 032325 0 0 201100000001 0 000000000001
IT1 032325 0 0 0 201100000001 0 000000000001
AT3 032325 0 0 0 000000000001 0 201100000001
AT6 032325 000001 0 0 000000000001 0 201100000001
FT1A 032325 000001 0 0 000000000001 0 000000000001
FT9 032326 000001 0 0 000000000001 0 000000000001
ET0 032326 000001 0 0 000000000001 0 000000000001
ST1 032326 000001 0 0 000000000001 0 000000000001
ST2 032326 000001 0 0 000000000001 0 000000000001
ST9 032326 000001 0 0 000000000001 0 000000000001
*032326 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=775777 777777
TIME PC MA SC FE AR MQ BR
IT0 032326 032326 0 0 200142000000 0 775777777777
IT1 032326 0 0 0 200142000000 0 775777777777
AT1 032326 0 0 0 0 0 200142000000
AT2 032326 0 0 0 000000000001 0 200142000000
AT3 032326 0 0 0 000000000001 0 000000000001
AT6 032326 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 270
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0465
FT0 032326 000001 0 0 775777777777 0 000000000001
FT1A 032326 000001 0 0 775777777777 0 775777777777
FT9 032327 000001 0 0 775777777777 0 775777777777
ET0 032327 000001 0 0 775777777777 0 775777777777
ST1 032327 000001 0 0 775777777777 0 775777777777
ST2 032327 000001 0 0 775777777777 0 775777777777
ST9 032327 000001 0 0 775777777777 0 775777777777
*032327 CAME 3,034523
INITIAL
C(AC)=775777 777777
C(E)=775777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032327 032327 0 0 312140034523 0 775777777777
IT1 032327 0 0 0 312140034523 0 775777777777
AT3 032327 0 0 0 000000034523 0 312140034523
AT6 032327 034523 0 0 000000034523 0 312140034523
FT0 032327 034523 0 0 775777777777 0 312140034523
FT1A 032327 034523 0 0 775777777777 0 775777777777
FT2 032327 034523 0 0 0 0 775777777777
FT2RQ 032327 034523 0 0 775777777777 0 775777777777
FT3 032327 034523 0 0 775777777777 0 775777777777
FT9 032330 034523 0 0 775777777777 0 775777777777
ET0 032331 034523 0 0 0 0 775777777777
ST1A 032331 034523 0 0 0 0 775777777777
ST9 032331 034523 0 0 0 0 775777777777
*032331 JUMPA 0,032332
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032331 032331 0 0 324000032332 0 000000032332
IT1 032331 0 0 0 324000032332 0 000000032332
AT3 032331 0 0 0 000000032332 0 324000032332
AT6 032331 032332 0 0 000000032332 0 324000032332
FT1A 032331 032332 0 0 000000032332 0 000000032332
FT2 032331 032332 0 0 0 0 000000032332
FT2RQ 032331 032332 0 0 000000000017 0 000000032332
FT3 032331 032332 0 0 000000000017 0 000000032332
FT9 032332 032332 0 0 000000000017 0 000000032332
ET0 032332 032332 0 0 000000000017 0 000000032332
ST1A 032332 032332 0 0 000000000017 0 000000032332
ST9 032332 032332 0 0 000000000017 0 000000032332
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 271
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0466
*032332 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=775777 777777
FINAL
C(E)=775777 777777
TIME PC MA SC FE AR MQ BR
IT0 032332 032332 0 0 402000000003 0 000000000003
IT1 032332 0 0 0 402000000003 0 000000000003
AT3 032332 0 0 0 000000000003 0 402000000003
AT6 032332 000003 0 0 000000000003 0 402000000003
FT1A 032332 000003 0 0 000000000003 0 000000000003
FT9 032333 000003 0 0 000000000003 0 000000000003
ET0 032333 000003 0 0 0 0 000000000003
ST6 032333 000003 0 0 0 0 000000000003
ST6A 032333 000003 0 0 0 0 000000000003
ST9 032333 000003 0 0 0 0 000000000003
*032333 HRLOI 1,773777
INITIAL
C(AC)=775777 777777
FINAL
C(AC)=773777 777777
TIME PC MA SC FE AR MQ BR
IT0 032333 032333 0 0 525040773777 0 000000773777
IT1 032333 0 0 0 525040773777 0 000000773777
AT3 032333 0 0 0 000000773777 0 525040773777
AT6 032333 773777 0 0 000000773777 0 525040773777
FT1A 032333 773777 0 0 000000773777 0 000000773777
FT9 032334 773777 0 0 000000773777 0 000000773777
ET0 032334 773777 0 0 773777777777 0 000000773777
ST1 032334 773777 0 0 773777777777 0 000000773777
ST2 032334 773777 0 0 773777777777 0 000000773777
ST9 032334 773777 0 0 773777777777 0 000000773777
*032334 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032334 032334 0 0 201100000001 0 000000000001
IT1 032334 0 0 0 201100000001 0 000000000001
AT3 032334 0 0 0 000000000001 0 201100000001
AT6 032334 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 272
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0467
FT1A 032334 000001 0 0 000000000001 0 000000000001
FT9 032335 000001 0 0 000000000001 0 000000000001
ET0 032335 000001 0 0 000000000001 0 000000000001
ST1 032335 000001 0 0 000000000001 0 000000000001
ST2 032335 000001 0 0 000000000001 0 000000000001
ST9 032335 000001 0 0 000000000001 0 000000000001
*032335 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=773777 777777
TIME PC MA SC FE AR MQ BR
IT0 032335 032335 0 0 200142000000 0 773777777777
IT1 032335 0 0 0 200142000000 0 773777777777
AT1 032335 0 0 0 0 0 200142000000
AT2 032335 0 0 0 000000000001 0 200142000000
AT3 032335 0 0 0 000000000001 0 000000000001
AT6 032335 000001 0 0 000000000001 0 000000000001
FT0 032335 000001 0 0 773777777777 0 000000000001
FT1A 032335 000001 0 0 773777777777 0 773777777777
FT9 032336 000001 0 0 773777777777 0 773777777777
ET0 032336 000001 0 0 773777777777 0 773777777777
ST1 032336 000001 0 0 773777777777 0 773777777777
ST2 032336 000001 0 0 773777777777 0 773777777777
ST9 032336 000001 0 0 773777777777 0 773777777777
*032336 CAME 3,034524
INITIAL
C(AC)=773777 777777
C(E)=773777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032336 032336 0 0 312140034524 0 773777777777
IT1 032336 0 0 0 312140034524 0 773777777777
AT3 032336 0 0 0 000000034524 0 312140034524
AT6 032336 034524 0 0 000000034524 0 312140034524
FT0 032336 034524 0 0 773777777777 0 312140034524
FT1A 032336 034524 0 0 773777777777 0 773777777777
FT2 032336 034524 0 0 0 0 773777777777
FT2RQ 032336 034524 0 0 773777777777 0 773777777777
FT3 032336 034524 0 0 773777777777 0 773777777777
FT9 032337 034524 0 0 773777777777 0 773777777777
ET0 032340 034524 0 0 0 0 773777777777
ST1A 032340 034524 0 0 0 0 773777777777
ST9 032340 034524 0 0 0 0 773777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 273
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0468
*032340 JUMPA 0,032341
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032340 032340 0 0 324000032341 0 000000032341
IT1 032340 0 0 0 324000032341 0 000000032341
AT3 032340 0 0 0 000000032341 0 324000032341
AT6 032340 032341 0 0 000000032341 0 324000032341
FT1A 032340 032341 0 0 000000032341 0 000000032341
FT2 032340 032341 0 0 0 0 000000032341
FT2RQ 032340 032341 0 0 000000000017 0 000000032341
FT3 032340 032341 0 0 000000000017 0 000000032341
FT9 032341 032341 0 0 000000000017 0 000000032341
ET0 032341 032341 0 0 000000000017 0 000000032341
ST1A 032341 032341 0 0 000000000017 0 000000032341
ST9 032341 032341 0 0 000000000017 0 000000032341
*032341 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=773777 777777
FINAL
C(E)=773777 777777
TIME PC MA SC FE AR MQ BR
IT0 032341 032341 0 0 402000000003 0 000000000003
IT1 032341 0 0 0 402000000003 0 000000000003
AT3 032341 0 0 0 000000000003 0 402000000003
AT6 032341 000003 0 0 000000000003 0 402000000003
FT1A 032341 000003 0 0 000000000003 0 000000000003
FT9 032342 000003 0 0 000000000003 0 000000000003
ET0 032342 000003 0 0 0 0 000000000003
ST6 032342 000003 0 0 0 0 000000000003
ST6A 032342 000003 0 0 0 0 000000000003
ST9 032342 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 274
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0469
*032342 HRLOI 1,767777
INITIAL
C(AC)=773777 777777
FINAL
C(AC)=767777 777777
TIME PC MA SC FE AR MQ BR
IT0 032342 032342 0 0 525040767777 0 000000767777
IT1 032342 0 0 0 525040767777 0 000000767777
AT3 032342 0 0 0 000000767777 0 525040767777
AT6 032342 767777 0 0 000000767777 0 525040767777
FT1A 032342 767777 0 0 000000767777 0 000000767777
FT9 032343 767777 0 0 000000767777 0 000000767777
ET0 032343 767777 0 0 767777777777 0 000000767777
ST1 032343 767777 0 0 767777777777 0 000000767777
ST2 032343 767777 0 0 767777777777 0 000000767777
ST9 032343 767777 0 0 767777777777 0 000000767777
*032343 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032343 032343 0 0 201100000001 0 000000000001
IT1 032343 0 0 0 201100000001 0 000000000001
AT3 032343 0 0 0 000000000001 0 201100000001
AT6 032343 000001 0 0 000000000001 0 201100000001
FT1A 032343 000001 0 0 000000000001 0 000000000001
FT9 032344 000001 0 0 000000000001 0 000000000001
ET0 032344 000001 0 0 000000000001 0 000000000001
ST1 032344 000001 0 0 000000000001 0 000000000001
ST2 032344 000001 0 0 000000000001 0 000000000001
ST9 032344 000001 0 0 000000000001 0 000000000001
*032344 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=767777 777777
TIME PC MA SC FE AR MQ BR
IT0 032344 032344 0 0 200142000000 0 767777777777
IT1 032344 0 0 0 200142000000 0 767777777777
AT1 032344 0 0 0 0 0 200142000000
AT2 032344 0 0 0 000000000001 0 200142000000
AT3 032344 0 0 0 000000000001 0 000000000001
AT6 032344 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 275
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0470
FT0 032344 000001 0 0 767777777777 0 000000000001
FT1A 032344 000001 0 0 767777777777 0 767777777777
FT9 032345 000001 0 0 767777777777 0 767777777777
ET0 032345 000001 0 0 767777777777 0 767777777777
ST1 032345 000001 0 0 767777777777 0 767777777777
ST2 032345 000001 0 0 767777777777 0 767777777777
ST9 032345 000001 0 0 767777777777 0 767777777777
*032345 CAME 3,034525
INITIAL
C(AC)=767777 777777
C(E)=767777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032345 032345 0 0 312140034525 0 767777777777
IT1 032345 0 0 0 312140034525 0 767777777777
AT3 032345 0 0 0 000000034525 0 312140034525
AT6 032345 034525 0 0 000000034525 0 312140034525
FT0 032345 034525 0 0 767777777777 0 312140034525
FT1A 032345 034525 0 0 767777777777 0 767777777777
FT2 032345 034525 0 0 0 0 767777777777
FT2RQ 032345 034525 0 0 767777777777 0 767777777777
FT3 032345 034525 0 0 767777777777 0 767777777777
FT9 032346 034525 0 0 767777777777 0 767777777777
ET0 032347 034525 0 0 0 0 767777777777
ST1A 032347 034525 0 0 0 0 767777777777
ST9 032347 034525 0 0 0 0 767777777777
*032347 JUMPA 0,032350
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032347 032347 0 0 324000032350 0 000000032350
IT1 032347 0 0 0 324000032350 0 000000032350
AT3 032347 0 0 0 000000032350 0 324000032350
AT6 032347 032350 0 0 000000032350 0 324000032350
FT1A 032347 032350 0 0 000000032350 0 000000032350
FT2 032347 032350 0 0 0 0 000000032350
FT2RQ 032347 032350 0 0 000000000017 0 000000032350
FT3 032347 032350 0 0 000000000017 0 000000032350
FT9 032350 032350 0 0 000000000017 0 000000032350
ET0 032350 032350 0 0 000000000017 0 000000032350
ST1A 032350 032350 0 0 000000000017 0 000000032350
ST9 032350 032350 0 0 000000000017 0 000000032350
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 276
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0471
*032350 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=767777 777777
FINAL
C(E)=767777 777777
TIME PC MA SC FE AR MQ BR
IT0 032350 032350 0 0 402000000003 0 000000000003
IT1 032350 0 0 0 402000000003 0 000000000003
AT3 032350 0 0 0 000000000003 0 402000000003
AT6 032350 000003 0 0 000000000003 0 402000000003
FT1A 032350 000003 0 0 000000000003 0 000000000003
FT9 032351 000003 0 0 000000000003 0 000000000003
ET0 032351 000003 0 0 0 0 000000000003
ST6 032351 000003 0 0 0 0 000000000003
ST6A 032351 000003 0 0 0 0 000000000003
ST9 032351 000003 0 0 0 0 000000000003
*032351 HRLOI 1,757777
INITIAL
C(AC)=767777 777777
FINAL
C(AC)=757777 777777
TIME PC MA SC FE AR MQ BR
IT0 032351 032351 0 0 525040757777 0 000000757777
IT1 032351 0 0 0 525040757777 0 000000757777
AT3 032351 0 0 0 000000757777 0 525040757777
AT6 032351 757777 0 0 000000757777 0 525040757777
FT1A 032351 757777 0 0 000000757777 0 000000757777
FT9 032352 757777 0 0 000000757777 0 000000757777
ET0 032352 757777 0 0 757777777777 0 000000757777
ST1 032352 757777 0 0 757777777777 0 000000757777
ST2 032352 757777 0 0 757777777777 0 000000757777
ST9 032352 757777 0 0 757777777777 0 000000757777
*032352 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032352 032352 0 0 201100000001 0 000000000001
IT1 032352 0 0 0 201100000001 0 000000000001
AT3 032352 0 0 0 000000000001 0 201100000001
AT6 032352 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 277
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0472
FT1A 032352 000001 0 0 000000000001 0 000000000001
FT9 032353 000001 0 0 000000000001 0 000000000001
ET0 032353 000001 0 0 000000000001 0 000000000001
ST1 032353 000001 0 0 000000000001 0 000000000001
ST2 032353 000001 0 0 000000000001 0 000000000001
ST9 032353 000001 0 0 000000000001 0 000000000001
*032353 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=757777 777777
TIME PC MA SC FE AR MQ BR
IT0 032353 032353 0 0 200142000000 0 757777777777
IT1 032353 0 0 0 200142000000 0 757777777777
AT1 032353 0 0 0 0 0 200142000000
AT2 032353 0 0 0 000000000001 0 200142000000
AT3 032353 0 0 0 000000000001 0 000000000001
AT6 032353 000001 0 0 000000000001 0 000000000001
FT0 032353 000001 0 0 757777777777 0 000000000001
FT1A 032353 000001 0 0 757777777777 0 757777777777
FT9 032354 000001 0 0 757777777777 0 757777777777
ET0 032354 000001 0 0 757777777777 0 757777777777
ST1 032354 000001 0 0 757777777777 0 757777777777
ST2 032354 000001 0 0 757777777777 0 757777777777
ST9 032354 000001 0 0 757777777777 0 757777777777
*032354 CAME 3,034526
INITIAL
C(AC)=757777 777777
C(E)=757777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032354 032354 0 0 312140034526 0 757777777777
IT1 032354 0 0 0 312140034526 0 757777777777
AT3 032354 0 0 0 000000034526 0 312140034526
AT6 032354 034526 0 0 000000034526 0 312140034526
FT0 032354 034526 0 0 757777777777 0 312140034526
FT1A 032354 034526 0 0 757777777777 0 757777777777
FT2 032354 034526 0 0 0 0 757777777777
FT2RQ 032354 034526 0 0 757777777777 0 757777777777
FT3 032354 034526 0 0 757777777777 0 757777777777
FT9 032355 034526 0 0 757777777777 0 757777777777
ET0 032356 034526 0 0 0 0 757777777777
ST1A 032356 034526 0 0 0 0 757777777777
ST9 032356 034526 0 0 0 0 757777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 278
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0473
*032356 JUMPA 0,032357
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032356 032356 0 0 324000032357 0 000000032357
IT1 032356 0 0 0 324000032357 0 000000032357
AT3 032356 0 0 0 000000032357 0 324000032357
AT6 032356 032357 0 0 000000032357 0 324000032357
FT1A 032356 032357 0 0 000000032357 0 000000032357
FT2 032356 032357 0 0 0 0 000000032357
FT2RQ 032356 032357 0 0 000000000017 0 000000032357
FT3 032356 032357 0 0 000000000017 0 000000032357
FT9 032357 032357 0 0 000000000017 0 000000032357
ET0 032357 032357 0 0 000000000017 0 000000032357
ST1A 032357 032357 0 0 000000000017 0 000000032357
ST9 032357 032357 0 0 000000000017 0 000000032357
*032357 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=757777 777777
FINAL
C(E)=757777 777777
TIME PC MA SC FE AR MQ BR
IT0 032357 032357 0 0 402000000003 0 000000000003
IT1 032357 0 0 0 402000000003 0 000000000003
AT3 032357 0 0 0 000000000003 0 402000000003
AT6 032357 000003 0 0 000000000003 0 402000000003
FT1A 032357 000003 0 0 000000000003 0 000000000003
FT9 032360 000003 0 0 000000000003 0 000000000003
ET0 032360 000003 0 0 0 0 000000000003
ST6 032360 000003 0 0 0 0 000000000003
ST6A 032360 000003 0 0 0 0 000000000003
ST9 032360 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 279
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0474
*032360 HRLOI 1,737777
INITIAL
C(AC)=757777 777777
FINAL
C(AC)=737777 777777
TIME PC MA SC FE AR MQ BR
IT0 032360 032360 0 0 525040737777 0 000000737777
IT1 032360 0 0 0 525040737777 0 000000737777
AT3 032360 0 0 0 000000737777 0 525040737777
AT6 032360 737777 0 0 000000737777 0 525040737777
FT1A 032360 737777 0 0 000000737777 0 000000737777
FT9 032361 737777 0 0 000000737777 0 000000737777
ET0 032361 737777 0 0 737777777777 0 000000737777
ST1 032361 737777 0 0 737777777777 0 000000737777
ST2 032361 737777 0 0 737777777777 0 000000737777
ST9 032361 737777 0 0 737777777777 0 000000737777
*032361 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032361 032361 0 0 201100000001 0 000000000001
IT1 032361 0 0 0 201100000001 0 000000000001
AT3 032361 0 0 0 000000000001 0 201100000001
AT6 032361 000001 0 0 000000000001 0 201100000001
FT1A 032361 000001 0 0 000000000001 0 000000000001
FT9 032362 000001 0 0 000000000001 0 000000000001
ET0 032362 000001 0 0 000000000001 0 000000000001
ST1 032362 000001 0 0 000000000001 0 000000000001
ST2 032362 000001 0 0 000000000001 0 000000000001
ST9 032362 000001 0 0 000000000001 0 000000000001
*032362 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=737777 777777
TIME PC MA SC FE AR MQ BR
IT0 032362 032362 0 0 200142000000 0 737777777777
IT1 032362 0 0 0 200142000000 0 737777777777
AT1 032362 0 0 0 0 0 200142000000
AT2 032362 0 0 0 000000000001 0 200142000000
AT3 032362 0 0 0 000000000001 0 000000000001
AT6 032362 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 280
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0475
FT0 032362 000001 0 0 737777777777 0 000000000001
FT1A 032362 000001 0 0 737777777777 0 737777777777
FT9 032363 000001 0 0 737777777777 0 737777777777
ET0 032363 000001 0 0 737777777777 0 737777777777
ST1 032363 000001 0 0 737777777777 0 737777777777
ST2 032363 000001 0 0 737777777777 0 737777777777
ST9 032363 000001 0 0 737777777777 0 737777777777
*032363 CAME 3,034527
INITIAL
C(AC)=737777 777777
C(E)=737777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032363 032363 0 0 312140034527 0 737777777777
IT1 032363 0 0 0 312140034527 0 737777777777
AT3 032363 0 0 0 000000034527 0 312140034527
AT6 032363 034527 0 0 000000034527 0 312140034527
FT0 032363 034527 0 0 737777777777 0 312140034527
FT1A 032363 034527 0 0 737777777777 0 737777777777
FT2 032363 034527 0 0 0 0 737777777777
FT2RQ 032363 034527 0 0 737777777777 0 737777777777
FT3 032363 034527 0 0 737777777777 0 737777777777
FT9 032364 034527 0 0 737777777777 0 737777777777
ET0 032365 034527 0 0 0 0 737777777777
ST1A 032365 034527 0 0 0 0 737777777777
ST9 032365 034527 0 0 0 0 737777777777
*032365 JUMPA 0,032366
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032365 032365 0 0 324000032366 0 000000032366
IT1 032365 0 0 0 324000032366 0 000000032366
AT3 032365 0 0 0 000000032366 0 324000032366
AT6 032365 032366 0 0 000000032366 0 324000032366
FT1A 032365 032366 0 0 000000032366 0 000000032366
FT2 032365 032366 0 0 0 0 000000032366
FT2RQ 032365 032366 0 0 000000000017 0 000000032366
FT3 032365 032366 0 0 000000000017 0 000000032366
FT9 032366 032366 0 0 000000000017 0 000000032366
ET0 032366 032366 0 0 000000000017 0 000000032366
ST1A 032366 032366 0 0 000000000017 0 000000032366
ST9 032366 032366 0 0 000000000017 0 000000032366
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 281
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0476
*032366 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=737777 777777
FINAL
C(E)=737777 777777
TIME PC MA SC FE AR MQ BR
IT0 032366 032366 0 0 402000000003 0 000000000003
IT1 032366 0 0 0 402000000003 0 000000000003
AT3 032366 0 0 0 000000000003 0 402000000003
AT6 032366 000003 0 0 000000000003 0 402000000003
FT1A 032366 000003 0 0 000000000003 0 000000000003
FT9 032367 000003 0 0 000000000003 0 000000000003
ET0 032367 000003 0 0 0 0 000000000003
ST6 032367 000003 0 0 0 0 000000000003
ST6A 032367 000003 0 0 0 0 000000000003
ST9 032367 000003 0 0 0 0 000000000003
*032367 HRLOI 1,677777
INITIAL
C(AC)=737777 777777
FINAL
C(AC)=677777 777777
TIME PC MA SC FE AR MQ BR
IT0 032367 032367 0 0 525040677777 0 000000677777
IT1 032367 0 0 0 525040677777 0 000000677777
AT3 032367 0 0 0 000000677777 0 525040677777
AT6 032367 677777 0 0 000000677777 0 525040677777
FT1A 032367 677777 0 0 000000677777 0 000000677777
FT9 032370 677777 0 0 000000677777 0 000000677777
ET0 032370 677777 0 0 677777777777 0 000000677777
ST1 032370 677777 0 0 677777777777 0 000000677777
ST2 032370 677777 0 0 677777777777 0 000000677777
ST9 032370 677777 0 0 677777777777 0 000000677777
*032370 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032370 032370 0 0 201100000001 0 000000000001
IT1 032370 0 0 0 201100000001 0 000000000001
AT3 032370 0 0 0 000000000001 0 201100000001
AT6 032370 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 282
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0477
FT1A 032370 000001 0 0 000000000001 0 000000000001
FT9 032371 000001 0 0 000000000001 0 000000000001
ET0 032371 000001 0 0 000000000001 0 000000000001
ST1 032371 000001 0 0 000000000001 0 000000000001
ST2 032371 000001 0 0 000000000001 0 000000000001
ST9 032371 000001 0 0 000000000001 0 000000000001
*032371 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=677777 777777
TIME PC MA SC FE AR MQ BR
IT0 032371 032371 0 0 200142000000 0 677777777777
IT1 032371 0 0 0 200142000000 0 677777777777
AT1 032371 0 0 0 0 0 200142000000
AT2 032371 0 0 0 000000000001 0 200142000000
AT3 032371 0 0 0 000000000001 0 000000000001
AT6 032371 000001 0 0 000000000001 0 000000000001
FT0 032371 000001 0 0 677777777777 0 000000000001
FT1A 032371 000001 0 0 677777777777 0 677777777777
FT9 032372 000001 0 0 677777777777 0 677777777777
ET0 032372 000001 0 0 677777777777 0 677777777777
ST1 032372 000001 0 0 677777777777 0 677777777777
ST2 032372 000001 0 0 677777777777 0 677777777777
ST9 032372 000001 0 0 677777777777 0 677777777777
*032372 CAME 3,034530
INITIAL
C(AC)=677777 777777
C(E)=677777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032372 032372 0 0 312140034530 0 677777777777
IT1 032372 0 0 0 312140034530 0 677777777777
AT3 032372 0 0 0 000000034530 0 312140034530
AT6 032372 034530 0 0 000000034530 0 312140034530
FT0 032372 034530 0 0 677777777777 0 312140034530
FT1A 032372 034530 0 0 677777777777 0 677777777777
FT2 032372 034530 0 0 0 0 677777777777
FT2RQ 032372 034530 0 0 677777777777 0 677777777777
FT3 032372 034530 0 0 677777777777 0 677777777777
FT9 032373 034530 0 0 677777777777 0 677777777777
ET0 032374 034530 0 0 0 0 677777777777
ST1A 032374 034530 0 0 0 0 677777777777
ST9 032374 034530 0 0 0 0 677777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 283
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0478
*032374 JUMPA 0,032375
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032374 032374 0 0 324000032375 0 000000032375
IT1 032374 0 0 0 324000032375 0 000000032375
AT3 032374 0 0 0 000000032375 0 324000032375
AT6 032374 032375 0 0 000000032375 0 324000032375
FT1A 032374 032375 0 0 000000032375 0 000000032375
FT2 032374 032375 0 0 0 0 000000032375
FT2RQ 032374 032375 0 0 000000000017 0 000000032375
FT3 032374 032375 0 0 000000000017 0 000000032375
FT9 032375 032375 0 0 000000000017 0 000000032375
ET0 032375 032375 0 0 000000000017 0 000000032375
ST1A 032375 032375 0 0 000000000017 0 000000032375
ST9 032375 032375 0 0 000000000017 0 000000032375
*032375 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=677777 777777
FINAL
C(E)=677777 777777
TIME PC MA SC FE AR MQ BR
IT0 032375 032375 0 0 402000000003 0 000000000003
IT1 032375 0 0 0 402000000003 0 000000000003
AT3 032375 0 0 0 000000000003 0 402000000003
AT6 032375 000003 0 0 000000000003 0 402000000003
FT1A 032375 000003 0 0 000000000003 0 000000000003
FT9 032376 000003 0 0 000000000003 0 000000000003
ET0 032376 000003 0 0 0 0 000000000003
ST6 032376 000003 0 0 0 0 000000000003
ST6A 032376 000003 0 0 0 0 000000000003
ST9 032376 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 284
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0479
*032376 HRLOI 1,577777
INITIAL
C(AC)=677777 777777
FINAL
C(AC)=577777 777777
TIME PC MA SC FE AR MQ BR
IT0 032376 032376 0 0 525040577777 0 000000577777
IT1 032376 0 0 0 525040577777 0 000000577777
AT3 032376 0 0 0 000000577777 0 525040577777
AT6 032376 577777 0 0 000000577777 0 525040577777
FT1A 032376 577777 0 0 000000577777 0 000000577777
FT9 032377 577777 0 0 000000577777 0 000000577777
ET0 032377 577777 0 0 577777777777 0 000000577777
ST1 032377 577777 0 0 577777777777 0 000000577777
ST2 032377 577777 0 0 577777777777 0 000000577777
ST9 032377 577777 0 0 577777777777 0 000000577777
*032377 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032377 032377 0 0 201100000001 0 000000000001
IT1 032377 0 0 0 201100000001 0 000000000001
AT3 032377 0 0 0 000000000001 0 201100000001
AT6 032377 000001 0 0 000000000001 0 201100000001
FT1A 032377 000001 0 0 000000000001 0 000000000001
FT9 0 000001 0 0 000000000001 0 000000000001
ET0 0 000001 0 0 000000000001 0 000000000001
ST1 0 000001 0 0 000000000001 0 000000000001
ST2 0 000001 0 0 000000000001 0 000000000001
ST9 0 000001 0 0 000000000001 0 000000000001
*032400 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=577777 777777
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 200142000000 0 577777777777
IT1 0 0 0 0 200142000000 0 577777777777
AT1 0 0 0 0 0 0 200142000000
AT2 0 0 0 0 000000000001 0 200142000000
AT3 0 0 0 0 000000000001 0 000000000001
AT6 0 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 285
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0480
FT0 0 000001 0 0 577777777777 0 000000000001
FT1A 0 000001 0 0 577777777777 0 577777777777
FT9 032401 000001 0 0 577777777777 0 577777777777
ET0 032401 000001 0 0 577777777777 0 577777777777
ST1 032401 000001 0 0 577777777777 0 577777777777
ST2 032401 000001 0 0 577777777777 0 577777777777
ST9 032401 000001 0 0 577777777777 0 577777777777
*032401 CAME 3,034531
INITIAL
C(AC)=577777 777777
C(E)=577777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032401 032401 0 0 312140034531 0 577777777777
IT1 032401 0 0 0 312140034531 0 577777777777
AT3 032401 0 0 0 000000034531 0 312140034531
AT6 032401 034531 0 0 000000034531 0 312140034531
FT0 032401 034531 0 0 577777777777 0 312140034531
FT1A 032401 034531 0 0 577777777777 0 577777777777
FT2 032401 034531 0 0 0 0 577777777777
FT2RQ 032401 034531 0 0 577777777777 0 577777777777
FT3 032401 034531 0 0 577777777777 0 577777777777
FT9 032402 034531 0 0 577777777777 0 577777777777
ET0 032403 034531 0 0 0 0 577777777777
ST1A 032403 034531 0 0 0 0 577777777777
ST9 032403 034531 0 0 0 0 577777777777
*032403 JUMPA 0,032404
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032403 032403 0 0 324000032404 0 000000032404
IT1 032403 0 0 0 324000032404 0 000000032404
AT3 032403 0 0 0 000000032404 0 324000032404
AT6 032403 032404 0 0 000000032404 0 324000032404
FT1A 032403 032404 0 0 000000032404 0 000000032404
FT2 032403 032404 0 0 0 0 000000032404
FT2RQ 032403 032404 0 0 000000000017 0 000000032404
FT3 032403 032404 0 0 000000000017 0 000000032404
FT9 032404 032404 0 0 000000000017 0 000000032404
ET0 032404 032404 0 0 000000000017 0 000000032404
ST1A 032404 032404 0 0 000000000017 0 000000032404
ST9 032404 032404 0 0 000000000017 0 000000032404
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 286
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0481
*032404 SETZM 0,000003
INITIAL
C(AC)=000000 000017
C(E)=577777 777777
FINAL
C(E)=577777 777777
TIME PC MA SC FE AR MQ BR
IT0 032404 032404 0 0 402000000003 0 000000000003
IT1 032404 0 0 0 402000000003 0 000000000003
AT3 032404 0 0 0 000000000003 0 402000000003
AT6 032404 000003 0 0 000000000003 0 402000000003
FT1A 032404 000003 0 0 000000000003 0 000000000003
FT9 032405 000003 0 0 000000000003 0 000000000003
ET0 032405 000003 0 0 0 0 000000000003
ST6 032405 000003 0 0 0 0 000000000003
ST6A 032405 000003 0 0 0 0 000000000003
ST9 032405 000003 0 0 0 0 000000000003
*032405 HRLOI 1,377777
INITIAL
C(AC)=577777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 032405 032405 0 0 525040377777 0 000000377777
IT1 032405 0 0 0 525040377777 0 000000377777
AT3 032405 0 0 0 000000377777 0 525040377777
AT6 032405 377777 0 0 000000377777 0 525040377777
FT1A 032405 377777 0 0 000000377777 0 000000377777
FT9 032406 377777 0 0 000000377777 0 000000377777
ET0 032406 377777 0 0 377777777777 0 000000377777
ST1 032406 377777 0 0 377777777777 0 000000377777
ST2 032406 377777 0 0 377777777777 0 000000377777
ST9 032406 377777 0 0 377777777777 0 000000377777
*032406 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032406 032406 0 0 201100000001 0 000000000001
IT1 032406 0 0 0 201100000001 0 000000000001
AT3 032406 0 0 0 000000000001 0 201100000001
AT6 032406 000001 0 0 000000000001 0 201100000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 287
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0482
FT1A 032406 000001 0 0 000000000001 0 000000000001
FT9 032407 000001 0 0 000000000001 0 000000000001
ET0 032407 000001 0 0 000000000001 0 000000000001
ST1 032407 000001 0 0 000000000001 0 000000000001
ST2 032407 000001 0 0 000000000001 0 000000000001
ST9 032407 000001 0 0 000000000001 0 000000000001
*032407 MOVE 3,000000(2)
INITIAL
C(AC)=000000 000000
C(E)=000000 000017
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 032407 032407 0 0 200142000000 0 377777777777
IT1 032407 0 0 0 200142000000 0 377777777777
AT1 032407 0 0 0 0 0 200142000000
AT2 032407 0 0 0 000000000001 0 200142000000
AT3 032407 0 0 0 000000000001 0 000000000001
AT6 032407 000001 0 0 000000000001 0 000000000001
FT0 032407 000001 0 0 377777777777 0 000000000001
FT1A 032407 000001 0 0 377777777777 0 377777777777
FT9 032410 000001 0 0 377777777777 0 377777777777
ET0 032410 000001 0 0 377777777777 0 377777777777
ST1 032410 000001 0 0 377777777777 0 377777777777
ST2 032410 000001 0 0 377777777777 0 377777777777
ST9 032410 000001 0 0 377777777777 0 377777777777
*032410 CAME 3,034532
INITIAL
C(AC)=377777 777777
C(E)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032410 032410 0 0 312140034532 0 377777777777
IT1 032410 0 0 0 312140034532 0 377777777777
AT3 032410 0 0 0 000000034532 0 312140034532
AT6 032410 034532 0 0 000000034532 0 312140034532
FT0 032410 034532 0 0 377777777777 0 312140034532
FT1A 032410 034532 0 0 377777777777 0 377777777777
FT2 032410 034532 0 0 0 0 377777777777
FT2RQ 032410 034532 0 0 377777777777 0 377777777777
FT3 032410 034532 0 0 377777777777 0 377777777777
FT9 032411 034532 0 0 377777777777 0 377777777777
ET0 032412 034532 0 0 0 0 377777777777
ST1A 032412 034532 0 0 0 0 377777777777
ST9 032412 034532 0 0 0 0 377777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 288
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0483
*032412 JUMPA 0,032413
INITIAL
C(AC)=000000 000017
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032412 032412 0 0 324000032413 0 000000032413
IT1 032412 0 0 0 324000032413 0 000000032413
AT3 032412 0 0 0 000000032413 0 324000032413
AT6 032412 032413 0 0 000000032413 0 324000032413
FT1A 032412 032413 0 0 000000032413 0 000000032413
FT2 032412 032413 0 0 0 0 000000032413
FT2RQ 032412 032413 0 0 000000000017 0 000000032413
FT3 032412 032413 0 0 000000000017 0 000000032413
FT9 032413 032413 0 0 000000000017 0 000000032413
ET0 032413 032413 0 0 000000000017 0 000000032413
ST1A 032413 032413 0 0 000000000017 0 000000032413
ST9 032413 032413 0 0 000000000017 0 000000032413
*032413 MOVEI 1,000005
INITIAL
C(AC)=377777 777777
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 032413 032413 0 0 201040000005 0 000000000005
IT1 032413 0 0 0 201040000005 0 000000000005
AT3 032413 0 0 0 000000000005 0 201040000005
AT6 032413 000005 0 0 000000000005 0 201040000005
FT1A 032413 000005 0 0 000000000005 0 000000000005
FT9 032414 000005 0 0 000000000005 0 000000000005
ET0 032414 000005 0 0 000000000005 0 000000000005
ST1 032414 000005 0 0 000000000005 0 000000000005
ST2 032414 000005 0 0 000000000005 0 000000000005
ST9 032414 000005 0 0 000000000005 0 000000000005
*032414 MOVEI 0,000000
INITIAL
C(AC)=000000 000017
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032414 032414 0 0 201000000000 0 0
IT1 032414 0 0 0 201000000000 0 0
AT3 032414 0 0 0 0 0 201000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 289
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0484
AT6 032414 0 0 0 0 0 201000000000
FT1A 032414 0 0 0 0 0 0
FT9 032415 0 0 0 0 0 0
ET0 032415 0 0 0 0 0 0
ST1 032415 0 0 0 0 0 0
ST2 032415 0 0 0 0 0 0
ST9 032415 0 0 0 0 0 0
*032415 CAIE 0,777773(1)
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032415 032415 0 0 302001777773 0 0
IT1 032415 0 0 0 302001777773 0 0
AT1 032415 0 0 0 0 0 302001777773
AT2 032415 0 0 0 000000000005 0 302001777773
AT3 032415 0 0 0 0 0 0
AT6 032415 0 0 0 0 0 0
FT1A 032415 0 0 0 0 0 0
FT2 032415 0 0 0 0 0 0
FT2RQ 032415 0 0 0 0 0 0
FT3 032415 0 0 0 0 0 0
FT9 032416 0 0 0 0 0 0
ET0 032417 0 0 0 0 0 0
ST1A 032417 0 0 0 0 0 0
ST9 032417 0 0 0 0 0 0
*032417 JUMPA 0,032420
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032417 032417 0 0 324000032420 0 000000032420
IT1 032417 0 0 0 324000032420 0 000000032420
AT3 032417 0 0 0 000000032420 0 324000032420
AT6 032417 032420 0 0 000000032420 0 324000032420
FT1A 032417 032420 0 0 000000032420 0 000000032420
FT2 032417 032420 0 0 0 0 000000032420
FT2RQ 032417 032420 0 0 0 0 000000032420
FT3 032417 032420 0 0 0 0 000000032420
FT9 032420 032420 0 0 0 0 000000032420
ET0 032420 032420 0 0 0 0 000000032420
ST1A 032420 032420 0 0 0 0 000000032420
ST9 032420 032420 0 0 0 0 000000032420
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 290
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0485
*032420 MOVEI 2,000003
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 032420 032420 0 0 201100000003 0 000000000003
IT1 032420 0 0 0 201100000003 0 000000000003
AT3 032420 0 0 0 000000000003 0 201100000003
AT6 032420 000003 0 0 000000000003 0 201100000003
FT1A 032420 000003 0 0 000000000003 0 000000000003
FT9 032421 000003 0 0 000000000003 0 000000000003
ET0 032421 000003 0 0 000000000003 0 000000000003
ST1 032421 000003 0 0 000000000003 0 000000000003
ST2 032421 000003 0 0 000000000003 0 000000000003
ST9 032421 000003 0 0 000000000003 0 000000000003
*032421 MOVEI 1,000001
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032421 032421 0 0 201040000001 0 000000000001
IT1 032421 0 0 0 201040000001 0 000000000001
AT3 032421 0 0 0 000000000001 0 201040000001
AT6 032421 000001 0 0 000000000001 0 201040000001
FT1A 032421 000001 0 0 000000000001 0 000000000001
FT9 032422 000001 0 0 000000000001 0 000000000001
ET0 032422 000001 0 0 000000000001 0 000000000001
ST1 032422 000001 0 0 000000000001 0 000000000001
ST2 032422 000001 0 0 000000000001 0 000000000001
ST9 032422 000001 0 0 000000000001 0 000000000001
*032422 CAIE 1,777776(2)
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032422 032422 0 0 302042777776 0 000000000001
IT1 032422 0 0 0 302042777776 0 000000000001
AT1 032422 0 0 0 0 0 302042777776
AT2 032422 0 0 0 000000000003 0 302042777776
AT3 032422 0 0 0 000000000001 0 000000000001
AT6 032422 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 291
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0486
FT1A 032422 000001 0 0 000000000001 0 000000000001
FT2 032422 000001 0 0 0 0 000000000001
FT2RQ 032422 000001 0 0 000000000001 0 000000000001
FT3 032422 000001 0 0 000000000001 0 000000000001
FT9 032423 000001 0 0 000000000001 0 000000000001
ET0 032424 000001 0 0 0 0 000000000001
ST1A 032424 000001 0 0 0 0 000000000001
ST9 032424 000001 0 0 0 0 000000000001
*032424 JUMPA 0,032425
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032424 032424 0 0 324000032425 0 000000032425
IT1 032424 0 0 0 324000032425 0 000000032425
AT3 032424 0 0 0 000000032425 0 324000032425
AT6 032424 032425 0 0 000000032425 0 324000032425
FT1A 032424 032425 0 0 000000032425 0 000000032425
FT2 032424 032425 0 0 0 0 000000032425
FT2RQ 032424 032425 0 0 0 0 000000032425
FT3 032424 032425 0 0 0 0 000000032425
FT9 032425 032425 0 0 0 0 000000032425
ET0 032425 032425 0 0 0 0 000000032425
ST1A 032425 032425 0 0 0 0 000000032425
ST9 032425 032425 0 0 0 0 000000032425
*032425 MOVEI 3,000001
INITIAL
C(AC)=377777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032425 032425 0 0 201140000001 0 000000000001
IT1 032425 0 0 0 201140000001 0 000000000001
AT3 032425 0 0 0 000000000001 0 201140000001
AT6 032425 000001 0 0 000000000001 0 201140000001
FT1A 032425 000001 0 0 000000000001 0 000000000001
FT9 032426 000001 0 0 000000000001 0 000000000001
ET0 032426 000001 0 0 000000000001 0 000000000001
ST1 032426 000001 0 0 000000000001 0 000000000001
ST2 032426 000001 0 0 000000000001 0 000000000001
ST9 032426 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 292
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0487
*032426 MOVEI 2,000002
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 032426 032426 0 0 201100000002 0 000000000002
IT1 032426 0 0 0 201100000002 0 000000000002
AT3 032426 0 0 0 000000000002 0 201100000002
AT6 032426 000002 0 0 000000000002 0 201100000002
FT1A 032426 000002 0 0 000000000002 0 000000000002
FT9 032427 000002 0 0 000000000002 0 000000000002
ET0 032427 000002 0 0 000000000002 0 000000000002
ST1 032427 000002 0 0 000000000002 0 000000000002
ST2 032427 000002 0 0 000000000002 0 000000000002
ST9 032427 000002 0 0 000000000002 0 000000000002
*032427 CAIE 2,000001(3)
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032427 032427 0 0 302103000001 0 000000000002
IT1 032427 0 0 0 302103000001 0 000000000002
AT1 032427 0 0 0 0 0 302103000001
AT2 032427 0 0 0 000000000001 0 302103000001
AT3 032427 0 0 0 000000000002 0 000000000002
AT6 032427 000002 0 0 000000000002 0 000000000002
FT1A 032427 000002 0 0 000000000002 0 000000000002
FT2 032427 000002 0 0 0 0 000000000002
FT2RQ 032427 000002 0 0 000000000002 0 000000000002
FT3 032427 000002 0 0 000000000002 0 000000000002
FT9 032430 000002 0 0 000000000002 0 000000000002
ET0 032431 000002 0 0 0 0 000000000002
ST1A 032431 000002 0 0 0 0 000000000002
ST9 032431 000002 0 0 0 0 000000000002
*032431 JUMPA 0,032432
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032431 032431 0 0 324000032432 0 000000032432
IT1 032431 0 0 0 324000032432 0 000000032432
AT3 032431 0 0 0 000000032432 0 324000032432
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 293
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0488
AT6 032431 032432 0 0 000000032432 0 324000032432
FT1A 032431 032432 0 0 000000032432 0 000000032432
FT2 032431 032432 0 0 0 0 000000032432
FT2RQ 032431 032432 0 0 0 0 000000032432
FT3 032431 032432 0 0 0 0 000000032432
FT9 032432 032432 0 0 0 0 000000032432
ET0 032432 032432 0 0 0 0 000000032432
ST1A 032432 032432 0 0 0 0 000000032432
ST9 032432 032432 0 0 0 0 000000032432
*032432 MOVEI 4,777777
INITIAL
C(AC)=000004 000004
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 032432 032432 0 0 201200777777 0 000000777777
IT1 032432 0 0 0 201200777777 0 000000777777
AT3 032432 0 0 0 000000777777 0 201200777777
AT6 032432 777777 0 0 000000777777 0 201200777777
FT1A 032432 777777 0 0 000000777777 0 000000777777
FT9 032433 777777 0 0 000000777777 0 000000777777
ET0 032433 777777 0 0 000000777777 0 000000777777
ST1 032433 777777 0 0 000000777777 0 000000777777
ST2 032433 777777 0 0 000000777777 0 000000777777
ST9 032433 777777 0 0 000000777777 0 000000777777
*032433 MOVEI 3,000003
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 032433 032433 0 0 201140000003 0 000000000003
IT1 032433 0 0 0 201140000003 0 000000000003
AT3 032433 0 0 0 000000000003 0 201140000003
AT6 032433 000003 0 0 000000000003 0 201140000003
FT1A 032433 000003 0 0 000000000003 0 000000000003
FT9 032434 000003 0 0 000000000003 0 000000000003
ET0 032434 000003 0 0 000000000003 0 000000000003
ST1 032434 000003 0 0 000000000003 0 000000000003
ST2 032434 000003 0 0 000000000003 0 000000000003
ST9 032434 000003 0 0 000000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 294
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0489
*032434 CAIE 3,000004(4)
INITIAL
C(AC)=000000 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032434 032434 0 0 302144000004 0 000000000003
IT1 032434 0 0 0 302144000004 0 000000000003
AT1 032434 0 0 0 0 0 302144000004
AT2 032434 0 0 0 000000777777 0 302144000004
AT3 032434 0 0 0 000000000003 0 000000000003
AT6 032434 000003 0 0 000000000003 0 000000000003
FT1A 032434 000003 0 0 000000000003 0 000000000003
FT2 032434 000003 0 0 0 0 000000000003
FT2RQ 032434 000003 0 0 000000000003 0 000000000003
FT3 032434 000003 0 0 000000000003 0 000000000003
FT9 032435 000003 0 0 000000000003 0 000000000003
ET0 032436 000003 0 0 0 0 000000000003
ST1A 032436 000003 0 0 0 0 000000000003
ST9 032436 000003 0 0 0 0 000000000003
*032436 JUMPA 0,032437
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032436 032436 0 0 324000032437 0 000000032437
IT1 032436 0 0 0 324000032437 0 000000032437
AT3 032436 0 0 0 000000032437 0 324000032437
AT6 032436 032437 0 0 000000032437 0 324000032437
FT1A 032436 032437 0 0 000000032437 0 000000032437
FT2 032436 032437 0 0 0 0 000000032437
FT2RQ 032436 032437 0 0 0 0 000000032437
FT3 032436 032437 0 0 0 0 000000032437
FT9 032437 032437 0 0 0 0 000000032437
ET0 032437 032437 0 0 0 0 000000032437
ST1A 032437 032437 0 0 0 0 000000032437
ST9 032437 032437 0 0 0 0 000000032437
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 295
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0490
*032437 MOVEI 5,777775
INITIAL
C(AC)=000005 000005
FINAL
C(AC)=000000 777775
TIME PC MA SC FE AR MQ BR
IT0 032437 032437 0 0 201240777775 0 000000777775
IT1 032437 0 0 0 201240777775 0 000000777775
AT3 032437 0 0 0 000000777775 0 201240777775
AT6 032437 777775 0 0 000000777775 0 201240777775
FT1A 032437 777775 0 0 000000777775 0 000000777775
FT9 032440 777775 0 0 000000777775 0 000000777775
ET0 032440 777775 0 0 000000777775 0 000000777775
ST1 032440 777775 0 0 000000777775 0 000000777775
ST2 032440 777775 0 0 000000777775 0 000000777775
ST9 032440 777775 0 0 000000777775 0 000000777775
*032440 MOVEI 4,000004
INITIAL
C(AC)=000000 777777
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 032440 032440 0 0 201200000004 0 000000000004
IT1 032440 0 0 0 201200000004 0 000000000004
AT3 032440 0 0 0 000000000004 0 201200000004
AT6 032440 000004 0 0 000000000004 0 201200000004
FT1A 032440 000004 0 0 000000000004 0 000000000004
FT9 032441 000004 0 0 000000000004 0 000000000004
ET0 032441 000004 0 0 000000000004 0 000000000004
ST1 032441 000004 0 0 000000000004 0 000000000004
ST2 032441 000004 0 0 000000000004 0 000000000004
ST9 032441 000004 0 0 000000000004 0 000000000004
*032441 CAIE 4,000007(5)
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032441 032441 0 0 302205000007 0 000000000004
IT1 032441 0 0 0 302205000007 0 000000000004
AT1 032441 0 0 0 0 0 302205000007
AT2 032441 0 0 0 000000777775 0 302205000007
AT3 032441 0 0 0 000000000004 0 000000000004
AT6 032441 000004 0 0 000000000004 0 000000000004
FT1A 032441 000004 0 0 000000000004 0 000000000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 296
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0491
FT2 032441 000004 0 0 0 0 000000000004
FT2RQ 032441 000004 0 0 000000000004 0 000000000004
FT3 032441 000004 0 0 000000000004 0 000000000004
FT9 032442 000004 0 0 000000000004 0 000000000004
ET0 032443 000004 0 0 0 0 000000000004
ST1A 032443 000004 0 0 0 0 000000000004
ST9 032443 000004 0 0 0 0 000000000004
*032443 JUMPA 0,032444
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032443 032443 0 0 324000032444 0 000000032444
IT1 032443 0 0 0 324000032444 0 000000032444
AT3 032443 0 0 0 000000032444 0 324000032444
AT6 032443 032444 0 0 000000032444 0 324000032444
FT1A 032443 032444 0 0 000000032444 0 000000032444
FT2 032443 032444 0 0 0 0 000000032444
FT2RQ 032443 032444 0 0 0 0 000000032444
FT3 032443 032444 0 0 0 0 000000032444
FT9 032444 032444 0 0 0 0 000000032444
ET0 032444 032444 0 0 0 0 000000032444
ST1A 032444 032444 0 0 0 0 000000032444
ST9 032444 032444 0 0 0 0 000000032444
*032444 MOVEI 6,777773
INITIAL
C(AC)=000006 000006
FINAL
C(AC)=000000 777773
TIME PC MA SC FE AR MQ BR
IT0 032444 032444 0 0 201300777773 0 000000777773
IT1 032444 0 0 0 201300777773 0 000000777773
AT3 032444 0 0 0 000000777773 0 201300777773
AT6 032444 777773 0 0 000000777773 0 201300777773
FT1A 032444 777773 0 0 000000777773 0 000000777773
FT9 032445 777773 0 0 000000777773 0 000000777773
ET0 032445 777773 0 0 000000777773 0 000000777773
ST1 032445 777773 0 0 000000777773 0 000000777773
ST2 032445 777773 0 0 000000777773 0 000000777773
ST9 032445 777773 0 0 000000777773 0 000000777773
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 297
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0492
*032445 MOVEI 5,000005
INITIAL
C(AC)=000000 777775
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 032445 032445 0 0 201240000005 0 000000000005
IT1 032445 0 0 0 201240000005 0 000000000005
AT3 032445 0 0 0 000000000005 0 201240000005
AT6 032445 000005 0 0 000000000005 0 201240000005
FT1A 032445 000005 0 0 000000000005 0 000000000005
FT9 032446 000005 0 0 000000000005 0 000000000005
ET0 032446 000005 0 0 000000000005 0 000000000005
ST1 032446 000005 0 0 000000000005 0 000000000005
ST2 032446 000005 0 0 000000000005 0 000000000005
ST9 032446 000005 0 0 000000000005 0 000000000005
*032446 CAIE 5,000012(6)
INITIAL
C(AC)=000000 000005
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032446 032446 0 0 302246000012 0 000000000005
IT1 032446 0 0 0 302246000012 0 000000000005
AT1 032446 0 0 0 0 0 302246000012
AT2 032446 0 0 0 000000777773 0 302246000012
AT3 032446 0 0 0 000000000005 0 000000000005
AT6 032446 000005 0 0 000000000005 0 000000000005
FT1A 032446 000005 0 0 000000000005 0 000000000005
FT2 032446 000005 0 0 0 0 000000000005
FT2RQ 032446 000005 0 0 000000000005 0 000000000005
FT3 032446 000005 0 0 000000000005 0 000000000005
FT9 032447 000005 0 0 000000000005 0 000000000005
ET0 032450 000005 0 0 0 0 000000000005
ST1A 032450 000005 0 0 0 0 000000000005
ST9 032450 000005 0 0 0 0 000000000005
*032450 JUMPA 0,032451
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032450 032450 0 0 324000032451 0 000000032451
IT1 032450 0 0 0 324000032451 0 000000032451
AT3 032450 0 0 0 000000032451 0 324000032451
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 298
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0493
AT6 032450 032451 0 0 000000032451 0 324000032451
FT1A 032450 032451 0 0 000000032451 0 000000032451
FT2 032450 032451 0 0 0 0 000000032451
FT2RQ 032450 032451 0 0 0 0 000000032451
FT3 032450 032451 0 0 0 0 000000032451
FT9 032451 032451 0 0 0 0 000000032451
ET0 032451 032451 0 0 0 0 000000032451
ST1A 032451 032451 0 0 0 0 000000032451
ST9 032451 032451 0 0 0 0 000000032451
*032451 MOVEI 7,777771
INITIAL
C(AC)=000007 000007
FINAL
C(AC)=000000 777771
TIME PC MA SC FE AR MQ BR
IT0 032451 032451 0 0 201340777771 0 000000777771
IT1 032451 0 0 0 201340777771 0 000000777771
AT3 032451 0 0 0 000000777771 0 201340777771
AT6 032451 777771 0 0 000000777771 0 201340777771
FT1A 032451 777771 0 0 000000777771 0 000000777771
FT9 032452 777771 0 0 000000777771 0 000000777771
ET0 032452 777771 0 0 000000777771 0 000000777771
ST1 032452 777771 0 0 000000777771 0 000000777771
ST2 032452 777771 0 0 000000777771 0 000000777771
ST9 032452 777771 0 0 000000777771 0 000000777771
*032452 MOVEI 6,000006
INITIAL
C(AC)=000000 777773
FINAL
C(AC)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 032452 032452 0 0 201300000006 0 000000000006
IT1 032452 0 0 0 201300000006 0 000000000006
AT3 032452 0 0 0 000000000006 0 201300000006
AT6 032452 000006 0 0 000000000006 0 201300000006
FT1A 032452 000006 0 0 000000000006 0 000000000006
FT9 032453 000006 0 0 000000000006 0 000000000006
ET0 032453 000006 0 0 000000000006 0 000000000006
ST1 032453 000006 0 0 000000000006 0 000000000006
ST2 032453 000006 0 0 000000000006 0 000000000006
ST9 032453 000006 0 0 000000000006 0 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 299
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0494
*032453 CAIE 6,000015(7)
INITIAL
C(AC)=000000 000006
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032453 032453 0 0 302307000015 0 000000000006
IT1 032453 0 0 0 302307000015 0 000000000006
AT1 032453 0 0 0 0 0 302307000015
AT2 032453 0 0 0 000000777771 0 302307000015
AT3 032453 0 0 0 000000000006 0 000000000006
AT6 032453 000006 0 0 000000000006 0 000000000006
FT1A 032453 000006 0 0 000000000006 0 000000000006
FT2 032453 000006 0 0 0 0 000000000006
FT2RQ 032453 000006 0 0 000000000006 0 000000000006
FT3 032453 000006 0 0 000000000006 0 000000000006
FT9 032454 000006 0 0 000000000006 0 000000000006
ET0 032455 000006 0 0 0 0 000000000006
ST1A 032455 000006 0 0 0 0 000000000006
ST9 032455 000006 0 0 0 0 000000000006
*032455 JUMPA 0,032456
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032455 032455 0 0 324000032456 0 000000032456
IT1 032455 0 0 0 324000032456 0 000000032456
AT3 032455 0 0 0 000000032456 0 324000032456
AT6 032455 032456 0 0 000000032456 0 324000032456
FT1A 032455 032456 0 0 000000032456 0 000000032456
FT2 032455 032456 0 0 0 0 000000032456
FT2RQ 032455 032456 0 0 0 0 000000032456
FT3 032455 032456 0 0 0 0 000000032456
FT9 032456 032456 0 0 0 0 000000032456
ET0 032456 032456 0 0 0 0 000000032456
ST1A 032456 032456 0 0 0 0 000000032456
ST9 032456 032456 0 0 0 0 000000032456
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 300
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0495
*032456 MOVEI 10,777767
INITIAL
C(AC)=000010 000010
FINAL
C(AC)=000000 777767
TIME PC MA SC FE AR MQ BR
IT0 032456 032456 0 0 201400777767 0 000000777767
IT1 032456 0 0 0 201400777767 0 000000777767
AT3 032456 0 0 0 000000777767 0 201400777767
AT6 032456 777767 0 0 000000777767 0 201400777767
FT1A 032456 777767 0 0 000000777767 0 000000777767
FT9 032457 777767 0 0 000000777767 0 000000777767
ET0 032457 777767 0 0 000000777767 0 000000777767
ST1 032457 777767 0 0 000000777767 0 000000777767
ST2 032457 777767 0 0 000000777767 0 000000777767
ST9 032457 777767 0 0 000000777767 0 000000777767
*032457 MOVEI 7,000007
INITIAL
C(AC)=000000 777771
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 032457 032457 0 0 201340000007 0 000000000007
IT1 032457 0 0 0 201340000007 0 000000000007
AT3 032457 0 0 0 000000000007 0 201340000007
AT6 032457 000007 0 0 000000000007 0 201340000007
FT1A 032457 000007 0 0 000000000007 0 000000000007
FT9 032460 000007 0 0 000000000007 0 000000000007
ET0 032460 000007 0 0 000000000007 0 000000000007
ST1 032460 000007 0 0 000000000007 0 000000000007
ST2 032460 000007 0 0 000000000007 0 000000000007
ST9 032460 000007 0 0 000000000007 0 000000000007
*032460 CAIE 7,000020(10)
INITIAL
C(AC)=000000 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032460 032460 0 0 302350000020 0 000000000007
IT1 032460 0 0 0 302350000020 0 000000000007
AT1 032460 0 0 0 0 0 302350000020
AT2 032460 0 0 0 000000777767 0 302350000020
AT3 032460 0 0 0 000000000007 0 000000000007
AT6 032460 000007 0 0 000000000007 0 000000000007
FT1A 032460 000007 0 0 000000000007 0 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 301
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0496
FT2 032460 000007 0 0 0 0 000000000007
FT2RQ 032460 000007 0 0 000000000007 0 000000000007
FT3 032460 000007 0 0 000000000007 0 000000000007
FT9 032461 000007 0 0 000000000007 0 000000000007
ET0 032462 000007 0 0 0 0 000000000007
ST1A 032462 000007 0 0 0 0 000000000007
ST9 032462 000007 0 0 0 0 000000000007
*032462 JUMPA 0,032463
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032462 032462 0 0 324000032463 0 000000032463
IT1 032462 0 0 0 324000032463 0 000000032463
AT3 032462 0 0 0 000000032463 0 324000032463
AT6 032462 032463 0 0 000000032463 0 324000032463
FT1A 032462 032463 0 0 000000032463 0 000000032463
FT2 032462 032463 0 0 0 0 000000032463
FT2RQ 032462 032463 0 0 0 0 000000032463
FT3 032462 032463 0 0 0 0 000000032463
FT9 032463 032463 0 0 0 0 000000032463
ET0 032463 032463 0 0 0 0 000000032463
ST1A 032463 032463 0 0 0 0 000000032463
ST9 032463 032463 0 0 0 0 000000032463
*032463 MOVEI 11,777765
INITIAL
C(AC)=000011 000011
FINAL
C(AC)=000000 777765
TIME PC MA SC FE AR MQ BR
IT0 032463 032463 0 0 201440777765 0 000000777765
IT1 032463 0 0 0 201440777765 0 000000777765
AT3 032463 0 0 0 000000777765 0 201440777765
AT6 032463 777765 0 0 000000777765 0 201440777765
FT1A 032463 777765 0 0 000000777765 0 000000777765
FT9 032464 777765 0 0 000000777765 0 000000777765
ET0 032464 777765 0 0 000000777765 0 000000777765
ST1 032464 777765 0 0 000000777765 0 000000777765
ST2 032464 777765 0 0 000000777765 0 000000777765
ST9 032464 777765 0 0 000000777765 0 000000777765
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 302
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0497
*032464 MOVEI 10,000010
INITIAL
C(AC)=000000 777767
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 032464 032464 0 0 201400000010 0 000000000010
IT1 032464 0 0 0 201400000010 0 000000000010
AT3 032464 0 0 0 000000000010 0 201400000010
AT6 032464 000010 0 0 000000000010 0 201400000010
FT1A 032464 000010 0 0 000000000010 0 000000000010
FT9 032465 000010 0 0 000000000010 0 000000000010
ET0 032465 000010 0 0 000000000010 0 000000000010
ST1 032465 000010 0 0 000000000010 0 000000000010
ST2 032465 000010 0 0 000000000010 0 000000000010
ST9 032465 000010 0 0 000000000010 0 000000000010
*032465 CAIE 10,000023(11)
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032465 032465 0 0 302411000023 0 000000000010
IT1 032465 0 0 0 302411000023 0 000000000010
AT1 032465 0 0 0 0 0 302411000023
AT2 032465 0 0 0 000000777765 0 302411000023
AT3 032465 0 0 0 000000000010 0 000000000010
AT6 032465 000010 0 0 000000000010 0 000000000010
FT1A 032465 000010 0 0 000000000010 0 000000000010
FT2 032465 000010 0 0 0 0 000000000010
FT2RQ 032465 000010 0 0 000000000010 0 000000000010
FT3 032465 000010 0 0 000000000010 0 000000000010
FT9 032466 000010 0 0 000000000010 0 000000000010
ET0 032467 000010 0 0 0 0 000000000010
ST1A 032467 000010 0 0 0 0 000000000010
ST9 032467 000010 0 0 0 0 000000000010
*032467 JUMPA 0,032470
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032467 032467 0 0 324000032470 0 000000032470
IT1 032467 0 0 0 324000032470 0 000000032470
AT3 032467 0 0 0 000000032470 0 324000032470
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 303
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0498
AT6 032467 032470 0 0 000000032470 0 324000032470
FT1A 032467 032470 0 0 000000032470 0 000000032470
FT2 032467 032470 0 0 0 0 000000032470
FT2RQ 032467 032470 0 0 0 0 000000032470
FT3 032467 032470 0 0 0 0 000000032470
FT9 032470 032470 0 0 0 0 000000032470
ET0 032470 032470 0 0 0 0 000000032470
ST1A 032470 032470 0 0 0 0 000000032470
ST9 032470 032470 0 0 0 0 000000032470
*032470 MOVEI 12,777763
INITIAL
C(AC)=000012 000012
FINAL
C(AC)=000000 777763
TIME PC MA SC FE AR MQ BR
IT0 032470 032470 0 0 201500777763 0 000000777763
IT1 032470 0 0 0 201500777763 0 000000777763
AT3 032470 0 0 0 000000777763 0 201500777763
AT6 032470 777763 0 0 000000777763 0 201500777763
FT1A 032470 777763 0 0 000000777763 0 000000777763
FT9 032471 777763 0 0 000000777763 0 000000777763
ET0 032471 777763 0 0 000000777763 0 000000777763
ST1 032471 777763 0 0 000000777763 0 000000777763
ST2 032471 777763 0 0 000000777763 0 000000777763
ST9 032471 777763 0 0 000000777763 0 000000777763
*032471 MOVEI 11,000011
INITIAL
C(AC)=000000 777765
FINAL
C(AC)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 032471 032471 0 0 201440000011 0 000000000011
IT1 032471 0 0 0 201440000011 0 000000000011
AT3 032471 0 0 0 000000000011 0 201440000011
AT6 032471 000011 0 0 000000000011 0 201440000011
FT1A 032471 000011 0 0 000000000011 0 000000000011
FT9 032472 000011 0 0 000000000011 0 000000000011
ET0 032472 000011 0 0 000000000011 0 000000000011
ST1 032472 000011 0 0 000000000011 0 000000000011
ST2 032472 000011 0 0 000000000011 0 000000000011
ST9 032472 000011 0 0 000000000011 0 000000000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 304
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0499
*032472 CAIE 11,000026(12)
INITIAL
C(AC)=000000 000011
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032472 032472 0 0 302452000026 0 000000000011
IT1 032472 0 0 0 302452000026 0 000000000011
AT1 032472 0 0 0 0 0 302452000026
AT2 032472 0 0 0 000000777763 0 302452000026
AT3 032472 0 0 0 000000000011 0 000000000011
AT6 032472 000011 0 0 000000000011 0 000000000011
FT1A 032472 000011 0 0 000000000011 0 000000000011
FT2 032472 000011 0 0 0 0 000000000011
FT2RQ 032472 000011 0 0 000000000011 0 000000000011
FT3 032472 000011 0 0 000000000011 0 000000000011
FT9 032473 000011 0 0 000000000011 0 000000000011
ET0 032474 000011 0 0 0 0 000000000011
ST1A 032474 000011 0 0 0 0 000000000011
ST9 032474 000011 0 0 0 0 000000000011
*032474 JUMPA 0,032475
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032474 032474 0 0 324000032475 0 000000032475
IT1 032474 0 0 0 324000032475 0 000000032475
AT3 032474 0 0 0 000000032475 0 324000032475
AT6 032474 032475 0 0 000000032475 0 324000032475
FT1A 032474 032475 0 0 000000032475 0 000000032475
FT2 032474 032475 0 0 0 0 000000032475
FT2RQ 032474 032475 0 0 0 0 000000032475
FT3 032474 032475 0 0 0 0 000000032475
FT9 032475 032475 0 0 0 0 000000032475
ET0 032475 032475 0 0 0 0 000000032475
ST1A 032475 032475 0 0 0 0 000000032475
ST9 032475 032475 0 0 0 0 000000032475
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 305
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0500
*032475 MOVEI 13,777761
INITIAL
C(AC)=000013 000013
FINAL
C(AC)=000000 777761
TIME PC MA SC FE AR MQ BR
IT0 032475 032475 0 0 201540777761 0 000000777761
IT1 032475 0 0 0 201540777761 0 000000777761
AT3 032475 0 0 0 000000777761 0 201540777761
AT6 032475 777761 0 0 000000777761 0 201540777761
FT1A 032475 777761 0 0 000000777761 0 000000777761
FT9 032476 777761 0 0 000000777761 0 000000777761
ET0 032476 777761 0 0 000000777761 0 000000777761
ST1 032476 777761 0 0 000000777761 0 000000777761
ST2 032476 777761 0 0 000000777761 0 000000777761
ST9 032476 777761 0 0 000000777761 0 000000777761
*032476 MOVEI 12,000012
INITIAL
C(AC)=000000 777763
FINAL
C(AC)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 032476 032476 0 0 201500000012 0 000000000012
IT1 032476 0 0 0 201500000012 0 000000000012
AT3 032476 0 0 0 000000000012 0 201500000012
AT6 032476 000012 0 0 000000000012 0 201500000012
FT1A 032476 000012 0 0 000000000012 0 000000000012
FT9 032477 000012 0 0 000000000012 0 000000000012
ET0 032477 000012 0 0 000000000012 0 000000000012
ST1 032477 000012 0 0 000000000012 0 000000000012
ST2 032477 000012 0 0 000000000012 0 000000000012
ST9 032477 000012 0 0 000000000012 0 000000000012
*032477 CAIE 12,000031(13)
INITIAL
C(AC)=000000 000012
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032477 032477 0 0 302513000031 0 000000000012
IT1 032477 0 0 0 302513000031 0 000000000012
AT1 032477 0 0 0 0 0 302513000031
AT2 032477 0 0 0 000000777761 0 302513000031
AT3 032477 0 0 0 000000000012 0 000000000012
AT6 032477 000012 0 0 000000000012 0 000000000012
FT1A 032477 000012 0 0 000000000012 0 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 306
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0501
FT2 032477 000012 0 0 0 0 000000000012
FT2RQ 032477 000012 0 0 000000000012 0 000000000012
FT3 032477 000012 0 0 000000000012 0 000000000012
FT9 0 000012 0 0 000000000012 0 000000000012
ET0 032501 000012 0 0 0 0 000000000012
ST1A 032501 000012 0 0 0 0 000000000012
ST9 032501 000012 0 0 0 0 000000000012
*032501 JUMPA 0,032502
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032501 032501 0 0 324000032502 0 000000032502
IT1 032501 0 0 0 324000032502 0 000000032502
AT3 032501 0 0 0 000000032502 0 324000032502
AT6 032501 032502 0 0 000000032502 0 324000032502
FT1A 032501 032502 0 0 000000032502 0 000000032502
FT2 032501 032502 0 0 0 0 000000032502
FT2RQ 032501 032502 0 0 0 0 000000032502
FT3 032501 032502 0 0 0 0 000000032502
FT9 032502 032502 0 0 0 0 000000032502
ET0 032502 032502 0 0 0 0 000000032502
ST1A 032502 032502 0 0 0 0 000000032502
ST9 032502 032502 0 0 0 0 000000032502
*032502 MOVEI 14,777757
INITIAL
C(AC)=000014 000014
FINAL
C(AC)=000000 777757
TIME PC MA SC FE AR MQ BR
IT0 032502 032502 0 0 201600777757 0 000000777757
IT1 032502 0 0 0 201600777757 0 000000777757
AT3 032502 0 0 0 000000777757 0 201600777757
AT6 032502 777757 0 0 000000777757 0 201600777757
FT1A 032502 777757 0 0 000000777757 0 000000777757
FT9 032503 777757 0 0 000000777757 0 000000777757
ET0 032503 777757 0 0 000000777757 0 000000777757
ST1 032503 777757 0 0 000000777757 0 000000777757
ST2 032503 777757 0 0 000000777757 0 000000777757
ST9 032503 777757 0 0 000000777757 0 000000777757
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 307
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0502
*032503 MOVEI 13,000013
INITIAL
C(AC)=000000 777761
FINAL
C(AC)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 032503 032503 0 0 201540000013 0 000000000013
IT1 032503 0 0 0 201540000013 0 000000000013
AT3 032503 0 0 0 000000000013 0 201540000013
AT6 032503 000013 0 0 000000000013 0 201540000013
FT1A 032503 000013 0 0 000000000013 0 000000000013
FT9 032504 000013 0 0 000000000013 0 000000000013
ET0 032504 000013 0 0 000000000013 0 000000000013
ST1 032504 000013 0 0 000000000013 0 000000000013
ST2 032504 000013 0 0 000000000013 0 000000000013
ST9 032504 000013 0 0 000000000013 0 000000000013
*032504 CAIE 13,000034(14)
INITIAL
C(AC)=000000 000013
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032504 032504 0 0 302554000034 0 000000000013
IT1 032504 0 0 0 302554000034 0 000000000013
AT1 032504 0 0 0 0 0 302554000034
AT2 032504 0 0 0 000000777757 0 302554000034
AT3 032504 0 0 0 000000000013 0 000000000013
AT6 032504 000013 0 0 000000000013 0 000000000013
FT1A 032504 000013 0 0 000000000013 0 000000000013
FT2 032504 000013 0 0 0 0 000000000013
FT2RQ 032504 000013 0 0 000000000013 0 000000000013
FT3 032504 000013 0 0 000000000013 0 000000000013
FT9 032505 000013 0 0 000000000013 0 000000000013
ET0 032506 000013 0 0 0 0 000000000013
ST1A 032506 000013 0 0 0 0 000000000013
ST9 032506 000013 0 0 0 0 000000000013
*032506 JUMPA 0,032507
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032506 032506 0 0 324000032507 0 000000032507
IT1 032506 0 0 0 324000032507 0 000000032507
AT3 032506 0 0 0 000000032507 0 324000032507
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 308
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0503
AT6 032506 032507 0 0 000000032507 0 324000032507
FT1A 032506 032507 0 0 000000032507 0 000000032507
FT2 032506 032507 0 0 0 0 000000032507
FT2RQ 032506 032507 0 0 0 0 000000032507
FT3 032506 032507 0 0 0 0 000000032507
FT9 032507 032507 0 0 0 0 000000032507
ET0 032507 032507 0 0 0 0 000000032507
ST1A 032507 032507 0 0 0 0 000000032507
ST9 032507 032507 0 0 0 0 000000032507
*032507 MOVEI 15,777755
INITIAL
C(AC)=000015 000015
FINAL
C(AC)=000000 777755
TIME PC MA SC FE AR MQ BR
IT0 032507 032507 0 0 201640777755 0 000000777755
IT1 032507 0 0 0 201640777755 0 000000777755
AT3 032507 0 0 0 000000777755 0 201640777755
AT6 032507 777755 0 0 000000777755 0 201640777755
FT1A 032507 777755 0 0 000000777755 0 000000777755
FT9 032510 777755 0 0 000000777755 0 000000777755
ET0 032510 777755 0 0 000000777755 0 000000777755
ST1 032510 777755 0 0 000000777755 0 000000777755
ST2 032510 777755 0 0 000000777755 0 000000777755
ST9 032510 777755 0 0 000000777755 0 000000777755
*032510 MOVEI 14,000014
INITIAL
C(AC)=000000 777757
FINAL
C(AC)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 032510 032510 0 0 201600000014 0 000000000014
IT1 032510 0 0 0 201600000014 0 000000000014
AT3 032510 0 0 0 000000000014 0 201600000014
AT6 032510 000014 0 0 000000000014 0 201600000014
FT1A 032510 000014 0 0 000000000014 0 000000000014
FT9 032511 000014 0 0 000000000014 0 000000000014
ET0 032511 000014 0 0 000000000014 0 000000000014
ST1 032511 000014 0 0 000000000014 0 000000000014
ST2 032511 000014 0 0 000000000014 0 000000000014
ST9 032511 000014 0 0 000000000014 0 000000000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 309
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0504
*032511 CAIE 14,000037(15)
INITIAL
C(AC)=000000 000014
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032511 032511 0 0 302615000037 0 000000000014
IT1 032511 0 0 0 302615000037 0 000000000014
AT1 032511 0 0 0 0 0 302615000037
AT2 032511 0 0 0 000000777755 0 302615000037
AT3 032511 0 0 0 000000000014 0 000000000014
AT6 032511 000014 0 0 000000000014 0 000000000014
FT1A 032511 000014 0 0 000000000014 0 000000000014
FT2 032511 000014 0 0 0 0 000000000014
FT2RQ 032511 000014 0 0 000000000014 0 000000000014
FT3 032511 000014 0 0 000000000014 0 000000000014
FT9 032512 000014 0 0 000000000014 0 000000000014
ET0 032513 000014 0 0 0 0 000000000014
ST1A 032513 000014 0 0 0 0 000000000014
ST9 032513 000014 0 0 0 0 000000000014
*032513 JUMPA 0,032514
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032513 032513 0 0 324000032514 0 000000032514
IT1 032513 0 0 0 324000032514 0 000000032514
AT3 032513 0 0 0 000000032514 0 324000032514
AT6 032513 032514 0 0 000000032514 0 324000032514
FT1A 032513 032514 0 0 000000032514 0 000000032514
FT2 032513 032514 0 0 0 0 000000032514
FT2RQ 032513 032514 0 0 0 0 000000032514
FT3 032513 032514 0 0 0 0 000000032514
FT9 032514 032514 0 0 0 0 000000032514
ET0 032514 032514 0 0 0 0 000000032514
ST1A 032514 032514 0 0 0 0 000000032514
ST9 032514 032514 0 0 0 0 000000032514
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 310
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0505
*032514 MOVEI 16,777753
INITIAL
C(AC)=000016 000016
FINAL
C(AC)=000000 777753
TIME PC MA SC FE AR MQ BR
IT0 032514 032514 0 0 201700777753 0 000000777753
IT1 032514 0 0 0 201700777753 0 000000777753
AT3 032514 0 0 0 000000777753 0 201700777753
AT6 032514 777753 0 0 000000777753 0 201700777753
FT1A 032514 777753 0 0 000000777753 0 000000777753
FT9 032515 777753 0 0 000000777753 0 000000777753
ET0 032515 777753 0 0 000000777753 0 000000777753
ST1 032515 777753 0 0 000000777753 0 000000777753
ST2 032515 777753 0 0 000000777753 0 000000777753
ST9 032515 777753 0 0 000000777753 0 000000777753
*032515 MOVEI 15,000015
INITIAL
C(AC)=000000 777755
FINAL
C(AC)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 032515 032515 0 0 201640000015 0 000000000015
IT1 032515 0 0 0 201640000015 0 000000000015
AT3 032515 0 0 0 000000000015 0 201640000015
AT6 032515 000015 0 0 000000000015 0 201640000015
FT1A 032515 000015 0 0 000000000015 0 000000000015
FT9 032516 000015 0 0 000000000015 0 000000000015
ET0 032516 000015 0 0 000000000015 0 000000000015
ST1 032516 000015 0 0 000000000015 0 000000000015
ST2 032516 000015 0 0 000000000015 0 000000000015
ST9 032516 000015 0 0 000000000015 0 000000000015
*032516 CAIE 15,000042(16)
INITIAL
C(AC)=000000 000015
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032516 032516 0 0 302656000042 0 000000000015
IT1 032516 0 0 0 302656000042 0 000000000015
AT1 032516 0 0 0 0 0 302656000042
AT2 032516 0 0 0 000000777753 0 302656000042
AT3 032516 0 0 0 000000000015 0 000000000015
AT6 032516 000015 0 0 000000000015 0 000000000015
FT1A 032516 000015 0 0 000000000015 0 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 311
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0506
FT2 032516 000015 0 0 0 0 000000000015
FT2RQ 032516 000015 0 0 000000000015 0 000000000015
FT3 032516 000015 0 0 000000000015 0 000000000015
FT9 032517 000015 0 0 000000000015 0 000000000015
ET0 032520 000015 0 0 0 0 000000000015
ST1A 032520 000015 0 0 0 0 000000000015
ST9 032520 000015 0 0 0 0 000000000015
*032520 JUMPA 0,032521
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032520 032520 0 0 324000032521 0 000000032521
IT1 032520 0 0 0 324000032521 0 000000032521
AT3 032520 0 0 0 000000032521 0 324000032521
AT6 032520 032521 0 0 000000032521 0 324000032521
FT1A 032520 032521 0 0 000000032521 0 000000032521
FT2 032520 032521 0 0 0 0 000000032521
FT2RQ 032520 032521 0 0 0 0 000000032521
FT3 032520 032521 0 0 0 0 000000032521
FT9 032521 032521 0 0 0 0 000000032521
ET0 032521 032521 0 0 0 0 000000032521
ST1A 032521 032521 0 0 0 0 000000032521
ST9 032521 032521 0 0 0 0 000000032521
*032521 MOVEI 17,777751
INITIAL
C(AC)=000017 000017
FINAL
C(AC)=000000 777751
TIME PC MA SC FE AR MQ BR
IT0 032521 032521 0 0 201740777751 0 000000777751
IT1 032521 0 0 0 201740777751 0 000000777751
AT3 032521 0 0 0 000000777751 0 201740777751
AT6 032521 777751 0 0 000000777751 0 201740777751
FT1A 032521 777751 0 0 000000777751 0 000000777751
FT9 032522 777751 0 0 000000777751 0 000000777751
ET0 032522 777751 0 0 000000777751 0 000000777751
ST1 032522 777751 0 0 000000777751 0 000000777751
ST2 032522 777751 0 0 000000777751 0 000000777751
ST9 032522 777751 0 0 000000777751 0 000000777751
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 312
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0507
*032522 MOVEI 16,000016
INITIAL
C(AC)=000000 777753
FINAL
C(AC)=000000 000016
TIME PC MA SC FE AR MQ BR
IT0 032522 032522 0 0 201700000016 0 000000000016
IT1 032522 0 0 0 201700000016 0 000000000016
AT3 032522 0 0 0 000000000016 0 201700000016
AT6 032522 000016 0 0 000000000016 0 201700000016
FT1A 032522 000016 0 0 000000000016 0 000000000016
FT9 032523 000016 0 0 000000000016 0 000000000016
ET0 032523 000016 0 0 000000000016 0 000000000016
ST1 032523 000016 0 0 000000000016 0 000000000016
ST2 032523 000016 0 0 000000000016 0 000000000016
ST9 032523 000016 0 0 000000000016 0 000000000016
*032523 CAIE 16,000045(17)
INITIAL
C(AC)=000000 000016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032523 032523 0 0 302717000045 0 000000000016
IT1 032523 0 0 0 302717000045 0 000000000016
AT1 032523 0 0 0 0 0 302717000045
AT2 032523 0 0 0 000000777751 0 302717000045
AT3 032523 0 0 0 000000000016 0 000000000016
AT6 032523 000016 0 0 000000000016 0 000000000016
FT1A 032523 000016 0 0 000000000016 0 000000000016
FT2 032523 000016 0 0 0 0 000000000016
FT2RQ 032523 000016 0 0 000000000016 0 000000000016
FT3 032523 000016 0 0 000000000016 0 000000000016
FT9 032524 000016 0 0 000000000016 0 000000000016
ET0 032525 000016 0 0 0 0 000000000016
ST1A 032525 000016 0 0 0 0 000000000016
ST9 032525 000016 0 0 0 0 000000000016
*032525 JUMPA 0,032526
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032525 032525 0 0 324000032526 0 000000032526
IT1 032525 0 0 0 324000032526 0 000000032526
AT3 032525 0 0 0 000000032526 0 324000032526
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 313
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0508
AT6 032525 032526 0 0 000000032526 0 324000032526
FT1A 032525 032526 0 0 000000032526 0 000000032526
FT2 032525 032526 0 0 0 0 000000032526
FT2RQ 032525 032526 0 0 0 0 000000032526
FT3 032525 032526 0 0 0 0 000000032526
FT9 032526 032526 0 0 0 0 000000032526
ET0 032526 032526 0 0 0 0 000000032526
ST1A 032526 032526 0 0 0 0 000000032526
ST9 032526 032526 0 0 0 0 000000032526
*032526 MOVEI 1,000013
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 032526 032526 0 0 201040000013 0 000000000013
IT1 032526 0 0 0 201040000013 0 000000000013
AT3 032526 0 0 0 000000000013 0 201040000013
AT6 032526 000013 0 0 000000000013 0 201040000013
FT1A 032526 000013 0 0 000000000013 0 000000000013
FT9 032527 000013 0 0 000000000013 0 000000000013
ET0 032527 000013 0 0 000000000013 0 000000000013
ST1 032527 000013 0 0 000000000013 0 000000000013
ST2 032527 000013 0 0 000000000013 0 000000000013
ST9 032527 000013 0 0 000000000013 0 000000000013
*032527 MOVEI 0,777765(1)
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032527 032527 0 0 201001777765 0 0
IT1 032527 0 0 0 201001777765 0 0
AT1 032527 0 0 0 0 0 201001777765
AT2 032527 0 0 0 000000000013 0 201001777765
AT3 032527 0 0 0 0 0 0
AT6 032527 0 0 0 0 0 0
FT1A 032527 0 0 0 0 0 0
FT9 032530 0 0 0 0 0 0
ET0 032530 0 0 0 0 0 0
ST1 032530 0 0 0 0 0 0
ST2 032530 0 0 0 0 0 0
ST9 032530 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 314
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0509
*032530 CAIE 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032530 032530 0 0 302000000000 0 0
IT1 032530 0 0 0 302000000000 0 0
AT3 032530 0 0 0 0 0 302000000000
AT6 032530 0 0 0 0 0 302000000000
FT1A 032530 0 0 0 0 0 0
FT2 032530 0 0 0 0 0 0
FT2RQ 032530 0 0 0 0 0 0
FT3 032530 0 0 0 0 0 0
FT9 032531 0 0 0 0 0 0
ET0 032532 0 0 0 0 0 0
ST1A 032532 0 0 0 0 0 0
ST9 032532 0 0 0 0 0 0
*032532 JUMPA 0,032533
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032532 032532 0 0 324000032533 0 000000032533
IT1 032532 0 0 0 324000032533 0 000000032533
AT3 032532 0 0 0 000000032533 0 324000032533
AT6 032532 032533 0 0 000000032533 0 324000032533
FT1A 032532 032533 0 0 000000032533 0 000000032533
FT2 032532 032533 0 0 0 0 000000032533
FT2RQ 032532 032533 0 0 0 0 000000032533
FT3 032532 032533 0 0 0 0 000000032533
FT9 032533 032533 0 0 0 0 000000032533
ET0 032533 032533 0 0 0 0 000000032533
ST1A 032533 032533 0 0 0 0 000000032533
ST9 032533 032533 0 0 0 0 000000032533
*032533 MOVEI 2,000007
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 032533 032533 0 0 201100000007 0 000000000007
IT1 032533 0 0 0 201100000007 0 000000000007
AT3 032533 0 0 0 000000000007 0 201100000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 315
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0510
AT6 032533 000007 0 0 000000000007 0 201100000007
FT1A 032533 000007 0 0 000000000007 0 000000000007
FT9 032534 000007 0 0 000000000007 0 000000000007
ET0 032534 000007 0 0 000000000007 0 000000000007
ST1 032534 000007 0 0 000000000007 0 000000000007
ST2 032534 000007 0 0 000000000007 0 000000000007
ST9 032534 000007 0 0 000000000007 0 000000000007
*032534 MOVEI 1,777772(2)
INITIAL
C(AC)=000000 000013
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032534 032534 0 0 201042777772 0 000000000001
IT1 032534 0 0 0 201042777772 0 000000000001
AT1 032534 0 0 0 0 0 201042777772
AT2 032534 0 0 0 000000000007 0 201042777772
AT3 032534 0 0 0 000000000001 0 000000000001
AT6 032534 000001 0 0 000000000001 0 000000000001
FT1A 032534 000001 0 0 000000000001 0 000000000001
FT9 032535 000001 0 0 000000000001 0 000000000001
ET0 032535 000001 0 0 000000000001 0 000000000001
ST1 032535 000001 0 0 000000000001 0 000000000001
ST2 032535 000001 0 0 000000000001 0 000000000001
ST9 032535 000001 0 0 000000000001 0 000000000001
*032535 CAIE 1,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032535 032535 0 0 302040000001 0 000000000001
IT1 032535 0 0 0 302040000001 0 000000000001
AT3 032535 0 0 0 000000000001 0 302040000001
AT6 032535 000001 0 0 000000000001 0 302040000001
FT1A 032535 000001 0 0 000000000001 0 000000000001
FT2 032535 000001 0 0 0 0 000000000001
FT2RQ 032535 000001 0 0 000000000001 0 000000000001
FT3 032535 000001 0 0 000000000001 0 000000000001
FT9 032536 000001 0 0 000000000001 0 000000000001
ET0 032537 000001 0 0 0 0 000000000001
ST1A 032537 000001 0 0 0 0 000000000001
ST9 032537 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 316
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0511
*032537 JUMPA 0,032540
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032537 032537 0 0 324000032540 0 000000032540
IT1 032537 0 0 0 324000032540 0 000000032540
AT3 032537 0 0 0 000000032540 0 324000032540
AT6 032537 032540 0 0 000000032540 0 324000032540
FT1A 032537 032540 0 0 000000032540 0 000000032540
FT2 032537 032540 0 0 0 0 000000032540
FT2RQ 032537 032540 0 0 0 0 000000032540
FT3 032537 032540 0 0 0 0 000000032540
FT9 032540 032540 0 0 0 0 000000032540
ET0 032540 032540 0 0 0 0 000000032540
ST1A 032540 032540 0 0 0 0 000000032540
ST9 032540 032540 0 0 0 0 000000032540
*032540 MOVEI 3,000003
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 032540 032540 0 0 201140000003 0 000000000003
IT1 032540 0 0 0 201140000003 0 000000000003
AT3 032540 0 0 0 000000000003 0 201140000003
AT6 032540 000003 0 0 000000000003 0 201140000003
FT1A 032540 000003 0 0 000000000003 0 000000000003
FT9 032541 000003 0 0 000000000003 0 000000000003
ET0 032541 000003 0 0 000000000003 0 000000000003
ST1 032541 000003 0 0 000000000003 0 000000000003
ST2 032541 000003 0 0 000000000003 0 000000000003
ST9 032541 000003 0 0 000000000003 0 000000000003
*032541 MOVEI 2,777777(3)
INITIAL
C(AC)=000000 000007
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 032541 032541 0 0 201103777777 0 000000000002
IT1 032541 0 0 0 201103777777 0 000000000002
AT1 032541 0 0 0 0 0 201103777777
AT2 032541 0 0 0 000000000003 0 201103777777
AT3 032541 0 0 0 000000000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 317
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0512
AT6 032541 000002 0 0 000000000002 0 000000000002
FT1A 032541 000002 0 0 000000000002 0 000000000002
FT9 032542 000002 0 0 000000000002 0 000000000002
ET0 032542 000002 0 0 000000000002 0 000000000002
ST1 032542 000002 0 0 000000000002 0 000000000002
ST2 032542 000002 0 0 000000000002 0 000000000002
ST9 032542 000002 0 0 000000000002 0 000000000002
*032542 CAIE 2,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032542 032542 0 0 302100000002 0 000000000002
IT1 032542 0 0 0 302100000002 0 000000000002
AT3 032542 0 0 0 000000000002 0 302100000002
AT6 032542 000002 0 0 000000000002 0 302100000002
FT1A 032542 000002 0 0 000000000002 0 000000000002
FT2 032542 000002 0 0 0 0 000000000002
FT2RQ 032542 000002 0 0 000000000002 0 000000000002
FT3 032542 000002 0 0 000000000002 0 000000000002
FT9 032543 000002 0 0 000000000002 0 000000000002
ET0 032544 000002 0 0 0 0 000000000002
ST1A 032544 000002 0 0 0 0 000000000002
ST9 032544 000002 0 0 0 0 000000000002
*032544 JUMPA 0,032545
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032544 032544 0 0 324000032545 0 000000032545
IT1 032544 0 0 0 324000032545 0 000000032545
AT3 032544 0 0 0 000000032545 0 324000032545
AT6 032544 032545 0 0 000000032545 0 324000032545
FT1A 032544 032545 0 0 000000032545 0 000000032545
FT2 032544 032545 0 0 0 0 000000032545
FT2RQ 032544 032545 0 0 0 0 000000032545
FT3 032544 032545 0 0 0 0 000000032545
FT9 032545 032545 0 0 0 0 000000032545
ET0 032545 032545 0 0 0 0 000000032545
ST1A 032545 032545 0 0 0 0 000000032545
ST9 032545 032545 0 0 0 0 000000032545
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 318
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0513
*032545 MOVEI 4,777777
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 032545 032545 0 0 201200777777 0 000000777777
IT1 032545 0 0 0 201200777777 0 000000777777
AT3 032545 0 0 0 000000777777 0 201200777777
AT6 032545 777777 0 0 000000777777 0 201200777777
FT1A 032545 777777 0 0 000000777777 0 000000777777
FT9 032546 777777 0 0 000000777777 0 000000777777
ET0 032546 777777 0 0 000000777777 0 000000777777
ST1 032546 777777 0 0 000000777777 0 000000777777
ST2 032546 777777 0 0 000000777777 0 000000777777
ST9 032546 777777 0 0 000000777777 0 000000777777
*032546 MOVEI 3,000004(4)
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 032546 032546 0 0 201144000004 0 000000000003
IT1 032546 0 0 0 201144000004 0 000000000003
AT1 032546 0 0 0 0 0 201144000004
AT2 032546 0 0 0 000000777777 0 201144000004
AT3 032546 0 0 0 000000000003 0 000000000003
AT6 032546 000003 0 0 000000000003 0 000000000003
FT1A 032546 000003 0 0 000000000003 0 000000000003
FT9 032547 000003 0 0 000000000003 0 000000000003
ET0 032547 000003 0 0 000000000003 0 000000000003
ST1 032547 000003 0 0 000000000003 0 000000000003
ST2 032547 000003 0 0 000000000003 0 000000000003
ST9 032547 000003 0 0 000000000003 0 000000000003
*032547 CAIE 3,000003
INITIAL
C(AC)=000000 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032547 032547 0 0 302140000003 0 000000000003
IT1 032547 0 0 0 302140000003 0 000000000003
AT3 032547 0 0 0 000000000003 0 302140000003
AT6 032547 000003 0 0 000000000003 0 302140000003
FT1A 032547 000003 0 0 000000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 319
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0514
FT2 032547 000003 0 0 0 0 000000000003
FT2RQ 032547 000003 0 0 000000000003 0 000000000003
FT3 032547 000003 0 0 000000000003 0 000000000003
FT9 032550 000003 0 0 000000000003 0 000000000003
ET0 032551 000003 0 0 0 0 000000000003
ST1A 032551 000003 0 0 0 0 000000000003
ST9 032551 000003 0 0 0 0 000000000003
*032551 JUMPA 0,032552
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032551 032551 0 0 324000032552 0 000000032552
IT1 032551 0 0 0 324000032552 0 000000032552
AT3 032551 0 0 0 000000032552 0 324000032552
AT6 032551 032552 0 0 000000032552 0 324000032552
FT1A 032551 032552 0 0 000000032552 0 000000032552
FT2 032551 032552 0 0 0 0 000000032552
FT2RQ 032551 032552 0 0 0 0 000000032552
FT3 032551 032552 0 0 0 0 000000032552
FT9 032552 032552 0 0 0 0 000000032552
ET0 032552 032552 0 0 0 0 000000032552
ST1A 032552 032552 0 0 0 0 000000032552
ST9 032552 032552 0 0 0 0 000000032552
*032552 MOVEI 5,777773
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000000 777773
TIME PC MA SC FE AR MQ BR
IT0 032552 032552 0 0 201240777773 0 000000777773
IT1 032552 0 0 0 201240777773 0 000000777773
AT3 032552 0 0 0 000000777773 0 201240777773
AT6 032552 777773 0 0 000000777773 0 201240777773
FT1A 032552 777773 0 0 000000777773 0 000000777773
FT9 032553 777773 0 0 000000777773 0 000000777773
ET0 032553 777773 0 0 000000777773 0 000000777773
ST1 032553 777773 0 0 000000777773 0 000000777773
ST2 032553 777773 0 0 000000777773 0 000000777773
ST9 032553 777773 0 0 000000777773 0 000000777773
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 320
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0515
*032553 MOVEI 4,000011(5)
INITIAL
C(AC)=000000 777777
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 032553 032553 0 0 201205000011 0 000000000004
IT1 032553 0 0 0 201205000011 0 000000000004
AT1 032553 0 0 0 0 0 201205000011
AT2 032553 0 0 0 000000777773 0 201205000011
AT3 032553 0 0 0 000000000004 0 000000000004
AT6 032553 000004 0 0 000000000004 0 000000000004
FT1A 032553 000004 0 0 000000000004 0 000000000004
FT9 032554 000004 0 0 000000000004 0 000000000004
ET0 032554 000004 0 0 000000000004 0 000000000004
ST1 032554 000004 0 0 000000000004 0 000000000004
ST2 032554 000004 0 0 000000000004 0 000000000004
ST9 032554 000004 0 0 000000000004 0 000000000004
*032554 CAIE 4,000004
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032554 032554 0 0 302200000004 0 000000000004
IT1 032554 0 0 0 302200000004 0 000000000004
AT3 032554 0 0 0 000000000004 0 302200000004
AT6 032554 000004 0 0 000000000004 0 302200000004
FT1A 032554 000004 0 0 000000000004 0 000000000004
FT2 032554 000004 0 0 0 0 000000000004
FT2RQ 032554 000004 0 0 000000000004 0 000000000004
FT3 032554 000004 0 0 000000000004 0 000000000004
FT9 032555 000004 0 0 000000000004 0 000000000004
ET0 032556 000004 0 0 0 0 000000000004
ST1A 032556 000004 0 0 0 0 000000000004
ST9 032556 000004 0 0 0 0 000000000004
*032556 JUMPA 0,032557
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032556 032556 0 0 324000032557 0 000000032557
IT1 032556 0 0 0 324000032557 0 000000032557
AT3 032556 0 0 0 000000032557 0 324000032557
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 321
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0516
AT6 032556 032557 0 0 000000032557 0 324000032557
FT1A 032556 032557 0 0 000000032557 0 000000032557
FT2 032556 032557 0 0 0 0 000000032557
FT2RQ 032556 032557 0 0 0 0 000000032557
FT3 032556 032557 0 0 0 0 000000032557
FT9 032557 032557 0 0 0 0 000000032557
ET0 032557 032557 0 0 0 0 000000032557
ST1A 032557 032557 0 0 0 0 000000032557
ST9 032557 032557 0 0 0 0 000000032557
*032557 MOVEI 6,777767
INITIAL
C(AC)=000000 000006
FINAL
C(AC)=000000 777767
TIME PC MA SC FE AR MQ BR
IT0 032557 032557 0 0 201300777767 0 000000777767
IT1 032557 0 0 0 201300777767 0 000000777767
AT3 032557 0 0 0 000000777767 0 201300777767
AT6 032557 777767 0 0 000000777767 0 201300777767
FT1A 032557 777767 0 0 000000777767 0 000000777767
FT9 032560 777767 0 0 000000777767 0 000000777767
ET0 032560 777767 0 0 000000777767 0 000000777767
ST1 032560 777767 0 0 000000777767 0 000000777767
ST2 032560 777767 0 0 000000777767 0 000000777767
ST9 032560 777767 0 0 000000777767 0 000000777767
*032560 MOVEI 5,000016(6)
INITIAL
C(AC)=000000 777773
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 032560 032560 0 0 201246000016 0 000000000005
IT1 032560 0 0 0 201246000016 0 000000000005
AT1 032560 0 0 0 0 0 201246000016
AT2 032560 0 0 0 000000777767 0 201246000016
AT3 032560 0 0 0 000000000005 0 000000000005
AT6 032560 000005 0 0 000000000005 0 000000000005
FT1A 032560 000005 0 0 000000000005 0 000000000005
FT9 032561 000005 0 0 000000000005 0 000000000005
ET0 032561 000005 0 0 000000000005 0 000000000005
ST1 032561 000005 0 0 000000000005 0 000000000005
ST2 032561 000005 0 0 000000000005 0 000000000005
ST9 032561 000005 0 0 000000000005 0 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 322
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0517
*032561 CAIE 5,000005
INITIAL
C(AC)=000000 000005
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032561 032561 0 0 302240000005 0 000000000005
IT1 032561 0 0 0 302240000005 0 000000000005
AT3 032561 0 0 0 000000000005 0 302240000005
AT6 032561 000005 0 0 000000000005 0 302240000005
FT1A 032561 000005 0 0 000000000005 0 000000000005
FT2 032561 000005 0 0 0 0 000000000005
FT2RQ 032561 000005 0 0 000000000005 0 000000000005
FT3 032561 000005 0 0 000000000005 0 000000000005
FT9 032562 000005 0 0 000000000005 0 000000000005
ET0 032563 000005 0 0 0 0 000000000005
ST1A 032563 000005 0 0 0 0 000000000005
ST9 032563 000005 0 0 0 0 000000000005
*032563 JUMPA 0,032564
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032563 032563 0 0 324000032564 0 000000032564
IT1 032563 0 0 0 324000032564 0 000000032564
AT3 032563 0 0 0 000000032564 0 324000032564
AT6 032563 032564 0 0 000000032564 0 324000032564
FT1A 032563 032564 0 0 000000032564 0 000000032564
FT2 032563 032564 0 0 0 0 000000032564
FT2RQ 032563 032564 0 0 0 0 000000032564
FT3 032563 032564 0 0 0 0 000000032564
FT9 032564 032564 0 0 0 0 000000032564
ET0 032564 032564 0 0 0 0 000000032564
ST1A 032564 032564 0 0 0 0 000000032564
ST9 032564 032564 0 0 0 0 000000032564
*032564 MOVEI 7,777763
INITIAL
C(AC)=000000 000007
FINAL
C(AC)=000000 777763
TIME PC MA SC FE AR MQ BR
IT0 032564 032564 0 0 201340777763 0 000000777763
IT1 032564 0 0 0 201340777763 0 000000777763
AT3 032564 0 0 0 000000777763 0 201340777763
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 323
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0518
AT6 032564 777763 0 0 000000777763 0 201340777763
FT1A 032564 777763 0 0 000000777763 0 000000777763
FT9 032565 777763 0 0 000000777763 0 000000777763
ET0 032565 777763 0 0 000000777763 0 000000777763
ST1 032565 777763 0 0 000000777763 0 000000777763
ST2 032565 777763 0 0 000000777763 0 000000777763
ST9 032565 777763 0 0 000000777763 0 000000777763
*032565 MOVEI 6,000023(7)
INITIAL
C(AC)=000000 777767
FINAL
C(AC)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 032565 032565 0 0 201307000023 0 000000000006
IT1 032565 0 0 0 201307000023 0 000000000006
AT1 032565 0 0 0 0 0 201307000023
AT2 032565 0 0 0 000000777763 0 201307000023
AT3 032565 0 0 0 000000000006 0 000000000006
AT6 032565 000006 0 0 000000000006 0 000000000006
FT1A 032565 000006 0 0 000000000006 0 000000000006
FT9 032566 000006 0 0 000000000006 0 000000000006
ET0 032566 000006 0 0 000000000006 0 000000000006
ST1 032566 000006 0 0 000000000006 0 000000000006
ST2 032566 000006 0 0 000000000006 0 000000000006
ST9 032566 000006 0 0 000000000006 0 000000000006
*032566 CAIE 6,000006
INITIAL
C(AC)=000000 000006
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032566 032566 0 0 302300000006 0 000000000006
IT1 032566 0 0 0 302300000006 0 000000000006
AT3 032566 0 0 0 000000000006 0 302300000006
AT6 032566 000006 0 0 000000000006 0 302300000006
FT1A 032566 000006 0 0 000000000006 0 000000000006
FT2 032566 000006 0 0 0 0 000000000006
FT2RQ 032566 000006 0 0 000000000006 0 000000000006
FT3 032566 000006 0 0 000000000006 0 000000000006
FT9 032567 000006 0 0 000000000006 0 000000000006
ET0 032570 000006 0 0 0 0 000000000006
ST1A 032570 000006 0 0 0 0 000000000006
ST9 032570 000006 0 0 0 0 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 324
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0519
*032570 JUMPA 0,032571
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032570 032570 0 0 324000032571 0 000000032571
IT1 032570 0 0 0 324000032571 0 000000032571
AT3 032570 0 0 0 000000032571 0 324000032571
AT6 032570 032571 0 0 000000032571 0 324000032571
FT1A 032570 032571 0 0 000000032571 0 000000032571
FT2 032570 032571 0 0 0 0 000000032571
FT2RQ 032570 032571 0 0 0 0 000000032571
FT3 032570 032571 0 0 0 0 000000032571
FT9 032571 032571 0 0 0 0 000000032571
ET0 032571 032571 0 0 0 0 000000032571
ST1A 032571 032571 0 0 0 0 000000032571
ST9 032571 032571 0 0 0 0 000000032571
*032571 MOVEI 10,777757
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000000 777757
TIME PC MA SC FE AR MQ BR
IT0 032571 032571 0 0 201400777757 0 000000777757
IT1 032571 0 0 0 201400777757 0 000000777757
AT3 032571 0 0 0 000000777757 0 201400777757
AT6 032571 777757 0 0 000000777757 0 201400777757
FT1A 032571 777757 0 0 000000777757 0 000000777757
FT9 032572 777757 0 0 000000777757 0 000000777757
ET0 032572 777757 0 0 000000777757 0 000000777757
ST1 032572 777757 0 0 000000777757 0 000000777757
ST2 032572 777757 0 0 000000777757 0 000000777757
ST9 032572 777757 0 0 000000777757 0 000000777757
*032572 MOVEI 7,000030(10)
INITIAL
C(AC)=000000 777763
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 032572 032572 0 0 201350000030 0 000000000007
IT1 032572 0 0 0 201350000030 0 000000000007
AT1 032572 0 0 0 0 0 201350000030
AT2 032572 0 0 0 000000777757 0 201350000030
AT3 032572 0 0 0 000000000007 0 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 325
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0520
AT6 032572 000007 0 0 000000000007 0 000000000007
FT1A 032572 000007 0 0 000000000007 0 000000000007
FT9 032573 000007 0 0 000000000007 0 000000000007
ET0 032573 000007 0 0 000000000007 0 000000000007
ST1 032573 000007 0 0 000000000007 0 000000000007
ST2 032573 000007 0 0 000000000007 0 000000000007
ST9 032573 000007 0 0 000000000007 0 000000000007
*032573 CAIE 7,000007
INITIAL
C(AC)=000000 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032573 032573 0 0 302340000007 0 000000000007
IT1 032573 0 0 0 302340000007 0 000000000007
AT3 032573 0 0 0 000000000007 0 302340000007
AT6 032573 000007 0 0 000000000007 0 302340000007
FT1A 032573 000007 0 0 000000000007 0 000000000007
FT2 032573 000007 0 0 0 0 000000000007
FT2RQ 032573 000007 0 0 000000000007 0 000000000007
FT3 032573 000007 0 0 000000000007 0 000000000007
FT9 032574 000007 0 0 000000000007 0 000000000007
ET0 032575 000007 0 0 0 0 000000000007
ST1A 032575 000007 0 0 0 0 000000000007
ST9 032575 000007 0 0 0 0 000000000007
*032575 JUMPA 0,032576
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032575 032575 0 0 324000032576 0 000000032576
IT1 032575 0 0 0 324000032576 0 000000032576
AT3 032575 0 0 0 000000032576 0 324000032576
AT6 032575 032576 0 0 000000032576 0 324000032576
FT1A 032575 032576 0 0 000000032576 0 000000032576
FT2 032575 032576 0 0 0 0 000000032576
FT2RQ 032575 032576 0 0 0 0 000000032576
FT3 032575 032576 0 0 0 0 000000032576
FT9 032576 032576 0 0 0 0 000000032576
ET0 032576 032576 0 0 0 0 000000032576
ST1A 032576 032576 0 0 0 0 000000032576
ST9 032576 032576 0 0 0 0 000000032576
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 326
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0521
*032576 MOVEI 11,777753
INITIAL
C(AC)=000000 000011
FINAL
C(AC)=000000 777753
TIME PC MA SC FE AR MQ BR
IT0 032576 032576 0 0 201440777753 0 000000777753
IT1 032576 0 0 0 201440777753 0 000000777753
AT3 032576 0 0 0 000000777753 0 201440777753
AT6 032576 777753 0 0 000000777753 0 201440777753
FT1A 032576 777753 0 0 000000777753 0 000000777753
FT9 032577 777753 0 0 000000777753 0 000000777753
ET0 032577 777753 0 0 000000777753 0 000000777753
ST1 032577 777753 0 0 000000777753 0 000000777753
ST2 032577 777753 0 0 000000777753 0 000000777753
ST9 032577 777753 0 0 000000777753 0 000000777753
*032577 MOVEI 10,000035(11)
INITIAL
C(AC)=000000 777757
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 032577 032577 0 0 201411000035 0 000000000010
IT1 032577 0 0 0 201411000035 0 000000000010
AT1 032577 0 0 0 0 0 201411000035
AT2 032577 0 0 0 000000777753 0 201411000035
AT3 032577 0 0 0 000000000010 0 000000000010
AT6 032577 000010 0 0 000000000010 0 000000000010
FT1A 032577 000010 0 0 000000000010 0 000000000010
FT9 0 000010 0 0 000000000010 0 000000000010
ET0 0 000010 0 0 000000000010 0 000000000010
ST1 0 000010 0 0 000000000010 0 000000000010
ST2 0 000010 0 0 000000000010 0 000000000010
ST9 0 000010 0 0 000000000010 0 000000000010
*032600 CAIE 10,000010
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 302400000010 0 000000000010
IT1 0 0 0 0 302400000010 0 000000000010
AT3 0 0 0 0 000000000010 0 302400000010
AT6 0 000010 0 0 000000000010 0 302400000010
FT1A 0 000010 0 0 000000000010 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 327
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0522
FT2 0 000010 0 0 0 0 000000000010
FT2RQ 0 000010 0 0 000000000010 0 000000000010
FT3 0 000010 0 0 000000000010 0 000000000010
FT9 032601 000010 0 0 000000000010 0 000000000010
ET0 032602 000010 0 0 0 0 000000000010
ST1A 032602 000010 0 0 0 0 000000000010
ST9 032602 000010 0 0 0 0 000000000010
*032602 JUMPA 0,032603
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032602 032602 0 0 324000032603 0 000000032603
IT1 032602 0 0 0 324000032603 0 000000032603
AT3 032602 0 0 0 000000032603 0 324000032603
AT6 032602 032603 0 0 000000032603 0 324000032603
FT1A 032602 032603 0 0 000000032603 0 000000032603
FT2 032602 032603 0 0 0 0 000000032603
FT2RQ 032602 032603 0 0 0 0 000000032603
FT3 032602 032603 0 0 0 0 000000032603
FT9 032603 032603 0 0 0 0 000000032603
ET0 032603 032603 0 0 0 0 000000032603
ST1A 032603 032603 0 0 0 0 000000032603
ST9 032603 032603 0 0 0 0 000000032603
*032603 MOVEI 12,777747
INITIAL
C(AC)=000000 000012
FINAL
C(AC)=000000 777747
TIME PC MA SC FE AR MQ BR
IT0 032603 032603 0 0 201500777747 0 000000777747
IT1 032603 0 0 0 201500777747 0 000000777747
AT3 032603 0 0 0 000000777747 0 201500777747
AT6 032603 777747 0 0 000000777747 0 201500777747
FT1A 032603 777747 0 0 000000777747 0 000000777747
FT9 032604 777747 0 0 000000777747 0 000000777747
ET0 032604 777747 0 0 000000777747 0 000000777747
ST1 032604 777747 0 0 000000777747 0 000000777747
ST2 032604 777747 0 0 000000777747 0 000000777747
ST9 032604 777747 0 0 000000777747 0 000000777747
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 328
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0523
*032604 MOVEI 11,000042(12)
INITIAL
C(AC)=000000 777753
FINAL
C(AC)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 032604 032604 0 0 201452000042 0 000000000011
IT1 032604 0 0 0 201452000042 0 000000000011
AT1 032604 0 0 0 0 0 201452000042
AT2 032604 0 0 0 000000777747 0 201452000042
AT3 032604 0 0 0 000000000011 0 000000000011
AT6 032604 000011 0 0 000000000011 0 000000000011
FT1A 032604 000011 0 0 000000000011 0 000000000011
FT9 032605 000011 0 0 000000000011 0 000000000011
ET0 032605 000011 0 0 000000000011 0 000000000011
ST1 032605 000011 0 0 000000000011 0 000000000011
ST2 032605 000011 0 0 000000000011 0 000000000011
ST9 032605 000011 0 0 000000000011 0 000000000011
*032605 CAIE 11,000011
INITIAL
C(AC)=000000 000011
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032605 032605 0 0 302440000011 0 000000000011
IT1 032605 0 0 0 302440000011 0 000000000011
AT3 032605 0 0 0 000000000011 0 302440000011
AT6 032605 000011 0 0 000000000011 0 302440000011
FT1A 032605 000011 0 0 000000000011 0 000000000011
FT2 032605 000011 0 0 0 0 000000000011
FT2RQ 032605 000011 0 0 000000000011 0 000000000011
FT3 032605 000011 0 0 000000000011 0 000000000011
FT9 032606 000011 0 0 000000000011 0 000000000011
ET0 032607 000011 0 0 0 0 000000000011
ST1A 032607 000011 0 0 0 0 000000000011
ST9 032607 000011 0 0 0 0 000000000011
*032607 JUMPA 0,032610
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032607 032607 0 0 324000032610 0 000000032610
IT1 032607 0 0 0 324000032610 0 000000032610
AT3 032607 0 0 0 000000032610 0 324000032610
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 329
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0524
AT6 032607 032610 0 0 000000032610 0 324000032610
FT1A 032607 032610 0 0 000000032610 0 000000032610
FT2 032607 032610 0 0 0 0 000000032610
FT2RQ 032607 032610 0 0 0 0 000000032610
FT3 032607 032610 0 0 0 0 000000032610
FT9 032610 032610 0 0 0 0 000000032610
ET0 032610 032610 0 0 0 0 000000032610
ST1A 032610 032610 0 0 0 0 000000032610
ST9 032610 032610 0 0 0 0 000000032610
*032610 MOVEI 13,777743
INITIAL
C(AC)=000000 000013
FINAL
C(AC)=000000 777743
TIME PC MA SC FE AR MQ BR
IT0 032610 032610 0 0 201540777743 0 000000777743
IT1 032610 0 0 0 201540777743 0 000000777743
AT3 032610 0 0 0 000000777743 0 201540777743
AT6 032610 777743 0 0 000000777743 0 201540777743
FT1A 032610 777743 0 0 000000777743 0 000000777743
FT9 032611 777743 0 0 000000777743 0 000000777743
ET0 032611 777743 0 0 000000777743 0 000000777743
ST1 032611 777743 0 0 000000777743 0 000000777743
ST2 032611 777743 0 0 000000777743 0 000000777743
ST9 032611 777743 0 0 000000777743 0 000000777743
*032611 MOVEI 12,000047(13)
INITIAL
C(AC)=000000 777747
FINAL
C(AC)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 032611 032611 0 0 201513000047 0 000000000012
IT1 032611 0 0 0 201513000047 0 000000000012
AT1 032611 0 0 0 0 0 201513000047
AT2 032611 0 0 0 000000777743 0 201513000047
AT3 032611 0 0 0 000000000012 0 000000000012
AT6 032611 000012 0 0 000000000012 0 000000000012
FT1A 032611 000012 0 0 000000000012 0 000000000012
FT9 032612 000012 0 0 000000000012 0 000000000012
ET0 032612 000012 0 0 000000000012 0 000000000012
ST1 032612 000012 0 0 000000000012 0 000000000012
ST2 032612 000012 0 0 000000000012 0 000000000012
ST9 032612 000012 0 0 000000000012 0 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 330
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0525
*032612 CAIE 12,000012
INITIAL
C(AC)=000000 000012
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032612 032612 0 0 302500000012 0 000000000012
IT1 032612 0 0 0 302500000012 0 000000000012
AT3 032612 0 0 0 000000000012 0 302500000012
AT6 032612 000012 0 0 000000000012 0 302500000012
FT1A 032612 000012 0 0 000000000012 0 000000000012
FT2 032612 000012 0 0 0 0 000000000012
FT2RQ 032612 000012 0 0 000000000012 0 000000000012
FT3 032612 000012 0 0 000000000012 0 000000000012
FT9 032613 000012 0 0 000000000012 0 000000000012
ET0 032614 000012 0 0 0 0 000000000012
ST1A 032614 000012 0 0 0 0 000000000012
ST9 032614 000012 0 0 0 0 000000000012
*032614 JUMPA 0,032615
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032614 032614 0 0 324000032615 0 000000032615
IT1 032614 0 0 0 324000032615 0 000000032615
AT3 032614 0 0 0 000000032615 0 324000032615
AT6 032614 032615 0 0 000000032615 0 324000032615
FT1A 032614 032615 0 0 000000032615 0 000000032615
FT2 032614 032615 0 0 0 0 000000032615
FT2RQ 032614 032615 0 0 0 0 000000032615
FT3 032614 032615 0 0 0 0 000000032615
FT9 032615 032615 0 0 0 0 000000032615
ET0 032615 032615 0 0 0 0 000000032615
ST1A 032615 032615 0 0 0 0 000000032615
ST9 032615 032615 0 0 0 0 000000032615
*032615 MOVEI 14,777737
INITIAL
C(AC)=000000 000014
FINAL
C(AC)=000000 777737
TIME PC MA SC FE AR MQ BR
IT0 032615 032615 0 0 201600777737 0 000000777737
IT1 032615 0 0 0 201600777737 0 000000777737
AT3 032615 0 0 0 000000777737 0 201600777737
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 331
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0526
AT6 032615 777737 0 0 000000777737 0 201600777737
FT1A 032615 777737 0 0 000000777737 0 000000777737
FT9 032616 777737 0 0 000000777737 0 000000777737
ET0 032616 777737 0 0 000000777737 0 000000777737
ST1 032616 777737 0 0 000000777737 0 000000777737
ST2 032616 777737 0 0 000000777737 0 000000777737
ST9 032616 777737 0 0 000000777737 0 000000777737
*032616 MOVEI 13,000054(14)
INITIAL
C(AC)=000000 777743
FINAL
C(AC)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 032616 032616 0 0 201554000054 0 000000000013
IT1 032616 0 0 0 201554000054 0 000000000013
AT1 032616 0 0 0 0 0 201554000054
AT2 032616 0 0 0 000000777737 0 201554000054
AT3 032616 0 0 0 000000000013 0 000000000013
AT6 032616 000013 0 0 000000000013 0 000000000013
FT1A 032616 000013 0 0 000000000013 0 000000000013
FT9 032617 000013 0 0 000000000013 0 000000000013
ET0 032617 000013 0 0 000000000013 0 000000000013
ST1 032617 000013 0 0 000000000013 0 000000000013
ST2 032617 000013 0 0 000000000013 0 000000000013
ST9 032617 000013 0 0 000000000013 0 000000000013
*032617 CAIE 13,000013
INITIAL
C(AC)=000000 000013
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032617 032617 0 0 302540000013 0 000000000013
IT1 032617 0 0 0 302540000013 0 000000000013
AT3 032617 0 0 0 000000000013 0 302540000013
AT6 032617 000013 0 0 000000000013 0 302540000013
FT1A 032617 000013 0 0 000000000013 0 000000000013
FT2 032617 000013 0 0 0 0 000000000013
FT2RQ 032617 000013 0 0 000000000013 0 000000000013
FT3 032617 000013 0 0 000000000013 0 000000000013
FT9 032620 000013 0 0 000000000013 0 000000000013
ET0 032621 000013 0 0 0 0 000000000013
ST1A 032621 000013 0 0 0 0 000000000013
ST9 032621 000013 0 0 0 0 000000000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 332
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0527
*032621 JUMPA 0,032622
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032621 032621 0 0 324000032622 0 000000032622
IT1 032621 0 0 0 324000032622 0 000000032622
AT3 032621 0 0 0 000000032622 0 324000032622
AT6 032621 032622 0 0 000000032622 0 324000032622
FT1A 032621 032622 0 0 000000032622 0 000000032622
FT2 032621 032622 0 0 0 0 000000032622
FT2RQ 032621 032622 0 0 0 0 000000032622
FT3 032621 032622 0 0 0 0 000000032622
FT9 032622 032622 0 0 0 0 000000032622
ET0 032622 032622 0 0 0 0 000000032622
ST1A 032622 032622 0 0 0 0 000000032622
ST9 032622 032622 0 0 0 0 000000032622
*032622 MOVEI 15,777733
INITIAL
C(AC)=000000 000015
FINAL
C(AC)=000000 777733
TIME PC MA SC FE AR MQ BR
IT0 032622 032622 0 0 201640777733 0 000000777733
IT1 032622 0 0 0 201640777733 0 000000777733
AT3 032622 0 0 0 000000777733 0 201640777733
AT6 032622 777733 0 0 000000777733 0 201640777733
FT1A 032622 777733 0 0 000000777733 0 000000777733
FT9 032623 777733 0 0 000000777733 0 000000777733
ET0 032623 777733 0 0 000000777733 0 000000777733
ST1 032623 777733 0 0 000000777733 0 000000777733
ST2 032623 777733 0 0 000000777733 0 000000777733
ST9 032623 777733 0 0 000000777733 0 000000777733
*032623 MOVEI 14,000061(15)
INITIAL
C(AC)=000000 777737
FINAL
C(AC)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 032623 032623 0 0 201615000061 0 000000000014
IT1 032623 0 0 0 201615000061 0 000000000014
AT1 032623 0 0 0 0 0 201615000061
AT2 032623 0 0 0 000000777733 0 201615000061
AT3 032623 0 0 0 000000000014 0 000000000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 333
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0528
AT6 032623 000014 0 0 000000000014 0 000000000014
FT1A 032623 000014 0 0 000000000014 0 000000000014
FT9 032624 000014 0 0 000000000014 0 000000000014
ET0 032624 000014 0 0 000000000014 0 000000000014
ST1 032624 000014 0 0 000000000014 0 000000000014
ST2 032624 000014 0 0 000000000014 0 000000000014
ST9 032624 000014 0 0 000000000014 0 000000000014
*032624 CAIE 14,000014
INITIAL
C(AC)=000000 000014
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032624 032624 0 0 302600000014 0 000000000014
IT1 032624 0 0 0 302600000014 0 000000000014
AT3 032624 0 0 0 000000000014 0 302600000014
AT6 032624 000014 0 0 000000000014 0 302600000014
FT1A 032624 000014 0 0 000000000014 0 000000000014
FT2 032624 000014 0 0 0 0 000000000014
FT2RQ 032624 000014 0 0 000000000014 0 000000000014
FT3 032624 000014 0 0 000000000014 0 000000000014
FT9 032625 000014 0 0 000000000014 0 000000000014
ET0 032626 000014 0 0 0 0 000000000014
ST1A 032626 000014 0 0 0 0 000000000014
ST9 032626 000014 0 0 0 0 000000000014
*032626 JUMPA 0,032627
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032626 032626 0 0 324000032627 0 000000032627
IT1 032626 0 0 0 324000032627 0 000000032627
AT3 032626 0 0 0 000000032627 0 324000032627
AT6 032626 032627 0 0 000000032627 0 324000032627
FT1A 032626 032627 0 0 000000032627 0 000000032627
FT2 032626 032627 0 0 0 0 000000032627
FT2RQ 032626 032627 0 0 0 0 000000032627
FT3 032626 032627 0 0 0 0 000000032627
FT9 032627 032627 0 0 0 0 000000032627
ET0 032627 032627 0 0 0 0 000000032627
ST1A 032627 032627 0 0 0 0 000000032627
ST9 032627 032627 0 0 0 0 000000032627
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 334
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0529
*032627 MOVEI 16,777727
INITIAL
C(AC)=000000 000016
FINAL
C(AC)=000000 777727
TIME PC MA SC FE AR MQ BR
IT0 032627 032627 0 0 201700777727 0 000000777727
IT1 032627 0 0 0 201700777727 0 000000777727
AT3 032627 0 0 0 000000777727 0 201700777727
AT6 032627 777727 0 0 000000777727 0 201700777727
FT1A 032627 777727 0 0 000000777727 0 000000777727
FT9 032630 777727 0 0 000000777727 0 000000777727
ET0 032630 777727 0 0 000000777727 0 000000777727
ST1 032630 777727 0 0 000000777727 0 000000777727
ST2 032630 777727 0 0 000000777727 0 000000777727
ST9 032630 777727 0 0 000000777727 0 000000777727
*032630 MOVEI 15,000066(16)
INITIAL
C(AC)=000000 777733
FINAL
C(AC)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 032630 032630 0 0 201656000066 0 000000000015
IT1 032630 0 0 0 201656000066 0 000000000015
AT1 032630 0 0 0 0 0 201656000066
AT2 032630 0 0 0 000000777727 0 201656000066
AT3 032630 0 0 0 000000000015 0 000000000015
AT6 032630 000015 0 0 000000000015 0 000000000015
FT1A 032630 000015 0 0 000000000015 0 000000000015
FT9 032631 000015 0 0 000000000015 0 000000000015
ET0 032631 000015 0 0 000000000015 0 000000000015
ST1 032631 000015 0 0 000000000015 0 000000000015
ST2 032631 000015 0 0 000000000015 0 000000000015
ST9 032631 000015 0 0 000000000015 0 000000000015
*032631 CAIE 15,000015
INITIAL
C(AC)=000000 000015
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032631 032631 0 0 302640000015 0 000000000015
IT1 032631 0 0 0 302640000015 0 000000000015
AT3 032631 0 0 0 000000000015 0 302640000015
AT6 032631 000015 0 0 000000000015 0 302640000015
FT1A 032631 000015 0 0 000000000015 0 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 335
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0530
FT2 032631 000015 0 0 0 0 000000000015
FT2RQ 032631 000015 0 0 000000000015 0 000000000015
FT3 032631 000015 0 0 000000000015 0 000000000015
FT9 032632 000015 0 0 000000000015 0 000000000015
ET0 032633 000015 0 0 0 0 000000000015
ST1A 032633 000015 0 0 0 0 000000000015
ST9 032633 000015 0 0 0 0 000000000015
*032633 JUMPA 0,032634
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032633 032633 0 0 324000032634 0 000000032634
IT1 032633 0 0 0 324000032634 0 000000032634
AT3 032633 0 0 0 000000032634 0 324000032634
AT6 032633 032634 0 0 000000032634 0 324000032634
FT1A 032633 032634 0 0 000000032634 0 000000032634
FT2 032633 032634 0 0 0 0 000000032634
FT2RQ 032633 032634 0 0 0 0 000000032634
FT3 032633 032634 0 0 0 0 000000032634
FT9 032634 032634 0 0 0 0 000000032634
ET0 032634 032634 0 0 0 0 000000032634
ST1A 032634 032634 0 0 0 0 000000032634
ST9 032634 032634 0 0 0 0 000000032634
*032634 MOVEI 17,777723
INITIAL
C(AC)=000000 777751
FINAL
C(AC)=000000 777723
TIME PC MA SC FE AR MQ BR
IT0 032634 032634 0 0 201740777723 0 000000777723
IT1 032634 0 0 0 201740777723 0 000000777723
AT3 032634 0 0 0 000000777723 0 201740777723
AT6 032634 777723 0 0 000000777723 0 201740777723
FT1A 032634 777723 0 0 000000777723 0 000000777723
FT9 032635 777723 0 0 000000777723 0 000000777723
ET0 032635 777723 0 0 000000777723 0 000000777723
ST1 032635 777723 0 0 000000777723 0 000000777723
ST2 032635 777723 0 0 000000777723 0 000000777723
ST9 032635 777723 0 0 000000777723 0 000000777723
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 336
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0531
*032635 MOVEI 16,000073(17)
INITIAL
C(AC)=000000 777727
FINAL
C(AC)=000000 000016
TIME PC MA SC FE AR MQ BR
IT0 032635 032635 0 0 201717000073 0 000000000016
IT1 032635 0 0 0 201717000073 0 000000000016
AT1 032635 0 0 0 0 0 201717000073
AT2 032635 0 0 0 000000777723 0 201717000073
AT3 032635 0 0 0 000000000016 0 000000000016
AT6 032635 000016 0 0 000000000016 0 000000000016
FT1A 032635 000016 0 0 000000000016 0 000000000016
FT9 032636 000016 0 0 000000000016 0 000000000016
ET0 032636 000016 0 0 000000000016 0 000000000016
ST1 032636 000016 0 0 000000000016 0 000000000016
ST2 032636 000016 0 0 000000000016 0 000000000016
ST9 032636 000016 0 0 000000000016 0 000000000016
*032636 CAIE 16,000016
INITIAL
C(AC)=000000 000016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032636 032636 0 0 302700000016 0 000000000016
IT1 032636 0 0 0 302700000016 0 000000000016
AT3 032636 0 0 0 000000000016 0 302700000016
AT6 032636 000016 0 0 000000000016 0 302700000016
FT1A 032636 000016 0 0 000000000016 0 000000000016
FT2 032636 000016 0 0 0 0 000000000016
FT2RQ 032636 000016 0 0 000000000016 0 000000000016
FT3 032636 000016 0 0 000000000016 0 000000000016
FT9 032637 000016 0 0 000000000016 0 000000000016
ET0 032640 000016 0 0 0 0 000000000016
ST1A 032640 000016 0 0 0 0 000000000016
ST9 032640 000016 0 0 0 0 000000000016
*032640 JUMPA 0,032641
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032640 032640 0 0 324000032641 0 000000032641
IT1 032640 0 0 0 324000032641 0 000000032641
AT3 032640 0 0 0 000000032641 0 324000032641
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 337
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0532
AT6 032640 032641 0 0 000000032641 0 324000032641
FT1A 032640 032641 0 0 000000032641 0 000000032641
FT2 032640 032641 0 0 0 0 000000032641
FT2RQ 032640 032641 0 0 0 0 000000032641
FT3 032640 032641 0 0 0 0 000000032641
FT9 032641 032641 0 0 0 0 000000032641
ET0 032641 032641 0 0 0 0 000000032641
ST1A 032641 032641 0 0 0 0 000000032641
ST9 032641 032641 0 0 0 0 000000032641
*032641 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032641 032641 0 0 400000000000 0 0
IT1 032641 0 0 0 400000000000 0 0
AT3 032641 0 0 0 0 0 400000000000
AT6 032641 0 0 0 0 0 400000000000
FT1A 032641 0 0 0 0 0 0
FT9 032642 0 0 0 0 0 0
ET0 032642 0 0 0 0 0 0
ST1 032642 0 0 0 0 0 0
ST2 032642 0 0 0 0 0 0
ST9 032642 0 0 0 0 0 0
*032642 EXCH 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032642 032642 0 0 250000000000 0 0
IT1 032642 0 0 0 250000000000 0 0
AT3 032642 0 0 0 0 0 250000000000
AT6 032642 0 0 0 0 0 250000000000
FT0 032642 0 0 0 0 0 250000000000
FT1A 032642 0 0 0 0 0 0
FT2 032642 0 0 0 0 0 0
FT2RQ 032642 0 0 0 0 0 0
FT3 032642 0 0 0 0 0 0
FT9 032643 0 0 0 0 0 0
ET0 032643 0 0 0 0 0 0
ST1 032643 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 338
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0533
ST2 032643 0 0 0 0 0 0
ST3 032643 0 0 0 0 0 0
ST5 032643 0 0 0 0 0 0
ST6A 032643 0 0 0 0 0 0
ST9 032643 0 0 0 0 0 0
*032643 SKIPE 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032643 032643 0 0 332000000000 0 0
IT1 032643 0 0 0 332000000000 0 0
AT3 032643 0 0 0 0 0 332000000000
AT6 032643 0 0 0 0 0 332000000000
FT0 032643 0 0 0 0 0 332000000000
FT1A 032643 0 0 0 0 0 0
FT9 032644 0 0 0 0 0 0
ET0 032645 0 0 0 0 0 0
ST1A 032645 0 0 0 0 0 0
ST9 032645 0 0 0 0 0 0
*032645 JUMPA 0,032646
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032645 032645 0 0 324000032646 0 000000032646
IT1 032645 0 0 0 324000032646 0 000000032646
AT3 032645 0 0 0 000000032646 0 324000032646
AT6 032645 032646 0 0 000000032646 0 324000032646
FT1A 032645 032646 0 0 000000032646 0 000000032646
FT2 032645 032646 0 0 0 0 000000032646
FT2RQ 032645 032646 0 0 0 0 000000032646
FT3 032645 032646 0 0 0 0 000000032646
FT9 032646 032646 0 0 0 0 000000032646
ET0 032646 032646 0 0 0 0 000000032646
ST1A 032646 032646 0 0 0 0 000000032646
ST9 032646 032646 0 0 0 0 000000032646
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 339
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0534
*032646 SETO 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032646 032646 0 0 474000000000 0 0
IT1 032646 0 0 0 474000000000 0 0
AT3 032646 0 0 0 0 0 474000000000
AT6 032646 0 0 0 0 0 474000000000
FT1A 032646 0 0 0 0 0 0
FT9 032647 0 0 0 0 0 0
ET0 032647 0 0 0 777777777777 0 0
ST1 032647 0 0 0 777777777777 0 0
ST2 032647 0 0 0 777777777777 0 0
ST9 032647 0 0 0 777777777777 0 0
*032647 EXCH 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032647 032647 0 0 250000000000 0 777777777777
IT1 032647 0 0 0 250000000000 0 777777777777
AT3 032647 0 0 0 0 0 250000000000
AT6 032647 0 0 0 0 0 250000000000
FT0 032647 0 0 0 777777777777 0 250000000000
FT1A 032647 0 0 0 777777777777 0 777777777777
FT2 032647 0 0 0 0 0 777777777777
FT2RQ 032647 0 0 0 777777777777 0 777777777777
FT3 032647 0 0 0 777777777777 0 777777777777
FT9 032650 0 0 0 777777777777 0 777777777777
ET0 032650 0 0 0 777777777777 0 777777777777
ST1 032650 0 0 0 777777777777 0 777777777777
ST2 032650 0 0 0 777777777777 0 777777777777
ST3 032650 0 0 0 777777777777 0 777777777777
ST5 032650 0 0 0 777777777777 0 777777777777
ST6A 032650 0 0 0 777777777777 0 777777777777
ST9 032650 0 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 340
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0535
*032650 CAME 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032650 032650 0 0 312000034466 0 777777777777
IT1 032650 0 0 0 312000034466 0 777777777777
AT3 032650 0 0 0 000000034466 0 312000034466
AT6 032650 034466 0 0 000000034466 0 312000034466
FT0 032650 034466 0 0 777777777777 0 312000034466
FT1A 032650 034466 0 0 777777777777 0 777777777777
FT2 032650 034466 0 0 0 0 777777777777
FT2RQ 032650 034466 0 0 777777777777 0 777777777777
FT3 032650 034466 0 0 777777777777 0 777777777777
FT9 032651 034466 0 0 777777777777 0 777777777777
ET0 032652 034466 0 0 0 0 777777777777
ST1A 032652 034466 0 0 0 0 777777777777
ST9 032652 034466 0 0 0 0 777777777777
*032652 JUMPA 0,032653
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032652 032652 0 0 324000032653 0 000000032653
IT1 032652 0 0 0 324000032653 0 000000032653
AT3 032652 0 0 0 000000032653 0 324000032653
AT6 032652 032653 0 0 000000032653 0 324000032653
FT1A 032652 032653 0 0 000000032653 0 000000032653
FT2 032652 032653 0 0 0 0 000000032653
FT2RQ 032652 032653 0 0 777777777777 0 000000032653
FT3 032652 032653 0 0 777777777777 0 000000032653
FT9 032653 032653 0 0 777777777777 0 000000032653
ET0 032653 032653 0 0 777777777777 0 000000032653
ST1A 032653 032653 0 0 777777777777 0 000000032653
ST9 032653 032653 0 0 777777777777 0 000000032653
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 341
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0536
*032653 MOVSI 0,777777
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032653 032653 0 0 205000777777 0 000000777777
IT1 032653 0 0 0 205000777777 0 000000777777
AT3 032653 0 0 0 000000777777 0 205000777777
AT6 032653 777777 0 0 000000777777 0 205000777777
FT1A 032653 777777 0 0 000000777777 0 000000777777
FT9 032654 777777 0 0 000000777777 0 000000777777
ET0 032654 777777 0 0 777777000000 0 000000777777
ST1 032654 777777 0 0 777777000000 0 000000777777
ST2 032654 777777 0 0 777777000000 0 000000777777
ST9 032654 777777 0 0 777777000000 0 000000777777
*032654 MOVEI 1,777777
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 032654 032654 0 0 201040777777 0 000000777777
IT1 032654 0 0 0 201040777777 0 000000777777
AT3 032654 0 0 0 000000777777 0 201040777777
AT6 032654 777777 0 0 000000777777 0 201040777777
FT1A 032654 777777 0 0 000000777777 0 000000777777
FT9 032655 777777 0 0 000000777777 0 000000777777
ET0 032655 777777 0 0 000000777777 0 000000777777
ST1 032655 777777 0 0 000000777777 0 000000777777
ST2 032655 777777 0 0 000000777777 0 000000777777
ST9 032655 777777 0 0 000000777777 0 000000777777
*032655 EXCH 0,000001
INITIAL
C(AC)=777777 000000
C(E)=000000 777777
FINAL
C(AC)=000000 777777
C(E)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032655 032655 0 0 250000000001 0 777777000000
IT1 032655 0 0 0 250000000001 0 777777000000
AT3 032655 0 0 0 000000000001 0 250000000001
AT6 032655 000001 0 0 000000000001 0 250000000001
FT0 032655 000001 0 0 000000777777 0 250000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 342
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0537
FT1A 032655 000001 0 0 000000777777 0 000000777777
FT2 032655 000001 0 0 0 0 000000777777
FT2RQ 032655 000001 0 0 777777000000 0 000000777777
FT3 032655 000001 0 0 777777000000 0 000000777777
FT9 032656 000001 0 0 777777000000 0 000000777777
ET0 032656 000001 0 0 000000777777 0 777777000000
ST1 032656 000001 0 0 000000777777 0 777777000000
ST2 032656 000001 0 0 777777000000 0 777777000000
ST3 032656 000001 0 0 777777000000 0 777777000000
ST5 032656 000001 0 0 777777000000 0 777777000000
ST6A 032656 000001 0 0 777777000000 0 777777000000
ST9 032656 000001 0 0 777777000000 0 777777000000
*032656 CAME 1,034533
INITIAL
C(AC)=777777 000000
C(E)=777777 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032656 032656 0 0 312040034533 0 777777000000
IT1 032656 0 0 0 312040034533 0 777777000000
AT3 032656 0 0 0 000000034533 0 312040034533
AT6 032656 034533 0 0 000000034533 0 312040034533
FT0 032656 034533 0 0 777777000000 0 312040034533
FT1A 032656 034533 0 0 777777000000 0 777777000000
FT2 032656 034533 0 0 0 0 777777000000
FT2RQ 032656 034533 0 0 777777000000 0 777777000000
FT3 032656 034533 0 0 777777000000 0 777777000000
FT9 032657 034533 0 0 777777000000 0 777777000000
ET0 032660 034533 0 0 0 0 777777000000
ST1A 032660 034533 0 0 0 0 777777000000
ST9 032660 034533 0 0 0 0 777777000000
*032660 JUMPA 0,032661
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032660 032660 0 0 324000032661 0 000000032661
IT1 032660 0 0 0 324000032661 0 000000032661
AT3 032660 0 0 0 000000032661 0 324000032661
AT6 032660 032661 0 0 000000032661 0 324000032661
FT1A 032660 032661 0 0 000000032661 0 000000032661
FT2 032660 032661 0 0 0 0 000000032661
FT2RQ 032660 032661 0 0 000000777777 0 000000032661
FT3 032660 032661 0 0 000000777777 0 000000032661
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 343
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0538
FT9 032661 032661 0 0 000000777777 0 000000032661
ET0 032661 032661 0 0 000000777777 0 000000032661
ST1A 032661 032661 0 0 000000777777 0 000000032661
ST9 032661 032661 0 0 000000777777 0 000000032661
*032661 CAME 0,034534
INITIAL
C(AC)=000000 777777
C(E)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032661 032661 0 0 312000034534 0 000000777777
IT1 032661 0 0 0 312000034534 0 000000777777
AT3 032661 0 0 0 000000034534 0 312000034534
AT6 032661 034534 0 0 000000034534 0 312000034534
FT0 032661 034534 0 0 000000777777 0 312000034534
FT1A 032661 034534 0 0 000000777777 0 000000777777
FT2 032661 034534 0 0 0 0 000000777777
FT2RQ 032661 034534 0 0 000000777777 0 000000777777
FT3 032661 034534 0 0 000000777777 0 000000777777
FT9 032662 034534 0 0 000000777777 0 000000777777
ET0 032663 034534 0 0 0 0 000000777777
ST1A 032663 034534 0 0 0 0 000000777777
ST9 032663 034534 0 0 0 0 000000777777
*032663 JUMPA 0,032664
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032663 032663 0 0 324000032664 0 000000032664
IT1 032663 0 0 0 324000032664 0 000000032664
AT3 032663 0 0 0 000000032664 0 324000032664
AT6 032663 032664 0 0 000000032664 0 324000032664
FT1A 032663 032664 0 0 000000032664 0 000000032664
FT2 032663 032664 0 0 0 0 000000032664
FT2RQ 032663 032664 0 0 000000777777 0 000000032664
FT3 032663 032664 0 0 000000777777 0 000000032664
FT9 032664 032664 0 0 000000777777 0 000000032664
ET0 032664 032664 0 0 000000777777 0 000000032664
ST1A 032664 032664 0 0 000000777777 0 000000032664
ST9 032664 032664 0 0 000000777777 0 000000032664
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 344
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0539
*032664 MOVEI 0,777777
INITIAL
C(AC)=000000 777777
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 032664 032664 0 0 201000777777 0 000000777777
IT1 032664 0 0 0 201000777777 0 000000777777
AT3 032664 0 0 0 000000777777 0 201000777777
AT6 032664 777777 0 0 000000777777 0 201000777777
FT1A 032664 777777 0 0 000000777777 0 000000777777
FT9 032665 777777 0 0 000000777777 0 000000777777
ET0 032665 777777 0 0 000000777777 0 000000777777
ST1 032665 777777 0 0 000000777777 0 000000777777
ST2 032665 777777 0 0 000000777777 0 000000777777
ST9 032665 777777 0 0 000000777777 0 000000777777
*032665 MOVSI 1,777777
INITIAL
C(AC)=777777 000000
FINAL
C(AC)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032665 032665 0 0 205040777777 0 000000777777
IT1 032665 0 0 0 205040777777 0 000000777777
AT3 032665 0 0 0 000000777777 0 205040777777
AT6 032665 777777 0 0 000000777777 0 205040777777
FT1A 032665 777777 0 0 000000777777 0 000000777777
FT9 032666 777777 0 0 000000777777 0 000000777777
ET0 032666 777777 0 0 777777000000 0 000000777777
ST1 032666 777777 0 0 777777000000 0 000000777777
ST2 032666 777777 0 0 777777000000 0 000000777777
ST9 032666 777777 0 0 777777000000 0 000000777777
*032666 EXCH 0,000001
INITIAL
C(AC)=000000 777777
C(E)=777777 000000
FINAL
C(AC)=777777 000000
C(E)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 032666 032666 0 0 250000000001 0 000000777777
IT1 032666 0 0 0 250000000001 0 000000777777
AT3 032666 0 0 0 000000000001 0 250000000001
AT6 032666 000001 0 0 000000000001 0 250000000001
FT0 032666 000001 0 0 777777000000 0 250000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 345
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0540
FT1A 032666 000001 0 0 777777000000 0 777777000000
FT2 032666 000001 0 0 0 0 777777000000
FT2RQ 032666 000001 0 0 000000777777 0 777777000000
FT3 032666 000001 0 0 000000777777 0 777777000000
FT9 032667 000001 0 0 000000777777 0 777777000000
ET0 032667 000001 0 0 777777000000 0 000000777777
ST1 032667 000001 0 0 777777000000 0 000000777777
ST2 032667 000001 0 0 000000777777 0 000000777777
ST3 032667 000001 0 0 000000777777 0 000000777777
ST5 032667 000001 0 0 000000777777 0 000000777777
ST6A 032667 000001 0 0 000000777777 0 000000777777
ST9 032667 000001 0 0 000000777777 0 000000777777
*032667 CAIE 1,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032667 032667 0 0 302040777777 0 000000777777
IT1 032667 0 0 0 302040777777 0 000000777777
AT3 032667 0 0 0 000000777777 0 302040777777
AT6 032667 777777 0 0 000000777777 0 302040777777
FT1A 032667 777777 0 0 000000777777 0 000000777777
FT2 032667 777777 0 0 0 0 000000777777
FT2RQ 032667 777777 0 0 000000777777 0 000000777777
FT3 032667 777777 0 0 000000777777 0 000000777777
FT9 032670 777777 0 0 000000777777 0 000000777777
ET0 032671 777777 0 0 0 0 000000777777
ST1A 032671 777777 0 0 0 0 000000777777
ST9 032671 777777 0 0 0 0 000000777777
*032671 JUMPA 0,032672
INITIAL
C(AC)=777777 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032671 032671 0 0 324000032672 0 000000032672
IT1 032671 0 0 0 324000032672 0 000000032672
AT3 032671 0 0 0 000000032672 0 324000032672
AT6 032671 032672 0 0 000000032672 0 324000032672
FT1A 032671 032672 0 0 000000032672 0 000000032672
FT2 032671 032672 0 0 0 0 000000032672
FT2RQ 032671 032672 0 0 777777000000 0 000000032672
FT3 032671 032672 0 0 777777000000 0 000000032672
FT9 032672 032672 0 0 777777000000 0 000000032672
ET0 032672 032672 0 0 777777000000 0 000000032672
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 346
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0541
ST1A 032672 032672 0 0 777777000000 0 000000032672
ST9 032672 032672 0 0 777777000000 0 000000032672
*032672 CAME 0,034533
INITIAL
C(AC)=777777 000000
C(E)=777777 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032672 032672 0 0 312000034533 0 777777000000
IT1 032672 0 0 0 312000034533 0 777777000000
AT3 032672 0 0 0 000000034533 0 312000034533
AT6 032672 034533 0 0 000000034533 0 312000034533
FT0 032672 034533 0 0 777777000000 0 312000034533
FT1A 032672 034533 0 0 777777000000 0 777777000000
FT2 032672 034533 0 0 0 0 777777000000
FT2RQ 032672 034533 0 0 777777000000 0 777777000000
FT3 032672 034533 0 0 777777000000 0 777777000000
FT9 032673 034533 0 0 777777000000 0 777777000000
ET0 032674 034533 0 0 0 0 777777000000
ST1A 032674 034533 0 0 0 0 777777000000
ST9 032674 034533 0 0 0 0 777777000000
*032674 JUMPA 0,032675
INITIAL
C(AC)=777777 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032674 032674 0 0 324000032675 0 000000032675
IT1 032674 0 0 0 324000032675 0 000000032675
AT3 032674 0 0 0 000000032675 0 324000032675
AT6 032674 032675 0 0 000000032675 0 324000032675
FT1A 032674 032675 0 0 000000032675 0 000000032675
FT2 032674 032675 0 0 0 0 000000032675
FT2RQ 032674 032675 0 0 777777000000 0 000000032675
FT3 032674 032675 0 0 777777000000 0 000000032675
FT9 032675 032675 0 0 777777000000 0 000000032675
ET0 032675 032675 0 0 777777000000 0 000000032675
ST1A 032675 032675 0 0 777777000000 0 000000032675
ST9 032675 032675 0 0 777777000000 0 000000032675
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 347
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0542
*032675 MOVE 0,034535
INITIAL
C(AC)=777777 000000
C(E)=252525 252525
FINAL
C(AC)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 032675 032675 0 0 200000034535 0 252525252525
IT1 032675 0 0 0 200000034535 0 252525252525
AT3 032675 0 0 0 000000034535 0 200000034535
AT6 032675 034535 0 0 000000034535 0 200000034535
FT0 032675 034535 0 0 252525252525 0 200000034535
FT1A 032675 034535 0 0 252525252525 0 252525252525
FT9 032676 034535 0 0 252525252525 0 252525252525
ET0 032676 034535 0 0 252525252525 0 252525252525
ST1 032676 034535 0 0 252525252525 0 252525252525
ST2 032676 034535 0 0 252525252525 0 252525252525
ST9 032676 034535 0 0 252525252525 0 252525252525
*032676 EXCH 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=252525 252525
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 032676 032676 0 0 250000000000 0 252525252525
IT1 032676 0 0 0 250000000000 0 252525252525
AT3 032676 0 0 0 0 0 250000000000
AT6 032676 0 0 0 0 0 250000000000
FT0 032676 0 0 0 252525252525 0 250000000000
FT1A 032676 0 0 0 252525252525 0 252525252525
FT2 032676 0 0 0 0 0 252525252525
FT2RQ 032676 0 0 0 252525252525 0 252525252525
FT3 032676 0 0 0 252525252525 0 252525252525
FT9 032677 0 0 0 252525252525 0 252525252525
ET0 032677 0 0 0 252525252525 0 252525252525
ST1 032677 0 0 0 252525252525 0 252525252525
ST2 032677 0 0 0 252525252525 0 252525252525
ST3 032677 0 0 0 252525252525 0 252525252525
ST5 032677 0 0 0 252525252525 0 252525252525
ST6A 032677 0 0 0 252525252525 0 252525252525
ST9 032677 0 0 0 252525252525 0 252525252525
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 348
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0543
*032677 EXCH 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=252525 252525
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 032677 032677 0 0 250000000000 0 252525252525
IT1 032677 0 0 0 250000000000 0 252525252525
AT3 032677 0 0 0 0 0 250000000000
AT6 032677 0 0 0 0 0 250000000000
FT0 032677 0 0 0 252525252525 0 250000000000
FT1A 032677 0 0 0 252525252525 0 252525252525
FT2 032677 0 0 0 0 0 252525252525
FT2RQ 032677 0 0 0 252525252525 0 252525252525
FT3 032677 0 0 0 252525252525 0 252525252525
FT9 0 0 0 0 252525252525 0 252525252525
ET0 0 0 0 0 252525252525 0 252525252525
ST1 0 0 0 0 252525252525 0 252525252525
ST2 0 0 0 0 252525252525 0 252525252525
ST3 0 0 0 0 252525252525 0 252525252525
ST5 0 0 0 0 252525252525 0 252525252525
ST6A 0 0 0 0 252525252525 0 252525252525
ST9 0 0 0 0 252525252525 0 252525252525
*032700 EXCH 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=252525 252525
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 250000000000 0 252525252525
IT1 0 0 0 0 250000000000 0 252525252525
AT3 0 0 0 0 0 0 250000000000
AT6 0 0 0 0 0 0 250000000000
FT0 0 0 0 0 252525252525 0 250000000000
FT1A 0 0 0 0 252525252525 0 252525252525
FT2 0 0 0 0 0 0 252525252525
FT2RQ 0 0 0 0 252525252525 0 252525252525
FT3 0 0 0 0 252525252525 0 252525252525
FT9 032701 0 0 0 252525252525 0 252525252525
ET0 032701 0 0 0 252525252525 0 252525252525
ST1 032701 0 0 0 252525252525 0 252525252525
ST2 032701 0 0 0 252525252525 0 252525252525
ST3 032701 0 0 0 252525252525 0 252525252525
ST5 032701 0 0 0 252525252525 0 252525252525
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 349
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0544
ST6A 032701 0 0 0 252525252525 0 252525252525
ST9 032701 0 0 0 252525252525 0 252525252525
*032701 EXCH 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=252525 252525
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 032701 032701 0 0 250000000000 0 252525252525
IT1 032701 0 0 0 250000000000 0 252525252525
AT3 032701 0 0 0 0 0 250000000000
AT6 032701 0 0 0 0 0 250000000000
FT0 032701 0 0 0 252525252525 0 250000000000
FT1A 032701 0 0 0 252525252525 0 252525252525
FT2 032701 0 0 0 0 0 252525252525
FT2RQ 032701 0 0 0 252525252525 0 252525252525
FT3 032701 0 0 0 252525252525 0 252525252525
FT9 032702 0 0 0 252525252525 0 252525252525
ET0 032702 0 0 0 252525252525 0 252525252525
ST1 032702 0 0 0 252525252525 0 252525252525
ST2 032702 0 0 0 252525252525 0 252525252525
ST3 032702 0 0 0 252525252525 0 252525252525
ST5 032702 0 0 0 252525252525 0 252525252525
ST6A 032702 0 0 0 252525252525 0 252525252525
ST9 032702 0 0 0 252525252525 0 252525252525
*032702 EXCH 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=252525 252525
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 032702 032702 0 0 250000000000 0 252525252525
IT1 032702 0 0 0 250000000000 0 252525252525
AT3 032702 0 0 0 0 0 250000000000
AT6 032702 0 0 0 0 0 250000000000
FT0 032702 0 0 0 252525252525 0 250000000000
FT1A 032702 0 0 0 252525252525 0 252525252525
FT2 032702 0 0 0 0 0 252525252525
FT2RQ 032702 0 0 0 252525252525 0 252525252525
FT3 032702 0 0 0 252525252525 0 252525252525
FT9 032703 0 0 0 252525252525 0 252525252525
ET0 032703 0 0 0 252525252525 0 252525252525
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 350
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0545
ST1 032703 0 0 0 252525252525 0 252525252525
ST2 032703 0 0 0 252525252525 0 252525252525
ST3 032703 0 0 0 252525252525 0 252525252525
ST5 032703 0 0 0 252525252525 0 252525252525
ST6A 032703 0 0 0 252525252525 0 252525252525
ST9 032703 0 0 0 252525252525 0 252525252525
*032703 EXCH 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=252525 252525
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 032703 032703 0 0 250000000000 0 252525252525
IT1 032703 0 0 0 250000000000 0 252525252525
AT3 032703 0 0 0 0 0 250000000000
AT6 032703 0 0 0 0 0 250000000000
FT0 032703 0 0 0 252525252525 0 250000000000
FT1A 032703 0 0 0 252525252525 0 252525252525
FT2 032703 0 0 0 0 0 252525252525
FT2RQ 032703 0 0 0 252525252525 0 252525252525
FT3 032703 0 0 0 252525252525 0 252525252525
FT9 032704 0 0 0 252525252525 0 252525252525
ET0 032704 0 0 0 252525252525 0 252525252525
ST1 032704 0 0 0 252525252525 0 252525252525
ST2 032704 0 0 0 252525252525 0 252525252525
ST3 032704 0 0 0 252525252525 0 252525252525
ST5 032704 0 0 0 252525252525 0 252525252525
ST6A 032704 0 0 0 252525252525 0 252525252525
ST9 032704 0 0 0 252525252525 0 252525252525
*032704 EXCH 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=252525 252525
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 032704 032704 0 0 250000000000 0 252525252525
IT1 032704 0 0 0 250000000000 0 252525252525
AT3 032704 0 0 0 0 0 250000000000
AT6 032704 0 0 0 0 0 250000000000
FT0 032704 0 0 0 252525252525 0 250000000000
FT1A 032704 0 0 0 252525252525 0 252525252525
FT2 032704 0 0 0 0 0 252525252525
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 351
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0546
FT2RQ 032704 0 0 0 252525252525 0 252525252525
FT3 032704 0 0 0 252525252525 0 252525252525
FT9 032705 0 0 0 252525252525 0 252525252525
ET0 032705 0 0 0 252525252525 0 252525252525
ST1 032705 0 0 0 252525252525 0 252525252525
ST2 032705 0 0 0 252525252525 0 252525252525
ST3 032705 0 0 0 252525252525 0 252525252525
ST5 032705 0 0 0 252525252525 0 252525252525
ST6A 032705 0 0 0 252525252525 0 252525252525
ST9 032705 0 0 0 252525252525 0 252525252525
*032705 CAME 0,034535
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032705 032705 0 0 312000034535 0 252525252525
IT1 032705 0 0 0 312000034535 0 252525252525
AT3 032705 0 0 0 000000034535 0 312000034535
AT6 032705 034535 0 0 000000034535 0 312000034535
FT0 032705 034535 0 0 252525252525 0 312000034535
FT1A 032705 034535 0 0 252525252525 0 252525252525
FT2 032705 034535 0 0 0 0 252525252525
FT2RQ 032705 034535 0 0 252525252525 0 252525252525
FT3 032705 034535 0 0 252525252525 0 252525252525
FT9 032706 034535 0 0 252525252525 0 252525252525
ET0 032707 034535 0 0 0 0 252525252525
ST1A 032707 034535 0 0 0 0 252525252525
ST9 032707 034535 0 0 0 0 252525252525
*032707 JUMPA 0,032710
INITIAL
C(AC)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032707 032707 0 0 324000032710 0 000000032710
IT1 032707 0 0 0 324000032710 0 000000032710
AT3 032707 0 0 0 000000032710 0 324000032710
AT6 032707 032710 0 0 000000032710 0 324000032710
FT1A 032707 032710 0 0 000000032710 0 000000032710
FT2 032707 032710 0 0 0 0 000000032710
FT2RQ 032707 032710 0 0 252525252525 0 000000032710
FT3 032707 032710 0 0 252525252525 0 000000032710
FT9 032710 032710 0 0 252525252525 0 000000032710
ET0 032710 032710 0 0 252525252525 0 000000032710
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 352
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0547
ST1A 032710 032710 0 0 252525252525 0 000000032710
ST9 032710 032710 0 0 252525252525 0 000000032710
*032710 SETZ 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032710 032710 0 0 400000000000 0 0
IT1 032710 0 0 0 400000000000 0 0
AT3 032710 0 0 0 0 0 400000000000
AT6 032710 0 0 0 0 0 400000000000
FT1A 032710 0 0 0 0 0 0
FT9 032711 0 0 0 0 0 0
ET0 032711 0 0 0 0 0 0
ST1 032711 0 0 0 0 0 0
ST2 032711 0 0 0 0 0 0
ST9 032711 0 0 0 0 0 0
*032711 SETO 1,000000
INITIAL
C(AC)=000000 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032711 032711 0 0 474040000000 0 0
IT1 032711 0 0 0 474040000000 0 0
AT3 032711 0 0 0 0 0 474040000000
AT6 032711 0 0 0 0 0 474040000000
FT1A 032711 0 0 0 0 0 0
FT9 032712 0 0 0 0 0 0
ET0 032712 0 0 0 777777777777 0 0
ST1 032712 0 0 0 777777777777 0 0
ST2 032712 0 0 0 777777777777 0 0
ST9 032712 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 353
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0548
*032712 EXCH 0,000001
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032712 032712 0 0 250000000001 0 0
IT1 032712 0 0 0 250000000001 0 0
AT3 032712 0 0 0 000000000001 0 250000000001
AT6 032712 000001 0 0 000000000001 0 250000000001
FT0 032712 000001 0 0 777777777777 0 250000000001
FT1A 032712 000001 0 0 777777777777 0 777777777777
FT2 032712 000001 0 0 0 0 777777777777
FT2RQ 032712 000001 0 0 0 0 777777777777
FT3 032712 000001 0 0 0 0 777777777777
FT9 032713 000001 0 0 0 0 777777777777
ET0 032713 000001 0 0 777777777777 0 0
ST1 032713 000001 0 0 777777777777 0 0
ST2 032713 000001 0 0 0 0 0
ST3 032713 000001 0 0 0 0 0
ST5 032713 000001 0 0 0 0 0
ST6A 032713 000001 0 0 0 0 0
ST9 032713 000001 0 0 0 0 0
*032713 EXCH 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032713 032713 0 0 250000000001 0 777777777777
IT1 032713 0 0 0 250000000001 0 777777777777
AT3 032713 0 0 0 000000000001 0 250000000001
AT6 032713 000001 0 0 000000000001 0 250000000001
FT0 032713 000001 0 0 0 0 250000000001
FT1A 032713 000001 0 0 0 0 0
FT2 032713 000001 0 0 0 0 0
FT2RQ 032713 000001 0 0 777777777777 0 0
FT3 032713 000001 0 0 777777777777 0 0
FT9 032714 000001 0 0 777777777777 0 0
ET0 032714 000001 0 0 0 0 777777777777
ST1 032714 000001 0 0 0 0 777777777777
ST2 032714 000001 0 0 777777777777 0 777777777777
ST3 032714 000001 0 0 777777777777 0 777777777777
ST5 032714 000001 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 354
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0549
ST6A 032714 000001 0 0 777777777777 0 777777777777
ST9 032714 000001 0 0 777777777777 0 777777777777
*032714 EXCH 0,000001
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032714 032714 0 0 250000000001 0 0
IT1 032714 0 0 0 250000000001 0 0
AT3 032714 0 0 0 000000000001 0 250000000001
AT6 032714 000001 0 0 000000000001 0 250000000001
FT0 032714 000001 0 0 777777777777 0 250000000001
FT1A 032714 000001 0 0 777777777777 0 777777777777
FT2 032714 000001 0 0 0 0 777777777777
FT2RQ 032714 000001 0 0 0 0 777777777777
FT3 032714 000001 0 0 0 0 777777777777
FT9 032715 000001 0 0 0 0 777777777777
ET0 032715 000001 0 0 777777777777 0 0
ST1 032715 000001 0 0 777777777777 0 0
ST2 032715 000001 0 0 0 0 0
ST3 032715 000001 0 0 0 0 0
ST5 032715 000001 0 0 0 0 0
ST6A 032715 000001 0 0 0 0 0
ST9 032715 000001 0 0 0 0 0
*032715 EXCH 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032715 032715 0 0 250000000001 0 777777777777
IT1 032715 0 0 0 250000000001 0 777777777777
AT3 032715 0 0 0 000000000001 0 250000000001
AT6 032715 000001 0 0 000000000001 0 250000000001
FT0 032715 000001 0 0 0 0 250000000001
FT1A 032715 000001 0 0 0 0 0
FT2 032715 000001 0 0 0 0 0
FT2RQ 032715 000001 0 0 777777777777 0 0
FT3 032715 000001 0 0 777777777777 0 0
FT9 032716 000001 0 0 777777777777 0 0
ET0 032716 000001 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 355
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0550
ST1 032716 000001 0 0 0 0 777777777777
ST2 032716 000001 0 0 777777777777 0 777777777777
ST3 032716 000001 0 0 777777777777 0 777777777777
ST5 032716 000001 0 0 777777777777 0 777777777777
ST6A 032716 000001 0 0 777777777777 0 777777777777
ST9 032716 000001 0 0 777777777777 0 777777777777
*032716 EXCH 0,000001
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032716 032716 0 0 250000000001 0 0
IT1 032716 0 0 0 250000000001 0 0
AT3 032716 0 0 0 000000000001 0 250000000001
AT6 032716 000001 0 0 000000000001 0 250000000001
FT0 032716 000001 0 0 777777777777 0 250000000001
FT1A 032716 000001 0 0 777777777777 0 777777777777
FT2 032716 000001 0 0 0 0 777777777777
FT2RQ 032716 000001 0 0 0 0 777777777777
FT3 032716 000001 0 0 0 0 777777777777
FT9 032717 000001 0 0 0 0 777777777777
ET0 032717 000001 0 0 777777777777 0 0
ST1 032717 000001 0 0 777777777777 0 0
ST2 032717 000001 0 0 0 0 0
ST3 032717 000001 0 0 0 0 0
ST5 032717 000001 0 0 0 0 0
ST6A 032717 000001 0 0 0 0 0
ST9 032717 000001 0 0 0 0 0
*032717 EXCH 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032717 032717 0 0 250000000001 0 777777777777
IT1 032717 0 0 0 250000000001 0 777777777777
AT3 032717 0 0 0 000000000001 0 250000000001
AT6 032717 000001 0 0 000000000001 0 250000000001
FT0 032717 000001 0 0 0 0 250000000001
FT1A 032717 000001 0 0 0 0 0
FT2 032717 000001 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 356
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0551
FT2RQ 032717 000001 0 0 777777777777 0 0
FT3 032717 000001 0 0 777777777777 0 0
FT9 032720 000001 0 0 777777777777 0 0
ET0 032720 000001 0 0 0 0 777777777777
ST1 032720 000001 0 0 0 0 777777777777
ST2 032720 000001 0 0 777777777777 0 777777777777
ST3 032720 000001 0 0 777777777777 0 777777777777
ST5 032720 000001 0 0 777777777777 0 777777777777
ST6A 032720 000001 0 0 777777777777 0 777777777777
ST9 032720 000001 0 0 777777777777 0 777777777777
*032720 EXCH 0,000001
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032720 032720 0 0 250000000001 0 0
IT1 032720 0 0 0 250000000001 0 0
AT3 032720 0 0 0 000000000001 0 250000000001
AT6 032720 000001 0 0 000000000001 0 250000000001
FT0 032720 000001 0 0 777777777777 0 250000000001
FT1A 032720 000001 0 0 777777777777 0 777777777777
FT2 032720 000001 0 0 0 0 777777777777
FT2RQ 032720 000001 0 0 0 0 777777777777
FT3 032720 000001 0 0 0 0 777777777777
FT9 032721 000001 0 0 0 0 777777777777
ET0 032721 000001 0 0 777777777777 0 0
ST1 032721 000001 0 0 777777777777 0 0
ST2 032721 000001 0 0 0 0 0
ST3 032721 000001 0 0 0 0 0
ST5 032721 000001 0 0 0 0 0
ST6A 032721 000001 0 0 0 0 0
ST9 032721 000001 0 0 0 0 0
*032721 CAME 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032721 032721 0 0 312000034466 0 777777777777
IT1 032721 0 0 0 312000034466 0 777777777777
AT3 032721 0 0 0 000000034466 0 312000034466
AT6 032721 034466 0 0 000000034466 0 312000034466
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 357
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0552
FT0 032721 034466 0 0 777777777777 0 312000034466
FT1A 032721 034466 0 0 777777777777 0 777777777777
FT2 032721 034466 0 0 0 0 777777777777
FT2RQ 032721 034466 0 0 777777777777 0 777777777777
FT3 032721 034466 0 0 777777777777 0 777777777777
FT9 032722 034466 0 0 777777777777 0 777777777777
ET0 032723 034466 0 0 0 0 777777777777
ST1A 032723 034466 0 0 0 0 777777777777
ST9 032723 034466 0 0 0 0 777777777777
*032723 JUMPA 0,032724
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032723 032723 0 0 324000032724 0 000000032724
IT1 032723 0 0 0 324000032724 0 000000032724
AT3 032723 0 0 0 000000032724 0 324000032724
AT6 032723 032724 0 0 000000032724 0 324000032724
FT1A 032723 032724 0 0 000000032724 0 000000032724
FT2 032723 032724 0 0 0 0 000000032724
FT2RQ 032723 032724 0 0 777777777777 0 000000032724
FT3 032723 032724 0 0 777777777777 0 000000032724
FT9 032724 032724 0 0 777777777777 0 000000032724
ET0 032724 032724 0 0 777777777777 0 000000032724
ST1A 032724 032724 0 0 777777777777 0 000000032724
ST9 032724 032724 0 0 777777777777 0 000000032724
*032724 CAME 1,034536
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032724 032724 0 0 312040034536 0 0
IT1 032724 0 0 0 312040034536 0 0
AT3 032724 0 0 0 000000034536 0 312040034536
AT6 032724 034536 0 0 000000034536 0 312040034536
FT0 032724 034536 0 0 0 0 312040034536
FT1A 032724 034536 0 0 0 0 0
FT2 032724 034536 0 0 0 0 0
FT2RQ 032724 034536 0 0 0 0 0
FT3 032724 034536 0 0 0 0 0
FT9 032725 034536 0 0 0 0 0
ET0 032726 034536 0 0 0 0 0
ST1A 032726 034536 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 358
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0553
ST9 032726 034536 0 0 0 0 0
*032726 JUMPA 0,032727
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032726 032726 0 0 324000032727 0 000000032727
IT1 032726 0 0 0 324000032727 0 000000032727
AT3 032726 0 0 0 000000032727 0 324000032727
AT6 032726 032727 0 0 000000032727 0 324000032727
FT1A 032726 032727 0 0 000000032727 0 000000032727
FT2 032726 032727 0 0 0 0 000000032727
FT2RQ 032726 032727 0 0 777777777777 0 000000032727
FT3 032726 032727 0 0 777777777777 0 000000032727
FT9 032727 032727 0 0 777777777777 0 000000032727
ET0 032727 032727 0 0 777777777777 0 000000032727
ST1A 032727 032727 0 0 777777777777 0 000000032727
ST9 032727 032727 0 0 777777777777 0 000000032727
*032727 SETO 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032727 032727 0 0 474000000000 0 0
IT1 032727 0 0 0 474000000000 0 0
AT3 032727 0 0 0 0 0 474000000000
AT6 032727 0 0 0 0 0 474000000000
FT1A 032727 0 0 0 0 0 0
FT9 032730 0 0 0 0 0 0
ET0 032730 0 0 0 777777777777 0 0
ST1 032730 0 0 0 777777777777 0 0
ST2 032730 0 0 0 777777777777 0 0
ST9 032730 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 359
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0554
*032730 SETZ 1,000000
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032730 032730 0 0 400040000000 0 0
IT1 032730 0 0 0 400040000000 0 0
AT3 032730 0 0 0 0 0 400040000000
AT6 032730 0 0 0 0 0 400040000000
FT1A 032730 0 0 0 0 0 0
FT9 032731 0 0 0 0 0 0
ET0 032731 0 0 0 0 0 0
ST1 032731 0 0 0 0 0 0
ST2 032731 0 0 0 0 0 0
ST9 032731 0 0 0 0 0 0
*032731 MOVEM 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032731 032731 0 0 202000000001 0 000000000001
IT1 032731 0 0 0 202000000001 0 000000000001
AT3 032731 0 0 0 000000000001 0 202000000001
AT6 032731 000001 0 0 000000000001 0 202000000001
FT1A 032731 000001 0 0 000000000001 0 000000000001
FT2 032731 000001 0 0 0 0 000000000001
FT2RQ 032731 000001 0 0 777777777777 0 000000000001
FT3 032731 000001 0 0 777777777777 0 000000000001
FT9 032732 000001 0 0 777777777777 0 000000000001
ET0 032732 000001 0 0 777777777777 0 000000000001
ST6 032732 000001 0 0 777777777777 0 000000000001
ST6A 032732 000001 0 0 777777777777 0 000000000001
ST9 032732 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 360
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0555
*032732 CAME 1,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032732 032732 0 0 312040034466 0 777777777777
IT1 032732 0 0 0 312040034466 0 777777777777
AT3 032732 0 0 0 000000034466 0 312040034466
AT6 032732 034466 0 0 000000034466 0 312040034466
FT0 032732 034466 0 0 777777777777 0 312040034466
FT1A 032732 034466 0 0 777777777777 0 777777777777
FT2 032732 034466 0 0 0 0 777777777777
FT2RQ 032732 034466 0 0 777777777777 0 777777777777
FT3 032732 034466 0 0 777777777777 0 777777777777
FT9 032733 034466 0 0 777777777777 0 777777777777
ET0 032734 034466 0 0 0 0 777777777777
ST1A 032734 034466 0 0 0 0 777777777777
ST9 032734 034466 0 0 0 0 777777777777
*032734 JUMPA 0,032735
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032734 032734 0 0 324000032735 0 000000032735
IT1 032734 0 0 0 324000032735 0 000000032735
AT3 032734 0 0 0 000000032735 0 324000032735
AT6 032734 032735 0 0 000000032735 0 324000032735
FT1A 032734 032735 0 0 000000032735 0 000000032735
FT2 032734 032735 0 0 0 0 000000032735
FT2RQ 032734 032735 0 0 777777777777 0 000000032735
FT3 032734 032735 0 0 777777777777 0 000000032735
FT9 032735 032735 0 0 777777777777 0 000000032735
ET0 032735 032735 0 0 777777777777 0 000000032735
ST1A 032735 032735 0 0 777777777777 0 000000032735
ST9 032735 032735 0 0 777777777777 0 000000032735
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 361
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0556
*032735 CAME 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032735 032735 0 0 312000034466 0 777777777777
IT1 032735 0 0 0 312000034466 0 777777777777
AT3 032735 0 0 0 000000034466 0 312000034466
AT6 032735 034466 0 0 000000034466 0 312000034466
FT0 032735 034466 0 0 777777777777 0 312000034466
FT1A 032735 034466 0 0 777777777777 0 777777777777
FT2 032735 034466 0 0 0 0 777777777777
FT2RQ 032735 034466 0 0 777777777777 0 777777777777
FT3 032735 034466 0 0 777777777777 0 777777777777
FT9 032736 034466 0 0 777777777777 0 777777777777
ET0 032737 034466 0 0 0 0 777777777777
ST1A 032737 034466 0 0 0 0 777777777777
ST9 032737 034466 0 0 0 0 777777777777
*032737 JUMPA 0,032740
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032737 032737 0 0 324000032740 0 000000032740
IT1 032737 0 0 0 324000032740 0 000000032740
AT3 032737 0 0 0 000000032740 0 324000032740
AT6 032737 032740 0 0 000000032740 0 324000032740
FT1A 032737 032740 0 0 000000032740 0 000000032740
FT2 032737 032740 0 0 0 0 000000032740
FT2RQ 032737 032740 0 0 777777777777 0 000000032740
FT3 032737 032740 0 0 777777777777 0 000000032740
FT9 032740 032740 0 0 777777777777 0 000000032740
ET0 032740 032740 0 0 777777777777 0 000000032740
ST1A 032740 032740 0 0 777777777777 0 000000032740
ST9 032740 032740 0 0 777777777777 0 000000032740
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 362
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0557
*032740 MOVE 0,034537
INITIAL
C(AC)=777777 777777
C(E)=254200 032743
FINAL
C(AC)=254200 032743
TIME PC MA SC FE AR MQ BR
IT0 032740 032740 0 0 200000034537 0 254200032743
IT1 032740 0 0 0 200000034537 0 254200032743
AT3 032740 0 0 0 000000034537 0 200000034537
AT6 032740 034537 0 0 000000034537 0 200000034537
FT0 032740 034537 0 0 254200032743 0 200000034537
FT1A 032740 034537 0 0 254200032743 0 254200032743
FT9 032741 034537 0 0 254200032743 0 254200032743
ET0 032741 034537 0 0 254200032743 0 254200032743
ST1 032741 034537 0 0 254200032743 0 254200032743
ST2 032741 034537 0 0 254200032743 0 254200032743
ST9 032741 034537 0 0 254200032743 0 254200032743
*032741 JFCL 17,032742
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032741 032741 0 0 255740032742 0 000000032742
IT1 032741 0 0 0 255740032742 0 000000032742
AT3 032741 0 0 0 000000032742 0 255740032742
AT6 032741 032742 0 0 000000032742 0 255740032742
FT1A 032741 032742 0 0 000000032742 0 000000032742
FT9 032742 032742 0 0 000000032742 0 000000032742
ET0 032742 032742 0 0 000000032742 0 000000032742
ST1A 032742 032742 0 0 000000032742 0 000000032742
ST9 032742 032742 0 0 000000032742 0 000000032742
*032742 CAIA 0,000000
INITIAL
C(AC)=254200 032743
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032742 032742 0 0 304000000000 0 0
IT1 032742 0 0 0 304000000000 0 0
AT3 032742 0 0 0 0 0 304000000000
AT6 032742 0 0 0 0 0 304000000000
FT1A 032742 0 0 0 0 0 0
FT2 032742 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 363
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0558
FT2RQ 032742 0 0 0 254200032743 0 0
FT3 032742 0 0 0 254200032743 0 0
FT9 032743 0 0 0 254200032743 0 0
ET0 032744 0 0 0 254200032743 0 0
ST1A 032744 0 0 0 254200032743 0 0
ST9 032744 0 0 0 254200032743 0 0
*032744 JUMPA 0,032745
INITIAL
C(AC)=254200 032743
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032744 032744 0 0 324000032745 0 000000032745
IT1 032744 0 0 0 324000032745 0 000000032745
AT3 032744 0 0 0 000000032745 0 324000032745
AT6 032744 032745 0 0 000000032745 0 324000032745
FT1A 032744 032745 0 0 000000032745 0 000000032745
FT2 032744 032745 0 0 0 0 000000032745
FT2RQ 032744 032745 0 0 254200032743 0 000000032745
FT3 032744 032745 0 0 254200032743 0 000000032745
FT9 032745 032745 0 0 254200032743 0 000000032745
ET0 032745 032745 0 0 254200032743 0 000000032745
ST1A 032745 032745 0 0 254200032743 0 000000032745
ST9 032745 032745 0 0 254200032743 0 000000032745
*032745 MOVE 0,034466
INITIAL
C(AC)=254200 032743
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032745 032745 0 0 200000034466 0 777777777777
IT1 032745 0 0 0 200000034466 0 777777777777
AT3 032745 0 0 0 000000034466 0 200000034466
AT6 032745 034466 0 0 000000034466 0 200000034466
FT0 032745 034466 0 0 777777777777 0 200000034466
FT1A 032745 034466 0 0 777777777777 0 777777777777
FT9 032746 034466 0 0 777777777777 0 777777777777
ET0 032746 034466 0 0 777777777777 0 777777777777
ST1 032746 034466 0 0 777777777777 0 777777777777
ST2 032746 034466 0 0 777777777777 0 777777777777
ST9 032746 034466 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 364
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0559
*032746 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032746 032746 0 0 271000000001 0 000000000001
IT1 032746 0 0 0 271000000001 0 000000000001
AT3 032746 0 0 0 000000000001 0 271000000001
AT6 032746 000001 0 0 000000000001 0 271000000001
FT1A 032746 000001 0 0 000000000001 0 000000000001
FT2 032746 000001 0 0 0 0 000000000001
FT2RQ 032746 000001 0 0 777777777777 0 000000000001
FT3 032746 000001 0 0 777777777777 0 000000000001
FT9 032747 000001 0 0 777777777777 0 000000000001
ET0 032747 000001 0 0 0 0 000000000001
ST1 032747 000001 0 0 0 0 000000000001
ST2 032747 000001 0 0 0 0 000000000001
ST9 032747 000001 0 0 0 0 000000000001
*032747 JFCL 17,032750
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032747 032747 0 0 255740032750 0 000000032750
IT1 032747 0 0 0 255740032750 0 000000032750
AT3 032747 0 0 0 000000032750 0 255740032750
AT6 032747 032750 0 0 000000032750 0 255740032750
FT1A 032747 032750 0 0 000000032750 0 000000032750
FT9 032750 032750 0 0 000000032750 0 000000032750
ET0 032750 032750 0 0 000000032750 0 000000032750
ST1A 032750 032750 0 0 000000032750 0 000000032750
ST9 032750 032750 0 0 000000032750 0 000000032750
*032750 JFCL 4,032752
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032750 032750 0 0 255200032752 0 000000032752
IT1 032750 0 0 0 255200032752 0 000000032752
AT3 032750 0 0 0 000000032752 0 255200032752
AT6 032750 032752 0 0 000000032752 0 255200032752
FT1A 032750 032752 0 0 000000032752 0 000000032752
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 365
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0560
FT9 032751 032752 0 0 000000032752 0 000000032752
ET0 032751 032752 0 0 000000032752 0 000000032752
ST1A 032751 032752 0 0 000000032752 0 000000032752
ST9 032751 032752 0 0 000000032752 0 000000032752
*032751 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032751 032751 0 0 334000000000 0 0
IT1 032751 0 0 0 334000000000 0 0
AT3 032751 0 0 0 0 0 334000000000
AT6 032751 0 0 0 0 0 334000000000
FT0 032751 0 0 0 0 0 334000000000
FT1A 032751 0 0 0 0 0 0
FT9 032752 0 0 0 0 0 0
ET0 032753 0 0 0 0 0 0
ST1A 032753 0 0 0 0 0 0
ST9 032753 0 0 0 0 0 0
*032753 JUMPA 0,032754
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032753 032753 0 0 324000032754 0 000000032754
IT1 032753 0 0 0 324000032754 0 000000032754
AT3 032753 0 0 0 000000032754 0 324000032754
AT6 032753 032754 0 0 000000032754 0 324000032754
FT1A 032753 032754 0 0 000000032754 0 000000032754
FT2 032753 032754 0 0 0 0 000000032754
FT2RQ 032753 032754 0 0 0 0 000000032754
FT3 032753 032754 0 0 0 0 000000032754
FT9 032754 032754 0 0 0 0 000000032754
ET0 032754 032754 0 0 0 0 000000032754
ST1A 032754 032754 0 0 0 0 000000032754
ST9 032754 032754 0 0 0 0 000000032754
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 366
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0561
*032754 MOVE 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032754 032754 0 0 200000034466 0 777777777777
IT1 032754 0 0 0 200000034466 0 777777777777
AT3 032754 0 0 0 000000034466 0 200000034466
AT6 032754 034466 0 0 000000034466 0 200000034466
FT0 032754 034466 0 0 777777777777 0 200000034466
FT1A 032754 034466 0 0 777777777777 0 777777777777
FT9 032755 034466 0 0 777777777777 0 777777777777
ET0 032755 034466 0 0 777777777777 0 777777777777
ST1 032755 034466 0 0 777777777777 0 777777777777
ST2 032755 034466 0 0 777777777777 0 777777777777
ST9 032755 034466 0 0 777777777777 0 777777777777
*032755 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032755 032755 0 0 271000000001 0 000000000001
IT1 032755 0 0 0 271000000001 0 000000000001
AT3 032755 0 0 0 000000000001 0 271000000001
AT6 032755 000001 0 0 000000000001 0 271000000001
FT1A 032755 000001 0 0 000000000001 0 000000000001
FT2 032755 000001 0 0 0 0 000000000001
FT2RQ 032755 000001 0 0 777777777777 0 000000000001
FT3 032755 000001 0 0 777777777777 0 000000000001
FT9 032756 000001 0 0 777777777777 0 000000000001
ET0 032756 000001 0 0 0 0 000000000001
ST1 032756 000001 0 0 0 0 000000000001
ST2 032756 000001 0 0 0 0 000000000001
ST9 032756 000001 0 0 0 0 000000000001
*032756 JFCL 17,032757
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032756 032756 0 0 255740032757 0 000000032757
IT1 032756 0 0 0 255740032757 0 000000032757
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 367
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0562
AT3 032756 0 0 0 000000032757 0 255740032757
AT6 032756 032757 0 0 000000032757 0 255740032757
FT1A 032756 032757 0 0 000000032757 0 000000032757
FT9 032757 032757 0 0 000000032757 0 000000032757
ET0 032757 032757 0 0 000000032757 0 000000032757
ST1A 032757 032757 0 0 000000032757 0 000000032757
ST9 032757 032757 0 0 000000032757 0 000000032757
*032757 JFCL 2,032761
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032757 032757 0 0 255100032761 0 000000032761
IT1 032757 0 0 0 255100032761 0 000000032761
AT3 032757 0 0 0 000000032761 0 255100032761
AT6 032757 032761 0 0 000000032761 0 255100032761
FT1A 032757 032761 0 0 000000032761 0 000000032761
FT9 032760 032761 0 0 000000032761 0 000000032761
ET0 032760 032761 0 0 000000032761 0 000000032761
ST1A 032760 032761 0 0 000000032761 0 000000032761
ST9 032760 032761 0 0 000000032761 0 000000032761
*032760 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032760 032760 0 0 334000000000 0 0
IT1 032760 0 0 0 334000000000 0 0
AT3 032760 0 0 0 0 0 334000000000
AT6 032760 0 0 0 0 0 334000000000
FT0 032760 0 0 0 0 0 334000000000
FT1A 032760 0 0 0 0 0 0
FT9 032761 0 0 0 0 0 0
ET0 032762 0 0 0 0 0 0
ST1A 032762 0 0 0 0 0 0
ST9 032762 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 368
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0563
*032762 JUMPA 0,032763
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032762 032762 0 0 324000032763 0 000000032763
IT1 032762 0 0 0 324000032763 0 000000032763
AT3 032762 0 0 0 000000032763 0 324000032763
AT6 032762 032763 0 0 000000032763 0 324000032763
FT1A 032762 032763 0 0 000000032763 0 000000032763
FT2 032762 032763 0 0 0 0 000000032763
FT2RQ 032762 032763 0 0 0 0 000000032763
FT3 032762 032763 0 0 0 0 000000032763
FT9 032763 032763 0 0 0 0 000000032763
ET0 032763 032763 0 0 0 0 000000032763
ST1A 032763 032763 0 0 0 0 000000032763
ST9 032763 032763 0 0 0 0 000000032763
*032763 MOVSI 0,400000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 032763 032763 0 0 205000400000 0 000000400000
IT1 032763 0 0 0 205000400000 0 000000400000
AT3 032763 0 0 0 000000400000 0 205000400000
AT6 032763 0 0 0 000000400000 0 205000400000
FT1A 032763 0 0 0 000000400000 0 000000400000
FT9 032764 0 0 0 000000400000 0 000000400000
ET0 032764 0 0 0 400000000000 0 000000400000
ST1 032764 0 0 0 400000000000 0 000000400000
ST2 032764 0 0 0 400000000000 0 000000400000
ST9 032764 0 0 0 400000000000 0 000000400000
*032764 ADD 0,034465
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032764 032764 0 0 270000034465 0 400000000000
IT1 032764 0 0 0 270000034465 0 400000000000
AT3 032764 0 0 0 000000034465 0 270000034465
AT6 032764 034465 0 0 000000034465 0 270000034465
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 369
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0564
FT0 032764 034465 0 0 400000000000 0 270000034465
FT1A 032764 034465 0 0 400000000000 0 400000000000
FT2 032764 034465 0 0 0 0 400000000000
FT2RQ 032764 034465 0 0 400000000000 0 400000000000
FT3 032764 034465 0 0 400000000000 0 400000000000
FT9 032765 034465 0 0 400000000000 0 400000000000
ET0 032765 034465 0 0 0 0 400000000000
ST1 032765 034465 0 0 0 0 400000000000
ST2 032765 034465 0 0 0 0 400000000000
ST9 032765 034465 0 0 0 0 400000000000
*032765 JFCL 17,032766
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032765 032765 0 0 255740032766 0 000000032766
IT1 032765 0 0 0 255740032766 0 000000032766
AT3 032765 0 0 0 000000032766 0 255740032766
AT6 032765 032766 0 0 000000032766 0 255740032766
FT1A 032765 032766 0 0 000000032766 0 000000032766
FT9 032766 032766 0 0 000000032766 0 000000032766
ET0 032766 032766 0 0 000000032766 0 000000032766
ST1A 032766 032766 0 0 000000032766 0 000000032766
ST9 032766 032766 0 0 000000032766 0 000000032766
*032766 JFCL 10,032770
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032766 032766 0 0 255400032770 0 000000032770
IT1 032766 0 0 0 255400032770 0 000000032770
AT3 032766 0 0 0 000000032770 0 255400032770
AT6 032766 032770 0 0 000000032770 0 255400032770
FT1A 032766 032770 0 0 000000032770 0 000000032770
FT9 032767 032770 0 0 000000032770 0 000000032770
ET0 032767 032770 0 0 000000032770 0 000000032770
ST1A 032767 032770 0 0 000000032770 0 000000032770
ST9 032767 032770 0 0 000000032770 0 000000032770
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 370
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0565
*032767 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032767 032767 0 0 334000000000 0 0
IT1 032767 0 0 0 334000000000 0 0
AT3 032767 0 0 0 0 0 334000000000
AT6 032767 0 0 0 0 0 334000000000
FT0 032767 0 0 0 0 0 334000000000
FT1A 032767 0 0 0 0 0 0
FT9 032770 0 0 0 0 0 0
ET0 032771 0 0 0 0 0 0
ST1A 032771 0 0 0 0 0 0
ST9 032771 0 0 0 0 0 0
*032771 JUMPA 0,032772
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032771 032771 0 0 324000032772 0 000000032772
IT1 032771 0 0 0 324000032772 0 000000032772
AT3 032771 0 0 0 000000032772 0 324000032772
AT6 032771 032772 0 0 000000032772 0 324000032772
FT1A 032771 032772 0 0 000000032772 0 000000032772
FT2 032771 032772 0 0 0 0 000000032772
FT2RQ 032771 032772 0 0 0 0 000000032772
FT3 032771 032772 0 0 0 0 000000032772
FT9 032772 032772 0 0 0 0 000000032772
ET0 032772 032772 0 0 0 0 000000032772
ST1A 032772 032772 0 0 0 0 000000032772
ST9 032772 032772 0 0 0 0 000000032772
*032772 MOVSI 0,400000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 032772 032772 0 0 205000400000 0 000000400000
IT1 032772 0 0 0 205000400000 0 000000400000
AT3 032772 0 0 0 000000400000 0 205000400000
AT6 032772 0 0 0 000000400000 0 205000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 371
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0566
FT1A 032772 0 0 0 000000400000 0 000000400000
FT9 032773 0 0 0 000000400000 0 000000400000
ET0 032773 0 0 0 400000000000 0 000000400000
ST1 032773 0 0 0 400000000000 0 000000400000
ST2 032773 0 0 0 400000000000 0 000000400000
ST9 032773 0 0 0 400000000000 0 000000400000
*032773 ADD 0,034466
INITIAL
C(AC)=400000 000000
C(E)=777777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 032773 032773 0 0 270000034466 0 777777777777
IT1 032773 0 0 0 270000034466 0 777777777777
AT3 032773 0 0 0 000000034466 0 270000034466
AT6 032773 034466 0 0 000000034466 0 270000034466
FT0 032773 034466 0 0 777777777777 0 270000034466
FT1A 032773 034466 0 0 777777777777 0 777777777777
FT2 032773 034466 0 0 0 0 777777777777
FT2RQ 032773 034466 0 0 400000000000 0 777777777777
FT3 032773 034466 0 0 400000000000 0 777777777777
FT9 032774 034466 0 0 400000000000 0 777777777777
ET0 032774 034466 0 0 377777777777 0 777777777777
ST1 032774 034466 0 0 377777777777 0 777777777777
ST2 032774 034466 0 0 377777777777 0 777777777777
ST9 032774 034466 0 0 377777777777 0 777777777777
*032774 JFCL 0,032776
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032774 032774 0 0 255000032776 0 000000032776
IT1 032774 0 0 0 255000032776 0 000000032776
AT3 032774 0 0 0 000000032776 0 255000032776
AT6 032774 032776 0 0 000000032776 0 255000032776
FT1A 032774 032776 0 0 000000032776 0 000000032776
FT9 032775 032776 0 0 000000032776 0 000000032776
ET0 032775 032776 0 0 000000032776 0 000000032776
ST1A 032775 032776 0 0 000000032776 0 000000032776
ST9 032775 032776 0 0 000000032776 0 000000032776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 372
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0567
*032775 SKIPA 0,000000
INITIAL
C(AC)=377777 777777
C(E)=377777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 032775 032775 0 0 334000000000 0 377777777777
IT1 032775 0 0 0 334000000000 0 377777777777
AT3 032775 0 0 0 0 0 334000000000
AT6 032775 0 0 0 0 0 334000000000
FT0 032775 0 0 0 377777777777 0 334000000000
FT1A 032775 0 0 0 377777777777 0 377777777777
FT9 032776 0 0 0 377777777777 0 377777777777
ET0 032777 0 0 0 377777777777 0 377777777777
ST1A 032777 0 0 0 377777777777 0 377777777777
ST9 032777 0 0 0 377777777777 0 377777777777
*032777 JUMPA 0,033000
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032777 032777 0 0 324000033000 0 000000033000
IT1 032777 0 0 0 324000033000 0 000000033000
AT3 032777 0 0 0 000000033000 0 324000033000
AT6 032777 0 0 0 000000033000 0 324000033000
FT1A 032777 0 0 0 000000033000 0 000000033000
FT2 032777 0 0 0 0 0 000000033000
FT2RQ 032777 0 0 0 377777777777 0 000000033000
FT3 032777 0 0 0 377777777777 0 000000033000
FT9 0 0 0 0 377777777777 0 000000033000
ET0 0 0 0 0 377777777777 0 000000033000
ST1A 0 0 0 0 377777777777 0 000000033000
ST9 0 0 0 0 377777777777 0 000000033000
*033000 MOVSI 0,200000
INITIAL
C(AC)=377777 777777
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 205000200000 0 000000200000
IT1 0 0 0 0 205000200000 0 000000200000
AT3 0 0 0 0 000000200000 0 205000200000
AT6 0 0 0 0 000000200000 0 205000200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 373
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0568
FT1A 0 0 0 0 000000200000 0 000000200000
FT9 033001 0 0 0 000000200000 0 000000200000
ET0 033001 0 0 0 200000000000 0 000000200000
ST1 033001 0 0 0 200000000000 0 000000200000
ST2 033001 0 0 0 200000000000 0 000000200000
ST9 033001 0 0 0 200000000000 0 000000200000
*033001 ADD 0,034464
INITIAL
C(AC)=200000 000000
C(E)=200000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033001 033001 0 0 270000034464 0 200000000000
IT1 033001 0 0 0 270000034464 0 200000000000
AT3 033001 0 0 0 000000034464 0 270000034464
AT6 033001 034464 0 0 000000034464 0 270000034464
FT0 033001 034464 0 0 200000000000 0 270000034464
FT1A 033001 034464 0 0 200000000000 0 200000000000
FT2 033001 034464 0 0 0 0 200000000000
FT2RQ 033001 034464 0 0 200000000000 0 200000000000
FT3 033001 034464 0 0 200000000000 0 200000000000
FT9 033002 034464 0 0 200000000000 0 200000000000
ET0 033002 034464 0 0 400000000000 0 200000000000
ST1 033002 034464 0 0 400000000000 0 200000000000
ST2 033002 034464 0 0 400000000000 0 200000000000
ST9 033002 034464 0 0 400000000000 0 200000000000
*033002 JFCL 0,033004
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033002 033002 0 0 255000033004 0 000000033004
IT1 033002 0 0 0 255000033004 0 000000033004
AT3 033002 0 0 0 000000033004 0 255000033004
AT6 033002 033004 0 0 000000033004 0 255000033004
FT1A 033002 033004 0 0 000000033004 0 000000033004
FT9 033003 033004 0 0 000000033004 0 000000033004
ET0 033003 033004 0 0 000000033004 0 000000033004
ST1A 033003 033004 0 0 000000033004 0 000000033004
ST9 033003 033004 0 0 000000033004 0 000000033004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 374
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0569
*033003 SKIPA 0,000000
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033003 033003 0 0 334000000000 0 400000000000
IT1 033003 0 0 0 334000000000 0 400000000000
AT3 033003 0 0 0 0 0 334000000000
AT6 033003 0 0 0 0 0 334000000000
FT0 033003 0 0 0 400000000000 0 334000000000
FT1A 033003 0 0 0 400000000000 0 400000000000
FT9 033004 0 0 0 400000000000 0 400000000000
ET0 033005 0 0 0 400000000000 0 400000000000
ST1A 033005 0 0 0 400000000000 0 400000000000
ST9 033005 0 0 0 400000000000 0 400000000000
*033005 JUMPA 0,033006
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033005 033005 0 0 324000033006 0 000000033006
IT1 033005 0 0 0 324000033006 0 000000033006
AT3 033005 0 0 0 000000033006 0 324000033006
AT6 033005 033006 0 0 000000033006 0 324000033006
FT1A 033005 033006 0 0 000000033006 0 000000033006
FT2 033005 033006 0 0 0 0 000000033006
FT2RQ 033005 033006 0 0 400000000000 0 000000033006
FT3 033005 033006 0 0 400000000000 0 000000033006
FT9 033006 033006 0 0 400000000000 0 000000033006
ET0 033006 033006 0 0 400000000000 0 000000033006
ST1A 033006 033006 0 0 400000000000 0 000000033006
ST9 033006 033006 0 0 400000000000 0 000000033006
*033006 MOVE 0,034466
INITIAL
C(AC)=400000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033006 033006 0 0 200000034466 0 777777777777
IT1 033006 0 0 0 200000034466 0 777777777777
AT3 033006 0 0 0 000000034466 0 200000034466
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 375
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0570
AT6 033006 034466 0 0 000000034466 0 200000034466
FT0 033006 034466 0 0 777777777777 0 200000034466
FT1A 033006 034466 0 0 777777777777 0 777777777777
FT9 033007 034466 0 0 777777777777 0 777777777777
ET0 033007 034466 0 0 777777777777 0 777777777777
ST1 033007 034466 0 0 777777777777 0 777777777777
ST2 033007 034466 0 0 777777777777 0 777777777777
ST9 033007 034466 0 0 777777777777 0 777777777777
*033007 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033007 033007 0 0 271000000001 0 000000000001
IT1 033007 0 0 0 271000000001 0 000000000001
AT3 033007 0 0 0 000000000001 0 271000000001
AT6 033007 000001 0 0 000000000001 0 271000000001
FT1A 033007 000001 0 0 000000000001 0 000000000001
FT2 033007 000001 0 0 0 0 000000000001
FT2RQ 033007 000001 0 0 777777777777 0 000000000001
FT3 033007 000001 0 0 777777777777 0 000000000001
FT9 033010 000001 0 0 777777777777 0 000000000001
ET0 033010 000001 0 0 0 0 000000000001
ST1 033010 000001 0 0 0 0 000000000001
ST2 033010 000001 0 0 0 0 000000000001
ST9 033010 000001 0 0 0 0 000000000001
*033010 JFCL 17,033012
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033010 033010 0 0 255740033012 0 000000033012
IT1 033010 0 0 0 255740033012 0 000000033012
AT3 033010 0 0 0 000000033012 0 255740033012
AT6 033010 033012 0 0 000000033012 0 255740033012
FT1A 033010 033012 0 0 000000033012 0 000000033012
FT9 033011 033012 0 0 000000033012 0 000000033012
ET0 033012 033012 0 0 000000033012 0 000000033012
ST1A 033012 033012 0 0 000000033012 0 000000033012
ST9 033012 033012 0 0 000000033012 0 000000033012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 376
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0571
*033012 JUMPA 0,033013
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033012 033012 0 0 324000033013 0 000000033013
IT1 033012 0 0 0 324000033013 0 000000033013
AT3 033012 0 0 0 000000033013 0 324000033013
AT6 033012 033013 0 0 000000033013 0 324000033013
FT1A 033012 033013 0 0 000000033013 0 000000033013
FT2 033012 033013 0 0 0 0 000000033013
FT2RQ 033012 033013 0 0 0 0 000000033013
FT3 033012 033013 0 0 0 0 000000033013
FT9 033013 033013 0 0 0 0 000000033013
ET0 033013 033013 0 0 0 0 000000033013
ST1A 033013 033013 0 0 0 0 000000033013
ST9 033013 033013 0 0 0 0 000000033013
*033013 MOVE 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033013 033013 0 0 200000034466 0 777777777777
IT1 033013 0 0 0 200000034466 0 777777777777
AT3 033013 0 0 0 000000034466 0 200000034466
AT6 033013 034466 0 0 000000034466 0 200000034466
FT0 033013 034466 0 0 777777777777 0 200000034466
FT1A 033013 034466 0 0 777777777777 0 777777777777
FT9 033014 034466 0 0 777777777777 0 777777777777
ET0 033014 034466 0 0 777777777777 0 777777777777
ST1 033014 034466 0 0 777777777777 0 777777777777
ST2 033014 034466 0 0 777777777777 0 777777777777
ST9 033014 034466 0 0 777777777777 0 777777777777
*033014 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033014 033014 0 0 271000000001 0 000000000001
IT1 033014 0 0 0 271000000001 0 000000000001
AT3 033014 0 0 0 000000000001 0 271000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 377
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0572
AT6 033014 000001 0 0 000000000001 0 271000000001
FT1A 033014 000001 0 0 000000000001 0 000000000001
FT2 033014 000001 0 0 0 0 000000000001
FT2RQ 033014 000001 0 0 777777777777 0 000000000001
FT3 033014 000001 0 0 777777777777 0 000000000001
FT9 033015 000001 0 0 777777777777 0 000000000001
ET0 033015 000001 0 0 0 0 000000000001
ST1 033015 000001 0 0 0 0 000000000001
ST2 033015 000001 0 0 0 0 000000000001
ST9 033015 000001 0 0 0 0 000000000001
*033015 CAI 17,000017
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033015 033015 0 0 300740000017 0 000000000017
IT1 033015 0 0 0 300740000017 0 000000000017
AT3 033015 0 0 0 000000000017 0 300740000017
AT6 033015 000017 0 0 000000000017 0 300740000017
FT1A 033015 000017 0 0 000000000017 0 000000000017
FT2 033015 000017 0 0 0 0 000000000017
FT2RQ 033015 000017 0 0 000000777723 0 000000000017
FT3 033015 000017 0 0 000000777723 0 000000000017
FT9 033016 000017 0 0 000000777723 0 000000000017
ET0 033016 000017 0 0 000000777704 0 000000000017
ST1A 033016 000017 0 0 000000777704 0 000000000017
ST9 033016 000017 0 0 000000777704 0 000000000017
*033016 JFCL 17,033020
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033016 033016 0 0 255740033020 0 000000033020
IT1 033016 0 0 0 255740033020 0 000000033020
AT3 033016 0 0 0 000000033020 0 255740033020
AT6 033016 033020 0 0 000000033020 0 255740033020
FT1A 033016 033020 0 0 000000033020 0 000000033020
FT9 033017 033020 0 0 000000033020 0 000000033020
ET0 033020 033020 0 0 000000033020 0 000000033020
ST1A 033020 033020 0 0 000000033020 0 000000033020
ST9 033020 033020 0 0 000000033020 0 000000033020
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 378
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0573
*033020 JUMPA 0,033021
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033020 033020 0 0 324000033021 0 000000033021
IT1 033020 0 0 0 324000033021 0 000000033021
AT3 033020 0 0 0 000000033021 0 324000033021
AT6 033020 033021 0 0 000000033021 0 324000033021
FT1A 033020 033021 0 0 000000033021 0 000000033021
FT2 033020 033021 0 0 0 0 000000033021
FT2RQ 033020 033021 0 0 0 0 000000033021
FT3 033020 033021 0 0 0 0 000000033021
FT9 033021 033021 0 0 0 0 000000033021
ET0 033021 033021 0 0 0 0 000000033021
ST1A 033021 033021 0 0 0 0 000000033021
ST9 033021 033021 0 0 0 0 000000033021
*033021 MOVE 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033021 033021 0 0 200000034466 0 777777777777
IT1 033021 0 0 0 200000034466 0 777777777777
AT3 033021 0 0 0 000000034466 0 200000034466
AT6 033021 034466 0 0 000000034466 0 200000034466
FT0 033021 034466 0 0 777777777777 0 200000034466
FT1A 033021 034466 0 0 777777777777 0 777777777777
FT9 033022 034466 0 0 777777777777 0 777777777777
ET0 033022 034466 0 0 777777777777 0 777777777777
ST1 033022 034466 0 0 777777777777 0 777777777777
ST2 033022 034466 0 0 777777777777 0 777777777777
ST9 033022 034466 0 0 777777777777 0 777777777777
*033022 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033022 033022 0 0 271000000001 0 000000000001
IT1 033022 0 0 0 271000000001 0 000000000001
AT3 033022 0 0 0 000000000001 0 271000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 379
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0574
AT6 033022 000001 0 0 000000000001 0 271000000001
FT1A 033022 000001 0 0 000000000001 0 000000000001
FT2 033022 000001 0 0 0 0 000000000001
FT2RQ 033022 000001 0 0 777777777777 0 000000000001
FT3 033022 000001 0 0 777777777777 0 000000000001
FT9 033023 000001 0 0 777777777777 0 000000000001
ET0 033023 000001 0 0 0 0 000000000001
ST1 033023 000001 0 0 0 0 000000000001
ST2 033023 000001 0 0 0 0 000000000001
ST9 033023 000001 0 0 0 0 000000000001
*033023 JFCL 2,033025
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033023 033023 0 0 255100033025 0 000000033025
IT1 033023 0 0 0 255100033025 0 000000033025
AT3 033023 0 0 0 000000033025 0 255100033025
AT6 033023 033025 0 0 000000033025 0 255100033025
FT1A 033023 033025 0 0 000000033025 0 000000033025
FT9 033024 033025 0 0 000000033025 0 000000033025
ET0 033025 033025 0 0 000000033025 0 000000033025
ST1A 033025 033025 0 0 000000033025 0 000000033025
ST9 033025 033025 0 0 000000033025 0 000000033025
*033025 JUMPA 0,033026
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033025 033025 0 0 324000033026 0 000000033026
IT1 033025 0 0 0 324000033026 0 000000033026
AT3 033025 0 0 0 000000033026 0 324000033026
AT6 033025 033026 0 0 000000033026 0 324000033026
FT1A 033025 033026 0 0 000000033026 0 000000033026
FT2 033025 033026 0 0 0 0 000000033026
FT2RQ 033025 033026 0 0 0 0 000000033026
FT3 033025 033026 0 0 0 0 000000033026
FT9 033026 033026 0 0 0 0 000000033026
ET0 033026 033026 0 0 0 0 000000033026
ST1A 033026 033026 0 0 0 0 000000033026
ST9 033026 033026 0 0 0 0 000000033026
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 380
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0575
*033026 MOVE 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033026 033026 0 0 200000034466 0 777777777777
IT1 033026 0 0 0 200000034466 0 777777777777
AT3 033026 0 0 0 000000034466 0 200000034466
AT6 033026 034466 0 0 000000034466 0 200000034466
FT0 033026 034466 0 0 777777777777 0 200000034466
FT1A 033026 034466 0 0 777777777777 0 777777777777
FT9 033027 034466 0 0 777777777777 0 777777777777
ET0 033027 034466 0 0 777777777777 0 777777777777
ST1 033027 034466 0 0 777777777777 0 777777777777
ST2 033027 034466 0 0 777777777777 0 777777777777
ST9 033027 034466 0 0 777777777777 0 777777777777
*033027 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033027 033027 0 0 271000000001 0 000000000001
IT1 033027 0 0 0 271000000001 0 000000000001
AT3 033027 0 0 0 000000000001 0 271000000001
AT6 033027 000001 0 0 000000000001 0 271000000001
FT1A 033027 000001 0 0 000000000001 0 000000000001
FT2 033027 000001 0 0 0 0 000000000001
FT2RQ 033027 000001 0 0 777777777777 0 000000000001
FT3 033027 000001 0 0 777777777777 0 000000000001
FT9 033030 000001 0 0 777777777777 0 000000000001
ET0 033030 000001 0 0 0 0 000000000001
ST1 033030 000001 0 0 0 0 000000000001
ST2 033030 000001 0 0 0 0 000000000001
ST9 033030 000001 0 0 0 0 000000000001
*033030 JFCL 4,033032
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033030 033030 0 0 255200033032 0 000000033032
IT1 033030 0 0 0 255200033032 0 000000033032
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 381
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0576
AT3 033030 0 0 0 000000033032 0 255200033032
AT6 033030 033032 0 0 000000033032 0 255200033032
FT1A 033030 033032 0 0 000000033032 0 000000033032
FT9 033031 033032 0 0 000000033032 0 000000033032
ET0 033032 033032 0 0 000000033032 0 000000033032
ST1A 033032 033032 0 0 000000033032 0 000000033032
ST9 033032 033032 0 0 000000033032 0 000000033032
*033032 JUMPA 0,033033
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033032 033032 0 0 324000033033 0 000000033033
IT1 033032 0 0 0 324000033033 0 000000033033
AT3 033032 0 0 0 000000033033 0 324000033033
AT6 033032 033033 0 0 000000033033 0 324000033033
FT1A 033032 033033 0 0 000000033033 0 000000033033
FT2 033032 033033 0 0 0 0 000000033033
FT2RQ 033032 033033 0 0 0 0 000000033033
FT3 033032 033033 0 0 0 0 000000033033
FT9 033033 033033 0 0 0 0 000000033033
ET0 033033 033033 0 0 0 0 000000033033
ST1A 033033 033033 0 0 0 0 000000033033
ST9 033033 033033 0 0 0 0 000000033033
*033033 MOVSI 0,400000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033033 033033 0 0 205000400000 0 000000400000
IT1 033033 0 0 0 205000400000 0 000000400000
AT3 033033 0 0 0 000000400000 0 205000400000
AT6 033033 0 0 0 000000400000 0 205000400000
FT1A 033033 0 0 0 000000400000 0 000000400000
FT9 033034 0 0 0 000000400000 0 000000400000
ET0 033034 0 0 0 400000000000 0 000000400000
ST1 033034 0 0 0 400000000000 0 000000400000
ST2 033034 0 0 0 400000000000 0 000000400000
ST9 033034 0 0 0 400000000000 0 000000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 382
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0577
*033034 ADD 0,034465
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033034 033034 0 0 270000034465 0 400000000000
IT1 033034 0 0 0 270000034465 0 400000000000
AT3 033034 0 0 0 000000034465 0 270000034465
AT6 033034 034465 0 0 000000034465 0 270000034465
FT0 033034 034465 0 0 400000000000 0 270000034465
FT1A 033034 034465 0 0 400000000000 0 400000000000
FT2 033034 034465 0 0 0 0 400000000000
FT2RQ 033034 034465 0 0 400000000000 0 400000000000
FT3 033034 034465 0 0 400000000000 0 400000000000
FT9 033035 034465 0 0 400000000000 0 400000000000
ET0 033035 034465 0 0 0 0 400000000000
ST1 033035 034465 0 0 0 0 400000000000
ST2 033035 034465 0 0 0 0 400000000000
ST9 033035 034465 0 0 0 0 400000000000
*033035 JFCL 10,033037
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033035 033035 0 0 255400033037 0 000000033037
IT1 033035 0 0 0 255400033037 0 000000033037
AT3 033035 0 0 0 000000033037 0 255400033037
AT6 033035 033037 0 0 000000033037 0 255400033037
FT1A 033035 033037 0 0 000000033037 0 000000033037
FT9 033036 033037 0 0 000000033037 0 000000033037
ET0 033037 033037 0 0 000000033037 0 000000033037
ST1A 033037 033037 0 0 000000033037 0 000000033037
ST9 033037 033037 0 0 000000033037 0 000000033037
*033037 JUMPA 0,033040
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033037 033037 0 0 324000033040 0 000000033040
IT1 033037 0 0 0 324000033040 0 000000033040
AT3 033037 0 0 0 000000033040 0 324000033040
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 383
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0578
AT6 033037 033040 0 0 000000033040 0 324000033040
FT1A 033037 033040 0 0 000000033040 0 000000033040
FT2 033037 033040 0 0 0 0 000000033040
FT2RQ 033037 033040 0 0 0 0 000000033040
FT3 033037 033040 0 0 0 0 000000033040
FT9 033040 033040 0 0 0 0 000000033040
ET0 033040 033040 0 0 0 0 000000033040
ST1A 033040 033040 0 0 0 0 000000033040
ST9 033040 033040 0 0 0 0 000000033040
*033040 JFCL 17,033041
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033040 033040 0 0 255740033041 0 000000033041
IT1 033040 0 0 0 255740033041 0 000000033041
AT3 033040 0 0 0 000000033041 0 255740033041
AT6 033040 033041 0 0 000000033041 0 255740033041
FT1A 033040 033041 0 0 000000033041 0 000000033041
FT9 033041 033041 0 0 000000033041 0 000000033041
ET0 033041 033041 0 0 000000033041 0 000000033041
ST1A 033041 033041 0 0 000000033041 0 000000033041
ST9 033041 033041 0 0 000000033041 0 000000033041
*033041 JFCL 1,033043
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033041 033041 0 0 255040033043 0 000000033043
IT1 033041 0 0 0 255040033043 0 000000033043
AT3 033041 0 0 0 000000033043 0 255040033043
AT6 033041 033043 0 0 000000033043 0 255040033043
FT1A 033041 033043 0 0 000000033043 0 000000033043
FT9 033042 033043 0 0 000000033043 0 000000033043
ET0 033042 033043 0 0 000000033043 0 000000033043
ST1A 033042 033043 0 0 000000033043 0 000000033043
ST9 033042 033043 0 0 000000033043 0 000000033043
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 384
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0579
*033042 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033042 033042 0 0 334000000000 0 0
IT1 033042 0 0 0 334000000000 0 0
AT3 033042 0 0 0 0 0 334000000000
AT6 033042 0 0 0 0 0 334000000000
FT0 033042 0 0 0 0 0 334000000000
FT1A 033042 0 0 0 0 0 0
FT9 033043 0 0 0 0 0 0
ET0 033044 0 0 0 0 0 0
ST1A 033044 0 0 0 0 0 0
ST9 033044 0 0 0 0 0 0
*033044 JUMPA 0,033045
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033044 033044 0 0 324000033045 0 000000033045
IT1 033044 0 0 0 324000033045 0 000000033045
AT3 033044 0 0 0 000000033045 0 324000033045
AT6 033044 033045 0 0 000000033045 0 324000033045
FT1A 033044 033045 0 0 000000033045 0 000000033045
FT2 033044 033045 0 0 0 0 000000033045
FT2RQ 033044 033045 0 0 0 0 000000033045
FT3 033044 033045 0 0 0 0 000000033045
FT9 033045 033045 0 0 0 0 000000033045
ET0 033045 033045 0 0 0 0 000000033045
ST1A 033045 033045 0 0 0 0 000000033045
ST9 033045 033045 0 0 0 0 000000033045
*033045 MOVE 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033045 033045 0 0 200000034466 0 777777777777
IT1 033045 0 0 0 200000034466 0 777777777777
AT3 033045 0 0 0 000000034466 0 200000034466
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 385
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0580
AT6 033045 034466 0 0 000000034466 0 200000034466
FT0 033045 034466 0 0 777777777777 0 200000034466
FT1A 033045 034466 0 0 777777777777 0 777777777777
FT9 033046 034466 0 0 777777777777 0 777777777777
ET0 033046 034466 0 0 777777777777 0 777777777777
ST1 033046 034466 0 0 777777777777 0 777777777777
ST2 033046 034466 0 0 777777777777 0 777777777777
ST9 033046 034466 0 0 777777777777 0 777777777777
*033046 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033046 033046 0 0 271000000001 0 000000000001
IT1 033046 0 0 0 271000000001 0 000000000001
AT3 033046 0 0 0 000000000001 0 271000000001
AT6 033046 000001 0 0 000000000001 0 271000000001
FT1A 033046 000001 0 0 000000000001 0 000000000001
FT2 033046 000001 0 0 0 0 000000000001
FT2RQ 033046 000001 0 0 777777777777 0 000000000001
FT3 033046 000001 0 0 777777777777 0 000000000001
FT9 033047 000001 0 0 777777777777 0 000000000001
ET0 033047 000001 0 0 0 0 000000000001
ST1 033047 000001 0 0 0 0 000000000001
ST2 033047 000001 0 0 0 0 000000000001
ST9 033047 000001 0 0 0 0 000000000001
*033047 JFCL 13,033050
INITIAL
C(AC)=000000 000013
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033047 033047 0 0 255540033050 0 000000033050
IT1 033047 0 0 0 255540033050 0 000000033050
AT3 033047 0 0 0 000000033050 0 255540033050
AT6 033047 033050 0 0 000000033050 0 255540033050
FT1A 033047 033050 0 0 000000033050 0 000000033050
FT9 033050 033050 0 0 000000033050 0 000000033050
ET0 033050 033050 0 0 000000033050 0 000000033050
ST1A 033050 033050 0 0 000000033050 0 000000033050
ST9 033050 033050 0 0 000000033050 0 000000033050
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 386
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0581
*033050 JFCL 4,033052
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033050 033050 0 0 255200033052 0 000000033052
IT1 033050 0 0 0 255200033052 0 000000033052
AT3 033050 0 0 0 000000033052 0 255200033052
AT6 033050 033052 0 0 000000033052 0 255200033052
FT1A 033050 033052 0 0 000000033052 0 000000033052
FT9 033051 033052 0 0 000000033052 0 000000033052
ET0 033052 033052 0 0 000000033052 0 000000033052
ST1A 033052 033052 0 0 000000033052 0 000000033052
ST9 033052 033052 0 0 000000033052 0 000000033052
*033052 JUMPA 0,033053
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033052 033052 0 0 324000033053 0 000000033053
IT1 033052 0 0 0 324000033053 0 000000033053
AT3 033052 0 0 0 000000033053 0 324000033053
AT6 033052 033053 0 0 000000033053 0 324000033053
FT1A 033052 033053 0 0 000000033053 0 000000033053
FT2 033052 033053 0 0 0 0 000000033053
FT2RQ 033052 033053 0 0 0 0 000000033053
FT3 033052 033053 0 0 0 0 000000033053
FT9 033053 033053 0 0 0 0 000000033053
ET0 033053 033053 0 0 0 0 000000033053
ST1A 033053 033053 0 0 0 0 000000033053
ST9 033053 033053 0 0 0 0 000000033053
*033053 MOVE 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033053 033053 0 0 200000034466 0 777777777777
IT1 033053 0 0 0 200000034466 0 777777777777
AT3 033053 0 0 0 000000034466 0 200000034466
AT6 033053 034466 0 0 000000034466 0 200000034466
FT0 033053 034466 0 0 777777777777 0 200000034466
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 387
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0582
FT1A 033053 034466 0 0 777777777777 0 777777777777
FT9 033054 034466 0 0 777777777777 0 777777777777
ET0 033054 034466 0 0 777777777777 0 777777777777
ST1 033054 034466 0 0 777777777777 0 777777777777
ST2 033054 034466 0 0 777777777777 0 777777777777
ST9 033054 034466 0 0 777777777777 0 777777777777
*033054 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033054 033054 0 0 271000000001 0 000000000001
IT1 033054 0 0 0 271000000001 0 000000000001
AT3 033054 0 0 0 000000000001 0 271000000001
AT6 033054 000001 0 0 000000000001 0 271000000001
FT1A 033054 000001 0 0 000000000001 0 000000000001
FT2 033054 000001 0 0 0 0 000000000001
FT2RQ 033054 000001 0 0 777777777777 0 000000000001
FT3 033054 000001 0 0 777777777777 0 000000000001
FT9 033055 000001 0 0 777777777777 0 000000000001
ET0 033055 000001 0 0 0 0 000000000001
ST1 033055 000001 0 0 0 0 000000000001
ST2 033055 000001 0 0 0 0 000000000001
ST9 033055 000001 0 0 0 0 000000000001
*033055 JFCL 15,033056
INITIAL
C(AC)=000000 000015
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033055 033055 0 0 255640033056 0 000000033056
IT1 033055 0 0 0 255640033056 0 000000033056
AT3 033055 0 0 0 000000033056 0 255640033056
AT6 033055 033056 0 0 000000033056 0 255640033056
FT1A 033055 033056 0 0 000000033056 0 000000033056
FT9 033056 033056 0 0 000000033056 0 000000033056
ET0 033056 033056 0 0 000000033056 0 000000033056
ST1A 033056 033056 0 0 000000033056 0 000000033056
ST9 033056 033056 0 0 000000033056 0 000000033056
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 388
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0583
*033056 JFCL 2,033060
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033056 033056 0 0 255100033060 0 000000033060
IT1 033056 0 0 0 255100033060 0 000000033060
AT3 033056 0 0 0 000000033060 0 255100033060
AT6 033056 033060 0 0 000000033060 0 255100033060
FT1A 033056 033060 0 0 000000033060 0 000000033060
FT9 033057 033060 0 0 000000033060 0 000000033060
ET0 033060 033060 0 0 000000033060 0 000000033060
ST1A 033060 033060 0 0 000000033060 0 000000033060
ST9 033060 033060 0 0 000000033060 0 000000033060
*033060 JUMPA 0,033061
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033060 033060 0 0 324000033061 0 000000033061
IT1 033060 0 0 0 324000033061 0 000000033061
AT3 033060 0 0 0 000000033061 0 324000033061
AT6 033060 033061 0 0 000000033061 0 324000033061
FT1A 033060 033061 0 0 000000033061 0 000000033061
FT2 033060 033061 0 0 0 0 000000033061
FT2RQ 033060 033061 0 0 0 0 000000033061
FT3 033060 033061 0 0 0 0 000000033061
FT9 033061 033061 0 0 0 0 000000033061
ET0 033061 033061 0 0 0 0 000000033061
ST1A 033061 033061 0 0 0 0 000000033061
ST9 033061 033061 0 0 0 0 000000033061
*033061 MOVSI 0,400000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033061 033061 0 0 205000400000 0 000000400000
IT1 033061 0 0 0 205000400000 0 000000400000
AT3 033061 0 0 0 000000400000 0 205000400000
AT6 033061 0 0 0 000000400000 0 205000400000
FT1A 033061 0 0 0 000000400000 0 000000400000
FT9 033062 0 0 0 000000400000 0 000000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 389
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0584
ET0 033062 0 0 0 400000000000 0 000000400000
ST1 033062 0 0 0 400000000000 0 000000400000
ST2 033062 0 0 0 400000000000 0 000000400000
ST9 033062 0 0 0 400000000000 0 000000400000
*033062 ADD 0,034465
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033062 033062 0 0 270000034465 0 400000000000
IT1 033062 0 0 0 270000034465 0 400000000000
AT3 033062 0 0 0 000000034465 0 270000034465
AT6 033062 034465 0 0 000000034465 0 270000034465
FT0 033062 034465 0 0 400000000000 0 270000034465
FT1A 033062 034465 0 0 400000000000 0 400000000000
FT2 033062 034465 0 0 0 0 400000000000
FT2RQ 033062 034465 0 0 400000000000 0 400000000000
FT3 033062 034465 0 0 400000000000 0 400000000000
FT9 033063 034465 0 0 400000000000 0 400000000000
ET0 033063 034465 0 0 0 0 400000000000
ST1 033063 034465 0 0 0 0 400000000000
ST2 033063 034465 0 0 0 0 400000000000
ST9 033063 034465 0 0 0 0 400000000000
*033063 JFCL 7,033064
INITIAL
C(AC)=000000 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033063 033063 0 0 255340033064 0 000000033064
IT1 033063 0 0 0 255340033064 0 000000033064
AT3 033063 0 0 0 000000033064 0 255340033064
AT6 033063 033064 0 0 000000033064 0 255340033064
FT1A 033063 033064 0 0 000000033064 0 000000033064
FT9 033064 033064 0 0 000000033064 0 000000033064
ET0 033064 033064 0 0 000000033064 0 000000033064
ST1A 033064 033064 0 0 000000033064 0 000000033064
ST9 033064 033064 0 0 000000033064 0 000000033064
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 390
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0585
*033064 JFCL 10,033066
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033064 033064 0 0 255400033066 0 000000033066
IT1 033064 0 0 0 255400033066 0 000000033066
AT3 033064 0 0 0 000000033066 0 255400033066
AT6 033064 033066 0 0 000000033066 0 255400033066
FT1A 033064 033066 0 0 000000033066 0 000000033066
FT9 033065 033066 0 0 000000033066 0 000000033066
ET0 033066 033066 0 0 000000033066 0 000000033066
ST1A 033066 033066 0 0 000000033066 0 000000033066
ST9 033066 033066 0 0 000000033066 0 000000033066
*033066 JUMPA 0,033067
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033066 033066 0 0 324000033067 0 000000033067
IT1 033066 0 0 0 324000033067 0 000000033067
AT3 033066 0 0 0 000000033067 0 324000033067
AT6 033066 033067 0 0 000000033067 0 324000033067
FT1A 033066 033067 0 0 000000033067 0 000000033067
FT2 033066 033067 0 0 0 0 000000033067
FT2RQ 033066 033067 0 0 0 0 000000033067
FT3 033066 033067 0 0 0 0 000000033067
FT9 033067 033067 0 0 0 0 000000033067
ET0 033067 033067 0 0 0 0 000000033067
ST1A 033067 033067 0 0 0 0 000000033067
ST9 033067 033067 0 0 0 0 000000033067
*033067 JFCL 17,033070
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033067 033067 0 0 255740033070 0 000000033070
IT1 033067 0 0 0 255740033070 0 000000033070
AT3 033067 0 0 0 000000033070 0 255740033070
AT6 033067 033070 0 0 000000033070 0 255740033070
FT1A 033067 033070 0 0 000000033070 0 000000033070
FT9 033070 033070 0 0 000000033070 0 000000033070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 391
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0586
ET0 033070 033070 0 0 000000033070 0 000000033070
ST1A 033070 033070 0 0 000000033070 0 000000033070
ST9 033070 033070 0 0 000000033070 0 000000033070
*033070 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033070 033070 0 0 400000000000 0 0
IT1 033070 0 0 0 400000000000 0 0
AT3 033070 0 0 0 0 0 400000000000
AT6 033070 0 0 0 0 0 400000000000
FT1A 033070 0 0 0 0 0 0
FT9 033071 0 0 0 0 0 0
ET0 033071 0 0 0 0 0 0
ST1 033071 0 0 0 0 0 0
ST2 033071 0 0 0 0 0 0
ST9 033071 0 0 0 0 0 0
*033071 ADD 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033071 033071 0 0 270000000000 0 0
IT1 033071 0 0 0 270000000000 0 0
AT3 033071 0 0 0 0 0 270000000000
AT6 033071 0 0 0 0 0 270000000000
FT0 033071 0 0 0 0 0 270000000000
FT1A 033071 0 0 0 0 0 0
FT2 033071 0 0 0 0 0 0
FT2RQ 033071 0 0 0 0 0 0
FT3 033071 0 0 0 0 0 0
FT9 033072 0 0 0 0 0 0
ET0 033072 0 0 0 0 0 0
ST1 033072 0 0 0 0 0 0
ST2 033072 0 0 0 0 0 0
ST9 033072 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 392
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0587
*033072 JFCL 10,033074
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033072 033072 0 0 255400033074 0 000000033074
IT1 033072 0 0 0 255400033074 0 000000033074
AT3 033072 0 0 0 000000033074 0 255400033074
AT6 033072 033074 0 0 000000033074 0 255400033074
FT1A 033072 033074 0 0 000000033074 0 000000033074
FT9 033073 033074 0 0 000000033074 0 000000033074
ET0 033073 033074 0 0 000000033074 0 000000033074
ST1A 033073 033074 0 0 000000033074 0 000000033074
ST9 033073 033074 0 0 000000033074 0 000000033074
*033073 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033073 033073 0 0 334000000000 0 0
IT1 033073 0 0 0 334000000000 0 0
AT3 033073 0 0 0 0 0 334000000000
AT6 033073 0 0 0 0 0 334000000000
FT0 033073 0 0 0 0 0 334000000000
FT1A 033073 0 0 0 0 0 0
FT9 033074 0 0 0 0 0 0
ET0 033075 0 0 0 0 0 0
ST1A 033075 0 0 0 0 0 0
ST9 033075 0 0 0 0 0 0
*033075 JUMPA 0,033076
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033075 033075 0 0 324000033076 0 000000033076
IT1 033075 0 0 0 324000033076 0 000000033076
AT3 033075 0 0 0 000000033076 0 324000033076
AT6 033075 033076 0 0 000000033076 0 324000033076
FT1A 033075 033076 0 0 000000033076 0 000000033076
FT2 033075 033076 0 0 0 0 000000033076
FT2RQ 033075 033076 0 0 0 0 000000033076
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 393
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0588
FT3 033075 033076 0 0 0 0 000000033076
FT9 033076 033076 0 0 0 0 000000033076
ET0 033076 033076 0 0 0 0 000000033076
ST1A 033076 033076 0 0 0 0 000000033076
ST9 033076 033076 0 0 0 0 000000033076
*033076 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033076 033076 0 0 400000000000 0 0
IT1 033076 0 0 0 400000000000 0 0
AT3 033076 0 0 0 0 0 400000000000
AT6 033076 0 0 0 0 0 400000000000
FT1A 033076 0 0 0 0 0 0
FT9 033077 0 0 0 0 0 0
ET0 033077 0 0 0 0 0 0
ST1 033077 0 0 0 0 0 0
ST2 033077 0 0 0 0 0 0
ST9 033077 0 0 0 0 0 0
*033077 JFCL 17,033100
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033077 033077 0 0 255740033100 0 000000033100
IT1 033077 0 0 0 255740033100 0 000000033100
AT3 033077 0 0 0 000000033100 0 255740033100
AT6 033077 0 0 0 000000033100 0 255740033100
FT1A 033077 0 0 0 000000033100 0 000000033100
FT9 0 0 0 0 000000033100 0 000000033100
ET0 0 0 0 0 000000033100 0 000000033100
ST1A 0 0 0 0 000000033100 0 000000033100
ST9 0 0 0 0 000000033100 0 000000033100
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 394
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0589
*033100 ADD 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 270000000000 0 0
IT1 0 0 0 0 270000000000 0 0
AT3 0 0 0 0 0 0 270000000000
AT6 0 0 0 0 0 0 270000000000
FT0 0 0 0 0 0 0 270000000000
FT1A 0 0 0 0 0 0 0
FT2 0 0 0 0 0 0 0
FT2RQ 0 0 0 0 0 0 0
FT3 0 0 0 0 0 0 0
FT9 033101 0 0 0 0 0 0
ET0 033101 0 0 0 0 0 0
ST1 033101 0 0 0 0 0 0
ST2 033101 0 0 0 0 0 0
ST9 033101 0 0 0 0 0 0
*033101 JFCL 4,033103
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033101 033101 0 0 255200033103 0 000000033103
IT1 033101 0 0 0 255200033103 0 000000033103
AT3 033101 0 0 0 000000033103 0 255200033103
AT6 033101 033103 0 0 000000033103 0 255200033103
FT1A 033101 033103 0 0 000000033103 0 000000033103
FT9 033102 033103 0 0 000000033103 0 000000033103
ET0 033102 033103 0 0 000000033103 0 000000033103
ST1A 033102 033103 0 0 000000033103 0 000000033103
ST9 033102 033103 0 0 000000033103 0 000000033103
*033102 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033102 033102 0 0 334000000000 0 0
IT1 033102 0 0 0 334000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 395
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0590
AT3 033102 0 0 0 0 0 334000000000
AT6 033102 0 0 0 0 0 334000000000
FT0 033102 0 0 0 0 0 334000000000
FT1A 033102 0 0 0 0 0 0
FT9 033103 0 0 0 0 0 0
ET0 033104 0 0 0 0 0 0
ST1A 033104 0 0 0 0 0 0
ST9 033104 0 0 0 0 0 0
*033104 JUMPA 0,033105
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033104 033104 0 0 324000033105 0 000000033105
IT1 033104 0 0 0 324000033105 0 000000033105
AT3 033104 0 0 0 000000033105 0 324000033105
AT6 033104 033105 0 0 000000033105 0 324000033105
FT1A 033104 033105 0 0 000000033105 0 000000033105
FT2 033104 033105 0 0 0 0 000000033105
FT2RQ 033104 033105 0 0 0 0 000000033105
FT3 033104 033105 0 0 0 0 000000033105
FT9 033105 033105 0 0 0 0 000000033105
ET0 033105 033105 0 0 0 0 000000033105
ST1A 033105 033105 0 0 0 0 000000033105
ST9 033105 033105 0 0 0 0 000000033105
*033105 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033105 033105 0 0 400000000000 0 0
IT1 033105 0 0 0 400000000000 0 0
AT3 033105 0 0 0 0 0 400000000000
AT6 033105 0 0 0 0 0 400000000000
FT1A 033105 0 0 0 0 0 0
FT9 033106 0 0 0 0 0 0
ET0 033106 0 0 0 0 0 0
ST1 033106 0 0 0 0 0 0
ST2 033106 0 0 0 0 0 0
ST9 033106 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 396
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0591
*033106 JFCL 17,033107
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033106 033106 0 0 255740033107 0 000000033107
IT1 033106 0 0 0 255740033107 0 000000033107
AT3 033106 0 0 0 000000033107 0 255740033107
AT6 033106 033107 0 0 000000033107 0 255740033107
FT1A 033106 033107 0 0 000000033107 0 000000033107
FT9 033107 033107 0 0 000000033107 0 000000033107
ET0 033107 033107 0 0 000000033107 0 000000033107
ST1A 033107 033107 0 0 000000033107 0 000000033107
ST9 033107 033107 0 0 000000033107 0 000000033107
*033107 ADD 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033107 033107 0 0 270000000000 0 0
IT1 033107 0 0 0 270000000000 0 0
AT3 033107 0 0 0 0 0 270000000000
AT6 033107 0 0 0 0 0 270000000000
FT0 033107 0 0 0 0 0 270000000000
FT1A 033107 0 0 0 0 0 0
FT2 033107 0 0 0 0 0 0
FT2RQ 033107 0 0 0 0 0 0
FT3 033107 0 0 0 0 0 0
FT9 033110 0 0 0 0 0 0
ET0 033110 0 0 0 0 0 0
ST1 033110 0 0 0 0 0 0
ST2 033110 0 0 0 0 0 0
ST9 033110 0 0 0 0 0 0
*033110 JFCL 2,033112
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033110 033110 0 0 255100033112 0 000000033112
IT1 033110 0 0 0 255100033112 0 000000033112
AT3 033110 0 0 0 000000033112 0 255100033112
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 397
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0592
AT6 033110 033112 0 0 000000033112 0 255100033112
FT1A 033110 033112 0 0 000000033112 0 000000033112
FT9 033111 033112 0 0 000000033112 0 000000033112
ET0 033111 033112 0 0 000000033112 0 000000033112
ST1A 033111 033112 0 0 000000033112 0 000000033112
ST9 033111 033112 0 0 000000033112 0 000000033112
*033111 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033111 033111 0 0 334000000000 0 0
IT1 033111 0 0 0 334000000000 0 0
AT3 033111 0 0 0 0 0 334000000000
AT6 033111 0 0 0 0 0 334000000000
FT0 033111 0 0 0 0 0 334000000000
FT1A 033111 0 0 0 0 0 0
FT9 033112 0 0 0 0 0 0
ET0 033113 0 0 0 0 0 0
ST1A 033113 0 0 0 0 0 0
ST9 033113 0 0 0 0 0 0
*033113 JUMPA 0,033114
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033113 033113 0 0 324000033114 0 000000033114
IT1 033113 0 0 0 324000033114 0 000000033114
AT3 033113 0 0 0 000000033114 0 324000033114
AT6 033113 033114 0 0 000000033114 0 324000033114
FT1A 033113 033114 0 0 000000033114 0 000000033114
FT2 033113 033114 0 0 0 0 000000033114
FT2RQ 033113 033114 0 0 0 0 000000033114
FT3 033113 033114 0 0 0 0 000000033114
FT9 033114 033114 0 0 0 0 000000033114
ET0 033114 033114 0 0 0 0 000000033114
ST1A 033114 033114 0 0 0 0 000000033114
ST9 033114 033114 0 0 0 0 000000033114
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 398
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0593
*033114 JFCL 17,033115
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033114 033114 0 0 255740033115 0 000000033115
IT1 033114 0 0 0 255740033115 0 000000033115
AT3 033114 0 0 0 000000033115 0 255740033115
AT6 033114 033115 0 0 000000033115 0 255740033115
FT1A 033114 033115 0 0 000000033115 0 000000033115
FT9 033115 033115 0 0 000000033115 0 000000033115
ET0 033115 033115 0 0 000000033115 0 000000033115
ST1A 033115 033115 0 0 000000033115 0 000000033115
ST9 033115 033115 0 0 000000033115 0 000000033115
*033115 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033115 033115 0 0 400000000000 0 0
IT1 033115 0 0 0 400000000000 0 0
AT3 033115 0 0 0 0 0 400000000000
AT6 033115 0 0 0 0 0 400000000000
FT1A 033115 0 0 0 0 0 0
FT9 033116 0 0 0 0 0 0
ET0 033116 0 0 0 0 0 0
ST1 033116 0 0 0 0 0 0
ST2 033116 0 0 0 0 0 0
ST9 033116 0 0 0 0 0 0
*033116 CAI 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033116 033116 0 0 300000000000 0 0
IT1 033116 0 0 0 300000000000 0 0
AT3 033116 0 0 0 0 0 300000000000
AT6 033116 0 0 0 0 0 300000000000
FT1A 033116 0 0 0 0 0 0
FT2 033116 0 0 0 0 0 0
FT2RQ 033116 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 399
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0594
FT3 033116 0 0 0 0 0 0
FT9 033117 0 0 0 0 0 0
ET0 033117 0 0 0 0 0 0
ST1A 033117 0 0 0 0 0 0
ST9 033117 0 0 0 0 0 0
*033117 CAM 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033117 033117 0 0 310000034466 0 777777777777
IT1 033117 0 0 0 310000034466 0 777777777777
AT3 033117 0 0 0 000000034466 0 310000034466
AT6 033117 034466 0 0 000000034466 0 310000034466
FT0 033117 034466 0 0 777777777777 0 310000034466
FT1A 033117 034466 0 0 777777777777 0 777777777777
FT2 033117 034466 0 0 0 0 777777777777
FT2RQ 033117 034466 0 0 0 0 777777777777
FT3 033117 034466 0 0 0 0 777777777777
FT9 033120 034466 0 0 0 0 777777777777
ET0 033120 034466 0 0 000000000001 0 777777777777
ST1A 033120 034466 0 0 000000000001 0 777777777777
ST9 033120 034466 0 0 000000000001 0 777777777777
*033120 JFCL 17,033122
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033120 033120 0 0 255740033122 0 000000033122
IT1 033120 0 0 0 255740033122 0 000000033122
AT3 033120 0 0 0 000000033122 0 255740033122
AT6 033120 033122 0 0 000000033122 0 255740033122
FT1A 033120 033122 0 0 000000033122 0 000000033122
FT9 033121 033122 0 0 000000033122 0 000000033122
ET0 033121 033122 0 0 000000033122 0 000000033122
ST1A 033121 033122 0 0 000000033122 0 000000033122
ST9 033121 033122 0 0 000000033122 0 000000033122
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 400
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0595
*033121 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033121 033121 0 0 334000000000 0 0
IT1 033121 0 0 0 334000000000 0 0
AT3 033121 0 0 0 0 0 334000000000
AT6 033121 0 0 0 0 0 334000000000
FT0 033121 0 0 0 0 0 334000000000
FT1A 033121 0 0 0 0 0 0
FT9 033122 0 0 0 0 0 0
ET0 033123 0 0 0 0 0 0
ST1A 033123 0 0 0 0 0 0
ST9 033123 0 0 0 0 0 0
*033123 JUMPA 0,033124
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033123 033123 0 0 324000033124 0 000000033124
IT1 033123 0 0 0 324000033124 0 000000033124
AT3 033123 0 0 0 000000033124 0 324000033124
AT6 033123 033124 0 0 000000033124 0 324000033124
FT1A 033123 033124 0 0 000000033124 0 000000033124
FT2 033123 033124 0 0 0 0 000000033124
FT2RQ 033123 033124 0 0 0 0 000000033124
FT3 033123 033124 0 0 0 0 000000033124
FT9 033124 033124 0 0 0 0 000000033124
ET0 033124 033124 0 0 0 0 000000033124
ST1A 033124 033124 0 0 0 0 000000033124
ST9 033124 033124 0 0 0 0 000000033124
*033124 JFCL 17,033125
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033124 033124 0 0 255740033125 0 000000033125
IT1 033124 0 0 0 255740033125 0 000000033125
AT3 033124 0 0 0 000000033125 0 255740033125
AT6 033124 033125 0 0 000000033125 0 255740033125
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 401
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0596
FT1A 033124 033125 0 0 000000033125 0 000000033125
FT9 033125 033125 0 0 000000033125 0 000000033125
ET0 033125 033125 0 0 000000033125 0 000000033125
ST1A 033125 033125 0 0 000000033125 0 000000033125
ST9 033125 033125 0 0 000000033125 0 000000033125
*033125 SETO 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033125 033125 0 0 474000000000 0 0
IT1 033125 0 0 0 474000000000 0 0
AT3 033125 0 0 0 0 0 474000000000
AT6 033125 0 0 0 0 0 474000000000
FT1A 033125 0 0 0 0 0 0
FT9 033126 0 0 0 0 0 0
ET0 033126 0 0 0 777777777777 0 0
ST1 033126 0 0 0 777777777777 0 0
ST2 033126 0 0 0 777777777777 0 0
ST9 033126 0 0 0 777777777777 0 0
*033126 XOR 0,034536
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033126 033126 0 0 430000034536 0 0
IT1 033126 0 0 0 430000034536 0 0
AT3 033126 0 0 0 000000034536 0 430000034536
AT6 033126 034536 0 0 000000034536 0 430000034536
FT0 033126 034536 0 0 0 0 430000034536
FT1A 033126 034536 0 0 0 0 0
FT2 033126 034536 0 0 0 0 0
FT2RQ 033126 034536 0 0 777777777777 0 0
FT3 033126 034536 0 0 777777777777 0 0
FT9 033127 034536 0 0 777777777777 0 0
ET0 033127 034536 0 0 777777777777 0 0
ST1 033127 034536 0 0 777777777777 0 0
ST2 033127 034536 0 0 777777777777 0 0
ST9 033127 034536 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 402
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0597
*033127 XOR 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033127 033127 0 0 430000034466 0 777777777777
IT1 033127 0 0 0 430000034466 0 777777777777
AT3 033127 0 0 0 000000034466 0 430000034466
AT6 033127 034466 0 0 000000034466 0 430000034466
FT0 033127 034466 0 0 777777777777 0 430000034466
FT1A 033127 034466 0 0 777777777777 0 777777777777
FT2 033127 034466 0 0 0 0 777777777777
FT2RQ 033127 034466 0 0 777777777777 0 777777777777
FT3 033127 034466 0 0 777777777777 0 777777777777
FT9 033130 034466 0 0 777777777777 0 777777777777
ET0 033130 034466 0 0 0 0 777777777777
ST1 033130 034466 0 0 0 0 777777777777
ST2 033130 034466 0 0 0 0 777777777777
ST9 033130 034466 0 0 0 0 777777777777
*033130 JFCL 17,033132
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033130 033130 0 0 255740033132 0 000000033132
IT1 033130 0 0 0 255740033132 0 000000033132
AT3 033130 0 0 0 000000033132 0 255740033132
AT6 033130 033132 0 0 000000033132 0 255740033132
FT1A 033130 033132 0 0 000000033132 0 000000033132
FT9 033131 033132 0 0 000000033132 0 000000033132
ET0 033131 033132 0 0 000000033132 0 000000033132
ST1A 033131 033132 0 0 000000033132 0 000000033132
ST9 033131 033132 0 0 000000033132 0 000000033132
*033131 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033131 033131 0 0 334000000000 0 0
IT1 033131 0 0 0 334000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 403
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0598
AT3 033131 0 0 0 0 0 334000000000
AT6 033131 0 0 0 0 0 334000000000
FT0 033131 0 0 0 0 0 334000000000
FT1A 033131 0 0 0 0 0 0
FT9 033132 0 0 0 0 0 0
ET0 033133 0 0 0 0 0 0
ST1A 033133 0 0 0 0 0 0
ST9 033133 0 0 0 0 0 0
*033133 JUMPA 0,033134
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033133 033133 0 0 324000033134 0 000000033134
IT1 033133 0 0 0 324000033134 0 000000033134
AT3 033133 0 0 0 000000033134 0 324000033134
AT6 033133 033134 0 0 000000033134 0 324000033134
FT1A 033133 033134 0 0 000000033134 0 000000033134
FT2 033133 033134 0 0 0 0 000000033134
FT2RQ 033133 033134 0 0 0 0 000000033134
FT3 033133 033134 0 0 0 0 000000033134
FT9 033134 033134 0 0 0 0 000000033134
ET0 033134 033134 0 0 0 0 000000033134
ST1A 033134 033134 0 0 0 0 000000033134
ST9 033134 033134 0 0 0 0 000000033134
*033134 SETO 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033134 033134 0 0 474000000000 0 0
IT1 033134 0 0 0 474000000000 0 0
AT3 033134 0 0 0 0 0 474000000000
AT6 033134 0 0 0 0 0 474000000000
FT1A 033134 0 0 0 0 0 0
FT9 033135 0 0 0 0 0 0
ET0 033135 0 0 0 777777777777 0 0
ST1 033135 0 0 0 777777777777 0 0
ST2 033135 0 0 0 777777777777 0 0
ST9 033135 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 404
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0599
*033135 JFCL 17,033136
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033135 033135 0 0 255740033136 0 000000033136
IT1 033135 0 0 0 255740033136 0 000000033136
AT3 033135 0 0 0 000000033136 0 255740033136
AT6 033135 033136 0 0 000000033136 0 255740033136
FT1A 033135 033136 0 0 000000033136 0 000000033136
FT9 033136 033136 0 0 000000033136 0 000000033136
ET0 033136 033136 0 0 000000033136 0 000000033136
ST1A 033136 033136 0 0 000000033136 0 000000033136
ST9 033136 033136 0 0 000000033136 0 000000033136
*033136 AOBJN 0,033137
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000001 000000
TIME PC MA SC FE AR MQ BR
IT0 033136 033136 0 0 253000033137 0 000000033137
IT1 033136 0 0 0 253000033137 0 000000033137
AT3 033136 0 0 0 000000033137 0 253000033137
AT6 033136 033137 0 0 000000033137 0 253000033137
FT1A 033136 033137 0 0 000000033137 0 000000033137
FT2 033136 033137 0 0 0 0 000000033137
FT2RQ 033136 033137 0 0 777777777777 0 000000033137
FT3 033136 033137 0 0 777777777777 0 000000033137
FT9 033137 033137 0 0 777777777777 0 000000033137
ET0 033137 033137 0 0 000001000000 0 000000033137
ST1 033137 033137 0 0 000001000000 0 000000033137
ST2 033137 033137 0 0 000001000000 0 000000033137
ST9 033137 033137 0 0 000001000000 0 000000033137
*033137 AOBJP 0,033140
INITIAL
C(AC)=000001 000000
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 033137 033137 0 0 252000033140 0 000000033140
IT1 033137 0 0 0 252000033140 0 000000033140
AT3 033137 0 0 0 000000033140 0 252000033140
AT6 033137 033140 0 0 000000033140 0 252000033140
FT1A 033137 033140 0 0 000000033140 0 000000033140
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 405
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0600
FT2 033137 033140 0 0 0 0 000000033140
FT2RQ 033137 033140 0 0 000001000000 0 000000033140
FT3 033137 033140 0 0 000001000000 0 000000033140
FT9 033140 033140 0 0 000001000000 0 000000033140
ET0 033140 033140 0 0 000002000001 0 000000033140
ST1 033140 033140 0 0 000002000001 0 000000033140
ST2 033140 033140 0 0 000002000001 0 000000033140
ST9 033140 033140 0 0 000002000001 0 000000033140
*033140 JFCL 17,033142
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033140 033140 0 0 255740033142 0 000000033142
IT1 033140 0 0 0 255740033142 0 000000033142
AT3 033140 0 0 0 000000033142 0 255740033142
AT6 033140 033142 0 0 000000033142 0 255740033142
FT1A 033140 033142 0 0 000000033142 0 000000033142
FT9 033141 033142 0 0 000000033142 0 000000033142
ET0 033141 033142 0 0 000000033142 0 000000033142
ST1A 033141 033142 0 0 000000033142 0 000000033142
ST9 033141 033142 0 0 000000033142 0 000000033142
*033141 SKIPA 0,000000
INITIAL
C(AC)=000002 000001
C(E)=000002 000001
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 033141 033141 0 0 334000000000 0 000002000001
IT1 033141 0 0 0 334000000000 0 000002000001
AT3 033141 0 0 0 0 0 334000000000
AT6 033141 0 0 0 0 0 334000000000
FT0 033141 0 0 0 000002000001 0 334000000000
FT1A 033141 0 0 0 000002000001 0 000002000001
FT9 033142 0 0 0 000002000001 0 000002000001
ET0 033143 0 0 0 000002000001 0 000002000001
ST1A 033143 0 0 0 000002000001 0 000002000001
ST9 033143 0 0 0 000002000001 0 000002000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 406
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0601
*033143 JUMPA 0,033144
INITIAL
C(AC)=000002 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033143 033143 0 0 324000033144 0 000000033144
IT1 033143 0 0 0 324000033144 0 000000033144
AT3 033143 0 0 0 000000033144 0 324000033144
AT6 033143 033144 0 0 000000033144 0 324000033144
FT1A 033143 033144 0 0 000000033144 0 000000033144
FT2 033143 033144 0 0 0 0 000000033144
FT2RQ 033143 033144 0 0 000002000001 0 000000033144
FT3 033143 033144 0 0 000002000001 0 000000033144
FT9 033144 033144 0 0 000002000001 0 000000033144
ET0 033144 033144 0 0 000002000001 0 000000033144
ST1A 033144 033144 0 0 000002000001 0 000000033144
ST9 033144 033144 0 0 000002000001 0 000000033144
*033144 JFCL 17,033145
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033144 033144 0 0 255740033145 0 000000033145
IT1 033144 0 0 0 255740033145 0 000000033145
AT3 033144 0 0 0 000000033145 0 255740033145
AT6 033144 033145 0 0 000000033145 0 255740033145
FT1A 033144 033145 0 0 000000033145 0 000000033145
FT9 033145 033145 0 0 000000033145 0 000000033145
ET0 033145 033145 0 0 000000033145 0 000000033145
ST1A 033145 033145 0 0 000000033145 0 000000033145
ST9 033145 033145 0 0 000000033145 0 000000033145
*033145 SKIP 0,034466
INITIAL
C(AC)=000002 000001
C(E)=777777 777777
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 033145 033145 0 0 330000034466 0 777777777777
IT1 033145 0 0 0 330000034466 0 777777777777
AT3 033145 0 0 0 000000034466 0 330000034466
AT6 033145 034466 0 0 000000034466 0 330000034466
FT0 033145 034466 0 0 777777777777 0 330000034466
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 407
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0602
FT1A 033145 034466 0 0 777777777777 0 777777777777
FT9 033146 034466 0 0 777777777777 0 777777777777
ET0 033146 034466 0 0 777777777777 0 777777777777
ST1A 033146 034466 0 0 777777777777 0 777777777777
ST9 033146 034466 0 0 777777777777 0 777777777777
*033146 JFCL 17,033150
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033146 033146 0 0 255740033150 0 000000033150
IT1 033146 0 0 0 255740033150 0 000000033150
AT3 033146 0 0 0 000000033150 0 255740033150
AT6 033146 033150 0 0 000000033150 0 255740033150
FT1A 033146 033150 0 0 000000033150 0 000000033150
FT9 033147 033150 0 0 000000033150 0 000000033150
ET0 033147 033150 0 0 000000033150 0 000000033150
ST1A 033147 033150 0 0 000000033150 0 000000033150
ST9 033147 033150 0 0 000000033150 0 000000033150
*033147 SKIPA 0,000000
INITIAL
C(AC)=000002 000001
C(E)=000002 000001
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 033147 033147 0 0 334000000000 0 000002000001
IT1 033147 0 0 0 334000000000 0 000002000001
AT3 033147 0 0 0 0 0 334000000000
AT6 033147 0 0 0 0 0 334000000000
FT0 033147 0 0 0 000002000001 0 334000000000
FT1A 033147 0 0 0 000002000001 0 000002000001
FT9 033150 0 0 0 000002000001 0 000002000001
ET0 033151 0 0 0 000002000001 0 000002000001
ST1A 033151 0 0 0 000002000001 0 000002000001
ST9 033151 0 0 0 000002000001 0 000002000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 408
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0603
*033151 JUMPA 0,033152
INITIAL
C(AC)=000002 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033151 033151 0 0 324000033152 0 000000033152
IT1 033151 0 0 0 324000033152 0 000000033152
AT3 033151 0 0 0 000000033152 0 324000033152
AT6 033151 033152 0 0 000000033152 0 324000033152
FT1A 033151 033152 0 0 000000033152 0 000000033152
FT2 033151 033152 0 0 0 0 000000033152
FT2RQ 033151 033152 0 0 000002000001 0 000000033152
FT3 033151 033152 0 0 000002000001 0 000000033152
FT9 033152 033152 0 0 000002000001 0 000000033152
ET0 033152 033152 0 0 000002000001 0 000000033152
ST1A 033152 033152 0 0 000002000001 0 000000033152
ST9 033152 033152 0 0 000002000001 0 000000033152
*033152 JFCL 17,033153
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033152 033152 0 0 255740033153 0 000000033153
IT1 033152 0 0 0 255740033153 0 000000033153
AT3 033152 0 0 0 000000033153 0 255740033153
AT6 033152 033153 0 0 000000033153 0 255740033153
FT1A 033152 033153 0 0 000000033153 0 000000033153
FT9 033153 033153 0 0 000000033153 0 000000033153
ET0 033153 033153 0 0 000000033153 0 000000033153
ST1A 033153 033153 0 0 000000033153 0 000000033153
ST9 033153 033153 0 0 000000033153 0 000000033153
*033153 JUMP 0,034466
INITIAL
C(AC)=000002 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033153 033153 0 0 320000034466 0 000000034466
IT1 033153 0 0 0 320000034466 0 000000034466
AT3 033153 0 0 0 000000034466 0 320000034466
AT6 033153 034466 0 0 000000034466 0 320000034466
FT1A 033153 034466 0 0 000000034466 0 000000034466
FT2 033153 034466 0 0 0 0 000000034466
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 409
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0604
FT2RQ 033153 034466 0 0 000002000001 0 000000034466
FT3 033153 034466 0 0 000002000001 0 000000034466
FT9 033154 034466 0 0 000002000001 0 000000034466
ET0 033154 034466 0 0 000002000001 0 000000034466
ST1A 033154 034466 0 0 000002000001 0 000000034466
ST9 033154 034466 0 0 000002000001 0 000000034466
*033154 JFCL 17,033156
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033154 033154 0 0 255740033156 0 000000033156
IT1 033154 0 0 0 255740033156 0 000000033156
AT3 033154 0 0 0 000000033156 0 255740033156
AT6 033154 033156 0 0 000000033156 0 255740033156
FT1A 033154 033156 0 0 000000033156 0 000000033156
FT9 033155 033156 0 0 000000033156 0 000000033156
ET0 033155 033156 0 0 000000033156 0 000000033156
ST1A 033155 033156 0 0 000000033156 0 000000033156
ST9 033155 033156 0 0 000000033156 0 000000033156
*033155 SKIPA 0,000000
INITIAL
C(AC)=000002 000001
C(E)=000002 000001
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 033155 033155 0 0 334000000000 0 000002000001
IT1 033155 0 0 0 334000000000 0 000002000001
AT3 033155 0 0 0 0 0 334000000000
AT6 033155 0 0 0 0 0 334000000000
FT0 033155 0 0 0 000002000001 0 334000000000
FT1A 033155 0 0 0 000002000001 0 000002000001
FT9 033156 0 0 0 000002000001 0 000002000001
ET0 033157 0 0 0 000002000001 0 000002000001
ST1A 033157 0 0 0 000002000001 0 000002000001
ST9 033157 0 0 0 000002000001 0 000002000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 410
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0605
*033157 JUMPA 0,033160
INITIAL
C(AC)=000002 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033157 033157 0 0 324000033160 0 000000033160
IT1 033157 0 0 0 324000033160 0 000000033160
AT3 033157 0 0 0 000000033160 0 324000033160
AT6 033157 033160 0 0 000000033160 0 324000033160
FT1A 033157 033160 0 0 000000033160 0 000000033160
FT2 033157 033160 0 0 0 0 000000033160
FT2RQ 033157 033160 0 0 000002000001 0 000000033160
FT3 033157 033160 0 0 000002000001 0 000000033160
FT9 033160 033160 0 0 000002000001 0 000000033160
ET0 033160 033160 0 0 000002000001 0 000000033160
ST1A 033160 033160 0 0 000002000001 0 000000033160
ST9 033160 033160 0 0 000002000001 0 000000033160
*033160 JFCL 17,033161
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033160 033160 0 0 255740033161 0 000000033161
IT1 033160 0 0 0 255740033161 0 000000033161
AT3 033160 0 0 0 000000033161 0 255740033161
AT6 033160 033161 0 0 000000033161 0 255740033161
FT1A 033160 033161 0 0 000000033161 0 000000033161
FT9 033161 033161 0 0 000000033161 0 000000033161
ET0 033161 033161 0 0 000000033161 0 000000033161
ST1A 033161 033161 0 0 000000033161 0 000000033161
ST9 033161 033161 0 0 000000033161 0 000000033161
*033161 JRST 0,033162
INITIAL
C(AC)=000002 000001
C(E)=255700 033164
FINAL
C(E)=255700 033164
TIME PC MA SC FE AR MQ BR
IT0 033161 033161 0 0 254000033162 0 254000033162
IT1 033161 0 0 0 254000033162 0 254000033162
AT3 033161 0 0 0 000000033162 0 254000033162
AT6 033161 033162 0 0 000000033162 0 254000033162
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 411
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0606
FT1A 033161 033162 0 0 000000033162 0 254000033162
FT9 033162 033162 0 0 000000033162 0 254000033162
ET0 033162 033162 0 0 000000033162 0 254000033162
ST1A 033162 033162 0 0 000000033162 0 254000033162
ST9 033162 033162 0 0 000000033162 0 254000033162
*033162 JFCL 16,033164
INITIAL
C(AC)=000000 000016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033162 033162 0 0 255700033164 0 000000033164
IT1 033162 0 0 0 255700033164 0 000000033164
AT3 033162 0 0 0 000000033164 0 255700033164
AT6 033162 033164 0 0 000000033164 0 255700033164
FT1A 033162 033164 0 0 000000033164 0 000000033164
FT9 033163 033164 0 0 000000033164 0 000000033164
ET0 033163 033164 0 0 000000033164 0 000000033164
ST1A 033163 033164 0 0 000000033164 0 000000033164
ST9 033163 033164 0 0 000000033164 0 000000033164
*033163 SKIPA 0,000000
INITIAL
C(AC)=000002 000001
C(E)=000002 000001
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 033163 033163 0 0 334000000000 0 000002000001
IT1 033163 0 0 0 334000000000 0 000002000001
AT3 033163 0 0 0 0 0 334000000000
AT6 033163 0 0 0 0 0 334000000000
FT0 033163 0 0 0 000002000001 0 334000000000
FT1A 033163 0 0 0 000002000001 0 000002000001
FT9 033164 0 0 0 000002000001 0 000002000001
ET0 033165 0 0 0 000002000001 0 000002000001
ST1A 033165 0 0 0 000002000001 0 000002000001
ST9 033165 0 0 0 000002000001 0 000002000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 412
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0607
*033165 JUMPA 0,033166
INITIAL
C(AC)=000002 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033165 033165 0 0 324000033166 0 000000033166
IT1 033165 0 0 0 324000033166 0 000000033166
AT3 033165 0 0 0 000000033166 0 324000033166
AT6 033165 033166 0 0 000000033166 0 324000033166
FT1A 033165 033166 0 0 000000033166 0 000000033166
FT2 033165 033166 0 0 0 0 000000033166
FT2RQ 033165 033166 0 0 000002000001 0 000000033166
FT3 033165 033166 0 0 000002000001 0 000000033166
FT9 033166 033166 0 0 000002000001 0 000000033166
ET0 033166 033166 0 0 000002000001 0 000000033166
ST1A 033166 033166 0 0 000002000001 0 000000033166
ST9 033166 033166 0 0 000002000001 0 000000033166
*033166 JFCL 17,033167
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033166 033166 0 0 255740033167 0 000000033167
IT1 033166 0 0 0 255740033167 0 000000033167
AT3 033166 0 0 0 000000033167 0 255740033167
AT6 033166 033167 0 0 000000033167 0 255740033167
FT1A 033166 033167 0 0 000000033167 0 000000033167
FT9 033167 033167 0 0 000000033167 0 000000033167
ET0 033167 033167 0 0 000000033167 0 000000033167
ST1A 033167 033167 0 0 000000033167 0 000000033167
ST9 033167 033167 0 0 000000033167 0 000000033167
*033167 MOVE 2,000002
INITIAL
C(AC)=000000 000002
C(E)=000000 000002
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033167 033167 0 0 200100000002 0 000000000002
IT1 033167 0 0 0 200100000002 0 000000000002
AT3 033167 0 0 0 000000000002 0 200100000002
AT6 033167 000002 0 0 000000000002 0 200100000002
FT0 033167 000002 0 0 000000000002 0 200100000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 413
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0608
FT1A 033167 000002 0 0 000000000002 0 000000000002
FT9 033170 000002 0 0 000000000002 0 000000000002
ET0 033170 000002 0 0 000000000002 0 000000000002
ST1 033170 000002 0 0 000000000002 0 000000000002
ST2 033170 000002 0 0 000000000002 0 000000000002
ST9 033170 000002 0 0 000000000002 0 000000000002
*033170 JFCL 17,033172
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033170 033170 0 0 255740033172 0 000000033172
IT1 033170 0 0 0 255740033172 0 000000033172
AT3 033170 0 0 0 000000033172 0 255740033172
AT6 033170 033172 0 0 000000033172 0 255740033172
FT1A 033170 033172 0 0 000000033172 0 000000033172
FT9 033171 033172 0 0 000000033172 0 000000033172
ET0 033171 033172 0 0 000000033172 0 000000033172
ST1A 033171 033172 0 0 000000033172 0 000000033172
ST9 033171 033172 0 0 000000033172 0 000000033172
*033171 SKIPA 0,000000
INITIAL
C(AC)=000002 000001
C(E)=000002 000001
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 033171 033171 0 0 334000000000 0 000002000001
IT1 033171 0 0 0 334000000000 0 000002000001
AT3 033171 0 0 0 0 0 334000000000
AT6 033171 0 0 0 0 0 334000000000
FT0 033171 0 0 0 000002000001 0 334000000000
FT1A 033171 0 0 0 000002000001 0 000002000001
FT9 033172 0 0 0 000002000001 0 000002000001
ET0 033173 0 0 0 000002000001 0 000002000001
ST1A 033173 0 0 0 000002000001 0 000002000001
ST9 033173 0 0 0 000002000001 0 000002000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 414
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0609
*033173 JUMPA 0,033174
INITIAL
C(AC)=000002 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033173 033173 0 0 324000033174 0 000000033174
IT1 033173 0 0 0 324000033174 0 000000033174
AT3 033173 0 0 0 000000033174 0 324000033174
AT6 033173 033174 0 0 000000033174 0 324000033174
FT1A 033173 033174 0 0 000000033174 0 000000033174
FT2 033173 033174 0 0 0 0 000000033174
FT2RQ 033173 033174 0 0 000002000001 0 000000033174
FT3 033173 033174 0 0 000002000001 0 000000033174
FT9 033174 033174 0 0 000002000001 0 000000033174
ET0 033174 033174 0 0 000002000001 0 000000033174
ST1A 033174 033174 0 0 000002000001 0 000000033174
ST9 033174 033174 0 0 000002000001 0 000000033174
*033174 JFCL 17,033175
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033174 033174 0 0 255740033175 0 000000033175
IT1 033174 0 0 0 255740033175 0 000000033175
AT3 033174 0 0 0 000000033175 0 255740033175
AT6 033174 033175 0 0 000000033175 0 255740033175
FT1A 033174 033175 0 0 000000033175 0 000000033175
FT9 033175 033175 0 0 000000033175 0 000000033175
ET0 033175 033175 0 0 000000033175 0 000000033175
ST1A 033175 033175 0 0 000000033175 0 000000033175
ST9 033175 033175 0 0 000000033175 0 000000033175
*033175 MOVSI 1,200000
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 033175 033175 0 0 205040200000 0 000000200000
IT1 033175 0 0 0 205040200000 0 000000200000
AT3 033175 0 0 0 000000200000 0 205040200000
AT6 033175 0 0 0 000000200000 0 205040200000
FT1A 033175 0 0 0 000000200000 0 000000200000
FT9 033176 0 0 0 000000200000 0 000000200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 415
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0610
ET0 033176 0 0 0 200000000000 0 000000200000
ST1 033176 0 0 0 200000000000 0 000000200000
ST2 033176 0 0 0 200000000000 0 000000200000
ST9 033176 0 0 0 200000000000 0 000000200000
*033176 JFCL 17,033177
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033176 033176 0 0 255740033177 0 000000033177
IT1 033176 0 0 0 255740033177 0 000000033177
AT3 033176 0 0 0 000000033177 0 255740033177
AT6 033176 033177 0 0 000000033177 0 255740033177
FT1A 033176 033177 0 0 000000033177 0 000000033177
FT9 033177 033177 0 0 000000033177 0 000000033177
ET0 033177 033177 0 0 000000033177 0 000000033177
ST1A 033177 033177 0 0 000000033177 0 000000033177
ST9 033177 033177 0 0 000000033177 0 000000033177
*033177 JRST 2,033200(1)
INITIAL
C(AC)=000000 000002
C(E)=255200 033202
FINAL
C(E)=255200 033202
TIME PC MA SC FE AR MQ BR
IT0 033177 033177 0 0 254101033200 0 200000033200
IT1 033177 0 0 0 254101033200 0 200000033200
AT1 033177 0 0 0 0 0 254101033200
AT2 033177 0 0 0 200000000000 0 254101033200
AT3 033177 0 0 0 000000033200 0 200000033200
AT6 033177 0 0 0 000000033200 0 200000033200
FT1A 033177 0 0 0 000000033200 0 200000033200
FT9 0 0 0 0 000000033200 0 200000033200
ET0 0 0 0 0 000000033200 0 200000033200
ST1A 0 0 0 0 000000033200 0 200000033200
ST9 0 0 0 0 000000033200 0 200000033200
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 416
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0611
*033200 JFCL 4,033202
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 255200033202 0 000000033202
IT1 0 0 0 0 255200033202 0 000000033202
AT3 0 0 0 0 000000033202 0 255200033202
AT6 0 033202 0 0 000000033202 0 255200033202
FT1A 0 033202 0 0 000000033202 0 000000033202
FT9 033201 033202 0 0 000000033202 0 000000033202
ET0 033202 033202 0 0 000000033202 0 000000033202
ST1A 033202 033202 0 0 000000033202 0 000000033202
ST9 033202 033202 0 0 000000033202 0 000000033202
*033202 JUMPA 0,033203
INITIAL
C(AC)=000002 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033202 033202 0 0 324000033203 0 000000033203
IT1 033202 0 0 0 324000033203 0 000000033203
AT3 033202 0 0 0 000000033203 0 324000033203
AT6 033202 033203 0 0 000000033203 0 324000033203
FT1A 033202 033203 0 0 000000033203 0 000000033203
FT2 033202 033203 0 0 0 0 000000033203
FT2RQ 033202 033203 0 0 000002000001 0 000000033203
FT3 033202 033203 0 0 000002000001 0 000000033203
FT9 033203 033203 0 0 000002000001 0 000000033203
ET0 033203 033203 0 0 000002000001 0 000000033203
ST1A 033203 033203 0 0 000002000001 0 000000033203
ST9 033203 033203 0 0 000002000001 0 000000033203
*033203 MOVE 0,034466
INITIAL
C(AC)=000002 000001
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033203 033203 0 0 200000034466 0 777777777777
IT1 033203 0 0 0 200000034466 0 777777777777
AT3 033203 0 0 0 000000034466 0 200000034466
AT6 033203 034466 0 0 000000034466 0 200000034466
FT0 033203 034466 0 0 777777777777 0 200000034466
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 417
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0612
FT1A 033203 034466 0 0 777777777777 0 777777777777
FT9 033204 034466 0 0 777777777777 0 777777777777
ET0 033204 034466 0 0 777777777777 0 777777777777
ST1 033204 034466 0 0 777777777777 0 777777777777
ST2 033204 034466 0 0 777777777777 0 777777777777
ST9 033204 034466 0 0 777777777777 0 777777777777
*033204 ADDI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033204 033204 0 0 271000000001 0 000000000001
IT1 033204 0 0 0 271000000001 0 000000000001
AT3 033204 0 0 0 000000000001 0 271000000001
AT6 033204 000001 0 0 000000000001 0 271000000001
FT1A 033204 000001 0 0 000000000001 0 000000000001
FT2 033204 000001 0 0 0 0 000000000001
FT2RQ 033204 000001 0 0 777777777777 0 000000000001
FT3 033204 000001 0 0 777777777777 0 000000000001
FT9 033205 000001 0 0 777777777777 0 000000000001
ET0 033205 000001 0 0 0 0 000000000001
ST1 033205 000001 0 0 0 0 000000000001
ST2 033205 000001 0 0 0 0 000000000001
ST9 033205 000001 0 0 0 0 000000000001
*033205 MOVSI 1,000000
INITIAL
C(AC)=200000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033205 033205 0 0 205040000000 0 0
IT1 033205 0 0 0 205040000000 0 0
AT3 033205 0 0 0 0 0 205040000000
AT6 033205 0 0 0 0 0 205040000000
FT1A 033205 0 0 0 0 0 0
FT9 033206 0 0 0 0 0 0
ET0 033206 0 0 0 0 0 0
ST1 033206 0 0 0 0 0 0
ST2 033206 0 0 0 0 0 0
ST9 033206 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 418
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0613
*033206 JFCL 17,033207
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033206 033206 0 0 255740033207 0 000000033207
IT1 033206 0 0 0 255740033207 0 000000033207
AT3 033206 0 0 0 000000033207 0 255740033207
AT6 033206 033207 0 0 000000033207 0 255740033207
FT1A 033206 033207 0 0 000000033207 0 000000033207
FT9 033207 033207 0 0 000000033207 0 000000033207
ET0 033207 033207 0 0 000000033207 0 000000033207
ST1A 033207 033207 0 0 000000033207 0 000000033207
ST9 033207 033207 0 0 000000033207 0 000000033207
*033207 JRST 2,033210(1)
INITIAL
C(AC)=000000 000002
C(E)=255100 033212
FINAL
C(E)=255100 033212
TIME PC MA SC FE AR MQ BR
IT0 033207 033207 0 0 254101033210 0 000000033210
IT1 033207 0 0 0 254101033210 0 000000033210
AT1 033207 0 0 0 0 0 254101033210
AT2 033207 0 0 0 0 0 254101033210
AT3 033207 0 0 0 000000033210 0 000000033210
AT6 033207 033210 0 0 000000033210 0 000000033210
FT1A 033207 033210 0 0 000000033210 0 000000033210
FT9 033210 033210 0 0 000000033210 0 000000033210
ET0 033210 033210 0 0 000000033210 0 000000033210
ST1A 033210 033210 0 0 000000033210 0 000000033210
ST9 033210 033210 0 0 000000033210 0 000000033210
*033210 JFCL 2,033212
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033210 033210 0 0 255100033212 0 000000033212
IT1 033210 0 0 0 255100033212 0 000000033212
AT3 033210 0 0 0 000000033212 0 255100033212
AT6 033210 033212 0 0 000000033212 0 255100033212
FT1A 033210 033212 0 0 000000033212 0 000000033212
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 419
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0614
FT9 033211 033212 0 0 000000033212 0 000000033212
ET0 033211 033212 0 0 000000033212 0 000000033212
ST1A 033211 033212 0 0 000000033212 0 000000033212
ST9 033211 033212 0 0 000000033212 0 000000033212
*033211 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033211 033211 0 0 334000000000 0 0
IT1 033211 0 0 0 334000000000 0 0
AT3 033211 0 0 0 0 0 334000000000
AT6 033211 0 0 0 0 0 334000000000
FT0 033211 0 0 0 0 0 334000000000
FT1A 033211 0 0 0 0 0 0
FT9 033212 0 0 0 0 0 0
ET0 033213 0 0 0 0 0 0
ST1A 033213 0 0 0 0 0 0
ST9 033213 0 0 0 0 0 0
*033213 JUMPA 0,033214
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033213 033213 0 0 324000033214 0 000000033214
IT1 033213 0 0 0 324000033214 0 000000033214
AT3 033213 0 0 0 000000033214 0 324000033214
AT6 033213 033214 0 0 000000033214 0 324000033214
FT1A 033213 033214 0 0 000000033214 0 000000033214
FT2 033213 033214 0 0 0 0 000000033214
FT2RQ 033213 033214 0 0 0 0 000000033214
FT3 033213 033214 0 0 0 0 000000033214
FT9 033214 033214 0 0 0 0 000000033214
ET0 033214 033214 0 0 0 0 000000033214
ST1A 033214 033214 0 0 0 0 000000033214
ST9 033214 033214 0 0 0 0 000000033214
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 420
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0615
*033214 MOVSI 0,400000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033214 033214 0 0 205000400000 0 000000400000
IT1 033214 0 0 0 205000400000 0 000000400000
AT3 033214 0 0 0 000000400000 0 205000400000
AT6 033214 0 0 0 000000400000 0 205000400000
FT1A 033214 0 0 0 000000400000 0 000000400000
FT9 033215 0 0 0 000000400000 0 000000400000
ET0 033215 0 0 0 400000000000 0 000000400000
ST1 033215 0 0 0 400000000000 0 000000400000
ST2 033215 0 0 0 400000000000 0 000000400000
ST9 033215 0 0 0 400000000000 0 000000400000
*033215 ADD 0,034466
INITIAL
C(AC)=400000 000000
C(E)=777777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 033215 033215 0 0 270000034466 0 777777777777
IT1 033215 0 0 0 270000034466 0 777777777777
AT3 033215 0 0 0 000000034466 0 270000034466
AT6 033215 034466 0 0 000000034466 0 270000034466
FT0 033215 034466 0 0 777777777777 0 270000034466
FT1A 033215 034466 0 0 777777777777 0 777777777777
FT2 033215 034466 0 0 0 0 777777777777
FT2RQ 033215 034466 0 0 400000000000 0 777777777777
FT3 033215 034466 0 0 400000000000 0 777777777777
FT9 033216 034466 0 0 400000000000 0 777777777777
ET0 033216 034466 0 0 377777777777 0 777777777777
ST1 033216 034466 0 0 377777777777 0 777777777777
ST2 033216 034466 0 0 377777777777 0 777777777777
ST9 033216 034466 0 0 377777777777 0 777777777777
*033216 MOVSI 1,000000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033216 033216 0 0 205040000000 0 0
IT1 033216 0 0 0 205040000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 421
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0616
AT3 033216 0 0 0 0 0 205040000000
AT6 033216 0 0 0 0 0 205040000000
FT1A 033216 0 0 0 0 0 0
FT9 033217 0 0 0 0 0 0
ET0 033217 0 0 0 0 0 0
ST1 033217 0 0 0 0 0 0
ST2 033217 0 0 0 0 0 0
ST9 033217 0 0 0 0 0 0
*033217 JFCL 17,033220
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033217 033217 0 0 255740033220 0 000000033220
IT1 033217 0 0 0 255740033220 0 000000033220
AT3 033217 0 0 0 000000033220 0 255740033220
AT6 033217 033220 0 0 000000033220 0 255740033220
FT1A 033217 033220 0 0 000000033220 0 000000033220
FT9 033220 033220 0 0 000000033220 0 000000033220
ET0 033220 033220 0 0 000000033220 0 000000033220
ST1A 033220 033220 0 0 000000033220 0 000000033220
ST9 033220 033220 0 0 000000033220 0 000000033220
*033220 JRST 2,033221(1)
INITIAL
C(AC)=000000 000002
C(E)=255400 033223
FINAL
C(E)=255400 033223
TIME PC MA SC FE AR MQ BR
IT0 033220 033220 0 0 254101033221 0 000000033221
IT1 033220 0 0 0 254101033221 0 000000033221
AT1 033220 0 0 0 0 0 254101033221
AT2 033220 0 0 0 0 0 254101033221
AT3 033220 0 0 0 000000033221 0 000000033221
AT6 033220 033221 0 0 000000033221 0 000000033221
FT1A 033220 033221 0 0 000000033221 0 000000033221
FT9 033221 033221 0 0 000000033221 0 000000033221
ET0 033221 033221 0 0 000000033221 0 000000033221
ST1A 033221 033221 0 0 000000033221 0 000000033221
ST9 033221 033221 0 0 000000033221 0 000000033221
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 422
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0617
*033221 JFCL 10,033223
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033221 033221 0 0 255400033223 0 000000033223
IT1 033221 0 0 0 255400033223 0 000000033223
AT3 033221 0 0 0 000000033223 0 255400033223
AT6 033221 033223 0 0 000000033223 0 255400033223
FT1A 033221 033223 0 0 000000033223 0 000000033223
FT9 033222 033223 0 0 000000033223 0 000000033223
ET0 033222 033223 0 0 000000033223 0 000000033223
ST1A 033222 033223 0 0 000000033223 0 000000033223
ST9 033222 033223 0 0 000000033223 0 000000033223
*033222 SKIPA 0,000000
INITIAL
C(AC)=377777 777777
C(E)=377777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 033222 033222 0 0 334000000000 0 377777777777
IT1 033222 0 0 0 334000000000 0 377777777777
AT3 033222 0 0 0 0 0 334000000000
AT6 033222 0 0 0 0 0 334000000000
FT0 033222 0 0 0 377777777777 0 334000000000
FT1A 033222 0 0 0 377777777777 0 377777777777
FT9 033223 0 0 0 377777777777 0 377777777777
ET0 033224 0 0 0 377777777777 0 377777777777
ST1A 033224 0 0 0 377777777777 0 377777777777
ST9 033224 0 0 0 377777777777 0 377777777777
*033224 JUMPA 0,033225
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033224 033224 0 0 324000033225 0 000000033225
IT1 033224 0 0 0 324000033225 0 000000033225
AT3 033224 0 0 0 000000033225 0 324000033225
AT6 033224 033225 0 0 000000033225 0 324000033225
FT1A 033224 033225 0 0 000000033225 0 000000033225
FT2 033224 033225 0 0 0 0 000000033225
FT2RQ 033224 033225 0 0 377777777777 0 000000033225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 423
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0618
FT3 033224 033225 0 0 377777777777 0 000000033225
FT9 033225 033225 0 0 377777777777 0 000000033225
ET0 033225 033225 0 0 377777777777 0 000000033225
ST1A 033225 033225 0 0 377777777777 0 000000033225
ST9 033225 033225 0 0 377777777777 0 000000033225
*033225 MOVSI 1,400000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033225 033225 0 0 205040400000 0 000000400000
IT1 033225 0 0 0 205040400000 0 000000400000
AT3 033225 0 0 0 000000400000 0 205040400000
AT6 033225 0 0 0 000000400000 0 205040400000
FT1A 033225 0 0 0 000000400000 0 000000400000
FT9 033226 0 0 0 000000400000 0 000000400000
ET0 033226 0 0 0 400000000000 0 000000400000
ST1 033226 0 0 0 400000000000 0 000000400000
ST2 033226 0 0 0 400000000000 0 000000400000
ST9 033226 0 0 0 400000000000 0 000000400000
*033226 JFCL 17,033227
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033226 033226 0 0 255740033227 0 000000033227
IT1 033226 0 0 0 255740033227 0 000000033227
AT3 033226 0 0 0 000000033227 0 255740033227
AT6 033226 033227 0 0 000000033227 0 255740033227
FT1A 033226 033227 0 0 000000033227 0 000000033227
FT9 033227 033227 0 0 000000033227 0 000000033227
ET0 033227 033227 0 0 000000033227 0 000000033227
ST1A 033227 033227 0 0 000000033227 0 000000033227
ST9 033227 033227 0 0 000000033227 0 000000033227
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 424
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0619
*033227 JRST 2,033230(1)
INITIAL
C(AC)=000000 000002
C(E)=255400 033232
FINAL
C(E)=255400 033232
TIME PC MA SC FE AR MQ BR
IT0 033227 033227 0 0 254101033230 0 400000033230
IT1 033227 0 0 0 254101033230 0 400000033230
AT1 033227 0 0 0 0 0 254101033230
AT2 033227 0 0 0 400000000000 0 254101033230
AT3 033227 0 0 0 000000033230 0 400000033230
AT6 033227 033230 0 0 000000033230 0 400000033230
FT1A 033227 033230 0 0 000000033230 0 400000033230
FT9 033230 033230 0 0 000000033230 0 400000033230
ET0 033230 033230 0 0 000000033230 0 400000033230
ST1A 033230 033230 0 0 000000033230 0 400000033230
ST9 033230 033230 0 0 000000033230 0 400000033230
*033230 JFCL 10,033232
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033230 033230 0 0 255400033232 0 000000033232
IT1 033230 0 0 0 255400033232 0 000000033232
AT3 033230 0 0 0 000000033232 0 255400033232
AT6 033230 033232 0 0 000000033232 0 255400033232
FT1A 033230 033232 0 0 000000033232 0 000000033232
FT9 033231 033232 0 0 000000033232 0 000000033232
ET0 033232 033232 0 0 000000033232 0 000000033232
ST1A 033232 033232 0 0 000000033232 0 000000033232
ST9 033232 033232 0 0 000000033232 0 000000033232
*033232 JUMPA 0,033233
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033232 033232 0 0 324000033233 0 000000033233
IT1 033232 0 0 0 324000033233 0 000000033233
AT3 033232 0 0 0 000000033233 0 324000033233
AT6 033232 033233 0 0 000000033233 0 324000033233
FT1A 033232 033233 0 0 000000033233 0 000000033233
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 425
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0620
FT2 033232 033233 0 0 0 0 000000033233
FT2RQ 033232 033233 0 0 377777777777 0 000000033233
FT3 033232 033233 0 0 377777777777 0 000000033233
FT9 033233 033233 0 0 377777777777 0 000000033233
ET0 033233 033233 0 0 377777777777 0 000000033233
ST1A 033233 033233 0 0 377777777777 0 000000033233
ST9 033233 033233 0 0 377777777777 0 000000033233
*033233 MOVSI 1,100000
INITIAL
C(AC)=400000 000000
FINAL
C(AC)=100000 000000
TIME PC MA SC FE AR MQ BR
IT0 033233 033233 0 0 205040100000 0 000000100000
IT1 033233 0 0 0 205040100000 0 000000100000
AT3 033233 0 0 0 000000100000 0 205040100000
AT6 033233 0 0 0 000000100000 0 205040100000
FT1A 033233 0 0 0 000000100000 0 000000100000
FT9 033234 0 0 0 000000100000 0 000000100000
ET0 033234 0 0 0 100000000000 0 000000100000
ST1 033234 0 0 0 100000000000 0 000000100000
ST2 033234 0 0 0 100000000000 0 000000100000
ST9 033234 0 0 0 100000000000 0 000000100000
*033234 JFCL 17,033235
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033234 033234 0 0 255740033235 0 000000033235
IT1 033234 0 0 0 255740033235 0 000000033235
AT3 033234 0 0 0 000000033235 0 255740033235
AT6 033234 033235 0 0 000000033235 0 255740033235
FT1A 033234 033235 0 0 000000033235 0 000000033235
FT9 033235 033235 0 0 000000033235 0 000000033235
ET0 033235 033235 0 0 000000033235 0 000000033235
ST1A 033235 033235 0 0 000000033235 0 000000033235
ST9 033235 033235 0 0 000000033235 0 000000033235
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 426
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0621
*033235 JRST 2,033236(1)
INITIAL
C(AC)=000000 000002
C(E)=255100 033240
FINAL
C(E)=255100 033240
TIME PC MA SC FE AR MQ BR
IT0 033235 033235 0 0 254101033236 0 100000033236
IT1 033235 0 0 0 254101033236 0 100000033236
AT1 033235 0 0 0 0 0 254101033236
AT2 033235 0 0 0 100000000000 0 254101033236
AT3 033235 0 0 0 000000033236 0 100000033236
AT6 033235 033236 0 0 000000033236 0 100000033236
FT1A 033235 033236 0 0 000000033236 0 100000033236
FT9 033236 033236 0 0 000000033236 0 100000033236
ET0 033236 033236 0 0 000000033236 0 100000033236
ST1A 033236 033236 0 0 000000033236 0 100000033236
ST9 033236 033236 0 0 000000033236 0 100000033236
*033236 JFCL 2,033240
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033236 033236 0 0 255100033240 0 000000033240
IT1 033236 0 0 0 255100033240 0 000000033240
AT3 033236 0 0 0 000000033240 0 255100033240
AT6 033236 033240 0 0 000000033240 0 255100033240
FT1A 033236 033240 0 0 000000033240 0 000000033240
FT9 033237 033240 0 0 000000033240 0 000000033240
ET0 033240 033240 0 0 000000033240 0 000000033240
ST1A 033240 033240 0 0 000000033240 0 000000033240
ST9 033240 033240 0 0 000000033240 0 000000033240
*033240 JUMPA 0,033241
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033240 033240 0 0 324000033241 0 000000033241
IT1 033240 0 0 0 324000033241 0 000000033241
AT3 033240 0 0 0 000000033241 0 324000033241
AT6 033240 033241 0 0 000000033241 0 324000033241
FT1A 033240 033241 0 0 000000033241 0 000000033241
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 427
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0622
FT2 033240 033241 0 0 0 0 000000033241
FT2RQ 033240 033241 0 0 377777777777 0 000000033241
FT3 033240 033241 0 0 377777777777 0 000000033241
FT9 033241 033241 0 0 377777777777 0 000000033241
ET0 033241 033241 0 0 377777777777 0 000000033241
ST1A 033241 033241 0 0 377777777777 0 000000033241
ST9 033241 033241 0 0 377777777777 0 000000033241
*033241 MOVSI 1,040000
INITIAL
C(AC)=100000 000000
FINAL
C(AC)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 033241 033241 0 0 205040040000 0 000000040000
IT1 033241 0 0 0 205040040000 0 000000040000
AT3 033241 0 0 0 000000040000 0 205040040000
AT6 033241 0 0 0 000000040000 0 205040040000
FT1A 033241 0 0 0 000000040000 0 000000040000
FT9 033242 0 0 0 000000040000 0 000000040000
ET0 033242 0 0 0 040000000000 0 000000040000
ST1 033242 0 0 0 040000000000 0 000000040000
ST2 033242 0 0 0 040000000000 0 000000040000
ST9 033242 0 0 0 040000000000 0 000000040000
*033242 JFCL 17,033243
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033242 033242 0 0 255740033243 0 000000033243
IT1 033242 0 0 0 255740033243 0 000000033243
AT3 033242 0 0 0 000000033243 0 255740033243
AT6 033242 033243 0 0 000000033243 0 255740033243
FT1A 033242 033243 0 0 000000033243 0 000000033243
FT9 033243 033243 0 0 000000033243 0 000000033243
ET0 033243 033243 0 0 000000033243 0 000000033243
ST1A 033243 033243 0 0 000000033243 0 000000033243
ST9 033243 033243 0 0 000000033243 0 000000033243
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 428
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0623
*033243 JRST 2,033244(1)
INITIAL
C(AC)=000000 000002
C(E)=255040 033246
FINAL
C(E)=255040 033246
TIME PC MA SC FE AR MQ BR
IT0 033243 033243 0 0 254101033244 0 040000033244
IT1 033243 0 0 0 254101033244 0 040000033244
AT1 033243 0 0 0 0 0 254101033244
AT2 033243 0 0 0 040000000000 0 254101033244
AT3 033243 0 0 0 000000033244 0 040000033244
AT6 033243 033244 0 0 000000033244 0 040000033244
FT1A 033243 033244 0 0 000000033244 0 040000033244
FT9 033244 033244 0 0 000000033244 0 040000033244
ET0 033244 033244 0 0 000000033244 0 040000033244
ST1A 033244 033244 0 0 000000033244 0 040000033244
ST9 033244 033244 0 0 000000033244 0 040000033244
*033244 JFCL 1,033246
INITIAL
C(AC)=040000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033244 033244 0 0 255040033246 0 000000033246
IT1 033244 0 0 0 255040033246 0 000000033246
AT3 033244 0 0 0 000000033246 0 255040033246
AT6 033244 033246 0 0 000000033246 0 255040033246
FT1A 033244 033246 0 0 000000033246 0 000000033246
FT9 033245 033246 0 0 000000033246 0 000000033246
ET0 033246 033246 0 0 000000033246 0 000000033246
ST1A 033246 033246 0 0 000000033246 0 000000033246
ST9 033246 033246 0 0 000000033246 0 000000033246
*033246 JUMPA 0,033247
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033246 033246 0 0 324000033247 0 000000033247
IT1 033246 0 0 0 324000033247 0 000000033247
AT3 033246 0 0 0 000000033247 0 324000033247
AT6 033246 033247 0 0 000000033247 0 324000033247
FT1A 033246 033247 0 0 000000033247 0 000000033247
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 429
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0624
FT2 033246 033247 0 0 0 0 000000033247
FT2RQ 033246 033247 0 0 377777777777 0 000000033247
FT3 033246 033247 0 0 377777777777 0 000000033247
FT9 033247 033247 0 0 377777777777 0 000000033247
ET0 033247 033247 0 0 377777777777 0 000000033247
ST1A 033247 033247 0 0 377777777777 0 000000033247
ST9 033247 033247 0 0 377777777777 0 000000033247
*033247 MOVSI 1,040000
INITIAL
C(AC)=040000 000000
FINAL
C(AC)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 033247 033247 0 0 205040040000 0 000000040000
IT1 033247 0 0 0 205040040000 0 000000040000
AT3 033247 0 0 0 000000040000 0 205040040000
AT6 033247 0 0 0 000000040000 0 205040040000
FT1A 033247 0 0 0 000000040000 0 000000040000
FT9 033250 0 0 0 000000040000 0 000000040000
ET0 033250 0 0 0 040000000000 0 000000040000
ST1 033250 0 0 0 040000000000 0 000000040000
ST2 033250 0 0 0 040000000000 0 000000040000
ST9 033250 0 0 0 040000000000 0 000000040000
*033250 JFCL 17,033251
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033250 033250 0 0 255740033251 0 000000033251
IT1 033250 0 0 0 255740033251 0 000000033251
AT3 033250 0 0 0 000000033251 0 255740033251
AT6 033250 033251 0 0 000000033251 0 255740033251
FT1A 033250 033251 0 0 000000033251 0 000000033251
FT9 033251 033251 0 0 000000033251 0 000000033251
ET0 033251 033251 0 0 000000033251 0 000000033251
ST1A 033251 033251 0 0 000000033251 0 000000033251
ST9 033251 033251 0 0 000000033251 0 000000033251
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 430
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0625
*033251 JRST 2,033252(1)
INITIAL
C(AC)=000000 000002
C(E)=255000 033254
FINAL
C(E)=255000 033254
TIME PC MA SC FE AR MQ BR
IT0 033251 033251 0 0 254101033252 0 040000033252
IT1 033251 0 0 0 254101033252 0 040000033252
AT1 033251 0 0 0 0 0 254101033252
AT2 033251 0 0 0 040000000000 0 254101033252
AT3 033251 0 0 0 000000033252 0 040000033252
AT6 033251 033252 0 0 000000033252 0 040000033252
FT1A 033251 033252 0 0 000000033252 0 040000033252
FT9 033252 033252 0 0 000000033252 0 040000033252
ET0 033252 033252 0 0 000000033252 0 040000033252
ST1A 033252 033252 0 0 000000033252 0 040000033252
ST9 033252 033252 0 0 000000033252 0 040000033252
*033252 JFCL 0,033254
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033252 033252 0 0 255000033254 0 000000033254
IT1 033252 0 0 0 255000033254 0 000000033254
AT3 033252 0 0 0 000000033254 0 255000033254
AT6 033252 033254 0 0 000000033254 0 255000033254
FT1A 033252 033254 0 0 000000033254 0 000000033254
FT9 033253 033254 0 0 000000033254 0 000000033254
ET0 033253 033254 0 0 000000033254 0 000000033254
ST1A 033253 033254 0 0 000000033254 0 000000033254
ST9 033253 033254 0 0 000000033254 0 000000033254
*033253 SKIPA 0,000000
INITIAL
C(AC)=377777 777777
C(E)=377777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 033253 033253 0 0 334000000000 0 377777777777
IT1 033253 0 0 0 334000000000 0 377777777777
AT3 033253 0 0 0 0 0 334000000000
AT6 033253 0 0 0 0 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 431
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0626
FT0 033253 0 0 0 377777777777 0 334000000000
FT1A 033253 0 0 0 377777777777 0 377777777777
FT9 033254 0 0 0 377777777777 0 377777777777
ET0 033255 0 0 0 377777777777 0 377777777777
ST1A 033255 0 0 0 377777777777 0 377777777777
ST9 033255 0 0 0 377777777777 0 377777777777
*033255 JUMPA 0,033256
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033255 033255 0 0 324000033256 0 000000033256
IT1 033255 0 0 0 324000033256 0 000000033256
AT3 033255 0 0 0 000000033256 0 324000033256
AT6 033255 033256 0 0 000000033256 0 324000033256
FT1A 033255 033256 0 0 000000033256 0 000000033256
FT2 033255 033256 0 0 0 0 000000033256
FT2RQ 033255 033256 0 0 377777777777 0 000000033256
FT3 033255 033256 0 0 377777777777 0 000000033256
FT9 033256 033256 0 0 377777777777 0 000000033256
ET0 033256 033256 0 0 377777777777 0 000000033256
ST1A 033256 033256 0 0 377777777777 0 000000033256
ST9 033256 033256 0 0 377777777777 0 000000033256
*033256 MOVSI 1,200000
INITIAL
C(AC)=040000 000000
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 033256 033256 0 0 205040200000 0 000000200000
IT1 033256 0 0 0 205040200000 0 000000200000
AT3 033256 0 0 0 000000200000 0 205040200000
AT6 033256 0 0 0 000000200000 0 205040200000
FT1A 033256 0 0 0 000000200000 0 000000200000
FT9 033257 0 0 0 000000200000 0 000000200000
ET0 033257 0 0 0 200000000000 0 000000200000
ST1 033257 0 0 0 200000000000 0 000000200000
ST2 033257 0 0 0 200000000000 0 000000200000
ST9 033257 0 0 0 200000000000 0 000000200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 432
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0627
*033257 JFCL 17,033260
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033257 033257 0 0 255740033260 0 000000033260
IT1 033257 0 0 0 255740033260 0 000000033260
AT3 033257 0 0 0 000000033260 0 255740033260
AT6 033257 033260 0 0 000000033260 0 255740033260
FT1A 033257 033260 0 0 000000033260 0 000000033260
FT9 033260 033260 0 0 000000033260 0 000000033260
ET0 033260 033260 0 0 000000033260 0 000000033260
ST1A 033260 033260 0 0 000000033260 0 000000033260
ST9 033260 033260 0 0 000000033260 0 000000033260
*033260 JRST 2,033261(1)
INITIAL
C(AC)=000000 000002
C(E)=400040 000000
FINAL
C(E)=400040 000000
TIME PC MA SC FE AR MQ BR
IT0 033260 033260 0 0 254101033261 0 200000033261
IT1 033260 0 0 0 254101033261 0 200000033261
AT1 033260 0 0 0 0 0 254101033261
AT2 033260 0 0 0 200000000000 0 254101033261
AT3 033260 0 0 0 000000033261 0 200000033261
AT6 033260 033261 0 0 000000033261 0 200000033261
FT1A 033260 033261 0 0 000000033261 0 200000033261
FT9 033261 033261 0 0 000000033261 0 200000033261
ET0 033261 033261 0 0 000000033261 0 200000033261
ST1A 033261 033261 0 0 000000033261 0 200000033261
ST9 033261 033261 0 0 000000033261 0 200000033261
*033261 SETZ 1,000000
INITIAL
C(AC)=200000 000000
C(E)=377777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033261 033261 0 0 400040000000 0 0
IT1 033261 0 0 0 400040000000 0 0
AT3 033261 0 0 0 0 0 400040000000
AT6 033261 0 0 0 0 0 400040000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 433
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0628
FT1A 033261 0 0 0 0 0 0
FT9 033262 0 0 0 0 0 0
ET0 033262 0 0 0 0 0 0
ST1 033262 0 0 0 0 0 0
ST2 033262 0 0 0 0 0 0
ST9 033262 0 0 0 0 0 0
*033262 JRST 2,033263(1)
INITIAL
C(AC)=000000 000002
C(E)=255200 033265
FINAL
C(E)=255200 033265
TIME PC MA SC FE AR MQ BR
IT0 033262 033262 0 0 254101033263 0 000000033263
IT1 033262 0 0 0 254101033263 0 000000033263
AT1 033262 0 0 0 0 0 254101033263
AT2 033262 0 0 0 0 0 254101033263
AT3 033262 0 0 0 000000033263 0 000000033263
AT6 033262 033263 0 0 000000033263 0 000000033263
FT1A 033262 033263 0 0 000000033263 0 000000033263
FT9 033263 033263 0 0 000000033263 0 000000033263
ET0 033263 033263 0 0 000000033263 0 000000033263
ST1A 033263 033263 0 0 000000033263 0 000000033263
ST9 033263 033263 0 0 000000033263 0 000000033263
*033263 JFCL 4,033265
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033263 033263 0 0 255200033265 0 000000033265
IT1 033263 0 0 0 255200033265 0 000000033265
AT3 033263 0 0 0 000000033265 0 255200033265
AT6 033263 033265 0 0 000000033265 0 255200033265
FT1A 033263 033265 0 0 000000033265 0 000000033265
FT9 033264 033265 0 0 000000033265 0 000000033265
ET0 033264 033265 0 0 000000033265 0 000000033265
ST1A 033264 033265 0 0 000000033265 0 000000033265
ST9 033264 033265 0 0 000000033265 0 000000033265
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 434
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0629
*033264 SKIPA 0,000000
INITIAL
C(AC)=377777 777777
C(E)=377777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 033264 033264 0 0 334000000000 0 377777777777
IT1 033264 0 0 0 334000000000 0 377777777777
AT3 033264 0 0 0 0 0 334000000000
AT6 033264 0 0 0 0 0 334000000000
FT0 033264 0 0 0 377777777777 0 334000000000
FT1A 033264 0 0 0 377777777777 0 377777777777
FT9 033265 0 0 0 377777777777 0 377777777777
ET0 033266 0 0 0 377777777777 0 377777777777
ST1A 033266 0 0 0 377777777777 0 377777777777
ST9 033266 0 0 0 377777777777 0 377777777777
*033266 JUMPA 0,033267
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033266 033266 0 0 324000033267 0 000000033267
IT1 033266 0 0 0 324000033267 0 000000033267
AT3 033266 0 0 0 000000033267 0 324000033267
AT6 033266 033267 0 0 000000033267 0 324000033267
FT1A 033266 033267 0 0 000000033267 0 000000033267
FT2 033266 033267 0 0 0 0 000000033267
FT2RQ 033266 033267 0 0 377777777777 0 000000033267
FT3 033266 033267 0 0 377777777777 0 000000033267
FT9 033267 033267 0 0 377777777777 0 000000033267
ET0 033267 033267 0 0 377777777777 0 000000033267
ST1A 033267 033267 0 0 377777777777 0 000000033267
ST9 033267 033267 0 0 377777777777 0 000000033267
*033267 MOVSI 1,040000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 033267 033267 0 0 205040040000 0 000000040000
IT1 033267 0 0 0 205040040000 0 000000040000
AT3 033267 0 0 0 000000040000 0 205040040000
AT6 033267 0 0 0 000000040000 0 205040040000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 435
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0630
FT1A 033267 0 0 0 000000040000 0 000000040000
FT9 033270 0 0 0 000000040000 0 000000040000
ET0 033270 0 0 0 040000000000 0 000000040000
ST1 033270 0 0 0 040000000000 0 000000040000
ST2 033270 0 0 0 040000000000 0 000000040000
ST9 033270 0 0 0 040000000000 0 000000040000
*033270 JFCL 17,033271
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033270 033270 0 0 255740033271 0 000000033271
IT1 033270 0 0 0 255740033271 0 000000033271
AT3 033270 0 0 0 000000033271 0 255740033271
AT6 033270 033271 0 0 000000033271 0 255740033271
FT1A 033270 033271 0 0 000000033271 0 000000033271
FT9 033271 033271 0 0 000000033271 0 000000033271
ET0 033271 033271 0 0 000000033271 0 000000033271
ST1A 033271 033271 0 0 000000033271 0 000000033271
ST9 033271 033271 0 0 000000033271 0 000000033271
*033271 JRST 2,033272(1)
INITIAL
C(AC)=000000 000002
C(E)=400040 000000
FINAL
C(E)=400040 000000
TIME PC MA SC FE AR MQ BR
IT0 033271 033271 0 0 254101033272 0 040000033272
IT1 033271 0 0 0 254101033272 0 040000033272
AT1 033271 0 0 0 0 0 254101033272
AT2 033271 0 0 0 040000000000 0 254101033272
AT3 033271 0 0 0 000000033272 0 040000033272
AT6 033271 033272 0 0 000000033272 0 040000033272
FT1A 033271 033272 0 0 000000033272 0 040000033272
FT9 033272 033272 0 0 000000033272 0 040000033272
ET0 033272 033272 0 0 000000033272 0 040000033272
ST1A 033272 033272 0 0 000000033272 0 040000033272
ST9 033272 033272 0 0 000000033272 0 040000033272
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 436
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0631
*033272 SETZ 1,000000
INITIAL
C(AC)=040000 000000
C(E)=377777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033272 033272 0 0 400040000000 0 0
IT1 033272 0 0 0 400040000000 0 0
AT3 033272 0 0 0 0 0 400040000000
AT6 033272 0 0 0 0 0 400040000000
FT1A 033272 0 0 0 0 0 0
FT9 033273 0 0 0 0 0 0
ET0 033273 0 0 0 0 0 0
ST1 033273 0 0 0 0 0 0
ST2 033273 0 0 0 0 0 0
ST9 033273 0 0 0 0 0 0
*033273 JRST 2,033274(1)
INITIAL
C(AC)=000000 000002
C(E)=255040 033276
FINAL
C(E)=255040 033276
TIME PC MA SC FE AR MQ BR
IT0 033273 033273 0 0 254101033274 0 000000033274
IT1 033273 0 0 0 254101033274 0 000000033274
AT1 033273 0 0 0 0 0 254101033274
AT2 033273 0 0 0 0 0 254101033274
AT3 033273 0 0 0 000000033274 0 000000033274
AT6 033273 033274 0 0 000000033274 0 000000033274
FT1A 033273 033274 0 0 000000033274 0 000000033274
FT9 033274 033274 0 0 000000033274 0 000000033274
ET0 033274 033274 0 0 000000033274 0 000000033274
ST1A 033274 033274 0 0 000000033274 0 000000033274
ST9 033274 033274 0 0 000000033274 0 000000033274
*033274 JFCL 1,033276
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033274 033274 0 0 255040033276 0 000000033276
IT1 033274 0 0 0 255040033276 0 000000033276
AT3 033274 0 0 0 000000033276 0 255040033276
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 437
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0632
AT6 033274 033276 0 0 000000033276 0 255040033276
FT1A 033274 033276 0 0 000000033276 0 000000033276
FT9 033275 033276 0 0 000000033276 0 000000033276
ET0 033275 033276 0 0 000000033276 0 000000033276
ST1A 033275 033276 0 0 000000033276 0 000000033276
ST9 033275 033276 0 0 000000033276 0 000000033276
*033275 SKIPA 0,000000
INITIAL
C(AC)=377777 777777
C(E)=377777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 033275 033275 0 0 334000000000 0 377777777777
IT1 033275 0 0 0 334000000000 0 377777777777
AT3 033275 0 0 0 0 0 334000000000
AT6 033275 0 0 0 0 0 334000000000
FT0 033275 0 0 0 377777777777 0 334000000000
FT1A 033275 0 0 0 377777777777 0 377777777777
FT9 033276 0 0 0 377777777777 0 377777777777
ET0 033277 0 0 0 377777777777 0 377777777777
ST1A 033277 0 0 0 377777777777 0 377777777777
ST9 033277 0 0 0 377777777777 0 377777777777
*033277 JUMPA 0,033300
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033277 033277 0 0 324000033300 0 000000033300
IT1 033277 0 0 0 324000033300 0 000000033300
AT3 033277 0 0 0 000000033300 0 324000033300
AT6 033277 0 0 0 000000033300 0 324000033300
FT1A 033277 0 0 0 000000033300 0 000000033300
FT2 033277 0 0 0 0 0 000000033300
FT2RQ 033277 0 0 0 377777777777 0 000000033300
FT3 033277 0 0 0 377777777777 0 000000033300
FT9 0 0 0 0 377777777777 0 000000033300
ET0 0 0 0 0 377777777777 0 000000033300
ST1A 0 0 0 0 377777777777 0 000000033300
ST9 0 0 0 0 377777777777 0 000000033300
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 438
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0633
*033300 JFCL 17,033301
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 255740033301 0 000000033301
IT1 0 0 0 0 255740033301 0 000000033301
AT3 0 0 0 0 000000033301 0 255740033301
AT6 0 033301 0 0 000000033301 0 255740033301
FT1A 0 033301 0 0 000000033301 0 000000033301
FT9 033301 033301 0 0 000000033301 0 000000033301
ET0 033301 033301 0 0 000000033301 0 000000033301
ST1A 033301 033301 0 0 000000033301 0 000000033301
ST9 033301 033301 0 0 000000033301 0 000000033301
*033301 SETZ 1,000000
INITIAL
C(AC)=000000 000000
C(E)=377777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033301 033301 0 0 400040000000 0 0
IT1 033301 0 0 0 400040000000 0 0
AT3 033301 0 0 0 0 0 400040000000
AT6 033301 0 0 0 0 0 400040000000
FT1A 033301 0 0 0 0 0 0
FT9 033302 0 0 0 0 0 0
ET0 033302 0 0 0 0 0 0
ST1 033302 0 0 0 0 0 0
ST2 033302 0 0 0 0 0 0
ST9 033302 0 0 0 0 0 0
*033302 JRST 2,033303(1)
INITIAL
C(AC)=000000 000002
C(E)=255740 033305
FINAL
C(E)=255740 033305
TIME PC MA SC FE AR MQ BR
IT0 033302 033302 0 0 254101033303 0 000000033303
IT1 033302 0 0 0 254101033303 0 000000033303
AT1 033302 0 0 0 0 0 254101033303
AT2 033302 0 0 0 0 0 254101033303
AT3 033302 0 0 0 000000033303 0 000000033303
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 439
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0634
AT6 033302 033303 0 0 000000033303 0 000000033303
FT1A 033302 033303 0 0 000000033303 0 000000033303
FT9 033303 033303 0 0 000000033303 0 000000033303
ET0 033303 033303 0 0 000000033303 0 000000033303
ST1A 033303 033303 0 0 000000033303 0 000000033303
ST9 033303 033303 0 0 000000033303 0 000000033303
*033303 JFCL 17,033305
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033303 033303 0 0 255740033305 0 000000033305
IT1 033303 0 0 0 255740033305 0 000000033305
AT3 033303 0 0 0 000000033305 0 255740033305
AT6 033303 033305 0 0 000000033305 0 255740033305
FT1A 033303 033305 0 0 000000033305 0 000000033305
FT9 033304 033305 0 0 000000033305 0 000000033305
ET0 033304 033305 0 0 000000033305 0 000000033305
ST1A 033304 033305 0 0 000000033305 0 000000033305
ST9 033304 033305 0 0 000000033305 0 000000033305
*033304 SKIPA 0,000000
INITIAL
C(AC)=377777 777777
C(E)=377777 777777
FINAL
C(AC)=377777 777777
TIME PC MA SC FE AR MQ BR
IT0 033304 033304 0 0 334000000000 0 377777777777
IT1 033304 0 0 0 334000000000 0 377777777777
AT3 033304 0 0 0 0 0 334000000000
AT6 033304 0 0 0 0 0 334000000000
FT0 033304 0 0 0 377777777777 0 334000000000
FT1A 033304 0 0 0 377777777777 0 377777777777
FT9 033305 0 0 0 377777777777 0 377777777777
ET0 033306 0 0 0 377777777777 0 377777777777
ST1A 033306 0 0 0 377777777777 0 377777777777
ST9 033306 0 0 0 377777777777 0 377777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 440
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0635
*033306 JUMPA 0,033307
INITIAL
C(AC)=377777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033306 033306 0 0 324000033307 0 000000033307
IT1 033306 0 0 0 324000033307 0 000000033307
AT3 033306 0 0 0 000000033307 0 324000033307
AT6 033306 033307 0 0 000000033307 0 324000033307
FT1A 033306 033307 0 0 000000033307 0 000000033307
FT2 033306 033307 0 0 0 0 000000033307
FT2RQ 033306 033307 0 0 377777777777 0 000000033307
FT3 033306 033307 0 0 377777777777 0 000000033307
FT9 033307 033307 0 0 377777777777 0 000000033307
ET0 033307 033307 0 0 377777777777 0 000000033307
ST1A 033307 033307 0 0 377777777777 0 000000033307
ST9 033307 033307 0 0 377777777777 0 000000033307
*033307 SETZB 0,000001
INITIAL
C(AC)=377777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033307 033307 0 0 403000000001 0 000000000001
IT1 033307 0 0 0 403000000001 0 000000000001
AT3 033307 0 0 0 000000000001 0 403000000001
AT6 033307 000001 0 0 000000000001 0 403000000001
FT1A 033307 000001 0 0 000000000001 0 000000000001
FT9 033310 000001 0 0 000000000001 0 000000000001
ET0 033310 000001 0 0 0 0 000000000001
ST1 033310 000001 0 0 0 0 000000000001
ST2 033310 000001 0 0 0 0 000000000001
ST6 033310 000001 0 0 0 0 000000000001
ST6A 033310 000001 0 0 0 0 000000000001
ST9 033310 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 441
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0636
*033310 JRST 2,033311(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033312
FINAL
C(E)=265000 033312
TIME PC MA SC FE AR MQ BR
IT0 033310 033310 0 0 254101033311 0 000000033311
IT1 033310 0 0 0 254101033311 0 000000033311
AT1 033310 0 0 0 0 0 254101033311
AT2 033310 0 0 0 0 0 254101033311
AT3 033310 0 0 0 000000033311 0 000000033311
AT6 033310 033311 0 0 000000033311 0 000000033311
FT1A 033310 033311 0 0 000000033311 0 000000033311
FT9 033311 033311 0 0 000000033311 0 000000033311
ET0 033311 033311 0 0 000000033311 0 000000033311
ST1A 033311 033311 0 0 000000033311 0 000000033311
ST9 033311 033311 0 0 000000033311 0 000000033311
*033311 JSP 0,033312
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 033312
TIME PC MA SC FE AR MQ BR
IT0 033311 033311 0 0 265000033312 0 000000033312
IT1 033311 0 0 0 265000033312 0 000000033312
AT3 033311 0 0 0 000000033312 0 265000033312
AT6 033311 033312 0 0 000000033312 0 265000033312
FT1A 033311 033312 0 0 000000033312 0 000000033312
FT9 033312 033312 0 0 000000033312 0 000000033312
ET0 033312 033312 0 0 000000033312 0 000000033312
ST1 033312 033312 0 0 000000033312 0 000000033312
ST2 033312 033312 0 0 000000033312 0 000000033312
ST9 033312 033312 0 0 000000033312 0 000000033312
*033312 SKIPN 0,000000
INITIAL
C(AC)=000000 033312
C(E)=000000 033312
FINAL
C(AC)=000000 033312
TIME PC MA SC FE AR MQ BR
IT0 033312 033312 0 0 336000000000 0 000000033312
IT1 033312 0 0 0 336000000000 0 000000033312
AT3 033312 0 0 0 0 0 336000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 442
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0637
AT6 033312 0 0 0 0 0 336000000000
FT0 033312 0 0 0 000000033312 0 336000000000
FT1A 033312 0 0 0 000000033312 0 000000033312
FT9 033313 0 0 0 000000033312 0 000000033312
ET0 033314 0 0 0 000000033312 0 000000033312
ST1A 033314 0 0 0 000000033312 0 000000033312
ST9 033314 0 0 0 000000033312 0 000000033312
*033314 JUMPA 0,033315
INITIAL
C(AC)=000000 033312
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033314 033314 0 0 324000033315 0 000000033315
IT1 033314 0 0 0 324000033315 0 000000033315
AT3 033314 0 0 0 000000033315 0 324000033315
AT6 033314 033315 0 0 000000033315 0 324000033315
FT1A 033314 033315 0 0 000000033315 0 000000033315
FT2 033314 033315 0 0 0 0 000000033315
FT2RQ 033314 033315 0 0 000000033312 0 000000033315
FT3 033314 033315 0 0 000000033312 0 000000033315
FT9 033315 033315 0 0 000000033312 0 000000033315
ET0 033315 033315 0 0 000000033312 0 000000033315
ST1A 033315 033315 0 0 000000033312 0 000000033315
ST9 033315 033315 0 0 000000033312 0 000000033315
*033315 SETZ 0,000000
INITIAL
C(AC)=000000 033312
C(E)=000000 033312
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033315 033315 0 0 400000000000 0 0
IT1 033315 0 0 0 400000000000 0 0
AT3 033315 0 0 0 0 0 400000000000
AT6 033315 0 0 0 0 0 400000000000
FT1A 033315 0 0 0 0 0 0
FT9 033316 0 0 0 0 0 0
ET0 033316 0 0 0 0 0 0
ST1 033316 0 0 0 0 0 0
ST2 033316 0 0 0 0 0 0
ST9 033316 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 443
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0638
*033316 JSP 0,033317
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 033317
TIME PC MA SC FE AR MQ BR
IT0 033316 033316 0 0 265000033317 0 000000033317
IT1 033316 0 0 0 265000033317 0 000000033317
AT3 033316 0 0 0 000000033317 0 265000033317
AT6 033316 033317 0 0 000000033317 0 265000033317
FT1A 033316 033317 0 0 000000033317 0 000000033317
FT9 033317 033317 0 0 000000033317 0 000000033317
ET0 033317 033317 0 0 000000033317 0 000000033317
ST1 033317 033317 0 0 000000033317 0 000000033317
ST2 033317 033317 0 0 000000033317 0 000000033317
ST9 033317 033317 0 0 000000033317 0 000000033317
*033317 TRNN 0,777777
INITIAL
C(AC)=000000 033317
FINAL
C(AC)=000000 033317
TIME PC MA SC FE AR MQ BR
IT0 033317 033317 0 0 606000777777 0 000000033317
IT1 033317 0 0 0 606000777777 0 000000033317
AT3 033317 0 0 0 000000777777 0 606000777777
AT6 033317 777777 0 0 000000777777 0 606000777777
FT1A 033317 777777 0 0 000000777777 0 000000777777
FT2 033317 777777 0 0 0 0 000000777777
FT2RQ 033317 777777 0 0 000000033317 0 000000777777
FT3 033317 777777 0 0 000000033317 0 000000777777
FT9 033320 777777 0 0 000000033317 0 000000777777
ET0 033320 777777 0 0 000000033317 0 000000777777
ET1 033320 777777 0 0 000000033317 0 000000033317
ET2 033321 777777 0 0 000000033317 0 000000033317
ST1A 033321 777777 0 0 000000033317 0 000000033317
ST9 033321 777777 0 0 000000033317 0 000000033317
*033321 JUMPA 0,033322
INITIAL
C(AC)=000000 033317
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033321 033321 0 0 324000033322 0 000000033322
IT1 033321 0 0 0 324000033322 0 000000033322
AT3 033321 0 0 0 000000033322 0 324000033322
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 444
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0639
AT6 033321 033322 0 0 000000033322 0 324000033322
FT1A 033321 033322 0 0 000000033322 0 000000033322
FT2 033321 033322 0 0 0 0 000000033322
FT2RQ 033321 033322 0 0 000000033317 0 000000033322
FT3 033321 033322 0 0 000000033317 0 000000033322
FT9 033322 033322 0 0 000000033317 0 000000033322
ET0 033322 033322 0 0 000000033317 0 000000033322
ST1A 033322 033322 0 0 000000033317 0 000000033322
ST9 033322 033322 0 0 000000033317 0 000000033322
*033322 SETZM 0,000000
INITIAL
C(AC)=000000 033317
C(E)=000000 033317
FINAL
C(E)=000000 033317
TIME PC MA SC FE AR MQ BR
IT0 033322 033322 0 0 402000000000 0 0
IT1 033322 0 0 0 402000000000 0 0
AT3 033322 0 0 0 0 0 402000000000
AT6 033322 0 0 0 0 0 402000000000
FT1A 033322 0 0 0 0 0 0
FT9 033323 0 0 0 0 0 0
ET0 033323 0 0 0 0 0 0
ST6 033323 0 0 0 0 0 0
ST6A 033323 0 0 0 0 0 0
ST9 033323 0 0 0 0 0 0
*033323 MOVSI 1,740000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=740000 000000
TIME PC MA SC FE AR MQ BR
IT0 033323 033323 0 0 205040740000 0 000000740000
IT1 033323 0 0 0 205040740000 0 000000740000
AT3 033323 0 0 0 000000740000 0 205040740000
AT6 033323 0 0 0 000000740000 0 205040740000
FT1A 033323 0 0 0 000000740000 0 000000740000
FT9 033324 0 0 0 000000740000 0 000000740000
ET0 033324 0 0 0 740000000000 0 000000740000
ST1 033324 0 0 0 740000000000 0 000000740000
ST2 033324 0 0 0 740000000000 0 000000740000
ST9 033324 0 0 0 740000000000 0 000000740000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 445
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0640
*033324 JRST 2,033325(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033326
FINAL
C(E)=265000 033326
TIME PC MA SC FE AR MQ BR
IT0 033324 033324 0 0 254101033325 0 740000033325
IT1 033324 0 0 0 254101033325 0 740000033325
AT1 033324 0 0 0 0 0 254101033325
AT2 033324 0 0 0 740000000000 0 254101033325
AT3 033324 0 0 0 000000033325 0 740000033325
AT6 033324 033325 0 0 000000033325 0 740000033325
FT1A 033324 033325 0 0 000000033325 0 740000033325
FT9 033325 033325 0 0 000000033325 0 740000033325
ET0 033325 033325 0 0 000000033325 0 740000033325
ST1A 033325 033325 0 0 000000033325 0 740000033325
ST9 033325 033325 0 0 000000033325 0 740000033325
*033325 JSP 0,033326
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=740000 033326
TIME PC MA SC FE AR MQ BR
IT0 033325 033325 0 0 265000033326 0 000000033326
IT1 033325 0 0 0 265000033326 0 000000033326
AT3 033325 0 0 0 000000033326 0 265000033326
AT6 033325 033326 0 0 000000033326 0 265000033326
FT1A 033325 033326 0 0 000000033326 0 000000033326
FT9 033326 033326 0 0 000000033326 0 000000033326
ET0 033326 033326 0 0 740000033326 0 000000033326
ST1 033326 033326 0 0 740000033326 0 000000033326
ST2 033326 033326 0 0 740000033326 0 000000033326
ST9 033326 033326 0 0 740000033326 0 000000033326
*033326 TLNN 0,777777
INITIAL
C(AC)=740000 033326
FINAL
C(AC)=740000 033326
TIME PC MA SC FE AR MQ BR
IT0 033326 033326 0 0 607000777777 0 000000740000
IT1 033326 0 0 0 607000777777 0 000000740000
AT3 033326 0 0 0 000000777777 0 607000777777
AT6 033326 777777 0 0 000000777777 0 607000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 446
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0641
FT1A 033326 777777 0 0 000000777777 0 000000777777
FT2 033326 777777 0 0 0 0 000000777777
FT2RQ 033326 777777 0 0 740000033326 0 000000777777
FT3 033326 777777 0 0 740000033326 0 000000777777
FT9 033327 777777 0 0 740000033326 0 000000777777
ET0 033327 777777 0 0 033326740000 0 000000777777
ET1 033327 777777 0 0 033326740000 0 000000740000
ET2 033330 777777 0 0 740000033326 0 000000740000
ST1A 033330 777777 0 0 740000033326 0 000000740000
ST9 033330 777777 0 0 740000033326 0 000000740000
*033330 JUMPA 0,033331
INITIAL
C(AC)=740000 033326
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033330 033330 0 0 324000033331 0 000000033331
IT1 033330 0 0 0 324000033331 0 000000033331
AT3 033330 0 0 0 000000033331 0 324000033331
AT6 033330 033331 0 0 000000033331 0 324000033331
FT1A 033330 033331 0 0 000000033331 0 000000033331
FT2 033330 033331 0 0 0 0 000000033331
FT2RQ 033330 033331 0 0 740000033326 0 000000033331
FT3 033330 033331 0 0 740000033326 0 000000033331
FT9 033331 033331 0 0 740000033326 0 000000033331
ET0 033331 033331 0 0 740000033326 0 000000033331
ST1A 033331 033331 0 0 740000033326 0 000000033331
ST9 033331 033331 0 0 740000033326 0 000000033331
*033331 SETZM 0,000000
INITIAL
C(AC)=740000 033326
C(E)=740000 033326
FINAL
C(E)=740000 033326
TIME PC MA SC FE AR MQ BR
IT0 033331 033331 0 0 402000000000 0 0
IT1 033331 0 0 0 402000000000 0 0
AT3 033331 0 0 0 0 0 402000000000
AT6 033331 0 0 0 0 0 402000000000
FT1A 033331 0 0 0 0 0 0
FT9 033332 0 0 0 0 0 0
ET0 033332 0 0 0 0 0 0
ST6 033332 0 0 0 0 0 0
ST6A 033332 0 0 0 0 0 0
ST9 033332 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 447
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0642
*033332 MOVSI 1,400000
INITIAL
C(AC)=740000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033332 033332 0 0 205040400000 0 000000400000
IT1 033332 0 0 0 205040400000 0 000000400000
AT3 033332 0 0 0 000000400000 0 205040400000
AT6 033332 0 0 0 000000400000 0 205040400000
FT1A 033332 0 0 0 000000400000 0 000000400000
FT9 033333 0 0 0 000000400000 0 000000400000
ET0 033333 0 0 0 400000000000 0 000000400000
ST1 033333 0 0 0 400000000000 0 000000400000
ST2 033333 0 0 0 400000000000 0 000000400000
ST9 033333 0 0 0 400000000000 0 000000400000
*033333 JFCL 17,033334
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033333 033333 0 0 255740033334 0 000000033334
IT1 033333 0 0 0 255740033334 0 000000033334
AT3 033333 0 0 0 000000033334 0 255740033334
AT6 033333 033334 0 0 000000033334 0 255740033334
FT1A 033333 033334 0 0 000000033334 0 000000033334
FT9 033334 033334 0 0 000000033334 0 000000033334
ET0 033334 033334 0 0 000000033334 0 000000033334
ST1A 033334 033334 0 0 000000033334 0 000000033334
ST9 033334 033334 0 0 000000033334 0 000000033334
*033334 JRST 2,033335(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033336
FINAL
C(E)=265000 033336
TIME PC MA SC FE AR MQ BR
IT0 033334 033334 0 0 254101033335 0 400000033335
IT1 033334 0 0 0 254101033335 0 400000033335
AT1 033334 0 0 0 0 0 254101033335
AT2 033334 0 0 0 400000000000 0 254101033335
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 448
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0643
AT3 033334 0 0 0 000000033335 0 400000033335
AT6 033334 033335 0 0 000000033335 0 400000033335
FT1A 033334 033335 0 0 000000033335 0 400000033335
FT9 033335 033335 0 0 000000033335 0 400000033335
ET0 033335 033335 0 0 000000033335 0 400000033335
ST1A 033335 033335 0 0 000000033335 0 400000033335
ST9 033335 033335 0 0 000000033335 0 400000033335
*033335 JSP 0,033336
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=400000 033336
TIME PC MA SC FE AR MQ BR
IT0 033335 033335 0 0 265000033336 0 000000033336
IT1 033335 0 0 0 265000033336 0 000000033336
AT3 033335 0 0 0 000000033336 0 265000033336
AT6 033335 033336 0 0 000000033336 0 265000033336
FT1A 033335 033336 0 0 000000033336 0 000000033336
FT9 033336 033336 0 0 000000033336 0 000000033336
ET0 033336 033336 0 0 400000033336 0 000000033336
ST1 033336 033336 0 0 400000033336 0 000000033336
ST2 033336 033336 0 0 400000033336 0 000000033336
ST9 033336 033336 0 0 400000033336 0 000000033336
*033336 TLNN 0,400000
INITIAL
C(AC)=400000 033336
FINAL
C(AC)=400000 033336
TIME PC MA SC FE AR MQ BR
IT0 033336 033336 0 0 607000400000 0 000000400000
IT1 033336 0 0 0 607000400000 0 000000400000
AT3 033336 0 0 0 000000400000 0 607000400000
AT6 033336 0 0 0 000000400000 0 607000400000
FT1A 033336 0 0 0 000000400000 0 000000400000
FT2 033336 0 0 0 0 0 000000400000
FT2RQ 033336 0 0 0 400000033336 0 000000400000
FT3 033336 0 0 0 400000033336 0 000000400000
FT9 033337 0 0 0 400000033336 0 000000400000
ET0 033337 0 0 0 033336400000 0 000000400000
ET1 033337 0 0 0 033336400000 0 000000400000
ET2 033340 0 0 0 400000033336 0 000000400000
ST1A 033340 0 0 0 400000033336 0 000000400000
ST9 033340 0 0 0 400000033336 0 000000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 449
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0644
*033340 JUMPA 0,033341
INITIAL
C(AC)=400000 033336
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033340 033340 0 0 324000033341 0 000000033341
IT1 033340 0 0 0 324000033341 0 000000033341
AT3 033340 0 0 0 000000033341 0 324000033341
AT6 033340 033341 0 0 000000033341 0 324000033341
FT1A 033340 033341 0 0 000000033341 0 000000033341
FT2 033340 033341 0 0 0 0 000000033341
FT2RQ 033340 033341 0 0 400000033336 0 000000033341
FT3 033340 033341 0 0 400000033336 0 000000033341
FT9 033341 033341 0 0 400000033336 0 000000033341
ET0 033341 033341 0 0 400000033336 0 000000033341
ST1A 033341 033341 0 0 400000033336 0 000000033341
ST9 033341 033341 0 0 400000033336 0 000000033341
*033341 SETZM 0,000000
INITIAL
C(AC)=400000 033336
C(E)=400000 033336
FINAL
C(E)=400000 033336
TIME PC MA SC FE AR MQ BR
IT0 033341 033341 0 0 402000000000 0 0
IT1 033341 0 0 0 402000000000 0 0
AT3 033341 0 0 0 0 0 402000000000
AT6 033341 0 0 0 0 0 402000000000
FT1A 033341 0 0 0 0 0 0
FT9 033342 0 0 0 0 0 0
ET0 033342 0 0 0 0 0 0
ST6 033342 0 0 0 0 0 0
ST6A 033342 0 0 0 0 0 0
ST9 033342 0 0 0 0 0 0
*033342 MOVSI 1,200000
INITIAL
C(AC)=400000 000000
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 033342 033342 0 0 205040200000 0 000000200000
IT1 033342 0 0 0 205040200000 0 000000200000
AT3 033342 0 0 0 000000200000 0 205040200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 450
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0645
AT6 033342 0 0 0 000000200000 0 205040200000
FT1A 033342 0 0 0 000000200000 0 000000200000
FT9 033343 0 0 0 000000200000 0 000000200000
ET0 033343 0 0 0 200000000000 0 000000200000
ST1 033343 0 0 0 200000000000 0 000000200000
ST2 033343 0 0 0 200000000000 0 000000200000
ST9 033343 0 0 0 200000000000 0 000000200000
*033343 JFCL 17,033344
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033343 033343 0 0 255740033344 0 000000033344
IT1 033343 0 0 0 255740033344 0 000000033344
AT3 033343 0 0 0 000000033344 0 255740033344
AT6 033343 033344 0 0 000000033344 0 255740033344
FT1A 033343 033344 0 0 000000033344 0 000000033344
FT9 033344 033344 0 0 000000033344 0 000000033344
ET0 033344 033344 0 0 000000033344 0 000000033344
ST1A 033344 033344 0 0 000000033344 0 000000033344
ST9 033344 033344 0 0 000000033344 0 000000033344
*033344 JRST 2,033345(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033346
FINAL
C(E)=265000 033346
TIME PC MA SC FE AR MQ BR
IT0 033344 033344 0 0 254101033345 0 200000033345
IT1 033344 0 0 0 254101033345 0 200000033345
AT1 033344 0 0 0 0 0 254101033345
AT2 033344 0 0 0 200000000000 0 254101033345
AT3 033344 0 0 0 000000033345 0 200000033345
AT6 033344 033345 0 0 000000033345 0 200000033345
FT1A 033344 033345 0 0 000000033345 0 200000033345
FT9 033345 033345 0 0 000000033345 0 200000033345
ET0 033345 033345 0 0 000000033345 0 200000033345
ST1A 033345 033345 0 0 000000033345 0 200000033345
ST9 033345 033345 0 0 000000033345 0 200000033345
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 451
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0646
*033345 JSP 0,033346
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=200000 033346
TIME PC MA SC FE AR MQ BR
IT0 033345 033345 0 0 265000033346 0 000000033346
IT1 033345 0 0 0 265000033346 0 000000033346
AT3 033345 0 0 0 000000033346 0 265000033346
AT6 033345 033346 0 0 000000033346 0 265000033346
FT1A 033345 033346 0 0 000000033346 0 000000033346
FT9 033346 033346 0 0 000000033346 0 000000033346
ET0 033346 033346 0 0 200000033346 0 000000033346
ST1 033346 033346 0 0 200000033346 0 000000033346
ST2 033346 033346 0 0 200000033346 0 000000033346
ST9 033346 033346 0 0 200000033346 0 000000033346
*033346 TLNN 0,200000
INITIAL
C(AC)=200000 033346
FINAL
C(AC)=200000 033346
TIME PC MA SC FE AR MQ BR
IT0 033346 033346 0 0 607000200000 0 000000200000
IT1 033346 0 0 0 607000200000 0 000000200000
AT3 033346 0 0 0 000000200000 0 607000200000
AT6 033346 0 0 0 000000200000 0 607000200000
FT1A 033346 0 0 0 000000200000 0 000000200000
FT2 033346 0 0 0 0 0 000000200000
FT2RQ 033346 0 0 0 200000033346 0 000000200000
FT3 033346 0 0 0 200000033346 0 000000200000
FT9 033347 0 0 0 200000033346 0 000000200000
ET0 033347 0 0 0 033346200000 0 000000200000
ET1 033347 0 0 0 033346200000 0 000000200000
ET2 033350 0 0 0 200000033346 0 000000200000
ST1A 033350 0 0 0 200000033346 0 000000200000
ST9 033350 0 0 0 200000033346 0 000000200000
*033350 JUMPA 0,033351
INITIAL
C(AC)=200000 033346
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033350 033350 0 0 324000033351 0 000000033351
IT1 033350 0 0 0 324000033351 0 000000033351
AT3 033350 0 0 0 000000033351 0 324000033351
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 452
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0647
AT6 033350 033351 0 0 000000033351 0 324000033351
FT1A 033350 033351 0 0 000000033351 0 000000033351
FT2 033350 033351 0 0 0 0 000000033351
FT2RQ 033350 033351 0 0 200000033346 0 000000033351
FT3 033350 033351 0 0 200000033346 0 000000033351
FT9 033351 033351 0 0 200000033346 0 000000033351
ET0 033351 033351 0 0 200000033346 0 000000033351
ST1A 033351 033351 0 0 200000033346 0 000000033351
ST9 033351 033351 0 0 200000033346 0 000000033351
*033351 SETZ 0,000000
INITIAL
C(AC)=200000 033346
C(E)=200000 033346
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033351 033351 0 0 400000000000 0 0
IT1 033351 0 0 0 400000000000 0 0
AT3 033351 0 0 0 0 0 400000000000
AT6 033351 0 0 0 0 0 400000000000
FT1A 033351 0 0 0 0 0 0
FT9 033352 0 0 0 0 0 0
ET0 033352 0 0 0 0 0 0
ST1 033352 0 0 0 0 0 0
ST2 033352 0 0 0 0 0 0
ST9 033352 0 0 0 0 0 0
*033352 MOVSI 1,100000
INITIAL
C(AC)=200000 000000
FINAL
C(AC)=100000 000000
TIME PC MA SC FE AR MQ BR
IT0 033352 033352 0 0 205040100000 0 000000100000
IT1 033352 0 0 0 205040100000 0 000000100000
AT3 033352 0 0 0 000000100000 0 205040100000
AT6 033352 0 0 0 000000100000 0 205040100000
FT1A 033352 0 0 0 000000100000 0 000000100000
FT9 033353 0 0 0 000000100000 0 000000100000
ET0 033353 0 0 0 100000000000 0 000000100000
ST1 033353 0 0 0 100000000000 0 000000100000
ST2 033353 0 0 0 100000000000 0 000000100000
ST9 033353 0 0 0 100000000000 0 000000100000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 453
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0648
*033353 JFCL 17,033354
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033353 033353 0 0 255740033354 0 000000033354
IT1 033353 0 0 0 255740033354 0 000000033354
AT3 033353 0 0 0 000000033354 0 255740033354
AT6 033353 033354 0 0 000000033354 0 255740033354
FT1A 033353 033354 0 0 000000033354 0 000000033354
FT9 033354 033354 0 0 000000033354 0 000000033354
ET0 033354 033354 0 0 000000033354 0 000000033354
ST1A 033354 033354 0 0 000000033354 0 000000033354
ST9 033354 033354 0 0 000000033354 0 000000033354
*033354 JRST 2,033355(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033356
FINAL
C(E)=265000 033356
TIME PC MA SC FE AR MQ BR
IT0 033354 033354 0 0 254101033355 0 100000033355
IT1 033354 0 0 0 254101033355 0 100000033355
AT1 033354 0 0 0 0 0 254101033355
AT2 033354 0 0 0 100000000000 0 254101033355
AT3 033354 0 0 0 000000033355 0 100000033355
AT6 033354 033355 0 0 000000033355 0 100000033355
FT1A 033354 033355 0 0 000000033355 0 100000033355
FT9 033355 033355 0 0 000000033355 0 100000033355
ET0 033355 033355 0 0 000000033355 0 100000033355
ST1A 033355 033355 0 0 000000033355 0 100000033355
ST9 033355 033355 0 0 000000033355 0 100000033355
*033355 JSP 0,033356
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=100000 033356
TIME PC MA SC FE AR MQ BR
IT0 033355 033355 0 0 265000033356 0 000000033356
IT1 033355 0 0 0 265000033356 0 000000033356
AT3 033355 0 0 0 000000033356 0 265000033356
AT6 033355 033356 0 0 000000033356 0 265000033356
FT1A 033355 033356 0 0 000000033356 0 000000033356
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 454
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0649
FT9 033356 033356 0 0 000000033356 0 000000033356
ET0 033356 033356 0 0 100000033356 0 000000033356
ST1 033356 033356 0 0 100000033356 0 000000033356
ST2 033356 033356 0 0 100000033356 0 000000033356
ST9 033356 033356 0 0 100000033356 0 000000033356
*033356 TLNN 0,100000
INITIAL
C(AC)=100000 033356
FINAL
C(AC)=100000 033356
TIME PC MA SC FE AR MQ BR
IT0 033356 033356 0 0 607000100000 0 000000100000
IT1 033356 0 0 0 607000100000 0 000000100000
AT3 033356 0 0 0 000000100000 0 607000100000
AT6 033356 0 0 0 000000100000 0 607000100000
FT1A 033356 0 0 0 000000100000 0 000000100000
FT2 033356 0 0 0 0 0 000000100000
FT2RQ 033356 0 0 0 100000033356 0 000000100000
FT3 033356 0 0 0 100000033356 0 000000100000
FT9 033357 0 0 0 100000033356 0 000000100000
ET0 033357 0 0 0 033356100000 0 000000100000
ET1 033357 0 0 0 033356100000 0 000000100000
ET2 033360 0 0 0 100000033356 0 000000100000
ST1A 033360 0 0 0 100000033356 0 000000100000
ST9 033360 0 0 0 100000033356 0 000000100000
*033360 JUMPA 0,033361
INITIAL
C(AC)=100000 033356
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033360 033360 0 0 324000033361 0 000000033361
IT1 033360 0 0 0 324000033361 0 000000033361
AT3 033360 0 0 0 000000033361 0 324000033361
AT6 033360 033361 0 0 000000033361 0 324000033361
FT1A 033360 033361 0 0 000000033361 0 000000033361
FT2 033360 033361 0 0 0 0 000000033361
FT2RQ 033360 033361 0 0 100000033356 0 000000033361
FT3 033360 033361 0 0 100000033356 0 000000033361
FT9 033361 033361 0 0 100000033356 0 000000033361
ET0 033361 033361 0 0 100000033356 0 000000033361
ST1A 033361 033361 0 0 100000033356 0 000000033361
ST9 033361 033361 0 0 100000033356 0 000000033361
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 455
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0650
*033361 SETZ 0,000000
INITIAL
C(AC)=100000 033356
C(E)=100000 033356
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033361 033361 0 0 400000000000 0 0
IT1 033361 0 0 0 400000000000 0 0
AT3 033361 0 0 0 0 0 400000000000
AT6 033361 0 0 0 0 0 400000000000
FT1A 033361 0 0 0 0 0 0
FT9 033362 0 0 0 0 0 0
ET0 033362 0 0 0 0 0 0
ST1 033362 0 0 0 0 0 0
ST2 033362 0 0 0 0 0 0
ST9 033362 0 0 0 0 0 0
*033362 MOVSI 1,040000
INITIAL
C(AC)=100000 000000
FINAL
C(AC)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 033362 033362 0 0 205040040000 0 000000040000
IT1 033362 0 0 0 205040040000 0 000000040000
AT3 033362 0 0 0 000000040000 0 205040040000
AT6 033362 0 0 0 000000040000 0 205040040000
FT1A 033362 0 0 0 000000040000 0 000000040000
FT9 033363 0 0 0 000000040000 0 000000040000
ET0 033363 0 0 0 040000000000 0 000000040000
ST1 033363 0 0 0 040000000000 0 000000040000
ST2 033363 0 0 0 040000000000 0 000000040000
ST9 033363 0 0 0 040000000000 0 000000040000
*033363 JFCL 17,033364
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033363 033363 0 0 255740033364 0 000000033364
IT1 033363 0 0 0 255740033364 0 000000033364
AT3 033363 0 0 0 000000033364 0 255740033364
AT6 033363 033364 0 0 000000033364 0 255740033364
FT1A 033363 033364 0 0 000000033364 0 000000033364
FT9 033364 033364 0 0 000000033364 0 000000033364
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 456
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0651
ET0 033364 033364 0 0 000000033364 0 000000033364
ST1A 033364 033364 0 0 000000033364 0 000000033364
ST9 033364 033364 0 0 000000033364 0 000000033364
*033364 JRST 2,033365(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033366
FINAL
C(E)=265000 033366
TIME PC MA SC FE AR MQ BR
IT0 033364 033364 0 0 254101033365 0 040000033365
IT1 033364 0 0 0 254101033365 0 040000033365
AT1 033364 0 0 0 0 0 254101033365
AT2 033364 0 0 0 040000000000 0 254101033365
AT3 033364 0 0 0 000000033365 0 040000033365
AT6 033364 033365 0 0 000000033365 0 040000033365
FT1A 033364 033365 0 0 000000033365 0 040000033365
FT9 033365 033365 0 0 000000033365 0 040000033365
ET0 033365 033365 0 0 000000033365 0 040000033365
ST1A 033365 033365 0 0 000000033365 0 040000033365
ST9 033365 033365 0 0 000000033365 0 040000033365
*033365 JSP 0,033366
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=040000 033366
TIME PC MA SC FE AR MQ BR
IT0 033365 033365 0 0 265000033366 0 000000033366
IT1 033365 0 0 0 265000033366 0 000000033366
AT3 033365 0 0 0 000000033366 0 265000033366
AT6 033365 033366 0 0 000000033366 0 265000033366
FT1A 033365 033366 0 0 000000033366 0 000000033366
FT9 033366 033366 0 0 000000033366 0 000000033366
ET0 033366 033366 0 0 040000033366 0 000000033366
ST1 033366 033366 0 0 040000033366 0 000000033366
ST2 033366 033366 0 0 040000033366 0 000000033366
ST9 033366 033366 0 0 040000033366 0 000000033366
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 457
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0652
*033366 TLNN 0,040000
INITIAL
C(AC)=040000 033366
FINAL
C(AC)=040000 033366
TIME PC MA SC FE AR MQ BR
IT0 033366 033366 0 0 607000040000 0 000000040000
IT1 033366 0 0 0 607000040000 0 000000040000
AT3 033366 0 0 0 000000040000 0 607000040000
AT6 033366 0 0 0 000000040000 0 607000040000
FT1A 033366 0 0 0 000000040000 0 000000040000
FT2 033366 0 0 0 0 0 000000040000
FT2RQ 033366 0 0 0 040000033366 0 000000040000
FT3 033366 0 0 0 040000033366 0 000000040000
FT9 033367 0 0 0 040000033366 0 000000040000
ET0 033367 0 0 0 033366040000 0 000000040000
ET1 033367 0 0 0 033366040000 0 000000040000
ET2 033370 0 0 0 040000033366 0 000000040000
ST1A 033370 0 0 0 040000033366 0 000000040000
ST9 033370 0 0 0 040000033366 0 000000040000
*033370 JUMPA 0,033371
INITIAL
C(AC)=040000 033366
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033370 033370 0 0 324000033371 0 000000033371
IT1 033370 0 0 0 324000033371 0 000000033371
AT3 033370 0 0 0 000000033371 0 324000033371
AT6 033370 033371 0 0 000000033371 0 324000033371
FT1A 033370 033371 0 0 000000033371 0 000000033371
FT2 033370 033371 0 0 0 0 000000033371
FT2RQ 033370 033371 0 0 040000033366 0 000000033371
FT3 033370 033371 0 0 040000033366 0 000000033371
FT9 033371 033371 0 0 040000033366 0 000000033371
ET0 033371 033371 0 0 040000033366 0 000000033371
ST1A 033371 033371 0 0 040000033366 0 000000033371
ST9 033371 033371 0 0 040000033366 0 000000033371
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 458
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0653
*033371 MOVSI 1,000000
INITIAL
C(AC)=040000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033371 033371 0 0 205040000000 0 0
IT1 033371 0 0 0 205040000000 0 0
AT3 033371 0 0 0 0 0 205040000000
AT6 033371 0 0 0 0 0 205040000000
FT1A 033371 0 0 0 0 0 0
FT9 033372 0 0 0 0 0 0
ET0 033372 0 0 0 0 0 0
ST1 033372 0 0 0 0 0 0
ST2 033372 0 0 0 0 0 0
ST9 033372 0 0 0 0 0 0
*033372 JFCL 17,033373
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033372 033372 0 0 255740033373 0 000000033373
IT1 033372 0 0 0 255740033373 0 000000033373
AT3 033372 0 0 0 000000033373 0 255740033373
AT6 033372 033373 0 0 000000033373 0 255740033373
FT1A 033372 033373 0 0 000000033373 0 000000033373
FT9 033373 033373 0 0 000000033373 0 000000033373
ET0 033373 033373 0 0 000000033373 0 000000033373
ST1A 033373 033373 0 0 000000033373 0 000000033373
ST9 033373 033373 0 0 000000033373 0 000000033373
*033373 JRST 2,033374(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033375
FINAL
C(E)=265000 033375
TIME PC MA SC FE AR MQ BR
IT0 033373 033373 0 0 254101033374 0 000000033374
IT1 033373 0 0 0 254101033374 0 000000033374
AT1 033373 0 0 0 0 0 254101033374
AT2 033373 0 0 0 0 0 254101033374
AT3 033373 0 0 0 000000033374 0 000000033374
AT6 033373 033374 0 0 000000033374 0 000000033374
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 459
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0654
FT1A 033373 033374 0 0 000000033374 0 000000033374
FT9 033374 033374 0 0 000000033374 0 000000033374
ET0 033374 033374 0 0 000000033374 0 000000033374
ST1A 033374 033374 0 0 000000033374 0 000000033374
ST9 033374 033374 0 0 000000033374 0 000000033374
*033374 JSP 0,033375
INITIAL
C(AC)=040000 033366
FINAL
C(AC)=000000 033375
TIME PC MA SC FE AR MQ BR
IT0 033374 033374 0 0 265000033375 0 000000033375
IT1 033374 0 0 0 265000033375 0 000000033375
AT3 033374 0 0 0 000000033375 0 265000033375
AT6 033374 033375 0 0 000000033375 0 265000033375
FT1A 033374 033375 0 0 000000033375 0 000000033375
FT9 033375 033375 0 0 000000033375 0 000000033375
ET0 033375 033375 0 0 000000033375 0 000000033375
ST1 033375 033375 0 0 000000033375 0 000000033375
ST2 033375 033375 0 0 000000033375 0 000000033375
ST9 033375 033375 0 0 000000033375 0 000000033375
*033375 TLNE 0,761777
INITIAL
C(AC)=000000 033375
FINAL
C(AC)=000000 033375
TIME PC MA SC FE AR MQ BR
IT0 033375 033375 0 0 603000761777 0 0
IT1 033375 0 0 0 603000761777 0 0
AT3 033375 0 0 0 000000761777 0 603000761777
AT6 033375 761777 0 0 000000761777 0 603000761777
FT1A 033375 761777 0 0 000000761777 0 000000761777
FT2 033375 761777 0 0 0 0 000000761777
FT2RQ 033375 761777 0 0 000000033375 0 000000761777
FT3 033375 761777 0 0 000000033375 0 000000761777
FT9 033376 761777 0 0 000000033375 0 000000761777
ET0 033376 761777 0 0 033375000000 0 000000761777
ET1 033376 761777 0 0 033375000000 0 0
ET2 033377 761777 0 0 000000033375 0 0
ST1A 033377 761777 0 0 000000033375 0 0
ST9 033377 761777 0 0 000000033375 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 460
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0655
*033377 JUMPA 0,033400
INITIAL
C(AC)=000000 033375
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033377 033377 0 0 324000033400 0 000000033400
IT1 033377 0 0 0 324000033400 0 000000033400
AT3 033377 0 0 0 000000033400 0 324000033400
AT6 033377 0 0 0 000000033400 0 324000033400
FT1A 033377 0 0 0 000000033400 0 000000033400
FT2 033377 0 0 0 0 0 000000033400
FT2RQ 033377 0 0 0 000000033375 0 000000033400
FT3 033377 0 0 0 000000033375 0 000000033400
FT9 0 0 0 0 000000033375 0 000000033400
ET0 0 0 0 0 000000033375 0 000000033400
ST1A 0 0 0 0 000000033375 0 000000033400
ST9 0 0 0 0 000000033375 0 000000033400
*033400 JSP 0,033402
INITIAL
C(AC)=000000 033375
FINAL
C(AC)=000000 033401
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 265000033402 0 000000033402
IT1 0 0 0 0 265000033402 0 000000033402
AT3 0 0 0 0 000000033402 0 265000033402
AT6 0 033402 0 0 000000033402 0 265000033402
FT1A 0 033402 0 0 000000033402 0 000000033402
FT9 033401 033402 0 0 000000033402 0 000000033402
ET0 033402 033402 0 0 000000033401 0 000000033402
ST1 033402 033402 0 0 000000033401 0 000000033402
ST2 033402 033402 0 0 000000033401 0 000000033402
ST9 033402 033402 0 0 000000033401 0 000000033402
*033402 JUMPA 0,033403
INITIAL
C(AC)=000000 033401
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033402 033402 0 0 324000033403 0 000000033403
IT1 033402 0 0 0 324000033403 0 000000033403
AT3 033402 0 0 0 000000033403 0 324000033403
AT6 033402 033403 0 0 000000033403 0 324000033403
FT1A 033402 033403 0 0 000000033403 0 000000033403
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 461
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0656
FT2 033402 033403 0 0 0 0 000000033403
FT2RQ 033402 033403 0 0 000000033401 0 000000033403
FT3 033402 033403 0 0 000000033401 0 000000033403
FT9 033403 033403 0 0 000000033401 0 000000033403
ET0 033403 033403 0 0 000000033401 0 000000033403
ST1A 033403 033403 0 0 000000033401 0 000000033403
ST9 033403 033403 0 0 000000033401 0 000000033403
*033403 JRST 0,033405
INITIAL
C(AC)=000000 033401
C(E)=324000 033406
FINAL
C(E)=324000 033406
TIME PC MA SC FE AR MQ BR
IT0 033403 033403 0 0 254000033405 0 254000033405
IT1 033403 0 0 0 254000033405 0 254000033405
AT3 033403 0 0 0 000000033405 0 254000033405
AT6 033403 033405 0 0 000000033405 0 254000033405
FT1A 033403 033405 0 0 000000033405 0 254000033405
FT9 033404 033405 0 0 000000033405 0 254000033405
ET0 033405 033404 0 0 000000033405 0 254000033405
ST1A 033405 033404 0 0 000000033405 0 254000033405
ST9 033405 033404 0 0 000000033405 0 254000033405
*033405 JUMPA 0,033406
INITIAL
C(AC)=000000 033401
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033405 033405 0 0 324000033406 0 000000033406
IT1 033405 0 0 0 324000033406 0 000000033406
AT3 033405 0 0 0 000000033406 0 324000033406
AT6 033405 033406 0 0 000000033406 0 324000033406
FT1A 033405 033406 0 0 000000033406 0 000000033406
FT2 033405 033406 0 0 0 0 000000033406
FT2RQ 033405 033406 0 0 000000033401 0 000000033406
FT3 033405 033406 0 0 000000033401 0 000000033406
FT9 033406 033406 0 0 000000033401 0 000000033406
ET0 033406 033406 0 0 000000033401 0 000000033406
ST1A 033406 033406 0 0 000000033401 0 000000033406
ST9 033406 033406 0 0 000000033401 0 000000033406
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 462
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0657
*033406 SETZ 0,000000
INITIAL
C(AC)=000000 033401
C(E)=000000 033401
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033406 033406 0 0 400000000000 0 0
IT1 033406 0 0 0 400000000000 0 0
AT3 033406 0 0 0 0 0 400000000000
AT6 033406 0 0 0 0 0 400000000000
FT1A 033406 0 0 0 0 0 0
FT9 033407 0 0 0 0 0 0
ET0 033407 0 0 0 0 0 0
ST1 033407 0 0 0 0 0 0
ST2 033407 0 0 0 0 0 0
ST9 033407 0 0 0 0 0 0
*033407 AOBJN 0,033410
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 033407 033407 0 0 253000033410 0 000000033410
IT1 033407 0 0 0 253000033410 0 000000033410
AT3 033407 0 0 0 000000033410 0 253000033410
AT6 033407 033410 0 0 000000033410 0 253000033410
FT1A 033407 033410 0 0 000000033410 0 000000033410
FT2 033407 033410 0 0 0 0 000000033410
FT2RQ 033407 033410 0 0 0 0 000000033410
FT3 033407 033410 0 0 0 0 000000033410
FT9 033410 033410 0 0 0 0 000000033410
ET0 033410 033410 0 0 000001000001 0 000000033410
ST1 033410 033410 0 0 000001000001 0 000000033410
ST2 033410 033410 0 0 000001000001 0 000000033410
ST9 033410 033410 0 0 000001000001 0 000000033410
*033410 CAME 0,034442
INITIAL
C(AC)=000001 000001
C(E)=000001 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033410 033410 0 0 312000034442 0 000001000001
IT1 033410 0 0 0 312000034442 0 000001000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 463
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0658
AT3 033410 0 0 0 000000034442 0 312000034442
AT6 033410 034442 0 0 000000034442 0 312000034442
FT0 033410 034442 0 0 000001000001 0 312000034442
FT1A 033410 034442 0 0 000001000001 0 000001000001
FT2 033410 034442 0 0 0 0 000001000001
FT2RQ 033410 034442 0 0 000001000001 0 000001000001
FT3 033410 034442 0 0 000001000001 0 000001000001
FT9 033411 034442 0 0 000001000001 0 000001000001
ET0 033412 034442 0 0 0 0 000001000001
ST1A 033412 034442 0 0 0 0 000001000001
ST9 033412 034442 0 0 0 0 000001000001
*033412 JUMPA 0,033413
INITIAL
C(AC)=000001 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033412 033412 0 0 324000033413 0 000000033413
IT1 033412 0 0 0 324000033413 0 000000033413
AT3 033412 0 0 0 000000033413 0 324000033413
AT6 033412 033413 0 0 000000033413 0 324000033413
FT1A 033412 033413 0 0 000000033413 0 000000033413
FT2 033412 033413 0 0 0 0 000000033413
FT2RQ 033412 033413 0 0 000001000001 0 000000033413
FT3 033412 033413 0 0 000001000001 0 000000033413
FT9 033413 033413 0 0 000001000001 0 000000033413
ET0 033413 033413 0 0 000001000001 0 000000033413
ST1A 033413 033413 0 0 000001000001 0 000000033413
ST9 033413 033413 0 0 000001000001 0 000000033413
*033413 MOVE 0,034540
INITIAL
C(AC)=000001 000001
C(E)=377777 377777
FINAL
C(AC)=377777 377777
TIME PC MA SC FE AR MQ BR
IT0 033413 033413 0 0 200000034540 0 377777377777
IT1 033413 0 0 0 200000034540 0 377777377777
AT3 033413 0 0 0 000000034540 0 200000034540
AT6 033413 034540 0 0 000000034540 0 200000034540
FT0 033413 034540 0 0 377777377777 0 200000034540
FT1A 033413 034540 0 0 377777377777 0 377777377777
FT9 033414 034540 0 0 377777377777 0 377777377777
ET0 033414 034540 0 0 377777377777 0 377777377777
ST1 033414 034540 0 0 377777377777 0 377777377777
ST2 033414 034540 0 0 377777377777 0 377777377777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 464
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0659
ST9 033414 034540 0 0 377777377777 0 377777377777
*033414 AOBJP 0,033415
INITIAL
C(AC)=377777 377777
FINAL
C(AC)=400000 400000
TIME PC MA SC FE AR MQ BR
IT0 033414 033414 0 0 252000033415 0 000000033415
IT1 033414 0 0 0 252000033415 0 000000033415
AT3 033414 0 0 0 000000033415 0 252000033415
AT6 033414 033415 0 0 000000033415 0 252000033415
FT1A 033414 033415 0 0 000000033415 0 000000033415
FT2 033414 033415 0 0 0 0 000000033415
FT2RQ 033414 033415 0 0 377777377777 0 000000033415
FT3 033414 033415 0 0 377777377777 0 000000033415
FT9 033415 033415 0 0 377777377777 0 000000033415
ET0 033415 033415 0 0 400000400000 0 000000033415
ST1 033415 033415 0 0 400000400000 0 000000033415
ST2 033415 033415 0 0 400000400000 0 000000033415
ST9 033415 033415 0 0 400000400000 0 000000033415
*033415 CAME 0,034541
INITIAL
C(AC)=400000 400000
C(E)=400000 400000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033415 033415 0 0 312000034541 0 400000400000
IT1 033415 0 0 0 312000034541 0 400000400000
AT3 033415 0 0 0 000000034541 0 312000034541
AT6 033415 034541 0 0 000000034541 0 312000034541
FT0 033415 034541 0 0 400000400000 0 312000034541
FT1A 033415 034541 0 0 400000400000 0 400000400000
FT2 033415 034541 0 0 0 0 400000400000
FT2RQ 033415 034541 0 0 400000400000 0 400000400000
FT3 033415 034541 0 0 400000400000 0 400000400000
FT9 033416 034541 0 0 400000400000 0 400000400000
ET0 033417 034541 0 0 0 0 400000400000
ST1A 033417 034541 0 0 0 0 400000400000
ST9 033417 034541 0 0 0 0 400000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 465
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0660
*033417 JUMPA 0,033420
INITIAL
C(AC)=400000 400000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033417 033417 0 0 324000033420 0 000000033420
IT1 033417 0 0 0 324000033420 0 000000033420
AT3 033417 0 0 0 000000033420 0 324000033420
AT6 033417 033420 0 0 000000033420 0 324000033420
FT1A 033417 033420 0 0 000000033420 0 000000033420
FT2 033417 033420 0 0 0 0 000000033420
FT2RQ 033417 033420 0 0 400000400000 0 000000033420
FT3 033417 033420 0 0 400000400000 0 000000033420
FT9 033420 033420 0 0 400000400000 0 000000033420
ET0 033420 033420 0 0 400000400000 0 000000033420
ST1A 033420 033420 0 0 400000400000 0 000000033420
ST9 033420 033420 0 0 400000400000 0 000000033420
*033420 SETZ 0,000000
INITIAL
C(AC)=400000 400000
C(E)=400000 400000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033420 033420 0 0 400000000000 0 0
IT1 033420 0 0 0 400000000000 0 0
AT3 033420 0 0 0 0 0 400000000000
AT6 033420 0 0 0 0 0 400000000000
FT1A 033420 0 0 0 0 0 0
FT9 033421 0 0 0 0 0 0
ET0 033421 0 0 0 0 0 0
ST1 033421 0 0 0 0 0 0
ST2 033421 0 0 0 0 0 0
ST9 033421 0 0 0 0 0 0
*033421 AOBJN 0,033423
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 033421 033421 0 0 253000033423 0 000000033423
IT1 033421 0 0 0 253000033423 0 000000033423
AT3 033421 0 0 0 000000033423 0 253000033423
AT6 033421 033423 0 0 000000033423 0 253000033423
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 466
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0661
FT1A 033421 033423 0 0 000000033423 0 000000033423
FT2 033421 033423 0 0 0 0 000000033423
FT2RQ 033421 033423 0 0 0 0 000000033423
FT3 033421 033423 0 0 0 0 000000033423
FT9 033422 033423 0 0 0 0 000000033423
ET0 033422 033423 0 0 000001000001 0 000000033423
ST1 033422 033423 0 0 000001000001 0 000000033423
ST2 033422 033423 0 0 000001000001 0 000000033423
ST9 033422 033423 0 0 000001000001 0 000000033423
*033422 SKIPA 0,000000
INITIAL
C(AC)=000001 000001
C(E)=000001 000001
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 033422 033422 0 0 334000000000 0 000001000001
IT1 033422 0 0 0 334000000000 0 000001000001
AT3 033422 0 0 0 0 0 334000000000
AT6 033422 0 0 0 0 0 334000000000
FT0 033422 0 0 0 000001000001 0 334000000000
FT1A 033422 0 0 0 000001000001 0 000001000001
FT9 033423 0 0 0 000001000001 0 000001000001
ET0 033424 0 0 0 000001000001 0 000001000001
ST1A 033424 0 0 0 000001000001 0 000001000001
ST9 033424 0 0 0 000001000001 0 000001000001
*033424 JUMPA 0,033425
INITIAL
C(AC)=000001 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033424 033424 0 0 324000033425 0 000000033425
IT1 033424 0 0 0 324000033425 0 000000033425
AT3 033424 0 0 0 000000033425 0 324000033425
AT6 033424 033425 0 0 000000033425 0 324000033425
FT1A 033424 033425 0 0 000000033425 0 000000033425
FT2 033424 033425 0 0 0 0 000000033425
FT2RQ 033424 033425 0 0 000001000001 0 000000033425
FT3 033424 033425 0 0 000001000001 0 000000033425
FT9 033425 033425 0 0 000001000001 0 000000033425
ET0 033425 033425 0 0 000001000001 0 000000033425
ST1A 033425 033425 0 0 000001000001 0 000000033425
ST9 033425 033425 0 0 000001000001 0 000000033425
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 467
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0662
*033425 SETZ 0,000000
INITIAL
C(AC)=000001 000001
C(E)=000001 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033425 033425 0 0 400000000000 0 0
IT1 033425 0 0 0 400000000000 0 0
AT3 033425 0 0 0 0 0 400000000000
AT6 033425 0 0 0 0 0 400000000000
FT1A 033425 0 0 0 0 0 0
FT9 033426 0 0 0 0 0 0
ET0 033426 0 0 0 0 0 0
ST1 033426 0 0 0 0 0 0
ST2 033426 0 0 0 0 0 0
ST9 033426 0 0 0 0 0 0
*033426 AOBJP 0,033430
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 033426 033426 0 0 252000033430 0 000000033430
IT1 033426 0 0 0 252000033430 0 000000033430
AT3 033426 0 0 0 000000033430 0 252000033430
AT6 033426 033430 0 0 000000033430 0 252000033430
FT1A 033426 033430 0 0 000000033430 0 000000033430
FT2 033426 033430 0 0 0 0 000000033430
FT2RQ 033426 033430 0 0 0 0 000000033430
FT3 033426 033430 0 0 0 0 000000033430
FT9 033427 033430 0 0 0 0 000000033430
ET0 033430 033430 0 0 000001000001 0 000000033430
ST1 033430 033430 0 0 000001000001 0 000000033430
ST2 033430 033430 0 0 000001000001 0 000000033430
ST9 033430 033430 0 0 000001000001 0 000000033430
*033430 JUMPA 0,033431
INITIAL
C(AC)=000001 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033430 033430 0 0 324000033431 0 000000033431
IT1 033430 0 0 0 324000033431 0 000000033431
AT3 033430 0 0 0 000000033431 0 324000033431
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 468
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0663
AT6 033430 033431 0 0 000000033431 0 324000033431
FT1A 033430 033431 0 0 000000033431 0 000000033431
FT2 033430 033431 0 0 0 0 000000033431
FT2RQ 033430 033431 0 0 000001000001 0 000000033431
FT3 033430 033431 0 0 000001000001 0 000000033431
FT9 033431 033431 0 0 000001000001 0 000000033431
ET0 033431 033431 0 0 000001000001 0 000000033431
ST1A 033431 033431 0 0 000001000001 0 000000033431
ST9 033431 033431 0 0 000001000001 0 000000033431
*033431 MOVE 0,034541
INITIAL
C(AC)=000001 000001
C(E)=400000 400000
FINAL
C(AC)=400000 400000
TIME PC MA SC FE AR MQ BR
IT0 033431 033431 0 0 200000034541 0 400000400000
IT1 033431 0 0 0 200000034541 0 400000400000
AT3 033431 0 0 0 000000034541 0 200000034541
AT6 033431 034541 0 0 000000034541 0 200000034541
FT0 033431 034541 0 0 400000400000 0 200000034541
FT1A 033431 034541 0 0 400000400000 0 400000400000
FT9 033432 034541 0 0 400000400000 0 400000400000
ET0 033432 034541 0 0 400000400000 0 400000400000
ST1 033432 034541 0 0 400000400000 0 400000400000
ST2 033432 034541 0 0 400000400000 0 400000400000
ST9 033432 034541 0 0 400000400000 0 400000400000
*033432 AOBJN 0,033434
INITIAL
C(AC)=400000 400000
FINAL
C(AC)=400001 400001
TIME PC MA SC FE AR MQ BR
IT0 033432 033432 0 0 253000033434 0 000000033434
IT1 033432 0 0 0 253000033434 0 000000033434
AT3 033432 0 0 0 000000033434 0 253000033434
AT6 033432 033434 0 0 000000033434 0 253000033434
FT1A 033432 033434 0 0 000000033434 0 000000033434
FT2 033432 033434 0 0 0 0 000000033434
FT2RQ 033432 033434 0 0 400000400000 0 000000033434
FT3 033432 033434 0 0 400000400000 0 000000033434
FT9 033433 033434 0 0 400000400000 0 000000033434
ET0 033434 033434 0 0 400001400001 0 000000033434
ST1 033434 033434 0 0 400001400001 0 000000033434
ST2 033434 033434 0 0 400001400001 0 000000033434
ST9 033434 033434 0 0 400001400001 0 000000033434
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 469
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0664
*033434 JUMPA 0,033435
INITIAL
C(AC)=400001 400001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033434 033434 0 0 324000033435 0 000000033435
IT1 033434 0 0 0 324000033435 0 000000033435
AT3 033434 0 0 0 000000033435 0 324000033435
AT6 033434 033435 0 0 000000033435 0 324000033435
FT1A 033434 033435 0 0 000000033435 0 000000033435
FT2 033434 033435 0 0 0 0 000000033435
FT2RQ 033434 033435 0 0 400001400001 0 000000033435
FT3 033434 033435 0 0 400001400001 0 000000033435
FT9 033435 033435 0 0 400001400001 0 000000033435
ET0 033435 033435 0 0 400001400001 0 000000033435
ST1A 033435 033435 0 0 400001400001 0 000000033435
ST9 033435 033435 0 0 400001400001 0 000000033435
*033435 MOVE 0,034541
INITIAL
C(AC)=400001 400001
C(E)=400000 400000
FINAL
C(AC)=400000 400000
TIME PC MA SC FE AR MQ BR
IT0 033435 033435 0 0 200000034541 0 400000400000
IT1 033435 0 0 0 200000034541 0 400000400000
AT3 033435 0 0 0 000000034541 0 200000034541
AT6 033435 034541 0 0 000000034541 0 200000034541
FT0 033435 034541 0 0 400000400000 0 200000034541
FT1A 033435 034541 0 0 400000400000 0 400000400000
FT9 033436 034541 0 0 400000400000 0 400000400000
ET0 033436 034541 0 0 400000400000 0 400000400000
ST1 033436 034541 0 0 400000400000 0 400000400000
ST2 033436 034541 0 0 400000400000 0 400000400000
ST9 033436 034541 0 0 400000400000 0 400000400000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 470
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0665
*033436 AOBJP 0,033440
INITIAL
C(AC)=400000 400000
FINAL
C(AC)=400001 400001
TIME PC MA SC FE AR MQ BR
IT0 033436 033436 0 0 252000033440 0 000000033440
IT1 033436 0 0 0 252000033440 0 000000033440
AT3 033436 0 0 0 000000033440 0 252000033440
AT6 033436 033440 0 0 000000033440 0 252000033440
FT1A 033436 033440 0 0 000000033440 0 000000033440
FT2 033436 033440 0 0 0 0 000000033440
FT2RQ 033436 033440 0 0 400000400000 0 000000033440
FT3 033436 033440 0 0 400000400000 0 000000033440
FT9 033437 033440 0 0 400000400000 0 000000033440
ET0 033437 033440 0 0 400001400001 0 000000033440
ST1 033437 033440 0 0 400001400001 0 000000033440
ST2 033437 033440 0 0 400001400001 0 000000033440
ST9 033437 033440 0 0 400001400001 0 000000033440
*033437 SKIPA 0,000000
INITIAL
C(AC)=400001 400001
C(E)=400001 400001
FINAL
C(AC)=400001 400001
TIME PC MA SC FE AR MQ BR
IT0 033437 033437 0 0 334000000000 0 400001400001
IT1 033437 0 0 0 334000000000 0 400001400001
AT3 033437 0 0 0 0 0 334000000000
AT6 033437 0 0 0 0 0 334000000000
FT0 033437 0 0 0 400001400001 0 334000000000
FT1A 033437 0 0 0 400001400001 0 400001400001
FT9 033440 0 0 0 400001400001 0 400001400001
ET0 033441 0 0 0 400001400001 0 400001400001
ST1A 033441 0 0 0 400001400001 0 400001400001
ST9 033441 0 0 0 400001400001 0 400001400001
*033441 JUMPA 0,033442
INITIAL
C(AC)=400001 400001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033441 033441 0 0 324000033442 0 000000033442
IT1 033441 0 0 0 324000033442 0 000000033442
AT3 033441 0 0 0 000000033442 0 324000033442
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 471
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0666
AT6 033441 033442 0 0 000000033442 0 324000033442
FT1A 033441 033442 0 0 000000033442 0 000000033442
FT2 033441 033442 0 0 0 0 000000033442
FT2RQ 033441 033442 0 0 400001400001 0 000000033442
FT3 033441 033442 0 0 400001400001 0 000000033442
FT9 033442 033442 0 0 400001400001 0 000000033442
ET0 033442 033442 0 0 400001400001 0 000000033442
ST1A 033442 033442 0 0 400001400001 0 000000033442
ST9 033442 033442 0 0 400001400001 0 000000033442
*033442 SETO 0,000000
INITIAL
C(AC)=400001 400001
C(E)=400001 400001
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033442 033442 0 0 474000000000 0 0
IT1 033442 0 0 0 474000000000 0 0
AT3 033442 0 0 0 0 0 474000000000
AT6 033442 0 0 0 0 0 474000000000
FT1A 033442 0 0 0 0 0 0
FT9 033443 0 0 0 0 0 0
ET0 033443 0 0 0 777777777777 0 0
ST1 033443 0 0 0 777777777777 0 0
ST2 033443 0 0 0 777777777777 0 0
ST9 033443 0 0 0 777777777777 0 0
*033443 AOBJN 0,033444
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000001 000000
TIME PC MA SC FE AR MQ BR
IT0 033443 033443 0 0 253000033444 0 000000033444
IT1 033443 0 0 0 253000033444 0 000000033444
AT3 033443 0 0 0 000000033444 0 253000033444
AT6 033443 033444 0 0 000000033444 0 253000033444
FT1A 033443 033444 0 0 000000033444 0 000000033444
FT2 033443 033444 0 0 0 0 000000033444
FT2RQ 033443 033444 0 0 777777777777 0 000000033444
FT3 033443 033444 0 0 777777777777 0 000000033444
FT9 033444 033444 0 0 777777777777 0 000000033444
ET0 033444 033444 0 0 000001000000 0 000000033444
ST1 033444 033444 0 0 000001000000 0 000000033444
ST2 033444 033444 0 0 000001000000 0 000000033444
ST9 033444 033444 0 0 000001000000 0 000000033444
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 472
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0667
*033444 CAME 0,034444
INITIAL
C(AC)=000001 000000
C(E)=000001 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033444 033444 0 0 312000034444 0 000001000000
IT1 033444 0 0 0 312000034444 0 000001000000
AT3 033444 0 0 0 000000034444 0 312000034444
AT6 033444 034444 0 0 000000034444 0 312000034444
FT0 033444 034444 0 0 000001000000 0 312000034444
FT1A 033444 034444 0 0 000001000000 0 000001000000
FT2 033444 034444 0 0 0 0 000001000000
FT2RQ 033444 034444 0 0 000001000000 0 000001000000
FT3 033444 034444 0 0 000001000000 0 000001000000
FT9 033445 034444 0 0 000001000000 0 000001000000
ET0 033446 034444 0 0 0 0 000001000000
ST1A 033446 034444 0 0 0 0 000001000000
ST9 033446 034444 0 0 0 0 000001000000
*033446 JUMPA 0,033447
INITIAL
C(AC)=000001 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033446 033446 0 0 324000033447 0 000000033447
IT1 033446 0 0 0 324000033447 0 000000033447
AT3 033446 0 0 0 000000033447 0 324000033447
AT6 033446 033447 0 0 000000033447 0 324000033447
FT1A 033446 033447 0 0 000000033447 0 000000033447
FT2 033446 033447 0 0 0 0 000000033447
FT2RQ 033446 033447 0 0 000001000000 0 000000033447
FT3 033446 033447 0 0 000001000000 0 000000033447
FT9 033447 033447 0 0 000001000000 0 000000033447
ET0 033447 033447 0 0 000001000000 0 000000033447
ST1A 033447 033447 0 0 000001000000 0 000000033447
ST9 033447 033447 0 0 000001000000 0 000000033447
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 473
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0668
*033447 JFCL 17,033450
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033447 033447 0 0 255740033450 0 000000033450
IT1 033447 0 0 0 255740033450 0 000000033450
AT3 033447 0 0 0 000000033450 0 255740033450
AT6 033447 033450 0 0 000000033450 0 255740033450
FT1A 033447 033450 0 0 000000033450 0 000000033450
FT9 033450 033450 0 0 000000033450 0 000000033450
ET0 033450 033450 0 0 000000033450 0 000000033450
ST1A 033450 033450 0 0 000000033450 0 000000033450
ST9 033450 033450 0 0 000000033450 0 000000033450
*033450 MOVNI 0,000000
INITIAL
C(AC)=000001 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033450 033450 0 0 211000000000 0 0
IT1 033450 0 0 0 211000000000 0 0
AT3 033450 0 0 0 0 0 211000000000
AT6 033450 0 0 0 0 0 211000000000
FT1A 033450 0 0 0 0 0 0
FT9 033451 0 0 0 0 0 0
ET0 033451 0 0 0 0 0 0
ST1 033451 0 0 0 0 0 0
ST2 033451 0 0 0 0 0 0
ST9 033451 0 0 0 0 0 0
*033451 JFCL 4,033453
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033451 033451 0 0 255200033453 0 000000033453
IT1 033451 0 0 0 255200033453 0 000000033453
AT3 033451 0 0 0 000000033453 0 255200033453
AT6 033451 033453 0 0 000000033453 0 255200033453
FT1A 033451 033453 0 0 000000033453 0 000000033453
FT9 033452 033453 0 0 000000033453 0 000000033453
ET0 033453 033453 0 0 000000033453 0 000000033453
ST1A 033453 033453 0 0 000000033453 0 000000033453
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 474
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0669
ST9 033453 033453 0 0 000000033453 0 000000033453
*033453 JUMPA 0,033454
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033453 033453 0 0 324000033454 0 000000033454
IT1 033453 0 0 0 324000033454 0 000000033454
AT3 033453 0 0 0 000000033454 0 324000033454
AT6 033453 033454 0 0 000000033454 0 324000033454
FT1A 033453 033454 0 0 000000033454 0 000000033454
FT2 033453 033454 0 0 0 0 000000033454
FT2RQ 033453 033454 0 0 0 0 000000033454
FT3 033453 033454 0 0 0 0 000000033454
FT9 033454 033454 0 0 0 0 000000033454
ET0 033454 033454 0 0 0 0 000000033454
ST1A 033454 033454 0 0 0 0 000000033454
ST9 033454 033454 0 0 0 0 000000033454
*033454 JFCL 2,033456
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033454 033454 0 0 255100033456 0 000000033456
IT1 033454 0 0 0 255100033456 0 000000033456
AT3 033454 0 0 0 000000033456 0 255100033456
AT6 033454 033456 0 0 000000033456 0 255100033456
FT1A 033454 033456 0 0 000000033456 0 000000033456
FT9 033455 033456 0 0 000000033456 0 000000033456
ET0 033456 033456 0 0 000000033456 0 000000033456
ST1A 033456 033456 0 0 000000033456 0 000000033456
ST9 033456 033456 0 0 000000033456 0 000000033456
*033456 JUMPA 0,033457
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033456 033456 0 0 324000033457 0 000000033457
IT1 033456 0 0 0 324000033457 0 000000033457
AT3 033456 0 0 0 000000033457 0 324000033457
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 475
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0670
AT6 033456 033457 0 0 000000033457 0 324000033457
FT1A 033456 033457 0 0 000000033457 0 000000033457
FT2 033456 033457 0 0 0 0 000000033457
FT2RQ 033456 033457 0 0 0 0 000000033457
FT3 033456 033457 0 0 0 0 000000033457
FT9 033457 033457 0 0 0 0 000000033457
ET0 033457 033457 0 0 0 0 000000033457
ST1A 033457 033457 0 0 0 0 000000033457
ST9 033457 033457 0 0 0 0 000000033457
*033457 JFCL 10,033461
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033457 033457 0 0 255400033461 0 000000033461
IT1 033457 0 0 0 255400033461 0 000000033461
AT3 033457 0 0 0 000000033461 0 255400033461
AT6 033457 033461 0 0 000000033461 0 255400033461
FT1A 033457 033461 0 0 000000033461 0 000000033461
FT9 033460 033461 0 0 000000033461 0 000000033461
ET0 033460 033461 0 0 000000033461 0 000000033461
ST1A 033460 033461 0 0 000000033461 0 000000033461
ST9 033460 033461 0 0 000000033461 0 000000033461
*033460 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033460 033460 0 0 334000000000 0 0
IT1 033460 0 0 0 334000000000 0 0
AT3 033460 0 0 0 0 0 334000000000
AT6 033460 0 0 0 0 0 334000000000
FT0 033460 0 0 0 0 0 334000000000
FT1A 033460 0 0 0 0 0 0
FT9 033461 0 0 0 0 0 0
ET0 033462 0 0 0 0 0 0
ST1A 033462 0 0 0 0 0 0
ST9 033462 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 476
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0671
*033462 JUMPA 0,033463
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033462 033462 0 0 324000033463 0 000000033463
IT1 033462 0 0 0 324000033463 0 000000033463
AT3 033462 0 0 0 000000033463 0 324000033463
AT6 033462 033463 0 0 000000033463 0 324000033463
FT1A 033462 033463 0 0 000000033463 0 000000033463
FT2 033462 033463 0 0 0 0 000000033463
FT2RQ 033462 033463 0 0 0 0 000000033463
FT3 033462 033463 0 0 0 0 000000033463
FT9 033463 033463 0 0 0 0 000000033463
ET0 033463 033463 0 0 0 0 000000033463
ST1A 033463 033463 0 0 0 0 000000033463
ST9 033463 033463 0 0 0 0 000000033463
*033463 JFCL 1,033465
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033463 033463 0 0 255040033465 0 000000033465
IT1 033463 0 0 0 255040033465 0 000000033465
AT3 033463 0 0 0 000000033465 0 255040033465
AT6 033463 033465 0 0 000000033465 0 255040033465
FT1A 033463 033465 0 0 000000033465 0 000000033465
FT9 033464 033465 0 0 000000033465 0 000000033465
ET0 033464 033465 0 0 000000033465 0 000000033465
ST1A 033464 033465 0 0 000000033465 0 000000033465
ST9 033464 033465 0 0 000000033465 0 000000033465
*033464 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033464 033464 0 0 334000000000 0 0
IT1 033464 0 0 0 334000000000 0 0
AT3 033464 0 0 0 0 0 334000000000
AT6 033464 0 0 0 0 0 334000000000
FT0 033464 0 0 0 0 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 477
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0672
FT1A 033464 0 0 0 0 0 0
FT9 033465 0 0 0 0 0 0
ET0 033466 0 0 0 0 0 0
ST1A 033466 0 0 0 0 0 0
ST9 033466 0 0 0 0 0 0
*033466 JUMPA 0,033467
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033466 033466 0 0 324000033467 0 000000033467
IT1 033466 0 0 0 324000033467 0 000000033467
AT3 033466 0 0 0 000000033467 0 324000033467
AT6 033466 033467 0 0 000000033467 0 324000033467
FT1A 033466 033467 0 0 000000033467 0 000000033467
FT2 033466 033467 0 0 0 0 000000033467
FT2RQ 033466 033467 0 0 0 0 000000033467
FT3 033466 033467 0 0 0 0 000000033467
FT9 033467 033467 0 0 0 0 000000033467
ET0 033467 033467 0 0 0 0 000000033467
ST1A 033467 033467 0 0 0 0 000000033467
ST9 033467 033467 0 0 0 0 000000033467
*033467 JFCL 17,033470
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033467 033467 0 0 255740033470 0 000000033470
IT1 033467 0 0 0 255740033470 0 000000033470
AT3 033467 0 0 0 000000033470 0 255740033470
AT6 033467 033470 0 0 000000033470 0 255740033470
FT1A 033467 033470 0 0 000000033470 0 000000033470
FT9 033470 033470 0 0 000000033470 0 000000033470
ET0 033470 033470 0 0 000000033470 0 000000033470
ST1A 033470 033470 0 0 000000033470 0 000000033470
ST9 033470 033470 0 0 000000033470 0 000000033470
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 478
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0673
*033470 MOVN 0,034466
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033470 033470 0 0 210000034466 0 777777777777
IT1 033470 0 0 0 210000034466 0 777777777777
AT3 033470 0 0 0 000000034466 0 210000034466
AT6 033470 034466 0 0 000000034466 0 210000034466
FT0 033470 034466 0 0 777777777777 0 210000034466
FT1A 033470 034466 0 0 777777777777 0 777777777777
FT9 033471 034466 0 0 777777777777 0 777777777777
ET0 033471 034466 0 0 000000000001 0 777777777777
ST1 033471 034466 0 0 000000000001 0 777777777777
ST2 033471 034466 0 0 000000000001 0 777777777777
ST9 033471 034466 0 0 000000000001 0 777777777777
*033471 JFCL 17,033473
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033471 033471 0 0 255740033473 0 000000033473
IT1 033471 0 0 0 255740033473 0 000000033473
AT3 033471 0 0 0 000000033473 0 255740033473
AT6 033471 033473 0 0 000000033473 0 255740033473
FT1A 033471 033473 0 0 000000033473 0 000000033473
FT9 033472 033473 0 0 000000033473 0 000000033473
ET0 033472 033473 0 0 000000033473 0 000000033473
ST1A 033472 033473 0 0 000000033473 0 000000033473
ST9 033472 033473 0 0 000000033473 0 000000033473
*033472 SKIPA 0,000000
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033472 033472 0 0 334000000000 0 000000000001
IT1 033472 0 0 0 334000000000 0 000000000001
AT3 033472 0 0 0 0 0 334000000000
AT6 033472 0 0 0 0 0 334000000000
FT0 033472 0 0 0 000000000001 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 479
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0674
FT1A 033472 0 0 0 000000000001 0 000000000001
FT9 033473 0 0 0 000000000001 0 000000000001
ET0 033474 0 0 0 000000000001 0 000000000001
ST1A 033474 0 0 0 000000000001 0 000000000001
ST9 033474 0 0 0 000000000001 0 000000000001
*033474 JUMPA 0,033475
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033474 033474 0 0 324000033475 0 000000033475
IT1 033474 0 0 0 324000033475 0 000000033475
AT3 033474 0 0 0 000000033475 0 324000033475
AT6 033474 033475 0 0 000000033475 0 324000033475
FT1A 033474 033475 0 0 000000033475 0 000000033475
FT2 033474 033475 0 0 0 0 000000033475
FT2RQ 033474 033475 0 0 000000000001 0 000000033475
FT3 033474 033475 0 0 000000000001 0 000000033475
FT9 033475 033475 0 0 000000000001 0 000000033475
ET0 033475 033475 0 0 000000000001 0 000000033475
ST1A 033475 033475 0 0 000000000001 0 000000033475
ST9 033475 033475 0 0 000000000001 0 000000033475
*033475 JFCL 17,033476
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033475 033475 0 0 255740033476 0 000000033476
IT1 033475 0 0 0 255740033476 0 000000033476
AT3 033475 0 0 0 000000033476 0 255740033476
AT6 033475 033476 0 0 000000033476 0 255740033476
FT1A 033475 033476 0 0 000000033476 0 000000033476
FT9 033476 033476 0 0 000000033476 0 000000033476
ET0 033476 033476 0 0 000000033476 0 000000033476
ST1A 033476 033476 0 0 000000033476 0 000000033476
ST9 033476 033476 0 0 000000033476 0 000000033476
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 480
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0675
*033476 MOVN 0,034465
INITIAL
C(AC)=000000 000001
C(E)=400000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033476 033476 0 0 210000034465 0 400000000000
IT1 033476 0 0 0 210000034465 0 400000000000
AT3 033476 0 0 0 000000034465 0 210000034465
AT6 033476 034465 0 0 000000034465 0 210000034465
FT0 033476 034465 0 0 400000000000 0 210000034465
FT1A 033476 034465 0 0 400000000000 0 400000000000
FT9 033477 034465 0 0 400000000000 0 400000000000
ET0 033477 034465 0 0 400000000000 0 400000000000
ST1 033477 034465 0 0 400000000000 0 400000000000
ST2 033477 034465 0 0 400000000000 0 400000000000
ST9 033477 034465 0 0 400000000000 0 400000000000
*033477 JFCL 10,033501
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033477 033477 0 0 255400033501 0 000000033501
IT1 033477 0 0 0 255400033501 0 000000033501
AT3 033477 0 0 0 000000033501 0 255400033501
AT6 033477 033501 0 0 000000033501 0 255400033501
FT1A 033477 033501 0 0 000000033501 0 000000033501
FT9 0 033501 0 0 000000033501 0 000000033501
ET0 033501 033501 0 0 000000033501 0 000000033501
ST1A 033501 033501 0 0 000000033501 0 000000033501
ST9 033501 033501 0 0 000000033501 0 000000033501
*033501 JUMPA 0,033502
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033501 033501 0 0 324000033502 0 000000033502
IT1 033501 0 0 0 324000033502 0 000000033502
AT3 033501 0 0 0 000000033502 0 324000033502
AT6 033501 033502 0 0 000000033502 0 324000033502
FT1A 033501 033502 0 0 000000033502 0 000000033502
FT2 033501 033502 0 0 0 0 000000033502
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 481
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0676
FT2RQ 033501 033502 0 0 400000000000 0 000000033502
FT3 033501 033502 0 0 400000000000 0 000000033502
FT9 033502 033502 0 0 400000000000 0 000000033502
ET0 033502 033502 0 0 400000000000 0 000000033502
ST1A 033502 033502 0 0 400000000000 0 000000033502
ST9 033502 033502 0 0 400000000000 0 000000033502
*033502 JFCL 2,033504
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033502 033502 0 0 255100033504 0 000000033504
IT1 033502 0 0 0 255100033504 0 000000033504
AT3 033502 0 0 0 000000033504 0 255100033504
AT6 033502 033504 0 0 000000033504 0 255100033504
FT1A 033502 033504 0 0 000000033504 0 000000033504
FT9 033503 033504 0 0 000000033504 0 000000033504
ET0 033504 033504 0 0 000000033504 0 000000033504
ST1A 033504 033504 0 0 000000033504 0 000000033504
ST9 033504 033504 0 0 000000033504 0 000000033504
*033504 JUMPA 0,033505
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033504 033504 0 0 324000033505 0 000000033505
IT1 033504 0 0 0 324000033505 0 000000033505
AT3 033504 0 0 0 000000033505 0 324000033505
AT6 033504 033505 0 0 000000033505 0 324000033505
FT1A 033504 033505 0 0 000000033505 0 000000033505
FT2 033504 033505 0 0 0 0 000000033505
FT2RQ 033504 033505 0 0 400000000000 0 000000033505
FT3 033504 033505 0 0 400000000000 0 000000033505
FT9 033505 033505 0 0 400000000000 0 000000033505
ET0 033505 033505 0 0 400000000000 0 000000033505
ST1A 033505 033505 0 0 400000000000 0 000000033505
ST9 033505 033505 0 0 400000000000 0 000000033505
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 482
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0677
*033505 JFCL 4,033507
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033505 033505 0 0 255200033507 0 000000033507
IT1 033505 0 0 0 255200033507 0 000000033507
AT3 033505 0 0 0 000000033507 0 255200033507
AT6 033505 033507 0 0 000000033507 0 255200033507
FT1A 033505 033507 0 0 000000033507 0 000000033507
FT9 033506 033507 0 0 000000033507 0 000000033507
ET0 033506 033507 0 0 000000033507 0 000000033507
ST1A 033506 033507 0 0 000000033507 0 000000033507
ST9 033506 033507 0 0 000000033507 0 000000033507
*033506 SKIPA 0,000000
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033506 033506 0 0 334000000000 0 400000000000
IT1 033506 0 0 0 334000000000 0 400000000000
AT3 033506 0 0 0 0 0 334000000000
AT6 033506 0 0 0 0 0 334000000000
FT0 033506 0 0 0 400000000000 0 334000000000
FT1A 033506 0 0 0 400000000000 0 400000000000
FT9 033507 0 0 0 400000000000 0 400000000000
ET0 033510 0 0 0 400000000000 0 400000000000
ST1A 033510 0 0 0 400000000000 0 400000000000
ST9 033510 0 0 0 400000000000 0 400000000000
*033510 JUMPA 0,033511
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033510 033510 0 0 324000033511 0 000000033511
IT1 033510 0 0 0 324000033511 0 000000033511
AT3 033510 0 0 0 000000033511 0 324000033511
AT6 033510 033511 0 0 000000033511 0 324000033511
FT1A 033510 033511 0 0 000000033511 0 000000033511
FT2 033510 033511 0 0 0 0 000000033511
FT2RQ 033510 033511 0 0 400000000000 0 000000033511
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 483
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0678
FT3 033510 033511 0 0 400000000000 0 000000033511
FT9 033511 033511 0 0 400000000000 0 000000033511
ET0 033511 033511 0 0 400000000000 0 000000033511
ST1A 033511 033511 0 0 400000000000 0 000000033511
ST9 033511 033511 0 0 400000000000 0 000000033511
*033511 JFCL 1,033513
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033511 033511 0 0 255040033513 0 000000033513
IT1 033511 0 0 0 255040033513 0 000000033513
AT3 033511 0 0 0 000000033513 0 255040033513
AT6 033511 033513 0 0 000000033513 0 255040033513
FT1A 033511 033513 0 0 000000033513 0 000000033513
FT9 033512 033513 0 0 000000033513 0 000000033513
ET0 033512 033513 0 0 000000033513 0 000000033513
ST1A 033512 033513 0 0 000000033513 0 000000033513
ST9 033512 033513 0 0 000000033513 0 000000033513
*033512 SKIPA 0,000000
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033512 033512 0 0 334000000000 0 400000000000
IT1 033512 0 0 0 334000000000 0 400000000000
AT3 033512 0 0 0 0 0 334000000000
AT6 033512 0 0 0 0 0 334000000000
FT0 033512 0 0 0 400000000000 0 334000000000
FT1A 033512 0 0 0 400000000000 0 400000000000
FT9 033513 0 0 0 400000000000 0 400000000000
ET0 033514 0 0 0 400000000000 0 400000000000
ST1A 033514 0 0 0 400000000000 0 400000000000
ST9 033514 0 0 0 400000000000 0 400000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 484
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0679
*033514 JUMPA 0,033515
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033514 033514 0 0 324000033515 0 000000033515
IT1 033514 0 0 0 324000033515 0 000000033515
AT3 033514 0 0 0 000000033515 0 324000033515
AT6 033514 033515 0 0 000000033515 0 324000033515
FT1A 033514 033515 0 0 000000033515 0 000000033515
FT2 033514 033515 0 0 0 0 000000033515
FT2RQ 033514 033515 0 0 400000000000 0 000000033515
FT3 033514 033515 0 0 400000000000 0 000000033515
FT9 033515 033515 0 0 400000000000 0 000000033515
ET0 033515 033515 0 0 400000000000 0 000000033515
ST1A 033515 033515 0 0 400000000000 0 000000033515
ST9 033515 033515 0 0 400000000000 0 000000033515
*033515 JFCL 17,033516
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033515 033515 0 0 255740033516 0 000000033516
IT1 033515 0 0 0 255740033516 0 000000033516
AT3 033515 0 0 0 000000033516 0 255740033516
AT6 033515 033516 0 0 000000033516 0 255740033516
FT1A 033515 033516 0 0 000000033516 0 000000033516
FT9 033516 033516 0 0 000000033516 0 000000033516
ET0 033516 033516 0 0 000000033516 0 000000033516
ST1A 033516 033516 0 0 000000033516 0 000000033516
ST9 033516 033516 0 0 000000033516 0 000000033516
*033516 MOVM 0,034465
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033516 033516 0 0 214000034465 0 400000000000
IT1 033516 0 0 0 214000034465 0 400000000000
AT3 033516 0 0 0 000000034465 0 214000034465
AT6 033516 034465 0 0 000000034465 0 214000034465
FT0 033516 034465 0 0 400000000000 0 214000034465
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 485
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0680
FT1A 033516 034465 0 0 400000000000 0 400000000000
FT9 033517 034465 0 0 400000000000 0 400000000000
ET0 033517 034465 0 0 400000000000 0 400000000000
ST1 033517 034465 0 0 400000000000 0 400000000000
ST2 033517 034465 0 0 400000000000 0 400000000000
ST9 033517 034465 0 0 400000000000 0 400000000000
*033517 JFCL 10,033521
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033517 033517 0 0 255400033521 0 000000033521
IT1 033517 0 0 0 255400033521 0 000000033521
AT3 033517 0 0 0 000000033521 0 255400033521
AT6 033517 033521 0 0 000000033521 0 255400033521
FT1A 033517 033521 0 0 000000033521 0 000000033521
FT9 033520 033521 0 0 000000033521 0 000000033521
ET0 033521 033521 0 0 000000033521 0 000000033521
ST1A 033521 033521 0 0 000000033521 0 000000033521
ST9 033521 033521 0 0 000000033521 0 000000033521
*033521 JUMPA 0,033522
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033521 033521 0 0 324000033522 0 000000033522
IT1 033521 0 0 0 324000033522 0 000000033522
AT3 033521 0 0 0 000000033522 0 324000033522
AT6 033521 033522 0 0 000000033522 0 324000033522
FT1A 033521 033522 0 0 000000033522 0 000000033522
FT2 033521 033522 0 0 0 0 000000033522
FT2RQ 033521 033522 0 0 400000000000 0 000000033522
FT3 033521 033522 0 0 400000000000 0 000000033522
FT9 033522 033522 0 0 400000000000 0 000000033522
ET0 033522 033522 0 0 400000000000 0 000000033522
ST1A 033522 033522 0 0 400000000000 0 000000033522
ST9 033522 033522 0 0 400000000000 0 000000033522
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 486
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0681
*033522 JFCL 2,033524
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033522 033522 0 0 255100033524 0 000000033524
IT1 033522 0 0 0 255100033524 0 000000033524
AT3 033522 0 0 0 000000033524 0 255100033524
AT6 033522 033524 0 0 000000033524 0 255100033524
FT1A 033522 033524 0 0 000000033524 0 000000033524
FT9 033523 033524 0 0 000000033524 0 000000033524
ET0 033524 033524 0 0 000000033524 0 000000033524
ST1A 033524 033524 0 0 000000033524 0 000000033524
ST9 033524 033524 0 0 000000033524 0 000000033524
*033524 JUMPA 0,033525
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033524 033524 0 0 324000033525 0 000000033525
IT1 033524 0 0 0 324000033525 0 000000033525
AT3 033524 0 0 0 000000033525 0 324000033525
AT6 033524 033525 0 0 000000033525 0 324000033525
FT1A 033524 033525 0 0 000000033525 0 000000033525
FT2 033524 033525 0 0 0 0 000000033525
FT2RQ 033524 033525 0 0 400000000000 0 000000033525
FT3 033524 033525 0 0 400000000000 0 000000033525
FT9 033525 033525 0 0 400000000000 0 000000033525
ET0 033525 033525 0 0 400000000000 0 000000033525
ST1A 033525 033525 0 0 400000000000 0 000000033525
ST9 033525 033525 0 0 400000000000 0 000000033525
*033525 JFCL 4,033527
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033525 033525 0 0 255200033527 0 000000033527
IT1 033525 0 0 0 255200033527 0 000000033527
AT3 033525 0 0 0 000000033527 0 255200033527
AT6 033525 033527 0 0 000000033527 0 255200033527
FT1A 033525 033527 0 0 000000033527 0 000000033527
FT9 033526 033527 0 0 000000033527 0 000000033527
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 487
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0682
ET0 033526 033527 0 0 000000033527 0 000000033527
ST1A 033526 033527 0 0 000000033527 0 000000033527
ST9 033526 033527 0 0 000000033527 0 000000033527
*033526 SKIPA 0,000000
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033526 033526 0 0 334000000000 0 400000000000
IT1 033526 0 0 0 334000000000 0 400000000000
AT3 033526 0 0 0 0 0 334000000000
AT6 033526 0 0 0 0 0 334000000000
FT0 033526 0 0 0 400000000000 0 334000000000
FT1A 033526 0 0 0 400000000000 0 400000000000
FT9 033527 0 0 0 400000000000 0 400000000000
ET0 033530 0 0 0 400000000000 0 400000000000
ST1A 033530 0 0 0 400000000000 0 400000000000
ST9 033530 0 0 0 400000000000 0 400000000000
*033530 JUMPA 0,033531
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033530 033530 0 0 324000033531 0 000000033531
IT1 033530 0 0 0 324000033531 0 000000033531
AT3 033530 0 0 0 000000033531 0 324000033531
AT6 033530 033531 0 0 000000033531 0 324000033531
FT1A 033530 033531 0 0 000000033531 0 000000033531
FT2 033530 033531 0 0 0 0 000000033531
FT2RQ 033530 033531 0 0 400000000000 0 000000033531
FT3 033530 033531 0 0 400000000000 0 000000033531
FT9 033531 033531 0 0 400000000000 0 000000033531
ET0 033531 033531 0 0 400000000000 0 000000033531
ST1A 033531 033531 0 0 400000000000 0 000000033531
ST9 033531 033531 0 0 400000000000 0 000000033531
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 488
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0683
*033531 JFCL 1,033533
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033531 033531 0 0 255040033533 0 000000033533
IT1 033531 0 0 0 255040033533 0 000000033533
AT3 033531 0 0 0 000000033533 0 255040033533
AT6 033531 033533 0 0 000000033533 0 255040033533
FT1A 033531 033533 0 0 000000033533 0 000000033533
FT9 033532 033533 0 0 000000033533 0 000000033533
ET0 033532 033533 0 0 000000033533 0 000000033533
ST1A 033532 033533 0 0 000000033533 0 000000033533
ST9 033532 033533 0 0 000000033533 0 000000033533
*033532 SKIPA 0,000000
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 033532 033532 0 0 334000000000 0 400000000000
IT1 033532 0 0 0 334000000000 0 400000000000
AT3 033532 0 0 0 0 0 334000000000
AT6 033532 0 0 0 0 0 334000000000
FT0 033532 0 0 0 400000000000 0 334000000000
FT1A 033532 0 0 0 400000000000 0 400000000000
FT9 033533 0 0 0 400000000000 0 400000000000
ET0 033534 0 0 0 400000000000 0 400000000000
ST1A 033534 0 0 0 400000000000 0 400000000000
ST9 033534 0 0 0 400000000000 0 400000000000
*033534 JUMPA 0,033535
INITIAL
C(AC)=400000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033534 033534 0 0 324000033535 0 000000033535
IT1 033534 0 0 0 324000033535 0 000000033535
AT3 033534 0 0 0 000000033535 0 324000033535
AT6 033534 033535 0 0 000000033535 0 324000033535
FT1A 033534 033535 0 0 000000033535 0 000000033535
FT2 033534 033535 0 0 0 0 000000033535
FT2RQ 033534 033535 0 0 400000000000 0 000000033535
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 489
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0684
FT3 033534 033535 0 0 400000000000 0 000000033535
FT9 033535 033535 0 0 400000000000 0 000000033535
ET0 033535 033535 0 0 400000000000 0 000000033535
ST1A 033535 033535 0 0 400000000000 0 000000033535
ST9 033535 033535 0 0 400000000000 0 000000033535
*033535 SETZ 0,000000
INITIAL
C(AC)=400000 000000
C(E)=400000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033535 033535 0 0 400000000000 0 0
IT1 033535 0 0 0 400000000000 0 0
AT3 033535 0 0 0 0 0 400000000000
AT6 033535 0 0 0 0 0 400000000000
FT1A 033535 0 0 0 0 0 0
FT9 033536 0 0 0 0 0 0
ET0 033536 0 0 0 0 0 0
ST1 033536 0 0 0 0 0 0
ST2 033536 0 0 0 0 0 0
ST9 033536 0 0 0 0 0 0
*033536 AOS 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033536 033536 0 0 350000000000 0 0
IT1 033536 0 0 0 350000000000 0 0
AT3 033536 0 0 0 0 0 350000000000
AT6 033536 0 0 0 0 0 350000000000
FT0 033536 0 0 0 0 0 350000000000
FT1A 033536 0 0 0 0 0 0
FT9 033537 0 0 0 0 0 0
ET0 033537 0 0 0 000000000001 0 0
ST5 033537 0 0 0 000000000001 0 0
ST6A 033537 0 0 0 000000000001 0 0
ST9 033537 0 0 0 000000000001 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 490
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0685
*033537 CAIE 0,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033537 033537 0 0 302000000001 0 000000000001
IT1 033537 0 0 0 302000000001 0 000000000001
AT3 033537 0 0 0 000000000001 0 302000000001
AT6 033537 000001 0 0 000000000001 0 302000000001
FT1A 033537 000001 0 0 000000000001 0 000000000001
FT2 033537 000001 0 0 0 0 000000000001
FT2RQ 033537 000001 0 0 000000000001 0 000000000001
FT3 033537 000001 0 0 000000000001 0 000000000001
FT9 033540 000001 0 0 000000000001 0 000000000001
ET0 033541 000001 0 0 0 0 000000000001
ST1A 033541 000001 0 0 0 0 000000000001
ST9 033541 000001 0 0 0 0 000000000001
*033541 JUMPA 0,033542
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033541 033541 0 0 324000033542 0 000000033542
IT1 033541 0 0 0 324000033542 0 000000033542
AT3 033541 0 0 0 000000033542 0 324000033542
AT6 033541 033542 0 0 000000033542 0 324000033542
FT1A 033541 033542 0 0 000000033542 0 000000033542
FT2 033541 033542 0 0 0 0 000000033542
FT2RQ 033541 033542 0 0 000000000001 0 000000033542
FT3 033541 033542 0 0 000000000001 0 000000033542
FT9 033542 033542 0 0 000000000001 0 000000033542
ET0 033542 033542 0 0 000000000001 0 000000033542
ST1A 033542 033542 0 0 000000000001 0 000000033542
ST9 033542 033542 0 0 000000000001 0 000000033542
*033542 SETO 0,000000
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033542 033542 0 0 474000000000 0 0
IT1 033542 0 0 0 474000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 491
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0686
AT3 033542 0 0 0 0 0 474000000000
AT6 033542 0 0 0 0 0 474000000000
FT1A 033542 0 0 0 0 0 0
FT9 033543 0 0 0 0 0 0
ET0 033543 0 0 0 777777777777 0 0
ST1 033543 0 0 0 777777777777 0 0
ST2 033543 0 0 0 777777777777 0 0
ST9 033543 0 0 0 777777777777 0 0
*033543 AOS 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033543 033543 0 0 350000000000 0 777777777777
IT1 033543 0 0 0 350000000000 0 777777777777
AT3 033543 0 0 0 0 0 350000000000
AT6 033543 0 0 0 0 0 350000000000
FT0 033543 0 0 0 777777777777 0 350000000000
FT1A 033543 0 0 0 777777777777 0 777777777777
FT9 033544 0 0 0 777777777777 0 777777777777
ET0 033544 0 0 0 0 0 777777777777
ST5 033544 0 0 0 0 0 777777777777
ST6A 033544 0 0 0 0 0 777777777777
ST9 033544 0 0 0 0 0 777777777777
*033544 CAIE 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033544 033544 0 0 302000000000 0 0
IT1 033544 0 0 0 302000000000 0 0
AT3 033544 0 0 0 0 0 302000000000
AT6 033544 0 0 0 0 0 302000000000
FT1A 033544 0 0 0 0 0 0
FT2 033544 0 0 0 0 0 0
FT2RQ 033544 0 0 0 0 0 0
FT3 033544 0 0 0 0 0 0
FT9 033545 0 0 0 0 0 0
ET0 033546 0 0 0 0 0 0
ST1A 033546 0 0 0 0 0 0
ST9 033546 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 492
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0687
*033546 JUMPA 0,033547
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033546 033546 0 0 324000033547 0 000000033547
IT1 033546 0 0 0 324000033547 0 000000033547
AT3 033546 0 0 0 000000033547 0 324000033547
AT6 033546 033547 0 0 000000033547 0 324000033547
FT1A 033546 033547 0 0 000000033547 0 000000033547
FT2 033546 033547 0 0 0 0 000000033547
FT2RQ 033546 033547 0 0 0 0 000000033547
FT3 033546 033547 0 0 0 0 000000033547
FT9 033547 033547 0 0 0 0 000000033547
ET0 033547 033547 0 0 0 0 000000033547
ST1A 033547 033547 0 0 0 0 000000033547
ST9 033547 033547 0 0 0 0 000000033547
*033547 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033547 033547 0 0 400000000000 0 0
IT1 033547 0 0 0 400000000000 0 0
AT3 033547 0 0 0 0 0 400000000000
AT6 033547 0 0 0 0 0 400000000000
FT1A 033547 0 0 0 0 0 0
FT9 033550 0 0 0 0 0 0
ET0 033550 0 0 0 0 0 0
ST1 033550 0 0 0 0 0 0
ST2 033550 0 0 0 0 0 0
ST9 033550 0 0 0 0 0 0
*033550 SOS 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033550 033550 0 0 370000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 493
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0688
IT1 033550 0 0 0 370000000000 0 0
AT3 033550 0 0 0 0 0 370000000000
AT6 033550 0 0 0 0 0 370000000000
FT0 033550 0 0 0 0 0 370000000000
FT1A 033550 0 0 0 0 0 0
FT9 033551 0 0 0 0 0 0
ET0 033551 0 0 0 777777777777 0 0
ST5 033551 0 0 0 777777777777 0 0
ST6A 033551 0 0 0 777777777777 0 0
ST9 033551 0 0 0 777777777777 0 0
*033551 CAME 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033551 033551 0 0 312000034466 0 777777777777
IT1 033551 0 0 0 312000034466 0 777777777777
AT3 033551 0 0 0 000000034466 0 312000034466
AT6 033551 034466 0 0 000000034466 0 312000034466
FT0 033551 034466 0 0 777777777777 0 312000034466
FT1A 033551 034466 0 0 777777777777 0 777777777777
FT2 033551 034466 0 0 0 0 777777777777
FT2RQ 033551 034466 0 0 777777777777 0 777777777777
FT3 033551 034466 0 0 777777777777 0 777777777777
FT9 033552 034466 0 0 777777777777 0 777777777777
ET0 033553 034466 0 0 0 0 777777777777
ST1A 033553 034466 0 0 0 0 777777777777
ST9 033553 034466 0 0 0 0 777777777777
*033553 JUMPA 0,033554
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033553 033553 0 0 324000033554 0 000000033554
IT1 033553 0 0 0 324000033554 0 000000033554
AT3 033553 0 0 0 000000033554 0 324000033554
AT6 033553 033554 0 0 000000033554 0 324000033554
FT1A 033553 033554 0 0 000000033554 0 000000033554
FT2 033553 033554 0 0 0 0 000000033554
FT2RQ 033553 033554 0 0 777777777777 0 000000033554
FT3 033553 033554 0 0 777777777777 0 000000033554
FT9 033554 033554 0 0 777777777777 0 000000033554
ET0 033554 033554 0 0 777777777777 0 000000033554
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 494
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0689
ST1A 033554 033554 0 0 777777777777 0 000000033554
ST9 033554 033554 0 0 777777777777 0 000000033554
*033554 MOVEI 0,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033554 033554 0 0 201000000001 0 000000000001
IT1 033554 0 0 0 201000000001 0 000000000001
AT3 033554 0 0 0 000000000001 0 201000000001
AT6 033554 000001 0 0 000000000001 0 201000000001
FT1A 033554 000001 0 0 000000000001 0 000000000001
FT9 033555 000001 0 0 000000000001 0 000000000001
ET0 033555 000001 0 0 000000000001 0 000000000001
ST1 033555 000001 0 0 000000000001 0 000000000001
ST2 033555 000001 0 0 000000000001 0 000000000001
ST9 033555 000001 0 0 000000000001 0 000000000001
*033555 SOS 0,000000
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
C(AC)=000000 000001
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033555 033555 0 0 370000000000 0 000000000001
IT1 033555 0 0 0 370000000000 0 000000000001
AT3 033555 0 0 0 0 0 370000000000
AT6 033555 0 0 0 0 0 370000000000
FT0 033555 0 0 0 000000000001 0 370000000000
FT1A 033555 0 0 0 000000000001 0 000000000001
FT9 033556 0 0 0 000000000001 0 000000000001
ET0 033556 0 0 0 0 0 000000000001
ST5 033556 0 0 0 0 0 000000000001
ST6A 033556 0 0 0 0 0 000000000001
ST9 033556 0 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 495
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0690
*033556 CAIE 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033556 033556 0 0 302000000000 0 0
IT1 033556 0 0 0 302000000000 0 0
AT3 033556 0 0 0 0 0 302000000000
AT6 033556 0 0 0 0 0 302000000000
FT1A 033556 0 0 0 0 0 0
FT2 033556 0 0 0 0 0 0
FT2RQ 033556 0 0 0 0 0 0
FT3 033556 0 0 0 0 0 0
FT9 033557 0 0 0 0 0 0
ET0 033560 0 0 0 0 0 0
ST1A 033560 0 0 0 0 0 0
ST9 033560 0 0 0 0 0 0
*033560 JUMPA 0,033561
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033560 033560 0 0 324000033561 0 000000033561
IT1 033560 0 0 0 324000033561 0 000000033561
AT3 033560 0 0 0 000000033561 0 324000033561
AT6 033560 033561 0 0 000000033561 0 324000033561
FT1A 033560 033561 0 0 000000033561 0 000000033561
FT2 033560 033561 0 0 0 0 000000033561
FT2RQ 033560 033561 0 0 0 0 000000033561
FT3 033560 033561 0 0 0 0 000000033561
FT9 033561 033561 0 0 0 0 000000033561
ET0 033561 033561 0 0 0 0 000000033561
ST1A 033561 033561 0 0 0 0 000000033561
ST9 033561 033561 0 0 0 0 000000033561
*033561 JFCL 17,033562
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033561 033561 0 0 255740033562 0 000000033562
IT1 033561 0 0 0 255740033562 0 000000033562
AT3 033561 0 0 0 000000033562 0 255740033562
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 496
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0691
AT6 033561 033562 0 0 000000033562 0 255740033562
FT1A 033561 033562 0 0 000000033562 0 000000033562
FT9 033562 033562 0 0 000000033562 0 000000033562
ET0 033562 033562 0 0 000000033562 0 000000033562
ST1A 033562 033562 0 0 000000033562 0 000000033562
ST9 033562 033562 0 0 000000033562 0 000000033562
*033562 MOVEI 0,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033562 033562 0 0 201000000001 0 000000000001
IT1 033562 0 0 0 201000000001 0 000000000001
AT3 033562 0 0 0 000000000001 0 201000000001
AT6 033562 000001 0 0 000000000001 0 201000000001
FT1A 033562 000001 0 0 000000000001 0 000000000001
FT9 033563 000001 0 0 000000000001 0 000000000001
ET0 033563 000001 0 0 000000000001 0 000000000001
ST1 033563 000001 0 0 000000000001 0 000000000001
ST2 033563 000001 0 0 000000000001 0 000000000001
ST9 033563 000001 0 0 000000000001 0 000000000001
*033563 SOS 0,000000
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
C(AC)=000000 000001
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033563 033563 0 0 370000000000 0 000000000001
IT1 033563 0 0 0 370000000000 0 000000000001
AT3 033563 0 0 0 0 0 370000000000
AT6 033563 0 0 0 0 0 370000000000
FT0 033563 0 0 0 000000000001 0 370000000000
FT1A 033563 0 0 0 000000000001 0 000000000001
FT9 033564 0 0 0 000000000001 0 000000000001
ET0 033564 0 0 0 0 0 000000000001
ST5 033564 0 0 0 0 0 000000000001
ST6A 033564 0 0 0 0 0 000000000001
ST9 033564 0 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 497
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0692
*033564 JFCL 4,033566
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033564 033564 0 0 255200033566 0 000000033566
IT1 033564 0 0 0 255200033566 0 000000033566
AT3 033564 0 0 0 000000033566 0 255200033566
AT6 033564 033566 0 0 000000033566 0 255200033566
FT1A 033564 033566 0 0 000000033566 0 000000033566
FT9 033565 033566 0 0 000000033566 0 000000033566
ET0 033566 033566 0 0 000000033566 0 000000033566
ST1A 033566 033566 0 0 000000033566 0 000000033566
ST9 033566 033566 0 0 000000033566 0 000000033566
*033566 JUMPA 0,033567
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033566 033566 0 0 324000033567 0 000000033567
IT1 033566 0 0 0 324000033567 0 000000033567
AT3 033566 0 0 0 000000033567 0 324000033567
AT6 033566 033567 0 0 000000033567 0 324000033567
FT1A 033566 033567 0 0 000000033567 0 000000033567
FT2 033566 033567 0 0 0 0 000000033567
FT2RQ 033566 033567 0 0 0 0 000000033567
FT3 033566 033567 0 0 0 0 000000033567
FT9 033567 033567 0 0 0 0 000000033567
ET0 033567 033567 0 0 0 0 000000033567
ST1A 033567 033567 0 0 0 0 000000033567
ST9 033567 033567 0 0 0 0 000000033567
*033567 JFCL 2,033571
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033567 033567 0 0 255100033571 0 000000033571
IT1 033567 0 0 0 255100033571 0 000000033571
AT3 033567 0 0 0 000000033571 0 255100033571
AT6 033567 033571 0 0 000000033571 0 255100033571
FT1A 033567 033571 0 0 000000033571 0 000000033571
FT9 033570 033571 0 0 000000033571 0 000000033571
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 498
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0693
ET0 033571 033571 0 0 000000033571 0 000000033571
ST1A 033571 033571 0 0 000000033571 0 000000033571
ST9 033571 033571 0 0 000000033571 0 000000033571
*033571 JUMPA 0,033572
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033571 033571 0 0 324000033572 0 000000033572
IT1 033571 0 0 0 324000033572 0 000000033572
AT3 033571 0 0 0 000000033572 0 324000033572
AT6 033571 033572 0 0 000000033572 0 324000033572
FT1A 033571 033572 0 0 000000033572 0 000000033572
FT2 033571 033572 0 0 0 0 000000033572
FT2RQ 033571 033572 0 0 0 0 000000033572
FT3 033571 033572 0 0 0 0 000000033572
FT9 033572 033572 0 0 0 0 000000033572
ET0 033572 033572 0 0 0 0 000000033572
ST1A 033572 033572 0 0 0 0 000000033572
ST9 033572 033572 0 0 0 0 000000033572
*033572 JFCL 10,033574
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033572 033572 0 0 255400033574 0 000000033574
IT1 033572 0 0 0 255400033574 0 000000033574
AT3 033572 0 0 0 000000033574 0 255400033574
AT6 033572 033574 0 0 000000033574 0 255400033574
FT1A 033572 033574 0 0 000000033574 0 000000033574
FT9 033573 033574 0 0 000000033574 0 000000033574
ET0 033573 033574 0 0 000000033574 0 000000033574
ST1A 033573 033574 0 0 000000033574 0 000000033574
ST9 033573 033574 0 0 000000033574 0 000000033574
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 499
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0694
*033573 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033573 033573 0 0 334000000000 0 0
IT1 033573 0 0 0 334000000000 0 0
AT3 033573 0 0 0 0 0 334000000000
AT6 033573 0 0 0 0 0 334000000000
FT0 033573 0 0 0 0 0 334000000000
FT1A 033573 0 0 0 0 0 0
FT9 033574 0 0 0 0 0 0
ET0 033575 0 0 0 0 0 0
ST1A 033575 0 0 0 0 0 0
ST9 033575 0 0 0 0 0 0
*033575 JUMPA 0,033576
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033575 033575 0 0 324000033576 0 000000033576
IT1 033575 0 0 0 324000033576 0 000000033576
AT3 033575 0 0 0 000000033576 0 324000033576
AT6 033575 033576 0 0 000000033576 0 324000033576
FT1A 033575 033576 0 0 000000033576 0 000000033576
FT2 033575 033576 0 0 0 0 000000033576
FT2RQ 033575 033576 0 0 0 0 000000033576
FT3 033575 033576 0 0 0 0 000000033576
FT9 033576 033576 0 0 0 0 000000033576
ET0 033576 033576 0 0 0 0 000000033576
ST1A 033576 033576 0 0 0 0 000000033576
ST9 033576 033576 0 0 0 0 000000033576
*033576 JFCL 1,033600
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033576 033576 0 0 255040033600 0 000000033600
IT1 033576 0 0 0 255040033600 0 000000033600
AT3 033576 0 0 0 000000033600 0 255040033600
AT6 033576 0 0 0 000000033600 0 255040033600
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 500
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0695
FT1A 033576 0 0 0 000000033600 0 000000033600
FT9 033577 0 0 0 000000033600 0 000000033600
ET0 033577 0 0 0 000000033600 0 000000033600
ST1A 033577 0 0 0 000000033600 0 000000033600
ST9 033577 0 0 0 000000033600 0 000000033600
*033577 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033577 033577 0 0 334000000000 0 0
IT1 033577 0 0 0 334000000000 0 0
AT3 033577 0 0 0 0 0 334000000000
AT6 033577 0 0 0 0 0 334000000000
FT0 033577 0 0 0 0 0 334000000000
FT1A 033577 0 0 0 0 0 0
FT9 0 0 0 0 0 0 0
ET0 033601 0 0 0 0 0 0
ST1A 033601 0 0 0 0 0 0
ST9 033601 0 0 0 0 0 0
*033601 JUMPA 0,033602
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033601 033601 0 0 324000033602 0 000000033602
IT1 033601 0 0 0 324000033602 0 000000033602
AT3 033601 0 0 0 000000033602 0 324000033602
AT6 033601 033602 0 0 000000033602 0 324000033602
FT1A 033601 033602 0 0 000000033602 0 000000033602
FT2 033601 033602 0 0 0 0 000000033602
FT2RQ 033601 033602 0 0 0 0 000000033602
FT3 033601 033602 0 0 0 0 000000033602
FT9 033602 033602 0 0 0 0 000000033602
ET0 033602 033602 0 0 0 0 000000033602
ST1A 033602 033602 0 0 0 0 000000033602
ST9 033602 033602 0 0 0 0 000000033602
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 501
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0696
*033602 JFCL 17,033603
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033602 033602 0 0 255740033603 0 000000033603
IT1 033602 0 0 0 255740033603 0 000000033603
AT3 033602 0 0 0 000000033603 0 255740033603
AT6 033602 033603 0 0 000000033603 0 255740033603
FT1A 033602 033603 0 0 000000033603 0 000000033603
FT9 033603 033603 0 0 000000033603 0 000000033603
ET0 033603 033603 0 0 000000033603 0 000000033603
ST1A 033603 033603 0 0 000000033603 0 000000033603
ST9 033603 033603 0 0 000000033603 0 000000033603
*033603 SETO 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033603 033603 0 0 474000000000 0 0
IT1 033603 0 0 0 474000000000 0 0
AT3 033603 0 0 0 0 0 474000000000
AT6 033603 0 0 0 0 0 474000000000
FT1A 033603 0 0 0 0 0 0
FT9 033604 0 0 0 0 0 0
ET0 033604 0 0 0 777777777777 0 0
ST1 033604 0 0 0 777777777777 0 0
ST2 033604 0 0 0 777777777777 0 0
ST9 033604 0 0 0 777777777777 0 0
*033604 AOS 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033604 033604 0 0 350000000000 0 777777777777
IT1 033604 0 0 0 350000000000 0 777777777777
AT3 033604 0 0 0 0 0 350000000000
AT6 033604 0 0 0 0 0 350000000000
FT0 033604 0 0 0 777777777777 0 350000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 502
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0697
FT1A 033604 0 0 0 777777777777 0 777777777777
FT9 033605 0 0 0 777777777777 0 777777777777
ET0 033605 0 0 0 0 0 777777777777
ST5 033605 0 0 0 0 0 777777777777
ST6A 033605 0 0 0 0 0 777777777777
ST9 033605 0 0 0 0 0 777777777777
*033605 JFCL 4,033607
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033605 033605 0 0 255200033607 0 000000033607
IT1 033605 0 0 0 255200033607 0 000000033607
AT3 033605 0 0 0 000000033607 0 255200033607
AT6 033605 033607 0 0 000000033607 0 255200033607
FT1A 033605 033607 0 0 000000033607 0 000000033607
FT9 033606 033607 0 0 000000033607 0 000000033607
ET0 033607 033607 0 0 000000033607 0 000000033607
ST1A 033607 033607 0 0 000000033607 0 000000033607
ST9 033607 033607 0 0 000000033607 0 000000033607
*033607 JUMPA 0,033610
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033607 033607 0 0 324000033610 0 000000033610
IT1 033607 0 0 0 324000033610 0 000000033610
AT3 033607 0 0 0 000000033610 0 324000033610
AT6 033607 033610 0 0 000000033610 0 324000033610
FT1A 033607 033610 0 0 000000033610 0 000000033610
FT2 033607 033610 0 0 0 0 000000033610
FT2RQ 033607 033610 0 0 0 0 000000033610
FT3 033607 033610 0 0 0 0 000000033610
FT9 033610 033610 0 0 0 0 000000033610
ET0 033610 033610 0 0 0 0 000000033610
ST1A 033610 033610 0 0 0 0 000000033610
ST9 033610 033610 0 0 0 0 000000033610
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 503
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0698
*033610 JFCL 2,033612
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033610 033610 0 0 255100033612 0 000000033612
IT1 033610 0 0 0 255100033612 0 000000033612
AT3 033610 0 0 0 000000033612 0 255100033612
AT6 033610 033612 0 0 000000033612 0 255100033612
FT1A 033610 033612 0 0 000000033612 0 000000033612
FT9 033611 033612 0 0 000000033612 0 000000033612
ET0 033612 033612 0 0 000000033612 0 000000033612
ST1A 033612 033612 0 0 000000033612 0 000000033612
ST9 033612 033612 0 0 000000033612 0 000000033612
*033612 JUMPA 0,033613
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033612 033612 0 0 324000033613 0 000000033613
IT1 033612 0 0 0 324000033613 0 000000033613
AT3 033612 0 0 0 000000033613 0 324000033613
AT6 033612 033613 0 0 000000033613 0 324000033613
FT1A 033612 033613 0 0 000000033613 0 000000033613
FT2 033612 033613 0 0 0 0 000000033613
FT2RQ 033612 033613 0 0 0 0 000000033613
FT3 033612 033613 0 0 0 0 000000033613
FT9 033613 033613 0 0 0 0 000000033613
ET0 033613 033613 0 0 0 0 000000033613
ST1A 033613 033613 0 0 0 0 000000033613
ST9 033613 033613 0 0 0 0 000000033613
*033613 JFCL 10,033615
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033613 033613 0 0 255400033615 0 000000033615
IT1 033613 0 0 0 255400033615 0 000000033615
AT3 033613 0 0 0 000000033615 0 255400033615
AT6 033613 033615 0 0 000000033615 0 255400033615
FT1A 033613 033615 0 0 000000033615 0 000000033615
FT9 033614 033615 0 0 000000033615 0 000000033615
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 504
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0699
ET0 033614 033615 0 0 000000033615 0 000000033615
ST1A 033614 033615 0 0 000000033615 0 000000033615
ST9 033614 033615 0 0 000000033615 0 000000033615
*033614 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033614 033614 0 0 334000000000 0 0
IT1 033614 0 0 0 334000000000 0 0
AT3 033614 0 0 0 0 0 334000000000
AT6 033614 0 0 0 0 0 334000000000
FT0 033614 0 0 0 0 0 334000000000
FT1A 033614 0 0 0 0 0 0
FT9 033615 0 0 0 0 0 0
ET0 033616 0 0 0 0 0 0
ST1A 033616 0 0 0 0 0 0
ST9 033616 0 0 0 0 0 0
*033616 JUMPA 0,033617
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033616 033616 0 0 324000033617 0 000000033617
IT1 033616 0 0 0 324000033617 0 000000033617
AT3 033616 0 0 0 000000033617 0 324000033617
AT6 033616 033617 0 0 000000033617 0 324000033617
FT1A 033616 033617 0 0 000000033617 0 000000033617
FT2 033616 033617 0 0 0 0 000000033617
FT2RQ 033616 033617 0 0 0 0 000000033617
FT3 033616 033617 0 0 0 0 000000033617
FT9 033617 033617 0 0 0 0 000000033617
ET0 033617 033617 0 0 0 0 000000033617
ST1A 033617 033617 0 0 0 0 000000033617
ST9 033617 033617 0 0 0 0 000000033617
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 505
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0700
*033617 JFCL 1,033621
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033617 033617 0 0 255040033621 0 000000033621
IT1 033617 0 0 0 255040033621 0 000000033621
AT3 033617 0 0 0 000000033621 0 255040033621
AT6 033617 033621 0 0 000000033621 0 255040033621
FT1A 033617 033621 0 0 000000033621 0 000000033621
FT9 033620 033621 0 0 000000033621 0 000000033621
ET0 033620 033621 0 0 000000033621 0 000000033621
ST1A 033620 033621 0 0 000000033621 0 000000033621
ST9 033620 033621 0 0 000000033621 0 000000033621
*033620 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033620 033620 0 0 334000000000 0 0
IT1 033620 0 0 0 334000000000 0 0
AT3 033620 0 0 0 0 0 334000000000
AT6 033620 0 0 0 0 0 334000000000
FT0 033620 0 0 0 0 0 334000000000
FT1A 033620 0 0 0 0 0 0
FT9 033621 0 0 0 0 0 0
ET0 033622 0 0 0 0 0 0
ST1A 033622 0 0 0 0 0 0
ST9 033622 0 0 0 0 0 0
*033622 JUMPA 0,033623
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033622 033622 0 0 324000033623 0 000000033623
IT1 033622 0 0 0 324000033623 0 000000033623
AT3 033622 0 0 0 000000033623 0 324000033623
AT6 033622 033623 0 0 000000033623 0 324000033623
FT1A 033622 033623 0 0 000000033623 0 000000033623
FT2 033622 033623 0 0 0 0 000000033623
FT2RQ 033622 033623 0 0 0 0 000000033623
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 506
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0701
FT3 033622 033623 0 0 0 0 000000033623
FT9 033623 033623 0 0 0 0 000000033623
ET0 033623 033623 0 0 0 0 000000033623
ST1A 033623 033623 0 0 0 0 000000033623
ST9 033623 033623 0 0 0 0 000000033623
*033623 MOVSI 1,040000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=040000 000000
TIME PC MA SC FE AR MQ BR
IT0 033623 033623 0 0 205040040000 0 000000040000
IT1 033623 0 0 0 205040040000 0 000000040000
AT3 033623 0 0 0 000000040000 0 205040040000
AT6 033623 0 0 0 000000040000 0 205040040000
FT1A 033623 0 0 0 000000040000 0 000000040000
FT9 033624 0 0 0 000000040000 0 000000040000
ET0 033624 0 0 0 040000000000 0 000000040000
ST1 033624 0 0 0 040000000000 0 000000040000
ST2 033624 0 0 0 040000000000 0 000000040000
ST9 033624 0 0 0 040000000000 0 000000040000
*033624 JFCL 17,033625
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033624 033624 0 0 255740033625 0 000000033625
IT1 033624 0 0 0 255740033625 0 000000033625
AT3 033624 0 0 0 000000033625 0 255740033625
AT6 033624 033625 0 0 000000033625 0 255740033625
FT1A 033624 033625 0 0 000000033625 0 000000033625
FT9 033625 033625 0 0 000000033625 0 000000033625
ET0 033625 033625 0 0 000000033625 0 000000033625
ST1A 033625 033625 0 0 000000033625 0 000000033625
ST9 033625 033625 0 0 000000033625 0 000000033625
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 507
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0702
*033625 JRST 2,033626(1)
INITIAL
C(AC)=000000 000002
C(E)=255040 033627
FINAL
C(E)=255040 033627
TIME PC MA SC FE AR MQ BR
IT0 033625 033625 0 0 254101033626 0 040000033626
IT1 033625 0 0 0 254101033626 0 040000033626
AT1 033625 0 0 0 0 0 254101033626
AT2 033625 0 0 0 040000000000 0 254101033626
AT3 033625 0 0 0 000000033626 0 040000033626
AT6 033625 033626 0 0 000000033626 0 040000033626
FT1A 033625 033626 0 0 000000033626 0 040000033626
FT9 033626 033626 0 0 000000033626 0 040000033626
ET0 033626 033626 0 0 000000033626 0 040000033626
ST1A 033626 033626 0 0 000000033626 0 040000033626
ST9 033626 033626 0 0 000000033626 0 040000033626
*033626 JFCL 1,033627
INITIAL
C(AC)=040000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033626 033626 0 0 255040033627 0 000000033627
IT1 033626 0 0 0 255040033627 0 000000033627
AT3 033626 0 0 0 000000033627 0 255040033627
AT6 033626 033627 0 0 000000033627 0 255040033627
FT1A 033626 033627 0 0 000000033627 0 000000033627
FT9 033627 033627 0 0 000000033627 0 000000033627
ET0 033627 033627 0 0 000000033627 0 000000033627
ST1A 033627 033627 0 0 000000033627 0 000000033627
ST9 033627 033627 0 0 000000033627 0 000000033627
*033627 JFCL 1,033631
INITIAL
C(AC)=040000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033627 033627 0 0 255040033631 0 000000033631
IT1 033627 0 0 0 255040033631 0 000000033631
AT3 033627 0 0 0 000000033631 0 255040033631
AT6 033627 033631 0 0 000000033631 0 255040033631
FT1A 033627 033631 0 0 000000033631 0 000000033631
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 508
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0703
FT9 033630 033631 0 0 000000033631 0 000000033631
ET0 033630 033631 0 0 000000033631 0 000000033631
ST1A 033630 033631 0 0 000000033631 0 000000033631
ST9 033630 033631 0 0 000000033631 0 000000033631
*033630 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033630 033630 0 0 334000000000 0 0
IT1 033630 0 0 0 334000000000 0 0
AT3 033630 0 0 0 0 0 334000000000
AT6 033630 0 0 0 0 0 334000000000
FT0 033630 0 0 0 0 0 334000000000
FT1A 033630 0 0 0 0 0 0
FT9 033631 0 0 0 0 0 0
ET0 033632 0 0 0 0 0 0
ST1A 033632 0 0 0 0 0 0
ST9 033632 0 0 0 0 0 0
*033632 JUMPA 0,033633
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033632 033632 0 0 324000033633 0 000000033633
IT1 033632 0 0 0 324000033633 0 000000033633
AT3 033632 0 0 0 000000033633 0 324000033633
AT6 033632 033633 0 0 000000033633 0 324000033633
FT1A 033632 033633 0 0 000000033633 0 000000033633
FT2 033632 033633 0 0 0 0 000000033633
FT2RQ 033632 033633 0 0 0 0 000000033633
FT3 033632 033633 0 0 0 0 000000033633
FT9 033633 033633 0 0 0 0 000000033633
ET0 033633 033633 0 0 0 0 000000033633
ST1A 033633 033633 0 0 0 0 000000033633
ST9 033633 033633 0 0 0 0 000000033633
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 509
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0704
*033633 MOVSI 1,000100
INITIAL
C(AC)=040000 000000
FINAL
C(AC)=000100 000000
TIME PC MA SC FE AR MQ BR
IT0 033633 033633 0 0 205040000100 0 000000000100
IT1 033633 0 0 0 205040000100 0 000000000100
AT3 033633 0 0 0 000000000100 0 205040000100
AT6 033633 0 0 0 000000000100 0 205040000100
FT1A 033633 0 0 0 000000000100 0 000000000100
FT9 033634 0 0 0 000000000100 0 000000000100
ET0 033634 0 0 0 000100000000 0 000000000100
ST1 033634 0 0 0 000100000000 0 000000000100
ST2 033634 0 0 0 000100000000 0 000000000100
ST9 033634 0 0 0 000100000000 0 000000000100
*033634 JFCL 17,033635
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033634 033634 0 0 255740033635 0 000000033635
IT1 033634 0 0 0 255740033635 0 000000033635
AT3 033634 0 0 0 000000033635 0 255740033635
AT6 033634 033635 0 0 000000033635 0 255740033635
FT1A 033634 033635 0 0 000000033635 0 000000033635
FT9 033635 033635 0 0 000000033635 0 000000033635
ET0 033635 033635 0 0 000000033635 0 000000033635
ST1A 033635 033635 0 0 000000033635 0 000000033635
ST9 033635 033635 0 0 000000033635 0 000000033635
*033635 JRST 2,033636(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033637
FINAL
C(E)=265000 033637
TIME PC MA SC FE AR MQ BR
IT0 033635 033635 0 0 254101033636 0 000100033636
IT1 033635 0 0 0 254101033636 0 000100033636
AT1 033635 0 0 0 0 0 254101033636
AT2 033635 0 0 0 000100000000 0 254101033636
AT3 033635 0 0 0 000000033636 0 000100033636
AT6 033635 033636 0 0 000000033636 0 000100033636
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 510
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0705
FT1A 033635 033636 0 0 000000033636 0 000100033636
FT9 033636 033636 0 0 000000033636 0 000100033636
ET0 033636 033636 0 0 000000033636 0 000100033636
ST1A 033636 033636 0 0 000000033636 0 000100033636
ST9 033636 033636 0 0 000000033636 0 000100033636
*033636 JSP 0,033637
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000100 033637
TIME PC MA SC FE AR MQ BR
IT0 033636 033636 0 0 265000033637 0 000000033637
IT1 033636 0 0 0 265000033637 0 000000033637
AT3 033636 0 0 0 000000033637 0 265000033637
AT6 033636 033637 0 0 000000033637 0 265000033637
FT1A 033636 033637 0 0 000000033637 0 000000033637
FT9 033637 033637 0 0 000000033637 0 000000033637
ET0 033637 033637 0 0 000100033637 0 000000033637
ST1 033637 033637 0 0 000100033637 0 000000033637
ST2 033637 033637 0 0 000100033637 0 000000033637
ST9 033637 033637 0 0 000100033637 0 000000033637
*033637 TLNN 0,000100
INITIAL
C(AC)=000100 033637
FINAL
C(AC)=000100 033637
TIME PC MA SC FE AR MQ BR
IT0 033637 033637 0 0 607000000100 0 000000000100
IT1 033637 0 0 0 607000000100 0 000000000100
AT3 033637 0 0 0 000000000100 0 607000000100
AT6 033637 0 0 0 000000000100 0 607000000100
FT1A 033637 0 0 0 000000000100 0 000000000100
FT2 033637 0 0 0 0 0 000000000100
FT2RQ 033637 0 0 0 000100033637 0 000000000100
FT3 033637 0 0 0 000100033637 0 000000000100
FT9 033640 0 0 0 000100033637 0 000000000100
ET0 033640 0 0 0 033637000100 0 000000000100
ET1 033640 0 0 0 033637000100 0 000000000100
ET2 033641 0 0 0 000100033637 0 000000000100
ST1A 033641 0 0 0 000100033637 0 000000000100
ST9 033641 0 0 0 000100033637 0 000000000100
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 511
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0706
*033641 JUMPA 0,033642
INITIAL
C(AC)=000100 033637
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033641 033641 0 0 324000033642 0 000000033642
IT1 033641 0 0 0 324000033642 0 000000033642
AT3 033641 0 0 0 000000033642 0 324000033642
AT6 033641 033642 0 0 000000033642 0 324000033642
FT1A 033641 033642 0 0 000000033642 0 000000033642
FT2 033641 033642 0 0 0 0 000000033642
FT2RQ 033641 033642 0 0 000100033637 0 000000033642
FT3 033641 033642 0 0 000100033637 0 000000033642
FT9 033642 033642 0 0 000100033637 0 000000033642
ET0 033642 033642 0 0 000100033637 0 000000033642
ST1A 033642 033642 0 0 000100033637 0 000000033642
ST9 033642 033642 0 0 000100033637 0 000000033642
*033642 MOVSI 1,000100
INITIAL
C(AC)=000100 000000
FINAL
C(AC)=000100 000000
TIME PC MA SC FE AR MQ BR
IT0 033642 033642 0 0 205040000100 0 000000000100
IT1 033642 0 0 0 205040000100 0 000000000100
AT3 033642 0 0 0 000000000100 0 205040000100
AT6 033642 0 0 0 000000000100 0 205040000100
FT1A 033642 0 0 0 000000000100 0 000000000100
FT9 033643 0 0 0 000000000100 0 000000000100
ET0 033643 0 0 0 000100000000 0 000000000100
ST1 033643 0 0 0 000100000000 0 000000000100
ST2 033643 0 0 0 000100000000 0 000000000100
ST9 033643 0 0 0 000100000000 0 000000000100
*033643 JFCL 17,033644
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033643 033643 0 0 255740033644 0 000000033644
IT1 033643 0 0 0 255740033644 0 000000033644
AT3 033643 0 0 0 000000033644 0 255740033644
AT6 033643 033644 0 0 000000033644 0 255740033644
FT1A 033643 033644 0 0 000000033644 0 000000033644
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 512
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0707
FT9 033644 033644 0 0 000000033644 0 000000033644
ET0 033644 033644 0 0 000000033644 0 000000033644
ST1A 033644 033644 0 0 000000033644 0 000000033644
ST9 033644 033644 0 0 000000033644 0 000000033644
*033644 JRST 2,033645(1)
INITIAL
C(AC)=000000 000002
C(E)=205040 000000
FINAL
C(E)=205040 000000
TIME PC MA SC FE AR MQ BR
IT0 033644 033644 0 0 254101033645 0 000100033645
IT1 033644 0 0 0 254101033645 0 000100033645
AT1 033644 0 0 0 0 0 254101033645
AT2 033644 0 0 0 000100000000 0 254101033645
AT3 033644 0 0 0 000000033645 0 000100033645
AT6 033644 033645 0 0 000000033645 0 000100033645
FT1A 033644 033645 0 0 000000033645 0 000100033645
FT9 033645 033645 0 0 000000033645 0 000100033645
ET0 033645 033645 0 0 000000033645 0 000100033645
ST1A 033645 033645 0 0 000000033645 0 000100033645
ST9 033645 033645 0 0 000000033645 0 000100033645
*033645 MOVSI 1,000000
INITIAL
C(AC)=000100 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033645 033645 0 0 205040000000 0 0
IT1 033645 0 0 0 205040000000 0 0
AT3 033645 0 0 0 0 0 205040000000
AT6 033645 0 0 0 0 0 205040000000
FT1A 033645 0 0 0 0 0 0
FT9 033646 0 0 0 0 0 0
ET0 033646 0 0 0 0 0 0
ST1 033646 0 0 0 0 0 0
ST2 033646 0 0 0 0 0 0
ST9 033646 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 513
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0708
*033646 JFCL 17,033647
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033646 033646 0 0 255740033647 0 000000033647
IT1 033646 0 0 0 255740033647 0 000000033647
AT3 033646 0 0 0 000000033647 0 255740033647
AT6 033646 033647 0 0 000000033647 0 255740033647
FT1A 033646 033647 0 0 000000033647 0 000000033647
FT9 033647 033647 0 0 000000033647 0 000000033647
ET0 033647 033647 0 0 000000033647 0 000000033647
ST1A 033647 033647 0 0 000000033647 0 000000033647
ST9 033647 033647 0 0 000000033647 0 000000033647
*033647 JRST 2,033650(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033651
FINAL
C(E)=265000 033651
TIME PC MA SC FE AR MQ BR
IT0 033647 033647 0 0 254101033650 0 000000033650
IT1 033647 0 0 0 254101033650 0 000000033650
AT1 033647 0 0 0 0 0 254101033650
AT2 033647 0 0 0 0 0 254101033650
AT3 033647 0 0 0 000000033650 0 000000033650
AT6 033647 033650 0 0 000000033650 0 000000033650
FT1A 033647 033650 0 0 000000033650 0 000000033650
FT9 033650 033650 0 0 000000033650 0 000000033650
ET0 033650 033650 0 0 000000033650 0 000000033650
ST1A 033650 033650 0 0 000000033650 0 000000033650
ST9 033650 033650 0 0 000000033650 0 000000033650
*033650 JSP 0,033651
INITIAL
C(AC)=000100 033637
FINAL
C(AC)=000000 033651
TIME PC MA SC FE AR MQ BR
IT0 033650 033650 0 0 265000033651 0 000000033651
IT1 033650 0 0 0 265000033651 0 000000033651
AT3 033650 0 0 0 000000033651 0 265000033651
AT6 033650 033651 0 0 000000033651 0 265000033651
FT1A 033650 033651 0 0 000000033651 0 000000033651
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 514
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0709
FT9 033651 033651 0 0 000000033651 0 000000033651
ET0 033651 033651 0 0 000000033651 0 000000033651
ST1 033651 033651 0 0 000000033651 0 000000033651
ST2 033651 033651 0 0 000000033651 0 000000033651
ST9 033651 033651 0 0 000000033651 0 000000033651
*033651 TLNE 0,000100
INITIAL
C(AC)=000000 033651
FINAL
C(AC)=000000 033651
TIME PC MA SC FE AR MQ BR
IT0 033651 033651 0 0 603000000100 0 0
IT1 033651 0 0 0 603000000100 0 0
AT3 033651 0 0 0 000000000100 0 603000000100
AT6 033651 0 0 0 000000000100 0 603000000100
FT1A 033651 0 0 0 000000000100 0 000000000100
FT2 033651 0 0 0 0 0 000000000100
FT2RQ 033651 0 0 0 000000033651 0 000000000100
FT3 033651 0 0 0 000000033651 0 000000000100
FT9 033652 0 0 0 000000033651 0 000000000100
ET0 033652 0 0 0 033651000000 0 000000000100
ET1 033652 0 0 0 033651000000 0 0
ET2 033653 0 0 0 000000033651 0 0
ST1A 033653 0 0 0 000000033651 0 0
ST9 033653 0 0 0 000000033651 0 0
*033653 JUMPA 0,033654
INITIAL
C(AC)=000000 033651
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033653 033653 0 0 324000033654 0 000000033654
IT1 033653 0 0 0 324000033654 0 000000033654
AT3 033653 0 0 0 000000033654 0 324000033654
AT6 033653 033654 0 0 000000033654 0 324000033654
FT1A 033653 033654 0 0 000000033654 0 000000033654
FT2 033653 033654 0 0 0 0 000000033654
FT2RQ 033653 033654 0 0 000000033651 0 000000033654
FT3 033653 033654 0 0 000000033651 0 000000033654
FT9 033654 033654 0 0 000000033651 0 000000033654
ET0 033654 033654 0 0 000000033651 0 000000033654
ST1A 033654 033654 0 0 000000033651 0 000000033654
ST9 033654 033654 0 0 000000033651 0 000000033654
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 515
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0710
*033654 MOVSI 1,000040
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000040 000000
TIME PC MA SC FE AR MQ BR
IT0 033654 033654 0 0 205040000040 0 000000000040
IT1 033654 0 0 0 205040000040 0 000000000040
AT3 033654 0 0 0 000000000040 0 205040000040
AT6 033654 000040 0 0 000000000040 0 205040000040
FT1A 033654 000040 0 0 000000000040 0 000000000040
FT9 033655 000040 0 0 000000000040 0 000000000040
ET0 033655 000040 0 0 000040000000 0 000000000040
ST1 033655 000040 0 0 000040000000 0 000000000040
ST2 033655 000040 0 0 000040000000 0 000000000040
ST9 033655 000040 0 0 000040000000 0 000000000040
*033655 JFCL 17,033656
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033655 033655 0 0 255740033656 0 000000033656
IT1 033655 0 0 0 255740033656 0 000000033656
AT3 033655 0 0 0 000000033656 0 255740033656
AT6 033655 033656 0 0 000000033656 0 255740033656
FT1A 033655 033656 0 0 000000033656 0 000000033656
FT9 033656 033656 0 0 000000033656 0 000000033656
ET0 033656 033656 0 0 000000033656 0 000000033656
ST1A 033656 033656 0 0 000000033656 0 000000033656
ST9 033656 033656 0 0 000000033656 0 000000033656
*033656 JRST 2,033657(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033660
FINAL
C(E)=265000 033660
TIME PC MA SC FE AR MQ BR
IT0 033656 033656 0 0 254101033657 0 000040033657
IT1 033656 0 0 0 254101033657 0 000040033657
AT1 033656 0 0 0 0 0 254101033657
AT2 033656 0 0 0 000040000000 0 254101033657
AT3 033656 0 0 0 000000033657 0 000040033657
AT6 033656 033657 0 0 000000033657 0 000040033657
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 516
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0711
FT1A 033656 033657 0 0 000000033657 0 000040033657
FT9 033657 033657 0 0 000000033657 0 000040033657
ET0 033657 033657 0 0 000000033657 0 000040033657
ST1A 033657 033657 0 0 000000033657 0 000040033657
ST9 033657 033657 0 0 000000033657 0 000040033657
*033657 JSP 0,033660
INITIAL
C(AC)=000000 033651
FINAL
C(AC)=000040 033660
TIME PC MA SC FE AR MQ BR
IT0 033657 033657 0 0 265000033660 0 000000033660
IT1 033657 0 0 0 265000033660 0 000000033660
AT3 033657 0 0 0 000000033660 0 265000033660
AT6 033657 033660 0 0 000000033660 0 265000033660
FT1A 033657 033660 0 0 000000033660 0 000000033660
FT9 033660 033660 0 0 000000033660 0 000000033660
ET0 033660 033660 0 0 000040033660 0 000000033660
ST1 033660 033660 0 0 000040033660 0 000000033660
ST2 033660 033660 0 0 000040033660 0 000000033660
ST9 033660 033660 0 0 000040033660 0 000000033660
*033660 TLNN 0,000040
INITIAL
C(AC)=000040 033660
FINAL
C(AC)=000040 033660
TIME PC MA SC FE AR MQ BR
IT0 033660 033660 0 0 607000000040 0 000000000040
IT1 033660 0 0 0 607000000040 0 000000000040
AT3 033660 0 0 0 000000000040 0 607000000040
AT6 033660 000040 0 0 000000000040 0 607000000040
FT1A 033660 000040 0 0 000000000040 0 000000000040
FT2 033660 000040 0 0 0 0 000000000040
FT2RQ 033660 000040 0 0 000040033660 0 000000000040
FT3 033660 000040 0 0 000040033660 0 000000000040
FT9 033661 000040 0 0 000040033660 0 000000000040
ET0 033661 000040 0 0 033660000040 0 000000000040
ET1 033661 000040 0 0 033660000040 0 000000000040
ET2 033662 000040 0 0 000040033660 0 000000000040
ST1A 033662 000040 0 0 000040033660 0 000000000040
ST9 033662 000040 0 0 000040033660 0 000000000040
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 517
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0712
*033662 JUMPA 0,033663
INITIAL
C(AC)=000040 033660
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033662 033662 0 0 324000033663 0 000000033663
IT1 033662 0 0 0 324000033663 0 000000033663
AT3 033662 0 0 0 000000033663 0 324000033663
AT6 033662 033663 0 0 000000033663 0 324000033663
FT1A 033662 033663 0 0 000000033663 0 000000033663
FT2 033662 033663 0 0 0 0 000000033663
FT2RQ 033662 033663 0 0 000040033660 0 000000033663
FT3 033662 033663 0 0 000040033660 0 000000033663
FT9 033663 033663 0 0 000040033660 0 000000033663
ET0 033663 033663 0 0 000040033660 0 000000033663
ST1A 033663 033663 0 0 000040033660 0 000000033663
ST9 033663 033663 0 0 000040033660 0 000000033663
*033663 MOVSI 1,000040
INITIAL
C(AC)=000040 000000
FINAL
C(AC)=000040 000000
TIME PC MA SC FE AR MQ BR
IT0 033663 033663 0 0 205040000040 0 000000000040
IT1 033663 0 0 0 205040000040 0 000000000040
AT3 033663 0 0 0 000000000040 0 205040000040
AT6 033663 000040 0 0 000000000040 0 205040000040
FT1A 033663 000040 0 0 000000000040 0 000000000040
FT9 033664 000040 0 0 000000000040 0 000000000040
ET0 033664 000040 0 0 000040000000 0 000000000040
ST1 033664 000040 0 0 000040000000 0 000000000040
ST2 033664 000040 0 0 000040000000 0 000000000040
ST9 033664 000040 0 0 000040000000 0 000000000040
*033664 JFCL 17,033665
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033664 033664 0 0 255740033665 0 000000033665
IT1 033664 0 0 0 255740033665 0 000000033665
AT3 033664 0 0 0 000000033665 0 255740033665
AT6 033664 033665 0 0 000000033665 0 255740033665
FT1A 033664 033665 0 0 000000033665 0 000000033665
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 518
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0713
FT9 033665 033665 0 0 000000033665 0 000000033665
ET0 033665 033665 0 0 000000033665 0 000000033665
ST1A 033665 033665 0 0 000000033665 0 000000033665
ST9 033665 033665 0 0 000000033665 0 000000033665
*033665 JRST 2,033666(1)
INITIAL
C(AC)=000000 000002
C(E)=205040 000000
FINAL
C(E)=205040 000000
TIME PC MA SC FE AR MQ BR
IT0 033665 033665 0 0 254101033666 0 000040033666
IT1 033665 0 0 0 254101033666 0 000040033666
AT1 033665 0 0 0 0 0 254101033666
AT2 033665 0 0 0 000040000000 0 254101033666
AT3 033665 0 0 0 000000033666 0 000040033666
AT6 033665 033666 0 0 000000033666 0 000040033666
FT1A 033665 033666 0 0 000000033666 0 000040033666
FT9 033666 033666 0 0 000000033666 0 000040033666
ET0 033666 033666 0 0 000000033666 0 000040033666
ST1A 033666 033666 0 0 000000033666 0 000040033666
ST9 033666 033666 0 0 000000033666 0 000040033666
*033666 MOVSI 1,000000
INITIAL
C(AC)=000040 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033666 033666 0 0 205040000000 0 0
IT1 033666 0 0 0 205040000000 0 0
AT3 033666 0 0 0 0 0 205040000000
AT6 033666 0 0 0 0 0 205040000000
FT1A 033666 0 0 0 0 0 0
FT9 033667 0 0 0 0 0 0
ET0 033667 0 0 0 0 0 0
ST1 033667 0 0 0 0 0 0
ST2 033667 0 0 0 0 0 0
ST9 033667 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 519
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0714
*033667 JFCL 17,033670
INITIAL
C(AC)=000000 777723
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033667 033667 0 0 255740033670 0 000000033670
IT1 033667 0 0 0 255740033670 0 000000033670
AT3 033667 0 0 0 000000033670 0 255740033670
AT6 033667 033670 0 0 000000033670 0 255740033670
FT1A 033667 033670 0 0 000000033670 0 000000033670
FT9 033670 033670 0 0 000000033670 0 000000033670
ET0 033670 033670 0 0 000000033670 0 000000033670
ST1A 033670 033670 0 0 000000033670 0 000000033670
ST9 033670 033670 0 0 000000033670 0 000000033670
*033670 JRST 2,033671(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 033672
FINAL
C(E)=265000 033672
TIME PC MA SC FE AR MQ BR
IT0 033670 033670 0 0 254101033671 0 000000033671
IT1 033670 0 0 0 254101033671 0 000000033671
AT1 033670 0 0 0 0 0 254101033671
AT2 033670 0 0 0 0 0 254101033671
AT3 033670 0 0 0 000000033671 0 000000033671
AT6 033670 033671 0 0 000000033671 0 000000033671
FT1A 033670 033671 0 0 000000033671 0 000000033671
FT9 033671 033671 0 0 000000033671 0 000000033671
ET0 033671 033671 0 0 000000033671 0 000000033671
ST1A 033671 033671 0 0 000000033671 0 000000033671
ST9 033671 033671 0 0 000000033671 0 000000033671
*033671 JSP 0,033672
INITIAL
C(AC)=000040 033660
FINAL
C(AC)=000000 033672
TIME PC MA SC FE AR MQ BR
IT0 033671 033671 0 0 265000033672 0 000000033672
IT1 033671 0 0 0 265000033672 0 000000033672
AT3 033671 0 0 0 000000033672 0 265000033672
AT6 033671 033672 0 0 000000033672 0 265000033672
FT1A 033671 033672 0 0 000000033672 0 000000033672
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 520
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0715
FT9 033672 033672 0 0 000000033672 0 000000033672
ET0 033672 033672 0 0 000000033672 0 000000033672
ST1 033672 033672 0 0 000000033672 0 000000033672
ST2 033672 033672 0 0 000000033672 0 000000033672
ST9 033672 033672 0 0 000000033672 0 000000033672
*033672 TLNE 0,000040
INITIAL
C(AC)=000000 033672
FINAL
C(AC)=000000 033672
TIME PC MA SC FE AR MQ BR
IT0 033672 033672 0 0 603000000040 0 0
IT1 033672 0 0 0 603000000040 0 0
AT3 033672 0 0 0 000000000040 0 603000000040
AT6 033672 000040 0 0 000000000040 0 603000000040
FT1A 033672 000040 0 0 000000000040 0 000000000040
FT2 033672 000040 0 0 0 0 000000000040
FT2RQ 033672 000040 0 0 000000033672 0 000000000040
FT3 033672 000040 0 0 000000033672 0 000000000040
FT9 033673 000040 0 0 000000033672 0 000000000040
ET0 033673 000040 0 0 033672000000 0 000000000040
ET1 033673 000040 0 0 033672000000 0 0
ET2 033674 000040 0 0 000000033672 0 0
ST1A 033674 000040 0 0 000000033672 0 0
ST9 033674 000040 0 0 000000033672 0 0
*033674 JUMPA 0,033675
INITIAL
C(AC)=000000 033672
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033674 033674 0 0 324000033675 0 000000033675
IT1 033674 0 0 0 324000033675 0 000000033675
AT3 033674 0 0 0 000000033675 0 324000033675
AT6 033674 033675 0 0 000000033675 0 324000033675
FT1A 033674 033675 0 0 000000033675 0 000000033675
FT2 033674 033675 0 0 0 0 000000033675
FT2RQ 033674 033675 0 0 000000033672 0 000000033675
FT3 033674 033675 0 0 000000033672 0 000000033675
FT9 033675 033675 0 0 000000033672 0 000000033675
ET0 033675 033675 0 0 000000033672 0 000000033675
ST1A 033675 033675 0 0 000000033672 0 000000033675
ST9 033675 033675 0 0 000000033672 0 000000033675
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 521
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0716
*033675 SETO 0,000000
INITIAL
C(AC)=000000 033672
C(E)=000000 033672
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033675 033675 0 0 474000000000 0 0
IT1 033675 0 0 0 474000000000 0 0
AT3 033675 0 0 0 0 0 474000000000
AT6 033675 0 0 0 0 0 474000000000
FT1A 033675 0 0 0 0 0 0
FT9 033676 0 0 0 0 0 0
ET0 033676 0 0 0 777777777777 0 0
ST1 033676 0 0 0 777777777777 0 0
ST2 033676 0 0 0 777777777777 0 0
ST9 033676 0 0 0 777777777777 0 0
*033676 JUMPL 0,033700
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033676 033676 0 0 321000033700 0 000000033700
IT1 033676 0 0 0 321000033700 0 000000033700
AT3 033676 0 0 0 000000033700 0 321000033700
AT6 033676 0 0 0 000000033700 0 321000033700
FT1A 033676 0 0 0 000000033700 0 000000033700
FT2 033676 0 0 0 0 0 000000033700
FT2RQ 033676 0 0 0 777777777777 0 000000033700
FT3 033676 0 0 0 777777777777 0 000000033700
FT9 033677 0 0 0 777777777777 0 000000033700
ET0 0 0 0 0 777777777777 0 000000033700
ST1A 0 0 0 0 777777777777 0 000000033700
ST9 0 0 0 0 777777777777 0 000000033700
*033700 JUMPA 0,033701
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 324000033701 0 000000033701
IT1 0 0 0 0 324000033701 0 000000033701
AT3 0 0 0 0 000000033701 0 324000033701
AT6 0 033701 0 0 000000033701 0 324000033701
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 522
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0717
FT1A 0 033701 0 0 000000033701 0 000000033701
FT2 0 033701 0 0 0 0 000000033701
FT2RQ 0 033701 0 0 777777777777 0 000000033701
FT3 0 033701 0 0 777777777777 0 000000033701
FT9 033701 033701 0 0 777777777777 0 000000033701
ET0 033701 033701 0 0 777777777777 0 000000033701
ST1A 033701 033701 0 0 777777777777 0 000000033701
ST9 033701 033701 0 0 777777777777 0 000000033701
*033701 SETZ 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033701 033701 0 0 400000000000 0 0
IT1 033701 0 0 0 400000000000 0 0
AT3 033701 0 0 0 0 0 400000000000
AT6 033701 0 0 0 0 0 400000000000
FT1A 033701 0 0 0 0 0 0
FT9 033702 0 0 0 0 0 0
ET0 033702 0 0 0 0 0 0
ST1 033702 0 0 0 0 0 0
ST2 033702 0 0 0 0 0 0
ST9 033702 0 0 0 0 0 0
*033702 JUMPL 0,033704
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033702 033702 0 0 321000033704 0 000000033704
IT1 033702 0 0 0 321000033704 0 000000033704
AT3 033702 0 0 0 000000033704 0 321000033704
AT6 033702 033704 0 0 000000033704 0 321000033704
FT1A 033702 033704 0 0 000000033704 0 000000033704
FT2 033702 033704 0 0 0 0 000000033704
FT2RQ 033702 033704 0 0 0 0 000000033704
FT3 033702 033704 0 0 0 0 000000033704
FT9 033703 033704 0 0 0 0 000000033704
ET0 033703 033704 0 0 0 0 000000033704
ST1A 033703 033704 0 0 0 0 000000033704
ST9 033703 033704 0 0 0 0 000000033704
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 523
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0718
*033703 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033703 033703 0 0 334000000000 0 0
IT1 033703 0 0 0 334000000000 0 0
AT3 033703 0 0 0 0 0 334000000000
AT6 033703 0 0 0 0 0 334000000000
FT0 033703 0 0 0 0 0 334000000000
FT1A 033703 0 0 0 0 0 0
FT9 033704 0 0 0 0 0 0
ET0 033705 0 0 0 0 0 0
ST1A 033705 0 0 0 0 0 0
ST9 033705 0 0 0 0 0 0
*033705 JUMPA 0,033706
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033705 033705 0 0 324000033706 0 000000033706
IT1 033705 0 0 0 324000033706 0 000000033706
AT3 033705 0 0 0 000000033706 0 324000033706
AT6 033705 033706 0 0 000000033706 0 324000033706
FT1A 033705 033706 0 0 000000033706 0 000000033706
FT2 033705 033706 0 0 0 0 000000033706
FT2RQ 033705 033706 0 0 0 0 000000033706
FT3 033705 033706 0 0 0 0 000000033706
FT9 033706 033706 0 0 0 0 000000033706
ET0 033706 033706 0 0 0 0 000000033706
ST1A 033706 033706 0 0 0 0 000000033706
ST9 033706 033706 0 0 0 0 000000033706
*033706 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033706 033706 0 0 400000000000 0 0
IT1 033706 0 0 0 400000000000 0 0
AT3 033706 0 0 0 0 0 400000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 524
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0719
AT6 033706 0 0 0 0 0 400000000000
FT1A 033706 0 0 0 0 0 0
FT9 033707 0 0 0 0 0 0
ET0 033707 0 0 0 0 0 0
ST1 033707 0 0 0 0 0 0
ST2 033707 0 0 0 0 0 0
ST9 033707 0 0 0 0 0 0
*033707 JUMPE 0,033711
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033707 033707 0 0 322000033711 0 000000033711
IT1 033707 0 0 0 322000033711 0 000000033711
AT3 033707 0 0 0 000000033711 0 322000033711
AT6 033707 033711 0 0 000000033711 0 322000033711
FT1A 033707 033711 0 0 000000033711 0 000000033711
FT2 033707 033711 0 0 0 0 000000033711
FT2RQ 033707 033711 0 0 0 0 000000033711
FT3 033707 033711 0 0 0 0 000000033711
FT9 033710 033711 0 0 0 0 000000033711
ET0 033711 033711 0 0 0 0 000000033711
ST1A 033711 033711 0 0 0 0 000000033711
ST9 033711 033711 0 0 0 0 000000033711
*033711 JUMPA 0,033712
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033711 033711 0 0 324000033712 0 000000033712
IT1 033711 0 0 0 324000033712 0 000000033712
AT3 033711 0 0 0 000000033712 0 324000033712
AT6 033711 033712 0 0 000000033712 0 324000033712
FT1A 033711 033712 0 0 000000033712 0 000000033712
FT2 033711 033712 0 0 0 0 000000033712
FT2RQ 033711 033712 0 0 0 0 000000033712
FT3 033711 033712 0 0 0 0 000000033712
FT9 033712 033712 0 0 0 0 000000033712
ET0 033712 033712 0 0 0 0 000000033712
ST1A 033712 033712 0 0 0 0 000000033712
ST9 033712 033712 0 0 0 0 000000033712
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 525
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0720
*033712 MOVEI 0,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033712 033712 0 0 201000000001 0 000000000001
IT1 033712 0 0 0 201000000001 0 000000000001
AT3 033712 0 0 0 000000000001 0 201000000001
AT6 033712 000001 0 0 000000000001 0 201000000001
FT1A 033712 000001 0 0 000000000001 0 000000000001
FT9 033713 000001 0 0 000000000001 0 000000000001
ET0 033713 000001 0 0 000000000001 0 000000000001
ST1 033713 000001 0 0 000000000001 0 000000000001
ST2 033713 000001 0 0 000000000001 0 000000000001
ST9 033713 000001 0 0 000000000001 0 000000000001
*033713 JUMPN 0,033715
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033713 033713 0 0 326000033715 0 000000033715
IT1 033713 0 0 0 326000033715 0 000000033715
AT3 033713 0 0 0 000000033715 0 326000033715
AT6 033713 033715 0 0 000000033715 0 326000033715
FT1A 033713 033715 0 0 000000033715 0 000000033715
FT2 033713 033715 0 0 0 0 000000033715
FT2RQ 033713 033715 0 0 000000000001 0 000000033715
FT3 033713 033715 0 0 000000000001 0 000000033715
FT9 033714 033715 0 0 000000000001 0 000000033715
ET0 033715 033715 0 0 000000000001 0 000000033715
ST1A 033715 033715 0 0 000000000001 0 000000033715
ST9 033715 033715 0 0 000000000001 0 000000033715
*033715 JUMPA 0,033716
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033715 033715 0 0 324000033716 0 000000033716
IT1 033715 0 0 0 324000033716 0 000000033716
AT3 033715 0 0 0 000000033716 0 324000033716
AT6 033715 033716 0 0 000000033716 0 324000033716
FT1A 033715 033716 0 0 000000033716 0 000000033716
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 526
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0721
FT2 033715 033716 0 0 0 0 000000033716
FT2RQ 033715 033716 0 0 000000000001 0 000000033716
FT3 033715 033716 0 0 000000000001 0 000000033716
FT9 033716 033716 0 0 000000000001 0 000000033716
ET0 033716 033716 0 0 000000000001 0 000000033716
ST1A 033716 033716 0 0 000000000001 0 000000033716
ST9 033716 033716 0 0 000000000001 0 000000033716
*033716 MOVEI 0,000002
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033716 033716 0 0 201000000002 0 000000000002
IT1 033716 0 0 0 201000000002 0 000000000002
AT3 033716 0 0 0 000000000002 0 201000000002
AT6 033716 000002 0 0 000000000002 0 201000000002
FT1A 033716 000002 0 0 000000000002 0 000000000002
FT9 033717 000002 0 0 000000000002 0 000000000002
ET0 033717 000002 0 0 000000000002 0 000000000002
ST1 033717 000002 0 0 000000000002 0 000000000002
ST2 033717 000002 0 0 000000000002 0 000000000002
ST9 033717 000002 0 0 000000000002 0 000000000002
*033717 JUMPE 0,033721
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033717 033717 0 0 322000033721 0 000000033721
IT1 033717 0 0 0 322000033721 0 000000033721
AT3 033717 0 0 0 000000033721 0 322000033721
AT6 033717 033721 0 0 000000033721 0 322000033721
FT1A 033717 033721 0 0 000000033721 0 000000033721
FT2 033717 033721 0 0 0 0 000000033721
FT2RQ 033717 033721 0 0 000000000002 0 000000033721
FT3 033717 033721 0 0 000000000002 0 000000033721
FT9 033720 033721 0 0 000000000002 0 000000033721
ET0 033720 033721 0 0 000000000002 0 000000033721
ST1A 033720 033721 0 0 000000000002 0 000000033721
ST9 033720 033721 0 0 000000000002 0 000000033721
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 527
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0722
*033720 SKIPA 0,000000
INITIAL
C(AC)=000000 000002
C(E)=000000 000002
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033720 033720 0 0 334000000000 0 000000000002
IT1 033720 0 0 0 334000000000 0 000000000002
AT3 033720 0 0 0 0 0 334000000000
AT6 033720 0 0 0 0 0 334000000000
FT0 033720 0 0 0 000000000002 0 334000000000
FT1A 033720 0 0 0 000000000002 0 000000000002
FT9 033721 0 0 0 000000000002 0 000000000002
ET0 033722 0 0 0 000000000002 0 000000000002
ST1A 033722 0 0 0 000000000002 0 000000000002
ST9 033722 0 0 0 000000000002 0 000000000002
*033722 JUMPA 0,033723
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033722 033722 0 0 324000033723 0 000000033723
IT1 033722 0 0 0 324000033723 0 000000033723
AT3 033722 0 0 0 000000033723 0 324000033723
AT6 033722 033723 0 0 000000033723 0 324000033723
FT1A 033722 033723 0 0 000000033723 0 000000033723
FT2 033722 033723 0 0 0 0 000000033723
FT2RQ 033722 033723 0 0 000000000002 0 000000033723
FT3 033722 033723 0 0 000000000002 0 000000033723
FT9 033723 033723 0 0 000000000002 0 000000033723
ET0 033723 033723 0 0 000000000002 0 000000033723
ST1A 033723 033723 0 0 000000000002 0 000000033723
ST9 033723 033723 0 0 000000000002 0 000000033723
*033723 SETZ 0,000000
INITIAL
C(AC)=000000 000002
C(E)=000000 000002
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033723 033723 0 0 400000000000 0 0
IT1 033723 0 0 0 400000000000 0 0
AT3 033723 0 0 0 0 0 400000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 528
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0723
AT6 033723 0 0 0 0 0 400000000000
FT1A 033723 0 0 0 0 0 0
FT9 033724 0 0 0 0 0 0
ET0 033724 0 0 0 0 0 0
ST1 033724 0 0 0 0 0 0
ST2 033724 0 0 0 0 0 0
ST9 033724 0 0 0 0 0 0
*033724 JUMPN 0,033726
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033724 033724 0 0 326000033726 0 000000033726
IT1 033724 0 0 0 326000033726 0 000000033726
AT3 033724 0 0 0 000000033726 0 326000033726
AT6 033724 033726 0 0 000000033726 0 326000033726
FT1A 033724 033726 0 0 000000033726 0 000000033726
FT2 033724 033726 0 0 0 0 000000033726
FT2RQ 033724 033726 0 0 0 0 000000033726
FT3 033724 033726 0 0 0 0 000000033726
FT9 033725 033726 0 0 0 0 000000033726
ET0 033725 033726 0 0 0 0 000000033726
ST1A 033725 033726 0 0 0 0 000000033726
ST9 033725 033726 0 0 0 0 000000033726
*033725 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033725 033725 0 0 334000000000 0 0
IT1 033725 0 0 0 334000000000 0 0
AT3 033725 0 0 0 0 0 334000000000
AT6 033725 0 0 0 0 0 334000000000
FT0 033725 0 0 0 0 0 334000000000
FT1A 033725 0 0 0 0 0 0
FT9 033726 0 0 0 0 0 0
ET0 033727 0 0 0 0 0 0
ST1A 033727 0 0 0 0 0 0
ST9 033727 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 529
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0724
*033727 JUMPA 0,033730
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033727 033727 0 0 324000033730 0 000000033730
IT1 033727 0 0 0 324000033730 0 000000033730
AT3 033727 0 0 0 000000033730 0 324000033730
AT6 033727 033730 0 0 000000033730 0 324000033730
FT1A 033727 033730 0 0 000000033730 0 000000033730
FT2 033727 033730 0 0 0 0 000000033730
FT2RQ 033727 033730 0 0 0 0 000000033730
FT3 033727 033730 0 0 0 0 000000033730
FT9 033730 033730 0 0 0 0 000000033730
ET0 033730 033730 0 0 0 0 000000033730
ST1A 033730 033730 0 0 0 0 000000033730
ST9 033730 033730 0 0 0 0 000000033730
*033730 MOVEI 0,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033730 033730 0 0 201000000001 0 000000000001
IT1 033730 0 0 0 201000000001 0 000000000001
AT3 033730 0 0 0 000000000001 0 201000000001
AT6 033730 000001 0 0 000000000001 0 201000000001
FT1A 033730 000001 0 0 000000000001 0 000000000001
FT9 033731 000001 0 0 000000000001 0 000000000001
ET0 033731 000001 0 0 000000000001 0 000000000001
ST1 033731 000001 0 0 000000000001 0 000000000001
ST2 033731 000001 0 0 000000000001 0 000000000001
ST9 033731 000001 0 0 000000000001 0 000000000001
*033731 JUMPG 0,033733
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033731 033731 0 0 327000033733 0 000000033733
IT1 033731 0 0 0 327000033733 0 000000033733
AT3 033731 0 0 0 000000033733 0 327000033733
AT6 033731 033733 0 0 000000033733 0 327000033733
FT1A 033731 033733 0 0 000000033733 0 000000033733
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 530
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0725
FT2 033731 033733 0 0 0 0 000000033733
FT2RQ 033731 033733 0 0 000000000001 0 000000033733
FT3 033731 033733 0 0 000000000001 0 000000033733
FT9 033732 033733 0 0 000000000001 0 000000033733
ET0 033733 033733 0 0 000000000001 0 000000033733
ST1A 033733 033733 0 0 000000000001 0 000000033733
ST9 033733 033733 0 0 000000000001 0 000000033733
*033733 JUMPA 0,033734
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033733 033733 0 0 324000033734 0 000000033734
IT1 033733 0 0 0 324000033734 0 000000033734
AT3 033733 0 0 0 000000033734 0 324000033734
AT6 033733 033734 0 0 000000033734 0 324000033734
FT1A 033733 033734 0 0 000000033734 0 000000033734
FT2 033733 033734 0 0 0 0 000000033734
FT2RQ 033733 033734 0 0 000000000001 0 000000033734
FT3 033733 033734 0 0 000000000001 0 000000033734
FT9 033734 033734 0 0 000000000001 0 000000033734
ET0 033734 033734 0 0 000000000001 0 000000033734
ST1A 033734 033734 0 0 000000000001 0 000000033734
ST9 033734 033734 0 0 000000000001 0 000000033734
*033734 MOVSI 0,777777
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 033734 033734 0 0 205000777777 0 000000777777
IT1 033734 0 0 0 205000777777 0 000000777777
AT3 033734 0 0 0 000000777777 0 205000777777
AT6 033734 777777 0 0 000000777777 0 205000777777
FT1A 033734 777777 0 0 000000777777 0 000000777777
FT9 033735 777777 0 0 000000777777 0 000000777777
ET0 033735 777777 0 0 777777000000 0 000000777777
ST1 033735 777777 0 0 777777000000 0 000000777777
ST2 033735 777777 0 0 777777000000 0 000000777777
ST9 033735 777777 0 0 777777000000 0 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 531
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0726
*033735 JUMPG 0,033737
INITIAL
C(AC)=777777 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033735 033735 0 0 327000033737 0 000000033737
IT1 033735 0 0 0 327000033737 0 000000033737
AT3 033735 0 0 0 000000033737 0 327000033737
AT6 033735 033737 0 0 000000033737 0 327000033737
FT1A 033735 033737 0 0 000000033737 0 000000033737
FT2 033735 033737 0 0 0 0 000000033737
FT2RQ 033735 033737 0 0 777777000000 0 000000033737
FT3 033735 033737 0 0 777777000000 0 000000033737
FT9 033736 033737 0 0 777777000000 0 000000033737
ET0 033736 033737 0 0 777777000000 0 000000033737
ST1A 033736 033737 0 0 777777000000 0 000000033737
ST9 033736 033737 0 0 777777000000 0 000000033737
*033736 SKIPA 0,000000
INITIAL
C(AC)=777777 000000
C(E)=777777 000000
FINAL
C(AC)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 033736 033736 0 0 334000000000 0 777777000000
IT1 033736 0 0 0 334000000000 0 777777000000
AT3 033736 0 0 0 0 0 334000000000
AT6 033736 0 0 0 0 0 334000000000
FT0 033736 0 0 0 777777000000 0 334000000000
FT1A 033736 0 0 0 777777000000 0 777777000000
FT9 033737 0 0 0 777777000000 0 777777000000
ET0 033740 0 0 0 777777000000 0 777777000000
ST1A 033740 0 0 0 777777000000 0 777777000000
ST9 033740 0 0 0 777777000000 0 777777000000
*033740 JUMPA 0,033741
INITIAL
C(AC)=777777 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033740 033740 0 0 324000033741 0 000000033741
IT1 033740 0 0 0 324000033741 0 000000033741
AT3 033740 0 0 0 000000033741 0 324000033741
AT6 033740 033741 0 0 000000033741 0 324000033741
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 532
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0727
FT1A 033740 033741 0 0 000000033741 0 000000033741
FT2 033740 033741 0 0 0 0 000000033741
FT2RQ 033740 033741 0 0 777777000000 0 000000033741
FT3 033740 033741 0 0 777777000000 0 000000033741
FT9 033741 033741 0 0 777777000000 0 000000033741
ET0 033741 033741 0 0 777777000000 0 000000033741
ST1A 033741 033741 0 0 777777000000 0 000000033741
ST9 033741 033741 0 0 777777000000 0 000000033741
*033741 SETZ 0,000000
INITIAL
C(AC)=777777 000000
C(E)=777777 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033741 033741 0 0 400000000000 0 0
IT1 033741 0 0 0 400000000000 0 0
AT3 033741 0 0 0 0 0 400000000000
AT6 033741 0 0 0 0 0 400000000000
FT1A 033741 0 0 0 0 0 0
FT9 033742 0 0 0 0 0 0
ET0 033742 0 0 0 0 0 0
ST1 033742 0 0 0 0 0 0
ST2 033742 0 0 0 0 0 0
ST9 033742 0 0 0 0 0 0
*033742 AOJ 0,033744
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033742 033742 0 0 340000033744 0 000000033744
IT1 033742 0 0 0 340000033744 0 000000033744
AT3 033742 0 0 0 000000033744 0 340000033744
AT6 033742 033744 0 0 000000033744 0 340000033744
FT1A 033742 033744 0 0 000000033744 0 000000033744
FT2 033742 033744 0 0 0 0 000000033744
FT2RQ 033742 033744 0 0 0 0 000000033744
FT3 033742 033744 0 0 0 0 000000033744
FT9 033743 033744 0 0 0 0 000000033744
ET0 033743 033744 0 0 000000000001 0 000000033744
ST1 033743 033744 0 0 000000000001 0 000000033744
ST2 033743 033744 0 0 000000000001 0 000000033744
ST9 033743 033744 0 0 000000000001 0 000000033744
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 533
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0728
*033743 CAIE 0,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033743 033743 0 0 302000000001 0 000000000001
IT1 033743 0 0 0 302000000001 0 000000000001
AT3 033743 0 0 0 000000000001 0 302000000001
AT6 033743 000001 0 0 000000000001 0 302000000001
FT1A 033743 000001 0 0 000000000001 0 000000000001
FT2 033743 000001 0 0 0 0 000000000001
FT2RQ 033743 000001 0 0 000000000001 0 000000000001
FT3 033743 000001 0 0 000000000001 0 000000000001
FT9 033744 000001 0 0 000000000001 0 000000000001
ET0 033745 000001 0 0 0 0 000000000001
ST1A 033745 000001 0 0 0 0 000000000001
ST9 033745 000001 0 0 0 0 000000000001
*033745 JUMPA 0,033746
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033745 033745 0 0 324000033746 0 000000033746
IT1 033745 0 0 0 324000033746 0 000000033746
AT3 033745 0 0 0 000000033746 0 324000033746
AT6 033745 033746 0 0 000000033746 0 324000033746
FT1A 033745 033746 0 0 000000033746 0 000000033746
FT2 033745 033746 0 0 0 0 000000033746
FT2RQ 033745 033746 0 0 000000000001 0 000000033746
FT3 033745 033746 0 0 000000000001 0 000000033746
FT9 033746 033746 0 0 000000000001 0 000000033746
ET0 033746 033746 0 0 000000000001 0 000000033746
ST1A 033746 033746 0 0 000000000001 0 000000033746
ST9 033746 033746 0 0 000000000001 0 000000033746
*033746 SETO 0,000000
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033746 033746 0 0 474000000000 0 0
IT1 033746 0 0 0 474000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 534
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0729
AT3 033746 0 0 0 0 0 474000000000
AT6 033746 0 0 0 0 0 474000000000
FT1A 033746 0 0 0 0 0 0
FT9 033747 0 0 0 0 0 0
ET0 033747 0 0 0 777777777777 0 0
ST1 033747 0 0 0 777777777777 0 0
ST2 033747 0 0 0 777777777777 0 0
ST9 033747 0 0 0 777777777777 0 0
*033747 AOJ 0,033751
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033747 033747 0 0 340000033751 0 000000033751
IT1 033747 0 0 0 340000033751 0 000000033751
AT3 033747 0 0 0 000000033751 0 340000033751
AT6 033747 033751 0 0 000000033751 0 340000033751
FT1A 033747 033751 0 0 000000033751 0 000000033751
FT2 033747 033751 0 0 0 0 000000033751
FT2RQ 033747 033751 0 0 777777777777 0 000000033751
FT3 033747 033751 0 0 777777777777 0 000000033751
FT9 033750 033751 0 0 777777777777 0 000000033751
ET0 033750 033751 0 0 0 0 000000033751
ST1 033750 033751 0 0 0 0 000000033751
ST2 033750 033751 0 0 0 0 000000033751
ST9 033750 033751 0 0 0 0 000000033751
*033750 CAIE 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033750 033750 0 0 302000000000 0 0
IT1 033750 0 0 0 302000000000 0 0
AT3 033750 0 0 0 0 0 302000000000
AT6 033750 0 0 0 0 0 302000000000
FT1A 033750 0 0 0 0 0 0
FT2 033750 0 0 0 0 0 0
FT2RQ 033750 0 0 0 0 0 0
FT3 033750 0 0 0 0 0 0
FT9 033751 0 0 0 0 0 0
ET0 033752 0 0 0 0 0 0
ST1A 033752 0 0 0 0 0 0
ST9 033752 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 535
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0730
*033752 JUMPA 0,033753
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033752 033752 0 0 324000033753 0 000000033753
IT1 033752 0 0 0 324000033753 0 000000033753
AT3 033752 0 0 0 000000033753 0 324000033753
AT6 033752 033753 0 0 000000033753 0 324000033753
FT1A 033752 033753 0 0 000000033753 0 000000033753
FT2 033752 033753 0 0 0 0 000000033753
FT2RQ 033752 033753 0 0 0 0 000000033753
FT3 033752 033753 0 0 0 0 000000033753
FT9 033753 033753 0 0 0 0 000000033753
ET0 033753 033753 0 0 0 0 000000033753
ST1A 033753 033753 0 0 0 0 000000033753
ST9 033753 033753 0 0 0 0 000000033753
*033753 SETZ 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033753 033753 0 0 400000000000 0 0
IT1 033753 0 0 0 400000000000 0 0
AT3 033753 0 0 0 0 0 400000000000
AT6 033753 0 0 0 0 0 400000000000
FT1A 033753 0 0 0 0 0 0
FT9 033754 0 0 0 0 0 0
ET0 033754 0 0 0 0 0 0
ST1 033754 0 0 0 0 0 0
ST2 033754 0 0 0 0 0 0
ST9 033754 0 0 0 0 0 0
*033754 SOJ 0,033756
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033754 033754 0 0 360000033756 0 000000033756
IT1 033754 0 0 0 360000033756 0 000000033756
AT3 033754 0 0 0 000000033756 0 360000033756
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 536
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0731
AT6 033754 033756 0 0 000000033756 0 360000033756
FT1A 033754 033756 0 0 000000033756 0 000000033756
FT2 033754 033756 0 0 0 0 000000033756
FT2RQ 033754 033756 0 0 0 0 000000033756
FT3 033754 033756 0 0 0 0 000000033756
FT9 033755 033756 0 0 0 0 000000033756
ET0 033755 033756 0 0 777777777777 0 000000033756
ST1 033755 033756 0 0 777777777777 0 000000033756
ST2 033755 033756 0 0 777777777777 0 000000033756
ST9 033755 033756 0 0 777777777777 0 000000033756
*033755 CAME 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033755 033755 0 0 312000034466 0 777777777777
IT1 033755 0 0 0 312000034466 0 777777777777
AT3 033755 0 0 0 000000034466 0 312000034466
AT6 033755 034466 0 0 000000034466 0 312000034466
FT0 033755 034466 0 0 777777777777 0 312000034466
FT1A 033755 034466 0 0 777777777777 0 777777777777
FT2 033755 034466 0 0 0 0 777777777777
FT2RQ 033755 034466 0 0 777777777777 0 777777777777
FT3 033755 034466 0 0 777777777777 0 777777777777
FT9 033756 034466 0 0 777777777777 0 777777777777
ET0 033757 034466 0 0 0 0 777777777777
ST1A 033757 034466 0 0 0 0 777777777777
ST9 033757 034466 0 0 0 0 777777777777
*033757 JUMPA 0,033760
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033757 033757 0 0 324000033760 0 000000033760
IT1 033757 0 0 0 324000033760 0 000000033760
AT3 033757 0 0 0 000000033760 0 324000033760
AT6 033757 033760 0 0 000000033760 0 324000033760
FT1A 033757 033760 0 0 000000033760 0 000000033760
FT2 033757 033760 0 0 0 0 000000033760
FT2RQ 033757 033760 0 0 777777777777 0 000000033760
FT3 033757 033760 0 0 777777777777 0 000000033760
FT9 033760 033760 0 0 777777777777 0 000000033760
ET0 033760 033760 0 0 777777777777 0 000000033760
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 537
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0732
ST1A 033760 033760 0 0 777777777777 0 000000033760
ST9 033760 033760 0 0 777777777777 0 000000033760
*033760 SETO 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033760 033760 0 0 474000000000 0 0
IT1 033760 0 0 0 474000000000 0 0
AT3 033760 0 0 0 0 0 474000000000
AT6 033760 0 0 0 0 0 474000000000
FT1A 033760 0 0 0 0 0 0
FT9 033761 0 0 0 0 0 0
ET0 033761 0 0 0 777777777777 0 0
ST1 033761 0 0 0 777777777777 0 0
ST2 033761 0 0 0 777777777777 0 0
ST9 033761 0 0 0 777777777777 0 0
*033761 SOJ 0,033763
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 033761 033761 0 0 360000033763 0 000000033763
IT1 033761 0 0 0 360000033763 0 000000033763
AT3 033761 0 0 0 000000033763 0 360000033763
AT6 033761 033763 0 0 000000033763 0 360000033763
FT1A 033761 033763 0 0 000000033763 0 000000033763
FT2 033761 033763 0 0 0 0 000000033763
FT2RQ 033761 033763 0 0 777777777777 0 000000033763
FT3 033761 033763 0 0 777777777777 0 000000033763
FT9 033762 033763 0 0 777777777777 0 000000033763
ET0 033762 033763 0 0 777777777776 0 000000033763
ST1 033762 033763 0 0 777777777776 0 000000033763
ST2 033762 033763 0 0 777777777776 0 000000033763
ST9 033762 033763 0 0 777777777776 0 000000033763
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 538
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0733
*033762 CAME 0,034467
INITIAL
C(AC)=777777 777776
C(E)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033762 033762 0 0 312000034467 0 777777777776
IT1 033762 0 0 0 312000034467 0 777777777776
AT3 033762 0 0 0 000000034467 0 312000034467
AT6 033762 034467 0 0 000000034467 0 312000034467
FT0 033762 034467 0 0 777777777776 0 312000034467
FT1A 033762 034467 0 0 777777777776 0 777777777776
FT2 033762 034467 0 0 0 0 777777777776
FT2RQ 033762 034467 0 0 777777777776 0 777777777776
FT3 033762 034467 0 0 777777777776 0 777777777776
FT9 033763 034467 0 0 777777777776 0 777777777776
ET0 033764 034467 0 0 0 0 777777777776
ST1A 033764 034467 0 0 0 0 777777777776
ST9 033764 034467 0 0 0 0 777777777776
*033764 JUMPA 0,033765
INITIAL
C(AC)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033764 033764 0 0 324000033765 0 000000033765
IT1 033764 0 0 0 324000033765 0 000000033765
AT3 033764 0 0 0 000000033765 0 324000033765
AT6 033764 033765 0 0 000000033765 0 324000033765
FT1A 033764 033765 0 0 000000033765 0 000000033765
FT2 033764 033765 0 0 0 0 000000033765
FT2RQ 033764 033765 0 0 777777777776 0 000000033765
FT3 033764 033765 0 0 777777777776 0 000000033765
FT9 033765 033765 0 0 777777777776 0 000000033765
ET0 033765 033765 0 0 777777777776 0 000000033765
ST1A 033765 033765 0 0 777777777776 0 000000033765
ST9 033765 033765 0 0 777777777776 0 000000033765
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 539
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0734
*033765 MOVEI 0,000001
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033765 033765 0 0 201000000001 0 000000000001
IT1 033765 0 0 0 201000000001 0 000000000001
AT3 033765 0 0 0 000000000001 0 201000000001
AT6 033765 000001 0 0 000000000001 0 201000000001
FT1A 033765 000001 0 0 000000000001 0 000000000001
FT9 033766 000001 0 0 000000000001 0 000000000001
ET0 033766 000001 0 0 000000000001 0 000000000001
ST1 033766 000001 0 0 000000000001 0 000000000001
ST2 033766 000001 0 0 000000000001 0 000000000001
ST9 033766 000001 0 0 000000000001 0 000000000001
*033766 SOJ 0,033770
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033766 033766 0 0 360000033770 0 000000033770
IT1 033766 0 0 0 360000033770 0 000000033770
AT3 033766 0 0 0 000000033770 0 360000033770
AT6 033766 033770 0 0 000000033770 0 360000033770
FT1A 033766 033770 0 0 000000033770 0 000000033770
FT2 033766 033770 0 0 0 0 000000033770
FT2RQ 033766 033770 0 0 000000000001 0 000000033770
FT3 033766 033770 0 0 000000000001 0 000000033770
FT9 033767 033770 0 0 000000000001 0 000000033770
ET0 033767 033770 0 0 0 0 000000033770
ST1 033767 033770 0 0 0 0 000000033770
ST2 033767 033770 0 0 0 0 000000033770
ST9 033767 033770 0 0 0 0 000000033770
*033767 CAIE 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033767 033767 0 0 302000000000 0 0
IT1 033767 0 0 0 302000000000 0 0
AT3 033767 0 0 0 0 0 302000000000
AT6 033767 0 0 0 0 0 302000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 540
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0735
FT1A 033767 0 0 0 0 0 0
FT2 033767 0 0 0 0 0 0
FT2RQ 033767 0 0 0 0 0 0
FT3 033767 0 0 0 0 0 0
FT9 033770 0 0 0 0 0 0
ET0 033771 0 0 0 0 0 0
ST1A 033771 0 0 0 0 0 0
ST9 033771 0 0 0 0 0 0
*033771 JUMPA 0,033772
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033771 033771 0 0 324000033772 0 000000033772
IT1 033771 0 0 0 324000033772 0 000000033772
AT3 033771 0 0 0 000000033772 0 324000033772
AT6 033771 033772 0 0 000000033772 0 324000033772
FT1A 033771 033772 0 0 000000033772 0 000000033772
FT2 033771 033772 0 0 0 0 000000033772
FT2RQ 033771 033772 0 0 0 0 000000033772
FT3 033771 033772 0 0 0 0 000000033772
FT9 033772 033772 0 0 0 0 000000033772
ET0 033772 033772 0 0 0 0 000000033772
ST1A 033772 033772 0 0 0 0 000000033772
ST9 033772 033772 0 0 0 0 000000033772
*033772 SETZ 17,000000
INITIAL
C(AC)=000000 777723
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033772 033772 0 0 400740000000 0 0
IT1 033772 0 0 0 400740000000 0 0
AT3 033772 0 0 0 0 0 400740000000
AT6 033772 0 0 0 0 0 400740000000
FT1A 033772 0 0 0 0 0 0
FT9 033773 0 0 0 0 0 0
ET0 033773 0 0 0 0 0 0
ST1 033773 0 0 0 0 0 0
ST2 033773 0 0 0 0 0 0
ST9 033773 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 541
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0736
*033773 SOJ 17,033773
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033773 033773 0 0 360740033773 0 000000033773
IT1 033773 0 0 0 360740033773 0 000000033773
AT3 033773 0 0 0 000000033773 0 360740033773
AT6 033773 033773 0 0 000000033773 0 360740033773
FT1A 033773 033773 0 0 000000033773 0 000000033773
FT2 033773 033773 0 0 0 0 000000033773
FT2RQ 033773 033773 0 0 0 0 000000033773
FT3 033773 033773 0 0 0 0 000000033773
FT9 033774 033773 0 0 0 0 000000033773
ET0 033774 033773 0 0 777777777777 0 000000033773
ST1 033774 033773 0 0 777777777777 0 000000033773
ST2 033774 033773 0 0 777777777777 0 000000033773
ST9 033774 033773 0 0 777777777777 0 000000033773
*033774 AOJ 17,033774
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033774 033774 0 0 340740033774 0 000000033774
IT1 033774 0 0 0 340740033774 0 000000033774
AT3 033774 0 0 0 000000033774 0 340740033774
AT6 033774 033774 0 0 000000033774 0 340740033774
FT1A 033774 033774 0 0 000000033774 0 000000033774
FT2 033774 033774 0 0 0 0 000000033774
FT2RQ 033774 033774 0 0 777777777777 0 000000033774
FT3 033774 033774 0 0 777777777777 0 000000033774
FT9 033775 033774 0 0 777777777777 0 000000033774
ET0 033775 033774 0 0 0 0 000000033774
ST1 033775 033774 0 0 0 0 000000033774
ST2 033775 033774 0 0 0 0 000000033774
ST9 033775 033774 0 0 0 0 000000033774
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 542
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0737
*033775 SOJ 17,033775
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033775 033775 0 0 360740033775 0 000000033775
IT1 033775 0 0 0 360740033775 0 000000033775
AT3 033775 0 0 0 000000033775 0 360740033775
AT6 033775 033775 0 0 000000033775 0 360740033775
FT1A 033775 033775 0 0 000000033775 0 000000033775
FT2 033775 033775 0 0 0 0 000000033775
FT2RQ 033775 033775 0 0 0 0 000000033775
FT3 033775 033775 0 0 0 0 000000033775
FT9 033776 033775 0 0 0 0 000000033775
ET0 033776 033775 0 0 777777777777 0 000000033775
ST1 033776 033775 0 0 777777777777 0 000000033775
ST2 033776 033775 0 0 777777777777 0 000000033775
ST9 033776 033775 0 0 777777777777 0 000000033775
*033776 AOJ 17,033776
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033776 033776 0 0 340740033776 0 000000033776
IT1 033776 0 0 0 340740033776 0 000000033776
AT3 033776 0 0 0 000000033776 0 340740033776
AT6 033776 033776 0 0 000000033776 0 340740033776
FT1A 033776 033776 0 0 000000033776 0 000000033776
FT2 033776 033776 0 0 0 0 000000033776
FT2RQ 033776 033776 0 0 777777777777 0 000000033776
FT3 033776 033776 0 0 777777777777 0 000000033776
FT9 033777 033776 0 0 777777777777 0 000000033776
ET0 033777 033776 0 0 0 0 000000033776
ST1 033777 033776 0 0 0 0 000000033776
ST2 033777 033776 0 0 0 0 000000033776
ST9 033777 033776 0 0 0 0 000000033776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 543
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0738
*033777 SOJ 17,033777
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033777 033777 0 0 360740033777 0 000000033777
IT1 033777 0 0 0 360740033777 0 000000033777
AT3 033777 0 0 0 000000033777 0 360740033777
AT6 033777 033777 0 0 000000033777 0 360740033777
FT1A 033777 033777 0 0 000000033777 0 000000033777
FT2 033777 033777 0 0 0 0 000000033777
FT2RQ 033777 033777 0 0 0 0 000000033777
FT3 033777 033777 0 0 0 0 000000033777
FT9 0 033777 0 0 0 0 000000033777
ET0 0 033777 0 0 777777777777 0 000000033777
ST1 0 033777 0 0 777777777777 0 000000033777
ST2 0 033777 0 0 777777777777 0 000000033777
ST9 0 033777 0 0 777777777777 0 000000033777
*034000 AOJ 17,034000
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 340740034000 0 000000034000
IT1 0 0 0 0 340740034000 0 000000034000
AT3 0 0 0 0 000000034000 0 340740034000
AT6 0 0 0 0 000000034000 0 340740034000
FT1A 0 0 0 0 000000034000 0 000000034000
FT2 0 0 0 0 0 0 000000034000
FT2RQ 0 0 0 0 777777777777 0 000000034000
FT3 0 0 0 0 777777777777 0 000000034000
FT9 034001 0 0 0 777777777777 0 000000034000
ET0 034001 0 0 0 0 0 000000034000
ST1 034001 0 0 0 0 0 000000034000
ST2 034001 0 0 0 0 0 000000034000
ST9 034001 0 0 0 0 0 000000034000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 544
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0739
*034001 SOJ 17,034001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034001 034001 0 0 360740034001 0 000000034001
IT1 034001 0 0 0 360740034001 0 000000034001
AT3 034001 0 0 0 000000034001 0 360740034001
AT6 034001 034001 0 0 000000034001 0 360740034001
FT1A 034001 034001 0 0 000000034001 0 000000034001
FT2 034001 034001 0 0 0 0 000000034001
FT2RQ 034001 034001 0 0 0 0 000000034001
FT3 034001 034001 0 0 0 0 000000034001
FT9 034002 034001 0 0 0 0 000000034001
ET0 034002 034001 0 0 777777777777 0 000000034001
ST1 034002 034001 0 0 777777777777 0 000000034001
ST2 034002 034001 0 0 777777777777 0 000000034001
ST9 034002 034001 0 0 777777777777 0 000000034001
*034002 AOJ 17,034002
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034002 034002 0 0 340740034002 0 000000034002
IT1 034002 0 0 0 340740034002 0 000000034002
AT3 034002 0 0 0 000000034002 0 340740034002
AT6 034002 034002 0 0 000000034002 0 340740034002
FT1A 034002 034002 0 0 000000034002 0 000000034002
FT2 034002 034002 0 0 0 0 000000034002
FT2RQ 034002 034002 0 0 777777777777 0 000000034002
FT3 034002 034002 0 0 777777777777 0 000000034002
FT9 034003 034002 0 0 777777777777 0 000000034002
ET0 034003 034002 0 0 0 0 000000034002
ST1 034003 034002 0 0 0 0 000000034002
ST2 034003 034002 0 0 0 0 000000034002
ST9 034003 034002 0 0 0 0 000000034002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 545
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0740
*034003 SOJ 17,034003
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034003 034003 0 0 360740034003 0 000000034003
IT1 034003 0 0 0 360740034003 0 000000034003
AT3 034003 0 0 0 000000034003 0 360740034003
AT6 034003 034003 0 0 000000034003 0 360740034003
FT1A 034003 034003 0 0 000000034003 0 000000034003
FT2 034003 034003 0 0 0 0 000000034003
FT2RQ 034003 034003 0 0 0 0 000000034003
FT3 034003 034003 0 0 0 0 000000034003
FT9 034004 034003 0 0 0 0 000000034003
ET0 034004 034003 0 0 777777777777 0 000000034003
ST1 034004 034003 0 0 777777777777 0 000000034003
ST2 034004 034003 0 0 777777777777 0 000000034003
ST9 034004 034003 0 0 777777777777 0 000000034003
*034004 AOJ 17,034004
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034004 034004 0 0 340740034004 0 000000034004
IT1 034004 0 0 0 340740034004 0 000000034004
AT3 034004 0 0 0 000000034004 0 340740034004
AT6 034004 034004 0 0 000000034004 0 340740034004
FT1A 034004 034004 0 0 000000034004 0 000000034004
FT2 034004 034004 0 0 0 0 000000034004
FT2RQ 034004 034004 0 0 777777777777 0 000000034004
FT3 034004 034004 0 0 777777777777 0 000000034004
FT9 034005 034004 0 0 777777777777 0 000000034004
ET0 034005 034004 0 0 0 0 000000034004
ST1 034005 034004 0 0 0 0 000000034004
ST2 034005 034004 0 0 0 0 000000034004
ST9 034005 034004 0 0 0 0 000000034004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 546
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0741
*034005 SOJ 17,034005
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034005 034005 0 0 360740034005 0 000000034005
IT1 034005 0 0 0 360740034005 0 000000034005
AT3 034005 0 0 0 000000034005 0 360740034005
AT6 034005 034005 0 0 000000034005 0 360740034005
FT1A 034005 034005 0 0 000000034005 0 000000034005
FT2 034005 034005 0 0 0 0 000000034005
FT2RQ 034005 034005 0 0 0 0 000000034005
FT3 034005 034005 0 0 0 0 000000034005
FT9 034006 034005 0 0 0 0 000000034005
ET0 034006 034005 0 0 777777777777 0 000000034005
ST1 034006 034005 0 0 777777777777 0 000000034005
ST2 034006 034005 0 0 777777777777 0 000000034005
ST9 034006 034005 0 0 777777777777 0 000000034005
*034006 AOJ 17,034006
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034006 034006 0 0 340740034006 0 000000034006
IT1 034006 0 0 0 340740034006 0 000000034006
AT3 034006 0 0 0 000000034006 0 340740034006
AT6 034006 034006 0 0 000000034006 0 340740034006
FT1A 034006 034006 0 0 000000034006 0 000000034006
FT2 034006 034006 0 0 0 0 000000034006
FT2RQ 034006 034006 0 0 777777777777 0 000000034006
FT3 034006 034006 0 0 777777777777 0 000000034006
FT9 034007 034006 0 0 777777777777 0 000000034006
ET0 034007 034006 0 0 0 0 000000034006
ST1 034007 034006 0 0 0 0 000000034006
ST2 034007 034006 0 0 0 0 000000034006
ST9 034007 034006 0 0 0 0 000000034006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 547
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0742
*034007 SOJ 17,034007
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034007 034007 0 0 360740034007 0 000000034007
IT1 034007 0 0 0 360740034007 0 000000034007
AT3 034007 0 0 0 000000034007 0 360740034007
AT6 034007 034007 0 0 000000034007 0 360740034007
FT1A 034007 034007 0 0 000000034007 0 000000034007
FT2 034007 034007 0 0 0 0 000000034007
FT2RQ 034007 034007 0 0 0 0 000000034007
FT3 034007 034007 0 0 0 0 000000034007
FT9 034010 034007 0 0 0 0 000000034007
ET0 034010 034007 0 0 777777777777 0 000000034007
ST1 034010 034007 0 0 777777777777 0 000000034007
ST2 034010 034007 0 0 777777777777 0 000000034007
ST9 034010 034007 0 0 777777777777 0 000000034007
*034010 AOJ 17,034010
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034010 034010 0 0 340740034010 0 000000034010
IT1 034010 0 0 0 340740034010 0 000000034010
AT3 034010 0 0 0 000000034010 0 340740034010
AT6 034010 034010 0 0 000000034010 0 340740034010
FT1A 034010 034010 0 0 000000034010 0 000000034010
FT2 034010 034010 0 0 0 0 000000034010
FT2RQ 034010 034010 0 0 777777777777 0 000000034010
FT3 034010 034010 0 0 777777777777 0 000000034010
FT9 034011 034010 0 0 777777777777 0 000000034010
ET0 034011 034010 0 0 0 0 000000034010
ST1 034011 034010 0 0 0 0 000000034010
ST2 034011 034010 0 0 0 0 000000034010
ST9 034011 034010 0 0 0 0 000000034010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 548
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0743
*034011 SOJ 17,034011
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034011 034011 0 0 360740034011 0 000000034011
IT1 034011 0 0 0 360740034011 0 000000034011
AT3 034011 0 0 0 000000034011 0 360740034011
AT6 034011 034011 0 0 000000034011 0 360740034011
FT1A 034011 034011 0 0 000000034011 0 000000034011
FT2 034011 034011 0 0 0 0 000000034011
FT2RQ 034011 034011 0 0 0 0 000000034011
FT3 034011 034011 0 0 0 0 000000034011
FT9 034012 034011 0 0 0 0 000000034011
ET0 034012 034011 0 0 777777777777 0 000000034011
ST1 034012 034011 0 0 777777777777 0 000000034011
ST2 034012 034011 0 0 777777777777 0 000000034011
ST9 034012 034011 0 0 777777777777 0 000000034011
*034012 AOJ 17,034012
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034012 034012 0 0 340740034012 0 000000034012
IT1 034012 0 0 0 340740034012 0 000000034012
AT3 034012 0 0 0 000000034012 0 340740034012
AT6 034012 034012 0 0 000000034012 0 340740034012
FT1A 034012 034012 0 0 000000034012 0 000000034012
FT2 034012 034012 0 0 0 0 000000034012
FT2RQ 034012 034012 0 0 777777777777 0 000000034012
FT3 034012 034012 0 0 777777777777 0 000000034012
FT9 034013 034012 0 0 777777777777 0 000000034012
ET0 034013 034012 0 0 0 0 000000034012
ST1 034013 034012 0 0 0 0 000000034012
ST2 034013 034012 0 0 0 0 000000034012
ST9 034013 034012 0 0 0 0 000000034012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 549
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0744
*034013 SOJ 17,034013
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034013 034013 0 0 360740034013 0 000000034013
IT1 034013 0 0 0 360740034013 0 000000034013
AT3 034013 0 0 0 000000034013 0 360740034013
AT6 034013 034013 0 0 000000034013 0 360740034013
FT1A 034013 034013 0 0 000000034013 0 000000034013
FT2 034013 034013 0 0 0 0 000000034013
FT2RQ 034013 034013 0 0 0 0 000000034013
FT3 034013 034013 0 0 0 0 000000034013
FT9 034014 034013 0 0 0 0 000000034013
ET0 034014 034013 0 0 777777777777 0 000000034013
ST1 034014 034013 0 0 777777777777 0 000000034013
ST2 034014 034013 0 0 777777777777 0 000000034013
ST9 034014 034013 0 0 777777777777 0 000000034013
*034014 AOJ 17,034014
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034014 034014 0 0 340740034014 0 000000034014
IT1 034014 0 0 0 340740034014 0 000000034014
AT3 034014 0 0 0 000000034014 0 340740034014
AT6 034014 034014 0 0 000000034014 0 340740034014
FT1A 034014 034014 0 0 000000034014 0 000000034014
FT2 034014 034014 0 0 0 0 000000034014
FT2RQ 034014 034014 0 0 777777777777 0 000000034014
FT3 034014 034014 0 0 777777777777 0 000000034014
FT9 034015 034014 0 0 777777777777 0 000000034014
ET0 034015 034014 0 0 0 0 000000034014
ST1 034015 034014 0 0 0 0 000000034014
ST2 034015 034014 0 0 0 0 000000034014
ST9 034015 034014 0 0 0 0 000000034014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 550
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0745
*034015 SOJ 17,034015
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034015 034015 0 0 360740034015 0 000000034015
IT1 034015 0 0 0 360740034015 0 000000034015
AT3 034015 0 0 0 000000034015 0 360740034015
AT6 034015 034015 0 0 000000034015 0 360740034015
FT1A 034015 034015 0 0 000000034015 0 000000034015
FT2 034015 034015 0 0 0 0 000000034015
FT2RQ 034015 034015 0 0 0 0 000000034015
FT3 034015 034015 0 0 0 0 000000034015
FT9 034016 034015 0 0 0 0 000000034015
ET0 034016 034015 0 0 777777777777 0 000000034015
ST1 034016 034015 0 0 777777777777 0 000000034015
ST2 034016 034015 0 0 777777777777 0 000000034015
ST9 034016 034015 0 0 777777777777 0 000000034015
*034016 AOJ 17,034016
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034016 034016 0 0 340740034016 0 000000034016
IT1 034016 0 0 0 340740034016 0 000000034016
AT3 034016 0 0 0 000000034016 0 340740034016
AT6 034016 034016 0 0 000000034016 0 340740034016
FT1A 034016 034016 0 0 000000034016 0 000000034016
FT2 034016 034016 0 0 0 0 000000034016
FT2RQ 034016 034016 0 0 777777777777 0 000000034016
FT3 034016 034016 0 0 777777777777 0 000000034016
FT9 034017 034016 0 0 777777777777 0 000000034016
ET0 034017 034016 0 0 0 0 000000034016
ST1 034017 034016 0 0 0 0 000000034016
ST2 034017 034016 0 0 0 0 000000034016
ST9 034017 034016 0 0 0 0 000000034016
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 551
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0746
*034017 SKIPE 0,000017
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034017 034017 0 0 332000000017 0 0
IT1 034017 0 0 0 332000000017 0 0
AT3 034017 0 0 0 000000000017 0 332000000017
AT6 034017 000017 0 0 000000000017 0 332000000017
FT0 034017 000017 0 0 0 0 332000000017
FT1A 034017 000017 0 0 0 0 0
FT9 034020 000017 0 0 0 0 0
ET0 034021 000017 0 0 0 0 0
ST1A 034021 000017 0 0 0 0 0
ST9 034021 000017 0 0 0 0 0
*034021 JUMPA 0,034022
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034021 034021 0 0 324000034022 0 000000034022
IT1 034021 0 0 0 324000034022 0 000000034022
AT3 034021 0 0 0 000000034022 0 324000034022
AT6 034021 034022 0 0 000000034022 0 324000034022
FT1A 034021 034022 0 0 000000034022 0 000000034022
FT2 034021 034022 0 0 0 0 000000034022
FT2RQ 034021 034022 0 0 0 0 000000034022
FT3 034021 034022 0 0 0 0 000000034022
FT9 034022 034022 0 0 0 0 000000034022
ET0 034022 034022 0 0 0 0 000000034022
ST1A 034022 034022 0 0 0 0 000000034022
ST9 034022 034022 0 0 0 0 000000034022
*034022 JFCL 17,034023
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034022 034022 0 0 255740034023 0 000000034023
IT1 034022 0 0 0 255740034023 0 000000034023
AT3 034022 0 0 0 000000034023 0 255740034023
AT6 034022 034023 0 0 000000034023 0 255740034023
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 552
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0747
FT1A 034022 034023 0 0 000000034023 0 000000034023
FT9 034023 034023 0 0 000000034023 0 000000034023
ET0 034023 034023 0 0 000000034023 0 000000034023
ST1A 034023 034023 0 0 000000034023 0 000000034023
ST9 034023 034023 0 0 000000034023 0 000000034023
*034023 MOVEI 0,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 034023 034023 0 0 201000000001 0 000000000001
IT1 034023 0 0 0 201000000001 0 000000000001
AT3 034023 0 0 0 000000000001 0 201000000001
AT6 034023 000001 0 0 000000000001 0 201000000001
FT1A 034023 000001 0 0 000000000001 0 000000000001
FT9 034024 000001 0 0 000000000001 0 000000000001
ET0 034024 000001 0 0 000000000001 0 000000000001
ST1 034024 000001 0 0 000000000001 0 000000000001
ST2 034024 000001 0 0 000000000001 0 000000000001
ST9 034024 000001 0 0 000000000001 0 000000000001
*034024 SOJ 0,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034024 034024 0 0 360000000000 0 0
IT1 034024 0 0 0 360000000000 0 0
AT3 034024 0 0 0 0 0 360000000000
AT6 034024 0 0 0 0 0 360000000000
FT1A 034024 0 0 0 0 0 0
FT2 034024 0 0 0 0 0 0
FT2RQ 034024 0 0 0 000000000001 0 0
FT3 034024 0 0 0 000000000001 0 0
FT9 034025 0 0 0 000000000001 0 0
ET0 034025 0 0 0 0 0 0
ST1 034025 0 0 0 0 0 0
ST2 034025 0 0 0 0 0 0
ST9 034025 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 553
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0748
*034025 JFCL 4,034027
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034025 034025 0 0 255200034027 0 000000034027
IT1 034025 0 0 0 255200034027 0 000000034027
AT3 034025 0 0 0 000000034027 0 255200034027
AT6 034025 034027 0 0 000000034027 0 255200034027
FT1A 034025 034027 0 0 000000034027 0 000000034027
FT9 034026 034027 0 0 000000034027 0 000000034027
ET0 034027 034027 0 0 000000034027 0 000000034027
ST1A 034027 034027 0 0 000000034027 0 000000034027
ST9 034027 034027 0 0 000000034027 0 000000034027
*034027 JUMPA 0,034030
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034027 034027 0 0 324000034030 0 000000034030
IT1 034027 0 0 0 324000034030 0 000000034030
AT3 034027 0 0 0 000000034030 0 324000034030
AT6 034027 034030 0 0 000000034030 0 324000034030
FT1A 034027 034030 0 0 000000034030 0 000000034030
FT2 034027 034030 0 0 0 0 000000034030
FT2RQ 034027 034030 0 0 0 0 000000034030
FT3 034027 034030 0 0 0 0 000000034030
FT9 034030 034030 0 0 0 0 000000034030
ET0 034030 034030 0 0 0 0 000000034030
ST1A 034030 034030 0 0 0 0 000000034030
ST9 034030 034030 0 0 0 0 000000034030
*034030 JFCL 2,034032
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034030 034030 0 0 255100034032 0 000000034032
IT1 034030 0 0 0 255100034032 0 000000034032
AT3 034030 0 0 0 000000034032 0 255100034032
AT6 034030 034032 0 0 000000034032 0 255100034032
FT1A 034030 034032 0 0 000000034032 0 000000034032
FT9 034031 034032 0 0 000000034032 0 000000034032
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 554
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0749
ET0 034032 034032 0 0 000000034032 0 000000034032
ST1A 034032 034032 0 0 000000034032 0 000000034032
ST9 034032 034032 0 0 000000034032 0 000000034032
*034032 JUMPA 0,034033
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034032 034032 0 0 324000034033 0 000000034033
IT1 034032 0 0 0 324000034033 0 000000034033
AT3 034032 0 0 0 000000034033 0 324000034033
AT6 034032 034033 0 0 000000034033 0 324000034033
FT1A 034032 034033 0 0 000000034033 0 000000034033
FT2 034032 034033 0 0 0 0 000000034033
FT2RQ 034032 034033 0 0 0 0 000000034033
FT3 034032 034033 0 0 0 0 000000034033
FT9 034033 034033 0 0 0 0 000000034033
ET0 034033 034033 0 0 0 0 000000034033
ST1A 034033 034033 0 0 0 0 000000034033
ST9 034033 034033 0 0 0 0 000000034033
*034033 JFCL 10,034035
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034033 034033 0 0 255400034035 0 000000034035
IT1 034033 0 0 0 255400034035 0 000000034035
AT3 034033 0 0 0 000000034035 0 255400034035
AT6 034033 034035 0 0 000000034035 0 255400034035
FT1A 034033 034035 0 0 000000034035 0 000000034035
FT9 034034 034035 0 0 000000034035 0 000000034035
ET0 034034 034035 0 0 000000034035 0 000000034035
ST1A 034034 034035 0 0 000000034035 0 000000034035
ST9 034034 034035 0 0 000000034035 0 000000034035
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 555
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0750
*034034 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034034 034034 0 0 334000000000 0 0
IT1 034034 0 0 0 334000000000 0 0
AT3 034034 0 0 0 0 0 334000000000
AT6 034034 0 0 0 0 0 334000000000
FT0 034034 0 0 0 0 0 334000000000
FT1A 034034 0 0 0 0 0 0
FT9 034035 0 0 0 0 0 0
ET0 034036 0 0 0 0 0 0
ST1A 034036 0 0 0 0 0 0
ST9 034036 0 0 0 0 0 0
*034036 JUMPA 0,034037
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034036 034036 0 0 324000034037 0 000000034037
IT1 034036 0 0 0 324000034037 0 000000034037
AT3 034036 0 0 0 000000034037 0 324000034037
AT6 034036 034037 0 0 000000034037 0 324000034037
FT1A 034036 034037 0 0 000000034037 0 000000034037
FT2 034036 034037 0 0 0 0 000000034037
FT2RQ 034036 034037 0 0 0 0 000000034037
FT3 034036 034037 0 0 0 0 000000034037
FT9 034037 034037 0 0 0 0 000000034037
ET0 034037 034037 0 0 0 0 000000034037
ST1A 034037 034037 0 0 0 0 000000034037
ST9 034037 034037 0 0 0 0 000000034037
*034037 JFCL 1,034041
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034037 034037 0 0 255040034041 0 000000034041
IT1 034037 0 0 0 255040034041 0 000000034041
AT3 034037 0 0 0 000000034041 0 255040034041
AT6 034037 034041 0 0 000000034041 0 255040034041
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 556
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0751
FT1A 034037 034041 0 0 000000034041 0 000000034041
FT9 034040 034041 0 0 000000034041 0 000000034041
ET0 034040 034041 0 0 000000034041 0 000000034041
ST1A 034040 034041 0 0 000000034041 0 000000034041
ST9 034040 034041 0 0 000000034041 0 000000034041
*034040 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034040 034040 0 0 334000000000 0 0
IT1 034040 0 0 0 334000000000 0 0
AT3 034040 0 0 0 0 0 334000000000
AT6 034040 0 0 0 0 0 334000000000
FT0 034040 0 0 0 0 0 334000000000
FT1A 034040 0 0 0 0 0 0
FT9 034041 0 0 0 0 0 0
ET0 034042 0 0 0 0 0 0
ST1A 034042 0 0 0 0 0 0
ST9 034042 0 0 0 0 0 0
*034042 JUMPA 0,034043
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034042 034042 0 0 324000034043 0 000000034043
IT1 034042 0 0 0 324000034043 0 000000034043
AT3 034042 0 0 0 000000034043 0 324000034043
AT6 034042 034043 0 0 000000034043 0 324000034043
FT1A 034042 034043 0 0 000000034043 0 000000034043
FT2 034042 034043 0 0 0 0 000000034043
FT2RQ 034042 034043 0 0 0 0 000000034043
FT3 034042 034043 0 0 0 0 000000034043
FT9 034043 034043 0 0 0 0 000000034043
ET0 034043 034043 0 0 0 0 000000034043
ST1A 034043 034043 0 0 0 0 000000034043
ST9 034043 034043 0 0 0 0 000000034043
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 557
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0752
*034043 JFCL 17,034044
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034043 034043 0 0 255740034044 0 000000034044
IT1 034043 0 0 0 255740034044 0 000000034044
AT3 034043 0 0 0 000000034044 0 255740034044
AT6 034043 034044 0 0 000000034044 0 255740034044
FT1A 034043 034044 0 0 000000034044 0 000000034044
FT9 034044 034044 0 0 000000034044 0 000000034044
ET0 034044 034044 0 0 000000034044 0 000000034044
ST1A 034044 034044 0 0 000000034044 0 000000034044
ST9 034044 034044 0 0 000000034044 0 000000034044
*034044 SETO 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034044 034044 0 0 474000000000 0 0
IT1 034044 0 0 0 474000000000 0 0
AT3 034044 0 0 0 0 0 474000000000
AT6 034044 0 0 0 0 0 474000000000
FT1A 034044 0 0 0 0 0 0
FT9 034045 0 0 0 0 0 0
ET0 034045 0 0 0 777777777777 0 0
ST1 034045 0 0 0 777777777777 0 0
ST2 034045 0 0 0 777777777777 0 0
ST9 034045 0 0 0 777777777777 0 0
*034045 AOJ 0,000000
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034045 034045 0 0 340000000000 0 0
IT1 034045 0 0 0 340000000000 0 0
AT3 034045 0 0 0 0 0 340000000000
AT6 034045 0 0 0 0 0 340000000000
FT1A 034045 0 0 0 0 0 0
FT2 034045 0 0 0 0 0 0
FT2RQ 034045 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 558
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0753
FT3 034045 0 0 0 777777777777 0 0
FT9 034046 0 0 0 777777777777 0 0
ET0 034046 0 0 0 0 0 0
ST1 034046 0 0 0 0 0 0
ST2 034046 0 0 0 0 0 0
ST9 034046 0 0 0 0 0 0
*034046 JFCL 4,034050
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034046 034046 0 0 255200034050 0 000000034050
IT1 034046 0 0 0 255200034050 0 000000034050
AT3 034046 0 0 0 000000034050 0 255200034050
AT6 034046 034050 0 0 000000034050 0 255200034050
FT1A 034046 034050 0 0 000000034050 0 000000034050
FT9 034047 034050 0 0 000000034050 0 000000034050
ET0 034050 034050 0 0 000000034050 0 000000034050
ST1A 034050 034050 0 0 000000034050 0 000000034050
ST9 034050 034050 0 0 000000034050 0 000000034050
*034050 JUMPA 0,034051
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034050 034050 0 0 324000034051 0 000000034051
IT1 034050 0 0 0 324000034051 0 000000034051
AT3 034050 0 0 0 000000034051 0 324000034051
AT6 034050 034051 0 0 000000034051 0 324000034051
FT1A 034050 034051 0 0 000000034051 0 000000034051
FT2 034050 034051 0 0 0 0 000000034051
FT2RQ 034050 034051 0 0 0 0 000000034051
FT3 034050 034051 0 0 0 0 000000034051
FT9 034051 034051 0 0 0 0 000000034051
ET0 034051 034051 0 0 0 0 000000034051
ST1A 034051 034051 0 0 0 0 000000034051
ST9 034051 034051 0 0 0 0 000000034051
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 559
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0754
*034051 JFCL 2,034053
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034051 034051 0 0 255100034053 0 000000034053
IT1 034051 0 0 0 255100034053 0 000000034053
AT3 034051 0 0 0 000000034053 0 255100034053
AT6 034051 034053 0 0 000000034053 0 255100034053
FT1A 034051 034053 0 0 000000034053 0 000000034053
FT9 034052 034053 0 0 000000034053 0 000000034053
ET0 034053 034053 0 0 000000034053 0 000000034053
ST1A 034053 034053 0 0 000000034053 0 000000034053
ST9 034053 034053 0 0 000000034053 0 000000034053
*034053 JUMPA 0,034054
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034053 034053 0 0 324000034054 0 000000034054
IT1 034053 0 0 0 324000034054 0 000000034054
AT3 034053 0 0 0 000000034054 0 324000034054
AT6 034053 034054 0 0 000000034054 0 324000034054
FT1A 034053 034054 0 0 000000034054 0 000000034054
FT2 034053 034054 0 0 0 0 000000034054
FT2RQ 034053 034054 0 0 0 0 000000034054
FT3 034053 034054 0 0 0 0 000000034054
FT9 034054 034054 0 0 0 0 000000034054
ET0 034054 034054 0 0 0 0 000000034054
ST1A 034054 034054 0 0 0 0 000000034054
ST9 034054 034054 0 0 0 0 000000034054
*034054 JFCL 10,034056
INITIAL
C(AC)=000000 000010
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034054 034054 0 0 255400034056 0 000000034056
IT1 034054 0 0 0 255400034056 0 000000034056
AT3 034054 0 0 0 000000034056 0 255400034056
AT6 034054 034056 0 0 000000034056 0 255400034056
FT1A 034054 034056 0 0 000000034056 0 000000034056
FT9 034055 034056 0 0 000000034056 0 000000034056
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 560
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0755
ET0 034055 034056 0 0 000000034056 0 000000034056
ST1A 034055 034056 0 0 000000034056 0 000000034056
ST9 034055 034056 0 0 000000034056 0 000000034056
*034055 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034055 034055 0 0 334000000000 0 0
IT1 034055 0 0 0 334000000000 0 0
AT3 034055 0 0 0 0 0 334000000000
AT6 034055 0 0 0 0 0 334000000000
FT0 034055 0 0 0 0 0 334000000000
FT1A 034055 0 0 0 0 0 0
FT9 034056 0 0 0 0 0 0
ET0 034057 0 0 0 0 0 0
ST1A 034057 0 0 0 0 0 0
ST9 034057 0 0 0 0 0 0
*034057 JUMPA 0,034060
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034057 034057 0 0 324000034060 0 000000034060
IT1 034057 0 0 0 324000034060 0 000000034060
AT3 034057 0 0 0 000000034060 0 324000034060
AT6 034057 034060 0 0 000000034060 0 324000034060
FT1A 034057 034060 0 0 000000034060 0 000000034060
FT2 034057 034060 0 0 0 0 000000034060
FT2RQ 034057 034060 0 0 0 0 000000034060
FT3 034057 034060 0 0 0 0 000000034060
FT9 034060 034060 0 0 0 0 000000034060
ET0 034060 034060 0 0 0 0 000000034060
ST1A 034060 034060 0 0 0 0 000000034060
ST9 034060 034060 0 0 0 0 000000034060
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 561
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0756
*034060 JFCL 1,034062
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034060 034060 0 0 255040034062 0 000000034062
IT1 034060 0 0 0 255040034062 0 000000034062
AT3 034060 0 0 0 000000034062 0 255040034062
AT6 034060 034062 0 0 000000034062 0 255040034062
FT1A 034060 034062 0 0 000000034062 0 000000034062
FT9 034061 034062 0 0 000000034062 0 000000034062
ET0 034061 034062 0 0 000000034062 0 000000034062
ST1A 034061 034062 0 0 000000034062 0 000000034062
ST9 034061 034062 0 0 000000034062 0 000000034062
*034061 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034061 034061 0 0 334000000000 0 0
IT1 034061 0 0 0 334000000000 0 0
AT3 034061 0 0 0 0 0 334000000000
AT6 034061 0 0 0 0 0 334000000000
FT0 034061 0 0 0 0 0 334000000000
FT1A 034061 0 0 0 0 0 0
FT9 034062 0 0 0 0 0 0
ET0 034063 0 0 0 0 0 0
ST1A 034063 0 0 0 0 0 0
ST9 034063 0 0 0 0 0 0
*034063 JUMPA 0,034064
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034063 034063 0 0 324000034064 0 000000034064
IT1 034063 0 0 0 324000034064 0 000000034064
AT3 034063 0 0 0 000000034064 0 324000034064
AT6 034063 034064 0 0 000000034064 0 324000034064
FT1A 034063 034064 0 0 000000034064 0 000000034064
FT2 034063 034064 0 0 0 0 000000034064
FT2RQ 034063 034064 0 0 0 0 000000034064
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 562
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0757
FT3 034063 034064 0 0 0 0 000000034064
FT9 034064 034064 0 0 0 0 000000034064
ET0 034064 034064 0 0 0 0 000000034064
ST1A 034064 034064 0 0 0 0 000000034064
ST9 034064 034064 0 0 0 0 000000034064
*034064 SETOB 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034064 034064 0 0 477000000001 0 000000000001
IT1 034064 0 0 0 477000000001 0 000000000001
AT3 034064 0 0 0 000000000001 0 477000000001
AT6 034064 000001 0 0 000000000001 0 477000000001
FT1A 034064 000001 0 0 000000000001 0 000000000001
FT9 034065 000001 0 0 000000000001 0 000000000001
ET0 034065 000001 0 0 777777777777 0 000000000001
ST1 034065 000001 0 0 777777777777 0 000000000001
ST2 034065 000001 0 0 777777777777 0 000000000001
ST6 034065 000001 0 0 777777777777 0 000000000001
ST6A 034065 000001 0 0 777777777777 0 000000000001
ST9 034065 000001 0 0 777777777777 0 000000000001
*034065 ADDM 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 034065 034065 0 0 272000000001 0 777777777777
IT1 034065 0 0 0 272000000001 0 777777777777
AT3 034065 0 0 0 000000000001 0 272000000001
AT6 034065 000001 0 0 000000000001 0 272000000001
FT0 034065 000001 0 0 777777777777 0 272000000001
FT1A 034065 000001 0 0 777777777777 0 777777777777
FT2 034065 000001 0 0 0 0 777777777777
FT2RQ 034065 000001 0 0 777777777777 0 777777777777
FT3 034065 000001 0 0 777777777777 0 777777777777
FT9 034066 000001 0 0 777777777777 0 777777777777
ET0 034066 000001 0 0 777777777776 0 777777777777
ST5 034066 000001 0 0 777777777776 0 777777777777
ST6A 034066 000001 0 0 777777777776 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 563
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0758
ST9 034066 000001 0 0 777777777776 0 777777777777
*034066 CAME 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034066 034066 0 0 312000034466 0 777777777777
IT1 034066 0 0 0 312000034466 0 777777777777
AT3 034066 0 0 0 000000034466 0 312000034466
AT6 034066 034466 0 0 000000034466 0 312000034466
FT0 034066 034466 0 0 777777777777 0 312000034466
FT1A 034066 034466 0 0 777777777777 0 777777777777
FT2 034066 034466 0 0 0 0 777777777777
FT2RQ 034066 034466 0 0 777777777777 0 777777777777
FT3 034066 034466 0 0 777777777777 0 777777777777
FT9 034067 034466 0 0 777777777777 0 777777777777
ET0 034070 034466 0 0 0 0 777777777777
ST1A 034070 034466 0 0 0 0 777777777777
ST9 034070 034466 0 0 0 0 777777777777
*034070 JUMPA 0,034071
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034070 034070 0 0 324000034071 0 000000034071
IT1 034070 0 0 0 324000034071 0 000000034071
AT3 034070 0 0 0 000000034071 0 324000034071
AT6 034070 034071 0 0 000000034071 0 324000034071
FT1A 034070 034071 0 0 000000034071 0 000000034071
FT2 034070 034071 0 0 0 0 000000034071
FT2RQ 034070 034071 0 0 777777777777 0 000000034071
FT3 034070 034071 0 0 777777777777 0 000000034071
FT9 034071 034071 0 0 777777777777 0 000000034071
ET0 034071 034071 0 0 777777777777 0 000000034071
ST1A 034071 034071 0 0 777777777777 0 000000034071
ST9 034071 034071 0 0 777777777777 0 000000034071
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 564
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0759
*034071 MOVEI 0,777777
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 034071 034071 0 0 201000777777 0 000000777777
IT1 034071 0 0 0 201000777777 0 000000777777
AT3 034071 0 0 0 000000777777 0 201000777777
AT6 034071 777777 0 0 000000777777 0 201000777777
FT1A 034071 777777 0 0 000000777777 0 000000777777
FT9 034072 777777 0 0 000000777777 0 000000777777
ET0 034072 777777 0 0 000000777777 0 000000777777
ST1 034072 777777 0 0 000000777777 0 000000777777
ST2 034072 777777 0 0 000000777777 0 000000777777
ST9 034072 777777 0 0 000000777777 0 000000777777
*034072 HRREM 0,000001
INITIAL
C(AC)=000000 777777
C(E)=777777 777776
FINAL
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034072 034072 0 0 572000000001 0 777777777776
IT1 034072 0 0 0 572000000001 0 777777777776
AT3 034072 0 0 0 000000000001 0 572000000001
AT6 034072 000001 0 0 000000000001 0 572000000001
FT0 034072 000001 0 0 777777777776 0 572000000001
FT1A 034072 000001 0 0 777777777776 0 777777777776
FT2 034072 000001 0 0 0 0 777777777776
FT2RQ 034072 000001 0 0 000000777777 0 777777777776
FT3 034072 000001 0 0 000000777777 0 777777777776
FT9 034073 000001 0 0 000000777777 0 777777777776
ET0 034073 000001 0 0 777777777777 0 777777777776
ST5 034073 000001 0 0 777777777777 0 777777777776
ST6A 034073 000001 0 0 777777777777 0 777777777776
ST9 034073 000001 0 0 777777777777 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 565
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0760
*034073 CAIE 0,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034073 034073 0 0 302000777777 0 000000777777
IT1 034073 0 0 0 302000777777 0 000000777777
AT3 034073 0 0 0 000000777777 0 302000777777
AT6 034073 777777 0 0 000000777777 0 302000777777
FT1A 034073 777777 0 0 000000777777 0 000000777777
FT2 034073 777777 0 0 0 0 000000777777
FT2RQ 034073 777777 0 0 000000777777 0 000000777777
FT3 034073 777777 0 0 000000777777 0 000000777777
FT9 034074 777777 0 0 000000777777 0 000000777777
ET0 034075 777777 0 0 0 0 000000777777
ST1A 034075 777777 0 0 0 0 000000777777
ST9 034075 777777 0 0 0 0 000000777777
*034075 JUMPA 0,034076
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034075 034075 0 0 324000034076 0 000000034076
IT1 034075 0 0 0 324000034076 0 000000034076
AT3 034075 0 0 0 000000034076 0 324000034076
AT6 034075 034076 0 0 000000034076 0 324000034076
FT1A 034075 034076 0 0 000000034076 0 000000034076
FT2 034075 034076 0 0 0 0 000000034076
FT2RQ 034075 034076 0 0 000000777777 0 000000034076
FT3 034075 034076 0 0 000000777777 0 000000034076
FT9 034076 034076 0 0 000000777777 0 000000034076
ET0 034076 034076 0 0 000000777777 0 000000034076
ST1A 034076 034076 0 0 000000777777 0 000000034076
ST9 034076 034076 0 0 000000777777 0 000000034076
*034076 MOVEI 0,777777
INITIAL
C(AC)=000000 777777
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 034076 034076 0 0 201000777777 0 000000777777
IT1 034076 0 0 0 201000777777 0 000000777777
AT3 034076 0 0 0 000000777777 0 201000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 566
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0761
AT6 034076 777777 0 0 000000777777 0 201000777777
FT1A 034076 777777 0 0 000000777777 0 000000777777
FT9 034077 777777 0 0 000000777777 0 000000777777
ET0 034077 777777 0 0 000000777777 0 000000777777
ST1 034077 777777 0 0 000000777777 0 000000777777
ST2 034077 777777 0 0 000000777777 0 000000777777
ST9 034077 777777 0 0 000000777777 0 000000777777
*034077 MOVSM 0,000001
INITIAL
C(AC)=000000 777777
C(E)=777777 777777
FINAL
C(E)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 034077 034077 0 0 206000000001 0 000000000001
IT1 034077 0 0 0 206000000001 0 000000000001
AT3 034077 0 0 0 000000000001 0 206000000001
AT6 034077 000001 0 0 000000000001 0 206000000001
FT1A 034077 000001 0 0 000000000001 0 000000000001
FT2 034077 000001 0 0 0 0 000000000001
FT2RQ 034077 000001 0 0 000000777777 0 000000000001
FT3 034077 000001 0 0 000000777777 0 000000000001
FT9 0 000001 0 0 000000777777 0 000000000001
ET0 0 000001 0 0 777777000000 0 000000000001
ST6 0 000001 0 0 777777000000 0 000000000001
ST6A 0 000001 0 0 777777000000 0 000000000001
ST9 0 000001 0 0 777777000000 0 000000000001
*034100 CAIE 0,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 302000777777 0 000000777777
IT1 0 0 0 0 302000777777 0 000000777777
AT3 0 0 0 0 000000777777 0 302000777777
AT6 0 777777 0 0 000000777777 0 302000777777
FT1A 0 777777 0 0 000000777777 0 000000777777
FT2 0 777777 0 0 0 0 000000777777
FT2RQ 0 777777 0 0 000000777777 0 000000777777
FT3 0 777777 0 0 000000777777 0 000000777777
FT9 034101 777777 0 0 000000777777 0 000000777777
ET0 034102 777777 0 0 0 0 000000777777
ST1A 034102 777777 0 0 0 0 000000777777
ST9 034102 777777 0 0 0 0 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 567
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0762
*034102 JUMPA 0,034103
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034102 034102 0 0 324000034103 0 000000034103
IT1 034102 0 0 0 324000034103 0 000000034103
AT3 034102 0 0 0 000000034103 0 324000034103
AT6 034102 034103 0 0 000000034103 0 324000034103
FT1A 034102 034103 0 0 000000034103 0 000000034103
FT2 034102 034103 0 0 0 0 000000034103
FT2RQ 034102 034103 0 0 000000777777 0 000000034103
FT3 034102 034103 0 0 000000777777 0 000000034103
FT9 034103 034103 0 0 000000777777 0 000000034103
ET0 034103 034103 0 0 000000777777 0 000000034103
ST1A 034103 034103 0 0 000000777777 0 000000034103
ST9 034103 034103 0 0 000000777777 0 000000034103
*034103 SETOB 0,000001
INITIAL
C(AC)=000000 777777
C(E)=777777 000000
FINAL
C(AC)=777777 777777
C(E)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 034103 034103 0 0 477000000001 0 000000000001
IT1 034103 0 0 0 477000000001 0 000000000001
AT3 034103 0 0 0 000000000001 0 477000000001
AT6 034103 000001 0 0 000000000001 0 477000000001
FT1A 034103 000001 0 0 000000000001 0 000000000001
FT9 034104 000001 0 0 000000000001 0 000000000001
ET0 034104 000001 0 0 777777777777 0 000000000001
ST1 034104 000001 0 0 777777777777 0 000000000001
ST2 034104 000001 0 0 777777777777 0 000000000001
ST6 034104 000001 0 0 777777777777 0 000000000001
ST6A 034104 000001 0 0 777777777777 0 000000000001
ST9 034104 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 568
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0763
*034104 XORM 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034104 034104 0 0 432000000001 0 777777777777
IT1 034104 0 0 0 432000000001 0 777777777777
AT3 034104 0 0 0 000000000001 0 432000000001
AT6 034104 000001 0 0 000000000001 0 432000000001
FT0 034104 000001 0 0 777777777777 0 432000000001
FT1A 034104 000001 0 0 777777777777 0 777777777777
FT2 034104 000001 0 0 0 0 777777777777
FT2RQ 034104 000001 0 0 777777777777 0 777777777777
FT3 034104 000001 0 0 777777777777 0 777777777777
FT9 034105 000001 0 0 777777777777 0 777777777777
ET0 034105 000001 0 0 0 0 777777777777
ST5 034105 000001 0 0 0 0 777777777777
ST6A 034105 000001 0 0 0 0 777777777777
ST9 034105 000001 0 0 0 0 777777777777
*034105 CAME 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034105 034105 0 0 312000034466 0 777777777777
IT1 034105 0 0 0 312000034466 0 777777777777
AT3 034105 0 0 0 000000034466 0 312000034466
AT6 034105 034466 0 0 000000034466 0 312000034466
FT0 034105 034466 0 0 777777777777 0 312000034466
FT1A 034105 034466 0 0 777777777777 0 777777777777
FT2 034105 034466 0 0 0 0 777777777777
FT2RQ 034105 034466 0 0 777777777777 0 777777777777
FT3 034105 034466 0 0 777777777777 0 777777777777
FT9 034106 034466 0 0 777777777777 0 777777777777
ET0 034107 034466 0 0 0 0 777777777777
ST1A 034107 034466 0 0 0 0 777777777777
ST9 034107 034466 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 569
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0764
*034107 JUMPA 0,034110
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034107 034107 0 0 324000034110 0 000000034110
IT1 034107 0 0 0 324000034110 0 000000034110
AT3 034107 0 0 0 000000034110 0 324000034110
AT6 034107 034110 0 0 000000034110 0 324000034110
FT1A 034107 034110 0 0 000000034110 0 000000034110
FT2 034107 034110 0 0 0 0 000000034110
FT2RQ 034107 034110 0 0 777777777777 0 000000034110
FT3 034107 034110 0 0 777777777777 0 000000034110
FT9 034110 034110 0 0 777777777777 0 000000034110
ET0 034110 034110 0 0 777777777777 0 000000034110
ST1A 034110 034110 0 0 777777777777 0 000000034110
ST9 034110 034110 0 0 777777777777 0 000000034110
*034110 SETOB 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034110 034110 0 0 477000000001 0 000000000001
IT1 034110 0 0 0 477000000001 0 000000000001
AT3 034110 0 0 0 000000000001 0 477000000001
AT6 034110 000001 0 0 000000000001 0 477000000001
FT1A 034110 000001 0 0 000000000001 0 000000000001
FT9 034111 000001 0 0 000000000001 0 000000000001
ET0 034111 000001 0 0 777777777777 0 000000000001
ST1 034111 000001 0 0 777777777777 0 000000000001
ST2 034111 000001 0 0 777777777777 0 000000000001
ST6 034111 000001 0 0 777777777777 0 000000000001
ST6A 034111 000001 0 0 777777777777 0 000000000001
ST9 034111 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 570
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0765
*034111 ADDB 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777776
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 034111 034111 0 0 273000000001 0 777777777777
IT1 034111 0 0 0 273000000001 0 777777777777
AT3 034111 0 0 0 000000000001 0 273000000001
AT6 034111 000001 0 0 000000000001 0 273000000001
FT0 034111 000001 0 0 777777777777 0 273000000001
FT1A 034111 000001 0 0 777777777777 0 777777777777
FT2 034111 000001 0 0 0 0 777777777777
FT2RQ 034111 000001 0 0 777777777777 0 777777777777
FT3 034111 000001 0 0 777777777777 0 777777777777
FT9 034112 000001 0 0 777777777777 0 777777777777
ET0 034112 000001 0 0 777777777776 0 777777777777
ST1 034112 000001 0 0 777777777776 0 777777777777
ST2 034112 000001 0 0 777777777776 0 777777777777
ST5 034112 000001 0 0 777777777776 0 777777777777
ST6A 034112 000001 0 0 777777777776 0 777777777777
ST9 034112 000001 0 0 777777777776 0 777777777777
*034112 CAME 0,000001
INITIAL
C(AC)=777777 777776
C(E)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034112 034112 0 0 312000000001 0 777777777776
IT1 034112 0 0 0 312000000001 0 777777777776
AT3 034112 0 0 0 000000000001 0 312000000001
AT6 034112 000001 0 0 000000000001 0 312000000001
FT0 034112 000001 0 0 777777777776 0 312000000001
FT1A 034112 000001 0 0 777777777776 0 777777777776
FT2 034112 000001 0 0 0 0 777777777776
FT2RQ 034112 000001 0 0 777777777776 0 777777777776
FT3 034112 000001 0 0 777777777776 0 777777777776
FT9 034113 000001 0 0 777777777776 0 777777777776
ET0 034114 000001 0 0 0 0 777777777776
ST1A 034114 000001 0 0 0 0 777777777776
ST9 034114 000001 0 0 0 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 571
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0766
*034114 JUMPA 0,034115
INITIAL
C(AC)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034114 034114 0 0 324000034115 0 000000034115
IT1 034114 0 0 0 324000034115 0 000000034115
AT3 034114 0 0 0 000000034115 0 324000034115
AT6 034114 034115 0 0 000000034115 0 324000034115
FT1A 034114 034115 0 0 000000034115 0 000000034115
FT2 034114 034115 0 0 0 0 000000034115
FT2RQ 034114 034115 0 0 777777777776 0 000000034115
FT3 034114 034115 0 0 777777777776 0 000000034115
FT9 034115 034115 0 0 777777777776 0 000000034115
ET0 034115 034115 0 0 777777777776 0 000000034115
ST1A 034115 034115 0 0 777777777776 0 000000034115
ST9 034115 034115 0 0 777777777776 0 000000034115
*034115 CAME 0,034467
INITIAL
C(AC)=777777 777776
C(E)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034115 034115 0 0 312000034467 0 777777777776
IT1 034115 0 0 0 312000034467 0 777777777776
AT3 034115 0 0 0 000000034467 0 312000034467
AT6 034115 034467 0 0 000000034467 0 312000034467
FT0 034115 034467 0 0 777777777776 0 312000034467
FT1A 034115 034467 0 0 777777777776 0 777777777776
FT2 034115 034467 0 0 0 0 777777777776
FT2RQ 034115 034467 0 0 777777777776 0 777777777776
FT3 034115 034467 0 0 777777777776 0 777777777776
FT9 034116 034467 0 0 777777777776 0 777777777776
ET0 034117 034467 0 0 0 0 777777777776
ST1A 034117 034467 0 0 0 0 777777777776
ST9 034117 034467 0 0 0 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 572
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0767
*034117 JUMPA 0,034120
INITIAL
C(AC)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034117 034117 0 0 324000034120 0 000000034120
IT1 034117 0 0 0 324000034120 0 000000034120
AT3 034117 0 0 0 000000034120 0 324000034120
AT6 034117 034120 0 0 000000034120 0 324000034120
FT1A 034117 034120 0 0 000000034120 0 000000034120
FT2 034117 034120 0 0 0 0 000000034120
FT2RQ 034117 034120 0 0 777777777776 0 000000034120
FT3 034117 034120 0 0 777777777776 0 000000034120
FT9 034120 034120 0 0 777777777776 0 000000034120
ET0 034120 034120 0 0 777777777776 0 000000034120
ST1A 034120 034120 0 0 777777777776 0 000000034120
ST9 034120 034120 0 0 777777777776 0 000000034120
*034120 SETOB 0,000001
INITIAL
C(AC)=777777 777776
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 034120 034120 0 0 477000000001 0 000000000001
IT1 034120 0 0 0 477000000001 0 000000000001
AT3 034120 0 0 0 000000000001 0 477000000001
AT6 034120 000001 0 0 000000000001 0 477000000001
FT1A 034120 000001 0 0 000000000001 0 000000000001
FT9 034121 000001 0 0 000000000001 0 000000000001
ET0 034121 000001 0 0 777777777777 0 000000000001
ST1 034121 000001 0 0 777777777777 0 000000000001
ST2 034121 000001 0 0 777777777777 0 000000000001
ST6 034121 000001 0 0 777777777777 0 000000000001
ST6A 034121 000001 0 0 777777777777 0 000000000001
ST9 034121 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 573
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0768
*034121 ADDM 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 034121 034121 0 0 272000000001 0 777777777777
IT1 034121 0 0 0 272000000001 0 777777777777
AT3 034121 0 0 0 000000000001 0 272000000001
AT6 034121 000001 0 0 000000000001 0 272000000001
FT0 034121 000001 0 0 777777777777 0 272000000001
FT1A 034121 000001 0 0 777777777777 0 777777777777
FT2 034121 000001 0 0 0 0 777777777777
FT2RQ 034121 000001 0 0 777777777777 0 777777777777
FT3 034121 000001 0 0 777777777777 0 777777777777
FT9 034122 000001 0 0 777777777777 0 777777777777
ET0 034122 000001 0 0 777777777776 0 777777777777
ST5 034122 000001 0 0 777777777776 0 777777777777
ST6A 034122 000001 0 0 777777777776 0 777777777777
ST9 034122 000001 0 0 777777777776 0 777777777777
*034122 CAME 1,034467
INITIAL
C(AC)=777777 777776
C(E)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034122 034122 0 0 312040034467 0 777777777776
IT1 034122 0 0 0 312040034467 0 777777777776
AT3 034122 0 0 0 000000034467 0 312040034467
AT6 034122 034467 0 0 000000034467 0 312040034467
FT0 034122 034467 0 0 777777777776 0 312040034467
FT1A 034122 034467 0 0 777777777776 0 777777777776
FT2 034122 034467 0 0 0 0 777777777776
FT2RQ 034122 034467 0 0 777777777776 0 777777777776
FT3 034122 034467 0 0 777777777776 0 777777777776
FT9 034123 034467 0 0 777777777776 0 777777777776
ET0 034124 034467 0 0 0 0 777777777776
ST1A 034124 034467 0 0 0 0 777777777776
ST9 034124 034467 0 0 0 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 574
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0769
*034124 JUMPA 0,034125
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034124 034124 0 0 324000034125 0 000000034125
IT1 034124 0 0 0 324000034125 0 000000034125
AT3 034124 0 0 0 000000034125 0 324000034125
AT6 034124 034125 0 0 000000034125 0 324000034125
FT1A 034124 034125 0 0 000000034125 0 000000034125
FT2 034124 034125 0 0 0 0 000000034125
FT2RQ 034124 034125 0 0 777777777777 0 000000034125
FT3 034124 034125 0 0 777777777777 0 000000034125
FT9 034125 034125 0 0 777777777777 0 000000034125
ET0 034125 034125 0 0 777777777777 0 000000034125
ST1A 034125 034125 0 0 777777777777 0 000000034125
ST9 034125 034125 0 0 777777777777 0 000000034125
*034125 SETZM 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777776
FINAL
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 034125 034125 0 0 402000000001 0 000000000001
IT1 034125 0 0 0 402000000001 0 000000000001
AT3 034125 0 0 0 000000000001 0 402000000001
AT6 034125 000001 0 0 000000000001 0 402000000001
FT1A 034125 000001 0 0 000000000001 0 000000000001
FT9 034126 000001 0 0 000000000001 0 000000000001
ET0 034126 000001 0 0 0 0 000000000001
ST6 034126 000001 0 0 0 0 000000000001
ST6A 034126 000001 0 0 0 0 000000000001
ST9 034126 000001 0 0 0 0 000000000001
*034126 HLLOS 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034126 034126 0 0 523000000001 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 575
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0770
IT1 034126 0 0 0 523000000001 0 0
AT3 034126 0 0 0 000000000001 0 523000000001
AT6 034126 000001 0 0 000000000001 0 523000000001
FT0 034126 000001 0 0 0 0 523000000001
FT1A 034126 000001 0 0 0 0 0
FT9 034127 000001 0 0 0 0 0
ET0 034127 000001 0 0 000000777777 0 0
ST5 034127 000001 0 0 000000777777 0 0
ST6A 034127 000001 0 0 000000777777 0 0
ST9 034127 000001 0 0 000000777777 0 0
*034127 CAIE 1,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034127 034127 0 0 302040777777 0 000000777777
IT1 034127 0 0 0 302040777777 0 000000777777
AT3 034127 0 0 0 000000777777 0 302040777777
AT6 034127 777777 0 0 000000777777 0 302040777777
FT1A 034127 777777 0 0 000000777777 0 000000777777
FT2 034127 777777 0 0 0 0 000000777777
FT2RQ 034127 777777 0 0 000000777777 0 000000777777
FT3 034127 777777 0 0 000000777777 0 000000777777
FT9 034130 777777 0 0 000000777777 0 000000777777
ET0 034131 777777 0 0 0 0 000000777777
ST1A 034131 777777 0 0 0 0 000000777777
ST9 034131 777777 0 0 0 0 000000777777
*034131 JUMPA 0,034132
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034131 034131 0 0 324000034132 0 000000034132
IT1 034131 0 0 0 324000034132 0 000000034132
AT3 034131 0 0 0 000000034132 0 324000034132
AT6 034131 034132 0 0 000000034132 0 324000034132
FT1A 034131 034132 0 0 000000034132 0 000000034132
FT2 034131 034132 0 0 0 0 000000034132
FT2RQ 034131 034132 0 0 777777777777 0 000000034132
FT3 034131 034132 0 0 777777777777 0 000000034132
FT9 034132 034132 0 0 777777777777 0 000000034132
ET0 034132 034132 0 0 777777777777 0 000000034132
ST1A 034132 034132 0 0 777777777777 0 000000034132
ST9 034132 034132 0 0 777777777777 0 000000034132
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 576
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0771
*034132 MOVSI 1,777777
INITIAL
C(AC)=000000 777777
FINAL
C(AC)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 034132 034132 0 0 205040777777 0 000000777777
IT1 034132 0 0 0 205040777777 0 000000777777
AT3 034132 0 0 0 000000777777 0 205040777777
AT6 034132 777777 0 0 000000777777 0 205040777777
FT1A 034132 777777 0 0 000000777777 0 000000777777
FT9 034133 777777 0 0 000000777777 0 000000777777
ET0 034133 777777 0 0 777777000000 0 000000777777
ST1 034133 777777 0 0 777777000000 0 000000777777
ST2 034133 777777 0 0 777777000000 0 000000777777
ST9 034133 777777 0 0 777777000000 0 000000777777
*034133 MOVSS 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 000000
FINAL
C(AC)=777777 777777
C(E)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 034133 034133 0 0 207000000001 0 777777000000
IT1 034133 0 0 0 207000000001 0 777777000000
AT3 034133 0 0 0 000000000001 0 207000000001
AT6 034133 000001 0 0 000000000001 0 207000000001
FT0 034133 000001 0 0 777777000000 0 207000000001
FT1A 034133 000001 0 0 777777000000 0 777777000000
FT9 034134 000001 0 0 777777000000 0 777777000000
ET0 034134 000001 0 0 000000777777 0 777777000000
ST5 034134 000001 0 0 000000777777 0 777777000000
ST6A 034134 000001 0 0 000000777777 0 777777000000
ST9 034134 000001 0 0 000000777777 0 777777000000
*034134 CAIE 1,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034134 034134 0 0 302040777777 0 000000777777
IT1 034134 0 0 0 302040777777 0 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 577
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0772
AT3 034134 0 0 0 000000777777 0 302040777777
AT6 034134 777777 0 0 000000777777 0 302040777777
FT1A 034134 777777 0 0 000000777777 0 000000777777
FT2 034134 777777 0 0 0 0 000000777777
FT2RQ 034134 777777 0 0 000000777777 0 000000777777
FT3 034134 777777 0 0 000000777777 0 000000777777
FT9 034135 777777 0 0 000000777777 0 000000777777
ET0 034136 777777 0 0 0 0 000000777777
ST1A 034136 777777 0 0 0 0 000000777777
ST9 034136 777777 0 0 0 0 000000777777
*034136 JUMPA 0,034137
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034136 034136 0 0 324000034137 0 000000034137
IT1 034136 0 0 0 324000034137 0 000000034137
AT3 034136 0 0 0 000000034137 0 324000034137
AT6 034136 034137 0 0 000000034137 0 324000034137
FT1A 034136 034137 0 0 000000034137 0 000000034137
FT2 034136 034137 0 0 0 0 000000034137
FT2RQ 034136 034137 0 0 777777777777 0 000000034137
FT3 034136 034137 0 0 777777777777 0 000000034137
FT9 034137 034137 0 0 777777777777 0 000000034137
ET0 034137 034137 0 0 777777777777 0 000000034137
ST1A 034137 034137 0 0 777777777777 0 000000034137
ST9 034137 034137 0 0 777777777777 0 000000034137
*034137 SETOB 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 777777
FINAL
C(AC)=777777 777777
C(E)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 034137 034137 0 0 477000000001 0 000000000001
IT1 034137 0 0 0 477000000001 0 000000000001
AT3 034137 0 0 0 000000000001 0 477000000001
AT6 034137 000001 0 0 000000000001 0 477000000001
FT1A 034137 000001 0 0 000000000001 0 000000000001
FT9 034140 000001 0 0 000000000001 0 000000000001
ET0 034140 000001 0 0 777777777777 0 000000000001
ST1 034140 000001 0 0 777777777777 0 000000000001
ST2 034140 000001 0 0 777777777777 0 000000000001
ST6 034140 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 578
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0773
ST6A 034140 000001 0 0 777777777777 0 000000000001
ST9 034140 000001 0 0 777777777777 0 000000000001
*034140 AOS 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034140 034140 0 0 350000000001 0 777777777777
IT1 034140 0 0 0 350000000001 0 777777777777
AT3 034140 0 0 0 000000000001 0 350000000001
AT6 034140 000001 0 0 000000000001 0 350000000001
FT0 034140 000001 0 0 777777777777 0 350000000001
FT1A 034140 000001 0 0 777777777777 0 777777777777
FT9 034141 000001 0 0 777777777777 0 777777777777
ET0 034141 000001 0 0 0 0 777777777777
ST5 034141 000001 0 0 0 0 777777777777
ST6A 034141 000001 0 0 0 0 777777777777
ST9 034141 000001 0 0 0 0 777777777777
*034141 CAIE 1,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034141 034141 0 0 302040000000 0 0
IT1 034141 0 0 0 302040000000 0 0
AT3 034141 0 0 0 0 0 302040000000
AT6 034141 0 0 0 0 0 302040000000
FT1A 034141 0 0 0 0 0 0
FT2 034141 0 0 0 0 0 0
FT2RQ 034141 0 0 0 0 0 0
FT3 034141 0 0 0 0 0 0
FT9 034142 0 0 0 0 0 0
ET0 034143 0 0 0 0 0 0
ST1A 034143 0 0 0 0 0 0
ST9 034143 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 579
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0774
*034143 JUMPA 0,034144
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034143 034143 0 0 324000034144 0 000000034144
IT1 034143 0 0 0 324000034144 0 000000034144
AT3 034143 0 0 0 000000034144 0 324000034144
AT6 034143 034144 0 0 000000034144 0 324000034144
FT1A 034143 034144 0 0 000000034144 0 000000034144
FT2 034143 034144 0 0 0 0 000000034144
FT2RQ 034143 034144 0 0 777777777777 0 000000034144
FT3 034143 034144 0 0 777777777777 0 000000034144
FT9 034144 034144 0 0 777777777777 0 000000034144
ET0 034144 034144 0 0 777777777777 0 000000034144
ST1A 034144 034144 0 0 777777777777 0 000000034144
ST9 034144 034144 0 0 777777777777 0 000000034144
*034144 SETZ 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034144 034144 0 0 400000000000 0 0
IT1 034144 0 0 0 400000000000 0 0
AT3 034144 0 0 0 0 0 400000000000
AT6 034144 0 0 0 0 0 400000000000
FT1A 034144 0 0 0 0 0 0
FT9 034145 0 0 0 0 0 0
ET0 034145 0 0 0 0 0 0
ST1 034145 0 0 0 0 0 0
ST2 034145 0 0 0 0 0 0
ST9 034145 0 0 0 0 0 0
*034145 SETO 1,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034145 034145 0 0 474040000000 0 0
IT1 034145 0 0 0 474040000000 0 0
AT3 034145 0 0 0 0 0 474040000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 580
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0775
AT6 034145 0 0 0 0 0 474040000000
FT1A 034145 0 0 0 0 0 0
FT9 034146 0 0 0 0 0 0
ET0 034146 0 0 0 777777777777 0 0
ST1 034146 0 0 0 777777777777 0 0
ST2 034146 0 0 0 777777777777 0 0
ST9 034146 0 0 0 777777777777 0 0
*034146 HRLM 0,000001
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(E)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 034146 034146 0 0 506000000001 0 777777777777
IT1 034146 0 0 0 506000000001 0 777777777777
AT3 034146 0 0 0 000000000001 0 506000000001
AT6 034146 000001 0 0 000000000001 0 506000000001
FT0 034146 000001 0 0 777777777777 0 506000000001
FT1A 034146 000001 0 0 777777777777 0 777777777777
FT2 034146 000001 0 0 0 0 777777777777
FT2RQ 034146 000001 0 0 0 0 777777777777
FT3 034146 000001 0 0 0 0 777777777777
FT9 034147 000001 0 0 0 0 777777777777
ET0 034147 000001 0 0 000000777777 0 777777777777
ST5 034147 000001 0 0 000000777777 0 777777777777
ST6A 034147 000001 0 0 000000777777 0 777777777777
ST9 034147 000001 0 0 000000777777 0 777777777777
*034147 CAIE 1,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034147 034147 0 0 302040777777 0 000000777777
IT1 034147 0 0 0 302040777777 0 000000777777
AT3 034147 0 0 0 000000777777 0 302040777777
AT6 034147 777777 0 0 000000777777 0 302040777777
FT1A 034147 777777 0 0 000000777777 0 000000777777
FT2 034147 777777 0 0 0 0 000000777777
FT2RQ 034147 777777 0 0 000000777777 0 000000777777
FT3 034147 777777 0 0 000000777777 0 000000777777
FT9 034150 777777 0 0 000000777777 0 000000777777
ET0 034151 777777 0 0 0 0 000000777777
ST1A 034151 777777 0 0 0 0 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 581
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0776
ST9 034151 777777 0 0 0 0 000000777777
*034151 JUMPA 0,034152
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034151 034151 0 0 324000034152 0 000000034152
IT1 034151 0 0 0 324000034152 0 000000034152
AT3 034151 0 0 0 000000034152 0 324000034152
AT6 034151 034152 0 0 000000034152 0 324000034152
FT1A 034151 034152 0 0 000000034152 0 000000034152
FT2 034151 034152 0 0 0 0 000000034152
FT2RQ 034151 034152 0 0 0 0 000000034152
FT3 034151 034152 0 0 0 0 000000034152
FT9 034152 034152 0 0 0 0 000000034152
ET0 034152 034152 0 0 0 0 000000034152
ST1A 034152 034152 0 0 0 0 000000034152
ST9 034152 034152 0 0 0 0 000000034152
*034152 SETO 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034152 034152 0 0 474000000000 0 0
IT1 034152 0 0 0 474000000000 0 0
AT3 034152 0 0 0 0 0 474000000000
AT6 034152 0 0 0 0 0 474000000000
FT1A 034152 0 0 0 0 0 0
FT9 034153 0 0 0 0 0 0
ET0 034153 0 0 0 777777777777 0 0
ST1 034153 0 0 0 777777777777 0 0
ST2 034153 0 0 0 777777777777 0 0
ST9 034153 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 582
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0777
*034153 SETZ 1,000000
INITIAL
C(AC)=000000 777777
C(E)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034153 034153 0 0 400040000000 0 0
IT1 034153 0 0 0 400040000000 0 0
AT3 034153 0 0 0 0 0 400040000000
AT6 034153 0 0 0 0 0 400040000000
FT1A 034153 0 0 0 0 0 0
FT9 034154 0 0 0 0 0 0
ET0 034154 0 0 0 0 0 0
ST1 034154 0 0 0 0 0 0
ST2 034154 0 0 0 0 0 0
ST9 034154 0 0 0 0 0 0
*034154 HRRS 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034154 034154 0 0 543000000001 0 0
IT1 034154 0 0 0 543000000001 0 0
AT3 034154 0 0 0 000000000001 0 543000000001
AT6 034154 000001 0 0 000000000001 0 543000000001
FT0 034154 000001 0 0 0 0 543000000001
FT1A 034154 000001 0 0 0 0 0
FT9 034155 000001 0 0 0 0 0
ET0 034155 000001 0 0 0 0 0
ST5 034155 000001 0 0 0 0 0
ST6A 034155 000001 0 0 0 0 0
ST9 034155 000001 0 0 0 0 0
*034155 SKIPE 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034155 034155 0 0 332000000001 0 0
IT1 034155 0 0 0 332000000001 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 583
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0778
AT3 034155 0 0 0 000000000001 0 332000000001
AT6 034155 000001 0 0 000000000001 0 332000000001
FT0 034155 000001 0 0 0 0 332000000001
FT1A 034155 000001 0 0 0 0 0
FT9 034156 000001 0 0 0 0 0
ET0 034157 000001 0 0 0 0 0
ST1A 034157 000001 0 0 0 0 0
ST9 034157 000001 0 0 0 0 0
*034157 JUMPA 0,034160
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034157 034157 0 0 324000034160 0 000000034160
IT1 034157 0 0 0 324000034160 0 000000034160
AT3 034157 0 0 0 000000034160 0 324000034160
AT6 034157 034160 0 0 000000034160 0 324000034160
FT1A 034157 034160 0 0 000000034160 0 000000034160
FT2 034157 034160 0 0 0 0 000000034160
FT2RQ 034157 034160 0 0 777777777777 0 000000034160
FT3 034157 034160 0 0 777777777777 0 000000034160
FT9 034160 034160 0 0 777777777777 0 000000034160
ET0 034160 034160 0 0 777777777777 0 000000034160
ST1A 034160 034160 0 0 777777777777 0 000000034160
ST9 034160 034160 0 0 777777777777 0 000000034160
*034160 SETO 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034160 034160 0 0 474000000000 0 0
IT1 034160 0 0 0 474000000000 0 0
AT3 034160 0 0 0 0 0 474000000000
AT6 034160 0 0 0 0 0 474000000000
FT1A 034160 0 0 0 0 0 0
FT9 034161 0 0 0 0 0 0
ET0 034161 0 0 0 777777777777 0 0
ST1 034161 0 0 0 777777777777 0 0
ST2 034161 0 0 0 777777777777 0 0
ST9 034161 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 584
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0779
*034161 MOVSI 1,777777
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 034161 034161 0 0 205040777777 0 000000777777
IT1 034161 0 0 0 205040777777 0 000000777777
AT3 034161 0 0 0 000000777777 0 205040777777
AT6 034161 777777 0 0 000000777777 0 205040777777
FT1A 034161 777777 0 0 000000777777 0 000000777777
FT9 034162 777777 0 0 000000777777 0 000000777777
ET0 034162 777777 0 0 777777000000 0 000000777777
ST1 034162 777777 0 0 777777000000 0 000000777777
ST2 034162 777777 0 0 777777000000 0 000000777777
ST9 034162 777777 0 0 777777000000 0 000000777777
*034162 HRRZM 1,000001
INITIAL
C(AC)=777777 000000
C(E)=777777 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034162 034162 0 0 552040000001 0 777777000000
IT1 034162 0 0 0 552040000001 0 777777000000
AT3 034162 0 0 0 000000000001 0 552040000001
AT6 034162 000001 0 0 000000000001 0 552040000001
FT0 034162 000001 0 0 777777000000 0 552040000001
FT1A 034162 000001 0 0 777777000000 0 777777000000
FT2 034162 000001 0 0 0 0 777777000000
FT2RQ 034162 000001 0 0 777777000000 0 777777000000
FT3 034162 000001 0 0 777777000000 0 777777000000
FT9 034163 000001 0 0 777777000000 0 777777000000
ET0 034163 000001 0 0 0 0 777777000000
ST5 034163 000001 0 0 0 0 777777000000
ST6A 034163 000001 0 0 0 0 777777000000
ST9 034163 000001 0 0 0 0 777777000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 585
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0780
*034163 SKIPE 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034163 034163 0 0 332000000001 0 0
IT1 034163 0 0 0 332000000001 0 0
AT3 034163 0 0 0 000000000001 0 332000000001
AT6 034163 000001 0 0 000000000001 0 332000000001
FT0 034163 000001 0 0 0 0 332000000001
FT1A 034163 000001 0 0 0 0 0
FT9 034164 000001 0 0 0 0 0
ET0 034165 000001 0 0 0 0 0
ST1A 034165 000001 0 0 0 0 0
ST9 034165 000001 0 0 0 0 0
*034165 JUMPA 0,034166
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034165 034165 0 0 324000034166 0 000000034166
IT1 034165 0 0 0 324000034166 0 000000034166
AT3 034165 0 0 0 000000034166 0 324000034166
AT6 034165 034166 0 0 000000034166 0 324000034166
FT1A 034165 034166 0 0 000000034166 0 000000034166
FT2 034165 034166 0 0 0 0 000000034166
FT2RQ 034165 034166 0 0 777777777777 0 000000034166
FT3 034165 034166 0 0 777777777777 0 000000034166
FT9 034166 034166 0 0 777777777777 0 000000034166
ET0 034166 034166 0 0 777777777777 0 000000034166
ST1A 034166 034166 0 0 777777777777 0 000000034166
ST9 034166 034166 0 0 777777777777 0 000000034166
*034166 SETZ 0,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034166 034166 0 0 400000000000 0 0
IT1 034166 0 0 0 400000000000 0 0
AT3 034166 0 0 0 0 0 400000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 586
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0781
AT6 034166 0 0 0 0 0 400000000000
FT1A 034166 0 0 0 0 0 0
FT9 034167 0 0 0 0 0 0
ET0 034167 0 0 0 0 0 0
ST1 034167 0 0 0 0 0 0
ST2 034167 0 0 0 0 0 0
ST9 034167 0 0 0 0 0 0
*034167 JFCL 17,034170
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034167 034167 0 0 255740034170 0 000000034170
IT1 034167 0 0 0 255740034170 0 000000034170
AT3 034167 0 0 0 000000034170 0 255740034170
AT6 034167 034170 0 0 000000034170 0 255740034170
FT1A 034167 034170 0 0 000000034170 0 000000034170
FT9 034170 034170 0 0 000000034170 0 000000034170
ET0 034170 034170 0 0 000000034170 0 000000034170
ST1A 034170 034170 0 0 000000034170 0 000000034170
ST9 034170 034170 0 0 000000034170 0 000000034170
*034170 SKIPE 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034170 034170 0 0 332000000000 0 0
IT1 034170 0 0 0 332000000000 0 0
AT3 034170 0 0 0 0 0 332000000000
AT6 034170 0 0 0 0 0 332000000000
FT0 034170 0 0 0 0 0 332000000000
FT1A 034170 0 0 0 0 0 0
FT9 034171 0 0 0 0 0 0
ET0 034172 0 0 0 0 0 0
ST1A 034172 0 0 0 0 0 0
ST9 034172 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 587
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0782
*034172 JUMPA 0,034173
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034172 034172 0 0 324000034173 0 000000034173
IT1 034172 0 0 0 324000034173 0 000000034173
AT3 034172 0 0 0 000000034173 0 324000034173
AT6 034172 034173 0 0 000000034173 0 324000034173
FT1A 034172 034173 0 0 000000034173 0 000000034173
FT2 034172 034173 0 0 0 0 000000034173
FT2RQ 034172 034173 0 0 0 0 000000034173
FT3 034172 034173 0 0 0 0 000000034173
FT9 034173 034173 0 0 0 0 000000034173
ET0 034173 034173 0 0 0 0 000000034173
ST1A 034173 034173 0 0 0 0 000000034173
ST9 034173 034173 0 0 0 0 000000034173
*034173 SETOB 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034173 034173 0 0 477000000001 0 000000000001
IT1 034173 0 0 0 477000000001 0 000000000001
AT3 034173 0 0 0 000000000001 0 477000000001
AT6 034173 000001 0 0 000000000001 0 477000000001
FT1A 034173 000001 0 0 000000000001 0 000000000001
FT9 034174 000001 0 0 000000000001 0 000000000001
ET0 034174 000001 0 0 777777777777 0 000000000001
ST1 034174 000001 0 0 777777777777 0 000000000001
ST2 034174 000001 0 0 777777777777 0 000000000001
ST6 034174 000001 0 0 777777777777 0 000000000001
ST6A 034174 000001 0 0 777777777777 0 000000000001
ST9 034174 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 588
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0783
*034174 XORM 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034174 034174 0 0 432000000001 0 777777777777
IT1 034174 0 0 0 432000000001 0 777777777777
AT3 034174 0 0 0 000000000001 0 432000000001
AT6 034174 000001 0 0 000000000001 0 432000000001
FT0 034174 000001 0 0 777777777777 0 432000000001
FT1A 034174 000001 0 0 777777777777 0 777777777777
FT2 034174 000001 0 0 0 0 777777777777
FT2RQ 034174 000001 0 0 777777777777 0 777777777777
FT3 034174 000001 0 0 777777777777 0 777777777777
FT9 034175 000001 0 0 777777777777 0 777777777777
ET0 034175 000001 0 0 0 0 777777777777
ST5 034175 000001 0 0 0 0 777777777777
ST6A 034175 000001 0 0 0 0 777777777777
ST9 034175 000001 0 0 0 0 777777777777
*034175 CAIE 1,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034175 034175 0 0 302040000000 0 0
IT1 034175 0 0 0 302040000000 0 0
AT3 034175 0 0 0 0 0 302040000000
AT6 034175 0 0 0 0 0 302040000000
FT1A 034175 0 0 0 0 0 0
FT2 034175 0 0 0 0 0 0
FT2RQ 034175 0 0 0 0 0 0
FT3 034175 0 0 0 0 0 0
FT9 034176 0 0 0 0 0 0
ET0 034177 0 0 0 0 0 0
ST1A 034177 0 0 0 0 0 0
ST9 034177 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 589
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0784
*034177 JUMPA 0,034200
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034177 034177 0 0 324000034200 0 000000034200
IT1 034177 0 0 0 324000034200 0 000000034200
AT3 034177 0 0 0 000000034200 0 324000034200
AT6 034177 0 0 0 000000034200 0 324000034200
FT1A 034177 0 0 0 000000034200 0 000000034200
FT2 034177 0 0 0 0 0 000000034200
FT2RQ 034177 0 0 0 777777777777 0 000000034200
FT3 034177 0 0 0 777777777777 0 000000034200
FT9 0 0 0 0 777777777777 0 000000034200
ET0 0 0 0 0 777777777777 0 000000034200
ST1A 0 0 0 0 777777777777 0 000000034200
ST9 0 0 0 0 777777777777 0 000000034200
*034200 SETZB 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 403000000001 0 000000000001
IT1 0 0 0 0 403000000001 0 000000000001
AT3 0 0 0 0 000000000001 0 403000000001
AT6 0 000001 0 0 000000000001 0 403000000001
FT1A 0 000001 0 0 000000000001 0 000000000001
FT9 034201 000001 0 0 000000000001 0 000000000001
ET0 034201 000001 0 0 0 0 000000000001
ST1 034201 000001 0 0 0 0 000000000001
ST2 034201 000001 0 0 0 0 000000000001
ST6 034201 000001 0 0 0 0 000000000001
ST6A 034201 000001 0 0 0 0 000000000001
ST9 034201 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 590
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0785
*034201 CAMN 0,034536
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034201 034201 0 0 316000034536 0 0
IT1 034201 0 0 0 316000034536 0 0
AT3 034201 0 0 0 000000034536 0 316000034536
AT6 034201 034536 0 0 000000034536 0 316000034536
FT0 034201 034536 0 0 0 0 316000034536
FT1A 034201 034536 0 0 0 0 0
FT2 034201 034536 0 0 0 0 0
FT2RQ 034201 034536 0 0 0 0 0
FT3 034201 034536 0 0 0 0 0
FT9 034202 034536 0 0 0 0 0
ET0 034202 034536 0 0 0 0 0
ST1A 034202 034536 0 0 0 0 0
ST9 034202 034536 0 0 0 0 0
*034202 CAME 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034202 034202 0 0 312000000001 0 0
IT1 034202 0 0 0 312000000001 0 0
AT3 034202 0 0 0 000000000001 0 312000000001
AT6 034202 000001 0 0 000000000001 0 312000000001
FT0 034202 000001 0 0 0 0 312000000001
FT1A 034202 000001 0 0 0 0 0
FT2 034202 000001 0 0 0 0 0
FT2RQ 034202 000001 0 0 0 0 0
FT3 034202 000001 0 0 0 0 0
FT9 034203 000001 0 0 0 0 0
ET0 034204 000001 0 0 0 0 0
ST1A 034204 000001 0 0 0 0 0
ST9 034204 000001 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 591
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0786
*034204 JUMPA 0,034205
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034204 034204 0 0 324000034205 0 000000034205
IT1 034204 0 0 0 324000034205 0 000000034205
AT3 034204 0 0 0 000000034205 0 324000034205
AT6 034204 034205 0 0 000000034205 0 324000034205
FT1A 034204 034205 0 0 000000034205 0 000000034205
FT2 034204 034205 0 0 0 0 000000034205
FT2RQ 034204 034205 0 0 0 0 000000034205
FT3 034204 034205 0 0 0 0 000000034205
FT9 034205 034205 0 0 0 0 000000034205
ET0 034205 034205 0 0 0 0 000000034205
ST1A 034205 034205 0 0 0 0 000000034205
ST9 034205 034205 0 0 0 0 000000034205
*034205 SETZ 1,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034205 034205 0 0 400040000000 0 0
IT1 034205 0 0 0 400040000000 0 0
AT3 034205 0 0 0 0 0 400040000000
AT6 034205 0 0 0 0 0 400040000000
FT1A 034205 0 0 0 0 0 0
FT9 034206 0 0 0 0 0 0
ET0 034206 0 0 0 0 0 0
ST1 034206 0 0 0 0 0 0
ST2 034206 0 0 0 0 0 0
ST9 034206 0 0 0 0 0 0
*034206 SETO 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034206 034206 0 0 474000000000 0 0
IT1 034206 0 0 0 474000000000 0 0
AT3 034206 0 0 0 0 0 474000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 592
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0787
AT6 034206 0 0 0 0 0 474000000000
FT1A 034206 0 0 0 0 0 0
FT9 034207 0 0 0 0 0 0
ET0 034207 0 0 0 777777777777 0 0
ST1 034207 0 0 0 777777777777 0 0
ST2 034207 0 0 0 777777777777 0 0
ST9 034207 0 0 0 777777777777 0 0
*034207 SETAB 0,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034207 034207 0 0 427000000001 0 000000000001
IT1 034207 0 0 0 427000000001 0 000000000001
AT3 034207 0 0 0 000000000001 0 427000000001
AT6 034207 000001 0 0 000000000001 0 427000000001
FT1A 034207 000001 0 0 000000000001 0 000000000001
FT2 034207 000001 0 0 0 0 000000000001
FT2RQ 034207 000001 0 0 777777777777 0 000000000001
FT3 034207 000001 0 0 777777777777 0 000000000001
FT9 034210 000001 0 0 777777777777 0 000000000001
ET0 034210 000001 0 0 777777777777 0 000000000001
ST1 034210 000001 0 0 777777777777 0 000000000001
ST2 034210 000001 0 0 777777777777 0 000000000001
ST6 034210 000001 0 0 777777777777 0 000000000001
ST6A 034210 000001 0 0 777777777777 0 000000000001
ST9 034210 000001 0 0 777777777777 0 000000000001
*034210 CAMN 0,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034210 034210 0 0 316000034466 0 777777777777
IT1 034210 0 0 0 316000034466 0 777777777777
AT3 034210 0 0 0 000000034466 0 316000034466
AT6 034210 034466 0 0 000000034466 0 316000034466
FT0 034210 034466 0 0 777777777777 0 316000034466
FT1A 034210 034466 0 0 777777777777 0 777777777777
FT2 034210 034466 0 0 0 0 777777777777
FT2RQ 034210 034466 0 0 777777777777 0 777777777777
FT3 034210 034466 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 593
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0788
FT9 034211 034466 0 0 777777777777 0 777777777777
ET0 034211 034466 0 0 0 0 777777777777
ST1A 034211 034466 0 0 0 0 777777777777
ST9 034211 034466 0 0 0 0 777777777777
*034211 CAME 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034211 034211 0 0 312000000001 0 777777777777
IT1 034211 0 0 0 312000000001 0 777777777777
AT3 034211 0 0 0 000000000001 0 312000000001
AT6 034211 000001 0 0 000000000001 0 312000000001
FT0 034211 000001 0 0 777777777777 0 312000000001
FT1A 034211 000001 0 0 777777777777 0 777777777777
FT2 034211 000001 0 0 0 0 777777777777
FT2RQ 034211 000001 0 0 777777777777 0 777777777777
FT3 034211 000001 0 0 777777777777 0 777777777777
FT9 034212 000001 0 0 777777777777 0 777777777777
ET0 034213 000001 0 0 0 0 777777777777
ST1A 034213 000001 0 0 0 0 777777777777
ST9 034213 000001 0 0 0 0 777777777777
*034213 JUMPA 0,034214
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034213 034213 0 0 324000034214 0 000000034214
IT1 034213 0 0 0 324000034214 0 000000034214
AT3 034213 0 0 0 000000034214 0 324000034214
AT6 034213 034214 0 0 000000034214 0 324000034214
FT1A 034213 034214 0 0 000000034214 0 000000034214
FT2 034213 034214 0 0 0 0 000000034214
FT2RQ 034213 034214 0 0 777777777777 0 000000034214
FT3 034213 034214 0 0 777777777777 0 000000034214
FT9 034214 034214 0 0 777777777777 0 000000034214
ET0 034214 034214 0 0 777777777777 0 000000034214
ST1A 034214 034214 0 0 777777777777 0 000000034214
ST9 034214 034214 0 0 777777777777 0 000000034214
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 594
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0789
*034214 SETZB 0,000001
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034214 034214 0 0 403000000001 0 000000000001
IT1 034214 0 0 0 403000000001 0 000000000001
AT3 034214 0 0 0 000000000001 0 403000000001
AT6 034214 000001 0 0 000000000001 0 403000000001
FT1A 034214 000001 0 0 000000000001 0 000000000001
FT9 034215 000001 0 0 000000000001 0 000000000001
ET0 034215 000001 0 0 0 0 000000000001
ST1 034215 000001 0 0 0 0 000000000001
ST2 034215 000001 0 0 0 0 000000000001
ST6 034215 000001 0 0 0 0 000000000001
ST6A 034215 000001 0 0 0 0 000000000001
ST9 034215 000001 0 0 0 0 000000000001
*034215 XCT 0,034542
INITIAL
C(AC)=000000 000000
C(E)=201040 034217
FINAL
C(E)=201040 034217
TIME PC MA SC FE AR MQ BR
IT0 034215 034542 0 0 201040034217 0 000000034542
IT1 034215 0 0 0 201040034217 0 000000034542
AT3 034215 0 0 0 000000034217 0 201040034217
AT6 034215 034217 0 0 000000034217 0 201040034217
FT1A 034215 034217 0 0 000000034217 0 000000034217
FT9 034216 034217 0 0 000000034217 0 000000034217
ET0 034216 034217 0 0 000000034217 0 000000034217
ST1 034216 034217 0 0 000000034217 0 000000034217
ST2 034216 034217 0 0 000000034217 0 000000034217
ST9 034216 034217 0 0 000000034217 0 000000034217
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 595
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0790
*034216 SKIPA 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034216 034216 0 0 334000000000 0 0
IT1 034216 0 0 0 334000000000 0 0
AT3 034216 0 0 0 0 0 334000000000
AT6 034216 0 0 0 0 0 334000000000
FT0 034216 0 0 0 0 0 334000000000
FT1A 034216 0 0 0 0 0 0
FT9 034217 0 0 0 0 0 0
ET0 034220 0 0 0 0 0 0
ST1A 034220 0 0 0 0 0 0
ST9 034220 0 0 0 0 0 0
*034220 JUMPA 0,034221
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034220 034220 0 0 324000034221 0 000000034221
IT1 034220 0 0 0 324000034221 0 000000034221
AT3 034220 0 0 0 000000034221 0 324000034221
AT6 034220 034221 0 0 000000034221 0 324000034221
FT1A 034220 034221 0 0 000000034221 0 000000034221
FT2 034220 034221 0 0 0 0 000000034221
FT2RQ 034220 034221 0 0 0 0 000000034221
FT3 034220 034221 0 0 0 0 000000034221
FT9 034221 034221 0 0 0 0 000000034221
ET0 034221 034221 0 0 0 0 000000034221
ST1A 034221 034221 0 0 0 0 000000034221
ST9 034221 034221 0 0 0 0 000000034221
*034221 SETZB 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 034217
FINAL
C(AC)=000000 000000
C(E)=000000 034217
TIME PC MA SC FE AR MQ BR
IT0 034221 034221 0 0 403000000001 0 000000000001
IT1 034221 0 0 0 403000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 596
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0791
AT3 034221 0 0 0 000000000001 0 403000000001
AT6 034221 000001 0 0 000000000001 0 403000000001
FT1A 034221 000001 0 0 000000000001 0 000000000001
FT9 034222 000001 0 0 000000000001 0 000000000001
ET0 034222 000001 0 0 0 0 000000000001
ST1 034222 000001 0 0 0 0 000000000001
ST2 034222 000001 0 0 0 0 000000000001
ST6 034222 000001 0 0 0 0 000000000001
ST6A 034222 000001 0 0 0 0 000000000001
ST9 034222 000001 0 0 0 0 000000000001
*034222 XCT 0,034543
INITIAL
C(AC)=000000 000000
C(E)=201040 000001
FINAL
C(E)=201040 000001
TIME PC MA SC FE AR MQ BR
IT0 034222 034543 0 0 201040000001 0 000000034543
IT1 034222 0 0 0 201040000001 0 000000034543
AT3 034222 0 0 0 000000000001 0 201040000001
AT6 034222 000001 0 0 000000000001 0 201040000001
FT1A 034222 000001 0 0 000000000001 0 000000000001
FT9 034223 000001 0 0 000000000001 0 000000000001
ET0 034223 000001 0 0 000000000001 0 000000000001
ST1 034223 000001 0 0 000000000001 0 000000000001
ST2 034223 000001 0 0 000000000001 0 000000000001
ST9 034223 000001 0 0 000000000001 0 000000000001
*034223 CAIE 1,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034223 034223 0 0 302040000001 0 000000000001
IT1 034223 0 0 0 302040000001 0 000000000001
AT3 034223 0 0 0 000000000001 0 302040000001
AT6 034223 000001 0 0 000000000001 0 302040000001
FT1A 034223 000001 0 0 000000000001 0 000000000001
FT2 034223 000001 0 0 0 0 000000000001
FT2RQ 034223 000001 0 0 000000000001 0 000000000001
FT3 034223 000001 0 0 000000000001 0 000000000001
FT9 034224 000001 0 0 000000000001 0 000000000001
ET0 034225 000001 0 0 0 0 000000000001
ST1A 034225 000001 0 0 0 0 000000000001
ST9 034225 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 597
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0792
*034225 JUMPA 0,034226
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034225 034225 0 0 324000034226 0 000000034226
IT1 034225 0 0 0 324000034226 0 000000034226
AT3 034225 0 0 0 000000034226 0 324000034226
AT6 034225 034226 0 0 000000034226 0 324000034226
FT1A 034225 034226 0 0 000000034226 0 000000034226
FT2 034225 034226 0 0 0 0 000000034226
FT2RQ 034225 034226 0 0 0 0 000000034226
FT3 034225 034226 0 0 0 0 000000034226
FT9 034226 034226 0 0 0 0 000000034226
ET0 034226 034226 0 0 0 0 000000034226
ST1A 034226 034226 0 0 0 0 000000034226
ST9 034226 034226 0 0 0 0 000000034226
*034226 SETZB 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 034226 034226 0 0 403000000001 0 000000000001
IT1 034226 0 0 0 403000000001 0 000000000001
AT3 034226 0 0 0 000000000001 0 403000000001
AT6 034226 000001 0 0 000000000001 0 403000000001
FT1A 034226 000001 0 0 000000000001 0 000000000001
FT9 034227 000001 0 0 000000000001 0 000000000001
ET0 034227 000001 0 0 0 0 000000000001
ST1 034227 000001 0 0 0 0 000000000001
ST2 034227 000001 0 0 0 0 000000000001
ST6 034227 000001 0 0 0 0 000000000001
ST6A 034227 000001 0 0 0 0 000000000001
ST9 034227 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 598
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0793
*034227 XCT 0,034550
INITIAL
C(AC)=000000 000000
C(E)=256000 034547
FINAL
C(E)=256000 034547
TIME PC MA SC FE AR MQ BR
IT0 034227 034550 0 0 256000034547 0 000000034550
IT1 034227 0 0 0 256000034547 0 000000034550
AT3 034227 0 0 0 000000034547 0 256000034547
AT6 034227 034547 0 0 000000034547 0 256000034547
FT1A 034227 034547 0 0 000000034547 0 000000034547
FT9 034227 034547 0 0 000000034547 0 000000034547
ET0 034227 034547 0 0 000000034547 0 000000034547
ST1A 034227 034547 0 0 000000034547 0 000000034547
ST9 034227 034547 0 0 000000034547 0 000000034547
*034227 XCT 0,034550
INITIAL
C(AC)=000000 000000
C(E)=256000 034547
FINAL
C(E)=256000 034547
TIME PC MA SC FE AR MQ BR
IT0 034227 034546 0 0 256000034545 0 000000034546
IT1 034227 0 0 0 256000034545 0 000000034546
AT3 034227 0 0 0 000000034545 0 256000034545
AT6 034227 034545 0 0 000000034545 0 256000034545
FT1A 034227 034545 0 0 000000034545 0 000000034545
FT9 034227 034545 0 0 000000034545 0 000000034545
ET0 034227 034545 0 0 000000034545 0 000000034545
ST1A 034227 034545 0 0 000000034545 0 000000034545
ST9 034227 034545 0 0 000000034545 0 000000034545
*034227 XCT 0,034550
INITIAL
C(AC)=000000 000000
C(E)=256000 034547
FINAL
C(E)=256000 034547
TIME PC MA SC FE AR MQ BR
IT0 034227 034544 0 0 201040777777 0 000000034544
IT1 034227 0 0 0 201040777777 0 000000034544
AT3 034227 0 0 0 000000777777 0 201040777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 599
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0794
AT6 034227 777777 0 0 000000777777 0 201040777777
FT1A 034227 777777 0 0 000000777777 0 000000777777
FT9 034230 777777 0 0 000000777777 0 000000777777
ET0 034230 777777 0 0 000000777777 0 000000777777
ST1 034230 777777 0 0 000000777777 0 000000777777
ST2 034230 777777 0 0 000000777777 0 000000777777
ST9 034230 777777 0 0 000000777777 0 000000777777
*034230 CAIE 1,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034230 034230 0 0 302040777777 0 000000777777
IT1 034230 0 0 0 302040777777 0 000000777777
AT3 034230 0 0 0 000000777777 0 302040777777
AT6 034230 777777 0 0 000000777777 0 302040777777
FT1A 034230 777777 0 0 000000777777 0 000000777777
FT2 034230 777777 0 0 0 0 000000777777
FT2RQ 034230 777777 0 0 000000777777 0 000000777777
FT3 034230 777777 0 0 000000777777 0 000000777777
FT9 034231 777777 0 0 000000777777 0 000000777777
ET0 034232 777777 0 0 0 0 000000777777
ST1A 034232 777777 0 0 0 0 000000777777
ST9 034232 777777 0 0 0 0 000000777777
*034232 JUMPA 0,034233
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034232 034232 0 0 324000034233 0 000000034233
IT1 034232 0 0 0 324000034233 0 000000034233
AT3 034232 0 0 0 000000034233 0 324000034233
AT6 034232 034233 0 0 000000034233 0 324000034233
FT1A 034232 034233 0 0 000000034233 0 000000034233
FT2 034232 034233 0 0 0 0 000000034233
FT2RQ 034232 034233 0 0 0 0 000000034233
FT3 034232 034233 0 0 0 0 000000034233
FT9 034233 034233 0 0 0 0 000000034233
ET0 034233 034233 0 0 0 0 000000034233
ST1A 034233 034233 0 0 0 0 000000034233
ST9 034233 034233 0 0 0 0 000000034233
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 600
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0795
*034233 SETZB 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 777777
FINAL
C(AC)=000000 000000
C(E)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 034233 034233 0 0 403000000001 0 000000000001
IT1 034233 0 0 0 403000000001 0 000000000001
AT3 034233 0 0 0 000000000001 0 403000000001
AT6 034233 000001 0 0 000000000001 0 403000000001
FT1A 034233 000001 0 0 000000000001 0 000000000001
FT9 034234 000001 0 0 000000000001 0 000000000001
ET0 034234 000001 0 0 0 0 000000000001
ST1 034234 000001 0 0 0 0 000000000001
ST2 034234 000001 0 0 0 0 000000000001
ST6 034234 000001 0 0 0 0 000000000001
ST6A 034234 000001 0 0 0 0 000000000001
ST9 034234 000001 0 0 0 0 000000000001
*034234 XCT 0,034551
INITIAL
C(AC)=000000 000000
C(E)=200040 034466
FINAL
C(E)=200040 034466
TIME PC MA SC FE AR MQ BR
IT0 034234 034551 0 0 200040034466 0 000000034551
IT1 034234 0 0 0 200040034466 0 000000034551
AT3 034234 0 0 0 000000034466 0 200040034466
AT6 034234 034466 0 0 000000034466 0 200040034466
FT0 034234 034466 0 0 777777777777 0 200040034466
FT1A 034234 034466 0 0 777777777777 0 777777777777
FT9 034235 034466 0 0 777777777777 0 777777777777
ET0 034235 034466 0 0 777777777777 0 777777777777
ST1 034235 034466 0 0 777777777777 0 777777777777
ST2 034235 034466 0 0 777777777777 0 777777777777
ST9 034235 034466 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 601
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0796
*034235 SKIPE 0,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034235 034235 0 0 332000000000 0 0
IT1 034235 0 0 0 332000000000 0 0
AT3 034235 0 0 0 0 0 332000000000
AT6 034235 0 0 0 0 0 332000000000
FT0 034235 0 0 0 0 0 332000000000
FT1A 034235 0 0 0 0 0 0
FT9 034236 0 0 0 0 0 0
ET0 034237 0 0 0 0 0 0
ST1A 034237 0 0 0 0 0 0
ST9 034237 0 0 0 0 0 0
*034237 JUMPA 0,034240
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034237 034237 0 0 324000034240 0 000000034240
IT1 034237 0 0 0 324000034240 0 000000034240
AT3 034237 0 0 0 000000034240 0 324000034240
AT6 034237 034240 0 0 000000034240 0 324000034240
FT1A 034237 034240 0 0 000000034240 0 000000034240
FT2 034237 034240 0 0 0 0 000000034240
FT2RQ 034237 034240 0 0 0 0 000000034240
FT3 034237 034240 0 0 0 0 000000034240
FT9 034240 034240 0 0 0 0 000000034240
ET0 034240 034240 0 0 0 0 000000034240
ST1A 034240 034240 0 0 0 0 000000034240
ST9 034240 034240 0 0 0 0 000000034240
*034240 XCT 0,034552
INITIAL
C(AC)=000000 000000
C(E)=334000 000000
FINAL
C(E)=334000 000000
TIME PC MA SC FE AR MQ BR
IT0 034240 034552 0 0 334000000000 0 000000034552
IT1 034240 0 0 0 334000000000 0 000000034552
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 602
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0797
AT3 034240 0 0 0 0 0 334000000000
AT6 034240 0 0 0 0 0 334000000000
FT0 034240 0 0 0 0 0 334000000000
FT1A 034240 0 0 0 0 0 0
FT9 034241 0 0 0 0 0 0
ET0 034242 0 0 0 0 0 0
ST1A 034242 0 0 0 0 0 0
ST9 034242 0 0 0 0 0 0
*034242 JUMPA 0,034243
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034242 034242 0 0 324000034243 0 000000034243
IT1 034242 0 0 0 324000034243 0 000000034243
AT3 034242 0 0 0 000000034243 0 324000034243
AT6 034242 034243 0 0 000000034243 0 324000034243
FT1A 034242 034243 0 0 000000034243 0 000000034243
FT2 034242 034243 0 0 0 0 000000034243
FT2RQ 034242 034243 0 0 0 0 000000034243
FT3 034242 034243 0 0 0 0 000000034243
FT9 034243 034243 0 0 0 0 000000034243
ET0 034243 034243 0 0 0 0 000000034243
ST1A 034243 034243 0 0 0 0 000000034243
ST9 034243 034243 0 0 0 0 000000034243
*034243 SETOM 0,000001
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034243 034243 0 0 476000000001 0 000000000001
IT1 034243 0 0 0 476000000001 0 000000000001
AT3 034243 0 0 0 000000000001 0 476000000001
AT6 034243 000001 0 0 000000000001 0 476000000001
FT1A 034243 000001 0 0 000000000001 0 000000000001
FT9 034244 000001 0 0 000000000001 0 000000000001
ET0 034244 000001 0 0 777777777777 0 000000000001
ST6 034244 000001 0 0 777777777777 0 000000000001
ST6A 034244 000001 0 0 777777777777 0 000000000001
ST9 034244 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 603
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0798
*034244 MOVEI 7,000003
INITIAL
C(AC)=000000 000007
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 034244 034244 0 0 201340000003 0 000000000003
IT1 034244 0 0 0 201340000003 0 000000000003
AT3 034244 0 0 0 000000000003 0 201340000003
AT6 034244 000003 0 0 000000000003 0 201340000003
FT1A 034244 000003 0 0 000000000003 0 000000000003
FT9 034245 000003 0 0 000000000003 0 000000000003
ET0 034245 000003 0 0 000000000003 0 000000000003
ST1 034245 000003 0 0 000000000003 0 000000000003
ST2 034245 000003 0 0 000000000003 0 000000000003
ST9 034245 000003 0 0 000000000003 0 000000000003
*034245 SETZM 0,000003
INITIAL
C(AC)=000000 000000
C(E)=000000 000003
FINAL
C(E)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 034245 034245 0 0 402000000003 0 000000000003
IT1 034245 0 0 0 402000000003 0 000000000003
AT3 034245 0 0 0 000000000003 0 402000000003
AT6 034245 000003 0 0 000000000003 0 402000000003
FT1A 034245 000003 0 0 000000000003 0 000000000003
FT9 034246 000003 0 0 000000000003 0 000000000003
ET0 034246 000003 0 0 0 0 000000000003
ST6 034246 000003 0 0 0 0 000000000003
ST6A 034246 000003 0 0 0 0 000000000003
ST9 034246 000003 0 0 0 0 000000000003
*034246 MOVE 1,@000007
INITIAL
C(AC)=777777 777777
C(E)=000000 000003
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034246 034246 0 0 200060000007 0 0
IT1 034246 0 0 0 200060000007 0 0
AT3 034246 0 0 0 000000000007 0 200060000007
AT4 034246 000007 0 0 000000000003 0 200060000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 604
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0799
IT1 034246 0 0 0 000000000003 0 200060000007
AT3 034246 0 0 0 000000000003 0 000000000003
AT6 034246 000003 0 0 000000000003 0 000000000003
FT0 034246 000003 0 0 0 0 000000000003
FT1A 034246 000003 0 0 0 0 0
FT9 034247 000003 0 0 0 0 0
ET0 034247 000003 0 0 0 0 0
ST1 034247 000003 0 0 0 0 0
ST2 034247 000003 0 0 0 0 0
ST9 034247 000003 0 0 0 0 0
*034247 SKIPE 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034247 034247 0 0 332000000001 0 0
IT1 034247 0 0 0 332000000001 0 0
AT3 034247 0 0 0 000000000001 0 332000000001
AT6 034247 000001 0 0 000000000001 0 332000000001
FT0 034247 000001 0 0 0 0 332000000001
FT1A 034247 000001 0 0 0 0 0
FT9 034250 000001 0 0 0 0 0
ET0 034251 000001 0 0 0 0 0
ST1A 034251 000001 0 0 0 0 0
ST9 034251 000001 0 0 0 0 0
*034251 JUMPA 0,034252
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034251 034251 0 0 324000034252 0 000000034252
IT1 034251 0 0 0 324000034252 0 000000034252
AT3 034251 0 0 0 000000034252 0 324000034252
AT6 034251 034252 0 0 000000034252 0 324000034252
FT1A 034251 034252 0 0 000000034252 0 000000034252
FT2 034251 034252 0 0 0 0 000000034252
FT2RQ 034251 034252 0 0 0 0 000000034252
FT3 034251 034252 0 0 0 0 000000034252
FT9 034252 034252 0 0 0 0 000000034252
ET0 034252 034252 0 0 0 0 000000034252
ST1A 034252 034252 0 0 0 0 000000034252
ST9 034252 034252 0 0 0 0 000000034252
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 605
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0800
*034252 SETZM 0,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034252 034252 0 0 402000000001 0 000000000001
IT1 034252 0 0 0 402000000001 0 000000000001
AT3 034252 0 0 0 000000000001 0 402000000001
AT6 034252 000001 0 0 000000000001 0 402000000001
FT1A 034252 000001 0 0 000000000001 0 000000000001
FT9 034253 000001 0 0 000000000001 0 000000000001
ET0 034253 000001 0 0 0 0 000000000001
ST6 034253 000001 0 0 0 0 000000000001
ST6A 034253 000001 0 0 0 0 000000000001
ST9 034253 000001 0 0 0 0 000000000001
*034253 MOVEI 7,000003
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 034253 034253 0 0 201340000003 0 000000000003
IT1 034253 0 0 0 201340000003 0 000000000003
AT3 034253 0 0 0 000000000003 0 201340000003
AT6 034253 000003 0 0 000000000003 0 201340000003
FT1A 034253 000003 0 0 000000000003 0 000000000003
FT9 034254 000003 0 0 000000000003 0 000000000003
ET0 034254 000003 0 0 000000000003 0 000000000003
ST1 034254 000003 0 0 000000000003 0 000000000003
ST2 034254 000003 0 0 000000000003 0 000000000003
ST9 034254 000003 0 0 000000000003 0 000000000003
*034254 SETOM 0,000003
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 034254 034254 0 0 476000000003 0 000000000003
IT1 034254 0 0 0 476000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 606
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0801
AT3 034254 0 0 0 000000000003 0 476000000003
AT6 034254 000003 0 0 000000000003 0 476000000003
FT1A 034254 000003 0 0 000000000003 0 000000000003
FT9 034255 000003 0 0 000000000003 0 000000000003
ET0 034255 000003 0 0 777777777777 0 000000000003
ST6 034255 000003 0 0 777777777777 0 000000000003
ST6A 034255 000003 0 0 777777777777 0 000000000003
ST9 034255 000003 0 0 777777777777 0 000000000003
*034255 MOVE 1,@000007
INITIAL
C(AC)=000000 000000
C(E)=000000 000003
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034255 034255 0 0 200060000007 0 777777777777
IT1 034255 0 0 0 200060000007 0 777777777777
AT3 034255 0 0 0 000000000007 0 200060000007
AT4 034255 000007 0 0 000000000003 0 200060000007
IT1 034255 0 0 0 000000000003 0 200060000007
AT3 034255 0 0 0 000000000003 0 000000000003
AT6 034255 000003 0 0 000000000003 0 000000000003
FT0 034255 000003 0 0 777777777777 0 000000000003
FT1A 034255 000003 0 0 777777777777 0 777777777777
FT9 034256 000003 0 0 777777777777 0 777777777777
ET0 034256 000003 0 0 777777777777 0 777777777777
ST1 034256 000003 0 0 777777777777 0 777777777777
ST2 034256 000003 0 0 777777777777 0 777777777777
ST9 034256 000003 0 0 777777777777 0 777777777777
*034256 CAME 1,034466
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034256 034256 0 0 312040034466 0 777777777777
IT1 034256 0 0 0 312040034466 0 777777777777
AT3 034256 0 0 0 000000034466 0 312040034466
AT6 034256 034466 0 0 000000034466 0 312040034466
FT0 034256 034466 0 0 777777777777 0 312040034466
FT1A 034256 034466 0 0 777777777777 0 777777777777
FT2 034256 034466 0 0 0 0 777777777777
FT2RQ 034256 034466 0 0 777777777777 0 777777777777
FT3 034256 034466 0 0 777777777777 0 777777777777
FT9 034257 034466 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 607
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0802
ET0 034260 034466 0 0 0 0 777777777777
ST1A 034260 034466 0 0 0 0 777777777777
ST9 034260 034466 0 0 0 0 777777777777
*034260 JUMPA 0,034261
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034260 034260 0 0 324000034261 0 000000034261
IT1 034260 0 0 0 324000034261 0 000000034261
AT3 034260 0 0 0 000000034261 0 324000034261
AT6 034260 034261 0 0 000000034261 0 324000034261
FT1A 034260 034261 0 0 000000034261 0 000000034261
FT2 034260 034261 0 0 0 0 000000034261
FT2RQ 034260 034261 0 0 0 0 000000034261
FT3 034260 034261 0 0 0 0 000000034261
FT9 034261 034261 0 0 0 0 000000034261
ET0 034261 034261 0 0 0 0 000000034261
ST1A 034261 034261 0 0 0 0 000000034261
ST9 034261 034261 0 0 0 0 000000034261
*034261 SETZM 0,000001
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034261 034261 0 0 402000000001 0 000000000001
IT1 034261 0 0 0 402000000001 0 000000000001
AT3 034261 0 0 0 000000000001 0 402000000001
AT6 034261 000001 0 0 000000000001 0 402000000001
FT1A 034261 000001 0 0 000000000001 0 000000000001
FT9 034262 000001 0 0 000000000001 0 000000000001
ET0 034262 000001 0 0 0 0 000000000001
ST6 034262 000001 0 0 0 0 000000000001
ST6A 034262 000001 0 0 0 0 000000000001
ST9 034262 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 608
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0803
*034262 MOVEI 7,000003
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 034262 034262 0 0 201340000003 0 000000000003
IT1 034262 0 0 0 201340000003 0 000000000003
AT3 034262 0 0 0 000000000003 0 201340000003
AT6 034262 000003 0 0 000000000003 0 201340000003
FT1A 034262 000003 0 0 000000000003 0 000000000003
FT9 034263 000003 0 0 000000000003 0 000000000003
ET0 034263 000003 0 0 000000000003 0 000000000003
ST1 034263 000003 0 0 000000000003 0 000000000003
ST2 034263 000003 0 0 000000000003 0 000000000003
ST9 034263 000003 0 0 000000000003 0 000000000003
*034263 MOVE 3,034553
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 034263 034263 0 0 200140034553 0 707070707070
IT1 034263 0 0 0 200140034553 0 707070707070
AT3 034263 0 0 0 000000034553 0 200140034553
AT6 034263 034553 0 0 000000034553 0 200140034553
FT0 034263 034553 0 0 707070707070 0 200140034553
FT1A 034263 034553 0 0 707070707070 0 707070707070
FT9 034264 034553 0 0 707070707070 0 707070707070
ET0 034264 034553 0 0 707070707070 0 707070707070
ST1 034264 034553 0 0 707070707070 0 707070707070
ST2 034264 034553 0 0 707070707070 0 707070707070
ST9 034264 034553 0 0 707070707070 0 707070707070
*034264 MOVE 1,@000007
INITIAL
C(AC)=000000 000000
C(E)=000000 000003
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 034264 034264 0 0 200060000007 0 707070707070
IT1 034264 0 0 0 200060000007 0 707070707070
AT3 034264 0 0 0 000000000007 0 200060000007
AT4 034264 000007 0 0 000000000003 0 200060000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 609
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0804
IT1 034264 0 0 0 000000000003 0 200060000007
AT3 034264 0 0 0 000000000003 0 000000000003
AT6 034264 000003 0 0 000000000003 0 000000000003
FT0 034264 000003 0 0 707070707070 0 000000000003
FT1A 034264 000003 0 0 707070707070 0 707070707070
FT9 034265 000003 0 0 707070707070 0 707070707070
ET0 034265 000003 0 0 707070707070 0 707070707070
ST1 034265 000003 0 0 707070707070 0 707070707070
ST2 034265 000003 0 0 707070707070 0 707070707070
ST9 034265 000003 0 0 707070707070 0 707070707070
*034265 CAME 1,034553
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034265 034265 0 0 312040034553 0 707070707070
IT1 034265 0 0 0 312040034553 0 707070707070
AT3 034265 0 0 0 000000034553 0 312040034553
AT6 034265 034553 0 0 000000034553 0 312040034553
FT0 034265 034553 0 0 707070707070 0 312040034553
FT1A 034265 034553 0 0 707070707070 0 707070707070
FT2 034265 034553 0 0 0 0 707070707070
FT2RQ 034265 034553 0 0 707070707070 0 707070707070
FT3 034265 034553 0 0 707070707070 0 707070707070
FT9 034266 034553 0 0 707070707070 0 707070707070
ET0 034267 034553 0 0 0 0 707070707070
ST1A 034267 034553 0 0 0 0 707070707070
ST9 034267 034553 0 0 0 0 707070707070
*034267 JUMPA 0,034270
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034267 034267 0 0 324000034270 0 000000034270
IT1 034267 0 0 0 324000034270 0 000000034270
AT3 034267 0 0 0 000000034270 0 324000034270
AT6 034267 034270 0 0 000000034270 0 324000034270
FT1A 034267 034270 0 0 000000034270 0 000000034270
FT2 034267 034270 0 0 0 0 000000034270
FT2RQ 034267 034270 0 0 0 0 000000034270
FT3 034267 034270 0 0 0 0 000000034270
FT9 034270 034270 0 0 0 0 000000034270
ET0 034270 034270 0 0 0 0 000000034270
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 610
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0805
ST1A 034270 034270 0 0 0 0 000000034270
ST9 034270 034270 0 0 0 0 000000034270
*034270 JRST 0,034272
INITIAL
C(AC)=000000 000000
C(E)=402000 000001
FINAL
C(E)=402000 000001
TIME PC MA SC FE AR MQ BR
IT0 034270 034270 0 0 254000034272 0 254000034272
IT1 034270 0 0 0 254000034272 0 254000034272
AT3 034270 0 0 0 000000034272 0 254000034272
AT6 034270 034272 0 0 000000034272 0 254000034272
FT1A 034270 034272 0 0 000000034272 0 254000034272
FT9 034271 034272 0 0 000000034272 0 254000034272
ET0 034272 034271 0 0 000000034272 0 254000034272
ST1A 034272 034271 0 0 000000034272 0 254000034272
ST9 034272 034271 0 0 000000034272 0 254000034272
*034272 SETZM 0,000001
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(E)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 034272 034272 0 0 402000000001 0 000000000001
IT1 034272 0 0 0 402000000001 0 000000000001
AT3 034272 0 0 0 000000000001 0 402000000001
AT6 034272 000001 0 0 000000000001 0 402000000001
FT1A 034272 000001 0 0 000000000001 0 000000000001
FT9 034273 000001 0 0 000000000001 0 000000000001
ET0 034273 000001 0 0 0 0 000000000001
ST6 034273 000001 0 0 0 0 000000000001
ST6A 034273 000001 0 0 0 0 000000000001
ST9 034273 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 611
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0806
*034273 MOVEI 7,034271
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 034271
TIME PC MA SC FE AR MQ BR
IT0 034273 034273 0 0 201340034271 0 000000034271
IT1 034273 0 0 0 201340034271 0 000000034271
AT3 034273 0 0 0 000000034271 0 201340034271
AT6 034273 034271 0 0 000000034271 0 201340034271
FT1A 034273 034271 0 0 000000034271 0 000000034271
FT9 034274 034271 0 0 000000034271 0 000000034271
ET0 034274 034271 0 0 000000034271 0 000000034271
ST1 034274 034271 0 0 000000034271 0 000000034271
ST2 034274 034271 0 0 000000034271 0 000000034271
ST9 034274 034271 0 0 000000034271 0 000000034271
*034274 MOVE 1,@000007
INITIAL
C(AC)=000000 000000
C(E)=000000 034271
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 034274 034274 0 0 200060000007 0 707070707070
IT1 034274 0 0 0 200060000007 0 707070707070
AT3 034274 0 0 0 000000000007 0 200060000007
AT4 034274 000007 0 0 000000034271 0 200060000007
IT1 034274 0 0 0 000000034271 0 200060000007
AT3 034274 0 0 0 000000034271 0 000000034271
AT6 034274 034271 0 0 000000034271 0 000000034271
FT0 034274 034271 0 0 707070707070 0 000000034271
FT1A 034274 034271 0 0 707070707070 0 707070707070
FT9 034275 034271 0 0 707070707070 0 707070707070
ET0 034275 034271 0 0 707070707070 0 707070707070
ST1 034275 034271 0 0 707070707070 0 707070707070
ST2 034275 034271 0 0 707070707070 0 707070707070
ST9 034275 034271 0 0 707070707070 0 707070707070
*034275 CAME 1,034271
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034275 034275 0 0 312040034271 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 612
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0807
IT1 034275 0 0 0 312040034271 0 707070707070
AT3 034275 0 0 0 000000034271 0 312040034271
AT6 034275 034271 0 0 000000034271 0 312040034271
FT0 034275 034271 0 0 707070707070 0 312040034271
FT1A 034275 034271 0 0 707070707070 0 707070707070
FT2 034275 034271 0 0 0 0 707070707070
FT2RQ 034275 034271 0 0 707070707070 0 707070707070
FT3 034275 034271 0 0 707070707070 0 707070707070
FT9 034276 034271 0 0 707070707070 0 707070707070
ET0 034277 034271 0 0 0 0 707070707070
ST1A 034277 034271 0 0 0 0 707070707070
ST9 034277 034271 0 0 0 0 707070707070
*034277 JUMPA 0,034300
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034277 034277 0 0 324000034300 0 000000034300
IT1 034277 0 0 0 324000034300 0 000000034300
AT3 034277 0 0 0 000000034300 0 324000034300
AT6 034277 0 0 0 000000034300 0 324000034300
FT1A 034277 0 0 0 000000034300 0 000000034300
FT2 034277 0 0 0 0 0 000000034300
FT2RQ 034277 0 0 0 0 0 000000034300
FT3 034277 0 0 0 0 0 000000034300
FT9 0 0 0 0 0 0 000000034300
ET0 0 0 0 0 0 0 000000034300
ST1A 0 0 0 0 0 0 000000034300
ST9 0 0 0 0 0 0 000000034300
*034300 JRST 0,034303
INITIAL
C(AC)=000000 000000
C(E)=402000 000001
FINAL
C(E)=402000 000001
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 254000034303 0 254000034303
IT1 0 0 0 0 254000034303 0 254000034303
AT3 0 0 0 0 000000034303 0 254000034303
AT6 0 034303 0 0 000000034303 0 254000034303
FT1A 0 034303 0 0 000000034303 0 254000034303
FT9 034301 034303 0 0 000000034303 0 254000034303
ET0 034303 034301 0 0 000000034303 0 254000034303
ST1A 034303 034301 0 0 000000034303 0 254000034303
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 613
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0808
ST9 034303 034301 0 0 000000034303 0 254000034303
*034303 SETZM 0,000001
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(E)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 034303 034303 0 0 402000000001 0 000000000001
IT1 034303 0 0 0 402000000001 0 000000000001
AT3 034303 0 0 0 000000000001 0 402000000001
AT6 034303 000001 0 0 000000000001 0 402000000001
FT1A 034303 000001 0 0 000000000001 0 000000000001
FT9 034304 000001 0 0 000000000001 0 000000000001
ET0 034304 000001 0 0 0 0 000000000001
ST6 034304 000001 0 0 0 0 000000000001
ST6A 034304 000001 0 0 0 0 000000000001
ST9 034304 000001 0 0 0 0 000000000001
*034304 MOVE 1,@034301
INITIAL
C(AC)=000000 000000
C(E)=000000 034302
FINAL
C(AC)=202020 202020
TIME PC MA SC FE AR MQ BR
IT0 034304 034304 0 0 200060034301 0 202020202020
IT1 034304 0 0 0 200060034301 0 202020202020
AT3 034304 0 0 0 000000034301 0 200060034301
AT4 034304 034301 0 0 000000034302 0 200060034301
IT1 034304 0 0 0 000000034302 0 200060034301
AT3 034304 0 0 0 000000034302 0 000000034302
AT6 034304 034302 0 0 000000034302 0 000000034302
FT0 034304 034302 0 0 202020202020 0 000000034302
FT1A 034304 034302 0 0 202020202020 0 202020202020
FT9 034305 034302 0 0 202020202020 0 202020202020
ET0 034305 034302 0 0 202020202020 0 202020202020
ST1 034305 034302 0 0 202020202020 0 202020202020
ST2 034305 034302 0 0 202020202020 0 202020202020
ST9 034305 034302 0 0 202020202020 0 202020202020
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 614
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0809
*034305 CAME 1,034302
INITIAL
C(AC)=202020 202020
C(E)=202020 202020
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034305 034305 0 0 312040034302 0 202020202020
IT1 034305 0 0 0 312040034302 0 202020202020
AT3 034305 0 0 0 000000034302 0 312040034302
AT6 034305 034302 0 0 000000034302 0 312040034302
FT0 034305 034302 0 0 202020202020 0 312040034302
FT1A 034305 034302 0 0 202020202020 0 202020202020
FT2 034305 034302 0 0 0 0 202020202020
FT2RQ 034305 034302 0 0 202020202020 0 202020202020
FT3 034305 034302 0 0 202020202020 0 202020202020
FT9 034306 034302 0 0 202020202020 0 202020202020
ET0 034307 034302 0 0 0 0 202020202020
ST1A 034307 034302 0 0 0 0 202020202020
ST9 034307 034302 0 0 0 0 202020202020
*034307 JUMPA 0,034310
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034307 034307 0 0 324000034310 0 000000034310
IT1 034307 0 0 0 324000034310 0 000000034310
AT3 034307 0 0 0 000000034310 0 324000034310
AT6 034307 034310 0 0 000000034310 0 324000034310
FT1A 034307 034310 0 0 000000034310 0 000000034310
FT2 034307 034310 0 0 0 0 000000034310
FT2RQ 034307 034310 0 0 0 0 000000034310
FT3 034307 034310 0 0 0 0 000000034310
FT9 034310 034310 0 0 0 0 000000034310
ET0 034310 034310 0 0 0 0 000000034310
ST1A 034310 034310 0 0 0 0 000000034310
ST9 034310 034310 0 0 0 0 000000034310
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 615
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0810
*034310 JRST 0,034313
INITIAL
C(AC)=000000 000000
C(E)=200040 034312
FINAL
C(E)=200040 034312
TIME PC MA SC FE AR MQ BR
IT0 034310 034310 0 0 254000034313 0 254000034313
IT1 034310 0 0 0 254000034313 0 254000034313
AT3 034310 0 0 0 000000034313 0 254000034313
AT6 034310 034313 0 0 000000034313 0 254000034313
FT1A 034310 034313 0 0 000000034313 0 254000034313
FT9 034311 034313 0 0 000000034313 0 254000034313
ET0 034313 034311 0 0 000000034313 0 254000034313
ST1A 034313 034311 0 0 000000034313 0 254000034313
ST9 034313 034311 0 0 000000034313 0 254000034313
*034313 MOVE 1,034312
INITIAL
C(AC)=202020 202020
C(E)=272727 272727
FINAL
C(AC)=272727 272727
TIME PC MA SC FE AR MQ BR
IT0 034313 034313 0 0 200040034312 0 272727272727
IT1 034313 0 0 0 200040034312 0 272727272727
AT3 034313 0 0 0 000000034312 0 200040034312
AT6 034313 034312 0 0 000000034312 0 200040034312
FT0 034313 034312 0 0 272727272727 0 200040034312
FT1A 034313 034312 0 0 272727272727 0 272727272727
FT9 034314 034312 0 0 272727272727 0 272727272727
ET0 034314 034312 0 0 272727272727 0 272727272727
ST1 034314 034312 0 0 272727272727 0 272727272727
ST2 034314 034312 0 0 272727272727 0 272727272727
ST9 034314 034312 0 0 272727272727 0 272727272727
*034314 CAME 1,@034311
INITIAL
C(AC)=272727 272727
C(E)=272727 272727
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034314 034314 0 0 312060034311 0 272727272727
IT1 034314 0 0 0 312060034311 0 272727272727
AT3 034314 0 0 0 000000034311 0 312060034311
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 616
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0811
AT4 034314 034311 0 0 000000034312 0 312060034311
IT1 034314 0 0 0 000000034312 0 312060034311
AT3 034314 0 0 0 000000034312 0 000000034312
AT6 034314 034312 0 0 000000034312 0 000000034312
FT0 034314 034312 0 0 272727272727 0 000000034312
FT1A 034314 034312 0 0 272727272727 0 272727272727
FT2 034314 034312 0 0 0 0 272727272727
FT2RQ 034314 034312 0 0 272727272727 0 272727272727
FT3 034314 034312 0 0 272727272727 0 272727272727
FT9 034315 034312 0 0 272727272727 0 272727272727
ET0 034316 034312 0 0 0 0 272727272727
ST1A 034316 034312 0 0 0 0 272727272727
ST9 034316 034312 0 0 0 0 272727272727
*034316 JUMPA 0,034317
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034316 034316 0 0 324000034317 0 000000034317
IT1 034316 0 0 0 324000034317 0 000000034317
AT3 034316 0 0 0 000000034317 0 324000034317
AT6 034316 034317 0 0 000000034317 0 324000034317
FT1A 034316 034317 0 0 000000034317 0 000000034317
FT2 034316 034317 0 0 0 0 000000034317
FT2RQ 034316 034317 0 0 0 0 000000034317
FT3 034316 034317 0 0 0 0 000000034317
FT9 034317 034317 0 0 0 0 000000034317
ET0 034317 034317 0 0 0 0 000000034317
ST1A 034317 034317 0 0 0 0 000000034317
ST9 034317 034317 0 0 0 0 000000034317
*034317 JRST 0,034321
INITIAL
C(AC)=000000 000000
C(E)=201340 034320
FINAL
C(E)=201340 034320
TIME PC MA SC FE AR MQ BR
IT0 034317 034317 0 0 254000034321 0 254000034321
IT1 034317 0 0 0 254000034321 0 254000034321
AT3 034317 0 0 0 000000034321 0 254000034321
AT6 034317 034321 0 0 000000034321 0 254000034321
FT1A 034317 034321 0 0 000000034321 0 254000034321
FT9 034320 034321 0 0 000000034321 0 254000034321
ET0 034321 034320 0 0 000000034321 0 254000034321
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 617
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0812
ST1A 034321 034320 0 0 000000034321 0 254000034321
ST9 034321 034320 0 0 000000034321 0 254000034321
*034321 MOVEI 7,034320
INITIAL
C(AC)=000000 034271
FINAL
C(AC)=000000 034320
TIME PC MA SC FE AR MQ BR
IT0 034321 034321 0 0 201340034320 0 000000034320
IT1 034321 0 0 0 201340034320 0 000000034320
AT3 034321 0 0 0 000000034320 0 201340034320
AT6 034321 034320 0 0 000000034320 0 201340034320
FT1A 034321 034320 0 0 000000034320 0 000000034320
FT9 034322 034320 0 0 000000034320 0 000000034320
ET0 034322 034320 0 0 000000034320 0 000000034320
ST1 034322 034320 0 0 000000034320 0 000000034320
ST2 034322 034320 0 0 000000034320 0 000000034320
ST9 034322 034320 0 0 000000034320 0 000000034320
*034322 MOVE 1,034320
INITIAL
C(AC)=272727 272727
C(E)=252525 252525
FINAL
C(AC)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 034322 034322 0 0 200040034320 0 252525252525
IT1 034322 0 0 0 200040034320 0 252525252525
AT3 034322 0 0 0 000000034320 0 200040034320
AT6 034322 034320 0 0 000000034320 0 200040034320
FT0 034322 034320 0 0 252525252525 0 200040034320
FT1A 034322 034320 0 0 252525252525 0 252525252525
FT9 034323 034320 0 0 252525252525 0 252525252525
ET0 034323 034320 0 0 252525252525 0 252525252525
ST1 034323 034320 0 0 252525252525 0 252525252525
ST2 034323 034320 0 0 252525252525 0 252525252525
ST9 034323 034320 0 0 252525252525 0 252525252525
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 618
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0813
*034323 CAME 1,@000007
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034323 034323 0 0 312060000007 0 252525252525
IT1 034323 0 0 0 312060000007 0 252525252525
AT3 034323 0 0 0 000000000007 0 312060000007
AT4 034323 000007 0 0 000000034320 0 312060000007
IT1 034323 0 0 0 000000034320 0 312060000007
AT3 034323 0 0 0 000000034320 0 000000034320
AT6 034323 034320 0 0 000000034320 0 000000034320
FT0 034323 034320 0 0 252525252525 0 000000034320
FT1A 034323 034320 0 0 252525252525 0 252525252525
FT2 034323 034320 0 0 0 0 252525252525
FT2RQ 034323 034320 0 0 252525252525 0 252525252525
FT3 034323 034320 0 0 252525252525 0 252525252525
FT9 034324 034320 0 0 252525252525 0 252525252525
ET0 034325 034320 0 0 0 0 252525252525
ST1A 034325 034320 0 0 0 0 252525252525
ST9 034325 034320 0 0 0 0 252525252525
*034325 JUMPA 0,034326
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034325 034325 0 0 324000034326 0 000000034326
IT1 034325 0 0 0 324000034326 0 000000034326
AT3 034325 0 0 0 000000034326 0 324000034326
AT6 034325 034326 0 0 000000034326 0 324000034326
FT1A 034325 034326 0 0 000000034326 0 000000034326
FT2 034325 034326 0 0 0 0 000000034326
FT2RQ 034325 034326 0 0 0 0 000000034326
FT3 034325 034326 0 0 0 0 000000034326
FT9 034326 034326 0 0 0 0 000000034326
ET0 034326 034326 0 0 0 0 000000034326
ST1A 034326 034326 0 0 0 0 000000034326
ST9 034326 034326 0 0 0 0 000000034326
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 619
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0814
*034326 MOVEI 1,777774
INITIAL
C(AC)=252525 252525
FINAL
C(AC)=000000 777774
TIME PC MA SC FE AR MQ BR
IT0 034326 034326 0 0 201040777774 0 000000777774
IT1 034326 0 0 0 201040777774 0 000000777774
AT3 034326 0 0 0 000000777774 0 201040777774
AT6 034326 777774 0 0 000000777774 0 201040777774
FT1A 034326 777774 0 0 000000777774 0 000000777774
FT9 034327 777774 0 0 000000777774 0 000000777774
ET0 034327 777774 0 0 000000777774 0 000000777774
ST1 034327 777774 0 0 000000777774 0 000000777774
ST2 034327 777774 0 0 000000777774 0 000000777774
ST9 034327 777774 0 0 000000777774 0 000000777774
*034327 MOVEI 3,000002
INITIAL
C(AC)=707070 707070
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 034327 034327 0 0 201140000002 0 000000000002
IT1 034327 0 0 0 201140000002 0 000000000002
AT3 034327 0 0 0 000000000002 0 201140000002
AT6 034327 000002 0 0 000000000002 0 201140000002
FT1A 034327 000002 0 0 000000000002 0 000000000002
FT9 034330 000002 0 0 000000000002 0 000000000002
ET0 034330 000002 0 0 000000000002 0 000000000002
ST1 034330 000002 0 0 000000000002 0 000000000002
ST2 034330 000002 0 0 000000000002 0 000000000002
ST9 034330 000002 0 0 000000000002 0 000000000002
*034330 MOVEI 4,000010
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 034330 034330 0 0 201200000010 0 000000000010
IT1 034330 0 0 0 201200000010 0 000000000010
AT3 034330 0 0 0 000000000010 0 201200000010
AT6 034330 000010 0 0 000000000010 0 201200000010
FT1A 034330 000010 0 0 000000000010 0 000000000010
FT9 034331 000010 0 0 000000000010 0 000000000010
ET0 034331 000010 0 0 000000000010 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 620
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0815
ST1 034331 000010 0 0 000000000010 0 000000000010
ST2 034331 000010 0 0 000000000010 0 000000000010
ST9 034331 000010 0 0 000000000010 0 000000000010
*034331 MOVEI 5,000001
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 034331 034331 0 0 201240000001 0 000000000001
IT1 034331 0 0 0 201240000001 0 000000000001
AT3 034331 0 0 0 000000000001 0 201240000001
AT6 034331 000001 0 0 000000000001 0 201240000001
FT1A 034331 000001 0 0 000000000001 0 000000000001
FT9 034332 000001 0 0 000000000001 0 000000000001
ET0 034332 000001 0 0 000000000001 0 000000000001
ST1 034332 000001 0 0 000000000001 0 000000000001
ST2 034332 000001 0 0 000000000001 0 000000000001
ST9 034332 000001 0 0 000000000001 0 000000000001
*034332 MOVEI 6,000005
INITIAL
C(AC)=000000 000006
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 034332 034332 0 0 201300000005 0 000000000005
IT1 034332 0 0 0 201300000005 0 000000000005
AT3 034332 0 0 0 000000000005 0 201300000005
AT6 034332 000005 0 0 000000000005 0 201300000005
FT1A 034332 000005 0 0 000000000005 0 000000000005
FT9 034333 000005 0 0 000000000005 0 000000000005
ET0 034333 000005 0 0 000000000005 0 000000000005
ST1 034333 000005 0 0 000000000005 0 000000000005
ST2 034333 000005 0 0 000000000005 0 000000000005
ST9 034333 000005 0 0 000000000005 0 000000000005
*034333 MOVEI 7,000007
INITIAL
C(AC)=000000 034320
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 034333 034333 0 0 201340000007 0 000000000007
IT1 034333 0 0 0 201340000007 0 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 621
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0816
AT3 034333 0 0 0 000000000007 0 201340000007
AT6 034333 000007 0 0 000000000007 0 201340000007
FT1A 034333 000007 0 0 000000000007 0 000000000007
FT9 034334 000007 0 0 000000000007 0 000000000007
ET0 034334 000007 0 0 000000000007 0 000000000007
ST1 034334 000007 0 0 000000000007 0 000000000007
ST2 034334 000007 0 0 000000000007 0 000000000007
ST9 034334 000007 0 0 000000000007 0 000000000007
*034334 MOVEI 10,000004
INITIAL
C(AC)=000000 000010
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 034334 034334 0 0 201400000004 0 000000000004
IT1 034334 0 0 0 201400000004 0 000000000004
AT3 034334 0 0 0 000000000004 0 201400000004
AT6 034334 000004 0 0 000000000004 0 201400000004
FT1A 034334 000004 0 0 000000000004 0 000000000004
FT9 034335 000004 0 0 000000000004 0 000000000004
ET0 034335 000004 0 0 000000000004 0 000000000004
ST1 034335 000004 0 0 000000000004 0 000000000004
ST2 034335 000004 0 0 000000000004 0 000000000004
ST9 034335 000004 0 0 000000000004 0 000000000004
*034335 MOVEI 11,777772
INITIAL
C(AC)=000000 000011
FINAL
C(AC)=000000 777772
TIME PC MA SC FE AR MQ BR
IT0 034335 034335 0 0 201440777772 0 000000777772
IT1 034335 0 0 0 201440777772 0 000000777772
AT3 034335 0 0 0 000000777772 0 201440777772
AT6 034335 777772 0 0 000000777772 0 201440777772
FT1A 034335 777772 0 0 000000777772 0 000000777772
FT9 034336 777772 0 0 000000777772 0 000000777772
ET0 034336 777772 0 0 000000777772 0 000000777772
ST1 034336 777772 0 0 000000777772 0 000000777772
ST2 034336 777772 0 0 000000777772 0 000000777772
ST9 034336 777772 0 0 000000777772 0 000000777772
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 622
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0817
*034336 MOVEI 12,000005
INITIAL
C(AC)=000000 000012
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 034336 034336 0 0 201500000005 0 000000000005
IT1 034336 0 0 0 201500000005 0 000000000005
AT3 034336 0 0 0 000000000005 0 201500000005
AT6 034336 000005 0 0 000000000005 0 201500000005
FT1A 034336 000005 0 0 000000000005 0 000000000005
FT9 034337 000005 0 0 000000000005 0 000000000005
ET0 034337 000005 0 0 000000000005 0 000000000005
ST1 034337 000005 0 0 000000000005 0 000000000005
ST2 034337 000005 0 0 000000000005 0 000000000005
ST9 034337 000005 0 0 000000000005 0 000000000005
*034337 MOVEI 13,000002
INITIAL
C(AC)=000000 000013
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 034337 034337 0 0 201540000002 0 000000000002
IT1 034337 0 0 0 201540000002 0 000000000002
AT3 034337 0 0 0 000000000002 0 201540000002
AT6 034337 000002 0 0 000000000002 0 201540000002
FT1A 034337 000002 0 0 000000000002 0 000000000002
FT9 034340 000002 0 0 000000000002 0 000000000002
ET0 034340 000002 0 0 000000000002 0 000000000002
ST1 034340 000002 0 0 000000000002 0 000000000002
ST2 034340 000002 0 0 000000000002 0 000000000002
ST9 034340 000002 0 0 000000000002 0 000000000002
*034340 JRST 0,034371
INITIAL
C(AC)=000000 000000
C(E)=476000 000002
FINAL
C(E)=476000 000002
TIME PC MA SC FE AR MQ BR
IT0 034340 034340 0 0 254000034371 0 254000034371
IT1 034340 0 0 0 254000034371 0 254000034371
AT3 034340 0 0 0 000000034371 0 254000034371
AT6 034340 034371 0 0 000000034371 0 254000034371
FT1A 034340 034371 0 0 000000034371 0 254000034371
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 623
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0818
FT9 034341 034371 0 0 000000034371 0 254000034371
ET0 034371 034341 0 0 000000034371 0 254000034371
ST1A 034371 034341 0 0 000000034371 0 254000034371
ST9 034371 034341 0 0 000000034371 0 254000034371
*034371 SETOM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=000000 000002
FINAL
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 034371 034371 0 0 476000000002 0 000000000002
IT1 034371 0 0 0 476000000002 0 000000000002
AT3 034371 0 0 0 000000000002 0 476000000002
AT6 034371 000002 0 0 000000000002 0 476000000002
FT1A 034371 000002 0 0 000000000002 0 000000000002
FT9 034372 000002 0 0 000000000002 0 000000000002
ET0 034372 000002 0 0 777777777777 0 000000000002
ST6 034372 000002 0 0 777777777777 0 000000000002
ST6A 034372 000002 0 0 777777777777 0 000000000002
ST9 034372 000002 0 0 777777777777 0 000000000002
*034372 MOVE 2,@034341
INITIAL
C(AC)=777777 777777
C(E)=000003 034344
FINAL
C(AC)=217217 217217
TIME PC MA SC FE AR MQ BR
IT0 034372 034372 0 0 200120034341 0 217217217217
IT1 034372 0 0 0 200120034341 0 217217217217
AT3 034372 0 0 0 000000034341 0 200120034341
AT4 034372 034341 0 0 000003034344 0 200120034341
IT1 034372 0 0 0 000003034344 0 200120034341
AT1 034372 0 0 0 0 0 000003034344
AT2 034372 0 0 0 000000000002 0 000003034344
AT3 034372 0 0 0 000000034346 0 000000034346
AT6 034372 034346 0 0 000000034346 0 000000034346
FT0 034372 034346 0 0 217217217217 0 000000034346
FT1A 034372 034346 0 0 217217217217 0 217217217217
FT9 034373 034346 0 0 217217217217 0 217217217217
ET0 034373 034346 0 0 217217217217 0 217217217217
ST1 034373 034346 0 0 217217217217 0 217217217217
ST2 034373 034346 0 0 217217217217 0 217217217217
ST9 034373 034346 0 0 217217217217 0 217217217217
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 624
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0819
*034373 CAME 2,034346
INITIAL
C(AC)=217217 217217
C(E)=217217 217217
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034373 034373 0 0 312100034346 0 217217217217
IT1 034373 0 0 0 312100034346 0 217217217217
AT3 034373 0 0 0 000000034346 0 312100034346
AT6 034373 034346 0 0 000000034346 0 312100034346
FT0 034373 034346 0 0 217217217217 0 312100034346
FT1A 034373 034346 0 0 217217217217 0 217217217217
FT2 034373 034346 0 0 0 0 217217217217
FT2RQ 034373 034346 0 0 217217217217 0 217217217217
FT3 034373 034346 0 0 217217217217 0 217217217217
FT9 034374 034346 0 0 217217217217 0 217217217217
ET0 034375 034346 0 0 0 0 217217217217
ST1A 034375 034346 0 0 0 0 217217217217
ST9 034375 034346 0 0 0 0 217217217217
*034375 JUMPA 0,034376
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034375 034375 0 0 324000034376 0 000000034376
IT1 034375 0 0 0 324000034376 0 000000034376
AT3 034375 0 0 0 000000034376 0 324000034376
AT6 034375 034376 0 0 000000034376 0 324000034376
FT1A 034375 034376 0 0 000000034376 0 000000034376
FT2 034375 034376 0 0 0 0 000000034376
FT2RQ 034375 034376 0 0 0 0 000000034376
FT3 034375 034376 0 0 0 0 000000034376
FT9 034376 034376 0 0 0 0 000000034376
ET0 034376 034376 0 0 0 0 000000034376
ST1A 034376 034376 0 0 0 0 000000034376
ST9 034376 034376 0 0 0 0 000000034376
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 625
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0820
*034376 SETZM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=217217 217217
FINAL
C(E)=217217 217217
TIME PC MA SC FE AR MQ BR
IT0 034376 034376 0 0 402000000002 0 000000000002
IT1 034376 0 0 0 402000000002 0 000000000002
AT3 034376 0 0 0 000000000002 0 402000000002
AT6 034376 000002 0 0 000000000002 0 402000000002
FT1A 034376 000002 0 0 000000000002 0 000000000002
FT9 034377 000002 0 0 000000000002 0 000000000002
ET0 034377 000002 0 0 0 0 000000000002
ST6 034377 000002 0 0 0 0 000000000002
ST6A 034377 000002 0 0 0 0 000000000002
ST9 034377 000002 0 0 0 0 000000000002
*034377 MOVE 2,@034342
INITIAL
C(AC)=000000 000000
C(E)=000020 034347
FINAL
C(AC)=220220 220220
TIME PC MA SC FE AR MQ BR
IT0 034377 034377 0 0 200120034342 0 220220220220
IT1 034377 0 0 0 200120034342 0 220220220220
AT3 034377 0 0 0 000000034342 0 200120034342
AT4 034377 034342 0 0 000020034347 0 200120034342
IT1 034377 0 0 0 000020034347 0 200120034342
AT3 034377 0 0 0 000000034347 0 000020034347
AT4 034377 034347 0 0 000000034343 0 000020034347
IT1 034377 0 0 0 000000034343 0 000020034347
AT3 034377 0 0 0 000000034343 0 000000034343
AT6 034377 034343 0 0 000000034343 0 000000034343
FT0 034377 034343 0 0 220220220220 0 000000034343
FT1A 034377 034343 0 0 220220220220 0 220220220220
FT9 0 034343 0 0 220220220220 0 220220220220
ET0 0 034343 0 0 220220220220 0 220220220220
ST1 0 034343 0 0 220220220220 0 220220220220
ST2 0 034343 0 0 220220220220 0 220220220220
ST9 0 034343 0 0 220220220220 0 220220220220
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 626
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0821
*034400 CAME 2,034343
INITIAL
C(AC)=220220 220220
C(E)=220220 220220
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 312100034343 0 220220220220
IT1 0 0 0 0 312100034343 0 220220220220
AT3 0 0 0 0 000000034343 0 312100034343
AT6 0 034343 0 0 000000034343 0 312100034343
FT0 0 034343 0 0 220220220220 0 312100034343
FT1A 0 034343 0 0 220220220220 0 220220220220
FT2 0 034343 0 0 0 0 220220220220
FT2RQ 0 034343 0 0 220220220220 0 220220220220
FT3 0 034343 0 0 220220220220 0 220220220220
FT9 034401 034343 0 0 220220220220 0 220220220220
ET0 034402 034343 0 0 0 0 220220220220
ST1A 034402 034343 0 0 0 0 220220220220
ST9 034402 034343 0 0 0 0 220220220220
*034402 JUMPA 0,034403
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034402 034402 0 0 324000034403 0 000000034403
IT1 034402 0 0 0 324000034403 0 000000034403
AT3 034402 0 0 0 000000034403 0 324000034403
AT6 034402 034403 0 0 000000034403 0 324000034403
FT1A 034402 034403 0 0 000000034403 0 000000034403
FT2 034402 034403 0 0 0 0 000000034403
FT2RQ 034402 034403 0 0 0 0 000000034403
FT3 034402 034403 0 0 0 0 000000034403
FT9 034403 034403 0 0 0 0 000000034403
ET0 034403 034403 0 0 0 0 000000034403
ST1A 034403 034403 0 0 0 0 000000034403
ST9 034403 034403 0 0 0 0 000000034403
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 627
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0822
*034403 SETOM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=220220 220220
FINAL
C(E)=220220 220220
TIME PC MA SC FE AR MQ BR
IT0 034403 034403 0 0 476000000002 0 000000000002
IT1 034403 0 0 0 476000000002 0 000000000002
AT3 034403 0 0 0 000000000002 0 476000000002
AT6 034403 000002 0 0 000000000002 0 476000000002
FT1A 034403 000002 0 0 000000000002 0 000000000002
FT9 034404 000002 0 0 000000000002 0 000000000002
ET0 034404 000002 0 0 777777777777 0 000000000002
ST6 034404 000002 0 0 777777777777 0 000000000002
ST6A 034404 000002 0 0 777777777777 0 000000000002
ST9 034404 000002 0 0 777777777777 0 000000000002
*034404 MOVE 2,034350(1)
INITIAL
C(AC)=777777 777777
C(E)=000000 034350
FINAL
C(AC)=000020 034351
TIME PC MA SC FE AR MQ BR
IT0 034404 034404 0 0 200101034350 0 000020034351
IT1 034404 0 0 0 200101034350 0 000020034351
AT1 034404 0 0 0 0 0 200101034350
AT2 034404 0 0 0 000000777774 0 200101034350
AT3 034404 0 0 0 000000034344 0 000000034344
AT6 034404 034344 0 0 000000034344 0 000000034344
FT0 034404 034344 0 0 000020034351 0 000000034344
FT1A 034404 034344 0 0 000020034351 0 000020034351
FT9 034405 034344 0 0 000020034351 0 000020034351
ET0 034405 034344 0 0 000020034351 0 000020034351
ST1 034405 034344 0 0 000020034351 0 000020034351
ST2 034405 034344 0 0 000020034351 0 000020034351
ST9 034405 034344 0 0 000020034351 0 000020034351
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 628
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0823
*034405 CAME 2,034344
INITIAL
C(AC)=000020 034351
C(E)=000020 034351
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034405 034405 0 0 312100034344 0 000020034351
IT1 034405 0 0 0 312100034344 0 000020034351
AT3 034405 0 0 0 000000034344 0 312100034344
AT6 034405 034344 0 0 000000034344 0 312100034344
FT0 034405 034344 0 0 000020034351 0 312100034344
FT1A 034405 034344 0 0 000020034351 0 000020034351
FT2 034405 034344 0 0 0 0 000020034351
FT2RQ 034405 034344 0 0 000020034351 0 000020034351
FT3 034405 034344 0 0 000020034351 0 000020034351
FT9 034406 034344 0 0 000020034351 0 000020034351
ET0 034407 034344 0 0 0 0 000020034351
ST1A 034407 034344 0 0 0 0 000020034351
ST9 034407 034344 0 0 0 0 000020034351
*034407 JUMPA 0,034410
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034407 034407 0 0 324000034410 0 000000034410
IT1 034407 0 0 0 324000034410 0 000000034410
AT3 034407 0 0 0 000000034410 0 324000034410
AT6 034407 034410 0 0 000000034410 0 324000034410
FT1A 034407 034410 0 0 000000034410 0 000000034410
FT2 034407 034410 0 0 0 0 000000034410
FT2RQ 034407 034410 0 0 0 0 000000034410
FT3 034407 034410 0 0 0 0 000000034410
FT9 034410 034410 0 0 0 0 000000034410
ET0 034410 034410 0 0 0 0 000000034410
ST1A 034410 034410 0 0 0 0 000000034410
ST9 034410 034410 0 0 0 0 000000034410
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 629
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0824
*034410 SETZM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=000020 034351
FINAL
C(E)=000020 034351
TIME PC MA SC FE AR MQ BR
IT0 034410 034410 0 0 402000000002 0 000000000002
IT1 034410 0 0 0 402000000002 0 000000000002
AT3 034410 0 0 0 000000000002 0 402000000002
AT6 034410 000002 0 0 000000000002 0 402000000002
FT1A 034410 000002 0 0 000000000002 0 000000000002
FT9 034411 000002 0 0 000000000002 0 000000000002
ET0 034411 000002 0 0 0 0 000000000002
ST6 034411 000002 0 0 0 0 000000000002
ST6A 034411 000002 0 0 0 0 000000000002
ST9 034411 000002 0 0 0 0 000000000002
*034411 MOVE 2,034352(6)
INITIAL
C(AC)=000000 000000
C(E)=000000 034350
FINAL
C(AC)=000007 034346
TIME PC MA SC FE AR MQ BR
IT0 034411 034411 0 0 200106034352 0 000007034346
IT1 034411 0 0 0 200106034352 0 000007034346
AT1 034411 0 0 0 0 0 200106034352
AT2 034411 0 0 0 000000000005 0 200106034352
AT3 034411 0 0 0 000000034357 0 000000034357
AT6 034411 034357 0 0 000000034357 0 000000034357
FT0 034411 034357 0 0 000007034346 0 000000034357
FT1A 034411 034357 0 0 000007034346 0 000007034346
FT9 034412 034357 0 0 000007034346 0 000007034346
ET0 034412 034357 0 0 000007034346 0 000007034346
ST1 034412 034357 0 0 000007034346 0 000007034346
ST2 034412 034357 0 0 000007034346 0 000007034346
ST9 034412 034357 0 0 000007034346 0 000007034346
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 630
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0825
*034412 CAME 2,034357
INITIAL
C(AC)=000007 034346
C(E)=000007 034346
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034412 034412 0 0 312100034357 0 000007034346
IT1 034412 0 0 0 312100034357 0 000007034346
AT3 034412 0 0 0 000000034357 0 312100034357
AT6 034412 034357 0 0 000000034357 0 312100034357
FT0 034412 034357 0 0 000007034346 0 312100034357
FT1A 034412 034357 0 0 000007034346 0 000007034346
FT2 034412 034357 0 0 0 0 000007034346
FT2RQ 034412 034357 0 0 000007034346 0 000007034346
FT3 034412 034357 0 0 000007034346 0 000007034346
FT9 034413 034357 0 0 000007034346 0 000007034346
ET0 034414 034357 0 0 0 0 000007034346
ST1A 034414 034357 0 0 0 0 000007034346
ST9 034414 034357 0 0 0 0 000007034346
*034414 JUMPA 0,034415
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034414 034414 0 0 324000034415 0 000000034415
IT1 034414 0 0 0 324000034415 0 000000034415
AT3 034414 0 0 0 000000034415 0 324000034415
AT6 034414 034415 0 0 000000034415 0 324000034415
FT1A 034414 034415 0 0 000000034415 0 000000034415
FT2 034414 034415 0 0 0 0 000000034415
FT2RQ 034414 034415 0 0 0 0 000000034415
FT3 034414 034415 0 0 0 0 000000034415
FT9 034415 034415 0 0 0 0 000000034415
ET0 034415 034415 0 0 0 0 000000034415
ST1A 034415 034415 0 0 0 0 000000034415
ST9 034415 034415 0 0 0 0 000000034415
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 631
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0826
*034415 SETOM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=000007 034346
FINAL
C(E)=000007 034346
TIME PC MA SC FE AR MQ BR
IT0 034415 034415 0 0 476000000002 0 000000000002
IT1 034415 0 0 0 476000000002 0 000000000002
AT3 034415 0 0 0 000000000002 0 476000000002
AT6 034415 000002 0 0 000000000002 0 476000000002
FT1A 034415 000002 0 0 000000000002 0 000000000002
FT9 034416 000002 0 0 000000000002 0 000000000002
ET0 034416 000002 0 0 777777777777 0 000000000002
ST6 034416 000002 0 0 777777777777 0 000000000002
ST6A 034416 000002 0 0 777777777777 0 000000000002
ST9 034416 000002 0 0 777777777777 0 000000000002
*034416 MOVE 2,@034362(10)
INITIAL
C(AC)=777777 777777
C(E)=000000 034362
FINAL
C(AC)=223223 223223
TIME PC MA SC FE AR MQ BR
IT0 034416 034416 0 0 200130034362 0 223223223223
IT1 034416 0 0 0 200130034362 0 223223223223
AT1 034416 0 0 0 0 0 200130034362
AT2 034416 0 0 0 000000000004 0 200130034362
AT3 034416 0 0 0 000000034366 0 000000034366
AT4 034416 034366 0 0 000000034353 0 000000034366
IT1 034416 0 0 0 000000034353 0 000000034366
AT3 034416 0 0 0 000000034353 0 000000034353
AT6 034416 034353 0 0 000000034353 0 000000034353
FT0 034416 034353 0 0 223223223223 0 000000034353
FT1A 034416 034353 0 0 223223223223 0 223223223223
FT9 034417 034353 0 0 223223223223 0 223223223223
ET0 034417 034353 0 0 223223223223 0 223223223223
ST1 034417 034353 0 0 223223223223 0 223223223223
ST2 034417 034353 0 0 223223223223 0 223223223223
ST9 034417 034353 0 0 223223223223 0 223223223223
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 632
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0827
*034417 CAME 2,034353
INITIAL
C(AC)=223223 223223
C(E)=223223 223223
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034417 034417 0 0 312100034353 0 223223223223
IT1 034417 0 0 0 312100034353 0 223223223223
AT3 034417 0 0 0 000000034353 0 312100034353
AT6 034417 034353 0 0 000000034353 0 312100034353
FT0 034417 034353 0 0 223223223223 0 312100034353
FT1A 034417 034353 0 0 223223223223 0 223223223223
FT2 034417 034353 0 0 0 0 223223223223
FT2RQ 034417 034353 0 0 223223223223 0 223223223223
FT3 034417 034353 0 0 223223223223 0 223223223223
FT9 034420 034353 0 0 223223223223 0 223223223223
ET0 034421 034353 0 0 0 0 223223223223
ST1A 034421 034353 0 0 0 0 223223223223
ST9 034421 034353 0 0 0 0 223223223223
*034421 JUMPA 0,034422
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034421 034421 0 0 324000034422 0 000000034422
IT1 034421 0 0 0 324000034422 0 000000034422
AT3 034421 0 0 0 000000034422 0 324000034422
AT6 034421 034422 0 0 000000034422 0 324000034422
FT1A 034421 034422 0 0 000000034422 0 000000034422
FT2 034421 034422 0 0 0 0 000000034422
FT2RQ 034421 034422 0 0 0 0 000000034422
FT3 034421 034422 0 0 0 0 000000034422
FT9 034422 034422 0 0 0 0 000000034422
ET0 034422 034422 0 0 0 0 000000034422
ST1A 034422 034422 0 0 0 0 000000034422
ST9 034422 034422 0 0 0 0 000000034422
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 633
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0828
*034422 SETZM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=223223 223223
FINAL
C(E)=223223 223223
TIME PC MA SC FE AR MQ BR
IT0 034422 034422 0 0 402000000002 0 000000000002
IT1 034422 0 0 0 402000000002 0 000000000002
AT3 034422 0 0 0 000000000002 0 402000000002
AT6 034422 000002 0 0 000000000002 0 402000000002
FT1A 034422 000002 0 0 000000000002 0 000000000002
FT9 034423 000002 0 0 000000000002 0 000000000002
ET0 034423 000002 0 0 0 0 000000000002
ST6 034423 000002 0 0 0 0 000000000002
ST6A 034423 000002 0 0 0 0 000000000002
ST9 034423 000002 0 0 0 0 000000000002
*034423 MOVE 2,@034362(11)
INITIAL
C(AC)=000000 000000
C(E)=000000 034362
FINAL
C(AC)=224224 224224
TIME PC MA SC FE AR MQ BR
IT0 034423 034423 0 0 200131034362 0 224224224224
IT1 034423 0 0 0 200131034362 0 224224224224
AT1 034423 0 0 0 0 0 200131034362
AT2 034423 0 0 0 000000777772 0 200131034362
AT3 034423 0 0 0 000000034354 0 000000034354
AT4 034423 034354 0 0 000004034354 0 000000034354
IT1 034423 0 0 0 000004034354 0 000000034354
AT1 034423 0 0 0 0 0 000004034354
AT2 034423 0 0 0 000000000010 0 000004034354
AT3 034423 0 0 0 000000034364 0 000000034364
AT6 034423 034364 0 0 000000034364 0 000000034364
FT0 034423 034364 0 0 224224224224 0 000000034364
FT1A 034423 034364 0 0 224224224224 0 224224224224
FT9 034424 034364 0 0 224224224224 0 224224224224
ET0 034424 034364 0 0 224224224224 0 224224224224
ST1 034424 034364 0 0 224224224224 0 224224224224
ST2 034424 034364 0 0 224224224224 0 224224224224
ST9 034424 034364 0 0 224224224224 0 224224224224
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 634
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0829
*034424 CAME 2,034364
INITIAL
C(AC)=224224 224224
C(E)=224224 224224
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034424 034424 0 0 312100034364 0 224224224224
IT1 034424 0 0 0 312100034364 0 224224224224
AT3 034424 0 0 0 000000034364 0 312100034364
AT6 034424 034364 0 0 000000034364 0 312100034364
FT0 034424 034364 0 0 224224224224 0 312100034364
FT1A 034424 034364 0 0 224224224224 0 224224224224
FT2 034424 034364 0 0 0 0 224224224224
FT2RQ 034424 034364 0 0 224224224224 0 224224224224
FT3 034424 034364 0 0 224224224224 0 224224224224
FT9 034425 034364 0 0 224224224224 0 224224224224
ET0 034426 034364 0 0 0 0 224224224224
ST1A 034426 034364 0 0 0 0 224224224224
ST9 034426 034364 0 0 0 0 224224224224
*034426 JUMPA 0,034427
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034426 034426 0 0 324000034427 0 000000034427
IT1 034426 0 0 0 324000034427 0 000000034427
AT3 034426 0 0 0 000000034427 0 324000034427
AT6 034426 034427 0 0 000000034427 0 324000034427
FT1A 034426 034427 0 0 000000034427 0 000000034427
FT2 034426 034427 0 0 0 0 000000034427
FT2RQ 034426 034427 0 0 0 0 000000034427
FT3 034426 034427 0 0 0 0 000000034427
FT9 034427 034427 0 0 0 0 000000034427
ET0 034427 034427 0 0 0 0 000000034427
ST1A 034427 034427 0 0 0 0 000000034427
ST9 034427 034427 0 0 0 0 000000034427
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 635
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0830
*034427 SETOM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=224224 224224
FINAL
C(E)=224224 224224
TIME PC MA SC FE AR MQ BR
IT0 034427 034427 0 0 476000000002 0 000000000002
IT1 034427 0 0 0 476000000002 0 000000000002
AT3 034427 0 0 0 000000000002 0 476000000002
AT6 034427 000002 0 0 000000000002 0 476000000002
FT1A 034427 000002 0 0 000000000002 0 000000000002
FT9 034430 000002 0 0 000000000002 0 000000000002
ET0 034430 000002 0 0 777777777777 0 000000000002
ST6 034430 000002 0 0 777777777777 0 000000000002
ST6A 034430 000002 0 0 777777777777 0 000000000002
ST9 034430 000002 0 0 777777777777 0 000000000002
*034430 MOVE 2,@034356(13)
INITIAL
C(AC)=777777 777777
C(E)=000000 034356
FINAL
C(AC)=225225 225225
TIME PC MA SC FE AR MQ BR
IT0 034430 034430 0 0 200133034356 0 225225225225
IT1 034430 0 0 0 200133034356 0 225225225225
AT1 034430 0 0 0 0 0 200133034356
AT2 034430 0 0 0 000000000002 0 200133034356
AT3 034430 0 0 0 000000034360 0 000000034360
AT4 034430 034360 0 0 000020034363 0 000000034360
IT1 034430 0 0 0 000020034363 0 000000034360
AT3 034430 0 0 0 000000034363 0 000020034363
AT4 034430 034363 0 0 000000034361 0 000020034363
IT1 034430 0 0 0 000000034361 0 000020034363
AT3 034430 0 0 0 000000034361 0 000000034361
AT6 034430 034361 0 0 000000034361 0 000000034361
FT0 034430 034361 0 0 225225225225 0 000000034361
FT1A 034430 034361 0 0 225225225225 0 225225225225
FT9 034431 034361 0 0 225225225225 0 225225225225
ET0 034431 034361 0 0 225225225225 0 225225225225
ST1 034431 034361 0 0 225225225225 0 225225225225
ST2 034431 034361 0 0 225225225225 0 225225225225
ST9 034431 034361 0 0 225225225225 0 225225225225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 636
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0831
*034431 CAME 2,034361
INITIAL
C(AC)=225225 225225
C(E)=225225 225225
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034431 034431 0 0 312100034361 0 225225225225
IT1 034431 0 0 0 312100034361 0 225225225225
AT3 034431 0 0 0 000000034361 0 312100034361
AT6 034431 034361 0 0 000000034361 0 312100034361
FT0 034431 034361 0 0 225225225225 0 312100034361
FT1A 034431 034361 0 0 225225225225 0 225225225225
FT2 034431 034361 0 0 0 0 225225225225
FT2RQ 034431 034361 0 0 225225225225 0 225225225225
FT3 034431 034361 0 0 225225225225 0 225225225225
FT9 034432 034361 0 0 225225225225 0 225225225225
ET0 034433 034361 0 0 0 0 225225225225
ST1A 034433 034361 0 0 0 0 225225225225
ST9 034433 034361 0 0 0 0 225225225225
*034433 JUMPA 0,034434
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034433 034433 0 0 324000034434 0 000000034434
IT1 034433 0 0 0 324000034434 0 000000034434
AT3 034433 0 0 0 000000034434 0 324000034434
AT6 034433 034434 0 0 000000034434 0 324000034434
FT1A 034433 034434 0 0 000000034434 0 000000034434
FT2 034433 034434 0 0 0 0 000000034434
FT2RQ 034433 034434 0 0 0 0 000000034434
FT3 034433 034434 0 0 0 0 000000034434
FT9 034434 034434 0 0 0 0 000000034434
ET0 034434 034434 0 0 0 0 000000034434
ST1A 034434 034434 0 0 0 0 000000034434
ST9 034434 034434 0 0 0 0 000000034434
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 637
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0832
*034434 SETZM 0,000002
INITIAL
C(AC)=000000 000000
C(E)=225225 225225
FINAL
C(E)=225225 225225
TIME PC MA SC FE AR MQ BR
IT0 034434 034434 0 0 402000000002 0 000000000002
IT1 034434 0 0 0 402000000002 0 000000000002
AT3 034434 0 0 0 000000000002 0 402000000002
AT6 034434 000002 0 0 000000000002 0 402000000002
FT1A 034434 000002 0 0 000000000002 0 000000000002
FT9 034435 000002 0 0 000000000002 0 000000000002
ET0 034435 000002 0 0 0 0 000000000002
ST6 034435 000002 0 0 0 0 000000000002
ST6A 034435 000002 0 0 0 0 000000000002
ST9 034435 000002 0 0 0 0 000000000002
*034435 MOVE 2,@034362(12)
INITIAL
C(AC)=000000 000000
C(E)=000000 034362
FINAL
C(AC)=226226 226226
TIME PC MA SC FE AR MQ BR
IT0 034435 034435 0 0 200132034362 0 226226226226
IT1 034435 0 0 0 200132034362 0 226226226226
AT1 034435 0 0 0 0 0 200132034362
AT2 034435 0 0 0 000000000005 0 200132034362
AT3 034435 0 0 0 000000034367 0 000000034367
AT4 034435 034367 0 0 000025034367 0 000000034367
IT1 034435 0 0 0 000025034367 0 000000034367
AT1 034435 0 0 0 0 0 000025034367
AT2 034435 0 0 0 000000000001 0 000025034367
AT3 034435 0 0 0 000000034370 0 000000034370
AT4 034435 034370 0 0 000000034365 0 000000034370
IT1 034435 0 0 0 000000034365 0 000000034370
AT3 034435 0 0 0 000000034365 0 000000034365
AT6 034435 034365 0 0 000000034365 0 000000034365
FT0 034435 034365 0 0 226226226226 0 000000034365
FT1A 034435 034365 0 0 226226226226 0 226226226226
FT9 034436 034365 0 0 226226226226 0 226226226226
ET0 034436 034365 0 0 226226226226 0 226226226226
ST1 034436 034365 0 0 226226226226 0 226226226226
ST2 034436 034365 0 0 226226226226 0 226226226226
ST9 034436 034365 0 0 226226226226 0 226226226226
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 638
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0833
*034436 CAME 2,034365
INITIAL
C(AC)=226226 226226
C(E)=226226 226226
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034436 034436 0 0 312100034365 0 226226226226
IT1 034436 0 0 0 312100034365 0 226226226226
AT3 034436 0 0 0 000000034365 0 312100034365
AT6 034436 034365 0 0 000000034365 0 312100034365
FT0 034436 034365 0 0 226226226226 0 312100034365
FT1A 034436 034365 0 0 226226226226 0 226226226226
FT2 034436 034365 0 0 0 0 226226226226
FT2RQ 034436 034365 0 0 226226226226 0 226226226226
FT3 034436 034365 0 0 226226226226 0 226226226226
FT9 034437 034365 0 0 226226226226 0 226226226226
ET0 034440 034365 0 0 0 0 226226226226
ST1A 034440 034365 0 0 0 0 226226226226
ST9 034440 034365 0 0 0 0 226226226226
*034440 JUMPA 0,034441
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 034440 034440 0 0 324000034441 0 000000034441
IT1 034440 0 0 0 324000034441 0 000000034441
AT3 034440 0 0 0 000000034441 0 324000034441
AT6 034440 034441 0 0 000000034441 0 324000034441
FT1A 034440 034441 0 0 000000034441 0 000000034441
FT2 034440 034441 0 0 0 0 000000034441
FT2RQ 034440 034441 0 0 0 0 000000034441
FT3 034440 034441 0 0 0 0 000000034441
FT9 034441 034441 0 0 0 0 000000034441
ET0 034441 034441 0 0 0 0 000000034441
ST1A 034441 034441 0 0 0 0 000000034441
ST9 034441 034441 0 0 0 0 000000034441
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 639
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0834
*034441 JRST 0,030057
INITIAL
C(AC)=000000 000000
C(E)=254000 030641
FINAL
C(E)=254000 030641
TIME PC MA SC FE AR MQ BR
IT0 034441 034441 0 0 254000030057 0 254000030057
IT1 034441 0 0 0 254000030057 0 254000030057
AT3 034441 0 0 0 000000030057 0 254000030057
AT6 034441 030057 0 0 000000030057 0 254000030057
FT1A 034441 030057 0 0 000000030057 0 254000030057
FT9 034442 030057 0 0 000000030057 0 254000030057
ET0 030057 034442 0 0 000000030057 0 254000030057
ST1A 030057 034442 0 0 000000030057 0 254000030057
ST9 030057 034442 0 0 000000030057 0 254000030057
*030057 JRST 0,030641
INITIAL
C(AC)=000000 000000
C(E)=350000 030047
FINAL
C(E)=350000 030047
TIME PC MA SC FE AR MQ BR
IT0 030057 030057 0 0 254000030641 0 254000030641
IT1 030057 0 0 0 254000030641 0 254000030641
AT3 030057 0 0 0 000000030641 0 254000030641
AT6 030057 030641 0 0 000000030641 0 254000030641
FT1A 030057 030641 0 0 000000030641 0 254000030641
FT9 030060 030641 0 0 000000030641 0 254000030641
ET0 030641 030060 0 0 000000030641 0 254000030641
ST1A 030641 030060 0 0 000000030641 0 254000030641
ST9 030641 030060 0 0 000000030641 0 254000030641
*030641 AOS 0,030047
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030641 030641 0 0 350000030047 0 0
IT1 030641 0 0 0 350000030047 0 0
AT3 030641 0 0 0 000000030047 0 350000030047
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 640
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0835
AT6 030641 030047 0 0 000000030047 0 350000030047
FT0 030641 030047 0 0 0 0 350000030047
FT1A 030641 030047 0 0 0 0 0
FT9 030642 030047 0 0 0 0 0
ET0 030642 030047 0 0 000000000001 0 0
ST5 030642 030047 0 0 000000000001 0 0
ST6A 030642 030047 0 0 000000000001 0 0
ST9 030642 030047 0 0 000000000001 0 0
*030642 SOS 0,030024
INITIAL
C(AC)=000000 000000
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 030642 030642 0 0 370000030024 0 000000000001
IT1 030642 0 0 0 370000030024 0 000000000001
AT3 030642 0 0 0 000000030024 0 370000030024
AT6 030642 030024 0 0 000000030024 0 370000030024
FT0 030642 030024 0 0 000000000001 0 370000030024
FT1A 030642 030024 0 0 000000000001 0 000000000001
FT9 030643 030024 0 0 000000000001 0 000000000001
ET0 030643 030024 0 0 0 0 000000000001
ST5 030643 030024 0 0 0 0 000000000001
ST6A 030643 030024 0 0 0 0 000000000001
ST9 030643 030024 0 0 0 0 000000000001
*030643 SKIPN 0,030037
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030643 030643 0 0 336000030037 0 0
IT1 030643 0 0 0 336000030037 0 0
AT3 030643 0 0 0 000000030037 0 336000030037
AT6 030643 030037 0 0 000000030037 0 336000030037
FT0 030643 030037 0 0 0 0 336000030037
FT1A 030643 030037 0 0 0 0 0
FT9 030644 030037 0 0 0 0 0
ET0 030644 030037 0 0 0 0 0
ST1A 030644 030037 0 0 0 0 0
ST9 030644 030037 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 641
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0836
*030644 JRST 0,030652
INITIAL
C(AC)=000000 000000
C(E)=332000 030041
FINAL
C(E)=332000 030041
TIME PC MA SC FE AR MQ BR
IT0 030644 030644 0 0 254000030652 0 254000030652
IT1 030644 0 0 0 254000030652 0 254000030652
AT3 030644 0 0 0 000000030652 0 254000030652
AT6 030644 030652 0 0 000000030652 0 254000030652
FT1A 030644 030652 0 0 000000030652 0 254000030652
FT9 030645 030652 0 0 000000030652 0 254000030652
ET0 030652 030645 0 0 000000030652 0 254000030652
ST1A 030652 030645 0 0 000000030652 0 254000030652
ST9 030652 030645 0 0 000000030652 0 254000030652
*030652 SKIPE 0,030041
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030652 030652 0 0 332000030041 0 0
IT1 030652 0 0 0 332000030041 0 0
AT3 030652 0 0 0 000000030041 0 332000030041
AT6 030652 030041 0 0 000000030041 0 332000030041
FT0 030652 030041 0 0 0 0 332000030041
FT1A 030652 030041 0 0 0 0 0
FT9 030653 030041 0 0 0 0 0
ET0 030654 030041 0 0 0 0 0
ST1A 030654 030041 0 0 0 0 0
ST9 030654 030041 0 0 0 0 0
*030654 DATAO 4,030024
TIME PC MA SC FE AR MQ BR
IT0 030654 030654 0 0 700540030024 0 000000030024
IT1 030654 0 0 0 700540030024 0 000000030024
AT3 030654 0 0 0 000000030024 0 700540030024
AT6 030654 030024 0 0 000000030024 0 700540030024
FT1A 030654 030024 0 0 000000030024 0 000000030024
FT2 030654 030024 0 0 0 0 000000030024
FT2RQ 030654 030024 0 0 000000000002 0 000000030024
FT3 030654 030024 0 0 000000000002 0 000000030024
FT9 030655 030024 0 0 000000000002 0 000000030024
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 19-JAN-77 PAGE 642
DAKAD 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0837
ST1 030655 030024 0 0 000000000002 0 000000030024
ST2 030655 030024 0 0 000000000002 0 000000030024
ST9 030655 030024 0 0 000000000002 0 000000030024
*030655 SKIPE 0,030024
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030655 030655 0 0 332000030024 0 0
IT1 030655 0 0 0 332000030024 0 0
AT3 030655 0 0 0 000000030024 0 332000030024
AT6 030655 030024 0 0 000000030024 0 332000030024
FT0 030655 030024 0 0 0 0 332000030024
FT1A 030655 030024 0 0 0 0 0
FT9 030656 030024 0 0 0 0 0
ET0 030657 030024 0 0 0 0 0
ST1A 030657 030024 0 0 0 0 0
ST9 030657 030024 0 0 0 0 0
*030657 JRST 0,@030012
INITIAL
C(AC)=000000 000000
C(E)=000000 431100
FINAL
C(E)=000000 431100
TIME PC MA SC FE AR MQ BR
IT0 030657 030657 0 0 254020030012 0 000000431100
IT1 030657 0 0 0 254020030012 0 000000431100
AT3 030657 0 0 0 000000030012 0 254020030012
AT4 030657 030012 0 0 000000431100 0 254020030012
IT1 030657 0 0 0 000000431100 0 254020030012
AT3 030657 0 0 0 000000431100 0 000000431100
AT6 030657 0 0 0 000000431100 0 000000431100
FT1A 030657 0 0 0 000000431100 0 000000431100
FT9 030660 0 0 0 000000431100 0 000000431100
ET0 0 030660 0 0 000000431100 0 000000431100
ST1A 0 030660 0 0 000000431100 0 000000431100
ST9 0 030660 0 0 000000431100 0 000000431100