Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/dakae.seq
There are no other files named dakae.seq in the archive.
;DAKAE
SEQ 0001
IDENTIFICATION
--------------
PRODUCT CODE: AH-6859C-DD
DIAGNOSTIC CODE: DAKAE
PRODUCT NAME: DAKAEC0 DECSYSTEM10 PDP-10 KA10 BASIC
INSTRUCTION DIAGNOSTIC (5)
VERSION: 0.3
DATE RELEASED: JANUARY 1979
MAINTAINED BY: DIAGNOSTIC ENGINEERING
AUTHOR: BILL SCORZELLI
COPYRIGHT (C) 1967, 1979
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A
SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE INCLUSION
OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR ANY OTHER
COPIES THEREOF, MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE
TO ANY OTHER PERSON EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO
AGREES TO THESE LICENSE TERMS. TITLE TO AND OWNERSHIP OF THE
SOFTWARE SHALL AT ALL TIMES REMAIN IN DIGITAL EQUIPMENT
CORPORATION.
THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE
USE OR RELIABILITY OF ITS SOFTWARE IN EQUIPMENT WHICH IS NOT
SUPPLIED BY DIGITAL EQUIPMENT CORPORATION.
MAINDEC-10-DAKAE.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-DAKAE.TXT
PAGE 3 SEQ 0003
1.0 ABSTRACT
THIS PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC IS THE
FIFTH IN A SERIES OF PDP-10 KA10 PROCESSOR DIAGNOSTICS.
THE DIAGNOSTIC TESTS THE FWT, ADD/SUB, PC CHANGE
AND COMPARE INSTRUCTIONS.
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-DAKAE.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-DAKAE.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-DAKAE
SEQ 0006
************************************************************************
ORIGINAL VERSION: 0.1
ORIGINAL AUTHOR: RICHARD MALISKA
ORIGINAL RELEASE: 16-MAR-72
************************************************************************
PRODUCT CODE: MAINDEC-10-DAKAE
PRODUCT NAME: BASIC INSTRUCTION DIAGNOSTIC #5
DATE RELEASED: JANUARY 1977
VERSION: 0.2
UPDATE AUTHOR: JOHN R. KIRCHOFF
CHANGES MADE:
1. UPGRADE TO ALLOW COMPATABILITY WITH THE SUBROUTINE PACKAGE.
************************************************************************
PRODUCT CODE: MAINDEC-10-DAKAE
PRODUCT NAME: BASIC INSTRUCTION DIAGNOSTIC #5
DATE RELEASED: JANUARY 1979
VERSION: 0.3
UPDATE AUTHOR: BILL SCORZELLI
CHANGES MADE:
1. THE COMPARE INSTRUCTION TESTS DID NOT CHECK THE COMPARE OF 2
NEGATIVE NUMBERS WITH THE CONTENTS OF THE (AC) BEING LARGER
THAN THE CONTENTS OF (E). ADDED TEST C52205.
************************************************************************
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 1
DAKAET MAC 21-Dec-78 14:28 *PARAM* CONSOLE DATA SWITCH ASSIGNMENTS, AUG 1,1977 SEQ 0007
1 ;DAKAE
2
3
4
5 000003 DECVER==3
6 000000 MCNVER==0
7
8 XLIST
9 LIST
10 LALL
11 NAME \MCNVER,\DECVER^
12
13 TITLE DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3
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,1978
20 ;DIGITAL EQUIPMENT CORPORATION
21 ;MARLBORO, MASS. 01752
22
23 ;DICK MALISKA
24 ;JOHN R. KIRCHOFF
25 ;BILL SCORZELLI
26
27 000137 LOC 137
28 000137 000000 000003 MCNVER,,DECVER
29
30 NOSYM
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 2
DAKAET MAC 21-Dec-78 14:28 DIAGNOSTIC PARAMETERS SEQ 0008
31 SUBTTL DIAGNOSTIC PARAMETERS
32
33 ;PARAMETER DEFINITIONS
34 000001 EXCASB==1
35 000001 USRASB==1
36 000001 PGMEND==1
37 000100 DEBUG==100
38
39 ;FLAG DEFINITIONS
40 010000 USERF=10000 ;USER MODE FLAG
41
42
43 ;MACROS
44
45 ;SPECIAL FEATURE PARAMETERS
46
47 030674 SADR1=START
48 030674 SADR2=START
49 030674 SADR3=START
50 030674 SADR4=START
51 254000 030674 SADR5=JRST START
52 254000 030674 SADR6=JRST START
53 254000 030674 SADR7=JRST START
54 254000 030674 SADR8=JRST START
55 254000 030674 SADR9=JRST START
56 254000 030674 SADR10=JRST START
57 254000 030674 SADR11=JRST START
58
59 000000 PAREA0=0
60 000000 PAREA1=0
61 000000 PAREA2=0
62 444153 414500 PAREA3=SIXBIT/DAKAE/
63 645560 000000 PAREA4=SIXBIT/TMP/
64 000000 PAREA5=0
65 000000 PAREA6=0
66 001000 ITERAT==1000
67 000001 PGMEND==1
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 3
DAKAET MAC 21-Dec-78 14:28 DIAGNOSTIC PARAMETERS SEQ 0009
68 SUBTTL DIAGNOSTIC PARAMETERS
69
70 ;ACCUMULATOR ASSIGNMENTS
71
72 ;CONTROL WORDS
73
74 400000 AROV=400000 ;ARITHMETIC OVERFLOW
75 200000 CRY0=200000 ;CARRY 0
76 100000 CRY1=100000 ;CARRY 1
77 040000 FOV=40000 ;FLOATING OVERFLOW
78 020000 BIS=20000 ;BYTE INTERRUPT
79 010000 USERF=10000 ;USER MODE FLAG
80 004000 EXIOT=4000 ;USER PRIV I/O FLAG
81 000100 FXU=100 ;FLOATING UNDERFLOW
82 000040 DCK=40 ;DIVIDE CHECK
83
84
85 ;MACROS
86
87 ; STOP - USED FOR SCOPE LOOP, IF INSTRUCTION FAILS, CHANGE (JUMPA .+1)
88 ; TO A (JUMPA X) TO CYCLE ON FAILING INSTRUCTION
89
90 DEFINE STOP (A)<
91 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
92 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
93 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
94 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
95 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1>
96
97 ; SFLAG - USED TO CLEAR ALL FLAGS THEN TO SET REQUESTED FLAG
98
99 DEFINE SFLAG (A)<
100 MOVSI 1,A
101 JFCL 17,.+1 ;RESET ALL FLAGS
102 JRST 2,.+1(1) ;SET A FLAG>
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 1
PARAM KLM 1-Aug-77 08:33 *PARAM* CONSOLE DATA SWITCH ASSIGNMENTS, AUG 1,1977 SEQ 0010
103 SUBTTL *PARAM* CONSOLE DATA SWITCH ASSIGNMENTS, AUG 1,1977
104
105 DEFINE S,<;*********************************************************************>
106
107 S^;*********************************************************************^
108 ;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
109 ;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
110 ;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
111 S^;*********************************************************************^
112
113 400000 ABORT== 400000 ;ABORT PROGRAM ON PASS COMPLETION
114 200000 RSTART==200000 ;RESTART TEST, PRINT TOTALS
115 100000 TOTALS==100000 ;PRINT TOTALS, CONTINUE
116
117 040000 NOPNT== 040000 ;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
118 020000 PNTLPT==020000 ;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
119 010000 DING== 010000 ;RING BELL ON ERROR
120
121 004000 LOOPER==004000 ;ENTER EXERCISE/CHECK LOOP ON ERROR
122 002000 ERSTOP==002000 ;HALT ON TEST ERROR
123 001000 PALERS==001000 ;PRINT ALL ERRORS
124
125 000400 RELIAB==000400 ;RELIABILITY MODE
126 000200 TXTINH==000200 ;INHIBIT ERROR TEXT
127 000100 INHPAG==000100 ;INHIBIT PAGING
128
129 000040 MODDVC==000040 ;MODIFY DEVICE CODE
130 000020 INHCSH==000020 ;INHIBIT CACHE
131 000010 OPRSEL==000010 ;OPERATOR SELECTION
132
133 000004 CHAIN== 000004 ;CHAIN CONTROL SWITCH
134
135 000002 KAHZ50==000002 ;KA10 50 HERTZ POWER
136
137 ;SWITCH 17 RESERVED !!!
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 2
PARAM KLM 1-Aug-77 08:33 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976 SEQ 0011
138 SUBTTL *PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976
139
140 S^;*********************************************************************^
141 ;*SPECIAL SUBPROGRAM LINKAGES
142 S^;*********************************************************************^
143
144 027772 FSELNK= 27772 ;FILE SELECT LINK
145 027773 FRDLNK= 27773 ;FILE READ LINK
146 027774 LDLNK= 27774 ;LOAD LINKAGE ADDRESS
147 027775 DDTLNK= 27775 ;DDT LINKAGE ADDRESS
148 027776 MODLNK= 27776 ;OPERATIONAL MODE CHECK LINKAGE ADDRESS
149 027777 SUBLNK= 27777 ;SUBROUTINE LINKAGE ADDRESS
150
151 S^;*********************************************************************^
152 ;*SPECIAL SUBROUTINE FATAL HALTS
153 ;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
154 S^;*********************************************************************^
155
156 ;ADDRESS TAG REASON
157 ;---------------------
158
159 ; 1010 NOEXEC ;PROGRAM NOT CODED FOR EXEC MODE OPERATION
160 ; 1011 PLERR ;FATAL PUSH LIST POINTER ERROR
161 ; 1012 PLERR1 ;INITIAL PUSH LIST POINTER ERROR
162 ; 1013 MUOERR ;MUUO WITH LUUO HANDLER WIPED OUT
163 ; 1014 DTEBER ;DTE20 INTERRUPT WITHOUT DOORBELL
164 ; 1015 DTECER ;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
165 ; 1016 CPIERR ;CPU INITIALIZATION ERROR
166 ; 1017 EOPERR ;END OF PROGRAM ERROR
167 ; 1020 LUOERR ;INTERRUPT WITH LUUO HANDLER WIPED OUT
168
169 S^;*********************************************************************^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 3
PARAM KLM 1-Aug-77 08:33 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976 SEQ 0012
170 S^;*********************************************************************^
171 ;OPERATOR DEFINITIONS (NON-UUO'S)
172 S^;*********************************************************************^
173
174 260740 000000 OPDEF GO [PUSHJ P,] ;SUBROUTINE CALL
175 263740 000000 OPDEF RTN [POPJ P,] ;SUBROUTINE RETURN
176 261740 000000 OPDEF PUT [PUSH P,] ;PUT DATA ON PUSH LIST
177 262740 000000 OPDEF GET [POP P,] ;GET DATA FROM PUSH LIST
178 254000 000000 OPDEF PJRST [JRST ] ;JRST TO ROUTINE THAT RTN'S
179 254200 000000 OPDEF HALT [JRST 4,] ;DEFINITION FOR DDT
180 254100 000000 OPDEF JRSTF [JRST 2,] ;DEFINITION FOR DDT
181 254500 000000 OPDEF JEN [JRST 12,] ;DEFINITION FOR DDT
182
183 S^;*********************************************************************^
184 ;*SUBROUTINE INITIALIZATION CALL
185 S^;*********************************************************************^
186
187 265000 030011 OPDEF PGMINT [JSP 0,SBINIT] ;SUBROUTINE INITIALIZATION
188
189 S^;*********************************************************************^
190 ;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
191 S^;*********************************************************************^
192
193 037640 000004 OPDEF FATAL [37B8!15B12!4] ;FATAL PROGRAMMING HALT
194 037600 000004 OPDEF ERRHLT [37B8!14B12!4] ;PROGRAM ERROR HALT
195
196 S^;*********************************************************************^
197 ;*TERMINAL INPUT UUO'S
198 ;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
199 ;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
200 S^;*********************************************************************^
201
202 037000 000003 OPDEF TTICHR [37B8!0B12!3] ;TTY, INPUT ANY CHARACTER
203 037040 000003 OPDEF TTIYES [37B8!1B12!3] ;TTY, NORMAL RETURN Y
204 037100 000003 OPDEF TTINO [37B8!2B12!3] ;TTY, NORMAL RETURN N
205 037140 000003 OPDEF TTIOCT [37B8!3B12!3] ;TTY, INPUT OCTAL WORD
206 037200 000003 OPDEF TTIDEC [37B8!4B12!3] ;TTY, INPUT DECIMAL WORD
207 037240 000003 OPDEF TTICNV [37B8!5B12!3] ;TTY, INPUT CONVERTABLE WORD
208 037300 000003 OPDEF TTLOOK [37B8!6B12!3] ;TTY, KEYBOARD CHECK
209 037340 000003 OPDEF TTALTM [37B8!7B12!3] ;TTY, ALT-MODE CHECK
210 037400 000003 OPDEF TTSIXB [37B8!10B12!3] ;TTY, INPUT SIXBIT WORD
211 037440 000003 OPDEF TTYINP [37B8!11B12!3] ;TTY, IMAGE MODE INPUT
212 037500 000003 OPDEF TTICLR [37B8!12B12!3] ;TTY, CLEAR INPUT
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 4
PARAM KLM 1-Aug-77 08:33 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976 SEQ 0013
213 ;*TERMINAL OUTPUT UUO'S.
214
215 037000 000000 OPDEF PNTA [37B8!0B12!0] ;PRINT ASCII WORD
216 037000 000001 OPDEF PNTAF [37B8!0B12!1] ;PRINT ASCII WORD FORCED
217 037740 000000 OPDEF PNTAL [37B8!17B12!0] ;PRINT ASCIZ LINE
218 037740 000001 OPDEF PNTALF [37B8!17B12!1] ;PRINT ASCIZ LINE FORCED
219 037600 000003 OPDEF PSIXL [37B8!14B12!3] ;PRINT SIXBIT'Z LINE
220 037640 000003 OPDEF PSIXLF [37B8!15B12!3] ;PRINT SIXBIT'Z LINE FORCED
221 037000 000000 OPDEF PNTMSG [37B8!0B12!0] ;PRINT MESSAGE IMMEDIATE
222 037040 000000 OPDEF PNTMSF [37B8!1B12!0] ;PRINT MESSAGE IMMEDIATE FORCED
223 037100 000000 OPDEF PSIXM [37B8!2B12!0] ;PRINT SIXBIT'Z MSG IMMEDIATE
224 037200 000000 OPDEF PSIXMF [37B8!4B12!0] ;PRINT SIXBIT'Z MSG IMM FORCED
225 037000 000000 OPDEF PNTCI [37B8!0B12!0] ;PRINT CHARACTER IMMEDIATE
226 037040 000000 OPDEF PNTCIF [37B8!1B12!0] ;PRINT CHARACTER IMMEDIATE FORCED
227 037500 000000 OPDEF PNTCHR [37B8!12B12!0] ;PRINT CHARACTER
228 037500 000001 OPDEF PNTCHF [37B8!12B12!1] ;PRINT CHARACTER FORCED
229 037040 000000 OPDEF PNT1 [37B8!1B12!0] ;PRINT ONE OCTAL DIGIT
230 037040 000001 OPDEF PNT1F [37B8!1B12!1] ;PRINT 1 OCTAL DIGIT FORCED
231 037100 000000 OPDEF PNT2 [37B8!2B12!0] ;PRINT TWO OCTAL DIGITS
232 037100 000001 OPDEF PNT2F [37B8!2B12!1] ;PRINT 2 OCTAL DIGITS FORCED
233 037140 000000 OPDEF PNT3 [37B8!3B12!0] ;PRINT THREE OCTAL DIGITS
234 037140 000001 OPDEF PNT3F [37B8!3B12!1] ;PRINT THREE OCTAL DIGITS FORCED
235 037200 000000 OPDEF PNT4 [37B8!4B12!0] ;PRINT FOUR OCTAL DIGITS
236 037200 000001 OPDEF PNT4F [37B8!4B12!1] ;PRINT FOUR OCTAL DIGITS FORCED
237 037240 000000 OPDEF PNT5 [37B8!5B12!0] ;PRINT FIVE OCTAL DIGITS
238 037240 000001 OPDEF PNT5F [37B8!5B12!1] ;PRINT FIVE OCTAL DIGITS FORCED
239 037300 000000 OPDEF PNT6 [37B8!6B12!0] ;PRINT SIX OCTAL DIGITS
240 037300 000001 OPDEF PNT6F [37B8!6B12!1] ;PRINT SIX OCTAL DIGITS FORCED
241 037340 000000 OPDEF PNT7 [37B8!7B12!0] ;PRINT 7 OCTAL DIGITS
242 037340 000001 OPDEF PNT7F [37B8!7B12!1] ;PRINT 7 OCTAL DIGITS FORCED
243 037440 000000 OPDEF PNT11 [37B8!11B12!0] ;PRINT 11 OCTAL DIGITS
244 037440 000001 OPDEF PNT11F [37B8!11B12!1] ;PRINT 11 OCTAL DIGITS FORCED.
245 037400 000000 OPDEF PNTADR [37B8!10B12!0] ;PRINT PHYSICAL ADDRESS
246 037400 000001 OPDEF PNTADF [37B8!10B12!1] ;PRINT PHYSICAL ADDRESS FORCED
247 037600 000000 OPDEF PNTOCT [37B8!14B12!0] ;PRINT FULL WORD OCTAL
248 037600 000001 OPDEF PNTOTF [37B8!14B12!1] ;PRINT FULL WORD OCTAL FORCED
249 037540 000000 OPDEF PNTHW [37B8!13B12!0] ;PRINT OCTAL HALF WORDS, 6 SP 6
250 037540 000001 OPDEF PNTHWF [37B8!13B12!1] ;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
251 037700 000003 OPDEF PNTOCS [37B8!16B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S
252 037740 000003 OPDEF PNTOCF [37B8!17B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
253 037640 000000 OPDEF PNTDEC [37B8!15B12!0] ;PRINT DECIMAL, SUPRESS LEADING 0'S
254 037640 000001 OPDEF PNTDCF [37B8!15B12!1] ;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
255 037700 000000 OPDEF PNTDS [37B8!16B12!0] ;PRINT DECIMAL, SPACES FOR LD 0'S
256 037700 000001 OPDEF PNTDSF [37B8!16B12!1] ;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 5
PARAM KLM 1-Aug-77 08:33 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976 SEQ 0014
257 037200 000002 OPDEF PNTNM [37B8!4B12!2] ;PRINT PROGRAM NAME
258 037000 000002 OPDEF PNTSIX [37B8!0B12!2] ;PRINT SIXBIT WORD
259 037040 000002 OPDEF PNTSXF [37B8!1B12!2] ;PRINT SIXBIT WORD FORCED
260 037240 000002 OPDEF DROPDV [37B8!5B12!2] ;CLOSE LOGICAL FILE, USER MODE
261 037100 000002 OPDEF PNTCW [37B8!2B12!2] ;PRINT DF10 CONTROL WORD
262 037140 000002 OPDEF PNTCWF [37B8!3B12!2] ;PRINT DF10 CONTROL WORD FORCED
263 037000 030242 OPDEF PCRL [37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
264 037040 030242 OPDEF PCRLF [37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
265 037000 000040 OPDEF PSP [37B8!0B12!40] ;PRINT SPACE
266 037040 000040 OPDEF PSPF [37B8!1B12!40] ;PRINT SPACE FORCED
267 037000 030243 OPDEF PCRL2 [37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
268 037040 030243 OPDEF PCRL2F [37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
269 037040 000007 OPDEF PBELL [37B8!1B12!7] ;PRINT TTY BELL
270
271 037040 000026 OPDEF PFORCE [37B8!1B12!26] ;PRINT FORCE, CONTROL O OVERRIDE
272
273 DEFINE PMSG (ARG),<
274 PSIXM [SIXBIT\ARG'_\]>
275
276 DEFINE PMSGF (ARG),<
277 PSIXMF [SIXBIT\ARG'_\]>
278
279 ;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
280 ;* CONSERVES CORE OVER ASCIZ
281
282 DEFINE SIXBTZ (ARG),< [SIXBIT\ARG'_\]>
283
284 ;*CONSOLE SWITCH INPUT UUO.
285 ;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
286 ;* USER MODE.
287
288 037400 000002 OPDEF SWITCH [37B8!10B12!2] ;INPUT CONSOLE SWITCHES
289
290 ;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
291 ;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
292
293 037540 000004 OPDEF CLOKOP [37B8!13B12!4] ;CLOCK OPERATION UUO - PDP-11 CLOCK
294 037200 000004 OPDEF MTROP [37B8!4B12!4] ;CLOCK OPERATION UUO - DK20 METER
295
296 ;*KL10 ONLY CACHE OPERATION UUO'S
297
298 037040 000004 OPDEF CINVAL [37B8!1B12!4] ;CACHE INVALIDATE
299 037100 000004 OPDEF CFLUSH [37B8!2B12!4] ;CACHE FLUSH
300 037140 000004 OPDEF CWRTBI [37B8!3B12!4] ;CACHE WRITE-BACK & INVALIDATE
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 6
PARAM KLM 1-Aug-77 08:33 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976 SEQ 0015
301 ;*END OF PASS/PROGRAM UUOS
302
303 ;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
304 ;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
305
306 037500 000004 OPDEF ENDUUO [37B8!12B12!4] ;UUO TO DISPLAY LIGHTS
307 037700 000004 OPDEF EOPUUO [37B8!16B12!4] ;END OF PROGRAM UUO
308
309 ;*MEMORY MANAGEMENT UUO'S
310 ;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
311 ;*ADDRESS CONVERSION, ETC...
312
313 037000 000004 OPDEF MAPMEM [37B8!0B12!4] ;MAP MEMORY
314 037500 000002 OPDEF MEMZRO [37B8!12B12!2] ;ZERO MEMORY
315 037440 000002 OPDEF MEMSEG [37B8!11B12!2] ;SETUP MEMORY SEGMENT
316 037540 000002 OPDEF MAPADR [37B8!13B12!2] ;VIRTUAL TO PHYSICAL ADR CONVERT
317 037640 000002 OPDEF MAPCNK [37B8!15B12!2] ;MAP MEMORY CHUNK
318 037600 000002 OPDEF MAPSET [37B8!14B12!2] ;SET KI10 EXEC PAGE MAP
319 037740 000002 OPDEF MAPPNT [37B8!17B12!2] ;PRINT MEMORY MAP
320
321 ;*DEVICE CODE MODIFICATION UUO
322 ;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
323 ;*IOT'S TO A DIFFERENT DEVICE CODE.
324
325 037340 000002 OPDEF MODPCU [37B8!7B12!2] ;MODIFY PERHIPERAL CODE, USER
326 037300 000002 OPDEF MODPCP [37B8!6B12!2] ;MODIFY PERHIPERAL CODE, PROGRAM
327
328 030000 IFNDEF MODDVL,<MODDVL==BEGIN>
329 030000 IFNDEF MODDVU,<MODDVU==BEGIN>
330
331 ;*"DIAMON" FILE SELECTION AND READ UUOS
332
333 037240 000004 OPDEF FSELECT [37B8!5B12!4] ;FILE SELECTION
334 037300 000004 OPDEF FREAD [37B8!6B12!4] ;FILE READ - ASCII DATA
335 037340 000004 OPDEF FRD36 [37B8!7B12!4] ;FILE READ - 36 BIT DATA
336 037400 000004 OPDEF FRD8 [37B8!10B12!4] ;FILE READ - 8 BIT DATA
337
338 ;*KI10 ONLY UUO FOR PRINTING MARGIN VALUES
339
340 037700 000002 OPDEF PNTMGN [37B8!16B12!2] ;PRINT MARGIN VALUE
341
342 XLIST
343 IFNDEF KLOLD,<LIST
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 7
PARAM KLM 1-Aug-77 08:33 ERROR HANDLING UUO DEFINITIONS, JAN 5,1976 SEQ 0016
344 SUBTTL ERROR HANDLING UUO DEFINITIONS, JAN 5,1976
345
346 S^;*********************************************************************^
347 ;*ERROR HANDLER PARAMETERS
348 S^;*********************************************************************^
349
350 036000 000000 OPDEF ERUUO [36B8] ;ERROR CALL UUO
351 035000 000000 OPDEF ERLOOP [35B8] ;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
352 035040 000000 OPDEF ERLP1 [35B8!1B12] ;ERROR LOOP IF PC'S MATCH
353 035100 000000 OPDEF ERLP2 [35B8!2B12] ;ERROR LOOP IF ANY ERROR
354 034000 000000 OPDEF REPTUO [34B8] ;REPEAT LOOP UUO
355
356 ;*THE ERROR HANDLER MACROS
357
358 ;*A MACRO TO REPORT AN ERROR AND LOOP
359
360 DEFINE ERROR (ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
361 SALL
362 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
363 CORECT,,ACTUAL
364 [SIXBIT\D'_\],,ERR]
365 XALL
366 ERLOOP ADR ;IF ERROR, LOOP TO ADR
367 >
368
369 ;*A MACRO TO REPORT AN ERROR AND NOT LOOP
370
371 DEFINE ERROR1 (FORMAT,CORECT,ACTUAL,F,D,ERR)<
372 SALL
373 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
374 CORECT,,ACTUAL
375 [SIXBIT\D'_\],,ERR]
376 XALL>
377
378 >;END OF KLOLD CONDITIONAL
379
380 XLIST
381 LIST
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 1
FIXED KLM 19-Jul-77 16:36 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977 SEQ 0017
382 SUBTTL *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977
383
384 030000 LOC 30000
385
386 S^;*********************************************************************^
387 ;*PROGRAM STARTING ADDRESSES
388 ;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
389 ;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
390 ;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
391 ;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
392 S^;*********************************************************************^
393
394 030000 254 00 1 00 027776 BEGIN: JRST @MODLNK ;STAND-ALONE START
395 030001 254 00 0 00 030674 $START: JRST START ;MODE CHECK STARTING ADDRESS
396
397 030002 254 00 1 00 027774 DIAGMN: JRST @LDLNK ;DIAGNOSTIC MONITOR START
398
399 030003 254 00 1 00 027774 SYSEXR: JRST @LDLNK ;SYSTEM EXERCISER START
400
401 030004 254 00 0 00 030674 SFSTRT: JRST SADR1 ;SPECIAL FEATURE START
402
403 030005 254 00 0 00 030674 PFSTRT: JRST SADR2 ;POWER FAIL RESTART
404
405 030006 254 00 0 00 030674 REENTR: JRST SADR3 ;REENTER START(USUALLY USER MODE ONLY)
406
407 030007 SRTDDT: ;COMMONLY MISTAKEN NAME FOR "DDTSRT"
408 030007 254 00 1 00 027775 DDTSRT: JRST @DDTLNK ;DDT START
409
410 030010 254 00 0 00 030723 BEGIN1: JRST STARTA ;LOOP START(END OF PASS COMES HERE)
411 030011 254 00 1 00 027777 SBINIT: JRST @SUBLNK ;PMGINT LINKAGE
412 030012 000000 000000 RETURN: 0 ;RETURN ADDRESS STORAGE
413
414 030013 254000 030674 START1: SADR7 ;OPTIONAL STARTING ADR/INSTRUCTIONS
415 030014 254000 030674 START2: SADR8 ; "
416 030015 254000 030674 START3: SADR9 ; "
417 030016 254000 030674 START4: SADR10 ; "
418 030017 254000 030674 START5: SADR11 ; "
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 2
FIXED KLM 19-Jul-77 16:36 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977 SEQ 0018
419 S^;*********************************************************************^
420 ;*PROGRAM FIXED PARAMETER AREA
421 S^;*********************************************************************^
422
423 030020 444153 414500 PNTNAM: PAREA3 ;SIXBIT PROGRAM NAME
424 030021 645560 000000 PNTEXT: PAREA4 ;SIXBIT PROGRAM EXTENSION
425 030022 000000 000000 RANDBS: PAREA1 ;RANDOM BASE NUMBER
426 030023 000000 000000 SWTEXR: PAREA2 ;SYSTEM EXERCISER SWITCHES
427 030024 000000 001000 ITRCNT: ITERAT ;PROGRAM ITERATIONS
428 030025 000000 030707 $PNAME: PGMNAM ;POINTER TO PROGRAMS NAME
429 030026 000000 000003 $PVER: MCNVER,,DECVER ;MCN & DEC VERSION LEVEL
430 030027 000000 030000 $MODVL: MODDVL ;DEVICE CODE CHANGE LOWER LIMIT
431 030030 000000 030000 $MODVU: MODDVU ;DEVICE CODE CHANGE UPPER LIMIT
432 030031 777777 777777 $EMODE: IFNDEF EXCASB,<0> IFDEF EXCASB,<-1> ;EXEC ALLOWED
433 030032 777777 777777 $UMODE: IFNDEF USRASB,<0> IFDEF USRASB,<-1> ;USER ALLOWED
434 030033 000000 000000 $DSKUP: IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1> ;DISK UPDATE MODE
435 030034 000000 000000 $MMAP: IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1> ;ALLOW MEMORY RTNS
436 030035 000000 000000 PAREA7: PAREA5 ;OPTIONAL PARAMETER
437 030036 000000 000000 PAREA8: PAREA6 ;OPTIONAL PARAMETER
438
439 S^;*********************************************************************^
440 ;*PROGRAM VARIABLE PARAMETER AREA
441 S^;*********************************************************************^
442
443 030037 000000 000000 USER: 0 ; 0 = EXEC, -1 = USER MODE FLAG
444 030040 000000 000000 KAIFLG: 0 ;PROCESSOR TYPE, 0 = KA10, -1 = KI10
445 030041 000000 000000 KLFLG: 0 ;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
446 030042 777777 777777 MONFLG: -1 ;DIAG MONITOR SPECIAL USER FLAG
447 030043 000000 000000 MONCTL: 0 ;DIAG MON/SYS EXR FLAG
448 030044 000000 000000 MONTEN: 0 ;-1= LOADED BY 10
449 030045 000000 000000 CLOCKF: 0 ;CLOCK TICKED FLAG
450 030046 000000 000000 CONSW: 0 ;CONSOLE SWITCH SETTINGS
451 030047 000000 000000 PASCNT: 0 ;PROGRAM PASS COUNT
452 030050 000000 000000 RUNFLG: 0 ;PROGRAM RUN FLAG
453 030051 000000 000000 TESTPC: 0 ;SUBTEST PC
454 030052 000000 000000 ERRPC: 0 ;ERROR PC
455 030053 000000 000000 ERRTLS: 0 ;ERROR TOTALS
456 030054 000000 000000 TICKS: 0 ;PROGRAM RUNNING TIME
457 030055 000000 000000 MARGIN: 0 ;KI10 MARGIN WORD VALUE
458 030056 000000 000000 $ONETM: 0 ;SUBROUTINE INITIALIZATION FLAG
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 3
FIXED KLM 19-Jul-77 16:36 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977 SEQ 0019
459 S^;*********************************************************************^
460 ;*SPECIAL PROGRAM DISPATCH ADDRESSES
461 S^;*********************************************************************^
462
463 030057 037 12 0 00 000004 BEGEND: ENDUUO ;END OF PASS
464 030060 254 00 0 00 030010 $BEND1: JRST BEGIN1 ;KEEP RUNNING PROGRAM
465 030061 037 16 0 00 000004 $BEND2: EOPUUO ;END OF PROGRAM - NO RETURN
466 030062 254000 030674 CNTLC: SADR5 ;CONTROL C XFER ADDRESS
467 030063 254000 030674 ALTMGO: SADR6 ;ALTMODE XFER ADDRESS
468 030064 CPOPJ1: ;SKIP RETURN
469 030064 350 00 0 17 000000 UUOSKP: AOS (P) ;SKIP RETURN FROM UUO
470 030065 CPOPJ: ;NON-SKIP REGULAR RETURN
471 030065 263 17 0 00 000000 UUOEXT: RTN ;UUO RETURN
472 030066 255 00 0 00 000000 UUORTN: JFCL ;ADDITIONAL USERS UUO ROUTINE
473 030067 255 00 0 00 000000 $UORTX: JFCL ;ADDITIONAL UUO LINKAGE
474 030070 255 00 0 00 000000 $UUOER: JFCL ;INITED AS (JRST $UOERX)
475 030071 255 00 0 00 000000 $ITRHL: JFCL ;ADDITIONAL INTERRUPT LINKAGE
476 030072 255 00 0 00 000000 $ITRX1: JFCL ; "
477 030073 255 00 0 00 000000 $USRHL: JFCL ; "
478 030074 255 00 0 00 000000 $RSRTX: JFCL ;ADDITIONAL POWER FAIL LINKAGE
479 030075 255 00 0 00 000000 $RSRTY: JFCL ; "
480 030076 255 00 0 00 000000 RESRT1: JFCL ; INITED AS (JRST RESRTX)
481 030077 255 00 0 00 000000 RESRT2: JFCL ; "
482 030100 255 00 0 00 000000 $PARER: JFCL ;ADDITIONAL PARITY ERROR LINKAGE
483 030101 255 00 0 00 000000 ERMORE: JFCL ;ADDITIONAL ERROR HANDLER LINKAGE
484 030102 254 04 0 00 030102 HALT . ;IMPROPER TRANSFER HALT
485
486 030103 000000 000000 $PSHER: 0 ;INITED AS (JRST PSHERR)
487 030104 000000 000000 ITRCH1: 0 ;PC & FLAGS OF CURRENT INTERRUPT
488 030105 000000 000000 0 ;INITED AS (JRST $ITRC1)
489
490 S^;*********************************************************************^
491 ;*PROCESSOR CONTROL STORAGE
492 S^;*********************************************************************^
493
494 030106 000000 000000 $ACC0: 0 ;INTERRUPT SAVED AC0
495 030107 000000 000000 $SVPI: 0 ;INTERRUPT SAVED PI
496 030110 000000 000000 $SVAPR: 0 ;INTERRUPT SAVED APR
497 030111 000000 000000 $SVPAG: 0 ;INTERRUPT SAVED PAG (DATAI)
498 030112 000000 000000 $SPAG1: 0 ;INTERRUPT SAVED PAG (CONI)
499
500 030113 000000 000000 $SVUUO: 0 ;CURRENT USERS UUO
501 030114 000000 000000 $SVUPC: 0 ;PC OF CURRENT USERS UUO
502
503 030115 000000 000000 REPTU: 0 ;REPEAT UUO ITERATIONS
504 030116 000000 000000 SCOPE: 0 ;ERROR HANDLER SCOPE LOOP FLAG
505 030117 000000 000000 %CORFLG:0 ; " CORRECT FLAG
506 030120 000000 000000 %COREC: 0 ; " CORRECT DATA
507 030121 000000 000000 %ACTFL: 0 ; " ACTUAL FLAG
508 030122 000000 000000 %ACTUL: 0 ; " ACTUAL DATA
509 030123 000000 000000 %DISCR: 0 ; " DISCREPENCY DATA
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 4
FIXED KLM 19-Jul-77 16:36 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977 SEQ 0020
510 S^;*********************************************************************^
511 ;*UUO DISPATCH TABLE
512 S^;*********************************************************************^
513 XLIST
514 LIST
515 030124 030070 030070 UUODIS: LUUO1,,$UUOER
516 030125 030070 030070 LUUO3,,LUUO2
517 030126 030070 030070 LUUO5,,LUUO4
518 030127 030070 030070 LUUO7,,LUUO6
519 030130 030070 030070 LUUO11,,LUUO10
520 030131 030070 030070 LUUO13,,LUUO12
521 030132 030070 030070 LUUO15,,LUUO14
522 030133 030070 030070 LUUO17,,LUUO16
523 030134 030070 030070 LUUO21,,LUUO20
524 030135 030070 030070 LUUO23,,LUUO22
525 030136 030070 030070 LUUO25,,LUUO24
526 030137 030070 030070 LUUO27,,LUUO26
527 030140 030070 030070 LUUO31,,LUUO30
528 030141 030070 030070 LUUO33,,LUUO32
529
530 S^;*********************************************************************^
531 ;*MEMORY MANAGMENT STORAGE
532 S^;*********************************************************************^
533
534 030142 000000 000000 DF22F: 0 ;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
535 030143 000000 000000 MAPNEW: 0 ;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
536 030144 000000 000000 MEMTOT: 0 ;TOTAL MEMORY SIZE IN K (1024.)
537 030145 000000 000000 MEMLOW: 0 ;LOWEST USABLE MEMORY
538 030146 MEMSIZ: BLOCK ^D41 ;MEMORY SEGMENT POINTER TABLE
539
540 S^;*********************************************************************^
541 ;*PRINT CONTROL STORAGE
542 S^;*********************************************************************^
543
544 030217 000000 000000 PNTFLG: 0 ;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
545 030220 000000 000000 PNTENB: 0 ;PRINT ENABLE
546 030221 000000 000000 PDISF: 0 ;PRINT DISABLED FLAG
547 030222 000000 000000 PNTINH: 0 ;INHIBIT PRINT INPUT CHECKS
548 030223 000000 000000 PNTSPC: 0 ;PRINT SPACE CONTROL
549 030224 000000 000000 OPTIME: 0 ;TYPE-IN WAIT TIME
550 030225 000000 000000 $TWCNT: 0 ;TIME WAITED
551 030226 000000 000000 $DVOFF: 0 ;LOGICAL DEVICE INITED FLAG
552 030227 000000 000000 TTYFIL: 0 ;TTY EXEC FILLERS FLAG
553 030230 000000 000000 TTYSPD: 0 ;TTY EXEC BAUD RATE
554 030231 000000 000000 $TTCHR: 0 ;ACTUAL TYPED IN CHAR
555 030232 000000 000000 $CHRIN: 0 ;UPPER CASED & PARITY STRIPPED CHAR
556 030233 000000 000000 $TYPNB: 0 ;TYPED IN NUMBER
557 030234 000000 000000 $CRLF: 0 ;FREE CR/LF FLAG
558 030235 000000 000000 $TABF: 0 ;TAB CONVERSION FLAG
559 030236 000000 000000 $FFF: 0 ;FORM FEED CONVERSION FLAG
560 030237 000000 000000 $VTF: 0 ;VERTICAL TAB CONVERSION FLAG
561 030240 000000 000000 USRLFF: 0 ;USER LF FILLERS
562 030241 000000 000000 USRCRF: 0 ;USER CR FILLERS
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 5
FIXED KLM 19-Jul-77 16:36 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977 SEQ 0021
563 S^;*********************************************************************^
564 ;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
565 ;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
566 ;* MOVEI NAME
567 ;* PNTA ;OR PNTAF
568 S^;*********************************************************************^
569
570 030242 CRLF: ASCII/
571 030242 015 012 000 000 000 /
572 030243 CRLF2: ASCII/
573
574 030243 015 012 015 012 000 /
575 030244 054 000 000 000 000 COMMA: ASCII/,/
576 030245 056 000 000 000 000 PERIOD: ASCII/./
577 030246 040 000 000 000 000 SPACE: ASCII/ /
578 030247 011 000 000 000 000 TAB: ASCII/ /
579 030250 MINUS:
580 030250 055 000 000 000 000 HYPEN: ASCII/-/
581 030251 053 000 000 000 000 PLUS: ASCII/+/
582 030252 052 000 000 000 000 AST: ASCII/*/
583 030253 100 000 000 000 000 ATSIN: ASCII/@/
584 030254 050 000 000 000 000 LFP: ASCII/(/
585 030255 051 000 000 000 000 RTP: ASCII/)/
586 030256 007 0000000000 BELL: BYTE (7) 007
587 030257 077 000 000 000 000 QUEST: ASCII/?/
588 030260 057 000 000 000 000 SLASH: ASCII!/!
589 030261 044 000 000 000 000 DOLLAR: ASCII/$/
590 030262 000000 000012 RADIX: ^D10 ;DECIMAL PRINT RADIX
591 030263 000000 000040 RADLSP: 40 ;DECIMAL PRINT LEADING CHAR
592 030264 000000 000012 RADLSC: ^D10 ;DECIMAL PRINT LEADING CHAR COUNT
593
594 S^;*********************************************************************^
595 ;*USER MODE OUTPUT FILE INFORMATION
596 S^;*********************************************************************^
597
598 030265 $OBUF: BLOCK 3 ;LOGICAL FILE OUTPUT BUFFER HEADER
599 030270 60 62 51 56 64 00 $OUTNM: SIXBIT /PRINT/ ;FILE NAME
600 030271 60 56 64 00 00 00 $OUTEX: SIXBIT /PNT/ ;FILE NAME EXTENSION
601 030272 BLOCK 2
602
603 S^;*********************************************************************^
604 ;*DISK UPDATE MODE FILE INFORMATION
605 S^;*********************************************************************^
606
607 030274 $IBUF: BLOCK 3
608 030277 60 62 51 56 64 00 $INNM: SIXBIT /PRINT/
609 030300 60 56 64 00 00 00 $INEXT: SIXBIT /PNT/
610 030301 BLOCK 2
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 6
FIXED KLM 19-Jul-77 16:36 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977 SEQ 0022
611 S^;*********************************************************************^
612 ;*PUSHDOWN LIST CONTROL INFORMATION
613 S^;*********************************************************************^
614
615 030303 777577 030303 PLIST: PLIST-PLISTE,,PLIST
616 030304 PLISTS: BLOCK 200
617 030504 000000 000000 PLISTE: 0 ;END OF PUSHDOWN LIST
618
619 S^;*********************************************************************^
620 ;*POWER LINE CLOCK FREQUENCY FLAG
621 S^;*********************************************************************^
622
623 030505 000000 000000 CYCL60: 0 ;0 = 60, -1 = 50 CYCLE
624
625 S^;*********************************************************************^
626 ;*KL10 CACHE CONTROL FLAGS
627 S^;*********************************************************************^
628
629 030506 000000 000000 CSHFLG: 0 ;ALLOW CACHE IF 0
630 030507 000000 000000 CSHMEM: 0 ;CACHE MEMORY SEGMENTS IF 0
631
632 S^;*********************************************************************^
633 ;*NUMBER INPUT DIGIT FLAG
634 S^;*********************************************************************^
635
636 030510 000000 000000 TTNBRF: 0 ;-1 IF ANY DIGIT TYPED
637
638 S^;*********************************************************************^
639 ;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
640 S^;*********************************************************************^
641
642 030511 000000 000000 PVPAGI: 0 ;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
643
644 S^;*********************************************************************^
645 ;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
646 S^;*********************************************************************^
647
648 030512 000000 000000 %ERHI1: 0 ;IF NON-ZERO, XCT'D AT START OF %ERUUO
649 030513 000000 000000 %ERHI2: 0 ;IF NON-ZERO, XCT'D AT END OF %ERUUO
650 030514 000000 000000 %ERHI3: 0 ;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
651
652 S^;*********************************************************************^
653 ;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
654 S^;*********************************************************************^
655
656 030515 000000 000000 $$UUO: 0 ;IF NON-ZERO, XCT'D AT START OF $UORTN
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 7
FIXED KLM 19-Jul-77 16:36 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JULY 19,1977 SEQ 0023
657 S^;*********************************************************************^
658 ;*USER MODE MONITOR TYPE FLAG
659 S^;*********************************************************************^
660
661 030516 000000 000000 MONTYP: 0 ;0 = TOPS10, -1 = TOPS20
662
663 S^;*********************************************************************^
664 ;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
665 S^;*********************************************************************^
666
667 030517 000000 000000 $$MUUO: 0 ;IF NON-ZERO, XCT'D AT START OF MUUOER
668
669 S^;*********************************************************************^
670 ;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
671 S^;*********************************************************************^
672
673 030520 000000 000000 $$OUTER:0 ;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
674
675 S^;*********************************************************************^
676 ;*"SWITCH" CALL USAGE CONTROL
677 S^;*********************************************************************^
678
679 030521 000000 000000 $$TOGGLE:0 ;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
680
681 S^;*********************************************************************^
682 ;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
683 S^;*********************************************************************^
684
685 030522 000000 000000 $$TAX1: 0 ;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
686 030523 000000 000000 $$TAX2: 0 ;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
687
688 S^;*********************************************************************^
689 ;*SM10 (KS-10) PROCESSOR TYPE FLAG
690 S^;*********************************************************************^
691
692 030524 000000 000000 SM10: 0 ;IF -1 THIS IS A KS-10
693
694 S^;*********************************************************************^
695 ;*RIGHT HALF SWITCHES PROMPT TABLE ADDRESS
696 S^;*********************************************************************^
697
698 030525 000000 000000 SWPTAB: 0 ;0 = NO PROMPT, ADR = ADR OF SIXBIT PROMPT TABLE
699
700 S^;*********************************************************************^
701 ;*SPECIAL FUTURE EXPANSION ROOM
702 S^;*********************************************************************^
703
704 S^;*********************************************************************^
705 ;*END OF FIXED STORAGE
706 S^;*********************************************************************^
707
708 030577 LOC 30577
709 030577 000000 000000 ENDFIX: 0 ;END OF FIXED STORAGE
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 1
SPCCPU KLM 24-Oct-78 08:57 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0024
710 SUBTTL *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76
711
712 ;NEW DEFINITIONS USED BY THE KL10 SUBROUTINE PACKAGE
713
714 000000 AC0= 0
715 030000 DIAGNOS=30000 ;PDP-10 DIAGNOSTIC START ADDRESS
716 010000 DDT= 10000 ;PDP-10 DDT START ADDRESS
717 020000 DIAMON= 20000 ;PDP-10 DIAMON LOADER START ADDRESS
718 020000 DONG11= 1B22 ;11 DOORBELL (FROM THE 10)
719
720 ;DTE20 DEVICE CODES
721
722 000200 DTE== 200 ;DTE0
723 000204 DTE0== 204
724 000204 DTE1== 204
725 000210 DTE2== 210
726 000214 DTE3== 214
727
728 ;KL10 EPT COMMUNICATION AREA
729
730 000440 $STD= 440 ;PDP-10 DIAGNOSTIC START ADDRESS
731 000441 $DDT= 441 ;PDP-10 DDT START ADDRESS
732 000442 $STL= 442 ;PDP-10 LOADER START ADDRESS
733 000443 $STM= 443 ;PDP-10 MONITOR START ADDRESS
734
735 000444 $DTFLG= 444 ;DTE20 OPERATION COMPLETE FLAG
736 000445 $DTCLK= 445 ;DTE20 CLOCK INTERRUPT FLAG
737 000446 $DTCI= 446 ;DTE20 CLOCK INTERRUPT INSTRUCTION
738 000447 $DTT11= 447 ;DTE20 10 TO 11 ARGUMENT
739 000450 $DTF11= 450 ;DTE20 11 TO 10 ARGUMENT
740 000451 $DTCMD= 451 ;DTE20 TO 11 COMMAND WORD
741 000452 $DTSEQ= 452 ;DTE20 OPERATION SEQUENCE NUMBER
742 000453 $DTOPR= 453 ;DTE20 OPERATIONAL DTE #
743 000454 $DTCHR= 454 ;DTE20 LAST TYPED CHARACTER
744 000455 $DTMTD= 455 ;DTE20 MONITOR TTY OUTPUT COMPLETE FLAG
745 000456 $DTMTI= 456 ;DTE20 MONITOR TTY INPUT FLAG
746
747 000457 $DTSWR= 457 ;DTE20 CONSOLE SWITCH REGISTER
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 2
SPCCPU KLM 24-Oct-78 08:57 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0025
748 ;SPECIAL "FIXED" REASSIGNMENTS
749
750 030600 $$LOC=. ;SAVE CURRENT LOCATION
751
752 030000 LOC 30000
753 030000 254 00 0 00 030600 $$BEGIN:JRST $$START ;SETUP SPECIAL START
754 030001 254 00 0 00 030600 JRST $$START ;"DIAMON" CHAIN START ADDRESS
755
756 000440 LOC 440
757 000440 254 00 0 00 030000 $STD: JRST BEGIN ;SETUP FOR "STD"
758 000443 LOC 443
759 000443 254 00 0 00 030626 $STM: JRST $SPEC ;SIMPLE RUN CONTROL
760
761 030057 LOC 30057
762 030057 254 00 0 00 030631 $BEGEND:JRST $SPBEND ;SETUP SPECIAL "BEGEND"
763
764 ;SPECIAL MUUO, TRAP & PAGE FAIL SETUP
765
766 000420 LOC 420
767 000420 254 04 0 00 000420 $$420: HALT . ;KI10 PAGE FAIL
768 000421 255 00 0 00 000000 $$421: JFCL ;OVERFLOW
769 000422 254 04 0 00 000422 $$422: HALT . ;PUSHDOWN OVERFLOW
770 000423 254 04 0 00 000423 $$423: HALT . ;TRAP 3
771 000424 000000 000000 $$424: 0 ;MMUO
772 000425 000000 000000 $$425: 0 ;MMUO PC
773 000426 000000 000000 $$426: 0 ;KI10-PAGE FAIL, KL10-PROCESS CONTEXT
774 000427 254 04 0 00 000427 $$427: HALT .
775 000430 000000 000427 $$430: 427 ;MMUO NEW PC'S
776 000431 000000 000427 $$431: 427
777 000432 000000 000427 $$432: 427
778 000433 000000 000427 $$433: 427
779 000434 000000 000427 $$434: 427
780 000435 000000 000427 $$435: 427
781 000436 000000 000427 $$436: 427
782 000437 000000 000427 $$437: 427
783
784 000500 LOC 500
785 000500 000000 000000 $$500: 0 ;KL10 PAGE FAIL WORD
786 000501 000000 000000 $$501: 0 ;KL10 PAGE FAIL PC
787 000502 000000 000503 $$502: 503 ;KL10 PAGE FAIL NEW PC
788 000503 254 04 0 00 000503 $$503: HALT .
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 3
SPCCPU KLM 24-Oct-78 08:57 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0026
789 030600 LOC $$LOC ;RESET CURRENT LOCATION
790
791 ;SPECIAL STARTUP SEQUENCE
792
793 030600 402 00 0 00 030037 $$START:SETZM USER
794 030601 265 00 0 00 030602 JSP 0,.+1 ;IN USER MODE ?
795 030602 603 00 0 00 010000 TLNE 0,USERF
796 030603 476 00 0 00 030037 SETOM USER ;YES, SET CONTROL WORD
797 030604 336 00 0 00 030042 SKIPN MONFLG ;SPECIAL USER MODE ?
798 030605 402 00 0 00 030037 SETZM USER ;YES, RUN AS EXEC
799 030606 332 00 0 00 030037 SKIPE USER
800 030607 254 00 0 00 030674 JRST START ;USER MODE, DON'T NEED CPU TYPE
801
802 030610 336 00 0 00 030044 $STKIL: SKIPN MONTEN ;LOADED BY "DIAMON" ?
803 030611 476 00 0 00 030024 SETOM ITRCNT ;NO, RUN FOREVER
804 030612 402 00 0 00 030041 SETZM KLFLG ;ASSUME KI10
805 030613 200 01 0 00 033460 MOVE 1,[1,,1]
806 030614 251 01 0 00 000001 BLT 1,1 ;HOPE THIS WORKS
807 030615 316 01 0 00 033460 CAMN 1,[1,,1] ;IF AC NE 1,,1 AFTER BLT, KL10
808 030616 254 00 0 00 030674 JRST START ;KI10, NO ADDITIONAL SETUP
809
810 030617 402 00 0 00 000444 $STKL: SETZM $DTFLG
811 030620 402 00 0 00 000445 SETZM $DTCLK
812 030621 200 00 0 00 000453 MOVE $DTOPR ;GET DTE #
813 030622 436 00 0 00 030657 ORM $$DTE0 ;INSERT IN DTE I/O INSTS
814 030623 436 00 0 00 030670 ORM $$DTE2
815 030624 476 00 0 00 030041 SETOM KLFLG ;SET KL10 CONTROL FLAG
816 030625 254 00 0 00 030674 JRST START
817
818 030626 200 00 0 00 033461 $SPEC: MOVE [JRST STARTA] ;SIMPLE RUN CONTROL
819 030627 202 00 0 00 030633 MOVEM $SPB1
820 030630 254 00 0 00 030674 JRST START
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 4
SPCCPU KLM 24-Oct-78 08:57 *SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76 SEQ 0027
821 ;SPECIAL "BEGEND" ROUTINE
822
823 030631 350 00 0 00 030047 $SPBEND:AOS PASCNT ;INCREMENT PASS COUNT
824 030632 370 00 0 00 030024 SOS ITRCNT ;DECREMENT ITERATION COUNT
825 030633 336 00 0 00 030037 $SPB1: SKIPN USER
826 030634 254 00 0 00 030642 JRST $SPBEX ;EXEC MODE
827
828 030635 332 00 0 00 030024 $SPBUS: SKIPE ITRCNT ;USER MODE, COMPLETED ?
829 030636 254 00 0 00 030723 JRST STARTA ;NO, KEEP RUNNING
830 030637 336 00 0 00 030044 SKIPN MONTEN ;DONE, LOADED BY "DIAMON" ?
831 030640 047 00 0 00 000012 EXIT ;NO, RETURN TO MONITOR
832 030641 254 00 1 00 030012 JRST @RETURN ;YES, RETURN TO "DIAMON"
833
834 030642 332 00 0 00 030041 $SPBEX: SKIPE KLFLG
835 030643 254 00 0 00 030650 JRST $SPBKL ;KL10 & EXEC
836 030644 7 004 14 0 00 030024 DATAO PI,ITRCNT ;KI10 & EXEC, DISPLAY ITER COUNT
837 030645 332 00 0 00 030024 SKIPE ITRCNT
838 030646 254 00 0 00 030723 JRST STARTA ;NOT COMPLETED YET
839 030647 254 00 1 00 030012 JRST @RETURN ;DONE
840
841 030650 336 00 0 00 030024 $SPBKL: SKIPN ITRCNT
842 030651 254 00 0 00 030663 JRST $SPKLD ;KL10, EXEC & COMPLETED
843
844 030652 335 00 0 00 030043 SKIPGE MONCTL
845 030653 254 00 0 00 030723 JRST STARTA ;"DIAMON" CONTROL
846 030654 201 00 0 00 000404 MOVEI 0,404 ;NOTIFY PDP-11 OF END OF PASS
847 030655 202 00 0 00 000451 MOVEM 0,$DTCMD
848 030656 402 00 0 00 000444 SETZM $DTFLG
849 030657 7 200 20 0 00 020000 $$DTE0: CONO DTE,DONG11
850 030660 336 00 0 00 000444 SKIPN $DTFLG ;WAIT TILL 11 RESPONDS
851 030661 254 00 0 00 030660 JRST .-1
852 030662 254 00 0 00 030723 JRST STARTA ;KEEP RUNNING
853
854 ;SPECIAL KL10 COMPLETED ROUTINE
855
856 030663 332 00 0 00 030044 $SPKLD: SKIPE MONTEN
857 030664 254 00 1 00 030012 JRST @RETURN ;LOADED BY "DIAMON"
858
859 030665 201 00 0 00 000403 MOVEI 0,403 ;NOTIFY PDP-11 OF COMPLETION
860 030666 202 00 0 00 000451 MOVEM 0,$DTCMD
861 030667 402 00 0 00 000444 SETZM $DTFLG
862 030670 7 200 20 0 00 020000 $$DTE2: CONO DTE,DONG11
863 030671 336 00 0 00 000444 SKIPN $DTFLG ;SHOULD NEVER HAPPEN
864 030672 254 00 0 00 030671 JRST .-1 ;11 NEVER RETURNS ON END OF PROGRAM
865 030673 254 04 0 00 030000 HALT BEGIN ;IF IT DOES, HALT.
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 1
DAKAEM MAC 28-Dec-78 13:35 DIAGNOSTIC SECTION SEQ 0028
866 SUBTTL DIAGNOSTIC SECTION
867
868 030674 402 00 0 00 030037 START: SETZM USER# ;CLEAR USER CONTROL WORD
869 030675 265 00 0 00 030676 JSP 0,.+1 ;GET FLAGS
870 030676 603 00 0 00 010000 TLNE USERF ;IN USER MODE?
871 030677 476 00 0 00 030037 SETOM USER ;YES, SET USER CONTROL WORD
872 030700 336 00 0 00 030042 SKIPN MONFLG ;SPECIAL USER MODE?
873 030701 402 00 0 00 030037 SETZM USER ;YES, CLEAR USER CONTROL WORD
874 030702 336 00 0 00 030037 SKIPN USER
875 030703 254 00 0 00 030723 JRST STARTA
876 030704 331 00 0 00 030043 SKIPL MONCTL
877 030705 051 03 0 00 030707 TTCALL 3,PGMNAM ;MENTION OUR NAME
878 030706 254 00 0 00 030723 JRST STARTA
879
880 030707 PGMNAM: ASCIZ/
881 030707 015 012 120 104 120 PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) [DAKAE]
882 030710 055 061 060 040 113
883 030711 101 061 060 040 102
884 030712 101 123 111 103 040
885 030713 111 116 123 124 122
886 030714 125 103 124 111 117
887 030715 116 040 104 111 101
888 030716 107 116 117 123 124
889 030717 111 103 040 050 065
890 030720 051 040 133 104 101
891 030721 113 101 105 135 015
892 030722 012 000 000 000 000 /
893
894
895 ;THE TEST IS DESIGNED FOR INITIAL DEBUGGING OF
896 ;PROCESSOR HARDWARE AND TO DETECT (SOLID) FAILURES
897 ;IN THE FIELD.
898
899 030723 254 00 0 00 030724 STARTA: JRST .+1
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 2
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSR INSTRUCTION SEQ 0029
900 SUBTTL TEST OF JSR INSTRUCTION
901
902 ;**********
903
904 ;THIS TEST VERIFIES THAT JSR STORES THE FLAGS AND PC IN LOCATION E.
905 ;IN THIS CASE, E IS CLEARED, CRY0 IS SET AND JSR IS EXECUTED.
906 ;NEXT, E IS CHECKED FOR ITS CONTENTS NON-ZERO. IF C(E) IS NON-ZERO,
907 ;THIS TEST PASSES.
908
909 030724 C23000: SFLAG CRY0 ^;SET CRY0 FLAG
910
911 030724 205 01 0 00 200000 MOVSI 1,CRY0
912 030725 255 17 0 00 030726 JFCL 17,.+1 ;RESET ALL FLAGS
913 030726 254 02 0 01 030727 JRST 2,.+1(1) ;SET CRY0 FLAG
914 030727 402 00 0 00 030731 SETZM .+2 ;PRELOAD E WITH 0
915 030730 264 00 0 00 030731 JSR .+1 ;*JSR SHOULD PLACE FLAGS AND PC INTO AC
916 030731 000000 000000 0 ;E: PRESET TO 0, SHOULD RECEIVE FLAGS AND PC FROM JSR
917 030732 336 00 0 00 030731 SKIPN .-1 ;PASS IF C(E) IS NON-ZERO.
918 STOP^
919 030733 254 04 0 00 030734 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
920 030734 324 00 0 00 030735 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
921 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
922 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
923 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
924
925 ;**********
926
927 ;THIS TEST VERIFIES THAT JSR IGNORES THE AC FIELD;
928 ;HENCE, IT DOES NOT MODIFY THE SPECIFIED AC.
929 ;IN THIS CASE, CRY0 IS SET. THE AC IS PRELOADED WITH -1,,-1 AND JSR IS EXECUTED.
930 ;THE AC IS THEN CHECKED. IF C(AC)=-1,,-1, THIS TEST PASSES.
931
932 030735 C23100: SFLAG CRY0 ^;SET CRY0
933
934 030735 205 01 0 00 200000 MOVSI 1,CRY0
935 030736 255 17 0 00 030737 JFCL 17,.+1 ;RESET ALL FLAGS
936 030737 254 02 0 01 030740 JRST 2,.+1(1) ;SET CRY0 FLAG
937 030740 474 01 0 00 000000 SETO 1, ;PRELOAD AC WITH -1,,-1
938 030741 264 01 0 00 030742 JSR 1,.+1 ;*JSR SHOULD NOT MODIFY THE AC
939 030742 000000 000000 0 ;STORE PC + FLAGS HERE
940 030743 312 01 0 00 033462 CAME 1,[-1] ;PASS IF C(AC)=-1,,-1
941 STOP^
942 030744 254 04 0 00 030745 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
943 030745 324 00 0 00 030746 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
944 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
945 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
946 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
947
948 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 3
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSR INSTRUCTION SEQ 0030
949 ;THIS TEST VERIFIES THAT JSR STORES THE FLAGS IN E-LEFT HALF.
950 ;IN THIS TEST, CRY0 IS SET, E IS CLEARED AND JSR IS EXECUTED.
951 ;NEXT, C(E-LEFT) ARE PLACED INTO AC0 AND AC0 IS CHECKED FOR ITS CONTENTS NON-ZERO.
952 ;IF C(AC0) ARE NON-ZERO, THIS TEST PASSES.
953
954 030746 C23200: SFLAG CRY0 ^;SET CRY0
955
956 030746 205 01 0 00 200000 MOVSI 1,CRY0
957 030747 255 17 0 00 030750 JFCL 17,.+1 ;RESET ALL FLAGS
958 030750 254 02 0 01 030751 JRST 2,.+1(1) ;SET CRY0 FLAG
959 030751 402 00 0 00 030753 SETZM .+2 ;CLEAR E
960 030752 264 00 0 00 030753 JSR .+1 ;*JSR SHOULD STORE FLAGS IN E
961 030753 000000 000000 0 ;STORE FLAGS HERE (CRY0 MAKES THIS A MOVE INST)
962 030754 510 00 0 00 030753 HLLZ .-1 ;PUT FLAGS INTO AC0
963 030755 336 00 0 00 000000 SKIPN ;PASS IF C(AC0) NON-ZERO
964 STOP^
965 030756 254 04 0 00 030757 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
966 030757 324 00 0 00 030760 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
967 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
968 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
969 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
970
971 ;**********
972
973 ;THIS TEST VERIFIES THAT JSR TRANSFERS CONTROL TO E+1.
974 ;IN THIS CASE, CRY0 IS SET AND E AND AC0 CLEARED; THEN, JSR IS EXECUTED.
975 ;IF JSR RESUMES CONTROL AT E INSTEAD OF E+1, AC0 WILL BE MODIFIED;
976 ;HENCE, THE TEST WILL FAIL WHEN AC0 IS CHECKED FOR 0 BECAUSE
977 ;C(E) IS DECODED AS A MOVE INSTRUCTION.
978
979 030760 C23300: SFLAG CRY0 ^;SET CRY0
980
981 030760 205 01 0 00 200000 MOVSI 1,CRY0
982 030761 255 17 0 00 030762 JFCL 17,.+1 ;RESET ALL FLAGS
983 030762 254 02 0 01 030763 JRST 2,.+1(1) ;SET CRY0 FLAG
984 030763 403 00 0 00 030765 SETZB .+2 ;CLEAR AC0 AND E
985 030764 264 00 0 00 030765 JSR .+1 ;*JSR SHOULD RESUME CONTROL AT E+1
986 030765 000000 000000 0 ;STORE FLAGS HERE (CRY0 MAKES THIS A MOVE INST)
987 030766 332 00 0 00 000000 SKIPE 0 ;PASS IF C(AC0)=0
988 STOP^
989 030767 254 04 0 00 030770 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
990 030770 324 00 0 00 030771 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
991 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
992 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
993 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
994
995 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 4
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSR INSTRUCTION SEQ 0031
996 ;THIS TEST VERIFIES THAT JSR JUMPS TO E+1
997 ;IN THIS CASE, AC0 IS CLEARED AND CRY0 IS SET; THEN, JSR .+2 IS EXECUTED.
998 ;IF JSR DID NOT JUMP, ONES ARE LOADED WITH AC0; AND THE TEST FAILS.
999 ;OTHERWISE, AC0 REMAINS CLEAR AND THE TEST PASSES
1000
1001 030771 C23400: SFLAG CRY0 ^;SET CRY0
1002
1003 030771 205 01 0 00 200000 MOVSI 1,CRY0
1004 030772 255 17 0 00 030773 JFCL 17,.+1 ;RESET ALL FLAGS
1005 030773 254 02 0 01 030774 JRST 2,.+1(1) ;SET CRY0 FLAG
1006 030774 400 00 0 00 000000 SETZ ;CLEAR AC0
1007 030775 264 00 0 00 030777 JSR .+2 ;*JSR SHOULD JUMP
1008 030776 474 00 0 00 000000 SETO ;LOAD AC0 WITH ONES IF JSR FAILED TO JUMP
1009 030777 000000 000000 0 ;STORE FLAGS HERE
1010 031000 332 00 0 00 000000 SKIPE ;PASS IF JSR JUMPED CORRECTLY
1011 STOP^
1012 031001 254 04 0 00 031002 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1013 031002 324 00 0 00 031003 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1014 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1015 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1016 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1017
1018 ;**********
1019
1020 ;THIS TEST VERIFIES THAT JSR STORES THE PC IN E - RIGHT HALF. THE PC
1021 ;IS ONE GREATER THAN THE LOCATION OF THE JSR INSTRUCTION.
1022 ;THIS TEST WILL FAIL IF JSR STORES E INSTEAD OF PC IN E - RIGHT HALF.
1023 ;IN CASE OF FAILURE, AR PC EN AT ET2 WAS FAULTY.
1024
1025 031003 C23500: SFLAG 0 ^;CLEAR ALL FLAGS
1026
1027 031003 205 01 0 00 000000 MOVSI 1,0
1028 031004 255 17 0 00 031005 JFCL 17,.+1 ;RESET ALL FLAGS
1029 031005 254 02 0 01 031006 JRST 2,.+1(1) ;SET 0 FLAG
1030 031006 264 00 0 00 031010 JSR .+2 ;*JSR SHOULD STORE PC+1 IN E - RIGHT
1031 031007 254 04 0 00 031007 HALT . ;JSR SHOULD SKIP OVER THIS HALT
1032 031010 000000 000000 0 ;STORE FLAGS AND PC HERE
1033 031011 550 00 0 00 031010 HRRZ .-1 ;PUT STORED CONTENTS OF E - RIGHT INTO AC0
1034 031012 306 00 0 00 031010 CAIN .-2 ;FAIL IF C(AC0)=E
1035 STOP^
1036 031013 254 04 0 00 031014 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1037 031014 324 00 0 00 031015 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1038 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1039 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1040 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1041
1042 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 5
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSR INSTRUCTION SEQ 0032
1043 ;THIS TEST VERIFIES THAT JSR STORES THE PC IN E - RIGHT HALF. THE PC
1044 ;IS ONE GREATER THAN THE LOCATION OF THE JSR INSTRUCTION.
1045 ;THIS TEST WILL PASS IF JSR STORES PC IN E - RIGHT HALF.
1046
1047 031015 264 00 0 00 031017 C23600: JSR .+2 ;*JSR SHOULD STORE PC+1 IN E - RIGHT
1048 031016 254 04 0 00 031016 HALT . ;JSR SHOULD SKIP OVER THIS HALT
1049 031017 000000 000000 0 ;STORE FLAGS AND PC HERE
1050 031020 550 00 0 00 031017 HRRZ .-1 ;PUT STORED CONTENTS OF E - RIGHT INTO AC0
1051 031021 302 00 0 00 031016 CAIE C23600+1 ;PASS IF C(AC0)=C23600+1 [PC]
1052 STOP^
1053 031022 254 04 0 00 031023 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1054 031023 324 00 0 00 031024 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1055 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1056 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1057 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1058
1059 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 6
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSA INSTRUCTION SEQ 0033
1060 SUBTTL TEST OF JSA INSTRUCTION
1061
1062 ;**********
1063
1064 ;THIS TEST VERIFIES THAT JSA JUMPS TO LOCATION E+1.
1065 ;IN THIS TEST, AC1 IS CLEARED AND A CAM 0,0 IS LOADED
1066 ;INTO THE AC OF THE JSA INSTRUCTION.
1067 ;IF JSA DOES NOT JUMP, AC1 WILL BE LOADED WITH ONES. AC1 IS CHECKED FOR ZEROS.
1068 ;IF C(AC1)=0, THE TEST PASSES; OTHERWISE, THIS TEST FAILS BECAUSE JSA DID NOT JUMP.
1069
1070 031024 400 01 0 00 000000 C23700: SETZ 1, ;CLEAR AC1
1071 031025 200 00 0 00 033463 MOVE [CAM] ;LOAD CAM INTO AC0
1072 031026 266 00 0 00 031030 JSA .+2 ;*JSA SHOULD JUMP TO E+1
1073 031027 474 00 0 00 000001 SETO 1 ;JSA SHOULD JUMP OVER THIS INSTRUCTION
1074 031030 000000 000000 0 ;PASS IF JSA JUMPED
1075 031031 332 00 0 00 000001 SKIPE 1
1076 STOP^
1077 031032 254 04 0 00 031033 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1078 031033 324 00 0 00 031034 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1079 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1080 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1081 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1082
1083 ;**********
1084
1085 ;THIS TEST VERIFIES THAT JSA JUMPS TO LOCATION E+1.
1086 ;IN THIS TEST, AC1 IS CLEARED AND A MOVEI 1,1234 IS LOADED
1087 ;INTO THE AC OF THE JSA INSTRUCTION.
1088 ;IF JSA DOES NOT JUMP, AC1 WILL BE LOADED WITH 0,,1234. AC1 IS CHECKED FOR ZEROS.
1089 ;IF C(AC1)=0, THE TEST PASSES; OTHERWISE, THIS TEST FAILS BECAUSE JSA DID NOT JUMP.
1090
1091 031034 400 01 0 00 000000 C24000: SETZ 1, ;CLEAR AC1
1092 031035 200 00 0 00 033464 MOVE [MOVEI 1,1234] ;LOAD MOVEI 1,1234 INTO AC
1093 031036 266 00 0 00 031037 JSA .+1 ;*JSA SHOULD JUMP TO E+1
1094 031037 000000 000000 0 ;JSA SHOULD JUMP OVER THIS LOCATION
1095 031040 306 01 0 00 001234 CAIN 1,1234 ;FAIL IF JSA DID NOT JUMP OVER PREVIOUS INSTRUCTION
1096 STOP^
1097 031041 254 04 0 00 031042 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1098 031042 324 00 0 00 031043 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1099 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1100 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1101 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1102
1103 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 7
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSA INSTRUCTION SEQ 0034
1104 ;THIS TEST VERIFIES THAT JSA LOADS PC OF LOC OF JSA+1 INTO AC RIGHT.
1105 ;THIS TEST WILL FAIL IF JSA LOADS E INTO AC RIGHT INSTEAD OF PC.
1106
1107 031043 266 00 0 00 031045 C24100: JSA .+2 ;*JSA SHOULD LOAD PC INTO AC RIGHT
1108 031044 254 04 0 00 031044 HALT . ;JSA SHOULD JUMP OVER THIS LOCATION
1109 031045 000000 000000 0 ;JSA SHOULD JUMP OVER THIS LOCATION
1110 031046 552 00 0 00 000001 HRRZM 1 ;PUT C(AC-RIGHT) INTO AC1
1111 031047 306 01 0 00 031045 CAIN 1,.-2 ;FAIL IF E WAS LOADED INTO AC-RIGHT INSTEAD OF PC
1112 STOP^
1113 031050 254 04 0 00 031051 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1114 031051 324 00 0 00 031052 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1115 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1116 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1117 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1118
1119 ;**********
1120
1121 ;THIS TEST VERIFIES THAT JSA PLACES C(AC) INTO E
1122 ;THIS TEST WILL FAIL IF EITHER 0,,E OR 0,,PC IS LOADED
1123 ;INTO E INSTEAD OF C(AC)
1124
1125 031052 403 00 0 00 031054 C24200: SETZB .+2 ;CLEAR AC,E
1126 031053 266 00 0 00 031054 JSA .+1 ;*JSA SHOULD LOAD C(AC) [ZEROS] INTO E
1127 031054 000000 000000 0 ;JSA SHOULD PLACE ZEROS HERE
1128 031055 200 01 0 00 031054 MOVE 1,.-1 ;SAVE C(AC)
1129 031056 306 01 0 00 031054 CAIN 1,.-2 ;FAIL IF JSA LOADED 0,,E OR 0,,PC INTO E
1130 STOP^
1131 031057 254 04 0 00 031060 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1132 031060 324 00 0 00 031061 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1133 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1134 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1135 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1136
1137 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 8
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSA INSTRUCTION SEQ 0035
1138 ;THIS TEST VERIFIES THAT JSA PLACES PC INTO AC-RIGHT
1139 ;THIS TEST WILL FAIL IF PC IS NOT LOADED INTO AC-RIGHT
1140
1141 031061 201 00 0 00 777777 C24300: MOVEI -1 ;PRELOAD AC WITH 0,,-1
1142 031062 266 00 0 00 031063 JSA .+1 ;*JSA SHOULD PLACE E,,PC INTO THE AC
1143 031063 000000 000000 0 ;JSA SHOULD PLACE C(AC) HERE
1144 031064 606 00 0 00 777777 TRNN -1 ;FAIL IF AR LT AR RT EN FAILED
1145 STOP^
1146 031065 254 04 0 00 031066 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1147 031066 324 00 0 00 031067 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1148 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1149 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1150 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1151
1152 ;**********
1153
1154 ;THIS TEST VERIFIES THAT JSA PLACES THE PC OF THE LOCATION OF JSA+1 IN AC-RIGHT
1155 ;THIS TEST FAILS IF A PC WAS NOT LOADED INTO AC RIGHT
1156
1157 031067 400 00 0 00 000000 C24400: SETZ ;CLEAR AC
1158 031070 266 00 0 00 031071 JSA .+1 ;*JSA SHOULD LOAD PC INTO AC - RIGHT
1159 031071 000000 000000 0 ;JSA SHOULD PLACE C(AC) HERE
1160 031072 606 00 0 00 777777 TRNN -1 ;PASS IF AC - RIGHT IS NON-ZERO
1161 STOP^
1162 031073 254 04 0 00 031074 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1163 031074 324 00 0 00 031075 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1164 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1165 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1166 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1167
1168 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 9
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSA INSTRUCTION SEQ 0036
1169 ;THIS TEST VERIFIES THAT JSA PLACES IN AC-LEFT
1170 ;THIS TEST FAILS IF JSA LOADS PC INSTEAD OF E INTO AC-LEFT
1171
1172 031075 266 00 0 00 031077 C24500: JSA .+2 ;*JSA SHOULD LOAD E INTO AC-LEFT
1173 031076 254 04 0 00 031076 HALT . ;JSA SHOULD JUMP OVER THIS INSTRUCTION
1174 031077 000000 000000 0 ;E:
1175 031100 556 00 0 00 000001 HLRZM 1 ;SAVE C(AC - LEFT)
1176 031101 306 01 0 00 031076 CAIN 1,.-3 ;FAIL IF JSA LOADED PC INSTEAD OF E INTO AC-LEFT
1177 STOP^
1178 031102 254 04 0 00 031103 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1179 031103 324 00 0 00 031104 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1180 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1181 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1182 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1183
1184 ;**********
1185
1186 ;THIS TEST VERIFIES THAT JSA LOADS E,,PC INTO THE AC
1187 ;FIRST, THE AC IS PRELOADED WITH -1,,-1; THEN, JSA IS EXECUTED.
1188 ;THE AC IS CHECKED FOR E,,PC. IF C(AC)=E,,PC, THIS TEST PASSES
1189
1190 031104 474 00 0 00 000000 C24600: SETO ;PRELOAD AC WITH -1,,-1
1191 031105 266 00 0 00 031107 JSA .+2 ;*JSA SHOULD PLACE E,,PC INTO THE AC
1192 031106 254 04 0 00 031106 HALT . ;JSA SHOULD JUMP OVER HERE, PC:
1193 031107 000000 000000 0 ;JSA SHOULD STORE C(AC) HERE, E:
1194 031110 312 00 0 00 033465 CAME [XWD .-1,.-2] ;PASS IF C(AC)=E,,PC
1195 STOP^
1196 031111 254 04 0 00 031112 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1197 031112 324 00 0 00 031113 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1198 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1199 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1200 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1201
1202 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 10
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSA INSTRUCTION SEQ 0037
1203 ;THIS TEST VERIFIES THAT JSA LOADS E,,PC INTO THE AC
1204 ;FIRST, THE AC IS PRELOADED WITH 0 JSA IS EXECUTED.
1205 ;THE AC IS CHECKED FOR E,,PC. IF C(AC)=E,,PC, THIS TEST PASSES
1206
1207 031113 400 00 0 00 000000 C24700: SETZ ;PRELOAD AC WITH 0
1208 031114 266 00 0 00 031116 JSA .+2 ;*JSA SHOULD PLACE E,,PC INTO THE AC
1209 031115 254 04 0 00 031115 HALT . ;JSA SHOULD JUMP OVER HERE, PC:
1210 031116 000000 000000 0 ;JSA SHOULD STORE C(AC) HERE, E:
1211 031117 312 00 0 00 033466 CAME [XWD .-1,.-2] ;PASS IF C(AC)=E,,PC
1212 STOP^
1213 031120 254 04 0 00 031121 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1214 031121 324 00 0 00 031122 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1215 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1216 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1217 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1218
1219 ;**********
1220
1221 ;THIS TEST VERIFIES THAT JSA LOADS C(AC) INTO E.
1222 ;AC IS FIRST CLEARED AND E IS PRELOADED WITH ONES;
1223 ;THEN JSA IS EXECUTED. E IS CHECKED FOR ZEROS. IF C(E)=0,
1224 ;THIS TEST PASSES.
1225
1226 031122 400 00 0 00 000000 C25000: SETZ ;CLEAR AC
1227 031123 476 00 0 00 031125 SETOM .+2 ;PRELOAD E WITH -1,,-1
1228 031124 266 00 0 00 031125 JSA .+1 ;*JSA SHOULD PLACE C(AC) INTO E
1229 031125 000000 000000 0 ;E: SHOULD GET C(AC) FROM JSA
1230 031126 332 00 0 00 031125 SKIPE .-1 ;PASS IF C(E)=0
1231 STOP^
1232 031127 254 04 0 00 031130 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1233 031130 324 00 0 00 031131 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1234 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1235 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1236 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1237
1238 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 11
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSA INSTRUCTION SEQ 0038
1239 ;THIS TEST VERIFIES THAT JSA LOADS C(AC) INTO E.
1240 ;AC IS FIRST PRELOADED WITH -1,,-1 AND E IS CLEARED;
1241 ;THEN, JSA IS EXECUTED. E IS CHECKED FOR -1,,-1. IF C(E)=-1,,-1,
1242 ;THIS TEST PASSES.
1243
1244 031131 477 00 0 00 000001 C25100: SETOB 1 ;PRELOAD AC -1,,-1
1245 031132 402 00 0 00 031134 SETZM .+2 ;PRELOAD E WITH 0
1246 031133 266 00 0 00 031134 JSA .+1 ;*JSA SHOULD PLACE C(AC) INTO E
1247 031134 000000 000000 0 ;E: SHOULD GET C(AC) FROM JSA
1248 031135 312 01 0 00 031134 CAME 1,.-1 ;PASS IF C(E)=-1,,-1
1249 STOP^
1250 031136 254 04 0 00 031137 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1251 031137 324 00 0 00 031140 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1252 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1253 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1254 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1255
1256 ;**********
1257
1258 ;THIS TEST VERIFIES THAT JSA LOADS C(AC) INTO E.
1259 ;AC IS FIRST CLEARED AND E IS PRELOADED WITH ONES;
1260 ;THEN JSA IS EXECUTED. E IS CHECKED FOR ZEROS. IF C(E)=0,
1261 ;THIS TEST PASSES.
1262
1263 031140 201 00 0 00 777777 C25200: MOVEI -1 ;PRELOAD AC WITH 0,,-1
1264 031141 266 00 0 00 031142 JSA .+1 ;*JSA SHOULD PLACE C(AC) INTO E
1265 031142 000000 000000 0 ;E: SHOULD GET C(AC) FROM JSA
1266 031143 200 01 0 00 031142 MOVE 1,.-1 ;PASS IF C(E)=0,,-1
1267 031144 302 01 0 00 777777 CAIE 1,-1
1268 STOP^
1269 031145 254 04 0 00 031146 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1270 031146 324 00 0 00 031147 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1271 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1272 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1273 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1274
1275 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 12
DAKAEM MAC 28-Dec-78 13:35 TEST OF JSA INSTRUCTION SEQ 0039
1276 ;THIS TEST VERIFIES THAT JSA DOES NOT MODIFY AC+1
1277 ;IN THIS TEST, AC+1 IS PRELOADED WITH -1,,-1; THEN JSA IS EXECUTED
1278 ;AC+1 IS THEN CHECKED FOR ITS ORIGINAL CONTENTS, -1,,-1.
1279 ;IF C(AC+1)=-1,,-1, THIS TEST PASSES
1280
1281 031147 476 00 0 00 000001 C25300: SETOM 1 ;PRELOAD AC+1 WITH -1,,-1
1282 031150 266 00 0 00 031151 JSA .+1 ;*JSA SHOULD NOT MODIFY AC+1
1283 031151 310 00 0 00 000000 CAM ;JSA SHOULD JUMP OVER THIS, E:PC:
1284 031152 312 01 0 00 033462 CAME 1,[-1] ;PASS IF AC+1 WAS NOT MODIFIED BY JSA
1285 STOP^
1286 031153 254 04 0 00 031154 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1287 031154 324 00 0 00 031155 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1288 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1289 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1290 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1291
1292 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 13
DAKAEM MAC 28-Dec-78 13:35 TEST OF JRA INSTRUCTION SEQ 0040
1293 SUBTTL TEST OF JRA INSTRUCTION
1294
1295 ;**********
1296
1297 ;THIS TEST VERIFIES THAT JRA TRANSFERS CONTROL TO LOCATION E
1298 ;THIS TEST FAILS IF JRA DOES NOT JUMP TO E.
1299
1300 031155 200 00 0 00 033467 C25400: MOVE [JRST .+4] ;PRELOAD AC0 WITH JRST .+4
1301 031156 205 01 0 00 031160 MOVSI 1,.+2 ;PRELOAD AC WITH E,,0
1302 031157 267 01 0 00 031160 JRA 1,.+1 ;*JRA SHOULD JUMP TO NEXT INSTRUCTION
1303 031160 334 00 0 00 000000 SKIPA ;PASS IF JRA JUMPS TO E
1304 STOP^
1305 031161 254 04 0 00 031162 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1306 031162 324 00 0 00 031163 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1307 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1308 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1309 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1310
1311 ;**********
1312
1313 ;THIS TEST VERIFIES THAT JRA TRANSFERS CONTROL TO LOCATION E
1314 ;THIS TEST FAILS IF JRA DOES NOT JUMP TO E.
1315
1316 031163 205 00 0 00 031166 C25500: MOVSI .+3 ;PRELOAD AC WITH E+1
1317 031164 267 00 0 00 031165 JRA .+1 ;*JRA SHOULD JUMP TO NEXT SEQUENTIAL INSTRUCTION
1318 031165 334 00 0 00 000000 SKIPA ;PASS IF JRA JUMPS TO E
1319 STOP^
1320 031166 254 04 0 00 031167 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1321 031167 324 00 0 00 031170 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1322 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1323 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1324 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1325
1326 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 14
DAKAEM MAC 28-Dec-78 13:35 TEST OF JRA INSTRUCTION SEQ 0041
1327 ;THIS TEST VERIFIES THAT JRA TRANSFERS CONTROL TO LOCATION E
1328 ;THIS TEST FAILS IF JRA DOES NOT JUMP TO E.
1329
1330 031170 403 00 0 00 000001 C25600: SETZB 1 ;PRELOAD AC0, AC1 WITH ZEROS
1331 031171 267 00 0 00 031173 JRA .+2 ;*JRA SHOULD JUMP OVER NEXT SEQUENTIAL INSTRUCTION
1332 031172 474 01 0 00 000000 SETO 1, ;LOAD AC1 WITH ONES IF JRA DOES NOT JUMP
1333 031173 332 00 0 00 000001 SKIPE 1 ;PASS IF JRA JUMPED
1334 STOP^
1335 031174 254 04 0 00 031175 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1336 031175 324 00 0 00 031176 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1337 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1338 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1339 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1340
1341 ;**********
1342
1343 ;THIS TEST VERIFIES THAT JRA PLACES C(C(AC-LEFT)) INTO THE AC AND JUMPS TO E
1344 ;THIS TEST FAILS IF JRA JUMPS TO E+1 OR DOES NOT LOAD THE AC CORRECTLY.
1345
1346 031176 400 00 0 00 000000 C25700: SETZ ;CLEAR AC
1347 031177 267 00 0 00 031200 JRA .+1 ;*JRA SHOULD PLACE 0 INTO THE AC AND JUMP .+1
1348 031200 332 00 0 00 000000 SKIPE ;PASS IF AC WAS LOADED CORRECTLY
1349 ;AND JRA JUMPED CORRECTLY.
1350 STOP^
1351 031201 254 04 0 00 031202 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1352 031202 324 00 0 00 031203 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1353 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1354 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1355 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1356
1357 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 15
DAKAEM MAC 28-Dec-78 13:35 TEST OF JRA INSTRUCTION SEQ 0042
1358 ;THIS TEST VERIFIES THAT JRA PLACES C(C(AC-LEFT)) INTO THE AC
1359 ;FIRST, THE AC IS PRELOADED WITH 1,,2 AND AC1 AND AC2 ARE
1360 ;INITIALIZED WITH THEIR RESPECTIVE ADDRESSES; JRA IS EXECUTED, AND
1361 ;THE AC IS CHECKED FOR 0,,1, THE ORIGINAL C(C(AC-LEFT)). IF C(AC)=0,,1,
1362 ;THIS TEST PASSES
1363
1364 031203 200 00 0 00 033470 C26200: MOVE [XWD 1,2] ;PRELOAD AC WITH 1,,2
1365 031204 201 01 0 00 000001 MOVEI 1,1 ;INITIALIZE AC1 WITH 0,,1
1366 031205 201 02 0 00 000002 MOVEI 2,2 ;INITIALIZE AC2 WITH 0,,2
1367 031206 267 00 0 00 031207 JRA .+1 ;*JRA SHOULD PLACE 0,,1 INTO THE AC
1368 031207 302 00 0 00 000001 CAIE 1 ;PASS IF C(AC)=0,,1
1369 STOP^
1370 031210 254 04 0 00 031211 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1371 031211 324 00 0 00 031212 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1372 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1373 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1374 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1375
1376 ;**********
1377
1378 ;THIS TEST VERIFIES THAT JRA CAN RESTORE AC0 FROM AC0 WHEN AC0 IS THE
1379 ;SPECIFIED AC AND C(AC0-LEFT)=0.
1380 ;FIRST, AC0 IS PRELOADED AND JRA IS EXECUTED. THEN, AC0 IS CHECKED FOR
1381 ;ITS INITIAL CONTENTS. IF THE RESULT IN AC0, IS CORRECT, THIS TEST PASSES.
1382
1383 031212 551 00 0 00 033471 C26300: HRRZI [135531,,246642] ;PRELOAD AC0 WITH 0,, LITERAL ADDRESS
1384 031213 267 00 0 00 031214 JRA .+1 ;*JRA SHOULD PLACE C(AC0) INTO AC0
1385 031214 302 00 0 00 033471 CAIE [135531,,246642] ;PASS IF JRA PLACED C(AC0) INTO AC0
1386 STOP^
1387 031215 254 04 0 00 031216 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1388 031216 324 00 0 00 031217 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1389 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1390 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1391 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1392
1393 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 16
DAKAEM MAC 28-Dec-78 13:35 TEST OF JRA INSTRUCTION SEQ 0043
1394 ;THIS TEST VERIFIES THAT JRA CAN RESOTRE AC0 FROM MEMORY WHEN AC0 IS THE
1395 ;SPECIFIED AC.
1396 ;FIRST, AC0 IS PRELOADED WITH [LITERAL ADDRESS ,,0] AND JRA IS EXECUTED. THEN,
1397 ;AC0 IS CHECKED FOR THE SPECIFIED LITERAL, 135246,,246135. IF
1398 ;C(AC0)=135246,,246135, THE TEST PASSES.
1399
1400 031217 515 00 0 00 033472 C26400: HRLZI [135246,,246135] ;PRELOAD AC0 WITH [LITERAL ADDRESS ,,0]
1401 031220 267 00 0 00 031221 JRA .+1 ;*JRA SHOULD PLACE 135246,,246135 INTO AC0
1402 031221 312 00 0 00 033472 CAME [135246,,246135];PASS IF C(AC0)=135246,,246135
1403 STOP^
1404 031222 254 04 0 00 031223 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1405 031223 324 00 0 00 031224 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1406 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1407 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1408 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1409
1410 ;**********
1411
1412 ;THIS TEST VERIFIES THAT JRA CAN RESOTRE AC0 FROM MEMORY WHEN AC0 IS THE
1413 ;SPECIFIED AC.
1414 ;FIRST, AC0 IS PRELOADED WITH [-1,, ADDRESS OF JCA INSTRUCTION] AND JRA IS EXECUTED.
1415 ;THEN, AC0 IS CHECKED FOR THE JRA INSTRUCTION. IF
1416 ;C(AC0)= THE JRA INSTRUCTION, THE TEST PASSES.
1417
1418 031224 525 00 0 00 031225 C26500: HRLOI .+1 ;PRELOAD AC WITH -1,, ADDRESS OF JRA INSTRUCTION
1419 031225 267 00 0 00 031226 JRA .+1 ;*JRA SHOULD PLACE ITSELF INTO AC0
1420 031226 312 00 0 00 031225 CAME .-1 ;PASS IF AC CONTAINS JRA INSTRUCTION
1421 STOP^
1422 031227 254 04 0 00 031230 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1423 031230 324 00 0 00 031231 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1424 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1425 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1426 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1427
1428 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 17
DAKAEM MAC 28-Dec-78 13:35 TESTS OF BIS FLAG SEQ 0044
1429 SUBTTL TESTS OF BIS FLAG
1430
1431 ;**********
1432
1433 ;THIS TEST VERIFIES THAT JRST 2, CAN CLEAR BIS
1434 ;FIRST, BIS IS SET VIA JRST 2, ;THEN, BIS IS CLEARED VIA JRST 2,.
1435 ;THE FLAGS ARE SAVED AND BIS IS CHECKED. THIS TEST PASSES IF BIS IS RESET;
1436 ;OTHERWISE JRST 2, FAILED TO RESET BIS.
1437
1438 031231 C26600: SFLAG BIS ^;SET BIS FLAG
1439
1440 031231 205 01 0 00 020000 MOVSI 1,BIS
1441 031232 255 17 0 00 031233 JFCL 17,.+1 ;RESET ALL FLAGS
1442 031233 254 02 0 01 031234 JRST 2,.+1(1) ;SET BIS FLAG
1443 SFLAG ^;*RESET BIS FLAG
1444
1445 031234 205 01 0 00 000000 MOVSI 1,
1446 031235 255 17 0 00 031236 JFCL 17,.+1 ;RESET ALL FLAGS
1447 031236 254 02 0 01 031237 JRST 2,.+1(1) ;SET FLAG
1448 031237 265 00 0 00 031240 JSP .+1 ;SAVE FLAGS
1449 031240 603 00 0 00 020037 TLNE BIS+37 ;PASS IF BIS FLAG IS RESET
1450 STOP^
1451 031241 254 04 0 00 031242 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1452 031242 324 00 0 00 031243 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1453 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1454 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1455 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1456
1457 ;**********
1458
1459 ;THIS TEST VERIFIES THAT JRST 2, CAN SET BIS.
1460 ;FIRST, BIS IS SET VIA JRST 2, AND THE FLAGS ARE SAVED.
1461 ;BIS IS THEN CHECKED. IF BIS IS SET, THIS TEST PASSES.
1462
1463 031243 C26700: SFLAG BIS ^;*SET BIS FLAG VIA JRST
1464
1465 031243 205 01 0 00 020000 MOVSI 1,BIS
1466 031244 255 17 0 00 031245 JFCL 17,.+1 ;RESET ALL FLAGS
1467 031245 254 02 0 01 031246 JRST 2,.+1(1) ;SET BIS FLAG
1468 031246 265 00 0 00 031247 JSP .+1 ;SAVE FLAGS
1469 031247 607 00 0 00 020000 TLNN BIS ;PASS IF BIS FLAG IS SET
1470 STOP^
1471 031250 254 04 0 00 031251 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1472 031251 324 00 0 00 031252 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1473 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1474 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1475 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1476
1477 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 18
DAKAEM MAC 28-Dec-78 13:35 TESTS OF BIS FLAG SEQ 0045
1478 ;THIS TEST VERIFIES THAT JSR ALWAYS RESETS BIS.
1479 ;FIRST BIS IS SET; THEN JSR IS EXECUTED. THE FLAGS ARE
1480 ;THEN SAVED AND CHECKED. IF BIS WAS RESET VIA JSR, THIS TEST PASSES.
1481
1482 031252 C27000: SFLAG BIS ^;SET BIS
1483
1484 031252 205 01 0 00 020000 MOVSI 1,BIS
1485 031253 255 17 0 00 031254 JFCL 17,.+1 ;RESET ALL FLAGS
1486 031254 254 02 0 01 031255 JRST 2,.+1(1) ;SET BIS FLAG
1487 031255 264 00 0 00 031256 JSR .+1 ;*JSR SHOULD RESET BIS
1488 031256 000000 000000 0 ;JSR SAVES FLAGS HERE
1489 031257 265 00 0 00 031260 JSP .+1 ;SAVE FLAGS
1490 031260 603 00 0 00 020000 TLNE BIS ;PASS IF BIS FLAG IS RESET
1491 STOP^
1492 031261 254 04 0 00 031262 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1493 031262 324 00 0 00 031263 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
1498 ;**********
1499
1500 ;THIS TEST VERIFIES THAT JSP ALWAYS RESETS BIS.
1501 ;FIRST BIS IS SET; THEN JSP IS EXECUTED. THE FLAGS ARE
1502 ;THEN SAVED AND CHECKED. IF BIS WAS RESET VIA JSP, THIS TEST PASSES.
1503
1504 031263 C27001: SFLAG BIS ^;SET BIS
1505
1506 031263 205 01 0 00 020000 MOVSI 1,BIS
1507 031264 255 17 0 00 031265 JFCL 17,.+1 ;RESET ALL FLAGS
1508 031265 254 02 0 01 031266 JRST 2,.+1(1) ;SET BIS FLAG
1509 031266 265 00 0 00 031267 JSP .+1 ;*JSP SHOULD RESET BIS
1510 031267 265 00 0 00 031270 JSP .+1 ;SAVE FLAGS
1511 031270 603 00 0 00 020000 TLNE BIS ;PASS IF BIS FLAG IS RESET
1512 STOP^
1513 031271 254 04 0 00 031272 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1514 031272 324 00 0 00 031273 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1515 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1516 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1517 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1518
1519 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 19
DAKAEM MAC 28-Dec-78 13:35 TESTS OF BIS FLAG SEQ 0046
1520 ;THIS TEST VERIFIES THAT THE BITS IN POSITIONS 8, 9 AND 10 ARE CLEARABLE.
1521 ;FIRST, THE ARITHMETIC FLAGS ARE CLEARED;
1522 ;THEN, BITS 8, 9 AND 10 OF THE PC-WORD IS EXAMINED.
1523 ;IF ANY OF THESE BITS ARE SET, THIS TEST FAILS BECAUSE THEY SHOULD BE CLEAR.
1524
1525 031273 C27100: SFLAG ^;CLEAR ARITHMETIC FLAGS
1526
1527 031273 205 01 0 00 000000 MOVSI 1,
1528 031274 255 17 0 00 031275 JFCL 17,.+1 ;RESET ALL FLAGS
1529 031275 254 02 0 01 031276 JRST 2,.+1(1) ;SET FLAG
1530 031276 265 00 0 00 031277 JSP .+1 ;SAVE FLAGS
1531 031277 603 00 0 00 001600 TLNE 1600 ;PASS IF THESE BITS ARE CLEAR
1532 STOP^
1533 031300 254 04 0 00 031301 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1534 031301 324 00 0 00 031302 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1535 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1536 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1537 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1538
1539 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 20
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0047
1540 SUBTTL TEST OF MSCL FWT INSTRUCTIONS
1541
1542 ;**********
1543
1544 ;THIS TEST VERIFIES THAT MOVEM PLACES C(AC) INTO E AND DOES
1545 ;NOT MODIFY C(AC).
1546 ;IN THIS CASE, C(AC)=252525,,252525 ANS C(E)=707070,,707070.
1547 ;HENCE, THE RESULT IN E SHOULD BE 252525,,252525.
1548 ;THE AC IS CHECKED FOR 252525,,252525. IF ANY OTHER NUMBER IS
1549 ;FOUND IN THE AC, IT WAS CLOBBERED BY MOVEM, AND THIS TEST FAILS.
1550 ;E IS CHECKED FOR 252525,,252525. IF ANY OTHER NUMBER IS FOUND
1551 ;IN E, IT WAS UPDATED INCORRECTLY BY MOVEM.
1552
1553 031302 200 00 0 00 033473 C50000: MOVE [252525,,252525] ;PRELOAD AC WITH 252525,,252525
1554 031303 200 01 0 00 033474 MOVE 1,[707070,,707070] ;PRELOAD E WITH 707070,,707070
1555 031304 202 00 0 00 000001 MOVEM 0,1 ;*MOVEM SHOULD PLACE 252525,,252525
1556 ;INTO E AND NOT AFFECT THE AC
1557 031305 312 00 0 00 033473 CAME 0,[252525,,252525] ;PASS IF C(AC) IS NOT CLOBBERED
1558 STOP^
1559 031306 254 04 0 00 031307 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1560 031307 324 00 0 00 031310 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1561 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1562 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1563 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1564 031310 312 01 0 00 033473 CAME 1,[252525,,252525] ;PASS IF E WAS UPDATED CORRECTLY
1565 STOP^
1566 031311 254 04 0 00 031312 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1567 031312 324 00 0 00 031313 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1568 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1569 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1570 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1571
1572 ;**********
1573
1574 ;THIS TEST VERIFIES THAT MOVES PLACES C(E) INTO THE AC IF AC IS NON-ZERO.
1575 ;IN THIS CASE, C(AC)=707070,,707070 AND C(E)=123456,,123456. HENCE, BOTH
1576 ;THE AC AND E SHOULD CONTAIN 123456,,123456 AFTER MOVES IS EXECUTED.
1577 ;BOTH AC AND E ARE CHECKED FOR 123456,,123456. IF EITHER AC OR E
1578 ;CONTAIN A DIFFERENT RESULT, THIS TEST FAILS
1579
1580 031313 200 02 0 00 033474 C50100: MOVE 2,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
1581 031314 200 01 0 00 033475 MOVE 1,[123456,,123456] ;PRELOAD E WITH 123456,,123456
1582 031315 203 02 0 00 000001 MOVES 2,1 ;*MOVES SHOULD PLACE 123456,,123456
1583 ;INTO BOTH AC AND E
1584 031316 312 02 0 00 033475 CAME 2,[123456,,123456] ;PASS IF C(AC)=123456,,123456
1585 STOP^
1586 031317 254 04 0 00 031320 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1587 031320 324 00 0 00 031321 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1588 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1589 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1590 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1591 031321 312 01 0 00 033475 CAME 1,[123456,,123456] ;PASS IF C(E)=123456,,123456
1592 STOP^
1593 031322 254 04 0 00 031323 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1594 031323 324 00 0 00 031324 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 20-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0048
1595 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1596 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1597 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1598
1599 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 21
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0049
1600 ;THIS TEST VERIFIES THAT MOVES IS A NO-OP IF AC=0
1601 ;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=707070,,707070
1602 ;AFTER MOVES IS EXECUTED, AC AND E ARE CHECKED FOR THEIR ORIGINAL DATA.
1603 ;IF EITHER C(AC) OR C(E) CHANGED AS A RESULT OF MOVES, THIS TEST FAILS.
1604
1605 031324 200 01 0 00 033474 C50110: MOVE 1,[707070,,707070] ;PRELOAD E WITH 707070,,707070
1606 031325 474 00 0 00 000000 SETO ;PRELOAD AC WITH -1,,-1
1607 031326 203 00 0 00 000001 MOVES 0,1 ;*MOVES SHOULD FUNCTION AS A NO-OP
1608 031327 312 00 0 00 033462 CAME 0,[-1,,-1] ;PASS IF C(AC) WAS NOT MODIFIED
1609 STOP^
1610 031330 254 04 0 00 031331 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1611 031331 324 00 0 00 031332 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1612 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1613 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1614 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1615 031332 312 01 0 00 033474 CAME 1,[707070,,707070] ;PASS IF C(E) WAS NOT MODIFIED
1616 STOP^
1617 031333 254 04 0 00 031334 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1618 031334 324 00 0 00 031335 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1619 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1620 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1621 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1622
1623 ;**********
1624
1625 ;THIS TEST VERIFIES THAT MOVSI LOADS THE WORD E,0 INTO THE AC.
1626 ;IN THIS CASE, C(AC)=707070,,707070 AND E=0,,-1.
1627 ;HENCE, THE RESULT IN THE AC SHOULD BE -1,,0.
1628 ;THE AC IS CHECKED FOR -1,,0. IF C(AC)=-1,,0, THIS TEST PASSES.
1629
1630 031335 200 01 0 00 033474 C50200: MOVE 1,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
1631 031336 205 01 0 00 777777 MOVSI 1,-1 ;*MOVSI SHOULD PLACE -1,,0 INTO THE AC
1632 031337 312 01 0 00 033476 CAME 1,[-1,,0] ;PASS IF C(AC)=1,,0
1633 STOP^
1634 031340 254 04 0 00 031341 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1635 031341 324 00 0 00 031342 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1636 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1637 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1638 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1639
1640 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 22
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0050
1641 ;THIS TEST VERIFIES THAT MOVNM PLACES THE NEGATIVE OF C(AC)
1642 ;INTO E. IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,-3.
1643 ;HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1 AND THE RESULT
1644 ;IN E SHOULD BE 0,,1
1645
1646 031342 474 01 0 00 000000 C50300: SETO 1, ;PRELOAD AC WITH -1,,-1
1647 031343 200 02 0 00 033477 MOVE 2,[-1,,-3] ;PRELOAD E WITH -1,,-3
1648 031344 212 01 0 00 000002 MOVNM 1,2 ;*MOVNM SHOULD PLACE 0,,1 INTO E
1649 ;AND NOT AFFTECT C(AC)
1650 031345 312 01 0 00 033462 CAME 1,[-1] ;PASS IF C(AC)=-1,,-1
1651 STOP^
1652 031346 254 04 0 00 031347 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1653 031347 324 00 0 00 031350 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 031350 302 02 0 00 000001 CAIE 2,1 ;PASS IF C(E)=0,,1
1658 STOP^
1659 031351 254 04 0 00 031352 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1660 031352 324 00 0 00 031353 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1661 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1662 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1663 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1664
1665 ;**********
1666
1667 ;THIS TEST VERIFIES THAT MOVNM PLACES THE NEGATIVE OF C(AC)
1668 ;INTO E. IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,-3.
1669 ;HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1 AND THE RESULT
1670 ;IN E SHOULD BE 0,,1
1671
1672 031353 474 01 0 00 000000 C50301: SETO 1, ;PRELOAD AC WITH -1,,-1
1673 031354 200 02 0 00 033477 MOVE 2,[-1,,-3] ;PRELOAD E WITH -1,,-3
1674 031355 202 02 0 00 031367 MOVEM 2,E50301
1675 031356 212 01 0 00 031367 MOVNM 1,E50301 ;*MOVNM SHOULD PLACE 0,,1 INTO E
1676 ;AND NOT AFFTECT C(AC)
1677 031357 312 01 0 00 033462 CAME 1,[-1] ;PASS IF C(AC)=-1,,-1
1678 STOP^
1679 031360 254 04 0 00 031361 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1680 031361 324 00 0 00 031362 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1681 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1682 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1683 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1684 031362 200 02 0 00 031367 MOVE 2,E50301
1685 031363 302 02 0 00 000001 CAIE 2,1 ;PASS IF C(E)=0,,1
1686 STOP^
1687 031364 254 04 0 00 031365 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1688 031365 324 00 0 00 031366 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1689 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1690 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1691 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1692
1693 031366 334 00 0 00 000000 SKIPA ;GO TO NEXT TEST
1694 031367 000000 000000 E50301: 0 ;TESTED MEMORY LOCATION
1695
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 22-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0051
1696 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 23
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0052
1697 ;THIS TEST VERIFIES THAT MOVNS PLACES THE NEGATIVE OF C(E) INTO E
1698 ;AND INTO THE AC IF THE AC IS NON-ZERO. IN THIS CASE, AC=0,
1699 ;C(AC)=0 AND C(E)=0,,1
1700 ;HENCE, THE RESULT IN THE AC SHOULD BE 0
1701 ;AND THE RESULT IN E SHOULD BE -1,,-1
1702
1703 031370 400 00 0 00 000000 C50400: SETZ ;CLEAR AC
1704 031371 201 02 0 00 000001 MOVEI 2,1 ;PRELOAD E WITH 0,,1
1705 031372 213 00 0 00 000002 MOVNS 0,2 ;*MOVNS SHOULD PLACE -1,,-1 INTO E
1706 ;AND SHOULD NOT AFFECT THE AC
1707 031373 332 00 0 00 000000 SKIPE ;PASS IF THE AC IS UNALTERED
1708 STOP^
1709 031374 254 04 0 00 031375 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1710 031375 324 00 0 00 031376 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1711 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1712 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1713 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1714 031376 312 02 0 00 033462 CAME 2,[-1] ;PASS IF C(E)=-1,,-1
1715 STOP^
1716 031377 254 04 0 00 031400 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1717 031400 324 00 0 00 031401 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1718 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1719 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1720 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1721
1722 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 24
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0053
1723 ;THIS TEST VERIFIES THAT MOVNS PLACES THE NEGATIVE OF C(E) INTO E
1724 ;AND INTO THE AC IF THE AC IS NON-ZO. IN THIS CASE, AC=0,
1725 ;C(AC)=0 AND C(E)=0,,1
1726 ;HENCE, THE RESULT IN THE AC SHOULD BE 0
1727 ;AND THE RESULT IN E SHOULD BE -1,,-1
1728
1729 031401 400 00 0 00 000000 C50401: SETZ ;CLEAR AC
1730 031402 201 02 0 00 000001 MOVEI 2,1 ;PRELOAD E WITH 0,,1
1731 031403 202 02 0 00 031415 MOVEM 2,E50401
1732 031404 213 00 0 00 031415 MOVNS 0,E50401 ;*MOVNS SHOULD PLACE -1,,-1 INTO E
1733 ;AND SHOULD NOT AFFECT THE AC
1734 031405 332 00 0 00 000000 SKIPE ;PASS IF THE AC IS UNALTERED
1735 STOP^
1736 031406 254 04 0 00 031407 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1737 031407 324 00 0 00 031410 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1738 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1739 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1740 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1741 031410 200 02 0 00 031415 MOVE 2,E50401
1742 031411 312 02 0 00 033462 CAME 2,[-1] ;PASS IF C(E)=-1,,-1
1743 STOP^
1744 031412 254 04 0 00 031413 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1745 031413 324 00 0 00 031414 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1746 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1747 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1748 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1749
1750 031414 334 00 0 00 000000 SKIPA ;GO TO NEXT TEST
1751 031415 000000 000000 E50401: 0 ;TESTED MEMORY LOCATION
1752
1753 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 25
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0054
1754 ;THIS TEST VERIFIES THAT MOVNS PLACES THE NEGATIVE OF C(E) INTO E
1755 ;AND INTO THE AC IF THE AC IS NON-ZERO. IN THIS CASE, AC=1,
1756 ;C(AC=0 AND C(E)=3
1757 ;HENCE, THE RESULT IN THE AC SHOULD BE -1,,3
1758 ;AND THE RESULT IN E SHOULD BE -1,,3.
1759
1760 031416 400 01 0 00 000000 C50410: SETZ 1, ;CLEAR AC
1761 031417 201 02 0 00 000003 MOVEI 2,3 ;PRELOAD WITH 0,,3
1762 031420 213 01 0 00 000002 MOVNS 1,2 ;*MOVNS SHOULD PLACE -1,,-3 INTO E
1763 ;AND -1,,-3 INTO THE AC
1764 031421 312 01 0 00 033477 CAME 1,[-1,,-3] ;PASS IF C(AC)=-1,,-3
1765 STOP^
1766 031422 254 04 0 00 031423 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1767 031423 324 00 0 00 031424 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1768 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1769 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1770 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1771 031424 312 02 0 00 033477 CAME 2,[-1,,-3] ;PASS IF C(E)=-1,,-3
1772 STOP^
1773 031425 254 04 0 00 031426 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1774 031426 324 00 0 00 031427 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1775 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1776 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1777 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1778
1779 ;**********
1780
1781 ;THIS TEST VERIFIES THAT MOVMI MOVES THE WORD 0,,E INTO THE AC.
1782 ;IN THIS CASE, C(AC)=0 AND E=0,,-2. HENCE, THE RESULT IN THE AC
1783 ;SHOULD BE 0,,-2.
1784
1785 031427 400 01 0 00 000000 C50500: SETZ 1, ;CLEAR AC
1786 031430 215 01 0 00 777776 MOVMI 1,-2 ;*MOVMI SHOULD PLACE 0,,-2 INTO AC
1787 031431 302 01 0 00 777776 CAIE 1,-2 ;PASS IF C(AC)=0,,-2
1788 STOP^
1789 031432 254 04 0 00 031433 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1790 031433 324 00 0 00 031434 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1791 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1792 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1793 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1794
1795 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 26
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0055
1796 ;THIS TEST VERIFIES THAT MOVM MOVES THE MAGNITUDE OF C(E) NTO THE AC.
1797 ;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-2. HENCE, THE RESULT IN THE AC
1798 ;SHOULD BE 0,,2.
1799
1800 031434 400 01 0 00 000000 C50501: SETZ 1, ;CLEAR AC
1801 031435 200 03 0 00 033500 MOVE 3,[-2] ;PRELOAD E WITH -1,,-2
1802 031436 214 01 0 00 000003 MOVM 1,3 ;*MOVM SHOULD PLACE 0,,2 INTO AC
1803 031437 302 01 0 00 000002 CAIE 1,2 ;PASS IF C(AC)=0,,2
1804 STOP^
1805 031440 254 04 0 00 031441 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1806 031441 324 00 0 00 031442 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1807 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1808 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1809 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1810
1811 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 27
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0056
1812 ;THIS TEST VERIFIES THAT MOVMM PLACES THE MAGNITUDE OF C(AC)
1813 ;INTO E. IN THIS CASE, C(AC)=-1,,-2 AND C(E)=0. HENCE, THE
1814 ;RESULT IN E SHOULD BE 0,,2 AND C(AC) SHOULD REMAIN UNCHANGED.
1815
1816 031442 200 01 0 00 033500 C50600: MOVE 1,[-1,,-2] ;PRELOAD AC WITH -1,,-2
1817 031443 400 02 0 00 000000 SETZ 2, ;CLEAR E
1818 031444 216 01 0 00 000002 MOVMM 1,2 ;*MOVMM SHOULD PLACE 0,,2 INTO E
1819 ;AND SHOULD NOT CHANGE C(AC)
1820 031445 312 01 0 00 033500 CAME 1,[-1,,-2] ;PASS IF C(AC) IS NOT ALTERED
1821 STOP^
1822 031446 254 04 0 00 031447 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1823 031447 324 00 0 00 031450 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1824 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1825 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1826 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1827 031450 302 02 0 00 000002 CAIE 2,2 ;PASS IF C(E)=0,,2
1828 STOP^
1829 031451 254 04 0 00 031452 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1830 031452 324 00 0 00 031453 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1831 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1832 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1833 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1834
1835 ;**********
1836
1837 ;THIS TEST VERIFIES THAT MONMS PLACES THE MAGNITUDE OF C(E) INTO E
1838 ;AND INTO THE AC IF THE AC IS NON-ZERO. IN THIS CASE, AC=0, C(AC)=0
1839 ;AND C(E)=-1,,-2.
1840 ;HENCE, THE RESULT IN THE AC SHOULD BE 0 AND THE RESULT IN
1841 ;E SHOULD BE 0,,2.
1842
1843 031453 400 00 0 00 000000 C50700: SETZ ;CLEAR AC
1844 031454 200 02 0 00 033500 MOVE 2,[-1,,-2] ;PRELOAD E WITH -1,,-1
1845 031455 217 00 0 00 000002 MOVMS 0,2 ;*MOVMS SHOULD PLACE 0,,1 INTO E
1846 ;AND SHOULD NOT CHANGE C(AC)
1847 031456 332 00 0 00 000000 SKIPE ;PASS IF C(AC) IS UNALTERED
1848 STOP^
1849 031457 254 04 0 00 031460 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1850 031460 324 00 0 00 031461 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1851 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1852 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1853 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1854 031461 302 02 0 00 000002 CAIE 2,2 ;PASS IF C(E)=0,,2
1855 STOP^
1856 031462 254 04 0 00 031463 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1857 031463 324 00 0 00 031464 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1858 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1859 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1860 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1861
1862 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 28
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL FWT INSTRUCTIONS SEQ 0057
1863 ;THIS TEST VERIFIES THAT MOVMS PLACES THE MAGNITUDE OF C(E) INTO E
1864 ;AND INTO THE AC IF THE AC IS NON-ZERO. IN THIS CASE, AC=1, C(AC)=-1,,-1
1865 ;AND C(E)=-1,,-2.
1866 ;HENCE, THE RESULT IN THE AC SHOULD BE 0,,2 AND THE RESULT
1867 ;IN E SHOULD BE 0,,2.
1868
1869 031464 474 01 0 00 000000 C50710: SETO 1, ;PRELOAD AC WITH -1,,-1
1870 031465 200 02 0 00 033500 MOVE 2,[-1,,-2] ;PRELOAD E WITH -1,,-2
1871 031466 217 01 0 00 000002 MOVMS 1,2 ;*MOVMS SHOULD PLACE 0,,2 INTO E
1872 ;AND SHOULD PLACE 0,,2 INTO THE AC
1873 031467 302 01 0 00 000002 CAIE 1,2 ;PASS IF C(AC)=0,,2
1874 STOP^
1875 031470 254 04 0 00 031471 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1876 031471 324 00 0 00 031472 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1877 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1878 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1879 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1880 031472 302 02 0 00 000002 CAIE 2,2 ;PASS IF C(E)=0,,2
1881 STOP^
1882 031473 254 04 0 00 031474 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1883 031474 324 00 0 00 031475 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
1886 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1887
1888 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 29
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL ADD/SUB INSTRUCTIONS SEQ 0058
1889 SUBTTL TEST OF MSCL ADD/SUB INSTRUCTIONS
1890
1891 ;**********
1892
1893 ;THIS TEST VERIFIES THAT SUBI SUBTRACTS THE WORD 0,,E FROM C(AC)
1894 ;AND PLACES THE RESULT INTO THE AC. IN THIS CASE, C(AC)=70 AND
1895 ;E=0,,2. HENCE, THE RESULT IN THE AC SHOULD BE 66.
1896
1897 031475 201 01 0 00 000070 C51000: MOVEI 1,70 ;PRELOAD AC WITH 70
1898 031476 275 01 0 00 000002 SUBI 1,2 ;*SUBI SHOULD PLACE 66 INTO AC
1899 031477 302 01 0 00 000066 CAIE 1,66 ;PASS IF C(AC)=66
1900 STOP^
1901 031500 254 04 0 00 031501 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1902 031501 324 00 0 00 031502 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 ;THIS TEST VERIFIES THAT SUBM SUBTRACTS C(E) FROM C(AC) AND
1910 ;PLACES THE RESULT INTO E. THE AC IS UNAFFECTED. IN THIS CASE,
1911 ;C(AC)=100 AND C(E)=37. HENCE, THE RESULTS IN AC AND
1912 ;E SHOULD BE 0,,100 AND 0,,41 RESPECTIVELY.
1913
1914 031502 201 01 0 00 000100 C51100: MOVEI 1,100 ;PRELOAD AC WITH 0,,100
1915 031503 201 02 0 00 000037 MOVEI 2,37 ;PRELOAD E WITH 0,,37
1916 031504 276 01 0 00 000002 SUBM 1,2 ;*SUBM SHOULD PLACE
1917 ;0,,41 INTO E AND NOT CHANGE C(AC)
1918 031505 302 01 0 00 000100 CAIE 1,100 ;PASS IF C(AC) IS UNCHANGED
1919 STOP^
1920 031506 254 04 0 00 031507 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1921 031507 324 00 0 00 031510 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 031510 302 02 0 00 000041 CAIE 2,41 ;PASS IF C(E)=0,,41
1926 STOP^
1927 031511 254 04 0 00 031512 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1928 031512 324 00 0 00 031513 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1929 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1930 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1931 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1932
1933 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 30
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL ADD/SUB INSTRUCTIONS SEQ 0059
1934 ;THIS TEST VERIFIES THAT SUBM SUBTRACTS C(E) FROM C(AC) AND
1935 ;PLACES THE RESULT INTO E. THE AC IS UNAFFECTED. IN THIS CASE,
1936 ;C(AC)=100 AND C(E)=37. HENCE, THE RESULTS IN AC AND
1937 ;E SHOULD BE 0,,100 AND 0,,41 RESPECTIVELY.
1938
1939 031513 201 01 0 00 000100 C51101: MOVEI 1,100 ;PRELOAD AC WITH 0,,100
1940 031514 201 02 0 00 000037 MOVEI 2,37 ;PRELOAD E WITH 0,,37
1941 031515 202 02 0 00 031527 MOVEM 2,E51101
1942 031516 276 01 0 00 031527 SUBM 1,E51101 ;*SUBM SHOULD PLACE
1943 ;0,,41 INTO E AND NOT CHANGE C(AC)
1944 031517 302 01 0 00 000100 CAIE 1,100 ;PASS IF C(AC) IS UNCHANGED
1945 STOP^
1946 031520 254 04 0 00 031521 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1947 031521 324 00 0 00 031522 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1948 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1949 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1950 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1951 031522 200 02 0 00 031527 MOVE 2,E51101
1952 031523 302 02 0 00 000041 CAIE 2,41 ;PASS IF C(E)=0,,41
1953 STOP^
1954 031524 254 04 0 00 031525 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1955 031525 324 00 0 00 031526 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1956 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1957 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1958 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1959
1960 031526 334 00 0 00 000000 SKIPA ;GO TO NEXT TEST
1961 031527 000000 000000 E51101: 0 ;TEST WORD MEMORY
1962
1963 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 31
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL ADD/SUB INSTRUCTIONS SEQ 0060
1964 ;THIS TEST VERIFIES THAT SUBB SUBTRACTS C(E) FROM C(AC) AND
1965 ;PLACES THE RESULT INTO BOTH AC AND E. IN THIS CASE,
1966 ;C(AC)=0,,100 AND C(E)=0,,37. HENCE, THE RESULT IN BOTH
1967 ;AC AND E SHOULD BE 0,,41.
1968
1969 031530 201 01 0 00 000100 C51200: MOVEI 1,100 ;PRELOAD AC WITH 0,,100
1970 031531 201 02 0 00 000037 MOVEI 2,37 ;PRELOAD E WITH O,,37
1971 031532 277 01 0 00 000002 SUBB 1,2 ;*SUBB SHOULD PLACE 0,,41 INTO BOTH AC AND E
1972 031533 302 01 0 00 000041 CAIE 1,41 ;PASS IF C(AC)=0,,41
1973 STOP^
1974 031534 254 04 0 00 031535 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1975 031535 324 00 0 00 031536 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1976 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1977 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1978 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1979 031536 302 02 0 00 000041 CAIE 2,41 ;PASS IF C(E)=0,,41
1980 STOP^
1981 031537 254 04 0 00 031540 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
1982 031540 324 00 0 00 031541 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
1983 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
1984 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
1985 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
1986
1987 ;**********
1988
1989 ;THIS TEST VERIFIES THAT SUBB SUBTRACTS C(E) FROM C(AC) AND
1990 ;PLACES THE RESULT INTO BOTH AC AND E. IN THIS CASE,
1991 ;C(AC)=0,,100 AND C(E)=0,,37. HENCE, THE RESULT IN BOTH
1992 ;AC AND E SHOULD BE 0,,41.
1993
1994 031541 201 01 0 00 000100 C51201: MOVEI 1,100 ;PRELOAD AC WITH 0,,100
1995 031542 201 02 0 00 000037 MOVEI 2,37 ;PRELOAD E WITH O,,37
1996 031543 202 02 0 00 031555 MOVEM 2,E51201
1997 031544 277 01 0 00 031555 SUBB 1,E51201 ;*SUBB SHOULD PLACE 0,,41 INTO BOTH AC AND E
1998 031545 302 01 0 00 000041 CAIE 1,41 ;PASS IF C(AC)=0,,41
1999 STOP^
2000 031546 254 04 0 00 031547 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2001 031547 324 00 0 00 031550 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2002 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2003 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2004 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2005 031550 200 02 0 00 031555 MOVE 2,E51201
2006 031551 302 02 0 00 000041 CAIE 2,41 ;PASS IF C(E)=0,,41
2007 STOP^
2008 031552 254 04 0 00 031553 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2009 031553 324 00 0 00 031554 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2010 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2011 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2012 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2013
2014 031554 334 00 0 00 000000 SKIPA ;GO TO NEXT TEST
2015 031555 000000 000000 E51201: 0 ;TEST WORD MEMORY
2016
2017 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 32
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0061
2018 SUBTTL TEST OF MSCL CAIX INSTRUCTIONS
2019
2020 ;**********
2021
2022 ;THIS TEST VERIFIES THAT CAIL COMPARES C(AC) WITH E AND
2023 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN E.
2024 ;IN THIS CASE, C(AC)=0,,1 AND E=0,,2
2025 ;HENCE, CAIL SHOULD SKIP THE NEXT INSTRUCTION.
2026 ;IF CAIL SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES
2027
2028 031556 201 01 0 00 000001 C51300: MOVEI 1,1 ;PRELOAD AC WITH 0,,1
2029 031557 301 01 0 00 000002 CAIL 1,2 ;*CAIL SHOULD SKIP THE NEXT INSTRUCTION
2030 STOP^
2031 031560 254 04 0 00 031561 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2032 031561 324 00 0 00 031562 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2033 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2034 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2035 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2036
2037 ;**********
2038
2039 ;THIS TEST VERIFIES THAT CAIL COMPARES C(AC) WITH E AND
2040 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN E.
2041 ;IN THIS CASE, C(AC)=0,,2 AND E=0,,2.
2042 ;HENCE, CAIL SHOULD NOT SKIP THE NEXT INSTRUCTION.
2043 ;IF CAIL DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES.
2044
2045 031562 201 01 0 00 000002 C51310: MOVEI 1,2 ;PRELOAD AC WITH 0,,2
2046 031563 301 01 0 00 000002 CAIL 1,2 ;*CAIL SHOULD NOT SKIP THE NEXT INSTRUCTION
2047 031564 334 00 0 00 000000 SKIPA ;PASS IF CAIL DOES NOT SKIP
2048 STOP^
2049 031565 254 04 0 00 031566 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2050 031566 324 00 0 00 031567 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2051 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2052 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2053 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2054
2055 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 33
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0062
2056 ;THIS TEST VERIFIES THAT CAIL COMPARES C(AC) WITH E AND
2057 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN E
2058 ;IN THIS CASE, C(AC)=0,,3 AND E=0,,2
2059 ;HENCE, CAIL SHOULD NOT SKIP THE NEXT INSTRUCTION.
2060 ;IF CAIL DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES.
2061
2062 031567 201 01 0 00 000003 C51320: MOVEI 1,3 ;PRELOAD AC WITH 0,,3
2063 031570 301 01 0 00 000002 CAIL 1,2 ;*CAIL SHOULD SKIP THE NEXT INSTRUCTION
2064 031571 334 00 0 00 000000 SKIPA ;PASS IF CAIL DOES NOT SKIP
2065 STOP^
2066 031572 254 04 0 00 031573 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2067 031573 324 00 0 00 031574 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2068 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2069 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2070 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2071
2072 ;**********
2073
2074 ;THIS TEST VERIFIES THAT CAILE COMPARES C(AC) WITH E AND
2075 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN OR EQUAL TO E
2076 ;IN THIS CASE, C(AC)=-1,,-1 AND E=0
2077 ;HENCE, CAILE SHOULD SKIP THE NEXT INSTRUCTION
2078 ;IF CAILE SKIPS THE NEXT INSTRUCTION, THE TEST PASSES
2079
2080 031574 474 01 0 00 000000 C51400: SETO 1, ;PRELOAD AC WITH -1,,-1
2081 031575 303 01 0 00 000000 CAILE 1,0 ;*CAILE SHOULD SKIP THE NEXT INSTRUCTION
2082 STOP^
2083 031576 254 04 0 00 031577 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2084 031577 324 00 0 00 031600 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2085 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2086 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2087 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2088
2089 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 34
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0063
2090 ;THIS TEST VERIFIES THAT CAILE COMPARES C(AC) WITH E AND
2091 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN OR EQUAL TO E
2092 ;IN THIS CASE, C(AC)=0 AND E=0
2093 ;HENCE, CAILE SHOULD SKIP THE NEXT INSTRUCTION.
2094 ;IF CAILE SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES.
2095
2096 031600 400 01 0 00 000000 C51410: SETZ 1, ;PRELOAD AC WITH 0
2097 031601 303 01 0 00 000000 CAILE 1,0 ;*CAILE SHOULD SKIP THE NEXT INSTRUCTION.
2098 STOP^
2099 031602 254 04 0 00 031603 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2100 031603 324 00 0 00 031604 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2101 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2102 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2103 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2104
2105 ;**********
2106
2107 ;THIS TEST VERIFIES THAT CAILE COMPARES C(AC) WITH E AND
2108 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN OR EQUAL TO E
2109 ;IN THIS CASE, C(AC)=0,,1 AND E=0
2110 ;HENCE, CAILE SHOULD NOT SKIP THE NEXT INSTRUCTION.
2111 ;IF CAILE DOES NOT SKIP THE NEXT INSTRUCTION, THE TEST PASSES
2112
2113 031604 201 01 0 00 000001 C51420: MOVEI 1,1 ;PRELOAD AC WITH 0,,1
2114 031605 303 01 0 00 000000 CAILE 1,0 ;*CAILE SHOULD NOT SKIP THE NEXT INSTRUCTION
2115 031606 334 00 0 00 000000 SKIPA ;PASS IF CAILE DOES NOT SKIP
2116 STOP^
2117 031607 254 04 0 00 031610 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2118 031610 324 00 0 00 031611 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2119 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2120 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2121 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2122
2123 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 35
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0064
2124 ;THIS TEST VERIFIES THAT CAIA COMPARES C(AC) WITH E AND ALWAYS
2125 ;SKIPS THE NEXT INSTRUCTION
2126 ;IN THIS CASE, C(AC)=-1,,-1 AND E=0
2127 ;HENCE, CAIA SHOULD SKIP THE NEXT INSTRUCTION
2128 ;IF CAIA SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES
2129
2130 031611 474 01 0 00 000000 C51500: SETO 1, ;PRELOAD AC WITH -1,,-1
2131 031612 304 01 0 00 000000 CAIA 1,0 ;*CAIA SHOULD SKIP THE NEXT INSTRUCTION
2132 STOP^
2133 031613 254 04 0 00 031614 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2134 031614 324 00 0 00 031615 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2135 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2136 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2137 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2138
2139 ;**********
2140
2141 ;THIS TEST VERIFIES THAT CAIA COMPARES C(AC) WITH E AND ALWAYS
2142 ;SKIPS THE NEXT INSTRUCTION
2143 ;IN THIS CASE, C(AC)=0 AND E=0
2144 ;HENCE, CAIA SHOULD SKIP THE NEXT INSTRUCTION.
2145 ;IF CAIA SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES
2146
2147 031615 400 01 0 00 000000 C51510: SETZ 1, ;PRELOAD AC WITH 0
2148 031616 304 01 0 00 000000 CAIA 1,0 ;*CAIA SHOULD SKIP THE NEXT INSTRUCTION
2149 STOP^
2150 031617 254 04 0 00 031620 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2151 031620 324 00 0 00 031621 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2152 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2153 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2154 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2155
2156 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 36
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0065
2157 ;THIS TEST VERIFIES THAT CAIA COMPARES C(AC) WITH E AND ALWAYS
2158 ;SKIPS THE NEXT INSTRUCTION
2159 ;IN THIS CASE, C(AC)=0,,1 AND E=0
2160 ;HENCE, CAIA SHOULD SKIP THE NEXT INSTRUCTION.
2161 ;IF CAIA SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES.
2162
2163 031621 201 01 0 00 000001 C51520: MOVEI 1,1 ;PRELOAD AC WITH 0,,1
2164 031622 304 01 0 00 000000 CAIA 1,0 ;*CAIA SHOULD SKIP THE NEXT INSTRUCTION
2165 STOP^
2166 031623 254 04 0 00 031624 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2167 031624 324 00 0 00 031625 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2168 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2169 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2170 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2171
2172 ;**********
2173
2174 ;THIS TEST VERIFIES THAT CAIGE COMPARES C(AC) WITH E AND
2175 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN OR EQUAL TO E.
2176 ;IN THIS CASE, C(AC)=0,,5 AND E=0,,6
2177 ;HENCE, CAIGE SHOULD NOT SKIP THE NEXT INSTRUCTION.
2178 ;IF CAIGE DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES
2179
2180 031625 201 02 0 00 000005 C51600: MOVEI 2,5 ;PRELOAD AC WITH 0,,5
2181 031626 305 02 0 00 000006 CAIGE 2,6 ;*CAIGE SHOULD NOT SKIP THE NEXT INSTRUCTION
2182 031627 334 00 0 00 000000 SKIPA ;PASS IF CAIGE DOES NOT SKIP
2183 STOP^
2184 031630 254 04 0 00 031631 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2185 031631 324 00 0 00 031632 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2186 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2187 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2188 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2189
2190 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 37
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0066
2191 ;THIS TEST VERIFIES THAT CAIGE COMPARES C(AC) WITH E AND
2192 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN OR EQUAL TO E
2193 ;IN THIS CASE, C(AC)=0,,6 AND E=0,,6
2194 ;HENCE, CAIGE SHOULD SKIP THE NEXT INSTRUCTION.
2195 ;IF CAIGE SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES.
2196
2197 031632 201 02 0 00 000006 C51610: MOVEI 2,6 ;PRELOAD AC WITH 0,,6
2198 031633 305 00 0 00 000000 CAIGE ;*CAIGE SHOULD SKIP THE NEXT INSTRUCTION
2199 STOP^
2200 031634 254 04 0 00 031635 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2201 031635 324 00 0 00 031636 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2202 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2203 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2204 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2205
2206 ;**********
2207
2208 ;THIS TEST VERIFIES THAT CAIGE COMPARES C(AC) WITH E AND
2209 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN OR EQUAL TO E.
2210 ;IN THIS CASE, C(AC)=0,,7 AND E=0,,6
2211 ;HENCE, CAIGE SHOULD SKIP THE NEXT INSTRUCTION.
2212 ;IF CAIGE SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES
2213
2214 031636 201 02 0 00 000007 C51620: MOVEI 2,7 ;PRELOAD AC WITH 0,,7
2215 031637 305 02 0 00 000006 CAIGE 2,6 ;*CAIGE SHOULD SKIP THE NEXT INSTRUCTION
2216 STOP^
2217 031640 254 04 0 00 031641 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2218 031641 324 00 0 00 031642 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2219 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2220 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2221 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2222
2223 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 38
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0067
2224 ;THIS TEST VERIRIES THAT CAIN COMPARES C(AC) WITH E AND
2225 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS NOT EQUAL TO E.
2226 ;IN THIS CASE, C(AC)=0 AND E=0,,1
2227 ;HENCE, CAIN SHOULD SKIP THE NEXT INSTRUCTION.
2228 ;IF CAIN SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES.
2229
2230 031642 400 06 0 00 000000 C51700: SETZ 6, ;PRELOAD AC WITH 0
2231 031643 306 06 0 00 000001 CAIN 6,1 ;*CAIN SHOULD SKIP THE NEXT INSTRUCTION
2232 STOP^
2233 031644 254 04 0 00 031645 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2234 031645 324 00 0 00 031646 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 ;THIS TEST VERIFIES THAT CAIN COMPARES C(AC) WITH E AND
2242 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS NOT EQUAL TO E.
2243 ;IN THIS CASE, C(AC)=0,,1 AND E=0,,1
2244 ;HENCE, CAIN SHOULD NOT SKIP THE NEXT INSTRUCTION.
2245 ;IF CAIN DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES
2246
2247 031646 200 06 0 00 000001 C51710: MOVE 6,1 ;PRELOAD AC WITH 0,,1
2248 031647 306 06 0 00 000001 CAIN 6,1 ;*CAIN SHOULD NOT SKIP THE NEXT INSTRUCTION
2249 031650 334 00 0 00 000000 SKIPA ;PASS IF CAIN SKIPS
2250 STOP^
2251 031651 254 04 0 00 031652 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2252 031652 324 00 0 00 031653 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2253 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2254 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2255 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2256
2257 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 39
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0068
2258 ;THIS TEST VERIFIES THAT CAIN COMPARES C(AC) WITH E AND
2259 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS NOT EQUAL TO E.
2260 ;IN THIS CASE, C(AC)=0,,2 AND E=0,,1
2261 ;HENCE, CAIN SHOULD SKIP THE NEXT INSTRUCTION.
2262 ;IF CAIN SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES
2263
2264 031653 201 06 0 00 000002 C51720: MOVEI 6,2 ;PRELOAD AC WITH
2265 031654 306 06 0 00 000001 CAIN 6,1 ;*CAIN SHOULD SKIP THE NEXT INSTRUCTION
2266 STOP^
2267 031655 254 04 0 00 031656 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2268 031656 324 00 0 00 031657 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2269 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2270 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2271 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2272
2273 ;**********
2274
2275 ;THIS TEST VERIFIES THAT CAIG COMPARES C(AC) WITH E AND
2276 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN E.
2277 ;IN THIS CASE, C(AC)=0,,2 AND E=0,,3.
2278 ;HENCE, CAIG SHOULD NOT SKIP THE NEXT INSTRUCTION.
2279 ;IF CAIG DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES
2280
2281 031657 201 11 0 00 000002 C52000: MOVEI 11,2 ;PRELOAD AC WITH 0,,2
2282 031660 307 11 0 00 000003 CAIG 11,3 ;*CAIG SHOULD NOT SKIP THE NEXT INSTRUCTION
2283 031661 334 00 0 00 000000 SKIPA ;PASS IF CAIG DID NOT SKIP
2284 STOP^
2285 031662 254 04 0 00 031663 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2286 031663 324 00 0 00 031664 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2287 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2288 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2289 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2290
2291 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 40
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAIX INSTRUCTIONS SEQ 0069
2292 ;THIS TEST VERIFIES THAT CAIG COMPARES C(AC) WITH E AND
2293 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN E.
2294 ;IN THIS CASE, C(AC)=0,,3 AND E=0,,3.
2295 ;HENCE, CAIG SHOULD NOT SKIP THE NEXT INSTRUCTION.
2296 ;IF CAIG DOES NOT SKIP THE NEXT INSTRUCTION, THE TEST PASSES.
2297
2298 031664 201 11 0 00 000003 C52010: MOVEI 11,3 ;PRELOAD AC WITH 0,,3
2299 031665 307 11 0 00 000003 CAIG 11,3 ;*CAIG SHOULD NOT SKIP THE NEXT INSTRUCTION
2300 031666 334 00 0 00 000000 SKIPA ;PASS IF CAIG DID NOT SKIP
2301 STOP^
2302 031667 254 04 0 00 031670 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2303 031670 324 00 0 00 031671 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2304 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2305 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2306 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2307
2308 ;**********
2309
2310 ;THIS TEST VERIFIES THAT CAIG COMPARES C(AC) WITH E AND
2311 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN E.
2312 ;IN THIS CASE, C(AC)=0,,4 AND E=0,,3.
2313 ;HENCE, CAIG SHOULD SKIP THE NEXT INSTRUCTION.
2314 ;IF CAIG SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES.
2315
2316 031671 201 11 0 00 000004 C52020: MOVEI 11,4 ;PRELOAD AC WITH 0,,4
2317 031672 307 11 0 00 000003 CAIG 11,3 ;*CAIG SHOULD SKIP THE NEXT INSTRUCTION
2318 STOP^
2319 031673 254 04 0 00 031674 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2320 031674 324 00 0 00 031675 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2321 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2322 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2323 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2324
2325 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 41
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAMX INSTRUCTIONS SEQ 0070
2326 SUBTTL TEST OF MSCL CAMX INSTRUCTIONS
2327
2328 ;**********
2329
2330 ;THIS TEST VERIFIES THAT CAMLE COMPARES C(AC) WITH C(E) AND
2331 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAT OR EQUAL TO C(E).
2332 ;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0
2333 ;HENCE, CAMLE SHOULD SKIP THE NEXT INSTRUCTION.
2334 ;IF CAMLE SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES.
2335
2336 031675 474 01 0 00 000000 C52100: SETO 1, ;PRELOAD AC WITH -1,,-1
2337 031676 400 02 0 00 000000 SETZ 2, ;PRELOAD E WITH 0
2338 031677 313 01 0 00 000002 CAMLE 1,2 ;*CAMLE SHOULD SKIP THE NEXT INSTRUCTION
2339 STOP^
2340 031700 254 04 0 00 031701 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2341 031701 324 00 0 00 031702 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2342 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2343 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2344 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2345
2346 ;**********
2347
2348 ;THIS TEST VERIFIES THAT CAMLE COMPARES C(AC) WITH C(E) AND
2349 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN OR EQUAL TO C(E).
2350 ;IN THIS CASE, C(AC)=0 AND C(E)=0
2351 ;HENCE, CAMLE SHOULD SKIP THE NEXT INSTRUCTION.
2352 ;IF CAMLE SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES
2353
2354 031702 400 01 0 00 000000 C52110: SETZ 1, ;CLEAR AC
2355 031703 313 01 0 00 033501 CAMLE 1,[0] ;*CAMLE SHOULD SKIP THE NEXT INSTRUCTION
2356 STOP^
2357 031704 254 04 0 00 031705 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2358 031705 324 00 0 00 031706 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2359 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2360 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2361 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2362
2363 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 42
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAMX INSTRUCTIONS SEQ 0071
2364 ;THIS TEST VERIFIES THAT CAMLE COMPARES C(AC) WITH C(E) AND
2365 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS LESS THAN OR EQUAL TO C(E).
2366 ;IN THIS CASE, C(AC)=0,,1 AND C(E)=0
2367 ;HENCE, CAMLE SHOULD NOT SKIP THE NEXT INSTRUCTION.
2368 ;IF CAMLE DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES.
2369
2370 031706 201 01 0 00 000001 C52120: MOVEI 1,1 ;PRELOAD AC WITH 0,,1
2371 031707 400 02 0 00 000000 SETZ 2, ;PRELOAD E WITH 0
2372 031710 313 01 0 00 000002 CAMLE 1,2 ;*CAMLE SHOULD NOT SKIP THE NEXT INSTRUCTION
2373 031711 334 00 0 00 000000 SKIPA ;PASS IF CAMLE DOES NOT SKIP
2374 STOP^
2375 031712 254 04 0 00 031713 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2376 031713 324 00 0 00 031714 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2377 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2378 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2379 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2380
2381 ;**********
2382
2383 ;THIS TEST VERIFIES THAT CAMG COMPARES C(AC) WITH C(E) AND
2384 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN C(E).
2385 ;IN THIS CASE, C(AC)=-1,,-2 AND C(E)=-1,,-1.
2386 ;HENCE, CAMG SHOULD NOT SKIP THE NEXT INSTRUCTION.
2387 ;IF CAMG DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES.
2388
2389 031714 561 10 0 00 777776 C52200: HRROI 10,-2 ;PRELOAD AC WITH -1,,-2
2390 031715 317 10 0 00 033462 CAMG 10,[-1,,-1] ;*CAMG SHOULD NOT SKIP THE NEXT INSTRUCTION.
2391 031716 334 00 0 00 000000 SKIPA ;PASS IF CAMG DOES NOT SKIP
2392 STOP^
2393 031717 254 04 0 00 031720 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2394 031720 324 00 0 00 031721 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2395 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2396 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2397 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2398 ;**********
2399
2400 ;THIS TEST VERIFIES THAT CAMG COMPARES C(AC) WITH C(E) AND
2401 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN C(E).
2402 ;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,-2.
2403 ;HENCE, CAMG SHOULD SKIP THE NEXT INSTRUCTION.
2404
2405 031721 561 10 0 00 777777 C52205: HRROI 10,-1 ;PRELOAD AC WITH -1,,-1
2406 031722 317 10 0 00 033500 CAMG 10,[-1,,-2] ;*CAMG SHOULD SKIP THE NEXT INSTRUCTION.
2407 STOP^
2408 031723 254 04 0 00 031724 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2409 031724 324 00 0 00 031725 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2410 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2411 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2412 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2413 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 43
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL CAMX INSTRUCTIONS SEQ 0072
2414 ;THIS TEST VERIFIES THAT CAMG COMPARES C(AC) WITH C(E) AND
2415 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN C(E).
2416 ;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,-1.
2417 ;HENCE, CAMG SHOULD NOT SKIP THE NEXT INSTRUCTION.
2418 ;IF CAMG DOES NOT SKIP THE NEXT INSTRUCTION, THIS TEST PASSES.
2419 031725 474 10 0 00 000000 C52210: SETO 10, ;PRELOAD AC WITH -1,,-1.
2420 031726 317 10 0 00 033462 CAMG 10,[-1,,-1] ;*CAMG SHOULD NOT SKIP THE NEXT INSTRUCTION
2421 031727 334 00 0 00 000000 SKIPA ;PASS IF CAMG DOES NOT SKIP
2422 STOP^
2423 031730 254 04 0 00 031731 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2424 031731 324 00 0 00 031732 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2425 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2426 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2427 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2428
2429 ;**********
2430
2431 ;THIS TEST VERIFIES THAT CAMG COMPARES C(AC) WITH C(E) AND
2432 ;SKIPS THE NEXT INSTRUCTION IF C(AC) IS GREATER THAN C(E).
2433 ;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.
2434 ;HENCE, CAMG SHOULD SKIP THE NEXT INSTRUCTION.
2435 ;IF CAMG SKIPS THE NEXT INSTRUCTION, THIS TEST PASSES.
2436
2437 031732 400 10 0 00 000000 C52220: SETZ 10, ;PRELOAD AC WITH 0
2438 031733 317 10 0 00 033462 CAMG 10,[-1,,-1] ;*CAMG SHOULD SKIP THE NEXT INSTRUCTION
2439 STOP^
2440 031734 254 04 0 00 031735 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2441 031735 324 00 0 00 031736 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2442 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2443 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2444 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2445
2446 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 44
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL JUMPX INSTRUCTIONS SEQ 0073
2447 SUBTTL TEST OF MSCL JUMPX INSTRUCTIONS
2448
2449 ;**********
2450
2451 ;THIS TEST VERIFIES THAT JUMPLE COMPARES C(AC) WITH 0 AND
2452 ;JUMPS TO THE LOCATION SPECIFIED BY E IF C(AC) IS LESS THAN OR
2453 ;EQUAL TO 0. IN THIS CASE, C(AC)=-1,,-1. HENCE, JUMPLE SHOULD JUMP.
2454
2455 031736 474 17 0 00 000000 C52300: SETO 17, ;PRELOAD AC WITH -1,,-1
2456 031737 323 17 0 00 031741 JUMPLE 17,.+2 ;*JUMPLE SHOULD JUMP
2457 STOP^
2458 031740 254 04 0 00 031741 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2459 031741 324 00 0 00 031742 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2460 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2461 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2462 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2463
2464 ;**********
2465
2466 ;THIS TEST VERIFIES THAT JUMPLE COMPARES C(AC) WITH 0 AND
2467 ;JUMPS TO THE LOCATION SPECIFIED BY E IF C(AC) IS LESS THAN OR
2468 ;EQUAL TO 0. IN THIS CASE, C(AC)=0. HENCE, JUMPLE SHOULD JUMP.
2469
2470 031742 400 17 0 00 000000 C52310: SETZ 17, ;PRELOAD AC WITH 0
2471 031743 323 17 0 00 031745 JUMPLE 17,.+2 ;*JUMPLE SHOULD JUMP
2472 STOP^
2473 031744 254 04 0 00 031745 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2474 031745 324 00 0 00 031746 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2475 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2476 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2477 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2478
2479 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 45
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL JUMPX INSTRUCTIONS SEQ 0074
2480 ;THIS TEST VERIFIES THAT JUMPLE COMPARES C(AC) WITH 0 AND JUMPS
2481 ;TO THE LOCATION SPECIFIED BY E IF C(AC) IS LESS THAN OR EQUAL TO
2482 ;0. IN THIS CASE, C(AC)=0,,1. HENCE, JUMPLE SHOULD NOT JUMP.
2483
2484 031746 201 17 0 00 000001 C52320: MOVEI 17,1 ;PRELOAD AC WITH 0,,1
2485 031747 320 17 0 00 031751 JUMP 17,.+2 ;*JUMPLE SHOULD NOT JUMP
2486 031750 334 00 0 00 000000 SKIPA ;PASS IF JUMPLE DOES NOT JUMP
2487 STOP^
2488 031751 254 04 0 00 031752 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2489 031752 324 00 0 00 031753 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2490 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2491 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2492 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2493
2494 ;**********
2495
2496 ;THIS TEST VERIFIES THAT JUMPGE COMPARES C(AC) WITH 0 AND JUMPS TO
2497 ;THE LOCATION SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0.
2498 ;IN THIS CASE, C(AC)=-1,,-1. HENCE, JUMPGE SHOULD NOT JUMP.
2499
2500 031753 474 16 0 00 000000 C52400: SETO 16, ;PRELOAD AC WITH -1,,-1
2501 031754 325 16 0 00 031756 JUMPGE 16,.+2 ;*JUMPGE SHOULD NOT JUMP
2502 031755 334 00 0 00 000000 SKIPA ;PASS IF JUMPGE DOES NOT JUMP
2503 STOP^
2504 031756 254 04 0 00 031757 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2505 031757 324 00 0 00 031760 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2506 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2507 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2508 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2509
2510 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 46
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL JUMPX INSTRUCTIONS SEQ 0075
2511 ;THIS TEST VERIFIES THAT JUMPGE COMPARES C(AC) WITH O AND JUMPS TO
2512 ;THE LOCATION SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0.
2513 ;IN THIS CASE, C(AC)=0. HENCE, JUMPGE SHOULD JUMP.
2514
2515 031760 400 16 0 00 000000 C52410: SETZ 16, ;PRELOAD AC WITH 0
2516 031761 325 16 0 00 031763 JUMPGE 16,.+2 ;*JUMPGE SHOULD JUMP
2517 STOP^
2518 031762 254 04 0 00 031763 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2519 031763 324 00 0 00 031764 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2520 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2521 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2522 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2523
2524 ;**********
2525
2526 ;THIS TEST VERIFIES THAT JUMPGE COMPARES C(AC) WITH 0 AND JUMPS TO
2527 ;THE LOCATION SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0.
2528 ;IN THIS CASE, C(AC)=0,,1. HENCE, JUMPGE SHOULD JUMP.
2529
2530 031764 201 16 0 00 000001 C52420: MOVEI 16,1 ;PRELOAD AC WITH 0,,1
2531 031765 325 16 0 00 031767 JUMPGE 16,.+2 ;*JUMPGE SHOULD JUMP
2532 STOP^
2533 031766 254 04 0 00 031767 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2534 031767 324 00 0 00 031770 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2535 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2536 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2537 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2538
2539 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 47
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0076
2540 SUBTTL TEST OF MSCL AOJX INSTRUCTIONS
2541
2542 ;**********
2543
2544 ;THIS TEST VERIFIES THAT AOJL INCREMENTS C(AC) BY 0,,1 AND PLACES
2545 ;THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS COMPARED
2546 ;TO 0 AND THE PROGRAM JUMPS TO THE LOCATION SPECIFIED BY E IF C(AC)
2547 ;IS LESS THAN 0. IN THIS CASE, C(AC)=-1,,-2 BEFORE INCREMENTING.
2548 ;HENCE, AOJL SHOULD JUMP.
2549
2550 031770 561 15 0 00 777776 C52500: HRROI 15,-2 ;PRELOAD AC WITH -1,,-2
2551 031771 341 15 0 00 031773 AOJL 15,.+2 ;*AOJL SHOULD ADD 0,,1 TO C(AC) AND JUMP
2552 STOP^
2553 031772 254 04 0 00 031773 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2554 031773 324 00 0 00 031774 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2555 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2556 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2557 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2558 031774 312 15 0 00 033462 CAME 15,[-1] ;PASS IF C(AC) INCREMENTED CORRECTLY
2559 STOP^
2560 031775 254 04 0 00 031776 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2561 031776 324 00 0 00 031777 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2562 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2563 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2564 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2565
2566 ;**********
2567
2568 ;THIS TEST VERIFIES THAT AOJL INCREMENTS C(AC) BY 0,,1 AND
2569 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2570 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2571 ;SPECIFIED BY E IF C(AC) IS LESS THAN 0.
2572 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING
2573 ;HENCE, AOJ SHOULD NOT JUMP
2574
2575 031777 474 15 0 00 000000 C52510: SETO 15, ;PRELOAD AC WITH
2576 032000 341 15 0 00 032002 AOJL 15,.+2 ;*AOJL SHOULD ADD 0,,1 TO C(AC)
2577 ;AND NOT JUMP
2578 032001 334 00 0 00 000000 SKIPA ;PASS IF AOJL DID NOT JUMP
2579 STOP^
2580 032002 254 04 0 00 032003 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2581 032003 324 00 0 00 032004 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2582 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2583 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2584 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2585 032004 302 15 0 00 000000 CAIE 15,0 ;PASS IF C(AC) INCREMENTED CORRECTLY
2586 STOP^
2587 032005 254 04 0 00 032006 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2588 032006 324 00 0 00 032007 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
2593 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 48
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0077
2594 ;THIS TEST VERIFIES THAT AOJL INCREMENTS C(AC) BY 0,,1 AND
2595 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2596 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2597 ;SPECIFIED BY E IF C(AC) IS 0 BEFORE INCREMENTING
2598 ;HENCE, AOJL SHOULD NOT JUMP
2599
2600 032007 400 15 0 00 000000 C52520: SETZ 15, ;PRELOAD AC WITH 0
2601 032010 341 15 0 00 032012 AOJL 15,.+2 ;*AOJL SHOULD ADD 0,,1 TO C(AC)
2602 ;AND NOT JUMP
2603 032011 334 00 0 00 000000 SKIPA ;PASS IF AOJL DID NOT JUMP
2604 STOP^
2605 032012 254 04 0 00 032013 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2606 032013 324 00 0 00 032014 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2607 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2608 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2609 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2610 032014 302 15 0 00 000001 CAIE 15,1 ;PASS IF C(AC) INCREMENTED CORRECTLY
2611 STOP^
2612 032015 254 04 0 00 032016 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2613 032016 324 00 0 00 032017 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 ;THIS TEST VERIFIES THAT AOJE INCREMENTS C(AC) BY 0,,1 AND
2621 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2622 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2623 ;SPECIFIED BY E IF C(AC) IS EQUAL TO 0
2624 ;IN THIS CASE, C(AC) IS -1,,-2 BEFORE INCREMENTING
2625 ;HENCE, AOJE SHOULD NOT JUMP
2626
2627 032017 561 14 0 00 777776 C52600: HRROI 14,-2 ;PRELOAD AC WITH -1,,-2
2628 032020 342 14 0 00 032022 AOJE 14,.+2 ;*AOJE SHOULD ADD 0,,1 TO C(AC)
2629 ;AND NOT JUMP
2630 032021 334 00 0 00 000000 SKIPA ;PASS IF AOJE DID NOT JUMP
2631 STOP^
2632 032022 254 04 0 00 032023 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2633 032023 324 00 0 00 032024 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2634 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2635 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2636 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2637 032024 312 14 0 00 033462 CAME 14,[-1] ;PASS IF C(AC) INCREMENTED CORRECTLY
2638 STOP^
2639 032025 254 04 0 00 032026 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2640 032026 324 00 0 00 032027 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2641 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2642 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2643 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2644
2645 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 49
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0078
2646 ;THIS TEST VERIFIES THAT AOJE INCREMENTS C(AC) BY 0,,1 AND
2647 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2648 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2649 ;SPECIFIED BY E IF C(AC) IS EQUAL TO 0.
2650 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING.
2651 ;HENCE, AOJE SHOULD JUMP
2652
2653 032027 474 14 0 00 000000 C52610: SETO 14, ;PRELOAD AC WITH -1,,-1
2654 032030 342 14 0 00 032032 AOJE 14,.+2 ;*AOJ SHOULD ADD 0,,1 TO C(AC)
2655 ;AND JUMP
2656 STOP^
2657 032031 254 04 0 00 032032 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2658 032032 324 00 0 00 032033 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2659 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2660 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2661 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2662 032033 302 14 0 00 000000 CAIE 14,0 ;PASS IF C(AC) INCREMENTED CORRECTLY
2663 STOP^
2664 032034 254 04 0 00 032035 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2665 032035 324 00 0 00 032036 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2666 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2667 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2668 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2669
2670 ;**********
2671
2672 ;THIS TEST VERIFIES THAT AOJE INCREMENTS C(AC) BY 0,,1 AND
2673 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2674 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2675 ;SPECIFIED BY E IF C(AC) IS EQUAL TO 0.
2676 ;IN THIS CASE, C(AC) IS 0 BEFORE INCREMENTING
2677 ;HENCE, AOJE SHOULD NOT JUMP
2678
2679 032036 400 14 0 00 000000 C52620: SETZ 14, ;PRELOAD AC WITH 0
2680 032037 342 14 0 00 032041 AOJE 14,.+2 ;*AOJE SHOULD ADD 0,11 TO C(AC)
2681 ;AND NOT JUMP
2682 032040 334 00 0 00 000000 SKIPA ;PASS IF AOJE DID NOT JUMP
2683 STOP^
2684 032041 254 04 0 00 032042 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2685 032042 324 00 0 00 032043 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2686 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2687 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2688 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2689 032043 302 14 0 00 000001 CAIE 14,1 ;PASS IF C(AC) INCREMENTED CORRECTLY
2690 STOP^
2691 032044 254 04 0 00 032045 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2692 032045 324 00 0 00 032046 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2693 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2694 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2695 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2696
2697 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 50
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0079
2698 ;THIS TEST VERIFIES THAT AOJLE INCREMENTS C(AC) BY 0,,1 AND
2699 ;PLACES THE RESULT BACK INTO TLE$EC. THE RESULT IN THE AC IS
2700 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2701 ;SPECIFIED BY E IF C(AC) IS LESS THAN OR EQUAL TO 0.
2702 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING
2703 ;HENCE, AOJLE SHOULD
2704
2705 032046 561 13 0 00 777776 C52700: HRROI 13,-2 ;PRELOAD AC WITH -1,,-2
2706 032047 343 13 0 00 032051 AOJLE 13,.+2 ;*AOJLE SHOULD ADD 0,,1 TO C(AC)
2707 ;AND JUMP
2708 STOP^
2709 032050 254 04 0 00 032051 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2710 032051 324 00 0 00 032052 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2711 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2712 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2713 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2714 032052 312 13 0 00 033462 CAME 13,[-1] ;PASS IF C(AC) INCREMENTED CORRECTLY
2715 STOP^
2716 032053 254 04 0 00 032054 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2717 032054 324 00 0 00 032055 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2718 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2719 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2720 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2721
2722 ;**********
2723
2724 ;THIS TEST VERIFIES THAT AOJLE INCREMENTS C(AC) BY 0,,1 AND
2725 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2726 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2727 ;SPECIFIED BY E IF C(AC) IS LESS THAN OR EQUAL TO 0
2728 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING
2729 ;HENCE, AOJLE SHOULD JUMP.
2730
2731 032055 474 13 0 00 000000 C52710: SETO 13, ;PRELOAD AC WITH -1,,-1
2732 032056 343 13 0 00 032060 AOJLE 13,.+2 ;*AOJLE SHOULD ADD 0,,1 TO C(AC)
2733 ;AND JUMP
2734 STOP^
2735 032057 254 04 0 00 032060 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2736 032060 324 00 0 00 032061 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2737 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2738 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2739 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2740 032061 302 13 0 00 000000 CAIE 13,0 ;PASS IF C(AC) INCREMENTED CORRECTLY
2741 STOP^
2742 032062 254 04 0 00 032063 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2743 032063 324 00 0 00 032064 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2744 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2745 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2746 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2747
2748 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 51
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0080
2749 ;THIS TEST VERIFIES THAT AOJLE INCREMENTS C(AC) BY 0,,1 AND
2750 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2751 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2752 ;SPECIFIED BY E IF C(AC) IS LESS THAN OR EQUAL TO 0.
2753 ;IN THIS CASE, C(AC) IS 0
2754 ;HENCE, AOJLE SHOULD NOT JUMP.
2755
2756 032064 400 13 0 00 000000 C52720: SETZ 13, ;PRELOAD AC WITH 0
2757 032065 343 13 0 00 032067 AOJLE 13,.+2 ;*AOJLE SHOULD ADD 0,,1 TO C(AC)
2758 ;AND NOT JUMP
2759 032066 334 00 0 00 000000 SKIPA ;PASS IF AOJLE DID NOT JUMP
2760 STOP^
2761 032067 254 04 0 00 032070 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2762 032070 324 00 0 00 032071 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2763 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2764 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2765 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2766 032071 302 13 0 00 000001 CAIE 13,1 ;PASS IF C(AC) INCREMENTED CORRECTLY
2767 STOP^
2768 032072 254 04 0 00 032073 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2769 032073 324 00 0 00 032074 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2770 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2771 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2772 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2773
2774 ;**********
2775
2776 ;THIS TEST VERIFIES THAT AOJA INCREMENTS C(AC) BY 0,,1 AND
2777 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2778 ;COMPARED TO 0 AND THE PROGRAM ALWAYS JUMPS TO THE LOCATION
2779 ;SPECIFIED BY E.
2780 ;IN THIS CASE, C(AC) IS -1,,-2 BEFORE INCREMENTING
2781 ;HENCE, AOJA SHOULD JUMP
2782
2783 032074 561 12 0 00 777776 C53000: HRROI 12,-2 ;PRELOAD AC WITH -1,,-2
2784 032075 344 12 0 00 032077 AOJA 12,.+2 ;*AOJA SHOULD ADD 0,,1 TO C(AC)
2785 ;AND JUMP
2786 STOP^
2787 032076 254 04 0 00 032077 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2788 032077 324 00 0 00 032100 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 032100 312 12 0 00 033462 CAME 12,[-1] ;PASS IF C(AC) INCREMENTED CORRECTLY
2793 STOP^
2794 032101 254 04 0 00 032102 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2795 032102 324 00 0 00 032103 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2796 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2797 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2798 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2799
2800 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 52
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0081
2801 ;THIS TEST VERIFIES THAT AOJA INCREMENTS C(AC) BY 0,,1 AND
2802 ;PLACES THE RESULT BACK INTO AC. THE RESULT IN THE AC IS
2803 ;COMPARED TO 0 AND THE PROGRAM ALWAYS JUMPS TO THE LOCATION
2804 ;SPECIFIED BY E.
2805 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING
2806 ;HENCE, AOJA SHOULD JUMP
2807
2808 032103 474 12 0 00 000000 C53010: SETO 12, ;PRELOAD AC WITH -1,,-1
2809 032104 344 12 0 00 032106 AOJA 12,.+2 ;*AOJA SHOULD ADD 0,,1 TO C(AC)
2810 ;AND JUMP
2811 STOP^
2812 032105 254 04 0 00 032106 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2813 032106 324 00 0 00 032107 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 032107 302 12 0 00 000000 CAIE 12,0 ;PASS IF C(AC) INCREMENTED CORRECTLY
2818 STOP^
2819 032110 254 04 0 00 032111 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2820 032111 324 00 0 00 032112 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2821 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2822 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2823 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2824
2825 ;**********
2826
2827 ;THIS TEST VERIFIES THAT AOJA INCREMENTS C(AC) BY 0,,1 AND
2828 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2829 ;COMPARED TO 0 AND THE PROGRAM ALWAYS JUMPS TO THE LOCATION
2830 ;SPECIFIED BY E.
2831 ;IN THIS CASE, C(AC) IS 0 BEFORE INCREMENTING
2832 ;HENCE, AOJA SHOULD JUMP
2833
2834 032112 400 12 0 00 000000 C53020: SETZ 12, ;PRELOAD AC WITH 0
2835 032113 344 12 0 00 032115 AOJA 12,.+2 ;*AOJA SHOULD ADD 0,,1 TO C(AC)
2836 ;AND JUMP
2837 STOP^
2838 032114 254 04 0 00 032115 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2839 032115 324 00 0 00 032116 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2840 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2841 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2842 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2843 032116 302 12 0 00 000001 CAIE 12,1 ;PASS IF C(AC) INCREMENTED CORRECTLY
2844 STOP^
2845 032117 254 04 0 00 032120 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2846 032120 324 00 0 00 032121 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2847 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2848 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2849 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2850
2851 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 53
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0082
2852 ;THIS TEST VERIFIES THAT AOJGE INCREMENTS C(AC) BY 0,,1 AND
2853 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2854 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2855 ;SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0
2856 ;IN THIS CASE, C(AC) IS -1,,-2 BEFORE INCREMENTING
2857 ;HENCE, AOJGE SHOULD NOT JUMP
2858
2859 032121 561 11 0 00 777776 C53100: HRROI 11,-2 ;PRELOAD AC WITH -1,,-2
2860 032122 345 11 0 00 032124 AOJGE 11,.+2 ;*AOJGE SHOULD ADD 0,,1 TO C(AC)
2861 ;AND NOT JUMP
2862 032123 334 00 0 00 000000 SKIPA ;PASS IF AOJGE DID NOT JUMP
2863 STOP^
2864 032124 254 04 0 00 032125 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2865 032125 324 00 0 00 032126 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2866 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2867 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2868 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2869 032126 312 11 0 00 033462 CAME 11,[-1] ;PASS IF C(AC) INCREMENTED CORRECTLY
2870 STOP^
2871 032127 254 04 0 00 032130 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2872 032130 324 00 0 00 032131 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2873 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2874 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2875 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2876
2877 ;**********
2878
2879 ;THIS TEST VERIFIES THAT AOJGE INCREMENTS C(AC) BY 0,,1 AND
2880 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2881 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2882 ;SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0.
2883 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING
2884 ;HENCE, AOJ SHOULD JUMP
2885
2886 032131 474 11 0 00 000000 C53110: SETO 11, ;PRELOAD AC WITH -1,,-1
2887 032132 345 11 0 00 032134 AOJGE 11,.+2 ;*AOJGE SHOULD ADD 0,,1 TO C(AC)
2888 ;AND JUMP
2889 STOP^
2890 032133 254 04 0 00 032134 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2891 032134 324 00 0 00 032135 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2892 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2893 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2894 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2895 032135 302 11 0 00 000000 CAIE 11,0 ;PASS IF C(AC) INCREMENTED CORRECTLY
2896 STOP^
2897 032136 254 04 0 00 032137 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2898 032137 324 00 0 00 032140 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2899 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2900 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2901 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2902
2903 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 54
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0083
2904 ;THIS TEST VERIFIES THAT AOJGE INCREMENTS C(AC) BY 0,,1 AND
2905 ;PLACES THE RESULT BACK INTO AC. THE RESULT IN THE AC IS
2906 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2907 ;SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0
2908 ;IN THIS CASE, C(AC) IS 0 BEFORE INCREMENTING
2909 ;HENCE, AOJGE SHOULD JUMP
2910
2911 032140 400 11 0 00 000000 C53120: SETZ 11, ;PRELOAD AC WITH 0
2912 032141 345 11 0 00 032143 AOJGE 11,.+2 ;*AOJGE SHOULD ADD 0,,1 TO C(AC)
2913 ;AND JUMP
2914 STOP^
2915 032142 254 04 0 00 032143 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2916 032143 324 00 0 00 032144 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2917 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2918 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2919 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2920 032144 302 11 0 00 000001 CAIE 11,1 ;PASS IF C(AC) INCREMENTED CORRECTLY
2921 STOP^
2922 032145 254 04 0 00 032146 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2923 032146 324 00 0 00 032147 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2924 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2925 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2926 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2927
2928 ;**********
2929
2930 ;THIS TEST VERIFIES THAT AOJN INCREMENTS C(AC) BY 0,,1 AND
2931 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2932 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2933 ;SPECIFIED BY E IF C(AC) IS NOT EQUAL TO 0.
2934 ;IN THIS CASE, C(AC) IS -1,,-2 BEFORE INCREMENTING
2935 ;HENCE, AOJN SHOULD JUMP
2936
2937 032147 561 10 0 00 777776 C53200: HRROI 10,-2 ;PRELOAD AC WITH -1,,-2
2938 032150 346 10 0 00 032152 AOJN 10,.+2 ;*AOJN SHOULD ADD 0,,1 TO C(AC)
2939 ;AND JUMP
2940 STOP^
2941 032151 254 04 0 00 032152 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2942 032152 324 00 0 00 032153 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2943 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2944 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2945 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2946 032153 312 10 0 00 033462 CAME 10,[-1] ;PASS IF C(AC) INCREMENTED CORRECTLY
2947 STOP^
2948 032154 254 04 0 00 032155 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2949 032155 324 00 0 00 032156 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2950 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2951 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2952 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2953
2954 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 55
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0084
2955 ;THIS TEST VERIFIES THAT AOJN INCREMENTS C(AC) BY 0,,1 AND
2956 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2957 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2958 ;SPECIFIED BY E IF C(AC) IS NOT EQUAL TO 0.
2959 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING
2960 ;HENCE, AOJ SHOULD NOT JUMP.
2961
2962 032156 474 10 0 00 000000 C53210: SETO 10, ;PRELOAD AC WITH -1,,-1
2963 032157 346 10 0 00 032161 AOJN 10,.+2 ;*AOJN SHOULD ADD 0,,1 TO C(AC)
2964 ;AND NOT JUMP
2965 032160 334 00 0 00 000000 SKIPA ;PASS IF AOJN DID NOT JUMP
2966 STOP^
2967 032161 254 04 0 00 032162 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2968 032162 324 00 0 00 032163 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2969 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2970 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2971 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2972 032163 302 10 0 00 000000 CAIE 10,0 ;PASS IF C(AC) INCREMENTED CORRRECTLY
2973 STOP^
2974 032164 254 04 0 00 032165 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2975 032165 324 00 0 00 032166 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2976 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2977 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2978 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2979
2980 ;**********
2981
2982 ;THIS TEST VERIFIES THAT AOJN INCREMENTS C(AC) BY 0,,1 AND
2983 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
2984 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
2985 ;SPECIFIED BY E IF C(AC) IS NOT EQUAL TO 0.
2986 ;IN THIS CASE, C(AC) IS 0 BEFORE INCREMENTING
2987 ;HENCE, AOJN SHOULD JUMP.
2988
2989 032166 400 10 0 00 000000 C53220: SETZ 10, ;PRELOAD AC WITH 0
2990 032167 346 10 0 00 032171 AOJN 10,.+2 ;*AOJN SHOULD ADD 0,,1 TO C(AC)
2991 ;AND JUMP
2992 STOP^
2993 032170 254 04 0 00 032171 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
2994 032171 324 00 0 00 032172 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
2995 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
2996 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
2997 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
2998 032172 302 10 0 00 000001 CAIE 10,1 ;PASS IF C(AC) INCREMENTED CORRECTLY
2999 STOP^
3000 032173 254 04 0 00 032174 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3001 032174 324 00 0 00 032175 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3002 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3003 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3004 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3005
3006 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 56
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0085
3007 ;THIS TEST VERIFIES THAT AOJG INCREMENTS C(AC) BY 0,,1 AND
3008 ;PLACES THE RESULT BACK INTO THE AC. THE REAULT IN THE AC IS
3009 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3010 ;SPECIFIED BY E IF C(AC) IS GREATER THAN 0
3011 ;IN THIS CASE, C(AC) IS -1,,-2 BEFORE INC
3012 ;HENCE, AOJG SHOULD NOT JUMP
3013
3014 032175 561 07 0 00 777776 C53300: HRROI 7,-2 ;PRELOAD AC WITH -1,,-2
3015 032176 347 07 0 00 032200 AOJG 7,.+2 ;*AOJG SHOULD ADD 0,11 TO C(AC)
3016 ;AND NOT JUMP
3017 032177 334 00 0 00 000000 SKIPA ;PASS IF AOJG DID NOT JUMP
3018 STOP^
3019 032200 254 04 0 00 032201 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3020 032201 324 00 0 00 032202 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3021 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3022 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3023 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3024 032202 312 07 0 00 033462 CAME 7,[-1] ;PASS IF C(AC) INCREMENTED CORRECTLY
3025 STOP^
3026 032203 254 04 0 00 032204 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3027 032204 324 00 0 00 032205 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3028 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3029 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3030 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3031
3032 ;**********
3033
3034 ;THIS TEST VERIFIES THAT AOJG INCREMENTS C(AC) BY 0,,1 AND
3035 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
3036 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3037 ;SPECIFIED BY E IF C(AC) IS GREATER THAN 0.
3038 ;IN THIS CASE, C(AC) IS -1,,-1 BEFORE INCREMENTING
3039 ;HENCE, AOJG SHOULD NOT JUMP.
3040
3041 032205 474 07 0 00 000000 C53310: SETO 7, ;PRELOAD AC WITH -1,,-1
3042 032206 347 07 0 00 032210 AOJG 7,.+2 ;*AOJG SHOULD ADD 0,,1 TO C(AC)
3043 ;AND NOT JUMP
3044 032207 334 00 0 00 000000 SKIPA ;PASS IF AOJG DID NOT JUMP
3045 STOP^
3046 032210 254 04 0 00 032211 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3047 032211 324 00 0 00 032212 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3048 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3049 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3050 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3051 032212 302 07 0 00 000000 CAIE 7,0 ;PASS IF C(AC) INCREMENTED CORRECTLY
3052 STOP^
3053 032213 254 04 0 00 032214 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3054 032214 324 00 0 00 032215 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3055 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3056 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3057 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3058
3059 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 57
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOJX INSTRUCTIONS SEQ 0086
3060 ;THIS TEST VERIFIES THAT AOJG INCREMENTS C(AC) BY 0,,1 AND
3061 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
3062 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3063 ;SPECIFIED BY E IF C(AC) IS GREATER THAN 0.
3064 ;IN THIS CASE, C(AC) IS 0 BEFORE INCREMENTING
3065 ;HENCE, AOJG SHOULD JUMP
3066
3067 032215 400 07 0 00 000000 C53320: SETZ 7, ;PRELOAD AC WITH 0
3068 032216 347 07 0 00 032220 AOJG 7,.+2 ;*AOJG SHOULD ADD 0,,1 TO C(AC)
3069 ;AND JUMP
3070 STOP^
3071 032217 254 04 0 00 032220 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3072 032220 324 00 0 00 032221 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3073 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3074 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3075 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3076 032221 302 07 0 00 000001 CAIE 7,1 ;PASS IF C(AC) INCREMENTED CORRECTLY
3077 STOP^
3078 032222 254 04 0 00 032223 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3079 032223 324 00 0 00 032224 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3080 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3081 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3082 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3083
3084 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 58
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0087
3085 SUBTTL TEST OF MSCL AOSX INSTRUCTIONS
3086
3087 ;**********
3088
3089 ;THIS TEST VERIFIES THAT AOSL INCREMENTS C(E) BY 0,,1 AND PLACES
3090 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3091 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN 0
3092 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3093 ;IN THIS CASE, AC=6, C(AC)=707070,,707070 AND C(E)=-1,,-2
3094 ;BEFORE INCREMENTING. HENCE, AOSL SHOULD SKIP ; AND THE
3095 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
3096 ;RESPECTIVELY.
3097
3098 032224 200 06 0 00 033474 C53400: MOVE 6,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3099 032225 561 07 0 00 777776 HRROI 7,-2 ;PRELOAD E WITH -1,,-2
3100 032226 351 06 0 00 000007 AOSL 6,7 ;*AOSL SHOULD ADD 0,,1 TO C(E),
3101 ;UPDATE AC AND SKIP
3102 STOP^
3103 032227 254 04 0 00 032230 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3104 032230 324 00 0 00 032231 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3105 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3106 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3107 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3108 032231 312 07 0 00 033462 CAME 7,[-1] ;PASS IF E INCREMENTED CORRECTLY
3109 STOP^
3110 032232 254 04 0 00 032233 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3111 032233 324 00 0 00 032234 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 032234 312 06 0 00 033462 CAME 6,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3116 STOP^
3117 032235 254 04 0 00 032236 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3118 032236 324 00 0 00 032237 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3119 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3120 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3121 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3122
3123 ;**********
3124
3125 ;THIS TEST VERIFIES THAT AOSL INCREMENTS C(E) BY 0,,1 AND PLACES
3126 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3127 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN 0
3128 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3129 ;IN THIS CASE, AC=6, C(AC)=707070,,707070 AND C(E)=-1,,-2
3130 ;BEFORE INCREMENTING. HENCE, AOSL SHOULD SKIP ; AND THE
3131 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
3132 ;RESPECTIVELY.
3133
3134 032237 200 06 0 00 033474 C53401: MOVE 6,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3135 032240 561 07 0 00 777776 HRROI 7,-2 ;PRELOAD E WITH -1,,-2
3136 032241 202 07 0 00 032255 MOVEM 7,E53401
3137 032242 351 06 0 00 032255 AOSL 6,E53401 ;*AOSL SHOULD ADD 0,,1 TO C(E),
3138 ;UPDATE AC AND SKIP
3139 STOP^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 58-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0088
3140 032243 254 04 0 00 032244 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3141 032244 324 00 0 00 032245 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3142 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3143 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3144 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3145 032245 200 07 0 00 032255 MOVE 7,E53401
3146 032246 312 07 0 00 033462 CAME 7,[-1] ;PASS IF E INCREMENTED CORRECTLY
3147 STOP^
3148 032247 254 04 0 00 032250 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3149 032250 324 00 0 00 032251 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3150 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3151 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3152 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3153 032251 312 06 0 00 033462 CAME 6,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3154 STOP^
3155 032252 254 04 0 00 032253 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3156 032253 324 00 0 00 032254 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3157 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3158 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3159 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3160
3161 032254 334 00 0 00 000000 SKIPA ;GO TO NEXT TEST
3162 032255 000000 000000 E53401: 0 ;TEST WORD MEMORY
3163
3164 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 59
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0089
3165 ;THIS TEST VERIFIES THAT AOSL INCREMENTS C(E) BY 0,,1 AND PLACES
3166 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3167 ;THE NEXT INSTRUCTION IF C(E) ISLESS THAN 0
3168 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3169 ;IN THIS CASE, AC=6, C(AC)=707070,,707070 AND C(E)=-1,,-1
3170 ;BEFORE INCREMENTING. HENCE, AOSL SHOULD NOT SKIP; AND THE
3171 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
3172 ;RESPECTIVELY.
3173
3174 032256 200 06 0 00 033474 C53410: MOVE 6,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3175 032257 474 07 0 00 000000 SETO 7, ;PRELOAD E WITH -1,,-1
3176 032260 351 06 0 00 000007 AOSL 6,7 ;*AOSL SHOULD ADD 00,1 TO C(E)
3177 ;UPDATE AC AND NOT SKIP
3178 032261 334 00 0 00 000000 SKIPA ;PASS IF AOSL DID NOT SKIP
3179 STOP^
3180 032262 254 04 0 00 032263 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3181 032263 324 00 0 00 032264 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3182 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3183 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3184 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3185 032264 312 07 0 00 033501 CAME 7,[0] ;PASS IF E INCREMENTED CORRECTLY
3186 STOP^
3187 032265 254 04 0 00 032266 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3188 032266 324 00 0 00 032267 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3189 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3190 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3191 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3192 032267 312 06 0 00 033501 CAME 6,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3193 STOP^
3194 032270 254 04 0 00 032271 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3195 032271 324 00 0 00 032272 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3196 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3197 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3198 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3199
3200 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 60
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0090
3201 ;THIS TEST VERIFIES THAT AOSL INCREMENTS C(E) BY 0,,1 AND PLACES
3202 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3203 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN 0.
3204 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3205 ;IN THIS CASE, AC=6, C(AC)=707070,,707070 AND C(E)=0
3206 ;BEFORE INCREMENTING. HENCE, AOSL SHOULD NOT SKIP; AND THE
3207 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
3208 ;RESPECTIVELY
3209
3210 032272 200 06 0 00 033474 C53420: MOVE 6,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3211 032273 400 07 0 00 000000 SETZ 7, ;PRELOAD E WITH 0
3212 032274 351 06 0 00 000007 AOSL 6,7 ;*AOSL SHOULD ADD 0,,1 TO C(E).
3213 ;UPDATE AC AND NOT SKIP
3214 032275 334 00 0 00 000000 SKIPA ;PASS IF AOSL DID NOT SKIP
3215 STOP^
3216 032276 254 04 0 00 032277 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3217 032277 324 00 0 00 032300 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3218 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3219 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3220 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3221 032300 312 07 0 00 033502 CAME 7,[1] ;PASS IF E INCREMENTED CORRECTLY
3222 STOP^
3223 032301 254 04 0 00 032302 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3224 032302 324 00 0 00 032303 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3225 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3226 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3227 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3228 032303 312 06 0 00 033502 CAME 6,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3229 STOP^
3230 032304 254 04 0 00 032305 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3231 032305 324 00 0 00 032306 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3232 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3233 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3234 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3235
3236 ;**********
3237
3238 ;THIS TEST VERIFIES THAT AOSE INCREMENTS C(E) BY 0,,1 AND PLACES
3239 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3240 ;THE NEXT INSTRUCTION IF C(E) IS EQUAL TO 0.
3241 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3242 ;IN THIS CASE, AC=5, C(AC)=707070,,707070AND C(E)=-1,,-2
3243 ;BEFORE INCREMENTING. HENCE, AOSE SHOULD NOT SKIP; AND THE
3244 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
3245 ;RESPECTIVELY.
3246
3247 032306 200 05 0 00 033474 C53500: MOVE 5,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3248 032307 561 06 0 00 777776 HRROI 6,-2 ;PRELOAD E WITH -1,,-2
3249 032310 352 05 0 00 000006 AOSE 5,6 ;*AOSE SHOULD ADD 0,,1 TO C(E),
3250 ;UPDATE AC AND NOT SKIP
3251 032311 334 00 0 00 000000 SKIPA ;PASS IF AOSE DID NOT SKIP
3252 STOP^
3253 032312 254 04 0 00 032313 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3254 032313 324 00 0 00 032314 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3255 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 60-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0091
3256 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3257 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3258 032314 312 06 0 00 033462 CAME 6,[-1] ;PASS IF E INCREMENTED CORRECTLY
3259 STOP^
3260 032315 254 04 0 00 032316 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3261 032316 324 00 0 00 032317 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 032317 312 05 0 00 033462 CAME 5,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3266 STOP^
3267 032320 254 04 0 00 032321 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3268 032321 324 00 0 00 032322 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3269 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3270 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3271 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3272
3273 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 61
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0092
3274 ;THIS TEST VERIFIES THAT AOSE INCREMENTS C(E) BY 0,,1 AND PLACES
3275 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3276 ;THE NEXT INSTRUCTION IF C(E) IS EQUAL TO 0
3277 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3278 ;IN THIS CASE, AC=5, C(AC)=707070,,707070 AND C(E)=-1,,-1
3279 ;BEFORE INCREMENTING. HENCE, AOSE SHOULD SKIP; AND THE
3280 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
3281 ;RESPECTIVELY.
3282
3283 032322 200 05 0 00 033474 C53510: MOVE 5,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3284 032323 474 06 0 00 000000 SETO 6, ;PRELOAD E WITH -1,,-1
3285 032324 352 05 0 00 000006 AOSE 5,6 ;*AOSE SHOULD ADD 0,,1 TO C(E),
3286 ;UPDATE AC AND SKIP
3287 STOP^
3288 032325 254 04 0 00 032326 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3289 032326 324 00 0 00 032327 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3290 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3291 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3292 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3293 032327 312 06 0 00 033501 CAME 6,[0] ;PASS IF E INCREMENTED CORRECTLY
3294 STOP^
3295 032330 254 04 0 00 032331 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3296 032331 324 00 0 00 032332 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3297 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3298 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3299 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3300 032332 312 05 0 00 033501 CAME 5,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3301 STOP^
3302 032333 254 04 0 00 032334 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3303 032334 324 00 0 00 032335 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3304 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3305 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3306 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3307
3308 ;**********
3309
3310 ;THIS TEST VERIFIES THAT AOSE INCREMENTS C(E) BY 0,,1 AND PLACES
3311 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3312 ;THE NEXT INSTRUCTION IF C(E) IS EQUAL TO 0
3313 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3314 ;IN THIS CASE, AC=5, C(AC)=707070,,707070 AND C(AC)=0
3315 ;BEFORE INCREMENTING. HENCE, AOSE SHOULD NOT SKIP; AND THE
3316 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
3317 ;RESPECTIVELY.
3318
3319 032335 200 05 0 00 033474 C53520: MOVE 5,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3320 032336 400 06 0 00 000000 SETZ 6, ;PRELOAD E WITH 0
3321 032337 352 05 0 00 000006 AOSE 5,6 ;*AOSE SHOULD ADD 0,,1 TO C(E),
3322 ;UPDATE AC AND NOT SKIP
3323 032340 334 00 0 00 000000 SKIPA ;PASS IF AOSE DID NOT SKIP
3324 STOP^
3325 032341 254 04 0 00 032342 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3326 032342 324 00 0 00 032343 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3327 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3328 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 61-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0093
3329 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3330 032343 312 06 0 00 033502 CAME 6,[1] ;PASS IF E INCREMENTED CORRECTLY
3331 STOP^
3332 032344 254 04 0 00 032345 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3333 032345 324 00 0 00 032346 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3334 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3335 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3336 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3337 032346 312 05 0 00 033502 CAME 5,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3338 STOP^
3339 032347 254 04 0 00 032350 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3340 032350 324 00 0 00 032351 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3341 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3342 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3343 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3344
3345 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 62
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0094
3346 ;THIS TEST VERIFIES THAT AOSLE INCREMENTS C(E) BY 0,,1 AND PLACES
3347 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3348 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN OR EQUAL TO0
3349 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3350 ;IN THIS CASE, AC=4, C(AC)=707070,,707070 AND C(E)=-1,,-2
3351 ;BEFORE INCREMENTING. HENCE, AOSLE SHOULD SKIP; AND THE
3352 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
3353 ;RESPECTIVELY.
3354
3355 032351 200 04 0 00 033474 C53600: MOVE 4,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3356 032352 561 05 0 00 777776 HRROI 5,-2 ;PRELOAD E WITH -1,,-2
3357 032353 353 04 0 00 000005 AOSLE 4,5 ;*AOSLE SHOULD ADD 0,,1 TO C(E),
3358 ;UPDATE AC AND SKIP ZERO
3359 STOP^
3360 032354 254 04 0 00 032355 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3361 032355 324 00 0 00 032356 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3362 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3363 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3364 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3365 032356 312 05 0 00 033462 CAME 5,[-1] ;PASS IF E INCREMENTED CORRECTLY
3366 STOP^
3367 032357 254 04 0 00 032360 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3368 032360 324 00 0 00 032361 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3369 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3370 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3371 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3372 032361 312 04 0 00 033462 CAME 4,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3373 STOP^
3374 032362 254 04 0 00 032363 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3375 032363 324 00 0 00 032364 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3376 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3377 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3378 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3379
3380 ;**********
3381
3382 ;THIS TEST VERIFIES THAT AOSLE INCREMENTS C(E) BY 0,,1 AND PLACES
3383 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3384 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN OR EQUAL TO 0.
3385 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3386 ;IN THIS CASE, AC=4, C(AC)=707070,,707070 AND C(E)=-1,,-1
3387 ;BEFORE INCREMENTING. HENCE, AOSLE SHOULD SKIP; AND THE
3388 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
3389 ;RESPECTIVELY.
3390
3391 032364 200 04 0 00 033474 C53610: MOVE 4,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3392 032365 476 05 0 00 000000 SETOM 5, ;PRELOAD E WITH -1,,-1
3393 032366 353 04 0 00 000005 AOSLE 4,5 ;*AOSLE SHOULD ADD 0,,1 TO C(E)
3394 ;UPDATE AC AND SKIP
3395 STOP^
3396 032367 254 04 0 00 032370 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3397 032370 324 00 0 00 032371 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3398 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3399 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3400 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 62-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0095
3401 032371 312 05 0 00 033501 CAME 5,[0] ;PASS IF E INCREMENTED CORRECTLY
3402 STOP^
3403 032372 254 04 0 00 032373 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3404 032373 324 00 0 00 032374 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 032374 312 04 0 00 033501 CAME 4,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3409 STOP^
3410 032375 254 04 0 00 032376 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3411 032376 324 00 0 00 032377 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3412 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3413 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3414 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3415
3416 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 63
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0096
3417 ;THIS TEST VERIFIES THAT AOSLE INCREMENTS C(E) BY 0,,1 AND PLACES
3418 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3419 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN OR EQUAL TO 0
3420 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3421 ;IN THIS CASE, AC=4, C(AC)=707070,,707070 AND C(E)=0
3422 ;BEFORE INCREMENTING. HENCE, AOSLE SHOULD NOT SKIP ; AND THE
3423 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
3424 ;RESPECTIVELY.
3425
3426 032377 200 04 0 00 033474 C53620: MOVE 4,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3427 032400 400 00 0 00 000005 SETZ 5 ;PRELOAD E WITH 0
3428 032401 353 04 0 00 000005 AOSLE 4,5 ;*AOSLE SHOULD ADD 0,,1 TO C(E)
3429 ;UPDATE AC AND NOT SKIP
3430 032402 334 00 0 00 000000 SKIPA ;PASS IF AOSLE DID NOT SKIP
3431 STOP^
3432 032403 254 04 0 00 032404 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3433 032404 324 00 0 00 032405 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3434 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3435 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3436 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3437 032405 312 05 0 00 033502 CAME 5,[1] ;PASS IF E INCREMENTED CORRECTLY
3438 STOP^
3439 032406 254 04 0 00 032407 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3440 032407 324 00 0 00 032410 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3441 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3442 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3443 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3444 032410 312 04 0 00 033502 CAME 4,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3445 STOP^
3446 032411 254 04 0 00 032412 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3447 032412 324 00 0 00 032413 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3448 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3449 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3450 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3451
3452 ;**********
3453
3454 ;THIS TEST VERIFIES THAT AOSA INCREMENTS C(E) BY 0,,1 AND PLACES
3455 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND ALWAYS SKIPS
3456 ;THE NEXT INSTRUCTION.
3457 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3458 ;IN THIS CASE, AC=3, C(AC)=707070,,707070 AND C(E)=-1,,-2
3459 ;BEFORE INCREMENTING. HENCE, AOSA SHOULD SKIP ; AND THE
3460 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
3461 ;RESPECTIVELY.
3462
3463 032413 200 03 0 00 033474 C53700: MOVE 3,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3464 032414 561 04 0 00 777776 HRROI 4,-2 ;PRELOAD E WITH -1,,-2
3465 032415 354 03 0 00 000004 AOSA 3,4 ;*AOSA SHOULD ADD 0,,1 TO C(E),
3466 ;UPDATE AC AND SKIP
3467 STOP^
3468 032416 254 04 0 00 032417 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3469 032417 324 00 0 00 032420 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3470 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3471 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 63-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0097
3472 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3473 032420 312 04 0 00 033462 CAME 4,[-1] ;PASS IF E INCREMENTED CORRECTLY
3474 STOP^
3475 032421 254 04 0 00 032422 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3476 032422 324 00 0 00 032423 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3477 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3478 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3479 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3480 032423 312 03 0 00 033462 CAME 3,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3481 STOP^
3482 032424 254 04 0 00 032425 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3483 032425 324 00 0 00 032426 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3484 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3485 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3486 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3487
3488 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 64
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0098
3489 ;THIS TEST VERIFIES THAT AOSA INCREMENTS C(E) BY 0,,1 AND PLACES
3490 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND ALWAYS SKIPS
3491 ;THE NEXT INSTRUCTION.
3492 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3493 ;;IN THIS CASE, AC=3, C(AC)=707070,,707070 AND C(E)=-1,,-1
3494 ;BEFORE INCREMENTING. HENCE, AOSA SHOULD SKIP AND THE
3495 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
3496 ;RESPECTIVELY
3497
3498 032426 200 03 0 00 033474 C53710: MOVE 3,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3499 032427 474 04 0 00 000000 SETO 4, ;PRELOAD E WITH -1,,-1
3500 032430 354 03 0 00 000004 AOSA 3,4 ;*AOSA SHOULD ADD 0,,1 TO C(E),
3501 ;UPDATE AC AND SKIP
3502 STOP^
3503 032431 254 04 0 00 032432 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3504 032432 324 00 0 00 032433 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^
3508 032433 312 04 0 00 033501 CAME 4,[0] ;PASS IF E INCREMENTED CORRECTLY
3509 STOP^
3510 032434 254 04 0 00 032435 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3511 032435 324 00 0 00 032436 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3512 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3513 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3514 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3515 032436 312 03 0 00 033501 CAME 3,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3516 STOP^
3517 032437 254 04 0 00 032440 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3518 032440 324 00 0 00 032441 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3519 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3520 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3521 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3522
3523 ;**********
3524
3525 ;THIS TEST VERIFIES THAT AOS INCREMENTS C(E) BY 0,,1 AND PLACES
3526 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND ALWAYS SKIPS
3527 ;THE NEXT INSTRUCTION.
3528 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3529 ;IN THIS CASE, AC=3, C(AC)=707070,,707070 AND C(E)=0
3530 ;BEFORE INCREMENTING. HENCE, AOSA SHOULD SKIP ; AND THE
3531 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
3532 ;RESPECTIVELY
3533
3534 032441 200 03 0 00 033474 C53720: MOVE 3,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3535 032442 400 04 0 00 000000 SETZ 4, ;PRELOAD E WITH 0
3536 032443 354 03 0 00 000004 AOSA 3,4 ;*AOSA SHOULD ADD 0,,1 TO C(E),
3537 ;UPDATE AC AND SKIP
3538 STOP^
3539 032444 254 04 0 00 032445 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3540 032445 324 00 0 00 032446 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3541 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3542 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3543 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 64-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0099
3544 032446 312 04 0 00 033502 CAME 4,[1] ;PASS IF E INCREMENTED CORRECTLY
3545 STOP^
3546 032447 254 04 0 00 032450 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3547 032450 324 00 0 00 032451 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3548 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3549 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3550 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3551 032451 312 03 0 00 033502 CAME 3,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3552 STOP^
3553 032452 254 04 0 00 032453 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3554 032453 324 00 0 00 032454 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 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 65
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0100
3560 ;THIS TEST VERIFIES THAT AOSGE INCREMENTS C(E) BY 0,,1 AND PLACES
3561 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3562 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN OR EQUAL TO 0
3563 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3564 ;IN THIS CASE, AC=2, C(AC)=707070,,707070 AND C(E)=-1,,-2
3565 ;BEFORE INCREMENTING. HENCE, AOSGE SHOULD NOT SKIP; AND THE
3566 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
3567 ;RESPECTIVELY
3568
3569 032454 200 02 0 00 033474 C54000: MOVE 2,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3570 032455 561 03 0 00 777776 HRROI 3,-2 ;PRELOAD E WITH -1,,-2
3571 032456 355 02 0 00 000003 AOSGE 2,3 ;*AOSGE SHOULD ADD 0,,1 TO C(E),
3572 ;UPDATE AC AND NOT SKIP
3573 032457 334 00 0 00 000000 SKIPA ;PASS IF AOSGE DID NOT SKIP
3574 STOP^
3575 032460 254 04 0 00 032461 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3576 032461 324 00 0 00 032462 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3577 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3578 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3579 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3580 032462 312 03 0 00 033462 CAME 3,[-1] ;PASS IF E INCREMENTED CORRECTLY
3581 STOP^
3582 032463 254 04 0 00 032464 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3583 032464 324 00 0 00 032465 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3584 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3585 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3586 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3587 032465 312 02 0 00 033462 CAME 2,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3588 STOP^
3589 032466 254 04 0 00 032467 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3590 032467 324 00 0 00 032470 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3591 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3592 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3593 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3594
3595 ;**********
3596
3597 ;THIS TEST VERIFIES THAT AOSGE INCREMENTS C(E) BY 0,,1 AND PLACES
3598 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3599 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN OR EQUAL TO 0
3600 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3601 ;IN THIS CASE, AC=2, C(AC)=707070,,707070 AND C(E)=-1,,-1
3602 ;BEFORE INCREMENTING. HENCE, AOSGE SHOULD SKIP; AND THE
3603 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
3604 ;RESPECTIVELY
3605
3606 032470 200 02 0 00 033474 C54010: MOVE 2,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3607 032471 474 03 0 00 000000 SETO 3, ;PRELOAD E WITH 0
3608 032472 355 02 0 00 000003 AOSGE 2,3 ;*AOSGE SHOULD ADD 0,,1 TO C(E),
3609 ;UPDATE AC AND SKIP
3610 STOP^
3611 032473 254 04 0 00 032474 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3612 032474 324 00 0 00 032475 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3613 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3614 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 65-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0101
3615 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3616 032475 312 03 0 00 033501 CAME 3,[0] ;PASS IF E INCREMENTED CORRECTLY
3617 STOP^
3618 032476 254 04 0 00 032477 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3619 032477 324 00 0 00 032500 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3620 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3621 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3622 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3623 032500 312 02 0 00 033501 CAME 2,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3624 STOP^
3625 032501 254 04 0 00 032502 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3626 032502 324 00 0 00 032503 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3627 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3628 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3629 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3630
3631 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 66
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0102
3632 ;THIS TEST VERIFIES THAT AOSGE INCREMENTS C(E) BY 0,,1 AND PLACES
3633 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3634 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN OR EQUAL TO 0
3635 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3636 ;IN THIS CASE, AC=2, C(AC)=707070,,707070 AND C(E)=0
3637 ;BEFORE INCREMENTING. HENCE, AOSGE SHOULD SKIP; AND THE
3638 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
3639 ;RESPECTIVELY
3640
3641 032503 200 02 0 00 033474 C54020: MOVE 2,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3642 032504 400 03 0 00 000000 SETZ 3, ;PRELOAD E WITH 0
3643 032505 355 02 0 00 000003 AOSGE 2,3 ;*AOSGE SHOULD ADD 0,,1 TO C(E),
3644 ;UPDATE AC AND SKIP
3645 STOP^
3646 032506 254 04 0 00 032507 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3647 032507 324 00 0 00 032510 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3648 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3649 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3650 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3651 032510 312 03 0 00 033502 CAME 3,[1] ;PASS IF E INCREMENTED CORRECTLY
3652 STOP^
3653 032511 254 04 0 00 032512 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3654 032512 324 00 0 00 032513 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 032513 312 02 0 00 033502 CAME 2,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3659 STOP^
3660 032514 254 04 0 00 032515 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3661 032515 324 00 0 00 032516 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3662 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3663 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3664 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3665
3666 ;**********
3667
3668 ;THIS TEST VERIFIES THAT AOSN INCREMENTS C(E) BY 0,,1 AND PLACES
3669 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3670 ;THE NEXT INSTRUCTION IF C(E) IS NON-ZERO.
3671 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3672 ;IN THIS CASE, AC=1, C(AC)=707070,,707070 AND C(E)=-1,,-2
3673 ;BEFORE INCREMENTING. HENCE, AOSN SHOULD NOT SKIP; AND THE
3674 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
3675 ;RESPECTIVELY
3676
3677 032516 200 01 0 00 033474 C54100: MOVE 1,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3678 032517 561 02 0 00 777776 HRROI 2,-2 ;PRELOAD E WITH -1,,-2
3679 032520 356 01 0 00 000002 AOSN 1,2 ;*AOSN SHOULD ADD 0,,1 TO C(E),
3680 ;UPDATE AC AND SKIP
3681 STOP^
3682 032521 254 04 0 00 032522 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3683 032522 324 00 0 00 032523 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3684 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3685 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3686 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 66-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0103
3687 032523 312 02 0 00 033462 CAME 2,[-1] ;PASS IF E INCREMENTED CORRECTLY
3688 STOP^
3689 032524 254 04 0 00 032525 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3690 032525 324 00 0 00 032526 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3691 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3692 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3693 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3694 032526 312 01 0 00 033462 CAME 1,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3695 STOP^
3696 032527 254 04 0 00 032530 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3697 032530 324 00 0 00 032531 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3698 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3699 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3700 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3701
3702 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 67
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0104
3703 ;THIS TEST VERIFIES THAT AOSN INCREMENTS C(E) BY 0,,1 AND PLACES
3704 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3705 ;THE NEXT INSTRUCTION IF C(E) IS NON-ZERO
3706 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3707 ;IN THIS CASE, AC=1, C(AC)=707070,,707070 AND C(E)=-1,,-1
3708 ;BEFORE INCREMENTING. HENCE, AOSN SHOULD NOT SKIP; AND THE
3709 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
3710 ;RESPECTIVELY
3711
3712 032531 200 01 0 00 033474 C54110: MOVE 1,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3713 032532 474 02 0 00 000000 SETO 2, ;PRELOAD E WITH -1,,-1
3714 032533 356 01 0 00 000002 AOSN 1,2 ;*AOSN SHOULD ADD 0,,1 TO C(E),
3715 ;UPDATE AC AND NOT SKIP
3716 032534 334 00 0 00 000000 SKIPA ;PASS IF AOSN DID NOT SKIP
3717 STOP^
3718 032535 254 04 0 00 032536 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3719 032536 324 00 0 00 032537 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3720 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3721 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3722 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3723 032537 312 02 0 00 033501 CAME 2,[0] ;PASS IF E INCREMENTED CORRECTLY
3724 STOP^
3725 032540 254 04 0 00 032541 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3726 032541 324 00 0 00 032542 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3727 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3728 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3729 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3730 032542 312 01 0 00 033501 CAME 1,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3731 STOP^
3732 032543 254 04 0 00 032544 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3733 032544 324 00 0 00 032545 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3734 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3735 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3736 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3737
3738 ;**********
3739
3740 ;THIS TEST VERIFIES THAT AOSN INCREMENTS C(E) BY 0,,1 AND PLACES
3741 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3742 ;THE NEXT INSTRUCTION IF C(E) IS NON-ZERO
3743 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3744 ;IN THIS CASE, AC=1, C(AC)=707070,,707070 AND C(E)=0
3745 ;BEFORE INCREMENTING. HENCE, AOSN SHOULD SKIP; AND THE
3746 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
3747 ;RESPECTIVELY
3748
3749 032545 200 01 0 00 033474 C54120: MOVE 1,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3750 032546 400 02 0 00 000000 SETZ 2, ;PRELOAD E WITH 0
3751 032547 356 01 0 00 000002 AOSN 1,2 ;*AOSN SHOULD ADD 0,,1 TO C(E),
3752 ;UPDATE AC AND SKIP
3753 STOP^
3754 032550 254 04 0 00 032551 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3755 032551 324 00 0 00 032552 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3756 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3757 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 67-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0105
3758 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3759 032552 312 02 0 00 033502 CAME 2,[1] ;PASS IF E INCREMENTED CORRECTLY
3760 STOP^
3761 032553 254 04 0 00 032554 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3762 032554 324 00 0 00 032555 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3763 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3764 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3765 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3766 032555 312 01 0 00 033502 CAME 1,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
3767 STOP^
3768 032556 254 04 0 00 032557 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3769 032557 324 00 0 00 032560 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3770 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3771 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3772 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3773
3774 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 68
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0106
3775 ;THIS TEST VERIFIES THAT AOSG INCREMENTS C(E) BY 0,,1 AND PLACES
3776 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3777 ;THE NEST INSTRUCTION IF C(E) IS GREATER THAN 0
3778 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3779 ;IN THIS CASE, AC=0, C(AC)=707070,,707070 AND C(E)=-1,,-2
3780 ;BEFORE INCREMENTING. HENCE, AOSG SHOULD NOT SKIP; AND THE
3781 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND -1,,-1
3782 ;RESPECTIVELY
3783
3784 032560 200 00 0 00 033474 C54200: MOVE 0,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3785 032561 561 01 0 00 777776 HRROI 1,-2 ;PRELOAD E WITH -1,,-2
3786 032562 357 00 0 00 000001 AOSG 0,1 ;*AOSG SHOULD ADD 0,,1 TO C(E),
3787 ;AND NOT SKIP
3788 032563 334 00 0 00 000000 SKIPA ;PASS IF AOSG DID NOT SKIP
3789 STOP^
3790 032564 254 04 0 00 032565 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3791 032565 324 00 0 00 032566 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3792 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3793 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3794 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3795 032566 312 01 0 00 033462 CAME 1,[-1] ;PASS IF E INCREMENTED CORRECTLY
3796 STOP^
3797 032567 254 04 0 00 032570 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3798 032570 324 00 0 00 032571 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3799 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3800 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3801 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3802 032571 312 00 0 00 033474 CAME 0,[707070,,707070] ;PASS IF C(AC) WAS NOT MODIFIED
3803 STOP^
3804 032572 254 04 0 00 032573 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3805 032573 324 00 0 00 032574 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3806 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3807 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3808 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3809
3810 ;**********
3811
3812 ;THIS TEST VERIFIES THAT AOSG INCREMENTS C(E) BY 0,,1 AND PLACES
3813 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3814 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN 0
3815 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3816 ;IN THIS CASE, AC=0, C(AC)=707070,,707070 AND C(E)=-1,,-1
3817 ;BEFORE INCREMENTING. HENCE, AOSG SHOULD NOT SKIP; AND THE
3818 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND 0
3819 ;RESPECTIVELY
3820
3821 032574 200 00 0 00 033474 C54210: MOVE 0,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3822 032575 474 01 0 00 000000 SETO 1, ;PRELOAD E WITH -1,,-1
3823 032576 357 00 0 00 000001 AOSG 0,1 ;*AOSG SHOULD ADD 0,,1 TO C(E),
3824 ;AND NOT SKIP
3825 032577 334 00 0 00 000000 SKIPA ;PASS IF AOSG DID NOT SKIP
3826 STOP^
3827 032600 254 04 0 00 032601 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3828 032601 324 00 0 00 032602 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3829 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 68-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0107
3830 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3831 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3832 032602 312 01 0 00 033501 CAME 1,[0] ;PASS IF E INCREMENTED CORRECTLY
3833 STOP^
3834 032603 254 04 0 00 032604 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3835 032604 324 00 0 00 032605 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3836 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3837 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3838 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3839 032605 312 00 0 00 033474 CAME 0,[707070,,707070] ;PASS IF C(AC) WAS NOT MODIFIED
3840 STOP^
3841 032606 254 04 0 00 032607 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3842 032607 324 00 0 00 032610 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3843 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3844 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3845 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3846
3847 ;***********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 69
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL AOSX INSTRUCTIONS SEQ 0108
3848 ;THIS TEST VERIFIES THAT AOSG INCREMENTS C(E) BY 0,,1 AND PLACES
3849 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
3850 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN 0
3851 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
3852 ;IN THIS CASE, AC=0, C(AC)=707070,,707070 AND C(E)=0
3853 ;BEFORE INCREMENTING. HENCE, AOSG SHOULD SKIP; AND THE
3854 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND 0,,1
3855 ;RESPECTIVELY
3856
3857 032610 200 00 0 00 033474 C54220: MOVE 0,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
3858 032611 400 01 0 00 000000 SETZ 1, ;PRELOAD E WITH 0
3859 032612 357 00 0 00 000001 AOSG 0,1 ;*AOSG SHOULD ADD 0,,1 TO C(E),
3860 ;AND SKIP
3861 STOP^
3862 032613 254 04 0 00 032614 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3863 032614 324 00 0 00 032615 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3864 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3865 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3866 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3867 032615 312 01 0 00 033502 CAME 1,[1] ;PASS IF E INCREMENTED CORRECTLY
3868 STOP^
3869 032616 254 04 0 00 032617 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3870 032617 324 00 0 00 032620 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3871 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3872 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3873 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3874 032620 312 00 0 00 033474 CAME 0,[707070,,707070] ;PASS IF C(AC) WAS NOT MODIFIED
3875 STOP^
3876 032621 254 04 0 00 032622 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3877 032622 324 00 0 00 032623 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 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 70
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0109
3883 SUBTTL TEST OF MSCL SOJX INSTRUCTIONS
3884
3885 ;**********
3886
3887 ;THIS TEST VERIFIES THAT SOJL DECREMENTS C(AC) BY 0,,1 AND
3888 ;PLACES THE RESTULT BACK INTO THE AC. THE RESULT IN THE AC IS
3889 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3890 ;SPECIFIED BY E IF C(AC) IS LESS THAN 0.
3891 ;IN THIS CASE, C(AC)=0 BEFORE DECREMENTING. HENCE, SOJL
3892 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE -1,,-1
3893
3894 032623 201 17 0 00 000000 C54300: MOVEI 17,0 ;PRELOAD AC WITH 0
3895 032624 361 17 0 00 032626 SOJL 17,.+2 ;*SOJL SHOULD SUBTRACT 0,,1 FROM C(AC)
3896 ;AND JUMP
3897 STOP^
3898 032625 254 04 0 00 032626 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3899 032626 324 00 0 00 032627 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3900 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3901 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3902 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3903 032627 312 17 0 00 033462 CAME 17,[-1] ;PASS IF C(AC) DECREMENTED CORRECTLY
3904 STOP^
3905 032630 254 04 0 00 032631 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3906 032631 324 00 0 00 032632 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3907 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3908 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3909 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3910
3911 ;***********
3912
3913 ;THIS TEST VERIFIES THAT SOJL DECREMENTS C(AC) BY 0,,1 AND
3914 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
3915 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3916 ;SPECIFIED BY E IF C(AC) IS LESS THAN 0.
3917 ;IN THIS CASE, C(AC)=0,,1 BEFORE DECREMENTING. HENCE, SOJL
3918 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE 0.
3919
3920 032632 201 17 0 00 000001 C54310: MOVEI 17,1 ;PRELOAD AC WITH 0,,1
3921 032633 361 17 0 00 032635 SOJL 17,.+2 ;*SOJL SHOULD SUBTRACT 0,,1 FROM C(AC)
3922 032634 334 00 0 00 000000 SKIPA ;PASS IF SOJL DID NOT JUMP
3923 STOP^
3924 032635 254 04 0 00 032636 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3925 032636 324 00 0 00 032637 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3926 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3927 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3928 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3929 032637 312 17 0 00 033501 CAME 17,[0] ;PASS IF C(AC) DECREMENTED CORRECTLY
3930 STOP^
3931 032640 254 04 0 00 032641 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3932 032641 324 00 0 00 032642 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3933 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3934 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3935 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3936
3937 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 71
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0110
3938 ;THIS TEST VERIFIES THAT SOJL DECREMENTS C(AC) BY 0,,1 AND
3939 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
3940 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3941 ;SPECIFIED BY E IF C(AC) IS LESS THAN 0
3942 ;IN THIS CASE, C(AC)=0,,2 BEFORE DECREMENTING. HENCE, SOJ
3943 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0,,1
3944
3945 032642 201 17 0 00 000002 C54320: MOVEI 17,2 ;PRELOAD AC WITH 0,,2
3946 032643 361 17 0 00 032645 SOJL 17,.+2 ;*SOJ SHOULD SUBTRACT 0,,1 FROM C(AC)
3947 ;AND NOT JUMP.
3948 032644 334 00 0 00 000000 SKIPA ;PASS IF SOJL DID NOT JUMP
3949 STOP^
3950 032645 254 04 0 00 032646 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3951 032646 324 00 0 00 032647 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3952 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3953 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3954 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3955 032647 312 17 0 00 033502 CAME 17,[1] ;PASS IF C(AC) DECREMENTED CORRECTLY
3956 STOP^
3957 032650 254 04 0 00 032651 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3958 032651 324 00 0 00 032652 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3959 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3960 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3961 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3962
3963 ;**********
3964
3965 ;THIS TEST VERIFIES THAT SOJE DECREMENTS C(AC) BY 0,,1 AND
3966 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
3967 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3968 ;SPECIFIED BY E IF C(AC) IS EQUAL TO 0.
3969 ;IN THIS CASE, C(AC)=0 BEFORE DECREMENTING. HENCE, SOJE
3970 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE -1,,-1
3971
3972 032652 201 16 0 00 000000 C54400: MOVEI 16,0 ;PRELOAD AC WITH 0
3973 032653 362 16 0 00 032655 SOJE 16,.+2 ;*SOJE SHOULD SUBTRACT 0,,1 FROM C(AC)
3974 ;AND NOT JUMP.
3975 032654 334 00 0 00 000000 SKIPA ;PASS IF SOJE DID NOT JUMP
3976 STOP^
3977 032655 254 04 0 00 032656 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3978 032656 324 00 0 00 032657 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3979 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3980 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3981 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3982 032657 312 16 0 00 033462 CAME 16,[-1] ;PASS IF C(AC) DECREMENTED CORRECTLY
3983 STOP^
3984 032660 254 04 0 00 032661 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
3985 032661 324 00 0 00 032662 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
3986 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
3987 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
3988 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
3989
3990 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 72
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0111
3991 ;THIS TEST VERIFIES THAT SOJE DECREMENTS C(AC) BY 0,,1 AND
3992 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
3993 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
3994 ;SPECIFIED BY E IF C(AC) IS EQUAL TO 0
3995 ;IN THIS CASE, C(AC)=0,,1 BEFORE DECREMENTING. HENCE, SOJ
3996 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0
3997
3998 032662 201 16 0 00 000001 C54410: MOVEI 16,1 ;PRELOAD AC WITH 0,,1
3999 032663 362 16 0 00 032665 SOJE 16,.+2 ;*SOJE SHOULD SUBTRACT 0,,1 FROM C(AC)
4000 ;AND JUMP
4001 STOP^
4002 032664 254 04 0 00 032665 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4003 032665 324 00 0 00 032666 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4004 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4005 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4006 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4007 032666 312 16 0 00 033501 CAME 16,[0] ;PASS IF C(AC) DECREMENTED CORRECTLY
4008 STOP^
4009 032667 254 04 0 00 032670 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4010 032670 324 00 0 00 032671 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4011 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4012 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4013 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4014
4015 ;**********
4016
4017 ;THIS TEST VERIFIES THAT SOJE DECREMENTS C(AC) BY 0,,1 AND
4018 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4019 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4020 ;SPECIFIED BY E IF C(AC) IS EQUAL TO 0.
4021 ;IN THIS CASE, C(AC)=0,,2 BEFORE DECREMENTING. HENCE, SOJE
4022 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE 0,,1
4023
4024 032671 201 16 0 00 000002 C54420: MOVEI 16,2 ;PRELOAD AC WITH 0,,2
4025 032672 362 16 0 00 032674 SOJE 16,.+2 ;*SOJ SHOULD SUBTRACT 0,,1 FROM C(AC)
4026 ;AND NOT JUMP.
4027 032673 334 00 0 00 000000 SKIPA ;PASS IF SOJE DID NOT JUMP
4028 STOP^
4029 032674 254 04 0 00 032675 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4030 032675 324 00 0 00 032676 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4031 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4032 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4033 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4034 032676 312 16 0 00 033502 CAME 16,[1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4035 STOP^
4036 032677 254 04 0 00 032700 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4037 032700 324 00 0 00 032701 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4038 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4039 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4040 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4041
4042 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 73
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0112
4043 ;THIS TEST VERIFIES THAT SOJLE DECREMENTS C(AC) BY 0,,1 AND
4044 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4045 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4046 ;SPECIFIED BY E IF C(AC) IS LESS THAN OR EQUAL TO 0
4047 ;IN THIS CASE, C(AC)=0 BEFORE DECREMENTING. HENCE, SOJLE
4048 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE -1,,-1
4049
4050 032701 201 15 0 00 000000 C54500: MOVEI 15,0 ;PRELOAD AC WITH 0
4051 032702 363 15 0 00 032704 SOJLE 15,.+2 ;*SOJLE SHOULD SUBTRACT 0,,1 FROM C(AC)
4052 ;AND JUMP
4053 STOP^
4054 032703 254 04 0 00 032704 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4055 032704 324 00 0 00 032705 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4056 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4057 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4058 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4059 032705 312 15 0 00 033462 CAME 15,[-1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4060 STOP^
4061 032706 254 04 0 00 032707 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4062 032707 324 00 0 00 032710 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4063 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4064 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4065 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4066
4067 ;**********
4068
4069 ;THIS TEST VERIFIES THAT SOJLE DECREMENTS C(AC) BY 0,,1 AND
4070 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4071 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4072 ;SPECIFIED BY E IF C(AC) IS LESS THAN OR EQUALTO 0.
4073 ;IN THIS CASE, C(AC)=0,,1 BEFORE DECREMENTING. HENCE, SOJLE
4074 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0
4075
4076 032710 201 15 0 00 000001 C54510: MOVEI 15,1 ;PRELOAD AC WITH 0,,1
4077 032711 363 15 0 00 032713 SOJLE 15,.+2 ;*SOJLE SHOULD SUBTRACT 0,,1 FROM C(AC)
4078 ;AND JUMP
4079 STOP^
4080 032712 254 04 0 00 032713 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4081 032713 324 00 0 00 032714 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4082 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4083 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4084 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4085 032714 312 15 0 00 033501 CAME 15,[0] ;PASS IF C(AC) DECREMENTED CORRECTLY
4086 STOP^
4087 032715 254 04 0 00 032716 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4088 032716 324 00 0 00 032717 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4089 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4090 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4091 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4092
4093 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 74
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0113
4094 ;THIS TEST VERIFIES THAT SOJLE DECREMENTS C(AC) BY 0,,1 AND
4095 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4096 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4097 ;SPECIFIED BY E IF C(AC) IS LESS THAN OR EQUAL TO 0.
4098 ;IN THIS CASE, C(AC)=0,,2 BEFORE DECREMENTING. HENCE, SOJLE
4099 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE 0,,1
4100
4101 032717 201 15 0 00 000002 C54520: MOVEI 15,2 ;PRELOAD AC WITH 0,,2
4102 032720 363 15 0 00 032722 SOJLE 15,.+2 ;*SOJLE SHOULD SUBTRACT 0,,1 FROM C(AC)
4103 ;AND NOT JUMP
4104 032721 334 00 0 00 000000 SKIPA ;PASS IF SOJLE DID NOT JUMP
4105 STOP^
4106 032722 254 04 0 00 032723 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4107 032723 324 00 0 00 032724 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4108 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4109 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4110 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4111 032724 312 15 0 00 033502 CAME 15,[1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4112 STOP^
4113 032725 254 04 0 00 032726 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4114 032726 324 00 0 00 032727 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4115 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4116 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4117 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4118
4119 ;**********
4120
4121 ;THIS TEST VERIFIES THAT SOJA DECREMENTS C(AC) BY 0,,1 AND
4122 ;PLACES THE RESULT INTO THE AC. THE RESULT IN THE AC IS
4123 ;COMPARED TO 0 AND THE PROGRAM ALWAYS JUMPS TO THE LOCATION
4124 ;SPECIFIED BY E
4125 ;IN THIS CASE, C(AC)=0 BEFORE DECREMENTING. HENCE, SOJA
4126 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE -1,,-1
4127
4128 032727 201 14 0 00 000000 C54600: MOVEI 14,0 ;PRELOAD AC WITH 0
4129 032730 364 14 0 00 032732 SOJA 14,.+2 ;*SOJ SHOULD SUBTRACT 0,,1 FROM C(AC)
4130 ;AND JUMP
4131 STOP^
4132 032731 254 04 0 00 032732 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4133 032732 324 00 0 00 032733 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4134 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4135 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4136 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4137 032733 312 14 0 00 033462 CAME 14,[-1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4138 STOP^
4139 032734 254 04 0 00 032735 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4140 032735 324 00 0 00 032736 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4141 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4142 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4143 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4144
4145 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 75
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0114
4146 ;THIS TEST VERIFIES THAT SOJA DECREMENTS C(AC) BY 0,,1 AND
4147 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4148 ;COMPARED TO 0 AND THE PROGRAM ALWAYS JUMPS TO THE LOCATION
4149 ;SPECIFIED BY E
4150 ;IN THIS CASE, C(AC)=0,,1 BEFORE DECREMENTING. HENCE, SOJA
4151 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0
4152
4153 032736 201 14 0 00 000001 C54610: MOVEI 14,1 ;PRELOAD AC WITH 0,,1
4154 032737 364 14 0 00 032741 SOJA 14,.+2 ;*SOJA SHOULD SUBTRACT 0,,1 FROM C(AC)
4155 ;AND JUMP
4156 STOP^
4157 032740 254 04 0 00 032741 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4158 032741 324 00 0 00 032742 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4159 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4160 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4161 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4162 032742 312 14 0 00 033501 CAME 14,[0] ;PASS IF C(AC) DECREMENTED CORRECTLY
4163 STOP^
4164 032743 254 04 0 00 032744 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4165 032744 324 00 0 00 032745 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4166 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4167 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4168 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4169
4170 ;**********
4171
4172 ;THIS TEST VERIFIES THAT SOJA DECREMENTS C(AC) BY 0,,1 AND
4173 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4174 ;COMPARED TO 0 AND THE PROGRAM ALWAYS JUMPS TO THE LOCATION
4175 ;SPECIFIED BY E
4176 ;IN THIS CASE, C(AC)=0,,2 BEFORE DECREMENTING. HENCE, SOJA
4177 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0,,1
4178
4179 032745 201 14 0 00 000002 C54620: MOVEI 14,2 ;PRELOAD AC WITH 0,,2
4180 032746 364 14 0 00 032750 SOJA 14,.+2 ;*SOJA SHOULD SUBTRACT 0,,1 FROM C(AC)
4181 ;AND JUMP
4182 STOP^
4183 032747 254 04 0 00 032750 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4184 032750 324 00 0 00 032751 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4185 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4186 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4187 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4188 032751 312 14 0 00 033502 CAME 14,[1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4189 STOP^
4190 032752 254 04 0 00 032753 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4191 032753 324 00 0 00 032754 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4192 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4193 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4194 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4195
4196 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 76
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0115
4197 ;THIS TEST VERIFIES THAT SOJGE DECREMENTS C(AC) BY 0,,1 AND
4198 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4199 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4200 ;SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0
4201 ;IN THIS CASE, C(AC)=0 BEFORE DECREMENTING. HENCE, SOJGE
4202 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE -1,,-1
4203
4204 032754 201 13 0 00 000000 C54700: MOVEI 13,0 ;PRELOAD A C WITH 0
4205 032755 365 13 0 00 032757 SOJGE 13,.+2 ;*SOJGE SHOULD SUBTRACT 0,,1 FROM C(AC)
4206 ;AND NOT JUMP
4207 032756 334 00 0 00 000000 SKIPA ;PASS IF SOJGE DID NOT JUMP
4208 STOP^
4209 032757 254 04 0 00 032760 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4210 032760 324 00 0 00 032761 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4211 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4212 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4213 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4214 032761 312 13 0 00 033462 CAME 13,[-1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4215 STOP^
4216 032762 254 04 0 00 032763 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4217 032763 324 00 0 00 032764 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4218 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4219 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4220 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4221
4222 ;**********
4223
4224 ;THIS TEST VERIFIES THAT SOJGE DECREMENTS C(AC) BY 0,,1 AND
4225 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4226 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4227 ;SPECIFIED BY E IF C(AC) IS GREATER THAN OR EQUAL TO 0
4228 ;IN THIS CASE, C(AC)=0,,1 BEFORE DECREMENTING. HENCE, SOJGE
4229 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0
4230
4231 032764 201 13 0 00 000001 C54710: MOVEI 13,1 ;PRELOAD AC WITH 0,,1
4232 032765 365 13 0 00 032767 SOJGE 13,.+2 ;*SOJ SHOULD SUBTRACT 0,,1 FROM C(AC)
4233 ;AND JUMP
4234 STOP^
4235 032766 254 04 0 00 032767 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4236 032767 324 00 0 00 032770 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4237 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4238 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4239 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4240 032770 312 13 0 00 033501 CAME 13,[0] ;PASS IF C(AC) DECREMENTED CORRECTLY
4241 STOP^
4242 032771 254 04 0 00 032772 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4243 032772 324 00 0 00 032773 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4244 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4245 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4246 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4247
4248 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 77
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0116
4249 ;THIS TEST VERIRIES THAT SOJGE DECREMENTS C(AC) BY 0,,1 AND PLACES THE
4250 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS COMPARED
4251 ;TO 0 AND THE PROGRAM JUMPS TO THE LOCATION SPECIFIED BY E IF C(AC IS
4252 ;GREATER THAN OR EQUAL TO 0. IN THIS CASE, C(AC = 0,,2 BEFORE
4253 ;DECREMENTING. HENCE, SOJGE SHOULD JUMP AND THE RESULT IN THE AC SHOULD
4254 ;BE 0,,1.
4255
4256 032773 201 13 0 00 000002 C54720: MOVEI 13,2 ;PRELOAD AC WITH 0,,2
4257 032774 365 13 0 00 032776 SOJGE 13,.+2 ;*SOJGE SHOULD SUBTRACT0,,1 FROM C(AC)
4258 ;AND JUMP.
4259 STOP^
4260 032775 254 04 0 00 032776 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4261 032776 324 00 0 00 032777 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4262 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4263 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4264 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4265 032777 312 13 0 00 033502 CAME 13,[1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4266 STOP^
4267 033000 254 04 0 00 033001 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4268 033001 324 00 0 00 033002 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4269 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4270 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4271 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4272
4273 ;**********
4274
4275 ;THIS TEST VERIFIES THAT SOJN DECREMENTS C(AC) BY 0,,1 AND
4276 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4277 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4278 ;SPECIFIED BY E IF C(AC) IS NON-ZERO.
4279 ;IN THIS CASE, C(AC)=0 BEFORE DECREMENTING. HENCE,SOJN
4280 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE -1,,-1.
4281
4282 033002 201 12 0 00 000000 C55000: MOVEI 12,0 ;PRELOAD AC WITH 0
4283 033003 366 12 0 00 033005 SOJN 12,.+2 ;*SOJN SHOULD SUBTRACT 0,,1 FROM C(AC)
4284 ;AND JUMP.
4285 STOP^
4286 033004 254 04 0 00 033005 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4287 033005 324 00 0 00 033006 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4288 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4289 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4290 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4291 033006 312 12 0 00 033462 CAME 12,[-1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4292 STOP^
4293 033007 254 04 0 00 033010 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4294 033010 324 00 0 00 033011 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4295 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4296 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4297 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4298
4299 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 78
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0117
4300 ;THIS TEST VERIRIES THAT SOJN DECREMENTS C(AC) BY 0,,1 AND
4301 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4302 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION SPECIFIED
4303 ;BY E IF C(AC) IS NON-ZERO.
4304 ;IN THIS CASE, C(AC) = 0,,1 BEFORE DECREMENTING. HENCE, SOJN
4305 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE 0.
4306
4307 033011 201 12 0 00 000001 C55010: MOVEI 12,1 ;PRELOAD AC WITH 0,,1
4308 033012 366 12 0 00 033014 SOJN 12,.+2 ;*SOJN SHOULD SUBTRACT 0,,1 FROM C(AC)
4309 ;AND NOT JUMP.
4310 033013 334 00 0 00 000000 SKIPA ;PASS IF SOJN DID NOT JUMP
4311 STOP^
4312 033014 254 04 0 00 033015 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4313 033015 324 00 0 00 033016 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4314 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4315 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4316 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4317 033016 312 12 0 00 033501 CAME 12,[0] ;PASS IF C(AC) DECREMENTED CORRECTLY
4318 STOP^
4319 033017 254 04 0 00 033020 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4320 033020 324 00 0 00 033021 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4321 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4322 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4323 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4324
4325 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 79
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0118
4326 ;THIS TEST VERIFIES THAT SOJN DECREMENTS C(AC) BY 0,,1 AND
4327 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4328 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4329 ;SPECIFIED BY E IF C(AC) IS NON-ZERO.
4330 ;IN THIS CASE, C(AC)=0,,2 BEFORE DECREMENTING. HENCE, SOJN
4331 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0,,1.
4332
4333 033021 201 12 0 00 000002 C55020: MOVEI 12,2 ;PRELOAD AC WITH 0,,2
4334 033022 366 12 0 00 033024 SOJN 12,.+2 ;*SOJN SHOULD SUBTRACT 0,,1 FROM C(AC)
4335 ;AND JUMP.
4336 STOP^
4337 033023 254 04 0 00 033024 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4338 033024 324 00 0 00 033025 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4339 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4340 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4341 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4342 033025 312 12 0 00 033502 CAME 12,[1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4343 STOP^
4344 033026 254 04 0 00 033027 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4345 033027 324 00 0 00 033030 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4346 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4347 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4348 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4349
4350 ;**********
4351
4352 ;THIS TEST VERIFIES THAT SOJG DECREMENTS C(AC) BY 0,,1 AND
4353 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4354 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4355 ;SPECIFIED BY E IF C(AC) IS GREATER THAN 0.
4356 ;IN THIS CASE, C(AC) = 0 BEFORE DECREMENTING. HENCE, SOJG
4357 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE -1,,-1.
4358
4359 033030 201 11 0 00 000000 C55100: MOVEI 11,0 ;PRELOAD AC WITH 0
4360 033031 367 11 0 00 033033 SOJG 11,.+2 ;*SOJG SHOULD SUBTRACT 0,,1 FROM C(AC)
4361 ;AND NOT JUMP.
4362 033032 334 00 0 00 000000 SKIPA ;PASS IF SOJG DID NOT JUMP
4363 STOP^
4364 033033 254 04 0 00 033034 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4365 033034 324 00 0 00 033035 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4366 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4367 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4368 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4369 033035 312 11 0 00 033462 CAME 11,[-1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4370 STOP^
4371 033036 254 04 0 00 033037 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4372 033037 324 00 0 00 033040 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4373 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4374 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4375 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4376
4377 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 80
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOJX INSTRUCTIONS SEQ 0119
4378 ;THIS TEST VERIRIES THAT SOJG DECREMENTS C(AC) BY 0,,1 AND
4379 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4380 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4381 ;SPECIFIED BY E IF C(AC) IS GREATER THAN 0.
4382 ;IN THIS CASE, C(AC)=0,,1 BEFORE DECREMENTING. HENCE, SOJG
4383 ;SHOULD NOT JUMP AND THE RESULT IN THE AC SHOULD BE 0.
4384
4385 033040 201 11 0 00 000001 C55110: MOVEI 11,1 ;PRELOAD AC WITH 0,,1
4386 033041 367 11 0 00 033043 SOJG 11,.+2 ;*SOJG SHOULD SUBTRACT 0,,1 FROM C(AC)
4387 ;AND NOT JUMP.
4388 033042 334 00 0 00 000000 SKIPA ;PASS IF SOJG DID NOT JUMP
4389 STOP^
4390 033043 254 04 0 00 033044 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4391 033044 324 00 0 00 033045 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4392 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4393 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4394 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4395 033045 312 11 0 00 033501 CAME 11,[0] ;PASS IF C(AC) DECREMENTED CORRECTLY
4396 STOP^
4397 033046 254 04 0 00 033047 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4398 033047 324 00 0 00 033050 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4399 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4400 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4401 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4402
4403 ;**********
4404
4405 ;THIS TEST VERIFIES THAT SOJG DECREMENTS C(AC) BY 0,,1 AND
4406 ;PLACES THE RESULT BACK INTO THE AC. THE RESULT IN THE AC IS
4407 ;COMPARED TO 0 AND THE PROGRAM JUMPS TO THE LOCATION
4408 ;SPECIFIED BY E IF C(AC) IS GREATER THAN 0.
4409 ;IN THIS CASE, C(AC)=0,,2 BEFORE DECREMENTING. HENCE, SOJG
4410 ;SHOULD JUMP AND THE RESULT IN THE AC SHOULD BE 0,,1.
4411
4412 033050 201 11 0 00 000002 C55120: MOVEI 11,2 ;PRELOAD AC WITH 0,,2
4413 033051 367 11 0 00 033053 SOJG 11,.+2 ;*SOJG SHOULD SUBTRACT O,,1 FROM C(AC)
4414 ;AND JUMP.
4415 STOP^
4416 033052 254 04 0 00 033053 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4417 033053 324 00 0 00 033054 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4418 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4419 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4420 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4421 033054 312 11 0 00 033502 CAME 11,[1] ;PASS IF C(AC) DECREMENTED CORRECTLY
4422 STOP^
4423 033055 254 04 0 00 033056 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4424 033056 324 00 0 00 033057 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4425 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4426 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4427 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4428
4429 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 81
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0120
4430 SUBTTL TEST OF MSCL SOSX INSTRUCTIONS
4431
4432 ;**********
4433
4434 ;THIS TEST VERIFIES THAT SOSL DECREMENTS C(E) BY 0,,1 AND PLACES
4435 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4436 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN 0.
4437 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4438 ;IN THIS CASE, AC=0, C(AC)=707070,,707070 AND C(E)=0
4439 ;BEFORE INCREMENTING. HENCE, SOSL SHOULD SKIP; AND THE
4440 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND -1,,-1
4441 ;RESPECTIVELY.
4442
4443 033057 200 00 0 00 033474 C55200: MOVE 0,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4444 033060 201 01 0 00 000000 MOVEI 1,0 ;PRELOAD E WITH 0
4445 033061 371 00 0 00 000001 SOSL 0,1 ;*SOSL SHOULD SUBTRACT 0,,1 FROM C(E)
4446 ;AND SKIP
4447 STOP^
4448 033062 254 04 0 00 033063 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4449 033063 324 00 0 00 033064 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4450 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4451 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4452 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4453 033064 312 01 0 00 033462 CAME 1,[-1] ;PASS IF E DECREMENTED CORRECTLY
4454 STOP^
4455 033065 254 04 0 00 033066 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4456 033066 324 00 0 00 033067 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4457 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4458 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4459 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4460 033067 312 00 0 00 033474 CAME 0,[707070,,707070] ;PASS IF C(AC) WAS NOT MODIFIED
4461 STOP^
4462 033070 254 04 0 00 033071 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4463 033071 324 00 0 00 033072 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4464 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4465 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4466 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4467
4468 ;**********
4469
4470 ;THIS TEST VERIFIES THAT SOSL DECREMENTS C(E) BY 0,,1 AND PLACES
4471 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4472 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN 0.
4473 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4474 ;IN THIS CASE, AC=0, C(AC)=707070,,707070 AND C(E)=0,,1
4475 ;BEFORE INCREMENTING. HENCE, SOSL SHOULD NOT SKIP; AND THE
4476 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND 0
4477 ;RESPECTIVELY.
4478
4479 033072 200 00 0 00 033474 C55210: MOVE 0,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4480 033073 201 01 0 00 000001 MOVEI 1,1 ;PRELOAD E WITH 0,,1
4481 033074 371 00 0 00 000001 SOSL 0,1 ;*SOSL SHOULD SUBTRACT 0,,1 FROM C(E),
4482 ;AND NOT SKIP.
4483 033075 334 00 0 00 000000 SKIPA ;PASS IF SOSL DID NOT SKIP
4484 STOP^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 81-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0121
4485 033076 254 04 0 00 033077 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4486 033077 324 00 0 00 033100 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4487 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4488 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4489 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4490 033100 312 01 0 00 033501 CAME 1,[0] ;PASS IF E DECREMENTED CORRECTLY
4491 STOP^
4492 033101 254 04 0 00 033102 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4493 033102 324 00 0 00 033103 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4494 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4495 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4496 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4497 033103 312 00 0 00 033474 CAME 0,[707070,,707070] ;PASS IF C(AC) WAS NOT MODIFIED
4498 STOP^
4499 033104 254 04 0 00 033105 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4500 033105 324 00 0 00 033106 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4501 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4502 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4503 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4504
4505 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 82
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0122
4506 ;THIS TEST VERIFIES THAT SOSL DECREMENTS C(E) BY 0,,1 AND PLACES
4507 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4508 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN 0.
4509 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4510 ;IN THIS CASE, AC=0, C(AC)=707070,,707070 AND C(E)=0,,1
4511 ;BEFORE INCREMENTING. HENCE, SOSL SHOULD NOT SKIP; AND THE
4512 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND 0
4513 ;RESPECTIVELY.
4514
4515 033106 200 00 0 00 033474 C55211: MOVE 0,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4516 033107 201 01 0 00 000001 MOVEI 1,1 ;PRELOAD E WITH 0,,1
4517 033110 202 01 0 00 033125 MOVEM 1,E55211
4518 033111 371 00 0 00 033125 SOSL 0,E55211 ;*SOSL SHOULD SUBTRACT 0,,1 FROM C(E),
4519 ;AND NOT SKIP.
4520 033112 334 00 0 00 000000 SKIPA ;PASS IF SOSL DID NOT SKIP
4521 STOP^
4522 033113 254 04 0 00 033114 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4523 033114 324 00 0 00 033115 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4524 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4525 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4526 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4527 033115 200 01 0 00 033125 MOVE 1,E55211
4528 033116 312 01 0 00 033501 CAME 1,[0] ;PASS IF E DECREMENTED CORRECTLY
4529 STOP^
4530 033117 254 04 0 00 033120 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4531 033120 324 00 0 00 033121 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4532 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4533 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4534 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4535 033121 312 00 0 00 033474 CAME 0,[707070,,707070] ;PASS IF C(AC) WAS NOT MODIFIED
4536 STOP^
4537 033122 254 04 0 00 033123 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4538 033123 324 00 0 00 033124 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4539 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4540 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4541 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4542
4543 033124 334 00 0 00 000000 SKIPA ;GO TO NEXT TEST
4544 033125 000000 000000 E55211: 0 ;TEST WORD MEMORY
4545
4546 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 83
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0123
4547 ;THIS TEST VERIFIES THAT SOS DECREMENTS C(E) BY 0,,1 AND PLACES
4548 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4549 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN 0.
4550 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4551 ;IN THIS CASE, AC=0, C(AC)=707070,,707070 AND C(E) 0,,2
4552 ;BEFORE INCREMENTING. HENCE, SOSL SHOULD NOT SKIP; AND THE
4553 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND 0,,1
4554 ;RESPECTIVELY.
4555
4556 033126 200 00 0 00 033474 C55220: MOVE 0,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4557 033127 201 01 0 00 000002 MOVEI 1,2 ;PRELOAD E WITH 0,,2
4558 033130 371 00 0 00 000001 SOSL 0,1 ;*SOSL SHOULD SUBTRACT 0,,1 FROM C(E),
4559 ;AND NOT SKIP
4560
4561 033131 334 00 0 00 000000 SKIPA ;PASS IF SOSL DID NOT SKIP
4562 STOP^
4563 033132 254 04 0 00 033133 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4564 033133 324 00 0 00 033134 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4565 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4566 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4567 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4568 033134 312 01 0 00 033502 CAME 1,[1] ;PASS IF E DECREMENTED CORRECTLY
4569 STOP^
4570 033135 254 04 0 00 033136 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4571 033136 324 00 0 00 033137 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4572 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4573 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4574 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4575 033137 312 00 0 00 033474 CAME 0,[707070,,707070] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4576 STOP^
4577 033140 254 04 0 00 033141 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4578 033141 324 00 0 00 033142 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4579 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4580 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4581 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4582
4583 ;**********
4584
4585 ;THIS TEST VERIFIES THAT SOSE DECREMENTS C(E) BY 0,,1 AND PLACES
4586 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4587 ;THE NEXT INSTRUCTION IF C(E) IS EQUAL TO 0
4588 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4589 ;IN THIS CASE, AC=10, C(AC)=707070,,707070 AND C(E)=0
4590 ;BEFORE INCREMENTING. HENCE, SOSE SHOULD NOT SKIP ; AND THE
4591 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
4592 ;RESPECTIVELY.
4593
4594 033142 200 10 0 00 033474 C55300: MOVE 10,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4595 033143 201 11 0 00 000000 MOVEI 11,0 ;PRELOAD E WITH 0
4596 033144 372 10 0 00 000011 SOSE 10,11 ;*SOSE SHOULD SUBTRACT 0,,1 FROM C(E),
4597 ;UPDATE AC AND NOT SKIP
4598
4599 033145 334 00 0 00 000000 SKIPA ;PASS IF SOSE DID NOT SKIP
4600 STOP^
4601 033146 254 04 0 00 033147 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 83-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0124
4602 033147 324 00 0 00 033150 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4603 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4604 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4605 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4606 033150 312 11 0 00 033462 CAME 11,[-1] ;PASS IF E DECREMENTED CORRECTLY
4607 STOP^
4608 033151 254 04 0 00 033152 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4609 033152 324 00 0 00 033153 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4610 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4611 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4612 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4613 033153 312 10 0 00 033462 CAME 10,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4614 STOP^
4615 033154 254 04 0 00 033155 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4616 033155 324 00 0 00 033156 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4617 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4618 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4619 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4620
4621 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 84
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0125
4622 ;THIS TEST VERIFIES THAT SOSE DECREMENTS C(E) BY 0,,1 AND PLACES
4623 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4624 ;THE NEXT INSTRUCTION IF C(E) IS EQUAL TO 0
4625 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4626 ;IN THIS CASE, AC=10, C(AC)=707070,,707070 AND C(E)=0,,1
4627 ;BEFORE INCREMENTING. HENCE, SOSE SHOULD SKIP ; AND THE
4628 ;FINAL RESULTS IN AC AND E SHOULD BE 707070,,707070 AND 0
4629 ;RESPECTIVELY.
4630
4631 033156 200 10 0 00 033474 C55310: MOVE 10,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4632 033157 201 11 0 00 000001 MOVEI 11,1 ;PRELOAD E WITH 0,,1
4633 033160 372 10 0 00 000011 SOSE 10,11 ;*SOS SHOULD SUBTRACT 0,,1 FROM C(E)
4634 ;UPDATE AC AND SKIP
4635 STOP^
4636 033161 254 04 0 00 033162 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4637 033162 324 00 0 00 033163 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4638 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4639 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4640 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4641 033163 312 11 0 00 033501 CAME 11,[0] ;PASS IF E DECREMENTED CORRECTLY
4642 STOP^
4643 033164 254 04 0 00 033165 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4644 033165 324 00 0 00 033166 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4645 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4646 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4647 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4648 033166 312 10 0 00 033501 CAME 10,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4649 STOP^
4650 033167 254 04 0 00 033170 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4651 033170 324 00 0 00 033171 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4652 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4653 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4654 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4655
4656 ;**********
4657
4658 ;THIS TEST VERIFIES THAT SOSE DECREMENTS C(E) BY 0,11 AND PLACES
4659 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4660 ;THE NEXT INSTRUCTION IF C(E) IS EQUAL TO 0.
4661 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4662 ;IN THIS CASE, AC=10, C(AC)=707070,,707070 AND C(E)=0,,2
4663 ;BEFORE INCREMENTING. HENCE, SOSE SHOULD NOT SKIP ; AND THE
4664 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
4665 ;RESPECTIVELY.
4666
4667 033171 200 10 0 00 033474 C55320: MOVE 10,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4668 033172 201 11 0 00 000002 MOVEI 11,2 ;PRELOAD E WITH 0,,2
4669 033173 372 10 0 00 000011 SOSE 10,11 ;*SOSE SHOULD SUBTRACT 0,,1 FROM C(E),
4670 ;UPDATE AC AND NOT SKIP
4671
4672 033174 334 00 0 00 000000 SKIPA ;PASS IF SOSE DID NOT SKIP
4673 STOP^
4674 033175 254 04 0 00 033176 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4675 033176 324 00 0 00 033177 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4676 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 84-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0126
4677 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4678 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4679 033177 312 11 0 00 033502 CAME 11,[1] ;PASS IF E DECREMENTED CORRECTLY
4680 STOP^
4681 033200 254 04 0 00 033201 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4682 033201 324 00 0 00 033202 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4683 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4684 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4685 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4686 033202 312 10 0 00 033502 CAME 10,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4687 STOP^
4688 033203 254 04 0 00 033204 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4689 033204 324 00 0 00 033205 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4690 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4691 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4692 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4693
4694 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 85
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0127
4695 ;THIS TEST VERIFIES THAT SOSLE DECREMENTS C(E) BY 0,,1 AND PLACES
4696 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4697 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN OR EQUAL TO 0.
4698 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4699 ;IN THIS CASE, AC=7, C(AC)=707070,,707070 AND C(E)=0
4700 ;BEFORE INCREMENTING. HENCE, SOSLE SHOULD SKIP ; AND THE
4701 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
4702 ;RESPECTIVELY.
4703
4704 033205 200 07 0 00 033474 C55400: MOVE 7,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4705 033206 201 10 0 00 000000 MOVEI 10,0 ;PRELOAD E WITH 0
4706 033207 373 07 0 00 000010 SOSLE 7,10 ;*SOSLE SHOULD SUBTRACT 0,,1 FROM C(E),
4707 ;UPDATE AC AND SKIP
4708 STOP^
4709 033210 254 04 0 00 033211 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4710 033211 324 00 0 00 033212 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4711 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4712 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4713 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4714 033212 312 10 0 00 033462 CAME 10,[-1] ;PASS IF E DECREMENTED CORRECTLY
4715 STOP^
4716 033213 254 04 0 00 033214 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4717 033214 324 00 0 00 033215 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4718 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4719 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4720 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4721 033215 312 07 0 00 033462 CAME 7,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4722 STOP^
4723 033216 254 04 0 00 033217 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4724 033217 324 00 0 00 033220 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4725 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4726 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4727 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4728
4729 ;**********
4730
4731 ;THIS TEST VERIFIES THAT SOSLE DECREMENTS C(E) BY 0,,1 AND PLACES
4732 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4733 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN OR EQUAL TO 0.
4734 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4735 ;IN THIS CASE, AC=7, C(AC)=070707,,070707 AND C(E)=0,,1
4736 ;BEFORE INCREMENTING. HENCE, SOSLE SHOULD SKIP ; AND THE
4737 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
4738 ;RESPECTIVELY.
4739
4740 033220 200 07 0 00 033474 C55410: MOVE 7,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4741 033221 201 10 0 00 000001 MOVEI 10,1 ;PRELOAD E WITH 0,,1
4742 033222 373 07 0 00 000010 SOSLE 7,10 ;*SOSLE SHOULD SUBTRACT 0,,1 FROM C(E),
4743 ;UPDATE AC AND SKIP
4744 STOP^
4745 033223 254 04 0 00 033224 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4746 033224 324 00 0 00 033225 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4747 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4748 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4749 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 85-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0128
4750 033225 312 10 0 00 033501 CAME 10,[0] ;PASS IF E DECREMENTED CORRECTLY
4751 STOP^
4752 033226 254 04 0 00 033227 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4753 033227 324 00 0 00 033230 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 033230 312 07 0 00 033501 CAME 7,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4758 STOP^
4759 033231 254 04 0 00 033232 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4760 033232 324 00 0 00 033233 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4761 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4762 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4763 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4764
4765 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 86
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0129
4766 ;THIS TEST VERIFIES THAT SOSLE DECREMENTS C(E) BY 0,,1 AND PLACES
4767 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4768 ;THE NEXT INSTRUCTION IF C(E) IS LESS THAN OR EQUAL TO 0.
4769 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4770 ;IN THIS CASE, AC=7, C(AC)=707070,,707070 AND C(E)=0,,2
4771 ;BEFORE INCREMENTING. HENCE, SOSLE SHOULD NOT SKIP; AND THE
4772 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
4773 ;RESPECTIVELY.
4774
4775 033233 200 07 0 00 033474 C55420: MOVE 7,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4776 033234 201 10 0 00 000002 MOVEI 10,2 ;PRELOAD E WITH 0,,2
4777 033235 373 07 0 00 000010 SOSLE 7,10 ;*SOSLE SHOULD SUBTRACT 0,,1 FROM C(E),
4778 ;UPDATE AC AND NOT SKIP
4779 033236 334 00 0 00 000000 SKIPA ;PASS IF SOSLE DID NOT SKIP
4780 STOP^
4781 033237 254 04 0 00 033240 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4782 033240 324 00 0 00 033241 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4783 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4784 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4785 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4786 033241 312 10 0 00 033502 CAME 10,[1] ;PASS IF E DECREMENTED CORRECTLY
4787 STOP^
4788 033242 254 04 0 00 033243 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4789 033243 324 00 0 00 033244 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4790 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4791 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4792 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4793 033244 312 07 0 00 033502 CAME 7,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4794 STOP^
4795 033245 254 04 0 00 033246 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4796 033246 324 00 0 00 033247 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4797 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4798 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4799 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4800
4801 ;**********
4802
4803 ;THIS TEST VERIFIES THAT SOSA DECREMENTS C(E) BY 0,,1 AND PLACES
4804 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND ALWAYS SKIPS
4805 ;THE NEXT INSTRUCTION.
4806 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4807 ;IN THIS CASE, AC=6, C(AC)=707070,,707070 AND C(E)=0
4808 ;BEFORE INCREMENTING. HENCE, SOSA SHOULD SKIP ; AND THE
4809 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
4810 ;RESPECTIVELY.
4811
4812 033247 200 06 0 00 033474 C55500: MOVE 6,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4813 033250 201 07 0 00 000000 MOVEI 7,0 ;PRELOAD E WITH 0
4814 033251 374 06 0 00 000007 SOSA 6,7 ;*SOSA SHOULD SUBTRACT 0,,1 FROM C(E),
4815 ;UPDATE AC AND SKIP
4816 STOP^
4817 033252 254 04 0 00 033253 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4818 033253 324 00 0 00 033254 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4819 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4820 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 86-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0130
4821 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4822 033254 312 07 0 00 033462 CAME 7,[-1] ;PASS IF E DECREMENTED CORRECTLY
4823 STOP^
4824 033255 254 04 0 00 033256 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4825 033256 324 00 0 00 033257 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4826 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4827 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4828 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4829 033257 312 06 0 00 033462 CAME 6,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4830 STOP^
4831 033260 254 04 0 00 033261 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4832 033261 324 00 0 00 033262 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4833 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4834 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4835 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4836
4837 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 87
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0131
4838 ;THIS TEST VERIFIES THAT SOSA DECREMENTS C(E) BY 0,,1 AND PLACES
4839 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND ALWAYS SKIPS
4840 ;THE NEXT INSTRUCTION.
4841 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THEAC.
4842 ;IN THIS CASE, AC=6, C(AC)=707070,,707070 AND C(E)=0,,1
4843 ;BEFORE INCREMENTING. HENCE, SOSA SHOULD BE 0 AND 0
4844 ;RESPECTIVELY.
4845
4846 033262 200 06 0 00 033474 C55510: MOVE 6,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4847 033263 201 07 0 00 000001 MOVEI 7,1 ;PRELOAD E WITH 0,,1
4848 033264 374 06 0 00 000007 SOSA 6,7 ;*SOSA SHOULD SUBTRACT 0,,1 FROM C(E),
4849 ;UPDATE AC AND SKIP
4850 STOP^
4851 033265 254 04 0 00 033266 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4852 033266 324 00 0 00 033267 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4853 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4854 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4855 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4856 033267 312 07 0 00 033501 CAME 7,[0] ;PASS IF E DECREMENTED CORRECTLY
4857 STOP^
4858 033270 254 04 0 00 033271 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4859 033271 324 00 0 00 033272 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4860 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4861 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4862 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4863 033272 312 06 0 00 033501 CAME 6,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4864 STOP^
4865 033273 254 04 0 00 033274 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4866 033274 324 00 0 00 033275 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4867 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4868 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4869 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4870
4871 ;**********
4872
4873 ;THIS TEST VERIFIES THAT SOSA DECREMENTS C(E) BY 0,,1 AND PLACES
4874 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND ALWAYS SKIPS
4875 ;THE NEXT INSTRUCTION.
4876 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4877 ;IN THIS CASE, AC=6, C(AC)=707070,,707070 AND C(E)=0,,2
4878 ;BEFORE INCREMENTING. HENCE, SOSA SHOULD SKIP ; AND THE
4879 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
4880 ;RESPECTIVELY.
4881
4882 033275 200 06 0 00 033474 C55520: MOVE 6,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4883 033276 201 07 0 00 000002 MOVEI 7,2 ;PRELOAD E WITH 0,,2
4884 033277 374 06 0 00 000007 SOSA 6,7 ;*SOSA SHOULD SUBTRACT 0,,1 FROM C(E),
4885 ;UPDATE AC AND SKIP
4886 STOP^
4887 033300 254 04 0 00 033301 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4888 033301 324 00 0 00 033302 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4889 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4890 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4891 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4892 033302 312 07 0 00 033502 CAME 7,[1] ;PASS IF E DECREMENTED CORRECTLY
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 87-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0132
4893 STOP^
4894 033303 254 04 0 00 033304 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4895 033304 324 00 0 00 033305 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4896 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4897 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4898 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4899 033305 312 06 0 00 033502 CAME 6,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4900 STOP^
4901 033306 254 04 0 00 033307 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4902 033307 324 00 0 00 033310 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4903 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4904 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4905 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4906
4907 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 88
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0133
4908 ;THIS TEST VERIFIES THAT SOSGE DECREMENTS C(E) BY 0,,1 AND PLACES
4909 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4910 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN OR EQUAL TO 0.
4911 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4912 ;IN THIS CASE, AC=5, C(AC)=707070,,707070 AND C(E)=0
4913 ;BEFORE INCREMENTING. HENCE, SOSGE SHOULD NOT SKIP ; AND THE
4914 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
4915 ;RESPECTIVELY.
4916
4917 033310 200 05 0 00 033474 C55600: MOVE 5,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4918 033311 201 06 0 00 000000 MOVEI 6,0 ;PRELOAD E WITH 0
4919 033312 375 05 0 00 000006 SOSGE 5,6 ;*SOSGE SHOULD SUBTRACT 0,,1 FROM C(E),
4920 ;UPDATE AC AND NOT SKIP
4921 033313 334 00 0 00 000000 SKIPA ;PASS IF SOSGE DID NOT SKIP
4922 STOP^
4923 033314 254 04 0 00 033315 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4924 033315 324 00 0 00 033316 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4925 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4926 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4927 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4928 033316 312 06 0 00 033462 CAME 6,[-1] ;PASS IF E DECREMENTED CORRECTLY
4929 STOP^
4930 033317 254 04 0 00 033320 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4931 033320 324 00 0 00 033321 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4932 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4933 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4934 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4935 033321 312 05 0 00 033462 CAME 5,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4936 STOP^
4937 033322 254 04 0 00 033323 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4938 033323 324 00 0 00 033324 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
4943 ;**********
4944
4945 ;THIS TEST VERIFIES THAT SOSGE DECREMENTS C(E) BY 0,,1 AND PLACES
4946 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4947 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN OR EQUAL TO 0.
4948 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4949 ;IN THIS CASE, AC=5, C(AC)=707070,,707070 AND C(E)=0,,1
4950 ;BEFORE INCREMENTING. HENCE, SOSGE SHOULD SKIP ; AND THE
4951 ;FINAL RESULTS IN ACAND E SHOULD BE 0 AND 0
4952 ;RESPECTIVELY.
4953
4954 033324 200 05 0 00 033474 C55610: MOVE 5,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4955 033325 201 06 0 00 000001 MOVEI 6,1 ;PRELOAD E WITH 0,,1
4956 033326 375 05 0 00 000006 SOSGE 5,6 ;*SOSGE SHOULD SUBTRACT 0,,1 FROM C(E),
4957 ;UPDATE AC AND SKIP
4958 STOP^
4959 033327 254 04 0 00 033330 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4960 033330 324 00 0 00 033331 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4961 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4962 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 88-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0134
4963 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4964 033331 312 06 0 00 033501 CAME 6,[0] ;PASS IF E DECREMENTED CORRECTLY
4965 STOP^
4966 033332 254 04 0 00 033333 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4967 033333 324 00 0 00 033334 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4968 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4969 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4970 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4971 033334 312 05 0 00 033501 CAME 5,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
4972 STOP^
4973 033335 254 04 0 00 033336 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4974 033336 324 00 0 00 033337 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4975 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4976 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4977 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4978
4979 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 89
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0135
4980 ;THIS TEST VERIFIES THAT SOSGE DECREMENTS C(E) BY 0,,1 AND PLACES
4981 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
4982 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN OR EQUAL TO 0
4983 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
4984 ;IN THIS CASE, AC=5, C(AC)=707070,,707070 AND C(E)=0,,2
4985 ;BEFORE INCREMENTING. HENCE, SOSGE SHOULD SKIP ; AND THE
4986 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
4987 ;RESPECTIVELY.
4988
4989 033337 200 05 0 00 033474 C55620: MOVE 5,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
4990 033340 201 06 0 00 000002 MOVEI 6,2 ;PRELOAD E WITH 0,,2
4991 033341 375 05 0 00 000006 SOSGE 5,6 ;*SOSGE SHOULD SUBTRACT 0,,1 FROM C(E),
4992 ;UPDATE AC AND SKIP
4993 STOP^
4994 033342 254 04 0 00 033343 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
4995 033343 324 00 0 00 033344 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
4996 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
4997 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
4998 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
4999 033344 312 06 0 00 033502 CAME 6,[1] ;PASS IF E DECREMENTED CORRECTLY
5000 STOP^
5001 033345 254 04 0 00 033346 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5002 033346 324 00 0 00 033347 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5003 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5004 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5005 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5006 033347 312 05 0 00 033502 CAME 5,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
5007 STOP^
5008 033350 254 04 0 00 033351 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5009 033351 324 00 0 00 033352 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5010 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5011 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5012 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5013
5014 ;**********
5015
5016 ;THIS TEST VERIFIES SOSN DECREMENTS C(E) BY 0,,1 AND PLACES
5017 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
5018 ;THE NEXT INSTRUCTION IF C(E) IS NON-ZERO
5019 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
5020 ;IN THIS CASE, AC=4, C(AC)=707070,,707070 AND C(E)=0
5021 ;BEFORE INCREMENTING. HENCE, SOSN SHOULD SKIP ; AND THE
5022 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
5023 ;RESPECTIVELY.
5024
5025 033352 200 04 0 00 033474 C55700: MOVE 4,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
5026 033353 201 05 0 00 000000 MOVEI 5,0 ;PRELOAD E WITH 0
5027 033354 376 04 0 00 000005 SOSN 4,5 ;*SOSN SHOULD SUBTRACT 0,,1 FROM C(E),
5028 ;UPDATE AC AND SKIP
5029 STOP^
5030 033355 254 04 0 00 033356 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5031 033356 324 00 0 00 033357 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5032 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5033 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5034 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 89-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0136
5035 033357 312 05 0 00 033462 CAME 5,[-1] ;PASS IF E DECREMENTED CORRECTLY
5036 STOP^
5037 033360 254 04 0 00 033361 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5038 033361 324 00 0 00 033362 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5039 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5040 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5041 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5042 033362 312 04 0 00 033462 CAME 4,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
5043 STOP^
5044 033363 254 04 0 00 033364 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5045 033364 324 00 0 00 033365 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5046 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5047 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5048 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5049
5050 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 90
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0137
5051 ;THIS TEST VERIFIES THAT SOSN DECREMENTS C(E) BY 0,,1 AND PLACES
5052 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
5053 ;THE NEXT INSTRUCTION IF C(E) IS NON-ZERO
5054 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC
5055 ;IN THIS CASE, AC=4, C(AC)=707070,,707070 AND C(E)=0,,1
5056 ;BEFORE INCREMENTING. HENCE, SOSN SHOULD NOT SKIP ; AND THE
5057 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
5058 ;RESPECTIVELY.
5059
5060 033365 200 04 0 00 033474 C55710: MOVE 4,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
5061 033366 201 05 0 00 000001 MOVEI 5,1 ;PRELOAD E WITH 0,,1
5062 033367 376 04 0 00 000005 SOSN 4,5 ;*SOSN SHOULD SUBTRACT 0,,1 FROM C(E),
5063 ;UPDATE AC AND NOT SKIP
5064 033370 334 00 0 00 000000 SKIPA ;PASS IF SOSN DID NOT SKIP
5065 STOP^
5066 033371 254 04 0 00 033372 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5067 033372 324 00 0 00 033373 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5068 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5069 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5070 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5071 033373 312 05 0 00 033501 CAME 5,[0] ;PASS IF E DECREMENTED CORRECTLY
5072 STOP^
5073 033374 254 04 0 00 033375 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5074 033375 324 00 0 00 033376 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5075 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5076 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5077 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5078 033376 312 04 0 00 033501 CAME 4,[0] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
5079 STOP^
5080 033377 254 04 0 00 033400 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5081 033400 324 00 0 00 033401 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5082 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5083 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5084 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5085
5086 ;**********
5087
5088 ;THIS TEST VERIFIES THAT SOSN DECREMENTS C(E) BY 0,,1 AND PLACES
5089 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
5090 ;THE NEXT INSTRUCTION IF C(E) IS NON-ZERO
5091 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
5092 ;INtTHIS CASE, AC=4, C(AC)=707070,,707070 AND C(E)=0,,2
5093 ;BEFORE INCREMENTING. HENCE, SOSN SHOULD SKIP ; AND THE
5094 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 0,,1
5095 ;RESPECTIVELY
5096
5097 033401 200 04 0 00 033474 C55720: MOVE 4,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
5098 033402 201 05 0 00 000002 MOVEI 5,2 ;PRELOAD E WITH 0,,2
5099 033403 376 04 0 00 000005 SOSN 4,5 ;*SOSN SHOULD SUBTRACT 0,,1 FROM C(E),
5100 ;UPDATE AC AND SKIP
5101 STOP^
5102 033404 254 04 0 00 033405 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5103 033405 324 00 0 00 033406 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5104 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5105 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 90-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0138
5106 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5107 033406 312 05 0 00 033502 CAME 5,[1] ;PASS IF E DECREMENTED CORRECTLY
5108 STOP^
5109 033407 254 04 0 00 033410 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5110 033410 324 00 0 00 033411 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5111 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5112 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5113 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5114 033411 312 04 0 00 033502 CAME 4,[1] ;PASS IF ACWAS UPDATED IF AC NON-ZERO
5115 STOP^
5116 033412 254 04 0 00 033413 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5117 033413 324 00 0 00 033414 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5118 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5119 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5120 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5121
5122 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 91
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0139
5123 ;THIS TEST VERIFIESTHAT SOSG DECREMENTS C(E) BY 0,,1 AND PLACES
5124 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
5125 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN 0
5126 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
5127 ;IN THIS CASE, AC=3, C(AC)=707070,,707070 AND C(E)=0
5128 ;BEFORE INCREMENTING. HENCE, SOSG SHOULD NOT SKIP ; AND THE
5129 ;FINAL RESULTS IN AC AND E SHOULD BE -1,,-1 AND -1,,-1
5130 ;RESPECTIVELY.
5131
5132 033414 200 03 0 00 033474 C56000: MOVE 3,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
5133 033415 201 04 0 00 000000 MOVEI 4,0 ;PRELOAD E WITH 0
5134 033416 377 03 0 00 000004 SOSG 3,4 ;*SOSG SHOULD SUBTRACT 0,,1 FROM C(E),
5135 ;UPDATE AC AND NOT SKIP
5136 033417 334 00 0 00 000000 SKIPA ;PASS IF SOSG DID NOT SKIP
5137 STOP^
5138 033420 254 04 0 00 033421 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5139 033421 324 00 0 00 033422 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5140 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5141 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5142 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5143 033422 312 04 0 00 033462 CAME 4,[-1] ;PASS IF E DECREMENTED CORRECTLY
5144 STOP^
5145 033423 254 04 0 00 033424 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5146 033424 324 00 0 00 033425 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5147 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5148 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5149 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5150 033425 312 03 0 00 033462 CAME 3,[-1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
5151 STOP^
5152 033426 254 04 0 00 033427 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5153 033427 324 00 0 00 033430 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5154 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5155 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5156 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5157
5158 ;**********
5159
5160 ;THIS TEST VERIFIES THAT SOSG DECREMENTS C(E) BY 0,,1 AND PLACES
5161 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
5162 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN 0.
5163 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
5164 ;IN THIS CASE, AC=3, C(AC)=707070,,707070 AND C(E)=0,,1
5165 ;BEFORE INCREMENTING. HENCE, SOSG SHOULD NOT SKIP ; AND THE
5166 ;FINAL RESULTS IN AC AND E SHOULD BE 0 AND 0
5167 ;RESPECTIVELY.
5168
5169 033430 200 03 0 00 033474 C56010: MOVE 3,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
5170 033431 201 04 0 00 000001 MOVEI 4,1 ;PRELOAD E WITH 0,,1
5171 033432 377 03 0 00 000004 SOSG 3,4 ;*SOSG SHOULD SUBTRACT 0,,1 FROM C(E),
5172 ;UPDATE AC AND NOT SKIP
5173 033433 334 00 0 00 000000 SKIPA ;PASS IF SOSG DID NOT SKIP
5174 STOP^
5175 033434 254 04 0 00 033435 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5176 033435 324 00 0 00 033436 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5177 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 91-1
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0140
5178 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5179 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5180 033436 312 04 0 00 033501 CAME 4,[0] ;PASS IF E DECREMENTED CORRECTLY
5181 STOP^
5182 033437 254 04 0 00 033440 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5183 033440 324 00 0 00 033441 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 033441 312 03 0 00 033501 CAME 3,[0] ;PASS IF AC WAS UPDATED IS AC NON-ZERO
5188 STOP^
5189 033442 254 04 0 00 033443 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5190 033443 324 00 0 00 033444 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5191 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5192 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5193 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5194
5195 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 92
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0141
5196 ;THIS TEST VERIFIES THAT SOSG DECREMENTS C(E) BY 0,,1 AND PLACES
5197 ;THE RESULT INTO E. THE RESULT IN E IS COMPARED TO 0 AND SKIPS
5198 ;THE NEXT INSTRUCTION IF C(E) IS GREATER THAN 0
5199 ;IF THE AC IS NON-ZERO, THE RESULT IS ALSO PLACED INTO THE AC.
5200 ;IN THIS CASE, AC=3, C(AC)=707070,,707070 AND C(E)=0,,2
5201 ;BEFORE INCREMENTING. HENCE, SOSG SHOULD SKIP ; AND THE
5202 ;FINAL RESULTS IN AC AND E SHOULD BE 0,,1 AND 011,
5203 ;RESPECTIVELY.
5204
5205 033444 200 03 0 00 033474 C56020: MOVE 3,[707070,,707070] ;PRELOAD AC WITH 707070,,707070
5206 033445 201 04 0 00 000002 MOVEI 4,2 ;PRELOAD E WITH 0,,2
5207 033446 377 03 0 00 000004 SOSG 3,4 ;*SOSG SHOULD SUBTRACT 0,,1 FROM C(E),
5208 ;UPDATE AC AND SKIP
5209 STOP^
5210 033447 254 04 0 00 033450 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5211 033450 324 00 0 00 033451 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5212 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5213 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5214 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5215 033451 312 04 0 00 033502 CAME 4,[1] ;PASS IF E DECREMENTED CORRECTLY
5216 STOP^
5217 033452 254 04 0 00 033453 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5218 033453 324 00 0 00 033454 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 033454 312 03 0 00 033502 CAME 3,[1] ;PASS IF AC WAS UPDATED IF AC NON-ZERO
5223 STOP^
5224 033455 254 04 0 00 033456 HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE
5225 033456 324 00 0 00 033457 JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1)
5226 ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST
5227 ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR
5228 ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1^
5229
5230 ;**********
DAKAE PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (5) 0,3 MACRO %53(1020) 13:36 28-Dec-78 Page 93
DAKAEM MAC 28-Dec-78 13:35 TEST OF MSCL SOSX INSTRUCTIONS SEQ 0142
5231
5232 033457 254 00 0 00 030057 JRST BEGEND
5233 SUBTTL *STOR* RESERVED STORAGE, JULY 19,1977
5234
5235 ;PROGRAM LITERALS
5236
5237 XLIST
5238 IFNDEF $LPAPER,<LIST>
5239 033460 LIT
5240 033460 000001 000001
5241 033461 254 00 0 00 030723
5242 033462 777777 777777
5243 033463 310 00 0 00 000000
5244 033464 201 01 0 00 001234
5245 033465 031107 031106
5246 033466 031116 031115
5247 033467 254 00 0 00 031161
5248 033470 000001 000002
5249 033471 135531 246642
5250 033472 135246 246135
5251 033473 252525 252525
5252 033474 707070 707070
5253 033475 123456 123456
5254 033476 777777 000000
5255 033477 777777 777775
5256 033500 777777 777776
5257 033501 000000 000000
5258 033502 000000 000001
5259 LIST
5260 033503 000000 000000 ENDSLD: 0
5261
5262 IFDEF DEBUG,<
5263 033504 PATCH: BLOCK DEBUG ;PATCHING AREA
5264 >
5265
5266 ;PROGRAM VARIABLES
5267 033604 VAR
5268
5269 IFDEF PGMEND,<
5270 033604 000000 000000 END: 0
5271 030000 END BEGIN >
NO ERRORS DETECTED
PROGRAM BREAK IS 000000
ABSOLUTE BREAK IS 033605
CPU TIME USED 00:18.474
20P CORE USED
ABORT 113#
AC0 714# SEQ 0143
ALTMGO 467#
ANXM 381#
AROV 74# 381#
AROVU 381#
AST 582#
ATSIN 583#
BEGEND 463# 5232
BEGIN 328 329 394# 757 865 5271
BEGIN1 410# 464
BELL 586#
BIS 78# 381# 1440 1449 1465 1469 1484 1490 1506 1511
C23000 909#
C23100 932#
C23200 954#
C23300 979#
C23400 1001#
C23500 1025#
C23600 1047# 1051
C23700 1070#
C24000 1091#
C24100 1107#
C24200 1125#
C24300 1141#
C24400 1157#
C24500 1172#
C24600 1190#
C24700 1207#
C25000 1226#
C25100 1244#
C25200 1263#
C25300 1281#
C25400 1300#
C25500 1316#
C25600 1330#
C25700 1346#
C26200 1364#
C26300 1383#
C26400 1400#
C26500 1418#
C26600 1438#
C26700 1463#
C27000 1482#
C27001 1504#
C27100 1525#
C50000 1553#
C50100 1580#
C50110 1605#
C50200 1630#
C50300 1646#
C50301 1672#
C50400 1703#
C50401 1729#
C50410 1760# SEQ 0144
C50500 1785#
C50501 1800#
C50600 1816#
C50700 1843#
C50710 1869#
C51000 1897#
C51100 1914#
C51101 1939#
C51200 1969#
C51201 1994#
C51300 2028#
C51310 2045#
C51320 2062#
C51400 2080#
C51410 2096#
C51420 2113#
C51500 2130#
C51510 2147#
C51520 2163#
C51600 2180#
C51610 2197#
C51620 2214#
C51700 2230#
C51710 2247#
C51720 2264#
C52000 2281#
C52010 2298#
C52020 2316#
C52100 2336#
C52110 2354#
C52120 2370#
C52200 2389#
C52205 2405#
C52210 2419#
C52220 2437#
C52300 2455#
C52310 2470#
C52320 2484#
C52400 2500#
C52410 2515#
C52420 2530#
C52500 2550#
C52510 2575#
C52520 2600#
C52600 2627#
C52610 2653#
C52620 2679#
C52700 2705#
C52710 2731#
C52720 2756#
C53000 2783#
C53010 2808#
C53020 2834# SEQ 0145
C53100 2859#
C53110 2886#
C53120 2911#
C53200 2937#
C53210 2962#
C53220 2989#
C53300 3014#
C53310 3041#
C53320 3067#
C53400 3098#
C53401 3134#
C53410 3174#
C53420 3210#
C53500 3247#
C53510 3283#
C53520 3319#
C53600 3355#
C53610 3391#
C53620 3426#
C53700 3463#
C53710 3498#
C53720 3534#
C54000 3569#
C54010 3606#
C54020 3641#
C54100 3677#
C54110 3712#
C54120 3749#
C54200 3784#
C54210 3821#
C54220 3857#
C54300 3894#
C54310 3920#
C54320 3945#
C54400 3972#
C54410 3998#
C54420 4024#
C54500 4050#
C54510 4076#
C54520 4101#
C54600 4128#
C54610 4153#
C54620 4179#
C54700 4204#
C54710 4231#
C54720 4256#
C55000 4282#
C55010 4307#
C55020 4333#
C55100 4359#
C55110 4385#
C55120 4412#
C55200 4443# SEQ 0146
C55210 4479#
C55211 4515#
C55220 4556#
C55300 4594#
C55310 4631#
C55320 4667#
C55400 4704#
C55410 4740#
C55420 4775#
C55500 4812#
C55510 4846#
C55520 4882#
C55600 4917#
C55610 4954#
C55620 4989#
C55700 5025#
C55710 5060#
C55720 5097#
C56000 5132#
C56010 5169#
C56020 5205#
CCA 381#
CHAIN 133#
CHNOFF 381#
CHNON 381#
CLK 381#
CLKCLR 381#
CLKDIS 381#
CLKENB 381#
CLKU 381#
CLOCKF 449#
CNTLC 466#
COMMA 575#
CONSW 450#
CPOPJ 470#
CPOPJ1 468#
CRLF 263 264 570#
CRLF2 267 268 572#
CRY0 75# 381# 911 934 956 981 1003
CRY1 76# 381#
CSHFLG 629#
CSHMEM 630#
CYCL60 623#
DCK 82# 381#
DDT 716#
DDTLNK 147# 408
DDTSRT 408#
DEBUG 37# 5262 5263
DECVER 5# 11 28 429
DF22F 534#
DIAGMN 397#
DIAGNO 715#
DIAMON 717# SEQ 0147
DING 119#
DOLLAR 589#
DONG11 718# 849 862
DSKUPD 434
DTE 722# 849 862
DTE0 723#
DTE1 724#
DTE2 725#
DTE3 726#
E50301 1674 1675 1684 1694#
E50401 1731 1732 1741 1751#
E51101 1941 1942 1951 1961#
E51201 1996 1997 2005 2015#
E53401 3136 3137 3145 3162#
E55211 4517 4518 4527 4544#
END 5270#
ENDFIX 709#
ENDSLD 5260#
ERMORE 483#
ERRPC 454#
ERRTLS 455#
ERSTOP 122#
EXCASB 34# 432
EXIOT 80# 381#
FOV 77# 381#
FOVU 381#
FRDLNK 145#
FSELNK 144#
FXU 81# 381#
HYPEN 580#
INHCSH 130#
INHPAG 127#
INXM 381#
IOCLR 381#
ITERAT 66# 427
ITRCH1 487#
ITRCNT 427# 803 824 828 836 837 841
JOB41 381#
JOBAPR 381#
JOBCNI 381#
JOBDDT 381#
JOBFF 381#
JOBOPC 381#
JOBREL 381#
JOBREN 381#
JOBSA 381#
JOBSYM 381#
JOBTPC 381#
JOBUSY 381#
JOBUUO 381#
JOBVER 381#
KA10 381
KAHZ50 135# SEQ 0148
KAIFLG 444#
KI10 381
KL10 381
KLFLG 445# 804 815 834
KLOLD 343
LDLNK 146# 397 399
LFP 584#
LOOPER 121#
LUUO 381#
LUUO1 514 515
LUUO10 514 519
LUUO11 514 519
LUUO12 514 520
LUUO13 514 520
LUUO14 514 521
LUUO15 514 521
LUUO16 514 522
LUUO17 514 522
LUUO2 514 516
LUUO20 514 523
LUUO21 514 523
LUUO22 514 524
LUUO23 514 524
LUUO24 514 525
LUUO25 514 525
LUUO26 514 526
LUUO27 514 526
LUUO3 514 516
LUUO30 514 527
LUUO31 514 527
LUUO32 514 528
LUUO33 514 528
LUUO4 514 517
LUUO5 514 517
LUUO6 514 518
LUUO7 514 518
LUUOI 381#
MAPNEW 535#
MARGIN 457#
MCNVER 6# 11 28 429
MEMLOW 537#
MEMMAP 435
MEMSIZ 538#
MEMTOT 536#
MINUS 579#
MODDVC 129#
MODDVL 328 328# 430
MODDVU 329 329# 431
MODLNK 148# 394
MONCTL 447# 844 876
MONFLG 446# 797 872
MONTEN 448# 802 830 856
MONTYP 661# SEQ 0149
MPVU 381#
NOPNT 117#
NXMU 381#
OPRSEL 131#
OPTIME 549#
P 174 175 176 177 381# 469
PAG 381#
PALERS 123#
PARCLR 381#
PARDIS 381#
PAREA0 59#
PAREA1 60# 425
PAREA2 61# 426
PAREA3 62# 423
PAREA4 63# 424
PAREA5 64# 436
PAREA6 65# 437
PAREA7 436#
PAREA8 437#
PARENB 381#
PARU 381#
PASCNT 451# 823
PATCH 5263#
PDISF 546#
PDLOVU 381#
PERIOD 576#
PFSTRT 403#
PGMEND 36# 67# 5269
PGMNAM 428 877 880#
PI 836
PICHN1 381#
PICHN2 381#
PICHN3 381#
PICHN4 381#
PICHN5 381#
PICHN6 381#
PICHN7 381#
PICHNA 381#
PICLR 381#
PIOFF 381#
PION 381#
PLIST 615# 615
PLISTE 615 617#
PLISTS 616#
PLUS 581#
PNTENB 545#
PNTEXT 424#
PNTFLG 544#
PNTINH 547#
PNTLPT 118#
PNTNAM 423#
PNTSPC 548#
PVPAGI 642# SEQ 0150
PWFCLR 381#
QUEST 587#
RADIX 590#
RADLSC 592#
RADLSP 591#
RANDBS 425#
REENTR 405#
RELIAB 125#
REPT 381#
REPT1 381#
REPTU 503#
REQSET 381#
RESRT1 480#
RESRT2 481#
RETURN 412# 832 839 857
RSTART 114#
RTP 585#
RUNFLG 452#
SADR1 47# 401
SADR10 56# 417
SADR11 57# 418
SADR2 48# 403
SADR3 49# 405
SADR4 50#
SADR5 51# 466
SADR6 52# 467
SADR7 53# 414
SADR8 54# 415
SADR9 55# 416
SBINIT 187 411#
SCOPE 504#
SFSTRT 401#
SLASH 588#
SM10 692#
SPACE 577#
SRTDDT 407#
START 47 48 49 50 51 52 53 54 55 56 57 395 800 808
816 820 868#
START1 414#
START2 415#
START3 416#
START4 417#
START5 418#
STARTA 410 818 829 838 845 852 875 878 899#
SUBLNK 149# 411
SWPTAB 698#
SWTEXR 426#
SYSEXR 399#
TAB 578#
TESTPC 453#
TICKS 456#
TOTALS 115#
TTNBRF 636# SEQ 0151
TTYFIL 552#
TTYSPD 553#
TXTINH 126#
USER 443# 793 796 798 799 825 868# 868 871 873 874
USERF 40# 79# 381# 795 870
USRASB 35# 433
USRCRF 562#
USRLFF 561#
UUODIS 515#
UUOEXT 471#
UUORTN 472#
UUOSKP 469#
$$420 767#
$$421 768#
$$422 769#
$$423 770#
$$424 771#
$$425 772#
$$426 773#
$$427 774#
$$430 775#
$$431 776#
$$432 777#
$$433 778#
$$434 779#
$$435 780#
$$436 781#
$$437 782#
$$500 785#
$$501 786#
$$502 787#
$$503 788#
$$BEGI 753#
$$DTE0 813 849#
$$DTE2 814 862#
$$LOC 750# 789
$$MUUO 667#
$$OUTE 673#
$$STAR 753 754 793#
$$TAX1 685#
$$TAX2 686#
$$TOGG 679#
$$UUO 656#
$ACC0 494#
$BEGEN 762#
$BEND1 464#
$BEND2 465#
$CHRIN 555#
$CRLF 557#
$DDT 731#
$DEVCH 381#
$DSKUP 434#
$DTCHR 743# SEQ 0152
$DTCI 737#
$DTCLK 736# 811
$DTCMD 740# 847 860
$DTF11 739#
$DTFLG 735# 810 848 850 861 863
$DTMTD 744#
$DTMTI 745#
$DTOPR 742# 812
$DTSEQ 741#
$DTSWR 747#
$DTT11 738#
$DVCH1 381#
$DVOFF 551#
$EMODE 432#
$FFF 559#
$IBUF 607#
$INEXT 609#
$INNM 608#
$ITRHL 475#
$ITRX1 476#
$LPAPE 5238
$MMAP 435#
$MODVL 430#
$MODVU 431#
$OBUF 598#
$ONETM 458#
$OUTEX 600#
$OUTNM 599#
$PAPER 381
$PARER 482#
$PNAME 428#
$PSHER 486#
$PVER 429#
$RSRTX 478#
$RSRTY 479#
$SPAG1 498#
$SPB1 819 825#
$SPBEN 762 823#
$SPBEX 826 834#
$SPBKL 835 841#
$SPBUS 828#
$SPEC 759 818#
$SPKLD 842 856#
$START 395#
$STD 730# 757#
$STKIL 802#
$STKL 810#
$STL 732#
$STM 733# 759#
$SVAPR 496#
$SVPAG 497#
$SVPI 495#
$SVUPC 501# SEQ 0153
$SVUUO 500#
$TABF 558#
$TTCHR 554#
$TWCNT 550#
$TYPNB 556#
$UMODE 433#
$UORTX 473#
$USRHL 477#
$UUOER 474# 515
$VTF 560#
%ACTFL 507#
%ACTUL 508#
%COREC 506#
%CORFL 505#
%DISCR 509#
%ERHI1 648#
%ERHI2 649#
%ERHI3 650#
.JB41 381#
.JBAPR 381#
.JBCNI 381#
.JBDDT 381#
.JBFF 381#
.JBOPC 381#
.JBREL 381#
.JBREN 381#
.JBSA 381#
.JBSYM 381#
.JBTPC 381#
.JBUSY 381#
.JBUUO 381#
.JBVER 381#
CFLUSH 299#
CINVAL 298# SEQ 0154
CLOKOP 293#
CWRTBI 300#
DROPDV 260#
ENDUUO 306# 463
EOPUUO 307# 465
ERLOOP 351#
ERLP1 352#
ERLP2 353#
ERRHLT 194#
ERROR 360#
ERROR1 371#
ERUUO 350#
EXIT 831
FATAL 193#
FRD36 335#
FRD8 336#
FREAD 334#
FSELEC 333#
GET 177#
GO 174#
HALT 179# 484 767 769 770 774 788 865 919 942 965 989 1012 1031
1036 1048 1053 1077 1097 1108 1113 1131 1146 1162 1173 1178 1192 1196
1209 1213 1232 1250 1269 1286 1305 1320 1335 1351 1370 1387 1404 1422
1451 1471 1492 1513 1533 1559 1566 1586 1593 1610 1617 1634 1652 1659
1679 1687 1709 1716 1736 1744 1766 1773 1789 1805 1822 1829 1849 1856
1875 1882 1901 1920 1927 1946 1954 1974 1981 2000 2008 2031 2049 2066
2083 2099 2117 2133 2150 2166 2184 2200 2217 2233 2251 2267 2285 2302
2319 2340 2357 2375 2393 2408 2423 2440 2458 2473 2488 2504 2518 2533
2553 2560 2580 2587 2605 2612 2632 2639 2657 2664 2684 2691 2709 2716
2735 2742 2761 2768 2787 2794 2812 2819 2838 2845 2864 2871 2890 2897
2915 2922 2941 2948 2967 2974 2993 3000 3019 3026 3046 3053 3071 3078
3103 3110 3117 3140 3148 3155 3180 3187 3194 3216 3223 3230 3253 3260
3267 3288 3295 3302 3325 3332 3339 3360 3367 3374 3396 3403 3410 3432
3439 3446 3468 3475 3482 3503 3510 3517 3539 3546 3553 3575 3582 3589
3611 3618 3625 3646 3653 3660 3682 3689 3696 3718 3725 3732 3754 3761
3768 3790 3797 3804 3827 3834 3841 3862 3869 3876 3898 3905 3924 3931
3950 3957 3977 3984 4002 4009 4029 4036 4054 4061 4080 4087 4106 4113
4132 4139 4157 4164 4183 4190 4209 4216 4235 4242 4260 4267 4286 4293
4312 4319 4337 4344 4364 4371 4390 4397 4416 4423 4448 4455 4462 4485
4492 4499 4522 4530 4537 4563 4570 4577 4601 4608 4615 4636 4643 4650
4674 4681 4688 4709 4716 4723 4745 4752 4759 4781 4788 4795 4817 4824
4831 4851 4858 4865 4887 4894 4901 4923 4930 4937 4959 4966 4973 4994
5001 5008 5030 5037 5044 5066 5073 5080 5102 5109 5116 5138 5145 5152
5175 5182 5189 5210 5217 5224
JEN 181#
JRSTF 180#
MAPADR 316#
MAPCNK 317#
MAPMEM 313#
MAPPNT 319#
MAPSET 318#
MEMSEG 315#
MEMZRO 314# SEQ 0155
MODPCP 326#
MODPCU 325#
MTROP 294#
NAME 9# 11
PBELL 269#
PCRL 263#
PCRL2 267#
PCRL2F 268#
PCRLF 264#
PFORCE 271#
PGMINT 187#
PJRST 178#
PMSG 273#
PMSGF 276#
PNT1 229#
PNT11 243#
PNT11F 244#
PNT1F 230#
PNT2 231#
PNT2F 232#
PNT3 233#
PNT3F 234#
PNT4 235#
PNT4F 236#
PNT5 237#
PNT5F 238#
PNT6 239#
PNT6F 240#
PNT7 241#
PNT7F 242#
PNTA 215#
PNTADF 246#
PNTADR 245#
PNTAF 216#
PNTAL 217#
PNTALF 218#
PNTCHF 228#
PNTCHR 227#
PNTCI 225#
PNTCIF 226#
PNTCW 261#
PNTCWF 262#
PNTDCF 254#
PNTDEC 253#
PNTDS 255#
PNTDSF 256#
PNTHW 249#
PNTHWF 250#
PNTMGN 340#
PNTMSF 222#
PNTMSG 221#
PNTNM 257#
PNTOCF 252# SEQ 0156
PNTOCS 251#
PNTOCT 247#
PNTOTF 248#
PNTSIX 258#
PNTSXF 259#
PSIXL 219#
PSIXLF 220#
PSIXM 223#
PSIXMF 224#
PSP 265#
PSPF 266#
PUT 176#
REPTUO 354#
RTN 175# 471
S 105# 107 111 140 142 151 154 169 170 172 183 185 189 191
196 200 346 348 381 386 392 419 421 439 441 459 461 490
492 510 512 530 532 540 542 563 568 594 596 603 605 611
613 619 621 625 627 632 634 638 640 644 646 652 654 657
659 663 665 669 671 675 677 681 683 688 690 694 696 700
702 704 706
SFLAG 99# 909 932 954 979 1001 1025 1438 1443 1463 1482 1504 1525
SIXBTZ 282#
STOP 90# 918 941 964 988 1011 1035 1052 1076 1096 1112 1130 1145 1161
1177 1195 1212 1231 1249 1268 1285 1304 1319 1334 1350 1369 1386 1403
1421 1450 1470 1491 1512 1532 1558 1565 1585 1592 1609 1616 1633 1651
1658 1678 1686 1708 1715 1735 1743 1765 1772 1788 1804 1821 1828 1848
1855 1874 1881 1900 1919 1926 1945 1953 1973 1980 1999 2007 2030 2048
2065 2082 2098 2116 2132 2149 2165 2183 2199 2216 2232 2250 2266 2284
2301 2318 2339 2356 2374 2392 2407 2422 2439 2457 2472 2487 2503 2517
2532 2552 2559 2579 2586 2604 2611 2631 2638 2656 2663 2683 2690 2708
2715 2734 2741 2760 2767 2786 2793 2811 2818 2837 2844 2863 2870 2889
2896 2914 2921 2940 2947 2966 2973 2992 2999 3018 3025 3045 3052 3070
3077 3102 3109 3116 3139 3147 3154 3179 3186 3193 3215 3222 3229 3252
3259 3266 3287 3294 3301 3324 3331 3338 3359 3366 3373 3395 3402 3409
3431 3438 3445 3467 3474 3481 3502 3509 3516 3538 3545 3552 3574 3581
3588 3610 3617 3624 3645 3652 3659 3681 3688 3695 3717 3724 3731 3753
3760 3767 3789 3796 3803 3826 3833 3840 3861 3868 3875 3897 3904 3923
3930 3949 3956 3976 3983 4001 4008 4028 4035 4053 4060 4079 4086 4105
4112 4131 4138 4156 4163 4182 4189 4208 4215 4234 4241 4259 4266 4285
4292 4311 4318 4336 4343 4363 4370 4389 4396 4415 4422 4447 4454 4461
4484 4491 4498 4521 4529 4536 4562 4569 4576 4600 4607 4614 4635 4642
4649 4673 4680 4687 4708 4715 4722 4744 4751 4758 4780 4787 4794 4816
4823 4830 4850 4857 4864 4886 4893 4900 4922 4929 4936 4958 4965 4972
4993 5000 5007 5029 5036 5043 5065 5072 5079 5101 5108 5115 5137 5144
5151 5174 5181 5188 5209 5216 5223
SWITCH 288#
TTALTM 209#
TTICHR 202#
TTICLR 212#
TTICNV 207#
TTIDEC 206#
TTINO 204#
TTIOCT 205# SEQ 0157
TTIYES 203#
TTLOOK 208#
TTSIXB 210#
TTYINP 211#
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 1
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0158
*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 28-DEC-78 PAGE 2
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0159
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 28-DEC-78 PAGE 3
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0160
*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,030041
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 402000030041 0 000000030041
IT1 030612 0 0 0 402000030041 0 000000030041
AT3 030612 0 0 0 000000030041 0 402000030041
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 4
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0161
AT6 030612 030041 0 0 000000030041 0 402000030041
FT1A 030612 030041 0 0 000000030041 0 000000030041
FT9 030613 030041 0 0 000000030041 0 000000030041
ET0 030613 030041 0 0 0 0 000000030041
ST6 030613 030041 0 0 0 0 000000030041
ST6A 030613 030041 0 0 0 0 000000030041
ST9 030613 030041 0 0 0 0 000000030041
*030613 MOVE 1,033460
INITIAL
C(AC)=000000 000000
C(E)=000001 000001
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 030613 030613 0 0 200040033460 0 000001000001
IT1 030613 0 0 0 200040033460 0 000001000001
AT3 030613 0 0 0 000000033460 0 200040033460
AT6 030613 033460 0 0 000000033460 0 200040033460
FT0 030613 033460 0 0 000001000001 0 200040033460
FT1A 030613 033460 0 0 000001000001 0 000001000001
FT9 030614 033460 0 0 000001000001 0 000001000001
ET0 030614 033460 0 0 000001000001 0 000001000001
ST1 030614 033460 0 0 000001000001 0 000001000001
ST2 030614 033460 0 0 000001000001 0 000001000001
ST9 030614 033460 0 0 000001000001 0 000001000001
*030614 BLT 1,000001
INITIAL
C(AC)=000001 000001
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 030614 030614 0 0 251040000001 0 000000000001
IT1 030614 0 0 0 251040000001 0 000000000001
AT3 030614 0 0 0 000000000001 0 251040000001
AT6 030614 000001 0 0 000000000001 0 251040000001
FT1A 030614 000001 0 0 000000000001 0 000000000001
FT2 030614 000001 0 0 0 0 000000000001
FT2RQ 030614 000001 0 0 000001000001 0 000000000001
FT3 030614 000001 0 0 000001000001 0 000000000001
FT6 030614 000001 0 0 000001000001 0 000000000001
FT7 030614 000001 0 0 000001000001 000001000001 000000000001
FT4RQ 030614 000001 0 0 000001000001 000001000001 000000000001
FT4A 030614 000001 0 0 000001000001 000001000001 000000000001
FT9 030614 000001 0 0 000001000001 000001000001 000000000001
ET0 030614 000001 0 0 000001000001 000001000001 000000000001
ET1 030614 000001 0 0 000001000001 000001000001 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 5
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0162
ET2 030614 000001 0 0 000001000001 000002000002 000000000001
BLTT1 030614 000001 0 0 000000000002 000002000002 000000000001
BLTT2 030615 000001 0 0 000000000002 000002000002 000000000001
ST9 030615 000001 0 0 000000000002 000002000002 000000000001
*030615 CAMN 1,033460
INITIAL
C(AC)=000001 000001
C(E)=000001 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030615 030615 0 0 316040033460 0 000001000001
IT1 030615 0 0 0 316040033460 0 000001000001
AT3 030615 0 0 0 000000033460 0 316040033460
AT6 030615 033460 0 0 000000033460 0 316040033460
FT0 030615 033460 0 0 000001000001 0 316040033460
FT1A 030615 033460 0 0 000001000001 0 000001000001
FT2 030615 033460 0 0 0 0 000001000001
FT2RQ 030615 033460 0 0 000001000001 0 000001000001
FT3 030615 033460 0 0 000001000001 0 000001000001
FT9 030616 033460 0 0 000001000001 0 000001000001
ET0 030616 033460 0 0 0 0 000001000001
ST1A 030616 033460 0 0 0 0 000001000001
ST9 030616 033460 0 0 0 0 000001000001
*030616 JRST 0,030674
INITIAL
C(AC)=000000 030602
C(E)=402000 030037
FINAL
C(E)=402000 030037
TIME PC MA SC FE AR MQ BR
IT0 030616 030616 0 0 254000030674 0 254000030674
IT1 030616 0 0 0 254000030674 0 254000030674
AT3 030616 0 0 0 000000030674 0 254000030674
AT6 030616 030674 0 0 000000030674 0 254000030674
FT1A 030616 030674 0 0 000000030674 0 254000030674
FT9 030617 030674 0 0 000000030674 0 254000030674
ET0 030674 030617 0 0 000000030674 0 254000030674
ST1A 030674 030617 0 0 000000030674 0 254000030674
ST9 030674 030617 0 0 000000030674 0 254000030674
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 6
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0163
*030674 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 030674 030674 0 0 402000030037 0 000000030037
IT1 030674 0 0 0 402000030037 0 000000030037
AT3 030674 0 0 0 000000030037 0 402000030037
AT6 030674 030037 0 0 000000030037 0 402000030037
FT1A 030674 030037 0 0 000000030037 0 000000030037
FT9 030675 030037 0 0 000000030037 0 000000030037
ET0 030675 030037 0 0 0 0 000000030037
ST6 030675 030037 0 0 0 0 000000030037
ST6A 030675 030037 0 0 0 0 000000030037
ST9 030675 030037 0 0 0 0 000000030037
*030675 JSP 0,030676
INITIAL
C(AC)=000000 030602
FINAL
C(AC)=000000 030676
TIME PC MA SC FE AR MQ BR
IT0 030675 030675 0 0 265000030676 0 000000030676
IT1 030675 0 0 0 265000030676 0 000000030676
AT3 030675 0 0 0 000000030676 0 265000030676
AT6 030675 030676 0 0 000000030676 0 265000030676
FT1A 030675 030676 0 0 000000030676 0 000000030676
FT9 030676 030676 0 0 000000030676 0 000000030676
ET0 030676 030676 0 0 000000030676 0 000000030676
ST1 030676 030676 0 0 000000030676 0 000000030676
ST2 030676 030676 0 0 000000030676 0 000000030676
ST9 030676 030676 0 0 000000030676 0 000000030676
*030676 TLNE 0,010000
INITIAL
C(AC)=000000 030676
FINAL
C(AC)=000000 030676
TIME PC MA SC FE AR MQ BR
IT0 030676 030676 0 0 603000010000 0 0
IT1 030676 0 0 0 603000010000 0 0
AT3 030676 0 0 0 000000010000 0 603000010000
AT6 030676 0 0 0 000000010000 0 603000010000
FT1A 030676 0 0 0 000000010000 0 000000010000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 7
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0164
FT2 030676 0 0 0 0 0 000000010000
FT2RQ 030676 0 0 0 000000030676 0 000000010000
FT3 030676 0 0 0 000000030676 0 000000010000
FT9 030677 0 0 0 000000030676 0 000000010000
ET0 030677 0 0 0 030676000000 0 000000010000
ET1 030677 0 0 0 030676000000 0 0
ET2 0 0 0 0 000000030676 0 0
ST1A 0 0 0 0 000000030676 0 0
ST9 0 0 0 0 000000030676 0 0
*030700 SKIPN 0,030042
INITIAL
C(AC)=000000 030676
C(E)=777777 777777
FINAL
C(AC)=000000 030676
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 336000030042 0 777777777777
IT1 0 0 0 0 336000030042 0 777777777777
AT3 0 0 0 0 000000030042 0 336000030042
AT6 0 030042 0 0 000000030042 0 336000030042
FT0 0 030042 0 0 777777777777 0 336000030042
FT1A 0 030042 0 0 777777777777 0 777777777777
FT9 030701 030042 0 0 777777777777 0 777777777777
ET0 030702 030042 0 0 777777777777 0 777777777777
ST1A 030702 030042 0 0 777777777777 0 777777777777
ST9 030702 030042 0 0 777777777777 0 777777777777
*030702 SKIPN 0,030037
INITIAL
C(AC)=000000 030676
C(E)=000000 000000
FINAL
C(AC)=000000 030676
TIME PC MA SC FE AR MQ BR
IT0 030702 030702 0 0 336000030037 0 0
IT1 030702 0 0 0 336000030037 0 0
AT3 030702 0 0 0 000000030037 0 336000030037
AT6 030702 030037 0 0 000000030037 0 336000030037
FT0 030702 030037 0 0 0 0 336000030037
FT1A 030702 030037 0 0 0 0 0
FT9 030703 030037 0 0 0 0 0
ET0 030703 030037 0 0 0 0 0
ST1A 030703 030037 0 0 0 0 0
ST9 030703 030037 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 8
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0165
*030703 JRST 0,030723
INITIAL
C(AC)=000000 030676
C(E)=254000 030724
FINAL
C(E)=254000 030724
TIME PC MA SC FE AR MQ BR
IT0 030703 030703 0 0 254000030723 0 254000030723
IT1 030703 0 0 0 254000030723 0 254000030723
AT3 030703 0 0 0 000000030723 0 254000030723
AT6 030703 030723 0 0 000000030723 0 254000030723
FT1A 030703 030723 0 0 000000030723 0 254000030723
FT9 030704 030723 0 0 000000030723 0 254000030723
ET0 030723 030704 0 0 000000030723 0 254000030723
ST1A 030723 030704 0 0 000000030723 0 254000030723
ST9 030723 030704 0 0 000000030723 0 254000030723
*030723 JRST 0,030724
INITIAL
C(AC)=000000 030676
C(E)=205040 200000
FINAL
C(E)=205040 200000
TIME PC MA SC FE AR MQ BR
IT0 030723 030723 0 0 254000030724 0 254000030724
IT1 030723 0 0 0 254000030724 0 254000030724
AT3 030723 0 0 0 000000030724 0 254000030724
AT6 030723 030724 0 0 000000030724 0 254000030724
FT1A 030723 030724 0 0 000000030724 0 254000030724
FT9 030724 030724 0 0 000000030724 0 254000030724
ET0 030724 030724 0 0 000000030724 0 254000030724
ST1A 030724 030724 0 0 000000030724 0 254000030724
ST9 030724 030724 0 0 000000030724 0 254000030724
*030724 MOVSI 1,200000
INITIAL
C(AC)=000001 000001
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 030724 030724 0 0 205040200000 0 000000200000
IT1 030724 0 0 0 205040200000 0 000000200000
AT3 030724 0 0 0 000000200000 0 205040200000
AT6 030724 0 0 0 000000200000 0 205040200000
FT1A 030724 0 0 0 000000200000 0 000000200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 9
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0166
FT9 030725 0 0 0 000000200000 0 000000200000
ET0 030725 0 0 0 200000000000 0 000000200000
ST1 030725 0 0 0 200000000000 0 000000200000
ST2 030725 0 0 0 200000000000 0 000000200000
ST9 030725 0 0 0 200000000000 0 000000200000
*030725 JFCL 17,030726
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030725 030725 0 0 255740030726 0 000000030726
IT1 030725 0 0 0 255740030726 0 000000030726
AT3 030725 0 0 0 000000030726 0 255740030726
AT6 030725 030726 0 0 000000030726 0 255740030726
FT1A 030725 030726 0 0 000000030726 0 000000030726
FT9 030726 030726 0 0 000000030726 0 000000030726
ET0 030726 030726 0 0 000000030726 0 000000030726
ST1A 030726 030726 0 0 000000030726 0 000000030726
ST9 030726 030726 0 0 000000030726 0 000000030726
*030726 JRST 2,030727(1)
INITIAL
C(AC)=000000 000000
C(E)=402000 030731
FINAL
C(E)=402000 030731
TIME PC MA SC FE AR MQ BR
IT0 030726 030726 0 0 254101030727 0 200000030727
IT1 030726 0 0 0 254101030727 0 200000030727
AT1 030726 0 0 0 0 0 254101030727
AT2 030726 0 0 0 200000000000 0 254101030727
AT3 030726 0 0 0 000000030727 0 200000030727
AT6 030726 030727 0 0 000000030727 0 200000030727
FT1A 030726 030727 0 0 000000030727 0 200000030727
FT9 030727 030727 0 0 000000030727 0 200000030727
ET0 030727 030727 0 0 000000030727 0 200000030727
ST1A 030727 030727 0 0 000000030727 0 200000030727
ST9 030727 030727 0 0 000000030727 0 200000030727
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 10
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0167
*030727 SETZM 0,030731
INITIAL
C(AC)=000000 030676
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030727 030727 0 0 402000030731 0 000000030731
IT1 030727 0 0 0 402000030731 0 000000030731
AT3 030727 0 0 0 000000030731 0 402000030731
AT6 030727 030731 0 0 000000030731 0 402000030731
FT1A 030727 030731 0 0 000000030731 0 000000030731
FT9 030730 030731 0 0 000000030731 0 000000030731
ET0 030730 030731 0 0 0 0 000000030731
ST6 030730 030731 0 0 0 0 000000030731
ST6A 030730 030731 0 0 0 0 000000030731
ST9 030730 030731 0 0 0 0 000000030731
*030730 JSR 0,030731
INITIAL
C(AC)=000000 030676
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030730 030730 0 0 264000030731 0 000000030731
IT1 030730 0 0 0 264000030731 0 000000030731
AT3 030730 0 0 0 000000030731 0 264000030731
AT6 030730 030731 0 0 000000030731 0 264000030731
FT1A 030730 030731 0 0 000000030731 0 000000030731
FT9 030731 030731 0 0 000000030731 0 000000030731
ET0 030731 030731 0 0 200000030731 0 000000030731
ET2 030732 030731 0 0 200000030731 0 000000030731
ST6 030732 030731 0 0 200000030731 0 000000030731
ST6A 030732 030731 0 0 200000030731 0 000000030731
ST9 030732 030731 0 0 200000030731 0 000000030731
*030732 SKIPN 0,030731
INITIAL
C(AC)=000000 030676
C(E)=200000 030731
FINAL
C(AC)=000000 030676
TIME PC MA SC FE AR MQ BR
IT0 030732 030732 0 0 336000030731 0 200000030731
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 11
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0168
IT1 030732 0 0 0 336000030731 0 200000030731
AT3 030732 0 0 0 000000030731 0 336000030731
AT6 030732 030731 0 0 000000030731 0 336000030731
FT0 030732 030731 0 0 200000030731 0 336000030731
FT1A 030732 030731 0 0 200000030731 0 200000030731
FT9 030733 030731 0 0 200000030731 0 200000030731
ET0 030734 030731 0 0 200000030731 0 200000030731
ST1A 030734 030731 0 0 200000030731 0 200000030731
ST9 030734 030731 0 0 200000030731 0 200000030731
*030734 JUMPA 0,030735
INITIAL
C(AC)=000000 030676
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030734 030734 0 0 324000030735 0 000000030735
IT1 030734 0 0 0 324000030735 0 000000030735
AT3 030734 0 0 0 000000030735 0 324000030735
AT6 030734 030735 0 0 000000030735 0 324000030735
FT1A 030734 030735 0 0 000000030735 0 000000030735
FT2 030734 030735 0 0 0 0 000000030735
FT2RQ 030734 030735 0 0 000000030676 0 000000030735
FT3 030734 030735 0 0 000000030676 0 000000030735
FT9 030735 030735 0 0 000000030676 0 000000030735
ET0 030735 030735 0 0 000000030676 0 000000030735
ST1A 030735 030735 0 0 000000030676 0 000000030735
ST9 030735 030735 0 0 000000030676 0 000000030735
*030735 MOVSI 1,200000
INITIAL
C(AC)=200000 000000
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 030735 030735 0 0 205040200000 0 000000200000
IT1 030735 0 0 0 205040200000 0 000000200000
AT3 030735 0 0 0 000000200000 0 205040200000
AT6 030735 0 0 0 000000200000 0 205040200000
FT1A 030735 0 0 0 000000200000 0 000000200000
FT9 030736 0 0 0 000000200000 0 000000200000
ET0 030736 0 0 0 200000000000 0 000000200000
ST1 030736 0 0 0 200000000000 0 000000200000
ST2 030736 0 0 0 200000000000 0 000000200000
ST9 030736 0 0 0 200000000000 0 000000200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 12
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0169
*030736 JFCL 17,030737
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030736 030736 0 0 255740030737 0 000000030737
IT1 030736 0 0 0 255740030737 0 000000030737
AT3 030736 0 0 0 000000030737 0 255740030737
AT6 030736 030737 0 0 000000030737 0 255740030737
FT1A 030736 030737 0 0 000000030737 0 000000030737
FT9 030737 030737 0 0 000000030737 0 000000030737
ET0 030737 030737 0 0 000000030737 0 000000030737
ST1A 030737 030737 0 0 000000030737 0 000000030737
ST9 030737 030737 0 0 000000030737 0 000000030737
*030737 JRST 2,030740(1)
INITIAL
C(AC)=000000 000000
C(E)=474040 000000
FINAL
C(E)=474040 000000
TIME PC MA SC FE AR MQ BR
IT0 030737 030737 0 0 254101030740 0 200000030740
IT1 030737 0 0 0 254101030740 0 200000030740
AT1 030737 0 0 0 0 0 254101030740
AT2 030737 0 0 0 200000000000 0 254101030740
AT3 030737 0 0 0 000000030740 0 200000030740
AT6 030737 030740 0 0 000000030740 0 200000030740
FT1A 030737 030740 0 0 000000030740 0 200000030740
FT9 030740 030740 0 0 000000030740 0 200000030740
ET0 030740 030740 0 0 000000030740 0 200000030740
ST1A 030740 030740 0 0 000000030740 0 200000030740
ST9 030740 030740 0 0 000000030740 0 200000030740
*030740 SETO 1,000000
INITIAL
C(AC)=200000 000000
C(E)=000000 030676
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 030740 030740 0 0 474040000000 0 0
IT1 030740 0 0 0 474040000000 0 0
AT3 030740 0 0 0 0 0 474040000000
AT6 030740 0 0 0 0 0 474040000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 13
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0170
FT1A 030740 0 0 0 0 0 0
FT9 030741 0 0 0 0 0 0
ET0 030741 0 0 0 777777777777 0 0
ST1 030741 0 0 0 777777777777 0 0
ST2 030741 0 0 0 777777777777 0 0
ST9 030741 0 0 0 777777777777 0 0
*030741 JSR 1,030742
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030741 030741 0 0 264040030742 0 000000030742
IT1 030741 0 0 0 264040030742 0 000000030742
AT3 030741 0 0 0 000000030742 0 264040030742
AT6 030741 030742 0 0 000000030742 0 264040030742
FT1A 030741 030742 0 0 000000030742 0 000000030742
FT9 030742 030742 0 0 000000030742 0 000000030742
ET0 030742 030742 0 0 200000030742 0 000000030742
ET2 030743 030742 0 0 200000030742 0 000000030742
ST6 030743 030742 0 0 200000030742 0 000000030742
ST6A 030743 030742 0 0 200000030742 0 000000030742
ST9 030743 030742 0 0 200000030742 0 000000030742
*030743 CAME 1,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030743 030743 0 0 312040033462 0 777777777777
IT1 030743 0 0 0 312040033462 0 777777777777
AT3 030743 0 0 0 000000033462 0 312040033462
AT6 030743 033462 0 0 000000033462 0 312040033462
FT0 030743 033462 0 0 777777777777 0 312040033462
FT1A 030743 033462 0 0 777777777777 0 777777777777
FT2 030743 033462 0 0 0 0 777777777777
FT2RQ 030743 033462 0 0 777777777777 0 777777777777
FT3 030743 033462 0 0 777777777777 0 777777777777
FT9 030744 033462 0 0 777777777777 0 777777777777
ET0 030745 033462 0 0 0 0 777777777777
ST1A 030745 033462 0 0 0 0 777777777777
ST9 030745 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 14
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0171
*030745 JUMPA 0,030746
INITIAL
C(AC)=000000 030676
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030745 030745 0 0 324000030746 0 000000030746
IT1 030745 0 0 0 324000030746 0 000000030746
AT3 030745 0 0 0 000000030746 0 324000030746
AT6 030745 030746 0 0 000000030746 0 324000030746
FT1A 030745 030746 0 0 000000030746 0 000000030746
FT2 030745 030746 0 0 0 0 000000030746
FT2RQ 030745 030746 0 0 000000030676 0 000000030746
FT3 030745 030746 0 0 000000030676 0 000000030746
FT9 030746 030746 0 0 000000030676 0 000000030746
ET0 030746 030746 0 0 000000030676 0 000000030746
ST1A 030746 030746 0 0 000000030676 0 000000030746
ST9 030746 030746 0 0 000000030676 0 000000030746
*030746 MOVSI 1,200000
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 030746 030746 0 0 205040200000 0 000000200000
IT1 030746 0 0 0 205040200000 0 000000200000
AT3 030746 0 0 0 000000200000 0 205040200000
AT6 030746 0 0 0 000000200000 0 205040200000
FT1A 030746 0 0 0 000000200000 0 000000200000
FT9 030747 0 0 0 000000200000 0 000000200000
ET0 030747 0 0 0 200000000000 0 000000200000
ST1 030747 0 0 0 200000000000 0 000000200000
ST2 030747 0 0 0 200000000000 0 000000200000
ST9 030747 0 0 0 200000000000 0 000000200000
*030747 JFCL 17,030750
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030747 030747 0 0 255740030750 0 000000030750
IT1 030747 0 0 0 255740030750 0 000000030750
AT3 030747 0 0 0 000000030750 0 255740030750
AT6 030747 030750 0 0 000000030750 0 255740030750
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 15
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0172
FT1A 030747 030750 0 0 000000030750 0 000000030750
FT9 030750 030750 0 0 000000030750 0 000000030750
ET0 030750 030750 0 0 000000030750 0 000000030750
ST1A 030750 030750 0 0 000000030750 0 000000030750
ST9 030750 030750 0 0 000000030750 0 000000030750
*030750 JRST 2,030751(1)
INITIAL
C(AC)=000000 000000
C(E)=402000 030753
FINAL
C(E)=402000 030753
TIME PC MA SC FE AR MQ BR
IT0 030750 030750 0 0 254101030751 0 200000030751
IT1 030750 0 0 0 254101030751 0 200000030751
AT1 030750 0 0 0 0 0 254101030751
AT2 030750 0 0 0 200000000000 0 254101030751
AT3 030750 0 0 0 000000030751 0 200000030751
AT6 030750 030751 0 0 000000030751 0 200000030751
FT1A 030750 030751 0 0 000000030751 0 200000030751
FT9 030751 030751 0 0 000000030751 0 200000030751
ET0 030751 030751 0 0 000000030751 0 200000030751
ST1A 030751 030751 0 0 000000030751 0 200000030751
ST9 030751 030751 0 0 000000030751 0 200000030751
*030751 SETZM 0,030753
INITIAL
C(AC)=000000 030676
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030751 030751 0 0 402000030753 0 000000030753
IT1 030751 0 0 0 402000030753 0 000000030753
AT3 030751 0 0 0 000000030753 0 402000030753
AT6 030751 030753 0 0 000000030753 0 402000030753
FT1A 030751 030753 0 0 000000030753 0 000000030753
FT9 030752 030753 0 0 000000030753 0 000000030753
ET0 030752 030753 0 0 0 0 000000030753
ST6 030752 030753 0 0 0 0 000000030753
ST6A 030752 030753 0 0 0 0 000000030753
ST9 030752 030753 0 0 0 0 000000030753
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 16
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0173
*030752 JSR 0,030753
INITIAL
C(AC)=000000 030676
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030752 030752 0 0 264000030753 0 000000030753
IT1 030752 0 0 0 264000030753 0 000000030753
AT3 030752 0 0 0 000000030753 0 264000030753
AT6 030752 030753 0 0 000000030753 0 264000030753
FT1A 030752 030753 0 0 000000030753 0 000000030753
FT9 030753 030753 0 0 000000030753 0 000000030753
ET0 030753 030753 0 0 200000030753 0 000000030753
ET2 030754 030753 0 0 200000030753 0 000000030753
ST6 030754 030753 0 0 200000030753 0 000000030753
ST6A 030754 030753 0 0 200000030753 0 000000030753
ST9 030754 030753 0 0 200000030753 0 000000030753
*030754 HLLZ 0,030753
INITIAL
C(AC)=000000 030676
C(E)=200000 030753
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 030754 030754 0 0 510000030753 0 200000030753
IT1 030754 0 0 0 510000030753 0 200000030753
AT3 030754 0 0 0 000000030753 0 510000030753
AT6 030754 030753 0 0 000000030753 0 510000030753
FT0 030754 030753 0 0 200000030753 0 510000030753
FT1A 030754 030753 0 0 200000030753 0 200000030753
FT9 030755 030753 0 0 200000030753 0 200000030753
ET0 030755 030753 0 0 200000000000 0 200000030753
ST1 030755 030753 0 0 200000000000 0 200000030753
ST2 030755 030753 0 0 200000000000 0 200000030753
ST9 030755 030753 0 0 200000000000 0 200000030753
*030755 SKIPN 0,000000
INITIAL
C(AC)=200000 000000
C(E)=200000 000000
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 030755 030755 0 0 336000000000 0 200000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 17
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0174
IT1 030755 0 0 0 336000000000 0 200000000000
AT3 030755 0 0 0 0 0 336000000000
AT6 030755 0 0 0 0 0 336000000000
FT0 030755 0 0 0 200000000000 0 336000000000
FT1A 030755 0 0 0 200000000000 0 200000000000
FT9 030756 0 0 0 200000000000 0 200000000000
ET0 030757 0 0 0 200000000000 0 200000000000
ST1A 030757 0 0 0 200000000000 0 200000000000
ST9 030757 0 0 0 200000000000 0 200000000000
*030757 JUMPA 0,030760
INITIAL
C(AC)=200000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030757 030757 0 0 324000030760 0 000000030760
IT1 030757 0 0 0 324000030760 0 000000030760
AT3 030757 0 0 0 000000030760 0 324000030760
AT6 030757 030760 0 0 000000030760 0 324000030760
FT1A 030757 030760 0 0 000000030760 0 000000030760
FT2 030757 030760 0 0 0 0 000000030760
FT2RQ 030757 030760 0 0 200000000000 0 000000030760
FT3 030757 030760 0 0 200000000000 0 000000030760
FT9 030760 030760 0 0 200000000000 0 000000030760
ET0 030760 030760 0 0 200000000000 0 000000030760
ST1A 030760 030760 0 0 200000000000 0 000000030760
ST9 030760 030760 0 0 200000000000 0 000000030760
*030760 MOVSI 1,200000
INITIAL
C(AC)=200000 000000
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 030760 030760 0 0 205040200000 0 000000200000
IT1 030760 0 0 0 205040200000 0 000000200000
AT3 030760 0 0 0 000000200000 0 205040200000
AT6 030760 0 0 0 000000200000 0 205040200000
FT1A 030760 0 0 0 000000200000 0 000000200000
FT9 030761 0 0 0 000000200000 0 000000200000
ET0 030761 0 0 0 200000000000 0 000000200000
ST1 030761 0 0 0 200000000000 0 000000200000
ST2 030761 0 0 0 200000000000 0 000000200000
ST9 030761 0 0 0 200000000000 0 000000200000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 18
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0175
*030761 JFCL 17,030762
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030761 030761 0 0 255740030762 0 000000030762
IT1 030761 0 0 0 255740030762 0 000000030762
AT3 030761 0 0 0 000000030762 0 255740030762
AT6 030761 030762 0 0 000000030762 0 255740030762
FT1A 030761 030762 0 0 000000030762 0 000000030762
FT9 030762 030762 0 0 000000030762 0 000000030762
ET0 030762 030762 0 0 000000030762 0 000000030762
ST1A 030762 030762 0 0 000000030762 0 000000030762
ST9 030762 030762 0 0 000000030762 0 000000030762
*030762 JRST 2,030763(1)
INITIAL
C(AC)=000000 000000
C(E)=403000 030765
FINAL
C(E)=403000 030765
TIME PC MA SC FE AR MQ BR
IT0 030762 030762 0 0 254101030763 0 200000030763
IT1 030762 0 0 0 254101030763 0 200000030763
AT1 030762 0 0 0 0 0 254101030763
AT2 030762 0 0 0 200000000000 0 254101030763
AT3 030762 0 0 0 000000030763 0 200000030763
AT6 030762 030763 0 0 000000030763 0 200000030763
FT1A 030762 030763 0 0 000000030763 0 200000030763
FT9 030763 030763 0 0 000000030763 0 200000030763
ET0 030763 030763 0 0 000000030763 0 200000030763
ST1A 030763 030763 0 0 000000030763 0 200000030763
ST9 030763 030763 0 0 000000030763 0 200000030763
*030763 SETZB 0,030765
INITIAL
C(AC)=200000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030763 030763 0 0 403000030765 0 000000030765
IT1 030763 0 0 0 403000030765 0 000000030765
AT3 030763 0 0 0 000000030765 0 403000030765
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 19
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0176
AT6 030763 030765 0 0 000000030765 0 403000030765
FT1A 030763 030765 0 0 000000030765 0 000000030765
FT9 030764 030765 0 0 000000030765 0 000000030765
ET0 030764 030765 0 0 0 0 000000030765
ST1 030764 030765 0 0 0 0 000000030765
ST2 030764 030765 0 0 0 0 000000030765
ST6 030764 030765 0 0 0 0 000000030765
ST6A 030764 030765 0 0 0 0 000000030765
ST9 030764 030765 0 0 0 0 000000030765
*030764 JSR 0,030765
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030764 030764 0 0 264000030765 0 000000030765
IT1 030764 0 0 0 264000030765 0 000000030765
AT3 030764 0 0 0 000000030765 0 264000030765
AT6 030764 030765 0 0 000000030765 0 264000030765
FT1A 030764 030765 0 0 000000030765 0 000000030765
FT9 030765 030765 0 0 000000030765 0 000000030765
ET0 030765 030765 0 0 200000030765 0 000000030765
ET2 030766 030765 0 0 200000030765 0 000000030765
ST6 030766 030765 0 0 200000030765 0 000000030765
ST6A 030766 030765 0 0 200000030765 0 000000030765
ST9 030766 030765 0 0 200000030765 0 000000030765
*030766 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 030766 030766 0 0 332000000000 0 0
IT1 030766 0 0 0 332000000000 0 0
AT3 030766 0 0 0 0 0 332000000000
AT6 030766 0 0 0 0 0 332000000000
FT0 030766 0 0 0 0 0 332000000000
FT1A 030766 0 0 0 0 0 0
FT9 030767 0 0 0 0 0 0
ET0 030770 0 0 0 0 0 0
ST1A 030770 0 0 0 0 0 0
ST9 030770 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 20
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0177
*030770 JUMPA 0,030771
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030770 030770 0 0 324000030771 0 000000030771
IT1 030770 0 0 0 324000030771 0 000000030771
AT3 030770 0 0 0 000000030771 0 324000030771
AT6 030770 030771 0 0 000000030771 0 324000030771
FT1A 030770 030771 0 0 000000030771 0 000000030771
FT2 030770 030771 0 0 0 0 000000030771
FT2RQ 030770 030771 0 0 0 0 000000030771
FT3 030770 030771 0 0 0 0 000000030771
FT9 030771 030771 0 0 0 0 000000030771
ET0 030771 030771 0 0 0 0 000000030771
ST1A 030771 030771 0 0 0 0 000000030771
ST9 030771 030771 0 0 0 0 000000030771
*030771 MOVSI 1,200000
INITIAL
C(AC)=200000 000000
FINAL
C(AC)=200000 000000
TIME PC MA SC FE AR MQ BR
IT0 030771 030771 0 0 205040200000 0 000000200000
IT1 030771 0 0 0 205040200000 0 000000200000
AT3 030771 0 0 0 000000200000 0 205040200000
AT6 030771 0 0 0 000000200000 0 205040200000
FT1A 030771 0 0 0 000000200000 0 000000200000
FT9 030772 0 0 0 000000200000 0 000000200000
ET0 030772 0 0 0 200000000000 0 000000200000
ST1 030772 0 0 0 200000000000 0 000000200000
ST2 030772 0 0 0 200000000000 0 000000200000
ST9 030772 0 0 0 200000000000 0 000000200000
*030772 JFCL 17,030773
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 030772 030772 0 0 255740030773 0 000000030773
IT1 030772 0 0 0 255740030773 0 000000030773
AT3 030772 0 0 0 000000030773 0 255740030773
AT6 030772 030773 0 0 000000030773 0 255740030773
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 21
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0178
FT1A 030772 030773 0 0 000000030773 0 000000030773
FT9 030773 030773 0 0 000000030773 0 000000030773
ET0 030773 030773 0 0 000000030773 0 000000030773
ST1A 030773 030773 0 0 000000030773 0 000000030773
ST9 030773 030773 0 0 000000030773 0 000000030773
*030773 JRST 2,030774(1)
INITIAL
C(AC)=000000 000000
C(E)=400000 000000
FINAL
C(E)=400000 000000
TIME PC MA SC FE AR MQ BR
IT0 030773 030773 0 0 254101030774 0 200000030774
IT1 030773 0 0 0 254101030774 0 200000030774
AT1 030773 0 0 0 0 0 254101030774
AT2 030773 0 0 0 200000000000 0 254101030774
AT3 030773 0 0 0 000000030774 0 200000030774
AT6 030773 030774 0 0 000000030774 0 200000030774
FT1A 030773 030774 0 0 000000030774 0 200000030774
FT9 030774 030774 0 0 000000030774 0 200000030774
ET0 030774 030774 0 0 000000030774 0 200000030774
ST1A 030774 030774 0 0 000000030774 0 200000030774
ST9 030774 030774 0 0 000000030774 0 200000030774
*030774 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 030774 030774 0 0 400000000000 0 0
IT1 030774 0 0 0 400000000000 0 0
AT3 030774 0 0 0 0 0 400000000000
AT6 030774 0 0 0 0 0 400000000000
FT1A 030774 0 0 0 0 0 0
FT9 030775 0 0 0 0 0 0
ET0 030775 0 0 0 0 0 0
ST1 030775 0 0 0 0 0 0
ST2 030775 0 0 0 0 0 0
ST9 030775 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 22
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0179
*030775 JSR 0,030777
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030775 030775 0 0 264000030777 0 000000030777
IT1 030775 0 0 0 264000030777 0 000000030777
AT3 030775 0 0 0 000000030777 0 264000030777
AT6 030775 030777 0 0 000000030777 0 264000030777
FT1A 030775 030777 0 0 000000030777 0 000000030777
FT9 030776 030777 0 0 000000030777 0 000000030777
ET0 030777 030777 0 0 200000030776 0 000000030777
ET2 0 030777 0 0 200000030776 0 000000030777
ST6 0 030777 0 0 200000030776 0 000000030777
ST6A 0 030777 0 0 200000030776 0 000000030777
ST9 0 030777 0 0 200000030776 0 000000030777
*031000 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 0 0 0 0 332000000000 0 0
IT1 0 0 0 0 332000000000 0 0
AT3 0 0 0 0 0 0 332000000000
AT6 0 0 0 0 0 0 332000000000
FT0 0 0 0 0 0 0 332000000000
FT1A 0 0 0 0 0 0 0
FT9 031001 0 0 0 0 0 0
ET0 031002 0 0 0 0 0 0
ST1A 031002 0 0 0 0 0 0
ST9 031002 0 0 0 0 0 0
*031002 JUMPA 0,031003
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031002 031002 0 0 324000031003 0 000000031003
IT1 031002 0 0 0 324000031003 0 000000031003
AT3 031002 0 0 0 000000031003 0 324000031003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 23
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0180
AT6 031002 031003 0 0 000000031003 0 324000031003
FT1A 031002 031003 0 0 000000031003 0 000000031003
FT2 031002 031003 0 0 0 0 000000031003
FT2RQ 031002 031003 0 0 0 0 000000031003
FT3 031002 031003 0 0 0 0 000000031003
FT9 031003 031003 0 0 0 0 000000031003
ET0 031003 031003 0 0 0 0 000000031003
ST1A 031003 031003 0 0 0 0 000000031003
ST9 031003 031003 0 0 0 0 000000031003
*031003 MOVSI 1,000000
INITIAL
C(AC)=200000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031003 031003 0 0 205040000000 0 0
IT1 031003 0 0 0 205040000000 0 0
AT3 031003 0 0 0 0 0 205040000000
AT6 031003 0 0 0 0 0 205040000000
FT1A 031003 0 0 0 0 0 0
FT9 031004 0 0 0 0 0 0
ET0 031004 0 0 0 0 0 0
ST1 031004 0 0 0 0 0 0
ST2 031004 0 0 0 0 0 0
ST9 031004 0 0 0 0 0 0
*031004 JFCL 17,031005
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031004 031004 0 0 255740031005 0 000000031005
IT1 031004 0 0 0 255740031005 0 000000031005
AT3 031004 0 0 0 000000031005 0 255740031005
AT6 031004 031005 0 0 000000031005 0 255740031005
FT1A 031004 031005 0 0 000000031005 0 000000031005
FT9 031005 031005 0 0 000000031005 0 000000031005
ET0 031005 031005 0 0 000000031005 0 000000031005
ST1A 031005 031005 0 0 000000031005 0 000000031005
ST9 031005 031005 0 0 000000031005 0 000000031005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 24
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0181
*031005 JRST 2,031006(1)
INITIAL
C(AC)=000000 000000
C(E)=264000 031010
FINAL
C(E)=264000 031010
TIME PC MA SC FE AR MQ BR
IT0 031005 031005 0 0 254101031006 0 000000031006
IT1 031005 0 0 0 254101031006 0 000000031006
AT1 031005 0 0 0 0 0 254101031006
AT2 031005 0 0 0 0 0 254101031006
AT3 031005 0 0 0 000000031006 0 000000031006
AT6 031005 031006 0 0 000000031006 0 000000031006
FT1A 031005 031006 0 0 000000031006 0 000000031006
FT9 031006 031006 0 0 000000031006 0 000000031006
ET0 031006 031006 0 0 000000031006 0 000000031006
ST1A 031006 031006 0 0 000000031006 0 000000031006
ST9 031006 031006 0 0 000000031006 0 000000031006
*031006 JSR 0,031010
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031006 031006 0 0 264000031010 0 000000031010
IT1 031006 0 0 0 264000031010 0 000000031010
AT3 031006 0 0 0 000000031010 0 264000031010
AT6 031006 031010 0 0 000000031010 0 264000031010
FT1A 031006 031010 0 0 000000031010 0 000000031010
FT9 031007 031010 0 0 000000031010 0 000000031010
ET0 031010 031010 0 0 000000031007 0 000000031010
ET2 031011 031010 0 0 000000031007 0 000000031010
ST6 031011 031010 0 0 000000031007 0 000000031010
ST6A 031011 031010 0 0 000000031007 0 000000031010
ST9 031011 031010 0 0 000000031007 0 000000031010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 25
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0182
*031011 HRRZ 0,031010
INITIAL
C(AC)=000000 000000
C(E)=000000 031007
FINAL
C(AC)=000000 031007
TIME PC MA SC FE AR MQ BR
IT0 031011 031011 0 0 550000031010 0 000000031007
IT1 031011 0 0 0 550000031010 0 000000031007
AT3 031011 0 0 0 000000031010 0 550000031010
AT6 031011 031010 0 0 000000031010 0 550000031010
FT0 031011 031010 0 0 000000031007 0 550000031010
FT1A 031011 031010 0 0 000000031007 0 000000031007
FT9 031012 031010 0 0 000000031007 0 000000031007
ET0 031012 031010 0 0 000000031007 0 000000031007
ST1 031012 031010 0 0 000000031007 0 000000031007
ST2 031012 031010 0 0 000000031007 0 000000031007
ST9 031012 031010 0 0 000000031007 0 000000031007
*031012 CAIN 0,031010
INITIAL
C(AC)=000000 031007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031012 031012 0 0 306000031010 0 000000031010
IT1 031012 0 0 0 306000031010 0 000000031010
AT3 031012 0 0 0 000000031010 0 306000031010
AT6 031012 031010 0 0 000000031010 0 306000031010
FT1A 031012 031010 0 0 000000031010 0 000000031010
FT2 031012 031010 0 0 0 0 000000031010
FT2RQ 031012 031010 0 0 000000031007 0 000000031010
FT3 031012 031010 0 0 000000031007 0 000000031010
FT9 031013 031010 0 0 000000031007 0 000000031010
ET0 031014 031010 0 0 777777777777 0 000000031010
ST1A 031014 031010 0 0 777777777777 0 000000031010
ST9 031014 031010 0 0 777777777777 0 000000031010
*031014 JUMPA 0,031015
INITIAL
C(AC)=000000 031007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031014 031014 0 0 324000031015 0 000000031015
IT1 031014 0 0 0 324000031015 0 000000031015
AT3 031014 0 0 0 000000031015 0 324000031015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 26
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0183
AT6 031014 031015 0 0 000000031015 0 324000031015
FT1A 031014 031015 0 0 000000031015 0 000000031015
FT2 031014 031015 0 0 0 0 000000031015
FT2RQ 031014 031015 0 0 000000031007 0 000000031015
FT3 031014 031015 0 0 000000031007 0 000000031015
FT9 031015 031015 0 0 000000031007 0 000000031015
ET0 031015 031015 0 0 000000031007 0 000000031015
ST1A 031015 031015 0 0 000000031007 0 000000031015
ST9 031015 031015 0 0 000000031007 0 000000031015
*031015 JSR 0,031017
INITIAL
C(AC)=000000 031007
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031015 031015 0 0 264000031017 0 000000031017
IT1 031015 0 0 0 264000031017 0 000000031017
AT3 031015 0 0 0 000000031017 0 264000031017
AT6 031015 031017 0 0 000000031017 0 264000031017
FT1A 031015 031017 0 0 000000031017 0 000000031017
FT9 031016 031017 0 0 000000031017 0 000000031017
ET0 031017 031017 0 0 000000031016 0 000000031017
ET2 031020 031017 0 0 000000031016 0 000000031017
ST6 031020 031017 0 0 000000031016 0 000000031017
ST6A 031020 031017 0 0 000000031016 0 000000031017
ST9 031020 031017 0 0 000000031016 0 000000031017
*031020 HRRZ 0,031017
INITIAL
C(AC)=000000 031007
C(E)=000000 031016
FINAL
C(AC)=000000 031016
TIME PC MA SC FE AR MQ BR
IT0 031020 031020 0 0 550000031017 0 000000031016
IT1 031020 0 0 0 550000031017 0 000000031016
AT3 031020 0 0 0 000000031017 0 550000031017
AT6 031020 031017 0 0 000000031017 0 550000031017
FT0 031020 031017 0 0 000000031016 0 550000031017
FT1A 031020 031017 0 0 000000031016 0 000000031016
FT9 031021 031017 0 0 000000031016 0 000000031016
ET0 031021 031017 0 0 000000031016 0 000000031016
ST1 031021 031017 0 0 000000031016 0 000000031016
ST2 031021 031017 0 0 000000031016 0 000000031016
ST9 031021 031017 0 0 000000031016 0 000000031016
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 27
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0184
*031021 CAIE 0,031016
INITIAL
C(AC)=000000 031016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031021 031021 0 0 302000031016 0 000000031016
IT1 031021 0 0 0 302000031016 0 000000031016
AT3 031021 0 0 0 000000031016 0 302000031016
AT6 031021 031016 0 0 000000031016 0 302000031016
FT1A 031021 031016 0 0 000000031016 0 000000031016
FT2 031021 031016 0 0 0 0 000000031016
FT2RQ 031021 031016 0 0 000000031016 0 000000031016
FT3 031021 031016 0 0 000000031016 0 000000031016
FT9 031022 031016 0 0 000000031016 0 000000031016
ET0 031023 031016 0 0 0 0 000000031016
ST1A 031023 031016 0 0 0 0 000000031016
ST9 031023 031016 0 0 0 0 000000031016
*031023 JUMPA 0,031024
INITIAL
C(AC)=000000 031016
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031023 031023 0 0 324000031024 0 000000031024
IT1 031023 0 0 0 324000031024 0 000000031024
AT3 031023 0 0 0 000000031024 0 324000031024
AT6 031023 031024 0 0 000000031024 0 324000031024
FT1A 031023 031024 0 0 000000031024 0 000000031024
FT2 031023 031024 0 0 0 0 000000031024
FT2RQ 031023 031024 0 0 000000031016 0 000000031024
FT3 031023 031024 0 0 000000031016 0 000000031024
FT9 031024 031024 0 0 000000031016 0 000000031024
ET0 031024 031024 0 0 000000031016 0 000000031024
ST1A 031024 031024 0 0 000000031016 0 000000031024
ST9 031024 031024 0 0 000000031016 0 000000031024
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 28
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0185
*031024 SETZ 1,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 031016
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031024 031024 0 0 400040000000 0 0
IT1 031024 0 0 0 400040000000 0 0
AT3 031024 0 0 0 0 0 400040000000
AT6 031024 0 0 0 0 0 400040000000
FT1A 031024 0 0 0 0 0 0
FT9 031025 0 0 0 0 0 0
ET0 031025 0 0 0 0 0 0
ST1 031025 0 0 0 0 0 0
ST2 031025 0 0 0 0 0 0
ST9 031025 0 0 0 0 0 0
*031025 MOVE 0,033463
INITIAL
C(AC)=000000 031016
C(E)=310000 000000
FINAL
C(AC)=310000 000000
TIME PC MA SC FE AR MQ BR
IT0 031025 031025 0 0 200000033463 0 310000000000
IT1 031025 0 0 0 200000033463 0 310000000000
AT3 031025 0 0 0 000000033463 0 200000033463
AT6 031025 033463 0 0 000000033463 0 200000033463
FT0 031025 033463 0 0 310000000000 0 200000033463
FT1A 031025 033463 0 0 310000000000 0 310000000000
FT9 031026 033463 0 0 310000000000 0 310000000000
ET0 031026 033463 0 0 310000000000 0 310000000000
ST1 031026 033463 0 0 310000000000 0 310000000000
ST2 031026 033463 0 0 310000000000 0 310000000000
ST9 031026 033463 0 0 310000000000 0 310000000000
*031026 JSA 0,031030
INITIAL
C(AC)=310000 000000
C(E)=266000 031030
FINAL
C(AC)=031030 031027
C(E)=310000 000000
TIME PC MA SC FE AR MQ BR
IT0 031026 031026 0 0 266000031030 0 310000000000
IT1 031026 0 0 0 266000031030 0 310000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 29
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0186
AT3 031026 0 0 0 000000031030 0 266000031030
AT6 031026 031030 0 0 000000031030 0 266000031030
FT1A 031026 031030 0 0 000000031030 0 000000031030
FT2 031026 031030 0 0 0 0 000000031030
FT2RQ 031026 031030 0 0 310000000000 0 000000031030
FT3 031026 031030 0 0 310000000000 0 000000031030
FT9 031027 031030 0 0 310000000000 0 000000031030
ET0 031030 031030 0 0 310000031027 0 310000000000
ET1 031030 031030 0 0 031027031030 0 310000000000
ET2 031031 031030 0 0 031030031027 0 310000000000
ST1 031031 031030 0 0 031030031027 0 310000000000
ST2 031031 031030 0 0 310000000000 0 310000000000
ST3 031031 031030 0 0 310000000000 0 310000000000
ST6 031031 031030 0 0 310000000000 0 310000000000
ST6A 031031 031030 0 0 310000000000 0 310000000000
ST9 031031 031030 0 0 310000000000 0 310000000000
*031031 SKIPE 0,000001
INITIAL
C(AC)=031030 031027
C(E)=000000 000000
FINAL
C(AC)=031030 031027
TIME PC MA SC FE AR MQ BR
IT0 031031 031031 0 0 332000000001 0 0
IT1 031031 0 0 0 332000000001 0 0
AT3 031031 0 0 0 000000000001 0 332000000001
AT6 031031 000001 0 0 000000000001 0 332000000001
FT0 031031 000001 0 0 0 0 332000000001
FT1A 031031 000001 0 0 0 0 0
FT9 031032 000001 0 0 0 0 0
ET0 031033 000001 0 0 0 0 0
ST1A 031033 000001 0 0 0 0 0
ST9 031033 000001 0 0 0 0 0
*031033 JUMPA 0,031034
INITIAL
C(AC)=031030 031027
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031033 031033 0 0 324000031034 0 000000031034
IT1 031033 0 0 0 324000031034 0 000000031034
AT3 031033 0 0 0 000000031034 0 324000031034
AT6 031033 031034 0 0 000000031034 0 324000031034
FT1A 031033 031034 0 0 000000031034 0 000000031034
FT2 031033 031034 0 0 0 0 000000031034
FT2RQ 031033 031034 0 0 031030031027 0 000000031034
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 30
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0187
FT3 031033 031034 0 0 031030031027 0 000000031034
FT9 031034 031034 0 0 031030031027 0 000000031034
ET0 031034 031034 0 0 031030031027 0 000000031034
ST1A 031034 031034 0 0 031030031027 0 000000031034
ST9 031034 031034 0 0 031030031027 0 000000031034
*031034 SETZ 1,000000
INITIAL
C(AC)=000000 000000
C(E)=031030 031027
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031034 031034 0 0 400040000000 0 0
IT1 031034 0 0 0 400040000000 0 0
AT3 031034 0 0 0 0 0 400040000000
AT6 031034 0 0 0 0 0 400040000000
FT1A 031034 0 0 0 0 0 0
FT9 031035 0 0 0 0 0 0
ET0 031035 0 0 0 0 0 0
ST1 031035 0 0 0 0 0 0
ST2 031035 0 0 0 0 0 0
ST9 031035 0 0 0 0 0 0
*031035 MOVE 0,033464
INITIAL
C(AC)=031030 031027
C(E)=201040 001234
FINAL
C(AC)=201040 001234
TIME PC MA SC FE AR MQ BR
IT0 031035 031035 0 0 200000033464 0 201040001234
IT1 031035 0 0 0 200000033464 0 201040001234
AT3 031035 0 0 0 000000033464 0 200000033464
AT6 031035 033464 0 0 000000033464 0 200000033464
FT0 031035 033464 0 0 201040001234 0 200000033464
FT1A 031035 033464 0 0 201040001234 0 201040001234
FT9 031036 033464 0 0 201040001234 0 201040001234
ET0 031036 033464 0 0 201040001234 0 201040001234
ST1 031036 033464 0 0 201040001234 0 201040001234
ST2 031036 033464 0 0 201040001234 0 201040001234
ST9 031036 033464 0 0 201040001234 0 201040001234
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 31
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0188
*031036 JSA 0,031037
INITIAL
C(AC)=201040 001234
C(E)=266000 031037
FINAL
C(AC)=031037 031037
C(E)=201040 001234
TIME PC MA SC FE AR MQ BR
IT0 031036 031036 0 0 266000031037 0 201040001234
IT1 031036 0 0 0 266000031037 0 201040001234
AT3 031036 0 0 0 000000031037 0 266000031037
AT6 031036 031037 0 0 000000031037 0 266000031037
FT1A 031036 031037 0 0 000000031037 0 000000031037
FT2 031036 031037 0 0 0 0 000000031037
FT2RQ 031036 031037 0 0 201040001234 0 000000031037
FT3 031036 031037 0 0 201040001234 0 000000031037
FT9 031037 031037 0 0 201040001234 0 000000031037
ET0 031037 031037 0 0 201040031037 0 201040001234
ET1 031037 031037 0 0 031037031037 0 201040001234
ET2 031040 031037 0 0 031037031037 0 201040001234
ST1 031040 031037 0 0 031037031037 0 201040001234
ST2 031040 031037 0 0 201040001234 0 201040001234
ST3 031040 031037 0 0 201040001234 0 201040001234
ST6 031040 031037 0 0 201040001234 0 201040001234
ST6A 031040 031037 0 0 201040001234 0 201040001234
ST9 031040 031037 0 0 201040001234 0 201040001234
*031040 CAIN 1,001234
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031040 031040 0 0 306040001234 0 000000001234
IT1 031040 0 0 0 306040001234 0 000000001234
AT3 031040 0 0 0 000000001234 0 306040001234
AT6 031040 001234 0 0 000000001234 0 306040001234
FT1A 031040 001234 0 0 000000001234 0 000000001234
FT2 031040 001234 0 0 0 0 000000001234
FT2RQ 031040 001234 0 0 0 0 000000001234
FT3 031040 001234 0 0 0 0 000000001234
FT9 031041 001234 0 0 0 0 000000001234
ET0 031042 001234 0 0 777777776544 0 000000001234
ST1A 031042 001234 0 0 777777776544 0 000000001234
ST9 031042 001234 0 0 777777776544 0 000000001234
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 32
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0189
*031042 JUMPA 0,031043
INITIAL
C(AC)=031037 031037
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031042 031042 0 0 324000031043 0 000000031043
IT1 031042 0 0 0 324000031043 0 000000031043
AT3 031042 0 0 0 000000031043 0 324000031043
AT6 031042 031043 0 0 000000031043 0 324000031043
FT1A 031042 031043 0 0 000000031043 0 000000031043
FT2 031042 031043 0 0 0 0 000000031043
FT2RQ 031042 031043 0 0 031037031037 0 000000031043
FT3 031042 031043 0 0 031037031037 0 000000031043
FT9 031043 031043 0 0 031037031037 0 000000031043
ET0 031043 031043 0 0 031037031037 0 000000031043
ST1A 031043 031043 0 0 031037031037 0 000000031043
ST9 031043 031043 0 0 031037031037 0 000000031043
*031043 JSA 0,031045
INITIAL
C(AC)=031037 031037
C(E)=266000 031045
FINAL
C(AC)=031045 031044
C(E)=031037 031037
TIME PC MA SC FE AR MQ BR
IT0 031043 031043 0 0 266000031045 0 031037031037
IT1 031043 0 0 0 266000031045 0 031037031037
AT3 031043 0 0 0 000000031045 0 266000031045
AT6 031043 031045 0 0 000000031045 0 266000031045
FT1A 031043 031045 0 0 000000031045 0 000000031045
FT2 031043 031045 0 0 0 0 000000031045
FT2RQ 031043 031045 0 0 031037031037 0 000000031045
FT3 031043 031045 0 0 031037031037 0 000000031045
FT9 031044 031045 0 0 031037031037 0 000000031045
ET0 031045 031045 0 0 031037031044 0 031037031037
ET1 031045 031045 0 0 031044031045 0 031037031037
ET2 031046 031045 0 0 031045031044 0 031037031037
ST1 031046 031045 0 0 031045031044 0 031037031037
ST2 031046 031045 0 0 031037031037 0 031037031037
ST3 031046 031045 0 0 031037031037 0 031037031037
ST6 031046 031045 0 0 031037031037 0 031037031037
ST6A 031046 031045 0 0 031037031037 0 031037031037
ST9 031046 031045 0 0 031037031037 0 031037031037
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 33
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0190
*031046 HRRZM 0,000001
INITIAL
C(AC)=031045 031044
C(E)=000000 000000
FINAL
C(E)=000000 031044
TIME PC MA SC FE AR MQ BR
IT0 031046 031046 0 0 552000000001 0 0
IT1 031046 0 0 0 552000000001 0 0
AT3 031046 0 0 0 000000000001 0 552000000001
AT6 031046 000001 0 0 000000000001 0 552000000001
FT0 031046 000001 0 0 0 0 552000000001
FT1A 031046 000001 0 0 0 0 0
FT2 031046 000001 0 0 0 0 0
FT2RQ 031046 000001 0 0 031045031044 0 0
FT3 031046 000001 0 0 031045031044 0 0
FT9 031047 000001 0 0 031045031044 0 0
ET0 031047 000001 0 0 000000031044 0 0
ST5 031047 000001 0 0 000000031044 0 0
ST6A 031047 000001 0 0 000000031044 0 0
ST9 031047 000001 0 0 000000031044 0 0
*031047 CAIN 1,031045
INITIAL
C(AC)=000000 031044
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031047 031047 0 0 306040031045 0 000000031045
IT1 031047 0 0 0 306040031045 0 000000031045
AT3 031047 0 0 0 000000031045 0 306040031045
AT6 031047 031045 0 0 000000031045 0 306040031045
FT1A 031047 031045 0 0 000000031045 0 000000031045
FT2 031047 031045 0 0 0 0 000000031045
FT2RQ 031047 031045 0 0 000000031044 0 000000031045
FT3 031047 031045 0 0 000000031044 0 000000031045
FT9 031050 031045 0 0 000000031044 0 000000031045
ET0 031051 031045 0 0 777777777777 0 000000031045
ST1A 031051 031045 0 0 777777777777 0 000000031045
ST9 031051 031045 0 0 777777777777 0 000000031045
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 34
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0191
*031051 JUMPA 0,031052
INITIAL
C(AC)=031045 031044
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 031045031044 0 000000031052
FT3 031051 031052 0 0 031045031044 0 000000031052
FT9 031052 031052 0 0 031045031044 0 000000031052
ET0 031052 031052 0 0 031045031044 0 000000031052
ST1A 031052 031052 0 0 031045031044 0 000000031052
ST9 031052 031052 0 0 031045031044 0 000000031052
*031052 SETZB 0,031054
INITIAL
C(AC)=031045 031044
C(E)=000000 000000
FINAL
C(AC)=000000 000000
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031052 031052 0 0 403000031054 0 000000031054
IT1 031052 0 0 0 403000031054 0 000000031054
AT3 031052 0 0 0 000000031054 0 403000031054
AT6 031052 031054 0 0 000000031054 0 403000031054
FT1A 031052 031054 0 0 000000031054 0 000000031054
FT9 031053 031054 0 0 000000031054 0 000000031054
ET0 031053 031054 0 0 0 0 000000031054
ST1 031053 031054 0 0 0 0 000000031054
ST2 031053 031054 0 0 0 0 000000031054
ST6 031053 031054 0 0 0 0 000000031054
ST6A 031053 031054 0 0 0 0 000000031054
ST9 031053 031054 0 0 0 0 000000031054
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 35
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0192
*031053 JSA 0,031054
INITIAL
C(AC)=000000 000000
C(E)=266000 031054
FINAL
C(AC)=031054 031054
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031053 031053 0 0 266000031054 0 0
IT1 031053 0 0 0 266000031054 0 0
AT3 031053 0 0 0 000000031054 0 266000031054
AT6 031053 031054 0 0 000000031054 0 266000031054
FT1A 031053 031054 0 0 000000031054 0 000000031054
FT2 031053 031054 0 0 0 0 000000031054
FT2RQ 031053 031054 0 0 0 0 000000031054
FT3 031053 031054 0 0 0 0 000000031054
FT9 031054 031054 0 0 0 0 000000031054
ET0 031054 031054 0 0 000000031054 0 0
ET1 031054 031054 0 0 031054031054 0 0
ET2 031055 031054 0 0 031054031054 0 0
ST1 031055 031054 0 0 031054031054 0 0
ST2 031055 031054 0 0 0 0 0
ST3 031055 031054 0 0 0 0 0
ST6 031055 031054 0 0 0 0 0
ST6A 031055 031054 0 0 0 0 0
ST9 031055 031054 0 0 0 0 0
*031055 MOVE 1,031054
INITIAL
C(AC)=000000 031044
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031055 031055 0 0 200040031054 0 0
IT1 031055 0 0 0 200040031054 0 0
AT3 031055 0 0 0 000000031054 0 200040031054
AT6 031055 031054 0 0 000000031054 0 200040031054
FT0 031055 031054 0 0 0 0 200040031054
FT1A 031055 031054 0 0 0 0 0
FT9 031056 031054 0 0 0 0 0
ET0 031056 031054 0 0 0 0 0
ST1 031056 031054 0 0 0 0 0
ST2 031056 031054 0 0 0 0 0
ST9 031056 031054 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 36
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0193
*031056 CAIN 1,031054
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031056 031056 0 0 306040031054 0 000000031054
IT1 031056 0 0 0 306040031054 0 000000031054
AT3 031056 0 0 0 000000031054 0 306040031054
AT6 031056 031054 0 0 000000031054 0 306040031054
FT1A 031056 031054 0 0 000000031054 0 000000031054
FT2 031056 031054 0 0 0 0 000000031054
FT2RQ 031056 031054 0 0 0 0 000000031054
FT3 031056 031054 0 0 0 0 000000031054
FT9 031057 031054 0 0 0 0 000000031054
ET0 031060 031054 0 0 777777746724 0 000000031054
ST1A 031060 031054 0 0 777777746724 0 000000031054
ST9 031060 031054 0 0 777777746724 0 000000031054
*031060 JUMPA 0,031061
INITIAL
C(AC)=031054 031054
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031060 031060 0 0 324000031061 0 000000031061
IT1 031060 0 0 0 324000031061 0 000000031061
AT3 031060 0 0 0 000000031061 0 324000031061
AT6 031060 031061 0 0 000000031061 0 324000031061
FT1A 031060 031061 0 0 000000031061 0 000000031061
FT2 031060 031061 0 0 0 0 000000031061
FT2RQ 031060 031061 0 0 031054031054 0 000000031061
FT3 031060 031061 0 0 031054031054 0 000000031061
FT9 031061 031061 0 0 031054031054 0 000000031061
ET0 031061 031061 0 0 031054031054 0 000000031061
ST1A 031061 031061 0 0 031054031054 0 000000031061
ST9 031061 031061 0 0 031054031054 0 000000031061
*031061 MOVEI 0,777777
INITIAL
C(AC)=031054 031054
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031061 031061 0 0 201000777777 0 000000777777
IT1 031061 0 0 0 201000777777 0 000000777777
AT3 031061 0 0 0 000000777777 0 201000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 37
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0194
AT6 031061 777777 0 0 000000777777 0 201000777777
FT1A 031061 777777 0 0 000000777777 0 000000777777
FT9 031062 777777 0 0 000000777777 0 000000777777
ET0 031062 777777 0 0 000000777777 0 000000777777
ST1 031062 777777 0 0 000000777777 0 000000777777
ST2 031062 777777 0 0 000000777777 0 000000777777
ST9 031062 777777 0 0 000000777777 0 000000777777
*031062 JSA 0,031063
INITIAL
C(AC)=000000 777777
C(E)=266000 031063
FINAL
C(AC)=031063 031063
C(E)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031062 031062 0 0 266000031063 0 000000777777
IT1 031062 0 0 0 266000031063 0 000000777777
AT3 031062 0 0 0 000000031063 0 266000031063
AT6 031062 031063 0 0 000000031063 0 266000031063
FT1A 031062 031063 0 0 000000031063 0 000000031063
FT2 031062 031063 0 0 0 0 000000031063
FT2RQ 031062 031063 0 0 000000777777 0 000000031063
FT3 031062 031063 0 0 000000777777 0 000000031063
FT9 031063 031063 0 0 000000777777 0 000000031063
ET0 031063 031063 0 0 000000031063 0 000000777777
ET1 031063 031063 0 0 031063031063 0 000000777777
ET2 031064 031063 0 0 031063031063 0 000000777777
ST1 031064 031063 0 0 031063031063 0 000000777777
ST2 031064 031063 0 0 000000777777 0 000000777777
ST3 031064 031063 0 0 000000777777 0 000000777777
ST6 031064 031063 0 0 000000777777 0 000000777777
ST6A 031064 031063 0 0 000000777777 0 000000777777
ST9 031064 031063 0 0 000000777777 0 000000777777
*031064 TRNN 0,777777
INITIAL
C(AC)=031063 031063
FINAL
C(AC)=031063 031063
TIME PC MA SC FE AR MQ BR
IT0 031064 031064 0 0 606000777777 0 000000031063
IT1 031064 0 0 0 606000777777 0 000000031063
AT3 031064 0 0 0 000000777777 0 606000777777
AT6 031064 777777 0 0 000000777777 0 606000777777
FT1A 031064 777777 0 0 000000777777 0 000000777777
FT2 031064 777777 0 0 0 0 000000777777
FT2RQ 031064 777777 0 0 031063031063 0 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 38
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0195
FT3 031064 777777 0 0 031063031063 0 000000777777
FT9 031065 777777 0 0 031063031063 0 000000777777
ET0 031065 777777 0 0 031063031063 0 000000777777
ET1 031065 777777 0 0 031063031063 0 000000031063
ET2 031066 777777 0 0 031063031063 0 000000031063
ST1A 031066 777777 0 0 031063031063 0 000000031063
ST9 031066 777777 0 0 031063031063 0 000000031063
*031066 JUMPA 0,031067
INITIAL
C(AC)=031063 031063
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031066 031066 0 0 324000031067 0 000000031067
IT1 031066 0 0 0 324000031067 0 000000031067
AT3 031066 0 0 0 000000031067 0 324000031067
AT6 031066 031067 0 0 000000031067 0 324000031067
FT1A 031066 031067 0 0 000000031067 0 000000031067
FT2 031066 031067 0 0 0 0 000000031067
FT2RQ 031066 031067 0 0 031063031063 0 000000031067
FT3 031066 031067 0 0 031063031063 0 000000031067
FT9 031067 031067 0 0 031063031063 0 000000031067
ET0 031067 031067 0 0 031063031063 0 000000031067
ST1A 031067 031067 0 0 031063031063 0 000000031067
ST9 031067 031067 0 0 031063031063 0 000000031067
*031067 SETZ 0,000000
INITIAL
C(AC)=031063 031063
C(E)=031063 031063
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031067 031067 0 0 400000000000 0 0
IT1 031067 0 0 0 400000000000 0 0
AT3 031067 0 0 0 0 0 400000000000
AT6 031067 0 0 0 0 0 400000000000
FT1A 031067 0 0 0 0 0 0
FT9 031070 0 0 0 0 0 0
ET0 031070 0 0 0 0 0 0
ST1 031070 0 0 0 0 0 0
ST2 031070 0 0 0 0 0 0
ST9 031070 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 39
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0196
*031070 JSA 0,031071
INITIAL
C(AC)=000000 000000
C(E)=266000 031071
FINAL
C(AC)=031071 031071
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031070 031070 0 0 266000031071 0 0
IT1 031070 0 0 0 266000031071 0 0
AT3 031070 0 0 0 000000031071 0 266000031071
AT6 031070 031071 0 0 000000031071 0 266000031071
FT1A 031070 031071 0 0 000000031071 0 000000031071
FT2 031070 031071 0 0 0 0 000000031071
FT2RQ 031070 031071 0 0 0 0 000000031071
FT3 031070 031071 0 0 0 0 000000031071
FT9 031071 031071 0 0 0 0 000000031071
ET0 031071 031071 0 0 000000031071 0 0
ET1 031071 031071 0 0 031071031071 0 0
ET2 031072 031071 0 0 031071031071 0 0
ST1 031072 031071 0 0 031071031071 0 0
ST2 031072 031071 0 0 0 0 0
ST3 031072 031071 0 0 0 0 0
ST6 031072 031071 0 0 0 0 0
ST6A 031072 031071 0 0 0 0 0
ST9 031072 031071 0 0 0 0 0
*031072 TRNN 0,777777
INITIAL
C(AC)=031071 031071
FINAL
C(AC)=031071 031071
TIME PC MA SC FE AR MQ BR
IT0 031072 031072 0 0 606000777777 0 000000031071
IT1 031072 0 0 0 606000777777 0 000000031071
AT3 031072 0 0 0 000000777777 0 606000777777
AT6 031072 777777 0 0 000000777777 0 606000777777
FT1A 031072 777777 0 0 000000777777 0 000000777777
FT2 031072 777777 0 0 0 0 000000777777
FT2RQ 031072 777777 0 0 031071031071 0 000000777777
FT3 031072 777777 0 0 031071031071 0 000000777777
FT9 031073 777777 0 0 031071031071 0 000000777777
ET0 031073 777777 0 0 031071031071 0 000000777777
ET1 031073 777777 0 0 031071031071 0 000000031071
ET2 031074 777777 0 0 031071031071 0 000000031071
ST1A 031074 777777 0 0 031071031071 0 000000031071
ST9 031074 777777 0 0 031071031071 0 000000031071
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 40
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0197
*031074 JUMPA 0,031075
INITIAL
C(AC)=031071 031071
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031074 031074 0 0 324000031075 0 000000031075
IT1 031074 0 0 0 324000031075 0 000000031075
AT3 031074 0 0 0 000000031075 0 324000031075
AT6 031074 031075 0 0 000000031075 0 324000031075
FT1A 031074 031075 0 0 000000031075 0 000000031075
FT2 031074 031075 0 0 0 0 000000031075
FT2RQ 031074 031075 0 0 031071031071 0 000000031075
FT3 031074 031075 0 0 031071031071 0 000000031075
FT9 031075 031075 0 0 031071031071 0 000000031075
ET0 031075 031075 0 0 031071031071 0 000000031075
ST1A 031075 031075 0 0 031071031071 0 000000031075
ST9 031075 031075 0 0 031071031071 0 000000031075
*031075 JSA 0,031077
INITIAL
C(AC)=031071 031071
C(E)=266000 031077
FINAL
C(AC)=031077 031076
C(E)=031071 031071
TIME PC MA SC FE AR MQ BR
IT0 031075 031075 0 0 266000031077 0 031071031071
IT1 031075 0 0 0 266000031077 0 031071031071
AT3 031075 0 0 0 000000031077 0 266000031077
AT6 031075 031077 0 0 000000031077 0 266000031077
FT1A 031075 031077 0 0 000000031077 0 000000031077
FT2 031075 031077 0 0 0 0 000000031077
FT2RQ 031075 031077 0 0 031071031071 0 000000031077
FT3 031075 031077 0 0 031071031071 0 000000031077
FT9 031076 031077 0 0 031071031071 0 000000031077
ET0 031077 031077 0 0 031071031076 0 031071031071
ET1 031077 031077 0 0 031076031077 0 031071031071
ET2 0 031077 0 0 031077031076 0 031071031071
ST1 0 031077 0 0 031077031076 0 031071031071
ST2 0 031077 0 0 031071031071 0 031071031071
ST3 0 031077 0 0 031071031071 0 031071031071
ST6 0 031077 0 0 031071031071 0 031071031071
ST6A 0 031077 0 0 031071031071 0 031071031071
ST9 0 031077 0 0 031071031071 0 031071031071
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 41
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0198
*031100 HLRZM 0,000001
INITIAL
C(AC)=031077 031076
C(E)=000000 000000
FINAL
C(E)=000000 031077
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 556000000001 0 0
IT1 0 0 0 0 556000000001 0 0
AT3 0 0 0 0 000000000001 0 556000000001
AT6 0 000001 0 0 000000000001 0 556000000001
FT0 0 000001 0 0 0 0 556000000001
FT1A 0 000001 0 0 0 0 0
FT2 0 000001 0 0 0 0 0
FT2RQ 0 000001 0 0 031077031076 0 0
FT3 0 000001 0 0 031077031076 0 0
FT9 031101 000001 0 0 031077031076 0 0
ET0 031101 000001 0 0 000000031077 0 0
ST5 031101 000001 0 0 000000031077 0 0
ST6A 031101 000001 0 0 000000031077 0 0
ST9 031101 000001 0 0 000000031077 0 0
*031101 CAIN 1,031076
INITIAL
C(AC)=000000 031077
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031101 031101 0 0 306040031076 0 000000031076
IT1 031101 0 0 0 306040031076 0 000000031076
AT3 031101 0 0 0 000000031076 0 306040031076
AT6 031101 031076 0 0 000000031076 0 306040031076
FT1A 031101 031076 0 0 000000031076 0 000000031076
FT2 031101 031076 0 0 0 0 000000031076
FT2RQ 031101 031076 0 0 000000031077 0 000000031076
FT3 031101 031076 0 0 000000031077 0 000000031076
FT9 031102 031076 0 0 000000031077 0 000000031076
ET0 031103 031076 0 0 000000000001 0 000000031076
ST1A 031103 031076 0 0 000000000001 0 000000031076
ST9 031103 031076 0 0 000000000001 0 000000031076
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 42
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0199
*031103 JUMPA 0,031104
INITIAL
C(AC)=031077 031076
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031103 031103 0 0 324000031104 0 000000031104
IT1 031103 0 0 0 324000031104 0 000000031104
AT3 031103 0 0 0 000000031104 0 324000031104
AT6 031103 031104 0 0 000000031104 0 324000031104
FT1A 031103 031104 0 0 000000031104 0 000000031104
FT2 031103 031104 0 0 0 0 000000031104
FT2RQ 031103 031104 0 0 031077031076 0 000000031104
FT3 031103 031104 0 0 031077031076 0 000000031104
FT9 031104 031104 0 0 031077031076 0 000000031104
ET0 031104 031104 0 0 031077031076 0 000000031104
ST1A 031104 031104 0 0 031077031076 0 000000031104
ST9 031104 031104 0 0 031077031076 0 000000031104
*031104 SETO 0,000000
INITIAL
C(AC)=031077 031076
C(E)=031077 031076
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031104 031104 0 0 474000000000 0 0
IT1 031104 0 0 0 474000000000 0 0
AT3 031104 0 0 0 0 0 474000000000
AT6 031104 0 0 0 0 0 474000000000
FT1A 031104 0 0 0 0 0 0
FT9 031105 0 0 0 0 0 0
ET0 031105 0 0 0 777777777777 0 0
ST1 031105 0 0 0 777777777777 0 0
ST2 031105 0 0 0 777777777777 0 0
ST9 031105 0 0 0 777777777777 0 0
*031105 JSA 0,031107
INITIAL
C(AC)=777777 777777
C(E)=266000 031107
FINAL
C(AC)=031107 031106
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031105 031105 0 0 266000031107 0 777777777777
IT1 031105 0 0 0 266000031107 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 43
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0200
AT3 031105 0 0 0 000000031107 0 266000031107
AT6 031105 031107 0 0 000000031107 0 266000031107
FT1A 031105 031107 0 0 000000031107 0 000000031107
FT2 031105 031107 0 0 0 0 000000031107
FT2RQ 031105 031107 0 0 777777777777 0 000000031107
FT3 031105 031107 0 0 777777777777 0 000000031107
FT9 031106 031107 0 0 777777777777 0 000000031107
ET0 031107 031107 0 0 777777031106 0 777777777777
ET1 031107 031107 0 0 031106031107 0 777777777777
ET2 031110 031107 0 0 031107031106 0 777777777777
ST1 031110 031107 0 0 031107031106 0 777777777777
ST2 031110 031107 0 0 777777777777 0 777777777777
ST3 031110 031107 0 0 777777777777 0 777777777777
ST6 031110 031107 0 0 777777777777 0 777777777777
ST6A 031110 031107 0 0 777777777777 0 777777777777
ST9 031110 031107 0 0 777777777777 0 777777777777
*031110 CAME 0,033465
INITIAL
C(AC)=031107 031106
C(E)=031107 031106
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031110 031110 0 0 312000033465 0 031107031106
IT1 031110 0 0 0 312000033465 0 031107031106
AT3 031110 0 0 0 000000033465 0 312000033465
AT6 031110 033465 0 0 000000033465 0 312000033465
FT0 031110 033465 0 0 031107031106 0 312000033465
FT1A 031110 033465 0 0 031107031106 0 031107031106
FT2 031110 033465 0 0 0 0 031107031106
FT2RQ 031110 033465 0 0 031107031106 0 031107031106
FT3 031110 033465 0 0 031107031106 0 031107031106
FT9 031111 033465 0 0 031107031106 0 031107031106
ET0 031112 033465 0 0 0 0 031107031106
ST1A 031112 033465 0 0 0 0 031107031106
ST9 031112 033465 0 0 0 0 031107031106
*031112 JUMPA 0,031113
INITIAL
C(AC)=031107 031106
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031112 031112 0 0 324000031113 0 000000031113
IT1 031112 0 0 0 324000031113 0 000000031113
AT3 031112 0 0 0 000000031113 0 324000031113
AT6 031112 031113 0 0 000000031113 0 324000031113
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 44
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0201
FT1A 031112 031113 0 0 000000031113 0 000000031113
FT2 031112 031113 0 0 0 0 000000031113
FT2RQ 031112 031113 0 0 031107031106 0 000000031113
FT3 031112 031113 0 0 031107031106 0 000000031113
FT9 031113 031113 0 0 031107031106 0 000000031113
ET0 031113 031113 0 0 031107031106 0 000000031113
ST1A 031113 031113 0 0 031107031106 0 000000031113
ST9 031113 031113 0 0 031107031106 0 000000031113
*031113 SETZ 0,000000
INITIAL
C(AC)=031107 031106
C(E)=031107 031106
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031113 031113 0 0 400000000000 0 0
IT1 031113 0 0 0 400000000000 0 0
AT3 031113 0 0 0 0 0 400000000000
AT6 031113 0 0 0 0 0 400000000000
FT1A 031113 0 0 0 0 0 0
FT9 031114 0 0 0 0 0 0
ET0 031114 0 0 0 0 0 0
ST1 031114 0 0 0 0 0 0
ST2 031114 0 0 0 0 0 0
ST9 031114 0 0 0 0 0 0
*031114 JSA 0,031116
INITIAL
C(AC)=000000 000000
C(E)=266000 031116
FINAL
C(AC)=031116 031115
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031114 031114 0 0 266000031116 0 0
IT1 031114 0 0 0 266000031116 0 0
AT3 031114 0 0 0 000000031116 0 266000031116
AT6 031114 031116 0 0 000000031116 0 266000031116
FT1A 031114 031116 0 0 000000031116 0 000000031116
FT2 031114 031116 0 0 0 0 000000031116
FT2RQ 031114 031116 0 0 0 0 000000031116
FT3 031114 031116 0 0 0 0 000000031116
FT9 031115 031116 0 0 0 0 000000031116
ET0 031116 031116 0 0 000000031115 0 0
ET1 031116 031116 0 0 031115031116 0 0
ET2 031117 031116 0 0 031116031115 0 0
ST1 031117 031116 0 0 031116031115 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 45
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0202
ST2 031117 031116 0 0 0 0 0
ST3 031117 031116 0 0 0 0 0
ST6 031117 031116 0 0 0 0 0
ST6A 031117 031116 0 0 0 0 0
ST9 031117 031116 0 0 0 0 0
*031117 CAME 0,033466
INITIAL
C(AC)=031116 031115
C(E)=031116 031115
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031117 031117 0 0 312000033466 0 031116031115
IT1 031117 0 0 0 312000033466 0 031116031115
AT3 031117 0 0 0 000000033466 0 312000033466
AT6 031117 033466 0 0 000000033466 0 312000033466
FT0 031117 033466 0 0 031116031115 0 312000033466
FT1A 031117 033466 0 0 031116031115 0 031116031115
FT2 031117 033466 0 0 0 0 031116031115
FT2RQ 031117 033466 0 0 031116031115 0 031116031115
FT3 031117 033466 0 0 031116031115 0 031116031115
FT9 031120 033466 0 0 031116031115 0 031116031115
ET0 031121 033466 0 0 0 0 031116031115
ST1A 031121 033466 0 0 0 0 031116031115
ST9 031121 033466 0 0 0 0 031116031115
*031121 JUMPA 0,031122
INITIAL
C(AC)=031116 031115
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031121 031121 0 0 324000031122 0 000000031122
IT1 031121 0 0 0 324000031122 0 000000031122
AT3 031121 0 0 0 000000031122 0 324000031122
AT6 031121 031122 0 0 000000031122 0 324000031122
FT1A 031121 031122 0 0 000000031122 0 000000031122
FT2 031121 031122 0 0 0 0 000000031122
FT2RQ 031121 031122 0 0 031116031115 0 000000031122
FT3 031121 031122 0 0 031116031115 0 000000031122
FT9 031122 031122 0 0 031116031115 0 000000031122
ET0 031122 031122 0 0 031116031115 0 000000031122
ST1A 031122 031122 0 0 031116031115 0 000000031122
ST9 031122 031122 0 0 031116031115 0 000000031122
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 46
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0203
*031122 SETZ 0,000000
INITIAL
C(AC)=031116 031115
C(E)=031116 031115
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031122 031122 0 0 400000000000 0 0
IT1 031122 0 0 0 400000000000 0 0
AT3 031122 0 0 0 0 0 400000000000
AT6 031122 0 0 0 0 0 400000000000
FT1A 031122 0 0 0 0 0 0
FT9 031123 0 0 0 0 0 0
ET0 031123 0 0 0 0 0 0
ST1 031123 0 0 0 0 0 0
ST2 031123 0 0 0 0 0 0
ST9 031123 0 0 0 0 0 0
*031123 SETOM 0,031125
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031123 031123 0 0 476000031125 0 000000031125
IT1 031123 0 0 0 476000031125 0 000000031125
AT3 031123 0 0 0 000000031125 0 476000031125
AT6 031123 031125 0 0 000000031125 0 476000031125
FT1A 031123 031125 0 0 000000031125 0 000000031125
FT9 031124 031125 0 0 000000031125 0 000000031125
ET0 031124 031125 0 0 777777777777 0 000000031125
ST6 031124 031125 0 0 777777777777 0 000000031125
ST6A 031124 031125 0 0 777777777777 0 000000031125
ST9 031124 031125 0 0 777777777777 0 000000031125
*031124 JSA 0,031125
INITIAL
C(AC)=000000 000000
C(E)=266000 031125
FINAL
C(AC)=031125 031125
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031124 031124 0 0 266000031125 0 0
IT1 031124 0 0 0 266000031125 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 47
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0204
AT3 031124 0 0 0 000000031125 0 266000031125
AT6 031124 031125 0 0 000000031125 0 266000031125
FT1A 031124 031125 0 0 000000031125 0 000000031125
FT2 031124 031125 0 0 0 0 000000031125
FT2RQ 031124 031125 0 0 0 0 000000031125
FT3 031124 031125 0 0 0 0 000000031125
FT9 031125 031125 0 0 0 0 000000031125
ET0 031125 031125 0 0 000000031125 0 0
ET1 031125 031125 0 0 031125031125 0 0
ET2 031126 031125 0 0 031125031125 0 0
ST1 031126 031125 0 0 031125031125 0 0
ST2 031126 031125 0 0 0 0 0
ST3 031126 031125 0 0 0 0 0
ST6 031126 031125 0 0 0 0 0
ST6A 031126 031125 0 0 0 0 0
ST9 031126 031125 0 0 0 0 0
*031126 SKIPE 0,031125
INITIAL
C(AC)=031125 031125
C(E)=000000 000000
FINAL
C(AC)=031125 031125
TIME PC MA SC FE AR MQ BR
IT0 031126 031126 0 0 332000031125 0 0
IT1 031126 0 0 0 332000031125 0 0
AT3 031126 0 0 0 000000031125 0 332000031125
AT6 031126 031125 0 0 000000031125 0 332000031125
FT0 031126 031125 0 0 0 0 332000031125
FT1A 031126 031125 0 0 0 0 0
FT9 031127 031125 0 0 0 0 0
ET0 031130 031125 0 0 0 0 0
ST1A 031130 031125 0 0 0 0 0
ST9 031130 031125 0 0 0 0 0
*031130 JUMPA 0,031131
INITIAL
C(AC)=031125 031125
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031130 031130 0 0 324000031131 0 000000031131
IT1 031130 0 0 0 324000031131 0 000000031131
AT3 031130 0 0 0 000000031131 0 324000031131
AT6 031130 031131 0 0 000000031131 0 324000031131
FT1A 031130 031131 0 0 000000031131 0 000000031131
FT2 031130 031131 0 0 0 0 000000031131
FT2RQ 031130 031131 0 0 031125031125 0 000000031131
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 48
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0205
FT3 031130 031131 0 0 031125031125 0 000000031131
FT9 031131 031131 0 0 031125031125 0 000000031131
ET0 031131 031131 0 0 031125031125 0 000000031131
ST1A 031131 031131 0 0 031125031125 0 000000031131
ST9 031131 031131 0 0 031125031125 0 000000031131
*031131 SETOB 0,000001
INITIAL
C(AC)=031125 031125
C(E)=000000 031077
FINAL
C(AC)=777777 777777
C(E)=000000 031077
TIME PC MA SC FE AR MQ BR
IT0 031131 031131 0 0 477000000001 0 000000000001
IT1 031131 0 0 0 477000000001 0 000000000001
AT3 031131 0 0 0 000000000001 0 477000000001
AT6 031131 000001 0 0 000000000001 0 477000000001
FT1A 031131 000001 0 0 000000000001 0 000000000001
FT9 031132 000001 0 0 000000000001 0 000000000001
ET0 031132 000001 0 0 777777777777 0 000000000001
ST1 031132 000001 0 0 777777777777 0 000000000001
ST2 031132 000001 0 0 777777777777 0 000000000001
ST6 031132 000001 0 0 777777777777 0 000000000001
ST6A 031132 000001 0 0 777777777777 0 000000000001
ST9 031132 000001 0 0 777777777777 0 000000000001
*031132 SETZM 0,031134
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031132 031132 0 0 402000031134 0 000000031134
IT1 031132 0 0 0 402000031134 0 000000031134
AT3 031132 0 0 0 000000031134 0 402000031134
AT6 031132 031134 0 0 000000031134 0 402000031134
FT1A 031132 031134 0 0 000000031134 0 000000031134
FT9 031133 031134 0 0 000000031134 0 000000031134
ET0 031133 031134 0 0 0 0 000000031134
ST6 031133 031134 0 0 0 0 000000031134
ST6A 031133 031134 0 0 0 0 000000031134
ST9 031133 031134 0 0 0 0 000000031134
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 49
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0206
*031133 JSA 0,031134
INITIAL
C(AC)=777777 777777
C(E)=266000 031134
FINAL
C(AC)=031134 031134
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031133 031133 0 0 266000031134 0 777777777777
IT1 031133 0 0 0 266000031134 0 777777777777
AT3 031133 0 0 0 000000031134 0 266000031134
AT6 031133 031134 0 0 000000031134 0 266000031134
FT1A 031133 031134 0 0 000000031134 0 000000031134
FT2 031133 031134 0 0 0 0 000000031134
FT2RQ 031133 031134 0 0 777777777777 0 000000031134
FT3 031133 031134 0 0 777777777777 0 000000031134
FT9 031134 031134 0 0 777777777777 0 000000031134
ET0 031134 031134 0 0 777777031134 0 777777777777
ET1 031134 031134 0 0 031134031134 0 777777777777
ET2 031135 031134 0 0 031134031134 0 777777777777
ST1 031135 031134 0 0 031134031134 0 777777777777
ST2 031135 031134 0 0 777777777777 0 777777777777
ST3 031135 031134 0 0 777777777777 0 777777777777
ST6 031135 031134 0 0 777777777777 0 777777777777
ST6A 031135 031134 0 0 777777777777 0 777777777777
ST9 031135 031134 0 0 777777777777 0 777777777777
*031135 CAME 1,031134
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031135 031135 0 0 312040031134 0 777777777777
IT1 031135 0 0 0 312040031134 0 777777777777
AT3 031135 0 0 0 000000031134 0 312040031134
AT6 031135 031134 0 0 000000031134 0 312040031134
FT0 031135 031134 0 0 777777777777 0 312040031134
FT1A 031135 031134 0 0 777777777777 0 777777777777
FT2 031135 031134 0 0 0 0 777777777777
FT2RQ 031135 031134 0 0 777777777777 0 777777777777
FT3 031135 031134 0 0 777777777777 0 777777777777
FT9 031136 031134 0 0 777777777777 0 777777777777
ET0 031137 031134 0 0 0 0 777777777777
ST1A 031137 031134 0 0 0 0 777777777777
ST9 031137 031134 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 50
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0207
*031137 JUMPA 0,031140
INITIAL
C(AC)=031134 031134
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
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 031134031134 0 000000031140
FT3 031137 031140 0 0 031134031134 0 000000031140
FT9 031140 031140 0 0 031134031134 0 000000031140
ET0 031140 031140 0 0 031134031134 0 000000031140
ST1A 031140 031140 0 0 031134031134 0 000000031140
ST9 031140 031140 0 0 031134031134 0 000000031140
*031140 MOVEI 0,777777
INITIAL
C(AC)=031134 031134
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031140 031140 0 0 201000777777 0 000000777777
IT1 031140 0 0 0 201000777777 0 000000777777
AT3 031140 0 0 0 000000777777 0 201000777777
AT6 031140 777777 0 0 000000777777 0 201000777777
FT1A 031140 777777 0 0 000000777777 0 000000777777
FT9 031141 777777 0 0 000000777777 0 000000777777
ET0 031141 777777 0 0 000000777777 0 000000777777
ST1 031141 777777 0 0 000000777777 0 000000777777
ST2 031141 777777 0 0 000000777777 0 000000777777
ST9 031141 777777 0 0 000000777777 0 000000777777
*031141 JSA 0,031142
INITIAL
C(AC)=000000 777777
C(E)=266000 031142
FINAL
C(AC)=031142 031142
C(E)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031141 031141 0 0 266000031142 0 000000777777
IT1 031141 0 0 0 266000031142 0 000000777777
AT3 031141 0 0 0 000000031142 0 266000031142
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 51
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0208
AT6 031141 031142 0 0 000000031142 0 266000031142
FT1A 031141 031142 0 0 000000031142 0 000000031142
FT2 031141 031142 0 0 0 0 000000031142
FT2RQ 031141 031142 0 0 000000777777 0 000000031142
FT3 031141 031142 0 0 000000777777 0 000000031142
FT9 031142 031142 0 0 000000777777 0 000000031142
ET0 031142 031142 0 0 000000031142 0 000000777777
ET1 031142 031142 0 0 031142031142 0 000000777777
ET2 031143 031142 0 0 031142031142 0 000000777777
ST1 031143 031142 0 0 031142031142 0 000000777777
ST2 031143 031142 0 0 000000777777 0 000000777777
ST3 031143 031142 0 0 000000777777 0 000000777777
ST6 031143 031142 0 0 000000777777 0 000000777777
ST6A 031143 031142 0 0 000000777777 0 000000777777
ST9 031143 031142 0 0 000000777777 0 000000777777
*031143 MOVE 1,031142
INITIAL
C(AC)=777777 777777
C(E)=000000 777777
FINAL
C(AC)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031143 031143 0 0 200040031142 0 000000777777
IT1 031143 0 0 0 200040031142 0 000000777777
AT3 031143 0 0 0 000000031142 0 200040031142
AT6 031143 031142 0 0 000000031142 0 200040031142
FT0 031143 031142 0 0 000000777777 0 200040031142
FT1A 031143 031142 0 0 000000777777 0 000000777777
FT9 031144 031142 0 0 000000777777 0 000000777777
ET0 031144 031142 0 0 000000777777 0 000000777777
ST1 031144 031142 0 0 000000777777 0 000000777777
ST2 031144 031142 0 0 000000777777 0 000000777777
ST9 031144 031142 0 0 000000777777 0 000000777777
*031144 CAIE 1,777777
INITIAL
C(AC)=000000 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031144 031144 0 0 302040777777 0 000000777777
IT1 031144 0 0 0 302040777777 0 000000777777
AT3 031144 0 0 0 000000777777 0 302040777777
AT6 031144 777777 0 0 000000777777 0 302040777777
FT1A 031144 777777 0 0 000000777777 0 000000777777
FT2 031144 777777 0 0 0 0 000000777777
FT2RQ 031144 777777 0 0 000000777777 0 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 52
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0209
FT3 031144 777777 0 0 000000777777 0 000000777777
FT9 031145 777777 0 0 000000777777 0 000000777777
ET0 031146 777777 0 0 0 0 000000777777
ST1A 031146 777777 0 0 0 0 000000777777
ST9 031146 777777 0 0 0 0 000000777777
*031146 JUMPA 0,031147
INITIAL
C(AC)=031142 031142
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031146 031146 0 0 324000031147 0 000000031147
IT1 031146 0 0 0 324000031147 0 000000031147
AT3 031146 0 0 0 000000031147 0 324000031147
AT6 031146 031147 0 0 000000031147 0 324000031147
FT1A 031146 031147 0 0 000000031147 0 000000031147
FT2 031146 031147 0 0 0 0 000000031147
FT2RQ 031146 031147 0 0 031142031142 0 000000031147
FT3 031146 031147 0 0 031142031142 0 000000031147
FT9 031147 031147 0 0 031142031142 0 000000031147
ET0 031147 031147 0 0 031142031142 0 000000031147
ST1A 031147 031147 0 0 031142031142 0 000000031147
ST9 031147 031147 0 0 031142031142 0 000000031147
*031147 SETOM 0,000001
INITIAL
C(AC)=031142 031142
C(E)=000000 777777
FINAL
C(E)=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031147 031147 0 0 476000000001 0 000000000001
IT1 031147 0 0 0 476000000001 0 000000000001
AT3 031147 0 0 0 000000000001 0 476000000001
AT6 031147 000001 0 0 000000000001 0 476000000001
FT1A 031147 000001 0 0 000000000001 0 000000000001
FT9 031150 000001 0 0 000000000001 0 000000000001
ET0 031150 000001 0 0 777777777777 0 000000000001
ST6 031150 000001 0 0 777777777777 0 000000000001
ST6A 031150 000001 0 0 777777777777 0 000000000001
ST9 031150 000001 0 0 777777777777 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 53
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0210
*031150 JSA 0,031151
INITIAL
C(AC)=031142 031142
C(E)=266000 031151
FINAL
C(AC)=031151 031151
C(E)=031142 031142
TIME PC MA SC FE AR MQ BR
IT0 031150 031150 0 0 266000031151 0 031142031142
IT1 031150 0 0 0 266000031151 0 031142031142
AT3 031150 0 0 0 000000031151 0 266000031151
AT6 031150 031151 0 0 000000031151 0 266000031151
FT1A 031150 031151 0 0 000000031151 0 000000031151
FT2 031150 031151 0 0 0 0 000000031151
FT2RQ 031150 031151 0 0 031142031142 0 000000031151
FT3 031150 031151 0 0 031142031142 0 000000031151
FT9 031151 031151 0 0 031142031142 0 000000031151
ET0 031151 031151 0 0 031142031151 0 031142031142
ET1 031151 031151 0 0 031151031151 0 031142031142
ET2 031152 031151 0 0 031151031151 0 031142031142
ST1 031152 031151 0 0 031151031151 0 031142031142
ST2 031152 031151 0 0 031142031142 0 031142031142
ST3 031152 031151 0 0 031142031142 0 031142031142
ST6 031152 031151 0 0 031142031142 0 031142031142
ST6A 031152 031151 0 0 031142031142 0 031142031142
ST9 031152 031151 0 0 031142031142 0 031142031142
*031152 CAME 1,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031152 031152 0 0 312040033462 0 777777777777
IT1 031152 0 0 0 312040033462 0 777777777777
AT3 031152 0 0 0 000000033462 0 312040033462
AT6 031152 033462 0 0 000000033462 0 312040033462
FT0 031152 033462 0 0 777777777777 0 312040033462
FT1A 031152 033462 0 0 777777777777 0 777777777777
FT2 031152 033462 0 0 0 0 777777777777
FT2RQ 031152 033462 0 0 777777777777 0 777777777777
FT3 031152 033462 0 0 777777777777 0 777777777777
FT9 031153 033462 0 0 777777777777 0 777777777777
ET0 031154 033462 0 0 0 0 777777777777
ST1A 031154 033462 0 0 0 0 777777777777
ST9 031154 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 54
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0211
*031154 JUMPA 0,031155
INITIAL
C(AC)=031151 031151
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031154 031154 0 0 324000031155 0 000000031155
IT1 031154 0 0 0 324000031155 0 000000031155
AT3 031154 0 0 0 000000031155 0 324000031155
AT6 031154 031155 0 0 000000031155 0 324000031155
FT1A 031154 031155 0 0 000000031155 0 000000031155
FT2 031154 031155 0 0 0 0 000000031155
FT2RQ 031154 031155 0 0 031151031151 0 000000031155
FT3 031154 031155 0 0 031151031151 0 000000031155
FT9 031155 031155 0 0 031151031151 0 000000031155
ET0 031155 031155 0 0 031151031151 0 000000031155
ST1A 031155 031155 0 0 031151031151 0 000000031155
ST9 031155 031155 0 0 031151031151 0 000000031155
*031155 MOVE 0,033467
INITIAL
C(AC)=031151 031151
C(E)=254000 031161
FINAL
C(AC)=254000 031161
TIME PC MA SC FE AR MQ BR
IT0 031155 031155 0 0 200000033467 0 254000031161
IT1 031155 0 0 0 200000033467 0 254000031161
AT3 031155 0 0 0 000000033467 0 200000033467
AT6 031155 033467 0 0 000000033467 0 200000033467
FT0 031155 033467 0 0 254000031161 0 200000033467
FT1A 031155 033467 0 0 254000031161 0 254000031161
FT9 031156 033467 0 0 254000031161 0 254000031161
ET0 031156 033467 0 0 254000031161 0 254000031161
ST1 031156 033467 0 0 254000031161 0 254000031161
ST2 031156 033467 0 0 254000031161 0 254000031161
ST9 031156 033467 0 0 254000031161 0 254000031161
*031156 MOVSI 1,031160
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=031160 000000
TIME PC MA SC FE AR MQ BR
IT0 031156 031156 0 0 205040031160 0 000000031160
IT1 031156 0 0 0 205040031160 0 000000031160
AT3 031156 0 0 0 000000031160 0 205040031160
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 55
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0212
AT6 031156 031160 0 0 000000031160 0 205040031160
FT1A 031156 031160 0 0 000000031160 0 000000031160
FT9 031157 031160 0 0 000000031160 0 000000031160
ET0 031157 031160 0 0 031160000000 0 000000031160
ST1 031157 031160 0 0 031160000000 0 000000031160
ST2 031157 031160 0 0 031160000000 0 000000031160
ST9 031157 031160 0 0 031160000000 0 000000031160
*031157 JRA 1,031160
INITIAL
C(AC)=031160 000000
C(E)=334000 000000
FINAL
C(AC)=334000 000000
C(E)=334000 000000
TIME PC MA SC FE AR MQ BR
IT0 031157 031157 0 0 267040031160 0 000000031160
IT1 031157 0 0 0 267040031160 0 000000031160
AT3 031157 0 0 0 000000031160 0 267040031160
AT6 031157 031160 0 0 000000031160 0 267040031160
FT1A 031157 031160 0 0 000000031160 0 000000031160
FT2 031157 031160 0 0 0 0 000000031160
FT2RQ 031157 031160 0 0 031160000000 0 000000031160
FT3 031157 031160 0 0 031160000000 0 000000031160
FT6 031157 031160 0 0 000000031160 0 000000031160
FT7 031157 031160 0 0 334000000000 000000031160 000000031160
FT4RQ 031157 031160 0 0 334000000000 000000031160 000000031160
FT4A 031157 031160 0 0 000000031160 334000000000 000000031160
FT9 031160 031160 0 0 000000031160 334000000000 000000031160
ET0 031160 031160 0 0 000000031160 334000000000 000000031160
ET1 031160 031160 0 0 334000000000 334000000000 000000031160
ET2 031160 031160 0 0 334000000000 334000000000 000000031160
ST1 031160 031160 0 0 334000000000 334000000000 000000031160
ST2 031160 031160 0 0 334000000000 334000000000 000000031160
ST9 031160 031160 0 0 334000000000 334000000000 000000031160
*031160 SKIPA 0,000000
INITIAL
C(AC)=254000 031161
C(E)=254000 031161
FINAL
C(AC)=254000 031161
TIME PC MA SC FE AR MQ BR
IT0 031160 031160 0 0 334000000000 0 254000031161
IT1 031160 0 0 0 334000000000 0 254000031161
AT3 031160 0 0 0 0 0 334000000000
AT6 031160 0 0 0 0 0 334000000000
FT0 031160 0 0 0 254000031161 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 56
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0213
FT1A 031160 0 0 0 254000031161 0 254000031161
FT9 031161 0 0 0 254000031161 0 254000031161
ET0 031162 0 0 0 254000031161 0 254000031161
ST1A 031162 0 0 0 254000031161 0 254000031161
ST9 031162 0 0 0 254000031161 0 254000031161
*031162 JUMPA 0,031163
INITIAL
C(AC)=254000 031161
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031162 031162 0 0 324000031163 0 000000031163
IT1 031162 0 0 0 324000031163 0 000000031163
AT3 031162 0 0 0 000000031163 0 324000031163
AT6 031162 031163 0 0 000000031163 0 324000031163
FT1A 031162 031163 0 0 000000031163 0 000000031163
FT2 031162 031163 0 0 0 0 000000031163
FT2RQ 031162 031163 0 0 254000031161 0 000000031163
FT3 031162 031163 0 0 254000031161 0 000000031163
FT9 031163 031163 0 0 254000031161 0 000000031163
ET0 031163 031163 0 0 254000031161 0 000000031163
ST1A 031163 031163 0 0 254000031161 0 000000031163
ST9 031163 031163 0 0 254000031161 0 000000031163
*031163 MOVSI 0,031166
INITIAL
C(AC)=254000 031161
FINAL
C(AC)=031166 000000
TIME PC MA SC FE AR MQ BR
IT0 031163 031163 0 0 205000031166 0 000000031166
IT1 031163 0 0 0 205000031166 0 000000031166
AT3 031163 0 0 0 000000031166 0 205000031166
AT6 031163 031166 0 0 000000031166 0 205000031166
FT1A 031163 031166 0 0 000000031166 0 000000031166
FT9 031164 031166 0 0 000000031166 0 000000031166
ET0 031164 031166 0 0 031166000000 0 000000031166
ST1 031164 031166 0 0 031166000000 0 000000031166
ST2 031164 031166 0 0 031166000000 0 000000031166
ST9 031164 031166 0 0 031166000000 0 000000031166
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 57
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0214
*031164 JRA 0,031165
INITIAL
C(AC)=031166 000000
C(E)=254200 031167
FINAL
C(AC)=254200 031167
C(E)=254200 031167
TIME PC MA SC FE AR MQ BR
IT0 031164 031164 0 0 267000031165 0 000000031165
IT1 031164 0 0 0 267000031165 0 000000031165
AT3 031164 0 0 0 000000031165 0 267000031165
AT6 031164 031165 0 0 000000031165 0 267000031165
FT1A 031164 031165 0 0 000000031165 0 000000031165
FT2 031164 031165 0 0 0 0 000000031165
FT2RQ 031164 031165 0 0 031166000000 0 000000031165
FT3 031164 031165 0 0 031166000000 0 000000031165
FT6 031164 031165 0 0 000000031166 0 000000031165
FT7 031164 031166 0 0 254200031167 000000031166 000000031165
FT4RQ 031164 031166 0 0 254200031167 000000031166 000000031165
FT4A 031164 031166 0 0 000000031166 254200031167 000000031165
FT9 031165 031166 0 0 000000031166 254200031167 000000031165
ET0 031165 031166 0 0 000000031165 254200031167 000000031165
ET1 031165 031165 0 0 254200031167 254200031167 000000031165
ET2 031165 031165 0 0 254200031167 254200031167 000000031165
ST1 031165 031165 0 0 254200031167 254200031167 000000031165
ST2 031165 031165 0 0 254200031167 254200031167 000000031165
ST9 031165 031165 0 0 254200031167 254200031167 000000031165
*031165 SKIPA 0,000000
INITIAL
C(AC)=254200 031167
C(E)=254200 031167
FINAL
C(AC)=254200 031167
TIME PC MA SC FE AR MQ BR
IT0 031165 031165 0 0 334000000000 0 254200031167
IT1 031165 0 0 0 334000000000 0 254200031167
AT3 031165 0 0 0 0 0 334000000000
AT6 031165 0 0 0 0 0 334000000000
FT0 031165 0 0 0 254200031167 0 334000000000
FT1A 031165 0 0 0 254200031167 0 254200031167
FT9 031166 0 0 0 254200031167 0 254200031167
ET0 031167 0 0 0 254200031167 0 254200031167
ST1A 031167 0 0 0 254200031167 0 254200031167
ST9 031167 0 0 0 254200031167 0 254200031167
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 58
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0215
*031167 JUMPA 0,031170
INITIAL
C(AC)=254200 031167
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 254200031167 0 000000031170
FT3 031167 031170 0 0 254200031167 0 000000031170
FT9 031170 031170 0 0 254200031167 0 000000031170
ET0 031170 031170 0 0 254200031167 0 000000031170
ST1A 031170 031170 0 0 254200031167 0 000000031170
ST9 031170 031170 0 0 254200031167 0 000000031170
*031170 SETZB 0,000001
INITIAL
C(AC)=254200 031167
C(E)=334000 000000
FINAL
C(AC)=000000 000000
C(E)=334000 000000
TIME PC MA SC FE AR MQ BR
IT0 031170 031170 0 0 403000000001 0 000000000001
IT1 031170 0 0 0 403000000001 0 000000000001
AT3 031170 0 0 0 000000000001 0 403000000001
AT6 031170 000001 0 0 000000000001 0 403000000001
FT1A 031170 000001 0 0 000000000001 0 000000000001
FT9 031171 000001 0 0 000000000001 0 000000000001
ET0 031171 000001 0 0 0 0 000000000001
ST1 031171 000001 0 0 0 0 000000000001
ST2 031171 000001 0 0 0 0 000000000001
ST6 031171 000001 0 0 0 0 000000000001
ST6A 031171 000001 0 0 0 0 000000000001
ST9 031171 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 59
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0216
*031171 JRA 0,031173
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 031171 031171 0 0 267000031173 0 000000031173
IT1 031171 0 0 0 267000031173 0 000000031173
AT3 031171 0 0 0 000000031173 0 267000031173
AT6 031171 031173 0 0 000000031173 0 267000031173
FT1A 031171 031173 0 0 000000031173 0 000000031173
FT2 031171 031173 0 0 0 0 000000031173
FT2RQ 031171 031173 0 0 0 0 000000031173
FT3 031171 031173 0 0 0 0 000000031173
FT6 031171 031173 0 0 0 0 000000031173
FT7 031171 0 0 0 0 0 000000031173
FT4RQ 031171 0 0 0 0 0 000000031173
FT4A 031171 0 0 0 0 0 000000031173
FT9 031172 0 0 0 0 0 000000031173
ET0 031172 0 0 0 000000031173 0 000000031173
ET1 031172 031173 0 0 0 0 000000031173
ET2 031173 031173 0 0 0 0 000000031173
ST1 031173 031173 0 0 0 0 000000031173
ST2 031173 031173 0 0 0 0 000000031173
ST9 031173 031173 0 0 0 0 000000031173
*031173 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 031173 031173 0 0 332000000001 0 0
IT1 031173 0 0 0 332000000001 0 0
AT3 031173 0 0 0 000000000001 0 332000000001
AT6 031173 000001 0 0 000000000001 0 332000000001
FT0 031173 000001 0 0 0 0 332000000001
FT1A 031173 000001 0 0 0 0 0
FT9 031174 000001 0 0 0 0 0
ET0 031175 000001 0 0 0 0 0
ST1A 031175 000001 0 0 0 0 0
ST9 031175 000001 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 60
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0217
*031175 JUMPA 0,031176
INITIAL
C(AC)=000000 000000
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 0 0 000000031176
FT3 031175 031176 0 0 0 0 000000031176
FT9 031176 031176 0 0 0 0 000000031176
ET0 031176 031176 0 0 0 0 000000031176
ST1A 031176 031176 0 0 0 0 000000031176
ST9 031176 031176 0 0 0 0 000000031176
*031176 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 031176 031176 0 0 400000000000 0 0
IT1 031176 0 0 0 400000000000 0 0
AT3 031176 0 0 0 0 0 400000000000
AT6 031176 0 0 0 0 0 400000000000
FT1A 031176 0 0 0 0 0 0
FT9 031177 0 0 0 0 0 0
ET0 031177 0 0 0 0 0 0
ST1 031177 0 0 0 0 0 0
ST2 031177 0 0 0 0 0 0
ST9 031177 0 0 0 0 0 0
*031177 JRA 0,031200
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 031177 031177 0 0 267000031200 0 000000031200
IT1 031177 0 0 0 267000031200 0 000000031200
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 61
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0218
AT3 031177 0 0 0 000000031200 0 267000031200
AT6 031177 0 0 0 000000031200 0 267000031200
FT1A 031177 0 0 0 000000031200 0 000000031200
FT2 031177 0 0 0 0 0 000000031200
FT2RQ 031177 0 0 0 0 0 000000031200
FT3 031177 0 0 0 0 0 000000031200
FT6 031177 0 0 0 0 0 000000031200
FT7 031177 0 0 0 0 0 000000031200
FT4RQ 031177 0 0 0 0 0 000000031200
FT4A 031177 0 0 0 0 0 000000031200
FT9 0 0 0 0 0 0 000000031200
ET0 0 0 0 0 000000031200 0 000000031200
ET1 0 0 0 0 0 0 000000031200
ET2 0 0 0 0 0 0 000000031200
ST1 0 0 0 0 0 0 000000031200
ST2 0 0 0 0 0 0 000000031200
ST9 0 0 0 0 0 0 000000031200
*031200 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 0 0 0 0 332000000000 0 0
IT1 0 0 0 0 332000000000 0 0
AT3 0 0 0 0 0 0 332000000000
AT6 0 0 0 0 0 0 332000000000
FT0 0 0 0 0 0 0 332000000000
FT1A 0 0 0 0 0 0 0
FT9 031201 0 0 0 0 0 0
ET0 031202 0 0 0 0 0 0
ST1A 031202 0 0 0 0 0 0
ST9 031202 0 0 0 0 0 0
*031202 JUMPA 0,031203
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031202 031202 0 0 324000031203 0 000000031203
IT1 031202 0 0 0 324000031203 0 000000031203
AT3 031202 0 0 0 000000031203 0 324000031203
AT6 031202 031203 0 0 000000031203 0 324000031203
FT1A 031202 031203 0 0 000000031203 0 000000031203
FT2 031202 031203 0 0 0 0 000000031203
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 62
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0219
FT2RQ 031202 031203 0 0 0 0 000000031203
FT3 031202 031203 0 0 0 0 000000031203
FT9 031203 031203 0 0 0 0 000000031203
ET0 031203 031203 0 0 0 0 000000031203
ST1A 031203 031203 0 0 0 0 000000031203
ST9 031203 031203 0 0 0 0 000000031203
*031203 MOVE 0,033470
INITIAL
C(AC)=000000 000000
C(E)=000001 000002
FINAL
C(AC)=000001 000002
TIME PC MA SC FE AR MQ BR
IT0 031203 031203 0 0 200000033470 0 000001000002
IT1 031203 0 0 0 200000033470 0 000001000002
AT3 031203 0 0 0 000000033470 0 200000033470
AT6 031203 033470 0 0 000000033470 0 200000033470
FT0 031203 033470 0 0 000001000002 0 200000033470
FT1A 031203 033470 0 0 000001000002 0 000001000002
FT9 031204 033470 0 0 000001000002 0 000001000002
ET0 031204 033470 0 0 000001000002 0 000001000002
ST1 031204 033470 0 0 000001000002 0 000001000002
ST2 031204 033470 0 0 000001000002 0 000001000002
ST9 031204 033470 0 0 000001000002 0 000001000002
*031204 MOVEI 1,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031204 031204 0 0 201040000001 0 000000000001
IT1 031204 0 0 0 201040000001 0 000000000001
AT3 031204 0 0 0 000000000001 0 201040000001
AT6 031204 000001 0 0 000000000001 0 201040000001
FT1A 031204 000001 0 0 000000000001 0 000000000001
FT9 031205 000001 0 0 000000000001 0 000000000001
ET0 031205 000001 0 0 000000000001 0 000000000001
ST1 031205 000001 0 0 000000000001 0 000000000001
ST2 031205 000001 0 0 000000000001 0 000000000001
ST9 031205 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 63
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0220
*031205 MOVEI 2,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031205 031205 0 0 201100000002 0 000000000002
IT1 031205 0 0 0 201100000002 0 000000000002
AT3 031205 0 0 0 000000000002 0 201100000002
AT6 031205 000002 0 0 000000000002 0 201100000002
FT1A 031205 000002 0 0 000000000002 0 000000000002
FT9 031206 000002 0 0 000000000002 0 000000000002
ET0 031206 000002 0 0 000000000002 0 000000000002
ST1 031206 000002 0 0 000000000002 0 000000000002
ST2 031206 000002 0 0 000000000002 0 000000000002
ST9 031206 000002 0 0 000000000002 0 000000000002
*031206 JRA 0,031207
INITIAL
C(AC)=000001 000002
C(E)=000000 000001
FINAL
C(AC)=000000 000001
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031206 031206 0 0 267000031207 0 000000031207
IT1 031206 0 0 0 267000031207 0 000000031207
AT3 031206 0 0 0 000000031207 0 267000031207
AT6 031206 031207 0 0 000000031207 0 267000031207
FT1A 031206 031207 0 0 000000031207 0 000000031207
FT2 031206 031207 0 0 0 0 000000031207
FT2RQ 031206 031207 0 0 000001000002 0 000000031207
FT3 031206 031207 0 0 000001000002 0 000000031207
FT6 031206 031207 0 0 000002000001 0 000000031207
FT7 031206 000001 0 0 000000000001 000002000001 000000031207
FT4RQ 031206 000001 0 0 000000000001 000002000001 000000031207
FT4A 031206 000001 0 0 000002000001 000000000001 000000031207
FT9 031207 000001 0 0 000002000001 000000000001 000000031207
ET0 031207 000001 0 0 000000031207 000000000001 000000031207
ET1 031207 031207 0 0 000000000001 000000000001 000000031207
ET2 031207 031207 0 0 000000000001 000000000001 000000031207
ST1 031207 031207 0 0 000000000001 000000000001 000000031207
ST2 031207 031207 0 0 000000000001 000000000001 000000031207
ST9 031207 031207 0 0 000000000001 000000000001 000000031207
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 64
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0221
*031207 CAIE 0,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031207 031207 0 0 302000000001 0 000000000001
IT1 031207 0 0 0 302000000001 0 000000000001
AT3 031207 0 0 0 000000000001 0 302000000001
AT6 031207 000001 0 0 000000000001 0 302000000001
FT1A 031207 000001 0 0 000000000001 0 000000000001
FT2 031207 000001 0 0 0 0 000000000001
FT2RQ 031207 000001 0 0 000000000001 0 000000000001
FT3 031207 000001 0 0 000000000001 0 000000000001
FT9 031210 000001 0 0 000000000001 0 000000000001
ET0 031211 000001 0 0 0 0 000000000001
ST1A 031211 000001 0 0 0 0 000000000001
ST9 031211 000001 0 0 0 0 000000000001
*031211 JUMPA 0,031212
INITIAL
C(AC)=000000 000001
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 000000000001 0 000000031212
FT3 031211 031212 0 0 000000000001 0 000000031212
FT9 031212 031212 0 0 000000000001 0 000000031212
ET0 031212 031212 0 0 000000000001 0 000000031212
ST1A 031212 031212 0 0 000000000001 0 000000031212
ST9 031212 031212 0 0 000000000001 0 000000031212
*031212 HRRZI 0,033471
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 033471
TIME PC MA SC FE AR MQ BR
IT0 031212 031212 0 0 551000033471 0 000000033471
IT1 031212 0 0 0 551000033471 0 000000033471
AT3 031212 0 0 0 000000033471 0 551000033471
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 65
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0222
AT6 031212 033471 0 0 000000033471 0 551000033471
FT1A 031212 033471 0 0 000000033471 0 000000033471
FT9 031213 033471 0 0 000000033471 0 000000033471
ET0 031213 033471 0 0 000000033471 0 000000033471
ST1 031213 033471 0 0 000000033471 0 000000033471
ST2 031213 033471 0 0 000000033471 0 000000033471
ST9 031213 033471 0 0 000000033471 0 000000033471
*031213 JRA 0,031214
INITIAL
C(AC)=000000 033471
C(E)=000000 033471
FINAL
C(AC)=000000 033471
C(E)=000000 033471
TIME PC MA SC FE AR MQ BR
IT0 031213 031213 0 0 267000031214 0 000000031214
IT1 031213 0 0 0 267000031214 0 000000031214
AT3 031213 0 0 0 000000031214 0 267000031214
AT6 031213 031214 0 0 000000031214 0 267000031214
FT1A 031213 031214 0 0 000000031214 0 000000031214
FT2 031213 031214 0 0 0 0 000000031214
FT2RQ 031213 031214 0 0 000000033471 0 000000031214
FT3 031213 031214 0 0 000000033471 0 000000031214
FT6 031213 031214 0 0 033471000000 0 000000031214
FT7 031213 0 0 0 000000033471 033471000000 000000031214
FT4RQ 031213 0 0 0 000000033471 033471000000 000000031214
FT4A 031213 0 0 0 033471000000 000000033471 000000031214
FT9 031214 0 0 0 033471000000 000000033471 000000031214
ET0 031214 0 0 0 000000031214 000000033471 000000031214
ET1 031214 031214 0 0 000000033471 000000033471 000000031214
ET2 031214 031214 0 0 000000033471 000000033471 000000031214
ST1 031214 031214 0 0 000000033471 000000033471 000000031214
ST2 031214 031214 0 0 000000033471 000000033471 000000031214
ST9 031214 031214 0 0 000000033471 000000033471 000000031214
*031214 CAIE 0,033471
INITIAL
C(AC)=000000 033471
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031214 031214 0 0 302000033471 0 000000033471
IT1 031214 0 0 0 302000033471 0 000000033471
AT3 031214 0 0 0 000000033471 0 302000033471
AT6 031214 033471 0 0 000000033471 0 302000033471
FT1A 031214 033471 0 0 000000033471 0 000000033471
FT2 031214 033471 0 0 0 0 000000033471
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 66
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0223
FT2RQ 031214 033471 0 0 000000033471 0 000000033471
FT3 031214 033471 0 0 000000033471 0 000000033471
FT9 031215 033471 0 0 000000033471 0 000000033471
ET0 031216 033471 0 0 0 0 000000033471
ST1A 031216 033471 0 0 0 0 000000033471
ST9 031216 033471 0 0 0 0 000000033471
*031216 JUMPA 0,031217
INITIAL
C(AC)=000000 033471
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031216 031216 0 0 324000031217 0 000000031217
IT1 031216 0 0 0 324000031217 0 000000031217
AT3 031216 0 0 0 000000031217 0 324000031217
AT6 031216 031217 0 0 000000031217 0 324000031217
FT1A 031216 031217 0 0 000000031217 0 000000031217
FT2 031216 031217 0 0 0 0 000000031217
FT2RQ 031216 031217 0 0 000000033471 0 000000031217
FT3 031216 031217 0 0 000000033471 0 000000031217
FT9 031217 031217 0 0 000000033471 0 000000031217
ET0 031217 031217 0 0 000000033471 0 000000031217
ST1A 031217 031217 0 0 000000033471 0 000000031217
ST9 031217 031217 0 0 000000033471 0 000000031217
*031217 HRLZI 0,033472
INITIAL
C(AC)=000000 033471
FINAL
C(AC)=033472 000000
TIME PC MA SC FE AR MQ BR
IT0 031217 031217 0 0 515000033472 0 000000033472
IT1 031217 0 0 0 515000033472 0 000000033472
AT3 031217 0 0 0 000000033472 0 515000033472
AT6 031217 033472 0 0 000000033472 0 515000033472
FT1A 031217 033472 0 0 000000033472 0 000000033472
FT9 031220 033472 0 0 000000033472 0 000000033472
ET0 031220 033472 0 0 033472000000 0 000000033472
ST1 031220 033472 0 0 033472000000 0 000000033472
ST2 031220 033472 0 0 033472000000 0 000000033472
ST9 031220 033472 0 0 033472000000 0 000000033472
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 67
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0224
*031220 JRA 0,031221
INITIAL
C(AC)=033472 000000
C(E)=135246 246135
FINAL
C(AC)=135246 246135
C(E)=135246 246135
TIME PC MA SC FE AR MQ BR
IT0 031220 031220 0 0 267000031221 0 000000031221
IT1 031220 0 0 0 267000031221 0 000000031221
AT3 031220 0 0 0 000000031221 0 267000031221
AT6 031220 031221 0 0 000000031221 0 267000031221
FT1A 031220 031221 0 0 000000031221 0 000000031221
FT2 031220 031221 0 0 0 0 000000031221
FT2RQ 031220 031221 0 0 033472000000 0 000000031221
FT3 031220 031221 0 0 033472000000 0 000000031221
FT6 031220 031221 0 0 000000033472 0 000000031221
FT7 031220 033472 0 0 135246246135 000000033472 000000031221
FT4RQ 031220 033472 0 0 135246246135 000000033472 000000031221
FT4A 031220 033472 0 0 000000033472 135246246135 000000031221
FT9 031221 033472 0 0 000000033472 135246246135 000000031221
ET0 031221 033472 0 0 000000031221 135246246135 000000031221
ET1 031221 031221 0 0 135246246135 135246246135 000000031221
ET2 031221 031221 0 0 135246246135 135246246135 000000031221
ST1 031221 031221 0 0 135246246135 135246246135 000000031221
ST2 031221 031221 0 0 135246246135 135246246135 000000031221
ST9 031221 031221 0 0 135246246135 135246246135 000000031221
*031221 CAME 0,033472
INITIAL
C(AC)=135246 246135
C(E)=135246 246135
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031221 031221 0 0 312000033472 0 135246246135
IT1 031221 0 0 0 312000033472 0 135246246135
AT3 031221 0 0 0 000000033472 0 312000033472
AT6 031221 033472 0 0 000000033472 0 312000033472
FT0 031221 033472 0 0 135246246135 0 312000033472
FT1A 031221 033472 0 0 135246246135 0 135246246135
FT2 031221 033472 0 0 0 0 135246246135
FT2RQ 031221 033472 0 0 135246246135 0 135246246135
FT3 031221 033472 0 0 135246246135 0 135246246135
FT9 031222 033472 0 0 135246246135 0 135246246135
ET0 031223 033472 0 0 0 0 135246246135
ST1A 031223 033472 0 0 0 0 135246246135
ST9 031223 033472 0 0 0 0 135246246135
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 68
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0225
*031223 JUMPA 0,031224
INITIAL
C(AC)=135246 246135
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031223 031223 0 0 324000031224 0 000000031224
IT1 031223 0 0 0 324000031224 0 000000031224
AT3 031223 0 0 0 000000031224 0 324000031224
AT6 031223 031224 0 0 000000031224 0 324000031224
FT1A 031223 031224 0 0 000000031224 0 000000031224
FT2 031223 031224 0 0 0 0 000000031224
FT2RQ 031223 031224 0 0 135246246135 0 000000031224
FT3 031223 031224 0 0 135246246135 0 000000031224
FT9 031224 031224 0 0 135246246135 0 000000031224
ET0 031224 031224 0 0 135246246135 0 000000031224
ST1A 031224 031224 0 0 135246246135 0 000000031224
ST9 031224 031224 0 0 135246246135 0 000000031224
*031224 HRLOI 0,031225
INITIAL
C(AC)=135246 246135
FINAL
C(AC)=031225 777777
TIME PC MA SC FE AR MQ BR
IT0 031224 031224 0 0 525000031225 0 000000031225
IT1 031224 0 0 0 525000031225 0 000000031225
AT3 031224 0 0 0 000000031225 0 525000031225
AT6 031224 031225 0 0 000000031225 0 525000031225
FT1A 031224 031225 0 0 000000031225 0 000000031225
FT9 031225 031225 0 0 000000031225 0 000000031225
ET0 031225 031225 0 0 031225777777 0 000000031225
ST1 031225 031225 0 0 031225777777 0 000000031225
ST2 031225 031225 0 0 031225777777 0 000000031225
ST9 031225 031225 0 0 031225777777 0 000000031225
*031225 JRA 0,031226
INITIAL
C(AC)=031225 777777
C(E)=267000 031226
FINAL
C(AC)=267000 031226
C(E)=267000 031226
TIME PC MA SC FE AR MQ BR
IT0 031225 031225 0 0 267000031226 0 000000031226
IT1 031225 0 0 0 267000031226 0 000000031226
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 69
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0226
AT3 031225 0 0 0 000000031226 0 267000031226
AT6 031225 031226 0 0 000000031226 0 267000031226
FT1A 031225 031226 0 0 000000031226 0 000000031226
FT2 031225 031226 0 0 0 0 000000031226
FT2RQ 031225 031226 0 0 031225777777 0 000000031226
FT3 031225 031226 0 0 031225777777 0 000000031226
FT6 031225 031226 0 0 777777031225 0 000000031226
FT7 031225 031225 0 0 267000031226 777777031225 000000031226
FT4RQ 031225 031225 0 0 267000031226 777777031225 000000031226
FT4A 031225 031225 0 0 777777031225 267000031226 000000031226
FT9 031226 031225 0 0 777777031225 267000031226 000000031226
ET0 031226 031225 0 0 000000031226 267000031226 000000031226
ET1 031226 031226 0 0 267000031226 267000031226 000000031226
ET2 031226 031226 0 0 267000031226 267000031226 000000031226
ST1 031226 031226 0 0 267000031226 267000031226 000000031226
ST2 031226 031226 0 0 267000031226 267000031226 000000031226
ST9 031226 031226 0 0 267000031226 267000031226 000000031226
*031226 CAME 0,031225
INITIAL
C(AC)=267000 031226
C(E)=267000 031226
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031226 031226 0 0 312000031225 0 267000031226
IT1 031226 0 0 0 312000031225 0 267000031226
AT3 031226 0 0 0 000000031225 0 312000031225
AT6 031226 031225 0 0 000000031225 0 312000031225
FT0 031226 031225 0 0 267000031226 0 312000031225
FT1A 031226 031225 0 0 267000031226 0 267000031226
FT2 031226 031225 0 0 0 0 267000031226
FT2RQ 031226 031225 0 0 267000031226 0 267000031226
FT3 031226 031225 0 0 267000031226 0 267000031226
FT9 031227 031225 0 0 267000031226 0 267000031226
ET0 031230 031225 0 0 0 0 267000031226
ST1A 031230 031225 0 0 0 0 267000031226
ST9 031230 031225 0 0 0 0 267000031226
*031230 JUMPA 0,031231
INITIAL
C(AC)=267000 031226
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031230 031230 0 0 324000031231 0 000000031231
IT1 031230 0 0 0 324000031231 0 000000031231
AT3 031230 0 0 0 000000031231 0 324000031231
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 70
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0227
AT6 031230 031231 0 0 000000031231 0 324000031231
FT1A 031230 031231 0 0 000000031231 0 000000031231
FT2 031230 031231 0 0 0 0 000000031231
FT2RQ 031230 031231 0 0 267000031226 0 000000031231
FT3 031230 031231 0 0 267000031226 0 000000031231
FT9 031231 031231 0 0 267000031226 0 000000031231
ET0 031231 031231 0 0 267000031226 0 000000031231
ST1A 031231 031231 0 0 267000031226 0 000000031231
ST9 031231 031231 0 0 267000031226 0 000000031231
*031231 MOVSI 1,020000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=020000 000000
TIME PC MA SC FE AR MQ BR
IT0 031231 031231 0 0 205040020000 0 000000020000
IT1 031231 0 0 0 205040020000 0 000000020000
AT3 031231 0 0 0 000000020000 0 205040020000
AT6 031231 0 0 0 000000020000 0 205040020000
FT1A 031231 0 0 0 000000020000 0 000000020000
FT9 031232 0 0 0 000000020000 0 000000020000
ET0 031232 0 0 0 020000000000 0 000000020000
ST1 031232 0 0 0 020000000000 0 000000020000
ST2 031232 0 0 0 020000000000 0 000000020000
ST9 031232 0 0 0 020000000000 0 000000020000
*031232 JFCL 17,031233
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031232 031232 0 0 255740031233 0 000000031233
IT1 031232 0 0 0 255740031233 0 000000031233
AT3 031232 0 0 0 000000031233 0 255740031233
AT6 031232 031233 0 0 000000031233 0 255740031233
FT1A 031232 031233 0 0 000000031233 0 000000031233
FT9 031233 031233 0 0 000000031233 0 000000031233
ET0 031233 031233 0 0 000000031233 0 000000031233
ST1A 031233 031233 0 0 000000031233 0 000000031233
ST9 031233 031233 0 0 000000031233 0 000000031233
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 71
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0228
*031233 JRST 2,031234(1)
INITIAL
C(AC)=000000 000002
C(E)=205040 000000
FINAL
C(E)=205040 000000
TIME PC MA SC FE AR MQ BR
IT0 031233 031233 0 0 254101031234 0 020000031234
IT1 031233 0 0 0 254101031234 0 020000031234
AT1 031233 0 0 0 0 0 254101031234
AT2 031233 0 0 0 020000000000 0 254101031234
AT3 031233 0 0 0 000000031234 0 020000031234
AT6 031233 031234 0 0 000000031234 0 020000031234
FT1A 031233 031234 0 0 000000031234 0 020000031234
FT9 031234 031234 0 0 000000031234 0 020000031234
ET0 031234 031234 0 0 000000031234 0 020000031234
ST1A 031234 031234 0 0 000000031234 0 020000031234
ST9 031234 031234 0 0 000000031234 0 020000031234
*031234 MOVSI 1,000000
INITIAL
C(AC)=020000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031234 031234 0 0 205040000000 0 0
IT1 031234 0 0 0 205040000000 0 0
AT3 031234 0 0 0 0 0 205040000000
AT6 031234 0 0 0 0 0 205040000000
FT1A 031234 0 0 0 0 0 0
FT9 031235 0 0 0 0 0 0
ET0 031235 0 0 0 0 0 0
ST1 031235 0 0 0 0 0 0
ST2 031235 0 0 0 0 0 0
ST9 031235 0 0 0 0 0 0
*031235 JFCL 17,031236
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031235 031235 0 0 255740031236 0 000000031236
IT1 031235 0 0 0 255740031236 0 000000031236
AT3 031235 0 0 0 000000031236 0 255740031236
AT6 031235 031236 0 0 000000031236 0 255740031236
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 72
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0229
FT1A 031235 031236 0 0 000000031236 0 000000031236
FT9 031236 031236 0 0 000000031236 0 000000031236
ET0 031236 031236 0 0 000000031236 0 000000031236
ST1A 031236 031236 0 0 000000031236 0 000000031236
ST9 031236 031236 0 0 000000031236 0 000000031236
*031236 JRST 2,031237(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 031240
FINAL
C(E)=265000 031240
TIME PC MA SC FE AR MQ BR
IT0 031236 031236 0 0 254101031237 0 000000031237
IT1 031236 0 0 0 254101031237 0 000000031237
AT1 031236 0 0 0 0 0 254101031237
AT2 031236 0 0 0 0 0 254101031237
AT3 031236 0 0 0 000000031237 0 000000031237
AT6 031236 031237 0 0 000000031237 0 000000031237
FT1A 031236 031237 0 0 000000031237 0 000000031237
FT9 031237 031237 0 0 000000031237 0 000000031237
ET0 031237 031237 0 0 000000031237 0 000000031237
ST1A 031237 031237 0 0 000000031237 0 000000031237
ST9 031237 031237 0 0 000000031237 0 000000031237
*031237 JSP 0,031240
INITIAL
C(AC)=267000 031226
FINAL
C(AC)=000000 031240
TIME PC MA SC FE AR MQ BR
IT0 031237 031237 0 0 265000031240 0 000000031240
IT1 031237 0 0 0 265000031240 0 000000031240
AT3 031237 0 0 0 000000031240 0 265000031240
AT6 031237 031240 0 0 000000031240 0 265000031240
FT1A 031237 031240 0 0 000000031240 0 000000031240
FT9 031240 031240 0 0 000000031240 0 000000031240
ET0 031240 031240 0 0 000000031240 0 000000031240
ST1 031240 031240 0 0 000000031240 0 000000031240
ST2 031240 031240 0 0 000000031240 0 000000031240
ST9 031240 031240 0 0 000000031240 0 000000031240
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 73
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0230
*031240 TLNE 0,020037
INITIAL
C(AC)=000000 031240
FINAL
C(AC)=000000 031240
TIME PC MA SC FE AR MQ BR
IT0 031240 031240 0 0 603000020037 0 0
IT1 031240 0 0 0 603000020037 0 0
AT3 031240 0 0 0 000000020037 0 603000020037
AT6 031240 020037 0 0 000000020037 0 603000020037
FT1A 031240 020037 0 0 000000020037 0 000000020037
FT2 031240 020037 0 0 0 0 000000020037
FT2RQ 031240 020037 0 0 000000031240 0 000000020037
FT3 031240 020037 0 0 000000031240 0 000000020037
FT9 031241 020037 0 0 000000031240 0 000000020037
ET0 031241 020037 0 0 031240000000 0 000000020037
ET1 031241 020037 0 0 031240000000 0 0
ET2 031242 020037 0 0 000000031240 0 0
ST1A 031242 020037 0 0 000000031240 0 0
ST9 031242 020037 0 0 000000031240 0 0
*031242 JUMPA 0,031243
INITIAL
C(AC)=000000 031240
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031242 031242 0 0 324000031243 0 000000031243
IT1 031242 0 0 0 324000031243 0 000000031243
AT3 031242 0 0 0 000000031243 0 324000031243
AT6 031242 031243 0 0 000000031243 0 324000031243
FT1A 031242 031243 0 0 000000031243 0 000000031243
FT2 031242 031243 0 0 0 0 000000031243
FT2RQ 031242 031243 0 0 000000031240 0 000000031243
FT3 031242 031243 0 0 000000031240 0 000000031243
FT9 031243 031243 0 0 000000031240 0 000000031243
ET0 031243 031243 0 0 000000031240 0 000000031243
ST1A 031243 031243 0 0 000000031240 0 000000031243
ST9 031243 031243 0 0 000000031240 0 000000031243
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 74
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0231
*031243 MOVSI 1,020000
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=020000 000000
TIME PC MA SC FE AR MQ BR
IT0 031243 031243 0 0 205040020000 0 000000020000
IT1 031243 0 0 0 205040020000 0 000000020000
AT3 031243 0 0 0 000000020000 0 205040020000
AT6 031243 0 0 0 000000020000 0 205040020000
FT1A 031243 0 0 0 000000020000 0 000000020000
FT9 031244 0 0 0 000000020000 0 000000020000
ET0 031244 0 0 0 020000000000 0 000000020000
ST1 031244 0 0 0 020000000000 0 000000020000
ST2 031244 0 0 0 020000000000 0 000000020000
ST9 031244 0 0 0 020000000000 0 000000020000
*031244 JFCL 17,031245
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031244 031244 0 0 255740031245 0 000000031245
IT1 031244 0 0 0 255740031245 0 000000031245
AT3 031244 0 0 0 000000031245 0 255740031245
AT6 031244 031245 0 0 000000031245 0 255740031245
FT1A 031244 031245 0 0 000000031245 0 000000031245
FT9 031245 031245 0 0 000000031245 0 000000031245
ET0 031245 031245 0 0 000000031245 0 000000031245
ST1A 031245 031245 0 0 000000031245 0 000000031245
ST9 031245 031245 0 0 000000031245 0 000000031245
*031245 JRST 2,031246(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 031247
FINAL
C(E)=265000 031247
TIME PC MA SC FE AR MQ BR
IT0 031245 031245 0 0 254101031246 0 020000031246
IT1 031245 0 0 0 254101031246 0 020000031246
AT1 031245 0 0 0 0 0 254101031246
AT2 031245 0 0 0 020000000000 0 254101031246
AT3 031245 0 0 0 000000031246 0 020000031246
AT6 031245 031246 0 0 000000031246 0 020000031246
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 75
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0232
FT1A 031245 031246 0 0 000000031246 0 020000031246
FT9 031246 031246 0 0 000000031246 0 020000031246
ET0 031246 031246 0 0 000000031246 0 020000031246
ST1A 031246 031246 0 0 000000031246 0 020000031246
ST9 031246 031246 0 0 000000031246 0 020000031246
*031246 JSP 0,031247
INITIAL
C(AC)=000000 031240
FINAL
C(AC)=020000 031247
TIME PC MA SC FE AR MQ BR
IT0 031246 031246 0 0 265000031247 0 000000031247
IT1 031246 0 0 0 265000031247 0 000000031247
AT3 031246 0 0 0 000000031247 0 265000031247
AT6 031246 031247 0 0 000000031247 0 265000031247
FT1A 031246 031247 0 0 000000031247 0 000000031247
FT9 031247 031247 0 0 000000031247 0 000000031247
ET0 031247 031247 0 0 020000031247 0 000000031247
ST1 031247 031247 0 0 020000031247 0 000000031247
ST2 031247 031247 0 0 020000031247 0 000000031247
ST9 031247 031247 0 0 020000031247 0 000000031247
*031247 TLNN 0,020000
INITIAL
C(AC)=020000 031247
FINAL
C(AC)=020000 031247
TIME PC MA SC FE AR MQ BR
IT0 031247 031247 0 0 607000020000 0 000000020000
IT1 031247 0 0 0 607000020000 0 000000020000
AT3 031247 0 0 0 000000020000 0 607000020000
AT6 031247 0 0 0 000000020000 0 607000020000
FT1A 031247 0 0 0 000000020000 0 000000020000
FT2 031247 0 0 0 0 0 000000020000
FT2RQ 031247 0 0 0 020000031247 0 000000020000
FT3 031247 0 0 0 020000031247 0 000000020000
FT9 031250 0 0 0 020000031247 0 000000020000
ET0 031250 0 0 0 031247020000 0 000000020000
ET1 031250 0 0 0 031247020000 0 000000020000
ET2 031251 0 0 0 020000031247 0 000000020000
ST1A 031251 0 0 0 020000031247 0 000000020000
ST9 031251 0 0 0 020000031247 0 000000020000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 76
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0233
*031251 JUMPA 0,031252
INITIAL
C(AC)=020000 031247
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 020000031247 0 000000031252
FT3 031251 031252 0 0 020000031247 0 000000031252
FT9 031252 031252 0 0 020000031247 0 000000031252
ET0 031252 031252 0 0 020000031247 0 000000031252
ST1A 031252 031252 0 0 020000031247 0 000000031252
ST9 031252 031252 0 0 020000031247 0 000000031252
*031252 MOVSI 1,020000
INITIAL
C(AC)=020000 000000
FINAL
C(AC)=020000 000000
TIME PC MA SC FE AR MQ BR
IT0 031252 031252 0 0 205040020000 0 000000020000
IT1 031252 0 0 0 205040020000 0 000000020000
AT3 031252 0 0 0 000000020000 0 205040020000
AT6 031252 0 0 0 000000020000 0 205040020000
FT1A 031252 0 0 0 000000020000 0 000000020000
FT9 031253 0 0 0 000000020000 0 000000020000
ET0 031253 0 0 0 020000000000 0 000000020000
ST1 031253 0 0 0 020000000000 0 000000020000
ST2 031253 0 0 0 020000000000 0 000000020000
ST9 031253 0 0 0 020000000000 0 000000020000
*031253 JFCL 17,031254
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031253 031253 0 0 255740031254 0 000000031254
IT1 031253 0 0 0 255740031254 0 000000031254
AT3 031253 0 0 0 000000031254 0 255740031254
AT6 031253 031254 0 0 000000031254 0 255740031254
FT1A 031253 031254 0 0 000000031254 0 000000031254
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 77
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0234
FT9 031254 031254 0 0 000000031254 0 000000031254
ET0 031254 031254 0 0 000000031254 0 000000031254
ST1A 031254 031254 0 0 000000031254 0 000000031254
ST9 031254 031254 0 0 000000031254 0 000000031254
*031254 JRST 2,031255(1)
INITIAL
C(AC)=000000 000002
C(E)=264000 031256
FINAL
C(E)=264000 031256
TIME PC MA SC FE AR MQ BR
IT0 031254 031254 0 0 254101031255 0 020000031255
IT1 031254 0 0 0 254101031255 0 020000031255
AT1 031254 0 0 0 0 0 254101031255
AT2 031254 0 0 0 020000000000 0 254101031255
AT3 031254 0 0 0 000000031255 0 020000031255
AT6 031254 031255 0 0 000000031255 0 020000031255
FT1A 031254 031255 0 0 000000031255 0 020000031255
FT9 031255 031255 0 0 000000031255 0 020000031255
ET0 031255 031255 0 0 000000031255 0 020000031255
ST1A 031255 031255 0 0 000000031255 0 020000031255
ST9 031255 031255 0 0 000000031255 0 020000031255
*031255 JSR 0,031256
INITIAL
C(AC)=020000 031247
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031255 031255 0 0 264000031256 0 000000031256
IT1 031255 0 0 0 264000031256 0 000000031256
AT3 031255 0 0 0 000000031256 0 264000031256
AT6 031255 031256 0 0 000000031256 0 264000031256
FT1A 031255 031256 0 0 000000031256 0 000000031256
FT9 031256 031256 0 0 000000031256 0 000000031256
ET0 031256 031256 0 0 020000031256 0 000000031256
ET2 031257 031256 0 0 020000031256 0 000000031256
ST6 031257 031256 0 0 020000031256 0 000000031256
ST6A 031257 031256 0 0 020000031256 0 000000031256
ST9 031257 031256 0 0 020000031256 0 000000031256
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 78
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0235
*031257 JSP 0,031260
INITIAL
C(AC)=020000 031247
FINAL
C(AC)=000000 031260
TIME PC MA SC FE AR MQ BR
IT0 031257 031257 0 0 265000031260 0 000000031260
IT1 031257 0 0 0 265000031260 0 000000031260
AT3 031257 0 0 0 000000031260 0 265000031260
AT6 031257 031260 0 0 000000031260 0 265000031260
FT1A 031257 031260 0 0 000000031260 0 000000031260
FT9 031260 031260 0 0 000000031260 0 000000031260
ET0 031260 031260 0 0 000000031260 0 000000031260
ST1 031260 031260 0 0 000000031260 0 000000031260
ST2 031260 031260 0 0 000000031260 0 000000031260
ST9 031260 031260 0 0 000000031260 0 000000031260
*031260 TLNE 0,020000
INITIAL
C(AC)=000000 031260
FINAL
C(AC)=000000 031260
TIME PC MA SC FE AR MQ BR
IT0 031260 031260 0 0 603000020000 0 0
IT1 031260 0 0 0 603000020000 0 0
AT3 031260 0 0 0 000000020000 0 603000020000
AT6 031260 0 0 0 000000020000 0 603000020000
FT1A 031260 0 0 0 000000020000 0 000000020000
FT2 031260 0 0 0 0 0 000000020000
FT2RQ 031260 0 0 0 000000031260 0 000000020000
FT3 031260 0 0 0 000000031260 0 000000020000
FT9 031261 0 0 0 000000031260 0 000000020000
ET0 031261 0 0 0 031260000000 0 000000020000
ET1 031261 0 0 0 031260000000 0 0
ET2 031262 0 0 0 000000031260 0 0
ST1A 031262 0 0 0 000000031260 0 0
ST9 031262 0 0 0 000000031260 0 0
*031262 JUMPA 0,031263
INITIAL
C(AC)=000000 031260
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031262 031262 0 0 324000031263 0 000000031263
IT1 031262 0 0 0 324000031263 0 000000031263
AT3 031262 0 0 0 000000031263 0 324000031263
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 79
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0236
AT6 031262 031263 0 0 000000031263 0 324000031263
FT1A 031262 031263 0 0 000000031263 0 000000031263
FT2 031262 031263 0 0 0 0 000000031263
FT2RQ 031262 031263 0 0 000000031260 0 000000031263
FT3 031262 031263 0 0 000000031260 0 000000031263
FT9 031263 031263 0 0 000000031260 0 000000031263
ET0 031263 031263 0 0 000000031260 0 000000031263
ST1A 031263 031263 0 0 000000031260 0 000000031263
ST9 031263 031263 0 0 000000031260 0 000000031263
*031263 MOVSI 1,020000
INITIAL
C(AC)=020000 000000
FINAL
C(AC)=020000 000000
TIME PC MA SC FE AR MQ BR
IT0 031263 031263 0 0 205040020000 0 000000020000
IT1 031263 0 0 0 205040020000 0 000000020000
AT3 031263 0 0 0 000000020000 0 205040020000
AT6 031263 0 0 0 000000020000 0 205040020000
FT1A 031263 0 0 0 000000020000 0 000000020000
FT9 031264 0 0 0 000000020000 0 000000020000
ET0 031264 0 0 0 020000000000 0 000000020000
ST1 031264 0 0 0 020000000000 0 000000020000
ST2 031264 0 0 0 020000000000 0 000000020000
ST9 031264 0 0 0 020000000000 0 000000020000
*031264 JFCL 17,031265
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031264 031264 0 0 255740031265 0 000000031265
IT1 031264 0 0 0 255740031265 0 000000031265
AT3 031264 0 0 0 000000031265 0 255740031265
AT6 031264 031265 0 0 000000031265 0 255740031265
FT1A 031264 031265 0 0 000000031265 0 000000031265
FT9 031265 031265 0 0 000000031265 0 000000031265
ET0 031265 031265 0 0 000000031265 0 000000031265
ST1A 031265 031265 0 0 000000031265 0 000000031265
ST9 031265 031265 0 0 000000031265 0 000000031265
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 80
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0237
*031265 JRST 2,031266(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 031267
FINAL
C(E)=265000 031267
TIME PC MA SC FE AR MQ BR
IT0 031265 031265 0 0 254101031266 0 020000031266
IT1 031265 0 0 0 254101031266 0 020000031266
AT1 031265 0 0 0 0 0 254101031266
AT2 031265 0 0 0 020000000000 0 254101031266
AT3 031265 0 0 0 000000031266 0 020000031266
AT6 031265 031266 0 0 000000031266 0 020000031266
FT1A 031265 031266 0 0 000000031266 0 020000031266
FT9 031266 031266 0 0 000000031266 0 020000031266
ET0 031266 031266 0 0 000000031266 0 020000031266
ST1A 031266 031266 0 0 000000031266 0 020000031266
ST9 031266 031266 0 0 000000031266 0 020000031266
*031266 JSP 0,031267
INITIAL
C(AC)=000000 031260
FINAL
C(AC)=020000 031267
TIME PC MA SC FE AR MQ BR
IT0 031266 031266 0 0 265000031267 0 000000031267
IT1 031266 0 0 0 265000031267 0 000000031267
AT3 031266 0 0 0 000000031267 0 265000031267
AT6 031266 031267 0 0 000000031267 0 265000031267
FT1A 031266 031267 0 0 000000031267 0 000000031267
FT9 031267 031267 0 0 000000031267 0 000000031267
ET0 031267 031267 0 0 020000031267 0 000000031267
ST1 031267 031267 0 0 020000031267 0 000000031267
ST2 031267 031267 0 0 020000031267 0 000000031267
ST9 031267 031267 0 0 020000031267 0 000000031267
*031267 JSP 0,031270
INITIAL
C(AC)=020000 031267
FINAL
C(AC)=000000 031270
TIME PC MA SC FE AR MQ BR
IT0 031267 031267 0 0 265000031270 0 000000031270
IT1 031267 0 0 0 265000031270 0 000000031270
AT3 031267 0 0 0 000000031270 0 265000031270
AT6 031267 031270 0 0 000000031270 0 265000031270
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 81
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0238
FT1A 031267 031270 0 0 000000031270 0 000000031270
FT9 031270 031270 0 0 000000031270 0 000000031270
ET0 031270 031270 0 0 000000031270 0 000000031270
ST1 031270 031270 0 0 000000031270 0 000000031270
ST2 031270 031270 0 0 000000031270 0 000000031270
ST9 031270 031270 0 0 000000031270 0 000000031270
*031270 TLNE 0,020000
INITIAL
C(AC)=000000 031270
FINAL
C(AC)=000000 031270
TIME PC MA SC FE AR MQ BR
IT0 031270 031270 0 0 603000020000 0 0
IT1 031270 0 0 0 603000020000 0 0
AT3 031270 0 0 0 000000020000 0 603000020000
AT6 031270 0 0 0 000000020000 0 603000020000
FT1A 031270 0 0 0 000000020000 0 000000020000
FT2 031270 0 0 0 0 0 000000020000
FT2RQ 031270 0 0 0 000000031270 0 000000020000
FT3 031270 0 0 0 000000031270 0 000000020000
FT9 031271 0 0 0 000000031270 0 000000020000
ET0 031271 0 0 0 031270000000 0 000000020000
ET1 031271 0 0 0 031270000000 0 0
ET2 031272 0 0 0 000000031270 0 0
ST1A 031272 0 0 0 000000031270 0 0
ST9 031272 0 0 0 000000031270 0 0
*031272 JUMPA 0,031273
INITIAL
C(AC)=000000 031270
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031272 031272 0 0 324000031273 0 000000031273
IT1 031272 0 0 0 324000031273 0 000000031273
AT3 031272 0 0 0 000000031273 0 324000031273
AT6 031272 031273 0 0 000000031273 0 324000031273
FT1A 031272 031273 0 0 000000031273 0 000000031273
FT2 031272 031273 0 0 0 0 000000031273
FT2RQ 031272 031273 0 0 000000031270 0 000000031273
FT3 031272 031273 0 0 000000031270 0 000000031273
FT9 031273 031273 0 0 000000031270 0 000000031273
ET0 031273 031273 0 0 000000031270 0 000000031273
ST1A 031273 031273 0 0 000000031270 0 000000031273
ST9 031273 031273 0 0 000000031270 0 000000031273
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 82
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0239
*031273 MOVSI 1,000000
INITIAL
C(AC)=020000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031273 031273 0 0 205040000000 0 0
IT1 031273 0 0 0 205040000000 0 0
AT3 031273 0 0 0 0 0 205040000000
AT6 031273 0 0 0 0 0 205040000000
FT1A 031273 0 0 0 0 0 0
FT9 031274 0 0 0 0 0 0
ET0 031274 0 0 0 0 0 0
ST1 031274 0 0 0 0 0 0
ST2 031274 0 0 0 0 0 0
ST9 031274 0 0 0 0 0 0
*031274 JFCL 17,031275
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031274 031274 0 0 255740031275 0 000000031275
IT1 031274 0 0 0 255740031275 0 000000031275
AT3 031274 0 0 0 000000031275 0 255740031275
AT6 031274 031275 0 0 000000031275 0 255740031275
FT1A 031274 031275 0 0 000000031275 0 000000031275
FT9 031275 031275 0 0 000000031275 0 000000031275
ET0 031275 031275 0 0 000000031275 0 000000031275
ST1A 031275 031275 0 0 000000031275 0 000000031275
ST9 031275 031275 0 0 000000031275 0 000000031275
*031275 JRST 2,031276(1)
INITIAL
C(AC)=000000 000002
C(E)=265000 031277
FINAL
C(E)=265000 031277
TIME PC MA SC FE AR MQ BR
IT0 031275 031275 0 0 254101031276 0 000000031276
IT1 031275 0 0 0 254101031276 0 000000031276
AT1 031275 0 0 0 0 0 254101031276
AT2 031275 0 0 0 0 0 254101031276
AT3 031275 0 0 0 000000031276 0 000000031276
AT6 031275 031276 0 0 000000031276 0 000000031276
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 83
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0240
FT1A 031275 031276 0 0 000000031276 0 000000031276
FT9 031276 031276 0 0 000000031276 0 000000031276
ET0 031276 031276 0 0 000000031276 0 000000031276
ST1A 031276 031276 0 0 000000031276 0 000000031276
ST9 031276 031276 0 0 000000031276 0 000000031276
*031276 JSP 0,031277
INITIAL
C(AC)=000000 031270
FINAL
C(AC)=000000 031277
TIME PC MA SC FE AR MQ BR
IT0 031276 031276 0 0 265000031277 0 000000031277
IT1 031276 0 0 0 265000031277 0 000000031277
AT3 031276 0 0 0 000000031277 0 265000031277
AT6 031276 031277 0 0 000000031277 0 265000031277
FT1A 031276 031277 0 0 000000031277 0 000000031277
FT9 031277 031277 0 0 000000031277 0 000000031277
ET0 031277 031277 0 0 000000031277 0 000000031277
ST1 031277 031277 0 0 000000031277 0 000000031277
ST2 031277 031277 0 0 000000031277 0 000000031277
ST9 031277 031277 0 0 000000031277 0 000000031277
*031277 TLNE 0,001600
INITIAL
C(AC)=000000 031277
FINAL
C(AC)=000000 031277
TIME PC MA SC FE AR MQ BR
IT0 031277 031277 0 0 603000001600 0 0
IT1 031277 0 0 0 603000001600 0 0
AT3 031277 0 0 0 000000001600 0 603000001600
AT6 031277 0 0 0 000000001600 0 603000001600
FT1A 031277 0 0 0 000000001600 0 000000001600
FT2 031277 0 0 0 0 0 000000001600
FT2RQ 031277 0 0 0 000000031277 0 000000001600
FT3 031277 0 0 0 000000031277 0 000000001600
FT9 0 0 0 0 000000031277 0 000000001600
ET0 0 0 0 0 031277000000 0 000000001600
ET1 0 0 0 0 031277000000 0 0
ET2 031301 0 0 0 000000031277 0 0
ST1A 031301 0 0 0 000000031277 0 0
ST9 031301 0 0 0 000000031277 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 84
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0241
*031301 JUMPA 0,031302
INITIAL
C(AC)=000000 031277
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031301 031301 0 0 324000031302 0 000000031302
IT1 031301 0 0 0 324000031302 0 000000031302
AT3 031301 0 0 0 000000031302 0 324000031302
AT6 031301 031302 0 0 000000031302 0 324000031302
FT1A 031301 031302 0 0 000000031302 0 000000031302
FT2 031301 031302 0 0 0 0 000000031302
FT2RQ 031301 031302 0 0 000000031277 0 000000031302
FT3 031301 031302 0 0 000000031277 0 000000031302
FT9 031302 031302 0 0 000000031277 0 000000031302
ET0 031302 031302 0 0 000000031277 0 000000031302
ST1A 031302 031302 0 0 000000031277 0 000000031302
ST9 031302 031302 0 0 000000031277 0 000000031302
*031302 MOVE 0,033473
INITIAL
C(AC)=000000 031277
C(E)=252525 252525
FINAL
C(AC)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 031302 031302 0 0 200000033473 0 252525252525
IT1 031302 0 0 0 200000033473 0 252525252525
AT3 031302 0 0 0 000000033473 0 200000033473
AT6 031302 033473 0 0 000000033473 0 200000033473
FT0 031302 033473 0 0 252525252525 0 200000033473
FT1A 031302 033473 0 0 252525252525 0 252525252525
FT9 031303 033473 0 0 252525252525 0 252525252525
ET0 031303 033473 0 0 252525252525 0 252525252525
ST1 031303 033473 0 0 252525252525 0 252525252525
ST2 031303 033473 0 0 252525252525 0 252525252525
ST9 031303 033473 0 0 252525252525 0 252525252525
*031303 MOVE 1,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 031303 031303 0 0 200040033474 0 707070707070
IT1 031303 0 0 0 200040033474 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 85
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0242
AT3 031303 0 0 0 000000033474 0 200040033474
AT6 031303 033474 0 0 000000033474 0 200040033474
FT0 031303 033474 0 0 707070707070 0 200040033474
FT1A 031303 033474 0 0 707070707070 0 707070707070
FT9 031304 033474 0 0 707070707070 0 707070707070
ET0 031304 033474 0 0 707070707070 0 707070707070
ST1 031304 033474 0 0 707070707070 0 707070707070
ST2 031304 033474 0 0 707070707070 0 707070707070
ST9 031304 033474 0 0 707070707070 0 707070707070
*031304 MOVEM 0,000001
INITIAL
C(AC)=252525 252525
C(E)=707070 707070
FINAL
C(E)=252525 252525
TIME PC MA SC FE AR MQ BR
IT0 031304 031304 0 0 202000000001 0 000000000001
IT1 031304 0 0 0 202000000001 0 000000000001
AT3 031304 0 0 0 000000000001 0 202000000001
AT6 031304 000001 0 0 000000000001 0 202000000001
FT1A 031304 000001 0 0 000000000001 0 000000000001
FT2 031304 000001 0 0 0 0 000000000001
FT2RQ 031304 000001 0 0 252525252525 0 000000000001
FT3 031304 000001 0 0 252525252525 0 000000000001
FT9 031305 000001 0 0 252525252525 0 000000000001
ET0 031305 000001 0 0 252525252525 0 000000000001
ST6 031305 000001 0 0 252525252525 0 000000000001
ST6A 031305 000001 0 0 252525252525 0 000000000001
ST9 031305 000001 0 0 252525252525 0 000000000001
*031305 CAME 0,033473
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031305 031305 0 0 312000033473 0 252525252525
IT1 031305 0 0 0 312000033473 0 252525252525
AT3 031305 0 0 0 000000033473 0 312000033473
AT6 031305 033473 0 0 000000033473 0 312000033473
FT0 031305 033473 0 0 252525252525 0 312000033473
FT1A 031305 033473 0 0 252525252525 0 252525252525
FT2 031305 033473 0 0 0 0 252525252525
FT2RQ 031305 033473 0 0 252525252525 0 252525252525
FT3 031305 033473 0 0 252525252525 0 252525252525
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 86
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0243
FT9 031306 033473 0 0 252525252525 0 252525252525
ET0 031307 033473 0 0 0 0 252525252525
ST1A 031307 033473 0 0 0 0 252525252525
ST9 031307 033473 0 0 0 0 252525252525
*031307 JUMPA 0,031310
INITIAL
C(AC)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031307 031307 0 0 324000031310 0 000000031310
IT1 031307 0 0 0 324000031310 0 000000031310
AT3 031307 0 0 0 000000031310 0 324000031310
AT6 031307 031310 0 0 000000031310 0 324000031310
FT1A 031307 031310 0 0 000000031310 0 000000031310
FT2 031307 031310 0 0 0 0 000000031310
FT2RQ 031307 031310 0 0 252525252525 0 000000031310
FT3 031307 031310 0 0 252525252525 0 000000031310
FT9 031310 031310 0 0 252525252525 0 000000031310
ET0 031310 031310 0 0 252525252525 0 000000031310
ST1A 031310 031310 0 0 252525252525 0 000000031310
ST9 031310 031310 0 0 252525252525 0 000000031310
*031310 CAME 1,033473
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031310 031310 0 0 312040033473 0 252525252525
IT1 031310 0 0 0 312040033473 0 252525252525
AT3 031310 0 0 0 000000033473 0 312040033473
AT6 031310 033473 0 0 000000033473 0 312040033473
FT0 031310 033473 0 0 252525252525 0 312040033473
FT1A 031310 033473 0 0 252525252525 0 252525252525
FT2 031310 033473 0 0 0 0 252525252525
FT2RQ 031310 033473 0 0 252525252525 0 252525252525
FT3 031310 033473 0 0 252525252525 0 252525252525
FT9 031311 033473 0 0 252525252525 0 252525252525
ET0 031312 033473 0 0 0 0 252525252525
ST1A 031312 033473 0 0 0 0 252525252525
ST9 031312 033473 0 0 0 0 252525252525
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 87
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0244
*031312 JUMPA 0,031313
INITIAL
C(AC)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031312 031312 0 0 324000031313 0 000000031313
IT1 031312 0 0 0 324000031313 0 000000031313
AT3 031312 0 0 0 000000031313 0 324000031313
AT6 031312 031313 0 0 000000031313 0 324000031313
FT1A 031312 031313 0 0 000000031313 0 000000031313
FT2 031312 031313 0 0 0 0 000000031313
FT2RQ 031312 031313 0 0 252525252525 0 000000031313
FT3 031312 031313 0 0 252525252525 0 000000031313
FT9 031313 031313 0 0 252525252525 0 000000031313
ET0 031313 031313 0 0 252525252525 0 000000031313
ST1A 031313 031313 0 0 252525252525 0 000000031313
ST9 031313 031313 0 0 252525252525 0 000000031313
*031313 MOVE 2,033474
INITIAL
C(AC)=000000 000002
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 031313 031313 0 0 200100033474 0 707070707070
IT1 031313 0 0 0 200100033474 0 707070707070
AT3 031313 0 0 0 000000033474 0 200100033474
AT6 031313 033474 0 0 000000033474 0 200100033474
FT0 031313 033474 0 0 707070707070 0 200100033474
FT1A 031313 033474 0 0 707070707070 0 707070707070
FT9 031314 033474 0 0 707070707070 0 707070707070
ET0 031314 033474 0 0 707070707070 0 707070707070
ST1 031314 033474 0 0 707070707070 0 707070707070
ST2 031314 033474 0 0 707070707070 0 707070707070
ST9 031314 033474 0 0 707070707070 0 707070707070
*031314 MOVE 1,033475
INITIAL
C(AC)=252525 252525
C(E)=123456 123456
FINAL
C(AC)=123456 123456
TIME PC MA SC FE AR MQ BR
IT0 031314 031314 0 0 200040033475 0 123456123456
IT1 031314 0 0 0 200040033475 0 123456123456
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 88
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0245
AT3 031314 0 0 0 000000033475 0 200040033475
AT6 031314 033475 0 0 000000033475 0 200040033475
FT0 031314 033475 0 0 123456123456 0 200040033475
FT1A 031314 033475 0 0 123456123456 0 123456123456
FT9 031315 033475 0 0 123456123456 0 123456123456
ET0 031315 033475 0 0 123456123456 0 123456123456
ST1 031315 033475 0 0 123456123456 0 123456123456
ST2 031315 033475 0 0 123456123456 0 123456123456
ST9 031315 033475 0 0 123456123456 0 123456123456
*031315 MOVES 2,000001
INITIAL
C(AC)=707070 707070
C(E)=123456 123456
FINAL
C(AC)=123456 123456
C(E)=123456 123456
TIME PC MA SC FE AR MQ BR
IT0 031315 031315 0 0 203100000001 0 123456123456
IT1 031315 0 0 0 203100000001 0 123456123456
AT3 031315 0 0 0 000000000001 0 203100000001
AT6 031315 000001 0 0 000000000001 0 203100000001
FT0 031315 000001 0 0 123456123456 0 203100000001
FT1A 031315 000001 0 0 123456123456 0 123456123456
FT9 031316 000001 0 0 123456123456 0 123456123456
ET0 031316 000001 0 0 123456123456 0 123456123456
ST1 031316 000001 0 0 123456123456 0 123456123456
ST2 031316 000001 0 0 123456123456 0 123456123456
ST5 031316 000001 0 0 123456123456 0 123456123456
ST6A 031316 000001 0 0 123456123456 0 123456123456
ST9 031316 000001 0 0 123456123456 0 123456123456
*031316 CAME 2,033475
INITIAL
C(AC)=123456 123456
C(E)=123456 123456
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031316 031316 0 0 312100033475 0 123456123456
IT1 031316 0 0 0 312100033475 0 123456123456
AT3 031316 0 0 0 000000033475 0 312100033475
AT6 031316 033475 0 0 000000033475 0 312100033475
FT0 031316 033475 0 0 123456123456 0 312100033475
FT1A 031316 033475 0 0 123456123456 0 123456123456
FT2 031316 033475 0 0 0 0 123456123456
FT2RQ 031316 033475 0 0 123456123456 0 123456123456
FT3 031316 033475 0 0 123456123456 0 123456123456
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 89
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0246
FT9 031317 033475 0 0 123456123456 0 123456123456
ET0 031320 033475 0 0 0 0 123456123456
ST1A 031320 033475 0 0 0 0 123456123456
ST9 031320 033475 0 0 0 0 123456123456
*031320 JUMPA 0,031321
INITIAL
C(AC)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031320 031320 0 0 324000031321 0 000000031321
IT1 031320 0 0 0 324000031321 0 000000031321
AT3 031320 0 0 0 000000031321 0 324000031321
AT6 031320 031321 0 0 000000031321 0 324000031321
FT1A 031320 031321 0 0 000000031321 0 000000031321
FT2 031320 031321 0 0 0 0 000000031321
FT2RQ 031320 031321 0 0 252525252525 0 000000031321
FT3 031320 031321 0 0 252525252525 0 000000031321
FT9 031321 031321 0 0 252525252525 0 000000031321
ET0 031321 031321 0 0 252525252525 0 000000031321
ST1A 031321 031321 0 0 252525252525 0 000000031321
ST9 031321 031321 0 0 252525252525 0 000000031321
*031321 CAME 1,033475
INITIAL
C(AC)=123456 123456
C(E)=123456 123456
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031321 031321 0 0 312040033475 0 123456123456
IT1 031321 0 0 0 312040033475 0 123456123456
AT3 031321 0 0 0 000000033475 0 312040033475
AT6 031321 033475 0 0 000000033475 0 312040033475
FT0 031321 033475 0 0 123456123456 0 312040033475
FT1A 031321 033475 0 0 123456123456 0 123456123456
FT2 031321 033475 0 0 0 0 123456123456
FT2RQ 031321 033475 0 0 123456123456 0 123456123456
FT3 031321 033475 0 0 123456123456 0 123456123456
FT9 031322 033475 0 0 123456123456 0 123456123456
ET0 031323 033475 0 0 0 0 123456123456
ST1A 031323 033475 0 0 0 0 123456123456
ST9 031323 033475 0 0 0 0 123456123456
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 90
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0247
*031323 JUMPA 0,031324
INITIAL
C(AC)=252525 252525
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031323 031323 0 0 324000031324 0 000000031324
IT1 031323 0 0 0 324000031324 0 000000031324
AT3 031323 0 0 0 000000031324 0 324000031324
AT6 031323 031324 0 0 000000031324 0 324000031324
FT1A 031323 031324 0 0 000000031324 0 000000031324
FT2 031323 031324 0 0 0 0 000000031324
FT2RQ 031323 031324 0 0 252525252525 0 000000031324
FT3 031323 031324 0 0 252525252525 0 000000031324
FT9 031324 031324 0 0 252525252525 0 000000031324
ET0 031324 031324 0 0 252525252525 0 000000031324
ST1A 031324 031324 0 0 252525252525 0 000000031324
ST9 031324 031324 0 0 252525252525 0 000000031324
*031324 MOVE 1,033474
INITIAL
C(AC)=123456 123456
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 031324 031324 0 0 200040033474 0 707070707070
IT1 031324 0 0 0 200040033474 0 707070707070
AT3 031324 0 0 0 000000033474 0 200040033474
AT6 031324 033474 0 0 000000033474 0 200040033474
FT0 031324 033474 0 0 707070707070 0 200040033474
FT1A 031324 033474 0 0 707070707070 0 707070707070
FT9 031325 033474 0 0 707070707070 0 707070707070
ET0 031325 033474 0 0 707070707070 0 707070707070
ST1 031325 033474 0 0 707070707070 0 707070707070
ST2 031325 033474 0 0 707070707070 0 707070707070
ST9 031325 033474 0 0 707070707070 0 707070707070
*031325 SETO 0,000000
INITIAL
C(AC)=252525 252525
C(E)=252525 252525
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031325 031325 0 0 474000000000 0 0
IT1 031325 0 0 0 474000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 91
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0248
AT3 031325 0 0 0 0 0 474000000000
AT6 031325 0 0 0 0 0 474000000000
FT1A 031325 0 0 0 0 0 0
FT9 031326 0 0 0 0 0 0
ET0 031326 0 0 0 777777777777 0 0
ST1 031326 0 0 0 777777777777 0 0
ST2 031326 0 0 0 777777777777 0 0
ST9 031326 0 0 0 777777777777 0 0
*031326 MOVES 0,000001
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=777777 777777
C(E)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 031326 031326 0 0 203000000001 0 707070707070
IT1 031326 0 0 0 203000000001 0 707070707070
AT3 031326 0 0 0 000000000001 0 203000000001
AT6 031326 000001 0 0 000000000001 0 203000000001
FT0 031326 000001 0 0 707070707070 0 203000000001
FT1A 031326 000001 0 0 707070707070 0 707070707070
FT9 031327 000001 0 0 707070707070 0 707070707070
ET0 031327 000001 0 0 707070707070 0 707070707070
ST5 031327 000001 0 0 707070707070 0 707070707070
ST6A 031327 000001 0 0 707070707070 0 707070707070
ST9 031327 000001 0 0 707070707070 0 707070707070
*031327 CAME 0,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031327 031327 0 0 312000033462 0 777777777777
IT1 031327 0 0 0 312000033462 0 777777777777
AT3 031327 0 0 0 000000033462 0 312000033462
AT6 031327 033462 0 0 000000033462 0 312000033462
FT0 031327 033462 0 0 777777777777 0 312000033462
FT1A 031327 033462 0 0 777777777777 0 777777777777
FT2 031327 033462 0 0 0 0 777777777777
FT2RQ 031327 033462 0 0 777777777777 0 777777777777
FT3 031327 033462 0 0 777777777777 0 777777777777
FT9 031330 033462 0 0 777777777777 0 777777777777
ET0 031331 033462 0 0 0 0 777777777777
ST1A 031331 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 92
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0249
ST9 031331 033462 0 0 0 0 777777777777
*031331 JUMPA 0,031332
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031331 031331 0 0 324000031332 0 000000031332
IT1 031331 0 0 0 324000031332 0 000000031332
AT3 031331 0 0 0 000000031332 0 324000031332
AT6 031331 031332 0 0 000000031332 0 324000031332
FT1A 031331 031332 0 0 000000031332 0 000000031332
FT2 031331 031332 0 0 0 0 000000031332
FT2RQ 031331 031332 0 0 777777777777 0 000000031332
FT3 031331 031332 0 0 777777777777 0 000000031332
FT9 031332 031332 0 0 777777777777 0 000000031332
ET0 031332 031332 0 0 777777777777 0 000000031332
ST1A 031332 031332 0 0 777777777777 0 000000031332
ST9 031332 031332 0 0 777777777777 0 000000031332
*031332 CAME 1,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031332 031332 0 0 312040033474 0 707070707070
IT1 031332 0 0 0 312040033474 0 707070707070
AT3 031332 0 0 0 000000033474 0 312040033474
AT6 031332 033474 0 0 000000033474 0 312040033474
FT0 031332 033474 0 0 707070707070 0 312040033474
FT1A 031332 033474 0 0 707070707070 0 707070707070
FT2 031332 033474 0 0 0 0 707070707070
FT2RQ 031332 033474 0 0 707070707070 0 707070707070
FT3 031332 033474 0 0 707070707070 0 707070707070
FT9 031333 033474 0 0 707070707070 0 707070707070
ET0 031334 033474 0 0 0 0 707070707070
ST1A 031334 033474 0 0 0 0 707070707070
ST9 031334 033474 0 0 0 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 93
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0250
*031334 JUMPA 0,031335
INITIAL
C(AC)=777777 777777
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 777777777777 0 000000031335
FT3 031334 031335 0 0 777777777777 0 000000031335
FT9 031335 031335 0 0 777777777777 0 000000031335
ET0 031335 031335 0 0 777777777777 0 000000031335
ST1A 031335 031335 0 0 777777777777 0 000000031335
ST9 031335 031335 0 0 777777777777 0 000000031335
*031335 MOVE 1,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 031335 031335 0 0 200040033474 0 707070707070
IT1 031335 0 0 0 200040033474 0 707070707070
AT3 031335 0 0 0 000000033474 0 200040033474
AT6 031335 033474 0 0 000000033474 0 200040033474
FT0 031335 033474 0 0 707070707070 0 200040033474
FT1A 031335 033474 0 0 707070707070 0 707070707070
FT9 031336 033474 0 0 707070707070 0 707070707070
ET0 031336 033474 0 0 707070707070 0 707070707070
ST1 031336 033474 0 0 707070707070 0 707070707070
ST2 031336 033474 0 0 707070707070 0 707070707070
ST9 031336 033474 0 0 707070707070 0 707070707070
*031336 MOVSI 1,777777
INITIAL
C(AC)=707070 707070
FINAL
C(AC)=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 031336 031336 0 0 205040777777 0 000000777777
IT1 031336 0 0 0 205040777777 0 000000777777
AT3 031336 0 0 0 000000777777 0 205040777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 94
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0251
AT6 031336 777777 0 0 000000777777 0 205040777777
FT1A 031336 777777 0 0 000000777777 0 000000777777
FT9 031337 777777 0 0 000000777777 0 000000777777
ET0 031337 777777 0 0 777777000000 0 000000777777
ST1 031337 777777 0 0 777777000000 0 000000777777
ST2 031337 777777 0 0 777777000000 0 000000777777
ST9 031337 777777 0 0 777777000000 0 000000777777
*031337 CAME 1,033476
INITIAL
C(AC)=777777 000000
C(E)=777777 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031337 031337 0 0 312040033476 0 777777000000
IT1 031337 0 0 0 312040033476 0 777777000000
AT3 031337 0 0 0 000000033476 0 312040033476
AT6 031337 033476 0 0 000000033476 0 312040033476
FT0 031337 033476 0 0 777777000000 0 312040033476
FT1A 031337 033476 0 0 777777000000 0 777777000000
FT2 031337 033476 0 0 0 0 777777000000
FT2RQ 031337 033476 0 0 777777000000 0 777777000000
FT3 031337 033476 0 0 777777000000 0 777777000000
FT9 031340 033476 0 0 777777000000 0 777777000000
ET0 031341 033476 0 0 0 0 777777000000
ST1A 031341 033476 0 0 0 0 777777000000
ST9 031341 033476 0 0 0 0 777777000000
*031341 JUMPA 0,031342
INITIAL
C(AC)=777777 777777
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 777777777777 0 000000031342
FT3 031341 031342 0 0 777777777777 0 000000031342
FT9 031342 031342 0 0 777777777777 0 000000031342
ET0 031342 031342 0 0 777777777777 0 000000031342
ST1A 031342 031342 0 0 777777777777 0 000000031342
ST9 031342 031342 0 0 777777777777 0 000000031342
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 95
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0252
*031342 SETO 1,000000
INITIAL
C(AC)=777777 000000
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031342 031342 0 0 474040000000 0 0
IT1 031342 0 0 0 474040000000 0 0
AT3 031342 0 0 0 0 0 474040000000
AT6 031342 0 0 0 0 0 474040000000
FT1A 031342 0 0 0 0 0 0
FT9 031343 0 0 0 0 0 0
ET0 031343 0 0 0 777777777777 0 0
ST1 031343 0 0 0 777777777777 0 0
ST2 031343 0 0 0 777777777777 0 0
ST9 031343 0 0 0 777777777777 0 0
*031343 MOVE 2,033477
INITIAL
C(AC)=123456 123456
C(E)=777777 777775
FINAL
C(AC)=777777 777775
TIME PC MA SC FE AR MQ BR
IT0 031343 031343 0 0 200100033477 0 777777777775
IT1 031343 0 0 0 200100033477 0 777777777775
AT3 031343 0 0 0 000000033477 0 200100033477
AT6 031343 033477 0 0 000000033477 0 200100033477
FT0 031343 033477 0 0 777777777775 0 200100033477
FT1A 031343 033477 0 0 777777777775 0 777777777775
FT9 031344 033477 0 0 777777777775 0 777777777775
ET0 031344 033477 0 0 777777777775 0 777777777775
ST1 031344 033477 0 0 777777777775 0 777777777775
ST2 031344 033477 0 0 777777777775 0 777777777775
ST9 031344 033477 0 0 777777777775 0 777777777775
*031344 MOVNM 1,000002
INITIAL
C(AC)=777777 777777
C(E)=777777 777775
FINAL
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031344 031344 0 0 212040000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 96
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0253
IT1 031344 0 0 0 212040000002 0 000000000002
AT3 031344 0 0 0 000000000002 0 212040000002
AT6 031344 000002 0 0 000000000002 0 212040000002
FT1A 031344 000002 0 0 000000000002 0 000000000002
FT2 031344 000002 0 0 0 0 000000000002
FT2RQ 031344 000002 0 0 777777777777 0 000000000002
FT3 031344 000002 0 0 777777777777 0 000000000002
FT9 031345 000002 0 0 777777777777 0 000000000002
ET0 031345 000002 0 0 000000000001 0 000000000002
ST6 031345 000002 0 0 000000000001 0 000000000002
ST6A 031345 000002 0 0 000000000001 0 000000000002
ST9 031345 000002 0 0 000000000001 0 000000000002
*031345 CAME 1,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031345 031345 0 0 312040033462 0 777777777777
IT1 031345 0 0 0 312040033462 0 777777777777
AT3 031345 0 0 0 000000033462 0 312040033462
AT6 031345 033462 0 0 000000033462 0 312040033462
FT0 031345 033462 0 0 777777777777 0 312040033462
FT1A 031345 033462 0 0 777777777777 0 777777777777
FT2 031345 033462 0 0 0 0 777777777777
FT2RQ 031345 033462 0 0 777777777777 0 777777777777
FT3 031345 033462 0 0 777777777777 0 777777777777
FT9 031346 033462 0 0 777777777777 0 777777777777
ET0 031347 033462 0 0 0 0 777777777777
ST1A 031347 033462 0 0 0 0 777777777777
ST9 031347 033462 0 0 0 0 777777777777
*031347 JUMPA 0,031350
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031347 031347 0 0 324000031350 0 000000031350
IT1 031347 0 0 0 324000031350 0 000000031350
AT3 031347 0 0 0 000000031350 0 324000031350
AT6 031347 031350 0 0 000000031350 0 324000031350
FT1A 031347 031350 0 0 000000031350 0 000000031350
FT2 031347 031350 0 0 0 0 000000031350
FT2RQ 031347 031350 0 0 777777777777 0 000000031350
FT3 031347 031350 0 0 777777777777 0 000000031350
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 97
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0254
FT9 031350 031350 0 0 777777777777 0 000000031350
ET0 031350 031350 0 0 777777777777 0 000000031350
ST1A 031350 031350 0 0 777777777777 0 000000031350
ST9 031350 031350 0 0 777777777777 0 000000031350
*031350 CAIE 2,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031350 031350 0 0 302100000001 0 000000000001
IT1 031350 0 0 0 302100000001 0 000000000001
AT3 031350 0 0 0 000000000001 0 302100000001
AT6 031350 000001 0 0 000000000001 0 302100000001
FT1A 031350 000001 0 0 000000000001 0 000000000001
FT2 031350 000001 0 0 0 0 000000000001
FT2RQ 031350 000001 0 0 000000000001 0 000000000001
FT3 031350 000001 0 0 000000000001 0 000000000001
FT9 031351 000001 0 0 000000000001 0 000000000001
ET0 031352 000001 0 0 0 0 000000000001
ST1A 031352 000001 0 0 0 0 000000000001
ST9 031352 000001 0 0 0 0 000000000001
*031352 JUMPA 0,031353
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031352 031352 0 0 324000031353 0 000000031353
IT1 031352 0 0 0 324000031353 0 000000031353
AT3 031352 0 0 0 000000031353 0 324000031353
AT6 031352 031353 0 0 000000031353 0 324000031353
FT1A 031352 031353 0 0 000000031353 0 000000031353
FT2 031352 031353 0 0 0 0 000000031353
FT2RQ 031352 031353 0 0 777777777777 0 000000031353
FT3 031352 031353 0 0 777777777777 0 000000031353
FT9 031353 031353 0 0 777777777777 0 000000031353
ET0 031353 031353 0 0 777777777777 0 000000031353
ST1A 031353 031353 0 0 777777777777 0 000000031353
ST9 031353 031353 0 0 777777777777 0 000000031353
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 98
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0255
*031353 SETO 1,000000
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031353 031353 0 0 474040000000 0 0
IT1 031353 0 0 0 474040000000 0 0
AT3 031353 0 0 0 0 0 474040000000
AT6 031353 0 0 0 0 0 474040000000
FT1A 031353 0 0 0 0 0 0
FT9 031354 0 0 0 0 0 0
ET0 031354 0 0 0 777777777777 0 0
ST1 031354 0 0 0 777777777777 0 0
ST2 031354 0 0 0 777777777777 0 0
ST9 031354 0 0 0 777777777777 0 0
*031354 MOVE 2,033477
INITIAL
C(AC)=000000 000001
C(E)=777777 777775
FINAL
C(AC)=777777 777775
TIME PC MA SC FE AR MQ BR
IT0 031354 031354 0 0 200100033477 0 777777777775
IT1 031354 0 0 0 200100033477 0 777777777775
AT3 031354 0 0 0 000000033477 0 200100033477
AT6 031354 033477 0 0 000000033477 0 200100033477
FT0 031354 033477 0 0 777777777775 0 200100033477
FT1A 031354 033477 0 0 777777777775 0 777777777775
FT9 031355 033477 0 0 777777777775 0 777777777775
ET0 031355 033477 0 0 777777777775 0 777777777775
ST1 031355 033477 0 0 777777777775 0 777777777775
ST2 031355 033477 0 0 777777777775 0 777777777775
ST9 031355 033477 0 0 777777777775 0 777777777775
*031355 MOVEM 2,031367
INITIAL
C(AC)=777777 777775
C(E)=000000 000000
FINAL
C(E)=777777 777775
TIME PC MA SC FE AR MQ BR
IT0 031355 031355 0 0 202100031367 0 000000031367
IT1 031355 0 0 0 202100031367 0 000000031367
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 99
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0256
AT3 031355 0 0 0 000000031367 0 202100031367
AT6 031355 031367 0 0 000000031367 0 202100031367
FT1A 031355 031367 0 0 000000031367 0 000000031367
FT2 031355 031367 0 0 0 0 000000031367
FT2RQ 031355 031367 0 0 777777777775 0 000000031367
FT3 031355 031367 0 0 777777777775 0 000000031367
FT9 031356 031367 0 0 777777777775 0 000000031367
ET0 031356 031367 0 0 777777777775 0 000000031367
ST6 031356 031367 0 0 777777777775 0 000000031367
ST6A 031356 031367 0 0 777777777775 0 000000031367
ST9 031356 031367 0 0 777777777775 0 000000031367
*031356 MOVNM 1,031367
INITIAL
C(AC)=777777 777777
C(E)=777777 777775
FINAL
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031356 031356 0 0 212040031367 0 000000031367
IT1 031356 0 0 0 212040031367 0 000000031367
AT3 031356 0 0 0 000000031367 0 212040031367
AT6 031356 031367 0 0 000000031367 0 212040031367
FT1A 031356 031367 0 0 000000031367 0 000000031367
FT2 031356 031367 0 0 0 0 000000031367
FT2RQ 031356 031367 0 0 777777777777 0 000000031367
FT3 031356 031367 0 0 777777777777 0 000000031367
FT9 031357 031367 0 0 777777777777 0 000000031367
ET0 031357 031367 0 0 000000000001 0 000000031367
ST6 031357 031367 0 0 000000000001 0 000000031367
ST6A 031357 031367 0 0 000000000001 0 000000031367
ST9 031357 031367 0 0 000000000001 0 000000031367
*031357 CAME 1,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031357 031357 0 0 312040033462 0 777777777777
IT1 031357 0 0 0 312040033462 0 777777777777
AT3 031357 0 0 0 000000033462 0 312040033462
AT6 031357 033462 0 0 000000033462 0 312040033462
FT0 031357 033462 0 0 777777777777 0 312040033462
FT1A 031357 033462 0 0 777777777777 0 777777777777
FT2 031357 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 100
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0257
FT2RQ 031357 033462 0 0 777777777777 0 777777777777
FT3 031357 033462 0 0 777777777777 0 777777777777
FT9 031360 033462 0 0 777777777777 0 777777777777
ET0 031361 033462 0 0 0 0 777777777777
ST1A 031361 033462 0 0 0 0 777777777777
ST9 031361 033462 0 0 0 0 777777777777
*031361 JUMPA 0,031362
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031361 031361 0 0 324000031362 0 000000031362
IT1 031361 0 0 0 324000031362 0 000000031362
AT3 031361 0 0 0 000000031362 0 324000031362
AT6 031361 031362 0 0 000000031362 0 324000031362
FT1A 031361 031362 0 0 000000031362 0 000000031362
FT2 031361 031362 0 0 0 0 000000031362
FT2RQ 031361 031362 0 0 777777777777 0 000000031362
FT3 031361 031362 0 0 777777777777 0 000000031362
FT9 031362 031362 0 0 777777777777 0 000000031362
ET0 031362 031362 0 0 777777777777 0 000000031362
ST1A 031362 031362 0 0 777777777777 0 000000031362
ST9 031362 031362 0 0 777777777777 0 000000031362
*031362 MOVE 2,031367
INITIAL
C(AC)=777777 777775
C(E)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031362 031362 0 0 200100031367 0 000000000001
IT1 031362 0 0 0 200100031367 0 000000000001
AT3 031362 0 0 0 000000031367 0 200100031367
AT6 031362 031367 0 0 000000031367 0 200100031367
FT0 031362 031367 0 0 000000000001 0 200100031367
FT1A 031362 031367 0 0 000000000001 0 000000000001
FT9 031363 031367 0 0 000000000001 0 000000000001
ET0 031363 031367 0 0 000000000001 0 000000000001
ST1 031363 031367 0 0 000000000001 0 000000000001
ST2 031363 031367 0 0 000000000001 0 000000000001
ST9 031363 031367 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 101
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0258
*031363 CAIE 2,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031363 031363 0 0 302100000001 0 000000000001
IT1 031363 0 0 0 302100000001 0 000000000001
AT3 031363 0 0 0 000000000001 0 302100000001
AT6 031363 000001 0 0 000000000001 0 302100000001
FT1A 031363 000001 0 0 000000000001 0 000000000001
FT2 031363 000001 0 0 0 0 000000000001
FT2RQ 031363 000001 0 0 000000000001 0 000000000001
FT3 031363 000001 0 0 000000000001 0 000000000001
FT9 031364 000001 0 0 000000000001 0 000000000001
ET0 031365 000001 0 0 0 0 000000000001
ST1A 031365 000001 0 0 0 0 000000000001
ST9 031365 000001 0 0 0 0 000000000001
*031365 JUMPA 0,031366
INITIAL
C(AC)=777777 777777
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 777777777777 0 000000031366
FT3 031365 031366 0 0 777777777777 0 000000031366
FT9 031366 031366 0 0 777777777777 0 000000031366
ET0 031366 031366 0 0 777777777777 0 000000031366
ST1A 031366 031366 0 0 777777777777 0 000000031366
ST9 031366 031366 0 0 777777777777 0 000000031366
*031366 SKIPA 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 031366 031366 0 0 334000000000 0 777777777777
IT1 031366 0 0 0 334000000000 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 102
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0259
AT3 031366 0 0 0 0 0 334000000000
AT6 031366 0 0 0 0 0 334000000000
FT0 031366 0 0 0 777777777777 0 334000000000
FT1A 031366 0 0 0 777777777777 0 777777777777
FT9 031367 0 0 0 777777777777 0 777777777777
ET0 031370 0 0 0 777777777777 0 777777777777
ST1A 031370 0 0 0 777777777777 0 777777777777
ST9 031370 0 0 0 777777777777 0 777777777777
*031370 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 031370 031370 0 0 400000000000 0 0
IT1 031370 0 0 0 400000000000 0 0
AT3 031370 0 0 0 0 0 400000000000
AT6 031370 0 0 0 0 0 400000000000
FT1A 031370 0 0 0 0 0 0
FT9 031371 0 0 0 0 0 0
ET0 031371 0 0 0 0 0 0
ST1 031371 0 0 0 0 0 0
ST2 031371 0 0 0 0 0 0
ST9 031371 0 0 0 0 0 0
*031371 MOVEI 2,000001
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031371 031371 0 0 201100000001 0 000000000001
IT1 031371 0 0 0 201100000001 0 000000000001
AT3 031371 0 0 0 000000000001 0 201100000001
AT6 031371 000001 0 0 000000000001 0 201100000001
FT1A 031371 000001 0 0 000000000001 0 000000000001
FT9 031372 000001 0 0 000000000001 0 000000000001
ET0 031372 000001 0 0 000000000001 0 000000000001
ST1 031372 000001 0 0 000000000001 0 000000000001
ST2 031372 000001 0 0 000000000001 0 000000000001
ST9 031372 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 103
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0260
*031372 MOVNS 0,000002
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 031372 031372 0 0 213000000002 0 000000000001
IT1 031372 0 0 0 213000000002 0 000000000001
AT3 031372 0 0 0 000000000002 0 213000000002
AT6 031372 000002 0 0 000000000002 0 213000000002
FT0 031372 000002 0 0 000000000001 0 213000000002
FT1A 031372 000002 0 0 000000000001 0 000000000001
FT9 031373 000002 0 0 000000000001 0 000000000001
ET0 031373 000002 0 0 777777777777 0 000000000001
ST5 031373 000002 0 0 777777777777 0 000000000001
ST6A 031373 000002 0 0 777777777777 0 000000000001
ST9 031373 000002 0 0 777777777777 0 000000000001
*031373 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 031373 031373 0 0 332000000000 0 0
IT1 031373 0 0 0 332000000000 0 0
AT3 031373 0 0 0 0 0 332000000000
AT6 031373 0 0 0 0 0 332000000000
FT0 031373 0 0 0 0 0 332000000000
FT1A 031373 0 0 0 0 0 0
FT9 031374 0 0 0 0 0 0
ET0 031375 0 0 0 0 0 0
ST1A 031375 0 0 0 0 0 0
ST9 031375 0 0 0 0 0 0
*031375 JUMPA 0,031376
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031375 031375 0 0 324000031376 0 000000031376
IT1 031375 0 0 0 324000031376 0 000000031376
AT3 031375 0 0 0 000000031376 0 324000031376
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 104
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0261
AT6 031375 031376 0 0 000000031376 0 324000031376
FT1A 031375 031376 0 0 000000031376 0 000000031376
FT2 031375 031376 0 0 0 0 000000031376
FT2RQ 031375 031376 0 0 0 0 000000031376
FT3 031375 031376 0 0 0 0 000000031376
FT9 031376 031376 0 0 0 0 000000031376
ET0 031376 031376 0 0 0 0 000000031376
ST1A 031376 031376 0 0 0 0 000000031376
ST9 031376 031376 0 0 0 0 000000031376
*031376 CAME 2,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031376 031376 0 0 312100033462 0 777777777777
IT1 031376 0 0 0 312100033462 0 777777777777
AT3 031376 0 0 0 000000033462 0 312100033462
AT6 031376 033462 0 0 000000033462 0 312100033462
FT0 031376 033462 0 0 777777777777 0 312100033462
FT1A 031376 033462 0 0 777777777777 0 777777777777
FT2 031376 033462 0 0 0 0 777777777777
FT2RQ 031376 033462 0 0 777777777777 0 777777777777
FT3 031376 033462 0 0 777777777777 0 777777777777
FT9 031377 033462 0 0 777777777777 0 777777777777
ET0 0 033462 0 0 0 0 777777777777
ST1A 0 033462 0 0 0 0 777777777777
ST9 0 033462 0 0 0 0 777777777777
*031400 JUMPA 0,031401
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 324000031401 0 000000031401
IT1 0 0 0 0 324000031401 0 000000031401
AT3 0 0 0 0 000000031401 0 324000031401
AT6 0 031401 0 0 000000031401 0 324000031401
FT1A 0 031401 0 0 000000031401 0 000000031401
FT2 0 031401 0 0 0 0 000000031401
FT2RQ 0 031401 0 0 0 0 000000031401
FT3 0 031401 0 0 0 0 000000031401
FT9 031401 031401 0 0 0 0 000000031401
ET0 031401 031401 0 0 0 0 000000031401
ST1A 031401 031401 0 0 0 0 000000031401
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 105
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0262
ST9 031401 031401 0 0 0 0 000000031401
*031401 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 031401 031401 0 0 400000000000 0 0
IT1 031401 0 0 0 400000000000 0 0
AT3 031401 0 0 0 0 0 400000000000
AT6 031401 0 0 0 0 0 400000000000
FT1A 031401 0 0 0 0 0 0
FT9 031402 0 0 0 0 0 0
ET0 031402 0 0 0 0 0 0
ST1 031402 0 0 0 0 0 0
ST2 031402 0 0 0 0 0 0
ST9 031402 0 0 0 0 0 0
*031402 MOVEI 2,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031402 031402 0 0 201100000001 0 000000000001
IT1 031402 0 0 0 201100000001 0 000000000001
AT3 031402 0 0 0 000000000001 0 201100000001
AT6 031402 000001 0 0 000000000001 0 201100000001
FT1A 031402 000001 0 0 000000000001 0 000000000001
FT9 031403 000001 0 0 000000000001 0 000000000001
ET0 031403 000001 0 0 000000000001 0 000000000001
ST1 031403 000001 0 0 000000000001 0 000000000001
ST2 031403 000001 0 0 000000000001 0 000000000001
ST9 031403 000001 0 0 000000000001 0 000000000001
*031403 MOVEM 2,031415
INITIAL
C(AC)=000000 000001
C(E)=000000 000000
FINAL
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031403 031403 0 0 202100031415 0 000000031415
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 106
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0263
IT1 031403 0 0 0 202100031415 0 000000031415
AT3 031403 0 0 0 000000031415 0 202100031415
AT6 031403 031415 0 0 000000031415 0 202100031415
FT1A 031403 031415 0 0 000000031415 0 000000031415
FT2 031403 031415 0 0 0 0 000000031415
FT2RQ 031403 031415 0 0 000000000001 0 000000031415
FT3 031403 031415 0 0 000000000001 0 000000031415
FT9 031404 031415 0 0 000000000001 0 000000031415
ET0 031404 031415 0 0 000000000001 0 000000031415
ST6 031404 031415 0 0 000000000001 0 000000031415
ST6A 031404 031415 0 0 000000000001 0 000000031415
ST9 031404 031415 0 0 000000000001 0 000000031415
*031404 MOVNS 0,031415
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 031404 031404 0 0 213000031415 0 000000000001
IT1 031404 0 0 0 213000031415 0 000000000001
AT3 031404 0 0 0 000000031415 0 213000031415
AT6 031404 031415 0 0 000000031415 0 213000031415
FT0 031404 031415 0 0 000000000001 0 213000031415
FT1A 031404 031415 0 0 000000000001 0 000000000001
FT9 031405 031415 0 0 000000000001 0 000000000001
ET0 031405 031415 0 0 777777777777 0 000000000001
ST5 031405 031415 0 0 777777777777 0 000000000001
ST6A 031405 031415 0 0 777777777777 0 000000000001
ST9 031405 031415 0 0 777777777777 0 000000000001
*031405 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 031405 031405 0 0 332000000000 0 0
IT1 031405 0 0 0 332000000000 0 0
AT3 031405 0 0 0 0 0 332000000000
AT6 031405 0 0 0 0 0 332000000000
FT0 031405 0 0 0 0 0 332000000000
FT1A 031405 0 0 0 0 0 0
FT9 031406 0 0 0 0 0 0
ET0 031407 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 107
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0264
ST1A 031407 0 0 0 0 0 0
ST9 031407 0 0 0 0 0 0
*031407 JUMPA 0,031410
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031407 031407 0 0 324000031410 0 000000031410
IT1 031407 0 0 0 324000031410 0 000000031410
AT3 031407 0 0 0 000000031410 0 324000031410
AT6 031407 031410 0 0 000000031410 0 324000031410
FT1A 031407 031410 0 0 000000031410 0 000000031410
FT2 031407 031410 0 0 0 0 000000031410
FT2RQ 031407 031410 0 0 0 0 000000031410
FT3 031407 031410 0 0 0 0 000000031410
FT9 031410 031410 0 0 0 0 000000031410
ET0 031410 031410 0 0 0 0 000000031410
ST1A 031410 031410 0 0 0 0 000000031410
ST9 031410 031410 0 0 0 0 000000031410
*031410 MOVE 2,031415
INITIAL
C(AC)=000000 000001
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031410 031410 0 0 200100031415 0 777777777777
IT1 031410 0 0 0 200100031415 0 777777777777
AT3 031410 0 0 0 000000031415 0 200100031415
AT6 031410 031415 0 0 000000031415 0 200100031415
FT0 031410 031415 0 0 777777777777 0 200100031415
FT1A 031410 031415 0 0 777777777777 0 777777777777
FT9 031411 031415 0 0 777777777777 0 777777777777
ET0 031411 031415 0 0 777777777777 0 777777777777
ST1 031411 031415 0 0 777777777777 0 777777777777
ST2 031411 031415 0 0 777777777777 0 777777777777
ST9 031411 031415 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 108
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0265
*031411 CAME 2,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031411 031411 0 0 312100033462 0 777777777777
IT1 031411 0 0 0 312100033462 0 777777777777
AT3 031411 0 0 0 000000033462 0 312100033462
AT6 031411 033462 0 0 000000033462 0 312100033462
FT0 031411 033462 0 0 777777777777 0 312100033462
FT1A 031411 033462 0 0 777777777777 0 777777777777
FT2 031411 033462 0 0 0 0 777777777777
FT2RQ 031411 033462 0 0 777777777777 0 777777777777
FT3 031411 033462 0 0 777777777777 0 777777777777
FT9 031412 033462 0 0 777777777777 0 777777777777
ET0 031413 033462 0 0 0 0 777777777777
ST1A 031413 033462 0 0 0 0 777777777777
ST9 031413 033462 0 0 0 0 777777777777
*031413 JUMPA 0,031414
INITIAL
C(AC)=000000 000000
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
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 0 0 000000031414
FT3 031413 031414 0 0 0 0 000000031414
FT9 031414 031414 0 0 0 0 000000031414
ET0 031414 031414 0 0 0 0 000000031414
ST1A 031414 031414 0 0 0 0 000000031414
ST9 031414 031414 0 0 0 0 000000031414
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 109
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0266
*031414 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 031414 031414 0 0 334000000000 0 0
IT1 031414 0 0 0 334000000000 0 0
AT3 031414 0 0 0 0 0 334000000000
AT6 031414 0 0 0 0 0 334000000000
FT0 031414 0 0 0 0 0 334000000000
FT1A 031414 0 0 0 0 0 0
FT9 031415 0 0 0 0 0 0
ET0 031416 0 0 0 0 0 0
ST1A 031416 0 0 0 0 0 0
ST9 031416 0 0 0 0 0 0
*031416 SETZ 1,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031416 031416 0 0 400040000000 0 0
IT1 031416 0 0 0 400040000000 0 0
AT3 031416 0 0 0 0 0 400040000000
AT6 031416 0 0 0 0 0 400040000000
FT1A 031416 0 0 0 0 0 0
FT9 031417 0 0 0 0 0 0
ET0 031417 0 0 0 0 0 0
ST1 031417 0 0 0 0 0 0
ST2 031417 0 0 0 0 0 0
ST9 031417 0 0 0 0 0 0
*031417 MOVEI 2,000003
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031417 031417 0 0 201100000003 0 000000000003
IT1 031417 0 0 0 201100000003 0 000000000003
AT3 031417 0 0 0 000000000003 0 201100000003
AT6 031417 000003 0 0 000000000003 0 201100000003
FT1A 031417 000003 0 0 000000000003 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 110
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0267
FT9 031420 000003 0 0 000000000003 0 000000000003
ET0 031420 000003 0 0 000000000003 0 000000000003
ST1 031420 000003 0 0 000000000003 0 000000000003
ST2 031420 000003 0 0 000000000003 0 000000000003
ST9 031420 000003 0 0 000000000003 0 000000000003
*031420 MOVNS 1,000002
INITIAL
C(AC)=000000 000000
C(E)=000000 000003
FINAL
C(AC)=777777 777775
C(E)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031420 031420 0 0 213040000002 0 000000000003
IT1 031420 0 0 0 213040000002 0 000000000003
AT3 031420 0 0 0 000000000002 0 213040000002
AT6 031420 000002 0 0 000000000002 0 213040000002
FT0 031420 000002 0 0 000000000003 0 213040000002
FT1A 031420 000002 0 0 000000000003 0 000000000003
FT9 031421 000002 0 0 000000000003 0 000000000003
ET0 031421 000002 0 0 777777777775 0 000000000003
ST1 031421 000002 0 0 777777777775 0 000000000003
ST2 031421 000002 0 0 777777777775 0 000000000003
ST5 031421 000002 0 0 777777777775 0 000000000003
ST6A 031421 000002 0 0 777777777775 0 000000000003
ST9 031421 000002 0 0 777777777775 0 000000000003
*031421 CAME 1,033477
INITIAL
C(AC)=777777 777775
C(E)=777777 777775
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031421 031421 0 0 312040033477 0 777777777775
IT1 031421 0 0 0 312040033477 0 777777777775
AT3 031421 0 0 0 000000033477 0 312040033477
AT6 031421 033477 0 0 000000033477 0 312040033477
FT0 031421 033477 0 0 777777777775 0 312040033477
FT1A 031421 033477 0 0 777777777775 0 777777777775
FT2 031421 033477 0 0 0 0 777777777775
FT2RQ 031421 033477 0 0 777777777775 0 777777777775
FT3 031421 033477 0 0 777777777775 0 777777777775
FT9 031422 033477 0 0 777777777775 0 777777777775
ET0 031423 033477 0 0 0 0 777777777775
ST1A 031423 033477 0 0 0 0 777777777775
ST9 031423 033477 0 0 0 0 777777777775
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 111
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0268
*031423 JUMPA 0,031424
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031423 031423 0 0 324000031424 0 000000031424
IT1 031423 0 0 0 324000031424 0 000000031424
AT3 031423 0 0 0 000000031424 0 324000031424
AT6 031423 031424 0 0 000000031424 0 324000031424
FT1A 031423 031424 0 0 000000031424 0 000000031424
FT2 031423 031424 0 0 0 0 000000031424
FT2RQ 031423 031424 0 0 0 0 000000031424
FT3 031423 031424 0 0 0 0 000000031424
FT9 031424 031424 0 0 0 0 000000031424
ET0 031424 031424 0 0 0 0 000000031424
ST1A 031424 031424 0 0 0 0 000000031424
ST9 031424 031424 0 0 0 0 000000031424
*031424 CAME 2,033477
INITIAL
C(AC)=777777 777775
C(E)=777777 777775
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031424 031424 0 0 312100033477 0 777777777775
IT1 031424 0 0 0 312100033477 0 777777777775
AT3 031424 0 0 0 000000033477 0 312100033477
AT6 031424 033477 0 0 000000033477 0 312100033477
FT0 031424 033477 0 0 777777777775 0 312100033477
FT1A 031424 033477 0 0 777777777775 0 777777777775
FT2 031424 033477 0 0 0 0 777777777775
FT2RQ 031424 033477 0 0 777777777775 0 777777777775
FT3 031424 033477 0 0 777777777775 0 777777777775
FT9 031425 033477 0 0 777777777775 0 777777777775
ET0 031426 033477 0 0 0 0 777777777775
ST1A 031426 033477 0 0 0 0 777777777775
ST9 031426 033477 0 0 0 0 777777777775
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 112
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0269
*031426 JUMPA 0,031427
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031426 031426 0 0 324000031427 0 000000031427
IT1 031426 0 0 0 324000031427 0 000000031427
AT3 031426 0 0 0 000000031427 0 324000031427
AT6 031426 031427 0 0 000000031427 0 324000031427
FT1A 031426 031427 0 0 000000031427 0 000000031427
FT2 031426 031427 0 0 0 0 000000031427
FT2RQ 031426 031427 0 0 0 0 000000031427
FT3 031426 031427 0 0 0 0 000000031427
FT9 031427 031427 0 0 0 0 000000031427
ET0 031427 031427 0 0 0 0 000000031427
ST1A 031427 031427 0 0 0 0 000000031427
ST9 031427 031427 0 0 0 0 000000031427
*031427 SETZ 1,000000
INITIAL
C(AC)=777777 777775
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031427 031427 0 0 400040000000 0 0
IT1 031427 0 0 0 400040000000 0 0
AT3 031427 0 0 0 0 0 400040000000
AT6 031427 0 0 0 0 0 400040000000
FT1A 031427 0 0 0 0 0 0
FT9 031430 0 0 0 0 0 0
ET0 031430 0 0 0 0 0 0
ST1 031430 0 0 0 0 0 0
ST2 031430 0 0 0 0 0 0
ST9 031430 0 0 0 0 0 0
*031430 MOVMI 1,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 777776
TIME PC MA SC FE AR MQ BR
IT0 031430 031430 0 0 215040777776 0 000000777776
IT1 031430 0 0 0 215040777776 0 000000777776
AT3 031430 0 0 0 000000777776 0 215040777776
AT6 031430 777776 0 0 000000777776 0 215040777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 113
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0270
FT1A 031430 777776 0 0 000000777776 0 000000777776
FT9 031431 777776 0 0 000000777776 0 000000777776
ET0 031431 777776 0 0 000000777776 0 000000777776
ST1 031431 777776 0 0 000000777776 0 000000777776
ST2 031431 777776 0 0 000000777776 0 000000777776
ST9 031431 777776 0 0 000000777776 0 000000777776
*031431 CAIE 1,777776
INITIAL
C(AC)=000000 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031431 031431 0 0 302040777776 0 000000777776
IT1 031431 0 0 0 302040777776 0 000000777776
AT3 031431 0 0 0 000000777776 0 302040777776
AT6 031431 777776 0 0 000000777776 0 302040777776
FT1A 031431 777776 0 0 000000777776 0 000000777776
FT2 031431 777776 0 0 0 0 000000777776
FT2RQ 031431 777776 0 0 000000777776 0 000000777776
FT3 031431 777776 0 0 000000777776 0 000000777776
FT9 031432 777776 0 0 000000777776 0 000000777776
ET0 031433 777776 0 0 0 0 000000777776
ST1A 031433 777776 0 0 0 0 000000777776
ST9 031433 777776 0 0 0 0 000000777776
*031433 JUMPA 0,031434
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031433 031433 0 0 324000031434 0 000000031434
IT1 031433 0 0 0 324000031434 0 000000031434
AT3 031433 0 0 0 000000031434 0 324000031434
AT6 031433 031434 0 0 000000031434 0 324000031434
FT1A 031433 031434 0 0 000000031434 0 000000031434
FT2 031433 031434 0 0 0 0 000000031434
FT2RQ 031433 031434 0 0 0 0 000000031434
FT3 031433 031434 0 0 0 0 000000031434
FT9 031434 031434 0 0 0 0 000000031434
ET0 031434 031434 0 0 0 0 000000031434
ST1A 031434 031434 0 0 0 0 000000031434
ST9 031434 031434 0 0 0 0 000000031434
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 114
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0271
*031434 SETZ 1,000000
INITIAL
C(AC)=000000 777776
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031434 031434 0 0 400040000000 0 0
IT1 031434 0 0 0 400040000000 0 0
AT3 031434 0 0 0 0 0 400040000000
AT6 031434 0 0 0 0 0 400040000000
FT1A 031434 0 0 0 0 0 0
FT9 031435 0 0 0 0 0 0
ET0 031435 0 0 0 0 0 0
ST1 031435 0 0 0 0 0 0
ST2 031435 0 0 0 0 0 0
ST9 031435 0 0 0 0 0 0
*031435 MOVE 3,033500
INITIAL
C(AC)=000000 000000
C(E)=777777 777776
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031435 031435 0 0 200140033500 0 777777777776
IT1 031435 0 0 0 200140033500 0 777777777776
AT3 031435 0 0 0 000000033500 0 200140033500
AT6 031435 0 0 0 000000033500 0 200140033500
FT0 031435 0 0 0 777777777776 0 200140033500
FT1A 031435 0 0 0 777777777776 0 777777777776
FT9 031436 0 0 0 777777777776 0 777777777776
ET0 031436 0 0 0 777777777776 0 777777777776
ST1 031436 0 0 0 777777777776 0 777777777776
ST2 031436 0 0 0 777777777776 0 777777777776
ST9 031436 0 0 0 777777777776 0 777777777776
*031436 MOVM 1,000003
INITIAL
C(AC)=000000 000000
C(E)=777777 777776
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031436 031436 0 0 214040000003 0 777777777776
IT1 031436 0 0 0 214040000003 0 777777777776
AT3 031436 0 0 0 000000000003 0 214040000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 115
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0272
AT6 031436 000003 0 0 000000000003 0 214040000003
FT0 031436 000003 0 0 777777777776 0 214040000003
FT1A 031436 000003 0 0 777777777776 0 777777777776
FT9 031437 000003 0 0 777777777776 0 777777777776
ET0 031437 000003 0 0 000000000002 0 777777777776
ST1 031437 000003 0 0 000000000002 0 777777777776
ST2 031437 000003 0 0 000000000002 0 777777777776
ST9 031437 000003 0 0 000000000002 0 777777777776
*031437 CAIE 1,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031437 031437 0 0 302040000002 0 000000000002
IT1 031437 0 0 0 302040000002 0 000000000002
AT3 031437 0 0 0 000000000002 0 302040000002
AT6 031437 000002 0 0 000000000002 0 302040000002
FT1A 031437 000002 0 0 000000000002 0 000000000002
FT2 031437 000002 0 0 0 0 000000000002
FT2RQ 031437 000002 0 0 000000000002 0 000000000002
FT3 031437 000002 0 0 000000000002 0 000000000002
FT9 031440 000002 0 0 000000000002 0 000000000002
ET0 031441 000002 0 0 0 0 000000000002
ST1A 031441 000002 0 0 0 0 000000000002
ST9 031441 000002 0 0 0 0 000000000002
*031441 JUMPA 0,031442
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031441 031441 0 0 324000031442 0 000000031442
IT1 031441 0 0 0 324000031442 0 000000031442
AT3 031441 0 0 0 000000031442 0 324000031442
AT6 031441 031442 0 0 000000031442 0 324000031442
FT1A 031441 031442 0 0 000000031442 0 000000031442
FT2 031441 031442 0 0 0 0 000000031442
FT2RQ 031441 031442 0 0 0 0 000000031442
FT3 031441 031442 0 0 0 0 000000031442
FT9 031442 031442 0 0 0 0 000000031442
ET0 031442 031442 0 0 0 0 000000031442
ST1A 031442 031442 0 0 0 0 000000031442
ST9 031442 031442 0 0 0 0 000000031442
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 116
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0273
*031442 MOVE 1,033500
INITIAL
C(AC)=000000 000002
C(E)=777777 777776
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031442 031442 0 0 200040033500 0 777777777776
IT1 031442 0 0 0 200040033500 0 777777777776
AT3 031442 0 0 0 000000033500 0 200040033500
AT6 031442 0 0 0 000000033500 0 200040033500
FT0 031442 0 0 0 777777777776 0 200040033500
FT1A 031442 0 0 0 777777777776 0 777777777776
FT9 031443 0 0 0 777777777776 0 777777777776
ET0 031443 0 0 0 777777777776 0 777777777776
ST1 031443 0 0 0 777777777776 0 777777777776
ST2 031443 0 0 0 777777777776 0 777777777776
ST9 031443 0 0 0 777777777776 0 777777777776
*031443 SETZ 2,000000
INITIAL
C(AC)=777777 777775
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031443 031443 0 0 400100000000 0 0
IT1 031443 0 0 0 400100000000 0 0
AT3 031443 0 0 0 0 0 400100000000
AT6 031443 0 0 0 0 0 400100000000
FT1A 031443 0 0 0 0 0 0
FT9 031444 0 0 0 0 0 0
ET0 031444 0 0 0 0 0 0
ST1 031444 0 0 0 0 0 0
ST2 031444 0 0 0 0 0 0
ST9 031444 0 0 0 0 0 0
*031444 MOVMM 1,000002
INITIAL
C(AC)=777777 777776
C(E)=000000 000000
FINAL
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031444 031444 0 0 216040000002 0 000000000002
IT1 031444 0 0 0 216040000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 117
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0274
AT3 031444 0 0 0 000000000002 0 216040000002
AT6 031444 000002 0 0 000000000002 0 216040000002
FT1A 031444 000002 0 0 000000000002 0 000000000002
FT2 031444 000002 0 0 0 0 000000000002
FT2RQ 031444 000002 0 0 777777777776 0 000000000002
FT3 031444 000002 0 0 777777777776 0 000000000002
FT9 031445 000002 0 0 777777777776 0 000000000002
ET0 031445 000002 0 0 000000000002 0 000000000002
ST6 031445 000002 0 0 000000000002 0 000000000002
ST6A 031445 000002 0 0 000000000002 0 000000000002
ST9 031445 000002 0 0 000000000002 0 000000000002
*031445 CAME 1,033500
INITIAL
C(AC)=777777 777776
C(E)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031445 031445 0 0 312040033500 0 777777777776
IT1 031445 0 0 0 312040033500 0 777777777776
AT3 031445 0 0 0 000000033500 0 312040033500
AT6 031445 0 0 0 000000033500 0 312040033500
FT0 031445 0 0 0 777777777776 0 312040033500
FT1A 031445 0 0 0 777777777776 0 777777777776
FT2 031445 0 0 0 0 0 777777777776
FT2RQ 031445 0 0 0 777777777776 0 777777777776
FT3 031445 0 0 0 777777777776 0 777777777776
FT9 031446 0 0 0 777777777776 0 777777777776
ET0 031447 0 0 0 0 0 777777777776
ST1A 031447 0 0 0 0 0 777777777776
ST9 031447 0 0 0 0 0 777777777776
*031447 JUMPA 0,031450
INITIAL
C(AC)=000000 000000
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 0 0 000000031450
FT3 031447 031450 0 0 0 0 000000031450
FT9 031450 031450 0 0 0 0 000000031450
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 118
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0275
ET0 031450 031450 0 0 0 0 000000031450
ST1A 031450 031450 0 0 0 0 000000031450
ST9 031450 031450 0 0 0 0 000000031450
*031450 CAIE 2,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031450 031450 0 0 302100000002 0 000000000002
IT1 031450 0 0 0 302100000002 0 000000000002
AT3 031450 0 0 0 000000000002 0 302100000002
AT6 031450 000002 0 0 000000000002 0 302100000002
FT1A 031450 000002 0 0 000000000002 0 000000000002
FT2 031450 000002 0 0 0 0 000000000002
FT2RQ 031450 000002 0 0 000000000002 0 000000000002
FT3 031450 000002 0 0 000000000002 0 000000000002
FT9 031451 000002 0 0 000000000002 0 000000000002
ET0 031452 000002 0 0 0 0 000000000002
ST1A 031452 000002 0 0 0 0 000000000002
ST9 031452 000002 0 0 0 0 000000000002
*031452 JUMPA 0,031453
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031452 031452 0 0 324000031453 0 000000031453
IT1 031452 0 0 0 324000031453 0 000000031453
AT3 031452 0 0 0 000000031453 0 324000031453
AT6 031452 031453 0 0 000000031453 0 324000031453
FT1A 031452 031453 0 0 000000031453 0 000000031453
FT2 031452 031453 0 0 0 0 000000031453
FT2RQ 031452 031453 0 0 0 0 000000031453
FT3 031452 031453 0 0 0 0 000000031453
FT9 031453 031453 0 0 0 0 000000031453
ET0 031453 031453 0 0 0 0 000000031453
ST1A 031453 031453 0 0 0 0 000000031453
ST9 031453 031453 0 0 0 0 000000031453
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 119
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0276
*031453 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 031453 031453 0 0 400000000000 0 0
IT1 031453 0 0 0 400000000000 0 0
AT3 031453 0 0 0 0 0 400000000000
AT6 031453 0 0 0 0 0 400000000000
FT1A 031453 0 0 0 0 0 0
FT9 031454 0 0 0 0 0 0
ET0 031454 0 0 0 0 0 0
ST1 031454 0 0 0 0 0 0
ST2 031454 0 0 0 0 0 0
ST9 031454 0 0 0 0 0 0
*031454 MOVE 2,033500
INITIAL
C(AC)=000000 000002
C(E)=777777 777776
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031454 031454 0 0 200100033500 0 777777777776
IT1 031454 0 0 0 200100033500 0 777777777776
AT3 031454 0 0 0 000000033500 0 200100033500
AT6 031454 0 0 0 000000033500 0 200100033500
FT0 031454 0 0 0 777777777776 0 200100033500
FT1A 031454 0 0 0 777777777776 0 777777777776
FT9 031455 0 0 0 777777777776 0 777777777776
ET0 031455 0 0 0 777777777776 0 777777777776
ST1 031455 0 0 0 777777777776 0 777777777776
ST2 031455 0 0 0 777777777776 0 777777777776
ST9 031455 0 0 0 777777777776 0 777777777776
*031455 MOVMS 0,000002
INITIAL
C(AC)=000000 000000
C(E)=777777 777776
FINAL
C(AC)=000000 000000
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031455 031455 0 0 217000000002 0 777777777776
IT1 031455 0 0 0 217000000002 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 120
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0277
AT3 031455 0 0 0 000000000002 0 217000000002
AT6 031455 000002 0 0 000000000002 0 217000000002
FT0 031455 000002 0 0 777777777776 0 217000000002
FT1A 031455 000002 0 0 777777777776 0 777777777776
FT9 031456 000002 0 0 777777777776 0 777777777776
ET0 031456 000002 0 0 000000000002 0 777777777776
ST5 031456 000002 0 0 000000000002 0 777777777776
ST6A 031456 000002 0 0 000000000002 0 777777777776
ST9 031456 000002 0 0 000000000002 0 777777777776
*031456 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 031456 031456 0 0 332000000000 0 0
IT1 031456 0 0 0 332000000000 0 0
AT3 031456 0 0 0 0 0 332000000000
AT6 031456 0 0 0 0 0 332000000000
FT0 031456 0 0 0 0 0 332000000000
FT1A 031456 0 0 0 0 0 0
FT9 031457 0 0 0 0 0 0
ET0 031460 0 0 0 0 0 0
ST1A 031460 0 0 0 0 0 0
ST9 031460 0 0 0 0 0 0
*031460 JUMPA 0,031461
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031460 031460 0 0 324000031461 0 000000031461
IT1 031460 0 0 0 324000031461 0 000000031461
AT3 031460 0 0 0 000000031461 0 324000031461
AT6 031460 031461 0 0 000000031461 0 324000031461
FT1A 031460 031461 0 0 000000031461 0 000000031461
FT2 031460 031461 0 0 0 0 000000031461
FT2RQ 031460 031461 0 0 0 0 000000031461
FT3 031460 031461 0 0 0 0 000000031461
FT9 031461 031461 0 0 0 0 000000031461
ET0 031461 031461 0 0 0 0 000000031461
ST1A 031461 031461 0 0 0 0 000000031461
ST9 031461 031461 0 0 0 0 000000031461
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 121
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0278
*031461 CAIE 2,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031461 031461 0 0 302100000002 0 000000000002
IT1 031461 0 0 0 302100000002 0 000000000002
AT3 031461 0 0 0 000000000002 0 302100000002
AT6 031461 000002 0 0 000000000002 0 302100000002
FT1A 031461 000002 0 0 000000000002 0 000000000002
FT2 031461 000002 0 0 0 0 000000000002
FT2RQ 031461 000002 0 0 000000000002 0 000000000002
FT3 031461 000002 0 0 000000000002 0 000000000002
FT9 031462 000002 0 0 000000000002 0 000000000002
ET0 031463 000002 0 0 0 0 000000000002
ST1A 031463 000002 0 0 0 0 000000000002
ST9 031463 000002 0 0 0 0 000000000002
*031463 JUMPA 0,031464
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031463 031463 0 0 324000031464 0 000000031464
IT1 031463 0 0 0 324000031464 0 000000031464
AT3 031463 0 0 0 000000031464 0 324000031464
AT6 031463 031464 0 0 000000031464 0 324000031464
FT1A 031463 031464 0 0 000000031464 0 000000031464
FT2 031463 031464 0 0 0 0 000000031464
FT2RQ 031463 031464 0 0 0 0 000000031464
FT3 031463 031464 0 0 0 0 000000031464
FT9 031464 031464 0 0 0 0 000000031464
ET0 031464 031464 0 0 0 0 000000031464
ST1A 031464 031464 0 0 0 0 000000031464
ST9 031464 031464 0 0 0 0 000000031464
*031464 SETO 1,000000
INITIAL
C(AC)=777777 777776
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031464 031464 0 0 474040000000 0 0
IT1 031464 0 0 0 474040000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 122
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0279
AT3 031464 0 0 0 0 0 474040000000
AT6 031464 0 0 0 0 0 474040000000
FT1A 031464 0 0 0 0 0 0
FT9 031465 0 0 0 0 0 0
ET0 031465 0 0 0 777777777777 0 0
ST1 031465 0 0 0 777777777777 0 0
ST2 031465 0 0 0 777777777777 0 0
ST9 031465 0 0 0 777777777777 0 0
*031465 MOVE 2,033500
INITIAL
C(AC)=000000 000002
C(E)=777777 777776
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031465 031465 0 0 200100033500 0 777777777776
IT1 031465 0 0 0 200100033500 0 777777777776
AT3 031465 0 0 0 000000033500 0 200100033500
AT6 031465 0 0 0 000000033500 0 200100033500
FT0 031465 0 0 0 777777777776 0 200100033500
FT1A 031465 0 0 0 777777777776 0 777777777776
FT9 031466 0 0 0 777777777776 0 777777777776
ET0 031466 0 0 0 777777777776 0 777777777776
ST1 031466 0 0 0 777777777776 0 777777777776
ST2 031466 0 0 0 777777777776 0 777777777776
ST9 031466 0 0 0 777777777776 0 777777777776
*031466 MOVMS 1,000002
INITIAL
C(AC)=777777 777777
C(E)=777777 777776
FINAL
C(AC)=000000 000002
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031466 031466 0 0 217040000002 0 777777777776
IT1 031466 0 0 0 217040000002 0 777777777776
AT3 031466 0 0 0 000000000002 0 217040000002
AT6 031466 000002 0 0 000000000002 0 217040000002
FT0 031466 000002 0 0 777777777776 0 217040000002
FT1A 031466 000002 0 0 777777777776 0 777777777776
FT9 031467 000002 0 0 777777777776 0 777777777776
ET0 031467 000002 0 0 000000000002 0 777777777776
ST1 031467 000002 0 0 000000000002 0 777777777776
ST2 031467 000002 0 0 000000000002 0 777777777776
ST5 031467 000002 0 0 000000000002 0 777777777776
ST6A 031467 000002 0 0 000000000002 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 123
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0280
ST9 031467 000002 0 0 000000000002 0 777777777776
*031467 CAIE 1,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031467 031467 0 0 302040000002 0 000000000002
IT1 031467 0 0 0 302040000002 0 000000000002
AT3 031467 0 0 0 000000000002 0 302040000002
AT6 031467 000002 0 0 000000000002 0 302040000002
FT1A 031467 000002 0 0 000000000002 0 000000000002
FT2 031467 000002 0 0 0 0 000000000002
FT2RQ 031467 000002 0 0 000000000002 0 000000000002
FT3 031467 000002 0 0 000000000002 0 000000000002
FT9 031470 000002 0 0 000000000002 0 000000000002
ET0 031471 000002 0 0 0 0 000000000002
ST1A 031471 000002 0 0 0 0 000000000002
ST9 031471 000002 0 0 0 0 000000000002
*031471 JUMPA 0,031472
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031471 031471 0 0 324000031472 0 000000031472
IT1 031471 0 0 0 324000031472 0 000000031472
AT3 031471 0 0 0 000000031472 0 324000031472
AT6 031471 031472 0 0 000000031472 0 324000031472
FT1A 031471 031472 0 0 000000031472 0 000000031472
FT2 031471 031472 0 0 0 0 000000031472
FT2RQ 031471 031472 0 0 0 0 000000031472
FT3 031471 031472 0 0 0 0 000000031472
FT9 031472 031472 0 0 0 0 000000031472
ET0 031472 031472 0 0 0 0 000000031472
ST1A 031472 031472 0 0 0 0 000000031472
ST9 031472 031472 0 0 0 0 000000031472
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 124
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0281
*031472 CAIE 2,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031472 031472 0 0 302100000002 0 000000000002
IT1 031472 0 0 0 302100000002 0 000000000002
AT3 031472 0 0 0 000000000002 0 302100000002
AT6 031472 000002 0 0 000000000002 0 302100000002
FT1A 031472 000002 0 0 000000000002 0 000000000002
FT2 031472 000002 0 0 0 0 000000000002
FT2RQ 031472 000002 0 0 000000000002 0 000000000002
FT3 031472 000002 0 0 000000000002 0 000000000002
FT9 031473 000002 0 0 000000000002 0 000000000002
ET0 031474 000002 0 0 0 0 000000000002
ST1A 031474 000002 0 0 0 0 000000000002
ST9 031474 000002 0 0 0 0 000000000002
*031474 JUMPA 0,031475
INITIAL
C(AC)=000000 000000
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 0 0 000000031475
FT3 031474 031475 0 0 0 0 000000031475
FT9 031475 031475 0 0 0 0 000000031475
ET0 031475 031475 0 0 0 0 000000031475
ST1A 031475 031475 0 0 0 0 000000031475
ST9 031475 031475 0 0 0 0 000000031475
*031475 MOVEI 1,000070
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000070
TIME PC MA SC FE AR MQ BR
IT0 031475 031475 0 0 201040000070 0 000000000070
IT1 031475 0 0 0 201040000070 0 000000000070
AT3 031475 0 0 0 000000000070 0 201040000070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 125
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0282
AT6 031475 000070 0 0 000000000070 0 201040000070
FT1A 031475 000070 0 0 000000000070 0 000000000070
FT9 031476 000070 0 0 000000000070 0 000000000070
ET0 031476 000070 0 0 000000000070 0 000000000070
ST1 031476 000070 0 0 000000000070 0 000000000070
ST2 031476 000070 0 0 000000000070 0 000000000070
ST9 031476 000070 0 0 000000000070 0 000000000070
*031476 SUBI 1,000002
INITIAL
C(AC)=000000 000070
FINAL
C(AC)=000000 000066
TIME PC MA SC FE AR MQ BR
IT0 031476 031476 0 0 275040000002 0 000000000002
IT1 031476 0 0 0 275040000002 0 000000000002
AT3 031476 0 0 0 000000000002 0 275040000002
AT6 031476 000002 0 0 000000000002 0 275040000002
FT1A 031476 000002 0 0 000000000002 0 000000000002
FT2 031476 000002 0 0 0 0 000000000002
FT2RQ 031476 000002 0 0 000000000070 0 000000000002
FT3 031476 000002 0 0 000000000070 0 000000000002
FT9 031477 000002 0 0 000000000070 0 000000000002
ET0 031477 000002 0 0 000000000066 0 000000000002
ST1 031477 000002 0 0 000000000066 0 000000000002
ST2 031477 000002 0 0 000000000066 0 000000000002
ST9 031477 000002 0 0 000000000066 0 000000000002
*031477 CAIE 1,000066
INITIAL
C(AC)=000000 000066
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031477 031477 0 0 302040000066 0 000000000066
IT1 031477 0 0 0 302040000066 0 000000000066
AT3 031477 0 0 0 000000000066 0 302040000066
AT6 031477 000066 0 0 000000000066 0 302040000066
FT1A 031477 000066 0 0 000000000066 0 000000000066
FT2 031477 000066 0 0 0 0 000000000066
FT2RQ 031477 000066 0 0 000000000066 0 000000000066
FT3 031477 000066 0 0 000000000066 0 000000000066
FT9 0 000066 0 0 000000000066 0 000000000066
ET0 031501 000066 0 0 0 0 000000000066
ST1A 031501 000066 0 0 0 0 000000000066
ST9 031501 000066 0 0 0 0 000000000066
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 126
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0283
*031501 JUMPA 0,031502
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031501 031501 0 0 324000031502 0 000000031502
IT1 031501 0 0 0 324000031502 0 000000031502
AT3 031501 0 0 0 000000031502 0 324000031502
AT6 031501 031502 0 0 000000031502 0 324000031502
FT1A 031501 031502 0 0 000000031502 0 000000031502
FT2 031501 031502 0 0 0 0 000000031502
FT2RQ 031501 031502 0 0 0 0 000000031502
FT3 031501 031502 0 0 0 0 000000031502
FT9 031502 031502 0 0 0 0 000000031502
ET0 031502 031502 0 0 0 0 000000031502
ST1A 031502 031502 0 0 0 0 000000031502
ST9 031502 031502 0 0 0 0 000000031502
*031502 MOVEI 1,000100
INITIAL
C(AC)=000000 000066
FINAL
C(AC)=000000 000100
TIME PC MA SC FE AR MQ BR
IT0 031502 031502 0 0 201040000100 0 000000000100
IT1 031502 0 0 0 201040000100 0 000000000100
AT3 031502 0 0 0 000000000100 0 201040000100
AT6 031502 0 0 0 000000000100 0 201040000100
FT1A 031502 0 0 0 000000000100 0 000000000100
FT9 031503 0 0 0 000000000100 0 000000000100
ET0 031503 0 0 0 000000000100 0 000000000100
ST1 031503 0 0 0 000000000100 0 000000000100
ST2 031503 0 0 0 000000000100 0 000000000100
ST9 031503 0 0 0 000000000100 0 000000000100
*031503 MOVEI 2,000037
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000037
TIME PC MA SC FE AR MQ BR
IT0 031503 031503 0 0 201100000037 0 000000000037
IT1 031503 0 0 0 201100000037 0 000000000037
AT3 031503 0 0 0 000000000037 0 201100000037
AT6 031503 000037 0 0 000000000037 0 201100000037
FT1A 031503 000037 0 0 000000000037 0 000000000037
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 127
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0284
FT9 031504 000037 0 0 000000000037 0 000000000037
ET0 031504 000037 0 0 000000000037 0 000000000037
ST1 031504 000037 0 0 000000000037 0 000000000037
ST2 031504 000037 0 0 000000000037 0 000000000037
ST9 031504 000037 0 0 000000000037 0 000000000037
*031504 SUBM 1,000002
INITIAL
C(AC)=000000 000100
C(E)=000000 000037
FINAL
C(E)=000000 000041
TIME PC MA SC FE AR MQ BR
IT0 031504 031504 0 0 276040000002 0 000000000037
IT1 031504 0 0 0 276040000002 0 000000000037
AT3 031504 0 0 0 000000000002 0 276040000002
AT6 031504 000002 0 0 000000000002 0 276040000002
FT0 031504 000002 0 0 000000000037 0 276040000002
FT1A 031504 000002 0 0 000000000037 0 000000000037
FT2 031504 000002 0 0 0 0 000000000037
FT2RQ 031504 000002 0 0 000000000100 0 000000000037
FT3 031504 000002 0 0 000000000100 0 000000000037
FT9 031505 000002 0 0 000000000100 0 000000000037
ET0 031505 000002 0 0 000000000041 0 000000000037
ST5 031505 000002 0 0 000000000041 0 000000000037
ST6A 031505 000002 0 0 000000000041 0 000000000037
ST9 031505 000002 0 0 000000000041 0 000000000037
*031505 CAIE 1,000100
INITIAL
C(AC)=000000 000100
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031505 031505 0 0 302040000100 0 000000000100
IT1 031505 0 0 0 302040000100 0 000000000100
AT3 031505 0 0 0 000000000100 0 302040000100
AT6 031505 0 0 0 000000000100 0 302040000100
FT1A 031505 0 0 0 000000000100 0 000000000100
FT2 031505 0 0 0 0 0 000000000100
FT2RQ 031505 0 0 0 000000000100 0 000000000100
FT3 031505 0 0 0 000000000100 0 000000000100
FT9 031506 0 0 0 000000000100 0 000000000100
ET0 031507 0 0 0 0 0 000000000100
ST1A 031507 0 0 0 0 0 000000000100
ST9 031507 0 0 0 0 0 000000000100
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 128
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0285
*031507 JUMPA 0,031510
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031507 031507 0 0 324000031510 0 000000031510
IT1 031507 0 0 0 324000031510 0 000000031510
AT3 031507 0 0 0 000000031510 0 324000031510
AT6 031507 031510 0 0 000000031510 0 324000031510
FT1A 031507 031510 0 0 000000031510 0 000000031510
FT2 031507 031510 0 0 0 0 000000031510
FT2RQ 031507 031510 0 0 0 0 000000031510
FT3 031507 031510 0 0 0 0 000000031510
FT9 031510 031510 0 0 0 0 000000031510
ET0 031510 031510 0 0 0 0 000000031510
ST1A 031510 031510 0 0 0 0 000000031510
ST9 031510 031510 0 0 0 0 000000031510
*031510 CAIE 2,000041
INITIAL
C(AC)=000000 000041
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031510 031510 0 0 302100000041 0 000000000041
IT1 031510 0 0 0 302100000041 0 000000000041
AT3 031510 0 0 0 000000000041 0 302100000041
AT6 031510 000041 0 0 000000000041 0 302100000041
FT1A 031510 000041 0 0 000000000041 0 000000000041
FT2 031510 000041 0 0 0 0 000000000041
FT2RQ 031510 000041 0 0 000000000041 0 000000000041
FT3 031510 000041 0 0 000000000041 0 000000000041
FT9 031511 000041 0 0 000000000041 0 000000000041
ET0 031512 000041 0 0 0 0 000000000041
ST1A 031512 000041 0 0 0 0 000000000041
ST9 031512 000041 0 0 0 0 000000000041
*031512 JUMPA 0,031513
INITIAL
C(AC)=000000 000000
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
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 129
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0286
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 0 0 000000031513
FT3 031512 031513 0 0 0 0 000000031513
FT9 031513 031513 0 0 0 0 000000031513
ET0 031513 031513 0 0 0 0 000000031513
ST1A 031513 031513 0 0 0 0 000000031513
ST9 031513 031513 0 0 0 0 000000031513
*031513 MOVEI 1,000100
INITIAL
C(AC)=000000 000100
FINAL
C(AC)=000000 000100
TIME PC MA SC FE AR MQ BR
IT0 031513 031513 0 0 201040000100 0 000000000100
IT1 031513 0 0 0 201040000100 0 000000000100
AT3 031513 0 0 0 000000000100 0 201040000100
AT6 031513 0 0 0 000000000100 0 201040000100
FT1A 031513 0 0 0 000000000100 0 000000000100
FT9 031514 0 0 0 000000000100 0 000000000100
ET0 031514 0 0 0 000000000100 0 000000000100
ST1 031514 0 0 0 000000000100 0 000000000100
ST2 031514 0 0 0 000000000100 0 000000000100
ST9 031514 0 0 0 000000000100 0 000000000100
*031514 MOVEI 2,000037
INITIAL
C(AC)=000000 000041
FINAL
C(AC)=000000 000037
TIME PC MA SC FE AR MQ BR
IT0 031514 031514 0 0 201100000037 0 000000000037
IT1 031514 0 0 0 201100000037 0 000000000037
AT3 031514 0 0 0 000000000037 0 201100000037
AT6 031514 000037 0 0 000000000037 0 201100000037
FT1A 031514 000037 0 0 000000000037 0 000000000037
FT9 031515 000037 0 0 000000000037 0 000000000037
ET0 031515 000037 0 0 000000000037 0 000000000037
ST1 031515 000037 0 0 000000000037 0 000000000037
ST2 031515 000037 0 0 000000000037 0 000000000037
ST9 031515 000037 0 0 000000000037 0 000000000037
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 130
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0287
*031515 MOVEM 2,031527
INITIAL
C(AC)=000000 000037
C(E)=000000 000000
FINAL
C(E)=000000 000037
TIME PC MA SC FE AR MQ BR
IT0 031515 031515 0 0 202100031527 0 000000031527
IT1 031515 0 0 0 202100031527 0 000000031527
AT3 031515 0 0 0 000000031527 0 202100031527
AT6 031515 031527 0 0 000000031527 0 202100031527
FT1A 031515 031527 0 0 000000031527 0 000000031527
FT2 031515 031527 0 0 0 0 000000031527
FT2RQ 031515 031527 0 0 000000000037 0 000000031527
FT3 031515 031527 0 0 000000000037 0 000000031527
FT9 031516 031527 0 0 000000000037 0 000000031527
ET0 031516 031527 0 0 000000000037 0 000000031527
ST6 031516 031527 0 0 000000000037 0 000000031527
ST6A 031516 031527 0 0 000000000037 0 000000031527
ST9 031516 031527 0 0 000000000037 0 000000031527
*031516 SUBM 1,031527
INITIAL
C(AC)=000000 000100
C(E)=000000 000037
FINAL
C(E)=000000 000041
TIME PC MA SC FE AR MQ BR
IT0 031516 031516 0 0 276040031527 0 000000000037
IT1 031516 0 0 0 276040031527 0 000000000037
AT3 031516 0 0 0 000000031527 0 276040031527
AT6 031516 031527 0 0 000000031527 0 276040031527
FT0 031516 031527 0 0 000000000037 0 276040031527
FT1A 031516 031527 0 0 000000000037 0 000000000037
FT2 031516 031527 0 0 0 0 000000000037
FT2RQ 031516 031527 0 0 000000000100 0 000000000037
FT3 031516 031527 0 0 000000000100 0 000000000037
FT9 031517 031527 0 0 000000000100 0 000000000037
ET0 031517 031527 0 0 000000000041 0 000000000037
ST5 031517 031527 0 0 000000000041 0 000000000037
ST6A 031517 031527 0 0 000000000041 0 000000000037
ST9 031517 031527 0 0 000000000041 0 000000000037
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 131
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0288
*031517 CAIE 1,000100
INITIAL
C(AC)=000000 000100
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031517 031517 0 0 302040000100 0 000000000100
IT1 031517 0 0 0 302040000100 0 000000000100
AT3 031517 0 0 0 000000000100 0 302040000100
AT6 031517 0 0 0 000000000100 0 302040000100
FT1A 031517 0 0 0 000000000100 0 000000000100
FT2 031517 0 0 0 0 0 000000000100
FT2RQ 031517 0 0 0 000000000100 0 000000000100
FT3 031517 0 0 0 000000000100 0 000000000100
FT9 031520 0 0 0 000000000100 0 000000000100
ET0 031521 0 0 0 0 0 000000000100
ST1A 031521 0 0 0 0 0 000000000100
ST9 031521 0 0 0 0 0 000000000100
*031521 JUMPA 0,031522
INITIAL
C(AC)=000000 000000
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 0 0 000000031522
FT3 031521 031522 0 0 0 0 000000031522
FT9 031522 031522 0 0 0 0 000000031522
ET0 031522 031522 0 0 0 0 000000031522
ST1A 031522 031522 0 0 0 0 000000031522
ST9 031522 031522 0 0 0 0 000000031522
*031522 MOVE 2,031527
INITIAL
C(AC)=000000 000037
C(E)=000000 000041
FINAL
C(AC)=000000 000041
TIME PC MA SC FE AR MQ BR
IT0 031522 031522 0 0 200100031527 0 000000000041
IT1 031522 0 0 0 200100031527 0 000000000041
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 132
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0289
AT3 031522 0 0 0 000000031527 0 200100031527
AT6 031522 031527 0 0 000000031527 0 200100031527
FT0 031522 031527 0 0 000000000041 0 200100031527
FT1A 031522 031527 0 0 000000000041 0 000000000041
FT9 031523 031527 0 0 000000000041 0 000000000041
ET0 031523 031527 0 0 000000000041 0 000000000041
ST1 031523 031527 0 0 000000000041 0 000000000041
ST2 031523 031527 0 0 000000000041 0 000000000041
ST9 031523 031527 0 0 000000000041 0 000000000041
*031523 CAIE 2,000041
INITIAL
C(AC)=000000 000041
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031523 031523 0 0 302100000041 0 000000000041
IT1 031523 0 0 0 302100000041 0 000000000041
AT3 031523 0 0 0 000000000041 0 302100000041
AT6 031523 000041 0 0 000000000041 0 302100000041
FT1A 031523 000041 0 0 000000000041 0 000000000041
FT2 031523 000041 0 0 0 0 000000000041
FT2RQ 031523 000041 0 0 000000000041 0 000000000041
FT3 031523 000041 0 0 000000000041 0 000000000041
FT9 031524 000041 0 0 000000000041 0 000000000041
ET0 031525 000041 0 0 0 0 000000000041
ST1A 031525 000041 0 0 0 0 000000000041
ST9 031525 000041 0 0 0 0 000000000041
*031525 JUMPA 0,031526
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031525 031525 0 0 324000031526 0 000000031526
IT1 031525 0 0 0 324000031526 0 000000031526
AT3 031525 0 0 0 000000031526 0 324000031526
AT6 031525 031526 0 0 000000031526 0 324000031526
FT1A 031525 031526 0 0 000000031526 0 000000031526
FT2 031525 031526 0 0 0 0 000000031526
FT2RQ 031525 031526 0 0 0 0 000000031526
FT3 031525 031526 0 0 0 0 000000031526
FT9 031526 031526 0 0 0 0 000000031526
ET0 031526 031526 0 0 0 0 000000031526
ST1A 031526 031526 0 0 0 0 000000031526
ST9 031526 031526 0 0 0 0 000000031526
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 133
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0290
*031526 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 031526 031526 0 0 334000000000 0 0
IT1 031526 0 0 0 334000000000 0 0
AT3 031526 0 0 0 0 0 334000000000
AT6 031526 0 0 0 0 0 334000000000
FT0 031526 0 0 0 0 0 334000000000
FT1A 031526 0 0 0 0 0 0
FT9 031527 0 0 0 0 0 0
ET0 031530 0 0 0 0 0 0
ST1A 031530 0 0 0 0 0 0
ST9 031530 0 0 0 0 0 0
*031530 MOVEI 1,000100
INITIAL
C(AC)=000000 000100
FINAL
C(AC)=000000 000100
TIME PC MA SC FE AR MQ BR
IT0 031530 031530 0 0 201040000100 0 000000000100
IT1 031530 0 0 0 201040000100 0 000000000100
AT3 031530 0 0 0 000000000100 0 201040000100
AT6 031530 0 0 0 000000000100 0 201040000100
FT1A 031530 0 0 0 000000000100 0 000000000100
FT9 031531 0 0 0 000000000100 0 000000000100
ET0 031531 0 0 0 000000000100 0 000000000100
ST1 031531 0 0 0 000000000100 0 000000000100
ST2 031531 0 0 0 000000000100 0 000000000100
ST9 031531 0 0 0 000000000100 0 000000000100
*031531 MOVEI 2,000037
INITIAL
C(AC)=000000 000041
FINAL
C(AC)=000000 000037
TIME PC MA SC FE AR MQ BR
IT0 031531 031531 0 0 201100000037 0 000000000037
IT1 031531 0 0 0 201100000037 0 000000000037
AT3 031531 0 0 0 000000000037 0 201100000037
AT6 031531 000037 0 0 000000000037 0 201100000037
FT1A 031531 000037 0 0 000000000037 0 000000000037
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 134
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0291
FT9 031532 000037 0 0 000000000037 0 000000000037
ET0 031532 000037 0 0 000000000037 0 000000000037
ST1 031532 000037 0 0 000000000037 0 000000000037
ST2 031532 000037 0 0 000000000037 0 000000000037
ST9 031532 000037 0 0 000000000037 0 000000000037
*031532 SUBB 1,000002
INITIAL
C(AC)=000000 000100
C(E)=000000 000037
FINAL
C(AC)=000000 000041
C(E)=000000 000041
TIME PC MA SC FE AR MQ BR
IT0 031532 031532 0 0 277040000002 0 000000000037
IT1 031532 0 0 0 277040000002 0 000000000037
AT3 031532 0 0 0 000000000002 0 277040000002
AT6 031532 000002 0 0 000000000002 0 277040000002
FT0 031532 000002 0 0 000000000037 0 277040000002
FT1A 031532 000002 0 0 000000000037 0 000000000037
FT2 031532 000002 0 0 0 0 000000000037
FT2RQ 031532 000002 0 0 000000000100 0 000000000037
FT3 031532 000002 0 0 000000000100 0 000000000037
FT9 031533 000002 0 0 000000000100 0 000000000037
ET0 031533 000002 0 0 000000000041 0 000000000037
ST1 031533 000002 0 0 000000000041 0 000000000037
ST2 031533 000002 0 0 000000000041 0 000000000037
ST5 031533 000002 0 0 000000000041 0 000000000037
ST6A 031533 000002 0 0 000000000041 0 000000000037
ST9 031533 000002 0 0 000000000041 0 000000000037
*031533 CAIE 1,000041
INITIAL
C(AC)=000000 000041
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031533 031533 0 0 302040000041 0 000000000041
IT1 031533 0 0 0 302040000041 0 000000000041
AT3 031533 0 0 0 000000000041 0 302040000041
AT6 031533 000041 0 0 000000000041 0 302040000041
FT1A 031533 000041 0 0 000000000041 0 000000000041
FT2 031533 000041 0 0 0 0 000000000041
FT2RQ 031533 000041 0 0 000000000041 0 000000000041
FT3 031533 000041 0 0 000000000041 0 000000000041
FT9 031534 000041 0 0 000000000041 0 000000000041
ET0 031535 000041 0 0 0 0 000000000041
ST1A 031535 000041 0 0 0 0 000000000041
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 135
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0292
ST9 031535 000041 0 0 0 0 000000000041
*031535 JUMPA 0,031536
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031535 031535 0 0 324000031536 0 000000031536
IT1 031535 0 0 0 324000031536 0 000000031536
AT3 031535 0 0 0 000000031536 0 324000031536
AT6 031535 031536 0 0 000000031536 0 324000031536
FT1A 031535 031536 0 0 000000031536 0 000000031536
FT2 031535 031536 0 0 0 0 000000031536
FT2RQ 031535 031536 0 0 0 0 000000031536
FT3 031535 031536 0 0 0 0 000000031536
FT9 031536 031536 0 0 0 0 000000031536
ET0 031536 031536 0 0 0 0 000000031536
ST1A 031536 031536 0 0 0 0 000000031536
ST9 031536 031536 0 0 0 0 000000031536
*031536 CAIE 2,000041
INITIAL
C(AC)=000000 000041
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031536 031536 0 0 302100000041 0 000000000041
IT1 031536 0 0 0 302100000041 0 000000000041
AT3 031536 0 0 0 000000000041 0 302100000041
AT6 031536 000041 0 0 000000000041 0 302100000041
FT1A 031536 000041 0 0 000000000041 0 000000000041
FT2 031536 000041 0 0 0 0 000000000041
FT2RQ 031536 000041 0 0 000000000041 0 000000000041
FT3 031536 000041 0 0 000000000041 0 000000000041
FT9 031537 000041 0 0 000000000041 0 000000000041
ET0 031540 000041 0 0 0 0 000000000041
ST1A 031540 000041 0 0 0 0 000000000041
ST9 031540 000041 0 0 0 0 000000000041
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 136
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0293
*031540 JUMPA 0,031541
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031540 031540 0 0 324000031541 0 000000031541
IT1 031540 0 0 0 324000031541 0 000000031541
AT3 031540 0 0 0 000000031541 0 324000031541
AT6 031540 031541 0 0 000000031541 0 324000031541
FT1A 031540 031541 0 0 000000031541 0 000000031541
FT2 031540 031541 0 0 0 0 000000031541
FT2RQ 031540 031541 0 0 0 0 000000031541
FT3 031540 031541 0 0 0 0 000000031541
FT9 031541 031541 0 0 0 0 000000031541
ET0 031541 031541 0 0 0 0 000000031541
ST1A 031541 031541 0 0 0 0 000000031541
ST9 031541 031541 0 0 0 0 000000031541
*031541 MOVEI 1,000100
INITIAL
C(AC)=000000 000041
FINAL
C(AC)=000000 000100
TIME PC MA SC FE AR MQ BR
IT0 031541 031541 0 0 201040000100 0 000000000100
IT1 031541 0 0 0 201040000100 0 000000000100
AT3 031541 0 0 0 000000000100 0 201040000100
AT6 031541 0 0 0 000000000100 0 201040000100
FT1A 031541 0 0 0 000000000100 0 000000000100
FT9 031542 0 0 0 000000000100 0 000000000100
ET0 031542 0 0 0 000000000100 0 000000000100
ST1 031542 0 0 0 000000000100 0 000000000100
ST2 031542 0 0 0 000000000100 0 000000000100
ST9 031542 0 0 0 000000000100 0 000000000100
*031542 MOVEI 2,000037
INITIAL
C(AC)=000000 000041
FINAL
C(AC)=000000 000037
TIME PC MA SC FE AR MQ BR
IT0 031542 031542 0 0 201100000037 0 000000000037
IT1 031542 0 0 0 201100000037 0 000000000037
AT3 031542 0 0 0 000000000037 0 201100000037
AT6 031542 000037 0 0 000000000037 0 201100000037
FT1A 031542 000037 0 0 000000000037 0 000000000037
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 137
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0294
FT9 031543 000037 0 0 000000000037 0 000000000037
ET0 031543 000037 0 0 000000000037 0 000000000037
ST1 031543 000037 0 0 000000000037 0 000000000037
ST2 031543 000037 0 0 000000000037 0 000000000037
ST9 031543 000037 0 0 000000000037 0 000000000037
*031543 MOVEM 2,031555
INITIAL
C(AC)=000000 000037
C(E)=000000 000000
FINAL
C(E)=000000 000037
TIME PC MA SC FE AR MQ BR
IT0 031543 031543 0 0 202100031555 0 000000031555
IT1 031543 0 0 0 202100031555 0 000000031555
AT3 031543 0 0 0 000000031555 0 202100031555
AT6 031543 031555 0 0 000000031555 0 202100031555
FT1A 031543 031555 0 0 000000031555 0 000000031555
FT2 031543 031555 0 0 0 0 000000031555
FT2RQ 031543 031555 0 0 000000000037 0 000000031555
FT3 031543 031555 0 0 000000000037 0 000000031555
FT9 031544 031555 0 0 000000000037 0 000000031555
ET0 031544 031555 0 0 000000000037 0 000000031555
ST6 031544 031555 0 0 000000000037 0 000000031555
ST6A 031544 031555 0 0 000000000037 0 000000031555
ST9 031544 031555 0 0 000000000037 0 000000031555
*031544 SUBB 1,031555
INITIAL
C(AC)=000000 000100
C(E)=000000 000037
FINAL
C(AC)=000000 000041
C(E)=000000 000041
TIME PC MA SC FE AR MQ BR
IT0 031544 031544 0 0 277040031555 0 000000000037
IT1 031544 0 0 0 277040031555 0 000000000037
AT3 031544 0 0 0 000000031555 0 277040031555
AT6 031544 031555 0 0 000000031555 0 277040031555
FT0 031544 031555 0 0 000000000037 0 277040031555
FT1A 031544 031555 0 0 000000000037 0 000000000037
FT2 031544 031555 0 0 0 0 000000000037
FT2RQ 031544 031555 0 0 000000000100 0 000000000037
FT3 031544 031555 0 0 000000000100 0 000000000037
FT9 031545 031555 0 0 000000000100 0 000000000037
ET0 031545 031555 0 0 000000000041 0 000000000037
ST1 031545 031555 0 0 000000000041 0 000000000037
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 138
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0295
ST2 031545 031555 0 0 000000000041 0 000000000037
ST5 031545 031555 0 0 000000000041 0 000000000037
ST6A 031545 031555 0 0 000000000041 0 000000000037
ST9 031545 031555 0 0 000000000041 0 000000000037
*031545 CAIE 1,000041
INITIAL
C(AC)=000000 000041
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031545 031545 0 0 302040000041 0 000000000041
IT1 031545 0 0 0 302040000041 0 000000000041
AT3 031545 0 0 0 000000000041 0 302040000041
AT6 031545 000041 0 0 000000000041 0 302040000041
FT1A 031545 000041 0 0 000000000041 0 000000000041
FT2 031545 000041 0 0 0 0 000000000041
FT2RQ 031545 000041 0 0 000000000041 0 000000000041
FT3 031545 000041 0 0 000000000041 0 000000000041
FT9 031546 000041 0 0 000000000041 0 000000000041
ET0 031547 000041 0 0 0 0 000000000041
ST1A 031547 000041 0 0 0 0 000000000041
ST9 031547 000041 0 0 0 0 000000000041
*031547 JUMPA 0,031550
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031547 031547 0 0 324000031550 0 000000031550
IT1 031547 0 0 0 324000031550 0 000000031550
AT3 031547 0 0 0 000000031550 0 324000031550
AT6 031547 031550 0 0 000000031550 0 324000031550
FT1A 031547 031550 0 0 000000031550 0 000000031550
FT2 031547 031550 0 0 0 0 000000031550
FT2RQ 031547 031550 0 0 0 0 000000031550
FT3 031547 031550 0 0 0 0 000000031550
FT9 031550 031550 0 0 0 0 000000031550
ET0 031550 031550 0 0 0 0 000000031550
ST1A 031550 031550 0 0 0 0 000000031550
ST9 031550 031550 0 0 0 0 000000031550
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 139
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0296
*031550 MOVE 2,031555
INITIAL
C(AC)=000000 000037
C(E)=000000 000041
FINAL
C(AC)=000000 000041
TIME PC MA SC FE AR MQ BR
IT0 031550 031550 0 0 200100031555 0 000000000041
IT1 031550 0 0 0 200100031555 0 000000000041
AT3 031550 0 0 0 000000031555 0 200100031555
AT6 031550 031555 0 0 000000031555 0 200100031555
FT0 031550 031555 0 0 000000000041 0 200100031555
FT1A 031550 031555 0 0 000000000041 0 000000000041
FT9 031551 031555 0 0 000000000041 0 000000000041
ET0 031551 031555 0 0 000000000041 0 000000000041
ST1 031551 031555 0 0 000000000041 0 000000000041
ST2 031551 031555 0 0 000000000041 0 000000000041
ST9 031551 031555 0 0 000000000041 0 000000000041
*031551 CAIE 2,000041
INITIAL
C(AC)=000000 000041
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031551 031551 0 0 302100000041 0 000000000041
IT1 031551 0 0 0 302100000041 0 000000000041
AT3 031551 0 0 0 000000000041 0 302100000041
AT6 031551 000041 0 0 000000000041 0 302100000041
FT1A 031551 000041 0 0 000000000041 0 000000000041
FT2 031551 000041 0 0 0 0 000000000041
FT2RQ 031551 000041 0 0 000000000041 0 000000000041
FT3 031551 000041 0 0 000000000041 0 000000000041
FT9 031552 000041 0 0 000000000041 0 000000000041
ET0 031553 000041 0 0 0 0 000000000041
ST1A 031553 000041 0 0 0 0 000000000041
ST9 031553 000041 0 0 0 0 000000000041
*031553 JUMPA 0,031554
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031553 031553 0 0 324000031554 0 000000031554
IT1 031553 0 0 0 324000031554 0 000000031554
AT3 031553 0 0 0 000000031554 0 324000031554
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 140
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0297
AT6 031553 031554 0 0 000000031554 0 324000031554
FT1A 031553 031554 0 0 000000031554 0 000000031554
FT2 031553 031554 0 0 0 0 000000031554
FT2RQ 031553 031554 0 0 0 0 000000031554
FT3 031553 031554 0 0 0 0 000000031554
FT9 031554 031554 0 0 0 0 000000031554
ET0 031554 031554 0 0 0 0 000000031554
ST1A 031554 031554 0 0 0 0 000000031554
ST9 031554 031554 0 0 0 0 000000031554
*031554 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 031554 031554 0 0 334000000000 0 0
IT1 031554 0 0 0 334000000000 0 0
AT3 031554 0 0 0 0 0 334000000000
AT6 031554 0 0 0 0 0 334000000000
FT0 031554 0 0 0 0 0 334000000000
FT1A 031554 0 0 0 0 0 0
FT9 031555 0 0 0 0 0 0
ET0 031556 0 0 0 0 0 0
ST1A 031556 0 0 0 0 0 0
ST9 031556 0 0 0 0 0 0
*031556 MOVEI 1,000001
INITIAL
C(AC)=000000 000041
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031556 031556 0 0 201040000001 0 000000000001
IT1 031556 0 0 0 201040000001 0 000000000001
AT3 031556 0 0 0 000000000001 0 201040000001
AT6 031556 000001 0 0 000000000001 0 201040000001
FT1A 031556 000001 0 0 000000000001 0 000000000001
FT9 031557 000001 0 0 000000000001 0 000000000001
ET0 031557 000001 0 0 000000000001 0 000000000001
ST1 031557 000001 0 0 000000000001 0 000000000001
ST2 031557 000001 0 0 000000000001 0 000000000001
ST9 031557 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 141
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0298
*031557 CAIL 1,000002
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031557 031557 0 0 301040000002 0 000000000002
IT1 031557 0 0 0 301040000002 0 000000000002
AT3 031557 0 0 0 000000000002 0 301040000002
AT6 031557 000002 0 0 000000000002 0 301040000002
FT1A 031557 000002 0 0 000000000002 0 000000000002
FT2 031557 000002 0 0 0 0 000000000002
FT2RQ 031557 000002 0 0 000000000001 0 000000000002
FT3 031557 000002 0 0 000000000001 0 000000000002
FT9 031560 000002 0 0 000000000001 0 000000000002
ET0 031561 000002 0 0 777777777777 0 000000000002
ST1A 031561 000002 0 0 777777777777 0 000000000002
ST9 031561 000002 0 0 777777777777 0 000000000002
*031561 JUMPA 0,031562
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031561 031561 0 0 324000031562 0 000000031562
IT1 031561 0 0 0 324000031562 0 000000031562
AT3 031561 0 0 0 000000031562 0 324000031562
AT6 031561 031562 0 0 000000031562 0 324000031562
FT1A 031561 031562 0 0 000000031562 0 000000031562
FT2 031561 031562 0 0 0 0 000000031562
FT2RQ 031561 031562 0 0 0 0 000000031562
FT3 031561 031562 0 0 0 0 000000031562
FT9 031562 031562 0 0 0 0 000000031562
ET0 031562 031562 0 0 0 0 000000031562
ST1A 031562 031562 0 0 0 0 000000031562
ST9 031562 031562 0 0 0 0 000000031562
*031562 MOVEI 1,000002
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031562 031562 0 0 201040000002 0 000000000002
IT1 031562 0 0 0 201040000002 0 000000000002
AT3 031562 0 0 0 000000000002 0 201040000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 142
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0299
AT6 031562 000002 0 0 000000000002 0 201040000002
FT1A 031562 000002 0 0 000000000002 0 000000000002
FT9 031563 000002 0 0 000000000002 0 000000000002
ET0 031563 000002 0 0 000000000002 0 000000000002
ST1 031563 000002 0 0 000000000002 0 000000000002
ST2 031563 000002 0 0 000000000002 0 000000000002
ST9 031563 000002 0 0 000000000002 0 000000000002
*031563 CAIL 1,000002
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031563 031563 0 0 301040000002 0 000000000002
IT1 031563 0 0 0 301040000002 0 000000000002
AT3 031563 0 0 0 000000000002 0 301040000002
AT6 031563 000002 0 0 000000000002 0 301040000002
FT1A 031563 000002 0 0 000000000002 0 000000000002
FT2 031563 000002 0 0 0 0 000000000002
FT2RQ 031563 000002 0 0 000000000002 0 000000000002
FT3 031563 000002 0 0 000000000002 0 000000000002
FT9 031564 000002 0 0 000000000002 0 000000000002
ET0 031564 000002 0 0 0 0 000000000002
ST1A 031564 000002 0 0 0 0 000000000002
ST9 031564 000002 0 0 0 0 000000000002
*031564 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 031564 031564 0 0 334000000000 0 0
IT1 031564 0 0 0 334000000000 0 0
AT3 031564 0 0 0 0 0 334000000000
AT6 031564 0 0 0 0 0 334000000000
FT0 031564 0 0 0 0 0 334000000000
FT1A 031564 0 0 0 0 0 0
FT9 031565 0 0 0 0 0 0
ET0 031566 0 0 0 0 0 0
ST1A 031566 0 0 0 0 0 0
ST9 031566 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 143
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0300
*031566 JUMPA 0,031567
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031566 031566 0 0 324000031567 0 000000031567
IT1 031566 0 0 0 324000031567 0 000000031567
AT3 031566 0 0 0 000000031567 0 324000031567
AT6 031566 031567 0 0 000000031567 0 324000031567
FT1A 031566 031567 0 0 000000031567 0 000000031567
FT2 031566 031567 0 0 0 0 000000031567
FT2RQ 031566 031567 0 0 0 0 000000031567
FT3 031566 031567 0 0 0 0 000000031567
FT9 031567 031567 0 0 0 0 000000031567
ET0 031567 031567 0 0 0 0 000000031567
ST1A 031567 031567 0 0 0 0 000000031567
ST9 031567 031567 0 0 0 0 000000031567
*031567 MOVEI 1,000003
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031567 031567 0 0 201040000003 0 000000000003
IT1 031567 0 0 0 201040000003 0 000000000003
AT3 031567 0 0 0 000000000003 0 201040000003
AT6 031567 000003 0 0 000000000003 0 201040000003
FT1A 031567 000003 0 0 000000000003 0 000000000003
FT9 031570 000003 0 0 000000000003 0 000000000003
ET0 031570 000003 0 0 000000000003 0 000000000003
ST1 031570 000003 0 0 000000000003 0 000000000003
ST2 031570 000003 0 0 000000000003 0 000000000003
ST9 031570 000003 0 0 000000000003 0 000000000003
*031570 CAIL 1,000002
INITIAL
C(AC)=000000 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031570 031570 0 0 301040000002 0 000000000002
IT1 031570 0 0 0 301040000002 0 000000000002
AT3 031570 0 0 0 000000000002 0 301040000002
AT6 031570 000002 0 0 000000000002 0 301040000002
FT1A 031570 000002 0 0 000000000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 144
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0301
FT2 031570 000002 0 0 0 0 000000000002
FT2RQ 031570 000002 0 0 000000000003 0 000000000002
FT3 031570 000002 0 0 000000000003 0 000000000002
FT9 031571 000002 0 0 000000000003 0 000000000002
ET0 031571 000002 0 0 000000000001 0 000000000002
ST1A 031571 000002 0 0 000000000001 0 000000000002
ST9 031571 000002 0 0 000000000001 0 000000000002
*031571 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 031571 031571 0 0 334000000000 0 0
IT1 031571 0 0 0 334000000000 0 0
AT3 031571 0 0 0 0 0 334000000000
AT6 031571 0 0 0 0 0 334000000000
FT0 031571 0 0 0 0 0 334000000000
FT1A 031571 0 0 0 0 0 0
FT9 031572 0 0 0 0 0 0
ET0 031573 0 0 0 0 0 0
ST1A 031573 0 0 0 0 0 0
ST9 031573 0 0 0 0 0 0
*031573 JUMPA 0,031574
INITIAL
C(AC)=000000 000000
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 0 0 000000031574
FT3 031573 031574 0 0 0 0 000000031574
FT9 031574 031574 0 0 0 0 000000031574
ET0 031574 031574 0 0 0 0 000000031574
ST1A 031574 031574 0 0 0 0 000000031574
ST9 031574 031574 0 0 0 0 000000031574
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 145
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0302
*031574 SETO 1,000000
INITIAL
C(AC)=000000 000003
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031574 031574 0 0 474040000000 0 0
IT1 031574 0 0 0 474040000000 0 0
AT3 031574 0 0 0 0 0 474040000000
AT6 031574 0 0 0 0 0 474040000000
FT1A 031574 0 0 0 0 0 0
FT9 031575 0 0 0 0 0 0
ET0 031575 0 0 0 777777777777 0 0
ST1 031575 0 0 0 777777777777 0 0
ST2 031575 0 0 0 777777777777 0 0
ST9 031575 0 0 0 777777777777 0 0
*031575 CAILE 1,000000
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031575 031575 0 0 303040000000 0 0
IT1 031575 0 0 0 303040000000 0 0
AT3 031575 0 0 0 0 0 303040000000
AT6 031575 0 0 0 0 0 303040000000
FT1A 031575 0 0 0 0 0 0
FT2 031575 0 0 0 0 0 0
FT2RQ 031575 0 0 0 777777777777 0 0
FT3 031575 0 0 0 777777777777 0 0
FT9 031576 0 0 0 777777777777 0 0
ET0 031577 0 0 0 777777777777 0 0
ST1A 031577 0 0 0 777777777777 0 0
ST9 031577 0 0 0 777777777777 0 0
*031577 JUMPA 0,031600
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031577 031577 0 0 324000031600 0 000000031600
IT1 031577 0 0 0 324000031600 0 000000031600
AT3 031577 0 0 0 000000031600 0 324000031600
AT6 031577 0 0 0 000000031600 0 324000031600
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 146
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0303
FT1A 031577 0 0 0 000000031600 0 000000031600
FT2 031577 0 0 0 0 0 000000031600
FT2RQ 031577 0 0 0 0 0 000000031600
FT3 031577 0 0 0 0 0 000000031600
FT9 0 0 0 0 0 0 000000031600
ET0 0 0 0 0 0 0 000000031600
ST1A 0 0 0 0 0 0 000000031600
ST9 0 0 0 0 0 0 000000031600
*031600 SETZ 1,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 400040000000 0 0
IT1 0 0 0 0 400040000000 0 0
AT3 0 0 0 0 0 0 400040000000
AT6 0 0 0 0 0 0 400040000000
FT1A 0 0 0 0 0 0 0
FT9 031601 0 0 0 0 0 0
ET0 031601 0 0 0 0 0 0
ST1 031601 0 0 0 0 0 0
ST2 031601 0 0 0 0 0 0
ST9 031601 0 0 0 0 0 0
*031601 CAILE 1,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031601 031601 0 0 303040000000 0 0
IT1 031601 0 0 0 303040000000 0 0
AT3 031601 0 0 0 0 0 303040000000
AT6 031601 0 0 0 0 0 303040000000
FT1A 031601 0 0 0 0 0 0
FT2 031601 0 0 0 0 0 0
FT2RQ 031601 0 0 0 0 0 0
FT3 031601 0 0 0 0 0 0
FT9 031602 0 0 0 0 0 0
ET0 031603 0 0 0 0 0 0
ST1A 031603 0 0 0 0 0 0
ST9 031603 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 147
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0304
*031603 JUMPA 0,031604
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031603 031603 0 0 324000031604 0 000000031604
IT1 031603 0 0 0 324000031604 0 000000031604
AT3 031603 0 0 0 000000031604 0 324000031604
AT6 031603 031604 0 0 000000031604 0 324000031604
FT1A 031603 031604 0 0 000000031604 0 000000031604
FT2 031603 031604 0 0 0 0 000000031604
FT2RQ 031603 031604 0 0 0 0 000000031604
FT3 031603 031604 0 0 0 0 000000031604
FT9 031604 031604 0 0 0 0 000000031604
ET0 031604 031604 0 0 0 0 000000031604
ST1A 031604 031604 0 0 0 0 000000031604
ST9 031604 031604 0 0 0 0 000000031604
*031604 MOVEI 1,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031604 031604 0 0 201040000001 0 000000000001
IT1 031604 0 0 0 201040000001 0 000000000001
AT3 031604 0 0 0 000000000001 0 201040000001
AT6 031604 000001 0 0 000000000001 0 201040000001
FT1A 031604 000001 0 0 000000000001 0 000000000001
FT9 031605 000001 0 0 000000000001 0 000000000001
ET0 031605 000001 0 0 000000000001 0 000000000001
ST1 031605 000001 0 0 000000000001 0 000000000001
ST2 031605 000001 0 0 000000000001 0 000000000001
ST9 031605 000001 0 0 000000000001 0 000000000001
*031605 CAILE 1,000000
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031605 031605 0 0 303040000000 0 0
IT1 031605 0 0 0 303040000000 0 0
AT3 031605 0 0 0 0 0 303040000000
AT6 031605 0 0 0 0 0 303040000000
FT1A 031605 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 148
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0305
FT2 031605 0 0 0 0 0 0
FT2RQ 031605 0 0 0 000000000001 0 0
FT3 031605 0 0 0 000000000001 0 0
FT9 031606 0 0 0 000000000001 0 0
ET0 031606 0 0 0 000000000001 0 0
ST1A 031606 0 0 0 000000000001 0 0
ST9 031606 0 0 0 000000000001 0 0
*031606 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 031606 031606 0 0 334000000000 0 0
IT1 031606 0 0 0 334000000000 0 0
AT3 031606 0 0 0 0 0 334000000000
AT6 031606 0 0 0 0 0 334000000000
FT0 031606 0 0 0 0 0 334000000000
FT1A 031606 0 0 0 0 0 0
FT9 031607 0 0 0 0 0 0
ET0 031610 0 0 0 0 0 0
ST1A 031610 0 0 0 0 0 0
ST9 031610 0 0 0 0 0 0
*031610 JUMPA 0,031611
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031610 031610 0 0 324000031611 0 000000031611
IT1 031610 0 0 0 324000031611 0 000000031611
AT3 031610 0 0 0 000000031611 0 324000031611
AT6 031610 031611 0 0 000000031611 0 324000031611
FT1A 031610 031611 0 0 000000031611 0 000000031611
FT2 031610 031611 0 0 0 0 000000031611
FT2RQ 031610 031611 0 0 0 0 000000031611
FT3 031610 031611 0 0 0 0 000000031611
FT9 031611 031611 0 0 0 0 000000031611
ET0 031611 031611 0 0 0 0 000000031611
ST1A 031611 031611 0 0 0 0 000000031611
ST9 031611 031611 0 0 0 0 000000031611
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 149
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0306
*031611 SETO 1,000000
INITIAL
C(AC)=000000 000001
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031611 031611 0 0 474040000000 0 0
IT1 031611 0 0 0 474040000000 0 0
AT3 031611 0 0 0 0 0 474040000000
AT6 031611 0 0 0 0 0 474040000000
FT1A 031611 0 0 0 0 0 0
FT9 031612 0 0 0 0 0 0
ET0 031612 0 0 0 777777777777 0 0
ST1 031612 0 0 0 777777777777 0 0
ST2 031612 0 0 0 777777777777 0 0
ST9 031612 0 0 0 777777777777 0 0
*031612 CAIA 1,000000
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031612 031612 0 0 304040000000 0 0
IT1 031612 0 0 0 304040000000 0 0
AT3 031612 0 0 0 0 0 304040000000
AT6 031612 0 0 0 0 0 304040000000
FT1A 031612 0 0 0 0 0 0
FT2 031612 0 0 0 0 0 0
FT2RQ 031612 0 0 0 777777777777 0 0
FT3 031612 0 0 0 777777777777 0 0
FT9 031613 0 0 0 777777777777 0 0
ET0 031614 0 0 0 777777777777 0 0
ST1A 031614 0 0 0 777777777777 0 0
ST9 031614 0 0 0 777777777777 0 0
*031614 JUMPA 0,031615
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031614 031614 0 0 324000031615 0 000000031615
IT1 031614 0 0 0 324000031615 0 000000031615
AT3 031614 0 0 0 000000031615 0 324000031615
AT6 031614 031615 0 0 000000031615 0 324000031615
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 150
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0307
FT1A 031614 031615 0 0 000000031615 0 000000031615
FT2 031614 031615 0 0 0 0 000000031615
FT2RQ 031614 031615 0 0 0 0 000000031615
FT3 031614 031615 0 0 0 0 000000031615
FT9 031615 031615 0 0 0 0 000000031615
ET0 031615 031615 0 0 0 0 000000031615
ST1A 031615 031615 0 0 0 0 000000031615
ST9 031615 031615 0 0 0 0 000000031615
*031615 SETZ 1,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031615 031615 0 0 400040000000 0 0
IT1 031615 0 0 0 400040000000 0 0
AT3 031615 0 0 0 0 0 400040000000
AT6 031615 0 0 0 0 0 400040000000
FT1A 031615 0 0 0 0 0 0
FT9 031616 0 0 0 0 0 0
ET0 031616 0 0 0 0 0 0
ST1 031616 0 0 0 0 0 0
ST2 031616 0 0 0 0 0 0
ST9 031616 0 0 0 0 0 0
*031616 CAIA 1,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031616 031616 0 0 304040000000 0 0
IT1 031616 0 0 0 304040000000 0 0
AT3 031616 0 0 0 0 0 304040000000
AT6 031616 0 0 0 0 0 304040000000
FT1A 031616 0 0 0 0 0 0
FT2 031616 0 0 0 0 0 0
FT2RQ 031616 0 0 0 0 0 0
FT3 031616 0 0 0 0 0 0
FT9 031617 0 0 0 0 0 0
ET0 031620 0 0 0 0 0 0
ST1A 031620 0 0 0 0 0 0
ST9 031620 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 151
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0308
*031620 JUMPA 0,031621
INITIAL
C(AC)=000000 000000
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 0 0 000000031621
FT3 031620 031621 0 0 0 0 000000031621
FT9 031621 031621 0 0 0 0 000000031621
ET0 031621 031621 0 0 0 0 000000031621
ST1A 031621 031621 0 0 0 0 000000031621
ST9 031621 031621 0 0 0 0 000000031621
*031621 MOVEI 1,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031621 031621 0 0 201040000001 0 000000000001
IT1 031621 0 0 0 201040000001 0 000000000001
AT3 031621 0 0 0 000000000001 0 201040000001
AT6 031621 000001 0 0 000000000001 0 201040000001
FT1A 031621 000001 0 0 000000000001 0 000000000001
FT9 031622 000001 0 0 000000000001 0 000000000001
ET0 031622 000001 0 0 000000000001 0 000000000001
ST1 031622 000001 0 0 000000000001 0 000000000001
ST2 031622 000001 0 0 000000000001 0 000000000001
ST9 031622 000001 0 0 000000000001 0 000000000001
*031622 CAIA 1,000000
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031622 031622 0 0 304040000000 0 0
IT1 031622 0 0 0 304040000000 0 0
AT3 031622 0 0 0 0 0 304040000000
AT6 031622 0 0 0 0 0 304040000000
FT1A 031622 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 152
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0309
FT2 031622 0 0 0 0 0 0
FT2RQ 031622 0 0 0 000000000001 0 0
FT3 031622 0 0 0 000000000001 0 0
FT9 031623 0 0 0 000000000001 0 0
ET0 031624 0 0 0 000000000001 0 0
ST1A 031624 0 0 0 000000000001 0 0
ST9 031624 0 0 0 000000000001 0 0
*031624 JUMPA 0,031625
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031624 031624 0 0 324000031625 0 000000031625
IT1 031624 0 0 0 324000031625 0 000000031625
AT3 031624 0 0 0 000000031625 0 324000031625
AT6 031624 031625 0 0 000000031625 0 324000031625
FT1A 031624 031625 0 0 000000031625 0 000000031625
FT2 031624 031625 0 0 0 0 000000031625
FT2RQ 031624 031625 0 0 0 0 000000031625
FT3 031624 031625 0 0 0 0 000000031625
FT9 031625 031625 0 0 0 0 000000031625
ET0 031625 031625 0 0 0 0 000000031625
ST1A 031625 031625 0 0 0 0 000000031625
ST9 031625 031625 0 0 0 0 000000031625
*031625 MOVEI 2,000005
INITIAL
C(AC)=000000 000041
FINAL
C(AC)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 031625 031625 0 0 201100000005 0 000000000005
IT1 031625 0 0 0 201100000005 0 000000000005
AT3 031625 0 0 0 000000000005 0 201100000005
AT6 031625 000005 0 0 000000000005 0 201100000005
FT1A 031625 000005 0 0 000000000005 0 000000000005
FT9 031626 000005 0 0 000000000005 0 000000000005
ET0 031626 000005 0 0 000000000005 0 000000000005
ST1 031626 000005 0 0 000000000005 0 000000000005
ST2 031626 000005 0 0 000000000005 0 000000000005
ST9 031626 000005 0 0 000000000005 0 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 153
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0310
*031626 CAIGE 2,000006
INITIAL
C(AC)=000000 000005
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031626 031626 0 0 305100000006 0 000000000006
IT1 031626 0 0 0 305100000006 0 000000000006
AT3 031626 0 0 0 000000000006 0 305100000006
AT6 031626 000006 0 0 000000000006 0 305100000006
FT1A 031626 000006 0 0 000000000006 0 000000000006
FT2 031626 000006 0 0 0 0 000000000006
FT2RQ 031626 000006 0 0 000000000005 0 000000000006
FT3 031626 000006 0 0 000000000005 0 000000000006
FT9 031627 000006 0 0 000000000005 0 000000000006
ET0 031627 000006 0 0 777777777777 0 000000000006
ST1A 031627 000006 0 0 777777777777 0 000000000006
ST9 031627 000006 0 0 777777777777 0 000000000006
*031627 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 031627 031627 0 0 334000000000 0 0
IT1 031627 0 0 0 334000000000 0 0
AT3 031627 0 0 0 0 0 334000000000
AT6 031627 0 0 0 0 0 334000000000
FT0 031627 0 0 0 0 0 334000000000
FT1A 031627 0 0 0 0 0 0
FT9 031630 0 0 0 0 0 0
ET0 031631 0 0 0 0 0 0
ST1A 031631 0 0 0 0 0 0
ST9 031631 0 0 0 0 0 0
*031631 JUMPA 0,031632
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031631 031631 0 0 324000031632 0 000000031632
IT1 031631 0 0 0 324000031632 0 000000031632
AT3 031631 0 0 0 000000031632 0 324000031632
AT6 031631 031632 0 0 000000031632 0 324000031632
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 154
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0311
FT1A 031631 031632 0 0 000000031632 0 000000031632
FT2 031631 031632 0 0 0 0 000000031632
FT2RQ 031631 031632 0 0 0 0 000000031632
FT3 031631 031632 0 0 0 0 000000031632
FT9 031632 031632 0 0 0 0 000000031632
ET0 031632 031632 0 0 0 0 000000031632
ST1A 031632 031632 0 0 0 0 000000031632
ST9 031632 031632 0 0 0 0 000000031632
*031632 MOVEI 2,000006
INITIAL
C(AC)=000000 000005
FINAL
C(AC)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 031632 031632 0 0 201100000006 0 000000000006
IT1 031632 0 0 0 201100000006 0 000000000006
AT3 031632 0 0 0 000000000006 0 201100000006
AT6 031632 000006 0 0 000000000006 0 201100000006
FT1A 031632 000006 0 0 000000000006 0 000000000006
FT9 031633 000006 0 0 000000000006 0 000000000006
ET0 031633 000006 0 0 000000000006 0 000000000006
ST1 031633 000006 0 0 000000000006 0 000000000006
ST2 031633 000006 0 0 000000000006 0 000000000006
ST9 031633 000006 0 0 000000000006 0 000000000006
*031633 CAIGE 0,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031633 031633 0 0 305000000000 0 0
IT1 031633 0 0 0 305000000000 0 0
AT3 031633 0 0 0 0 0 305000000000
AT6 031633 0 0 0 0 0 305000000000
FT1A 031633 0 0 0 0 0 0
FT2 031633 0 0 0 0 0 0
FT2RQ 031633 0 0 0 0 0 0
FT3 031633 0 0 0 0 0 0
FT9 031634 0 0 0 0 0 0
ET0 031635 0 0 0 0 0 0
ST1A 031635 0 0 0 0 0 0
ST9 031635 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 155
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0312
*031635 JUMPA 0,031636
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031635 031635 0 0 324000031636 0 000000031636
IT1 031635 0 0 0 324000031636 0 000000031636
AT3 031635 0 0 0 000000031636 0 324000031636
AT6 031635 031636 0 0 000000031636 0 324000031636
FT1A 031635 031636 0 0 000000031636 0 000000031636
FT2 031635 031636 0 0 0 0 000000031636
FT2RQ 031635 031636 0 0 0 0 000000031636
FT3 031635 031636 0 0 0 0 000000031636
FT9 031636 031636 0 0 0 0 000000031636
ET0 031636 031636 0 0 0 0 000000031636
ST1A 031636 031636 0 0 0 0 000000031636
ST9 031636 031636 0 0 0 0 000000031636
*031636 MOVEI 2,000007
INITIAL
C(AC)=000000 000006
FINAL
C(AC)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 031636 031636 0 0 201100000007 0 000000000007
IT1 031636 0 0 0 201100000007 0 000000000007
AT3 031636 0 0 0 000000000007 0 201100000007
AT6 031636 000007 0 0 000000000007 0 201100000007
FT1A 031636 000007 0 0 000000000007 0 000000000007
FT9 031637 000007 0 0 000000000007 0 000000000007
ET0 031637 000007 0 0 000000000007 0 000000000007
ST1 031637 000007 0 0 000000000007 0 000000000007
ST2 031637 000007 0 0 000000000007 0 000000000007
ST9 031637 000007 0 0 000000000007 0 000000000007
*031637 CAIGE 2,000006
INITIAL
C(AC)=000000 000007
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031637 031637 0 0 305100000006 0 000000000006
IT1 031637 0 0 0 305100000006 0 000000000006
AT3 031637 0 0 0 000000000006 0 305100000006
AT6 031637 000006 0 0 000000000006 0 305100000006
FT1A 031637 000006 0 0 000000000006 0 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 156
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0313
FT2 031637 000006 0 0 0 0 000000000006
FT2RQ 031637 000006 0 0 000000000007 0 000000000006
FT3 031637 000006 0 0 000000000007 0 000000000006
FT9 031640 000006 0 0 000000000007 0 000000000006
ET0 031641 000006 0 0 000000000001 0 000000000006
ST1A 031641 000006 0 0 000000000001 0 000000000006
ST9 031641 000006 0 0 000000000001 0 000000000006
*031641 JUMPA 0,031642
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031641 031641 0 0 324000031642 0 000000031642
IT1 031641 0 0 0 324000031642 0 000000031642
AT3 031641 0 0 0 000000031642 0 324000031642
AT6 031641 031642 0 0 000000031642 0 324000031642
FT1A 031641 031642 0 0 000000031642 0 000000031642
FT2 031641 031642 0 0 0 0 000000031642
FT2RQ 031641 031642 0 0 0 0 000000031642
FT3 031641 031642 0 0 0 0 000000031642
FT9 031642 031642 0 0 0 0 000000031642
ET0 031642 031642 0 0 0 0 000000031642
ST1A 031642 031642 0 0 0 0 000000031642
ST9 031642 031642 0 0 0 0 000000031642
*031642 SETZ 6,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031642 031642 0 0 400300000000 0 0
IT1 031642 0 0 0 400300000000 0 0
AT3 031642 0 0 0 0 0 400300000000
AT6 031642 0 0 0 0 0 400300000000
FT1A 031642 0 0 0 0 0 0
FT9 031643 0 0 0 0 0 0
ET0 031643 0 0 0 0 0 0
ST1 031643 0 0 0 0 0 0
ST2 031643 0 0 0 0 0 0
ST9 031643 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 157
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0314
*031643 CAIN 6,000001
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031643 031643 0 0 306300000001 0 000000000001
IT1 031643 0 0 0 306300000001 0 000000000001
AT3 031643 0 0 0 000000000001 0 306300000001
AT6 031643 000001 0 0 000000000001 0 306300000001
FT1A 031643 000001 0 0 000000000001 0 000000000001
FT2 031643 000001 0 0 0 0 000000000001
FT2RQ 031643 000001 0 0 0 0 000000000001
FT3 031643 000001 0 0 0 0 000000000001
FT9 031644 000001 0 0 0 0 000000000001
ET0 031645 000001 0 0 777777777777 0 000000000001
ST1A 031645 000001 0 0 777777777777 0 000000000001
ST9 031645 000001 0 0 777777777777 0 000000000001
*031645 JUMPA 0,031646
INITIAL
C(AC)=000000 000000
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 0 0 000000031646
FT3 031645 031646 0 0 0 0 000000031646
FT9 031646 031646 0 0 0 0 000000031646
ET0 031646 031646 0 0 0 0 000000031646
ST1A 031646 031646 0 0 0 0 000000031646
ST9 031646 031646 0 0 0 0 000000031646
*031646 MOVE 6,000001
INITIAL
C(AC)=000000 000000
C(E)=000000 000001
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031646 031646 0 0 200300000001 0 000000000001
IT1 031646 0 0 0 200300000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 158
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0315
AT3 031646 0 0 0 000000000001 0 200300000001
AT6 031646 000001 0 0 000000000001 0 200300000001
FT0 031646 000001 0 0 000000000001 0 200300000001
FT1A 031646 000001 0 0 000000000001 0 000000000001
FT9 031647 000001 0 0 000000000001 0 000000000001
ET0 031647 000001 0 0 000000000001 0 000000000001
ST1 031647 000001 0 0 000000000001 0 000000000001
ST2 031647 000001 0 0 000000000001 0 000000000001
ST9 031647 000001 0 0 000000000001 0 000000000001
*031647 CAIN 6,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031647 031647 0 0 306300000001 0 000000000001
IT1 031647 0 0 0 306300000001 0 000000000001
AT3 031647 0 0 0 000000000001 0 306300000001
AT6 031647 000001 0 0 000000000001 0 306300000001
FT1A 031647 000001 0 0 000000000001 0 000000000001
FT2 031647 000001 0 0 0 0 000000000001
FT2RQ 031647 000001 0 0 000000000001 0 000000000001
FT3 031647 000001 0 0 000000000001 0 000000000001
FT9 031650 000001 0 0 000000000001 0 000000000001
ET0 031650 000001 0 0 0 0 000000000001
ST1A 031650 000001 0 0 0 0 000000000001
ST9 031650 000001 0 0 0 0 000000000001
*031650 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 031650 031650 0 0 334000000000 0 0
IT1 031650 0 0 0 334000000000 0 0
AT3 031650 0 0 0 0 0 334000000000
AT6 031650 0 0 0 0 0 334000000000
FT0 031650 0 0 0 0 0 334000000000
FT1A 031650 0 0 0 0 0 0
FT9 031651 0 0 0 0 0 0
ET0 031652 0 0 0 0 0 0
ST1A 031652 0 0 0 0 0 0
ST9 031652 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 159
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0316
*031652 JUMPA 0,031653
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031652 031652 0 0 324000031653 0 000000031653
IT1 031652 0 0 0 324000031653 0 000000031653
AT3 031652 0 0 0 000000031653 0 324000031653
AT6 031652 031653 0 0 000000031653 0 324000031653
FT1A 031652 031653 0 0 000000031653 0 000000031653
FT2 031652 031653 0 0 0 0 000000031653
FT2RQ 031652 031653 0 0 0 0 000000031653
FT3 031652 031653 0 0 0 0 000000031653
FT9 031653 031653 0 0 0 0 000000031653
ET0 031653 031653 0 0 0 0 000000031653
ST1A 031653 031653 0 0 0 0 000000031653
ST9 031653 031653 0 0 0 0 000000031653
*031653 MOVEI 6,000002
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031653 031653 0 0 201300000002 0 000000000002
IT1 031653 0 0 0 201300000002 0 000000000002
AT3 031653 0 0 0 000000000002 0 201300000002
AT6 031653 000002 0 0 000000000002 0 201300000002
FT1A 031653 000002 0 0 000000000002 0 000000000002
FT9 031654 000002 0 0 000000000002 0 000000000002
ET0 031654 000002 0 0 000000000002 0 000000000002
ST1 031654 000002 0 0 000000000002 0 000000000002
ST2 031654 000002 0 0 000000000002 0 000000000002
ST9 031654 000002 0 0 000000000002 0 000000000002
*031654 CAIN 6,000001
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031654 031654 0 0 306300000001 0 000000000001
IT1 031654 0 0 0 306300000001 0 000000000001
AT3 031654 0 0 0 000000000001 0 306300000001
AT6 031654 000001 0 0 000000000001 0 306300000001
FT1A 031654 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 160
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0317
FT2 031654 000001 0 0 0 0 000000000001
FT2RQ 031654 000001 0 0 000000000002 0 000000000001
FT3 031654 000001 0 0 000000000002 0 000000000001
FT9 031655 000001 0 0 000000000002 0 000000000001
ET0 031656 000001 0 0 000000000001 0 000000000001
ST1A 031656 000001 0 0 000000000001 0 000000000001
ST9 031656 000001 0 0 000000000001 0 000000000001
*031656 JUMPA 0,031657
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031656 031656 0 0 324000031657 0 000000031657
IT1 031656 0 0 0 324000031657 0 000000031657
AT3 031656 0 0 0 000000031657 0 324000031657
AT6 031656 031657 0 0 000000031657 0 324000031657
FT1A 031656 031657 0 0 000000031657 0 000000031657
FT2 031656 031657 0 0 0 0 000000031657
FT2RQ 031656 031657 0 0 0 0 000000031657
FT3 031656 031657 0 0 0 0 000000031657
FT9 031657 031657 0 0 0 0 000000031657
ET0 031657 031657 0 0 0 0 000000031657
ST1A 031657 031657 0 0 0 0 000000031657
ST9 031657 031657 0 0 0 0 000000031657
*031657 MOVEI 11,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 031657 031657 0 0 201440000002 0 000000000002
IT1 031657 0 0 0 201440000002 0 000000000002
AT3 031657 0 0 0 000000000002 0 201440000002
AT6 031657 000002 0 0 000000000002 0 201440000002
FT1A 031657 000002 0 0 000000000002 0 000000000002
FT9 031660 000002 0 0 000000000002 0 000000000002
ET0 031660 000002 0 0 000000000002 0 000000000002
ST1 031660 000002 0 0 000000000002 0 000000000002
ST2 031660 000002 0 0 000000000002 0 000000000002
ST9 031660 000002 0 0 000000000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 161
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0318
*031660 CAIG 11,000003
INITIAL
C(AC)=000000 000002
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031660 031660 0 0 307440000003 0 000000000003
IT1 031660 0 0 0 307440000003 0 000000000003
AT3 031660 0 0 0 000000000003 0 307440000003
AT6 031660 000003 0 0 000000000003 0 307440000003
FT1A 031660 000003 0 0 000000000003 0 000000000003
FT2 031660 000003 0 0 0 0 000000000003
FT2RQ 031660 000003 0 0 000000000002 0 000000000003
FT3 031660 000003 0 0 000000000002 0 000000000003
FT9 031661 000003 0 0 000000000002 0 000000000003
ET0 031661 000003 0 0 777777777777 0 000000000003
ST1A 031661 000003 0 0 777777777777 0 000000000003
ST9 031661 000003 0 0 777777777777 0 000000000003
*031661 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 031661 031661 0 0 334000000000 0 0
IT1 031661 0 0 0 334000000000 0 0
AT3 031661 0 0 0 0 0 334000000000
AT6 031661 0 0 0 0 0 334000000000
FT0 031661 0 0 0 0 0 334000000000
FT1A 031661 0 0 0 0 0 0
FT9 031662 0 0 0 0 0 0
ET0 031663 0 0 0 0 0 0
ST1A 031663 0 0 0 0 0 0
ST9 031663 0 0 0 0 0 0
*031663 JUMPA 0,031664
INITIAL
C(AC)=000000 000000
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
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 162
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0319
FT1A 031663 031664 0 0 000000031664 0 000000031664
FT2 031663 031664 0 0 0 0 000000031664
FT2RQ 031663 031664 0 0 0 0 000000031664
FT3 031663 031664 0 0 0 0 000000031664
FT9 031664 031664 0 0 0 0 000000031664
ET0 031664 031664 0 0 0 0 000000031664
ST1A 031664 031664 0 0 0 0 000000031664
ST9 031664 031664 0 0 0 0 000000031664
*031664 MOVEI 11,000003
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 031664 031664 0 0 201440000003 0 000000000003
IT1 031664 0 0 0 201440000003 0 000000000003
AT3 031664 0 0 0 000000000003 0 201440000003
AT6 031664 000003 0 0 000000000003 0 201440000003
FT1A 031664 000003 0 0 000000000003 0 000000000003
FT9 031665 000003 0 0 000000000003 0 000000000003
ET0 031665 000003 0 0 000000000003 0 000000000003
ST1 031665 000003 0 0 000000000003 0 000000000003
ST2 031665 000003 0 0 000000000003 0 000000000003
ST9 031665 000003 0 0 000000000003 0 000000000003
*031665 CAIG 11,000003
INITIAL
C(AC)=000000 000003
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031665 031665 0 0 307440000003 0 000000000003
IT1 031665 0 0 0 307440000003 0 000000000003
AT3 031665 0 0 0 000000000003 0 307440000003
AT6 031665 000003 0 0 000000000003 0 307440000003
FT1A 031665 000003 0 0 000000000003 0 000000000003
FT2 031665 000003 0 0 0 0 000000000003
FT2RQ 031665 000003 0 0 000000000003 0 000000000003
FT3 031665 000003 0 0 000000000003 0 000000000003
FT9 031666 000003 0 0 000000000003 0 000000000003
ET0 031666 000003 0 0 0 0 000000000003
ST1A 031666 000003 0 0 0 0 000000000003
ST9 031666 000003 0 0 0 0 000000000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 163
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0320
*031666 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 031666 031666 0 0 334000000000 0 0
IT1 031666 0 0 0 334000000000 0 0
AT3 031666 0 0 0 0 0 334000000000
AT6 031666 0 0 0 0 0 334000000000
FT0 031666 0 0 0 0 0 334000000000
FT1A 031666 0 0 0 0 0 0
FT9 031667 0 0 0 0 0 0
ET0 031670 0 0 0 0 0 0
ST1A 031670 0 0 0 0 0 0
ST9 031670 0 0 0 0 0 0
*031670 JUMPA 0,031671
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031670 031670 0 0 324000031671 0 000000031671
IT1 031670 0 0 0 324000031671 0 000000031671
AT3 031670 0 0 0 000000031671 0 324000031671
AT6 031670 031671 0 0 000000031671 0 324000031671
FT1A 031670 031671 0 0 000000031671 0 000000031671
FT2 031670 031671 0 0 0 0 000000031671
FT2RQ 031670 031671 0 0 0 0 000000031671
FT3 031670 031671 0 0 0 0 000000031671
FT9 031671 031671 0 0 0 0 000000031671
ET0 031671 031671 0 0 0 0 000000031671
ST1A 031671 031671 0 0 0 0 000000031671
ST9 031671 031671 0 0 0 0 000000031671
*031671 MOVEI 11,000004
INITIAL
C(AC)=000000 000003
FINAL
C(AC)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 031671 031671 0 0 201440000004 0 000000000004
IT1 031671 0 0 0 201440000004 0 000000000004
AT3 031671 0 0 0 000000000004 0 201440000004
AT6 031671 000004 0 0 000000000004 0 201440000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 164
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0321
FT1A 031671 000004 0 0 000000000004 0 000000000004
FT9 031672 000004 0 0 000000000004 0 000000000004
ET0 031672 000004 0 0 000000000004 0 000000000004
ST1 031672 000004 0 0 000000000004 0 000000000004
ST2 031672 000004 0 0 000000000004 0 000000000004
ST9 031672 000004 0 0 000000000004 0 000000000004
*031672 CAIG 11,000003
INITIAL
C(AC)=000000 000004
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031672 031672 0 0 307440000003 0 000000000003
IT1 031672 0 0 0 307440000003 0 000000000003
AT3 031672 0 0 0 000000000003 0 307440000003
AT6 031672 000003 0 0 000000000003 0 307440000003
FT1A 031672 000003 0 0 000000000003 0 000000000003
FT2 031672 000003 0 0 0 0 000000000003
FT2RQ 031672 000003 0 0 000000000004 0 000000000003
FT3 031672 000003 0 0 000000000004 0 000000000003
FT9 031673 000003 0 0 000000000004 0 000000000003
ET0 031674 000003 0 0 000000000001 0 000000000003
ST1A 031674 000003 0 0 000000000001 0 000000000003
ST9 031674 000003 0 0 000000000001 0 000000000003
*031674 JUMPA 0,031675
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031674 031674 0 0 324000031675 0 000000031675
IT1 031674 0 0 0 324000031675 0 000000031675
AT3 031674 0 0 0 000000031675 0 324000031675
AT6 031674 031675 0 0 000000031675 0 324000031675
FT1A 031674 031675 0 0 000000031675 0 000000031675
FT2 031674 031675 0 0 0 0 000000031675
FT2RQ 031674 031675 0 0 0 0 000000031675
FT3 031674 031675 0 0 0 0 000000031675
FT9 031675 031675 0 0 0 0 000000031675
ET0 031675 031675 0 0 0 0 000000031675
ST1A 031675 031675 0 0 0 0 000000031675
ST9 031675 031675 0 0 0 0 000000031675
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 165
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0322
*031675 SETO 1,000000
INITIAL
C(AC)=000000 000001
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031675 031675 0 0 474040000000 0 0
IT1 031675 0 0 0 474040000000 0 0
AT3 031675 0 0 0 0 0 474040000000
AT6 031675 0 0 0 0 0 474040000000
FT1A 031675 0 0 0 0 0 0
FT9 031676 0 0 0 0 0 0
ET0 031676 0 0 0 777777777777 0 0
ST1 031676 0 0 0 777777777777 0 0
ST2 031676 0 0 0 777777777777 0 0
ST9 031676 0 0 0 777777777777 0 0
*031676 SETZ 2,000000
INITIAL
C(AC)=000000 000007
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031676 031676 0 0 400100000000 0 0
IT1 031676 0 0 0 400100000000 0 0
AT3 031676 0 0 0 0 0 400100000000
AT6 031676 0 0 0 0 0 400100000000
FT1A 031676 0 0 0 0 0 0
FT9 031677 0 0 0 0 0 0
ET0 031677 0 0 0 0 0 0
ST1 031677 0 0 0 0 0 0
ST2 031677 0 0 0 0 0 0
ST9 031677 0 0 0 0 0 0
*031677 CAMLE 1,000002
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031677 031677 0 0 313040000002 0 0
IT1 031677 0 0 0 313040000002 0 0
AT3 031677 0 0 0 000000000002 0 313040000002
AT6 031677 000002 0 0 000000000002 0 313040000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 166
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0323
FT0 031677 000002 0 0 0 0 313040000002
FT1A 031677 000002 0 0 0 0 0
FT2 031677 000002 0 0 0 0 0
FT2RQ 031677 000002 0 0 777777777777 0 0
FT3 031677 000002 0 0 777777777777 0 0
FT9 0 000002 0 0 777777777777 0 0
ET0 031701 000002 0 0 777777777777 0 0
ST1A 031701 000002 0 0 777777777777 0 0
ST9 031701 000002 0 0 777777777777 0 0
*031701 JUMPA 0,031702
INITIAL
C(AC)=000000 000000
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 0 0 000000031702
FT3 031701 031702 0 0 0 0 000000031702
FT9 031702 031702 0 0 0 0 000000031702
ET0 031702 031702 0 0 0 0 000000031702
ST1A 031702 031702 0 0 0 0 000000031702
ST9 031702 031702 0 0 0 0 000000031702
*031702 SETZ 1,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031702 031702 0 0 400040000000 0 0
IT1 031702 0 0 0 400040000000 0 0
AT3 031702 0 0 0 0 0 400040000000
AT6 031702 0 0 0 0 0 400040000000
FT1A 031702 0 0 0 0 0 0
FT9 031703 0 0 0 0 0 0
ET0 031703 0 0 0 0 0 0
ST1 031703 0 0 0 0 0 0
ST2 031703 0 0 0 0 0 0
ST9 031703 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 167
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0324
*031703 CAMLE 1,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031703 031703 0 0 313040033501 0 0
IT1 031703 0 0 0 313040033501 0 0
AT3 031703 0 0 0 000000033501 0 313040033501
AT6 031703 033501 0 0 000000033501 0 313040033501
FT0 031703 033501 0 0 0 0 313040033501
FT1A 031703 033501 0 0 0 0 0
FT2 031703 033501 0 0 0 0 0
FT2RQ 031703 033501 0 0 0 0 0
FT3 031703 033501 0 0 0 0 0
FT9 031704 033501 0 0 0 0 0
ET0 031705 033501 0 0 0 0 0
ST1A 031705 033501 0 0 0 0 0
ST9 031705 033501 0 0 0 0 0
*031705 JUMPA 0,031706
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031705 031705 0 0 324000031706 0 000000031706
IT1 031705 0 0 0 324000031706 0 000000031706
AT3 031705 0 0 0 000000031706 0 324000031706
AT6 031705 031706 0 0 000000031706 0 324000031706
FT1A 031705 031706 0 0 000000031706 0 000000031706
FT2 031705 031706 0 0 0 0 000000031706
FT2RQ 031705 031706 0 0 0 0 000000031706
FT3 031705 031706 0 0 0 0 000000031706
FT9 031706 031706 0 0 0 0 000000031706
ET0 031706 031706 0 0 0 0 000000031706
ST1A 031706 031706 0 0 0 0 000000031706
ST9 031706 031706 0 0 0 0 000000031706
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 168
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0325
*031706 MOVEI 1,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031706 031706 0 0 201040000001 0 000000000001
IT1 031706 0 0 0 201040000001 0 000000000001
AT3 031706 0 0 0 000000000001 0 201040000001
AT6 031706 000001 0 0 000000000001 0 201040000001
FT1A 031706 000001 0 0 000000000001 0 000000000001
FT9 031707 000001 0 0 000000000001 0 000000000001
ET0 031707 000001 0 0 000000000001 0 000000000001
ST1 031707 000001 0 0 000000000001 0 000000000001
ST2 031707 000001 0 0 000000000001 0 000000000001
ST9 031707 000001 0 0 000000000001 0 000000000001
*031707 SETZ 2,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031707 031707 0 0 400100000000 0 0
IT1 031707 0 0 0 400100000000 0 0
AT3 031707 0 0 0 0 0 400100000000
AT6 031707 0 0 0 0 0 400100000000
FT1A 031707 0 0 0 0 0 0
FT9 031710 0 0 0 0 0 0
ET0 031710 0 0 0 0 0 0
ST1 031710 0 0 0 0 0 0
ST2 031710 0 0 0 0 0 0
ST9 031710 0 0 0 0 0 0
*031710 CAMLE 1,000002
INITIAL
C(AC)=000000 000001
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031710 031710 0 0 313040000002 0 0
IT1 031710 0 0 0 313040000002 0 0
AT3 031710 0 0 0 000000000002 0 313040000002
AT6 031710 000002 0 0 000000000002 0 313040000002
FT0 031710 000002 0 0 0 0 313040000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 169
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0326
FT1A 031710 000002 0 0 0 0 0
FT2 031710 000002 0 0 0 0 0
FT2RQ 031710 000002 0 0 000000000001 0 0
FT3 031710 000002 0 0 000000000001 0 0
FT9 031711 000002 0 0 000000000001 0 0
ET0 031711 000002 0 0 000000000001 0 0
ST1A 031711 000002 0 0 000000000001 0 0
ST9 031711 000002 0 0 000000000001 0 0
*031711 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 031711 031711 0 0 334000000000 0 0
IT1 031711 0 0 0 334000000000 0 0
AT3 031711 0 0 0 0 0 334000000000
AT6 031711 0 0 0 0 0 334000000000
FT0 031711 0 0 0 0 0 334000000000
FT1A 031711 0 0 0 0 0 0
FT9 031712 0 0 0 0 0 0
ET0 031713 0 0 0 0 0 0
ST1A 031713 0 0 0 0 0 0
ST9 031713 0 0 0 0 0 0
*031713 JUMPA 0,031714
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031713 031713 0 0 324000031714 0 000000031714
IT1 031713 0 0 0 324000031714 0 000000031714
AT3 031713 0 0 0 000000031714 0 324000031714
AT6 031713 031714 0 0 000000031714 0 324000031714
FT1A 031713 031714 0 0 000000031714 0 000000031714
FT2 031713 031714 0 0 0 0 000000031714
FT2RQ 031713 031714 0 0 0 0 000000031714
FT3 031713 031714 0 0 0 0 000000031714
FT9 031714 031714 0 0 0 0 000000031714
ET0 031714 031714 0 0 0 0 000000031714
ST1A 031714 031714 0 0 0 0 000000031714
ST9 031714 031714 0 0 0 0 000000031714
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 170
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0327
*031714 HRROI 10,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031714 031714 0 0 561400777776 0 000000777776
IT1 031714 0 0 0 561400777776 0 000000777776
AT3 031714 0 0 0 000000777776 0 561400777776
AT6 031714 777776 0 0 000000777776 0 561400777776
FT1A 031714 777776 0 0 000000777776 0 000000777776
FT9 031715 777776 0 0 000000777776 0 000000777776
ET0 031715 777776 0 0 777777777776 0 000000777776
ST1 031715 777776 0 0 777777777776 0 000000777776
ST2 031715 777776 0 0 777777777776 0 000000777776
ST9 031715 777776 0 0 777777777776 0 000000777776
*031715 CAMG 10,033462
INITIAL
C(AC)=777777 777776
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031715 031715 0 0 317400033462 0 777777777777
IT1 031715 0 0 0 317400033462 0 777777777777
AT3 031715 0 0 0 000000033462 0 317400033462
AT6 031715 033462 0 0 000000033462 0 317400033462
FT0 031715 033462 0 0 777777777777 0 317400033462
FT1A 031715 033462 0 0 777777777777 0 777777777777
FT2 031715 033462 0 0 0 0 777777777777
FT2RQ 031715 033462 0 0 777777777776 0 777777777777
FT3 031715 033462 0 0 777777777776 0 777777777777
FT9 031716 033462 0 0 777777777776 0 777777777777
ET0 031716 033462 0 0 777777777777 0 777777777777
ST1A 031716 033462 0 0 777777777777 0 777777777777
ST9 031716 033462 0 0 777777777777 0 777777777777
*031716 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 031716 031716 0 0 334000000000 0 0
IT1 031716 0 0 0 334000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 171
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0328
AT3 031716 0 0 0 0 0 334000000000
AT6 031716 0 0 0 0 0 334000000000
FT0 031716 0 0 0 0 0 334000000000
FT1A 031716 0 0 0 0 0 0
FT9 031717 0 0 0 0 0 0
ET0 031720 0 0 0 0 0 0
ST1A 031720 0 0 0 0 0 0
ST9 031720 0 0 0 0 0 0
*031720 JUMPA 0,031721
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031720 031720 0 0 324000031721 0 000000031721
IT1 031720 0 0 0 324000031721 0 000000031721
AT3 031720 0 0 0 000000031721 0 324000031721
AT6 031720 031721 0 0 000000031721 0 324000031721
FT1A 031720 031721 0 0 000000031721 0 000000031721
FT2 031720 031721 0 0 0 0 000000031721
FT2RQ 031720 031721 0 0 0 0 000000031721
FT3 031720 031721 0 0 0 0 000000031721
FT9 031721 031721 0 0 0 0 000000031721
ET0 031721 031721 0 0 0 0 000000031721
ST1A 031721 031721 0 0 0 0 000000031721
ST9 031721 031721 0 0 0 0 000000031721
*031721 HRROI 10,777777
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031721 031721 0 0 561400777777 0 000000777777
IT1 031721 0 0 0 561400777777 0 000000777777
AT3 031721 0 0 0 000000777777 0 561400777777
AT6 031721 777777 0 0 000000777777 0 561400777777
FT1A 031721 777777 0 0 000000777777 0 000000777777
FT9 031722 777777 0 0 000000777777 0 000000777777
ET0 031722 777777 0 0 777777777777 0 000000777777
ST1 031722 777777 0 0 777777777777 0 000000777777
ST2 031722 777777 0 0 777777777777 0 000000777777
ST9 031722 777777 0 0 777777777777 0 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 172
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0329
*031722 CAMG 10,033500
INITIAL
C(AC)=777777 777777
C(E)=777777 777776
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031722 031722 0 0 317400033500 0 777777777776
IT1 031722 0 0 0 317400033500 0 777777777776
AT3 031722 0 0 0 000000033500 0 317400033500
AT6 031722 0 0 0 000000033500 0 317400033500
FT0 031722 0 0 0 777777777776 0 317400033500
FT1A 031722 0 0 0 777777777776 0 777777777776
FT2 031722 0 0 0 0 0 777777777776
FT2RQ 031722 0 0 0 777777777777 0 777777777776
FT3 031722 0 0 0 777777777777 0 777777777776
FT9 031723 0 0 0 777777777777 0 777777777776
ET0 031724 0 0 0 000000000001 0 777777777776
ST1A 031724 0 0 0 000000000001 0 777777777776
ST9 031724 0 0 0 000000000001 0 777777777776
*031724 JUMPA 0,031725
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031724 031724 0 0 324000031725 0 000000031725
IT1 031724 0 0 0 324000031725 0 000000031725
AT3 031724 0 0 0 000000031725 0 324000031725
AT6 031724 031725 0 0 000000031725 0 324000031725
FT1A 031724 031725 0 0 000000031725 0 000000031725
FT2 031724 031725 0 0 0 0 000000031725
FT2RQ 031724 031725 0 0 0 0 000000031725
FT3 031724 031725 0 0 0 0 000000031725
FT9 031725 031725 0 0 0 0 000000031725
ET0 031725 031725 0 0 0 0 000000031725
ST1A 031725 031725 0 0 0 0 000000031725
ST9 031725 031725 0 0 0 0 000000031725
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 173
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0330
*031725 SETO 10,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031725 031725 0 0 474400000000 0 0
IT1 031725 0 0 0 474400000000 0 0
AT3 031725 0 0 0 0 0 474400000000
AT6 031725 0 0 0 0 0 474400000000
FT1A 031725 0 0 0 0 0 0
FT9 031726 0 0 0 0 0 0
ET0 031726 0 0 0 777777777777 0 0
ST1 031726 0 0 0 777777777777 0 0
ST2 031726 0 0 0 777777777777 0 0
ST9 031726 0 0 0 777777777777 0 0
*031726 CAMG 10,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031726 031726 0 0 317400033462 0 777777777777
IT1 031726 0 0 0 317400033462 0 777777777777
AT3 031726 0 0 0 000000033462 0 317400033462
AT6 031726 033462 0 0 000000033462 0 317400033462
FT0 031726 033462 0 0 777777777777 0 317400033462
FT1A 031726 033462 0 0 777777777777 0 777777777777
FT2 031726 033462 0 0 0 0 777777777777
FT2RQ 031726 033462 0 0 777777777777 0 777777777777
FT3 031726 033462 0 0 777777777777 0 777777777777
FT9 031727 033462 0 0 777777777777 0 777777777777
ET0 031727 033462 0 0 0 0 777777777777
ST1A 031727 033462 0 0 0 0 777777777777
ST9 031727 033462 0 0 0 0 777777777777
*031727 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 031727 031727 0 0 334000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 174
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0331
IT1 031727 0 0 0 334000000000 0 0
AT3 031727 0 0 0 0 0 334000000000
AT6 031727 0 0 0 0 0 334000000000
FT0 031727 0 0 0 0 0 334000000000
FT1A 031727 0 0 0 0 0 0
FT9 031730 0 0 0 0 0 0
ET0 031731 0 0 0 0 0 0
ST1A 031731 0 0 0 0 0 0
ST9 031731 0 0 0 0 0 0
*031731 JUMPA 0,031732
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031731 031731 0 0 324000031732 0 000000031732
IT1 031731 0 0 0 324000031732 0 000000031732
AT3 031731 0 0 0 000000031732 0 324000031732
AT6 031731 031732 0 0 000000031732 0 324000031732
FT1A 031731 031732 0 0 000000031732 0 000000031732
FT2 031731 031732 0 0 0 0 000000031732
FT2RQ 031731 031732 0 0 0 0 000000031732
FT3 031731 031732 0 0 0 0 000000031732
FT9 031732 031732 0 0 0 0 000000031732
ET0 031732 031732 0 0 0 0 000000031732
ST1A 031732 031732 0 0 0 0 000000031732
ST9 031732 031732 0 0 0 0 000000031732
*031732 SETZ 10,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031732 031732 0 0 400400000000 0 0
IT1 031732 0 0 0 400400000000 0 0
AT3 031732 0 0 0 0 0 400400000000
AT6 031732 0 0 0 0 0 400400000000
FT1A 031732 0 0 0 0 0 0
FT9 031733 0 0 0 0 0 0
ET0 031733 0 0 0 0 0 0
ST1 031733 0 0 0 0 0 0
ST2 031733 0 0 0 0 0 0
ST9 031733 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 175
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0332
*031733 CAMG 10,033462
INITIAL
C(AC)=000000 000000
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031733 031733 0 0 317400033462 0 777777777777
IT1 031733 0 0 0 317400033462 0 777777777777
AT3 031733 0 0 0 000000033462 0 317400033462
AT6 031733 033462 0 0 000000033462 0 317400033462
FT0 031733 033462 0 0 777777777777 0 317400033462
FT1A 031733 033462 0 0 777777777777 0 777777777777
FT2 031733 033462 0 0 0 0 777777777777
FT2RQ 031733 033462 0 0 0 0 777777777777
FT3 031733 033462 0 0 0 0 777777777777
FT9 031734 033462 0 0 0 0 777777777777
ET0 031735 033462 0 0 000000000001 0 777777777777
ST1A 031735 033462 0 0 000000000001 0 777777777777
ST9 031735 033462 0 0 000000000001 0 777777777777
*031735 JUMPA 0,031736
INITIAL
C(AC)=000000 000000
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 0 0 000000031736
FT3 031735 031736 0 0 0 0 000000031736
FT9 031736 031736 0 0 0 0 000000031736
ET0 031736 031736 0 0 0 0 000000031736
ST1A 031736 031736 0 0 0 0 000000031736
ST9 031736 031736 0 0 0 0 000000031736
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 176
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0333
*031736 SETO 17,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031736 031736 0 0 474740000000 0 0
IT1 031736 0 0 0 474740000000 0 0
AT3 031736 0 0 0 0 0 474740000000
AT6 031736 0 0 0 0 0 474740000000
FT1A 031736 0 0 0 0 0 0
FT9 031737 0 0 0 0 0 0
ET0 031737 0 0 0 777777777777 0 0
ST1 031737 0 0 0 777777777777 0 0
ST2 031737 0 0 0 777777777777 0 0
ST9 031737 0 0 0 777777777777 0 0
*031737 JUMPLE 17,031741
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031737 031737 0 0 323740031741 0 000000031741
IT1 031737 0 0 0 323740031741 0 000000031741
AT3 031737 0 0 0 000000031741 0 323740031741
AT6 031737 031741 0 0 000000031741 0 323740031741
FT1A 031737 031741 0 0 000000031741 0 000000031741
FT2 031737 031741 0 0 0 0 000000031741
FT2RQ 031737 031741 0 0 777777777777 0 000000031741
FT3 031737 031741 0 0 777777777777 0 000000031741
FT9 031740 031741 0 0 777777777777 0 000000031741
ET0 031741 031741 0 0 777777777777 0 000000031741
ST1A 031741 031741 0 0 777777777777 0 000000031741
ST9 031741 031741 0 0 777777777777 0 000000031741
*031741 JUMPA 0,031742
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031741 031741 0 0 324000031742 0 000000031742
IT1 031741 0 0 0 324000031742 0 000000031742
AT3 031741 0 0 0 000000031742 0 324000031742
AT6 031741 031742 0 0 000000031742 0 324000031742
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 177
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0334
FT1A 031741 031742 0 0 000000031742 0 000000031742
FT2 031741 031742 0 0 0 0 000000031742
FT2RQ 031741 031742 0 0 0 0 000000031742
FT3 031741 031742 0 0 0 0 000000031742
FT9 031742 031742 0 0 0 0 000000031742
ET0 031742 031742 0 0 0 0 000000031742
ST1A 031742 031742 0 0 0 0 000000031742
ST9 031742 031742 0 0 0 0 000000031742
*031742 SETZ 17,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031742 031742 0 0 400740000000 0 0
IT1 031742 0 0 0 400740000000 0 0
AT3 031742 0 0 0 0 0 400740000000
AT6 031742 0 0 0 0 0 400740000000
FT1A 031742 0 0 0 0 0 0
FT9 031743 0 0 0 0 0 0
ET0 031743 0 0 0 0 0 0
ST1 031743 0 0 0 0 0 0
ST2 031743 0 0 0 0 0 0
ST9 031743 0 0 0 0 0 0
*031743 JUMPLE 17,031745
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031743 031743 0 0 323740031745 0 000000031745
IT1 031743 0 0 0 323740031745 0 000000031745
AT3 031743 0 0 0 000000031745 0 323740031745
AT6 031743 031745 0 0 000000031745 0 323740031745
FT1A 031743 031745 0 0 000000031745 0 000000031745
FT2 031743 031745 0 0 0 0 000000031745
FT2RQ 031743 031745 0 0 0 0 000000031745
FT3 031743 031745 0 0 0 0 000000031745
FT9 031744 031745 0 0 0 0 000000031745
ET0 031745 031745 0 0 0 0 000000031745
ST1A 031745 031745 0 0 0 0 000000031745
ST9 031745 031745 0 0 0 0 000000031745
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 178
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0335
*031745 JUMPA 0,031746
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031745 031745 0 0 324000031746 0 000000031746
IT1 031745 0 0 0 324000031746 0 000000031746
AT3 031745 0 0 0 000000031746 0 324000031746
AT6 031745 031746 0 0 000000031746 0 324000031746
FT1A 031745 031746 0 0 000000031746 0 000000031746
FT2 031745 031746 0 0 0 0 000000031746
FT2RQ 031745 031746 0 0 0 0 000000031746
FT3 031745 031746 0 0 0 0 000000031746
FT9 031746 031746 0 0 0 0 000000031746
ET0 031746 031746 0 0 0 0 000000031746
ST1A 031746 031746 0 0 0 0 000000031746
ST9 031746 031746 0 0 0 0 000000031746
*031746 MOVEI 17,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031746 031746 0 0 201740000001 0 000000000001
IT1 031746 0 0 0 201740000001 0 000000000001
AT3 031746 0 0 0 000000000001 0 201740000001
AT6 031746 000001 0 0 000000000001 0 201740000001
FT1A 031746 000001 0 0 000000000001 0 000000000001
FT9 031747 000001 0 0 000000000001 0 000000000001
ET0 031747 000001 0 0 000000000001 0 000000000001
ST1 031747 000001 0 0 000000000001 0 000000000001
ST2 031747 000001 0 0 000000000001 0 000000000001
ST9 031747 000001 0 0 000000000001 0 000000000001
*031747 JUMP 17,031751
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031747 031747 0 0 320740031751 0 000000031751
IT1 031747 0 0 0 320740031751 0 000000031751
AT3 031747 0 0 0 000000031751 0 320740031751
AT6 031747 031751 0 0 000000031751 0 320740031751
FT1A 031747 031751 0 0 000000031751 0 000000031751
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 179
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0336
FT2 031747 031751 0 0 0 0 000000031751
FT2RQ 031747 031751 0 0 000000000001 0 000000031751
FT3 031747 031751 0 0 000000000001 0 000000031751
FT9 031750 031751 0 0 000000000001 0 000000031751
ET0 031750 031751 0 0 000000000001 0 000000031751
ST1A 031750 031751 0 0 000000000001 0 000000031751
ST9 031750 031751 0 0 000000000001 0 000000031751
*031750 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 031750 031750 0 0 334000000000 0 0
IT1 031750 0 0 0 334000000000 0 0
AT3 031750 0 0 0 0 0 334000000000
AT6 031750 0 0 0 0 0 334000000000
FT0 031750 0 0 0 0 0 334000000000
FT1A 031750 0 0 0 0 0 0
FT9 031751 0 0 0 0 0 0
ET0 031752 0 0 0 0 0 0
ST1A 031752 0 0 0 0 0 0
ST9 031752 0 0 0 0 0 0
*031752 JUMPA 0,031753
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031752 031752 0 0 324000031753 0 000000031753
IT1 031752 0 0 0 324000031753 0 000000031753
AT3 031752 0 0 0 000000031753 0 324000031753
AT6 031752 031753 0 0 000000031753 0 324000031753
FT1A 031752 031753 0 0 000000031753 0 000000031753
FT2 031752 031753 0 0 0 0 000000031753
FT2RQ 031752 031753 0 0 0 0 000000031753
FT3 031752 031753 0 0 0 0 000000031753
FT9 031753 031753 0 0 0 0 000000031753
ET0 031753 031753 0 0 0 0 000000031753
ST1A 031753 031753 0 0 0 0 000000031753
ST9 031753 031753 0 0 0 0 000000031753
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 180
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0337
*031753 SETO 16,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031753 031753 0 0 474700000000 0 0
IT1 031753 0 0 0 474700000000 0 0
AT3 031753 0 0 0 0 0 474700000000
AT6 031753 0 0 0 0 0 474700000000
FT1A 031753 0 0 0 0 0 0
FT9 031754 0 0 0 0 0 0
ET0 031754 0 0 0 777777777777 0 0
ST1 031754 0 0 0 777777777777 0 0
ST2 031754 0 0 0 777777777777 0 0
ST9 031754 0 0 0 777777777777 0 0
*031754 JUMPGE 16,031756
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031754 031754 0 0 325700031756 0 000000031756
IT1 031754 0 0 0 325700031756 0 000000031756
AT3 031754 0 0 0 000000031756 0 325700031756
AT6 031754 031756 0 0 000000031756 0 325700031756
FT1A 031754 031756 0 0 000000031756 0 000000031756
FT2 031754 031756 0 0 0 0 000000031756
FT2RQ 031754 031756 0 0 777777777777 0 000000031756
FT3 031754 031756 0 0 777777777777 0 000000031756
FT9 031755 031756 0 0 777777777777 0 000000031756
ET0 031755 031756 0 0 777777777777 0 000000031756
ST1A 031755 031756 0 0 777777777777 0 000000031756
ST9 031755 031756 0 0 777777777777 0 000000031756
*031755 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 031755 031755 0 0 334000000000 0 0
IT1 031755 0 0 0 334000000000 0 0
AT3 031755 0 0 0 0 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 181
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0338
AT6 031755 0 0 0 0 0 334000000000
FT0 031755 0 0 0 0 0 334000000000
FT1A 031755 0 0 0 0 0 0
FT9 031756 0 0 0 0 0 0
ET0 031757 0 0 0 0 0 0
ST1A 031757 0 0 0 0 0 0
ST9 031757 0 0 0 0 0 0
*031757 JUMPA 0,031760
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031757 031757 0 0 324000031760 0 000000031760
IT1 031757 0 0 0 324000031760 0 000000031760
AT3 031757 0 0 0 000000031760 0 324000031760
AT6 031757 031760 0 0 000000031760 0 324000031760
FT1A 031757 031760 0 0 000000031760 0 000000031760
FT2 031757 031760 0 0 0 0 000000031760
FT2RQ 031757 031760 0 0 0 0 000000031760
FT3 031757 031760 0 0 0 0 000000031760
FT9 031760 031760 0 0 0 0 000000031760
ET0 031760 031760 0 0 0 0 000000031760
ST1A 031760 031760 0 0 0 0 000000031760
ST9 031760 031760 0 0 0 0 000000031760
*031760 SETZ 16,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031760 031760 0 0 400700000000 0 0
IT1 031760 0 0 0 400700000000 0 0
AT3 031760 0 0 0 0 0 400700000000
AT6 031760 0 0 0 0 0 400700000000
FT1A 031760 0 0 0 0 0 0
FT9 031761 0 0 0 0 0 0
ET0 031761 0 0 0 0 0 0
ST1 031761 0 0 0 0 0 0
ST2 031761 0 0 0 0 0 0
ST9 031761 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 182
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0339
*031761 JUMPGE 16,031763
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031761 031761 0 0 325700031763 0 000000031763
IT1 031761 0 0 0 325700031763 0 000000031763
AT3 031761 0 0 0 000000031763 0 325700031763
AT6 031761 031763 0 0 000000031763 0 325700031763
FT1A 031761 031763 0 0 000000031763 0 000000031763
FT2 031761 031763 0 0 0 0 000000031763
FT2RQ 031761 031763 0 0 0 0 000000031763
FT3 031761 031763 0 0 0 0 000000031763
FT9 031762 031763 0 0 0 0 000000031763
ET0 031763 031763 0 0 0 0 000000031763
ST1A 031763 031763 0 0 0 0 000000031763
ST9 031763 031763 0 0 0 0 000000031763
*031763 JUMPA 0,031764
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031763 031763 0 0 324000031764 0 000000031764
IT1 031763 0 0 0 324000031764 0 000000031764
AT3 031763 0 0 0 000000031764 0 324000031764
AT6 031763 031764 0 0 000000031764 0 324000031764
FT1A 031763 031764 0 0 000000031764 0 000000031764
FT2 031763 031764 0 0 0 0 000000031764
FT2RQ 031763 031764 0 0 0 0 000000031764
FT3 031763 031764 0 0 0 0 000000031764
FT9 031764 031764 0 0 0 0 000000031764
ET0 031764 031764 0 0 0 0 000000031764
ST1A 031764 031764 0 0 0 0 000000031764
ST9 031764 031764 0 0 0 0 000000031764
*031764 MOVEI 16,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 031764 031764 0 0 201700000001 0 000000000001
IT1 031764 0 0 0 201700000001 0 000000000001
AT3 031764 0 0 0 000000000001 0 201700000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 183
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0340
AT6 031764 000001 0 0 000000000001 0 201700000001
FT1A 031764 000001 0 0 000000000001 0 000000000001
FT9 031765 000001 0 0 000000000001 0 000000000001
ET0 031765 000001 0 0 000000000001 0 000000000001
ST1 031765 000001 0 0 000000000001 0 000000000001
ST2 031765 000001 0 0 000000000001 0 000000000001
ST9 031765 000001 0 0 000000000001 0 000000000001
*031765 JUMPGE 16,031767
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031765 031765 0 0 325700031767 0 000000031767
IT1 031765 0 0 0 325700031767 0 000000031767
AT3 031765 0 0 0 000000031767 0 325700031767
AT6 031765 031767 0 0 000000031767 0 325700031767
FT1A 031765 031767 0 0 000000031767 0 000000031767
FT2 031765 031767 0 0 0 0 000000031767
FT2RQ 031765 031767 0 0 000000000001 0 000000031767
FT3 031765 031767 0 0 000000000001 0 000000031767
FT9 031766 031767 0 0 000000000001 0 000000031767
ET0 031767 031767 0 0 000000000001 0 000000031767
ST1A 031767 031767 0 0 000000000001 0 000000031767
ST9 031767 031767 0 0 000000000001 0 000000031767
*031767 JUMPA 0,031770
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031767 031767 0 0 324000031770 0 000000031770
IT1 031767 0 0 0 324000031770 0 000000031770
AT3 031767 0 0 0 000000031770 0 324000031770
AT6 031767 031770 0 0 000000031770 0 324000031770
FT1A 031767 031770 0 0 000000031770 0 000000031770
FT2 031767 031770 0 0 0 0 000000031770
FT2RQ 031767 031770 0 0 0 0 000000031770
FT3 031767 031770 0 0 0 0 000000031770
FT9 031770 031770 0 0 0 0 000000031770
ET0 031770 031770 0 0 0 0 000000031770
ST1A 031770 031770 0 0 0 0 000000031770
ST9 031770 031770 0 0 0 0 000000031770
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 184
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0341
*031770 HRROI 15,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 031770 031770 0 0 561640777776 0 000000777776
IT1 031770 0 0 0 561640777776 0 000000777776
AT3 031770 0 0 0 000000777776 0 561640777776
AT6 031770 777776 0 0 000000777776 0 561640777776
FT1A 031770 777776 0 0 000000777776 0 000000777776
FT9 031771 777776 0 0 000000777776 0 000000777776
ET0 031771 777776 0 0 777777777776 0 000000777776
ST1 031771 777776 0 0 777777777776 0 000000777776
ST2 031771 777776 0 0 777777777776 0 000000777776
ST9 031771 777776 0 0 777777777776 0 000000777776
*031771 AOJL 15,031773
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031771 031771 0 0 341640031773 0 000000031773
IT1 031771 0 0 0 341640031773 0 000000031773
AT3 031771 0 0 0 000000031773 0 341640031773
AT6 031771 031773 0 0 000000031773 0 341640031773
FT1A 031771 031773 0 0 000000031773 0 000000031773
FT2 031771 031773 0 0 0 0 000000031773
FT2RQ 031771 031773 0 0 777777777776 0 000000031773
FT3 031771 031773 0 0 777777777776 0 000000031773
FT9 031772 031773 0 0 777777777776 0 000000031773
ET0 031773 031773 0 0 777777777777 0 000000031773
ST1 031773 031773 0 0 777777777777 0 000000031773
ST2 031773 031773 0 0 777777777777 0 000000031773
ST9 031773 031773 0 0 777777777777 0 000000031773
*031773 JUMPA 0,031774
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031773 031773 0 0 324000031774 0 000000031774
IT1 031773 0 0 0 324000031774 0 000000031774
AT3 031773 0 0 0 000000031774 0 324000031774
AT6 031773 031774 0 0 000000031774 0 324000031774
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 185
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0342
FT1A 031773 031774 0 0 000000031774 0 000000031774
FT2 031773 031774 0 0 0 0 000000031774
FT2RQ 031773 031774 0 0 0 0 000000031774
FT3 031773 031774 0 0 0 0 000000031774
FT9 031774 031774 0 0 0 0 000000031774
ET0 031774 031774 0 0 0 0 000000031774
ST1A 031774 031774 0 0 0 0 000000031774
ST9 031774 031774 0 0 0 0 000000031774
*031774 CAME 15,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031774 031774 0 0 312640033462 0 777777777777
IT1 031774 0 0 0 312640033462 0 777777777777
AT3 031774 0 0 0 000000033462 0 312640033462
AT6 031774 033462 0 0 000000033462 0 312640033462
FT0 031774 033462 0 0 777777777777 0 312640033462
FT1A 031774 033462 0 0 777777777777 0 777777777777
FT2 031774 033462 0 0 0 0 777777777777
FT2RQ 031774 033462 0 0 777777777777 0 777777777777
FT3 031774 033462 0 0 777777777777 0 777777777777
FT9 031775 033462 0 0 777777777777 0 777777777777
ET0 031776 033462 0 0 0 0 777777777777
ST1A 031776 033462 0 0 0 0 777777777777
ST9 031776 033462 0 0 0 0 777777777777
*031776 JUMPA 0,031777
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 031776 031776 0 0 324000031777 0 000000031777
IT1 031776 0 0 0 324000031777 0 000000031777
AT3 031776 0 0 0 000000031777 0 324000031777
AT6 031776 031777 0 0 000000031777 0 324000031777
FT1A 031776 031777 0 0 000000031777 0 000000031777
FT2 031776 031777 0 0 0 0 000000031777
FT2RQ 031776 031777 0 0 0 0 000000031777
FT3 031776 031777 0 0 0 0 000000031777
FT9 031777 031777 0 0 0 0 000000031777
ET0 031777 031777 0 0 0 0 000000031777
ST1A 031777 031777 0 0 0 0 000000031777
ST9 031777 031777 0 0 0 0 000000031777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 186
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0343
*031777 SETO 15,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031777 031777 0 0 474640000000 0 0
IT1 031777 0 0 0 474640000000 0 0
AT3 031777 0 0 0 0 0 474640000000
AT6 031777 0 0 0 0 0 474640000000
FT1A 031777 0 0 0 0 0 0
FT9 0 0 0 0 0 0 0
ET0 0 0 0 0 777777777777 0 0
ST1 0 0 0 0 777777777777 0 0
ST2 0 0 0 0 777777777777 0 0
ST9 0 0 0 0 777777777777 0 0
*032000 AOJL 15,032002
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 341640032002 0 000000032002
IT1 0 0 0 0 341640032002 0 000000032002
AT3 0 0 0 0 000000032002 0 341640032002
AT6 0 032002 0 0 000000032002 0 341640032002
FT1A 0 032002 0 0 000000032002 0 000000032002
FT2 0 032002 0 0 0 0 000000032002
FT2RQ 0 032002 0 0 777777777777 0 000000032002
FT3 0 032002 0 0 777777777777 0 000000032002
FT9 032001 032002 0 0 777777777777 0 000000032002
ET0 032001 032002 0 0 0 0 000000032002
ST1 032001 032002 0 0 0 0 000000032002
ST2 032001 032002 0 0 0 0 000000032002
ST9 032001 032002 0 0 0 0 000000032002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 187
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0344
*032001 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 032001 032001 0 0 334000000000 0 0
IT1 032001 0 0 0 334000000000 0 0
AT3 032001 0 0 0 0 0 334000000000
AT6 032001 0 0 0 0 0 334000000000
FT0 032001 0 0 0 0 0 334000000000
FT1A 032001 0 0 0 0 0 0
FT9 032002 0 0 0 0 0 0
ET0 032003 0 0 0 0 0 0
ST1A 032003 0 0 0 0 0 0
ST9 032003 0 0 0 0 0 0
*032003 JUMPA 0,032004
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032003 032003 0 0 324000032004 0 000000032004
IT1 032003 0 0 0 324000032004 0 000000032004
AT3 032003 0 0 0 000000032004 0 324000032004
AT6 032003 032004 0 0 000000032004 0 324000032004
FT1A 032003 032004 0 0 000000032004 0 000000032004
FT2 032003 032004 0 0 0 0 000000032004
FT2RQ 032003 032004 0 0 0 0 000000032004
FT3 032003 032004 0 0 0 0 000000032004
FT9 032004 032004 0 0 0 0 000000032004
ET0 032004 032004 0 0 0 0 000000032004
ST1A 032004 032004 0 0 0 0 000000032004
ST9 032004 032004 0 0 0 0 000000032004
*032004 CAIE 15,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032004 032004 0 0 302640000000 0 0
IT1 032004 0 0 0 302640000000 0 0
AT3 032004 0 0 0 0 0 302640000000
AT6 032004 0 0 0 0 0 302640000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 188
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0345
FT1A 032004 0 0 0 0 0 0
FT2 032004 0 0 0 0 0 0
FT2RQ 032004 0 0 0 0 0 0
FT3 032004 0 0 0 0 0 0
FT9 032005 0 0 0 0 0 0
ET0 032006 0 0 0 0 0 0
ST1A 032006 0 0 0 0 0 0
ST9 032006 0 0 0 0 0 0
*032006 JUMPA 0,032007
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032006 032006 0 0 324000032007 0 000000032007
IT1 032006 0 0 0 324000032007 0 000000032007
AT3 032006 0 0 0 000000032007 0 324000032007
AT6 032006 032007 0 0 000000032007 0 324000032007
FT1A 032006 032007 0 0 000000032007 0 000000032007
FT2 032006 032007 0 0 0 0 000000032007
FT2RQ 032006 032007 0 0 0 0 000000032007
FT3 032006 032007 0 0 0 0 000000032007
FT9 032007 032007 0 0 0 0 000000032007
ET0 032007 032007 0 0 0 0 000000032007
ST1A 032007 032007 0 0 0 0 000000032007
ST9 032007 032007 0 0 0 0 000000032007
*032007 SETZ 15,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032007 032007 0 0 400640000000 0 0
IT1 032007 0 0 0 400640000000 0 0
AT3 032007 0 0 0 0 0 400640000000
AT6 032007 0 0 0 0 0 400640000000
FT1A 032007 0 0 0 0 0 0
FT9 032010 0 0 0 0 0 0
ET0 032010 0 0 0 0 0 0
ST1 032010 0 0 0 0 0 0
ST2 032010 0 0 0 0 0 0
ST9 032010 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 189
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0346
*032010 AOJL 15,032012
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032010 032010 0 0 341640032012 0 000000032012
IT1 032010 0 0 0 341640032012 0 000000032012
AT3 032010 0 0 0 000000032012 0 341640032012
AT6 032010 032012 0 0 000000032012 0 341640032012
FT1A 032010 032012 0 0 000000032012 0 000000032012
FT2 032010 032012 0 0 0 0 000000032012
FT2RQ 032010 032012 0 0 0 0 000000032012
FT3 032010 032012 0 0 0 0 000000032012
FT9 032011 032012 0 0 0 0 000000032012
ET0 032011 032012 0 0 000000000001 0 000000032012
ST1 032011 032012 0 0 000000000001 0 000000032012
ST2 032011 032012 0 0 000000000001 0 000000032012
ST9 032011 032012 0 0 000000000001 0 000000032012
*032011 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 032011 032011 0 0 334000000000 0 0
IT1 032011 0 0 0 334000000000 0 0
AT3 032011 0 0 0 0 0 334000000000
AT6 032011 0 0 0 0 0 334000000000
FT0 032011 0 0 0 0 0 334000000000
FT1A 032011 0 0 0 0 0 0
FT9 032012 0 0 0 0 0 0
ET0 032013 0 0 0 0 0 0
ST1A 032013 0 0 0 0 0 0
ST9 032013 0 0 0 0 0 0
*032013 JUMPA 0,032014
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032013 032013 0 0 324000032014 0 000000032014
IT1 032013 0 0 0 324000032014 0 000000032014
AT3 032013 0 0 0 000000032014 0 324000032014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 190
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0347
AT6 032013 032014 0 0 000000032014 0 324000032014
FT1A 032013 032014 0 0 000000032014 0 000000032014
FT2 032013 032014 0 0 0 0 000000032014
FT2RQ 032013 032014 0 0 0 0 000000032014
FT3 032013 032014 0 0 0 0 000000032014
FT9 032014 032014 0 0 0 0 000000032014
ET0 032014 032014 0 0 0 0 000000032014
ST1A 032014 032014 0 0 0 0 000000032014
ST9 032014 032014 0 0 0 0 000000032014
*032014 CAIE 15,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032014 032014 0 0 302640000001 0 000000000001
IT1 032014 0 0 0 302640000001 0 000000000001
AT3 032014 0 0 0 000000000001 0 302640000001
AT6 032014 000001 0 0 000000000001 0 302640000001
FT1A 032014 000001 0 0 000000000001 0 000000000001
FT2 032014 000001 0 0 0 0 000000000001
FT2RQ 032014 000001 0 0 000000000001 0 000000000001
FT3 032014 000001 0 0 000000000001 0 000000000001
FT9 032015 000001 0 0 000000000001 0 000000000001
ET0 032016 000001 0 0 0 0 000000000001
ST1A 032016 000001 0 0 0 0 000000000001
ST9 032016 000001 0 0 0 0 000000000001
*032016 JUMPA 0,032017
INITIAL
C(AC)=000000 000000
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 0 0 000000032017
FT3 032016 032017 0 0 0 0 000000032017
FT9 032017 032017 0 0 0 0 000000032017
ET0 032017 032017 0 0 0 0 000000032017
ST1A 032017 032017 0 0 0 0 000000032017
ST9 032017 032017 0 0 0 0 000000032017
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 191
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0348
*032017 HRROI 14,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032017 032017 0 0 561600777776 0 000000777776
IT1 032017 0 0 0 561600777776 0 000000777776
AT3 032017 0 0 0 000000777776 0 561600777776
AT6 032017 777776 0 0 000000777776 0 561600777776
FT1A 032017 777776 0 0 000000777776 0 000000777776
FT9 032020 777776 0 0 000000777776 0 000000777776
ET0 032020 777776 0 0 777777777776 0 000000777776
ST1 032020 777776 0 0 777777777776 0 000000777776
ST2 032020 777776 0 0 777777777776 0 000000777776
ST9 032020 777776 0 0 777777777776 0 000000777776
*032020 AOJE 14,032022
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032020 032020 0 0 342600032022 0 000000032022
IT1 032020 0 0 0 342600032022 0 000000032022
AT3 032020 0 0 0 000000032022 0 342600032022
AT6 032020 032022 0 0 000000032022 0 342600032022
FT1A 032020 032022 0 0 000000032022 0 000000032022
FT2 032020 032022 0 0 0 0 000000032022
FT2RQ 032020 032022 0 0 777777777776 0 000000032022
FT3 032020 032022 0 0 777777777776 0 000000032022
FT9 032021 032022 0 0 777777777776 0 000000032022
ET0 032021 032022 0 0 777777777777 0 000000032022
ST1 032021 032022 0 0 777777777777 0 000000032022
ST2 032021 032022 0 0 777777777777 0 000000032022
ST9 032021 032022 0 0 777777777777 0 000000032022
*032021 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 032021 032021 0 0 334000000000 0 0
IT1 032021 0 0 0 334000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 192
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0349
AT3 032021 0 0 0 0 0 334000000000
AT6 032021 0 0 0 0 0 334000000000
FT0 032021 0 0 0 0 0 334000000000
FT1A 032021 0 0 0 0 0 0
FT9 032022 0 0 0 0 0 0
ET0 032023 0 0 0 0 0 0
ST1A 032023 0 0 0 0 0 0
ST9 032023 0 0 0 0 0 0
*032023 JUMPA 0,032024
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032023 032023 0 0 324000032024 0 000000032024
IT1 032023 0 0 0 324000032024 0 000000032024
AT3 032023 0 0 0 000000032024 0 324000032024
AT6 032023 032024 0 0 000000032024 0 324000032024
FT1A 032023 032024 0 0 000000032024 0 000000032024
FT2 032023 032024 0 0 0 0 000000032024
FT2RQ 032023 032024 0 0 0 0 000000032024
FT3 032023 032024 0 0 0 0 000000032024
FT9 032024 032024 0 0 0 0 000000032024
ET0 032024 032024 0 0 0 0 000000032024
ST1A 032024 032024 0 0 0 0 000000032024
ST9 032024 032024 0 0 0 0 000000032024
*032024 CAME 14,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032024 032024 0 0 312600033462 0 777777777777
IT1 032024 0 0 0 312600033462 0 777777777777
AT3 032024 0 0 0 000000033462 0 312600033462
AT6 032024 033462 0 0 000000033462 0 312600033462
FT0 032024 033462 0 0 777777777777 0 312600033462
FT1A 032024 033462 0 0 777777777777 0 777777777777
FT2 032024 033462 0 0 0 0 777777777777
FT2RQ 032024 033462 0 0 777777777777 0 777777777777
FT3 032024 033462 0 0 777777777777 0 777777777777
FT9 032025 033462 0 0 777777777777 0 777777777777
ET0 032026 033462 0 0 0 0 777777777777
ST1A 032026 033462 0 0 0 0 777777777777
ST9 032026 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 193
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0350
*032026 JUMPA 0,032027
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032026 032026 0 0 324000032027 0 000000032027
IT1 032026 0 0 0 324000032027 0 000000032027
AT3 032026 0 0 0 000000032027 0 324000032027
AT6 032026 032027 0 0 000000032027 0 324000032027
FT1A 032026 032027 0 0 000000032027 0 000000032027
FT2 032026 032027 0 0 0 0 000000032027
FT2RQ 032026 032027 0 0 0 0 000000032027
FT3 032026 032027 0 0 0 0 000000032027
FT9 032027 032027 0 0 0 0 000000032027
ET0 032027 032027 0 0 0 0 000000032027
ST1A 032027 032027 0 0 0 0 000000032027
ST9 032027 032027 0 0 0 0 000000032027
*032027 SETO 14,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032027 032027 0 0 474600000000 0 0
IT1 032027 0 0 0 474600000000 0 0
AT3 032027 0 0 0 0 0 474600000000
AT6 032027 0 0 0 0 0 474600000000
FT1A 032027 0 0 0 0 0 0
FT9 032030 0 0 0 0 0 0
ET0 032030 0 0 0 777777777777 0 0
ST1 032030 0 0 0 777777777777 0 0
ST2 032030 0 0 0 777777777777 0 0
ST9 032030 0 0 0 777777777777 0 0
*032030 AOJE 14,032032
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032030 032030 0 0 342600032032 0 000000032032
IT1 032030 0 0 0 342600032032 0 000000032032
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 194
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0351
AT3 032030 0 0 0 000000032032 0 342600032032
AT6 032030 032032 0 0 000000032032 0 342600032032
FT1A 032030 032032 0 0 000000032032 0 000000032032
FT2 032030 032032 0 0 0 0 000000032032
FT2RQ 032030 032032 0 0 777777777777 0 000000032032
FT3 032030 032032 0 0 777777777777 0 000000032032
FT9 032031 032032 0 0 777777777777 0 000000032032
ET0 032032 032032 0 0 0 0 000000032032
ST1 032032 032032 0 0 0 0 000000032032
ST2 032032 032032 0 0 0 0 000000032032
ST9 032032 032032 0 0 0 0 000000032032
*032032 JUMPA 0,032033
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032032 032032 0 0 324000032033 0 000000032033
IT1 032032 0 0 0 324000032033 0 000000032033
AT3 032032 0 0 0 000000032033 0 324000032033
AT6 032032 032033 0 0 000000032033 0 324000032033
FT1A 032032 032033 0 0 000000032033 0 000000032033
FT2 032032 032033 0 0 0 0 000000032033
FT2RQ 032032 032033 0 0 0 0 000000032033
FT3 032032 032033 0 0 0 0 000000032033
FT9 032033 032033 0 0 0 0 000000032033
ET0 032033 032033 0 0 0 0 000000032033
ST1A 032033 032033 0 0 0 0 000000032033
ST9 032033 032033 0 0 0 0 000000032033
*032033 CAIE 14,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032033 032033 0 0 302600000000 0 0
IT1 032033 0 0 0 302600000000 0 0
AT3 032033 0 0 0 0 0 302600000000
AT6 032033 0 0 0 0 0 302600000000
FT1A 032033 0 0 0 0 0 0
FT2 032033 0 0 0 0 0 0
FT2RQ 032033 0 0 0 0 0 0
FT3 032033 0 0 0 0 0 0
FT9 032034 0 0 0 0 0 0
ET0 032035 0 0 0 0 0 0
ST1A 032035 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 195
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0352
ST9 032035 0 0 0 0 0 0
*032035 JUMPA 0,032036
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032035 032035 0 0 324000032036 0 000000032036
IT1 032035 0 0 0 324000032036 0 000000032036
AT3 032035 0 0 0 000000032036 0 324000032036
AT6 032035 032036 0 0 000000032036 0 324000032036
FT1A 032035 032036 0 0 000000032036 0 000000032036
FT2 032035 032036 0 0 0 0 000000032036
FT2RQ 032035 032036 0 0 0 0 000000032036
FT3 032035 032036 0 0 0 0 000000032036
FT9 032036 032036 0 0 0 0 000000032036
ET0 032036 032036 0 0 0 0 000000032036
ST1A 032036 032036 0 0 0 0 000000032036
ST9 032036 032036 0 0 0 0 000000032036
*032036 SETZ 14,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032036 032036 0 0 400600000000 0 0
IT1 032036 0 0 0 400600000000 0 0
AT3 032036 0 0 0 0 0 400600000000
AT6 032036 0 0 0 0 0 400600000000
FT1A 032036 0 0 0 0 0 0
FT9 032037 0 0 0 0 0 0
ET0 032037 0 0 0 0 0 0
ST1 032037 0 0 0 0 0 0
ST2 032037 0 0 0 0 0 0
ST9 032037 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 196
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0353
*032037 AOJE 14,032041
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032037 032037 0 0 342600032041 0 000000032041
IT1 032037 0 0 0 342600032041 0 000000032041
AT3 032037 0 0 0 000000032041 0 342600032041
AT6 032037 032041 0 0 000000032041 0 342600032041
FT1A 032037 032041 0 0 000000032041 0 000000032041
FT2 032037 032041 0 0 0 0 000000032041
FT2RQ 032037 032041 0 0 0 0 000000032041
FT3 032037 032041 0 0 0 0 000000032041
FT9 032040 032041 0 0 0 0 000000032041
ET0 032040 032041 0 0 000000000001 0 000000032041
ST1 032040 032041 0 0 000000000001 0 000000032041
ST2 032040 032041 0 0 000000000001 0 000000032041
ST9 032040 032041 0 0 000000000001 0 000000032041
*032040 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 032040 032040 0 0 334000000000 0 0
IT1 032040 0 0 0 334000000000 0 0
AT3 032040 0 0 0 0 0 334000000000
AT6 032040 0 0 0 0 0 334000000000
FT0 032040 0 0 0 0 0 334000000000
FT1A 032040 0 0 0 0 0 0
FT9 032041 0 0 0 0 0 0
ET0 032042 0 0 0 0 0 0
ST1A 032042 0 0 0 0 0 0
ST9 032042 0 0 0 0 0 0
*032042 JUMPA 0,032043
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032042 032042 0 0 324000032043 0 000000032043
IT1 032042 0 0 0 324000032043 0 000000032043
AT3 032042 0 0 0 000000032043 0 324000032043
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 197
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0354
AT6 032042 032043 0 0 000000032043 0 324000032043
FT1A 032042 032043 0 0 000000032043 0 000000032043
FT2 032042 032043 0 0 0 0 000000032043
FT2RQ 032042 032043 0 0 0 0 000000032043
FT3 032042 032043 0 0 0 0 000000032043
FT9 032043 032043 0 0 0 0 000000032043
ET0 032043 032043 0 0 0 0 000000032043
ST1A 032043 032043 0 0 0 0 000000032043
ST9 032043 032043 0 0 0 0 000000032043
*032043 CAIE 14,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032043 032043 0 0 302600000001 0 000000000001
IT1 032043 0 0 0 302600000001 0 000000000001
AT3 032043 0 0 0 000000000001 0 302600000001
AT6 032043 000001 0 0 000000000001 0 302600000001
FT1A 032043 000001 0 0 000000000001 0 000000000001
FT2 032043 000001 0 0 0 0 000000000001
FT2RQ 032043 000001 0 0 000000000001 0 000000000001
FT3 032043 000001 0 0 000000000001 0 000000000001
FT9 032044 000001 0 0 000000000001 0 000000000001
ET0 032045 000001 0 0 0 0 000000000001
ST1A 032045 000001 0 0 0 0 000000000001
ST9 032045 000001 0 0 0 0 000000000001
*032045 JUMPA 0,032046
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032045 032045 0 0 324000032046 0 000000032046
IT1 032045 0 0 0 324000032046 0 000000032046
AT3 032045 0 0 0 000000032046 0 324000032046
AT6 032045 032046 0 0 000000032046 0 324000032046
FT1A 032045 032046 0 0 000000032046 0 000000032046
FT2 032045 032046 0 0 0 0 000000032046
FT2RQ 032045 032046 0 0 0 0 000000032046
FT3 032045 032046 0 0 0 0 000000032046
FT9 032046 032046 0 0 0 0 000000032046
ET0 032046 032046 0 0 0 0 000000032046
ST1A 032046 032046 0 0 0 0 000000032046
ST9 032046 032046 0 0 0 0 000000032046
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 198
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0355
*032046 HRROI 13,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032046 032046 0 0 561540777776 0 000000777776
IT1 032046 0 0 0 561540777776 0 000000777776
AT3 032046 0 0 0 000000777776 0 561540777776
AT6 032046 777776 0 0 000000777776 0 561540777776
FT1A 032046 777776 0 0 000000777776 0 000000777776
FT9 032047 777776 0 0 000000777776 0 000000777776
ET0 032047 777776 0 0 777777777776 0 000000777776
ST1 032047 777776 0 0 777777777776 0 000000777776
ST2 032047 777776 0 0 777777777776 0 000000777776
ST9 032047 777776 0 0 777777777776 0 000000777776
*032047 AOJLE 13,032051
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032047 032047 0 0 343540032051 0 000000032051
IT1 032047 0 0 0 343540032051 0 000000032051
AT3 032047 0 0 0 000000032051 0 343540032051
AT6 032047 032051 0 0 000000032051 0 343540032051
FT1A 032047 032051 0 0 000000032051 0 000000032051
FT2 032047 032051 0 0 0 0 000000032051
FT2RQ 032047 032051 0 0 777777777776 0 000000032051
FT3 032047 032051 0 0 777777777776 0 000000032051
FT9 032050 032051 0 0 777777777776 0 000000032051
ET0 032051 032051 0 0 777777777777 0 000000032051
ST1 032051 032051 0 0 777777777777 0 000000032051
ST2 032051 032051 0 0 777777777777 0 000000032051
ST9 032051 032051 0 0 777777777777 0 000000032051
*032051 JUMPA 0,032052
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032051 032051 0 0 324000032052 0 000000032052
IT1 032051 0 0 0 324000032052 0 000000032052
AT3 032051 0 0 0 000000032052 0 324000032052
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 199
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0356
AT6 032051 032052 0 0 000000032052 0 324000032052
FT1A 032051 032052 0 0 000000032052 0 000000032052
FT2 032051 032052 0 0 0 0 000000032052
FT2RQ 032051 032052 0 0 0 0 000000032052
FT3 032051 032052 0 0 0 0 000000032052
FT9 032052 032052 0 0 0 0 000000032052
ET0 032052 032052 0 0 0 0 000000032052
ST1A 032052 032052 0 0 0 0 000000032052
ST9 032052 032052 0 0 0 0 000000032052
*032052 CAME 13,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032052 032052 0 0 312540033462 0 777777777777
IT1 032052 0 0 0 312540033462 0 777777777777
AT3 032052 0 0 0 000000033462 0 312540033462
AT6 032052 033462 0 0 000000033462 0 312540033462
FT0 032052 033462 0 0 777777777777 0 312540033462
FT1A 032052 033462 0 0 777777777777 0 777777777777
FT2 032052 033462 0 0 0 0 777777777777
FT2RQ 032052 033462 0 0 777777777777 0 777777777777
FT3 032052 033462 0 0 777777777777 0 777777777777
FT9 032053 033462 0 0 777777777777 0 777777777777
ET0 032054 033462 0 0 0 0 777777777777
ST1A 032054 033462 0 0 0 0 777777777777
ST9 032054 033462 0 0 0 0 777777777777
*032054 JUMPA 0,032055
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032054 032054 0 0 324000032055 0 000000032055
IT1 032054 0 0 0 324000032055 0 000000032055
AT3 032054 0 0 0 000000032055 0 324000032055
AT6 032054 032055 0 0 000000032055 0 324000032055
FT1A 032054 032055 0 0 000000032055 0 000000032055
FT2 032054 032055 0 0 0 0 000000032055
FT2RQ 032054 032055 0 0 0 0 000000032055
FT3 032054 032055 0 0 0 0 000000032055
FT9 032055 032055 0 0 0 0 000000032055
ET0 032055 032055 0 0 0 0 000000032055
ST1A 032055 032055 0 0 0 0 000000032055
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 200
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0357
ST9 032055 032055 0 0 0 0 000000032055
*032055 SETO 13,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032055 032055 0 0 474540000000 0 0
IT1 032055 0 0 0 474540000000 0 0
AT3 032055 0 0 0 0 0 474540000000
AT6 032055 0 0 0 0 0 474540000000
FT1A 032055 0 0 0 0 0 0
FT9 032056 0 0 0 0 0 0
ET0 032056 0 0 0 777777777777 0 0
ST1 032056 0 0 0 777777777777 0 0
ST2 032056 0 0 0 777777777777 0 0
ST9 032056 0 0 0 777777777777 0 0
*032056 AOJLE 13,032060
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032056 032056 0 0 343540032060 0 000000032060
IT1 032056 0 0 0 343540032060 0 000000032060
AT3 032056 0 0 0 000000032060 0 343540032060
AT6 032056 032060 0 0 000000032060 0 343540032060
FT1A 032056 032060 0 0 000000032060 0 000000032060
FT2 032056 032060 0 0 0 0 000000032060
FT2RQ 032056 032060 0 0 777777777777 0 000000032060
FT3 032056 032060 0 0 777777777777 0 000000032060
FT9 032057 032060 0 0 777777777777 0 000000032060
ET0 032060 032060 0 0 0 0 000000032060
ST1 032060 032060 0 0 0 0 000000032060
ST2 032060 032060 0 0 0 0 000000032060
ST9 032060 032060 0 0 0 0 000000032060
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 201
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0358
*032060 JUMPA 0,032061
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032060 032060 0 0 324000032061 0 000000032061
IT1 032060 0 0 0 324000032061 0 000000032061
AT3 032060 0 0 0 000000032061 0 324000032061
AT6 032060 032061 0 0 000000032061 0 324000032061
FT1A 032060 032061 0 0 000000032061 0 000000032061
FT2 032060 032061 0 0 0 0 000000032061
FT2RQ 032060 032061 0 0 0 0 000000032061
FT3 032060 032061 0 0 0 0 000000032061
FT9 032061 032061 0 0 0 0 000000032061
ET0 032061 032061 0 0 0 0 000000032061
ST1A 032061 032061 0 0 0 0 000000032061
ST9 032061 032061 0 0 0 0 000000032061
*032061 CAIE 13,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032061 032061 0 0 302540000000 0 0
IT1 032061 0 0 0 302540000000 0 0
AT3 032061 0 0 0 0 0 302540000000
AT6 032061 0 0 0 0 0 302540000000
FT1A 032061 0 0 0 0 0 0
FT2 032061 0 0 0 0 0 0
FT2RQ 032061 0 0 0 0 0 0
FT3 032061 0 0 0 0 0 0
FT9 032062 0 0 0 0 0 0
ET0 032063 0 0 0 0 0 0
ST1A 032063 0 0 0 0 0 0
ST9 032063 0 0 0 0 0 0
*032063 JUMPA 0,032064
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032063 032063 0 0 324000032064 0 000000032064
IT1 032063 0 0 0 324000032064 0 000000032064
AT3 032063 0 0 0 000000032064 0 324000032064
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 202
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0359
AT6 032063 032064 0 0 000000032064 0 324000032064
FT1A 032063 032064 0 0 000000032064 0 000000032064
FT2 032063 032064 0 0 0 0 000000032064
FT2RQ 032063 032064 0 0 0 0 000000032064
FT3 032063 032064 0 0 0 0 000000032064
FT9 032064 032064 0 0 0 0 000000032064
ET0 032064 032064 0 0 0 0 000000032064
ST1A 032064 032064 0 0 0 0 000000032064
ST9 032064 032064 0 0 0 0 000000032064
*032064 SETZ 13,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032064 032064 0 0 400540000000 0 0
IT1 032064 0 0 0 400540000000 0 0
AT3 032064 0 0 0 0 0 400540000000
AT6 032064 0 0 0 0 0 400540000000
FT1A 032064 0 0 0 0 0 0
FT9 032065 0 0 0 0 0 0
ET0 032065 0 0 0 0 0 0
ST1 032065 0 0 0 0 0 0
ST2 032065 0 0 0 0 0 0
ST9 032065 0 0 0 0 0 0
*032065 AOJLE 13,032067
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032065 032065 0 0 343540032067 0 000000032067
IT1 032065 0 0 0 343540032067 0 000000032067
AT3 032065 0 0 0 000000032067 0 343540032067
AT6 032065 032067 0 0 000000032067 0 343540032067
FT1A 032065 032067 0 0 000000032067 0 000000032067
FT2 032065 032067 0 0 0 0 000000032067
FT2RQ 032065 032067 0 0 0 0 000000032067
FT3 032065 032067 0 0 0 0 000000032067
FT9 032066 032067 0 0 0 0 000000032067
ET0 032066 032067 0 0 000000000001 0 000000032067
ST1 032066 032067 0 0 000000000001 0 000000032067
ST2 032066 032067 0 0 000000000001 0 000000032067
ST9 032066 032067 0 0 000000000001 0 000000032067
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 203
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0360
*032066 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 032066 032066 0 0 334000000000 0 0
IT1 032066 0 0 0 334000000000 0 0
AT3 032066 0 0 0 0 0 334000000000
AT6 032066 0 0 0 0 0 334000000000
FT0 032066 0 0 0 0 0 334000000000
FT1A 032066 0 0 0 0 0 0
FT9 032067 0 0 0 0 0 0
ET0 032070 0 0 0 0 0 0
ST1A 032070 0 0 0 0 0 0
ST9 032070 0 0 0 0 0 0
*032070 JUMPA 0,032071
INITIAL
C(AC)=000000 000000
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 0 0 000000032071
FT3 032070 032071 0 0 0 0 000000032071
FT9 032071 032071 0 0 0 0 000000032071
ET0 032071 032071 0 0 0 0 000000032071
ST1A 032071 032071 0 0 0 0 000000032071
ST9 032071 032071 0 0 0 0 000000032071
*032071 CAIE 13,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032071 032071 0 0 302540000001 0 000000000001
IT1 032071 0 0 0 302540000001 0 000000000001
AT3 032071 0 0 0 000000000001 0 302540000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 204
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0361
AT6 032071 000001 0 0 000000000001 0 302540000001
FT1A 032071 000001 0 0 000000000001 0 000000000001
FT2 032071 000001 0 0 0 0 000000000001
FT2RQ 032071 000001 0 0 000000000001 0 000000000001
FT3 032071 000001 0 0 000000000001 0 000000000001
FT9 032072 000001 0 0 000000000001 0 000000000001
ET0 032073 000001 0 0 0 0 000000000001
ST1A 032073 000001 0 0 0 0 000000000001
ST9 032073 000001 0 0 0 0 000000000001
*032073 JUMPA 0,032074
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032073 032073 0 0 324000032074 0 000000032074
IT1 032073 0 0 0 324000032074 0 000000032074
AT3 032073 0 0 0 000000032074 0 324000032074
AT6 032073 032074 0 0 000000032074 0 324000032074
FT1A 032073 032074 0 0 000000032074 0 000000032074
FT2 032073 032074 0 0 0 0 000000032074
FT2RQ 032073 032074 0 0 0 0 000000032074
FT3 032073 032074 0 0 0 0 000000032074
FT9 032074 032074 0 0 0 0 000000032074
ET0 032074 032074 0 0 0 0 000000032074
ST1A 032074 032074 0 0 0 0 000000032074
ST9 032074 032074 0 0 0 0 000000032074
*032074 HRROI 12,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032074 032074 0 0 561500777776 0 000000777776
IT1 032074 0 0 0 561500777776 0 000000777776
AT3 032074 0 0 0 000000777776 0 561500777776
AT6 032074 777776 0 0 000000777776 0 561500777776
FT1A 032074 777776 0 0 000000777776 0 000000777776
FT9 032075 777776 0 0 000000777776 0 000000777776
ET0 032075 777776 0 0 777777777776 0 000000777776
ST1 032075 777776 0 0 777777777776 0 000000777776
ST2 032075 777776 0 0 777777777776 0 000000777776
ST9 032075 777776 0 0 777777777776 0 000000777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 205
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0362
*032075 AOJA 12,032077
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032075 032075 0 0 344500032077 0 000000032077
IT1 032075 0 0 0 344500032077 0 000000032077
AT3 032075 0 0 0 000000032077 0 344500032077
AT6 032075 032077 0 0 000000032077 0 344500032077
FT1A 032075 032077 0 0 000000032077 0 000000032077
FT2 032075 032077 0 0 0 0 000000032077
FT2RQ 032075 032077 0 0 777777777776 0 000000032077
FT3 032075 032077 0 0 777777777776 0 000000032077
FT9 032076 032077 0 0 777777777776 0 000000032077
ET0 032077 032077 0 0 777777777777 0 000000032077
ST1 032077 032077 0 0 777777777777 0 000000032077
ST2 032077 032077 0 0 777777777777 0 000000032077
ST9 032077 032077 0 0 777777777777 0 000000032077
*032077 JUMPA 0,032100
INITIAL
C(AC)=000000 000000
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 0 0 000000032100
FT3 032077 0 0 0 0 0 000000032100
FT9 0 0 0 0 0 0 000000032100
ET0 0 0 0 0 0 0 000000032100
ST1A 0 0 0 0 0 0 000000032100
ST9 0 0 0 0 0 0 000000032100
*032100 CAME 12,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 312500033462 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 206
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0363
IT1 0 0 0 0 312500033462 0 777777777777
AT3 0 0 0 0 000000033462 0 312500033462
AT6 0 033462 0 0 000000033462 0 312500033462
FT0 0 033462 0 0 777777777777 0 312500033462
FT1A 0 033462 0 0 777777777777 0 777777777777
FT2 0 033462 0 0 0 0 777777777777
FT2RQ 0 033462 0 0 777777777777 0 777777777777
FT3 0 033462 0 0 777777777777 0 777777777777
FT9 032101 033462 0 0 777777777777 0 777777777777
ET0 032102 033462 0 0 0 0 777777777777
ST1A 032102 033462 0 0 0 0 777777777777
ST9 032102 033462 0 0 0 0 777777777777
*032102 JUMPA 0,032103
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032102 032102 0 0 324000032103 0 000000032103
IT1 032102 0 0 0 324000032103 0 000000032103
AT3 032102 0 0 0 000000032103 0 324000032103
AT6 032102 032103 0 0 000000032103 0 324000032103
FT1A 032102 032103 0 0 000000032103 0 000000032103
FT2 032102 032103 0 0 0 0 000000032103
FT2RQ 032102 032103 0 0 0 0 000000032103
FT3 032102 032103 0 0 0 0 000000032103
FT9 032103 032103 0 0 0 0 000000032103
ET0 032103 032103 0 0 0 0 000000032103
ST1A 032103 032103 0 0 0 0 000000032103
ST9 032103 032103 0 0 0 0 000000032103
*032103 SETO 12,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032103 032103 0 0 474500000000 0 0
IT1 032103 0 0 0 474500000000 0 0
AT3 032103 0 0 0 0 0 474500000000
AT6 032103 0 0 0 0 0 474500000000
FT1A 032103 0 0 0 0 0 0
FT9 032104 0 0 0 0 0 0
ET0 032104 0 0 0 777777777777 0 0
ST1 032104 0 0 0 777777777777 0 0
ST2 032104 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 207
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0364
ST9 032104 0 0 0 777777777777 0 0
*032104 AOJA 12,032106
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032104 032104 0 0 344500032106 0 000000032106
IT1 032104 0 0 0 344500032106 0 000000032106
AT3 032104 0 0 0 000000032106 0 344500032106
AT6 032104 032106 0 0 000000032106 0 344500032106
FT1A 032104 032106 0 0 000000032106 0 000000032106
FT2 032104 032106 0 0 0 0 000000032106
FT2RQ 032104 032106 0 0 777777777777 0 000000032106
FT3 032104 032106 0 0 777777777777 0 000000032106
FT9 032105 032106 0 0 777777777777 0 000000032106
ET0 032106 032106 0 0 0 0 000000032106
ST1 032106 032106 0 0 0 0 000000032106
ST2 032106 032106 0 0 0 0 000000032106
ST9 032106 032106 0 0 0 0 000000032106
*032106 JUMPA 0,032107
INITIAL
C(AC)=000000 000000
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 0 0 000000032107
FT3 032106 032107 0 0 0 0 000000032107
FT9 032107 032107 0 0 0 0 000000032107
ET0 032107 032107 0 0 0 0 000000032107
ST1A 032107 032107 0 0 0 0 000000032107
ST9 032107 032107 0 0 0 0 000000032107
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 208
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0365
*032107 CAIE 12,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032107 032107 0 0 302500000000 0 0
IT1 032107 0 0 0 302500000000 0 0
AT3 032107 0 0 0 0 0 302500000000
AT6 032107 0 0 0 0 0 302500000000
FT1A 032107 0 0 0 0 0 0
FT2 032107 0 0 0 0 0 0
FT2RQ 032107 0 0 0 0 0 0
FT3 032107 0 0 0 0 0 0
FT9 032110 0 0 0 0 0 0
ET0 032111 0 0 0 0 0 0
ST1A 032111 0 0 0 0 0 0
ST9 032111 0 0 0 0 0 0
*032111 JUMPA 0,032112
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032111 032111 0 0 324000032112 0 000000032112
IT1 032111 0 0 0 324000032112 0 000000032112
AT3 032111 0 0 0 000000032112 0 324000032112
AT6 032111 032112 0 0 000000032112 0 324000032112
FT1A 032111 032112 0 0 000000032112 0 000000032112
FT2 032111 032112 0 0 0 0 000000032112
FT2RQ 032111 032112 0 0 0 0 000000032112
FT3 032111 032112 0 0 0 0 000000032112
FT9 032112 032112 0 0 0 0 000000032112
ET0 032112 032112 0 0 0 0 000000032112
ST1A 032112 032112 0 0 0 0 000000032112
ST9 032112 032112 0 0 0 0 000000032112
*032112 SETZ 12,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032112 032112 0 0 400500000000 0 0
IT1 032112 0 0 0 400500000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 209
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0366
AT3 032112 0 0 0 0 0 400500000000
AT6 032112 0 0 0 0 0 400500000000
FT1A 032112 0 0 0 0 0 0
FT9 032113 0 0 0 0 0 0
ET0 032113 0 0 0 0 0 0
ST1 032113 0 0 0 0 0 0
ST2 032113 0 0 0 0 0 0
ST9 032113 0 0 0 0 0 0
*032113 AOJA 12,032115
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032113 032113 0 0 344500032115 0 000000032115
IT1 032113 0 0 0 344500032115 0 000000032115
AT3 032113 0 0 0 000000032115 0 344500032115
AT6 032113 032115 0 0 000000032115 0 344500032115
FT1A 032113 032115 0 0 000000032115 0 000000032115
FT2 032113 032115 0 0 0 0 000000032115
FT2RQ 032113 032115 0 0 0 0 000000032115
FT3 032113 032115 0 0 0 0 000000032115
FT9 032114 032115 0 0 0 0 000000032115
ET0 032115 032115 0 0 000000000001 0 000000032115
ST1 032115 032115 0 0 000000000001 0 000000032115
ST2 032115 032115 0 0 000000000001 0 000000032115
ST9 032115 032115 0 0 000000000001 0 000000032115
*032115 JUMPA 0,032116
INITIAL
C(AC)=000000 000000
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 0 0 000000032116
FT3 032115 032116 0 0 0 0 000000032116
FT9 032116 032116 0 0 0 0 000000032116
ET0 032116 032116 0 0 0 0 000000032116
ST1A 032116 032116 0 0 0 0 000000032116
ST9 032116 032116 0 0 0 0 000000032116
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 210
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0367
*032116 CAIE 12,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032116 032116 0 0 302500000001 0 000000000001
IT1 032116 0 0 0 302500000001 0 000000000001
AT3 032116 0 0 0 000000000001 0 302500000001
AT6 032116 000001 0 0 000000000001 0 302500000001
FT1A 032116 000001 0 0 000000000001 0 000000000001
FT2 032116 000001 0 0 0 0 000000000001
FT2RQ 032116 000001 0 0 000000000001 0 000000000001
FT3 032116 000001 0 0 000000000001 0 000000000001
FT9 032117 000001 0 0 000000000001 0 000000000001
ET0 032120 000001 0 0 0 0 000000000001
ST1A 032120 000001 0 0 0 0 000000000001
ST9 032120 000001 0 0 0 0 000000000001
*032120 JUMPA 0,032121
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032120 032120 0 0 324000032121 0 000000032121
IT1 032120 0 0 0 324000032121 0 000000032121
AT3 032120 0 0 0 000000032121 0 324000032121
AT6 032120 032121 0 0 000000032121 0 324000032121
FT1A 032120 032121 0 0 000000032121 0 000000032121
FT2 032120 032121 0 0 0 0 000000032121
FT2RQ 032120 032121 0 0 0 0 000000032121
FT3 032120 032121 0 0 0 0 000000032121
FT9 032121 032121 0 0 0 0 000000032121
ET0 032121 032121 0 0 0 0 000000032121
ST1A 032121 032121 0 0 0 0 000000032121
ST9 032121 032121 0 0 0 0 000000032121
*032121 HRROI 11,777776
INITIAL
C(AC)=000000 000004
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032121 032121 0 0 561440777776 0 000000777776
IT1 032121 0 0 0 561440777776 0 000000777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 211
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0368
AT3 032121 0 0 0 000000777776 0 561440777776
AT6 032121 777776 0 0 000000777776 0 561440777776
FT1A 032121 777776 0 0 000000777776 0 000000777776
FT9 032122 777776 0 0 000000777776 0 000000777776
ET0 032122 777776 0 0 777777777776 0 000000777776
ST1 032122 777776 0 0 777777777776 0 000000777776
ST2 032122 777776 0 0 777777777776 0 000000777776
ST9 032122 777776 0 0 777777777776 0 000000777776
*032122 AOJGE 11,032124
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032122 032122 0 0 345440032124 0 000000032124
IT1 032122 0 0 0 345440032124 0 000000032124
AT3 032122 0 0 0 000000032124 0 345440032124
AT6 032122 032124 0 0 000000032124 0 345440032124
FT1A 032122 032124 0 0 000000032124 0 000000032124
FT2 032122 032124 0 0 0 0 000000032124
FT2RQ 032122 032124 0 0 777777777776 0 000000032124
FT3 032122 032124 0 0 777777777776 0 000000032124
FT9 032123 032124 0 0 777777777776 0 000000032124
ET0 032123 032124 0 0 777777777777 0 000000032124
ST1 032123 032124 0 0 777777777777 0 000000032124
ST2 032123 032124 0 0 777777777777 0 000000032124
ST9 032123 032124 0 0 777777777777 0 000000032124
*032123 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 032123 032123 0 0 334000000000 0 0
IT1 032123 0 0 0 334000000000 0 0
AT3 032123 0 0 0 0 0 334000000000
AT6 032123 0 0 0 0 0 334000000000
FT0 032123 0 0 0 0 0 334000000000
FT1A 032123 0 0 0 0 0 0
FT9 032124 0 0 0 0 0 0
ET0 032125 0 0 0 0 0 0
ST1A 032125 0 0 0 0 0 0
ST9 032125 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 212
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0369
*032125 JUMPA 0,032126
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032125 032125 0 0 324000032126 0 000000032126
IT1 032125 0 0 0 324000032126 0 000000032126
AT3 032125 0 0 0 000000032126 0 324000032126
AT6 032125 032126 0 0 000000032126 0 324000032126
FT1A 032125 032126 0 0 000000032126 0 000000032126
FT2 032125 032126 0 0 0 0 000000032126
FT2RQ 032125 032126 0 0 0 0 000000032126
FT3 032125 032126 0 0 0 0 000000032126
FT9 032126 032126 0 0 0 0 000000032126
ET0 032126 032126 0 0 0 0 000000032126
ST1A 032126 032126 0 0 0 0 000000032126
ST9 032126 032126 0 0 0 0 000000032126
*032126 CAME 11,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032126 032126 0 0 312440033462 0 777777777777
IT1 032126 0 0 0 312440033462 0 777777777777
AT3 032126 0 0 0 000000033462 0 312440033462
AT6 032126 033462 0 0 000000033462 0 312440033462
FT0 032126 033462 0 0 777777777777 0 312440033462
FT1A 032126 033462 0 0 777777777777 0 777777777777
FT2 032126 033462 0 0 0 0 777777777777
FT2RQ 032126 033462 0 0 777777777777 0 777777777777
FT3 032126 033462 0 0 777777777777 0 777777777777
FT9 032127 033462 0 0 777777777777 0 777777777777
ET0 032130 033462 0 0 0 0 777777777777
ST1A 032130 033462 0 0 0 0 777777777777
ST9 032130 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 213
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0370
*032130 JUMPA 0,032131
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032130 032130 0 0 324000032131 0 000000032131
IT1 032130 0 0 0 324000032131 0 000000032131
AT3 032130 0 0 0 000000032131 0 324000032131
AT6 032130 032131 0 0 000000032131 0 324000032131
FT1A 032130 032131 0 0 000000032131 0 000000032131
FT2 032130 032131 0 0 0 0 000000032131
FT2RQ 032130 032131 0 0 0 0 000000032131
FT3 032130 032131 0 0 0 0 000000032131
FT9 032131 032131 0 0 0 0 000000032131
ET0 032131 032131 0 0 0 0 000000032131
ST1A 032131 032131 0 0 0 0 000000032131
ST9 032131 032131 0 0 0 0 000000032131
*032131 SETO 11,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032131 032131 0 0 474440000000 0 0
IT1 032131 0 0 0 474440000000 0 0
AT3 032131 0 0 0 0 0 474440000000
AT6 032131 0 0 0 0 0 474440000000
FT1A 032131 0 0 0 0 0 0
FT9 032132 0 0 0 0 0 0
ET0 032132 0 0 0 777777777777 0 0
ST1 032132 0 0 0 777777777777 0 0
ST2 032132 0 0 0 777777777777 0 0
ST9 032132 0 0 0 777777777777 0 0
*032132 AOJGE 11,032134
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032132 032132 0 0 345440032134 0 000000032134
IT1 032132 0 0 0 345440032134 0 000000032134
AT3 032132 0 0 0 000000032134 0 345440032134
AT6 032132 032134 0 0 000000032134 0 345440032134
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 214
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0371
FT1A 032132 032134 0 0 000000032134 0 000000032134
FT2 032132 032134 0 0 0 0 000000032134
FT2RQ 032132 032134 0 0 777777777777 0 000000032134
FT3 032132 032134 0 0 777777777777 0 000000032134
FT9 032133 032134 0 0 777777777777 0 000000032134
ET0 032134 032134 0 0 0 0 000000032134
ST1 032134 032134 0 0 0 0 000000032134
ST2 032134 032134 0 0 0 0 000000032134
ST9 032134 032134 0 0 0 0 000000032134
*032134 JUMPA 0,032135
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032134 032134 0 0 324000032135 0 000000032135
IT1 032134 0 0 0 324000032135 0 000000032135
AT3 032134 0 0 0 000000032135 0 324000032135
AT6 032134 032135 0 0 000000032135 0 324000032135
FT1A 032134 032135 0 0 000000032135 0 000000032135
FT2 032134 032135 0 0 0 0 000000032135
FT2RQ 032134 032135 0 0 0 0 000000032135
FT3 032134 032135 0 0 0 0 000000032135
FT9 032135 032135 0 0 0 0 000000032135
ET0 032135 032135 0 0 0 0 000000032135
ST1A 032135 032135 0 0 0 0 000000032135
ST9 032135 032135 0 0 0 0 000000032135
*032135 CAIE 11,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032135 032135 0 0 302440000000 0 0
IT1 032135 0 0 0 302440000000 0 0
AT3 032135 0 0 0 0 0 302440000000
AT6 032135 0 0 0 0 0 302440000000
FT1A 032135 0 0 0 0 0 0
FT2 032135 0 0 0 0 0 0
FT2RQ 032135 0 0 0 0 0 0
FT3 032135 0 0 0 0 0 0
FT9 032136 0 0 0 0 0 0
ET0 032137 0 0 0 0 0 0
ST1A 032137 0 0 0 0 0 0
ST9 032137 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 215
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0372
*032137 JUMPA 0,032140
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032137 032137 0 0 324000032140 0 000000032140
IT1 032137 0 0 0 324000032140 0 000000032140
AT3 032137 0 0 0 000000032140 0 324000032140
AT6 032137 032140 0 0 000000032140 0 324000032140
FT1A 032137 032140 0 0 000000032140 0 000000032140
FT2 032137 032140 0 0 0 0 000000032140
FT2RQ 032137 032140 0 0 0 0 000000032140
FT3 032137 032140 0 0 0 0 000000032140
FT9 032140 032140 0 0 0 0 000000032140
ET0 032140 032140 0 0 0 0 000000032140
ST1A 032140 032140 0 0 0 0 000000032140
ST9 032140 032140 0 0 0 0 000000032140
*032140 SETZ 11,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032140 032140 0 0 400440000000 0 0
IT1 032140 0 0 0 400440000000 0 0
AT3 032140 0 0 0 0 0 400440000000
AT6 032140 0 0 0 0 0 400440000000
FT1A 032140 0 0 0 0 0 0
FT9 032141 0 0 0 0 0 0
ET0 032141 0 0 0 0 0 0
ST1 032141 0 0 0 0 0 0
ST2 032141 0 0 0 0 0 0
ST9 032141 0 0 0 0 0 0
*032141 AOJGE 11,032143
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032141 032141 0 0 345440032143 0 000000032143
IT1 032141 0 0 0 345440032143 0 000000032143
AT3 032141 0 0 0 000000032143 0 345440032143
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 216
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0373
AT6 032141 032143 0 0 000000032143 0 345440032143
FT1A 032141 032143 0 0 000000032143 0 000000032143
FT2 032141 032143 0 0 0 0 000000032143
FT2RQ 032141 032143 0 0 0 0 000000032143
FT3 032141 032143 0 0 0 0 000000032143
FT9 032142 032143 0 0 0 0 000000032143
ET0 032143 032143 0 0 000000000001 0 000000032143
ST1 032143 032143 0 0 000000000001 0 000000032143
ST2 032143 032143 0 0 000000000001 0 000000032143
ST9 032143 032143 0 0 000000000001 0 000000032143
*032143 JUMPA 0,032144
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032143 032143 0 0 324000032144 0 000000032144
IT1 032143 0 0 0 324000032144 0 000000032144
AT3 032143 0 0 0 000000032144 0 324000032144
AT6 032143 032144 0 0 000000032144 0 324000032144
FT1A 032143 032144 0 0 000000032144 0 000000032144
FT2 032143 032144 0 0 0 0 000000032144
FT2RQ 032143 032144 0 0 0 0 000000032144
FT3 032143 032144 0 0 0 0 000000032144
FT9 032144 032144 0 0 0 0 000000032144
ET0 032144 032144 0 0 0 0 000000032144
ST1A 032144 032144 0 0 0 0 000000032144
ST9 032144 032144 0 0 0 0 000000032144
*032144 CAIE 11,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032144 032144 0 0 302440000001 0 000000000001
IT1 032144 0 0 0 302440000001 0 000000000001
AT3 032144 0 0 0 000000000001 0 302440000001
AT6 032144 000001 0 0 000000000001 0 302440000001
FT1A 032144 000001 0 0 000000000001 0 000000000001
FT2 032144 000001 0 0 0 0 000000000001
FT2RQ 032144 000001 0 0 000000000001 0 000000000001
FT3 032144 000001 0 0 000000000001 0 000000000001
FT9 032145 000001 0 0 000000000001 0 000000000001
ET0 032146 000001 0 0 0 0 000000000001
ST1A 032146 000001 0 0 0 0 000000000001
ST9 032146 000001 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 217
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0374
*032146 JUMPA 0,032147
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032146 032146 0 0 324000032147 0 000000032147
IT1 032146 0 0 0 324000032147 0 000000032147
AT3 032146 0 0 0 000000032147 0 324000032147
AT6 032146 032147 0 0 000000032147 0 324000032147
FT1A 032146 032147 0 0 000000032147 0 000000032147
FT2 032146 032147 0 0 0 0 000000032147
FT2RQ 032146 032147 0 0 0 0 000000032147
FT3 032146 032147 0 0 0 0 000000032147
FT9 032147 032147 0 0 0 0 000000032147
ET0 032147 032147 0 0 0 0 000000032147
ST1A 032147 032147 0 0 0 0 000000032147
ST9 032147 032147 0 0 0 0 000000032147
*032147 HRROI 10,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032147 032147 0 0 561400777776 0 000000777776
IT1 032147 0 0 0 561400777776 0 000000777776
AT3 032147 0 0 0 000000777776 0 561400777776
AT6 032147 777776 0 0 000000777776 0 561400777776
FT1A 032147 777776 0 0 000000777776 0 000000777776
FT9 032150 777776 0 0 000000777776 0 000000777776
ET0 032150 777776 0 0 777777777776 0 000000777776
ST1 032150 777776 0 0 777777777776 0 000000777776
ST2 032150 777776 0 0 777777777776 0 000000777776
ST9 032150 777776 0 0 777777777776 0 000000777776
*032150 AOJN 10,032152
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032150 032150 0 0 346400032152 0 000000032152
IT1 032150 0 0 0 346400032152 0 000000032152
AT3 032150 0 0 0 000000032152 0 346400032152
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 218
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0375
AT6 032150 032152 0 0 000000032152 0 346400032152
FT1A 032150 032152 0 0 000000032152 0 000000032152
FT2 032150 032152 0 0 0 0 000000032152
FT2RQ 032150 032152 0 0 777777777776 0 000000032152
FT3 032150 032152 0 0 777777777776 0 000000032152
FT9 032151 032152 0 0 777777777776 0 000000032152
ET0 032152 032152 0 0 777777777777 0 000000032152
ST1 032152 032152 0 0 777777777777 0 000000032152
ST2 032152 032152 0 0 777777777777 0 000000032152
ST9 032152 032152 0 0 777777777777 0 000000032152
*032152 JUMPA 0,032153
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032152 032152 0 0 324000032153 0 000000032153
IT1 032152 0 0 0 324000032153 0 000000032153
AT3 032152 0 0 0 000000032153 0 324000032153
AT6 032152 032153 0 0 000000032153 0 324000032153
FT1A 032152 032153 0 0 000000032153 0 000000032153
FT2 032152 032153 0 0 0 0 000000032153
FT2RQ 032152 032153 0 0 0 0 000000032153
FT3 032152 032153 0 0 0 0 000000032153
FT9 032153 032153 0 0 0 0 000000032153
ET0 032153 032153 0 0 0 0 000000032153
ST1A 032153 032153 0 0 0 0 000000032153
ST9 032153 032153 0 0 0 0 000000032153
*032153 CAME 10,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032153 032153 0 0 312400033462 0 777777777777
IT1 032153 0 0 0 312400033462 0 777777777777
AT3 032153 0 0 0 000000033462 0 312400033462
AT6 032153 033462 0 0 000000033462 0 312400033462
FT0 032153 033462 0 0 777777777777 0 312400033462
FT1A 032153 033462 0 0 777777777777 0 777777777777
FT2 032153 033462 0 0 0 0 777777777777
FT2RQ 032153 033462 0 0 777777777777 0 777777777777
FT3 032153 033462 0 0 777777777777 0 777777777777
FT9 032154 033462 0 0 777777777777 0 777777777777
ET0 032155 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 219
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0376
ST1A 032155 033462 0 0 0 0 777777777777
ST9 032155 033462 0 0 0 0 777777777777
*032155 JUMPA 0,032156
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032155 032155 0 0 324000032156 0 000000032156
IT1 032155 0 0 0 324000032156 0 000000032156
AT3 032155 0 0 0 000000032156 0 324000032156
AT6 032155 032156 0 0 000000032156 0 324000032156
FT1A 032155 032156 0 0 000000032156 0 000000032156
FT2 032155 032156 0 0 0 0 000000032156
FT2RQ 032155 032156 0 0 0 0 000000032156
FT3 032155 032156 0 0 0 0 000000032156
FT9 032156 032156 0 0 0 0 000000032156
ET0 032156 032156 0 0 0 0 000000032156
ST1A 032156 032156 0 0 0 0 000000032156
ST9 032156 032156 0 0 0 0 000000032156
*032156 SETO 10,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032156 032156 0 0 474400000000 0 0
IT1 032156 0 0 0 474400000000 0 0
AT3 032156 0 0 0 0 0 474400000000
AT6 032156 0 0 0 0 0 474400000000
FT1A 032156 0 0 0 0 0 0
FT9 032157 0 0 0 0 0 0
ET0 032157 0 0 0 777777777777 0 0
ST1 032157 0 0 0 777777777777 0 0
ST2 032157 0 0 0 777777777777 0 0
ST9 032157 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 220
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0377
*032157 AOJN 10,032161
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032157 032157 0 0 346400032161 0 000000032161
IT1 032157 0 0 0 346400032161 0 000000032161
AT3 032157 0 0 0 000000032161 0 346400032161
AT6 032157 032161 0 0 000000032161 0 346400032161
FT1A 032157 032161 0 0 000000032161 0 000000032161
FT2 032157 032161 0 0 0 0 000000032161
FT2RQ 032157 032161 0 0 777777777777 0 000000032161
FT3 032157 032161 0 0 777777777777 0 000000032161
FT9 032160 032161 0 0 777777777777 0 000000032161
ET0 032160 032161 0 0 0 0 000000032161
ST1 032160 032161 0 0 0 0 000000032161
ST2 032160 032161 0 0 0 0 000000032161
ST9 032160 032161 0 0 0 0 000000032161
*032160 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 032160 032160 0 0 334000000000 0 0
IT1 032160 0 0 0 334000000000 0 0
AT3 032160 0 0 0 0 0 334000000000
AT6 032160 0 0 0 0 0 334000000000
FT0 032160 0 0 0 0 0 334000000000
FT1A 032160 0 0 0 0 0 0
FT9 032161 0 0 0 0 0 0
ET0 032162 0 0 0 0 0 0
ST1A 032162 0 0 0 0 0 0
ST9 032162 0 0 0 0 0 0
*032162 JUMPA 0,032163
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032162 032162 0 0 324000032163 0 000000032163
IT1 032162 0 0 0 324000032163 0 000000032163
AT3 032162 0 0 0 000000032163 0 324000032163
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 221
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0378
AT6 032162 032163 0 0 000000032163 0 324000032163
FT1A 032162 032163 0 0 000000032163 0 000000032163
FT2 032162 032163 0 0 0 0 000000032163
FT2RQ 032162 032163 0 0 0 0 000000032163
FT3 032162 032163 0 0 0 0 000000032163
FT9 032163 032163 0 0 0 0 000000032163
ET0 032163 032163 0 0 0 0 000000032163
ST1A 032163 032163 0 0 0 0 000000032163
ST9 032163 032163 0 0 0 0 000000032163
*032163 CAIE 10,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032163 032163 0 0 302400000000 0 0
IT1 032163 0 0 0 302400000000 0 0
AT3 032163 0 0 0 0 0 302400000000
AT6 032163 0 0 0 0 0 302400000000
FT1A 032163 0 0 0 0 0 0
FT2 032163 0 0 0 0 0 0
FT2RQ 032163 0 0 0 0 0 0
FT3 032163 0 0 0 0 0 0
FT9 032164 0 0 0 0 0 0
ET0 032165 0 0 0 0 0 0
ST1A 032165 0 0 0 0 0 0
ST9 032165 0 0 0 0 0 0
*032165 JUMPA 0,032166
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032165 032165 0 0 324000032166 0 000000032166
IT1 032165 0 0 0 324000032166 0 000000032166
AT3 032165 0 0 0 000000032166 0 324000032166
AT6 032165 032166 0 0 000000032166 0 324000032166
FT1A 032165 032166 0 0 000000032166 0 000000032166
FT2 032165 032166 0 0 0 0 000000032166
FT2RQ 032165 032166 0 0 0 0 000000032166
FT3 032165 032166 0 0 0 0 000000032166
FT9 032166 032166 0 0 0 0 000000032166
ET0 032166 032166 0 0 0 0 000000032166
ST1A 032166 032166 0 0 0 0 000000032166
ST9 032166 032166 0 0 0 0 000000032166
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 222
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0379
*032166 SETZ 10,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032166 032166 0 0 400400000000 0 0
IT1 032166 0 0 0 400400000000 0 0
AT3 032166 0 0 0 0 0 400400000000
AT6 032166 0 0 0 0 0 400400000000
FT1A 032166 0 0 0 0 0 0
FT9 032167 0 0 0 0 0 0
ET0 032167 0 0 0 0 0 0
ST1 032167 0 0 0 0 0 0
ST2 032167 0 0 0 0 0 0
ST9 032167 0 0 0 0 0 0
*032167 AOJN 10,032171
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032167 032167 0 0 346400032171 0 000000032171
IT1 032167 0 0 0 346400032171 0 000000032171
AT3 032167 0 0 0 000000032171 0 346400032171
AT6 032167 032171 0 0 000000032171 0 346400032171
FT1A 032167 032171 0 0 000000032171 0 000000032171
FT2 032167 032171 0 0 0 0 000000032171
FT2RQ 032167 032171 0 0 0 0 000000032171
FT3 032167 032171 0 0 0 0 000000032171
FT9 032170 032171 0 0 0 0 000000032171
ET0 032171 032171 0 0 000000000001 0 000000032171
ST1 032171 032171 0 0 000000000001 0 000000032171
ST2 032171 032171 0 0 000000000001 0 000000032171
ST9 032171 032171 0 0 000000000001 0 000000032171
*032171 JUMPA 0,032172
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032171 032171 0 0 324000032172 0 000000032172
IT1 032171 0 0 0 324000032172 0 000000032172
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 223
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0380
AT3 032171 0 0 0 000000032172 0 324000032172
AT6 032171 032172 0 0 000000032172 0 324000032172
FT1A 032171 032172 0 0 000000032172 0 000000032172
FT2 032171 032172 0 0 0 0 000000032172
FT2RQ 032171 032172 0 0 0 0 000000032172
FT3 032171 032172 0 0 0 0 000000032172
FT9 032172 032172 0 0 0 0 000000032172
ET0 032172 032172 0 0 0 0 000000032172
ST1A 032172 032172 0 0 0 0 000000032172
ST9 032172 032172 0 0 0 0 000000032172
*032172 CAIE 10,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032172 032172 0 0 302400000001 0 000000000001
IT1 032172 0 0 0 302400000001 0 000000000001
AT3 032172 0 0 0 000000000001 0 302400000001
AT6 032172 000001 0 0 000000000001 0 302400000001
FT1A 032172 000001 0 0 000000000001 0 000000000001
FT2 032172 000001 0 0 0 0 000000000001
FT2RQ 032172 000001 0 0 000000000001 0 000000000001
FT3 032172 000001 0 0 000000000001 0 000000000001
FT9 032173 000001 0 0 000000000001 0 000000000001
ET0 032174 000001 0 0 0 0 000000000001
ST1A 032174 000001 0 0 0 0 000000000001
ST9 032174 000001 0 0 0 0 000000000001
*032174 JUMPA 0,032175
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032174 032174 0 0 324000032175 0 000000032175
IT1 032174 0 0 0 324000032175 0 000000032175
AT3 032174 0 0 0 000000032175 0 324000032175
AT6 032174 032175 0 0 000000032175 0 324000032175
FT1A 032174 032175 0 0 000000032175 0 000000032175
FT2 032174 032175 0 0 0 0 000000032175
FT2RQ 032174 032175 0 0 0 0 000000032175
FT3 032174 032175 0 0 0 0 000000032175
FT9 032175 032175 0 0 0 0 000000032175
ET0 032175 032175 0 0 0 0 000000032175
ST1A 032175 032175 0 0 0 0 000000032175
ST9 032175 032175 0 0 0 0 000000032175
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 224
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0381
*032175 HRROI 7,777776
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032175 032175 0 0 561340777776 0 000000777776
IT1 032175 0 0 0 561340777776 0 000000777776
AT3 032175 0 0 0 000000777776 0 561340777776
AT6 032175 777776 0 0 000000777776 0 561340777776
FT1A 032175 777776 0 0 000000777776 0 000000777776
FT9 032176 777776 0 0 000000777776 0 000000777776
ET0 032176 777776 0 0 777777777776 0 000000777776
ST1 032176 777776 0 0 777777777776 0 000000777776
ST2 032176 777776 0 0 777777777776 0 000000777776
ST9 032176 777776 0 0 777777777776 0 000000777776
*032176 AOJG 7,032200
INITIAL
C(AC)=777777 777776
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032176 032176 0 0 347340032200 0 000000032200
IT1 032176 0 0 0 347340032200 0 000000032200
AT3 032176 0 0 0 000000032200 0 347340032200
AT6 032176 0 0 0 000000032200 0 347340032200
FT1A 032176 0 0 0 000000032200 0 000000032200
FT2 032176 0 0 0 0 0 000000032200
FT2RQ 032176 0 0 0 777777777776 0 000000032200
FT3 032176 0 0 0 777777777776 0 000000032200
FT9 032177 0 0 0 777777777776 0 000000032200
ET0 032177 0 0 0 777777777777 0 000000032200
ST1 032177 0 0 0 777777777777 0 000000032200
ST2 032177 0 0 0 777777777777 0 000000032200
ST9 032177 0 0 0 777777777777 0 000000032200
*032177 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 032177 032177 0 0 334000000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 225
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0382
IT1 032177 0 0 0 334000000000 0 0
AT3 032177 0 0 0 0 0 334000000000
AT6 032177 0 0 0 0 0 334000000000
FT0 032177 0 0 0 0 0 334000000000
FT1A 032177 0 0 0 0 0 0
FT9 0 0 0 0 0 0 0
ET0 032201 0 0 0 0 0 0
ST1A 032201 0 0 0 0 0 0
ST9 032201 0 0 0 0 0 0
*032201 JUMPA 0,032202
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032201 032201 0 0 324000032202 0 000000032202
IT1 032201 0 0 0 324000032202 0 000000032202
AT3 032201 0 0 0 000000032202 0 324000032202
AT6 032201 032202 0 0 000000032202 0 324000032202
FT1A 032201 032202 0 0 000000032202 0 000000032202
FT2 032201 032202 0 0 0 0 000000032202
FT2RQ 032201 032202 0 0 0 0 000000032202
FT3 032201 032202 0 0 0 0 000000032202
FT9 032202 032202 0 0 0 0 000000032202
ET0 032202 032202 0 0 0 0 000000032202
ST1A 032202 032202 0 0 0 0 000000032202
ST9 032202 032202 0 0 0 0 000000032202
*032202 CAME 7,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032202 032202 0 0 312340033462 0 777777777777
IT1 032202 0 0 0 312340033462 0 777777777777
AT3 032202 0 0 0 000000033462 0 312340033462
AT6 032202 033462 0 0 000000033462 0 312340033462
FT0 032202 033462 0 0 777777777777 0 312340033462
FT1A 032202 033462 0 0 777777777777 0 777777777777
FT2 032202 033462 0 0 0 0 777777777777
FT2RQ 032202 033462 0 0 777777777777 0 777777777777
FT3 032202 033462 0 0 777777777777 0 777777777777
FT9 032203 033462 0 0 777777777777 0 777777777777
ET0 032204 033462 0 0 0 0 777777777777
ST1A 032204 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 226
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0383
ST9 032204 033462 0 0 0 0 777777777777
*032204 JUMPA 0,032205
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032204 032204 0 0 324000032205 0 000000032205
IT1 032204 0 0 0 324000032205 0 000000032205
AT3 032204 0 0 0 000000032205 0 324000032205
AT6 032204 032205 0 0 000000032205 0 324000032205
FT1A 032204 032205 0 0 000000032205 0 000000032205
FT2 032204 032205 0 0 0 0 000000032205
FT2RQ 032204 032205 0 0 0 0 000000032205
FT3 032204 032205 0 0 0 0 000000032205
FT9 032205 032205 0 0 0 0 000000032205
ET0 032205 032205 0 0 0 0 000000032205
ST1A 032205 032205 0 0 0 0 000000032205
ST9 032205 032205 0 0 0 0 000000032205
*032205 SETO 7,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032205 032205 0 0 474340000000 0 0
IT1 032205 0 0 0 474340000000 0 0
AT3 032205 0 0 0 0 0 474340000000
AT6 032205 0 0 0 0 0 474340000000
FT1A 032205 0 0 0 0 0 0
FT9 032206 0 0 0 0 0 0
ET0 032206 0 0 0 777777777777 0 0
ST1 032206 0 0 0 777777777777 0 0
ST2 032206 0 0 0 777777777777 0 0
ST9 032206 0 0 0 777777777777 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 227
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0384
*032206 AOJG 7,032210
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032206 032206 0 0 347340032210 0 000000032210
IT1 032206 0 0 0 347340032210 0 000000032210
AT3 032206 0 0 0 000000032210 0 347340032210
AT6 032206 032210 0 0 000000032210 0 347340032210
FT1A 032206 032210 0 0 000000032210 0 000000032210
FT2 032206 032210 0 0 0 0 000000032210
FT2RQ 032206 032210 0 0 777777777777 0 000000032210
FT3 032206 032210 0 0 777777777777 0 000000032210
FT9 032207 032210 0 0 777777777777 0 000000032210
ET0 032207 032210 0 0 0 0 000000032210
ST1 032207 032210 0 0 0 0 000000032210
ST2 032207 032210 0 0 0 0 000000032210
ST9 032207 032210 0 0 0 0 000000032210
*032207 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 032207 032207 0 0 334000000000 0 0
IT1 032207 0 0 0 334000000000 0 0
AT3 032207 0 0 0 0 0 334000000000
AT6 032207 0 0 0 0 0 334000000000
FT0 032207 0 0 0 0 0 334000000000
FT1A 032207 0 0 0 0 0 0
FT9 032210 0 0 0 0 0 0
ET0 032211 0 0 0 0 0 0
ST1A 032211 0 0 0 0 0 0
ST9 032211 0 0 0 0 0 0
*032211 JUMPA 0,032212
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032211 032211 0 0 324000032212 0 000000032212
IT1 032211 0 0 0 324000032212 0 000000032212
AT3 032211 0 0 0 000000032212 0 324000032212
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 228
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0385
AT6 032211 032212 0 0 000000032212 0 324000032212
FT1A 032211 032212 0 0 000000032212 0 000000032212
FT2 032211 032212 0 0 0 0 000000032212
FT2RQ 032211 032212 0 0 0 0 000000032212
FT3 032211 032212 0 0 0 0 000000032212
FT9 032212 032212 0 0 0 0 000000032212
ET0 032212 032212 0 0 0 0 000000032212
ST1A 032212 032212 0 0 0 0 000000032212
ST9 032212 032212 0 0 0 0 000000032212
*032212 CAIE 7,000000
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032212 032212 0 0 302340000000 0 0
IT1 032212 0 0 0 302340000000 0 0
AT3 032212 0 0 0 0 0 302340000000
AT6 032212 0 0 0 0 0 302340000000
FT1A 032212 0 0 0 0 0 0
FT2 032212 0 0 0 0 0 0
FT2RQ 032212 0 0 0 0 0 0
FT3 032212 0 0 0 0 0 0
FT9 032213 0 0 0 0 0 0
ET0 032214 0 0 0 0 0 0
ST1A 032214 0 0 0 0 0 0
ST9 032214 0 0 0 0 0 0
*032214 JUMPA 0,032215
INITIAL
C(AC)=000000 000000
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 0 0 000000032215
FT3 032214 032215 0 0 0 0 000000032215
FT9 032215 032215 0 0 0 0 000000032215
ET0 032215 032215 0 0 0 0 000000032215
ST1A 032215 032215 0 0 0 0 000000032215
ST9 032215 032215 0 0 0 0 000000032215
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 229
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0386
*032215 SETZ 7,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032215 032215 0 0 400340000000 0 0
IT1 032215 0 0 0 400340000000 0 0
AT3 032215 0 0 0 0 0 400340000000
AT6 032215 0 0 0 0 0 400340000000
FT1A 032215 0 0 0 0 0 0
FT9 032216 0 0 0 0 0 0
ET0 032216 0 0 0 0 0 0
ST1 032216 0 0 0 0 0 0
ST2 032216 0 0 0 0 0 0
ST9 032216 0 0 0 0 0 0
*032216 AOJG 7,032220
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032216 032216 0 0 347340032220 0 000000032220
IT1 032216 0 0 0 347340032220 0 000000032220
AT3 032216 0 0 0 000000032220 0 347340032220
AT6 032216 032220 0 0 000000032220 0 347340032220
FT1A 032216 032220 0 0 000000032220 0 000000032220
FT2 032216 032220 0 0 0 0 000000032220
FT2RQ 032216 032220 0 0 0 0 000000032220
FT3 032216 032220 0 0 0 0 000000032220
FT9 032217 032220 0 0 0 0 000000032220
ET0 032220 032220 0 0 000000000001 0 000000032220
ST1 032220 032220 0 0 000000000001 0 000000032220
ST2 032220 032220 0 0 000000000001 0 000000032220
ST9 032220 032220 0 0 000000000001 0 000000032220
*032220 JUMPA 0,032221
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032220 032220 0 0 324000032221 0 000000032221
IT1 032220 0 0 0 324000032221 0 000000032221
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 230
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0387
AT3 032220 0 0 0 000000032221 0 324000032221
AT6 032220 032221 0 0 000000032221 0 324000032221
FT1A 032220 032221 0 0 000000032221 0 000000032221
FT2 032220 032221 0 0 0 0 000000032221
FT2RQ 032220 032221 0 0 0 0 000000032221
FT3 032220 032221 0 0 0 0 000000032221
FT9 032221 032221 0 0 0 0 000000032221
ET0 032221 032221 0 0 0 0 000000032221
ST1A 032221 032221 0 0 0 0 000000032221
ST9 032221 032221 0 0 0 0 000000032221
*032221 CAIE 7,000001
INITIAL
C(AC)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032221 032221 0 0 302340000001 0 000000000001
IT1 032221 0 0 0 302340000001 0 000000000001
AT3 032221 0 0 0 000000000001 0 302340000001
AT6 032221 000001 0 0 000000000001 0 302340000001
FT1A 032221 000001 0 0 000000000001 0 000000000001
FT2 032221 000001 0 0 0 0 000000000001
FT2RQ 032221 000001 0 0 000000000001 0 000000000001
FT3 032221 000001 0 0 000000000001 0 000000000001
FT9 032222 000001 0 0 000000000001 0 000000000001
ET0 032223 000001 0 0 0 0 000000000001
ST1A 032223 000001 0 0 0 0 000000000001
ST9 032223 000001 0 0 0 0 000000000001
*032223 JUMPA 0,032224
INITIAL
C(AC)=000000 000000
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 0 0 000000032224
FT3 032223 032224 0 0 0 0 000000032224
FT9 032224 032224 0 0 0 0 000000032224
ET0 032224 032224 0 0 0 0 000000032224
ST1A 032224 032224 0 0 0 0 000000032224
ST9 032224 032224 0 0 0 0 000000032224
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 231
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0388
*032224 MOVE 6,033474
INITIAL
C(AC)=000000 000002
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032224 032224 0 0 200300033474 0 707070707070
IT1 032224 0 0 0 200300033474 0 707070707070
AT3 032224 0 0 0 000000033474 0 200300033474
AT6 032224 033474 0 0 000000033474 0 200300033474
FT0 032224 033474 0 0 707070707070 0 200300033474
FT1A 032224 033474 0 0 707070707070 0 707070707070
FT9 032225 033474 0 0 707070707070 0 707070707070
ET0 032225 033474 0 0 707070707070 0 707070707070
ST1 032225 033474 0 0 707070707070 0 707070707070
ST2 032225 033474 0 0 707070707070 0 707070707070
ST9 032225 033474 0 0 707070707070 0 707070707070
*032225 HRROI 7,777776
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032225 032225 0 0 561340777776 0 000000777776
IT1 032225 0 0 0 561340777776 0 000000777776
AT3 032225 0 0 0 000000777776 0 561340777776
AT6 032225 777776 0 0 000000777776 0 561340777776
FT1A 032225 777776 0 0 000000777776 0 000000777776
FT9 032226 777776 0 0 000000777776 0 000000777776
ET0 032226 777776 0 0 777777777776 0 000000777776
ST1 032226 777776 0 0 777777777776 0 000000777776
ST2 032226 777776 0 0 777777777776 0 000000777776
ST9 032226 777776 0 0 777777777776 0 000000777776
*032226 AOSL 6,000007
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032226 032226 0 0 351300000007 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 232
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0389
IT1 032226 0 0 0 351300000007 0 777777777776
AT3 032226 0 0 0 000000000007 0 351300000007
AT6 032226 000007 0 0 000000000007 0 351300000007
FT0 032226 000007 0 0 777777777776 0 351300000007
FT1A 032226 000007 0 0 777777777776 0 777777777776
FT9 032227 000007 0 0 777777777776 0 777777777776
ET0 032230 000007 0 0 777777777777 0 777777777776
ST1 032230 000007 0 0 777777777777 0 777777777776
ST2 032230 000007 0 0 777777777777 0 777777777776
ST5 032230 000007 0 0 777777777777 0 777777777776
ST6A 032230 000007 0 0 777777777777 0 777777777776
ST9 032230 000007 0 0 777777777777 0 777777777776
*032230 JUMPA 0,032231
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032230 032230 0 0 324000032231 0 000000032231
IT1 032230 0 0 0 324000032231 0 000000032231
AT3 032230 0 0 0 000000032231 0 324000032231
AT6 032230 032231 0 0 000000032231 0 324000032231
FT1A 032230 032231 0 0 000000032231 0 000000032231
FT2 032230 032231 0 0 0 0 000000032231
FT2RQ 032230 032231 0 0 0 0 000000032231
FT3 032230 032231 0 0 0 0 000000032231
FT9 032231 032231 0 0 0 0 000000032231
ET0 032231 032231 0 0 0 0 000000032231
ST1A 032231 032231 0 0 0 0 000000032231
ST9 032231 032231 0 0 0 0 000000032231
*032231 CAME 7,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032231 032231 0 0 312340033462 0 777777777777
IT1 032231 0 0 0 312340033462 0 777777777777
AT3 032231 0 0 0 000000033462 0 312340033462
AT6 032231 033462 0 0 000000033462 0 312340033462
FT0 032231 033462 0 0 777777777777 0 312340033462
FT1A 032231 033462 0 0 777777777777 0 777777777777
FT2 032231 033462 0 0 0 0 777777777777
FT2RQ 032231 033462 0 0 777777777777 0 777777777777
FT3 032231 033462 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 233
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0390
FT9 032232 033462 0 0 777777777777 0 777777777777
ET0 032233 033462 0 0 0 0 777777777777
ST1A 032233 033462 0 0 0 0 777777777777
ST9 032233 033462 0 0 0 0 777777777777
*032233 JUMPA 0,032234
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032233 032233 0 0 324000032234 0 000000032234
IT1 032233 0 0 0 324000032234 0 000000032234
AT3 032233 0 0 0 000000032234 0 324000032234
AT6 032233 032234 0 0 000000032234 0 324000032234
FT1A 032233 032234 0 0 000000032234 0 000000032234
FT2 032233 032234 0 0 0 0 000000032234
FT2RQ 032233 032234 0 0 0 0 000000032234
FT3 032233 032234 0 0 0 0 000000032234
FT9 032234 032234 0 0 0 0 000000032234
ET0 032234 032234 0 0 0 0 000000032234
ST1A 032234 032234 0 0 0 0 000000032234
ST9 032234 032234 0 0 0 0 000000032234
*032234 CAME 6,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032234 032234 0 0 312300033462 0 777777777777
IT1 032234 0 0 0 312300033462 0 777777777777
AT3 032234 0 0 0 000000033462 0 312300033462
AT6 032234 033462 0 0 000000033462 0 312300033462
FT0 032234 033462 0 0 777777777777 0 312300033462
FT1A 032234 033462 0 0 777777777777 0 777777777777
FT2 032234 033462 0 0 0 0 777777777777
FT2RQ 032234 033462 0 0 777777777777 0 777777777777
FT3 032234 033462 0 0 777777777777 0 777777777777
FT9 032235 033462 0 0 777777777777 0 777777777777
ET0 032236 033462 0 0 0 0 777777777777
ST1A 032236 033462 0 0 0 0 777777777777
ST9 032236 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 234
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0391
*032236 JUMPA 0,032237
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032236 032236 0 0 324000032237 0 000000032237
IT1 032236 0 0 0 324000032237 0 000000032237
AT3 032236 0 0 0 000000032237 0 324000032237
AT6 032236 032237 0 0 000000032237 0 324000032237
FT1A 032236 032237 0 0 000000032237 0 000000032237
FT2 032236 032237 0 0 0 0 000000032237
FT2RQ 032236 032237 0 0 0 0 000000032237
FT3 032236 032237 0 0 0 0 000000032237
FT9 032237 032237 0 0 0 0 000000032237
ET0 032237 032237 0 0 0 0 000000032237
ST1A 032237 032237 0 0 0 0 000000032237
ST9 032237 032237 0 0 0 0 000000032237
*032237 MOVE 6,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032237 032237 0 0 200300033474 0 707070707070
IT1 032237 0 0 0 200300033474 0 707070707070
AT3 032237 0 0 0 000000033474 0 200300033474
AT6 032237 033474 0 0 000000033474 0 200300033474
FT0 032237 033474 0 0 707070707070 0 200300033474
FT1A 032237 033474 0 0 707070707070 0 707070707070
FT9 032240 033474 0 0 707070707070 0 707070707070
ET0 032240 033474 0 0 707070707070 0 707070707070
ST1 032240 033474 0 0 707070707070 0 707070707070
ST2 032240 033474 0 0 707070707070 0 707070707070
ST9 032240 033474 0 0 707070707070 0 707070707070
*032240 HRROI 7,777776
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032240 032240 0 0 561340777776 0 000000777776
IT1 032240 0 0 0 561340777776 0 000000777776
AT3 032240 0 0 0 000000777776 0 561340777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 235
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0392
AT6 032240 777776 0 0 000000777776 0 561340777776
FT1A 032240 777776 0 0 000000777776 0 000000777776
FT9 032241 777776 0 0 000000777776 0 000000777776
ET0 032241 777776 0 0 777777777776 0 000000777776
ST1 032241 777776 0 0 777777777776 0 000000777776
ST2 032241 777776 0 0 777777777776 0 000000777776
ST9 032241 777776 0 0 777777777776 0 000000777776
*032241 MOVEM 7,032255
INITIAL
C(AC)=777777 777776
C(E)=000000 000000
FINAL
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032241 032241 0 0 202340032255 0 000000032255
IT1 032241 0 0 0 202340032255 0 000000032255
AT3 032241 0 0 0 000000032255 0 202340032255
AT6 032241 032255 0 0 000000032255 0 202340032255
FT1A 032241 032255 0 0 000000032255 0 000000032255
FT2 032241 032255 0 0 0 0 000000032255
FT2RQ 032241 032255 0 0 777777777776 0 000000032255
FT3 032241 032255 0 0 777777777776 0 000000032255
FT9 032242 032255 0 0 777777777776 0 000000032255
ET0 032242 032255 0 0 777777777776 0 000000032255
ST6 032242 032255 0 0 777777777776 0 000000032255
ST6A 032242 032255 0 0 777777777776 0 000000032255
ST9 032242 032255 0 0 777777777776 0 000000032255
*032242 AOSL 6,032255
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032242 032242 0 0 351300032255 0 777777777776
IT1 032242 0 0 0 351300032255 0 777777777776
AT3 032242 0 0 0 000000032255 0 351300032255
AT6 032242 032255 0 0 000000032255 0 351300032255
FT0 032242 032255 0 0 777777777776 0 351300032255
FT1A 032242 032255 0 0 777777777776 0 777777777776
FT9 032243 032255 0 0 777777777776 0 777777777776
ET0 032244 032255 0 0 777777777777 0 777777777776
ST1 032244 032255 0 0 777777777777 0 777777777776
ST2 032244 032255 0 0 777777777777 0 777777777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 236
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0393
ST5 032244 032255 0 0 777777777777 0 777777777776
ST6A 032244 032255 0 0 777777777777 0 777777777776
ST9 032244 032255 0 0 777777777777 0 777777777776
*032244 JUMPA 0,032245
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032244 032244 0 0 324000032245 0 000000032245
IT1 032244 0 0 0 324000032245 0 000000032245
AT3 032244 0 0 0 000000032245 0 324000032245
AT6 032244 032245 0 0 000000032245 0 324000032245
FT1A 032244 032245 0 0 000000032245 0 000000032245
FT2 032244 032245 0 0 0 0 000000032245
FT2RQ 032244 032245 0 0 0 0 000000032245
FT3 032244 032245 0 0 0 0 000000032245
FT9 032245 032245 0 0 0 0 000000032245
ET0 032245 032245 0 0 0 0 000000032245
ST1A 032245 032245 0 0 0 0 000000032245
ST9 032245 032245 0 0 0 0 000000032245
*032245 MOVE 7,032255
INITIAL
C(AC)=777777 777776
C(E)=777777 777777
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032245 032245 0 0 200340032255 0 777777777777
IT1 032245 0 0 0 200340032255 0 777777777777
AT3 032245 0 0 0 000000032255 0 200340032255
AT6 032245 032255 0 0 000000032255 0 200340032255
FT0 032245 032255 0 0 777777777777 0 200340032255
FT1A 032245 032255 0 0 777777777777 0 777777777777
FT9 032246 032255 0 0 777777777777 0 777777777777
ET0 032246 032255 0 0 777777777777 0 777777777777
ST1 032246 032255 0 0 777777777777 0 777777777777
ST2 032246 032255 0 0 777777777777 0 777777777777
ST9 032246 032255 0 0 777777777777 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 237
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0394
*032246 CAME 7,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032246 032246 0 0 312340033462 0 777777777777
IT1 032246 0 0 0 312340033462 0 777777777777
AT3 032246 0 0 0 000000033462 0 312340033462
AT6 032246 033462 0 0 000000033462 0 312340033462
FT0 032246 033462 0 0 777777777777 0 312340033462
FT1A 032246 033462 0 0 777777777777 0 777777777777
FT2 032246 033462 0 0 0 0 777777777777
FT2RQ 032246 033462 0 0 777777777777 0 777777777777
FT3 032246 033462 0 0 777777777777 0 777777777777
FT9 032247 033462 0 0 777777777777 0 777777777777
ET0 032250 033462 0 0 0 0 777777777777
ST1A 032250 033462 0 0 0 0 777777777777
ST9 032250 033462 0 0 0 0 777777777777
*032250 JUMPA 0,032251
INITIAL
C(AC)=000000 000000
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 0 0 000000032251
FT3 032250 032251 0 0 0 0 000000032251
FT9 032251 032251 0 0 0 0 000000032251
ET0 032251 032251 0 0 0 0 000000032251
ST1A 032251 032251 0 0 0 0 000000032251
ST9 032251 032251 0 0 0 0 000000032251
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 238
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0395
*032251 CAME 6,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032251 032251 0 0 312300033462 0 777777777777
IT1 032251 0 0 0 312300033462 0 777777777777
AT3 032251 0 0 0 000000033462 0 312300033462
AT6 032251 033462 0 0 000000033462 0 312300033462
FT0 032251 033462 0 0 777777777777 0 312300033462
FT1A 032251 033462 0 0 777777777777 0 777777777777
FT2 032251 033462 0 0 0 0 777777777777
FT2RQ 032251 033462 0 0 777777777777 0 777777777777
FT3 032251 033462 0 0 777777777777 0 777777777777
FT9 032252 033462 0 0 777777777777 0 777777777777
ET0 032253 033462 0 0 0 0 777777777777
ST1A 032253 033462 0 0 0 0 777777777777
ST9 032253 033462 0 0 0 0 777777777777
*032253 JUMPA 0,032254
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032253 032253 0 0 324000032254 0 000000032254
IT1 032253 0 0 0 324000032254 0 000000032254
AT3 032253 0 0 0 000000032254 0 324000032254
AT6 032253 032254 0 0 000000032254 0 324000032254
FT1A 032253 032254 0 0 000000032254 0 000000032254
FT2 032253 032254 0 0 0 0 000000032254
FT2RQ 032253 032254 0 0 0 0 000000032254
FT3 032253 032254 0 0 0 0 000000032254
FT9 032254 032254 0 0 0 0 000000032254
ET0 032254 032254 0 0 0 0 000000032254
ST1A 032254 032254 0 0 0 0 000000032254
ST9 032254 032254 0 0 0 0 000000032254
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 239
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0396
*032254 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 032254 032254 0 0 334000000000 0 0
IT1 032254 0 0 0 334000000000 0 0
AT3 032254 0 0 0 0 0 334000000000
AT6 032254 0 0 0 0 0 334000000000
FT0 032254 0 0 0 0 0 334000000000
FT1A 032254 0 0 0 0 0 0
FT9 032255 0 0 0 0 0 0
ET0 032256 0 0 0 0 0 0
ST1A 032256 0 0 0 0 0 0
ST9 032256 0 0 0 0 0 0
*032256 MOVE 6,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032256 032256 0 0 200300033474 0 707070707070
IT1 032256 0 0 0 200300033474 0 707070707070
AT3 032256 0 0 0 000000033474 0 200300033474
AT6 032256 033474 0 0 000000033474 0 200300033474
FT0 032256 033474 0 0 707070707070 0 200300033474
FT1A 032256 033474 0 0 707070707070 0 707070707070
FT9 032257 033474 0 0 707070707070 0 707070707070
ET0 032257 033474 0 0 707070707070 0 707070707070
ST1 032257 033474 0 0 707070707070 0 707070707070
ST2 032257 033474 0 0 707070707070 0 707070707070
ST9 032257 033474 0 0 707070707070 0 707070707070
*032257 SETO 7,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032257 032257 0 0 474340000000 0 0
IT1 032257 0 0 0 474340000000 0 0
AT3 032257 0 0 0 0 0 474340000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 240
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0397
AT6 032257 0 0 0 0 0 474340000000
FT1A 032257 0 0 0 0 0 0
FT9 032260 0 0 0 0 0 0
ET0 032260 0 0 0 777777777777 0 0
ST1 032260 0 0 0 777777777777 0 0
ST2 032260 0 0 0 777777777777 0 0
ST9 032260 0 0 0 777777777777 0 0
*032260 AOSL 6,000007
INITIAL
C(AC)=707070 707070
C(E)=777777 777777
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032260 032260 0 0 351300000007 0 777777777777
IT1 032260 0 0 0 351300000007 0 777777777777
AT3 032260 0 0 0 000000000007 0 351300000007
AT6 032260 000007 0 0 000000000007 0 351300000007
FT0 032260 000007 0 0 777777777777 0 351300000007
FT1A 032260 000007 0 0 777777777777 0 777777777777
FT9 032261 000007 0 0 777777777777 0 777777777777
ET0 032261 000007 0 0 0 0 777777777777
ST1 032261 000007 0 0 0 0 777777777777
ST2 032261 000007 0 0 0 0 777777777777
ST5 032261 000007 0 0 0 0 777777777777
ST6A 032261 000007 0 0 0 0 777777777777
ST9 032261 000007 0 0 0 0 777777777777
*032261 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 032261 032261 0 0 334000000000 0 0
IT1 032261 0 0 0 334000000000 0 0
AT3 032261 0 0 0 0 0 334000000000
AT6 032261 0 0 0 0 0 334000000000
FT0 032261 0 0 0 0 0 334000000000
FT1A 032261 0 0 0 0 0 0
FT9 032262 0 0 0 0 0 0
ET0 032263 0 0 0 0 0 0
ST1A 032263 0 0 0 0 0 0
ST9 032263 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 241
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0398
*032263 JUMPA 0,032264
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032263 032263 0 0 324000032264 0 000000032264
IT1 032263 0 0 0 324000032264 0 000000032264
AT3 032263 0 0 0 000000032264 0 324000032264
AT6 032263 032264 0 0 000000032264 0 324000032264
FT1A 032263 032264 0 0 000000032264 0 000000032264
FT2 032263 032264 0 0 0 0 000000032264
FT2RQ 032263 032264 0 0 0 0 000000032264
FT3 032263 032264 0 0 0 0 000000032264
FT9 032264 032264 0 0 0 0 000000032264
ET0 032264 032264 0 0 0 0 000000032264
ST1A 032264 032264 0 0 0 0 000000032264
ST9 032264 032264 0 0 0 0 000000032264
*032264 CAME 7,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032264 032264 0 0 312340033501 0 0
IT1 032264 0 0 0 312340033501 0 0
AT3 032264 0 0 0 000000033501 0 312340033501
AT6 032264 033501 0 0 000000033501 0 312340033501
FT0 032264 033501 0 0 0 0 312340033501
FT1A 032264 033501 0 0 0 0 0
FT2 032264 033501 0 0 0 0 0
FT2RQ 032264 033501 0 0 0 0 0
FT3 032264 033501 0 0 0 0 0
FT9 032265 033501 0 0 0 0 0
ET0 032266 033501 0 0 0 0 0
ST1A 032266 033501 0 0 0 0 0
ST9 032266 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 242
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0399
*032266 JUMPA 0,032267
INITIAL
C(AC)=000000 000000
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 0 0 000000032267
FT3 032266 032267 0 0 0 0 000000032267
FT9 032267 032267 0 0 0 0 000000032267
ET0 032267 032267 0 0 0 0 000000032267
ST1A 032267 032267 0 0 0 0 000000032267
ST9 032267 032267 0 0 0 0 000000032267
*032267 CAME 6,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032267 032267 0 0 312300033501 0 0
IT1 032267 0 0 0 312300033501 0 0
AT3 032267 0 0 0 000000033501 0 312300033501
AT6 032267 033501 0 0 000000033501 0 312300033501
FT0 032267 033501 0 0 0 0 312300033501
FT1A 032267 033501 0 0 0 0 0
FT2 032267 033501 0 0 0 0 0
FT2RQ 032267 033501 0 0 0 0 0
FT3 032267 033501 0 0 0 0 0
FT9 032270 033501 0 0 0 0 0
ET0 032271 033501 0 0 0 0 0
ST1A 032271 033501 0 0 0 0 0
ST9 032271 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 243
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0400
*032271 JUMPA 0,032272
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032271 032271 0 0 324000032272 0 000000032272
IT1 032271 0 0 0 324000032272 0 000000032272
AT3 032271 0 0 0 000000032272 0 324000032272
AT6 032271 032272 0 0 000000032272 0 324000032272
FT1A 032271 032272 0 0 000000032272 0 000000032272
FT2 032271 032272 0 0 0 0 000000032272
FT2RQ 032271 032272 0 0 0 0 000000032272
FT3 032271 032272 0 0 0 0 000000032272
FT9 032272 032272 0 0 0 0 000000032272
ET0 032272 032272 0 0 0 0 000000032272
ST1A 032272 032272 0 0 0 0 000000032272
ST9 032272 032272 0 0 0 0 000000032272
*032272 MOVE 6,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032272 032272 0 0 200300033474 0 707070707070
IT1 032272 0 0 0 200300033474 0 707070707070
AT3 032272 0 0 0 000000033474 0 200300033474
AT6 032272 033474 0 0 000000033474 0 200300033474
FT0 032272 033474 0 0 707070707070 0 200300033474
FT1A 032272 033474 0 0 707070707070 0 707070707070
FT9 032273 033474 0 0 707070707070 0 707070707070
ET0 032273 033474 0 0 707070707070 0 707070707070
ST1 032273 033474 0 0 707070707070 0 707070707070
ST2 032273 033474 0 0 707070707070 0 707070707070
ST9 032273 033474 0 0 707070707070 0 707070707070
*032273 SETZ 7,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032273 032273 0 0 400340000000 0 0
IT1 032273 0 0 0 400340000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 244
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0401
AT3 032273 0 0 0 0 0 400340000000
AT6 032273 0 0 0 0 0 400340000000
FT1A 032273 0 0 0 0 0 0
FT9 032274 0 0 0 0 0 0
ET0 032274 0 0 0 0 0 0
ST1 032274 0 0 0 0 0 0
ST2 032274 0 0 0 0 0 0
ST9 032274 0 0 0 0 0 0
*032274 AOSL 6,000007
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=000000 000001
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032274 032274 0 0 351300000007 0 0
IT1 032274 0 0 0 351300000007 0 0
AT3 032274 0 0 0 000000000007 0 351300000007
AT6 032274 000007 0 0 000000000007 0 351300000007
FT0 032274 000007 0 0 0 0 351300000007
FT1A 032274 000007 0 0 0 0 0
FT9 032275 000007 0 0 0 0 0
ET0 032275 000007 0 0 000000000001 0 0
ST1 032275 000007 0 0 000000000001 0 0
ST2 032275 000007 0 0 000000000001 0 0
ST5 032275 000007 0 0 000000000001 0 0
ST6A 032275 000007 0 0 000000000001 0 0
ST9 032275 000007 0 0 000000000001 0 0
*032275 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 032275 032275 0 0 334000000000 0 0
IT1 032275 0 0 0 334000000000 0 0
AT3 032275 0 0 0 0 0 334000000000
AT6 032275 0 0 0 0 0 334000000000
FT0 032275 0 0 0 0 0 334000000000
FT1A 032275 0 0 0 0 0 0
FT9 032276 0 0 0 0 0 0
ET0 032277 0 0 0 0 0 0
ST1A 032277 0 0 0 0 0 0
ST9 032277 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 245
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0402
*032277 JUMPA 0,032300
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032277 032277 0 0 324000032300 0 000000032300
IT1 032277 0 0 0 324000032300 0 000000032300
AT3 032277 0 0 0 000000032300 0 324000032300
AT6 032277 0 0 0 000000032300 0 324000032300
FT1A 032277 0 0 0 000000032300 0 000000032300
FT2 032277 0 0 0 0 0 000000032300
FT2RQ 032277 0 0 0 0 0 000000032300
FT3 032277 0 0 0 0 0 000000032300
FT9 0 0 0 0 0 0 000000032300
ET0 0 0 0 0 0 0 000000032300
ST1A 0 0 0 0 0 0 000000032300
ST9 0 0 0 0 0 0 000000032300
*032300 CAME 7,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 312340033502 0 000000000001
IT1 0 0 0 0 312340033502 0 000000000001
AT3 0 0 0 0 000000033502 0 312340033502
AT6 0 033502 0 0 000000033502 0 312340033502
FT0 0 033502 0 0 000000000001 0 312340033502
FT1A 0 033502 0 0 000000000001 0 000000000001
FT2 0 033502 0 0 0 0 000000000001
FT2RQ 0 033502 0 0 000000000001 0 000000000001
FT3 0 033502 0 0 000000000001 0 000000000001
FT9 032301 033502 0 0 000000000001 0 000000000001
ET0 032302 033502 0 0 0 0 000000000001
ST1A 032302 033502 0 0 0 0 000000000001
ST9 032302 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 246
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0403
*032302 JUMPA 0,032303
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032302 032302 0 0 324000032303 0 000000032303
IT1 032302 0 0 0 324000032303 0 000000032303
AT3 032302 0 0 0 000000032303 0 324000032303
AT6 032302 032303 0 0 000000032303 0 324000032303
FT1A 032302 032303 0 0 000000032303 0 000000032303
FT2 032302 032303 0 0 0 0 000000032303
FT2RQ 032302 032303 0 0 0 0 000000032303
FT3 032302 032303 0 0 0 0 000000032303
FT9 032303 032303 0 0 0 0 000000032303
ET0 032303 032303 0 0 0 0 000000032303
ST1A 032303 032303 0 0 0 0 000000032303
ST9 032303 032303 0 0 0 0 000000032303
*032303 CAME 6,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032303 032303 0 0 312300033502 0 000000000001
IT1 032303 0 0 0 312300033502 0 000000000001
AT3 032303 0 0 0 000000033502 0 312300033502
AT6 032303 033502 0 0 000000033502 0 312300033502
FT0 032303 033502 0 0 000000000001 0 312300033502
FT1A 032303 033502 0 0 000000000001 0 000000000001
FT2 032303 033502 0 0 0 0 000000000001
FT2RQ 032303 033502 0 0 000000000001 0 000000000001
FT3 032303 033502 0 0 000000000001 0 000000000001
FT9 032304 033502 0 0 000000000001 0 000000000001
ET0 032305 033502 0 0 0 0 000000000001
ST1A 032305 033502 0 0 0 0 000000000001
ST9 032305 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 247
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0404
*032305 JUMPA 0,032306
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032305 032305 0 0 324000032306 0 000000032306
IT1 032305 0 0 0 324000032306 0 000000032306
AT3 032305 0 0 0 000000032306 0 324000032306
AT6 032305 032306 0 0 000000032306 0 324000032306
FT1A 032305 032306 0 0 000000032306 0 000000032306
FT2 032305 032306 0 0 0 0 000000032306
FT2RQ 032305 032306 0 0 0 0 000000032306
FT3 032305 032306 0 0 0 0 000000032306
FT9 032306 032306 0 0 0 0 000000032306
ET0 032306 032306 0 0 0 0 000000032306
ST1A 032306 032306 0 0 0 0 000000032306
ST9 032306 032306 0 0 0 0 000000032306
*032306 MOVE 5,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032306 032306 0 0 200240033474 0 707070707070
IT1 032306 0 0 0 200240033474 0 707070707070
AT3 032306 0 0 0 000000033474 0 200240033474
AT6 032306 033474 0 0 000000033474 0 200240033474
FT0 032306 033474 0 0 707070707070 0 200240033474
FT1A 032306 033474 0 0 707070707070 0 707070707070
FT9 032307 033474 0 0 707070707070 0 707070707070
ET0 032307 033474 0 0 707070707070 0 707070707070
ST1 032307 033474 0 0 707070707070 0 707070707070
ST2 032307 033474 0 0 707070707070 0 707070707070
ST9 032307 033474 0 0 707070707070 0 707070707070
*032307 HRROI 6,777776
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032307 032307 0 0 561300777776 0 000000777776
IT1 032307 0 0 0 561300777776 0 000000777776
AT3 032307 0 0 0 000000777776 0 561300777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 248
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0405
AT6 032307 777776 0 0 000000777776 0 561300777776
FT1A 032307 777776 0 0 000000777776 0 000000777776
FT9 032310 777776 0 0 000000777776 0 000000777776
ET0 032310 777776 0 0 777777777776 0 000000777776
ST1 032310 777776 0 0 777777777776 0 000000777776
ST2 032310 777776 0 0 777777777776 0 000000777776
ST9 032310 777776 0 0 777777777776 0 000000777776
*032310 AOSE 5,000006
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032310 032310 0 0 352240000006 0 777777777776
IT1 032310 0 0 0 352240000006 0 777777777776
AT3 032310 0 0 0 000000000006 0 352240000006
AT6 032310 000006 0 0 000000000006 0 352240000006
FT0 032310 000006 0 0 777777777776 0 352240000006
FT1A 032310 000006 0 0 777777777776 0 777777777776
FT9 032311 000006 0 0 777777777776 0 777777777776
ET0 032311 000006 0 0 777777777777 0 777777777776
ST1 032311 000006 0 0 777777777777 0 777777777776
ST2 032311 000006 0 0 777777777777 0 777777777776
ST5 032311 000006 0 0 777777777777 0 777777777776
ST6A 032311 000006 0 0 777777777777 0 777777777776
ST9 032311 000006 0 0 777777777777 0 777777777776
*032311 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 032311 032311 0 0 334000000000 0 0
IT1 032311 0 0 0 334000000000 0 0
AT3 032311 0 0 0 0 0 334000000000
AT6 032311 0 0 0 0 0 334000000000
FT0 032311 0 0 0 0 0 334000000000
FT1A 032311 0 0 0 0 0 0
FT9 032312 0 0 0 0 0 0
ET0 032313 0 0 0 0 0 0
ST1A 032313 0 0 0 0 0 0
ST9 032313 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 249
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0406
*032313 JUMPA 0,032314
INITIAL
C(AC)=000000 000000
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 0 0 000000032314
FT3 032313 032314 0 0 0 0 000000032314
FT9 032314 032314 0 0 0 0 000000032314
ET0 032314 032314 0 0 0 0 000000032314
ST1A 032314 032314 0 0 0 0 000000032314
ST9 032314 032314 0 0 0 0 000000032314
*032314 CAME 6,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032314 032314 0 0 312300033462 0 777777777777
IT1 032314 0 0 0 312300033462 0 777777777777
AT3 032314 0 0 0 000000033462 0 312300033462
AT6 032314 033462 0 0 000000033462 0 312300033462
FT0 032314 033462 0 0 777777777777 0 312300033462
FT1A 032314 033462 0 0 777777777777 0 777777777777
FT2 032314 033462 0 0 0 0 777777777777
FT2RQ 032314 033462 0 0 777777777777 0 777777777777
FT3 032314 033462 0 0 777777777777 0 777777777777
FT9 032315 033462 0 0 777777777777 0 777777777777
ET0 032316 033462 0 0 0 0 777777777777
ST1A 032316 033462 0 0 0 0 777777777777
ST9 032316 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 250
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0407
*032316 JUMPA 0,032317
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032316 032316 0 0 324000032317 0 000000032317
IT1 032316 0 0 0 324000032317 0 000000032317
AT3 032316 0 0 0 000000032317 0 324000032317
AT6 032316 032317 0 0 000000032317 0 324000032317
FT1A 032316 032317 0 0 000000032317 0 000000032317
FT2 032316 032317 0 0 0 0 000000032317
FT2RQ 032316 032317 0 0 0 0 000000032317
FT3 032316 032317 0 0 0 0 000000032317
FT9 032317 032317 0 0 0 0 000000032317
ET0 032317 032317 0 0 0 0 000000032317
ST1A 032317 032317 0 0 0 0 000000032317
ST9 032317 032317 0 0 0 0 000000032317
*032317 CAME 5,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032317 032317 0 0 312240033462 0 777777777777
IT1 032317 0 0 0 312240033462 0 777777777777
AT3 032317 0 0 0 000000033462 0 312240033462
AT6 032317 033462 0 0 000000033462 0 312240033462
FT0 032317 033462 0 0 777777777777 0 312240033462
FT1A 032317 033462 0 0 777777777777 0 777777777777
FT2 032317 033462 0 0 0 0 777777777777
FT2RQ 032317 033462 0 0 777777777777 0 777777777777
FT3 032317 033462 0 0 777777777777 0 777777777777
FT9 032320 033462 0 0 777777777777 0 777777777777
ET0 032321 033462 0 0 0 0 777777777777
ST1A 032321 033462 0 0 0 0 777777777777
ST9 032321 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 251
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0408
*032321 JUMPA 0,032322
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032321 032321 0 0 324000032322 0 000000032322
IT1 032321 0 0 0 324000032322 0 000000032322
AT3 032321 0 0 0 000000032322 0 324000032322
AT6 032321 032322 0 0 000000032322 0 324000032322
FT1A 032321 032322 0 0 000000032322 0 000000032322
FT2 032321 032322 0 0 0 0 000000032322
FT2RQ 032321 032322 0 0 0 0 000000032322
FT3 032321 032322 0 0 0 0 000000032322
FT9 032322 032322 0 0 0 0 000000032322
ET0 032322 032322 0 0 0 0 000000032322
ST1A 032322 032322 0 0 0 0 000000032322
ST9 032322 032322 0 0 0 0 000000032322
*032322 MOVE 5,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032322 032322 0 0 200240033474 0 707070707070
IT1 032322 0 0 0 200240033474 0 707070707070
AT3 032322 0 0 0 000000033474 0 200240033474
AT6 032322 033474 0 0 000000033474 0 200240033474
FT0 032322 033474 0 0 707070707070 0 200240033474
FT1A 032322 033474 0 0 707070707070 0 707070707070
FT9 032323 033474 0 0 707070707070 0 707070707070
ET0 032323 033474 0 0 707070707070 0 707070707070
ST1 032323 033474 0 0 707070707070 0 707070707070
ST2 032323 033474 0 0 707070707070 0 707070707070
ST9 032323 033474 0 0 707070707070 0 707070707070
*032323 SETO 6,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032323 032323 0 0 474300000000 0 0
IT1 032323 0 0 0 474300000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 252
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0409
AT3 032323 0 0 0 0 0 474300000000
AT6 032323 0 0 0 0 0 474300000000
FT1A 032323 0 0 0 0 0 0
FT9 032324 0 0 0 0 0 0
ET0 032324 0 0 0 777777777777 0 0
ST1 032324 0 0 0 777777777777 0 0
ST2 032324 0 0 0 777777777777 0 0
ST9 032324 0 0 0 777777777777 0 0
*032324 AOSE 5,000006
INITIAL
C(AC)=707070 707070
C(E)=777777 777777
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032324 032324 0 0 352240000006 0 777777777777
IT1 032324 0 0 0 352240000006 0 777777777777
AT3 032324 0 0 0 000000000006 0 352240000006
AT6 032324 000006 0 0 000000000006 0 352240000006
FT0 032324 000006 0 0 777777777777 0 352240000006
FT1A 032324 000006 0 0 777777777777 0 777777777777
FT9 032325 000006 0 0 777777777777 0 777777777777
ET0 032326 000006 0 0 0 0 777777777777
ST1 032326 000006 0 0 0 0 777777777777
ST2 032326 000006 0 0 0 0 777777777777
ST5 032326 000006 0 0 0 0 777777777777
ST6A 032326 000006 0 0 0 0 777777777777
ST9 032326 000006 0 0 0 0 777777777777
*032326 JUMPA 0,032327
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032326 032326 0 0 324000032327 0 000000032327
IT1 032326 0 0 0 324000032327 0 000000032327
AT3 032326 0 0 0 000000032327 0 324000032327
AT6 032326 032327 0 0 000000032327 0 324000032327
FT1A 032326 032327 0 0 000000032327 0 000000032327
FT2 032326 032327 0 0 0 0 000000032327
FT2RQ 032326 032327 0 0 0 0 000000032327
FT3 032326 032327 0 0 0 0 000000032327
FT9 032327 032327 0 0 0 0 000000032327
ET0 032327 032327 0 0 0 0 000000032327
ST1A 032327 032327 0 0 0 0 000000032327
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 253
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0410
ST9 032327 032327 0 0 0 0 000000032327
*032327 CAME 6,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032327 032327 0 0 312300033501 0 0
IT1 032327 0 0 0 312300033501 0 0
AT3 032327 0 0 0 000000033501 0 312300033501
AT6 032327 033501 0 0 000000033501 0 312300033501
FT0 032327 033501 0 0 0 0 312300033501
FT1A 032327 033501 0 0 0 0 0
FT2 032327 033501 0 0 0 0 0
FT2RQ 032327 033501 0 0 0 0 0
FT3 032327 033501 0 0 0 0 0
FT9 032330 033501 0 0 0 0 0
ET0 032331 033501 0 0 0 0 0
ST1A 032331 033501 0 0 0 0 0
ST9 032331 033501 0 0 0 0 0
*032331 JUMPA 0,032332
INITIAL
C(AC)=000000 000000
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 0 0 000000032332
FT3 032331 032332 0 0 0 0 000000032332
FT9 032332 032332 0 0 0 0 000000032332
ET0 032332 032332 0 0 0 0 000000032332
ST1A 032332 032332 0 0 0 0 000000032332
ST9 032332 032332 0 0 0 0 000000032332
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 254
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0411
*032332 CAME 5,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032332 032332 0 0 312240033501 0 0
IT1 032332 0 0 0 312240033501 0 0
AT3 032332 0 0 0 000000033501 0 312240033501
AT6 032332 033501 0 0 000000033501 0 312240033501
FT0 032332 033501 0 0 0 0 312240033501
FT1A 032332 033501 0 0 0 0 0
FT2 032332 033501 0 0 0 0 0
FT2RQ 032332 033501 0 0 0 0 0
FT3 032332 033501 0 0 0 0 0
FT9 032333 033501 0 0 0 0 0
ET0 032334 033501 0 0 0 0 0
ST1A 032334 033501 0 0 0 0 0
ST9 032334 033501 0 0 0 0 0
*032334 JUMPA 0,032335
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032334 032334 0 0 324000032335 0 000000032335
IT1 032334 0 0 0 324000032335 0 000000032335
AT3 032334 0 0 0 000000032335 0 324000032335
AT6 032334 032335 0 0 000000032335 0 324000032335
FT1A 032334 032335 0 0 000000032335 0 000000032335
FT2 032334 032335 0 0 0 0 000000032335
FT2RQ 032334 032335 0 0 0 0 000000032335
FT3 032334 032335 0 0 0 0 000000032335
FT9 032335 032335 0 0 0 0 000000032335
ET0 032335 032335 0 0 0 0 000000032335
ST1A 032335 032335 0 0 0 0 000000032335
ST9 032335 032335 0 0 0 0 000000032335
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 255
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0412
*032335 MOVE 5,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032335 032335 0 0 200240033474 0 707070707070
IT1 032335 0 0 0 200240033474 0 707070707070
AT3 032335 0 0 0 000000033474 0 200240033474
AT6 032335 033474 0 0 000000033474 0 200240033474
FT0 032335 033474 0 0 707070707070 0 200240033474
FT1A 032335 033474 0 0 707070707070 0 707070707070
FT9 032336 033474 0 0 707070707070 0 707070707070
ET0 032336 033474 0 0 707070707070 0 707070707070
ST1 032336 033474 0 0 707070707070 0 707070707070
ST2 032336 033474 0 0 707070707070 0 707070707070
ST9 032336 033474 0 0 707070707070 0 707070707070
*032336 SETZ 6,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032336 032336 0 0 400300000000 0 0
IT1 032336 0 0 0 400300000000 0 0
AT3 032336 0 0 0 0 0 400300000000
AT6 032336 0 0 0 0 0 400300000000
FT1A 032336 0 0 0 0 0 0
FT9 032337 0 0 0 0 0 0
ET0 032337 0 0 0 0 0 0
ST1 032337 0 0 0 0 0 0
ST2 032337 0 0 0 0 0 0
ST9 032337 0 0 0 0 0 0
*032337 AOSE 5,000006
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=000000 000001
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032337 032337 0 0 352240000006 0 0
IT1 032337 0 0 0 352240000006 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 256
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0413
AT3 032337 0 0 0 000000000006 0 352240000006
AT6 032337 000006 0 0 000000000006 0 352240000006
FT0 032337 000006 0 0 0 0 352240000006
FT1A 032337 000006 0 0 0 0 0
FT9 032340 000006 0 0 0 0 0
ET0 032340 000006 0 0 000000000001 0 0
ST1 032340 000006 0 0 000000000001 0 0
ST2 032340 000006 0 0 000000000001 0 0
ST5 032340 000006 0 0 000000000001 0 0
ST6A 032340 000006 0 0 000000000001 0 0
ST9 032340 000006 0 0 000000000001 0 0
*032340 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 032340 032340 0 0 334000000000 0 0
IT1 032340 0 0 0 334000000000 0 0
AT3 032340 0 0 0 0 0 334000000000
AT6 032340 0 0 0 0 0 334000000000
FT0 032340 0 0 0 0 0 334000000000
FT1A 032340 0 0 0 0 0 0
FT9 032341 0 0 0 0 0 0
ET0 032342 0 0 0 0 0 0
ST1A 032342 0 0 0 0 0 0
ST9 032342 0 0 0 0 0 0
*032342 JUMPA 0,032343
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032342 032342 0 0 324000032343 0 000000032343
IT1 032342 0 0 0 324000032343 0 000000032343
AT3 032342 0 0 0 000000032343 0 324000032343
AT6 032342 032343 0 0 000000032343 0 324000032343
FT1A 032342 032343 0 0 000000032343 0 000000032343
FT2 032342 032343 0 0 0 0 000000032343
FT2RQ 032342 032343 0 0 0 0 000000032343
FT3 032342 032343 0 0 0 0 000000032343
FT9 032343 032343 0 0 0 0 000000032343
ET0 032343 032343 0 0 0 0 000000032343
ST1A 032343 032343 0 0 0 0 000000032343
ST9 032343 032343 0 0 0 0 000000032343
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 257
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0414
*032343 CAME 6,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032343 032343 0 0 312300033502 0 000000000001
IT1 032343 0 0 0 312300033502 0 000000000001
AT3 032343 0 0 0 000000033502 0 312300033502
AT6 032343 033502 0 0 000000033502 0 312300033502
FT0 032343 033502 0 0 000000000001 0 312300033502
FT1A 032343 033502 0 0 000000000001 0 000000000001
FT2 032343 033502 0 0 0 0 000000000001
FT2RQ 032343 033502 0 0 000000000001 0 000000000001
FT3 032343 033502 0 0 000000000001 0 000000000001
FT9 032344 033502 0 0 000000000001 0 000000000001
ET0 032345 033502 0 0 0 0 000000000001
ST1A 032345 033502 0 0 0 0 000000000001
ST9 032345 033502 0 0 0 0 000000000001
*032345 JUMPA 0,032346
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032345 032345 0 0 324000032346 0 000000032346
IT1 032345 0 0 0 324000032346 0 000000032346
AT3 032345 0 0 0 000000032346 0 324000032346
AT6 032345 032346 0 0 000000032346 0 324000032346
FT1A 032345 032346 0 0 000000032346 0 000000032346
FT2 032345 032346 0 0 0 0 000000032346
FT2RQ 032345 032346 0 0 0 0 000000032346
FT3 032345 032346 0 0 0 0 000000032346
FT9 032346 032346 0 0 0 0 000000032346
ET0 032346 032346 0 0 0 0 000000032346
ST1A 032346 032346 0 0 0 0 000000032346
ST9 032346 032346 0 0 0 0 000000032346
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 258
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0415
*032346 CAME 5,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032346 032346 0 0 312240033502 0 000000000001
IT1 032346 0 0 0 312240033502 0 000000000001
AT3 032346 0 0 0 000000033502 0 312240033502
AT6 032346 033502 0 0 000000033502 0 312240033502
FT0 032346 033502 0 0 000000000001 0 312240033502
FT1A 032346 033502 0 0 000000000001 0 000000000001
FT2 032346 033502 0 0 0 0 000000000001
FT2RQ 032346 033502 0 0 000000000001 0 000000000001
FT3 032346 033502 0 0 000000000001 0 000000000001
FT9 032347 033502 0 0 000000000001 0 000000000001
ET0 032350 033502 0 0 0 0 000000000001
ST1A 032350 033502 0 0 0 0 000000000001
ST9 032350 033502 0 0 0 0 000000000001
*032350 JUMPA 0,032351
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032350 032350 0 0 324000032351 0 000000032351
IT1 032350 0 0 0 324000032351 0 000000032351
AT3 032350 0 0 0 000000032351 0 324000032351
AT6 032350 032351 0 0 000000032351 0 324000032351
FT1A 032350 032351 0 0 000000032351 0 000000032351
FT2 032350 032351 0 0 0 0 000000032351
FT2RQ 032350 032351 0 0 0 0 000000032351
FT3 032350 032351 0 0 0 0 000000032351
FT9 032351 032351 0 0 0 0 000000032351
ET0 032351 032351 0 0 0 0 000000032351
ST1A 032351 032351 0 0 0 0 000000032351
ST9 032351 032351 0 0 0 0 000000032351
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 259
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0416
*032351 MOVE 4,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032351 032351 0 0 200200033474 0 707070707070
IT1 032351 0 0 0 200200033474 0 707070707070
AT3 032351 0 0 0 000000033474 0 200200033474
AT6 032351 033474 0 0 000000033474 0 200200033474
FT0 032351 033474 0 0 707070707070 0 200200033474
FT1A 032351 033474 0 0 707070707070 0 707070707070
FT9 032352 033474 0 0 707070707070 0 707070707070
ET0 032352 033474 0 0 707070707070 0 707070707070
ST1 032352 033474 0 0 707070707070 0 707070707070
ST2 032352 033474 0 0 707070707070 0 707070707070
ST9 032352 033474 0 0 707070707070 0 707070707070
*032352 HRROI 5,777776
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032352 032352 0 0 561240777776 0 000000777776
IT1 032352 0 0 0 561240777776 0 000000777776
AT3 032352 0 0 0 000000777776 0 561240777776
AT6 032352 777776 0 0 000000777776 0 561240777776
FT1A 032352 777776 0 0 000000777776 0 000000777776
FT9 032353 777776 0 0 000000777776 0 000000777776
ET0 032353 777776 0 0 777777777776 0 000000777776
ST1 032353 777776 0 0 777777777776 0 000000777776
ST2 032353 777776 0 0 777777777776 0 000000777776
ST9 032353 777776 0 0 777777777776 0 000000777776
*032353 AOSLE 4,000005
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032353 032353 0 0 353200000005 0 777777777776
IT1 032353 0 0 0 353200000005 0 777777777776
AT3 032353 0 0 0 000000000005 0 353200000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 260
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0417
AT6 032353 000005 0 0 000000000005 0 353200000005
FT0 032353 000005 0 0 777777777776 0 353200000005
FT1A 032353 000005 0 0 777777777776 0 777777777776
FT9 032354 000005 0 0 777777777776 0 777777777776
ET0 032355 000005 0 0 777777777777 0 777777777776
ST1 032355 000005 0 0 777777777777 0 777777777776
ST2 032355 000005 0 0 777777777777 0 777777777776
ST5 032355 000005 0 0 777777777777 0 777777777776
ST6A 032355 000005 0 0 777777777777 0 777777777776
ST9 032355 000005 0 0 777777777777 0 777777777776
*032355 JUMPA 0,032356
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032355 032355 0 0 324000032356 0 000000032356
IT1 032355 0 0 0 324000032356 0 000000032356
AT3 032355 0 0 0 000000032356 0 324000032356
AT6 032355 032356 0 0 000000032356 0 324000032356
FT1A 032355 032356 0 0 000000032356 0 000000032356
FT2 032355 032356 0 0 0 0 000000032356
FT2RQ 032355 032356 0 0 0 0 000000032356
FT3 032355 032356 0 0 0 0 000000032356
FT9 032356 032356 0 0 0 0 000000032356
ET0 032356 032356 0 0 0 0 000000032356
ST1A 032356 032356 0 0 0 0 000000032356
ST9 032356 032356 0 0 0 0 000000032356
*032356 CAME 5,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032356 032356 0 0 312240033462 0 777777777777
IT1 032356 0 0 0 312240033462 0 777777777777
AT3 032356 0 0 0 000000033462 0 312240033462
AT6 032356 033462 0 0 000000033462 0 312240033462
FT0 032356 033462 0 0 777777777777 0 312240033462
FT1A 032356 033462 0 0 777777777777 0 777777777777
FT2 032356 033462 0 0 0 0 777777777777
FT2RQ 032356 033462 0 0 777777777777 0 777777777777
FT3 032356 033462 0 0 777777777777 0 777777777777
FT9 032357 033462 0 0 777777777777 0 777777777777
ET0 032360 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 261
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0418
ST1A 032360 033462 0 0 0 0 777777777777
ST9 032360 033462 0 0 0 0 777777777777
*032360 JUMPA 0,032361
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032360 032360 0 0 324000032361 0 000000032361
IT1 032360 0 0 0 324000032361 0 000000032361
AT3 032360 0 0 0 000000032361 0 324000032361
AT6 032360 032361 0 0 000000032361 0 324000032361
FT1A 032360 032361 0 0 000000032361 0 000000032361
FT2 032360 032361 0 0 0 0 000000032361
FT2RQ 032360 032361 0 0 0 0 000000032361
FT3 032360 032361 0 0 0 0 000000032361
FT9 032361 032361 0 0 0 0 000000032361
ET0 032361 032361 0 0 0 0 000000032361
ST1A 032361 032361 0 0 0 0 000000032361
ST9 032361 032361 0 0 0 0 000000032361
*032361 CAME 4,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032361 032361 0 0 312200033462 0 777777777777
IT1 032361 0 0 0 312200033462 0 777777777777
AT3 032361 0 0 0 000000033462 0 312200033462
AT6 032361 033462 0 0 000000033462 0 312200033462
FT0 032361 033462 0 0 777777777777 0 312200033462
FT1A 032361 033462 0 0 777777777777 0 777777777777
FT2 032361 033462 0 0 0 0 777777777777
FT2RQ 032361 033462 0 0 777777777777 0 777777777777
FT3 032361 033462 0 0 777777777777 0 777777777777
FT9 032362 033462 0 0 777777777777 0 777777777777
ET0 032363 033462 0 0 0 0 777777777777
ST1A 032363 033462 0 0 0 0 777777777777
ST9 032363 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 262
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0419
*032363 JUMPA 0,032364
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032363 032363 0 0 324000032364 0 000000032364
IT1 032363 0 0 0 324000032364 0 000000032364
AT3 032363 0 0 0 000000032364 0 324000032364
AT6 032363 032364 0 0 000000032364 0 324000032364
FT1A 032363 032364 0 0 000000032364 0 000000032364
FT2 032363 032364 0 0 0 0 000000032364
FT2RQ 032363 032364 0 0 0 0 000000032364
FT3 032363 032364 0 0 0 0 000000032364
FT9 032364 032364 0 0 0 0 000000032364
ET0 032364 032364 0 0 0 0 000000032364
ST1A 032364 032364 0 0 0 0 000000032364
ST9 032364 032364 0 0 0 0 000000032364
*032364 MOVE 4,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032364 032364 0 0 200200033474 0 707070707070
IT1 032364 0 0 0 200200033474 0 707070707070
AT3 032364 0 0 0 000000033474 0 200200033474
AT6 032364 033474 0 0 000000033474 0 200200033474
FT0 032364 033474 0 0 707070707070 0 200200033474
FT1A 032364 033474 0 0 707070707070 0 707070707070
FT9 032365 033474 0 0 707070707070 0 707070707070
ET0 032365 033474 0 0 707070707070 0 707070707070
ST1 032365 033474 0 0 707070707070 0 707070707070
ST2 032365 033474 0 0 707070707070 0 707070707070
ST9 032365 033474 0 0 707070707070 0 707070707070
*032365 SETOM 5,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032365 032365 0 0 476240000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 263
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0420
IT1 032365 0 0 0 476240000000 0 0
AT3 032365 0 0 0 0 0 476240000000
AT6 032365 0 0 0 0 0 476240000000
FT1A 032365 0 0 0 0 0 0
FT9 032366 0 0 0 0 0 0
ET0 032366 0 0 0 777777777777 0 0
ST6 032366 0 0 0 777777777777 0 0
ST6A 032366 0 0 0 777777777777 0 0
ST9 032366 0 0 0 777777777777 0 0
*032366 AOSLE 4,000005
INITIAL
C(AC)=707070 707070
C(E)=777777 777777
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032366 032366 0 0 353200000005 0 777777777777
IT1 032366 0 0 0 353200000005 0 777777777777
AT3 032366 0 0 0 000000000005 0 353200000005
AT6 032366 000005 0 0 000000000005 0 353200000005
FT0 032366 000005 0 0 777777777777 0 353200000005
FT1A 032366 000005 0 0 777777777777 0 777777777777
FT9 032367 000005 0 0 777777777777 0 777777777777
ET0 032370 000005 0 0 0 0 777777777777
ST1 032370 000005 0 0 0 0 777777777777
ST2 032370 000005 0 0 0 0 777777777777
ST5 032370 000005 0 0 0 0 777777777777
ST6A 032370 000005 0 0 0 0 777777777777
ST9 032370 000005 0 0 0 0 777777777777
*032370 JUMPA 0,032371
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032370 032370 0 0 324000032371 0 000000032371
IT1 032370 0 0 0 324000032371 0 000000032371
AT3 032370 0 0 0 000000032371 0 324000032371
AT6 032370 032371 0 0 000000032371 0 324000032371
FT1A 032370 032371 0 0 000000032371 0 000000032371
FT2 032370 032371 0 0 0 0 000000032371
FT2RQ 032370 032371 0 0 777777777777 0 000000032371
FT3 032370 032371 0 0 777777777777 0 000000032371
FT9 032371 032371 0 0 777777777777 0 000000032371
ET0 032371 032371 0 0 777777777777 0 000000032371
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 264
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0421
ST1A 032371 032371 0 0 777777777777 0 000000032371
ST9 032371 032371 0 0 777777777777 0 000000032371
*032371 CAME 5,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032371 032371 0 0 312240033501 0 0
IT1 032371 0 0 0 312240033501 0 0
AT3 032371 0 0 0 000000033501 0 312240033501
AT6 032371 033501 0 0 000000033501 0 312240033501
FT0 032371 033501 0 0 0 0 312240033501
FT1A 032371 033501 0 0 0 0 0
FT2 032371 033501 0 0 0 0 0
FT2RQ 032371 033501 0 0 0 0 0
FT3 032371 033501 0 0 0 0 0
FT9 032372 033501 0 0 0 0 0
ET0 032373 033501 0 0 0 0 0
ST1A 032373 033501 0 0 0 0 0
ST9 032373 033501 0 0 0 0 0
*032373 JUMPA 0,032374
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032373 032373 0 0 324000032374 0 000000032374
IT1 032373 0 0 0 324000032374 0 000000032374
AT3 032373 0 0 0 000000032374 0 324000032374
AT6 032373 032374 0 0 000000032374 0 324000032374
FT1A 032373 032374 0 0 000000032374 0 000000032374
FT2 032373 032374 0 0 0 0 000000032374
FT2RQ 032373 032374 0 0 777777777777 0 000000032374
FT3 032373 032374 0 0 777777777777 0 000000032374
FT9 032374 032374 0 0 777777777777 0 000000032374
ET0 032374 032374 0 0 777777777777 0 000000032374
ST1A 032374 032374 0 0 777777777777 0 000000032374
ST9 032374 032374 0 0 777777777777 0 000000032374
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 265
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0422
*032374 CAME 4,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032374 032374 0 0 312200033501 0 0
IT1 032374 0 0 0 312200033501 0 0
AT3 032374 0 0 0 000000033501 0 312200033501
AT6 032374 033501 0 0 000000033501 0 312200033501
FT0 032374 033501 0 0 0 0 312200033501
FT1A 032374 033501 0 0 0 0 0
FT2 032374 033501 0 0 0 0 0
FT2RQ 032374 033501 0 0 0 0 0
FT3 032374 033501 0 0 0 0 0
FT9 032375 033501 0 0 0 0 0
ET0 032376 033501 0 0 0 0 0
ST1A 032376 033501 0 0 0 0 0
ST9 032376 033501 0 0 0 0 0
*032376 JUMPA 0,032377
INITIAL
C(AC)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032376 032376 0 0 324000032377 0 000000032377
IT1 032376 0 0 0 324000032377 0 000000032377
AT3 032376 0 0 0 000000032377 0 324000032377
AT6 032376 032377 0 0 000000032377 0 324000032377
FT1A 032376 032377 0 0 000000032377 0 000000032377
FT2 032376 032377 0 0 0 0 000000032377
FT2RQ 032376 032377 0 0 777777777777 0 000000032377
FT3 032376 032377 0 0 777777777777 0 000000032377
FT9 032377 032377 0 0 777777777777 0 000000032377
ET0 032377 032377 0 0 777777777777 0 000000032377
ST1A 032377 032377 0 0 777777777777 0 000000032377
ST9 032377 032377 0 0 777777777777 0 000000032377
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 266
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0423
*032377 MOVE 4,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032377 032377 0 0 200200033474 0 707070707070
IT1 032377 0 0 0 200200033474 0 707070707070
AT3 032377 0 0 0 000000033474 0 200200033474
AT6 032377 033474 0 0 000000033474 0 200200033474
FT0 032377 033474 0 0 707070707070 0 200200033474
FT1A 032377 033474 0 0 707070707070 0 707070707070
FT9 0 033474 0 0 707070707070 0 707070707070
ET0 0 033474 0 0 707070707070 0 707070707070
ST1 0 033474 0 0 707070707070 0 707070707070
ST2 0 033474 0 0 707070707070 0 707070707070
ST9 0 033474 0 0 707070707070 0 707070707070
*032400 SETZ 0,000005
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 400000000005 0 000000000005
IT1 0 0 0 0 400000000005 0 000000000005
AT3 0 0 0 0 000000000005 0 400000000005
AT6 0 000005 0 0 000000000005 0 400000000005
FT1A 0 000005 0 0 000000000005 0 000000000005
FT9 032401 000005 0 0 000000000005 0 000000000005
ET0 032401 000005 0 0 0 0 000000000005
ST1 032401 000005 0 0 0 0 000000000005
ST2 032401 000005 0 0 0 0 000000000005
ST9 032401 000005 0 0 0 0 000000000005
*032401 AOSLE 4,000005
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=000000 000001
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032401 032401 0 0 353200000005 0 0
IT1 032401 0 0 0 353200000005 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 267
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0424
AT3 032401 0 0 0 000000000005 0 353200000005
AT6 032401 000005 0 0 000000000005 0 353200000005
FT0 032401 000005 0 0 0 0 353200000005
FT1A 032401 000005 0 0 0 0 0
FT9 032402 000005 0 0 0 0 0
ET0 032402 000005 0 0 000000000001 0 0
ST1 032402 000005 0 0 000000000001 0 0
ST2 032402 000005 0 0 000000000001 0 0
ST5 032402 000005 0 0 000000000001 0 0
ST6A 032402 000005 0 0 000000000001 0 0
ST9 032402 000005 0 0 000000000001 0 0
*032402 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 032402 032402 0 0 334000000000 0 0
IT1 032402 0 0 0 334000000000 0 0
AT3 032402 0 0 0 0 0 334000000000
AT6 032402 0 0 0 0 0 334000000000
FT0 032402 0 0 0 0 0 334000000000
FT1A 032402 0 0 0 0 0 0
FT9 032403 0 0 0 0 0 0
ET0 032404 0 0 0 0 0 0
ST1A 032404 0 0 0 0 0 0
ST9 032404 0 0 0 0 0 0
*032404 JUMPA 0,032405
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032404 032404 0 0 324000032405 0 000000032405
IT1 032404 0 0 0 324000032405 0 000000032405
AT3 032404 0 0 0 000000032405 0 324000032405
AT6 032404 032405 0 0 000000032405 0 324000032405
FT1A 032404 032405 0 0 000000032405 0 000000032405
FT2 032404 032405 0 0 0 0 000000032405
FT2RQ 032404 032405 0 0 0 0 000000032405
FT3 032404 032405 0 0 0 0 000000032405
FT9 032405 032405 0 0 0 0 000000032405
ET0 032405 032405 0 0 0 0 000000032405
ST1A 032405 032405 0 0 0 0 000000032405
ST9 032405 032405 0 0 0 0 000000032405
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 268
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0425
*032405 CAME 5,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032405 032405 0 0 312240033502 0 000000000001
IT1 032405 0 0 0 312240033502 0 000000000001
AT3 032405 0 0 0 000000033502 0 312240033502
AT6 032405 033502 0 0 000000033502 0 312240033502
FT0 032405 033502 0 0 000000000001 0 312240033502
FT1A 032405 033502 0 0 000000000001 0 000000000001
FT2 032405 033502 0 0 0 0 000000000001
FT2RQ 032405 033502 0 0 000000000001 0 000000000001
FT3 032405 033502 0 0 000000000001 0 000000000001
FT9 032406 033502 0 0 000000000001 0 000000000001
ET0 032407 033502 0 0 0 0 000000000001
ST1A 032407 033502 0 0 0 0 000000000001
ST9 032407 033502 0 0 0 0 000000000001
*032407 JUMPA 0,032410
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032407 032407 0 0 324000032410 0 000000032410
IT1 032407 0 0 0 324000032410 0 000000032410
AT3 032407 0 0 0 000000032410 0 324000032410
AT6 032407 032410 0 0 000000032410 0 324000032410
FT1A 032407 032410 0 0 000000032410 0 000000032410
FT2 032407 032410 0 0 0 0 000000032410
FT2RQ 032407 032410 0 0 0 0 000000032410
FT3 032407 032410 0 0 0 0 000000032410
FT9 032410 032410 0 0 0 0 000000032410
ET0 032410 032410 0 0 0 0 000000032410
ST1A 032410 032410 0 0 0 0 000000032410
ST9 032410 032410 0 0 0 0 000000032410
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 269
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0426
*032410 CAME 4,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032410 032410 0 0 312200033502 0 000000000001
IT1 032410 0 0 0 312200033502 0 000000000001
AT3 032410 0 0 0 000000033502 0 312200033502
AT6 032410 033502 0 0 000000033502 0 312200033502
FT0 032410 033502 0 0 000000000001 0 312200033502
FT1A 032410 033502 0 0 000000000001 0 000000000001
FT2 032410 033502 0 0 0 0 000000000001
FT2RQ 032410 033502 0 0 000000000001 0 000000000001
FT3 032410 033502 0 0 000000000001 0 000000000001
FT9 032411 033502 0 0 000000000001 0 000000000001
ET0 032412 033502 0 0 0 0 000000000001
ST1A 032412 033502 0 0 0 0 000000000001
ST9 032412 033502 0 0 0 0 000000000001
*032412 JUMPA 0,032413
INITIAL
C(AC)=000000 000000
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 0 0 000000032413
FT3 032412 032413 0 0 0 0 000000032413
FT9 032413 032413 0 0 0 0 000000032413
ET0 032413 032413 0 0 0 0 000000032413
ST1A 032413 032413 0 0 0 0 000000032413
ST9 032413 032413 0 0 0 0 000000032413
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 270
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0427
*032413 MOVE 3,033474
INITIAL
C(AC)=777777 777776
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032413 032413 0 0 200140033474 0 707070707070
IT1 032413 0 0 0 200140033474 0 707070707070
AT3 032413 0 0 0 000000033474 0 200140033474
AT6 032413 033474 0 0 000000033474 0 200140033474
FT0 032413 033474 0 0 707070707070 0 200140033474
FT1A 032413 033474 0 0 707070707070 0 707070707070
FT9 032414 033474 0 0 707070707070 0 707070707070
ET0 032414 033474 0 0 707070707070 0 707070707070
ST1 032414 033474 0 0 707070707070 0 707070707070
ST2 032414 033474 0 0 707070707070 0 707070707070
ST9 032414 033474 0 0 707070707070 0 707070707070
*032414 HRROI 4,777776
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032414 032414 0 0 561200777776 0 000000777776
IT1 032414 0 0 0 561200777776 0 000000777776
AT3 032414 0 0 0 000000777776 0 561200777776
AT6 032414 777776 0 0 000000777776 0 561200777776
FT1A 032414 777776 0 0 000000777776 0 000000777776
FT9 032415 777776 0 0 000000777776 0 000000777776
ET0 032415 777776 0 0 777777777776 0 000000777776
ST1 032415 777776 0 0 777777777776 0 000000777776
ST2 032415 777776 0 0 777777777776 0 000000777776
ST9 032415 777776 0 0 777777777776 0 000000777776
*032415 AOSA 3,000004
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032415 032415 0 0 354140000004 0 777777777776
IT1 032415 0 0 0 354140000004 0 777777777776
AT3 032415 0 0 0 000000000004 0 354140000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 271
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0428
AT6 032415 000004 0 0 000000000004 0 354140000004
FT0 032415 000004 0 0 777777777776 0 354140000004
FT1A 032415 000004 0 0 777777777776 0 777777777776
FT9 032416 000004 0 0 777777777776 0 777777777776
ET0 032417 000004 0 0 777777777777 0 777777777776
ST1 032417 000004 0 0 777777777777 0 777777777776
ST2 032417 000004 0 0 777777777777 0 777777777776
ST5 032417 000004 0 0 777777777777 0 777777777776
ST6A 032417 000004 0 0 777777777777 0 777777777776
ST9 032417 000004 0 0 777777777777 0 777777777776
*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
*032420 CAME 4,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032420 032420 0 0 312200033462 0 777777777777
IT1 032420 0 0 0 312200033462 0 777777777777
AT3 032420 0 0 0 000000033462 0 312200033462
AT6 032420 033462 0 0 000000033462 0 312200033462
FT0 032420 033462 0 0 777777777777 0 312200033462
FT1A 032420 033462 0 0 777777777777 0 777777777777
FT2 032420 033462 0 0 0 0 777777777777
FT2RQ 032420 033462 0 0 777777777777 0 777777777777
FT3 032420 033462 0 0 777777777777 0 777777777777
FT9 032421 033462 0 0 777777777777 0 777777777777
ET0 032422 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 272
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0429
ST1A 032422 033462 0 0 0 0 777777777777
ST9 032422 033462 0 0 0 0 777777777777
*032422 JUMPA 0,032423
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032422 032422 0 0 324000032423 0 000000032423
IT1 032422 0 0 0 324000032423 0 000000032423
AT3 032422 0 0 0 000000032423 0 324000032423
AT6 032422 032423 0 0 000000032423 0 324000032423
FT1A 032422 032423 0 0 000000032423 0 000000032423
FT2 032422 032423 0 0 0 0 000000032423
FT2RQ 032422 032423 0 0 0 0 000000032423
FT3 032422 032423 0 0 0 0 000000032423
FT9 032423 032423 0 0 0 0 000000032423
ET0 032423 032423 0 0 0 0 000000032423
ST1A 032423 032423 0 0 0 0 000000032423
ST9 032423 032423 0 0 0 0 000000032423
*032423 CAME 3,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032423 032423 0 0 312140033462 0 777777777777
IT1 032423 0 0 0 312140033462 0 777777777777
AT3 032423 0 0 0 000000033462 0 312140033462
AT6 032423 033462 0 0 000000033462 0 312140033462
FT0 032423 033462 0 0 777777777777 0 312140033462
FT1A 032423 033462 0 0 777777777777 0 777777777777
FT2 032423 033462 0 0 0 0 777777777777
FT2RQ 032423 033462 0 0 777777777777 0 777777777777
FT3 032423 033462 0 0 777777777777 0 777777777777
FT9 032424 033462 0 0 777777777777 0 777777777777
ET0 032425 033462 0 0 0 0 777777777777
ST1A 032425 033462 0 0 0 0 777777777777
ST9 032425 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 273
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0430
*032425 JUMPA 0,032426
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032425 032425 0 0 324000032426 0 000000032426
IT1 032425 0 0 0 324000032426 0 000000032426
AT3 032425 0 0 0 000000032426 0 324000032426
AT6 032425 032426 0 0 000000032426 0 324000032426
FT1A 032425 032426 0 0 000000032426 0 000000032426
FT2 032425 032426 0 0 0 0 000000032426
FT2RQ 032425 032426 0 0 0 0 000000032426
FT3 032425 032426 0 0 0 0 000000032426
FT9 032426 032426 0 0 0 0 000000032426
ET0 032426 032426 0 0 0 0 000000032426
ST1A 032426 032426 0 0 0 0 000000032426
ST9 032426 032426 0 0 0 0 000000032426
*032426 MOVE 3,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032426 032426 0 0 200140033474 0 707070707070
IT1 032426 0 0 0 200140033474 0 707070707070
AT3 032426 0 0 0 000000033474 0 200140033474
AT6 032426 033474 0 0 000000033474 0 200140033474
FT0 032426 033474 0 0 707070707070 0 200140033474
FT1A 032426 033474 0 0 707070707070 0 707070707070
FT9 032427 033474 0 0 707070707070 0 707070707070
ET0 032427 033474 0 0 707070707070 0 707070707070
ST1 032427 033474 0 0 707070707070 0 707070707070
ST2 032427 033474 0 0 707070707070 0 707070707070
ST9 032427 033474 0 0 707070707070 0 707070707070
*032427 SETO 4,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032427 032427 0 0 474200000000 0 0
IT1 032427 0 0 0 474200000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 274
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0431
AT3 032427 0 0 0 0 0 474200000000
AT6 032427 0 0 0 0 0 474200000000
FT1A 032427 0 0 0 0 0 0
FT9 032430 0 0 0 0 0 0
ET0 032430 0 0 0 777777777777 0 0
ST1 032430 0 0 0 777777777777 0 0
ST2 032430 0 0 0 777777777777 0 0
ST9 032430 0 0 0 777777777777 0 0
*032430 AOSA 3,000004
INITIAL
C(AC)=707070 707070
C(E)=777777 777777
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032430 032430 0 0 354140000004 0 777777777777
IT1 032430 0 0 0 354140000004 0 777777777777
AT3 032430 0 0 0 000000000004 0 354140000004
AT6 032430 000004 0 0 000000000004 0 354140000004
FT0 032430 000004 0 0 777777777777 0 354140000004
FT1A 032430 000004 0 0 777777777777 0 777777777777
FT9 032431 000004 0 0 777777777777 0 777777777777
ET0 032432 000004 0 0 0 0 777777777777
ST1 032432 000004 0 0 0 0 777777777777
ST2 032432 000004 0 0 0 0 777777777777
ST5 032432 000004 0 0 0 0 777777777777
ST6A 032432 000004 0 0 0 0 777777777777
ST9 032432 000004 0 0 0 0 777777777777
*032432 JUMPA 0,032433
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032432 032432 0 0 324000032433 0 000000032433
IT1 032432 0 0 0 324000032433 0 000000032433
AT3 032432 0 0 0 000000032433 0 324000032433
AT6 032432 032433 0 0 000000032433 0 324000032433
FT1A 032432 032433 0 0 000000032433 0 000000032433
FT2 032432 032433 0 0 0 0 000000032433
FT2RQ 032432 032433 0 0 0 0 000000032433
FT3 032432 032433 0 0 0 0 000000032433
FT9 032433 032433 0 0 0 0 000000032433
ET0 032433 032433 0 0 0 0 000000032433
ST1A 032433 032433 0 0 0 0 000000032433
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 275
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0432
ST9 032433 032433 0 0 0 0 000000032433
*032433 CAME 4,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032433 032433 0 0 312200033501 0 0
IT1 032433 0 0 0 312200033501 0 0
AT3 032433 0 0 0 000000033501 0 312200033501
AT6 032433 033501 0 0 000000033501 0 312200033501
FT0 032433 033501 0 0 0 0 312200033501
FT1A 032433 033501 0 0 0 0 0
FT2 032433 033501 0 0 0 0 0
FT2RQ 032433 033501 0 0 0 0 0
FT3 032433 033501 0 0 0 0 0
FT9 032434 033501 0 0 0 0 0
ET0 032435 033501 0 0 0 0 0
ST1A 032435 033501 0 0 0 0 0
ST9 032435 033501 0 0 0 0 0
*032435 JUMPA 0,032436
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032435 032435 0 0 324000032436 0 000000032436
IT1 032435 0 0 0 324000032436 0 000000032436
AT3 032435 0 0 0 000000032436 0 324000032436
AT6 032435 032436 0 0 000000032436 0 324000032436
FT1A 032435 032436 0 0 000000032436 0 000000032436
FT2 032435 032436 0 0 0 0 000000032436
FT2RQ 032435 032436 0 0 0 0 000000032436
FT3 032435 032436 0 0 0 0 000000032436
FT9 032436 032436 0 0 0 0 000000032436
ET0 032436 032436 0 0 0 0 000000032436
ST1A 032436 032436 0 0 0 0 000000032436
ST9 032436 032436 0 0 0 0 000000032436
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 276
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0433
*032436 CAME 3,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032436 032436 0 0 312140033501 0 0
IT1 032436 0 0 0 312140033501 0 0
AT3 032436 0 0 0 000000033501 0 312140033501
AT6 032436 033501 0 0 000000033501 0 312140033501
FT0 032436 033501 0 0 0 0 312140033501
FT1A 032436 033501 0 0 0 0 0
FT2 032436 033501 0 0 0 0 0
FT2RQ 032436 033501 0 0 0 0 0
FT3 032436 033501 0 0 0 0 0
FT9 032437 033501 0 0 0 0 0
ET0 032440 033501 0 0 0 0 0
ST1A 032440 033501 0 0 0 0 0
ST9 032440 033501 0 0 0 0 0
*032440 JUMPA 0,032441
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032440 032440 0 0 324000032441 0 000000032441
IT1 032440 0 0 0 324000032441 0 000000032441
AT3 032440 0 0 0 000000032441 0 324000032441
AT6 032440 032441 0 0 000000032441 0 324000032441
FT1A 032440 032441 0 0 000000032441 0 000000032441
FT2 032440 032441 0 0 0 0 000000032441
FT2RQ 032440 032441 0 0 0 0 000000032441
FT3 032440 032441 0 0 0 0 000000032441
FT9 032441 032441 0 0 0 0 000000032441
ET0 032441 032441 0 0 0 0 000000032441
ST1A 032441 032441 0 0 0 0 000000032441
ST9 032441 032441 0 0 0 0 000000032441
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 277
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0434
*032441 MOVE 3,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032441 032441 0 0 200140033474 0 707070707070
IT1 032441 0 0 0 200140033474 0 707070707070
AT3 032441 0 0 0 000000033474 0 200140033474
AT6 032441 033474 0 0 000000033474 0 200140033474
FT0 032441 033474 0 0 707070707070 0 200140033474
FT1A 032441 033474 0 0 707070707070 0 707070707070
FT9 032442 033474 0 0 707070707070 0 707070707070
ET0 032442 033474 0 0 707070707070 0 707070707070
ST1 032442 033474 0 0 707070707070 0 707070707070
ST2 032442 033474 0 0 707070707070 0 707070707070
ST9 032442 033474 0 0 707070707070 0 707070707070
*032442 SETZ 4,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032442 032442 0 0 400200000000 0 0
IT1 032442 0 0 0 400200000000 0 0
AT3 032442 0 0 0 0 0 400200000000
AT6 032442 0 0 0 0 0 400200000000
FT1A 032442 0 0 0 0 0 0
FT9 032443 0 0 0 0 0 0
ET0 032443 0 0 0 0 0 0
ST1 032443 0 0 0 0 0 0
ST2 032443 0 0 0 0 0 0
ST9 032443 0 0 0 0 0 0
*032443 AOSA 3,000004
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=000000 000001
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032443 032443 0 0 354140000004 0 0
IT1 032443 0 0 0 354140000004 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 278
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0435
AT3 032443 0 0 0 000000000004 0 354140000004
AT6 032443 000004 0 0 000000000004 0 354140000004
FT0 032443 000004 0 0 0 0 354140000004
FT1A 032443 000004 0 0 0 0 0
FT9 032444 000004 0 0 0 0 0
ET0 032445 000004 0 0 000000000001 0 0
ST1 032445 000004 0 0 000000000001 0 0
ST2 032445 000004 0 0 000000000001 0 0
ST5 032445 000004 0 0 000000000001 0 0
ST6A 032445 000004 0 0 000000000001 0 0
ST9 032445 000004 0 0 000000000001 0 0
*032445 JUMPA 0,032446
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032445 032445 0 0 324000032446 0 000000032446
IT1 032445 0 0 0 324000032446 0 000000032446
AT3 032445 0 0 0 000000032446 0 324000032446
AT6 032445 032446 0 0 000000032446 0 324000032446
FT1A 032445 032446 0 0 000000032446 0 000000032446
FT2 032445 032446 0 0 0 0 000000032446
FT2RQ 032445 032446 0 0 0 0 000000032446
FT3 032445 032446 0 0 0 0 000000032446
FT9 032446 032446 0 0 0 0 000000032446
ET0 032446 032446 0 0 0 0 000000032446
ST1A 032446 032446 0 0 0 0 000000032446
ST9 032446 032446 0 0 0 0 000000032446
*032446 CAME 4,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032446 032446 0 0 312200033502 0 000000000001
IT1 032446 0 0 0 312200033502 0 000000000001
AT3 032446 0 0 0 000000033502 0 312200033502
AT6 032446 033502 0 0 000000033502 0 312200033502
FT0 032446 033502 0 0 000000000001 0 312200033502
FT1A 032446 033502 0 0 000000000001 0 000000000001
FT2 032446 033502 0 0 0 0 000000000001
FT2RQ 032446 033502 0 0 000000000001 0 000000000001
FT3 032446 033502 0 0 000000000001 0 000000000001
FT9 032447 033502 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 279
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0436
ET0 032450 033502 0 0 0 0 000000000001
ST1A 032450 033502 0 0 0 0 000000000001
ST9 032450 033502 0 0 0 0 000000000001
*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
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 CAME 3,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032451 032451 0 0 312140033502 0 000000000001
IT1 032451 0 0 0 312140033502 0 000000000001
AT3 032451 0 0 0 000000033502 0 312140033502
AT6 032451 033502 0 0 000000033502 0 312140033502
FT0 032451 033502 0 0 000000000001 0 312140033502
FT1A 032451 033502 0 0 000000000001 0 000000000001
FT2 032451 033502 0 0 0 0 000000000001
FT2RQ 032451 033502 0 0 000000000001 0 000000000001
FT3 032451 033502 0 0 000000000001 0 000000000001
FT9 032452 033502 0 0 000000000001 0 000000000001
ET0 032453 033502 0 0 0 0 000000000001
ST1A 032453 033502 0 0 0 0 000000000001
ST9 032453 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 280
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0437
*032453 JUMPA 0,032454
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032453 032453 0 0 324000032454 0 000000032454
IT1 032453 0 0 0 324000032454 0 000000032454
AT3 032453 0 0 0 000000032454 0 324000032454
AT6 032453 032454 0 0 000000032454 0 324000032454
FT1A 032453 032454 0 0 000000032454 0 000000032454
FT2 032453 032454 0 0 0 0 000000032454
FT2RQ 032453 032454 0 0 0 0 000000032454
FT3 032453 032454 0 0 0 0 000000032454
FT9 032454 032454 0 0 0 0 000000032454
ET0 032454 032454 0 0 0 0 000000032454
ST1A 032454 032454 0 0 0 0 000000032454
ST9 032454 032454 0 0 0 0 000000032454
*032454 MOVE 2,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032454 032454 0 0 200100033474 0 707070707070
IT1 032454 0 0 0 200100033474 0 707070707070
AT3 032454 0 0 0 000000033474 0 200100033474
AT6 032454 033474 0 0 000000033474 0 200100033474
FT0 032454 033474 0 0 707070707070 0 200100033474
FT1A 032454 033474 0 0 707070707070 0 707070707070
FT9 032455 033474 0 0 707070707070 0 707070707070
ET0 032455 033474 0 0 707070707070 0 707070707070
ST1 032455 033474 0 0 707070707070 0 707070707070
ST2 032455 033474 0 0 707070707070 0 707070707070
ST9 032455 033474 0 0 707070707070 0 707070707070
*032455 HRROI 3,777776
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032455 032455 0 0 561140777776 0 000000777776
IT1 032455 0 0 0 561140777776 0 000000777776
AT3 032455 0 0 0 000000777776 0 561140777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 281
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0438
AT6 032455 777776 0 0 000000777776 0 561140777776
FT1A 032455 777776 0 0 000000777776 0 000000777776
FT9 032456 777776 0 0 000000777776 0 000000777776
ET0 032456 777776 0 0 777777777776 0 000000777776
ST1 032456 777776 0 0 777777777776 0 000000777776
ST2 032456 777776 0 0 777777777776 0 000000777776
ST9 032456 777776 0 0 777777777776 0 000000777776
*032456 AOSGE 2,000003
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032456 032456 0 0 355100000003 0 777777777776
IT1 032456 0 0 0 355100000003 0 777777777776
AT3 032456 0 0 0 000000000003 0 355100000003
AT6 032456 000003 0 0 000000000003 0 355100000003
FT0 032456 000003 0 0 777777777776 0 355100000003
FT1A 032456 000003 0 0 777777777776 0 777777777776
FT9 032457 000003 0 0 777777777776 0 777777777776
ET0 032457 000003 0 0 777777777777 0 777777777776
ST1 032457 000003 0 0 777777777777 0 777777777776
ST2 032457 000003 0 0 777777777777 0 777777777776
ST5 032457 000003 0 0 777777777777 0 777777777776
ST6A 032457 000003 0 0 777777777777 0 777777777776
ST9 032457 000003 0 0 777777777777 0 777777777776
*032457 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 032457 032457 0 0 334000000000 0 0
IT1 032457 0 0 0 334000000000 0 0
AT3 032457 0 0 0 0 0 334000000000
AT6 032457 0 0 0 0 0 334000000000
FT0 032457 0 0 0 0 0 334000000000
FT1A 032457 0 0 0 0 0 0
FT9 032460 0 0 0 0 0 0
ET0 032461 0 0 0 0 0 0
ST1A 032461 0 0 0 0 0 0
ST9 032461 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 282
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0439
*032461 JUMPA 0,032462
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032461 032461 0 0 324000032462 0 000000032462
IT1 032461 0 0 0 324000032462 0 000000032462
AT3 032461 0 0 0 000000032462 0 324000032462
AT6 032461 032462 0 0 000000032462 0 324000032462
FT1A 032461 032462 0 0 000000032462 0 000000032462
FT2 032461 032462 0 0 0 0 000000032462
FT2RQ 032461 032462 0 0 0 0 000000032462
FT3 032461 032462 0 0 0 0 000000032462
FT9 032462 032462 0 0 0 0 000000032462
ET0 032462 032462 0 0 0 0 000000032462
ST1A 032462 032462 0 0 0 0 000000032462
ST9 032462 032462 0 0 0 0 000000032462
*032462 CAME 3,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032462 032462 0 0 312140033462 0 777777777777
IT1 032462 0 0 0 312140033462 0 777777777777
AT3 032462 0 0 0 000000033462 0 312140033462
AT6 032462 033462 0 0 000000033462 0 312140033462
FT0 032462 033462 0 0 777777777777 0 312140033462
FT1A 032462 033462 0 0 777777777777 0 777777777777
FT2 032462 033462 0 0 0 0 777777777777
FT2RQ 032462 033462 0 0 777777777777 0 777777777777
FT3 032462 033462 0 0 777777777777 0 777777777777
FT9 032463 033462 0 0 777777777777 0 777777777777
ET0 032464 033462 0 0 0 0 777777777777
ST1A 032464 033462 0 0 0 0 777777777777
ST9 032464 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 283
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0440
*032464 JUMPA 0,032465
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032464 032464 0 0 324000032465 0 000000032465
IT1 032464 0 0 0 324000032465 0 000000032465
AT3 032464 0 0 0 000000032465 0 324000032465
AT6 032464 032465 0 0 000000032465 0 324000032465
FT1A 032464 032465 0 0 000000032465 0 000000032465
FT2 032464 032465 0 0 0 0 000000032465
FT2RQ 032464 032465 0 0 0 0 000000032465
FT3 032464 032465 0 0 0 0 000000032465
FT9 032465 032465 0 0 0 0 000000032465
ET0 032465 032465 0 0 0 0 000000032465
ST1A 032465 032465 0 0 0 0 000000032465
ST9 032465 032465 0 0 0 0 000000032465
*032465 CAME 2,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032465 032465 0 0 312100033462 0 777777777777
IT1 032465 0 0 0 312100033462 0 777777777777
AT3 032465 0 0 0 000000033462 0 312100033462
AT6 032465 033462 0 0 000000033462 0 312100033462
FT0 032465 033462 0 0 777777777777 0 312100033462
FT1A 032465 033462 0 0 777777777777 0 777777777777
FT2 032465 033462 0 0 0 0 777777777777
FT2RQ 032465 033462 0 0 777777777777 0 777777777777
FT3 032465 033462 0 0 777777777777 0 777777777777
FT9 032466 033462 0 0 777777777777 0 777777777777
ET0 032467 033462 0 0 0 0 777777777777
ST1A 032467 033462 0 0 0 0 777777777777
ST9 032467 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 284
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0441
*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
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 MOVE 2,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032470 032470 0 0 200100033474 0 707070707070
IT1 032470 0 0 0 200100033474 0 707070707070
AT3 032470 0 0 0 000000033474 0 200100033474
AT6 032470 033474 0 0 000000033474 0 200100033474
FT0 032470 033474 0 0 707070707070 0 200100033474
FT1A 032470 033474 0 0 707070707070 0 707070707070
FT9 032471 033474 0 0 707070707070 0 707070707070
ET0 032471 033474 0 0 707070707070 0 707070707070
ST1 032471 033474 0 0 707070707070 0 707070707070
ST2 032471 033474 0 0 707070707070 0 707070707070
ST9 032471 033474 0 0 707070707070 0 707070707070
*032471 SETO 3,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032471 032471 0 0 474140000000 0 0
IT1 032471 0 0 0 474140000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 285
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0442
AT3 032471 0 0 0 0 0 474140000000
AT6 032471 0 0 0 0 0 474140000000
FT1A 032471 0 0 0 0 0 0
FT9 032472 0 0 0 0 0 0
ET0 032472 0 0 0 777777777777 0 0
ST1 032472 0 0 0 777777777777 0 0
ST2 032472 0 0 0 777777777777 0 0
ST9 032472 0 0 0 777777777777 0 0
*032472 AOSGE 2,000003
INITIAL
C(AC)=707070 707070
C(E)=777777 777777
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032472 032472 0 0 355100000003 0 777777777777
IT1 032472 0 0 0 355100000003 0 777777777777
AT3 032472 0 0 0 000000000003 0 355100000003
AT6 032472 000003 0 0 000000000003 0 355100000003
FT0 032472 000003 0 0 777777777777 0 355100000003
FT1A 032472 000003 0 0 777777777777 0 777777777777
FT9 032473 000003 0 0 777777777777 0 777777777777
ET0 032474 000003 0 0 0 0 777777777777
ST1 032474 000003 0 0 0 0 777777777777
ST2 032474 000003 0 0 0 0 777777777777
ST5 032474 000003 0 0 0 0 777777777777
ST6A 032474 000003 0 0 0 0 777777777777
ST9 032474 000003 0 0 0 0 777777777777
*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
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 286
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0443
ST9 032475 032475 0 0 0 0 000000032475
*032475 CAME 3,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032475 032475 0 0 312140033501 0 0
IT1 032475 0 0 0 312140033501 0 0
AT3 032475 0 0 0 000000033501 0 312140033501
AT6 032475 033501 0 0 000000033501 0 312140033501
FT0 032475 033501 0 0 0 0 312140033501
FT1A 032475 033501 0 0 0 0 0
FT2 032475 033501 0 0 0 0 0
FT2RQ 032475 033501 0 0 0 0 0
FT3 032475 033501 0 0 0 0 0
FT9 032476 033501 0 0 0 0 0
ET0 032477 033501 0 0 0 0 0
ST1A 032477 033501 0 0 0 0 0
ST9 032477 033501 0 0 0 0 0
*032477 JUMPA 0,032500
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032477 032477 0 0 324000032500 0 000000032500
IT1 032477 0 0 0 324000032500 0 000000032500
AT3 032477 0 0 0 000000032500 0 324000032500
AT6 032477 0 0 0 000000032500 0 324000032500
FT1A 032477 0 0 0 000000032500 0 000000032500
FT2 032477 0 0 0 0 0 000000032500
FT2RQ 032477 0 0 0 0 0 000000032500
FT3 032477 0 0 0 0 0 000000032500
FT9 0 0 0 0 0 0 000000032500
ET0 0 0 0 0 0 0 000000032500
ST1A 0 0 0 0 0 0 000000032500
ST9 0 0 0 0 0 0 000000032500
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 287
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0444
*032500 CAME 2,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 312100033501 0 0
IT1 0 0 0 0 312100033501 0 0
AT3 0 0 0 0 000000033501 0 312100033501
AT6 0 033501 0 0 000000033501 0 312100033501
FT0 0 033501 0 0 0 0 312100033501
FT1A 0 033501 0 0 0 0 0
FT2 0 033501 0 0 0 0 0
FT2RQ 0 033501 0 0 0 0 0
FT3 0 033501 0 0 0 0 0
FT9 032501 033501 0 0 0 0 0
ET0 032502 033501 0 0 0 0 0
ST1A 032502 033501 0 0 0 0 0
ST9 032502 033501 0 0 0 0 0
*032502 JUMPA 0,032503
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032502 032502 0 0 324000032503 0 000000032503
IT1 032502 0 0 0 324000032503 0 000000032503
AT3 032502 0 0 0 000000032503 0 324000032503
AT6 032502 032503 0 0 000000032503 0 324000032503
FT1A 032502 032503 0 0 000000032503 0 000000032503
FT2 032502 032503 0 0 0 0 000000032503
FT2RQ 032502 032503 0 0 0 0 000000032503
FT3 032502 032503 0 0 0 0 000000032503
FT9 032503 032503 0 0 0 0 000000032503
ET0 032503 032503 0 0 0 0 000000032503
ST1A 032503 032503 0 0 0 0 000000032503
ST9 032503 032503 0 0 0 0 000000032503
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 288
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0445
*032503 MOVE 2,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032503 032503 0 0 200100033474 0 707070707070
IT1 032503 0 0 0 200100033474 0 707070707070
AT3 032503 0 0 0 000000033474 0 200100033474
AT6 032503 033474 0 0 000000033474 0 200100033474
FT0 032503 033474 0 0 707070707070 0 200100033474
FT1A 032503 033474 0 0 707070707070 0 707070707070
FT9 032504 033474 0 0 707070707070 0 707070707070
ET0 032504 033474 0 0 707070707070 0 707070707070
ST1 032504 033474 0 0 707070707070 0 707070707070
ST2 032504 033474 0 0 707070707070 0 707070707070
ST9 032504 033474 0 0 707070707070 0 707070707070
*032504 SETZ 3,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032504 032504 0 0 400140000000 0 0
IT1 032504 0 0 0 400140000000 0 0
AT3 032504 0 0 0 0 0 400140000000
AT6 032504 0 0 0 0 0 400140000000
FT1A 032504 0 0 0 0 0 0
FT9 032505 0 0 0 0 0 0
ET0 032505 0 0 0 0 0 0
ST1 032505 0 0 0 0 0 0
ST2 032505 0 0 0 0 0 0
ST9 032505 0 0 0 0 0 0
*032505 AOSGE 2,000003
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=000000 000001
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032505 032505 0 0 355100000003 0 0
IT1 032505 0 0 0 355100000003 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 289
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0446
AT3 032505 0 0 0 000000000003 0 355100000003
AT6 032505 000003 0 0 000000000003 0 355100000003
FT0 032505 000003 0 0 0 0 355100000003
FT1A 032505 000003 0 0 0 0 0
FT9 032506 000003 0 0 0 0 0
ET0 032507 000003 0 0 000000000001 0 0
ST1 032507 000003 0 0 000000000001 0 0
ST2 032507 000003 0 0 000000000001 0 0
ST5 032507 000003 0 0 000000000001 0 0
ST6A 032507 000003 0 0 000000000001 0 0
ST9 032507 000003 0 0 000000000001 0 0
*032507 JUMPA 0,032510
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032507 032507 0 0 324000032510 0 000000032510
IT1 032507 0 0 0 324000032510 0 000000032510
AT3 032507 0 0 0 000000032510 0 324000032510
AT6 032507 032510 0 0 000000032510 0 324000032510
FT1A 032507 032510 0 0 000000032510 0 000000032510
FT2 032507 032510 0 0 0 0 000000032510
FT2RQ 032507 032510 0 0 0 0 000000032510
FT3 032507 032510 0 0 0 0 000000032510
FT9 032510 032510 0 0 0 0 000000032510
ET0 032510 032510 0 0 0 0 000000032510
ST1A 032510 032510 0 0 0 0 000000032510
ST9 032510 032510 0 0 0 0 000000032510
*032510 CAME 3,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032510 032510 0 0 312140033502 0 000000000001
IT1 032510 0 0 0 312140033502 0 000000000001
AT3 032510 0 0 0 000000033502 0 312140033502
AT6 032510 033502 0 0 000000033502 0 312140033502
FT0 032510 033502 0 0 000000000001 0 312140033502
FT1A 032510 033502 0 0 000000000001 0 000000000001
FT2 032510 033502 0 0 0 0 000000000001
FT2RQ 032510 033502 0 0 000000000001 0 000000000001
FT3 032510 033502 0 0 000000000001 0 000000000001
FT9 032511 033502 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 290
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0447
ET0 032512 033502 0 0 0 0 000000000001
ST1A 032512 033502 0 0 0 0 000000000001
ST9 032512 033502 0 0 0 0 000000000001
*032512 JUMPA 0,032513
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032512 032512 0 0 324000032513 0 000000032513
IT1 032512 0 0 0 324000032513 0 000000032513
AT3 032512 0 0 0 000000032513 0 324000032513
AT6 032512 032513 0 0 000000032513 0 324000032513
FT1A 032512 032513 0 0 000000032513 0 000000032513
FT2 032512 032513 0 0 0 0 000000032513
FT2RQ 032512 032513 0 0 0 0 000000032513
FT3 032512 032513 0 0 0 0 000000032513
FT9 032513 032513 0 0 0 0 000000032513
ET0 032513 032513 0 0 0 0 000000032513
ST1A 032513 032513 0 0 0 0 000000032513
ST9 032513 032513 0 0 0 0 000000032513
*032513 CAME 2,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032513 032513 0 0 312100033502 0 000000000001
IT1 032513 0 0 0 312100033502 0 000000000001
AT3 032513 0 0 0 000000033502 0 312100033502
AT6 032513 033502 0 0 000000033502 0 312100033502
FT0 032513 033502 0 0 000000000001 0 312100033502
FT1A 032513 033502 0 0 000000000001 0 000000000001
FT2 032513 033502 0 0 0 0 000000000001
FT2RQ 032513 033502 0 0 000000000001 0 000000000001
FT3 032513 033502 0 0 000000000001 0 000000000001
FT9 032514 033502 0 0 000000000001 0 000000000001
ET0 032515 033502 0 0 0 0 000000000001
ST1A 032515 033502 0 0 0 0 000000000001
ST9 032515 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 291
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0448
*032515 JUMPA 0,032516
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032515 032515 0 0 324000032516 0 000000032516
IT1 032515 0 0 0 324000032516 0 000000032516
AT3 032515 0 0 0 000000032516 0 324000032516
AT6 032515 032516 0 0 000000032516 0 324000032516
FT1A 032515 032516 0 0 000000032516 0 000000032516
FT2 032515 032516 0 0 0 0 000000032516
FT2RQ 032515 032516 0 0 0 0 000000032516
FT3 032515 032516 0 0 0 0 000000032516
FT9 032516 032516 0 0 0 0 000000032516
ET0 032516 032516 0 0 0 0 000000032516
ST1A 032516 032516 0 0 0 0 000000032516
ST9 032516 032516 0 0 0 0 000000032516
*032516 MOVE 1,033474
INITIAL
C(AC)=000000 000001
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032516 032516 0 0 200040033474 0 707070707070
IT1 032516 0 0 0 200040033474 0 707070707070
AT3 032516 0 0 0 000000033474 0 200040033474
AT6 032516 033474 0 0 000000033474 0 200040033474
FT0 032516 033474 0 0 707070707070 0 200040033474
FT1A 032516 033474 0 0 707070707070 0 707070707070
FT9 032517 033474 0 0 707070707070 0 707070707070
ET0 032517 033474 0 0 707070707070 0 707070707070
ST1 032517 033474 0 0 707070707070 0 707070707070
ST2 032517 033474 0 0 707070707070 0 707070707070
ST9 032517 033474 0 0 707070707070 0 707070707070
*032517 HRROI 2,777776
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032517 032517 0 0 561100777776 0 000000777776
IT1 032517 0 0 0 561100777776 0 000000777776
AT3 032517 0 0 0 000000777776 0 561100777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 292
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0449
AT6 032517 777776 0 0 000000777776 0 561100777776
FT1A 032517 777776 0 0 000000777776 0 000000777776
FT9 032520 777776 0 0 000000777776 0 000000777776
ET0 032520 777776 0 0 777777777776 0 000000777776
ST1 032520 777776 0 0 777777777776 0 000000777776
ST2 032520 777776 0 0 777777777776 0 000000777776
ST9 032520 777776 0 0 777777777776 0 000000777776
*032520 AOSN 1,000002
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=777777 777777
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032520 032520 0 0 356040000002 0 777777777776
IT1 032520 0 0 0 356040000002 0 777777777776
AT3 032520 0 0 0 000000000002 0 356040000002
AT6 032520 000002 0 0 000000000002 0 356040000002
FT0 032520 000002 0 0 777777777776 0 356040000002
FT1A 032520 000002 0 0 777777777776 0 777777777776
FT9 032521 000002 0 0 777777777776 0 777777777776
ET0 032522 000002 0 0 777777777777 0 777777777776
ST1 032522 000002 0 0 777777777777 0 777777777776
ST2 032522 000002 0 0 777777777777 0 777777777776
ST5 032522 000002 0 0 777777777777 0 777777777776
ST6A 032522 000002 0 0 777777777777 0 777777777776
ST9 032522 000002 0 0 777777777777 0 777777777776
*032522 JUMPA 0,032523
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032522 032522 0 0 324000032523 0 000000032523
IT1 032522 0 0 0 324000032523 0 000000032523
AT3 032522 0 0 0 000000032523 0 324000032523
AT6 032522 032523 0 0 000000032523 0 324000032523
FT1A 032522 032523 0 0 000000032523 0 000000032523
FT2 032522 032523 0 0 0 0 000000032523
FT2RQ 032522 032523 0 0 0 0 000000032523
FT3 032522 032523 0 0 0 0 000000032523
FT9 032523 032523 0 0 0 0 000000032523
ET0 032523 032523 0 0 0 0 000000032523
ST1A 032523 032523 0 0 0 0 000000032523
ST9 032523 032523 0 0 0 0 000000032523
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 293
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0450
*032523 CAME 2,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032523 032523 0 0 312100033462 0 777777777777
IT1 032523 0 0 0 312100033462 0 777777777777
AT3 032523 0 0 0 000000033462 0 312100033462
AT6 032523 033462 0 0 000000033462 0 312100033462
FT0 032523 033462 0 0 777777777777 0 312100033462
FT1A 032523 033462 0 0 777777777777 0 777777777777
FT2 032523 033462 0 0 0 0 777777777777
FT2RQ 032523 033462 0 0 777777777777 0 777777777777
FT3 032523 033462 0 0 777777777777 0 777777777777
FT9 032524 033462 0 0 777777777777 0 777777777777
ET0 032525 033462 0 0 0 0 777777777777
ST1A 032525 033462 0 0 0 0 777777777777
ST9 032525 033462 0 0 0 0 777777777777
*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
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
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 294
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0451
*032526 CAME 1,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032526 032526 0 0 312040033462 0 777777777777
IT1 032526 0 0 0 312040033462 0 777777777777
AT3 032526 0 0 0 000000033462 0 312040033462
AT6 032526 033462 0 0 000000033462 0 312040033462
FT0 032526 033462 0 0 777777777777 0 312040033462
FT1A 032526 033462 0 0 777777777777 0 777777777777
FT2 032526 033462 0 0 0 0 777777777777
FT2RQ 032526 033462 0 0 777777777777 0 777777777777
FT3 032526 033462 0 0 777777777777 0 777777777777
FT9 032527 033462 0 0 777777777777 0 777777777777
ET0 032530 033462 0 0 0 0 777777777777
ST1A 032530 033462 0 0 0 0 777777777777
ST9 032530 033462 0 0 0 0 777777777777
*032530 JUMPA 0,032531
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032530 032530 0 0 324000032531 0 000000032531
IT1 032530 0 0 0 324000032531 0 000000032531
AT3 032530 0 0 0 000000032531 0 324000032531
AT6 032530 032531 0 0 000000032531 0 324000032531
FT1A 032530 032531 0 0 000000032531 0 000000032531
FT2 032530 032531 0 0 0 0 000000032531
FT2RQ 032530 032531 0 0 0 0 000000032531
FT3 032530 032531 0 0 0 0 000000032531
FT9 032531 032531 0 0 0 0 000000032531
ET0 032531 032531 0 0 0 0 000000032531
ST1A 032531 032531 0 0 0 0 000000032531
ST9 032531 032531 0 0 0 0 000000032531
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 295
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0452
*032531 MOVE 1,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032531 032531 0 0 200040033474 0 707070707070
IT1 032531 0 0 0 200040033474 0 707070707070
AT3 032531 0 0 0 000000033474 0 200040033474
AT6 032531 033474 0 0 000000033474 0 200040033474
FT0 032531 033474 0 0 707070707070 0 200040033474
FT1A 032531 033474 0 0 707070707070 0 707070707070
FT9 032532 033474 0 0 707070707070 0 707070707070
ET0 032532 033474 0 0 707070707070 0 707070707070
ST1 032532 033474 0 0 707070707070 0 707070707070
ST2 032532 033474 0 0 707070707070 0 707070707070
ST9 032532 033474 0 0 707070707070 0 707070707070
*032532 SETO 2,000000
INITIAL
C(AC)=777777 777777
C(E)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032532 032532 0 0 474100000000 0 0
IT1 032532 0 0 0 474100000000 0 0
AT3 032532 0 0 0 0 0 474100000000
AT6 032532 0 0 0 0 0 474100000000
FT1A 032532 0 0 0 0 0 0
FT9 032533 0 0 0 0 0 0
ET0 032533 0 0 0 777777777777 0 0
ST1 032533 0 0 0 777777777777 0 0
ST2 032533 0 0 0 777777777777 0 0
ST9 032533 0 0 0 777777777777 0 0
*032533 AOSN 1,000002
INITIAL
C(AC)=707070 707070
C(E)=777777 777777
FINAL
C(AC)=000000 000000
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032533 032533 0 0 356040000002 0 777777777777
IT1 032533 0 0 0 356040000002 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 296
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0453
AT3 032533 0 0 0 000000000002 0 356040000002
AT6 032533 000002 0 0 000000000002 0 356040000002
FT0 032533 000002 0 0 777777777777 0 356040000002
FT1A 032533 000002 0 0 777777777777 0 777777777777
FT9 032534 000002 0 0 777777777777 0 777777777777
ET0 032534 000002 0 0 0 0 777777777777
ST1 032534 000002 0 0 0 0 777777777777
ST2 032534 000002 0 0 0 0 777777777777
ST5 032534 000002 0 0 0 0 777777777777
ST6A 032534 000002 0 0 0 0 777777777777
ST9 032534 000002 0 0 0 0 777777777777
*032534 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 032534 032534 0 0 334000000000 0 0
IT1 032534 0 0 0 334000000000 0 0
AT3 032534 0 0 0 0 0 334000000000
AT6 032534 0 0 0 0 0 334000000000
FT0 032534 0 0 0 0 0 334000000000
FT1A 032534 0 0 0 0 0 0
FT9 032535 0 0 0 0 0 0
ET0 032536 0 0 0 0 0 0
ST1A 032536 0 0 0 0 0 0
ST9 032536 0 0 0 0 0 0
*032536 JUMPA 0,032537
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032536 032536 0 0 324000032537 0 000000032537
IT1 032536 0 0 0 324000032537 0 000000032537
AT3 032536 0 0 0 000000032537 0 324000032537
AT6 032536 032537 0 0 000000032537 0 324000032537
FT1A 032536 032537 0 0 000000032537 0 000000032537
FT2 032536 032537 0 0 0 0 000000032537
FT2RQ 032536 032537 0 0 0 0 000000032537
FT3 032536 032537 0 0 0 0 000000032537
FT9 032537 032537 0 0 0 0 000000032537
ET0 032537 032537 0 0 0 0 000000032537
ST1A 032537 032537 0 0 0 0 000000032537
ST9 032537 032537 0 0 0 0 000000032537
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 297
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0454
*032537 CAME 2,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032537 032537 0 0 312100033501 0 0
IT1 032537 0 0 0 312100033501 0 0
AT3 032537 0 0 0 000000033501 0 312100033501
AT6 032537 033501 0 0 000000033501 0 312100033501
FT0 032537 033501 0 0 0 0 312100033501
FT1A 032537 033501 0 0 0 0 0
FT2 032537 033501 0 0 0 0 0
FT2RQ 032537 033501 0 0 0 0 0
FT3 032537 033501 0 0 0 0 0
FT9 032540 033501 0 0 0 0 0
ET0 032541 033501 0 0 0 0 0
ST1A 032541 033501 0 0 0 0 0
ST9 032541 033501 0 0 0 0 0
*032541 JUMPA 0,032542
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032541 032541 0 0 324000032542 0 000000032542
IT1 032541 0 0 0 324000032542 0 000000032542
AT3 032541 0 0 0 000000032542 0 324000032542
AT6 032541 032542 0 0 000000032542 0 324000032542
FT1A 032541 032542 0 0 000000032542 0 000000032542
FT2 032541 032542 0 0 0 0 000000032542
FT2RQ 032541 032542 0 0 0 0 000000032542
FT3 032541 032542 0 0 0 0 000000032542
FT9 032542 032542 0 0 0 0 000000032542
ET0 032542 032542 0 0 0 0 000000032542
ST1A 032542 032542 0 0 0 0 000000032542
ST9 032542 032542 0 0 0 0 000000032542
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 298
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0455
*032542 CAME 1,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032542 032542 0 0 312040033501 0 0
IT1 032542 0 0 0 312040033501 0 0
AT3 032542 0 0 0 000000033501 0 312040033501
AT6 032542 033501 0 0 000000033501 0 312040033501
FT0 032542 033501 0 0 0 0 312040033501
FT1A 032542 033501 0 0 0 0 0
FT2 032542 033501 0 0 0 0 0
FT2RQ 032542 033501 0 0 0 0 0
FT3 032542 033501 0 0 0 0 0
FT9 032543 033501 0 0 0 0 0
ET0 032544 033501 0 0 0 0 0
ST1A 032544 033501 0 0 0 0 0
ST9 032544 033501 0 0 0 0 0
*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 28-DEC-78 PAGE 299
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0456
*032545 MOVE 1,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032545 032545 0 0 200040033474 0 707070707070
IT1 032545 0 0 0 200040033474 0 707070707070
AT3 032545 0 0 0 000000033474 0 200040033474
AT6 032545 033474 0 0 000000033474 0 200040033474
FT0 032545 033474 0 0 707070707070 0 200040033474
FT1A 032545 033474 0 0 707070707070 0 707070707070
FT9 032546 033474 0 0 707070707070 0 707070707070
ET0 032546 033474 0 0 707070707070 0 707070707070
ST1 032546 033474 0 0 707070707070 0 707070707070
ST2 032546 033474 0 0 707070707070 0 707070707070
ST9 032546 033474 0 0 707070707070 0 707070707070
*032546 SETZ 2,000000
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032546 032546 0 0 400100000000 0 0
IT1 032546 0 0 0 400100000000 0 0
AT3 032546 0 0 0 0 0 400100000000
AT6 032546 0 0 0 0 0 400100000000
FT1A 032546 0 0 0 0 0 0
FT9 032547 0 0 0 0 0 0
ET0 032547 0 0 0 0 0 0
ST1 032547 0 0 0 0 0 0
ST2 032547 0 0 0 0 0 0
ST9 032547 0 0 0 0 0 0
*032547 AOSN 1,000002
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=000000 000001
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032547 032547 0 0 356040000002 0 0
IT1 032547 0 0 0 356040000002 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 300
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0457
AT3 032547 0 0 0 000000000002 0 356040000002
AT6 032547 000002 0 0 000000000002 0 356040000002
FT0 032547 000002 0 0 0 0 356040000002
FT1A 032547 000002 0 0 0 0 0
FT9 032550 000002 0 0 0 0 0
ET0 032551 000002 0 0 000000000001 0 0
ST1 032551 000002 0 0 000000000001 0 0
ST2 032551 000002 0 0 000000000001 0 0
ST5 032551 000002 0 0 000000000001 0 0
ST6A 032551 000002 0 0 000000000001 0 0
ST9 032551 000002 0 0 000000000001 0 0
*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 CAME 2,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032552 032552 0 0 312100033502 0 000000000001
IT1 032552 0 0 0 312100033502 0 000000000001
AT3 032552 0 0 0 000000033502 0 312100033502
AT6 032552 033502 0 0 000000033502 0 312100033502
FT0 032552 033502 0 0 000000000001 0 312100033502
FT1A 032552 033502 0 0 000000000001 0 000000000001
FT2 032552 033502 0 0 0 0 000000000001
FT2RQ 032552 033502 0 0 000000000001 0 000000000001
FT3 032552 033502 0 0 000000000001 0 000000000001
FT9 032553 033502 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 301
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0458
ET0 032554 033502 0 0 0 0 000000000001
ST1A 032554 033502 0 0 0 0 000000000001
ST9 032554 033502 0 0 0 0 000000000001
*032554 JUMPA 0,032555
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032554 032554 0 0 324000032555 0 000000032555
IT1 032554 0 0 0 324000032555 0 000000032555
AT3 032554 0 0 0 000000032555 0 324000032555
AT6 032554 032555 0 0 000000032555 0 324000032555
FT1A 032554 032555 0 0 000000032555 0 000000032555
FT2 032554 032555 0 0 0 0 000000032555
FT2RQ 032554 032555 0 0 0 0 000000032555
FT3 032554 032555 0 0 0 0 000000032555
FT9 032555 032555 0 0 0 0 000000032555
ET0 032555 032555 0 0 0 0 000000032555
ST1A 032555 032555 0 0 0 0 000000032555
ST9 032555 032555 0 0 0 0 000000032555
*032555 CAME 1,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032555 032555 0 0 312040033502 0 000000000001
IT1 032555 0 0 0 312040033502 0 000000000001
AT3 032555 0 0 0 000000033502 0 312040033502
AT6 032555 033502 0 0 000000033502 0 312040033502
FT0 032555 033502 0 0 000000000001 0 312040033502
FT1A 032555 033502 0 0 000000000001 0 000000000001
FT2 032555 033502 0 0 0 0 000000000001
FT2RQ 032555 033502 0 0 000000000001 0 000000000001
FT3 032555 033502 0 0 000000000001 0 000000000001
FT9 032556 033502 0 0 000000000001 0 000000000001
ET0 032557 033502 0 0 0 0 000000000001
ST1A 032557 033502 0 0 0 0 000000000001
ST9 032557 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 302
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0459
*032557 JUMPA 0,032560
INITIAL
C(AC)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032557 032557 0 0 324000032560 0 000000032560
IT1 032557 0 0 0 324000032560 0 000000032560
AT3 032557 0 0 0 000000032560 0 324000032560
AT6 032557 032560 0 0 000000032560 0 324000032560
FT1A 032557 032560 0 0 000000032560 0 000000032560
FT2 032557 032560 0 0 0 0 000000032560
FT2RQ 032557 032560 0 0 0 0 000000032560
FT3 032557 032560 0 0 0 0 000000032560
FT9 032560 032560 0 0 0 0 000000032560
ET0 032560 032560 0 0 0 0 000000032560
ST1A 032560 032560 0 0 0 0 000000032560
ST9 032560 032560 0 0 0 0 000000032560
*032560 MOVE 0,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032560 032560 0 0 200000033474 0 707070707070
IT1 032560 0 0 0 200000033474 0 707070707070
AT3 032560 0 0 0 000000033474 0 200000033474
AT6 032560 033474 0 0 000000033474 0 200000033474
FT0 032560 033474 0 0 707070707070 0 200000033474
FT1A 032560 033474 0 0 707070707070 0 707070707070
FT9 032561 033474 0 0 707070707070 0 707070707070
ET0 032561 033474 0 0 707070707070 0 707070707070
ST1 032561 033474 0 0 707070707070 0 707070707070
ST2 032561 033474 0 0 707070707070 0 707070707070
ST9 032561 033474 0 0 707070707070 0 707070707070
*032561 HRROI 1,777776
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032561 032561 0 0 561040777776 0 000000777776
IT1 032561 0 0 0 561040777776 0 000000777776
AT3 032561 0 0 0 000000777776 0 561040777776
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 303
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0460
AT6 032561 777776 0 0 000000777776 0 561040777776
FT1A 032561 777776 0 0 000000777776 0 000000777776
FT9 032562 777776 0 0 000000777776 0 000000777776
ET0 032562 777776 0 0 777777777776 0 000000777776
ST1 032562 777776 0 0 777777777776 0 000000777776
ST2 032562 777776 0 0 777777777776 0 000000777776
ST9 032562 777776 0 0 777777777776 0 000000777776
*032562 AOSG 0,000001
INITIAL
C(AC)=707070 707070
C(E)=777777 777776
FINAL
C(AC)=707070 707070
C(E)=777777 777776
TIME PC MA SC FE AR MQ BR
IT0 032562 032562 0 0 357000000001 0 777777777776
IT1 032562 0 0 0 357000000001 0 777777777776
AT3 032562 0 0 0 000000000001 0 357000000001
AT6 032562 000001 0 0 000000000001 0 357000000001
FT0 032562 000001 0 0 777777777776 0 357000000001
FT1A 032562 000001 0 0 777777777776 0 777777777776
FT9 032563 000001 0 0 777777777776 0 777777777776
ET0 032563 000001 0 0 777777777777 0 777777777776
ST5 032563 000001 0 0 777777777777 0 777777777776
ST6A 032563 000001 0 0 777777777777 0 777777777776
ST9 032563 000001 0 0 777777777777 0 777777777776
*032563 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032563 032563 0 0 334000000000 0 707070707070
IT1 032563 0 0 0 334000000000 0 707070707070
AT3 032563 0 0 0 0 0 334000000000
AT6 032563 0 0 0 0 0 334000000000
FT0 032563 0 0 0 707070707070 0 334000000000
FT1A 032563 0 0 0 707070707070 0 707070707070
FT9 032564 0 0 0 707070707070 0 707070707070
ET0 032565 0 0 0 707070707070 0 707070707070
ST1A 032565 0 0 0 707070707070 0 707070707070
ST9 032565 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 304
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0461
*032565 JUMPA 0,032566
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032565 032565 0 0 324000032566 0 000000032566
IT1 032565 0 0 0 324000032566 0 000000032566
AT3 032565 0 0 0 000000032566 0 324000032566
AT6 032565 032566 0 0 000000032566 0 324000032566
FT1A 032565 032566 0 0 000000032566 0 000000032566
FT2 032565 032566 0 0 0 0 000000032566
FT2RQ 032565 032566 0 0 707070707070 0 000000032566
FT3 032565 032566 0 0 707070707070 0 000000032566
FT9 032566 032566 0 0 707070707070 0 000000032566
ET0 032566 032566 0 0 707070707070 0 000000032566
ST1A 032566 032566 0 0 707070707070 0 000000032566
ST9 032566 032566 0 0 707070707070 0 000000032566
*032566 CAME 1,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032566 032566 0 0 312040033462 0 777777777777
IT1 032566 0 0 0 312040033462 0 777777777777
AT3 032566 0 0 0 000000033462 0 312040033462
AT6 032566 033462 0 0 000000033462 0 312040033462
FT0 032566 033462 0 0 777777777777 0 312040033462
FT1A 032566 033462 0 0 777777777777 0 777777777777
FT2 032566 033462 0 0 0 0 777777777777
FT2RQ 032566 033462 0 0 777777777777 0 777777777777
FT3 032566 033462 0 0 777777777777 0 777777777777
FT9 032567 033462 0 0 777777777777 0 777777777777
ET0 032570 033462 0 0 0 0 777777777777
ST1A 032570 033462 0 0 0 0 777777777777
ST9 032570 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 305
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0462
*032570 JUMPA 0,032571
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000032571
FT3 032570 032571 0 0 707070707070 0 000000032571
FT9 032571 032571 0 0 707070707070 0 000000032571
ET0 032571 032571 0 0 707070707070 0 000000032571
ST1A 032571 032571 0 0 707070707070 0 000000032571
ST9 032571 032571 0 0 707070707070 0 000000032571
*032571 CAME 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032571 032571 0 0 312000033474 0 707070707070
IT1 032571 0 0 0 312000033474 0 707070707070
AT3 032571 0 0 0 000000033474 0 312000033474
AT6 032571 033474 0 0 000000033474 0 312000033474
FT0 032571 033474 0 0 707070707070 0 312000033474
FT1A 032571 033474 0 0 707070707070 0 707070707070
FT2 032571 033474 0 0 0 0 707070707070
FT2RQ 032571 033474 0 0 707070707070 0 707070707070
FT3 032571 033474 0 0 707070707070 0 707070707070
FT9 032572 033474 0 0 707070707070 0 707070707070
ET0 032573 033474 0 0 0 0 707070707070
ST1A 032573 033474 0 0 0 0 707070707070
ST9 032573 033474 0 0 0 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 306
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0463
*032573 JUMPA 0,032574
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032573 032573 0 0 324000032574 0 000000032574
IT1 032573 0 0 0 324000032574 0 000000032574
AT3 032573 0 0 0 000000032574 0 324000032574
AT6 032573 032574 0 0 000000032574 0 324000032574
FT1A 032573 032574 0 0 000000032574 0 000000032574
FT2 032573 032574 0 0 0 0 000000032574
FT2RQ 032573 032574 0 0 707070707070 0 000000032574
FT3 032573 032574 0 0 707070707070 0 000000032574
FT9 032574 032574 0 0 707070707070 0 000000032574
ET0 032574 032574 0 0 707070707070 0 000000032574
ST1A 032574 032574 0 0 707070707070 0 000000032574
ST9 032574 032574 0 0 707070707070 0 000000032574
*032574 MOVE 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032574 032574 0 0 200000033474 0 707070707070
IT1 032574 0 0 0 200000033474 0 707070707070
AT3 032574 0 0 0 000000033474 0 200000033474
AT6 032574 033474 0 0 000000033474 0 200000033474
FT0 032574 033474 0 0 707070707070 0 200000033474
FT1A 032574 033474 0 0 707070707070 0 707070707070
FT9 032575 033474 0 0 707070707070 0 707070707070
ET0 032575 033474 0 0 707070707070 0 707070707070
ST1 032575 033474 0 0 707070707070 0 707070707070
ST2 032575 033474 0 0 707070707070 0 707070707070
ST9 032575 033474 0 0 707070707070 0 707070707070
*032575 SETO 1,000000
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032575 032575 0 0 474040000000 0 0
IT1 032575 0 0 0 474040000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 307
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0464
AT3 032575 0 0 0 0 0 474040000000
AT6 032575 0 0 0 0 0 474040000000
FT1A 032575 0 0 0 0 0 0
FT9 032576 0 0 0 0 0 0
ET0 032576 0 0 0 777777777777 0 0
ST1 032576 0 0 0 777777777777 0 0
ST2 032576 0 0 0 777777777777 0 0
ST9 032576 0 0 0 777777777777 0 0
*032576 AOSG 0,000001
INITIAL
C(AC)=707070 707070
C(E)=777777 777777
FINAL
C(AC)=707070 707070
C(E)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032576 032576 0 0 357000000001 0 777777777777
IT1 032576 0 0 0 357000000001 0 777777777777
AT3 032576 0 0 0 000000000001 0 357000000001
AT6 032576 000001 0 0 000000000001 0 357000000001
FT0 032576 000001 0 0 777777777777 0 357000000001
FT1A 032576 000001 0 0 777777777777 0 777777777777
FT9 032577 000001 0 0 777777777777 0 777777777777
ET0 032577 000001 0 0 0 0 777777777777
ST5 032577 000001 0 0 0 0 777777777777
ST6A 032577 000001 0 0 0 0 777777777777
ST9 032577 000001 0 0 0 0 777777777777
*032577 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032577 032577 0 0 334000000000 0 707070707070
IT1 032577 0 0 0 334000000000 0 707070707070
AT3 032577 0 0 0 0 0 334000000000
AT6 032577 0 0 0 0 0 334000000000
FT0 032577 0 0 0 707070707070 0 334000000000
FT1A 032577 0 0 0 707070707070 0 707070707070
FT9 0 0 0 0 707070707070 0 707070707070
ET0 032601 0 0 0 707070707070 0 707070707070
ST1A 032601 0 0 0 707070707070 0 707070707070
ST9 032601 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 308
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0465
*032601 JUMPA 0,032602
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032601 032601 0 0 324000032602 0 000000032602
IT1 032601 0 0 0 324000032602 0 000000032602
AT3 032601 0 0 0 000000032602 0 324000032602
AT6 032601 032602 0 0 000000032602 0 324000032602
FT1A 032601 032602 0 0 000000032602 0 000000032602
FT2 032601 032602 0 0 0 0 000000032602
FT2RQ 032601 032602 0 0 707070707070 0 000000032602
FT3 032601 032602 0 0 707070707070 0 000000032602
FT9 032602 032602 0 0 707070707070 0 000000032602
ET0 032602 032602 0 0 707070707070 0 000000032602
ST1A 032602 032602 0 0 707070707070 0 000000032602
ST9 032602 032602 0 0 707070707070 0 000000032602
*032602 CAME 1,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032602 032602 0 0 312040033501 0 0
IT1 032602 0 0 0 312040033501 0 0
AT3 032602 0 0 0 000000033501 0 312040033501
AT6 032602 033501 0 0 000000033501 0 312040033501
FT0 032602 033501 0 0 0 0 312040033501
FT1A 032602 033501 0 0 0 0 0
FT2 032602 033501 0 0 0 0 0
FT2RQ 032602 033501 0 0 0 0 0
FT3 032602 033501 0 0 0 0 0
FT9 032603 033501 0 0 0 0 0
ET0 032604 033501 0 0 0 0 0
ST1A 032604 033501 0 0 0 0 0
ST9 032604 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 309
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0466
*032604 JUMPA 0,032605
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032604 032604 0 0 324000032605 0 000000032605
IT1 032604 0 0 0 324000032605 0 000000032605
AT3 032604 0 0 0 000000032605 0 324000032605
AT6 032604 032605 0 0 000000032605 0 324000032605
FT1A 032604 032605 0 0 000000032605 0 000000032605
FT2 032604 032605 0 0 0 0 000000032605
FT2RQ 032604 032605 0 0 707070707070 0 000000032605
FT3 032604 032605 0 0 707070707070 0 000000032605
FT9 032605 032605 0 0 707070707070 0 000000032605
ET0 032605 032605 0 0 707070707070 0 000000032605
ST1A 032605 032605 0 0 707070707070 0 000000032605
ST9 032605 032605 0 0 707070707070 0 000000032605
*032605 CAME 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032605 032605 0 0 312000033474 0 707070707070
IT1 032605 0 0 0 312000033474 0 707070707070
AT3 032605 0 0 0 000000033474 0 312000033474
AT6 032605 033474 0 0 000000033474 0 312000033474
FT0 032605 033474 0 0 707070707070 0 312000033474
FT1A 032605 033474 0 0 707070707070 0 707070707070
FT2 032605 033474 0 0 0 0 707070707070
FT2RQ 032605 033474 0 0 707070707070 0 707070707070
FT3 032605 033474 0 0 707070707070 0 707070707070
FT9 032606 033474 0 0 707070707070 0 707070707070
ET0 032607 033474 0 0 0 0 707070707070
ST1A 032607 033474 0 0 0 0 707070707070
ST9 032607 033474 0 0 0 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 310
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0467
*032607 JUMPA 0,032610
INITIAL
C(AC)=707070 707070
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
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 707070707070 0 000000032610
FT3 032607 032610 0 0 707070707070 0 000000032610
FT9 032610 032610 0 0 707070707070 0 000000032610
ET0 032610 032610 0 0 707070707070 0 000000032610
ST1A 032610 032610 0 0 707070707070 0 000000032610
ST9 032610 032610 0 0 707070707070 0 000000032610
*032610 MOVE 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032610 032610 0 0 200000033474 0 707070707070
IT1 032610 0 0 0 200000033474 0 707070707070
AT3 032610 0 0 0 000000033474 0 200000033474
AT6 032610 033474 0 0 000000033474 0 200000033474
FT0 032610 033474 0 0 707070707070 0 200000033474
FT1A 032610 033474 0 0 707070707070 0 707070707070
FT9 032611 033474 0 0 707070707070 0 707070707070
ET0 032611 033474 0 0 707070707070 0 707070707070
ST1 032611 033474 0 0 707070707070 0 707070707070
ST2 032611 033474 0 0 707070707070 0 707070707070
ST9 032611 033474 0 0 707070707070 0 707070707070
*032611 SETZ 1,000000
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032611 032611 0 0 400040000000 0 0
IT1 032611 0 0 0 400040000000 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 311
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0468
AT3 032611 0 0 0 0 0 400040000000
AT6 032611 0 0 0 0 0 400040000000
FT1A 032611 0 0 0 0 0 0
FT9 032612 0 0 0 0 0 0
ET0 032612 0 0 0 0 0 0
ST1 032612 0 0 0 0 0 0
ST2 032612 0 0 0 0 0 0
ST9 032612 0 0 0 0 0 0
*032612 AOSG 0,000001
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=707070 707070
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032612 032612 0 0 357000000001 0 0
IT1 032612 0 0 0 357000000001 0 0
AT3 032612 0 0 0 000000000001 0 357000000001
AT6 032612 000001 0 0 000000000001 0 357000000001
FT0 032612 000001 0 0 0 0 357000000001
FT1A 032612 000001 0 0 0 0 0
FT9 032613 000001 0 0 0 0 0
ET0 032614 000001 0 0 000000000001 0 0
ST5 032614 000001 0 0 000000000001 0 0
ST6A 032614 000001 0 0 000000000001 0 0
ST9 032614 000001 0 0 000000000001 0 0
*032614 JUMPA 0,032615
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000032615
FT3 032614 032615 0 0 707070707070 0 000000032615
FT9 032615 032615 0 0 707070707070 0 000000032615
ET0 032615 032615 0 0 707070707070 0 000000032615
ST1A 032615 032615 0 0 707070707070 0 000000032615
ST9 032615 032615 0 0 707070707070 0 000000032615
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 312
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0469
*032615 CAME 1,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032615 032615 0 0 312040033502 0 000000000001
IT1 032615 0 0 0 312040033502 0 000000000001
AT3 032615 0 0 0 000000033502 0 312040033502
AT6 032615 033502 0 0 000000033502 0 312040033502
FT0 032615 033502 0 0 000000000001 0 312040033502
FT1A 032615 033502 0 0 000000000001 0 000000000001
FT2 032615 033502 0 0 0 0 000000000001
FT2RQ 032615 033502 0 0 000000000001 0 000000000001
FT3 032615 033502 0 0 000000000001 0 000000000001
FT9 032616 033502 0 0 000000000001 0 000000000001
ET0 032617 033502 0 0 0 0 000000000001
ST1A 032617 033502 0 0 0 0 000000000001
ST9 032617 033502 0 0 0 0 000000000001
*032617 JUMPA 0,032620
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032617 032617 0 0 324000032620 0 000000032620
IT1 032617 0 0 0 324000032620 0 000000032620
AT3 032617 0 0 0 000000032620 0 324000032620
AT6 032617 032620 0 0 000000032620 0 324000032620
FT1A 032617 032620 0 0 000000032620 0 000000032620
FT2 032617 032620 0 0 0 0 000000032620
FT2RQ 032617 032620 0 0 707070707070 0 000000032620
FT3 032617 032620 0 0 707070707070 0 000000032620
FT9 032620 032620 0 0 707070707070 0 000000032620
ET0 032620 032620 0 0 707070707070 0 000000032620
ST1A 032620 032620 0 0 707070707070 0 000000032620
ST9 032620 032620 0 0 707070707070 0 000000032620
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 313
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0470
*032620 CAME 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032620 032620 0 0 312000033474 0 707070707070
IT1 032620 0 0 0 312000033474 0 707070707070
AT3 032620 0 0 0 000000033474 0 312000033474
AT6 032620 033474 0 0 000000033474 0 312000033474
FT0 032620 033474 0 0 707070707070 0 312000033474
FT1A 032620 033474 0 0 707070707070 0 707070707070
FT2 032620 033474 0 0 0 0 707070707070
FT2RQ 032620 033474 0 0 707070707070 0 707070707070
FT3 032620 033474 0 0 707070707070 0 707070707070
FT9 032621 033474 0 0 707070707070 0 707070707070
ET0 032622 033474 0 0 0 0 707070707070
ST1A 032622 033474 0 0 0 0 707070707070
ST9 032622 033474 0 0 0 0 707070707070
*032622 JUMPA 0,032623
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032622 032622 0 0 324000032623 0 000000032623
IT1 032622 0 0 0 324000032623 0 000000032623
AT3 032622 0 0 0 000000032623 0 324000032623
AT6 032622 032623 0 0 000000032623 0 324000032623
FT1A 032622 032623 0 0 000000032623 0 000000032623
FT2 032622 032623 0 0 0 0 000000032623
FT2RQ 032622 032623 0 0 707070707070 0 000000032623
FT3 032622 032623 0 0 707070707070 0 000000032623
FT9 032623 032623 0 0 707070707070 0 000000032623
ET0 032623 032623 0 0 707070707070 0 000000032623
ST1A 032623 032623 0 0 707070707070 0 000000032623
ST9 032623 032623 0 0 707070707070 0 000000032623
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 314
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0471
*032623 MOVEI 17,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032623 032623 0 0 201740000000 0 0
IT1 032623 0 0 0 201740000000 0 0
AT3 032623 0 0 0 0 0 201740000000
AT6 032623 0 0 0 0 0 201740000000
FT1A 032623 0 0 0 0 0 0
FT9 032624 0 0 0 0 0 0
ET0 032624 0 0 0 0 0 0
ST1 032624 0 0 0 0 0 0
ST2 032624 0 0 0 0 0 0
ST9 032624 0 0 0 0 0 0
*032624 SOJL 17,032626
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032624 032624 0 0 361740032626 0 000000032626
IT1 032624 0 0 0 361740032626 0 000000032626
AT3 032624 0 0 0 000000032626 0 361740032626
AT6 032624 032626 0 0 000000032626 0 361740032626
FT1A 032624 032626 0 0 000000032626 0 000000032626
FT2 032624 032626 0 0 0 0 000000032626
FT2RQ 032624 032626 0 0 0 0 000000032626
FT3 032624 032626 0 0 0 0 000000032626
FT9 032625 032626 0 0 0 0 000000032626
ET0 032626 032626 0 0 777777777777 0 000000032626
ST1 032626 032626 0 0 777777777777 0 000000032626
ST2 032626 032626 0 0 777777777777 0 000000032626
ST9 032626 032626 0 0 777777777777 0 000000032626
*032626 JUMPA 0,032627
INITIAL
C(AC)=707070 707070
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
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 315
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0472
FT1A 032626 032627 0 0 000000032627 0 000000032627
FT2 032626 032627 0 0 0 0 000000032627
FT2RQ 032626 032627 0 0 707070707070 0 000000032627
FT3 032626 032627 0 0 707070707070 0 000000032627
FT9 032627 032627 0 0 707070707070 0 000000032627
ET0 032627 032627 0 0 707070707070 0 000000032627
ST1A 032627 032627 0 0 707070707070 0 000000032627
ST9 032627 032627 0 0 707070707070 0 000000032627
*032627 CAME 17,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032627 032627 0 0 312740033462 0 777777777777
IT1 032627 0 0 0 312740033462 0 777777777777
AT3 032627 0 0 0 000000033462 0 312740033462
AT6 032627 033462 0 0 000000033462 0 312740033462
FT0 032627 033462 0 0 777777777777 0 312740033462
FT1A 032627 033462 0 0 777777777777 0 777777777777
FT2 032627 033462 0 0 0 0 777777777777
FT2RQ 032627 033462 0 0 777777777777 0 777777777777
FT3 032627 033462 0 0 777777777777 0 777777777777
FT9 032630 033462 0 0 777777777777 0 777777777777
ET0 032631 033462 0 0 0 0 777777777777
ST1A 032631 033462 0 0 0 0 777777777777
ST9 032631 033462 0 0 0 0 777777777777
*032631 JUMPA 0,032632
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032631 032631 0 0 324000032632 0 000000032632
IT1 032631 0 0 0 324000032632 0 000000032632
AT3 032631 0 0 0 000000032632 0 324000032632
AT6 032631 032632 0 0 000000032632 0 324000032632
FT1A 032631 032632 0 0 000000032632 0 000000032632
FT2 032631 032632 0 0 0 0 000000032632
FT2RQ 032631 032632 0 0 707070707070 0 000000032632
FT3 032631 032632 0 0 707070707070 0 000000032632
FT9 032632 032632 0 0 707070707070 0 000000032632
ET0 032632 032632 0 0 707070707070 0 000000032632
ST1A 032632 032632 0 0 707070707070 0 000000032632
ST9 032632 032632 0 0 707070707070 0 000000032632
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 316
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0473
*032632 MOVEI 17,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032632 032632 0 0 201740000001 0 000000000001
IT1 032632 0 0 0 201740000001 0 000000000001
AT3 032632 0 0 0 000000000001 0 201740000001
AT6 032632 000001 0 0 000000000001 0 201740000001
FT1A 032632 000001 0 0 000000000001 0 000000000001
FT9 032633 000001 0 0 000000000001 0 000000000001
ET0 032633 000001 0 0 000000000001 0 000000000001
ST1 032633 000001 0 0 000000000001 0 000000000001
ST2 032633 000001 0 0 000000000001 0 000000000001
ST9 032633 000001 0 0 000000000001 0 000000000001
*032633 SOJL 17,032635
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032633 032633 0 0 361740032635 0 000000032635
IT1 032633 0 0 0 361740032635 0 000000032635
AT3 032633 0 0 0 000000032635 0 361740032635
AT6 032633 032635 0 0 000000032635 0 361740032635
FT1A 032633 032635 0 0 000000032635 0 000000032635
FT2 032633 032635 0 0 0 0 000000032635
FT2RQ 032633 032635 0 0 000000000001 0 000000032635
FT3 032633 032635 0 0 000000000001 0 000000032635
FT9 032634 032635 0 0 000000000001 0 000000032635
ET0 032634 032635 0 0 0 0 000000032635
ST1 032634 032635 0 0 0 0 000000032635
ST2 032634 032635 0 0 0 0 000000032635
ST9 032634 032635 0 0 0 0 000000032635
*032634 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032634 032634 0 0 334000000000 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 317
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0474
IT1 032634 0 0 0 334000000000 0 707070707070
AT3 032634 0 0 0 0 0 334000000000
AT6 032634 0 0 0 0 0 334000000000
FT0 032634 0 0 0 707070707070 0 334000000000
FT1A 032634 0 0 0 707070707070 0 707070707070
FT9 032635 0 0 0 707070707070 0 707070707070
ET0 032636 0 0 0 707070707070 0 707070707070
ST1A 032636 0 0 0 707070707070 0 707070707070
ST9 032636 0 0 0 707070707070 0 707070707070
*032636 JUMPA 0,032637
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032636 032636 0 0 324000032637 0 000000032637
IT1 032636 0 0 0 324000032637 0 000000032637
AT3 032636 0 0 0 000000032637 0 324000032637
AT6 032636 032637 0 0 000000032637 0 324000032637
FT1A 032636 032637 0 0 000000032637 0 000000032637
FT2 032636 032637 0 0 0 0 000000032637
FT2RQ 032636 032637 0 0 707070707070 0 000000032637
FT3 032636 032637 0 0 707070707070 0 000000032637
FT9 032637 032637 0 0 707070707070 0 000000032637
ET0 032637 032637 0 0 707070707070 0 000000032637
ST1A 032637 032637 0 0 707070707070 0 000000032637
ST9 032637 032637 0 0 707070707070 0 000000032637
*032637 CAME 17,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032637 032637 0 0 312740033501 0 0
IT1 032637 0 0 0 312740033501 0 0
AT3 032637 0 0 0 000000033501 0 312740033501
AT6 032637 033501 0 0 000000033501 0 312740033501
FT0 032637 033501 0 0 0 0 312740033501
FT1A 032637 033501 0 0 0 0 0
FT2 032637 033501 0 0 0 0 0
FT2RQ 032637 033501 0 0 0 0 0
FT3 032637 033501 0 0 0 0 0
FT9 032640 033501 0 0 0 0 0
ET0 032641 033501 0 0 0 0 0
ST1A 032641 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 318
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0475
ST9 032641 033501 0 0 0 0 0
*032641 JUMPA 0,032642
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032641 032641 0 0 324000032642 0 000000032642
IT1 032641 0 0 0 324000032642 0 000000032642
AT3 032641 0 0 0 000000032642 0 324000032642
AT6 032641 032642 0 0 000000032642 0 324000032642
FT1A 032641 032642 0 0 000000032642 0 000000032642
FT2 032641 032642 0 0 0 0 000000032642
FT2RQ 032641 032642 0 0 707070707070 0 000000032642
FT3 032641 032642 0 0 707070707070 0 000000032642
FT9 032642 032642 0 0 707070707070 0 000000032642
ET0 032642 032642 0 0 707070707070 0 000000032642
ST1A 032642 032642 0 0 707070707070 0 000000032642
ST9 032642 032642 0 0 707070707070 0 000000032642
*032642 MOVEI 17,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 032642 032642 0 0 201740000002 0 000000000002
IT1 032642 0 0 0 201740000002 0 000000000002
AT3 032642 0 0 0 000000000002 0 201740000002
AT6 032642 000002 0 0 000000000002 0 201740000002
FT1A 032642 000002 0 0 000000000002 0 000000000002
FT9 032643 000002 0 0 000000000002 0 000000000002
ET0 032643 000002 0 0 000000000002 0 000000000002
ST1 032643 000002 0 0 000000000002 0 000000000002
ST2 032643 000002 0 0 000000000002 0 000000000002
ST9 032643 000002 0 0 000000000002 0 000000000002
*032643 SOJL 17,032645
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032643 032643 0 0 361740032645 0 000000032645
IT1 032643 0 0 0 361740032645 0 000000032645
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 319
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0476
AT3 032643 0 0 0 000000032645 0 361740032645
AT6 032643 032645 0 0 000000032645 0 361740032645
FT1A 032643 032645 0 0 000000032645 0 000000032645
FT2 032643 032645 0 0 0 0 000000032645
FT2RQ 032643 032645 0 0 000000000002 0 000000032645
FT3 032643 032645 0 0 000000000002 0 000000032645
FT9 032644 032645 0 0 000000000002 0 000000032645
ET0 032644 032645 0 0 000000000001 0 000000032645
ST1 032644 032645 0 0 000000000001 0 000000032645
ST2 032644 032645 0 0 000000000001 0 000000032645
ST9 032644 032645 0 0 000000000001 0 000000032645
*032644 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032644 032644 0 0 334000000000 0 707070707070
IT1 032644 0 0 0 334000000000 0 707070707070
AT3 032644 0 0 0 0 0 334000000000
AT6 032644 0 0 0 0 0 334000000000
FT0 032644 0 0 0 707070707070 0 334000000000
FT1A 032644 0 0 0 707070707070 0 707070707070
FT9 032645 0 0 0 707070707070 0 707070707070
ET0 032646 0 0 0 707070707070 0 707070707070
ST1A 032646 0 0 0 707070707070 0 707070707070
ST9 032646 0 0 0 707070707070 0 707070707070
*032646 JUMPA 0,032647
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032646 032646 0 0 324000032647 0 000000032647
IT1 032646 0 0 0 324000032647 0 000000032647
AT3 032646 0 0 0 000000032647 0 324000032647
AT6 032646 032647 0 0 000000032647 0 324000032647
FT1A 032646 032647 0 0 000000032647 0 000000032647
FT2 032646 032647 0 0 0 0 000000032647
FT2RQ 032646 032647 0 0 707070707070 0 000000032647
FT3 032646 032647 0 0 707070707070 0 000000032647
FT9 032647 032647 0 0 707070707070 0 000000032647
ET0 032647 032647 0 0 707070707070 0 000000032647
ST1A 032647 032647 0 0 707070707070 0 000000032647
ST9 032647 032647 0 0 707070707070 0 000000032647
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 320
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0477
*032647 CAME 17,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032647 032647 0 0 312740033502 0 000000000001
IT1 032647 0 0 0 312740033502 0 000000000001
AT3 032647 0 0 0 000000033502 0 312740033502
AT6 032647 033502 0 0 000000033502 0 312740033502
FT0 032647 033502 0 0 000000000001 0 312740033502
FT1A 032647 033502 0 0 000000000001 0 000000000001
FT2 032647 033502 0 0 0 0 000000000001
FT2RQ 032647 033502 0 0 000000000001 0 000000000001
FT3 032647 033502 0 0 000000000001 0 000000000001
FT9 032650 033502 0 0 000000000001 0 000000000001
ET0 032651 033502 0 0 0 0 000000000001
ST1A 032651 033502 0 0 0 0 000000000001
ST9 032651 033502 0 0 0 0 000000000001
*032651 JUMPA 0,032652
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032651 032651 0 0 324000032652 0 000000032652
IT1 032651 0 0 0 324000032652 0 000000032652
AT3 032651 0 0 0 000000032652 0 324000032652
AT6 032651 032652 0 0 000000032652 0 324000032652
FT1A 032651 032652 0 0 000000032652 0 000000032652
FT2 032651 032652 0 0 0 0 000000032652
FT2RQ 032651 032652 0 0 707070707070 0 000000032652
FT3 032651 032652 0 0 707070707070 0 000000032652
FT9 032652 032652 0 0 707070707070 0 000000032652
ET0 032652 032652 0 0 707070707070 0 000000032652
ST1A 032652 032652 0 0 707070707070 0 000000032652
ST9 032652 032652 0 0 707070707070 0 000000032652
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 321
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0478
*032652 MOVEI 16,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032652 032652 0 0 201700000000 0 0
IT1 032652 0 0 0 201700000000 0 0
AT3 032652 0 0 0 0 0 201700000000
AT6 032652 0 0 0 0 0 201700000000
FT1A 032652 0 0 0 0 0 0
FT9 032653 0 0 0 0 0 0
ET0 032653 0 0 0 0 0 0
ST1 032653 0 0 0 0 0 0
ST2 032653 0 0 0 0 0 0
ST9 032653 0 0 0 0 0 0
*032653 SOJE 16,032655
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032653 032653 0 0 362700032655 0 000000032655
IT1 032653 0 0 0 362700032655 0 000000032655
AT3 032653 0 0 0 000000032655 0 362700032655
AT6 032653 032655 0 0 000000032655 0 362700032655
FT1A 032653 032655 0 0 000000032655 0 000000032655
FT2 032653 032655 0 0 0 0 000000032655
FT2RQ 032653 032655 0 0 0 0 000000032655
FT3 032653 032655 0 0 0 0 000000032655
FT9 032654 032655 0 0 0 0 000000032655
ET0 032654 032655 0 0 777777777777 0 000000032655
ST1 032654 032655 0 0 777777777777 0 000000032655
ST2 032654 032655 0 0 777777777777 0 000000032655
ST9 032654 032655 0 0 777777777777 0 000000032655
*032654 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032654 032654 0 0 334000000000 0 707070707070
IT1 032654 0 0 0 334000000000 0 707070707070
AT3 032654 0 0 0 0 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 322
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0479
AT6 032654 0 0 0 0 0 334000000000
FT0 032654 0 0 0 707070707070 0 334000000000
FT1A 032654 0 0 0 707070707070 0 707070707070
FT9 032655 0 0 0 707070707070 0 707070707070
ET0 032656 0 0 0 707070707070 0 707070707070
ST1A 032656 0 0 0 707070707070 0 707070707070
ST9 032656 0 0 0 707070707070 0 707070707070
*032656 JUMPA 0,032657
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032656 032656 0 0 324000032657 0 000000032657
IT1 032656 0 0 0 324000032657 0 000000032657
AT3 032656 0 0 0 000000032657 0 324000032657
AT6 032656 032657 0 0 000000032657 0 324000032657
FT1A 032656 032657 0 0 000000032657 0 000000032657
FT2 032656 032657 0 0 0 0 000000032657
FT2RQ 032656 032657 0 0 707070707070 0 000000032657
FT3 032656 032657 0 0 707070707070 0 000000032657
FT9 032657 032657 0 0 707070707070 0 000000032657
ET0 032657 032657 0 0 707070707070 0 000000032657
ST1A 032657 032657 0 0 707070707070 0 000000032657
ST9 032657 032657 0 0 707070707070 0 000000032657
*032657 CAME 16,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032657 032657 0 0 312700033462 0 777777777777
IT1 032657 0 0 0 312700033462 0 777777777777
AT3 032657 0 0 0 000000033462 0 312700033462
AT6 032657 033462 0 0 000000033462 0 312700033462
FT0 032657 033462 0 0 777777777777 0 312700033462
FT1A 032657 033462 0 0 777777777777 0 777777777777
FT2 032657 033462 0 0 0 0 777777777777
FT2RQ 032657 033462 0 0 777777777777 0 777777777777
FT3 032657 033462 0 0 777777777777 0 777777777777
FT9 032660 033462 0 0 777777777777 0 777777777777
ET0 032661 033462 0 0 0 0 777777777777
ST1A 032661 033462 0 0 0 0 777777777777
ST9 032661 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 323
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0480
*032661 JUMPA 0,032662
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032661 032661 0 0 324000032662 0 000000032662
IT1 032661 0 0 0 324000032662 0 000000032662
AT3 032661 0 0 0 000000032662 0 324000032662
AT6 032661 032662 0 0 000000032662 0 324000032662
FT1A 032661 032662 0 0 000000032662 0 000000032662
FT2 032661 032662 0 0 0 0 000000032662
FT2RQ 032661 032662 0 0 707070707070 0 000000032662
FT3 032661 032662 0 0 707070707070 0 000000032662
FT9 032662 032662 0 0 707070707070 0 000000032662
ET0 032662 032662 0 0 707070707070 0 000000032662
ST1A 032662 032662 0 0 707070707070 0 000000032662
ST9 032662 032662 0 0 707070707070 0 000000032662
*032662 MOVEI 16,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032662 032662 0 0 201700000001 0 000000000001
IT1 032662 0 0 0 201700000001 0 000000000001
AT3 032662 0 0 0 000000000001 0 201700000001
AT6 032662 000001 0 0 000000000001 0 201700000001
FT1A 032662 000001 0 0 000000000001 0 000000000001
FT9 032663 000001 0 0 000000000001 0 000000000001
ET0 032663 000001 0 0 000000000001 0 000000000001
ST1 032663 000001 0 0 000000000001 0 000000000001
ST2 032663 000001 0 0 000000000001 0 000000000001
ST9 032663 000001 0 0 000000000001 0 000000000001
*032663 SOJE 16,032665
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032663 032663 0 0 362700032665 0 000000032665
IT1 032663 0 0 0 362700032665 0 000000032665
AT3 032663 0 0 0 000000032665 0 362700032665
AT6 032663 032665 0 0 000000032665 0 362700032665
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 324
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0481
FT1A 032663 032665 0 0 000000032665 0 000000032665
FT2 032663 032665 0 0 0 0 000000032665
FT2RQ 032663 032665 0 0 000000000001 0 000000032665
FT3 032663 032665 0 0 000000000001 0 000000032665
FT9 032664 032665 0 0 000000000001 0 000000032665
ET0 032665 032665 0 0 0 0 000000032665
ST1 032665 032665 0 0 0 0 000000032665
ST2 032665 032665 0 0 0 0 000000032665
ST9 032665 032665 0 0 0 0 000000032665
*032665 JUMPA 0,032666
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032665 032665 0 0 324000032666 0 000000032666
IT1 032665 0 0 0 324000032666 0 000000032666
AT3 032665 0 0 0 000000032666 0 324000032666
AT6 032665 032666 0 0 000000032666 0 324000032666
FT1A 032665 032666 0 0 000000032666 0 000000032666
FT2 032665 032666 0 0 0 0 000000032666
FT2RQ 032665 032666 0 0 707070707070 0 000000032666
FT3 032665 032666 0 0 707070707070 0 000000032666
FT9 032666 032666 0 0 707070707070 0 000000032666
ET0 032666 032666 0 0 707070707070 0 000000032666
ST1A 032666 032666 0 0 707070707070 0 000000032666
ST9 032666 032666 0 0 707070707070 0 000000032666
*032666 CAME 16,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032666 032666 0 0 312700033501 0 0
IT1 032666 0 0 0 312700033501 0 0
AT3 032666 0 0 0 000000033501 0 312700033501
AT6 032666 033501 0 0 000000033501 0 312700033501
FT0 032666 033501 0 0 0 0 312700033501
FT1A 032666 033501 0 0 0 0 0
FT2 032666 033501 0 0 0 0 0
FT2RQ 032666 033501 0 0 0 0 0
FT3 032666 033501 0 0 0 0 0
FT9 032667 033501 0 0 0 0 0
ET0 032670 033501 0 0 0 0 0
ST1A 032670 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 325
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0482
ST9 032670 033501 0 0 0 0 0
*032670 JUMPA 0,032671
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032670 032670 0 0 324000032671 0 000000032671
IT1 032670 0 0 0 324000032671 0 000000032671
AT3 032670 0 0 0 000000032671 0 324000032671
AT6 032670 032671 0 0 000000032671 0 324000032671
FT1A 032670 032671 0 0 000000032671 0 000000032671
FT2 032670 032671 0 0 0 0 000000032671
FT2RQ 032670 032671 0 0 707070707070 0 000000032671
FT3 032670 032671 0 0 707070707070 0 000000032671
FT9 032671 032671 0 0 707070707070 0 000000032671
ET0 032671 032671 0 0 707070707070 0 000000032671
ST1A 032671 032671 0 0 707070707070 0 000000032671
ST9 032671 032671 0 0 707070707070 0 000000032671
*032671 MOVEI 16,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 032671 032671 0 0 201700000002 0 000000000002
IT1 032671 0 0 0 201700000002 0 000000000002
AT3 032671 0 0 0 000000000002 0 201700000002
AT6 032671 000002 0 0 000000000002 0 201700000002
FT1A 032671 000002 0 0 000000000002 0 000000000002
FT9 032672 000002 0 0 000000000002 0 000000000002
ET0 032672 000002 0 0 000000000002 0 000000000002
ST1 032672 000002 0 0 000000000002 0 000000000002
ST2 032672 000002 0 0 000000000002 0 000000000002
ST9 032672 000002 0 0 000000000002 0 000000000002
*032672 SOJE 16,032674
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032672 032672 0 0 362700032674 0 000000032674
IT1 032672 0 0 0 362700032674 0 000000032674
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 326
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0483
AT3 032672 0 0 0 000000032674 0 362700032674
AT6 032672 032674 0 0 000000032674 0 362700032674
FT1A 032672 032674 0 0 000000032674 0 000000032674
FT2 032672 032674 0 0 0 0 000000032674
FT2RQ 032672 032674 0 0 000000000002 0 000000032674
FT3 032672 032674 0 0 000000000002 0 000000032674
FT9 032673 032674 0 0 000000000002 0 000000032674
ET0 032673 032674 0 0 000000000001 0 000000032674
ST1 032673 032674 0 0 000000000001 0 000000032674
ST2 032673 032674 0 0 000000000001 0 000000032674
ST9 032673 032674 0 0 000000000001 0 000000032674
*032673 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032673 032673 0 0 334000000000 0 707070707070
IT1 032673 0 0 0 334000000000 0 707070707070
AT3 032673 0 0 0 0 0 334000000000
AT6 032673 0 0 0 0 0 334000000000
FT0 032673 0 0 0 707070707070 0 334000000000
FT1A 032673 0 0 0 707070707070 0 707070707070
FT9 032674 0 0 0 707070707070 0 707070707070
ET0 032675 0 0 0 707070707070 0 707070707070
ST1A 032675 0 0 0 707070707070 0 707070707070
ST9 032675 0 0 0 707070707070 0 707070707070
*032675 JUMPA 0,032676
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032675 032675 0 0 324000032676 0 000000032676
IT1 032675 0 0 0 324000032676 0 000000032676
AT3 032675 0 0 0 000000032676 0 324000032676
AT6 032675 032676 0 0 000000032676 0 324000032676
FT1A 032675 032676 0 0 000000032676 0 000000032676
FT2 032675 032676 0 0 0 0 000000032676
FT2RQ 032675 032676 0 0 707070707070 0 000000032676
FT3 032675 032676 0 0 707070707070 0 000000032676
FT9 032676 032676 0 0 707070707070 0 000000032676
ET0 032676 032676 0 0 707070707070 0 000000032676
ST1A 032676 032676 0 0 707070707070 0 000000032676
ST9 032676 032676 0 0 707070707070 0 000000032676
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 327
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0484
*032676 CAME 16,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032676 032676 0 0 312700033502 0 000000000001
IT1 032676 0 0 0 312700033502 0 000000000001
AT3 032676 0 0 0 000000033502 0 312700033502
AT6 032676 033502 0 0 000000033502 0 312700033502
FT0 032676 033502 0 0 000000000001 0 312700033502
FT1A 032676 033502 0 0 000000000001 0 000000000001
FT2 032676 033502 0 0 0 0 000000000001
FT2RQ 032676 033502 0 0 000000000001 0 000000000001
FT3 032676 033502 0 0 000000000001 0 000000000001
FT9 032677 033502 0 0 000000000001 0 000000000001
ET0 0 033502 0 0 0 0 000000000001
ST1A 0 033502 0 0 0 0 000000000001
ST9 0 033502 0 0 0 0 000000000001
*032700 JUMPA 0,032701
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 324000032701 0 000000032701
IT1 0 0 0 0 324000032701 0 000000032701
AT3 0 0 0 0 000000032701 0 324000032701
AT6 0 032701 0 0 000000032701 0 324000032701
FT1A 0 032701 0 0 000000032701 0 000000032701
FT2 0 032701 0 0 0 0 000000032701
FT2RQ 0 032701 0 0 707070707070 0 000000032701
FT3 0 032701 0 0 707070707070 0 000000032701
FT9 032701 032701 0 0 707070707070 0 000000032701
ET0 032701 032701 0 0 707070707070 0 000000032701
ST1A 032701 032701 0 0 707070707070 0 000000032701
ST9 032701 032701 0 0 707070707070 0 000000032701
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 328
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0485
*032701 MOVEI 15,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032701 032701 0 0 201640000000 0 0
IT1 032701 0 0 0 201640000000 0 0
AT3 032701 0 0 0 0 0 201640000000
AT6 032701 0 0 0 0 0 201640000000
FT1A 032701 0 0 0 0 0 0
FT9 032702 0 0 0 0 0 0
ET0 032702 0 0 0 0 0 0
ST1 032702 0 0 0 0 0 0
ST2 032702 0 0 0 0 0 0
ST9 032702 0 0 0 0 0 0
*032702 SOJLE 15,032704
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032702 032702 0 0 363640032704 0 000000032704
IT1 032702 0 0 0 363640032704 0 000000032704
AT3 032702 0 0 0 000000032704 0 363640032704
AT6 032702 032704 0 0 000000032704 0 363640032704
FT1A 032702 032704 0 0 000000032704 0 000000032704
FT2 032702 032704 0 0 0 0 000000032704
FT2RQ 032702 032704 0 0 0 0 000000032704
FT3 032702 032704 0 0 0 0 000000032704
FT9 032703 032704 0 0 0 0 000000032704
ET0 032704 032704 0 0 777777777777 0 000000032704
ST1 032704 032704 0 0 777777777777 0 000000032704
ST2 032704 032704 0 0 777777777777 0 000000032704
ST9 032704 032704 0 0 777777777777 0 000000032704
*032704 JUMPA 0,032705
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032704 032704 0 0 324000032705 0 000000032705
IT1 032704 0 0 0 324000032705 0 000000032705
AT3 032704 0 0 0 000000032705 0 324000032705
AT6 032704 032705 0 0 000000032705 0 324000032705
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 329
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0486
FT1A 032704 032705 0 0 000000032705 0 000000032705
FT2 032704 032705 0 0 0 0 000000032705
FT2RQ 032704 032705 0 0 707070707070 0 000000032705
FT3 032704 032705 0 0 707070707070 0 000000032705
FT9 032705 032705 0 0 707070707070 0 000000032705
ET0 032705 032705 0 0 707070707070 0 000000032705
ST1A 032705 032705 0 0 707070707070 0 000000032705
ST9 032705 032705 0 0 707070707070 0 000000032705
*032705 CAME 15,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032705 032705 0 0 312640033462 0 777777777777
IT1 032705 0 0 0 312640033462 0 777777777777
AT3 032705 0 0 0 000000033462 0 312640033462
AT6 032705 033462 0 0 000000033462 0 312640033462
FT0 032705 033462 0 0 777777777777 0 312640033462
FT1A 032705 033462 0 0 777777777777 0 777777777777
FT2 032705 033462 0 0 0 0 777777777777
FT2RQ 032705 033462 0 0 777777777777 0 777777777777
FT3 032705 033462 0 0 777777777777 0 777777777777
FT9 032706 033462 0 0 777777777777 0 777777777777
ET0 032707 033462 0 0 0 0 777777777777
ST1A 032707 033462 0 0 0 0 777777777777
ST9 032707 033462 0 0 0 0 777777777777
*032707 JUMPA 0,032710
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000032710
FT3 032707 032710 0 0 707070707070 0 000000032710
FT9 032710 032710 0 0 707070707070 0 000000032710
ET0 032710 032710 0 0 707070707070 0 000000032710
ST1A 032710 032710 0 0 707070707070 0 000000032710
ST9 032710 032710 0 0 707070707070 0 000000032710
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 330
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0487
*032710 MOVEI 15,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032710 032710 0 0 201640000001 0 000000000001
IT1 032710 0 0 0 201640000001 0 000000000001
AT3 032710 0 0 0 000000000001 0 201640000001
AT6 032710 000001 0 0 000000000001 0 201640000001
FT1A 032710 000001 0 0 000000000001 0 000000000001
FT9 032711 000001 0 0 000000000001 0 000000000001
ET0 032711 000001 0 0 000000000001 0 000000000001
ST1 032711 000001 0 0 000000000001 0 000000000001
ST2 032711 000001 0 0 000000000001 0 000000000001
ST9 032711 000001 0 0 000000000001 0 000000000001
*032711 SOJLE 15,032713
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032711 032711 0 0 363640032713 0 000000032713
IT1 032711 0 0 0 363640032713 0 000000032713
AT3 032711 0 0 0 000000032713 0 363640032713
AT6 032711 032713 0 0 000000032713 0 363640032713
FT1A 032711 032713 0 0 000000032713 0 000000032713
FT2 032711 032713 0 0 0 0 000000032713
FT2RQ 032711 032713 0 0 000000000001 0 000000032713
FT3 032711 032713 0 0 000000000001 0 000000032713
FT9 032712 032713 0 0 000000000001 0 000000032713
ET0 032713 032713 0 0 0 0 000000032713
ST1 032713 032713 0 0 0 0 000000032713
ST2 032713 032713 0 0 0 0 000000032713
ST9 032713 032713 0 0 0 0 000000032713
*032713 JUMPA 0,032714
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032713 032713 0 0 324000032714 0 000000032714
IT1 032713 0 0 0 324000032714 0 000000032714
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 331
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0488
AT3 032713 0 0 0 000000032714 0 324000032714
AT6 032713 032714 0 0 000000032714 0 324000032714
FT1A 032713 032714 0 0 000000032714 0 000000032714
FT2 032713 032714 0 0 0 0 000000032714
FT2RQ 032713 032714 0 0 707070707070 0 000000032714
FT3 032713 032714 0 0 707070707070 0 000000032714
FT9 032714 032714 0 0 707070707070 0 000000032714
ET0 032714 032714 0 0 707070707070 0 000000032714
ST1A 032714 032714 0 0 707070707070 0 000000032714
ST9 032714 032714 0 0 707070707070 0 000000032714
*032714 CAME 15,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032714 032714 0 0 312640033501 0 0
IT1 032714 0 0 0 312640033501 0 0
AT3 032714 0 0 0 000000033501 0 312640033501
AT6 032714 033501 0 0 000000033501 0 312640033501
FT0 032714 033501 0 0 0 0 312640033501
FT1A 032714 033501 0 0 0 0 0
FT2 032714 033501 0 0 0 0 0
FT2RQ 032714 033501 0 0 0 0 0
FT3 032714 033501 0 0 0 0 0
FT9 032715 033501 0 0 0 0 0
ET0 032716 033501 0 0 0 0 0
ST1A 032716 033501 0 0 0 0 0
ST9 032716 033501 0 0 0 0 0
*032716 JUMPA 0,032717
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032716 032716 0 0 324000032717 0 000000032717
IT1 032716 0 0 0 324000032717 0 000000032717
AT3 032716 0 0 0 000000032717 0 324000032717
AT6 032716 032717 0 0 000000032717 0 324000032717
FT1A 032716 032717 0 0 000000032717 0 000000032717
FT2 032716 032717 0 0 0 0 000000032717
FT2RQ 032716 032717 0 0 707070707070 0 000000032717
FT3 032716 032717 0 0 707070707070 0 000000032717
FT9 032717 032717 0 0 707070707070 0 000000032717
ET0 032717 032717 0 0 707070707070 0 000000032717
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 332
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0489
ST1A 032717 032717 0 0 707070707070 0 000000032717
ST9 032717 032717 0 0 707070707070 0 000000032717
*032717 MOVEI 15,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 032717 032717 0 0 201640000002 0 000000000002
IT1 032717 0 0 0 201640000002 0 000000000002
AT3 032717 0 0 0 000000000002 0 201640000002
AT6 032717 000002 0 0 000000000002 0 201640000002
FT1A 032717 000002 0 0 000000000002 0 000000000002
FT9 032720 000002 0 0 000000000002 0 000000000002
ET0 032720 000002 0 0 000000000002 0 000000000002
ST1 032720 000002 0 0 000000000002 0 000000000002
ST2 032720 000002 0 0 000000000002 0 000000000002
ST9 032720 000002 0 0 000000000002 0 000000000002
*032720 SOJLE 15,032722
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032720 032720 0 0 363640032722 0 000000032722
IT1 032720 0 0 0 363640032722 0 000000032722
AT3 032720 0 0 0 000000032722 0 363640032722
AT6 032720 032722 0 0 000000032722 0 363640032722
FT1A 032720 032722 0 0 000000032722 0 000000032722
FT2 032720 032722 0 0 0 0 000000032722
FT2RQ 032720 032722 0 0 000000000002 0 000000032722
FT3 032720 032722 0 0 000000000002 0 000000032722
FT9 032721 032722 0 0 000000000002 0 000000032722
ET0 032721 032722 0 0 000000000001 0 000000032722
ST1 032721 032722 0 0 000000000001 0 000000032722
ST2 032721 032722 0 0 000000000001 0 000000032722
ST9 032721 032722 0 0 000000000001 0 000000032722
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 333
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0490
*032721 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032721 032721 0 0 334000000000 0 707070707070
IT1 032721 0 0 0 334000000000 0 707070707070
AT3 032721 0 0 0 0 0 334000000000
AT6 032721 0 0 0 0 0 334000000000
FT0 032721 0 0 0 707070707070 0 334000000000
FT1A 032721 0 0 0 707070707070 0 707070707070
FT9 032722 0 0 0 707070707070 0 707070707070
ET0 032723 0 0 0 707070707070 0 707070707070
ST1A 032723 0 0 0 707070707070 0 707070707070
ST9 032723 0 0 0 707070707070 0 707070707070
*032723 JUMPA 0,032724
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000032724
FT3 032723 032724 0 0 707070707070 0 000000032724
FT9 032724 032724 0 0 707070707070 0 000000032724
ET0 032724 032724 0 0 707070707070 0 000000032724
ST1A 032724 032724 0 0 707070707070 0 000000032724
ST9 032724 032724 0 0 707070707070 0 000000032724
*032724 CAME 15,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032724 032724 0 0 312640033502 0 000000000001
IT1 032724 0 0 0 312640033502 0 000000000001
AT3 032724 0 0 0 000000033502 0 312640033502
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 334
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0491
AT6 032724 033502 0 0 000000033502 0 312640033502
FT0 032724 033502 0 0 000000000001 0 312640033502
FT1A 032724 033502 0 0 000000000001 0 000000000001
FT2 032724 033502 0 0 0 0 000000000001
FT2RQ 032724 033502 0 0 000000000001 0 000000000001
FT3 032724 033502 0 0 000000000001 0 000000000001
FT9 032725 033502 0 0 000000000001 0 000000000001
ET0 032726 033502 0 0 0 0 000000000001
ST1A 032726 033502 0 0 0 0 000000000001
ST9 032726 033502 0 0 0 0 000000000001
*032726 JUMPA 0,032727
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000032727
FT3 032726 032727 0 0 707070707070 0 000000032727
FT9 032727 032727 0 0 707070707070 0 000000032727
ET0 032727 032727 0 0 707070707070 0 000000032727
ST1A 032727 032727 0 0 707070707070 0 000000032727
ST9 032727 032727 0 0 707070707070 0 000000032727
*032727 MOVEI 14,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032727 032727 0 0 201600000000 0 0
IT1 032727 0 0 0 201600000000 0 0
AT3 032727 0 0 0 0 0 201600000000
AT6 032727 0 0 0 0 0 201600000000
FT1A 032727 0 0 0 0 0 0
FT9 032730 0 0 0 0 0 0
ET0 032730 0 0 0 0 0 0
ST1 032730 0 0 0 0 0 0
ST2 032730 0 0 0 0 0 0
ST9 032730 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 335
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0492
*032730 SOJA 14,032732
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032730 032730 0 0 364600032732 0 000000032732
IT1 032730 0 0 0 364600032732 0 000000032732
AT3 032730 0 0 0 000000032732 0 364600032732
AT6 032730 032732 0 0 000000032732 0 364600032732
FT1A 032730 032732 0 0 000000032732 0 000000032732
FT2 032730 032732 0 0 0 0 000000032732
FT2RQ 032730 032732 0 0 0 0 000000032732
FT3 032730 032732 0 0 0 0 000000032732
FT9 032731 032732 0 0 0 0 000000032732
ET0 032732 032732 0 0 777777777777 0 000000032732
ST1 032732 032732 0 0 777777777777 0 000000032732
ST2 032732 032732 0 0 777777777777 0 000000032732
ST9 032732 032732 0 0 777777777777 0 000000032732
*032732 JUMPA 0,032733
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032732 032732 0 0 324000032733 0 000000032733
IT1 032732 0 0 0 324000032733 0 000000032733
AT3 032732 0 0 0 000000032733 0 324000032733
AT6 032732 032733 0 0 000000032733 0 324000032733
FT1A 032732 032733 0 0 000000032733 0 000000032733
FT2 032732 032733 0 0 0 0 000000032733
FT2RQ 032732 032733 0 0 707070707070 0 000000032733
FT3 032732 032733 0 0 707070707070 0 000000032733
FT9 032733 032733 0 0 707070707070 0 000000032733
ET0 032733 032733 0 0 707070707070 0 000000032733
ST1A 032733 032733 0 0 707070707070 0 000000032733
ST9 032733 032733 0 0 707070707070 0 000000032733
*032733 CAME 14,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032733 032733 0 0 312600033462 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 336
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0493
IT1 032733 0 0 0 312600033462 0 777777777777
AT3 032733 0 0 0 000000033462 0 312600033462
AT6 032733 033462 0 0 000000033462 0 312600033462
FT0 032733 033462 0 0 777777777777 0 312600033462
FT1A 032733 033462 0 0 777777777777 0 777777777777
FT2 032733 033462 0 0 0 0 777777777777
FT2RQ 032733 033462 0 0 777777777777 0 777777777777
FT3 032733 033462 0 0 777777777777 0 777777777777
FT9 032734 033462 0 0 777777777777 0 777777777777
ET0 032735 033462 0 0 0 0 777777777777
ST1A 032735 033462 0 0 0 0 777777777777
ST9 032735 033462 0 0 0 0 777777777777
*032735 JUMPA 0,032736
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032735 032735 0 0 324000032736 0 000000032736
IT1 032735 0 0 0 324000032736 0 000000032736
AT3 032735 0 0 0 000000032736 0 324000032736
AT6 032735 032736 0 0 000000032736 0 324000032736
FT1A 032735 032736 0 0 000000032736 0 000000032736
FT2 032735 032736 0 0 0 0 000000032736
FT2RQ 032735 032736 0 0 707070707070 0 000000032736
FT3 032735 032736 0 0 707070707070 0 000000032736
FT9 032736 032736 0 0 707070707070 0 000000032736
ET0 032736 032736 0 0 707070707070 0 000000032736
ST1A 032736 032736 0 0 707070707070 0 000000032736
ST9 032736 032736 0 0 707070707070 0 000000032736
*032736 MOVEI 14,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032736 032736 0 0 201600000001 0 000000000001
IT1 032736 0 0 0 201600000001 0 000000000001
AT3 032736 0 0 0 000000000001 0 201600000001
AT6 032736 000001 0 0 000000000001 0 201600000001
FT1A 032736 000001 0 0 000000000001 0 000000000001
FT9 032737 000001 0 0 000000000001 0 000000000001
ET0 032737 000001 0 0 000000000001 0 000000000001
ST1 032737 000001 0 0 000000000001 0 000000000001
ST2 032737 000001 0 0 000000000001 0 000000000001
ST9 032737 000001 0 0 000000000001 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 337
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0494
*032737 SOJA 14,032741
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032737 032737 0 0 364600032741 0 000000032741
IT1 032737 0 0 0 364600032741 0 000000032741
AT3 032737 0 0 0 000000032741 0 364600032741
AT6 032737 032741 0 0 000000032741 0 364600032741
FT1A 032737 032741 0 0 000000032741 0 000000032741
FT2 032737 032741 0 0 0 0 000000032741
FT2RQ 032737 032741 0 0 000000000001 0 000000032741
FT3 032737 032741 0 0 000000000001 0 000000032741
FT9 032740 032741 0 0 000000000001 0 000000032741
ET0 032741 032741 0 0 0 0 000000032741
ST1 032741 032741 0 0 0 0 000000032741
ST2 032741 032741 0 0 0 0 000000032741
ST9 032741 032741 0 0 0 0 000000032741
*032741 JUMPA 0,032742
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032741 032741 0 0 324000032742 0 000000032742
IT1 032741 0 0 0 324000032742 0 000000032742
AT3 032741 0 0 0 000000032742 0 324000032742
AT6 032741 032742 0 0 000000032742 0 324000032742
FT1A 032741 032742 0 0 000000032742 0 000000032742
FT2 032741 032742 0 0 0 0 000000032742
FT2RQ 032741 032742 0 0 707070707070 0 000000032742
FT3 032741 032742 0 0 707070707070 0 000000032742
FT9 032742 032742 0 0 707070707070 0 000000032742
ET0 032742 032742 0 0 707070707070 0 000000032742
ST1A 032742 032742 0 0 707070707070 0 000000032742
ST9 032742 032742 0 0 707070707070 0 000000032742
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 338
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0495
*032742 CAME 14,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032742 032742 0 0 312600033501 0 0
IT1 032742 0 0 0 312600033501 0 0
AT3 032742 0 0 0 000000033501 0 312600033501
AT6 032742 033501 0 0 000000033501 0 312600033501
FT0 032742 033501 0 0 0 0 312600033501
FT1A 032742 033501 0 0 0 0 0
FT2 032742 033501 0 0 0 0 0
FT2RQ 032742 033501 0 0 0 0 0
FT3 032742 033501 0 0 0 0 0
FT9 032743 033501 0 0 0 0 0
ET0 032744 033501 0 0 0 0 0
ST1A 032744 033501 0 0 0 0 0
ST9 032744 033501 0 0 0 0 0
*032744 JUMPA 0,032745
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000032745
FT3 032744 032745 0 0 707070707070 0 000000032745
FT9 032745 032745 0 0 707070707070 0 000000032745
ET0 032745 032745 0 0 707070707070 0 000000032745
ST1A 032745 032745 0 0 707070707070 0 000000032745
ST9 032745 032745 0 0 707070707070 0 000000032745
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 339
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0496
*032745 MOVEI 14,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 032745 032745 0 0 201600000002 0 000000000002
IT1 032745 0 0 0 201600000002 0 000000000002
AT3 032745 0 0 0 000000000002 0 201600000002
AT6 032745 000002 0 0 000000000002 0 201600000002
FT1A 032745 000002 0 0 000000000002 0 000000000002
FT9 032746 000002 0 0 000000000002 0 000000000002
ET0 032746 000002 0 0 000000000002 0 000000000002
ST1 032746 000002 0 0 000000000002 0 000000000002
ST2 032746 000002 0 0 000000000002 0 000000000002
ST9 032746 000002 0 0 000000000002 0 000000000002
*032746 SOJA 14,032750
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032746 032746 0 0 364600032750 0 000000032750
IT1 032746 0 0 0 364600032750 0 000000032750
AT3 032746 0 0 0 000000032750 0 364600032750
AT6 032746 032750 0 0 000000032750 0 364600032750
FT1A 032746 032750 0 0 000000032750 0 000000032750
FT2 032746 032750 0 0 0 0 000000032750
FT2RQ 032746 032750 0 0 000000000002 0 000000032750
FT3 032746 032750 0 0 000000000002 0 000000032750
FT9 032747 032750 0 0 000000000002 0 000000032750
ET0 032750 032750 0 0 000000000001 0 000000032750
ST1 032750 032750 0 0 000000000001 0 000000032750
ST2 032750 032750 0 0 000000000001 0 000000032750
ST9 032750 032750 0 0 000000000001 0 000000032750
*032750 JUMPA 0,032751
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032750 032750 0 0 324000032751 0 000000032751
IT1 032750 0 0 0 324000032751 0 000000032751
AT3 032750 0 0 0 000000032751 0 324000032751
AT6 032750 032751 0 0 000000032751 0 324000032751
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 340
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0497
FT1A 032750 032751 0 0 000000032751 0 000000032751
FT2 032750 032751 0 0 0 0 000000032751
FT2RQ 032750 032751 0 0 707070707070 0 000000032751
FT3 032750 032751 0 0 707070707070 0 000000032751
FT9 032751 032751 0 0 707070707070 0 000000032751
ET0 032751 032751 0 0 707070707070 0 000000032751
ST1A 032751 032751 0 0 707070707070 0 000000032751
ST9 032751 032751 0 0 707070707070 0 000000032751
*032751 CAME 14,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032751 032751 0 0 312600033502 0 000000000001
IT1 032751 0 0 0 312600033502 0 000000000001
AT3 032751 0 0 0 000000033502 0 312600033502
AT6 032751 033502 0 0 000000033502 0 312600033502
FT0 032751 033502 0 0 000000000001 0 312600033502
FT1A 032751 033502 0 0 000000000001 0 000000000001
FT2 032751 033502 0 0 0 0 000000000001
FT2RQ 032751 033502 0 0 000000000001 0 000000000001
FT3 032751 033502 0 0 000000000001 0 000000000001
FT9 032752 033502 0 0 000000000001 0 000000000001
ET0 032753 033502 0 0 0 0 000000000001
ST1A 032753 033502 0 0 0 0 000000000001
ST9 032753 033502 0 0 0 0 000000000001
*032753 JUMPA 0,032754
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000032754
FT3 032753 032754 0 0 707070707070 0 000000032754
FT9 032754 032754 0 0 707070707070 0 000000032754
ET0 032754 032754 0 0 707070707070 0 000000032754
ST1A 032754 032754 0 0 707070707070 0 000000032754
ST9 032754 032754 0 0 707070707070 0 000000032754
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 341
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0498
*032754 MOVEI 13,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032754 032754 0 0 201540000000 0 0
IT1 032754 0 0 0 201540000000 0 0
AT3 032754 0 0 0 0 0 201540000000
AT6 032754 0 0 0 0 0 201540000000
FT1A 032754 0 0 0 0 0 0
FT9 032755 0 0 0 0 0 0
ET0 032755 0 0 0 0 0 0
ST1 032755 0 0 0 0 0 0
ST2 032755 0 0 0 0 0 0
ST9 032755 0 0 0 0 0 0
*032755 SOJGE 13,032757
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032755 032755 0 0 365540032757 0 000000032757
IT1 032755 0 0 0 365540032757 0 000000032757
AT3 032755 0 0 0 000000032757 0 365540032757
AT6 032755 032757 0 0 000000032757 0 365540032757
FT1A 032755 032757 0 0 000000032757 0 000000032757
FT2 032755 032757 0 0 0 0 000000032757
FT2RQ 032755 032757 0 0 0 0 000000032757
FT3 032755 032757 0 0 0 0 000000032757
FT9 032756 032757 0 0 0 0 000000032757
ET0 032756 032757 0 0 777777777777 0 000000032757
ST1 032756 032757 0 0 777777777777 0 000000032757
ST2 032756 032757 0 0 777777777777 0 000000032757
ST9 032756 032757 0 0 777777777777 0 000000032757
*032756 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 032756 032756 0 0 334000000000 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 342
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0499
IT1 032756 0 0 0 334000000000 0 707070707070
AT3 032756 0 0 0 0 0 334000000000
AT6 032756 0 0 0 0 0 334000000000
FT0 032756 0 0 0 707070707070 0 334000000000
FT1A 032756 0 0 0 707070707070 0 707070707070
FT9 032757 0 0 0 707070707070 0 707070707070
ET0 032760 0 0 0 707070707070 0 707070707070
ST1A 032760 0 0 0 707070707070 0 707070707070
ST9 032760 0 0 0 707070707070 0 707070707070
*032760 JUMPA 0,032761
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032760 032760 0 0 324000032761 0 000000032761
IT1 032760 0 0 0 324000032761 0 000000032761
AT3 032760 0 0 0 000000032761 0 324000032761
AT6 032760 032761 0 0 000000032761 0 324000032761
FT1A 032760 032761 0 0 000000032761 0 000000032761
FT2 032760 032761 0 0 0 0 000000032761
FT2RQ 032760 032761 0 0 707070707070 0 000000032761
FT3 032760 032761 0 0 707070707070 0 000000032761
FT9 032761 032761 0 0 707070707070 0 000000032761
ET0 032761 032761 0 0 707070707070 0 000000032761
ST1A 032761 032761 0 0 707070707070 0 000000032761
ST9 032761 032761 0 0 707070707070 0 000000032761
*032761 CAME 13,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032761 032761 0 0 312540033462 0 777777777777
IT1 032761 0 0 0 312540033462 0 777777777777
AT3 032761 0 0 0 000000033462 0 312540033462
AT6 032761 033462 0 0 000000033462 0 312540033462
FT0 032761 033462 0 0 777777777777 0 312540033462
FT1A 032761 033462 0 0 777777777777 0 777777777777
FT2 032761 033462 0 0 0 0 777777777777
FT2RQ 032761 033462 0 0 777777777777 0 777777777777
FT3 032761 033462 0 0 777777777777 0 777777777777
FT9 032762 033462 0 0 777777777777 0 777777777777
ET0 032763 033462 0 0 0 0 777777777777
ST1A 032763 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 343
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0500
ST9 032763 033462 0 0 0 0 777777777777
*032763 JUMPA 0,032764
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032763 032763 0 0 324000032764 0 000000032764
IT1 032763 0 0 0 324000032764 0 000000032764
AT3 032763 0 0 0 000000032764 0 324000032764
AT6 032763 032764 0 0 000000032764 0 324000032764
FT1A 032763 032764 0 0 000000032764 0 000000032764
FT2 032763 032764 0 0 0 0 000000032764
FT2RQ 032763 032764 0 0 707070707070 0 000000032764
FT3 032763 032764 0 0 707070707070 0 000000032764
FT9 032764 032764 0 0 707070707070 0 000000032764
ET0 032764 032764 0 0 707070707070 0 000000032764
ST1A 032764 032764 0 0 707070707070 0 000000032764
ST9 032764 032764 0 0 707070707070 0 000000032764
*032764 MOVEI 13,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032764 032764 0 0 201540000001 0 000000000001
IT1 032764 0 0 0 201540000001 0 000000000001
AT3 032764 0 0 0 000000000001 0 201540000001
AT6 032764 000001 0 0 000000000001 0 201540000001
FT1A 032764 000001 0 0 000000000001 0 000000000001
FT9 032765 000001 0 0 000000000001 0 000000000001
ET0 032765 000001 0 0 000000000001 0 000000000001
ST1 032765 000001 0 0 000000000001 0 000000000001
ST2 032765 000001 0 0 000000000001 0 000000000001
ST9 032765 000001 0 0 000000000001 0 000000000001
*032765 SOJGE 13,032767
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032765 032765 0 0 365540032767 0 000000032767
IT1 032765 0 0 0 365540032767 0 000000032767
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 344
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0501
AT3 032765 0 0 0 000000032767 0 365540032767
AT6 032765 032767 0 0 000000032767 0 365540032767
FT1A 032765 032767 0 0 000000032767 0 000000032767
FT2 032765 032767 0 0 0 0 000000032767
FT2RQ 032765 032767 0 0 000000000001 0 000000032767
FT3 032765 032767 0 0 000000000001 0 000000032767
FT9 032766 032767 0 0 000000000001 0 000000032767
ET0 032767 032767 0 0 0 0 000000032767
ST1 032767 032767 0 0 0 0 000000032767
ST2 032767 032767 0 0 0 0 000000032767
ST9 032767 032767 0 0 0 0 000000032767
*032767 JUMPA 0,032770
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032767 032767 0 0 324000032770 0 000000032770
IT1 032767 0 0 0 324000032770 0 000000032770
AT3 032767 0 0 0 000000032770 0 324000032770
AT6 032767 032770 0 0 000000032770 0 324000032770
FT1A 032767 032770 0 0 000000032770 0 000000032770
FT2 032767 032770 0 0 0 0 000000032770
FT2RQ 032767 032770 0 0 707070707070 0 000000032770
FT3 032767 032770 0 0 707070707070 0 000000032770
FT9 032770 032770 0 0 707070707070 0 000000032770
ET0 032770 032770 0 0 707070707070 0 000000032770
ST1A 032770 032770 0 0 707070707070 0 000000032770
ST9 032770 032770 0 0 707070707070 0 000000032770
*032770 CAME 13,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032770 032770 0 0 312540033501 0 0
IT1 032770 0 0 0 312540033501 0 0
AT3 032770 0 0 0 000000033501 0 312540033501
AT6 032770 033501 0 0 000000033501 0 312540033501
FT0 032770 033501 0 0 0 0 312540033501
FT1A 032770 033501 0 0 0 0 0
FT2 032770 033501 0 0 0 0 0
FT2RQ 032770 033501 0 0 0 0 0
FT3 032770 033501 0 0 0 0 0
FT9 032771 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 345
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0502
ET0 032772 033501 0 0 0 0 0
ST1A 032772 033501 0 0 0 0 0
ST9 032772 033501 0 0 0 0 0
*032772 JUMPA 0,032773
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032772 032772 0 0 324000032773 0 000000032773
IT1 032772 0 0 0 324000032773 0 000000032773
AT3 032772 0 0 0 000000032773 0 324000032773
AT6 032772 032773 0 0 000000032773 0 324000032773
FT1A 032772 032773 0 0 000000032773 0 000000032773
FT2 032772 032773 0 0 0 0 000000032773
FT2RQ 032772 032773 0 0 707070707070 0 000000032773
FT3 032772 032773 0 0 707070707070 0 000000032773
FT9 032773 032773 0 0 707070707070 0 000000032773
ET0 032773 032773 0 0 707070707070 0 000000032773
ST1A 032773 032773 0 0 707070707070 0 000000032773
ST9 032773 032773 0 0 707070707070 0 000000032773
*032773 MOVEI 13,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 032773 032773 0 0 201540000002 0 000000000002
IT1 032773 0 0 0 201540000002 0 000000000002
AT3 032773 0 0 0 000000000002 0 201540000002
AT6 032773 000002 0 0 000000000002 0 201540000002
FT1A 032773 000002 0 0 000000000002 0 000000000002
FT9 032774 000002 0 0 000000000002 0 000000000002
ET0 032774 000002 0 0 000000000002 0 000000000002
ST1 032774 000002 0 0 000000000002 0 000000000002
ST2 032774 000002 0 0 000000000002 0 000000000002
ST9 032774 000002 0 0 000000000002 0 000000000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 346
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0503
*032774 SOJGE 13,032776
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 032774 032774 0 0 365540032776 0 000000032776
IT1 032774 0 0 0 365540032776 0 000000032776
AT3 032774 0 0 0 000000032776 0 365540032776
AT6 032774 032776 0 0 000000032776 0 365540032776
FT1A 032774 032776 0 0 000000032776 0 000000032776
FT2 032774 032776 0 0 0 0 000000032776
FT2RQ 032774 032776 0 0 000000000002 0 000000032776
FT3 032774 032776 0 0 000000000002 0 000000032776
FT9 032775 032776 0 0 000000000002 0 000000032776
ET0 032776 032776 0 0 000000000001 0 000000032776
ST1 032776 032776 0 0 000000000001 0 000000032776
ST2 032776 032776 0 0 000000000001 0 000000032776
ST9 032776 032776 0 0 000000000001 0 000000032776
*032776 JUMPA 0,032777
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032776 032776 0 0 324000032777 0 000000032777
IT1 032776 0 0 0 324000032777 0 000000032777
AT3 032776 0 0 0 000000032777 0 324000032777
AT6 032776 032777 0 0 000000032777 0 324000032777
FT1A 032776 032777 0 0 000000032777 0 000000032777
FT2 032776 032777 0 0 0 0 000000032777
FT2RQ 032776 032777 0 0 707070707070 0 000000032777
FT3 032776 032777 0 0 707070707070 0 000000032777
FT9 032777 032777 0 0 707070707070 0 000000032777
ET0 032777 032777 0 0 707070707070 0 000000032777
ST1A 032777 032777 0 0 707070707070 0 000000032777
ST9 032777 032777 0 0 707070707070 0 000000032777
*032777 CAME 13,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 032777 032777 0 0 312540033502 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 347
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0504
IT1 032777 0 0 0 312540033502 0 000000000001
AT3 032777 0 0 0 000000033502 0 312540033502
AT6 032777 033502 0 0 000000033502 0 312540033502
FT0 032777 033502 0 0 000000000001 0 312540033502
FT1A 032777 033502 0 0 000000000001 0 000000000001
FT2 032777 033502 0 0 0 0 000000000001
FT2RQ 032777 033502 0 0 000000000001 0 000000000001
FT3 032777 033502 0 0 000000000001 0 000000000001
FT9 0 033502 0 0 000000000001 0 000000000001
ET0 033001 033502 0 0 0 0 000000000001
ST1A 033001 033502 0 0 0 0 000000000001
ST9 033001 033502 0 0 0 0 000000000001
*033001 JUMPA 0,033002
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033001 033001 0 0 324000033002 0 000000033002
IT1 033001 0 0 0 324000033002 0 000000033002
AT3 033001 0 0 0 000000033002 0 324000033002
AT6 033001 033002 0 0 000000033002 0 324000033002
FT1A 033001 033002 0 0 000000033002 0 000000033002
FT2 033001 033002 0 0 0 0 000000033002
FT2RQ 033001 033002 0 0 707070707070 0 000000033002
FT3 033001 033002 0 0 707070707070 0 000000033002
FT9 033002 033002 0 0 707070707070 0 000000033002
ET0 033002 033002 0 0 707070707070 0 000000033002
ST1A 033002 033002 0 0 707070707070 0 000000033002
ST9 033002 033002 0 0 707070707070 0 000000033002
*033002 MOVEI 12,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033002 033002 0 0 201500000000 0 0
IT1 033002 0 0 0 201500000000 0 0
AT3 033002 0 0 0 0 0 201500000000
AT6 033002 0 0 0 0 0 201500000000
FT1A 033002 0 0 0 0 0 0
FT9 033003 0 0 0 0 0 0
ET0 033003 0 0 0 0 0 0
ST1 033003 0 0 0 0 0 0
ST2 033003 0 0 0 0 0 0
ST9 033003 0 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 348
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0505
*033003 SOJN 12,033005
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033003 033003 0 0 366500033005 0 000000033005
IT1 033003 0 0 0 366500033005 0 000000033005
AT3 033003 0 0 0 000000033005 0 366500033005
AT6 033003 033005 0 0 000000033005 0 366500033005
FT1A 033003 033005 0 0 000000033005 0 000000033005
FT2 033003 033005 0 0 0 0 000000033005
FT2RQ 033003 033005 0 0 0 0 000000033005
FT3 033003 033005 0 0 0 0 000000033005
FT9 033004 033005 0 0 0 0 000000033005
ET0 033005 033005 0 0 777777777777 0 000000033005
ST1 033005 033005 0 0 777777777777 0 000000033005
ST2 033005 033005 0 0 777777777777 0 000000033005
ST9 033005 033005 0 0 777777777777 0 000000033005
*033005 JUMPA 0,033006
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033006
FT3 033005 033006 0 0 707070707070 0 000000033006
FT9 033006 033006 0 0 707070707070 0 000000033006
ET0 033006 033006 0 0 707070707070 0 000000033006
ST1A 033006 033006 0 0 707070707070 0 000000033006
ST9 033006 033006 0 0 707070707070 0 000000033006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 349
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0506
*033006 CAME 12,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033006 033006 0 0 312500033462 0 777777777777
IT1 033006 0 0 0 312500033462 0 777777777777
AT3 033006 0 0 0 000000033462 0 312500033462
AT6 033006 033462 0 0 000000033462 0 312500033462
FT0 033006 033462 0 0 777777777777 0 312500033462
FT1A 033006 033462 0 0 777777777777 0 777777777777
FT2 033006 033462 0 0 0 0 777777777777
FT2RQ 033006 033462 0 0 777777777777 0 777777777777
FT3 033006 033462 0 0 777777777777 0 777777777777
FT9 033007 033462 0 0 777777777777 0 777777777777
ET0 033010 033462 0 0 0 0 777777777777
ST1A 033010 033462 0 0 0 0 777777777777
ST9 033010 033462 0 0 0 0 777777777777
*033010 JUMPA 0,033011
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033010 033010 0 0 324000033011 0 000000033011
IT1 033010 0 0 0 324000033011 0 000000033011
AT3 033010 0 0 0 000000033011 0 324000033011
AT6 033010 033011 0 0 000000033011 0 324000033011
FT1A 033010 033011 0 0 000000033011 0 000000033011
FT2 033010 033011 0 0 0 0 000000033011
FT2RQ 033010 033011 0 0 707070707070 0 000000033011
FT3 033010 033011 0 0 707070707070 0 000000033011
FT9 033011 033011 0 0 707070707070 0 000000033011
ET0 033011 033011 0 0 707070707070 0 000000033011
ST1A 033011 033011 0 0 707070707070 0 000000033011
ST9 033011 033011 0 0 707070707070 0 000000033011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 350
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0507
*033011 MOVEI 12,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033011 033011 0 0 201500000001 0 000000000001
IT1 033011 0 0 0 201500000001 0 000000000001
AT3 033011 0 0 0 000000000001 0 201500000001
AT6 033011 000001 0 0 000000000001 0 201500000001
FT1A 033011 000001 0 0 000000000001 0 000000000001
FT9 033012 000001 0 0 000000000001 0 000000000001
ET0 033012 000001 0 0 000000000001 0 000000000001
ST1 033012 000001 0 0 000000000001 0 000000000001
ST2 033012 000001 0 0 000000000001 0 000000000001
ST9 033012 000001 0 0 000000000001 0 000000000001
*033012 SOJN 12,033014
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033012 033012 0 0 366500033014 0 000000033014
IT1 033012 0 0 0 366500033014 0 000000033014
AT3 033012 0 0 0 000000033014 0 366500033014
AT6 033012 033014 0 0 000000033014 0 366500033014
FT1A 033012 033014 0 0 000000033014 0 000000033014
FT2 033012 033014 0 0 0 0 000000033014
FT2RQ 033012 033014 0 0 000000000001 0 000000033014
FT3 033012 033014 0 0 000000000001 0 000000033014
FT9 033013 033014 0 0 000000000001 0 000000033014
ET0 033013 033014 0 0 0 0 000000033014
ST1 033013 033014 0 0 0 0 000000033014
ST2 033013 033014 0 0 0 0 000000033014
ST9 033013 033014 0 0 0 0 000000033014
*033013 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033013 033013 0 0 334000000000 0 707070707070
IT1 033013 0 0 0 334000000000 0 707070707070
AT3 033013 0 0 0 0 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 351
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0508
AT6 033013 0 0 0 0 0 334000000000
FT0 033013 0 0 0 707070707070 0 334000000000
FT1A 033013 0 0 0 707070707070 0 707070707070
FT9 033014 0 0 0 707070707070 0 707070707070
ET0 033015 0 0 0 707070707070 0 707070707070
ST1A 033015 0 0 0 707070707070 0 707070707070
ST9 033015 0 0 0 707070707070 0 707070707070
*033015 JUMPA 0,033016
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033015 033015 0 0 324000033016 0 000000033016
IT1 033015 0 0 0 324000033016 0 000000033016
AT3 033015 0 0 0 000000033016 0 324000033016
AT6 033015 033016 0 0 000000033016 0 324000033016
FT1A 033015 033016 0 0 000000033016 0 000000033016
FT2 033015 033016 0 0 0 0 000000033016
FT2RQ 033015 033016 0 0 707070707070 0 000000033016
FT3 033015 033016 0 0 707070707070 0 000000033016
FT9 033016 033016 0 0 707070707070 0 000000033016
ET0 033016 033016 0 0 707070707070 0 000000033016
ST1A 033016 033016 0 0 707070707070 0 000000033016
ST9 033016 033016 0 0 707070707070 0 000000033016
*033016 CAME 12,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033016 033016 0 0 312500033501 0 0
IT1 033016 0 0 0 312500033501 0 0
AT3 033016 0 0 0 000000033501 0 312500033501
AT6 033016 033501 0 0 000000033501 0 312500033501
FT0 033016 033501 0 0 0 0 312500033501
FT1A 033016 033501 0 0 0 0 0
FT2 033016 033501 0 0 0 0 0
FT2RQ 033016 033501 0 0 0 0 0
FT3 033016 033501 0 0 0 0 0
FT9 033017 033501 0 0 0 0 0
ET0 033020 033501 0 0 0 0 0
ST1A 033020 033501 0 0 0 0 0
ST9 033020 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 352
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0509
*033020 JUMPA 0,033021
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033021
FT3 033020 033021 0 0 707070707070 0 000000033021
FT9 033021 033021 0 0 707070707070 0 000000033021
ET0 033021 033021 0 0 707070707070 0 000000033021
ST1A 033021 033021 0 0 707070707070 0 000000033021
ST9 033021 033021 0 0 707070707070 0 000000033021
*033021 MOVEI 12,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033021 033021 0 0 201500000002 0 000000000002
IT1 033021 0 0 0 201500000002 0 000000000002
AT3 033021 0 0 0 000000000002 0 201500000002
AT6 033021 000002 0 0 000000000002 0 201500000002
FT1A 033021 000002 0 0 000000000002 0 000000000002
FT9 033022 000002 0 0 000000000002 0 000000000002
ET0 033022 000002 0 0 000000000002 0 000000000002
ST1 033022 000002 0 0 000000000002 0 000000000002
ST2 033022 000002 0 0 000000000002 0 000000000002
ST9 033022 000002 0 0 000000000002 0 000000000002
*033022 SOJN 12,033024
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033022 033022 0 0 366500033024 0 000000033024
IT1 033022 0 0 0 366500033024 0 000000033024
AT3 033022 0 0 0 000000033024 0 366500033024
AT6 033022 033024 0 0 000000033024 0 366500033024
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 353
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0510
FT1A 033022 033024 0 0 000000033024 0 000000033024
FT2 033022 033024 0 0 0 0 000000033024
FT2RQ 033022 033024 0 0 000000000002 0 000000033024
FT3 033022 033024 0 0 000000000002 0 000000033024
FT9 033023 033024 0 0 000000000002 0 000000033024
ET0 033024 033024 0 0 000000000001 0 000000033024
ST1 033024 033024 0 0 000000000001 0 000000033024
ST2 033024 033024 0 0 000000000001 0 000000033024
ST9 033024 033024 0 0 000000000001 0 000000033024
*033024 JUMPA 0,033025
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033024 033024 0 0 324000033025 0 000000033025
IT1 033024 0 0 0 324000033025 0 000000033025
AT3 033024 0 0 0 000000033025 0 324000033025
AT6 033024 033025 0 0 000000033025 0 324000033025
FT1A 033024 033025 0 0 000000033025 0 000000033025
FT2 033024 033025 0 0 0 0 000000033025
FT2RQ 033024 033025 0 0 707070707070 0 000000033025
FT3 033024 033025 0 0 707070707070 0 000000033025
FT9 033025 033025 0 0 707070707070 0 000000033025
ET0 033025 033025 0 0 707070707070 0 000000033025
ST1A 033025 033025 0 0 707070707070 0 000000033025
ST9 033025 033025 0 0 707070707070 0 000000033025
*033025 CAME 12,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033025 033025 0 0 312500033502 0 000000000001
IT1 033025 0 0 0 312500033502 0 000000000001
AT3 033025 0 0 0 000000033502 0 312500033502
AT6 033025 033502 0 0 000000033502 0 312500033502
FT0 033025 033502 0 0 000000000001 0 312500033502
FT1A 033025 033502 0 0 000000000001 0 000000000001
FT2 033025 033502 0 0 0 0 000000000001
FT2RQ 033025 033502 0 0 000000000001 0 000000000001
FT3 033025 033502 0 0 000000000001 0 000000000001
FT9 033026 033502 0 0 000000000001 0 000000000001
ET0 033027 033502 0 0 0 0 000000000001
ST1A 033027 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 354
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0511
ST9 033027 033502 0 0 0 0 000000000001
*033027 JUMPA 0,033030
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033027 033027 0 0 324000033030 0 000000033030
IT1 033027 0 0 0 324000033030 0 000000033030
AT3 033027 0 0 0 000000033030 0 324000033030
AT6 033027 033030 0 0 000000033030 0 324000033030
FT1A 033027 033030 0 0 000000033030 0 000000033030
FT2 033027 033030 0 0 0 0 000000033030
FT2RQ 033027 033030 0 0 707070707070 0 000000033030
FT3 033027 033030 0 0 707070707070 0 000000033030
FT9 033030 033030 0 0 707070707070 0 000000033030
ET0 033030 033030 0 0 707070707070 0 000000033030
ST1A 033030 033030 0 0 707070707070 0 000000033030
ST9 033030 033030 0 0 707070707070 0 000000033030
*033030 MOVEI 11,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033030 033030 0 0 201440000000 0 0
IT1 033030 0 0 0 201440000000 0 0
AT3 033030 0 0 0 0 0 201440000000
AT6 033030 0 0 0 0 0 201440000000
FT1A 033030 0 0 0 0 0 0
FT9 033031 0 0 0 0 0 0
ET0 033031 0 0 0 0 0 0
ST1 033031 0 0 0 0 0 0
ST2 033031 0 0 0 0 0 0
ST9 033031 0 0 0 0 0 0
*033031 SOJG 11,033033
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033031 033031 0 0 367440033033 0 000000033033
IT1 033031 0 0 0 367440033033 0 000000033033
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 355
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0512
AT3 033031 0 0 0 000000033033 0 367440033033
AT6 033031 033033 0 0 000000033033 0 367440033033
FT1A 033031 033033 0 0 000000033033 0 000000033033
FT2 033031 033033 0 0 0 0 000000033033
FT2RQ 033031 033033 0 0 0 0 000000033033
FT3 033031 033033 0 0 0 0 000000033033
FT9 033032 033033 0 0 0 0 000000033033
ET0 033032 033033 0 0 777777777777 0 000000033033
ST1 033032 033033 0 0 777777777777 0 000000033033
ST2 033032 033033 0 0 777777777777 0 000000033033
ST9 033032 033033 0 0 777777777777 0 000000033033
*033032 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033032 033032 0 0 334000000000 0 707070707070
IT1 033032 0 0 0 334000000000 0 707070707070
AT3 033032 0 0 0 0 0 334000000000
AT6 033032 0 0 0 0 0 334000000000
FT0 033032 0 0 0 707070707070 0 334000000000
FT1A 033032 0 0 0 707070707070 0 707070707070
FT9 033033 0 0 0 707070707070 0 707070707070
ET0 033034 0 0 0 707070707070 0 707070707070
ST1A 033034 0 0 0 707070707070 0 707070707070
ST9 033034 0 0 0 707070707070 0 707070707070
*033034 JUMPA 0,033035
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033034 033034 0 0 324000033035 0 000000033035
IT1 033034 0 0 0 324000033035 0 000000033035
AT3 033034 0 0 0 000000033035 0 324000033035
AT6 033034 033035 0 0 000000033035 0 324000033035
FT1A 033034 033035 0 0 000000033035 0 000000033035
FT2 033034 033035 0 0 0 0 000000033035
FT2RQ 033034 033035 0 0 707070707070 0 000000033035
FT3 033034 033035 0 0 707070707070 0 000000033035
FT9 033035 033035 0 0 707070707070 0 000000033035
ET0 033035 033035 0 0 707070707070 0 000000033035
ST1A 033035 033035 0 0 707070707070 0 000000033035
ST9 033035 033035 0 0 707070707070 0 000000033035
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 356
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0513
*033035 CAME 11,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033035 033035 0 0 312440033462 0 777777777777
IT1 033035 0 0 0 312440033462 0 777777777777
AT3 033035 0 0 0 000000033462 0 312440033462
AT6 033035 033462 0 0 000000033462 0 312440033462
FT0 033035 033462 0 0 777777777777 0 312440033462
FT1A 033035 033462 0 0 777777777777 0 777777777777
FT2 033035 033462 0 0 0 0 777777777777
FT2RQ 033035 033462 0 0 777777777777 0 777777777777
FT3 033035 033462 0 0 777777777777 0 777777777777
FT9 033036 033462 0 0 777777777777 0 777777777777
ET0 033037 033462 0 0 0 0 777777777777
ST1A 033037 033462 0 0 0 0 777777777777
ST9 033037 033462 0 0 0 0 777777777777
*033037 JUMPA 0,033040
INITIAL
C(AC)=707070 707070
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
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 707070707070 0 000000033040
FT3 033037 033040 0 0 707070707070 0 000000033040
FT9 033040 033040 0 0 707070707070 0 000000033040
ET0 033040 033040 0 0 707070707070 0 000000033040
ST1A 033040 033040 0 0 707070707070 0 000000033040
ST9 033040 033040 0 0 707070707070 0 000000033040
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 357
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0514
*033040 MOVEI 11,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033040 033040 0 0 201440000001 0 000000000001
IT1 033040 0 0 0 201440000001 0 000000000001
AT3 033040 0 0 0 000000000001 0 201440000001
AT6 033040 000001 0 0 000000000001 0 201440000001
FT1A 033040 000001 0 0 000000000001 0 000000000001
FT9 033041 000001 0 0 000000000001 0 000000000001
ET0 033041 000001 0 0 000000000001 0 000000000001
ST1 033041 000001 0 0 000000000001 0 000000000001
ST2 033041 000001 0 0 000000000001 0 000000000001
ST9 033041 000001 0 0 000000000001 0 000000000001
*033041 SOJG 11,033043
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033041 033041 0 0 367440033043 0 000000033043
IT1 033041 0 0 0 367440033043 0 000000033043
AT3 033041 0 0 0 000000033043 0 367440033043
AT6 033041 033043 0 0 000000033043 0 367440033043
FT1A 033041 033043 0 0 000000033043 0 000000033043
FT2 033041 033043 0 0 0 0 000000033043
FT2RQ 033041 033043 0 0 000000000001 0 000000033043
FT3 033041 033043 0 0 000000000001 0 000000033043
FT9 033042 033043 0 0 000000000001 0 000000033043
ET0 033042 033043 0 0 0 0 000000033043
ST1 033042 033043 0 0 0 0 000000033043
ST2 033042 033043 0 0 0 0 000000033043
ST9 033042 033043 0 0 0 0 000000033043
*033042 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033042 033042 0 0 334000000000 0 707070707070
IT1 033042 0 0 0 334000000000 0 707070707070
AT3 033042 0 0 0 0 0 334000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 358
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0515
AT6 033042 0 0 0 0 0 334000000000
FT0 033042 0 0 0 707070707070 0 334000000000
FT1A 033042 0 0 0 707070707070 0 707070707070
FT9 033043 0 0 0 707070707070 0 707070707070
ET0 033044 0 0 0 707070707070 0 707070707070
ST1A 033044 0 0 0 707070707070 0 707070707070
ST9 033044 0 0 0 707070707070 0 707070707070
*033044 JUMPA 0,033045
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033045
FT3 033044 033045 0 0 707070707070 0 000000033045
FT9 033045 033045 0 0 707070707070 0 000000033045
ET0 033045 033045 0 0 707070707070 0 000000033045
ST1A 033045 033045 0 0 707070707070 0 000000033045
ST9 033045 033045 0 0 707070707070 0 000000033045
*033045 CAME 11,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033045 033045 0 0 312440033501 0 0
IT1 033045 0 0 0 312440033501 0 0
AT3 033045 0 0 0 000000033501 0 312440033501
AT6 033045 033501 0 0 000000033501 0 312440033501
FT0 033045 033501 0 0 0 0 312440033501
FT1A 033045 033501 0 0 0 0 0
FT2 033045 033501 0 0 0 0 0
FT2RQ 033045 033501 0 0 0 0 0
FT3 033045 033501 0 0 0 0 0
FT9 033046 033501 0 0 0 0 0
ET0 033047 033501 0 0 0 0 0
ST1A 033047 033501 0 0 0 0 0
ST9 033047 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 359
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0516
*033047 JUMPA 0,033050
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033047 033047 0 0 324000033050 0 000000033050
IT1 033047 0 0 0 324000033050 0 000000033050
AT3 033047 0 0 0 000000033050 0 324000033050
AT6 033047 033050 0 0 000000033050 0 324000033050
FT1A 033047 033050 0 0 000000033050 0 000000033050
FT2 033047 033050 0 0 0 0 000000033050
FT2RQ 033047 033050 0 0 707070707070 0 000000033050
FT3 033047 033050 0 0 707070707070 0 000000033050
FT9 033050 033050 0 0 707070707070 0 000000033050
ET0 033050 033050 0 0 707070707070 0 000000033050
ST1A 033050 033050 0 0 707070707070 0 000000033050
ST9 033050 033050 0 0 707070707070 0 000000033050
*033050 MOVEI 11,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033050 033050 0 0 201440000002 0 000000000002
IT1 033050 0 0 0 201440000002 0 000000000002
AT3 033050 0 0 0 000000000002 0 201440000002
AT6 033050 000002 0 0 000000000002 0 201440000002
FT1A 033050 000002 0 0 000000000002 0 000000000002
FT9 033051 000002 0 0 000000000002 0 000000000002
ET0 033051 000002 0 0 000000000002 0 000000000002
ST1 033051 000002 0 0 000000000002 0 000000000002
ST2 033051 000002 0 0 000000000002 0 000000000002
ST9 033051 000002 0 0 000000000002 0 000000000002
*033051 SOJG 11,033053
INITIAL
C(AC)=000000 000002
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033051 033051 0 0 367440033053 0 000000033053
IT1 033051 0 0 0 367440033053 0 000000033053
AT3 033051 0 0 0 000000033053 0 367440033053
AT6 033051 033053 0 0 000000033053 0 367440033053
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 360
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0517
FT1A 033051 033053 0 0 000000033053 0 000000033053
FT2 033051 033053 0 0 0 0 000000033053
FT2RQ 033051 033053 0 0 000000000002 0 000000033053
FT3 033051 033053 0 0 000000000002 0 000000033053
FT9 033052 033053 0 0 000000000002 0 000000033053
ET0 033053 033053 0 0 000000000001 0 000000033053
ST1 033053 033053 0 0 000000000001 0 000000033053
ST2 033053 033053 0 0 000000000001 0 000000033053
ST9 033053 033053 0 0 000000000001 0 000000033053
*033053 JUMPA 0,033054
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033053 033053 0 0 324000033054 0 000000033054
IT1 033053 0 0 0 324000033054 0 000000033054
AT3 033053 0 0 0 000000033054 0 324000033054
AT6 033053 033054 0 0 000000033054 0 324000033054
FT1A 033053 033054 0 0 000000033054 0 000000033054
FT2 033053 033054 0 0 0 0 000000033054
FT2RQ 033053 033054 0 0 707070707070 0 000000033054
FT3 033053 033054 0 0 707070707070 0 000000033054
FT9 033054 033054 0 0 707070707070 0 000000033054
ET0 033054 033054 0 0 707070707070 0 000000033054
ST1A 033054 033054 0 0 707070707070 0 000000033054
ST9 033054 033054 0 0 707070707070 0 000000033054
*033054 CAME 11,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033054 033054 0 0 312440033502 0 000000000001
IT1 033054 0 0 0 312440033502 0 000000000001
AT3 033054 0 0 0 000000033502 0 312440033502
AT6 033054 033502 0 0 000000033502 0 312440033502
FT0 033054 033502 0 0 000000000001 0 312440033502
FT1A 033054 033502 0 0 000000000001 0 000000000001
FT2 033054 033502 0 0 0 0 000000000001
FT2RQ 033054 033502 0 0 000000000001 0 000000000001
FT3 033054 033502 0 0 000000000001 0 000000000001
FT9 033055 033502 0 0 000000000001 0 000000000001
ET0 033056 033502 0 0 0 0 000000000001
ST1A 033056 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 361
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0518
ST9 033056 033502 0 0 0 0 000000000001
*033056 JUMPA 0,033057
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033056 033056 0 0 324000033057 0 000000033057
IT1 033056 0 0 0 324000033057 0 000000033057
AT3 033056 0 0 0 000000033057 0 324000033057
AT6 033056 033057 0 0 000000033057 0 324000033057
FT1A 033056 033057 0 0 000000033057 0 000000033057
FT2 033056 033057 0 0 0 0 000000033057
FT2RQ 033056 033057 0 0 707070707070 0 000000033057
FT3 033056 033057 0 0 707070707070 0 000000033057
FT9 033057 033057 0 0 707070707070 0 000000033057
ET0 033057 033057 0 0 707070707070 0 000000033057
ST1A 033057 033057 0 0 707070707070 0 000000033057
ST9 033057 033057 0 0 707070707070 0 000000033057
*033057 MOVE 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033057 033057 0 0 200000033474 0 707070707070
IT1 033057 0 0 0 200000033474 0 707070707070
AT3 033057 0 0 0 000000033474 0 200000033474
AT6 033057 033474 0 0 000000033474 0 200000033474
FT0 033057 033474 0 0 707070707070 0 200000033474
FT1A 033057 033474 0 0 707070707070 0 707070707070
FT9 033060 033474 0 0 707070707070 0 707070707070
ET0 033060 033474 0 0 707070707070 0 707070707070
ST1 033060 033474 0 0 707070707070 0 707070707070
ST2 033060 033474 0 0 707070707070 0 707070707070
ST9 033060 033474 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 362
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0519
*033060 MOVEI 1,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033060 033060 0 0 201040000000 0 0
IT1 033060 0 0 0 201040000000 0 0
AT3 033060 0 0 0 0 0 201040000000
AT6 033060 0 0 0 0 0 201040000000
FT1A 033060 0 0 0 0 0 0
FT9 033061 0 0 0 0 0 0
ET0 033061 0 0 0 0 0 0
ST1 033061 0 0 0 0 0 0
ST2 033061 0 0 0 0 0 0
ST9 033061 0 0 0 0 0 0
*033061 SOSL 0,000001
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=707070 707070
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033061 033061 0 0 371000000001 0 0
IT1 033061 0 0 0 371000000001 0 0
AT3 033061 0 0 0 000000000001 0 371000000001
AT6 033061 000001 0 0 000000000001 0 371000000001
FT0 033061 000001 0 0 0 0 371000000001
FT1A 033061 000001 0 0 0 0 0
FT9 033062 000001 0 0 0 0 0
ET0 033063 000001 0 0 777777777777 0 0
ST5 033063 000001 0 0 777777777777 0 0
ST6A 033063 000001 0 0 777777777777 0 0
ST9 033063 000001 0 0 777777777777 0 0
*033063 JUMPA 0,033064
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033063 033063 0 0 324000033064 0 000000033064
IT1 033063 0 0 0 324000033064 0 000000033064
AT3 033063 0 0 0 000000033064 0 324000033064
AT6 033063 033064 0 0 000000033064 0 324000033064
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 363
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0520
FT1A 033063 033064 0 0 000000033064 0 000000033064
FT2 033063 033064 0 0 0 0 000000033064
FT2RQ 033063 033064 0 0 707070707070 0 000000033064
FT3 033063 033064 0 0 707070707070 0 000000033064
FT9 033064 033064 0 0 707070707070 0 000000033064
ET0 033064 033064 0 0 707070707070 0 000000033064
ST1A 033064 033064 0 0 707070707070 0 000000033064
ST9 033064 033064 0 0 707070707070 0 000000033064
*033064 CAME 1,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033064 033064 0 0 312040033462 0 777777777777
IT1 033064 0 0 0 312040033462 0 777777777777
AT3 033064 0 0 0 000000033462 0 312040033462
AT6 033064 033462 0 0 000000033462 0 312040033462
FT0 033064 033462 0 0 777777777777 0 312040033462
FT1A 033064 033462 0 0 777777777777 0 777777777777
FT2 033064 033462 0 0 0 0 777777777777
FT2RQ 033064 033462 0 0 777777777777 0 777777777777
FT3 033064 033462 0 0 777777777777 0 777777777777
FT9 033065 033462 0 0 777777777777 0 777777777777
ET0 033066 033462 0 0 0 0 777777777777
ST1A 033066 033462 0 0 0 0 777777777777
ST9 033066 033462 0 0 0 0 777777777777
*033066 JUMPA 0,033067
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033067
FT3 033066 033067 0 0 707070707070 0 000000033067
FT9 033067 033067 0 0 707070707070 0 000000033067
ET0 033067 033067 0 0 707070707070 0 000000033067
ST1A 033067 033067 0 0 707070707070 0 000000033067
ST9 033067 033067 0 0 707070707070 0 000000033067
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 364
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0521
*033067 CAME 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033067 033067 0 0 312000033474 0 707070707070
IT1 033067 0 0 0 312000033474 0 707070707070
AT3 033067 0 0 0 000000033474 0 312000033474
AT6 033067 033474 0 0 000000033474 0 312000033474
FT0 033067 033474 0 0 707070707070 0 312000033474
FT1A 033067 033474 0 0 707070707070 0 707070707070
FT2 033067 033474 0 0 0 0 707070707070
FT2RQ 033067 033474 0 0 707070707070 0 707070707070
FT3 033067 033474 0 0 707070707070 0 707070707070
FT9 033070 033474 0 0 707070707070 0 707070707070
ET0 033071 033474 0 0 0 0 707070707070
ST1A 033071 033474 0 0 0 0 707070707070
ST9 033071 033474 0 0 0 0 707070707070
*033071 JUMPA 0,033072
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033071 033071 0 0 324000033072 0 000000033072
IT1 033071 0 0 0 324000033072 0 000000033072
AT3 033071 0 0 0 000000033072 0 324000033072
AT6 033071 033072 0 0 000000033072 0 324000033072
FT1A 033071 033072 0 0 000000033072 0 000000033072
FT2 033071 033072 0 0 0 0 000000033072
FT2RQ 033071 033072 0 0 707070707070 0 000000033072
FT3 033071 033072 0 0 707070707070 0 000000033072
FT9 033072 033072 0 0 707070707070 0 000000033072
ET0 033072 033072 0 0 707070707070 0 000000033072
ST1A 033072 033072 0 0 707070707070 0 000000033072
ST9 033072 033072 0 0 707070707070 0 000000033072
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 365
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0522
*033072 MOVE 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033072 033072 0 0 200000033474 0 707070707070
IT1 033072 0 0 0 200000033474 0 707070707070
AT3 033072 0 0 0 000000033474 0 200000033474
AT6 033072 033474 0 0 000000033474 0 200000033474
FT0 033072 033474 0 0 707070707070 0 200000033474
FT1A 033072 033474 0 0 707070707070 0 707070707070
FT9 033073 033474 0 0 707070707070 0 707070707070
ET0 033073 033474 0 0 707070707070 0 707070707070
ST1 033073 033474 0 0 707070707070 0 707070707070
ST2 033073 033474 0 0 707070707070 0 707070707070
ST9 033073 033474 0 0 707070707070 0 707070707070
*033073 MOVEI 1,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033073 033073 0 0 201040000001 0 000000000001
IT1 033073 0 0 0 201040000001 0 000000000001
AT3 033073 0 0 0 000000000001 0 201040000001
AT6 033073 000001 0 0 000000000001 0 201040000001
FT1A 033073 000001 0 0 000000000001 0 000000000001
FT9 033074 000001 0 0 000000000001 0 000000000001
ET0 033074 000001 0 0 000000000001 0 000000000001
ST1 033074 000001 0 0 000000000001 0 000000000001
ST2 033074 000001 0 0 000000000001 0 000000000001
ST9 033074 000001 0 0 000000000001 0 000000000001
*033074 SOSL 0,000001
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=707070 707070
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033074 033074 0 0 371000000001 0 000000000001
IT1 033074 0 0 0 371000000001 0 000000000001
AT3 033074 0 0 0 000000000001 0 371000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 366
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0523
AT6 033074 000001 0 0 000000000001 0 371000000001
FT0 033074 000001 0 0 000000000001 0 371000000001
FT1A 033074 000001 0 0 000000000001 0 000000000001
FT9 033075 000001 0 0 000000000001 0 000000000001
ET0 033075 000001 0 0 0 0 000000000001
ST5 033075 000001 0 0 0 0 000000000001
ST6A 033075 000001 0 0 0 0 000000000001
ST9 033075 000001 0 0 0 0 000000000001
*033075 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033075 033075 0 0 334000000000 0 707070707070
IT1 033075 0 0 0 334000000000 0 707070707070
AT3 033075 0 0 0 0 0 334000000000
AT6 033075 0 0 0 0 0 334000000000
FT0 033075 0 0 0 707070707070 0 334000000000
FT1A 033075 0 0 0 707070707070 0 707070707070
FT9 033076 0 0 0 707070707070 0 707070707070
ET0 033077 0 0 0 707070707070 0 707070707070
ST1A 033077 0 0 0 707070707070 0 707070707070
ST9 033077 0 0 0 707070707070 0 707070707070
*033077 JUMPA 0,033100
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033077 033077 0 0 324000033100 0 000000033100
IT1 033077 0 0 0 324000033100 0 000000033100
AT3 033077 0 0 0 000000033100 0 324000033100
AT6 033077 0 0 0 000000033100 0 324000033100
FT1A 033077 0 0 0 000000033100 0 000000033100
FT2 033077 0 0 0 0 0 000000033100
FT2RQ 033077 0 0 0 707070707070 0 000000033100
FT3 033077 0 0 0 707070707070 0 000000033100
FT9 0 0 0 0 707070707070 0 000000033100
ET0 0 0 0 0 707070707070 0 000000033100
ST1A 0 0 0 0 707070707070 0 000000033100
ST9 0 0 0 0 707070707070 0 000000033100
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 367
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0524
*033100 CAME 1,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 312040033501 0 0
IT1 0 0 0 0 312040033501 0 0
AT3 0 0 0 0 000000033501 0 312040033501
AT6 0 033501 0 0 000000033501 0 312040033501
FT0 0 033501 0 0 0 0 312040033501
FT1A 0 033501 0 0 0 0 0
FT2 0 033501 0 0 0 0 0
FT2RQ 0 033501 0 0 0 0 0
FT3 0 033501 0 0 0 0 0
FT9 033101 033501 0 0 0 0 0
ET0 033102 033501 0 0 0 0 0
ST1A 033102 033501 0 0 0 0 0
ST9 033102 033501 0 0 0 0 0
*033102 JUMPA 0,033103
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033102 033102 0 0 324000033103 0 000000033103
IT1 033102 0 0 0 324000033103 0 000000033103
AT3 033102 0 0 0 000000033103 0 324000033103
AT6 033102 033103 0 0 000000033103 0 324000033103
FT1A 033102 033103 0 0 000000033103 0 000000033103
FT2 033102 033103 0 0 0 0 000000033103
FT2RQ 033102 033103 0 0 707070707070 0 000000033103
FT3 033102 033103 0 0 707070707070 0 000000033103
FT9 033103 033103 0 0 707070707070 0 000000033103
ET0 033103 033103 0 0 707070707070 0 000000033103
ST1A 033103 033103 0 0 707070707070 0 000000033103
ST9 033103 033103 0 0 707070707070 0 000000033103
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 368
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0525
*033103 CAME 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033103 033103 0 0 312000033474 0 707070707070
IT1 033103 0 0 0 312000033474 0 707070707070
AT3 033103 0 0 0 000000033474 0 312000033474
AT6 033103 033474 0 0 000000033474 0 312000033474
FT0 033103 033474 0 0 707070707070 0 312000033474
FT1A 033103 033474 0 0 707070707070 0 707070707070
FT2 033103 033474 0 0 0 0 707070707070
FT2RQ 033103 033474 0 0 707070707070 0 707070707070
FT3 033103 033474 0 0 707070707070 0 707070707070
FT9 033104 033474 0 0 707070707070 0 707070707070
ET0 033105 033474 0 0 0 0 707070707070
ST1A 033105 033474 0 0 0 0 707070707070
ST9 033105 033474 0 0 0 0 707070707070
*033105 JUMPA 0,033106
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033105 033105 0 0 324000033106 0 000000033106
IT1 033105 0 0 0 324000033106 0 000000033106
AT3 033105 0 0 0 000000033106 0 324000033106
AT6 033105 033106 0 0 000000033106 0 324000033106
FT1A 033105 033106 0 0 000000033106 0 000000033106
FT2 033105 033106 0 0 0 0 000000033106
FT2RQ 033105 033106 0 0 707070707070 0 000000033106
FT3 033105 033106 0 0 707070707070 0 000000033106
FT9 033106 033106 0 0 707070707070 0 000000033106
ET0 033106 033106 0 0 707070707070 0 000000033106
ST1A 033106 033106 0 0 707070707070 0 000000033106
ST9 033106 033106 0 0 707070707070 0 000000033106
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 369
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0526
*033106 MOVE 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033106 033106 0 0 200000033474 0 707070707070
IT1 033106 0 0 0 200000033474 0 707070707070
AT3 033106 0 0 0 000000033474 0 200000033474
AT6 033106 033474 0 0 000000033474 0 200000033474
FT0 033106 033474 0 0 707070707070 0 200000033474
FT1A 033106 033474 0 0 707070707070 0 707070707070
FT9 033107 033474 0 0 707070707070 0 707070707070
ET0 033107 033474 0 0 707070707070 0 707070707070
ST1 033107 033474 0 0 707070707070 0 707070707070
ST2 033107 033474 0 0 707070707070 0 707070707070
ST9 033107 033474 0 0 707070707070 0 707070707070
*033107 MOVEI 1,000001
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033107 033107 0 0 201040000001 0 000000000001
IT1 033107 0 0 0 201040000001 0 000000000001
AT3 033107 0 0 0 000000000001 0 201040000001
AT6 033107 000001 0 0 000000000001 0 201040000001
FT1A 033107 000001 0 0 000000000001 0 000000000001
FT9 033110 000001 0 0 000000000001 0 000000000001
ET0 033110 000001 0 0 000000000001 0 000000000001
ST1 033110 000001 0 0 000000000001 0 000000000001
ST2 033110 000001 0 0 000000000001 0 000000000001
ST9 033110 000001 0 0 000000000001 0 000000000001
*033110 MOVEM 1,033125
INITIAL
C(AC)=000000 000001
C(E)=000000 000000
FINAL
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033110 033110 0 0 202040033125 0 000000033125
IT1 033110 0 0 0 202040033125 0 000000033125
AT3 033110 0 0 0 000000033125 0 202040033125
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 370
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0527
AT6 033110 033125 0 0 000000033125 0 202040033125
FT1A 033110 033125 0 0 000000033125 0 000000033125
FT2 033110 033125 0 0 0 0 000000033125
FT2RQ 033110 033125 0 0 000000000001 0 000000033125
FT3 033110 033125 0 0 000000000001 0 000000033125
FT9 033111 033125 0 0 000000000001 0 000000033125
ET0 033111 033125 0 0 000000000001 0 000000033125
ST6 033111 033125 0 0 000000000001 0 000000033125
ST6A 033111 033125 0 0 000000000001 0 000000033125
ST9 033111 033125 0 0 000000000001 0 000000033125
*033111 SOSL 0,033125
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=707070 707070
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033111 033111 0 0 371000033125 0 000000000001
IT1 033111 0 0 0 371000033125 0 000000000001
AT3 033111 0 0 0 000000033125 0 371000033125
AT6 033111 033125 0 0 000000033125 0 371000033125
FT0 033111 033125 0 0 000000000001 0 371000033125
FT1A 033111 033125 0 0 000000000001 0 000000000001
FT9 033112 033125 0 0 000000000001 0 000000000001
ET0 033112 033125 0 0 0 0 000000000001
ST5 033112 033125 0 0 0 0 000000000001
ST6A 033112 033125 0 0 0 0 000000000001
ST9 033112 033125 0 0 0 0 000000000001
*033112 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033112 033112 0 0 334000000000 0 707070707070
IT1 033112 0 0 0 334000000000 0 707070707070
AT3 033112 0 0 0 0 0 334000000000
AT6 033112 0 0 0 0 0 334000000000
FT0 033112 0 0 0 707070707070 0 334000000000
FT1A 033112 0 0 0 707070707070 0 707070707070
FT9 033113 0 0 0 707070707070 0 707070707070
ET0 033114 0 0 0 707070707070 0 707070707070
ST1A 033114 0 0 0 707070707070 0 707070707070
ST9 033114 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 371
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0528
*033114 JUMPA 0,033115
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033114 033114 0 0 324000033115 0 000000033115
IT1 033114 0 0 0 324000033115 0 000000033115
AT3 033114 0 0 0 000000033115 0 324000033115
AT6 033114 033115 0 0 000000033115 0 324000033115
FT1A 033114 033115 0 0 000000033115 0 000000033115
FT2 033114 033115 0 0 0 0 000000033115
FT2RQ 033114 033115 0 0 707070707070 0 000000033115
FT3 033114 033115 0 0 707070707070 0 000000033115
FT9 033115 033115 0 0 707070707070 0 000000033115
ET0 033115 033115 0 0 707070707070 0 000000033115
ST1A 033115 033115 0 0 707070707070 0 000000033115
ST9 033115 033115 0 0 707070707070 0 000000033115
*033115 MOVE 1,033125
INITIAL
C(AC)=000000 000001
C(E)=000000 000000
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033115 033115 0 0 200040033125 0 0
IT1 033115 0 0 0 200040033125 0 0
AT3 033115 0 0 0 000000033125 0 200040033125
AT6 033115 033125 0 0 000000033125 0 200040033125
FT0 033115 033125 0 0 0 0 200040033125
FT1A 033115 033125 0 0 0 0 0
FT9 033116 033125 0 0 0 0 0
ET0 033116 033125 0 0 0 0 0
ST1 033116 033125 0 0 0 0 0
ST2 033116 033125 0 0 0 0 0
ST9 033116 033125 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 372
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0529
*033116 CAME 1,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033116 033116 0 0 312040033501 0 0
IT1 033116 0 0 0 312040033501 0 0
AT3 033116 0 0 0 000000033501 0 312040033501
AT6 033116 033501 0 0 000000033501 0 312040033501
FT0 033116 033501 0 0 0 0 312040033501
FT1A 033116 033501 0 0 0 0 0
FT2 033116 033501 0 0 0 0 0
FT2RQ 033116 033501 0 0 0 0 0
FT3 033116 033501 0 0 0 0 0
FT9 033117 033501 0 0 0 0 0
ET0 033120 033501 0 0 0 0 0
ST1A 033120 033501 0 0 0 0 0
ST9 033120 033501 0 0 0 0 0
*033120 JUMPA 0,033121
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033120 033120 0 0 324000033121 0 000000033121
IT1 033120 0 0 0 324000033121 0 000000033121
AT3 033120 0 0 0 000000033121 0 324000033121
AT6 033120 033121 0 0 000000033121 0 324000033121
FT1A 033120 033121 0 0 000000033121 0 000000033121
FT2 033120 033121 0 0 0 0 000000033121
FT2RQ 033120 033121 0 0 707070707070 0 000000033121
FT3 033120 033121 0 0 707070707070 0 000000033121
FT9 033121 033121 0 0 707070707070 0 000000033121
ET0 033121 033121 0 0 707070707070 0 000000033121
ST1A 033121 033121 0 0 707070707070 0 000000033121
ST9 033121 033121 0 0 707070707070 0 000000033121
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 373
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0530
*033121 CAME 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033121 033121 0 0 312000033474 0 707070707070
IT1 033121 0 0 0 312000033474 0 707070707070
AT3 033121 0 0 0 000000033474 0 312000033474
AT6 033121 033474 0 0 000000033474 0 312000033474
FT0 033121 033474 0 0 707070707070 0 312000033474
FT1A 033121 033474 0 0 707070707070 0 707070707070
FT2 033121 033474 0 0 0 0 707070707070
FT2RQ 033121 033474 0 0 707070707070 0 707070707070
FT3 033121 033474 0 0 707070707070 0 707070707070
FT9 033122 033474 0 0 707070707070 0 707070707070
ET0 033123 033474 0 0 0 0 707070707070
ST1A 033123 033474 0 0 0 0 707070707070
ST9 033123 033474 0 0 0 0 707070707070
*033123 JUMPA 0,033124
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033124
FT3 033123 033124 0 0 707070707070 0 000000033124
FT9 033124 033124 0 0 707070707070 0 000000033124
ET0 033124 033124 0 0 707070707070 0 000000033124
ST1A 033124 033124 0 0 707070707070 0 000000033124
ST9 033124 033124 0 0 707070707070 0 000000033124
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 374
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0531
*033124 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033124 033124 0 0 334000000000 0 707070707070
IT1 033124 0 0 0 334000000000 0 707070707070
AT3 033124 0 0 0 0 0 334000000000
AT6 033124 0 0 0 0 0 334000000000
FT0 033124 0 0 0 707070707070 0 334000000000
FT1A 033124 0 0 0 707070707070 0 707070707070
FT9 033125 0 0 0 707070707070 0 707070707070
ET0 033126 0 0 0 707070707070 0 707070707070
ST1A 033126 0 0 0 707070707070 0 707070707070
ST9 033126 0 0 0 707070707070 0 707070707070
*033126 MOVE 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033126 033126 0 0 200000033474 0 707070707070
IT1 033126 0 0 0 200000033474 0 707070707070
AT3 033126 0 0 0 000000033474 0 200000033474
AT6 033126 033474 0 0 000000033474 0 200000033474
FT0 033126 033474 0 0 707070707070 0 200000033474
FT1A 033126 033474 0 0 707070707070 0 707070707070
FT9 033127 033474 0 0 707070707070 0 707070707070
ET0 033127 033474 0 0 707070707070 0 707070707070
ST1 033127 033474 0 0 707070707070 0 707070707070
ST2 033127 033474 0 0 707070707070 0 707070707070
ST9 033127 033474 0 0 707070707070 0 707070707070
*033127 MOVEI 1,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033127 033127 0 0 201040000002 0 000000000002
IT1 033127 0 0 0 201040000002 0 000000000002
AT3 033127 0 0 0 000000000002 0 201040000002
AT6 033127 000002 0 0 000000000002 0 201040000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 375
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0532
FT1A 033127 000002 0 0 000000000002 0 000000000002
FT9 033130 000002 0 0 000000000002 0 000000000002
ET0 033130 000002 0 0 000000000002 0 000000000002
ST1 033130 000002 0 0 000000000002 0 000000000002
ST2 033130 000002 0 0 000000000002 0 000000000002
ST9 033130 000002 0 0 000000000002 0 000000000002
*033130 SOSL 0,000001
INITIAL
C(AC)=707070 707070
C(E)=000000 000002
FINAL
C(AC)=707070 707070
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033130 033130 0 0 371000000001 0 000000000002
IT1 033130 0 0 0 371000000001 0 000000000002
AT3 033130 0 0 0 000000000001 0 371000000001
AT6 033130 000001 0 0 000000000001 0 371000000001
FT0 033130 000001 0 0 000000000002 0 371000000001
FT1A 033130 000001 0 0 000000000002 0 000000000002
FT9 033131 000001 0 0 000000000002 0 000000000002
ET0 033131 000001 0 0 000000000001 0 000000000002
ST5 033131 000001 0 0 000000000001 0 000000000002
ST6A 033131 000001 0 0 000000000001 0 000000000002
ST9 033131 000001 0 0 000000000001 0 000000000002
*033131 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033131 033131 0 0 334000000000 0 707070707070
IT1 033131 0 0 0 334000000000 0 707070707070
AT3 033131 0 0 0 0 0 334000000000
AT6 033131 0 0 0 0 0 334000000000
FT0 033131 0 0 0 707070707070 0 334000000000
FT1A 033131 0 0 0 707070707070 0 707070707070
FT9 033132 0 0 0 707070707070 0 707070707070
ET0 033133 0 0 0 707070707070 0 707070707070
ST1A 033133 0 0 0 707070707070 0 707070707070
ST9 033133 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 376
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0533
*033133 JUMPA 0,033134
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033134
FT3 033133 033134 0 0 707070707070 0 000000033134
FT9 033134 033134 0 0 707070707070 0 000000033134
ET0 033134 033134 0 0 707070707070 0 000000033134
ST1A 033134 033134 0 0 707070707070 0 000000033134
ST9 033134 033134 0 0 707070707070 0 000000033134
*033134 CAME 1,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033134 033134 0 0 312040033502 0 000000000001
IT1 033134 0 0 0 312040033502 0 000000000001
AT3 033134 0 0 0 000000033502 0 312040033502
AT6 033134 033502 0 0 000000033502 0 312040033502
FT0 033134 033502 0 0 000000000001 0 312040033502
FT1A 033134 033502 0 0 000000000001 0 000000000001
FT2 033134 033502 0 0 0 0 000000000001
FT2RQ 033134 033502 0 0 000000000001 0 000000000001
FT3 033134 033502 0 0 000000000001 0 000000000001
FT9 033135 033502 0 0 000000000001 0 000000000001
ET0 033136 033502 0 0 0 0 000000000001
ST1A 033136 033502 0 0 0 0 000000000001
ST9 033136 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 377
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0534
*033136 JUMPA 0,033137
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033136 033136 0 0 324000033137 0 000000033137
IT1 033136 0 0 0 324000033137 0 000000033137
AT3 033136 0 0 0 000000033137 0 324000033137
AT6 033136 033137 0 0 000000033137 0 324000033137
FT1A 033136 033137 0 0 000000033137 0 000000033137
FT2 033136 033137 0 0 0 0 000000033137
FT2RQ 033136 033137 0 0 707070707070 0 000000033137
FT3 033136 033137 0 0 707070707070 0 000000033137
FT9 033137 033137 0 0 707070707070 0 000000033137
ET0 033137 033137 0 0 707070707070 0 000000033137
ST1A 033137 033137 0 0 707070707070 0 000000033137
ST9 033137 033137 0 0 707070707070 0 000000033137
*033137 CAME 0,033474
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033137 033137 0 0 312000033474 0 707070707070
IT1 033137 0 0 0 312000033474 0 707070707070
AT3 033137 0 0 0 000000033474 0 312000033474
AT6 033137 033474 0 0 000000033474 0 312000033474
FT0 033137 033474 0 0 707070707070 0 312000033474
FT1A 033137 033474 0 0 707070707070 0 707070707070
FT2 033137 033474 0 0 0 0 707070707070
FT2RQ 033137 033474 0 0 707070707070 0 707070707070
FT3 033137 033474 0 0 707070707070 0 707070707070
FT9 033140 033474 0 0 707070707070 0 707070707070
ET0 033141 033474 0 0 0 0 707070707070
ST1A 033141 033474 0 0 0 0 707070707070
ST9 033141 033474 0 0 0 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 378
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0535
*033141 JUMPA 0,033142
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033141 033141 0 0 324000033142 0 000000033142
IT1 033141 0 0 0 324000033142 0 000000033142
AT3 033141 0 0 0 000000033142 0 324000033142
AT6 033141 033142 0 0 000000033142 0 324000033142
FT1A 033141 033142 0 0 000000033142 0 000000033142
FT2 033141 033142 0 0 0 0 000000033142
FT2RQ 033141 033142 0 0 707070707070 0 000000033142
FT3 033141 033142 0 0 707070707070 0 000000033142
FT9 033142 033142 0 0 707070707070 0 000000033142
ET0 033142 033142 0 0 707070707070 0 000000033142
ST1A 033142 033142 0 0 707070707070 0 000000033142
ST9 033142 033142 0 0 707070707070 0 000000033142
*033142 MOVE 10,033474
INITIAL
C(AC)=000000 000001
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033142 033142 0 0 200400033474 0 707070707070
IT1 033142 0 0 0 200400033474 0 707070707070
AT3 033142 0 0 0 000000033474 0 200400033474
AT6 033142 033474 0 0 000000033474 0 200400033474
FT0 033142 033474 0 0 707070707070 0 200400033474
FT1A 033142 033474 0 0 707070707070 0 707070707070
FT9 033143 033474 0 0 707070707070 0 707070707070
ET0 033143 033474 0 0 707070707070 0 707070707070
ST1 033143 033474 0 0 707070707070 0 707070707070
ST2 033143 033474 0 0 707070707070 0 707070707070
ST9 033143 033474 0 0 707070707070 0 707070707070
*033143 MOVEI 11,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033143 033143 0 0 201440000000 0 0
IT1 033143 0 0 0 201440000000 0 0
AT3 033143 0 0 0 0 0 201440000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 379
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0536
AT6 033143 0 0 0 0 0 201440000000
FT1A 033143 0 0 0 0 0 0
FT9 033144 0 0 0 0 0 0
ET0 033144 0 0 0 0 0 0
ST1 033144 0 0 0 0 0 0
ST2 033144 0 0 0 0 0 0
ST9 033144 0 0 0 0 0 0
*033144 SOSE 10,000011
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033144 033144 0 0 372400000011 0 0
IT1 033144 0 0 0 372400000011 0 0
AT3 033144 0 0 0 000000000011 0 372400000011
AT6 033144 000011 0 0 000000000011 0 372400000011
FT0 033144 000011 0 0 0 0 372400000011
FT1A 033144 000011 0 0 0 0 0
FT9 033145 000011 0 0 0 0 0
ET0 033145 000011 0 0 777777777777 0 0
ST1 033145 000011 0 0 777777777777 0 0
ST2 033145 000011 0 0 777777777777 0 0
ST5 033145 000011 0 0 777777777777 0 0
ST6A 033145 000011 0 0 777777777777 0 0
ST9 033145 000011 0 0 777777777777 0 0
*033145 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033145 033145 0 0 334000000000 0 707070707070
IT1 033145 0 0 0 334000000000 0 707070707070
AT3 033145 0 0 0 0 0 334000000000
AT6 033145 0 0 0 0 0 334000000000
FT0 033145 0 0 0 707070707070 0 334000000000
FT1A 033145 0 0 0 707070707070 0 707070707070
FT9 033146 0 0 0 707070707070 0 707070707070
ET0 033147 0 0 0 707070707070 0 707070707070
ST1A 033147 0 0 0 707070707070 0 707070707070
ST9 033147 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 380
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0537
*033147 JUMPA 0,033150
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033147 033147 0 0 324000033150 0 000000033150
IT1 033147 0 0 0 324000033150 0 000000033150
AT3 033147 0 0 0 000000033150 0 324000033150
AT6 033147 033150 0 0 000000033150 0 324000033150
FT1A 033147 033150 0 0 000000033150 0 000000033150
FT2 033147 033150 0 0 0 0 000000033150
FT2RQ 033147 033150 0 0 707070707070 0 000000033150
FT3 033147 033150 0 0 707070707070 0 000000033150
FT9 033150 033150 0 0 707070707070 0 000000033150
ET0 033150 033150 0 0 707070707070 0 000000033150
ST1A 033150 033150 0 0 707070707070 0 000000033150
ST9 033150 033150 0 0 707070707070 0 000000033150
*033150 CAME 11,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033150 033150 0 0 312440033462 0 777777777777
IT1 033150 0 0 0 312440033462 0 777777777777
AT3 033150 0 0 0 000000033462 0 312440033462
AT6 033150 033462 0 0 000000033462 0 312440033462
FT0 033150 033462 0 0 777777777777 0 312440033462
FT1A 033150 033462 0 0 777777777777 0 777777777777
FT2 033150 033462 0 0 0 0 777777777777
FT2RQ 033150 033462 0 0 777777777777 0 777777777777
FT3 033150 033462 0 0 777777777777 0 777777777777
FT9 033151 033462 0 0 777777777777 0 777777777777
ET0 033152 033462 0 0 0 0 777777777777
ST1A 033152 033462 0 0 0 0 777777777777
ST9 033152 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 381
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0538
*033152 JUMPA 0,033153
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033152 033152 0 0 324000033153 0 000000033153
IT1 033152 0 0 0 324000033153 0 000000033153
AT3 033152 0 0 0 000000033153 0 324000033153
AT6 033152 033153 0 0 000000033153 0 324000033153
FT1A 033152 033153 0 0 000000033153 0 000000033153
FT2 033152 033153 0 0 0 0 000000033153
FT2RQ 033152 033153 0 0 707070707070 0 000000033153
FT3 033152 033153 0 0 707070707070 0 000000033153
FT9 033153 033153 0 0 707070707070 0 000000033153
ET0 033153 033153 0 0 707070707070 0 000000033153
ST1A 033153 033153 0 0 707070707070 0 000000033153
ST9 033153 033153 0 0 707070707070 0 000000033153
*033153 CAME 10,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033153 033153 0 0 312400033462 0 777777777777
IT1 033153 0 0 0 312400033462 0 777777777777
AT3 033153 0 0 0 000000033462 0 312400033462
AT6 033153 033462 0 0 000000033462 0 312400033462
FT0 033153 033462 0 0 777777777777 0 312400033462
FT1A 033153 033462 0 0 777777777777 0 777777777777
FT2 033153 033462 0 0 0 0 777777777777
FT2RQ 033153 033462 0 0 777777777777 0 777777777777
FT3 033153 033462 0 0 777777777777 0 777777777777
FT9 033154 033462 0 0 777777777777 0 777777777777
ET0 033155 033462 0 0 0 0 777777777777
ST1A 033155 033462 0 0 0 0 777777777777
ST9 033155 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 382
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0539
*033155 JUMPA 0,033156
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033155 033155 0 0 324000033156 0 000000033156
IT1 033155 0 0 0 324000033156 0 000000033156
AT3 033155 0 0 0 000000033156 0 324000033156
AT6 033155 033156 0 0 000000033156 0 324000033156
FT1A 033155 033156 0 0 000000033156 0 000000033156
FT2 033155 033156 0 0 0 0 000000033156
FT2RQ 033155 033156 0 0 707070707070 0 000000033156
FT3 033155 033156 0 0 707070707070 0 000000033156
FT9 033156 033156 0 0 707070707070 0 000000033156
ET0 033156 033156 0 0 707070707070 0 000000033156
ST1A 033156 033156 0 0 707070707070 0 000000033156
ST9 033156 033156 0 0 707070707070 0 000000033156
*033156 MOVE 10,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033156 033156 0 0 200400033474 0 707070707070
IT1 033156 0 0 0 200400033474 0 707070707070
AT3 033156 0 0 0 000000033474 0 200400033474
AT6 033156 033474 0 0 000000033474 0 200400033474
FT0 033156 033474 0 0 707070707070 0 200400033474
FT1A 033156 033474 0 0 707070707070 0 707070707070
FT9 033157 033474 0 0 707070707070 0 707070707070
ET0 033157 033474 0 0 707070707070 0 707070707070
ST1 033157 033474 0 0 707070707070 0 707070707070
ST2 033157 033474 0 0 707070707070 0 707070707070
ST9 033157 033474 0 0 707070707070 0 707070707070
*033157 MOVEI 11,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033157 033157 0 0 201440000001 0 000000000001
IT1 033157 0 0 0 201440000001 0 000000000001
AT3 033157 0 0 0 000000000001 0 201440000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 383
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0540
AT6 033157 000001 0 0 000000000001 0 201440000001
FT1A 033157 000001 0 0 000000000001 0 000000000001
FT9 033160 000001 0 0 000000000001 0 000000000001
ET0 033160 000001 0 0 000000000001 0 000000000001
ST1 033160 000001 0 0 000000000001 0 000000000001
ST2 033160 000001 0 0 000000000001 0 000000000001
ST9 033160 000001 0 0 000000000001 0 000000000001
*033160 SOSE 10,000011
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033160 033160 0 0 372400000011 0 000000000001
IT1 033160 0 0 0 372400000011 0 000000000001
AT3 033160 0 0 0 000000000011 0 372400000011
AT6 033160 000011 0 0 000000000011 0 372400000011
FT0 033160 000011 0 0 000000000001 0 372400000011
FT1A 033160 000011 0 0 000000000001 0 000000000001
FT9 033161 000011 0 0 000000000001 0 000000000001
ET0 033162 000011 0 0 0 0 000000000001
ST1 033162 000011 0 0 0 0 000000000001
ST2 033162 000011 0 0 0 0 000000000001
ST5 033162 000011 0 0 0 0 000000000001
ST6A 033162 000011 0 0 0 0 000000000001
ST9 033162 000011 0 0 0 0 000000000001
*033162 JUMPA 0,033163
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033162 033162 0 0 324000033163 0 000000033163
IT1 033162 0 0 0 324000033163 0 000000033163
AT3 033162 0 0 0 000000033163 0 324000033163
AT6 033162 033163 0 0 000000033163 0 324000033163
FT1A 033162 033163 0 0 000000033163 0 000000033163
FT2 033162 033163 0 0 0 0 000000033163
FT2RQ 033162 033163 0 0 707070707070 0 000000033163
FT3 033162 033163 0 0 707070707070 0 000000033163
FT9 033163 033163 0 0 707070707070 0 000000033163
ET0 033163 033163 0 0 707070707070 0 000000033163
ST1A 033163 033163 0 0 707070707070 0 000000033163
ST9 033163 033163 0 0 707070707070 0 000000033163
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 384
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0541
*033163 CAME 11,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033163 033163 0 0 312440033501 0 0
IT1 033163 0 0 0 312440033501 0 0
AT3 033163 0 0 0 000000033501 0 312440033501
AT6 033163 033501 0 0 000000033501 0 312440033501
FT0 033163 033501 0 0 0 0 312440033501
FT1A 033163 033501 0 0 0 0 0
FT2 033163 033501 0 0 0 0 0
FT2RQ 033163 033501 0 0 0 0 0
FT3 033163 033501 0 0 0 0 0
FT9 033164 033501 0 0 0 0 0
ET0 033165 033501 0 0 0 0 0
ST1A 033165 033501 0 0 0 0 0
ST9 033165 033501 0 0 0 0 0
*033165 JUMPA 0,033166
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033166
FT3 033165 033166 0 0 707070707070 0 000000033166
FT9 033166 033166 0 0 707070707070 0 000000033166
ET0 033166 033166 0 0 707070707070 0 000000033166
ST1A 033166 033166 0 0 707070707070 0 000000033166
ST9 033166 033166 0 0 707070707070 0 000000033166
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 385
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0542
*033166 CAME 10,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033166 033166 0 0 312400033501 0 0
IT1 033166 0 0 0 312400033501 0 0
AT3 033166 0 0 0 000000033501 0 312400033501
AT6 033166 033501 0 0 000000033501 0 312400033501
FT0 033166 033501 0 0 0 0 312400033501
FT1A 033166 033501 0 0 0 0 0
FT2 033166 033501 0 0 0 0 0
FT2RQ 033166 033501 0 0 0 0 0
FT3 033166 033501 0 0 0 0 0
FT9 033167 033501 0 0 0 0 0
ET0 033170 033501 0 0 0 0 0
ST1A 033170 033501 0 0 0 0 0
ST9 033170 033501 0 0 0 0 0
*033170 JUMPA 0,033171
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033170 033170 0 0 324000033171 0 000000033171
IT1 033170 0 0 0 324000033171 0 000000033171
AT3 033170 0 0 0 000000033171 0 324000033171
AT6 033170 033171 0 0 000000033171 0 324000033171
FT1A 033170 033171 0 0 000000033171 0 000000033171
FT2 033170 033171 0 0 0 0 000000033171
FT2RQ 033170 033171 0 0 707070707070 0 000000033171
FT3 033170 033171 0 0 707070707070 0 000000033171
FT9 033171 033171 0 0 707070707070 0 000000033171
ET0 033171 033171 0 0 707070707070 0 000000033171
ST1A 033171 033171 0 0 707070707070 0 000000033171
ST9 033171 033171 0 0 707070707070 0 000000033171
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 386
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0543
*033171 MOVE 10,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033171 033171 0 0 200400033474 0 707070707070
IT1 033171 0 0 0 200400033474 0 707070707070
AT3 033171 0 0 0 000000033474 0 200400033474
AT6 033171 033474 0 0 000000033474 0 200400033474
FT0 033171 033474 0 0 707070707070 0 200400033474
FT1A 033171 033474 0 0 707070707070 0 707070707070
FT9 033172 033474 0 0 707070707070 0 707070707070
ET0 033172 033474 0 0 707070707070 0 707070707070
ST1 033172 033474 0 0 707070707070 0 707070707070
ST2 033172 033474 0 0 707070707070 0 707070707070
ST9 033172 033474 0 0 707070707070 0 707070707070
*033172 MOVEI 11,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033172 033172 0 0 201440000002 0 000000000002
IT1 033172 0 0 0 201440000002 0 000000000002
AT3 033172 0 0 0 000000000002 0 201440000002
AT6 033172 000002 0 0 000000000002 0 201440000002
FT1A 033172 000002 0 0 000000000002 0 000000000002
FT9 033173 000002 0 0 000000000002 0 000000000002
ET0 033173 000002 0 0 000000000002 0 000000000002
ST1 033173 000002 0 0 000000000002 0 000000000002
ST2 033173 000002 0 0 000000000002 0 000000000002
ST9 033173 000002 0 0 000000000002 0 000000000002
*033173 SOSE 10,000011
INITIAL
C(AC)=707070 707070
C(E)=000000 000002
FINAL
C(AC)=000000 000001
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033173 033173 0 0 372400000011 0 000000000002
IT1 033173 0 0 0 372400000011 0 000000000002
AT3 033173 0 0 0 000000000011 0 372400000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 387
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0544
AT6 033173 000011 0 0 000000000011 0 372400000011
FT0 033173 000011 0 0 000000000002 0 372400000011
FT1A 033173 000011 0 0 000000000002 0 000000000002
FT9 033174 000011 0 0 000000000002 0 000000000002
ET0 033174 000011 0 0 000000000001 0 000000000002
ST1 033174 000011 0 0 000000000001 0 000000000002
ST2 033174 000011 0 0 000000000001 0 000000000002
ST5 033174 000011 0 0 000000000001 0 000000000002
ST6A 033174 000011 0 0 000000000001 0 000000000002
ST9 033174 000011 0 0 000000000001 0 000000000002
*033174 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033174 033174 0 0 334000000000 0 707070707070
IT1 033174 0 0 0 334000000000 0 707070707070
AT3 033174 0 0 0 0 0 334000000000
AT6 033174 0 0 0 0 0 334000000000
FT0 033174 0 0 0 707070707070 0 334000000000
FT1A 033174 0 0 0 707070707070 0 707070707070
FT9 033175 0 0 0 707070707070 0 707070707070
ET0 033176 0 0 0 707070707070 0 707070707070
ST1A 033176 0 0 0 707070707070 0 707070707070
ST9 033176 0 0 0 707070707070 0 707070707070
*033176 JUMPA 0,033177
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033176 033176 0 0 324000033177 0 000000033177
IT1 033176 0 0 0 324000033177 0 000000033177
AT3 033176 0 0 0 000000033177 0 324000033177
AT6 033176 033177 0 0 000000033177 0 324000033177
FT1A 033176 033177 0 0 000000033177 0 000000033177
FT2 033176 033177 0 0 0 0 000000033177
FT2RQ 033176 033177 0 0 707070707070 0 000000033177
FT3 033176 033177 0 0 707070707070 0 000000033177
FT9 033177 033177 0 0 707070707070 0 000000033177
ET0 033177 033177 0 0 707070707070 0 000000033177
ST1A 033177 033177 0 0 707070707070 0 000000033177
ST9 033177 033177 0 0 707070707070 0 000000033177
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 388
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0545
*033177 CAME 11,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033177 033177 0 0 312440033502 0 000000000001
IT1 033177 0 0 0 312440033502 0 000000000001
AT3 033177 0 0 0 000000033502 0 312440033502
AT6 033177 033502 0 0 000000033502 0 312440033502
FT0 033177 033502 0 0 000000000001 0 312440033502
FT1A 033177 033502 0 0 000000000001 0 000000000001
FT2 033177 033502 0 0 0 0 000000000001
FT2RQ 033177 033502 0 0 000000000001 0 000000000001
FT3 033177 033502 0 0 000000000001 0 000000000001
FT9 0 033502 0 0 000000000001 0 000000000001
ET0 033201 033502 0 0 0 0 000000000001
ST1A 033201 033502 0 0 0 0 000000000001
ST9 033201 033502 0 0 0 0 000000000001
*033201 JUMPA 0,033202
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033201 033201 0 0 324000033202 0 000000033202
IT1 033201 0 0 0 324000033202 0 000000033202
AT3 033201 0 0 0 000000033202 0 324000033202
AT6 033201 033202 0 0 000000033202 0 324000033202
FT1A 033201 033202 0 0 000000033202 0 000000033202
FT2 033201 033202 0 0 0 0 000000033202
FT2RQ 033201 033202 0 0 707070707070 0 000000033202
FT3 033201 033202 0 0 707070707070 0 000000033202
FT9 033202 033202 0 0 707070707070 0 000000033202
ET0 033202 033202 0 0 707070707070 0 000000033202
ST1A 033202 033202 0 0 707070707070 0 000000033202
ST9 033202 033202 0 0 707070707070 0 000000033202
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 389
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0546
*033202 CAME 10,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033202 033202 0 0 312400033502 0 000000000001
IT1 033202 0 0 0 312400033502 0 000000000001
AT3 033202 0 0 0 000000033502 0 312400033502
AT6 033202 033502 0 0 000000033502 0 312400033502
FT0 033202 033502 0 0 000000000001 0 312400033502
FT1A 033202 033502 0 0 000000000001 0 000000000001
FT2 033202 033502 0 0 0 0 000000000001
FT2RQ 033202 033502 0 0 000000000001 0 000000000001
FT3 033202 033502 0 0 000000000001 0 000000000001
FT9 033203 033502 0 0 000000000001 0 000000000001
ET0 033204 033502 0 0 0 0 000000000001
ST1A 033204 033502 0 0 0 0 000000000001
ST9 033204 033502 0 0 0 0 000000000001
*033204 JUMPA 0,033205
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033204 033204 0 0 324000033205 0 000000033205
IT1 033204 0 0 0 324000033205 0 000000033205
AT3 033204 0 0 0 000000033205 0 324000033205
AT6 033204 033205 0 0 000000033205 0 324000033205
FT1A 033204 033205 0 0 000000033205 0 000000033205
FT2 033204 033205 0 0 0 0 000000033205
FT2RQ 033204 033205 0 0 707070707070 0 000000033205
FT3 033204 033205 0 0 707070707070 0 000000033205
FT9 033205 033205 0 0 707070707070 0 000000033205
ET0 033205 033205 0 0 707070707070 0 000000033205
ST1A 033205 033205 0 0 707070707070 0 000000033205
ST9 033205 033205 0 0 707070707070 0 000000033205
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 390
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0547
*033205 MOVE 7,033474
INITIAL
C(AC)=000000 000001
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033205 033205 0 0 200340033474 0 707070707070
IT1 033205 0 0 0 200340033474 0 707070707070
AT3 033205 0 0 0 000000033474 0 200340033474
AT6 033205 033474 0 0 000000033474 0 200340033474
FT0 033205 033474 0 0 707070707070 0 200340033474
FT1A 033205 033474 0 0 707070707070 0 707070707070
FT9 033206 033474 0 0 707070707070 0 707070707070
ET0 033206 033474 0 0 707070707070 0 707070707070
ST1 033206 033474 0 0 707070707070 0 707070707070
ST2 033206 033474 0 0 707070707070 0 707070707070
ST9 033206 033474 0 0 707070707070 0 707070707070
*033206 MOVEI 10,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033206 033206 0 0 201400000000 0 0
IT1 033206 0 0 0 201400000000 0 0
AT3 033206 0 0 0 0 0 201400000000
AT6 033206 0 0 0 0 0 201400000000
FT1A 033206 0 0 0 0 0 0
FT9 033207 0 0 0 0 0 0
ET0 033207 0 0 0 0 0 0
ST1 033207 0 0 0 0 0 0
ST2 033207 0 0 0 0 0 0
ST9 033207 0 0 0 0 0 0
*033207 SOSLE 7,000010
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033207 033207 0 0 373340000010 0 0
IT1 033207 0 0 0 373340000010 0 0
AT3 033207 0 0 0 000000000010 0 373340000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 391
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0548
AT6 033207 000010 0 0 000000000010 0 373340000010
FT0 033207 000010 0 0 0 0 373340000010
FT1A 033207 000010 0 0 0 0 0
FT9 033210 000010 0 0 0 0 0
ET0 033211 000010 0 0 777777777777 0 0
ST1 033211 000010 0 0 777777777777 0 0
ST2 033211 000010 0 0 777777777777 0 0
ST5 033211 000010 0 0 777777777777 0 0
ST6A 033211 000010 0 0 777777777777 0 0
ST9 033211 000010 0 0 777777777777 0 0
*033211 JUMPA 0,033212
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033211 033211 0 0 324000033212 0 000000033212
IT1 033211 0 0 0 324000033212 0 000000033212
AT3 033211 0 0 0 000000033212 0 324000033212
AT6 033211 033212 0 0 000000033212 0 324000033212
FT1A 033211 033212 0 0 000000033212 0 000000033212
FT2 033211 033212 0 0 0 0 000000033212
FT2RQ 033211 033212 0 0 707070707070 0 000000033212
FT3 033211 033212 0 0 707070707070 0 000000033212
FT9 033212 033212 0 0 707070707070 0 000000033212
ET0 033212 033212 0 0 707070707070 0 000000033212
ST1A 033212 033212 0 0 707070707070 0 000000033212
ST9 033212 033212 0 0 707070707070 0 000000033212
*033212 CAME 10,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033212 033212 0 0 312400033462 0 777777777777
IT1 033212 0 0 0 312400033462 0 777777777777
AT3 033212 0 0 0 000000033462 0 312400033462
AT6 033212 033462 0 0 000000033462 0 312400033462
FT0 033212 033462 0 0 777777777777 0 312400033462
FT1A 033212 033462 0 0 777777777777 0 777777777777
FT2 033212 033462 0 0 0 0 777777777777
FT2RQ 033212 033462 0 0 777777777777 0 777777777777
FT3 033212 033462 0 0 777777777777 0 777777777777
FT9 033213 033462 0 0 777777777777 0 777777777777
ET0 033214 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 392
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0549
ST1A 033214 033462 0 0 0 0 777777777777
ST9 033214 033462 0 0 0 0 777777777777
*033214 JUMPA 0,033215
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033214 033214 0 0 324000033215 0 000000033215
IT1 033214 0 0 0 324000033215 0 000000033215
AT3 033214 0 0 0 000000033215 0 324000033215
AT6 033214 033215 0 0 000000033215 0 324000033215
FT1A 033214 033215 0 0 000000033215 0 000000033215
FT2 033214 033215 0 0 0 0 000000033215
FT2RQ 033214 033215 0 0 707070707070 0 000000033215
FT3 033214 033215 0 0 707070707070 0 000000033215
FT9 033215 033215 0 0 707070707070 0 000000033215
ET0 033215 033215 0 0 707070707070 0 000000033215
ST1A 033215 033215 0 0 707070707070 0 000000033215
ST9 033215 033215 0 0 707070707070 0 000000033215
*033215 CAME 7,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033215 033215 0 0 312340033462 0 777777777777
IT1 033215 0 0 0 312340033462 0 777777777777
AT3 033215 0 0 0 000000033462 0 312340033462
AT6 033215 033462 0 0 000000033462 0 312340033462
FT0 033215 033462 0 0 777777777777 0 312340033462
FT1A 033215 033462 0 0 777777777777 0 777777777777
FT2 033215 033462 0 0 0 0 777777777777
FT2RQ 033215 033462 0 0 777777777777 0 777777777777
FT3 033215 033462 0 0 777777777777 0 777777777777
FT9 033216 033462 0 0 777777777777 0 777777777777
ET0 033217 033462 0 0 0 0 777777777777
ST1A 033217 033462 0 0 0 0 777777777777
ST9 033217 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 393
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0550
*033217 JUMPA 0,033220
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033217 033217 0 0 324000033220 0 000000033220
IT1 033217 0 0 0 324000033220 0 000000033220
AT3 033217 0 0 0 000000033220 0 324000033220
AT6 033217 033220 0 0 000000033220 0 324000033220
FT1A 033217 033220 0 0 000000033220 0 000000033220
FT2 033217 033220 0 0 0 0 000000033220
FT2RQ 033217 033220 0 0 707070707070 0 000000033220
FT3 033217 033220 0 0 707070707070 0 000000033220
FT9 033220 033220 0 0 707070707070 0 000000033220
ET0 033220 033220 0 0 707070707070 0 000000033220
ST1A 033220 033220 0 0 707070707070 0 000000033220
ST9 033220 033220 0 0 707070707070 0 000000033220
*033220 MOVE 7,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033220 033220 0 0 200340033474 0 707070707070
IT1 033220 0 0 0 200340033474 0 707070707070
AT3 033220 0 0 0 000000033474 0 200340033474
AT6 033220 033474 0 0 000000033474 0 200340033474
FT0 033220 033474 0 0 707070707070 0 200340033474
FT1A 033220 033474 0 0 707070707070 0 707070707070
FT9 033221 033474 0 0 707070707070 0 707070707070
ET0 033221 033474 0 0 707070707070 0 707070707070
ST1 033221 033474 0 0 707070707070 0 707070707070
ST2 033221 033474 0 0 707070707070 0 707070707070
ST9 033221 033474 0 0 707070707070 0 707070707070
*033221 MOVEI 10,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033221 033221 0 0 201400000001 0 000000000001
IT1 033221 0 0 0 201400000001 0 000000000001
AT3 033221 0 0 0 000000000001 0 201400000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 394
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0551
AT6 033221 000001 0 0 000000000001 0 201400000001
FT1A 033221 000001 0 0 000000000001 0 000000000001
FT9 033222 000001 0 0 000000000001 0 000000000001
ET0 033222 000001 0 0 000000000001 0 000000000001
ST1 033222 000001 0 0 000000000001 0 000000000001
ST2 033222 000001 0 0 000000000001 0 000000000001
ST9 033222 000001 0 0 000000000001 0 000000000001
*033222 SOSLE 7,000010
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033222 033222 0 0 373340000010 0 000000000001
IT1 033222 0 0 0 373340000010 0 000000000001
AT3 033222 0 0 0 000000000010 0 373340000010
AT6 033222 000010 0 0 000000000010 0 373340000010
FT0 033222 000010 0 0 000000000001 0 373340000010
FT1A 033222 000010 0 0 000000000001 0 000000000001
FT9 033223 000010 0 0 000000000001 0 000000000001
ET0 033224 000010 0 0 0 0 000000000001
ST1 033224 000010 0 0 0 0 000000000001
ST2 033224 000010 0 0 0 0 000000000001
ST5 033224 000010 0 0 0 0 000000000001
ST6A 033224 000010 0 0 0 0 000000000001
ST9 033224 000010 0 0 0 0 000000000001
*033224 JUMPA 0,033225
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033225
FT3 033224 033225 0 0 707070707070 0 000000033225
FT9 033225 033225 0 0 707070707070 0 000000033225
ET0 033225 033225 0 0 707070707070 0 000000033225
ST1A 033225 033225 0 0 707070707070 0 000000033225
ST9 033225 033225 0 0 707070707070 0 000000033225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 395
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0552
*033225 CAME 10,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033225 033225 0 0 312400033501 0 0
IT1 033225 0 0 0 312400033501 0 0
AT3 033225 0 0 0 000000033501 0 312400033501
AT6 033225 033501 0 0 000000033501 0 312400033501
FT0 033225 033501 0 0 0 0 312400033501
FT1A 033225 033501 0 0 0 0 0
FT2 033225 033501 0 0 0 0 0
FT2RQ 033225 033501 0 0 0 0 0
FT3 033225 033501 0 0 0 0 0
FT9 033226 033501 0 0 0 0 0
ET0 033227 033501 0 0 0 0 0
ST1A 033227 033501 0 0 0 0 0
ST9 033227 033501 0 0 0 0 0
*033227 JUMPA 0,033230
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033227 033227 0 0 324000033230 0 000000033230
IT1 033227 0 0 0 324000033230 0 000000033230
AT3 033227 0 0 0 000000033230 0 324000033230
AT6 033227 033230 0 0 000000033230 0 324000033230
FT1A 033227 033230 0 0 000000033230 0 000000033230
FT2 033227 033230 0 0 0 0 000000033230
FT2RQ 033227 033230 0 0 707070707070 0 000000033230
FT3 033227 033230 0 0 707070707070 0 000000033230
FT9 033230 033230 0 0 707070707070 0 000000033230
ET0 033230 033230 0 0 707070707070 0 000000033230
ST1A 033230 033230 0 0 707070707070 0 000000033230
ST9 033230 033230 0 0 707070707070 0 000000033230
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 396
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0553
*033230 CAME 7,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033230 033230 0 0 312340033501 0 0
IT1 033230 0 0 0 312340033501 0 0
AT3 033230 0 0 0 000000033501 0 312340033501
AT6 033230 033501 0 0 000000033501 0 312340033501
FT0 033230 033501 0 0 0 0 312340033501
FT1A 033230 033501 0 0 0 0 0
FT2 033230 033501 0 0 0 0 0
FT2RQ 033230 033501 0 0 0 0 0
FT3 033230 033501 0 0 0 0 0
FT9 033231 033501 0 0 0 0 0
ET0 033232 033501 0 0 0 0 0
ST1A 033232 033501 0 0 0 0 0
ST9 033232 033501 0 0 0 0 0
*033232 JUMPA 0,033233
INITIAL
C(AC)=707070 707070
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
FT2 033232 033233 0 0 0 0 000000033233
FT2RQ 033232 033233 0 0 707070707070 0 000000033233
FT3 033232 033233 0 0 707070707070 0 000000033233
FT9 033233 033233 0 0 707070707070 0 000000033233
ET0 033233 033233 0 0 707070707070 0 000000033233
ST1A 033233 033233 0 0 707070707070 0 000000033233
ST9 033233 033233 0 0 707070707070 0 000000033233
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 397
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0554
*033233 MOVE 7,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033233 033233 0 0 200340033474 0 707070707070
IT1 033233 0 0 0 200340033474 0 707070707070
AT3 033233 0 0 0 000000033474 0 200340033474
AT6 033233 033474 0 0 000000033474 0 200340033474
FT0 033233 033474 0 0 707070707070 0 200340033474
FT1A 033233 033474 0 0 707070707070 0 707070707070
FT9 033234 033474 0 0 707070707070 0 707070707070
ET0 033234 033474 0 0 707070707070 0 707070707070
ST1 033234 033474 0 0 707070707070 0 707070707070
ST2 033234 033474 0 0 707070707070 0 707070707070
ST9 033234 033474 0 0 707070707070 0 707070707070
*033234 MOVEI 10,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033234 033234 0 0 201400000002 0 000000000002
IT1 033234 0 0 0 201400000002 0 000000000002
AT3 033234 0 0 0 000000000002 0 201400000002
AT6 033234 000002 0 0 000000000002 0 201400000002
FT1A 033234 000002 0 0 000000000002 0 000000000002
FT9 033235 000002 0 0 000000000002 0 000000000002
ET0 033235 000002 0 0 000000000002 0 000000000002
ST1 033235 000002 0 0 000000000002 0 000000000002
ST2 033235 000002 0 0 000000000002 0 000000000002
ST9 033235 000002 0 0 000000000002 0 000000000002
*033235 SOSLE 7,000010
INITIAL
C(AC)=707070 707070
C(E)=000000 000002
FINAL
C(AC)=000000 000001
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033235 033235 0 0 373340000010 0 000000000002
IT1 033235 0 0 0 373340000010 0 000000000002
AT3 033235 0 0 0 000000000010 0 373340000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 398
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0555
AT6 033235 000010 0 0 000000000010 0 373340000010
FT0 033235 000010 0 0 000000000002 0 373340000010
FT1A 033235 000010 0 0 000000000002 0 000000000002
FT9 033236 000010 0 0 000000000002 0 000000000002
ET0 033236 000010 0 0 000000000001 0 000000000002
ST1 033236 000010 0 0 000000000001 0 000000000002
ST2 033236 000010 0 0 000000000001 0 000000000002
ST5 033236 000010 0 0 000000000001 0 000000000002
ST6A 033236 000010 0 0 000000000001 0 000000000002
ST9 033236 000010 0 0 000000000001 0 000000000002
*033236 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033236 033236 0 0 334000000000 0 707070707070
IT1 033236 0 0 0 334000000000 0 707070707070
AT3 033236 0 0 0 0 0 334000000000
AT6 033236 0 0 0 0 0 334000000000
FT0 033236 0 0 0 707070707070 0 334000000000
FT1A 033236 0 0 0 707070707070 0 707070707070
FT9 033237 0 0 0 707070707070 0 707070707070
ET0 033240 0 0 0 707070707070 0 707070707070
ST1A 033240 0 0 0 707070707070 0 707070707070
ST9 033240 0 0 0 707070707070 0 707070707070
*033240 JUMPA 0,033241
INITIAL
C(AC)=707070 707070
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
FT2 033240 033241 0 0 0 0 000000033241
FT2RQ 033240 033241 0 0 707070707070 0 000000033241
FT3 033240 033241 0 0 707070707070 0 000000033241
FT9 033241 033241 0 0 707070707070 0 000000033241
ET0 033241 033241 0 0 707070707070 0 000000033241
ST1A 033241 033241 0 0 707070707070 0 000000033241
ST9 033241 033241 0 0 707070707070 0 000000033241
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 399
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0556
*033241 CAME 10,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033241 033241 0 0 312400033502 0 000000000001
IT1 033241 0 0 0 312400033502 0 000000000001
AT3 033241 0 0 0 000000033502 0 312400033502
AT6 033241 033502 0 0 000000033502 0 312400033502
FT0 033241 033502 0 0 000000000001 0 312400033502
FT1A 033241 033502 0 0 000000000001 0 000000000001
FT2 033241 033502 0 0 0 0 000000000001
FT2RQ 033241 033502 0 0 000000000001 0 000000000001
FT3 033241 033502 0 0 000000000001 0 000000000001
FT9 033242 033502 0 0 000000000001 0 000000000001
ET0 033243 033502 0 0 0 0 000000000001
ST1A 033243 033502 0 0 0 0 000000000001
ST9 033243 033502 0 0 0 0 000000000001
*033243 JUMPA 0,033244
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033243 033243 0 0 324000033244 0 000000033244
IT1 033243 0 0 0 324000033244 0 000000033244
AT3 033243 0 0 0 000000033244 0 324000033244
AT6 033243 033244 0 0 000000033244 0 324000033244
FT1A 033243 033244 0 0 000000033244 0 000000033244
FT2 033243 033244 0 0 0 0 000000033244
FT2RQ 033243 033244 0 0 707070707070 0 000000033244
FT3 033243 033244 0 0 707070707070 0 000000033244
FT9 033244 033244 0 0 707070707070 0 000000033244
ET0 033244 033244 0 0 707070707070 0 000000033244
ST1A 033244 033244 0 0 707070707070 0 000000033244
ST9 033244 033244 0 0 707070707070 0 000000033244
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 400
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0557
*033244 CAME 7,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033244 033244 0 0 312340033502 0 000000000001
IT1 033244 0 0 0 312340033502 0 000000000001
AT3 033244 0 0 0 000000033502 0 312340033502
AT6 033244 033502 0 0 000000033502 0 312340033502
FT0 033244 033502 0 0 000000000001 0 312340033502
FT1A 033244 033502 0 0 000000000001 0 000000000001
FT2 033244 033502 0 0 0 0 000000000001
FT2RQ 033244 033502 0 0 000000000001 0 000000000001
FT3 033244 033502 0 0 000000000001 0 000000000001
FT9 033245 033502 0 0 000000000001 0 000000000001
ET0 033246 033502 0 0 0 0 000000000001
ST1A 033246 033502 0 0 0 0 000000000001
ST9 033246 033502 0 0 0 0 000000000001
*033246 JUMPA 0,033247
INITIAL
C(AC)=707070 707070
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
FT2 033246 033247 0 0 0 0 000000033247
FT2RQ 033246 033247 0 0 707070707070 0 000000033247
FT3 033246 033247 0 0 707070707070 0 000000033247
FT9 033247 033247 0 0 707070707070 0 000000033247
ET0 033247 033247 0 0 707070707070 0 000000033247
ST1A 033247 033247 0 0 707070707070 0 000000033247
ST9 033247 033247 0 0 707070707070 0 000000033247
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 401
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0558
*033247 MOVE 6,033474
INITIAL
C(AC)=000000 000001
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033247 033247 0 0 200300033474 0 707070707070
IT1 033247 0 0 0 200300033474 0 707070707070
AT3 033247 0 0 0 000000033474 0 200300033474
AT6 033247 033474 0 0 000000033474 0 200300033474
FT0 033247 033474 0 0 707070707070 0 200300033474
FT1A 033247 033474 0 0 707070707070 0 707070707070
FT9 033250 033474 0 0 707070707070 0 707070707070
ET0 033250 033474 0 0 707070707070 0 707070707070
ST1 033250 033474 0 0 707070707070 0 707070707070
ST2 033250 033474 0 0 707070707070 0 707070707070
ST9 033250 033474 0 0 707070707070 0 707070707070
*033250 MOVEI 7,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033250 033250 0 0 201340000000 0 0
IT1 033250 0 0 0 201340000000 0 0
AT3 033250 0 0 0 0 0 201340000000
AT6 033250 0 0 0 0 0 201340000000
FT1A 033250 0 0 0 0 0 0
FT9 033251 0 0 0 0 0 0
ET0 033251 0 0 0 0 0 0
ST1 033251 0 0 0 0 0 0
ST2 033251 0 0 0 0 0 0
ST9 033251 0 0 0 0 0 0
*033251 SOSA 6,000007
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033251 033251 0 0 374300000007 0 0
IT1 033251 0 0 0 374300000007 0 0
AT3 033251 0 0 0 000000000007 0 374300000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 402
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0559
AT6 033251 000007 0 0 000000000007 0 374300000007
FT0 033251 000007 0 0 0 0 374300000007
FT1A 033251 000007 0 0 0 0 0
FT9 033252 000007 0 0 0 0 0
ET0 033253 000007 0 0 777777777777 0 0
ST1 033253 000007 0 0 777777777777 0 0
ST2 033253 000007 0 0 777777777777 0 0
ST5 033253 000007 0 0 777777777777 0 0
ST6A 033253 000007 0 0 777777777777 0 0
ST9 033253 000007 0 0 777777777777 0 0
*033253 JUMPA 0,033254
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033253 033253 0 0 324000033254 0 000000033254
IT1 033253 0 0 0 324000033254 0 000000033254
AT3 033253 0 0 0 000000033254 0 324000033254
AT6 033253 033254 0 0 000000033254 0 324000033254
FT1A 033253 033254 0 0 000000033254 0 000000033254
FT2 033253 033254 0 0 0 0 000000033254
FT2RQ 033253 033254 0 0 707070707070 0 000000033254
FT3 033253 033254 0 0 707070707070 0 000000033254
FT9 033254 033254 0 0 707070707070 0 000000033254
ET0 033254 033254 0 0 707070707070 0 000000033254
ST1A 033254 033254 0 0 707070707070 0 000000033254
ST9 033254 033254 0 0 707070707070 0 000000033254
*033254 CAME 7,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033254 033254 0 0 312340033462 0 777777777777
IT1 033254 0 0 0 312340033462 0 777777777777
AT3 033254 0 0 0 000000033462 0 312340033462
AT6 033254 033462 0 0 000000033462 0 312340033462
FT0 033254 033462 0 0 777777777777 0 312340033462
FT1A 033254 033462 0 0 777777777777 0 777777777777
FT2 033254 033462 0 0 0 0 777777777777
FT2RQ 033254 033462 0 0 777777777777 0 777777777777
FT3 033254 033462 0 0 777777777777 0 777777777777
FT9 033255 033462 0 0 777777777777 0 777777777777
ET0 033256 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 403
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0560
ST1A 033256 033462 0 0 0 0 777777777777
ST9 033256 033462 0 0 0 0 777777777777
*033256 JUMPA 0,033257
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033256 033256 0 0 324000033257 0 000000033257
IT1 033256 0 0 0 324000033257 0 000000033257
AT3 033256 0 0 0 000000033257 0 324000033257
AT6 033256 033257 0 0 000000033257 0 324000033257
FT1A 033256 033257 0 0 000000033257 0 000000033257
FT2 033256 033257 0 0 0 0 000000033257
FT2RQ 033256 033257 0 0 707070707070 0 000000033257
FT3 033256 033257 0 0 707070707070 0 000000033257
FT9 033257 033257 0 0 707070707070 0 000000033257
ET0 033257 033257 0 0 707070707070 0 000000033257
ST1A 033257 033257 0 0 707070707070 0 000000033257
ST9 033257 033257 0 0 707070707070 0 000000033257
*033257 CAME 6,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033257 033257 0 0 312300033462 0 777777777777
IT1 033257 0 0 0 312300033462 0 777777777777
AT3 033257 0 0 0 000000033462 0 312300033462
AT6 033257 033462 0 0 000000033462 0 312300033462
FT0 033257 033462 0 0 777777777777 0 312300033462
FT1A 033257 033462 0 0 777777777777 0 777777777777
FT2 033257 033462 0 0 0 0 777777777777
FT2RQ 033257 033462 0 0 777777777777 0 777777777777
FT3 033257 033462 0 0 777777777777 0 777777777777
FT9 033260 033462 0 0 777777777777 0 777777777777
ET0 033261 033462 0 0 0 0 777777777777
ST1A 033261 033462 0 0 0 0 777777777777
ST9 033261 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 404
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0561
*033261 JUMPA 0,033262
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033261 033261 0 0 324000033262 0 000000033262
IT1 033261 0 0 0 324000033262 0 000000033262
AT3 033261 0 0 0 000000033262 0 324000033262
AT6 033261 033262 0 0 000000033262 0 324000033262
FT1A 033261 033262 0 0 000000033262 0 000000033262
FT2 033261 033262 0 0 0 0 000000033262
FT2RQ 033261 033262 0 0 707070707070 0 000000033262
FT3 033261 033262 0 0 707070707070 0 000000033262
FT9 033262 033262 0 0 707070707070 0 000000033262
ET0 033262 033262 0 0 707070707070 0 000000033262
ST1A 033262 033262 0 0 707070707070 0 000000033262
ST9 033262 033262 0 0 707070707070 0 000000033262
*033262 MOVE 6,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033262 033262 0 0 200300033474 0 707070707070
IT1 033262 0 0 0 200300033474 0 707070707070
AT3 033262 0 0 0 000000033474 0 200300033474
AT6 033262 033474 0 0 000000033474 0 200300033474
FT0 033262 033474 0 0 707070707070 0 200300033474
FT1A 033262 033474 0 0 707070707070 0 707070707070
FT9 033263 033474 0 0 707070707070 0 707070707070
ET0 033263 033474 0 0 707070707070 0 707070707070
ST1 033263 033474 0 0 707070707070 0 707070707070
ST2 033263 033474 0 0 707070707070 0 707070707070
ST9 033263 033474 0 0 707070707070 0 707070707070
*033263 MOVEI 7,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033263 033263 0 0 201340000001 0 000000000001
IT1 033263 0 0 0 201340000001 0 000000000001
AT3 033263 0 0 0 000000000001 0 201340000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 405
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0562
AT6 033263 000001 0 0 000000000001 0 201340000001
FT1A 033263 000001 0 0 000000000001 0 000000000001
FT9 033264 000001 0 0 000000000001 0 000000000001
ET0 033264 000001 0 0 000000000001 0 000000000001
ST1 033264 000001 0 0 000000000001 0 000000000001
ST2 033264 000001 0 0 000000000001 0 000000000001
ST9 033264 000001 0 0 000000000001 0 000000000001
*033264 SOSA 6,000007
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033264 033264 0 0 374300000007 0 000000000001
IT1 033264 0 0 0 374300000007 0 000000000001
AT3 033264 0 0 0 000000000007 0 374300000007
AT6 033264 000007 0 0 000000000007 0 374300000007
FT0 033264 000007 0 0 000000000001 0 374300000007
FT1A 033264 000007 0 0 000000000001 0 000000000001
FT9 033265 000007 0 0 000000000001 0 000000000001
ET0 033266 000007 0 0 0 0 000000000001
ST1 033266 000007 0 0 0 0 000000000001
ST2 033266 000007 0 0 0 0 000000000001
ST5 033266 000007 0 0 0 0 000000000001
ST6A 033266 000007 0 0 0 0 000000000001
ST9 033266 000007 0 0 0 0 000000000001
*033266 JUMPA 0,033267
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033267
FT3 033266 033267 0 0 707070707070 0 000000033267
FT9 033267 033267 0 0 707070707070 0 000000033267
ET0 033267 033267 0 0 707070707070 0 000000033267
ST1A 033267 033267 0 0 707070707070 0 000000033267
ST9 033267 033267 0 0 707070707070 0 000000033267
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 406
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0563
*033267 CAME 7,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033267 033267 0 0 312340033501 0 0
IT1 033267 0 0 0 312340033501 0 0
AT3 033267 0 0 0 000000033501 0 312340033501
AT6 033267 033501 0 0 000000033501 0 312340033501
FT0 033267 033501 0 0 0 0 312340033501
FT1A 033267 033501 0 0 0 0 0
FT2 033267 033501 0 0 0 0 0
FT2RQ 033267 033501 0 0 0 0 0
FT3 033267 033501 0 0 0 0 0
FT9 033270 033501 0 0 0 0 0
ET0 033271 033501 0 0 0 0 0
ST1A 033271 033501 0 0 0 0 0
ST9 033271 033501 0 0 0 0 0
*033271 JUMPA 0,033272
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033271 033271 0 0 324000033272 0 000000033272
IT1 033271 0 0 0 324000033272 0 000000033272
AT3 033271 0 0 0 000000033272 0 324000033272
AT6 033271 033272 0 0 000000033272 0 324000033272
FT1A 033271 033272 0 0 000000033272 0 000000033272
FT2 033271 033272 0 0 0 0 000000033272
FT2RQ 033271 033272 0 0 707070707070 0 000000033272
FT3 033271 033272 0 0 707070707070 0 000000033272
FT9 033272 033272 0 0 707070707070 0 000000033272
ET0 033272 033272 0 0 707070707070 0 000000033272
ST1A 033272 033272 0 0 707070707070 0 000000033272
ST9 033272 033272 0 0 707070707070 0 000000033272
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 407
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0564
*033272 CAME 6,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033272 033272 0 0 312300033501 0 0
IT1 033272 0 0 0 312300033501 0 0
AT3 033272 0 0 0 000000033501 0 312300033501
AT6 033272 033501 0 0 000000033501 0 312300033501
FT0 033272 033501 0 0 0 0 312300033501
FT1A 033272 033501 0 0 0 0 0
FT2 033272 033501 0 0 0 0 0
FT2RQ 033272 033501 0 0 0 0 0
FT3 033272 033501 0 0 0 0 0
FT9 033273 033501 0 0 0 0 0
ET0 033274 033501 0 0 0 0 0
ST1A 033274 033501 0 0 0 0 0
ST9 033274 033501 0 0 0 0 0
*033274 JUMPA 0,033275
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033274 033274 0 0 324000033275 0 000000033275
IT1 033274 0 0 0 324000033275 0 000000033275
AT3 033274 0 0 0 000000033275 0 324000033275
AT6 033274 033275 0 0 000000033275 0 324000033275
FT1A 033274 033275 0 0 000000033275 0 000000033275
FT2 033274 033275 0 0 0 0 000000033275
FT2RQ 033274 033275 0 0 707070707070 0 000000033275
FT3 033274 033275 0 0 707070707070 0 000000033275
FT9 033275 033275 0 0 707070707070 0 000000033275
ET0 033275 033275 0 0 707070707070 0 000000033275
ST1A 033275 033275 0 0 707070707070 0 000000033275
ST9 033275 033275 0 0 707070707070 0 000000033275
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 408
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0565
*033275 MOVE 6,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033275 033275 0 0 200300033474 0 707070707070
IT1 033275 0 0 0 200300033474 0 707070707070
AT3 033275 0 0 0 000000033474 0 200300033474
AT6 033275 033474 0 0 000000033474 0 200300033474
FT0 033275 033474 0 0 707070707070 0 200300033474
FT1A 033275 033474 0 0 707070707070 0 707070707070
FT9 033276 033474 0 0 707070707070 0 707070707070
ET0 033276 033474 0 0 707070707070 0 707070707070
ST1 033276 033474 0 0 707070707070 0 707070707070
ST2 033276 033474 0 0 707070707070 0 707070707070
ST9 033276 033474 0 0 707070707070 0 707070707070
*033276 MOVEI 7,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033276 033276 0 0 201340000002 0 000000000002
IT1 033276 0 0 0 201340000002 0 000000000002
AT3 033276 0 0 0 000000000002 0 201340000002
AT6 033276 000002 0 0 000000000002 0 201340000002
FT1A 033276 000002 0 0 000000000002 0 000000000002
FT9 033277 000002 0 0 000000000002 0 000000000002
ET0 033277 000002 0 0 000000000002 0 000000000002
ST1 033277 000002 0 0 000000000002 0 000000000002
ST2 033277 000002 0 0 000000000002 0 000000000002
ST9 033277 000002 0 0 000000000002 0 000000000002
*033277 SOSA 6,000007
INITIAL
C(AC)=707070 707070
C(E)=000000 000002
FINAL
C(AC)=000000 000001
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033277 033277 0 0 374300000007 0 000000000002
IT1 033277 0 0 0 374300000007 0 000000000002
AT3 033277 0 0 0 000000000007 0 374300000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 409
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0566
AT6 033277 000007 0 0 000000000007 0 374300000007
FT0 033277 000007 0 0 000000000002 0 374300000007
FT1A 033277 000007 0 0 000000000002 0 000000000002
FT9 0 000007 0 0 000000000002 0 000000000002
ET0 033301 000007 0 0 000000000001 0 000000000002
ST1 033301 000007 0 0 000000000001 0 000000000002
ST2 033301 000007 0 0 000000000001 0 000000000002
ST5 033301 000007 0 0 000000000001 0 000000000002
ST6A 033301 000007 0 0 000000000001 0 000000000002
ST9 033301 000007 0 0 000000000001 0 000000000002
*033301 JUMPA 0,033302
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033301 033301 0 0 324000033302 0 000000033302
IT1 033301 0 0 0 324000033302 0 000000033302
AT3 033301 0 0 0 000000033302 0 324000033302
AT6 033301 033302 0 0 000000033302 0 324000033302
FT1A 033301 033302 0 0 000000033302 0 000000033302
FT2 033301 033302 0 0 0 0 000000033302
FT2RQ 033301 033302 0 0 707070707070 0 000000033302
FT3 033301 033302 0 0 707070707070 0 000000033302
FT9 033302 033302 0 0 707070707070 0 000000033302
ET0 033302 033302 0 0 707070707070 0 000000033302
ST1A 033302 033302 0 0 707070707070 0 000000033302
ST9 033302 033302 0 0 707070707070 0 000000033302
*033302 CAME 7,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033302 033302 0 0 312340033502 0 000000000001
IT1 033302 0 0 0 312340033502 0 000000000001
AT3 033302 0 0 0 000000033502 0 312340033502
AT6 033302 033502 0 0 000000033502 0 312340033502
FT0 033302 033502 0 0 000000000001 0 312340033502
FT1A 033302 033502 0 0 000000000001 0 000000000001
FT2 033302 033502 0 0 0 0 000000000001
FT2RQ 033302 033502 0 0 000000000001 0 000000000001
FT3 033302 033502 0 0 000000000001 0 000000000001
FT9 033303 033502 0 0 000000000001 0 000000000001
ET0 033304 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 410
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0567
ST1A 033304 033502 0 0 0 0 000000000001
ST9 033304 033502 0 0 0 0 000000000001
*033304 JUMPA 0,033305
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033304 033304 0 0 324000033305 0 000000033305
IT1 033304 0 0 0 324000033305 0 000000033305
AT3 033304 0 0 0 000000033305 0 324000033305
AT6 033304 033305 0 0 000000033305 0 324000033305
FT1A 033304 033305 0 0 000000033305 0 000000033305
FT2 033304 033305 0 0 0 0 000000033305
FT2RQ 033304 033305 0 0 707070707070 0 000000033305
FT3 033304 033305 0 0 707070707070 0 000000033305
FT9 033305 033305 0 0 707070707070 0 000000033305
ET0 033305 033305 0 0 707070707070 0 000000033305
ST1A 033305 033305 0 0 707070707070 0 000000033305
ST9 033305 033305 0 0 707070707070 0 000000033305
*033305 CAME 6,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033305 033305 0 0 312300033502 0 000000000001
IT1 033305 0 0 0 312300033502 0 000000000001
AT3 033305 0 0 0 000000033502 0 312300033502
AT6 033305 033502 0 0 000000033502 0 312300033502
FT0 033305 033502 0 0 000000000001 0 312300033502
FT1A 033305 033502 0 0 000000000001 0 000000000001
FT2 033305 033502 0 0 0 0 000000000001
FT2RQ 033305 033502 0 0 000000000001 0 000000000001
FT3 033305 033502 0 0 000000000001 0 000000000001
FT9 033306 033502 0 0 000000000001 0 000000000001
ET0 033307 033502 0 0 0 0 000000000001
ST1A 033307 033502 0 0 0 0 000000000001
ST9 033307 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 411
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0568
*033307 JUMPA 0,033310
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033307 033307 0 0 324000033310 0 000000033310
IT1 033307 0 0 0 324000033310 0 000000033310
AT3 033307 0 0 0 000000033310 0 324000033310
AT6 033307 033310 0 0 000000033310 0 324000033310
FT1A 033307 033310 0 0 000000033310 0 000000033310
FT2 033307 033310 0 0 0 0 000000033310
FT2RQ 033307 033310 0 0 707070707070 0 000000033310
FT3 033307 033310 0 0 707070707070 0 000000033310
FT9 033310 033310 0 0 707070707070 0 000000033310
ET0 033310 033310 0 0 707070707070 0 000000033310
ST1A 033310 033310 0 0 707070707070 0 000000033310
ST9 033310 033310 0 0 707070707070 0 000000033310
*033310 MOVE 5,033474
INITIAL
C(AC)=000000 000001
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033310 033310 0 0 200240033474 0 707070707070
IT1 033310 0 0 0 200240033474 0 707070707070
AT3 033310 0 0 0 000000033474 0 200240033474
AT6 033310 033474 0 0 000000033474 0 200240033474
FT0 033310 033474 0 0 707070707070 0 200240033474
FT1A 033310 033474 0 0 707070707070 0 707070707070
FT9 033311 033474 0 0 707070707070 0 707070707070
ET0 033311 033474 0 0 707070707070 0 707070707070
ST1 033311 033474 0 0 707070707070 0 707070707070
ST2 033311 033474 0 0 707070707070 0 707070707070
ST9 033311 033474 0 0 707070707070 0 707070707070
*033311 MOVEI 6,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033311 033311 0 0 201300000000 0 0
IT1 033311 0 0 0 201300000000 0 0
AT3 033311 0 0 0 0 0 201300000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 412
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0569
AT6 033311 0 0 0 0 0 201300000000
FT1A 033311 0 0 0 0 0 0
FT9 033312 0 0 0 0 0 0
ET0 033312 0 0 0 0 0 0
ST1 033312 0 0 0 0 0 0
ST2 033312 0 0 0 0 0 0
ST9 033312 0 0 0 0 0 0
*033312 SOSGE 5,000006
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033312 033312 0 0 375240000006 0 0
IT1 033312 0 0 0 375240000006 0 0
AT3 033312 0 0 0 000000000006 0 375240000006
AT6 033312 000006 0 0 000000000006 0 375240000006
FT0 033312 000006 0 0 0 0 375240000006
FT1A 033312 000006 0 0 0 0 0
FT9 033313 000006 0 0 0 0 0
ET0 033313 000006 0 0 777777777777 0 0
ST1 033313 000006 0 0 777777777777 0 0
ST2 033313 000006 0 0 777777777777 0 0
ST5 033313 000006 0 0 777777777777 0 0
ST6A 033313 000006 0 0 777777777777 0 0
ST9 033313 000006 0 0 777777777777 0 0
*033313 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033313 033313 0 0 334000000000 0 707070707070
IT1 033313 0 0 0 334000000000 0 707070707070
AT3 033313 0 0 0 0 0 334000000000
AT6 033313 0 0 0 0 0 334000000000
FT0 033313 0 0 0 707070707070 0 334000000000
FT1A 033313 0 0 0 707070707070 0 707070707070
FT9 033314 0 0 0 707070707070 0 707070707070
ET0 033315 0 0 0 707070707070 0 707070707070
ST1A 033315 0 0 0 707070707070 0 707070707070
ST9 033315 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 413
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0570
*033315 JUMPA 0,033316
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033315 033315 0 0 324000033316 0 000000033316
IT1 033315 0 0 0 324000033316 0 000000033316
AT3 033315 0 0 0 000000033316 0 324000033316
AT6 033315 033316 0 0 000000033316 0 324000033316
FT1A 033315 033316 0 0 000000033316 0 000000033316
FT2 033315 033316 0 0 0 0 000000033316
FT2RQ 033315 033316 0 0 707070707070 0 000000033316
FT3 033315 033316 0 0 707070707070 0 000000033316
FT9 033316 033316 0 0 707070707070 0 000000033316
ET0 033316 033316 0 0 707070707070 0 000000033316
ST1A 033316 033316 0 0 707070707070 0 000000033316
ST9 033316 033316 0 0 707070707070 0 000000033316
*033316 CAME 6,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033316 033316 0 0 312300033462 0 777777777777
IT1 033316 0 0 0 312300033462 0 777777777777
AT3 033316 0 0 0 000000033462 0 312300033462
AT6 033316 033462 0 0 000000033462 0 312300033462
FT0 033316 033462 0 0 777777777777 0 312300033462
FT1A 033316 033462 0 0 777777777777 0 777777777777
FT2 033316 033462 0 0 0 0 777777777777
FT2RQ 033316 033462 0 0 777777777777 0 777777777777
FT3 033316 033462 0 0 777777777777 0 777777777777
FT9 033317 033462 0 0 777777777777 0 777777777777
ET0 033320 033462 0 0 0 0 777777777777
ST1A 033320 033462 0 0 0 0 777777777777
ST9 033320 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 414
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0571
*033320 JUMPA 0,033321
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033320 033320 0 0 324000033321 0 000000033321
IT1 033320 0 0 0 324000033321 0 000000033321
AT3 033320 0 0 0 000000033321 0 324000033321
AT6 033320 033321 0 0 000000033321 0 324000033321
FT1A 033320 033321 0 0 000000033321 0 000000033321
FT2 033320 033321 0 0 0 0 000000033321
FT2RQ 033320 033321 0 0 707070707070 0 000000033321
FT3 033320 033321 0 0 707070707070 0 000000033321
FT9 033321 033321 0 0 707070707070 0 000000033321
ET0 033321 033321 0 0 707070707070 0 000000033321
ST1A 033321 033321 0 0 707070707070 0 000000033321
ST9 033321 033321 0 0 707070707070 0 000000033321
*033321 CAME 5,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033321 033321 0 0 312240033462 0 777777777777
IT1 033321 0 0 0 312240033462 0 777777777777
AT3 033321 0 0 0 000000033462 0 312240033462
AT6 033321 033462 0 0 000000033462 0 312240033462
FT0 033321 033462 0 0 777777777777 0 312240033462
FT1A 033321 033462 0 0 777777777777 0 777777777777
FT2 033321 033462 0 0 0 0 777777777777
FT2RQ 033321 033462 0 0 777777777777 0 777777777777
FT3 033321 033462 0 0 777777777777 0 777777777777
FT9 033322 033462 0 0 777777777777 0 777777777777
ET0 033323 033462 0 0 0 0 777777777777
ST1A 033323 033462 0 0 0 0 777777777777
ST9 033323 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 415
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0572
*033323 JUMPA 0,033324
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033323 033323 0 0 324000033324 0 000000033324
IT1 033323 0 0 0 324000033324 0 000000033324
AT3 033323 0 0 0 000000033324 0 324000033324
AT6 033323 033324 0 0 000000033324 0 324000033324
FT1A 033323 033324 0 0 000000033324 0 000000033324
FT2 033323 033324 0 0 0 0 000000033324
FT2RQ 033323 033324 0 0 707070707070 0 000000033324
FT3 033323 033324 0 0 707070707070 0 000000033324
FT9 033324 033324 0 0 707070707070 0 000000033324
ET0 033324 033324 0 0 707070707070 0 000000033324
ST1A 033324 033324 0 0 707070707070 0 000000033324
ST9 033324 033324 0 0 707070707070 0 000000033324
*033324 MOVE 5,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033324 033324 0 0 200240033474 0 707070707070
IT1 033324 0 0 0 200240033474 0 707070707070
AT3 033324 0 0 0 000000033474 0 200240033474
AT6 033324 033474 0 0 000000033474 0 200240033474
FT0 033324 033474 0 0 707070707070 0 200240033474
FT1A 033324 033474 0 0 707070707070 0 707070707070
FT9 033325 033474 0 0 707070707070 0 707070707070
ET0 033325 033474 0 0 707070707070 0 707070707070
ST1 033325 033474 0 0 707070707070 0 707070707070
ST2 033325 033474 0 0 707070707070 0 707070707070
ST9 033325 033474 0 0 707070707070 0 707070707070
*033325 MOVEI 6,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033325 033325 0 0 201300000001 0 000000000001
IT1 033325 0 0 0 201300000001 0 000000000001
AT3 033325 0 0 0 000000000001 0 201300000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 416
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0573
AT6 033325 000001 0 0 000000000001 0 201300000001
FT1A 033325 000001 0 0 000000000001 0 000000000001
FT9 033326 000001 0 0 000000000001 0 000000000001
ET0 033326 000001 0 0 000000000001 0 000000000001
ST1 033326 000001 0 0 000000000001 0 000000000001
ST2 033326 000001 0 0 000000000001 0 000000000001
ST9 033326 000001 0 0 000000000001 0 000000000001
*033326 SOSGE 5,000006
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033326 033326 0 0 375240000006 0 000000000001
IT1 033326 0 0 0 375240000006 0 000000000001
AT3 033326 0 0 0 000000000006 0 375240000006
AT6 033326 000006 0 0 000000000006 0 375240000006
FT0 033326 000006 0 0 000000000001 0 375240000006
FT1A 033326 000006 0 0 000000000001 0 000000000001
FT9 033327 000006 0 0 000000000001 0 000000000001
ET0 033330 000006 0 0 0 0 000000000001
ST1 033330 000006 0 0 0 0 000000000001
ST2 033330 000006 0 0 0 0 000000000001
ST5 033330 000006 0 0 0 0 000000000001
ST6A 033330 000006 0 0 0 0 000000000001
ST9 033330 000006 0 0 0 0 000000000001
*033330 JUMPA 0,033331
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033331
FT3 033330 033331 0 0 707070707070 0 000000033331
FT9 033331 033331 0 0 707070707070 0 000000033331
ET0 033331 033331 0 0 707070707070 0 000000033331
ST1A 033331 033331 0 0 707070707070 0 000000033331
ST9 033331 033331 0 0 707070707070 0 000000033331
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 417
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0574
*033331 CAME 6,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033331 033331 0 0 312300033501 0 0
IT1 033331 0 0 0 312300033501 0 0
AT3 033331 0 0 0 000000033501 0 312300033501
AT6 033331 033501 0 0 000000033501 0 312300033501
FT0 033331 033501 0 0 0 0 312300033501
FT1A 033331 033501 0 0 0 0 0
FT2 033331 033501 0 0 0 0 0
FT2RQ 033331 033501 0 0 0 0 0
FT3 033331 033501 0 0 0 0 0
FT9 033332 033501 0 0 0 0 0
ET0 033333 033501 0 0 0 0 0
ST1A 033333 033501 0 0 0 0 0
ST9 033333 033501 0 0 0 0 0
*033333 JUMPA 0,033334
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033333 033333 0 0 324000033334 0 000000033334
IT1 033333 0 0 0 324000033334 0 000000033334
AT3 033333 0 0 0 000000033334 0 324000033334
AT6 033333 033334 0 0 000000033334 0 324000033334
FT1A 033333 033334 0 0 000000033334 0 000000033334
FT2 033333 033334 0 0 0 0 000000033334
FT2RQ 033333 033334 0 0 707070707070 0 000000033334
FT3 033333 033334 0 0 707070707070 0 000000033334
FT9 033334 033334 0 0 707070707070 0 000000033334
ET0 033334 033334 0 0 707070707070 0 000000033334
ST1A 033334 033334 0 0 707070707070 0 000000033334
ST9 033334 033334 0 0 707070707070 0 000000033334
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 418
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0575
*033334 CAME 5,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033334 033334 0 0 312240033501 0 0
IT1 033334 0 0 0 312240033501 0 0
AT3 033334 0 0 0 000000033501 0 312240033501
AT6 033334 033501 0 0 000000033501 0 312240033501
FT0 033334 033501 0 0 0 0 312240033501
FT1A 033334 033501 0 0 0 0 0
FT2 033334 033501 0 0 0 0 0
FT2RQ 033334 033501 0 0 0 0 0
FT3 033334 033501 0 0 0 0 0
FT9 033335 033501 0 0 0 0 0
ET0 033336 033501 0 0 0 0 0
ST1A 033336 033501 0 0 0 0 0
ST9 033336 033501 0 0 0 0 0
*033336 JUMPA 0,033337
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033336 033336 0 0 324000033337 0 000000033337
IT1 033336 0 0 0 324000033337 0 000000033337
AT3 033336 0 0 0 000000033337 0 324000033337
AT6 033336 033337 0 0 000000033337 0 324000033337
FT1A 033336 033337 0 0 000000033337 0 000000033337
FT2 033336 033337 0 0 0 0 000000033337
FT2RQ 033336 033337 0 0 707070707070 0 000000033337
FT3 033336 033337 0 0 707070707070 0 000000033337
FT9 033337 033337 0 0 707070707070 0 000000033337
ET0 033337 033337 0 0 707070707070 0 000000033337
ST1A 033337 033337 0 0 707070707070 0 000000033337
ST9 033337 033337 0 0 707070707070 0 000000033337
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 419
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0576
*033337 MOVE 5,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033337 033337 0 0 200240033474 0 707070707070
IT1 033337 0 0 0 200240033474 0 707070707070
AT3 033337 0 0 0 000000033474 0 200240033474
AT6 033337 033474 0 0 000000033474 0 200240033474
FT0 033337 033474 0 0 707070707070 0 200240033474
FT1A 033337 033474 0 0 707070707070 0 707070707070
FT9 033340 033474 0 0 707070707070 0 707070707070
ET0 033340 033474 0 0 707070707070 0 707070707070
ST1 033340 033474 0 0 707070707070 0 707070707070
ST2 033340 033474 0 0 707070707070 0 707070707070
ST9 033340 033474 0 0 707070707070 0 707070707070
*033340 MOVEI 6,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033340 033340 0 0 201300000002 0 000000000002
IT1 033340 0 0 0 201300000002 0 000000000002
AT3 033340 0 0 0 000000000002 0 201300000002
AT6 033340 000002 0 0 000000000002 0 201300000002
FT1A 033340 000002 0 0 000000000002 0 000000000002
FT9 033341 000002 0 0 000000000002 0 000000000002
ET0 033341 000002 0 0 000000000002 0 000000000002
ST1 033341 000002 0 0 000000000002 0 000000000002
ST2 033341 000002 0 0 000000000002 0 000000000002
ST9 033341 000002 0 0 000000000002 0 000000000002
*033341 SOSGE 5,000006
INITIAL
C(AC)=707070 707070
C(E)=000000 000002
FINAL
C(AC)=000000 000001
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033341 033341 0 0 375240000006 0 000000000002
IT1 033341 0 0 0 375240000006 0 000000000002
AT3 033341 0 0 0 000000000006 0 375240000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 420
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0577
AT6 033341 000006 0 0 000000000006 0 375240000006
FT0 033341 000006 0 0 000000000002 0 375240000006
FT1A 033341 000006 0 0 000000000002 0 000000000002
FT9 033342 000006 0 0 000000000002 0 000000000002
ET0 033343 000006 0 0 000000000001 0 000000000002
ST1 033343 000006 0 0 000000000001 0 000000000002
ST2 033343 000006 0 0 000000000001 0 000000000002
ST5 033343 000006 0 0 000000000001 0 000000000002
ST6A 033343 000006 0 0 000000000001 0 000000000002
ST9 033343 000006 0 0 000000000001 0 000000000002
*033343 JUMPA 0,033344
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033343 033343 0 0 324000033344 0 000000033344
IT1 033343 0 0 0 324000033344 0 000000033344
AT3 033343 0 0 0 000000033344 0 324000033344
AT6 033343 033344 0 0 000000033344 0 324000033344
FT1A 033343 033344 0 0 000000033344 0 000000033344
FT2 033343 033344 0 0 0 0 000000033344
FT2RQ 033343 033344 0 0 707070707070 0 000000033344
FT3 033343 033344 0 0 707070707070 0 000000033344
FT9 033344 033344 0 0 707070707070 0 000000033344
ET0 033344 033344 0 0 707070707070 0 000000033344
ST1A 033344 033344 0 0 707070707070 0 000000033344
ST9 033344 033344 0 0 707070707070 0 000000033344
*033344 CAME 6,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033344 033344 0 0 312300033502 0 000000000001
IT1 033344 0 0 0 312300033502 0 000000000001
AT3 033344 0 0 0 000000033502 0 312300033502
AT6 033344 033502 0 0 000000033502 0 312300033502
FT0 033344 033502 0 0 000000000001 0 312300033502
FT1A 033344 033502 0 0 000000000001 0 000000000001
FT2 033344 033502 0 0 0 0 000000000001
FT2RQ 033344 033502 0 0 000000000001 0 000000000001
FT3 033344 033502 0 0 000000000001 0 000000000001
FT9 033345 033502 0 0 000000000001 0 000000000001
ET0 033346 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 421
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0578
ST1A 033346 033502 0 0 0 0 000000000001
ST9 033346 033502 0 0 0 0 000000000001
*033346 JUMPA 0,033347
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033346 033346 0 0 324000033347 0 000000033347
IT1 033346 0 0 0 324000033347 0 000000033347
AT3 033346 0 0 0 000000033347 0 324000033347
AT6 033346 033347 0 0 000000033347 0 324000033347
FT1A 033346 033347 0 0 000000033347 0 000000033347
FT2 033346 033347 0 0 0 0 000000033347
FT2RQ 033346 033347 0 0 707070707070 0 000000033347
FT3 033346 033347 0 0 707070707070 0 000000033347
FT9 033347 033347 0 0 707070707070 0 000000033347
ET0 033347 033347 0 0 707070707070 0 000000033347
ST1A 033347 033347 0 0 707070707070 0 000000033347
ST9 033347 033347 0 0 707070707070 0 000000033347
*033347 CAME 5,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033347 033347 0 0 312240033502 0 000000000001
IT1 033347 0 0 0 312240033502 0 000000000001
AT3 033347 0 0 0 000000033502 0 312240033502
AT6 033347 033502 0 0 000000033502 0 312240033502
FT0 033347 033502 0 0 000000000001 0 312240033502
FT1A 033347 033502 0 0 000000000001 0 000000000001
FT2 033347 033502 0 0 0 0 000000000001
FT2RQ 033347 033502 0 0 000000000001 0 000000000001
FT3 033347 033502 0 0 000000000001 0 000000000001
FT9 033350 033502 0 0 000000000001 0 000000000001
ET0 033351 033502 0 0 0 0 000000000001
ST1A 033351 033502 0 0 0 0 000000000001
ST9 033351 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 422
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0579
*033351 JUMPA 0,033352
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033351 033351 0 0 324000033352 0 000000033352
IT1 033351 0 0 0 324000033352 0 000000033352
AT3 033351 0 0 0 000000033352 0 324000033352
AT6 033351 033352 0 0 000000033352 0 324000033352
FT1A 033351 033352 0 0 000000033352 0 000000033352
FT2 033351 033352 0 0 0 0 000000033352
FT2RQ 033351 033352 0 0 707070707070 0 000000033352
FT3 033351 033352 0 0 707070707070 0 000000033352
FT9 033352 033352 0 0 707070707070 0 000000033352
ET0 033352 033352 0 0 707070707070 0 000000033352
ST1A 033352 033352 0 0 707070707070 0 000000033352
ST9 033352 033352 0 0 707070707070 0 000000033352
*033352 MOVE 4,033474
INITIAL
C(AC)=000000 000001
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033352 033352 0 0 200200033474 0 707070707070
IT1 033352 0 0 0 200200033474 0 707070707070
AT3 033352 0 0 0 000000033474 0 200200033474
AT6 033352 033474 0 0 000000033474 0 200200033474
FT0 033352 033474 0 0 707070707070 0 200200033474
FT1A 033352 033474 0 0 707070707070 0 707070707070
FT9 033353 033474 0 0 707070707070 0 707070707070
ET0 033353 033474 0 0 707070707070 0 707070707070
ST1 033353 033474 0 0 707070707070 0 707070707070
ST2 033353 033474 0 0 707070707070 0 707070707070
ST9 033353 033474 0 0 707070707070 0 707070707070
*033353 MOVEI 5,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033353 033353 0 0 201240000000 0 0
IT1 033353 0 0 0 201240000000 0 0
AT3 033353 0 0 0 0 0 201240000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 423
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0580
AT6 033353 0 0 0 0 0 201240000000
FT1A 033353 0 0 0 0 0 0
FT9 033354 0 0 0 0 0 0
ET0 033354 0 0 0 0 0 0
ST1 033354 0 0 0 0 0 0
ST2 033354 0 0 0 0 0 0
ST9 033354 0 0 0 0 0 0
*033354 SOSN 4,000005
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033354 033354 0 0 376200000005 0 0
IT1 033354 0 0 0 376200000005 0 0
AT3 033354 0 0 0 000000000005 0 376200000005
AT6 033354 000005 0 0 000000000005 0 376200000005
FT0 033354 000005 0 0 0 0 376200000005
FT1A 033354 000005 0 0 0 0 0
FT9 033355 000005 0 0 0 0 0
ET0 033356 000005 0 0 777777777777 0 0
ST1 033356 000005 0 0 777777777777 0 0
ST2 033356 000005 0 0 777777777777 0 0
ST5 033356 000005 0 0 777777777777 0 0
ST6A 033356 000005 0 0 777777777777 0 0
ST9 033356 000005 0 0 777777777777 0 0
*033356 JUMPA 0,033357
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033356 033356 0 0 324000033357 0 000000033357
IT1 033356 0 0 0 324000033357 0 000000033357
AT3 033356 0 0 0 000000033357 0 324000033357
AT6 033356 033357 0 0 000000033357 0 324000033357
FT1A 033356 033357 0 0 000000033357 0 000000033357
FT2 033356 033357 0 0 0 0 000000033357
FT2RQ 033356 033357 0 0 707070707070 0 000000033357
FT3 033356 033357 0 0 707070707070 0 000000033357
FT9 033357 033357 0 0 707070707070 0 000000033357
ET0 033357 033357 0 0 707070707070 0 000000033357
ST1A 033357 033357 0 0 707070707070 0 000000033357
ST9 033357 033357 0 0 707070707070 0 000000033357
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 424
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0581
*033357 CAME 5,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033357 033357 0 0 312240033462 0 777777777777
IT1 033357 0 0 0 312240033462 0 777777777777
AT3 033357 0 0 0 000000033462 0 312240033462
AT6 033357 033462 0 0 000000033462 0 312240033462
FT0 033357 033462 0 0 777777777777 0 312240033462
FT1A 033357 033462 0 0 777777777777 0 777777777777
FT2 033357 033462 0 0 0 0 777777777777
FT2RQ 033357 033462 0 0 777777777777 0 777777777777
FT3 033357 033462 0 0 777777777777 0 777777777777
FT9 033360 033462 0 0 777777777777 0 777777777777
ET0 033361 033462 0 0 0 0 777777777777
ST1A 033361 033462 0 0 0 0 777777777777
ST9 033361 033462 0 0 0 0 777777777777
*033361 JUMPA 0,033362
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033361 033361 0 0 324000033362 0 000000033362
IT1 033361 0 0 0 324000033362 0 000000033362
AT3 033361 0 0 0 000000033362 0 324000033362
AT6 033361 033362 0 0 000000033362 0 324000033362
FT1A 033361 033362 0 0 000000033362 0 000000033362
FT2 033361 033362 0 0 0 0 000000033362
FT2RQ 033361 033362 0 0 707070707070 0 000000033362
FT3 033361 033362 0 0 707070707070 0 000000033362
FT9 033362 033362 0 0 707070707070 0 000000033362
ET0 033362 033362 0 0 707070707070 0 000000033362
ST1A 033362 033362 0 0 707070707070 0 000000033362
ST9 033362 033362 0 0 707070707070 0 000000033362
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 425
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0582
*033362 CAME 4,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033362 033362 0 0 312200033462 0 777777777777
IT1 033362 0 0 0 312200033462 0 777777777777
AT3 033362 0 0 0 000000033462 0 312200033462
AT6 033362 033462 0 0 000000033462 0 312200033462
FT0 033362 033462 0 0 777777777777 0 312200033462
FT1A 033362 033462 0 0 777777777777 0 777777777777
FT2 033362 033462 0 0 0 0 777777777777
FT2RQ 033362 033462 0 0 777777777777 0 777777777777
FT3 033362 033462 0 0 777777777777 0 777777777777
FT9 033363 033462 0 0 777777777777 0 777777777777
ET0 033364 033462 0 0 0 0 777777777777
ST1A 033364 033462 0 0 0 0 777777777777
ST9 033364 033462 0 0 0 0 777777777777
*033364 JUMPA 0,033365
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033364 033364 0 0 324000033365 0 000000033365
IT1 033364 0 0 0 324000033365 0 000000033365
AT3 033364 0 0 0 000000033365 0 324000033365
AT6 033364 033365 0 0 000000033365 0 324000033365
FT1A 033364 033365 0 0 000000033365 0 000000033365
FT2 033364 033365 0 0 0 0 000000033365
FT2RQ 033364 033365 0 0 707070707070 0 000000033365
FT3 033364 033365 0 0 707070707070 0 000000033365
FT9 033365 033365 0 0 707070707070 0 000000033365
ET0 033365 033365 0 0 707070707070 0 000000033365
ST1A 033365 033365 0 0 707070707070 0 000000033365
ST9 033365 033365 0 0 707070707070 0 000000033365
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 426
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0583
*033365 MOVE 4,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033365 033365 0 0 200200033474 0 707070707070
IT1 033365 0 0 0 200200033474 0 707070707070
AT3 033365 0 0 0 000000033474 0 200200033474
AT6 033365 033474 0 0 000000033474 0 200200033474
FT0 033365 033474 0 0 707070707070 0 200200033474
FT1A 033365 033474 0 0 707070707070 0 707070707070
FT9 033366 033474 0 0 707070707070 0 707070707070
ET0 033366 033474 0 0 707070707070 0 707070707070
ST1 033366 033474 0 0 707070707070 0 707070707070
ST2 033366 033474 0 0 707070707070 0 707070707070
ST9 033366 033474 0 0 707070707070 0 707070707070
*033366 MOVEI 5,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033366 033366 0 0 201240000001 0 000000000001
IT1 033366 0 0 0 201240000001 0 000000000001
AT3 033366 0 0 0 000000000001 0 201240000001
AT6 033366 000001 0 0 000000000001 0 201240000001
FT1A 033366 000001 0 0 000000000001 0 000000000001
FT9 033367 000001 0 0 000000000001 0 000000000001
ET0 033367 000001 0 0 000000000001 0 000000000001
ST1 033367 000001 0 0 000000000001 0 000000000001
ST2 033367 000001 0 0 000000000001 0 000000000001
ST9 033367 000001 0 0 000000000001 0 000000000001
*033367 SOSN 4,000005
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033367 033367 0 0 376200000005 0 000000000001
IT1 033367 0 0 0 376200000005 0 000000000001
AT3 033367 0 0 0 000000000005 0 376200000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 427
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0584
AT6 033367 000005 0 0 000000000005 0 376200000005
FT0 033367 000005 0 0 000000000001 0 376200000005
FT1A 033367 000005 0 0 000000000001 0 000000000001
FT9 033370 000005 0 0 000000000001 0 000000000001
ET0 033370 000005 0 0 0 0 000000000001
ST1 033370 000005 0 0 0 0 000000000001
ST2 033370 000005 0 0 0 0 000000000001
ST5 033370 000005 0 0 0 0 000000000001
ST6A 033370 000005 0 0 0 0 000000000001
ST9 033370 000005 0 0 0 0 000000000001
*033370 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033370 033370 0 0 334000000000 0 707070707070
IT1 033370 0 0 0 334000000000 0 707070707070
AT3 033370 0 0 0 0 0 334000000000
AT6 033370 0 0 0 0 0 334000000000
FT0 033370 0 0 0 707070707070 0 334000000000
FT1A 033370 0 0 0 707070707070 0 707070707070
FT9 033371 0 0 0 707070707070 0 707070707070
ET0 033372 0 0 0 707070707070 0 707070707070
ST1A 033372 0 0 0 707070707070 0 707070707070
ST9 033372 0 0 0 707070707070 0 707070707070
*033372 JUMPA 0,033373
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033372 033372 0 0 324000033373 0 000000033373
IT1 033372 0 0 0 324000033373 0 000000033373
AT3 033372 0 0 0 000000033373 0 324000033373
AT6 033372 033373 0 0 000000033373 0 324000033373
FT1A 033372 033373 0 0 000000033373 0 000000033373
FT2 033372 033373 0 0 0 0 000000033373
FT2RQ 033372 033373 0 0 707070707070 0 000000033373
FT3 033372 033373 0 0 707070707070 0 000000033373
FT9 033373 033373 0 0 707070707070 0 000000033373
ET0 033373 033373 0 0 707070707070 0 000000033373
ST1A 033373 033373 0 0 707070707070 0 000000033373
ST9 033373 033373 0 0 707070707070 0 000000033373
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 428
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0585
*033373 CAME 5,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033373 033373 0 0 312240033501 0 0
IT1 033373 0 0 0 312240033501 0 0
AT3 033373 0 0 0 000000033501 0 312240033501
AT6 033373 033501 0 0 000000033501 0 312240033501
FT0 033373 033501 0 0 0 0 312240033501
FT1A 033373 033501 0 0 0 0 0
FT2 033373 033501 0 0 0 0 0
FT2RQ 033373 033501 0 0 0 0 0
FT3 033373 033501 0 0 0 0 0
FT9 033374 033501 0 0 0 0 0
ET0 033375 033501 0 0 0 0 0
ST1A 033375 033501 0 0 0 0 0
ST9 033375 033501 0 0 0 0 0
*033375 JUMPA 0,033376
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033375 033375 0 0 324000033376 0 000000033376
IT1 033375 0 0 0 324000033376 0 000000033376
AT3 033375 0 0 0 000000033376 0 324000033376
AT6 033375 033376 0 0 000000033376 0 324000033376
FT1A 033375 033376 0 0 000000033376 0 000000033376
FT2 033375 033376 0 0 0 0 000000033376
FT2RQ 033375 033376 0 0 707070707070 0 000000033376
FT3 033375 033376 0 0 707070707070 0 000000033376
FT9 033376 033376 0 0 707070707070 0 000000033376
ET0 033376 033376 0 0 707070707070 0 000000033376
ST1A 033376 033376 0 0 707070707070 0 000000033376
ST9 033376 033376 0 0 707070707070 0 000000033376
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 429
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0586
*033376 CAME 4,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033376 033376 0 0 312200033501 0 0
IT1 033376 0 0 0 312200033501 0 0
AT3 033376 0 0 0 000000033501 0 312200033501
AT6 033376 033501 0 0 000000033501 0 312200033501
FT0 033376 033501 0 0 0 0 312200033501
FT1A 033376 033501 0 0 0 0 0
FT2 033376 033501 0 0 0 0 0
FT2RQ 033376 033501 0 0 0 0 0
FT3 033376 033501 0 0 0 0 0
FT9 033377 033501 0 0 0 0 0
ET0 0 033501 0 0 0 0 0
ST1A 0 033501 0 0 0 0 0
ST9 0 033501 0 0 0 0 0
*033400 JUMPA 0,033401
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 324000033401 0 000000033401
IT1 0 0 0 0 324000033401 0 000000033401
AT3 0 0 0 0 000000033401 0 324000033401
AT6 0 033401 0 0 000000033401 0 324000033401
FT1A 0 033401 0 0 000000033401 0 000000033401
FT2 0 033401 0 0 0 0 000000033401
FT2RQ 0 033401 0 0 707070707070 0 000000033401
FT3 0 033401 0 0 707070707070 0 000000033401
FT9 033401 033401 0 0 707070707070 0 000000033401
ET0 033401 033401 0 0 707070707070 0 000000033401
ST1A 033401 033401 0 0 707070707070 0 000000033401
ST9 033401 033401 0 0 707070707070 0 000000033401
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 430
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0587
*033401 MOVE 4,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033401 033401 0 0 200200033474 0 707070707070
IT1 033401 0 0 0 200200033474 0 707070707070
AT3 033401 0 0 0 000000033474 0 200200033474
AT6 033401 033474 0 0 000000033474 0 200200033474
FT0 033401 033474 0 0 707070707070 0 200200033474
FT1A 033401 033474 0 0 707070707070 0 707070707070
FT9 033402 033474 0 0 707070707070 0 707070707070
ET0 033402 033474 0 0 707070707070 0 707070707070
ST1 033402 033474 0 0 707070707070 0 707070707070
ST2 033402 033474 0 0 707070707070 0 707070707070
ST9 033402 033474 0 0 707070707070 0 707070707070
*033402 MOVEI 5,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033402 033402 0 0 201240000002 0 000000000002
IT1 033402 0 0 0 201240000002 0 000000000002
AT3 033402 0 0 0 000000000002 0 201240000002
AT6 033402 000002 0 0 000000000002 0 201240000002
FT1A 033402 000002 0 0 000000000002 0 000000000002
FT9 033403 000002 0 0 000000000002 0 000000000002
ET0 033403 000002 0 0 000000000002 0 000000000002
ST1 033403 000002 0 0 000000000002 0 000000000002
ST2 033403 000002 0 0 000000000002 0 000000000002
ST9 033403 000002 0 0 000000000002 0 000000000002
*033403 SOSN 4,000005
INITIAL
C(AC)=707070 707070
C(E)=000000 000002
FINAL
C(AC)=000000 000001
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033403 033403 0 0 376200000005 0 000000000002
IT1 033403 0 0 0 376200000005 0 000000000002
AT3 033403 0 0 0 000000000005 0 376200000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 431
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0588
AT6 033403 000005 0 0 000000000005 0 376200000005
FT0 033403 000005 0 0 000000000002 0 376200000005
FT1A 033403 000005 0 0 000000000002 0 000000000002
FT9 033404 000005 0 0 000000000002 0 000000000002
ET0 033405 000005 0 0 000000000001 0 000000000002
ST1 033405 000005 0 0 000000000001 0 000000000002
ST2 033405 000005 0 0 000000000001 0 000000000002
ST5 033405 000005 0 0 000000000001 0 000000000002
ST6A 033405 000005 0 0 000000000001 0 000000000002
ST9 033405 000005 0 0 000000000001 0 000000000002
*033405 JUMPA 0,033406
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033406
FT3 033405 033406 0 0 707070707070 0 000000033406
FT9 033406 033406 0 0 707070707070 0 000000033406
ET0 033406 033406 0 0 707070707070 0 000000033406
ST1A 033406 033406 0 0 707070707070 0 000000033406
ST9 033406 033406 0 0 707070707070 0 000000033406
*033406 CAME 5,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033406 033406 0 0 312240033502 0 000000000001
IT1 033406 0 0 0 312240033502 0 000000000001
AT3 033406 0 0 0 000000033502 0 312240033502
AT6 033406 033502 0 0 000000033502 0 312240033502
FT0 033406 033502 0 0 000000000001 0 312240033502
FT1A 033406 033502 0 0 000000000001 0 000000000001
FT2 033406 033502 0 0 0 0 000000000001
FT2RQ 033406 033502 0 0 000000000001 0 000000000001
FT3 033406 033502 0 0 000000000001 0 000000000001
FT9 033407 033502 0 0 000000000001 0 000000000001
ET0 033410 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 432
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0589
ST1A 033410 033502 0 0 0 0 000000000001
ST9 033410 033502 0 0 0 0 000000000001
*033410 JUMPA 0,033411
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033410 033410 0 0 324000033411 0 000000033411
IT1 033410 0 0 0 324000033411 0 000000033411
AT3 033410 0 0 0 000000033411 0 324000033411
AT6 033410 033411 0 0 000000033411 0 324000033411
FT1A 033410 033411 0 0 000000033411 0 000000033411
FT2 033410 033411 0 0 0 0 000000033411
FT2RQ 033410 033411 0 0 707070707070 0 000000033411
FT3 033410 033411 0 0 707070707070 0 000000033411
FT9 033411 033411 0 0 707070707070 0 000000033411
ET0 033411 033411 0 0 707070707070 0 000000033411
ST1A 033411 033411 0 0 707070707070 0 000000033411
ST9 033411 033411 0 0 707070707070 0 000000033411
*033411 CAME 4,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033411 033411 0 0 312200033502 0 000000000001
IT1 033411 0 0 0 312200033502 0 000000000001
AT3 033411 0 0 0 000000033502 0 312200033502
AT6 033411 033502 0 0 000000033502 0 312200033502
FT0 033411 033502 0 0 000000000001 0 312200033502
FT1A 033411 033502 0 0 000000000001 0 000000000001
FT2 033411 033502 0 0 0 0 000000000001
FT2RQ 033411 033502 0 0 000000000001 0 000000000001
FT3 033411 033502 0 0 000000000001 0 000000000001
FT9 033412 033502 0 0 000000000001 0 000000000001
ET0 033413 033502 0 0 0 0 000000000001
ST1A 033413 033502 0 0 0 0 000000000001
ST9 033413 033502 0 0 0 0 000000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 433
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0590
*033413 JUMPA 0,033414
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033413 033413 0 0 324000033414 0 000000033414
IT1 033413 0 0 0 324000033414 0 000000033414
AT3 033413 0 0 0 000000033414 0 324000033414
AT6 033413 033414 0 0 000000033414 0 324000033414
FT1A 033413 033414 0 0 000000033414 0 000000033414
FT2 033413 033414 0 0 0 0 000000033414
FT2RQ 033413 033414 0 0 707070707070 0 000000033414
FT3 033413 033414 0 0 707070707070 0 000000033414
FT9 033414 033414 0 0 707070707070 0 000000033414
ET0 033414 033414 0 0 707070707070 0 000000033414
ST1A 033414 033414 0 0 707070707070 0 000000033414
ST9 033414 033414 0 0 707070707070 0 000000033414
*033414 MOVE 3,033474
INITIAL
C(AC)=000000 000001
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033414 033414 0 0 200140033474 0 707070707070
IT1 033414 0 0 0 200140033474 0 707070707070
AT3 033414 0 0 0 000000033474 0 200140033474
AT6 033414 033474 0 0 000000033474 0 200140033474
FT0 033414 033474 0 0 707070707070 0 200140033474
FT1A 033414 033474 0 0 707070707070 0 707070707070
FT9 033415 033474 0 0 707070707070 0 707070707070
ET0 033415 033474 0 0 707070707070 0 707070707070
ST1 033415 033474 0 0 707070707070 0 707070707070
ST2 033415 033474 0 0 707070707070 0 707070707070
ST9 033415 033474 0 0 707070707070 0 707070707070
*033415 MOVEI 4,000000
INITIAL
C(AC)=000000 000001
FINAL
C(AC)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033415 033415 0 0 201200000000 0 0
IT1 033415 0 0 0 201200000000 0 0
AT3 033415 0 0 0 0 0 201200000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 434
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0591
AT6 033415 0 0 0 0 0 201200000000
FT1A 033415 0 0 0 0 0 0
FT9 033416 0 0 0 0 0 0
ET0 033416 0 0 0 0 0 0
ST1 033416 0 0 0 0 0 0
ST2 033416 0 0 0 0 0 0
ST9 033416 0 0 0 0 0 0
*033416 SOSG 3,000004
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=777777 777777
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033416 033416 0 0 377140000004 0 0
IT1 033416 0 0 0 377140000004 0 0
AT3 033416 0 0 0 000000000004 0 377140000004
AT6 033416 000004 0 0 000000000004 0 377140000004
FT0 033416 000004 0 0 0 0 377140000004
FT1A 033416 000004 0 0 0 0 0
FT9 033417 000004 0 0 0 0 0
ET0 033417 000004 0 0 777777777777 0 0
ST1 033417 000004 0 0 777777777777 0 0
ST2 033417 000004 0 0 777777777777 0 0
ST5 033417 000004 0 0 777777777777 0 0
ST6A 033417 000004 0 0 777777777777 0 0
ST9 033417 000004 0 0 777777777777 0 0
*033417 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033417 033417 0 0 334000000000 0 707070707070
IT1 033417 0 0 0 334000000000 0 707070707070
AT3 033417 0 0 0 0 0 334000000000
AT6 033417 0 0 0 0 0 334000000000
FT0 033417 0 0 0 707070707070 0 334000000000
FT1A 033417 0 0 0 707070707070 0 707070707070
FT9 033420 0 0 0 707070707070 0 707070707070
ET0 033421 0 0 0 707070707070 0 707070707070
ST1A 033421 0 0 0 707070707070 0 707070707070
ST9 033421 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 435
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0592
*033421 JUMPA 0,033422
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033421 033421 0 0 324000033422 0 000000033422
IT1 033421 0 0 0 324000033422 0 000000033422
AT3 033421 0 0 0 000000033422 0 324000033422
AT6 033421 033422 0 0 000000033422 0 324000033422
FT1A 033421 033422 0 0 000000033422 0 000000033422
FT2 033421 033422 0 0 0 0 000000033422
FT2RQ 033421 033422 0 0 707070707070 0 000000033422
FT3 033421 033422 0 0 707070707070 0 000000033422
FT9 033422 033422 0 0 707070707070 0 000000033422
ET0 033422 033422 0 0 707070707070 0 000000033422
ST1A 033422 033422 0 0 707070707070 0 000000033422
ST9 033422 033422 0 0 707070707070 0 000000033422
*033422 CAME 4,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033422 033422 0 0 312200033462 0 777777777777
IT1 033422 0 0 0 312200033462 0 777777777777
AT3 033422 0 0 0 000000033462 0 312200033462
AT6 033422 033462 0 0 000000033462 0 312200033462
FT0 033422 033462 0 0 777777777777 0 312200033462
FT1A 033422 033462 0 0 777777777777 0 777777777777
FT2 033422 033462 0 0 0 0 777777777777
FT2RQ 033422 033462 0 0 777777777777 0 777777777777
FT3 033422 033462 0 0 777777777777 0 777777777777
FT9 033423 033462 0 0 777777777777 0 777777777777
ET0 033424 033462 0 0 0 0 777777777777
ST1A 033424 033462 0 0 0 0 777777777777
ST9 033424 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 436
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0593
*033424 JUMPA 0,033425
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033425
FT3 033424 033425 0 0 707070707070 0 000000033425
FT9 033425 033425 0 0 707070707070 0 000000033425
ET0 033425 033425 0 0 707070707070 0 000000033425
ST1A 033425 033425 0 0 707070707070 0 000000033425
ST9 033425 033425 0 0 707070707070 0 000000033425
*033425 CAME 3,033462
INITIAL
C(AC)=777777 777777
C(E)=777777 777777
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033425 033425 0 0 312140033462 0 777777777777
IT1 033425 0 0 0 312140033462 0 777777777777
AT3 033425 0 0 0 000000033462 0 312140033462
AT6 033425 033462 0 0 000000033462 0 312140033462
FT0 033425 033462 0 0 777777777777 0 312140033462
FT1A 033425 033462 0 0 777777777777 0 777777777777
FT2 033425 033462 0 0 0 0 777777777777
FT2RQ 033425 033462 0 0 777777777777 0 777777777777
FT3 033425 033462 0 0 777777777777 0 777777777777
FT9 033426 033462 0 0 777777777777 0 777777777777
ET0 033427 033462 0 0 0 0 777777777777
ST1A 033427 033462 0 0 0 0 777777777777
ST9 033427 033462 0 0 0 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 437
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0594
*033427 JUMPA 0,033430
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033427 033427 0 0 324000033430 0 000000033430
IT1 033427 0 0 0 324000033430 0 000000033430
AT3 033427 0 0 0 000000033430 0 324000033430
AT6 033427 033430 0 0 000000033430 0 324000033430
FT1A 033427 033430 0 0 000000033430 0 000000033430
FT2 033427 033430 0 0 0 0 000000033430
FT2RQ 033427 033430 0 0 707070707070 0 000000033430
FT3 033427 033430 0 0 707070707070 0 000000033430
FT9 033430 033430 0 0 707070707070 0 000000033430
ET0 033430 033430 0 0 707070707070 0 000000033430
ST1A 033430 033430 0 0 707070707070 0 000000033430
ST9 033430 033430 0 0 707070707070 0 000000033430
*033430 MOVE 3,033474
INITIAL
C(AC)=777777 777777
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033430 033430 0 0 200140033474 0 707070707070
IT1 033430 0 0 0 200140033474 0 707070707070
AT3 033430 0 0 0 000000033474 0 200140033474
AT6 033430 033474 0 0 000000033474 0 200140033474
FT0 033430 033474 0 0 707070707070 0 200140033474
FT1A 033430 033474 0 0 707070707070 0 707070707070
FT9 033431 033474 0 0 707070707070 0 707070707070
ET0 033431 033474 0 0 707070707070 0 707070707070
ST1 033431 033474 0 0 707070707070 0 707070707070
ST2 033431 033474 0 0 707070707070 0 707070707070
ST9 033431 033474 0 0 707070707070 0 707070707070
*033431 MOVEI 4,000001
INITIAL
C(AC)=777777 777777
FINAL
C(AC)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033431 033431 0 0 201200000001 0 000000000001
IT1 033431 0 0 0 201200000001 0 000000000001
AT3 033431 0 0 0 000000000001 0 201200000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 438
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0595
AT6 033431 000001 0 0 000000000001 0 201200000001
FT1A 033431 000001 0 0 000000000001 0 000000000001
FT9 033432 000001 0 0 000000000001 0 000000000001
ET0 033432 000001 0 0 000000000001 0 000000000001
ST1 033432 000001 0 0 000000000001 0 000000000001
ST2 033432 000001 0 0 000000000001 0 000000000001
ST9 033432 000001 0 0 000000000001 0 000000000001
*033432 SOSG 3,000004
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=000000 000000
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 033432 033432 0 0 377140000004 0 000000000001
IT1 033432 0 0 0 377140000004 0 000000000001
AT3 033432 0 0 0 000000000004 0 377140000004
AT6 033432 000004 0 0 000000000004 0 377140000004
FT0 033432 000004 0 0 000000000001 0 377140000004
FT1A 033432 000004 0 0 000000000001 0 000000000001
FT9 033433 000004 0 0 000000000001 0 000000000001
ET0 033433 000004 0 0 0 0 000000000001
ST1 033433 000004 0 0 0 0 000000000001
ST2 033433 000004 0 0 0 0 000000000001
ST5 033433 000004 0 0 0 0 000000000001
ST6A 033433 000004 0 0 0 0 000000000001
ST9 033433 000004 0 0 0 0 000000000001
*033433 SKIPA 0,000000
INITIAL
C(AC)=707070 707070
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033433 033433 0 0 334000000000 0 707070707070
IT1 033433 0 0 0 334000000000 0 707070707070
AT3 033433 0 0 0 0 0 334000000000
AT6 033433 0 0 0 0 0 334000000000
FT0 033433 0 0 0 707070707070 0 334000000000
FT1A 033433 0 0 0 707070707070 0 707070707070
FT9 033434 0 0 0 707070707070 0 707070707070
ET0 033435 0 0 0 707070707070 0 707070707070
ST1A 033435 0 0 0 707070707070 0 707070707070
ST9 033435 0 0 0 707070707070 0 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 439
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0596
*033435 JUMPA 0,033436
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033435 033435 0 0 324000033436 0 000000033436
IT1 033435 0 0 0 324000033436 0 000000033436
AT3 033435 0 0 0 000000033436 0 324000033436
AT6 033435 033436 0 0 000000033436 0 324000033436
FT1A 033435 033436 0 0 000000033436 0 000000033436
FT2 033435 033436 0 0 0 0 000000033436
FT2RQ 033435 033436 0 0 707070707070 0 000000033436
FT3 033435 033436 0 0 707070707070 0 000000033436
FT9 033436 033436 0 0 707070707070 0 000000033436
ET0 033436 033436 0 0 707070707070 0 000000033436
ST1A 033436 033436 0 0 707070707070 0 000000033436
ST9 033436 033436 0 0 707070707070 0 000000033436
*033436 CAME 4,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033436 033436 0 0 312200033501 0 0
IT1 033436 0 0 0 312200033501 0 0
AT3 033436 0 0 0 000000033501 0 312200033501
AT6 033436 033501 0 0 000000033501 0 312200033501
FT0 033436 033501 0 0 0 0 312200033501
FT1A 033436 033501 0 0 0 0 0
FT2 033436 033501 0 0 0 0 0
FT2RQ 033436 033501 0 0 0 0 0
FT3 033436 033501 0 0 0 0 0
FT9 033437 033501 0 0 0 0 0
ET0 033440 033501 0 0 0 0 0
ST1A 033440 033501 0 0 0 0 0
ST9 033440 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 440
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0597
*033440 JUMPA 0,033441
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033440 033440 0 0 324000033441 0 000000033441
IT1 033440 0 0 0 324000033441 0 000000033441
AT3 033440 0 0 0 000000033441 0 324000033441
AT6 033440 033441 0 0 000000033441 0 324000033441
FT1A 033440 033441 0 0 000000033441 0 000000033441
FT2 033440 033441 0 0 0 0 000000033441
FT2RQ 033440 033441 0 0 707070707070 0 000000033441
FT3 033440 033441 0 0 707070707070 0 000000033441
FT9 033441 033441 0 0 707070707070 0 000000033441
ET0 033441 033441 0 0 707070707070 0 000000033441
ST1A 033441 033441 0 0 707070707070 0 000000033441
ST9 033441 033441 0 0 707070707070 0 000000033441
*033441 CAME 3,033501
INITIAL
C(AC)=000000 000000
C(E)=000000 000000
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033441 033441 0 0 312140033501 0 0
IT1 033441 0 0 0 312140033501 0 0
AT3 033441 0 0 0 000000033501 0 312140033501
AT6 033441 033501 0 0 000000033501 0 312140033501
FT0 033441 033501 0 0 0 0 312140033501
FT1A 033441 033501 0 0 0 0 0
FT2 033441 033501 0 0 0 0 0
FT2RQ 033441 033501 0 0 0 0 0
FT3 033441 033501 0 0 0 0 0
FT9 033442 033501 0 0 0 0 0
ET0 033443 033501 0 0 0 0 0
ST1A 033443 033501 0 0 0 0 0
ST9 033443 033501 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 441
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0598
*033443 JUMPA 0,033444
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033443 033443 0 0 324000033444 0 000000033444
IT1 033443 0 0 0 324000033444 0 000000033444
AT3 033443 0 0 0 000000033444 0 324000033444
AT6 033443 033444 0 0 000000033444 0 324000033444
FT1A 033443 033444 0 0 000000033444 0 000000033444
FT2 033443 033444 0 0 0 0 000000033444
FT2RQ 033443 033444 0 0 707070707070 0 000000033444
FT3 033443 033444 0 0 707070707070 0 000000033444
FT9 033444 033444 0 0 707070707070 0 000000033444
ET0 033444 033444 0 0 707070707070 0 000000033444
ST1A 033444 033444 0 0 707070707070 0 000000033444
ST9 033444 033444 0 0 707070707070 0 000000033444
*033444 MOVE 3,033474
INITIAL
C(AC)=000000 000000
C(E)=707070 707070
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033444 033444 0 0 200140033474 0 707070707070
IT1 033444 0 0 0 200140033474 0 707070707070
AT3 033444 0 0 0 000000033474 0 200140033474
AT6 033444 033474 0 0 000000033474 0 200140033474
FT0 033444 033474 0 0 707070707070 0 200140033474
FT1A 033444 033474 0 0 707070707070 0 707070707070
FT9 033445 033474 0 0 707070707070 0 707070707070
ET0 033445 033474 0 0 707070707070 0 707070707070
ST1 033445 033474 0 0 707070707070 0 707070707070
ST2 033445 033474 0 0 707070707070 0 707070707070
ST9 033445 033474 0 0 707070707070 0 707070707070
*033445 MOVEI 4,000002
INITIAL
C(AC)=000000 000000
FINAL
C(AC)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033445 033445 0 0 201200000002 0 000000000002
IT1 033445 0 0 0 201200000002 0 000000000002
AT3 033445 0 0 0 000000000002 0 201200000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 442
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0599
AT6 033445 000002 0 0 000000000002 0 201200000002
FT1A 033445 000002 0 0 000000000002 0 000000000002
FT9 033446 000002 0 0 000000000002 0 000000000002
ET0 033446 000002 0 0 000000000002 0 000000000002
ST1 033446 000002 0 0 000000000002 0 000000000002
ST2 033446 000002 0 0 000000000002 0 000000000002
ST9 033446 000002 0 0 000000000002 0 000000000002
*033446 SOSG 3,000004
INITIAL
C(AC)=707070 707070
C(E)=000000 000002
FINAL
C(AC)=000000 000001
C(E)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 033446 033446 0 0 377140000004 0 000000000002
IT1 033446 0 0 0 377140000004 0 000000000002
AT3 033446 0 0 0 000000000004 0 377140000004
AT6 033446 000004 0 0 000000000004 0 377140000004
FT0 033446 000004 0 0 000000000002 0 377140000004
FT1A 033446 000004 0 0 000000000002 0 000000000002
FT9 033447 000004 0 0 000000000002 0 000000000002
ET0 033450 000004 0 0 000000000001 0 000000000002
ST1 033450 000004 0 0 000000000001 0 000000000002
ST2 033450 000004 0 0 000000000001 0 000000000002
ST5 033450 000004 0 0 000000000001 0 000000000002
ST6A 033450 000004 0 0 000000000001 0 000000000002
ST9 033450 000004 0 0 000000000001 0 000000000002
*033450 JUMPA 0,033451
INITIAL
C(AC)=707070 707070
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033450 033450 0 0 324000033451 0 000000033451
IT1 033450 0 0 0 324000033451 0 000000033451
AT3 033450 0 0 0 000000033451 0 324000033451
AT6 033450 033451 0 0 000000033451 0 324000033451
FT1A 033450 033451 0 0 000000033451 0 000000033451
FT2 033450 033451 0 0 0 0 000000033451
FT2RQ 033450 033451 0 0 707070707070 0 000000033451
FT3 033450 033451 0 0 707070707070 0 000000033451
FT9 033451 033451 0 0 707070707070 0 000000033451
ET0 033451 033451 0 0 707070707070 0 000000033451
ST1A 033451 033451 0 0 707070707070 0 000000033451
ST9 033451 033451 0 0 707070707070 0 000000033451
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 443
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0600
*033451 CAME 4,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033451 033451 0 0 312200033502 0 000000000001
IT1 033451 0 0 0 312200033502 0 000000000001
AT3 033451 0 0 0 000000033502 0 312200033502
AT6 033451 033502 0 0 000000033502 0 312200033502
FT0 033451 033502 0 0 000000000001 0 312200033502
FT1A 033451 033502 0 0 000000000001 0 000000000001
FT2 033451 033502 0 0 0 0 000000000001
FT2RQ 033451 033502 0 0 000000000001 0 000000000001
FT3 033451 033502 0 0 000000000001 0 000000000001
FT9 033452 033502 0 0 000000000001 0 000000000001
ET0 033453 033502 0 0 0 0 000000000001
ST1A 033453 033502 0 0 0 0 000000000001
ST9 033453 033502 0 0 0 0 000000000001
*033453 JUMPA 0,033454
INITIAL
C(AC)=707070 707070
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 707070707070 0 000000033454
FT3 033453 033454 0 0 707070707070 0 000000033454
FT9 033454 033454 0 0 707070707070 0 000000033454
ET0 033454 033454 0 0 707070707070 0 000000033454
ST1A 033454 033454 0 0 707070707070 0 000000033454
ST9 033454 033454 0 0 707070707070 0 000000033454
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 444
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0601
*033454 CAME 3,033502
INITIAL
C(AC)=000000 000001
C(E)=000000 000001
FINAL
TIME PC MA SC FE AR MQ BR
IT0 033454 033454 0 0 312140033502 0 000000000001
IT1 033454 0 0 0 312140033502 0 000000000001
AT3 033454 0 0 0 000000033502 0 312140033502
AT6 033454 033502 0 0 000000033502 0 312140033502
FT0 033454 033502 0 0 000000000001 0 312140033502
FT1A 033454 033502 0 0 000000000001 0 000000000001
FT2 033454 033502 0 0 0 0 000000000001
FT2RQ 033454 033502 0 0 000000000001 0 000000000001
FT3 033454 033502 0 0 000000000001 0 000000000001
FT9 033455 033502 0 0 000000000001 0 000000000001
ET0 033456 033502 0 0 0 0 000000000001
ST1A 033456 033502 0 0 0 0 000000000001
ST9 033456 033502 0 0 0 0 000000000001
*033456 JUMPA 0,033457
INITIAL
C(AC)=707070 707070
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
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 707070707070 0 000000033457
FT3 033456 033457 0 0 707070707070 0 000000033457
FT9 033457 033457 0 0 707070707070 0 000000033457
ET0 033457 033457 0 0 707070707070 0 000000033457
ST1A 033457 033457 0 0 707070707070 0 000000033457
ST9 033457 033457 0 0 707070707070 0 000000033457
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 445
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0602
*033457 JRST 0,030057
INITIAL
C(AC)=707070 707070
C(E)=254000 030631
FINAL
C(E)=254000 030631
TIME PC MA SC FE AR MQ BR
IT0 033457 033457 0 0 254000030057 0 254000030057
IT1 033457 0 0 0 254000030057 0 254000030057
AT3 033457 0 0 0 000000030057 0 254000030057
AT6 033457 030057 0 0 000000030057 0 254000030057
FT1A 033457 030057 0 0 000000030057 0 254000030057
FT9 033460 030057 0 0 000000030057 0 254000030057
ET0 030057 033460 0 0 000000030057 0 254000030057
ST1A 030057 033460 0 0 000000030057 0 254000030057
ST9 030057 033460 0 0 000000030057 0 254000030057
*030057 JRST 0,030631
INITIAL
C(AC)=707070 707070
C(E)=350000 030047
FINAL
C(E)=350000 030047
TIME PC MA SC FE AR MQ BR
IT0 030057 030057 0 0 254000030631 0 254000030631
IT1 030057 0 0 0 254000030631 0 254000030631
AT3 030057 0 0 0 000000030631 0 254000030631
AT6 030057 030631 0 0 000000030631 0 254000030631
FT1A 030057 030631 0 0 000000030631 0 254000030631
FT9 030060 030631 0 0 000000030631 0 254000030631
ET0 030631 030060 0 0 000000030631 0 254000030631
ST1A 030631 030060 0 0 000000030631 0 254000030631
ST9 030631 030060 0 0 000000030631 0 254000030631
*030631 AOS 0,030047
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=707070 707070
C(E)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 030631 030631 0 0 350000030047 0 0
IT1 030631 0 0 0 350000030047 0 0
AT3 030631 0 0 0 000000030047 0 350000030047
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 446
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0603
AT6 030631 030047 0 0 000000030047 0 350000030047
FT0 030631 030047 0 0 0 0 350000030047
FT1A 030631 030047 0 0 0 0 0
FT9 030632 030047 0 0 0 0 0
ET0 030632 030047 0 0 000000000001 0 0
ST5 030632 030047 0 0 000000000001 0 0
ST6A 030632 030047 0 0 000000000001 0 0
ST9 030632 030047 0 0 000000000001 0 0
*030632 SOS 0,030024
INITIAL
C(AC)=707070 707070
C(E)=000000 000001
FINAL
C(AC)=707070 707070
C(E)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 030632 030632 0 0 370000030024 0 000000000001
IT1 030632 0 0 0 370000030024 0 000000000001
AT3 030632 0 0 0 000000030024 0 370000030024
AT6 030632 030024 0 0 000000030024 0 370000030024
FT0 030632 030024 0 0 000000000001 0 370000030024
FT1A 030632 030024 0 0 000000000001 0 000000000001
FT9 030633 030024 0 0 000000000001 0 000000000001
ET0 030633 030024 0 0 0 0 000000000001
ST5 030633 030024 0 0 0 0 000000000001
ST6A 030633 030024 0 0 0 0 000000000001
ST9 030633 030024 0 0 0 0 000000000001
*030633 SKIPN 0,030037
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 030633 030633 0 0 336000030037 0 0
IT1 030633 0 0 0 336000030037 0 0
AT3 030633 0 0 0 000000030037 0 336000030037
AT6 030633 030037 0 0 000000030037 0 336000030037
FT0 030633 030037 0 0 0 0 336000030037
FT1A 030633 030037 0 0 0 0 0
FT9 030634 030037 0 0 0 0 0
ET0 030634 030037 0 0 0 0 0
ST1A 030634 030037 0 0 0 0 0
ST9 030634 030037 0 0 0 0 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 447
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0604
*030634 JRST 0,030642
INITIAL
C(AC)=707070 707070
C(E)=332000 030041
FINAL
C(E)=332000 030041
TIME PC MA SC FE AR MQ BR
IT0 030634 030634 0 0 254000030642 0 254000030642
IT1 030634 0 0 0 254000030642 0 254000030642
AT3 030634 0 0 0 000000030642 0 254000030642
AT6 030634 030642 0 0 000000030642 0 254000030642
FT1A 030634 030642 0 0 000000030642 0 254000030642
FT9 030635 030642 0 0 000000030642 0 254000030642
ET0 030642 030635 0 0 000000030642 0 254000030642
ST1A 030642 030635 0 0 000000030642 0 254000030642
ST9 030642 030635 0 0 000000030642 0 254000030642
*030642 SKIPE 0,030041
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 030642 030642 0 0 332000030041 0 0
IT1 030642 0 0 0 332000030041 0 0
AT3 030642 0 0 0 000000030041 0 332000030041
AT6 030642 030041 0 0 000000030041 0 332000030041
FT0 030642 030041 0 0 0 0 332000030041
FT1A 030642 030041 0 0 0 0 0
FT9 030643 030041 0 0 0 0 0
ET0 030644 030041 0 0 0 0 0
ST1A 030644 030041 0 0 0 0 0
ST9 030644 030041 0 0 0 0 0
*030644 DATAO 4,030024
TIME PC MA SC FE AR MQ BR
IT0 030644 030644 0 0 700540030024 0 000000030024
IT1 030644 0 0 0 700540030024 0 000000030024
AT3 030644 0 0 0 000000030024 0 700540030024
AT6 030644 030024 0 0 000000030024 0 700540030024
FT1A 030644 030024 0 0 000000030024 0 000000030024
FT2 030644 030024 0 0 0 0 000000030024
FT2RQ 030644 030024 0 0 000000000001 0 000000030024
FT3 030644 030024 0 0 000000000001 0 000000030024
FT9 030645 030024 0 0 000000000001 0 000000030024
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 28-DEC-78 PAGE 448
DAKAE 000000 000000 000000 000000 000000 000000 030000 777777 SEQ 0605
ST1 030645 030024 0 0 000000000001 0 000000030024
ST2 030645 030024 0 0 000000000001 0 000000030024
ST9 030645 030024 0 0 000000000001 0 000000030024
*030645 SKIPE 0,030024
INITIAL
C(AC)=707070 707070
C(E)=000000 000000
FINAL
C(AC)=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 030645 030645 0 0 332000030024 0 0
IT1 030645 0 0 0 332000030024 0 0
AT3 030645 0 0 0 000000030024 0 332000030024
AT6 030645 030024 0 0 000000030024 0 332000030024
FT0 030645 030024 0 0 0 0 332000030024
FT1A 030645 030024 0 0 0 0 0
FT9 030646 030024 0 0 0 0 0
ET0 030647 030024 0 0 0 0 0
ST1A 030647 030024 0 0 0 0 0
ST9 030647 030024 0 0 0 0 0
*030647 JRST 0,@030012
INITIAL
C(AC)=707070 707070
C(E)=000000 431100
FINAL
C(E)=000000 431100
TIME PC MA SC FE AR MQ BR
IT0 030647 030647 0 0 254020030012 0 000000431100
IT1 030647 0 0 0 254020030012 0 000000431100
AT3 030647 0 0 0 000000030012 0 254020030012
AT4 030647 030012 0 0 000000431100 0 254020030012
IT1 030647 0 0 0 000000431100 0 254020030012
AT3 030647 0 0 0 000000431100 0 000000431100
AT6 030647 0 0 0 000000431100 0 000000431100
FT1A 030647 0 0 0 000000431100 0 000000431100
FT9 030650 0 0 0 000000431100 0 000000431100
ET0 0 030650 0 0 000000431100 0 000000431100
ST1A 0 030650 0 0 000000431100 0 000000431100
ST9 0 030650 0 0 000000431100 0 000000431100