Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/dakam.seq
There are no other files named dakam.seq in the archive.
MAINDEC-10-DAKAM.TXT
SEQ 0001
IDENTIFICATION
--------------
PRODUCT CODE: MAINDEC-10-DAKAM-B-D
PRODUCT NAME: DECSYSTEM10 PDP-10 KA10 BASIC
INSTRUCTION DIAGNOSTIC (13)
FUNCTION: BYTE, BLT, JFFO
VERSION: 0.2
DATE RELEASED: JANUARY 1977
MAINTAINED BY: DIAGNOSTIC ENGINEERING GROUP
AUTHOR: JOHN R. KIRCHOFF
COPYRIGHT(C) 1976,1977
DIGITAL EQUIPMENT CORPORATION
MARLBORO, MASS. 01752
THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY
ON A SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH
THE INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE,
OR ANY OTHER COPIES THEREOF, MAY NOT BE PROVIDED OR OTHERWISE
MADE AVAILABLE TO ANY OTHER PERSON EXECPT FOR USE ON SUCH SYSTEM
AND TO ONE WHO AGREES TO THESE LICENSE TERMS. TITLE TO AND
OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES REMAIN IN DEC.
THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
MAINDEC-10-DAKAM.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 DATA SWITCH FUNCTIONS
5.0 ERRORS
6.0 ITERATION COUNTER
7.0 CYCLE TIME
8.0 OPERATIONAL VARIATIONS
9.0 MISCELLANEOUS
10.0 LISTING
MAINDEC-10-DAKAM.TXT
PAGE 3 SEQ 0003
1.0 ABSTRACT
THIS PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC IS THE
THIRTEENTH IN A SERIES OF PDP-10 KA10 PROCESSOR DIAGNOSTICS.
THE DIAGNOSTIC TESTS THE BYTE, BLOCK TRANSFER AND
JFFO INSTRUCTIONS.
2.0 REQUIREMENTS
2.1 EQUIPMENT
A PDP-10 KA10 EQUIPPED WITH A MINIMUM OF 32K OF MEMORY
PAPER TAPE READER
CONSOLE TELETYPE
DECTAPE
LINE PRINTER (OPTIONAL)
2.2 STORAGE
THE PROGRAM RUNS WITHIN 32K OF MEMORY.
2.3 PRELIMINARY PROGRAMS
PREVIOUS PROCESSOR DIAGNOSTICS
3.0 PROGRAM PROCEDURES
3.1 LOADING PROCEDURE
THIS DIAGNOSTIC REQUIRES THAT THE DECSYSTEM10 SUBROUTINE
PROGRAM BE RESIDENT IN THE PDP-10.
PAPER TAPE - HARDWARE READ-IN (READER DEVICE CODE 104)
DECTAPE - LOAD WITH DIAMON (DECTAPE DEVICE CODE 320)
TIME SHARING - RUN UNDER DIAMON.
MAINDEC-10-DAKAM.TXT
PAGE 4 SEQ 0004
3.2 STARTING PROCEDURE
A. SELECT OPERATIONAL CONSOLE DATA SWITCH SETTINGS (REFER TO
4.0 DATA SWITCH FUNCTIONS).
B. EXEC MODE
STAND-ALONE STARTING ADDRESS IS 30000.
C. USER MODE
RUN UNDER "DIAMON".
IN USER MODE THE FOLLOWING QUESTIONS WILL BE ASKED TO
SELECT THE OPERATIONAL SWITCHES:
TELETYPE SWITCH CONTROL ? 0,S,Y OR N (CR) -
IF THE OPERATOR TYPES "N", THE ACTUAL CONSOLE
SWITCHES ARE USED.
IF THE OPERATOR TYPES "Y", THE FOLLOWING QUESTIONS
ARE ASKED AND THE OPERATOR RESPONDS BY TYPING
THE ANSWER AS SIX OCTAL DIGITS REPRESENTING
THE DESIRED SWITCH SETTINGS.
SPECIFY LH SWITCHES IN OCTAL-
SPECIFY RH SWITCHES IN OCTAL-
IF THE OPERATOR TYPES "0", ZERO'S ARE USED FOR
THE SWITCH SETTINGS.
IF THE OPERATOR TYPES "S", PREVIOUSLY SET SWITCHES
ARE USED. THIS IS ONLY VALID UPON RESTARTING
OF AN INTERRUPTED PROGRAM.
MAINDEC-10-DAKAM.TXT
PAGE 5 SEQ 0005
3.3 OPERATING PROCEDURE
A. TO THROUGHLY TEST ALL HARDWARE, ALL TEST CONTROL DATA
SWITCHES SHOULD BE SET TO 0.
B. WHEN DEBUGGING HARDWARE, SET SWITCHES TO 0. ALLOW THE
TELETYPE TO PRINT THE ERROR MESSAGES. THIS ALLOWS THE
PROGRAM TO RUN A COMPLETE PASS AND THEN THE ERROR MESSAGES
MAY BE CORRELATED TO QUICKLY DIAGNOSE THE FAILURE. IF A
HARDWARE PROBLEM IS SUCH THAT THE ERROR MESSAGES, AFTER THE
FIRST ONE, HAVE NO MEANING (FIRST ERROR CAUSES ALL FOLLOWING
TESTS TO FAIL) SET THE LOOP ON ERROR SWITCH AND RESTART THE
TEST FROM THE BEGINNING. THE FIRST FAILURE WILL THEN CAUSE
THE PROGRAM TO ENTER A LOOP SUITABLE FOR SCOPING.
THE ERROR MESSAGE USED IN CONJUNCTION WITH THE LISTING AND
SCOPING IF NECESSARY SHOULD ALLOW THE FAILING CONPONENT
TO BE ISOLATED AND REPLACED AND/OR REPAIRED.
C. WHEN TAKING MARGINS, SET DATA SWITCHES 'NOPNT' AND 'DING'.
THIS WILL INHIBIT PRINTOUT BUT WILL ALLOW THE TELETYPE
BELL TO BE RUNG WHEN A ERROR OCCURS. IF THE MARGIN OBTAINED
IS UNACCEPTABLE, THE OPERATOR MAY REVERT TO STANDARD SWITCH
SETTINGS FOR DEBUGGING PURPOSES.
D. ERROR INFORMATION MAY BE OBTAINED QUICKLY BY PRINTING
ERRORS ON THE LINE PRINTER.
E. IN THE EVENT OF A PRINT ROUTINE FAILURE THE 'NOPNT' SWITCH
AND THE 'ERSTOP' SWITCH MAY BE SET TO INHIBIT PRINTOUT
BUT HALT THE PROGRAM POINTING TO THE ERROR.
MAINDEC-10-DAKAM.TXT
PAGE 6 SEQ 0006
4.0 DATA SWITCH FUNCTIONS
SWITCH STATE FUNCTION
------ ----- --------
0 ABORT 0 NORMAL OPERATION
1 ABORT AT END OF PASS
1 RSTART NOT USED
2 TOTALS NOT USED
3 NOPNT 0 NORMAL TYPEOUT
1 INHIBIT ALL PRINT/TYPEOUT
(EXCEPT FORCED)
4 PNTLPT 0 NORMAL OUTPUT TO TTY
1 PRINT ALL DATA ON LPT
(LOGICAL DEVICE, USER MODE)
5 DING 0 NO FUNCTION
1 RING TTY BELL ON ERROR
6 LOOPER 0 PROCEED TO NEXT TEST
1 ENTER SCOPE LOOP ON TEST ERROR
7 ERSTOP 0 NO FUNCTION
1 HALT ON TEST ERROR
8 PALERS 0 PRINT ONLY FIRST ERROR WHEN LOOPING
1 PRINT ALL ERRORS, EVEN IF SAME ERROR
9 RELIAB NOT USED
10 TXTINH 0 PRINT FULL ERROR MESSAGES.
1 INHIBIT COMMENT PORTION OF
ERROR MESSAGES.
11 INHPAG 0 ALLOW PAGING AND TRAP ENABLE
1 INHIBIT PAGING AND TRAPPING
12 MODDVC NOT USED
13 INHCSH NOT USED
MAINDEC-10-DAKAM.TXT
PAGE 7 SEQ 0007
5.0 ERRORS
ERRORS ARE PRINTED ON THE TTY OR LINE PRINTER. THE ERROR
PRINTOUT CONTAINS THE TEST TITLE, THE PC OF THE FAILURE, ERROR
NUMBER AND THE CONTENTS OF AN APPLICABLE AC.
THE PC VALUE IS USEFUL IN RELATING THE FAILURE TO THE LISTING.
THE ERROR NUMBER IS PROVIDED SUCH THAT AN ERROR DICTIONARY MAY
BE MADE AT SOME FUTURE DATE.
WHEN THE SCOPE LOOP MODE IS USED THE MI REGISTER WILL COUNT
FOR EACH OCCURANCE OF AN ERROR. IF AN AUDIO INDICATION OF
A CONTINUING ERROR IS DESIRED THE 'DING' SWITCH MAY BE SET.
6.0 ITERATION COUNTER
THE ITERATION COUNT OF THE PROGRAM IS DISPLAYED IN THE MEMORY
INDICATORS (MI). THIS COUNT IS A DECREMENTING COUNT AND
INITIALLY STARTS AT -1 IN STAND-ALONE OPERATION.
7.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-DAKAM.TXT
PAGE 8 SEQ 0008
8.0 OPERATIONAL VARIATIONS
A. DIAGNOSTIC MONITOR
THE PROGRAM IS USABLE WITH THE DIAGNOSTIC MONITOR TO PROVIDE
RELIABILITY TESTS, ACCEPTANCE TESTS, AND/OR TO PROVIDE A
QUICK METHOD OF ISOLATION OF A FAULT TO A PARTICULAR AREA
OF THE PROCESSOR. CERTAIN PROCEDURES ARE USED WHEN THE
PROGRAM IS USED IN THIS MANNER. THEY ARE:
1. THE DIAGNOSTIC MONITOR TRANSFERS CONTROL TO THE PROGRAM
AND STARTS IT AT LOCATION 30002.
2. MONCTL - LOCATION 30043 IS USED AS THE DIAGNOSTIC MONITOR
CONTROL WORD.
LH = 0, STAND-ALONE OPERATION
-1, RUNNING UNDER DIAGNOSTIC MONITOR
RH = RIGHT HALF OF CONSOLE SWITCHES IF UNDER
DIAGNOSTIC MONITOR CONTROL.
B. USER MODE
TO OUTPUT THE PRINTED ERROR MESSAGES TO A USER SPECIFIED
DEVICE IN USER MODE, ASSIGN THE DESIRED OUTPUT DEVICE TO
DEVICE NAME 'DEV' AND SET SWITCH 'PNTLPT'. THE PHYSICAL
DEVICE USED CAN BE ANY DEVICE THAT CAN ACCEPT ASCII OUTPUT
FORMAT SUCH AS LPT, DSK, DTA, ETC. THE CORRESPONDING
OUTPUT FILE IS 'DAKAM.TMP'
EXAMPLE DEVICE ASSIGNMENT:
.ASSIGN DSK DEV
IN USER MODE THE PROGRAM WILL MAKE 1000(8) PASSES AND THEN
RETURN TO DIAMON COMMAND MODE.
MAINDEC-10-DAKAM.TXT
PAGE 9 SEQ 0009
8.0 OPERATIONAL VARIATIONS (CON'T)
THE OUTPUT FILE (IF USED) MAY THEN BE LISTED BY USING THE
NORMAL MONITOR COMMANDS (PRINT, LIST, TYPE, PIP, ETC.).
IF THE PROGRAM IS ABORTED BEFORE COMPLETION (BY ^C, ETC.) THE
OUTPUT FILE MAY BE CLOSED BY USING THE MONITOR 'REENTER'
COMMAND.
C. SYSTEM EXERCISER
START ADDRESS IS 30003. DATA SWITCHES ARE PRESTORED IN
'SWTEXR' LOC 30023.
9.0 MISCELLANEOUS
THE NON-EX-MEMORY AND PARITY STOP SWITCHES SHOULD BE RESET
(0). THESE ERRORS, ILLEGAL UUO'S AND OTHER ERRORS OF THIS
TYPE ARE HANDLED BY PRINTOUT ON THE TELETYPE.
10.0 LISTING
THIS IS A HISTORY OF THE DEVELOPMENT OF MAINDEC-10-DAKAM
SEQ 0010
************************************************************************
PRODUCT CODE: MAINDEC-10-DAKAM
PRODUCT NAME: BASIC INSTRUCTION DIAGNOSTIC #13
DATE RELEASED: JANUARY 1977
VERSION: 0.2
UPDATE AUTHOR: JOHN R. KIRCHOFF
CHANGES MADE:
1. UPGRADE TO ALLOW COMPATABILITY WITH THE SUBROUTINE PACKAGE.
2. ADD TEST FOR BLT WITH EFFECTIVE ADDRESS LESS THAN CONTENTS OF
AC RIGHT.
************************************************************************
ORIGINAL VERSION: 0.1
ORIGINAL AUTHOR: RICHARD MALISKA
ORIGINAL RELEASE: 16-MAR-72
************************************************************************
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1
DAKAMT MAC 20-JAN-77 11:33 DIAGNOSTIC PARAMETERS SEQ 0011
1 ;DAKAM
2
3
4 000000 MCNVER==0
5 000002 DECVER==2
6
7
8 XLIST
9 LIST
10 LALL
11
12 NAME \MCNVER,\DECVER^
13
14 TITLE DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2
15 ^
16
17 ;(BYTE, BLOCK TRANSFER, JFFO AND OTHER BASIC MISCELLANEOUS INSTRUCTIONS)
18
19 ;COPYRIGHT 1975,1977
20 ;DIGITAL EQUIPMENT CORPORATION
21 ;MARLBORO, MASS. 01752
22
23 ;JOHN R. KIRCHOFF
24
25 000137 LOC 137
26 000137 000000 000002 MCNVER,,DECVER
27
28 NOSYM
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 2
DAKAMT MAC 20-JAN-77 11:33 DIAGNOSTIC PARAMETERS SEQ 0012
29 SUBTTL DIAGNOSTIC PARAMETERS
30
31 ;OPERATOR DEFINITIONS
32
33 001000 000000 OPDEF ER1 [1B8]
34 002000 000000 OPDEF ER2 [2B8]
35 003000 000000 OPDEF ER3 [3B8]
36 004000 000000 OPDEF ER4 [4B8]
37 005000 000000 OPDEF ER5 [5B8]
38 006000 000000 OPDEF ER6 [6B8]
39 007000 000000 OPDEF ER7 [7B8]
40 010000 000000 OPDEF ER10 [10B8]
41 011000 000000 OPDEF ER11 [11B8]
42 012000 000000 OPDEF ER12 [12B8]
43 013000 000000 OPDEF ER13 [13B8]
44
45 040530 LUUO1=ERRMES
46 040530 LUUO2=ERRMES
47 040530 LUUO3=ERRMES
48 040530 LUUO4=ERRMES
49 040530 LUUO5=ERRMES
50 040530 LUUO6=ERRMES
51 040530 LUUO7=ERRMES
52 040530 LUUO10=ERRMES
53 040530 LUUO11=ERRMES
54 040530 LUUO12=ERRMES
55 040530 LUUO13=ERRMES
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 3
DAKAMT MAC 20-JAN-77 11:33 DIAGNOSTIC PARAMETERS SEQ 0013
56 ;SUBROUTINE ASSEMBLY DEFINITIONS
57
58 000040 DEBUG=40
59 000001 EXCASB=1
60 000001 USRASB=1
61 000001 KA10=1
62 000001 PGMEND=1
63 000001 ERDIAG=1
64
65 ;SPECIAL FEATURE DEFINITIONS
66
67 030000 SADR1=BEGIN
68 030000 SADR2=BEGIN
69 030000 SADR3=BEGIN
70 030000 SADR4=BEGIN
71 254000 030000 SADR5=JRST BEGIN
72 254000 030000 SADR6=JRST BEGIN
73 254000 030000 SADR7=JRST BEGIN
74 254000 030000 SADR8=JRST BEGIN
75 254000 030000 SADR9=JRST BEGIN
76 254000 030000 SADR10=JRST BEGIN
77 254000 030000 SADR11=JRST BEGIN
78
79 ;SPECIAL FEATURE PARAMETERS
80
81 000000 PAREA0=0
82 000000 PAREA1=0
83 000000 PAREA2=0
84 444153 415500 PAREA3=SIXBIT/DAKAM/
85 645560 000000 PAREA4=SIXBIT/TMP/
86 000000 PAREA5=0
87 000000 PAREA6=0
88 001000 ITERAT==1000
89
90 ;MACROS
91
92 DEFINE SAVEAC (A,B)<
93 MOVEI AC+2,. ;SAVE TEST PC
94 MOVEM AC+2,TESTPC
95 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
96 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 4
DAKAMT MAC 20-JAN-77 11:33 DIAGNOSTIC PARAMETERS SEQ 0014
97 ;SPECIAL INSTRUCTIONS TO ASSEMBLER
98
99 IF1,<BYTBLK=14773> ;BYTBLK BEYOND AC RANGE FOR PASS 1
100 IF1,<BLTBLK=15000> ;BLTBLK BEYOND AC RANGE FOR PASS 1
101
102 ;MACROS
103
104 DEFINE GMOV (X1,DATA),<
105 IFLE <X1-20>,<
106 MOVE X1,[DATA] ;PRELOAD X1 WITH DATA>
107 IFG <X1-20>,<
108 MOVE AC+1,[DATA]
109 MOVEM AC+1,X1 ;PRELOAD X1 WITH DATA>>
110
111 DEFINE GCAM (X1,DATA),<
112 SN=SN+1
113 IFG <X1-20>,<
114 MOVE AC-1,X1
115 CAME AC-1,[DATA] ;IS C(X1) = DATA
116 IFIDN <DEST>,<X1>,<
117 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
118 IFDIF <DEST>,<X1>,<
119 ER2 AC-1,SN ;C(X1) WAS CLOBBERED>>
120 IFLE <X1-20>,<
121 CAME X1,[DATA] ;IS C(X1) = DATA
122 IFIDN <DEST>,<X1>,<
123 ER2 X1,SN ;DEST NOT LOADED CORRECTLY>
124 IFDIF <DEST>,<X1>,<
125 ER2 X1,SN ;C(X1) WAS CLOBBERED>>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 5
DAKAMT MAC 20-JAN-77 11:33 DIAGNOSTIC PARAMETERS SEQ 0015
126 DEFINE BLTM1 (A1,C1,S1,D1,SC)<
127 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
128 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
129 ;SOURCE DATA = SC
130
131 AC=C1
132 SAVEAC (1,1)
133 SN=A1
134 SRCE=S1 ;1ST LOC OF SOURCE = S1
135 DEST=D1 ;1ST LOC OF DESTINATION = D1
136 SIZ=1 ;BLOCK SIZE = 1 WORD
137
138 G'A1: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
139 GMOV (SRCE-1,<252525252525>)
140 GMOV (SRCE,<SC>)
141 GMOV (SRCE+1,<770077007700>)
142 GMOV (DEST-1,<070707070707>)
143 GMOV (DEST,<123456765432>)
144 GMOV (DEST+1,<552255225522>)
145 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
146 GCAM (SRCE-1,<252525252525>)
147 GCAM (SRCE,<SC>)
148 GCAM (SRCE+1,<770077007700>)
149 GCAM (DEST-1,<070707070707>)
150 GCAM (DEST,<SC>)
151 GCAM (DEST+1,<552255225522>)
152 JUMPL AC+2,G'A1 ;LOOP ON ERROR>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1
PARAM KLM 18-JAN-77 11:38 *PARAM* CONSOLE DATA SWITCH ASSIGNMENTS, JAN 18,1977 SEQ 0016
153 SUBTTL *PARAM* CONSOLE DATA SWITCH ASSIGNMENTS, JAN 18,1977
154
155 DEFINE S,<;*********************************************************************>
156
157 S^;*********************************************************************^
158 ;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
159 ;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
160 ;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
161 S^;*********************************************************************^
162
163 400000 ABORT== 400000 ;ABORT PROGRAM ON PASS COMPLETION
164 200000 RSTART==200000 ;RESTART TEST, PRINT TOTALS
165 100000 TOTALS==100000 ;PRINT TOTALS, CONTINUE
166
167 040000 NOPNT== 040000 ;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
168 020000 PNTLPT==020000 ;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
169 010000 DING== 010000 ;RING BELL ON ERROR
170
171 004000 LOOPER==004000 ;ENTER EXERCISE/CHECK LOOP ON ERROR
172 002000 ERSTOP==002000 ;HALT ON TEST ERROR
173 001000 PALERS==001000 ;PRINT ALL ERRORS
174
175 000400 RELIAB==000400 ;RELIABILITY MODE
176 000200 TXTINH==000200 ;INHIBIT ERROR TEXT
177 000100 INHPAG==000100 ;INHIBIT PAGING
178
179 000040 MODDVC==000040 ;MODIFY DEVICE CODE
180 000020 INHCSH==000020 ;INHIBIT CACHE
181 000010 OPRSEL==000010 ;OPERATOR SELECTION
182
183 000004 CHAIN== 000004 ;CHAIN CONTROL SWITCH
184
185 000002 KAHZ50==000002 ;KA10 50 HERTZ POWER
186
187 ;SWITCH 17 RESERVED !!!
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 2
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0017
188 SUBTTL *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977
189
190 S^;*********************************************************************^
191 ;*SPECIAL SUBPROGRAM LINKAGES
192 S^;*********************************************************************^
193
194 027772 FSELNK= 27772 ;FILE SELECT LINK
195 027773 FRDLNK= 27773 ;FILE READ LINK
196 027774 LDLNK= 27774 ;LOAD LINKAGE ADDRESS
197 027775 DDTLNK= 27775 ;DDT LINKAGE ADDRESS
198 027776 MODLNK= 27776 ;OPERATIONAL MODE CHECK LINKAGE ADDRESS
199 027777 SUBLNK= 27777 ;SUBROUTINE LINKAGE ADDRESS
200
201 S^;*********************************************************************^
202 ;*SPECIAL SUBROUTINE FATAL HALTS
203 ;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
204 S^;*********************************************************************^
205
206 ;ADDRESS TAG REASON
207 ;---------------------
208
209 ; 1010 NOEXEC ;PROGRAM NOT CODED FOR EXEC MODE OPERATION
210 ; 1011 PLERR ;FATAL PUSH LIST POINTER ERROR
211 ; 1012 PLERR1 ;INITIAL PUSH LIST POINTER ERROR
212 ; 1013 MUOERR ;MUUO WITH LUUO HANDLER WIPED OUT
213 ; 1014 DTEBER ;DTE20 INTERRUPT WITHOUT DOORBELL
214 ; 1015 DTECER ;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
215 ; 1016 CPIERR ;CPU INITIALIZATION ERROR
216 ; 1017 EOPERR ;END OF PROGRAM ERROR
217 ; 1020 LUOERR ;INTERRUPT WITH LUUO HANDLER WIPED OUT
218
219 S^;*********************************************************************^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 3
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0018
220 S^;*********************************************************************^
221 ;OPERATOR DEFINITIONS (NON-UUO'S)
222 S^;*********************************************************************^
223
224 260740 000000 OPDEF GO [PUSHJ P,] ;SUBROUTINE CALL
225 263740 000000 OPDEF RTN [POPJ P,] ;SUBROUTINE RETURN
226 261740 000000 OPDEF PUT [PUSH P,] ;PUT DATA ON PUSH LIST
227 262740 000000 OPDEF GET [POP P,] ;GET DATA FROM PUSH LIST
228 254000 000000 OPDEF PJRST [JRST ] ;JRST TO ROUTINE THAT RTN'S
229 254200 000000 OPDEF HALT [JRST 4,] ;DEFINITION FOR DDT
230 254100 000000 OPDEF JRSTF [JRST 2,] ;DEFINITION FOR DDT
231 254500 000000 OPDEF JEN [JRST 12,] ;DEFINITION FOR DDT
232
233 S^;*********************************************************************^
234 ;*SUBROUTINE INITIALIZATION CALL
235 S^;*********************************************************************^
236
237 265000 030011 OPDEF PGMINT [JSP 0,SBINIT] ;SUBROUTINE INITIALIZATION
238
239 S^;*********************************************************************^
240 ;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
241 S^;*********************************************************************^
242
243 037640 000004 OPDEF FATAL [37B8!15B12!4] ;FATAL PROGRAMMING HALT
244 037600 000004 OPDEF ERRHLT [37B8!14B12!4] ;PROGRAM ERROR HALT
245
246 S^;*********************************************************************^
247 ;*TERMINAL INPUT UUO'S
248 ;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
249 ;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
250 S^;*********************************************************************^
251
252 037000 000003 OPDEF TTICHR [37B8!0B12!3] ;TTY, INPUT ANY CHARACTER
253 037040 000003 OPDEF TTIYES [37B8!1B12!3] ;TTY, NORMAL RETURN Y
254 037100 000003 OPDEF TTINO [37B8!2B12!3] ;TTY, NORMAL RETURN N
255 037140 000003 OPDEF TTIOCT [37B8!3B12!3] ;TTY, INPUT OCTAL WORD
256 037200 000003 OPDEF TTIDEC [37B8!4B12!3] ;TTY, INPUT DECIMAL WORD
257 037240 000003 OPDEF TTICNV [37B8!5B12!3] ;TTY, INPUT CONVERTABLE WORD
258 037300 000003 OPDEF TTLOOK [37B8!6B12!3] ;TTY, KEYBOARD CHECK
259 037340 000003 OPDEF TTALTM [37B8!7B12!3] ;TTY, ALT-MODE CHECK
260 037400 000003 OPDEF TTSIXB [37B8!10B12!3] ;TTY, INPUT SIXBIT WORD
261 037440 000003 OPDEF TTYINP [37B8!11B12!3] ;TTY, IMAGE MODE INPUT
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 4
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0019
262 ;*TERMINAL OUTPUT UUO'S.
263
264 037000 000000 OPDEF PNTA [37B8!0B12!0] ;PRINT ASCII WORD
265 037000 000001 OPDEF PNTAF [37B8!0B12!1] ;PRINT ASCII WORD FORCED
266 037740 000000 OPDEF PNTAL [37B8!17B12!0] ;PRINT ASCIZ LINE
267 037740 000001 OPDEF PNTALF [37B8!17B12!1] ;PRINT ASCIZ LINE FORCED
268 037600 000003 OPDEF PSIXL [37B8!14B12!3] ;PRINT SIXBIT'Z LINE
269 037640 000003 OPDEF PSIXLF [37B8!15B12!3] ;PRINT SIXBIT'Z LINE FORCED
270 037000 000000 OPDEF PNTMSG [37B8!0B12!0] ;PRINT MESSAGE IMMEDIATE
271 037040 000000 OPDEF PNTMSF [37B8!1B12!0] ;PRINT MESSAGE IMMEDIATE FORCED
272 037100 000000 OPDEF PSIXM [37B8!2B12!0] ;PRINT SIXBIT'Z MSG IMMEDIATE
273 037200 000000 OPDEF PSIXMF [37B8!4B12!0] ;PRINT SIXBIT'Z MSG IMM FORCED
274 037000 000000 OPDEF PNTCI [37B8!0B12!0] ;PRINT CHARACTER IMMEDIATE
275 037040 000000 OPDEF PNTCIF [37B8!1B12!0] ;PRINT CHARACTER IMMEDIATE FORCED
276 037500 000000 OPDEF PNTCHR [37B8!12B12!0] ;PRINT CHARACTER
277 037500 000001 OPDEF PNTCHF [37B8!12B12!1] ;PRINT CHARACTER FORCED
278 037040 000000 OPDEF PNT1 [37B8!1B12!0] ;PRINT ONE OCTAL DIGIT
279 037040 000001 OPDEF PNT1F [37B8!1B12!1] ;PRINT 1 OCTAL DIGIT FORCED
280 037100 000000 OPDEF PNT2 [37B8!2B12!0] ;PRINT TWO OCTAL DIGITS
281 037100 000001 OPDEF PNT2F [37B8!2B12!1] ;PRINT 2 OCTAL DIGITS FORCED
282 037140 000000 OPDEF PNT3 [37B8!3B12!0] ;PRINT THREE OCTAL DIGITS
283 037140 000001 OPDEF PNT3F [37B8!3B12!1] ;PRINT THREE OCTAL DIGITS FORCED
284 037200 000000 OPDEF PNT4 [37B8!4B12!0] ;PRINT FOUR OCTAL DIGITS
285 037200 000001 OPDEF PNT4F [37B8!4B12!1] ;PRINT FOUR OCTAL DIGITS FORCED
286 037240 000000 OPDEF PNT5 [37B8!5B12!0] ;PRINT FIVE OCTAL DIGITS
287 037240 000001 OPDEF PNT5F [37B8!5B12!1] ;PRINT FIVE OCTAL DIGITS FORCED
288 037300 000000 OPDEF PNT6 [37B8!6B12!0] ;PRINT SIX OCTAL DIGITS
289 037300 000001 OPDEF PNT6F [37B8!6B12!1] ;PRINT SIX OCTAL DIGITS FORCED
290 037340 000000 OPDEF PNT7 [37B8!7B12!0] ;PRINT 7 OCTAL DIGITS
291 037340 000001 OPDEF PNT7F [37B8!7B12!1] ;PRINT 7 OCTAL DIGITS FORCED
292 037440 000000 OPDEF PNT11 [37B8!11B12!0] ;PRINT 11 OCTAL DIGITS
293 037440 000001 OPDEF PNT11F [37B8!11B12!1] ;PRINT 11 OCTAL DIGITS FORCED.
294 037400 000000 OPDEF PNTADR [37B8!10B12!0] ;PRINT PHYSICAL ADDRESS
295 037400 000001 OPDEF PNTADF [37B8!10B12!1] ;PRINT PHYSICAL ADDRESS FORCED
296 037600 000000 OPDEF PNTOCT [37B8!14B12!0] ;PRINT FULL WORD OCTAL
297 037600 000001 OPDEF PNTOTF [37B8!14B12!1] ;PRINT FULL WORD OCTAL FORCED
298 037540 000000 OPDEF PNTHW [37B8!13B12!0] ;PRINT OCTAL HALF WORDS, 6 SP 6
299 037540 000001 OPDEF PNTHWF [37B8!13B12!1] ;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
300 037700 000003 OPDEF PNTOCS [37B8!16B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S
301 037740 000003 OPDEF PNTOCF [37B8!17B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
302 037640 000000 OPDEF PNTDEC [37B8!15B12!0] ;PRINT DECIMAL, SUPRESS LEADING 0'S
303 037640 000001 OPDEF PNTDCF [37B8!15B12!1] ;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
304 037700 000000 OPDEF PNTDS [37B8!16B12!0] ;PRINT DECIMAL, SPACES FOR LD 0'S
305 037700 000001 OPDEF PNTDSF [37B8!16B12!1] ;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
306 037200 000002 OPDEF PNTNM [37B8!4B12!2] ;PRINT PROGRAM NAME
307 037000 000002 OPDEF PNTSIX [37B8!0B12!2] ;PRINT SIXBIT WORD
308 037040 000002 OPDEF PNTSXF [37B8!1B12!2] ;PRINT SIXBIT WORD FORCED
309 037240 000002 OPDEF DROPDV [37B8!5B12!2] ;CLOSE LOGICAL FILE, USER MODE
310 037100 000002 OPDEF PNTCW [37B8!2B12!2] ;PRINT DF10 CONTROL WORD
311 037140 000002 OPDEF PNTCWF [37B8!3B12!2] ;PRINT DF10 CONTROL WORD FORCED
312 037000 030242 OPDEF PCRL [37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
313 037040 030242 OPDEF PCRLF [37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
314 037000 000040 OPDEF PSP [37B8!0B12!40] ;PRINT SPACE
315 037040 000040 OPDEF PSPF [37B8!1B12!40] ;PRINT SPACE FORCED
316 037000 030243 OPDEF PCRL2 [37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 4-1
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0020
317 037040 030243 OPDEF PCRL2F [37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
318 037040 000007 OPDEF PBELL [37B8!1B12!7] ;PRINT TTY BELL
319
320 037040 000026 OPDEF PFORCE [37B8!1B12!26] ;PRINT FORCE, CONTROL O OVERRIDE
321
322 DEFINE PMSG (ARG),<
323 PSIXM [SIXBIT\ARG'_\]>
324
325 DEFINE PMSGF (ARG),<
326 PSIXMF [SIXBIT\ARG'_\]>
327
328 ;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
329 ;* CONSERVES CORE OVER ASCIZ
330
331 DEFINE SIXBTZ (ARG),< [SIXBIT\ARG'_\]>
332
333 ;*CONSOLE SWITCH INPUT UUO.
334 ;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
335 ;* USER MODE.
336
337 037400 000002 OPDEF SWITCH [37B8!10B12!2] ;INPUT CONSOLE SWITCHES
338
339 ;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
340 ;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
341
342 037540 000004 OPDEF CLOKOP [37B8!13B12!4] ;CLOCK OPERATION UUO - PDP-11 CLOCK
343 037200 000004 OPDEF MTROP [37B8!4B12!4] ;CLOCK OPERATION UUO - DK20 METER
344
345 ;*KL10 ONLY CACHE OPERATION UUO'S
346
347 037040 000004 OPDEF CINVAL [37B8!1B12!4] ;CACHE INVALIDATE
348 037100 000004 OPDEF CFLUSH [37B8!2B12!4] ;CACHE FLUSH
349 037140 000004 OPDEF CWRTBI [37B8!3B12!4] ;CACHE WRITE-BACK & INVALIDATE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 5
PARAM KLM 18-JAN-77 11:38 *PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977 SEQ 0021
350 ;*END OF PASS/PROGRAM UUOS
351
352 ;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
353 ;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
354
355 037500 000004 OPDEF ENDUUO [37B8!12B12!4] ;UUO TO DISPLAY LIGHTS
356 037700 000004 OPDEF EOPUUO [37B8!16B12!4] ;END OF PROGRAM UUO
357
358 ;*MEMORY MANAGEMENT UUO'S
359 ;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
360 ;*ADDRESS CONVERSION, ETC...
361
362 037000 000004 OPDEF MAPMEM [37B8!0B12!4] ;MAP MEMORY
363 037500 000002 OPDEF MEMZRO [37B8!12B12!2] ;ZERO MEMORY
364 037440 000002 OPDEF MEMSEG [37B8!11B12!2] ;SETUP MEMORY SEGMENT
365 037540 000002 OPDEF MAPADR [37B8!13B12!2] ;VIRTUAL TO PHYSICAL ADR CONVERT
366 037640 000002 OPDEF MAPCNK [37B8!15B12!2] ;MAP MEMORY CHUNK
367 037600 000002 OPDEF MAPSET [37B8!14B12!2] ;SET KI10 EXEC PAGE MAP
368 037740 000002 OPDEF MAPPNT [37B8!17B12!2] ;PRINT MEMORY MAP
369
370 ;*DEVICE CODE MODIFICATION UUO
371 ;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
372 ;*IOT'S TO A DIFFERENT DEVICE CODE.
373
374 037340 000002 OPDEF MODPCU [37B8!7B12!2] ;MODIFY PERHIPERAL CODE, USER
375 037300 000002 OPDEF MODPCP [37B8!6B12!2] ;MODIFY PERHIPERAL CODE, PROGRAM
376
377 030000 IFNDEF MODDVL,<MODDVL==BEGIN>
378 030000 IFNDEF MODDVU,<MODDVU==BEGIN>
379
380 ;*"DIAMON" FILE SELECTION AND READ UUOS
381
382 037240 000004 OPDEF FSELECT [37B8!5B12!4] ;FILE SELECTION
383 037300 000004 OPDEF FREAD [37B8!6B12!4] ;FILE READ - ASCII DATA
384 037340 000004 OPDEF FRD36 [37B8!7B12!4] ;FILE READ - 36 BIT DATA
385 037400 000004 OPDEF FRD8 [37B8!10B12!4] ;FILE READ - 8 BIT DATA
386
387 ;*KI10 ONLY UUO FOR PRINTING MARGIN VALUES
388
389 037700 000002 OPDEF PNTMGN [37B8!16B12!2] ;PRINT MARGIN VALUE
390
391 XLIST
392 IFNDEF KLOLD,<LIST
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 6
PARAM KLM 18-JAN-77 11:38 ERROR HANDLING UUO DEFINITIONS, JAN 18,1977 SEQ 0022
393 SUBTTL ERROR HANDLING UUO DEFINITIONS, JAN 18,1977
394
395 S^;*********************************************************************^
396 ;*ERROR HANDLER PARAMETERS
397 S^;*********************************************************************^
398
399 036000 000000 OPDEF ERUUO [36B8] ;ERROR CALL UUO
400 035000 000000 OPDEF ERLOOP [35B8] ;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
401 035040 000000 OPDEF ERLP1 [35B8!1B12] ;ERROR LOOP IF PC'S MATCH
402 035100 000000 OPDEF ERLP2 [35B8!2B12] ;ERROR LOOP IF ANY ERROR
403 034000 000000 OPDEF REPTUO [34B8] ;REPEAT LOOP UUO
404
405 ;*THE ERROR HANDLER MACROS
406
407 ;*A MACRO TO REPORT AN ERROR AND LOOP
408
409 DEFINE ERROR (ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
410 SALL
411 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
412 CORECT,,ACTUAL
413 [SIXBIT\D'_\],,ERR]
414 XALL
415
416 ERLOOP ADR ;IF ERROR, LOOP TO ADR
417 >
418
419 ;*A MACRO TO REPORT AN ERROR AND NOT LOOP
420
421 DEFINE ERROR1 (FORMAT,CORECT,ACTUAL,F,D,ERR)<
422 SALL
423 ERUUO FORMAT,[T,,[SIXBIT\F'_\]
424 CORECT,,ACTUAL
425 [SIXBIT\D'_\],,ERR]
426 XALL >
427
428 >;END OF KLOLD CONDITIONAL
429
430 XLIST
431 LIST
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0023
432 SUBTTL *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977
433
434 030000 LOC 30000
435
436 S^;*********************************************************************^
437 ;*PROGRAM STARTING ADDRESSES
438 ;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
439 ;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
440 ;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
441 ;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
442 S^;*********************************************************************^
443
444 030000 254 00 1 00 027776 BEGIN: JRST @MODLNK ;STAND-ALONE START
445 030001 254 00 0 00 030616 $START: JRST START ;MODE CHECK STARTING ADDRESS
446
447 030002 254 00 1 00 027774 DIAGMN: JRST @LDLNK ;DIAGNOSTIC MONITOR START
448
449 030003 254 00 1 00 027774 SYSEXR: JRST @LDLNK ;SYSTEM EXERCISER START
450
451 030004 254 00 0 00 030000 SFSTRT: JRST SADR1 ;SPECIAL FEATURE START
452
453 030005 254 00 0 00 030000 PFSTRT: JRST SADR2 ;POWER FAIL RESTART
454
455 030006 254 00 0 00 030000 REENTR: JRST SADR3 ;REENTER START(USUALLY USER MODE ONLY)
456
457 030007 SRTDDT: ;COMMONLY MISTAKEN NAME FOR "DDTSRT"
458 030007 254 00 1 00 027775 DDTSRT: JRST @DDTLNK ;DDT START
459
460 030010 254 00 0 00 030621 BEGIN1: JRST STARTA ;LOOP START(END OF PASS COMES HERE)
461 030011 254 00 1 00 027777 SBINIT: JRST @SUBLNK ;PMGINT LINKAGE
462 030012 000000 000000 RETURN: 0 ;RETURN ADDRESS STORAGE
463
464 030013 254000 030000 START1: SADR7 ;OPTIONAL STARTING ADR/INSTRUCTIONS
465 030014 254000 030000 START2: SADR8 ; "
466 030015 254000 030000 START3: SADR9 ; "
467 030016 254000 030000 START4: SADR10 ; "
468 030017 254000 030000 START5: SADR11 ; "
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 2
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0024
469 S^;*********************************************************************^
470 ;*PROGRAM FIXED PARAMETER AREA
471 S^;*********************************************************************^
472
473 030020 444153 415500 PNTNAM: PAREA3 ;SIXBIT PROGRAM NAME
474 030021 645560 000000 PNTEXT: PAREA4 ;SIXBIT PROGRAM EXTENSION
475 030022 000000 000000 RANDBS: PAREA1 ;RANDOM BASE NUMBER
476 030023 000000 000000 SWTEXR: PAREA2 ;SYSTEM EXERCISER SWITCHES
477 030024 000000 001000 ITRCNT: ITERAT ;PROGRAM ITERATIONS
478 030025 000000 030602 $PNAME: PGMNAM ;POINTER TO PROGRAMS NAME
479 030026 000000 000002 $PVER: MCNVER,,DECVER ;MCN & DEC VERSION LEVEL
480 030027 000000 030000 $MODVL: MODDVL ;DEVICE CODE CHANGE LOWER LIMIT
481 030030 000000 030000 $MODVU: MODDVU ;DEVICE CODE CHANGE UPPER LIMIT
482 030031 777777 777777 $EMODE: IFNDEF EXCASB,<0> IFDEF EXCASB,<-1> ;EXEC ALLOWED
483 030032 777777 777777 $UMODE: IFNDEF USRASB,<0> IFDEF USRASB,<-1> ;USER ALLOWED
484 030033 000000 000000 $DSKUP: IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1> ;DISK UPDATE MODE
485 030034 000000 000000 $MMAP: IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1> ;ALLOW MEMORY RTNS
486 030035 000000 000000 PAREA7: PAREA5 ;OPTIONAL PARAMETER
487 030036 000000 000000 PAREA8: PAREA6 ;OPTIONAL PARAMETER
488
489 S^;*********************************************************************^
490 ;*PROGRAM VARIABLE PARAMETER AREA
491 S^;*********************************************************************^
492
493 030037 000000 000000 USER: 0 ; 0 = EXEC, -1 = USER MODE FLAG
494 030040 000000 000000 KAIFLG: 0 ;PROCESSOR TYPE, 0 = KA10, -1 = KI10
495 030041 000000 000000 KLFLG: 0 ;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
496 030042 777777 777777 MONFLG: -1 ;DIAG MONITOR SPECIAL USER FLAG
497 030043 000000 000000 MONCTL: 0 ;DIAG MON/SYS EXR FLAG
498 030044 000000 000000 MONTEN: 0 ;-1= LOADED BY 10
499 030045 000000 000000 CLOCKF: 0 ;CLOCK TICKED FLAG
500 030046 000000 000000 CONSW: 0 ;CONSOLE SWITCH SETTINGS
501 030047 000000 000000 PASCNT: 0 ;PROGRAM PASS COUNT
502 030050 000000 000000 RUNFLG: 0 ;PROGRAM RUN FLAG
503 030051 000000 000000 TESTPC: 0 ;SUBTEST PC
504 030052 000000 000000 ERRPC: 0 ;ERROR PC
505 030053 000000 000000 ERRTLS: 0 ;ERROR TOTALS
506 030054 000000 000000 TICKS: 0 ;PROGRAM RUNNING TIME
507 030055 000000 000000 MARGIN: 0 ;KI10 MARGIN WORD VALUE
508 030056 000000 000000 $ONETM: 0 ;SUBROUTINE INITIALIZATION FLAG
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 3
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0025
509 S^;*********************************************************************^
510 ;*SPECIAL PROGRAM DISPATCH ADDRESSES
511 S^;*********************************************************************^
512
513 030057 037 12 0 00 000004 BEGEND: ENDUUO ;END OF PASS
514 030060 254 00 0 00 030010 $BEND1: JRST BEGIN1 ;KEEP RUNNING PROGRAM
515 030061 037 16 0 00 000004 $BEND2: EOPUUO ;END OF PROGRAM - NO RETURN
516 030062 254000 030000 CNTLC: SADR5 ;CONTROL C XFER ADDRESS
517 030063 254000 030000 ALTMGO: SADR6 ;ALTMODE XFER ADDRESS
518 030064 CPOPJ1: ;SKIP RETURN
519 030064 350 00 0 17 000000 UUOSKP: AOS (P) ;SKIP RETURN FROM UUO
520 030065 CPOPJ: ;NON-SKIP REGULAR RETURN
521 030065 263 17 0 00 000000 UUOEXT: RTN ;UUO RETURN
522 030066 255 00 0 00 000000 UUORTN: JFCL ;ADDITIONAL USERS UUO ROUTINE
523 030067 255 00 0 00 000000 $UORTX: JFCL ;ADDITIONAL UUO LINKAGE
524 030070 255 00 0 00 000000 $UUOER: JFCL ;INITED AS (JRST $UOERX)
525 030071 255 00 0 00 000000 $ITRHL: JFCL ;ADDITIONAL INTERRUPT LINKAGE
526 030072 255 00 0 00 000000 $ITRX1: JFCL ; "
527 030073 255 00 0 00 000000 $USRHL: JFCL ; "
528 030074 255 00 0 00 000000 $RSRTX: JFCL ;ADDITIONAL POWER FAIL LINKAGE
529 030075 255 00 0 00 000000 $RSRTY: JFCL ; "
530 030076 255 00 0 00 000000 RESRT1: JFCL ; INITED AS (JRST RESRTX)
531 030077 255 00 0 00 000000 RESRT2: JFCL ; "
532 030100 255 00 0 00 000000 $PARER: JFCL ;ADDITIONAL PARITY ERROR LINKAGE
533 030101 255 00 0 00 000000 ERMORE: JFCL ;ADDITIONAL ERROR HANDLER LINKAGE
534 030102 254 04 0 00 030102 HALT . ;IMPROPER TRANSFER HALT
535
536 030103 000000 000000 $PSHER: 0 ;INITED AS (JRST PSHERR)
537 030104 000000 000000 ITRCH1: 0 ;PC & FLAGS OF CURRENT INTERRUPT
538 030105 000000 000000 0 ;INITED AS (JRST $ITRC1)
539
540 S^;*********************************************************************^
541 ;*PROCESSOR CONTROL STORAGE
542 S^;*********************************************************************^
543
544 030106 000000 000000 $ACC0: 0 ;INTERRUPT SAVED AC0
545 030107 000000 000000 $SVPI: 0 ;INTERRUPT SAVED PI
546 030110 000000 000000 $SVAPR: 0 ;INTERRUPT SAVED APR
547 030111 000000 000000 $SVPAG: 0 ;INTERRUPT SAVED PAG (DATAI)
548 030112 000000 000000 $SPAG1: 0 ;INTERRUPT SAVED PAG (CONI)
549
550 030113 000000 000000 $SVUUO: 0 ;CURRENT USERS UUO
551 030114 000000 000000 $SVUPC: 0 ;PC OF CURRENT USERS UUO
552
553 030115 000000 000000 REPTU: 0 ;REPEAT UUO ITERATIONS
554 030116 000000 000000 SCOPE: 0 ;ERROR HANDLER SCOPE LOOP FLAG
555 030117 000000 000000 %CORFLG:0 ; " CORRECT FLAG
556 030120 000000 000000 %COREC: 0 ; " CORRECT DATA
557 030121 000000 000000 %ACTFL: 0 ; " ACTUAL FLAG
558 030122 000000 000000 %ACTUL: 0 ; " ACTUAL DATA
559 030123 000000 000000 %DISCR: 0 ; " DISCREPENCY DATA
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 4
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0026
560 S^;*********************************************************************^
561 ;*UUO DISPATCH TABLE
562 S^;*********************************************************************^
563 XLIST
564 LIST
565 030124 040530 030070 UUODIS: LUUO1,,$UUOER
566 030125 040530 040530 LUUO3,,LUUO2
567 030126 040530 040530 LUUO5,,LUUO4
568 030127 040530 040530 LUUO7,,LUUO6
569 030130 040530 040530 LUUO11,,LUUO10
570 030131 040530 040530 LUUO13,,LUUO12
571 030132 030070 030070 LUUO15,,LUUO14
572 030133 030070 030070 LUUO17,,LUUO16
573 030134 030070 030070 LUUO21,,LUUO20
574 030135 030070 030070 LUUO23,,LUUO22
575 030136 030070 030070 LUUO25,,LUUO24
576 030137 030070 030070 LUUO27,,LUUO26
577 030140 030070 030070 LUUO31,,LUUO30
578 030141 030070 030070 LUUO33,,LUUO32
579
580 S^;*********************************************************************^
581 ;*MEMORY MANAGMENT STORAGE
582 S^;*********************************************************************^
583
584 030142 000000 000000 DF22F: 0 ;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
585 030143 000000 000000 MAPNEW: 0 ;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
586 030144 000000 000000 MEMTOT: 0 ;TOTAL MEMORY SIZE IN K (1024.)
587 030145 000000 000000 MEMLOW: 0 ;LOWEST USABLE MEMORY
588 030146 MEMSIZ: BLOCK ^D41 ;MEMORY SEGMENT POINTER TABLE
589
590 S^;*********************************************************************^
591 ;*PRINT CONTROL STORAGE
592 S^;*********************************************************************^
593
594 030217 000000 000000 PNTFLG: 0 ;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
595 030220 000000 000000 PNTENB: 0 ;PRINT ENABLE
596 030221 000000 000000 PDISF: 0 ;PRINT DISABLED FLAG
597 030222 000000 000000 PNTINH: 0 ;INHIBIT PRINT INPUT CHECKS
598 030223 000000 000000 PNTSPC: 0 ;PRINT SPACE CONTROL
599 030224 000000 000000 OPTIME: 0 ;TYPE-IN WAIT TIME
600 030225 000000 000000 $TWCNT: 0 ;TIME WAITED
601 030226 000000 000000 $DVOFF: 0 ;LOGICAL DEVICE INITED FLAG
602 030227 000000 000000 TTYFIL: 0 ;TTY EXEC FILLERS FLAG
603 030230 000000 000000 TTYSPD: 0 ;TTY EXEC BAUD RATE
604 030231 000000 000000 $TTCHR: 0 ;ACTUAL TYPED IN CHAR
605 030232 000000 000000 $CHRIN: 0 ;UPPER CASED & PARITY STRIPPED CHAR
606 030233 000000 000000 $TYPNB: 0 ;TYPED IN NUMBER
607 030234 000000 000000 $CRLF: 0 ;FREE CR/LF FLAG
608 030235 000000 000000 $TABF: 0 ;TAB CONVERSION FLAG
609 030236 000000 000000 $FFF: 0 ;FORM FEED CONVERSION FLAG
610 030237 000000 000000 $VTF: 0 ;VERTICAL TAB CONVERSION FLAG
611 030240 000000 000000 USRLFF: 0 ;USER LF FILLERS
612 030241 000000 000000 USRCRF: 0 ;USER CR FILLERS
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 5
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0027
613 S^;*********************************************************************^
614 ;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
615 ;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
616 ;* MOVEI NAME
617 ;* PNTA ;OR PNTAF
618 S^;*********************************************************************^
619
620 030242 CRLF: ASCII/
621 030242 015 012 000 000 000 /
622 030243 CRLF2: ASCII/
623
624 030243 015 012 015 012 000 /
625 030244 054 000 000 000 000 COMMA: ASCII/,/
626 030245 056 000 000 000 000 PERIOD: ASCII/./
627 030246 040 000 000 000 000 SPACE: ASCII/ /
628 030247 011 000 000 000 000 TAB: ASCII/ /
629 030250 MINUS:
630 030250 055 000 000 000 000 HYPEN: ASCII/-/
631 030251 053 000 000 000 000 PLUS: ASCII/+/
632 030252 052 000 000 000 000 AST: ASCII/*/
633 030253 100 000 000 000 000 ATSIN: ASCII/@/
634 030254 050 000 000 000 000 LFP: ASCII/(/
635 030255 051 000 000 000 000 RTP: ASCII/)/
636 030256 007 0000000000 BELL: BYTE (7) 007
637 030257 077 000 000 000 000 QUEST: ASCII/?/
638 030260 057 000 000 000 000 SLASH: ASCII!/!
639 030261 044 000 000 000 000 DOLLAR: ASCII/$/
640 030262 000000 000012 RADIX: ^D10 ;DECIMAL PRINT RADIX
641 030263 000000 000040 RADLSP: 40 ;DECIMAL PRINT LEADING CHAR
642 030264 000000 000012 RADLSC: ^D10 ;DECIMAL PRINT LEADING CHAR COUNT
643
644 S^;*********************************************************************^
645 ;*USER MODE OUTPUT FILE INFORMATION
646 S^;*********************************************************************^
647
648 030265 $OBUF: BLOCK 3 ;LOGICAL FILE OUTPUT BUFFER HEADER
649 030270 60 62 51 56 64 00 $OUTNM: SIXBIT /PRINT/ ;FILE NAME
650 030271 60 56 64 00 00 00 $OUTEX: SIXBIT /PNT/ ;FILE NAME EXTENSION
651 030272 BLOCK 2
652
653 S^;*********************************************************************^
654 ;*DISK UPDATE MODE FILE INFORMATION
655 S^;*********************************************************************^
656
657 030274 $IBUF: BLOCK 3
658 030277 60 62 51 56 64 00 $INNM: SIXBIT /PRINT/
659 030300 60 56 64 00 00 00 $INEXT: SIXBIT /PNT/
660 030301 BLOCK 2
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 6
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0028
661 S^;*********************************************************************^
662 ;*PUSHDOWN LIST CONTROL INFORMATION
663 S^;*********************************************************************^
664
665 030303 777577 030303 PLIST: PLIST-PLISTE,,PLIST
666 030304 PLISTS: BLOCK 200
667 030504 000000 000000 PLISTE: 0 ;END OF PUSHDOWN LIST
668
669 S^;*********************************************************************^
670 ;*POWER LINE CLOCK FREQUENCY FLAG
671 S^;*********************************************************************^
672
673 030505 000000 000000 CYCL60: 0 ;0 = 60, -1 = 50 CYCLE
674
675 S^;*********************************************************************^
676 ;*KL10 CACHE CONTROL FLAGS
677 S^;*********************************************************************^
678
679 030506 000000 000000 CSHFLG: 0 ;ALLOW CACHE IF 0
680 030507 000000 000000 CSHMEM: 0 ;CACHE MEMORY SEGMENTS IF 0
681
682 S^;*********************************************************************^
683 ;*NUMBER INPUT DIGIT FLAG
684 S^;*********************************************************************^
685
686 030510 000000 000000 TTNBRF: 0 ;-1 IF ANY DIGIT TYPED
687
688 S^;*********************************************************************^
689 ;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
690 S^;*********************************************************************^
691
692 030511 000000 000000 PVPAGI: 0 ;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
693
694 S^;*********************************************************************^
695 ;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
696 S^;*********************************************************************^
697
698 030512 000000 000000 %ERHI1: 0 ;IF NON-ZERO, XCT'D AT START OF %ERUUO
699 030513 000000 000000 %ERHI2: 0 ;IF NON-ZERO, XCT'D AT END OF %ERUUO
700 030514 000000 000000 %ERHI3: 0 ;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
701
702 S^;*********************************************************************^
703 ;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
704 S^;*********************************************************************^
705
706 030515 000000 000000 $$UUO: 0 ;IF NON-ZERO, XCT'D AT START OF $UORTN
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 7
FIXED KLM 18-JAN-77 11:39 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977 SEQ 0029
707 S^;*********************************************************************^
708 ;*KL10 PROCESSOR TYPE FLAG, 0=P0, 1=BBD NEW, 2=BBD OLD
709 S^;*********************************************************************^
710
711 030516 000000 000000 KLTYP: 0
712
713 S^;*********************************************************************^
714 ;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
715 S^;*********************************************************************^
716
717 030517 000000 000000 $$MUUO: 0 ;IF NON-ZERO, XCT'D AT START OF MUUOER
718
719 S^;*********************************************************************^
720 ;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
721 S^;*********************************************************************^
722
723 030520 000000 000000 $$OUTER:0 ;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
724
725 S^;*********************************************************************^
726 ;*"SWITCH" CALL USAGE CONTROL
727 S^;*********************************************************************^
728
729 030521 000000 000000 $$TOGGLE:0 ;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
730
731 S^;*********************************************************************^
732 ;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
733 S^;*********************************************************************^
734
735 030522 000000 000000 $$TAX1: 0 ;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
736 030523 000000 000000 $$TAX2: 0 ;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
737
738 S^;*********************************************************************^
739 ;*SPECIAL FUTURE EXPANSION ROOM
740 ;*IF ANY FIXED AREA TAGS ARE ADDED, REDUCE THE SIZE OF
741 ;*THIS BLOCK STATEMENT ACCORDINGLY. THIS MUST BE DONE
742 ;*SO THAT PREVIOUS FIXED ASSIGNMENTS DO NOT CHANGE.
743 S^;*********************************************************************^
744
745 030524 BLOCK 53 ;HOPEFULLY THIS IS ENOUGH FOREVER
746
747 S^;*********************************************************************^
748 ;*END OF FIXED STORAGE
749 S^;*********************************************************************^
750
751 030577 $ENDFX=<PLISTE+100>&<777700>-1
752 030577 LOC $ENDFX
753 030577 000000 000000 ENDFIX: 0 ;END OF FIXED STORAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1
DAKAMM MAC 20-JAN-77 11:34 DIAGNOSTIC SECTION SEQ 0030
754 SUBTTL DIAGNOSTIC SECTION
755
756 030600 037 05 0 00 000002 EXIT: DROPDV ;CLOSE LOGICAL OUTPUT FILE
757 030601 000000 030600 EXIT
758
759 030602 PGMNAM: ASCIZ/
760 030602 015 012 120 104 120 PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) [DAKAM]
761 030603 055 061 060 040 040
762 030604 113 101 061 060 040
763 030605 102 101 123 111 103
764 030606 040 111 116 123 124
765 030607 122 125 103 124 111
766 030610 117 116 040 104 111
767 030611 101 107 116 117 123
768 030612 124 111 103 040 050
769 030613 061 063 051 040 133
770 030614 104 101 113 101 115
771 030615 135 015 012 000 000 /
772
773 ;INITIALIZE SUBROUTINES
774
775 030616 265 00 0 00 030011 START: PGMINT
776 030617 200 00 0 00 040721 MOVE [ASCIZ/AM/]
777 030620 202 00 0 00 040643 MOVEM TLET ;INITIALIZE TEST LETTER
778
779 030621 254 00 0 00 030622 STARTA: JRST G00 ;GO PERFORM DIAGNOSTIC
780
781 ; GENERAL DESCRIPTION
782 ;PART IA -BTYE LOGIC TESTS
783 ;PART IB -GENERAL BYTE TEST
784 ;PART II -GENERAL BLOCK TRANSFER TEST
785 ;PART III -GENERAL JFFO TEST
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 2
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0031
786 SUBTTL PART IA - BYTE MANIPULATION
787
788
789 ;PART IA - BYTE LOGIC TESTS
790 ;INST-IBP
791 ;TEST ABILITY TO FCE PSE AND DECODE
792 ;PFIELD=14
793 ;SFIELD=6
794 ;BYTEWORD=0,-1
795 ;DESTAC=0
796 ;AN ERROR WILL OCCUR IF AC DIFFERS FROM 0
797 ;FOLLOWING IBP
798
799 000005 G00: AC=5
800 SAVEAC (1,1)^
801 030622 201 07 0 00 030622 MOVEI AC+2,. ;SAVE TEST PC
802 030623 202 07 0 00 030051 MOVEM AC+2,TESTPC
803 030624 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
804 030625 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
805
806 030626 205 06 0 00 140600 G100: MOVSI AC+1,140600 ;SETUP PNTR WORD
807 030627 201 00 0 00 777777 MOVEI ,-1 ;SETUP BYTE WORD
808 030630 400 05 0 00 000000 SETZ AC, ;SETUP DEST AC
809 030631 133 00 0 00 000006 IBP ,<AC+1>&17 ;INC PNTR WORD
810 030632 332 00 0 00 000005 SKIPE AC&17 ;TEST AC DIFFERS FROM 0
811 030633 003 05 0 00 000101 ER3 AC,101 ;FCE PSE FAILED
812 030634 321 07 0 00 030626 JUMPL AC+2,G100 ;LOOP ON ERROR SWITCH
813
814 ;INST-IBP
815 ;TEST ABILITY TO INCREMENT BYTE PNTR
816 ;WITHOUT AFFECTING BYTE WORD
817 ;PFIELD=14
818 ;SFIELD=6
819 ;BYTE ADDRESS=AC0
820 ;AN ERROR WILL OCCUR IF C(AC0) DIFFERS
821 ;FROM ORIGINAL FOLLOWING IBP
822
823 000014 AC=14
824 SAVEAC (1,1)^
825 030635 201 16 0 00 030635 MOVEI AC+2,. ;SAVE TEST PC
826 030636 202 16 0 00 030051 MOVEM AC+2,TESTPC
827 030637 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
828 030640 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
829
830 030641 474 12 0 00 000000 G200: SETO AC-2, ;SETUP FOR COMPARISON
831 030642 205 15 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR WORD
832 030643 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
833 030644 133 00 0 00 000015 IBP ,<AC+1>&17 ;INC BYTE PNTR
834 030645 312 00 0 00 000012 CAME ,<AC-2>&17 ;TEST BYTE WORD
835 030646 012 00 0 00 000201 ER12 ,201 ;BYTE WORD FAILED
836 030647 321 16 0 00 030641 JUMPL AC+2,G200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 3
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0032
837 ;INST-IBP
838 ;PFIELD=22
839 ;SFIELD=6
840 ;AN ERROR WILL OCCUR IF POINTER IS NOT INCREMENTED
841
842 000013 AC=13
843 SAVEAC (1,1)^
844 030650 201 15 0 00 030650 MOVEI AC+2,. ;SAVE TEST PC
845 030651 202 15 0 00 030051 MOVEM AC+2,TESTPC
846 030652 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
847 030653 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
848
849 030654 205 11 0 00 060600 G300: MOVSI AC-2,060600 ;SETUP FOR COMPARISON
850 030655 205 14 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR WORD
851 030656 133 00 0 00 000014 IBP ,<AC+1>&17 ;INCREMENT PNTR
852 030657 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST PNTR INC
853 030660 005 14 0 00 000301 ER5 AC+1,301 ;POINTER FAILED
854 030661 321 15 0 00 030654 JUMPL AC+2,G300 ;LOOP ON ERROR SWITCH
855
856 ;INST - IBP
857 ;PFIELD=16
858 ;SFIELD=6
859
860 000012 AC=12
861 SAVEAC (1,1)^
862 030662 201 14 0 00 030662 MOVEI AC+2,. ;SAVE TEST PC
863 030663 202 14 0 00 030051 MOVEM AC+2,TESTPC
864 030664 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
865 030665 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
866
867 030666 205 10 0 00 100600 G400: MOVSI AC-2,100600 ;SETUP FOR COMPARISON
868 030667 205 13 0 00 160600 MOVSI AC+1,160600 ;SETUP PNTR
869 030670 133 00 0 00 000013 IBP ,<AC+1>&17 ;INCREMENT PNTR
870 030671 312 13 0 00 000010 CAME AC+1,<AC-2>&17 ;TEST PFIELD
871 030672 005 13 0 00 000401 ER5 AC+1,401 ;POINTER FAILED
872 030673 321 14 0 00 030666 JUMPL AC+2,G400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 4
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0033
873 ;INST-IBP
874 ;TEST ABILITY TO TRANSFER INCREMENTED
875 ;PFIELD
876 ;TEST JAM-ZERO'S
877 ;PFIELD=77
878 ;SFIELD=1,2,4,10,20,40
879 ;TEST JAM-ONE'S
880 ;PFIELD=6,14,30,60,40
881 ;SFIELD=3,6,14,30,20
882
883 000010 AC=10
884 SAVEAC (1,1)^
885 030674 201 12 0 00 030674 MOVEI AC+2,. ;SAVE TEST PC
886 030675 202 12 0 00 030051 MOVEM AC+2,TESTPC
887 030676 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
888 030677 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
889
890 000600 SN=600
891 000040 ZZ=40
892 004000 YY=4000
893
894 G600: REPEAT ^D6,<
895 SN=SN+1
896 ZZ=ZZ+ZZ
897 YY=YY+YY
898 MOVSI AC-2,770000+ZZ-YY ;SETUP FOR COMPARISON
899 MOVSI AC+1,770000+ZZ ;SETUP PNTR WORD
900 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
901 CAME AC+1,<AC-2>&17 ;TEST PFIELD
902 ER5 AC+1,SN ;BIT UNDER TEST FAILED
903 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
904 >
905
906 000601 SN=SN+1
907 000100 ZZ=ZZ+ZZ
908 010000 YY=YY+YY
909 030700 205 06 0 00 760100 MOVSI AC-2,770000+ZZ-YY ;SETUP FOR COMPARISON
910 030701 205 11 0 00 770100 MOVSI AC+1,770000+ZZ ;SETUP PNTR WORD
911 030702 133 00 0 00 000011 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
912 030703 312 11 0 00 000006 CAME AC+1,<AC-2>&17 ;TEST PFIELD
913 030704 005 11 0 00 000601 ER5 AC+1,SN ;BIT UNDER TEST FAILED
914 030705 321 12 0 00 030700 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
915
916
917 000602 SN=SN+1
918 000200 ZZ=ZZ+ZZ
919 020000 YY=YY+YY
920 030706 205 06 0 00 750200 MOVSI AC-2,770000+ZZ-YY ;SETUP FOR COMPARISON
921 030707 205 11 0 00 770200 MOVSI AC+1,770000+ZZ ;SETUP PNTR WORD
922 030710 133 00 0 00 000011 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
923 030711 312 11 0 00 000006 CAME AC+1,<AC-2>&17 ;TEST PFIELD
924 030712 005 11 0 00 000602 ER5 AC+1,SN ;BIT UNDER TEST FAILED
925 030713 321 12 0 00 030706 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
926
927
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 4-1
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0034
928 000603 SN=SN+1
929 000400 ZZ=ZZ+ZZ
930 040000 YY=YY+YY
931 030714 205 06 0 00 730400 MOVSI AC-2,770000+ZZ-YY ;SETUP FOR COMPARISON
932 030715 205 11 0 00 770400 MOVSI AC+1,770000+ZZ ;SETUP PNTR WORD
933 030716 133 00 0 00 000011 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
934 030717 312 11 0 00 000006 CAME AC+1,<AC-2>&17 ;TEST PFIELD
935 030720 005 11 0 00 000603 ER5 AC+1,SN ;BIT UNDER TEST FAILED
936 030721 321 12 0 00 030714 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
937
938
939 000604 SN=SN+1
940 001000 ZZ=ZZ+ZZ
941 100000 YY=YY+YY
942 030722 205 06 0 00 671000 MOVSI AC-2,770000+ZZ-YY ;SETUP FOR COMPARISON
943 030723 205 11 0 00 771000 MOVSI AC+1,770000+ZZ ;SETUP PNTR WORD
944 030724 133 00 0 00 000011 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
945 030725 312 11 0 00 000006 CAME AC+1,<AC-2>&17 ;TEST PFIELD
946 030726 005 11 0 00 000604 ER5 AC+1,SN ;BIT UNDER TEST FAILED
947 030727 321 12 0 00 030722 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
948
949
950 000605 SN=SN+1
951 002000 ZZ=ZZ+ZZ
952 200000 YY=YY+YY
953 030730 205 06 0 00 572000 MOVSI AC-2,770000+ZZ-YY ;SETUP FOR COMPARISON
954 030731 205 11 0 00 772000 MOVSI AC+1,770000+ZZ ;SETUP PNTR WORD
955 030732 133 00 0 00 000011 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
956 030733 312 11 0 00 000006 CAME AC+1,<AC-2>&17 ;TEST PFIELD
957 030734 005 11 0 00 000605 ER5 AC+1,SN ;BIT UNDER TEST FAILED
958 030735 321 12 0 00 030730 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
959
960
961 000606 SN=SN+1
962 004000 ZZ=ZZ+ZZ
963 400000 YY=YY+YY
964 030736 205 06 0 00 374000 MOVSI AC-2,770000+ZZ-YY ;SETUP FOR COMPARISON
965 030737 205 11 0 00 774000 MOVSI AC+1,770000+ZZ ;SETUP PNTR WORD
966 030740 133 00 0 00 000011 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
967 030741 312 11 0 00 000006 CAME AC+1,<AC-2>&17 ;TEST PFIELD
968 030742 005 11 0 00 000606 ER5 AC+1,SN ;BIT UNDER TEST FAILED
969 030743 321 12 0 00 030736 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
970
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 5
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0035
971 000011 AC=11
972 SAVEAC (1,1)^
973 030744 201 13 0 00 030744 MOVEI AC+2,. ;SAVE TEST PC
974 030745 202 13 0 00 030051 MOVEM AC+2,TESTPC
975 030746 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
976 030747 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
977
978 ;TEST AR1(1)
979 030750 205 07 0 00 202000 G700: MOVSI AC-2,202000 ;SETUP FOR COMPARISON
980 030751 205 12 0 00 402000 MOVSI AC+1,402000 ;SETUP PNTR WORD
981 030752 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
982 030753 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD
983 030754 005 12 0 00 000701 ER5 AC+1,701 ;POINTER FAILED TO INCREMENT CORRECTLY
984 030755 321 13 0 00 030750 JUMPL AC+2,G700 ;LOOP ON ERROR SWITCH
985
986 ;TEST AR2(1)
987 030756 205 07 0 00 303000 G1000: MOVSI AC-2,303000 ;SETUP FOR COMPARISON
988 030757 205 12 0 00 603000 MOVSI AC+1,603000 ;SETUP PNTR
989 030760 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
990 030761 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD
991 030762 005 12 0 00 001001 ER5 AC+1,1001 ;POINTER FAILED TO INCREMENT CORRECTLY
992 030763 321 13 0 00 030756 JUMPL AC+2,G1000 ;LOOP ON ERROR SWITCH
993
994 030764 205 07 0 00 141400 G1100: MOVSI AC-2,141400 ;SETUP FOR COMPARISON
995 030765 205 12 0 00 301400 MOVSI AC+1,301400 ;SETUP PNTR
996 030766 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
997 030767 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD
998 030770 005 12 0 00 001101 ER5 AC+1,1101 ;POINTER FAILED TO INCREMENT CORRECTLY
999 030771 321 13 0 00 030764 JUMPL AC+2,G1100 ;LOOP ON ERROR SWITCH
1000
1001 ;TEST AR4(1)
1002 030772 205 07 0 00 060600 G1200: MOVSI AC-2,060600 ;SETUP FOR COMPARISON
1003 030773 205 12 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR
1004 030774 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
1005 030775 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD
1006 030776 005 12 0 00 001201 ER5 AC+1,1201 ;POINTER FAILED TO INCREMENT CORRECTLY
1007 030777 321 13 0 00 030772 JUMPL AC+2,G1200 ;LOOP ON ERROR SWITCH
1008
1009 ;TEST AR5(1)
1010 031000 205 07 0 00 030300 G1300: MOVSI AC-2,030300 ;SETUP FOR COMPARISON
1011 031001 205 12 0 00 060300 MOVSI AC+1,060300 ;SETUP PNTR
1012 031002 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
1013 031003 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST P FIELD
1014 031004 005 12 0 00 001301 ER5 AC+1,1301 ;POINTER FAILED TO INCREMENT CORRECTLY
1015 031005 321 13 0 00 031000 JUMPL AC+2,G1300 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 6
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0036
1016 ;INST-IBP
1017 ;PFIELD=5
1018 ;SFIELD=10
1019
1020 000005 AC=5
1021 SAVEAC (1,1)^
1022 031006 201 07 0 00 031006 MOVEI AC+2,. ;SAVE TEST PC
1023 031007 202 07 0 00 030051 MOVEM AC+2,TESTPC
1024 031010 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1025 031011 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1026
1027 031012 205 03 0 00 341000 G1400: MOVSI AC-2,341000 ;SETUP FOR COMPARISON
1028 031013 205 06 0 00 051000 MOVSI AC+1,051000 ;SETUP PNTR WORD
1029 031014 133 00 0 00 000006 IBP ,<AC+1>&17 ;INCREMENT PNPR
1030 031015 620 06 0 00 000001 TRZ AC+1,1 ;CREAR ADDRESS FIELD OF POINTER
1031 031016 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST P FIELD
1032 031017 005 06 0 00 001401 ER5 AC+1,1401 ;POINTER FAILED
1033 031020 321 07 0 00 031012 JUMPL AC+2,G1400 ;LOOP ON ERROR SWITCH
1034 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 6-1
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0037
1035 ;INST - IBP
1036 ;TEST ABILITY TO TRANSFER PFIELD
1037 ;PRELIMINARY - TEST FOR PRESENCE
1038 ; OF PULSE
1039 ;PFIELD=16
1040 ;SFIELD=6
1041
1042 000005 AC=5
1043 SAVEAC (1,1)^
1044 031021 201 07 0 00 031021 MOVEI AC+2,. ;SAVE TEST PC
1045 031022 202 07 0 00 030051 MOVEM AC+2,TESTPC
1046 031023 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1047 031024 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1048
1049 031025 205 03 0 00 100600 G1500: MOVSI AC-2,100600 ;SETUP FOR COMPARISON
1050 031026 205 06 0 00 160600 MOVSI AC+1,160600 ;SETUP PNTR WORD
1051 031027 133 00 0 00 000006 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
1052 031030 620 06 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1053 031031 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST PFIELD
1054 031032 005 06 0 00 001501 ER5 AC+1,1501 ;POINTER FAILED
1055 031033 321 07 0 00 031025 JUMPL AC+2,G1500 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 7
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0038
1056 ;INST-IBP
1057 ;TEST ABILITY TO TRANSFER PFIELD
1058 ;TEST ABILITY TO SET INDIVIDUAL
1059 ;SC BITS 3-8
1060 ;PFIELD=1,2,4,10,20,40
1061 ;SFIELD=1,2,4,10,20,40
1062
1063 000014 AC=14
1064 SAVEAC (1,1)^
1065 031034 201 16 0 00 031034 MOVEI AC+2,. ;SAVE TEST PC
1066 031035 202 16 0 00 030051 MOVEM AC+2,TESTPC
1067 031036 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1068 031037 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1069 ;TEST SC BIT 8 SET
1070 031040 205 12 0 00 000100 G1600: MOVSI AC-2,000100 ;SETUP FOR COMPARISON
1071 031041 205 15 0 00 010100 MOVSI AC+1,010100 ;SETUP PNTR WORD
1072 031042 133 00 0 00 000015 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
1073 031043 620 15 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1074 031044 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST BIT 8
1075 031045 005 15 0 00 001601 ER5 AC+1,1601 ;POINTER FAILED
1076 031046 321 16 0 00 031040 JUMPL AC+2,G1600 ;LOOP ON ERROR SWITCH
1077
1078 ;TEST SC BIT 7 SET
1079 031047 205 12 0 00 000200 G1700: MOVSI AC-2,000200 ;SETUP FOR COMPARISON
1080 031050 205 15 0 00 020200 MOVSI AC+1,020200 ;SETUP PNTR WORD
1081 031051 133 00 0 00 000015 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
1082 031052 620 15 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1083 031053 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST BIT 7
1084 031054 005 15 0 00 001701 ER5 AC+1,1701 ;POINTER FAILED
1085 031055 321 16 0 00 031047 JUMPL AC+2,G1700 ;LOOP ON ERROR SWITCH
1086
1087 ;TEST SC BIT 6 SET
1088 031056 205 12 0 00 000400 G2000: MOVSI AC-2,000400 ;SETUP FOR COMPARISON
1089 031057 205 15 0 00 040400 MOVSI AC+1,040400 ;SETUP PNTR WORD
1090 031060 133 00 0 00 000015 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
1091 031061 620 15 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1092 031062 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST BIT 6
1093 031063 005 15 0 00 002001 ER5 AC+1,2001 ;POINTER FAILED
1094 031064 321 16 0 00 031056 JUMPL AC+2,G2000 ;LOOP ON ERROR SWITCH
1095
1096 ;TEST SC BIT 5 SET
1097 031065 205 12 0 00 001000 G2100: MOVSI AC-2,001000 ;SETUP FOR COMPARISON
1098 031066 205 15 0 00 101000 MOVSI AC+1,101000 ;SETUP PNTR WORD
1099 031067 133 00 0 00 000015 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
1100 031070 620 15 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1101 031071 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST BIT 5
1102 031072 005 15 0 00 002101 ER5 AC+1,2101 ;POINTER FAILED
1103 031073 321 16 0 00 031065 JUMPL AC+2,G2100 ;LOOP ON ERROR SWITCH
1104
1105 ;TEST SC BIT 4 SET
1106 031074 205 12 0 00 002000 G2200: MOVSI AC-2,002000 ;SETUP FOR COMPARISON
1107 031075 205 15 0 00 202000 MOVSI AC+1,202000 ;SETUP PNTR WORD
1108 031076 133 00 0 00 000015 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
1109 031077 620 15 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1110 031100 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST BIT 4
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 7-1
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0039
1111 031101 005 15 0 00 002201 ER5 AC+1,2201 ;POINTER FAILED
1112 031102 321 16 0 00 031074 JUMPL AC+2,G2200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 8
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0040
1113 ;TEST SC BIT 3 SET
1114 031103 205 12 0 00 004000 G2300: MOVSI AC-2,004000 ;SETUP FOR COMPARISON
1115 031104 205 15 0 00 404000 MOVSI AC+1,404000 ;SETUP PNTR WORD
1116 031105 133 00 0 00 000015 IBP ,<AC+1>&17 ;INCREMENT BYTE PNTR
1117 031106 620 15 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1118 031107 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST BIT 3
1119 031110 005 15 0 00 002301 ER5 AC+1,2301 ;POINTER FAILED
1120 031111 321 16 0 00 031103 JUMPL AC+2,G2300 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 9
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0041
1121 ;INST-IBP
1122 ;TEST ABILITY TO SET SC BITS 3,6
1123 ;PFIELD=6
1124 ;SFIELD=10
1125 ;FAILURE OF BIT 3 TO SET RESULTS IN A
1126 ;PFIELD=74
1127 ;FAILURE OF BIT 6 TO SET RESULTS IN
1128 ;A PFEILD=30
1129 ;SC BIT2 IS NOT TESTED-FAILURE TO SET
1130 ;BIT 2 RESULTS IN LOOPING
1131
1132 000013 AC=13
1133 SAVEAC (1,1)^
1134 031112 201 15 0 00 031112 MOVEI AC+2,. ;SAVE TEST PC
1135 031113 202 15 0 00 030051 MOVEM AC+2,TESTPC
1136 031114 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1137 031115 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1138
1139 031116 205 11 0 00 341000 G2400: MOVSI AC-2,341000 ;SETUP FOR COMPARISON
1140 031117 205 14 0 00 061000 MOVSI AC+1,061000 ;SETUP PNTR WORD
1141 031120 133 00 0 00 000014 IBP ,<AC+1>&17 ;INCREMENT PNTR
1142 031121 620 14 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1143 031122 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST SC3 (1)
1144 031123 005 14 0 00 002401 ER5 AC+1,2401 ;POINTER FAILED
1145 031124 321 15 0 00 031116 JUMPL AC+2,G2400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 10
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0042
1146 ;INST-IBP
1147 ;TEST ABILITY TO CLEAR INDIVIDUAL
1148 ;SC BITS
1149 ;PFIELD=20,10,2,1
1150 ;SFIELD=21,11,3,2
1151 ;FAILURE TO CLEAR SC BITS 4,5,7
1152 ;OR 8 RESULTS IN A PFIELD=43
1153 ;FAILURE TO CLEAR SC BITS 3 OR 6
1154 ;WILL NOT BE APPARENT
1155
1156 000011 AC=11
1157 SAVEAC (1,1)^
1158 031125 201 13 0 00 031125 MOVEI AC+2,. ;SAVE TEST PC
1159 031126 202 13 0 00 030051 MOVEM AC+2,TESTPC
1160 031127 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1161 031130 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1162
1163 ;TEST SC4 CLEARING
1164 031131 205 07 0 00 232100 G2600: MOVSI AC-2,232100 ;SETUP FOR COMPARISON
1165 031132 205 12 0 00 202100 MOVSI AC+1,202100 ;SETUP PNTR WORD
1166 031133 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
1167 031134 620 12 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1168 031135 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD=43
1169 031136 005 12 0 00 002601 ER5 AC+1,2601 ;POINTER FAILED
1170 031137 321 13 0 00 031131 JUMPL AC+2,G2600 ;LOOP ON ERROR SWITCH
1171
1172 ;TEST SC5 CLEARING
1173 031140 205 07 0 00 331100 G2700: MOVSI AC-2,331100 ;SETUP FOR COMPARISON
1174 031141 205 12 0 00 101100 MOVSI AC+1,101100 ;SETUP PNTR WORD
1175 031142 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
1176 031143 620 12 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1177 031144 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD=45
1178 031145 005 12 0 00 002701 ER5 AC+1,2701 ;POINTER FAILED
1179 031146 321 13 0 00 031140 JUMPL AC+2,G2700 ;LOOP ON ERROR SWITCH
1180
1181 ;TEST SC 7 CLEARING
1182 031147 205 07 0 00 410300 G3000: MOVSI AC-2,410300 ;SETUP FOR COMPARISON
1183 031150 205 12 0 00 020300 MOVSI AC+1,020300 ;SETUP PNTR
1184 031151 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
1185 031152 620 12 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1186 031153 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD=43
1187 031154 005 12 0 00 003001 ER5 AC+1,3001 ;POINTER FAILED
1188 031155 321 13 0 00 031147 JUMPL AC+2,G3000 ;LOOP ON ERROR SWITCH
1189
1190 ;TEST SC8 CLEARING
1191 031156 205 07 0 00 420200 G3100: MOVSI AC-2,420200 ;SETUP FOR COMPARISON
1192 031157 205 12 0 00 010200 MOVSI AC+1,010200 ;SETUP PNTR
1193 031160 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
1194 031161 620 12 0 00 000001 TRZ AC+1,1 ;CLEAR BIT 35
1195 031162 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST PFIELD=43
1196 031163 005 12 0 00 003101 ER5 AC+1,3101 ;POINTER FAILED
1197 031164 321 13 0 00 031156 JUMPL AC+2,G3100 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 11
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0043
1198 ;INST-IBP
1199 ;TEST ABILITY TO INCREMENT ADDRESS
1200 ;FIELD OF PNTR WORD
1201 ;PFIELD=6
1202 ;SFIELD=10
1203 ;LOSS OF THE SFIELD AND AN ADDRESS=1
1204
1205 000012 AC=12
1206 SAVEAC (1,1)^
1207 031165 201 14 0 00 031165 MOVEI AC+2,. ;SAVE TEST PC
1208 031166 202 14 0 00 030051 MOVEM AC+2,TESTPC
1209 031167 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1210 031170 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1211
1212 031171 205 10 0 00 341000 G3200: MOVSI AC-2,341000 ;SETUP AC-2
1213 031172 340 10 0 00 031173 AOJ AC-2,.+1 ;FOR COMPARISON
1214 031173 205 13 0 00 061000 MOVSI AC+1,061000 ;SETUP PNTR WORD
1215 031174 133 00 0 00 000013 IBP ,<AC+1>&17 ;INC PNTR WORD
1216 031175 312 13 0 00 000010 CAME AC+1,<AC-2>&17 ;TEST FOR ERROR PNTR
1217 031176 005 13 0 00 003201 ER5 AC+1,3201 ;POINTER FAILED
1218 031177 321 14 0 00 031171 JUMPL AC+2,G3200 ;LOOP ON ERROR SWITCH
1219
1220 ;INST-IBP
1221 ;TEST ABILITY TO INCREMENT
1222 ;ADDRESS FIELD OF PNTR WORD
1223 ;PFIELD=6
1224 ;SFIELD=10
1225
1226 000011 AC=11
1227 SAVEAC (1,1)^
1228 031200 201 13 0 00 031200 MOVEI AC+2,. ;SAVE TEST PC
1229 031201 202 13 0 00 030051 MOVEM AC+2,TESTPC
1230 031202 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1231 031203 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1232
1233 031204 505 07 0 00 341000 G3300: HRLI AC-2,341000 ;SETUP AC-2 FOR
1234 031205 541 07 0 00 000012 HRRI AC-2,<AC+1>&17 ;COMPARISON
1235 031206 505 12 0 00 061000 HRLI AC+1,061000 ;SETUP BYTE
1236 031207 541 12 0 00 000011 HRRI AC+1,AC&17 ;PNTR WORD
1237 031210 133 00 0 00 000012 IBP ,<AC+1>&17 ;INCREMENT PNTR
1238 031211 312 12 0 00 000007 CAME AC+1,<AC-2>&17 ;TEST ADDRESS
1239 031212 005 12 0 00 003301 ER5 AC+1,3301 ;POINTER FAILED
1240 031213 321 13 0 00 031204 JUMPL AC+2,G3300 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 12
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0044
1241 ;INST-LDB
1242 ;TEST ABILITY TO FCE (2ND PART)
1243 ;FAILURE TO FCE RESULTS IN LOSS
1244 ;OF DATA WORD
1245 ;PFIELD=0
1246 ;SFIELD=6
1247 ;BYTE WORD=0,777777
1248 ;DEST AC=0
1249
1250 000014 AC=14
1251 SAVEAC (1,1)^
1252 031214 201 16 0 00 031214 MOVEI AC+2,. ;SAVE TEST PC
1253 031215 202 16 0 00 030051 MOVEM AC+2,TESTPC
1254 031216 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1255 031217 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1256
1257 031220 505 15 0 00 000600 G3400: HRLI AC+1,000600 ;SETUP BYTE
1258 031221 541 15 0 00 000005 HRRI AC+1,5 ;PNTR WORD
1259 031222 201 05 0 00 777777 MOVEI 5,-1 ;SETUP BYTE WORD
1260 031223 400 14 0 00 000000 SETZ AC, ;CLEAR DEST AC
1261 031224 135 14 0 00 000015 LDB AC,<AC+1>&17 ;LOAD BYTE
1262 031225 302 14 0 00 000077 CAIE AC,77 ;TEST DEST AC=0,,77
1263 031226 003 14 0 00 003401 ER3 AC,3401 ;AC FAILED
1264 031227 321 16 0 00 031220 JUMPL AC+2,G3400 ;LOOP ON ERROR SWITCH
1265
1266 ;INST-LDB
1267 ;P FIELD =14
1268 ;S FIELD =6
1269 ;BYTE WORD =-1
1270
1271 000011 AC=11
1272 SAVEAC (1,1)^
1273 031230 201 13 0 00 031230 MOVEI AC+2,. ;SAVE TEST PC
1274 031231 202 13 0 00 030051 MOVEM AC+2,TESTPC
1275 031232 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1276 031233 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1277
1278 031234 551 07 0 00 000077 G3500: HRRZI AC-2,77 ;SETUP FOR COMPARISON
1279 031235 205 12 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR
1280 031236 474 00 0 00 000000 SETO ;SETUP BYTE WORD
1281 031237 135 11 0 00 000012 LDB AC,<AC+1>&17 ;LOAD BYTE
1282 031240 312 11 0 00 000007 CAME AC,<AC-2>&17 ;TEST BYTE=0,,77
1283 031241 003 11 0 00 003501 ER3 AC,3501 ;AC FAILED
1284 031242 321 13 0 00 031234 JUMPL AC+2,G3500 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 13
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0045
1285 ;INST-LDB
1286 ;PFIELD=14
1287 ;SFIELD=6
1288 ;BYTE WORD = 777777
1289
1290 000006 AC=6
1291 SAVEAC (1,1)^
1292 031243 201 10 0 00 031243 MOVEI AC+2,. ;SAVE TEST PC
1293 031244 202 10 0 00 030051 MOVEM AC+2,TESTPC
1294 031245 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1295 031246 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1296
1297 031247 205 07 0 00 140600 G3600: MOVSI AC+1,140600 ;SETUP PNTR WORD
1298 031250 201 00 0 00 777777 MOVEI ,-1 ;SETUP BYTE WORD (AC0)
1299 031251 135 06 0 00 000007 LDB AC,<AC+1>&17 ;LOAD BYTE
1300 031252 302 06 0 00 000077 CAIE AC,77 ;TEST DEST AC
1301 031253 003 06 0 00 003601 ER3 AC,3601 ;AC FAILED
1302 031254 321 10 0 00 031247 JUMPL AC+2,G3600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 14
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0046
1303 ;INST-LDB
1304 ;TEST ABILITY TO TRANSFER 2'S COMP
1305 ;SFIELD
1306 ;TEST ABILITY TO SET INDIVIDUAL
1307 ;BITS OF SC
1308 ;PFIELD=0
1309 ;SFIELD=40,20,10,4,2,1
1310 ;BYTE WORD=-1
1311
1312 000005 AC=5
1313 SAVEAC (1,1)^
1314 031255 201 07 0 00 031255 MOVEI AC+2,. ;SAVE TEST PC
1315 031256 202 07 0 00 030051 MOVEM AC+2,TESTPC
1316 031257 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1317 031260 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1318 ;TEST SC 1,2,3 SET
1319 031261 525 03 0 00 037777 G3700: HRLOI AC-2,37777 ;SETUP FOR COMPARISON
1320 031262 205 06 0 00 004000 MOVSI AC+1,4000 ;SETUP PNTR WORD
1321 031263 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
1322 031264 135 05 0 00 000006 LDB AC,<AC+1>&17 ;LOAD BYTE
1323 031265 312 05 0 00 000003 CAME AC,<AC-2>&17 ;TEST BYTE=37777,,777777
1324 031266 003 05 0 00 003701 ER3 AC,3701 ;AC FAILED
1325 031267 321 07 0 00 031261 JUMPL AC+2,G3700 ;LOOP ON ERROR SWITCH
1326
1327 ;TEST SC4 SET
1328 031270 551 03 0 00 177777 G4000: HRRZI AC-2,177777 ;SETUP FOR COMPARISON
1329 031271 205 06 0 00 002000 MOVSI AC+1,2000 ;SETUP PNTR WORD
1330 031272 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
1331 031273 135 05 0 00 000006 LDB AC,<AC+1>&17 ;LOAD BYTE
1332 031274 312 05 0 00 000003 CAME AC,<AC-2>&17 ;TEST BYTE=0,,177777
1333 031275 003 05 0 00 004001 ER3 AC,4001 ;AC FAILED
1334 031276 321 07 0 00 031270 JUMPL AC+2,G4000 ;LOOP ON ERROR SWITCH
1335
1336 ;TEST SC5 SET
1337 031277 201 03 0 00 000377 G4100: MOVEI AC-2,377 ;SETUP FOR COMPARISON
1338 031300 205 06 0 00 001000 MOVSI AC+1,1000 ;SETUP PNTR WORD
1339 031301 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
1340 031302 135 05 0 00 000006 LDB AC,<AC+1>&17 ;LOAD BYTE
1341 031303 312 05 0 00 000003 CAME AC,<AC-2>&17 ;TEST BYTE = 0,,377
1342 031304 003 05 0 00 004101 ER3 AC,4101 ;AC FAILED
1343 031305 321 07 0 00 031277 JUMPL AC+2,G4100 ;LOOP ON ERROR SWITCH
1344
1345 ;TEST SC6 SET
1346 031306 201 03 0 00 000017 G4200: MOVEI AC-2,17 ;SETUP FOR COMPARISON
1347 031307 205 06 0 00 000400 MOVSI AC+1,400 ;SETUP PNTR WORD
1348 031310 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
1349 031311 135 05 0 00 000006 LDB AC,<AC+1>&17 ;LOAD BYTE
1350 031312 312 05 0 00 000003 CAME AC,<AC-2>&17 ;TEST BYTE=0,,17
1351 031313 003 05 0 00 004201 ER3 AC,4201 ;AC FAILED
1352 031314 321 07 0 00 031306 JUMPL AC+2,G4200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 15
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0047
1353 ;TEST SC 7 SET
1354 031315 201 03 0 00 000003 G4300: MOVEI AC-2,3 ;SETUP FOR COMPARISON
1355 031316 205 06 0 00 000200 MOVSI AC+1,200 ;SETUP PNTR WORD
1356 031317 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
1357 031320 135 05 0 00 000006 LDB AC,<AC+1>&17 ;LOAD BYTE
1358 031321 312 05 0 00 000003 CAME AC,<AC-2>&17 ;TEST BYTE=0,,3
1359 031322 003 05 0 00 004301 ER3 AC,4301 ;AC FAILED
1360 031323 321 07 0 00 031315 JUMPL AC+2,G4300 ;LOOP ON ERROR SWITCH
1361
1362 ;TEST SC 8 SET
1363 031324 201 03 0 00 000001 G4400: MOVEI AC-2,1 ;SETUP FOR COMPARISON
1364 031325 205 06 0 00 000100 MOVSI AC+1,100 ;SETUP PNTR WORD
1365 031326 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
1366 031327 135 05 0 00 000006 LDB AC,<AC+1>&17 ;LOAD BYTE
1367 031330 312 05 0 00 000003 CAME AC,<AC-2>&17 ;TEST BYTE=0,,1
1368 031331 003 05 0 00 004401 ER3 AC,4401 ;AC FAILED
1369 031332 321 07 0 00 031324 JUMPL AC+2,G4400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 16
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0048
1370 ;INST-LDB
1371 ;PFIELD=6
1372 ;SFIELD=14
1373 ;BYTE WORD=000000007700
1374
1375 000014 AC=14
1376 SAVEAC (1,1)^
1377 031333 201 16 0 00 031333 MOVEI AC+2,. ;SAVE TEST PC
1378 031334 202 16 0 00 030051 MOVEM AC+2,TESTPC
1379 031335 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1380 031336 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1381
1382 031337 201 12 0 00 000077 G4600: MOVEI AC-2,77 ;SETUP FOR COMPARISON
1383 031340 205 15 0 00 061400 MOVSI AC+1,061400 ;SETUP PNTR WORD
1384 031341 201 00 0 00 007700 MOVEI ,7700 ;SETUP BYTE WORD
1385 031342 135 14 0 00 000015 LDB AC,<AC+1>&17 ;LOAD BYTE
1386 031343 312 14 0 00 000012 CAME AC,<AC-2>&17 ;TEST BYTE =77
1387 031344 003 14 0 00 004601 ER3 AC,4601 ;AC FAILED
1388 031345 321 16 0 00 031337 JUMPL AC+2,G4600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 17
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0049
1389 ;INST-LDB
1390 ;PFIELD=6
1391 ;SFIELD=6
1392 ;BYTEWORD=-1
1393
1394 000013 AC=13
1395 SAVEAC (1,1)^
1396 031346 201 15 0 00 031346 MOVEI AC+2,. ;SAVE TEST PC
1397 031347 202 15 0 00 030051 MOVEM AC+2,TESTPC
1398 031350 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1399 031351 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1400
1401 031352 201 11 0 00 000077 G4700: MOVEI AC-2,77 ;SETUP FOR COMPARISON
1402 031353 205 14 0 00 060600 MOVSI AC+1,060600 ;SETUP PNTR
1403 031354 474 00 0 00 000000 SETO ;SETUP BYTE WORD
1404 031355 135 13 0 00 000014 LDB AC,<AC+1>&17 ;LOAD BYTE
1405 031356 312 13 0 00 000011 CAME AC,<AC-2>&17 ;TEST BYTE=0,,77
1406 031357 003 13 0 00 004701 ER3 AC,4701 ;AC FAILED
1407 031360 321 15 0 00 031352 JUMPL AC+2,G4700 ;LOOP ON ERROR SWITCH
1408
1409 ;INST-LDB
1410 ;TEST IR 134-7
1411 ;PFIELD=14
1412 ;SFIELD=6
1413 ;BYTE WORD=-1
1414 ;AN ERROR WILL OCCUR IF PC IS INCREMENTED
1415 ;TWICE DURING EXECUTION OF LDB
1416
1417 000010 AC=10
1418 SAVEAC (1,1)^
1419 031361 201 12 0 00 031361 MOVEI AC+2,. ;SAVE TEST PC
1420 031362 202 12 0 00 030051 MOVEM AC+2,TESTPC
1421 031363 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1422 031364 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1423
1424 031365 205 11 0 00 140600 G5000: MOVSI AC+1,140600 ;SETUP PNTR WORD
1425 031366 474 00 0 00 000000 SETO ;SETUP BYTE WORD (AC0)
1426 031367 135 10 0 00 000011 LDB AC,<AC+1>&17 ;LOAD BYTE
1427 031370 254 00 0 00 031372 JRST ,.+2 ;PC+1 INH ASSERTED
1428 031371 003 10 0 00 005001 ER3 AC,5001 ;AC FAILED
1429 031372 321 12 0 00 031365 JUMPL AC+2,G5000 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 18
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0050
1430 ;INST-LDB
1431 ;TEST ABILITY TO CLEAR BYF6
1432 ;PFIELD=14
1433 ;SFIELD=6
1434 ;BYTE WORD=-1
1435 ;AN ERROR WILL OCCUR IF BYF6(1) WHEN STORED
1436 ;BY JSP
1437
1438 000007 AC=7
1439 SAVEAC (1,1)^
1440 031373 201 11 0 00 031373 MOVEI AC+2,. ;SAVE TEST PC
1441 031374 202 11 0 00 030051 MOVEM AC+2,TESTPC
1442 031375 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1443 031376 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1444
1445 031377 205 10 0 00 140600 G5100: MOVSI AC+1,140600 ;SETUP PNTR WORD
1446 031400 474 00 0 00 000000 SETO ;SETUP BYTE WORD
1447 031401 135 07 0 00 000010 LDB AC,<AC+1>&17 ;LOAD BYTE
1448 031402 265 07 0 00 031403 JSP AC,.+1 ;STORE FLAGS
1449 031403 603 07 0 00 020000 TLNE AC,020000 ;TEST BIT 4
1450 031404 003 07 0 00 005101 ER3 AC,5101 ;AC FAILED
1451 031405 321 11 0 00 031377 JUMPL AC+2,G5100 ;LOOP ON ERROR SWITCH
1452
1453 ;INST-LDB
1454 ;TEST ABILITY TO DEFER (INDIRECT) BYTE
1455 ;PNTR ADDRESS
1456 ;FAILURE TO INDIRECTLY ADDRESS BYTE
1457 ;PNTR RESULTS IN AN ERROR BYTE
1458 ;PFIELD=0
1459 ;SFIELD=6
1460 ;ERROR BYTE=14
1461 ;CORRECT BYTE=44
1462 ;AN ERROR WILL OCCUR IF DEST AC=14
1463 ;FOLLOWING LOAD BYTE INDIRECTLY ADDRESSED
1464
1465 000006 AC=6
1466 SAVEAC (1,1)^
1467 031406 201 10 0 00 031406 MOVEI AC+2,. ;SAVE TEST PC
1468 031407 202 10 0 00 030051 MOVEM AC+2,TESTPC
1469 031410 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1470 031411 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1471
1472 031412 205 07 0 00 000600 G5200: MOVSI AC+1,600 ;SETUP PNTR WORD
1473 031413 505 00 0 00 000600 HRLI ,600 ;SETUP INDIRECT ADDRESS
1474 031414 541 00 0 00 000014 HRRI ,14 ;PNTR WORD (AC0)
1475 031415 201 14 0 00 000044 MOVEI AC+6,44 ;SETUP CORR BYTE WORD
1476 031416 135 06 1 00 000007 LDB AC,@<AC+1>&17 ;LOAD BYTE INDIRECTLY
1477 031417 302 06 0 00 000044 CAIE AC,44 ;TEST FOR CORR BYTE
1478 031420 003 06 0 00 005201 ER3 AC,5201 ;INDIRECT ADDRESSING FAILED
1479 031421 321 10 0 00 031412 JUMPL AC+2,G5200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 19
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0051
1480 ;INST-LDB
1481 ;TEST IR RT CLR AT6
1482 ;FURTHER TEST OF IR 134-7
1483 ;TEST ABILITY TO CLEAR IR BITS 13-17 FOLLOWING
1484 ;DEFERRING OR INDEXING OF BYTE PNTR ADDR
1485 ;PFIELD=6
1486 ;SFIELD=14
1487 ;CORR BYTE WORD=222222
1488 ;DEST AC=4
1489 ;AN ERROR WILL OCCUR IF DEST AC
1490 ;EQUALS 5555 FOLLOWING LOAD BYTE
1491
1492 000007 AC=7
1493 SAVEAC (1,1)^
1494 031422 201 11 0 00 031422 MOVEI AC+2,. ;SAVE TEST PC
1495 031423 202 11 0 00 030051 MOVEM AC+2,TESTPC
1496 031424 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1497 031425 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1498
1499 031426 205 14 0 00 061400 G5300: MOVSI AC+5,061400 ;SETUP INDEXED PNTR WORD
1500 031427 201 07 0 00 000004 MOVEI AC,4 ;SETUP INDEX AC
1501 031430 201 00 0 00 222222 MOVEI ,222222 ;SETUP CORR BYTE WORD
1502 031431 201 04 0 00 555555 MOVEI AC-3,555555 ;SETUP CORR BYTE WORD
1503 031432 135 07 0 07 000010 LDB AC,<AC+1>&17(AC) ;LOAD BYTE INDEXED
1504 031433 302 07 0 00 002222 CAIE AC,2222 ;TEST FOR CORR BYTE
1505 031434 003 07 0 00 005301 ER3 AC,5301 ;AC FAILED
1506 031435 321 11 0 00 031426 JUMPL AC+2,G5300 ;LOOP ON ERROR SWITCH
1507
1508 ;INST-LDB
1509 ;FURTHER TEST OF IR 134-7
1510 ;TEST ABILITY TO INDEX BYTE WORD ADDRESS
1511 ;P FIELD=0
1512 ;S FIELD=6
1513 ;FAILURE RESULTS IN IR14-17=0,
1514 ;NO INDEX, ERROR BYTE=55
1515
1516 000010 AC=10
1517 SAVEAC (1,1)^
1518 031436 201 12 0 00 031436 MOVEI AC+2,. ;SAVE TEST PC
1519 031437 202 12 0 00 030051 MOVEM AC+2,TESTPC
1520 031440 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1521 031441 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1522
1523 031442 505 11 0 00 000607 G5400: HRLI AC+1,000607 ;SETUP BYTE
1524 031443 541 11 0 00 000005 HRRI AC+1,5 ;PNTR WORD
1525 031444 201 07 0 00 000010 MOVEI 7,10 ;SETUP INDEX AC
1526 031445 201 05 0 00 000055 MOVEI 5,55 ;SETUP NON INDEX BYTE WORD
1527 031446 201 15 0 00 000077 MOVEI 15,77 ;SETUP INDEXED BYTE WORD
1528 031447 135 10 0 00 000011 LDB AC,<AC+1>&17 ;LOAD BYTE
1529 031450 302 10 0 00 000077 CAIE AC,77 ;TEST BYTE=0,,77
1530 031451 003 10 0 00 005401 ER3 AC,5401 ;AC FAILED
1531 031452 321 12 0 00 031442 JUMPL AC+2,G5400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 20
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0052
1532 ;INST-LDB
1533 ;TEST ABILITY TO INDEX BYTE WORD ADDRESS
1534 ;P FIELD=0
1535 ;S FIELD=6
1536 ;FAILURE RESULTS IN A BYTE WORD
1537 ;ADDRESS EQUAL TO CONTENTS OF
1538 ;INDEX AC(=AC)
1539
1540 000010 AC=10
1541 SAVEAC (1,1)^
1542 031453 201 12 0 00 031453 MOVEI AC+2,. ;SAVE TEST PC
1543 031454 202 12 0 00 030051 MOVEM AC+2,TESTPC
1544 031455 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1545 031456 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1546
1547 031457 505 11 0 00 000607 G5500: HRLI AC+1,000607 ;SETUP BYTE
1548 031460 541 11 0 00 000005 HRRI AC+1,5 ;PNTR WORD
1549 031461 403 10 0 00 000005 SETZB AC,5 ;CLEAR DEST AC'S
1550 031462 201 07 0 00 000010 MOVEI 7,10 ;SETUP INDEX AC
1551 031463 201 15 0 00 000077 MOVEI 15,77 ;SETUP BYTE WORD
1552 031464 135 10 0 00 000011 LDB AC,<AC+1>&17 ;LOAD BYTE
1553 031465 302 10 0 00 000077 CAIE AC,77 ;TEST FOR BYTE
1554 031466 003 10 0 00 005501 ER3 AC,5501 ;AC FAILED
1555 031467 321 12 0 00 031457 JUMPL AC+2,G5500 ;LOOP ON ERROR SWITCH
1556
1557 ;INST-LDB
1558 ;TEST ABILITY TO INDEX BYTE WORD ADDRESS
1559 ;P FIELD=0
1560 ;S FIELD=6
1561 ;FAILURE RESULTS IN AN INDEX AC EQUAL
1562 ;TO INDEX AC+AC(AC7+AC10=AC17)
1563
1564 000010 AC=10
1565 SAVEAC (1,1)^
1566 031470 201 12 0 00 031470 MOVEI AC+2,. ;SAVE TEST PC
1567 031471 202 12 0 00 030051 MOVEM AC+2,TESTPC
1568 031472 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1569 031473 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1570
1571 031474 505 11 0 00 000607 G5600: HRLI AC+1,000607 ;SETUP BYTE
1572 031475 541 11 0 00 000005 HRRI AC+1,5 ;PNTR WORD
1573 031476 201 06 0 00 000010 MOVEI 6,10 ;SETUP INDEX AC
1574 031477 201 15 0 00 000015 MOVEI 15,15 ;SETUP BYTE WORD
1575 031500 201 16 0 00 000005 MOVEI 16,5 ;SETUP ERROR INDEX AC
1576 031501 201 14 0 00 000014 MOVEI 14,14 ;SETUP ERROR BYTE WORD
1577 031502 135 10 0 00 000011 LDB AC,<AC+1>&17 ;LOAD BYTE
1578 031503 302 10 0 00 000015 CAIE AC,15 ;TEST BYTE=15
1579 031504 003 10 0 00 005601 ER3 AC,5601 ;AC FAILED
1580 031505 321 12 0 00 031474 JUMPL AC+2,G5600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 21
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0053
1581 ;INST-LDB
1582 ;TEST ABILITY TO INDEX BYTE WORD ADDRESS
1583 ;P FIELD=0
1584 ;S FIELD=6
1585 ;FAILURE RESULTS IN INDEXING BY C(AC0)
1586
1587 000010 AC=10
1588 SAVEAC (1,1)^
1589 031506 201 12 0 00 031506 MOVEI AC+2,. ;SAVE TEST PC
1590 031507 202 12 0 00 030051 MOVEM AC+2,TESTPC
1591 031510 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1592 031511 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1593
1594 031512 505 11 0 00 000607 G5700: HRLI AC+1,000607 ;SETUP BYTE
1595 031513 541 11 0 00 000005 HRRI AC+1,5 ;PNTR WORD
1596 031514 201 07 0 00 000010 MOVEI 7,10 ;SETUP INDEX AC
1597 031515 201 15 0 00 000015 MOVEI 15,15 ;SETUP BYTE WORD
1598 031516 201 00 0 00 000007 MOVEI ,7 ;SETUP ERROR INDEX AC
1599 031517 201 14 0 00 000033 MOVEI 14,33 ;SETUP ERROR BYTE WORD
1600 031520 135 10 0 00 000011 LDB AC,AC+1 ;LOAD BYTE
1601 031521 302 10 0 00 000015 CAIE AC,15 ;TEST BYTE=0,,15
1602 031522 003 10 0 00 005701 ER3 AC,5701 ;AC FAILED
1603 031523 321 12 0 00 031512 JUMPL AC+2,G5700 ;LOOP ON ERROR SWITCH
1604
1605 ;INST-ILDB
1606 ;TEST ABILITY TO ASSERT BYTE PTRINC
1607 ;P FIELD=16
1608 ;S FIELD=6
1609 ;FAILURE TO ASSERT MAY RESULT IN A HALT
1610 ;AT ET0
1611 ;AN ERROR WILL OCCUR IF PNTR WORD
1612 ;EQUALS ORIGINAL FOLLOWING ILDB
1613
1614 000005 AC=5
1615 SAVEAC (1,1)^
1616 031524 201 07 0 00 031524 MOVEI AC+2,. ;SAVE TEST PC
1617 031525 202 07 0 00 030051 MOVEM AC+2,TESTPC
1618 031526 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1619 031527 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1620
1621 031530 205 03 0 00 100600 G6000: MOVSI AC-2,100600 ;SETUP FOR COMPARISON
1622 031531 205 06 0 00 160600 MOVSI AC+1,160600 ;SETUP PNTR WORD
1623 031532 134 05 0 00 000006 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
1624 031533 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST PNTR=ORIGINAL
1625 031534 004 06 0 00 006001 ER4 AC+1,6001 ;PNTR FAILED TO INCREMENT
1626 031535 321 07 0 00 031530 JUMPL AC+2,G6000 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 22
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0054
1627
1628 ;INST-ILDB
1629 ;TEST LB BYTE LOAD
1630 ;TEST BYF5 SET
1631 ;P FIELD=22
1632 ;S FIELD=22
1633 ;BYTE WORD=000000777777
1634 ;FAILURE RESULTS IN A BYTE EQUAL
1635 ;TO BYTE WORD.
1636
1637 000014 AC=14
1638 SAVEAC (1,1)^
1639 031536 201 16 0 00 031536 MOVEI AC+2,. ;SAVE TEST PC
1640 031537 202 16 0 00 030051 MOVEM AC+2,TESTPC
1641 031540 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1642 031541 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1643
1644 031542 205 12 0 00 002200 G6100: MOVSI AC-2,002200 ;SETUP FOR COMPARISON
1645 031543 205 15 0 00 222200 MOVSI AC+1,222200 ;SETUP PNTR WORD
1646 031544 201 00 0 00 777777 MOVEI ,-1 ;SETUP BYTE WORD
1647 031545 134 14 0 00 000015 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
1648 031546 312 00 0 00 000014 CAME ,AC ;TEST BYTE=000000777777
1649 031547 012 00 0 00 006101 ER12 ,6101 ;BYTE WORD FAILED
1650 031550 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST PNTR WORD
1651 031551 005 15 0 00 006101 ER5 AC+1,6101 ;POINTER FAILED
1652 031552 321 16 0 00 031542 JUMPL AC+2,G6100 ;LOOP ON ERROR SWITCH
1653
1654 ;INST-ILDB
1655 ;P FIELD=22
1656 ;S FIELD=6
1657 ;BYTE WORD=0000007700000
1658 ;FAILURE RESULTS IN A BYTE
1659 ;=0
1660
1661 000013 AC=13
1662 SAVEAC (1,1)^
1663 031553 201 15 0 00 031553 MOVEI AC+2,. ;SAVE TEST PC
1664 031554 202 15 0 00 030051 MOVEM AC+2,TESTPC
1665 031555 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1666 031556 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1667
1668 031557 205 11 0 00 140600 G6200: MOVSI AC-2,140600 ;SETUP FOR COMPARISON
1669 031560 205 14 0 00 220600 MOVSI AC+1,220600 ;SETUP PNTR WORD
1670 031561 201 00 0 00 770000 MOVEI ,770000 ;SETUP BYTE WORD (AC0)
1671 031562 134 13 0 00 000014 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
1672 031563 302 13 0 00 000077 CAIE AC,77 ;TEST BYTE
1673 031564 003 13 0 00 006201 ER3 AC,6201 ;AC FAILED
1674 031565 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST PNTR WORD
1675 031566 005 14 0 00 006201 ER5 AC+1,6201 ;POINTER FAILED
1676 031567 321 15 0 00 031557 JUMPL AC+2,G6200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 23
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0055
1677
1678 ;INST-DPB
1679 ;TEST ABILITY TO ASSERT BYF5 SET
1680 ;P FIELD
1681 ;P=14
1682 ;S=6
1683 ;BYTE WORD=000000000077
1684 ;DEST WORD=000000000000
1685
1686 000012 AC=12
1687 SAVEAC (1,1)^
1688 031570 201 14 0 00 031570 MOVEI AC+2,. ;SAVE TEST PC
1689 031571 202 14 0 00 030051 MOVEM AC+2,TESTPC
1690 031572 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1691 031573 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1692
1693 031574 201 10 0 00 770000 G6300: MOVEI AC-2,770000 ;SETUP FOR COMPARISON
1694 031575 205 13 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR WORD
1695 031576 201 12 0 00 000077 MOVEI AC,77 ;SETUP BYTE
1696 031577 400 00 0 00 000000 SETZ ;SETUP DEST WORD
1697 031600 137 12 0 00 000013 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
1698 031601 312 00 0 00 000010 CAME ,<AC-2>&17 ;TEST DEST=0,,770000
1699 031602 012 00 0 00 006301 ER12 ,6301 ;BYTE W0RD FAILED
1700 031603 321 14 0 00 031574 JUMPL AC+2,G6300 ;LOOP ON ERROR SWITCH
1701
1702 ;INST-DPB
1703 ;TEST ABILITY TO ASSERT DPBYTE DEP
1704 ;P FIELD=14
1705 ;S FIELD=6
1706 ;BYTE WORD=55
1707 ;DEST WORD=-1
1708 ;FAILURE OF MQ TO SHIFT RESULTS IN A
1709 ;DEPOSIT BYTE=777777777700
1710
1711 000007 AC=7
1712 SAVEAC (1,1)^
1713 031604 201 11 0 00 031604 MOVEI AC+2,. ;SAVE TEST PC
1714 031605 202 11 0 00 030051 MOVEM AC+2,TESTPC
1715 031606 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1716 031607 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1717
1718 031610 561 05 0 00 557777 G6400: HRROI AC-2,557777 ;SETUP AC-2 FOR COMPARISON
1719 031611 205 10 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR WORD
1720 031612 201 07 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
1721 031613 474 00 0 00 000000 SETO ;SETUP DEST WORD
1722 031614 137 07 0 00 000010 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
1723 031615 312 00 0 00 000005 CAME ,<AC-2>&17 ;TEST DEST=-1,,557777
1724 031616 012 00 0 00 006401 ER12 ,6401 ;BYTE WORD FAILED
1725 031617 321 11 0 00 031610 JUMPL AC+2,G6400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 25
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0056
1726 ;INST-DPB
1727 ;TEST ABILITY TO AND MASK, BYTE
1728 ;P FIELD=14
1729 ;S FIELD=6
1730 ;BYTE WORD=5555
1731 ;DEST WORD=0
1732 ;FAILURE RESULTS IN A DEPOSIT
1733 ;BYTE=000055550000
1734
1735 000005 AC=5
1736 SAVEAC (1,1)^
1737 031620 201 07 0 00 031620 MOVEI AC+2,. ;SAVE TEST PC
1738 031621 202 07 0 00 030051 MOVEM AC+2,TESTPC
1739 031622 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1740 031623 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1741
1742 031624 551 03 0 00 550000 G7000: HRRZI AC-2,550000 ;SETUP AC-2 FOR COMPARISON
1743 031625 541 03 0 00 550000 HRRI AC-2,550000 ;FOR COMPARISON
1744 031626 205 06 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR WORD
1745 031627 201 05 0 00 005555 MOVEI AC,5555 ;SETUP BYTE WORD
1746 031630 400 00 0 00 000000 SETZ ;SETUP DEST WORD
1747 031631 137 05 0 00 000006 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
1748 031632 312 00 0 00 000003 CAME ,<AC-2>&17 ;TEST DEST WORD=0,,550000
1749 031633 012 00 0 00 007001 ER12 ,7001 ;BYTE WORD FAILED
1750 031634 321 07 0 00 031624 JUMPL AC+2,G7000 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 26
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0057
1751
1752 ;INST-DPB
1753 ;P FIELD = 6
1754 ;S FIELD = 14
1755 ;BYTE WORD=55
1756 ;DEST WORD = -1
1757 ;FAILURE OF ANY ONE RESULTS IN A
1758 ;BYTE = 777777 000077
1759
1760 000014 AC=14
1761 SAVEAC (1,1)^
1762 031635 201 16 0 00 031635 MOVEI AC+2,. ;SAVE TEST PC
1763 031636 202 16 0 00 030051 MOVEM AC+2,TESTPC
1764 031637 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1765 031640 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1766
1767 031641 561 12 0 00 005577 G7100: HRROI AC-2,5577 ;SETUP FOR COMPARISON
1768 031642 205 15 0 00 061400 MOVSI AC+1,061400 ;SETUP PNTR WORD
1769 031643 201 14 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
1770 031644 474 00 0 00 000000 SETO ;SETUP DEST WORD
1771 031645 137 14 0 00 000015 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
1772 031646 312 00 0 00 000012 CAME ,<AC-2>&17 ;TEST BYTE=777777 005577
1773 031647 012 00 0 00 007101 ER12 ,7101 ;BYTE WORD FAILED
1774 031650 321 16 0 00 031641 JUMPL AC+2,G7100 ;LOOP ON ERROR SWITCH
1775
1776 ;INST-DPB
1777 ;P FIELD=14
1778 ;S FIELD=6
1779 ;BYTE WORD=55
1780 ;DEST WORD=0
1781 ;FAILURE RESULTS IN A DEPOSIT
1782 ;BYTE=777777557777
1783
1784 000013 AC=13
1785 SAVEAC (1,1)^
1786 031651 201 15 0 00 031651 MOVEI AC+2,. ;SAVE TEST PC
1787 031652 202 15 0 00 030051 MOVEM AC+2,TESTPC
1788 031653 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1789 031654 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1790
1791 031655 551 11 0 00 550000 G7200: HRRZI AC-2,550000 ;SETUP FOR COMPARISON
1792 031656 205 14 0 00 140600 MOVSI AC+1,140600 ;SETUP PNTR WORD
1793 031657 201 13 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
1794 031660 400 00 0 00 000000 SETZ ;SETUP DEST WORD
1795 031661 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
1796 031662 312 00 0 00 000011 CAME ,<AC-2>&17 ;TEST DEST WORD=0,,550000
1797 031663 012 00 0 00 007201 ER12 ,7201 ;BYTE WORD FAILED
1798 031664 321 15 0 00 031655 JUMPL AC+2,G7200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 27
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0058
1799 ;INST-DBP
1800 ;P FIELD=22
1801 ;S FIELD=6
1802 ;BYTE WORD=5555
1803 ;DEST WORD=-1
1804 ;FAILURE RESULTS IN A DEPOSIT
1805 ;BYTE=005455777777
1806
1807 000011 AC=11
1808 SAVEAC (1,1)^
1809 031665 201 13 0 00 031665 MOVEI AC+2,. ;SAVE TEST PC
1810 031666 202 13 0 00 030051 MOVEM AC+2,TESTPC
1811 031667 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1812 031670 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1813
1814 031671 525 07 0 00 777755 G7400: HRLOI AC-2,777755 ;SETUP FOR COMPARISON
1815 031672 205 12 0 00 220600 MOVSI AC+1,220600 ;SETUP PNTR WORD
1816 031673 201 11 0 00 005555 MOVEI AC,5555 ;SETUP BYTE WORD
1817 031674 474 00 0 00 000000 SETO ;SETUP DEST WORD
1818 031675 137 11 0 00 000012 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
1819 031676 312 00 0 00 000007 CAME ,<AC-2>&17 ;TEST DEST WORD=777755,,-1
1820 031677 012 00 0 00 007401 ER12 ,7401 ;BYTE WORD FAILED
1821 031700 321 13 0 00 031671 JUMPL AC+2,G7400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 28
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0059
1822 ;INST-DPB
1823 ;TEST ABILITY TO CLEAR BYF6
1824 ;P FIELD=14
1825 ;S FIELD=6
1826 ;BYTE WORD=55
1827 ;DEST WORD=0
1828 ;AN ERROR WILL OCCUR IF BYF6(1) WHEN
1829 ;STORED BY JSP
1830
1831 000007 AC=7
1832 SAVEAC (1,1)^
1833 031701 201 11 0 00 031701 MOVEI AC+2,. ;SAVE TEST PC
1834 031702 202 11 0 00 030051 MOVEM AC+2,TESTPC
1835 031703 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1836 031704 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1837
1838 031705 205 10 0 00 140600 G7600: MOVSI AC+1,140600 ;SETUP PNTR WORD
1839 031706 201 07 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
1840 031707 400 00 0 00 000000 SETZ ;SETUP DEST WORD
1841 031710 137 07 0 00 000010 DPB AC,<AC+1>&17 ;DEPOSIT BYTE
1842 031711 265 07 0 00 031712 JSP AC,.+1 ;STORE FLAGS
1843 031712 603 07 0 00 020000 TLNE AC,020000 ;TEST BIT 4
1844 031713 013 07 0 00 007601 ER13 AC,7601 ;BYF6 FAILED TO CLEAR
1845 031714 321 11 0 00 031705 JUMPL AC+2,G7600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 29
DAKAMM MAC 20-JAN-77 11:34 PART IA - BYTE MANIPULATION SEQ 0060
1846
1847 ;INST-IDPB
1848 ;TEST ABILITY TO ASSERT BYTE PTRINC
1849 ;TEST ABILITY TO ASSERT DB BYTE DEP
1850 ;FAILURE TO ASSERT BYTE PTR INC
1851 ;MAY CAUSE A HALT AT ET0
1852 ;FAILURE TO ASSERT DB BYTE DEP PREVENTS
1853 ;ARMQSHLT SCT3 (2ND PART)
1854 ;P FIELD=22
1855 ;S FIELD=6
1856 ;DEST WORD=0
1857 ;BYTE WORD=77
1858 ;AN ERROR WILL OCCUR IF BYTE PNTR
1859 ;WORD EQUALS ORIGINAL
1860 ;AN ERROR WILL OCCUR IF DEST WORD
1861 ;EQUALS BYTE WORD
1862
1863 000005 AC=5
1864 SAVEAC (1,1)^
1865 031715 201 07 0 00 031715 MOVEI AC+2,. ;SAVE TEST PC
1866 031716 202 07 0 00 030051 MOVEM AC+2,TESTPC
1867 031717 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1868 031720 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1869
1870 031721 205 03 0 00 140600 G7700: MOVSI AC-2,140600 ;SETUP FOR COMPARISON
1871 031722 205 06 0 00 220600 MOVSI AC+1,220600 ;SETUP PNTR WORD
1872 031723 201 05 0 00 000077 MOVEI AC,77 ;SETUP BYTE WORD
1873 031724 400 00 0 00 000000 SETZ ;SETUP DEST WORD (AC0)
1874 031725 136 05 0 00 000006 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
1875 031726 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST FOR INCREMENTED PNTR
1876 031727 005 06 0 00 007701 ER5 AC+1,7701 ;BYTE PTR INC FAILED
1877 031730 302 00 0 00 770000 CAIE ,770000 ;TEST DEST WORD
1878 031731 012 00 0 00 007701 ER12 ,7701 ;DB BYTE DEP FAILED
1879 031732 321 07 0 00 031721 JUMPL AC+2,G7700 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 30
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0061
1880 SUBTTL PART IB-GENERAL BYTE TEST
1881
1882 ;PART IA- GENERAL BYTE TEST
1883
1884 ;INST-IBP
1885 ;DECREASING P FIELD
1886 ;P FIELD=22,20,16,14,12
1887 ;S FIELD=6
1888 ;RESULTANT P FIELDS=14,12,10,6,4
1889 ;AN ERROR WILL OCCUR ON AN
1890 ;INCORRECT INCREMENTED PNTR WORD
1891
1892 000005 AC=5
1893 SAVEAC (1,1)^
1894 031733 201 07 0 00 031733 MOVEI AC+2,. ;SAVE TEST PC
1895 031734 202 07 0 00 030051 MOVEM AC+2,TESTPC
1896 031735 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1897 031736 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1898
1899 010000 SN=10000
1900 160600 XX=160600
1901 240600 ZZ=240600
1902
1903 ;TEST IBP
1904 G10000: REPEAT ^D5,<
1905 SN=SN+1
1906 XX=XX-020000
1907 ZZ=ZZ-020000
1908 MOVSI AC-2,XX ;SETUP FOR COMPARISON
1909 MOVSI AC+1,ZZ ;SETUP PNTR WORD
1910 IBP ,<AC+1>&17 ;INC BYTE PNTR
1911 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
1912 ER5 AC+1,SN ;IBP FAILED
1913 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
1914 >
1915
1916 010001 SN=SN+1
1917 140600 XX=XX-020000
1918 220600 ZZ=ZZ-020000
1919 031737 205 03 0 00 140600 MOVSI AC-2,XX ;SETUP FOR COMPARISON
1920 031740 205 06 0 00 220600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
1921 031741 133 00 0 00 000006 IBP ,<AC+1>&17 ;INC BYTE PNTR
1922 031742 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
1923 031743 005 06 0 00 010001 ER5 AC+1,SN ;IBP FAILED
1924 031744 321 07 0 00 031737 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
1925
1926
1927 010002 SN=SN+1
1928 120600 XX=XX-020000
1929 200600 ZZ=ZZ-020000
1930 031745 205 03 0 00 120600 MOVSI AC-2,XX ;SETUP FOR COMPARISON
1931 031746 205 06 0 00 200600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
1932 031747 133 00 0 00 000006 IBP ,<AC+1>&17 ;INC BYTE PNTR
1933 031750 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
1934 031751 005 06 0 00 010002 ER5 AC+1,SN ;IBP FAILED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 30-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0062
1935 031752 321 07 0 00 031745 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
1936
1937
1938 010003 SN=SN+1
1939 100600 XX=XX-020000
1940 160600 ZZ=ZZ-020000
1941 031753 205 03 0 00 100600 MOVSI AC-2,XX ;SETUP FOR COMPARISON
1942 031754 205 06 0 00 160600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
1943 031755 133 00 0 00 000006 IBP ,<AC+1>&17 ;INC BYTE PNTR
1944 031756 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
1945 031757 005 06 0 00 010003 ER5 AC+1,SN ;IBP FAILED
1946 031760 321 07 0 00 031753 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
1947
1948
1949 010004 SN=SN+1
1950 060600 XX=XX-020000
1951 140600 ZZ=ZZ-020000
1952 031761 205 03 0 00 060600 MOVSI AC-2,XX ;SETUP FOR COMPARISON
1953 031762 205 06 0 00 140600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
1954 031763 133 00 0 00 000006 IBP ,<AC+1>&17 ;INC BYTE PNTR
1955 031764 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
1956 031765 005 06 0 00 010004 ER5 AC+1,SN ;IBP FAILED
1957 031766 321 07 0 00 031761 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
1958
1959
1960 010005 SN=SN+1
1961 040600 XX=XX-020000
1962 120600 ZZ=ZZ-020000
1963 031767 205 03 0 00 040600 MOVSI AC-2,XX ;SETUP FOR COMPARISON
1964 031770 205 06 0 00 120600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
1965 031771 133 00 0 00 000006 IBP ,<AC+1>&17 ;INC BYTE PNTR
1966 031772 312 06 0 00 000003 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
1967 031773 005 06 0 00 010005 ER5 AC+1,SN ;IBP FAILED
1968 031774 321 07 0 00 031767 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
1969
1970 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 30-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0063
1971 ;INST-IBP
1972 ;DECREASING S FIELD
1973 ;P FIELD=22
1974 ;S FIELD=14,12,10,6,4
1975 ;RESULTANT P FIELDS=6,10,12,14,16
1976 ;AN ERROR WILL OCCUR ON AN
1977 ;INCORRECT INCREMENTED PNTR WORD
1978
1979 000014 AC=14
1980 SAVEAC (1,1)^
1981 031775 201 16 0 00 031775 MOVEI AC+2,. ;SAVE TEST PC
1982 031776 202 16 0 00 030051 MOVEM AC+2,TESTPC
1983 031777 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1984 032000 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1985
1986 010100 SN=10100
1987 040000 XX=040000
1988 001600 WW=001600
1989 221600 ZZ=221600
1990
1991 ;TEST IBP
1992 G10100: REPEAT ^D5,<
1993 SN=SN+1
1994 XX=XX+020000
1995 WW=WW-000200
1996 ZZ=ZZ-000200
1997 MOVSI AC-2,XX+WW ;SETUP FOR COMPARISON
1998 MOVSI AC+1,ZZ ;SETUP PNTR WORD
1999 IBP ,<AC+1>&17 ;INC BYTE PNTR
2000 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2001 ER5 AC+1,SN ;IBP FAILED
2002 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2003 >
2004
2005 010101 SN=SN+1
2006 060000 XX=XX+020000
2007 001400 WW=WW-000200
2008 221400 ZZ=ZZ-000200
2009 032001 205 12 0 00 061400 MOVSI AC-2,XX+WW ;SETUP FOR COMPARISON
2010 032002 205 15 0 00 221400 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2011 032003 133 00 0 00 000015 IBP ,<AC+1>&17 ;INC BYTE PNTR
2012 032004 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2013 032005 005 15 0 00 010101 ER5 AC+1,SN ;IBP FAILED
2014 032006 321 16 0 00 032001 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2015
2016
2017 010102 SN=SN+1
2018 100000 XX=XX+020000
2019 001200 WW=WW-000200
2020 221200 ZZ=ZZ-000200
2021 032007 205 12 0 00 101200 MOVSI AC-2,XX+WW ;SETUP FOR COMPARISON
2022 032010 205 15 0 00 221200 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2023 032011 133 00 0 00 000015 IBP ,<AC+1>&17 ;INC BYTE PNTR
2024 032012 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2025 032013 005 15 0 00 010102 ER5 AC+1,SN ;IBP FAILED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 30-3
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0064
2026 032014 321 16 0 00 032007 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2027
2028
2029 010103 SN=SN+1
2030 120000 XX=XX+020000
2031 001000 WW=WW-000200
2032 221000 ZZ=ZZ-000200
2033 032015 205 12 0 00 121000 MOVSI AC-2,XX+WW ;SETUP FOR COMPARISON
2034 032016 205 15 0 00 221000 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2035 032017 133 00 0 00 000015 IBP ,<AC+1>&17 ;INC BYTE PNTR
2036 032020 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2037 032021 005 15 0 00 010103 ER5 AC+1,SN ;IBP FAILED
2038 032022 321 16 0 00 032015 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2039
2040
2041 010104 SN=SN+1
2042 140000 XX=XX+020000
2043 000600 WW=WW-000200
2044 220600 ZZ=ZZ-000200
2045 032023 205 12 0 00 140600 MOVSI AC-2,XX+WW ;SETUP FOR COMPARISON
2046 032024 205 15 0 00 220600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2047 032025 133 00 0 00 000015 IBP ,<AC+1>&17 ;INC BYTE PNTR
2048 032026 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2049 032027 005 15 0 00 010104 ER5 AC+1,SN ;IBP FAILED
2050 032030 321 16 0 00 032023 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2051
2052
2053 010105 SN=SN+1
2054 160000 XX=XX+020000
2055 000400 WW=WW-000200
2056 220400 ZZ=ZZ-000200
2057 032031 205 12 0 00 160400 MOVSI AC-2,XX+WW ;SETUP FOR COMPARISON
2058 032032 205 15 0 00 220400 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2059 032033 133 00 0 00 000015 IBP ,<AC+1>&17 ;INC BYTE PNTR
2060 032034 312 15 0 00 000012 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2061 032035 005 15 0 00 010105 ER5 AC+1,SN ;IBP FAILED
2062 032036 321 16 0 00 032031 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2063
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 31
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0065
2064
2065 ;INST-IBP
2066 ;OVERFLOW AND INC ADDRESS
2067 ;P FIELD=0
2068 ;S FIELD=14,12,10,6,4
2069 ;RESULTANT P FIELDS=30,32,34,36,40
2070 ;ADDRESS FIELD INCREMENTED BY ONE
2071 ;AN ERROR WILL OCCUR ON AN INCORRECT
2072 ;INCREMENTED PNTR WORD
2073
2074 000013 AC=13
2075 SAVEAC (1,1)^
2076 032037 201 15 0 00 032037 MOVEI AC+2,. ;SAVE TEST PC
2077 032040 202 15 0 00 030051 MOVEM AC+2,TESTPC
2078 032041 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2079 032042 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2080
2081 010200 SN=10200
2082 260000 XX=260000
2083 001600 ZZ=001600
2084
2085 ;TEST IBP
2086 G10200: REPEAT ^D5,<
2087 SN=SN+1
2088 XX=XX+020000
2089 ZZ=ZZ-000200
2090 MOVSI AC-2,XX+ZZ ;SETUP AC-2
2091 AOJ AC-2, ;FOR COMPARISON
2092 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2093 IBP ,<AC+1>&17 ;INC BYTE PNTR
2094 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2095 ER5 AC+1,SN ;IBP FAILED
2096 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2097 >
2098
2099 010201 SN=SN+1
2100 300000 XX=XX+020000
2101 001400 ZZ=ZZ-000200
2102 032043 205 11 0 00 301400 MOVSI AC-2,XX+ZZ ;SETUP AC-2
2103 032044 340 11 0 00 000000 AOJ AC-2, ;FOR COMPARISON
2104 032045 205 14 0 00 001400 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2105 032046 133 00 0 00 000014 IBP ,<AC+1>&17 ;INC BYTE PNTR
2106 032047 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2107 032050 005 14 0 00 010201 ER5 AC+1,SN ;IBP FAILED
2108 032051 321 15 0 00 032043 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2109
2110
2111 010202 SN=SN+1
2112 320000 XX=XX+020000
2113 001200 ZZ=ZZ-000200
2114 032052 205 11 0 00 321200 MOVSI AC-2,XX+ZZ ;SETUP AC-2
2115 032053 340 11 0 00 000000 AOJ AC-2, ;FOR COMPARISON
2116 032054 205 14 0 00 001200 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2117 032055 133 00 0 00 000014 IBP ,<AC+1>&17 ;INC BYTE PNTR
2118 032056 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 31-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0066
2119 032057 005 14 0 00 010202 ER5 AC+1,SN ;IBP FAILED
2120 032060 321 15 0 00 032052 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2121
2122
2123 010203 SN=SN+1
2124 340000 XX=XX+020000
2125 001000 ZZ=ZZ-000200
2126 032061 205 11 0 00 341000 MOVSI AC-2,XX+ZZ ;SETUP AC-2
2127 032062 340 11 0 00 000000 AOJ AC-2, ;FOR COMPARISON
2128 032063 205 14 0 00 001000 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2129 032064 133 00 0 00 000014 IBP ,<AC+1>&17 ;INC BYTE PNTR
2130 032065 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2131 032066 005 14 0 00 010203 ER5 AC+1,SN ;IBP FAILED
2132 032067 321 15 0 00 032061 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2133
2134
2135 010204 SN=SN+1
2136 360000 XX=XX+020000
2137 000600 ZZ=ZZ-000200
2138 032070 205 11 0 00 360600 MOVSI AC-2,XX+ZZ ;SETUP AC-2
2139 032071 340 11 0 00 000000 AOJ AC-2, ;FOR COMPARISON
2140 032072 205 14 0 00 000600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2141 032073 133 00 0 00 000014 IBP ,<AC+1>&17 ;INC BYTE PNTR
2142 032074 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2143 032075 005 14 0 00 010204 ER5 AC+1,SN ;IBP FAILED
2144 032076 321 15 0 00 032070 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2145
2146
2147 010205 SN=SN+1
2148 400000 XX=XX+020000
2149 000400 ZZ=ZZ-000200
2150 032077 205 11 0 00 400400 MOVSI AC-2,XX+ZZ ;SETUP AC-2
2151 032100 340 11 0 00 000000 AOJ AC-2, ;FOR COMPARISON
2152 032101 205 14 0 00 000400 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2153 032102 133 00 0 00 000014 IBP ,<AC+1>&17 ;INC BYTE PNTR
2154 032103 312 14 0 00 000011 CAME AC+1,<AC-2>&17 ;TEST INC PNTR
2155 032104 005 14 0 00 010205 ER5 AC+1,SN ;IBP FAILED
2156 032105 321 15 0 00 032077 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2157
2158 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 31-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0067
2159 ;INST-LDB
2160 ;INCREASING S FIELD
2161 ;P FIELD=22
2162 ;S FIELD=1,2,3,4,5
2163 ;BYTE WORD=777777000000
2164 ;AN ERROR WILL OCCUR IF AN
2165 ;IN CORRECT BYTE IS LOADED
2166 ;INTO AC
2167
2168 000012 AC=12
2169 SAVEAC (1,1)^
2170 032106 201 14 0 00 032106 MOVEI AC+2,. ;SAVE TEST PC
2171 032107 202 14 0 00 030051 MOVEM AC+2,TESTPC
2172 032110 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2173 032111 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2174
2175 010300 SN=10300
2176 220000 XX=220000
2177 000000 ZZ=0
2178
2179 ;TEST LDB
2180 G10300: REPEAT ^D5,<
2181 SN=SN+1
2182 XX=XX+000100
2183 ZZ=ZZ*2+1
2184 MOVSI AC+1,XX ;SETUP PNTR WORD
2185 HRLZI ,-1 ;SETUP BYTE WORD (AC0)
2186 LDB AC,<AC+1>&17 ;LOAD BYTE
2187 CAIE AC,ZZ ;TEST DEST AC
2188 ER3 AC,SN ;LDB FAILED
2189 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2190 >
2191
2192 010301 SN=SN+1
2193 220100 XX=XX+000100
2194 000001 ZZ=ZZ*2+1
2195 032112 205 13 0 00 220100 MOVSI AC+1,XX ;SETUP PNTR WORD
2196 032113 515 00 0 00 777777 HRLZI ,-1 ;SETUP BYTE WORD (AC0)
2197 032114 135 12 0 00 000013 LDB AC,<AC+1>&17 ;LOAD BYTE
2198 032115 302 12 0 00 000001 CAIE AC,ZZ ;TEST DEST AC
2199 032116 003 12 0 00 010301 ER3 AC,SN ;LDB FAILED
2200 032117 321 14 0 00 032112 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2201
2202
2203 010302 SN=SN+1
2204 220200 XX=XX+000100
2205 000003 ZZ=ZZ*2+1
2206 032120 205 13 0 00 220200 MOVSI AC+1,XX ;SETUP PNTR WORD
2207 032121 515 00 0 00 777777 HRLZI ,-1 ;SETUP BYTE WORD (AC0)
2208 032122 135 12 0 00 000013 LDB AC,<AC+1>&17 ;LOAD BYTE
2209 032123 302 12 0 00 000003 CAIE AC,ZZ ;TEST DEST AC
2210 032124 003 12 0 00 010302 ER3 AC,SN ;LDB FAILED
2211 032125 321 14 0 00 032120 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2212
2213
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 31-3
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0068
2214 010303 SN=SN+1
2215 220300 XX=XX+000100
2216 000007 ZZ=ZZ*2+1
2217 032126 205 13 0 00 220300 MOVSI AC+1,XX ;SETUP PNTR WORD
2218 032127 515 00 0 00 777777 HRLZI ,-1 ;SETUP BYTE WORD (AC0)
2219 032130 135 12 0 00 000013 LDB AC,<AC+1>&17 ;LOAD BYTE
2220 032131 302 12 0 00 000007 CAIE AC,ZZ ;TEST DEST AC
2221 032132 003 12 0 00 010303 ER3 AC,SN ;LDB FAILED
2222 032133 321 14 0 00 032126 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2223
2224
2225 010304 SN=SN+1
2226 220400 XX=XX+000100
2227 000017 ZZ=ZZ*2+1
2228 032134 205 13 0 00 220400 MOVSI AC+1,XX ;SETUP PNTR WORD
2229 032135 515 00 0 00 777777 HRLZI ,-1 ;SETUP BYTE WORD (AC0)
2230 032136 135 12 0 00 000013 LDB AC,<AC+1>&17 ;LOAD BYTE
2231 032137 302 12 0 00 000017 CAIE AC,ZZ ;TEST DEST AC
2232 032140 003 12 0 00 010304 ER3 AC,SN ;LDB FAILED
2233 032141 321 14 0 00 032134 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2234
2235
2236 010305 SN=SN+1
2237 220500 XX=XX+000100
2238 000037 ZZ=ZZ*2+1
2239 032142 205 13 0 00 220500 MOVSI AC+1,XX ;SETUP PNTR WORD
2240 032143 515 00 0 00 777777 HRLZI ,-1 ;SETUP BYTE WORD (AC0)
2241 032144 135 12 0 00 000013 LDB AC,<AC+1>&17 ;LOAD BYTE
2242 032145 302 12 0 00 000037 CAIE AC,ZZ ;TEST DEST AC
2243 032146 003 12 0 00 010305 ER3 AC,SN ;LDB FAILED
2244 032147 321 14 0 00 032142 JUMPL AC+2,.-5 ;LOOP ON ERROR SWITCH
2245
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 32
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0069
2246
2247 ;INST-LDB
2248 ;INCREASING BYTE WORD
2249 ;INCREASING P FIELD
2250 ;P FIELD=14,17,22,25,33
2251 ;S FIELD=3
2252 ;BYTE WORD=000000070000 SHIFTING
2253 ;LEFT BY 3
2254 ;AN ERROR WILL OCCUR IF DEST AC
2255 ;DIFFERS FROM 7
2256
2257 000011 AC=11
2258 SAVEAC (1,1)^
2259 032150 201 13 0 00 032150 MOVEI AC+2,. ;SAVE TEST PC
2260 032151 202 13 0 00 030051 MOVEM AC+2,TESTPC
2261 032152 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2262 032153 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2263
2264 010400 SN=10400
2265 000000 XX=0
2266 110300 ZZ=110300
2267
2268 ;TEST LDB
2269 G10400: REPEAT ^D5,<
2270 SN=SN+1
2271 XX=XX+3
2272 ZZ=ZZ+030000
2273 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2274 MOVEI ,7000 ;SETUP BYTE WORD
2275 ROT ,XX ;ROTATE LEFT BY 3
2276 LDB AC,<AC+1>&17 ;LOAD BYTE
2277 CAIE AC,7 ;TEST DEST AC=7
2278 ER3 AC,SN ;LDB FAILED
2279 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2280 >
2281
2282 010401 SN=SN+1
2283 000003 XX=XX+3
2284 140300 ZZ=ZZ+030000
2285 032154 205 12 0 00 140300 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2286 032155 201 00 0 00 007000 MOVEI ,7000 ;SETUP BYTE WORD
2287 032156 241 00 0 00 000003 ROT ,XX ;ROTATE LEFT BY 3
2288 032157 135 11 0 00 000012 LDB AC,<AC+1>&17 ;LOAD BYTE
2289 032160 302 11 0 00 000007 CAIE AC,7 ;TEST DEST AC=7
2290 032161 003 11 0 00 010401 ER3 AC,SN ;LDB FAILED
2291 032162 321 13 0 00 032154 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2292
2293
2294 010402 SN=SN+1
2295 000006 XX=XX+3
2296 170300 ZZ=ZZ+030000
2297 032163 205 12 0 00 170300 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2298 032164 201 00 0 00 007000 MOVEI ,7000 ;SETUP BYTE WORD
2299 032165 241 00 0 00 000006 ROT ,XX ;ROTATE LEFT BY 3
2300 032166 135 11 0 00 000012 LDB AC,<AC+1>&17 ;LOAD BYTE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 32-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0070
2301 032167 302 11 0 00 000007 CAIE AC,7 ;TEST DEST AC=7
2302 032170 003 11 0 00 010402 ER3 AC,SN ;LDB FAILED
2303 032171 321 13 0 00 032163 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2304
2305
2306 010403 SN=SN+1
2307 000011 XX=XX+3
2308 220300 ZZ=ZZ+030000
2309 032172 205 12 0 00 220300 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2310 032173 201 00 0 00 007000 MOVEI ,7000 ;SETUP BYTE WORD
2311 032174 241 00 0 00 000011 ROT ,XX ;ROTATE LEFT BY 3
2312 032175 135 11 0 00 000012 LDB AC,<AC+1>&17 ;LOAD BYTE
2313 032176 302 11 0 00 000007 CAIE AC,7 ;TEST DEST AC=7
2314 032177 003 11 0 00 010403 ER3 AC,SN ;LDB FAILED
2315 032200 321 13 0 00 032172 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2316
2317
2318 010404 SN=SN+1
2319 000014 XX=XX+3
2320 250300 ZZ=ZZ+030000
2321 032201 205 12 0 00 250300 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2322 032202 201 00 0 00 007000 MOVEI ,7000 ;SETUP BYTE WORD
2323 032203 241 00 0 00 000014 ROT ,XX ;ROTATE LEFT BY 3
2324 032204 135 11 0 00 000012 LDB AC,<AC+1>&17 ;LOAD BYTE
2325 032205 302 11 0 00 000007 CAIE AC,7 ;TEST DEST AC=7
2326 032206 003 11 0 00 010404 ER3 AC,SN ;LDB FAILED
2327 032207 321 13 0 00 032201 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2328
2329
2330 010405 SN=SN+1
2331 000017 XX=XX+3
2332 300300 ZZ=ZZ+030000
2333 032210 205 12 0 00 300300 MOVSI AC+1,ZZ ;SETUP PNTR WORD
2334 032211 201 00 0 00 007000 MOVEI ,7000 ;SETUP BYTE WORD
2335 032212 241 00 0 00 000017 ROT ,XX ;ROTATE LEFT BY 3
2336 032213 135 11 0 00 000012 LDB AC,<AC+1>&17 ;LOAD BYTE
2337 032214 302 11 0 00 000007 CAIE AC,7 ;TEST DEST AC=7
2338 032215 003 11 0 00 010405 ER3 AC,SN ;LDB FAILED
2339 032216 321 13 0 00 032210 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2340
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 33
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0071
2341
2342 ;INST-LDB
2343 ;VARY BYTE ADDRESS
2344 ;P FIELD=22
2345 ;S FIELD=3
2346 ;BYTE WORD=AC NUMBER
2347 ;BYTE PNTR ADDR=AC 6,5,4,3,2
2348 ;AN ERROR WILL OCCUR IF C(DEST AC)
2349 ;DIFFERS FROM AC UNDER TEST
2350
2351 000007 AC=7
2352 SAVEAC (1,1)^
2353 032217 201 11 0 00 032217 MOVEI AC+2,. ;SAVE TEST PC
2354 032220 202 11 0 00 030051 MOVEM AC+2,TESTPC
2355 032221 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2356 032222 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2357
2358 010500 SN=10500
2359 000007 ZZ=7
2360
2361 ;TEST LOAD BYTE
2362 G10500: REPEAT ^D5,<
2363 SN=SN+1
2364 ZZ=ZZ-1
2365 HRLI AC+1,220300 ;SETUP BYTE
2366 HRRI AC+1,ZZ ;PNTR WORD
2367 MOVSI ZZ,ZZ ;SETUP BYTE WORD
2368 LDB AC,<AC+1>&17 ;LOAD BYTE
2369 CAIE AC,ZZ ;TEST DEST AC=AC NUMBER
2370 ER3 AC,SN ;LDB FAILED
2371 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2372 >
2373
2374 010501 SN=SN+1
2375 000006 ZZ=ZZ-1
2376 032223 505 10 0 00 220300 HRLI AC+1,220300 ;SETUP BYTE
2377 032224 541 10 0 00 000006 HRRI AC+1,ZZ ;PNTR WORD
2378 032225 205 06 0 00 000006 MOVSI ZZ,ZZ ;SETUP BYTE WORD
2379 032226 135 07 0 00 000010 LDB AC,<AC+1>&17 ;LOAD BYTE
2380 032227 302 07 0 00 000006 CAIE AC,ZZ ;TEST DEST AC=AC NUMBER
2381 032230 003 07 0 00 010501 ER3 AC,SN ;LDB FAILED
2382 032231 321 11 0 00 032223 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2383
2384
2385 010502 SN=SN+1
2386 000005 ZZ=ZZ-1
2387 032232 505 10 0 00 220300 HRLI AC+1,220300 ;SETUP BYTE
2388 032233 541 10 0 00 000005 HRRI AC+1,ZZ ;PNTR WORD
2389 032234 205 05 0 00 000005 MOVSI ZZ,ZZ ;SETUP BYTE WORD
2390 032235 135 07 0 00 000010 LDB AC,<AC+1>&17 ;LOAD BYTE
2391 032236 302 07 0 00 000005 CAIE AC,ZZ ;TEST DEST AC=AC NUMBER
2392 032237 003 07 0 00 010502 ER3 AC,SN ;LDB FAILED
2393 032240 321 11 0 00 032232 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2394
2395
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 33-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0072
2396 010503 SN=SN+1
2397 000004 ZZ=ZZ-1
2398 032241 505 10 0 00 220300 HRLI AC+1,220300 ;SETUP BYTE
2399 032242 541 10 0 00 000004 HRRI AC+1,ZZ ;PNTR WORD
2400 032243 205 04 0 00 000004 MOVSI ZZ,ZZ ;SETUP BYTE WORD
2401 032244 135 07 0 00 000010 LDB AC,<AC+1>&17 ;LOAD BYTE
2402 032245 302 07 0 00 000004 CAIE AC,ZZ ;TEST DEST AC=AC NUMBER
2403 032246 003 07 0 00 010503 ER3 AC,SN ;LDB FAILED
2404 032247 321 11 0 00 032241 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2405
2406
2407 010504 SN=SN+1
2408 000003 ZZ=ZZ-1
2409 032250 505 10 0 00 220300 HRLI AC+1,220300 ;SETUP BYTE
2410 032251 541 10 0 00 000003 HRRI AC+1,ZZ ;PNTR WORD
2411 032252 205 03 0 00 000003 MOVSI ZZ,ZZ ;SETUP BYTE WORD
2412 032253 135 07 0 00 000010 LDB AC,<AC+1>&17 ;LOAD BYTE
2413 032254 302 07 0 00 000003 CAIE AC,ZZ ;TEST DEST AC=AC NUMBER
2414 032255 003 07 0 00 010504 ER3 AC,SN ;LDB FAILED
2415 032256 321 11 0 00 032250 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2416
2417
2418 010505 SN=SN+1
2419 000002 ZZ=ZZ-1
2420 032257 505 10 0 00 220300 HRLI AC+1,220300 ;SETUP BYTE
2421 032260 541 10 0 00 000002 HRRI AC+1,ZZ ;PNTR WORD
2422 032261 205 02 0 00 000002 MOVSI ZZ,ZZ ;SETUP BYTE WORD
2423 032262 135 07 0 00 000010 LDB AC,<AC+1>&17 ;LOAD BYTE
2424 032263 302 07 0 00 000002 CAIE AC,ZZ ;TEST DEST AC=AC NUMBER
2425 032264 003 07 0 00 010505 ER3 AC,SN ;LDB FAILED
2426 032265 321 11 0 00 032257 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2427
2428 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 33-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0073
2429 ;INST-LDB
2430 ;BYTE PNTR INDEXED
2431 ;P FIELD=0
2432 ;S FIELD=3
2433 ;BYTE WORD=PNTR WORD
2434 ;AN ERROR WILL OCCUR IF LOADED
2435 ;BYTE DIFFERS FROM CURRENT
2436 ;AC NUMBER
2437
2438 000010 AC=10
2439 SAVEAC (1,1)^
2440 032266 201 12 0 00 032266 MOVEI AC+2,. ;SAVE TEST PC
2441 032267 202 12 0 00 030051 MOVEM AC+2,TESTPC
2442 032270 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2443 032271 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2444
2445 010600 SN=10600
2446 000000 ZZ=0
2447
2448 ;TEST LDB INDEXED
2449 G10600: REPEAT ^D5,<
2450 SN=SN+1
2451 ZZ=ZZ+1
2452 MOVSI ,000300 ;SETUP NON IND PNTR WORD
2453 HRLI ZZ,000300 ;SETUP INDEXED
2454 HRRI ZZ,ZZ ;PNTR WORD
2455 LDB AC,(ZZ) ;LOAD BYTE INDEXED
2456 CAIE AC,ZZ ;TEST FOR AC NUMBER
2457 ER3 AC,SN ;LDB FAILED
2458 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2459 >
2460
2461 010601 SN=SN+1
2462 000001 ZZ=ZZ+1
2463 032272 205 00 0 00 000300 MOVSI ,000300 ;SETUP NON IND PNTR WORD
2464 032273 505 01 0 00 000300 HRLI ZZ,000300 ;SETUP INDEXED
2465 032274 541 01 0 00 000001 HRRI ZZ,ZZ ;PNTR WORD
2466 032275 135 10 0 01 000000 LDB AC,(ZZ) ;LOAD BYTE INDEXED
2467 032276 302 10 0 00 000001 CAIE AC,ZZ ;TEST FOR AC NUMBER
2468 032277 003 10 0 00 010601 ER3 AC,SN ;LDB FAILED
2469 032300 321 12 0 00 032272 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2470
2471
2472 010602 SN=SN+1
2473 000002 ZZ=ZZ+1
2474 032301 205 00 0 00 000300 MOVSI ,000300 ;SETUP NON IND PNTR WORD
2475 032302 505 02 0 00 000300 HRLI ZZ,000300 ;SETUP INDEXED
2476 032303 541 02 0 00 000002 HRRI ZZ,ZZ ;PNTR WORD
2477 032304 135 10 0 02 000000 LDB AC,(ZZ) ;LOAD BYTE INDEXED
2478 032305 302 10 0 00 000002 CAIE AC,ZZ ;TEST FOR AC NUMBER
2479 032306 003 10 0 00 010602 ER3 AC,SN ;LDB FAILED
2480 032307 321 12 0 00 032301 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2481
2482
2483 010603 SN=SN+1
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 33-3
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0074
2484 000003 ZZ=ZZ+1
2485 032310 205 00 0 00 000300 MOVSI ,000300 ;SETUP NON IND PNTR WORD
2486 032311 505 03 0 00 000300 HRLI ZZ,000300 ;SETUP INDEXED
2487 032312 541 03 0 00 000003 HRRI ZZ,ZZ ;PNTR WORD
2488 032313 135 10 0 03 000000 LDB AC,(ZZ) ;LOAD BYTE INDEXED
2489 032314 302 10 0 00 000003 CAIE AC,ZZ ;TEST FOR AC NUMBER
2490 032315 003 10 0 00 010603 ER3 AC,SN ;LDB FAILED
2491 032316 321 12 0 00 032310 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2492
2493
2494 010604 SN=SN+1
2495 000004 ZZ=ZZ+1
2496 032317 205 00 0 00 000300 MOVSI ,000300 ;SETUP NON IND PNTR WORD
2497 032320 505 04 0 00 000300 HRLI ZZ,000300 ;SETUP INDEXED
2498 032321 541 04 0 00 000004 HRRI ZZ,ZZ ;PNTR WORD
2499 032322 135 10 0 04 000000 LDB AC,(ZZ) ;LOAD BYTE INDEXED
2500 032323 302 10 0 00 000004 CAIE AC,ZZ ;TEST FOR AC NUMBER
2501 032324 003 10 0 00 010604 ER3 AC,SN ;LDB FAILED
2502 032325 321 12 0 00 032317 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2503
2504
2505 010605 SN=SN+1
2506 000005 ZZ=ZZ+1
2507 032326 205 00 0 00 000300 MOVSI ,000300 ;SETUP NON IND PNTR WORD
2508 032327 505 05 0 00 000300 HRLI ZZ,000300 ;SETUP INDEXED
2509 032330 541 05 0 00 000005 HRRI ZZ,ZZ ;PNTR WORD
2510 032331 135 10 0 05 000000 LDB AC,(ZZ) ;LOAD BYTE INDEXED
2511 032332 302 10 0 00 000005 CAIE AC,ZZ ;TEST FOR AC NUMBER
2512 032333 003 10 0 00 010605 ER3 AC,SN ;LDB FAILED
2513 032334 321 12 0 00 032326 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2514
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 34
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0075
2515
2516 ;INST-LDB
2517 ;BYTE PNTR INDIRECTLY ADDRESSED
2518 ;P FIELD=0
2519 ;S FIELD=3
2520 ;BYTE WORD=PNTR WORD
2521 ;AN ERROR WILL OCCUR IF LOADED
2522 ;BYTE DIFFERS FROM CURRENT
2523 ;AC NUMBER
2524
2525 000007 AC=7
2526 SAVEAC (1,1)^
2527 032335 201 11 0 00 032335 MOVEI AC+2,. ;SAVE TEST PC
2528 032336 202 11 0 00 030051 MOVEM AC+2,TESTPC
2529 032337 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2530 032340 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2531
2532 010700 SN=10700
2533 000000 ZZ=0
2534
2535 ;TEST LDB INDIRECTLY ADDRESSED
2536 G10700: REPEAT ^D5,<
2537 SN=SN+1
2538 ZZ=ZZ+1
2539 MOVSI AC+1,440300 ;SETUP DIRECTLY ADDRESSED PNTR WORD
2540 HRRI AC+1,ZZ ;SETUP INDIRECT ADDRESS
2541 HRLI ZZ,000300 ;SETUP INDIRECTLY ADDRESSED
2542 HRRI ZZ,ZZ ;PNTR WORD
2543 SETZ ;SETUP DIRECTLY ADDRESSED BYTE WORD
2544 LDB AC,@<AC+1>&17 ;LOAD BYTE INDIRECTLY ADDRESSED
2545 CAIE AC,ZZ ;TEST FOR AC NUMBER
2546 ER3 AC,SN ;LDB INDIRECTLY ADDRESSED FAILED
2547 JUMPL AC+2,.-10 ;LOOP ON ERROR SWITCH
2548 >
2549
2550 010701 SN=SN+1
2551 000001 ZZ=ZZ+1
2552 032341 205 10 0 00 440300 MOVSI AC+1,440300 ;SETUP DIRECTLY ADDRESSED PNTR WORD
2553 032342 541 10 0 00 000001 HRRI AC+1,ZZ ;SETUP INDIRECT ADDRESS
2554 032343 505 01 0 00 000300 HRLI ZZ,000300 ;SETUP INDIRECTLY ADDRESSED
2555 032344 541 01 0 00 000001 HRRI ZZ,ZZ ;PNTR WORD
2556 032345 400 00 0 00 000000 SETZ ;SETUP DIRECTLY ADDRESSED BYTE WORD
2557 032346 135 07 1 00 000010 LDB AC,@<AC+1>&17 ;LOAD BYTE INDIRECTLY ADDRESSED
2558 032347 302 07 0 00 000001 CAIE AC,ZZ ;TEST FOR AC NUMBER
2559 032350 003 07 0 00 010701 ER3 AC,SN ;LDB INDIRECTLY ADDRESSED FAILED
2560 032351 321 11 0 00 032341 JUMPL AC+2,.-10 ;LOOP ON ERROR SWITCH
2561
2562
2563 010702 SN=SN+1
2564 000002 ZZ=ZZ+1
2565 032352 205 10 0 00 440300 MOVSI AC+1,440300 ;SETUP DIRECTLY ADDRESSED PNTR WORD
2566 032353 541 10 0 00 000002 HRRI AC+1,ZZ ;SETUP INDIRECT ADDRESS
2567 032354 505 02 0 00 000300 HRLI ZZ,000300 ;SETUP INDIRECTLY ADDRESSED
2568 032355 541 02 0 00 000002 HRRI ZZ,ZZ ;PNTR WORD
2569 032356 400 00 0 00 000000 SETZ ;SETUP DIRECTLY ADDRESSED BYTE WORD
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 34-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0076
2570 032357 135 07 1 00 000010 LDB AC,@<AC+1>&17 ;LOAD BYTE INDIRECTLY ADDRESSED
2571 032360 302 07 0 00 000002 CAIE AC,ZZ ;TEST FOR AC NUMBER
2572 032361 003 07 0 00 010702 ER3 AC,SN ;LDB INDIRECTLY ADDRESSED FAILED
2573 032362 321 11 0 00 032352 JUMPL AC+2,.-10 ;LOOP ON ERROR SWITCH
2574
2575
2576 010703 SN=SN+1
2577 000003 ZZ=ZZ+1
2578 032363 205 10 0 00 440300 MOVSI AC+1,440300 ;SETUP DIRECTLY ADDRESSED PNTR WORD
2579 032364 541 10 0 00 000003 HRRI AC+1,ZZ ;SETUP INDIRECT ADDRESS
2580 032365 505 03 0 00 000300 HRLI ZZ,000300 ;SETUP INDIRECTLY ADDRESSED
2581 032366 541 03 0 00 000003 HRRI ZZ,ZZ ;PNTR WORD
2582 032367 400 00 0 00 000000 SETZ ;SETUP DIRECTLY ADDRESSED BYTE WORD
2583 032370 135 07 1 00 000010 LDB AC,@<AC+1>&17 ;LOAD BYTE INDIRECTLY ADDRESSED
2584 032371 302 07 0 00 000003 CAIE AC,ZZ ;TEST FOR AC NUMBER
2585 032372 003 07 0 00 010703 ER3 AC,SN ;LDB INDIRECTLY ADDRESSED FAILED
2586 032373 321 11 0 00 032363 JUMPL AC+2,.-10 ;LOOP ON ERROR SWITCH
2587
2588
2589 010704 SN=SN+1
2590 000004 ZZ=ZZ+1
2591 032374 205 10 0 00 440300 MOVSI AC+1,440300 ;SETUP DIRECTLY ADDRESSED PNTR WORD
2592 032375 541 10 0 00 000004 HRRI AC+1,ZZ ;SETUP INDIRECT ADDRESS
2593 032376 505 04 0 00 000300 HRLI ZZ,000300 ;SETUP INDIRECTLY ADDRESSED
2594 032377 541 04 0 00 000004 HRRI ZZ,ZZ ;PNTR WORD
2595 032400 400 00 0 00 000000 SETZ ;SETUP DIRECTLY ADDRESSED BYTE WORD
2596 032401 135 07 1 00 000010 LDB AC,@<AC+1>&17 ;LOAD BYTE INDIRECTLY ADDRESSED
2597 032402 302 07 0 00 000004 CAIE AC,ZZ ;TEST FOR AC NUMBER
2598 032403 003 07 0 00 010704 ER3 AC,SN ;LDB INDIRECTLY ADDRESSED FAILED
2599 032404 321 11 0 00 032374 JUMPL AC+2,.-10 ;LOOP ON ERROR SWITCH
2600
2601
2602 010705 SN=SN+1
2603 000005 ZZ=ZZ+1
2604 032405 205 10 0 00 440300 MOVSI AC+1,440300 ;SETUP DIRECTLY ADDRESSED PNTR WORD
2605 032406 541 10 0 00 000005 HRRI AC+1,ZZ ;SETUP INDIRECT ADDRESS
2606 032407 505 05 0 00 000300 HRLI ZZ,000300 ;SETUP INDIRECTLY ADDRESSED
2607 032410 541 05 0 00 000005 HRRI ZZ,ZZ ;PNTR WORD
2608 032411 400 00 0 00 000000 SETZ ;SETUP DIRECTLY ADDRESSED BYTE WORD
2609 032412 135 07 1 00 000010 LDB AC,@<AC+1>&17 ;LOAD BYTE INDIRECTLY ADDRESSED
2610 032413 302 07 0 00 000005 CAIE AC,ZZ ;TEST FOR AC NUMBER
2611 032414 003 07 0 00 010705 ER3 AC,SN ;LDB INDIRECTLY ADDRESSED FAILED
2612 032415 321 11 0 00 032405 JUMPL AC+2,.-10 ;LOOP ON ERROR SWITCH
2613
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 35
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0077
2614 ;INST-LDB
2615 ;PNTR INDEXED AND INDIRECTLY ADDRESSED
2616 ;P FIELD=0
2617 ;S FIELD=6
2618 ;PNTR WORD IS IN AC 12,13,14
2619 ;BYTE WORD=PNTR WORD
2620 ;LOADED BYTE SHOULD EQUAL
2621 ;12,13,14
2622
2623 000010 AC=10
2624 SAVEAC (1,1)^
2625 032416 201 12 0 00 032416 MOVEI AC+2,. ;SAVE TEST PC
2626 032417 202 12 0 00 030051 MOVEM AC+2,TESTPC
2627 032420 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2628 032421 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2629
2630 011000 SN=11000
2631 000003 VV=3
2632 000006 WW=6
2633 000011 XX=11
2634 000003 ZZ=3
2635
2636 ;TEST LDB INDEXED, INDIRECTLY ADDRESSED
2637 G11000: REPEAT ^D3,<
2638 SN=SN+1
2639 VV=VV+1
2640 WW=WW+1
2641 XX=XX+1
2642 ZZ=ZZ+1
2643 MOVEI VV,WW ;SETUP INDEX AC
2644 MOVEI WW,XX ;SETUP INDIRECT AC
2645 HRLI XX,000600 ;SETUP INDEXED AND
2646 HRRI XX,XX ;INDIRECT PNTR WORD
2647 LDB AC,@(ZZ) ;LOAD BYTE INDEXED, INDIRECTLY ADDRESSED
2648 CAIE AC,XX ;TEST LOAD BYTE=12,13,14
2649 ER3 AC,SN ;LDB INDEXED, INDIRECTLY ADDRESSEDD FAILED
2650 JUMPL AC+2,^D8 ;LOOP ON ERROR SWITCH
2651 >
2652
2653 011001 SN=SN+1
2654 000004 VV=VV+1
2655 000007 WW=WW+1
2656 000012 XX=XX+1
2657 000004 ZZ=ZZ+1
2658 032422 201 04 0 00 000007 MOVEI VV,WW ;SETUP INDEX AC
2659 032423 201 07 0 00 000012 MOVEI WW,XX ;SETUP INDIRECT AC
2660 032424 505 12 0 00 000600 HRLI XX,000600 ;SETUP INDEXED AND
2661 032425 541 12 0 00 000012 HRRI XX,XX ;INDIRECT PNTR WORD
2662 032426 135 10 1 04 000000 LDB AC,@(ZZ) ;LOAD BYTE INDEXED, INDIRECTLY ADDRESSED
2663 032427 302 10 0 00 000012 CAIE AC,XX ;TEST LOAD BYTE=12,13,14
2664 032430 003 10 0 00 011001 ER3 AC,SN ;LDB INDEXED, INDIRECTLY ADDRESSEDD FAILED
2665 032431 321 12 0 00 000010 JUMPL AC+2,^D8 ;LOOP ON ERROR SWITCH
2666
2667
2668 011002 SN=SN+1
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 35-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0078
2669 000005 VV=VV+1
2670 000010 WW=WW+1
2671 000013 XX=XX+1
2672 000005 ZZ=ZZ+1
2673 032432 201 05 0 00 000010 MOVEI VV,WW ;SETUP INDEX AC
2674 032433 201 10 0 00 000013 MOVEI WW,XX ;SETUP INDIRECT AC
2675 032434 505 13 0 00 000600 HRLI XX,000600 ;SETUP INDEXED AND
2676 032435 541 13 0 00 000013 HRRI XX,XX ;INDIRECT PNTR WORD
2677 032436 135 10 1 05 000000 LDB AC,@(ZZ) ;LOAD BYTE INDEXED, INDIRECTLY ADDRESSED
2678 032437 302 10 0 00 000013 CAIE AC,XX ;TEST LOAD BYTE=12,13,14
2679 032440 003 10 0 00 011002 ER3 AC,SN ;LDB INDEXED, INDIRECTLY ADDRESSEDD FAILED
2680 032441 321 12 0 00 000010 JUMPL AC+2,^D8 ;LOOP ON ERROR SWITCH
2681
2682
2683 011003 SN=SN+1
2684 000006 VV=VV+1
2685 000011 WW=WW+1
2686 000014 XX=XX+1
2687 000006 ZZ=ZZ+1
2688 032442 201 06 0 00 000011 MOVEI VV,WW ;SETUP INDEX AC
2689 032443 201 11 0 00 000014 MOVEI WW,XX ;SETUP INDIRECT AC
2690 032444 505 14 0 00 000600 HRLI XX,000600 ;SETUP INDEXED AND
2691 032445 541 14 0 00 000014 HRRI XX,XX ;INDIRECT PNTR WORD
2692 032446 135 10 1 06 000000 LDB AC,@(ZZ) ;LOAD BYTE INDEXED, INDIRECTLY ADDRESSED
2693 032447 302 10 0 00 000014 CAIE AC,XX ;TEST LOAD BYTE=12,13,14
2694 032450 003 10 0 00 011003 ER3 AC,SN ;LDB INDEXED, INDIRECTLY ADDRESSEDD FAILED
2695 032451 321 12 0 00 000010 JUMPL AC+2,^D8 ;LOOP ON ERROR SWITCH
2696
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 36
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0079
2697
2698 ;INST-LDB
2699 ;INDEX BYTE ADDRESS
2700 ;P FIELD=0
2701 ;S FIELD=6
2702 ;INDEX AC=AC7
2703 ;BYTE WORD ADDRESS=AC 7,10,11,12,13
2704 ;AN ERROR WILL OCCUR IF LOADED BYTE
2705 ;DIFFERS CURRENT AC
2706
2707 000004 AC=4
2708 SAVEAC (1,1)^
2709 032452 201 06 0 00 032452 MOVEI AC+2,. ;SAVE TEST PC
2710 032453 202 06 0 00 030051 MOVEM AC+2,TESTPC
2711 032454 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2712 032455 202 06 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2713
2714 011100 SN=11100
2715 000006 ZZ=6
2716
2717 ;TEST LDB BYTE ADDR INDEXED
2718 G11100: REPEAT ^D5,<
2719 SN=SN+1
2720 ZZ=ZZ+1
2721 MOVSI AC+1,000607 ;SETUP PNTR WORD
2722 MOVEI AC+3,ZZ ;SETUP INDEX AC
2723 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2724 LDB AC,<AC+1>&17 ;LOAD BYTE
2725 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2726 ER3 AC,SN ;LDB FAILED
2727 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2728 >
2729
2730 011101 SN=SN+1
2731 000007 ZZ=ZZ+1
2732 032456 205 05 0 00 000607 MOVSI AC+1,000607 ;SETUP PNTR WORD
2733 032457 201 07 0 00 000007 MOVEI AC+3,ZZ ;SETUP INDEX AC
2734 032460 201 07 0 00 000007 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2735 032461 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2736 032462 302 04 0 00 000007 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2737 032463 003 04 0 00 011101 ER3 AC,SN ;LDB FAILED
2738 032464 321 06 0 00 032456 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2739
2740
2741 011102 SN=SN+1
2742 000010 ZZ=ZZ+1
2743 032465 205 05 0 00 000607 MOVSI AC+1,000607 ;SETUP PNTR WORD
2744 032466 201 07 0 00 000010 MOVEI AC+3,ZZ ;SETUP INDEX AC
2745 032467 201 10 0 00 000010 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2746 032470 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2747 032471 302 04 0 00 000010 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2748 032472 003 04 0 00 011102 ER3 AC,SN ;LDB FAILED
2749 032473 321 06 0 00 032465 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2750
2751
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 36-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0080
2752 011103 SN=SN+1
2753 000011 ZZ=ZZ+1
2754 032474 205 05 0 00 000607 MOVSI AC+1,000607 ;SETUP PNTR WORD
2755 032475 201 07 0 00 000011 MOVEI AC+3,ZZ ;SETUP INDEX AC
2756 032476 201 11 0 00 000011 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2757 032477 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2758 032500 302 04 0 00 000011 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2759 032501 003 04 0 00 011103 ER3 AC,SN ;LDB FAILED
2760 032502 321 06 0 00 032474 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2761
2762
2763 011104 SN=SN+1
2764 000012 ZZ=ZZ+1
2765 032503 205 05 0 00 000607 MOVSI AC+1,000607 ;SETUP PNTR WORD
2766 032504 201 07 0 00 000012 MOVEI AC+3,ZZ ;SETUP INDEX AC
2767 032505 201 12 0 00 000012 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2768 032506 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2769 032507 302 04 0 00 000012 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2770 032510 003 04 0 00 011104 ER3 AC,SN ;LDB FAILED
2771 032511 321 06 0 00 032503 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2772
2773
2774 011105 SN=SN+1
2775 000013 ZZ=ZZ+1
2776 032512 205 05 0 00 000607 MOVSI AC+1,000607 ;SETUP PNTR WORD
2777 032513 201 07 0 00 000013 MOVEI AC+3,ZZ ;SETUP INDEX AC
2778 032514 201 13 0 00 000013 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2779 032515 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2780 032516 302 04 0 00 000013 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2781 032517 003 04 0 00 011105 ER3 AC,SN ;LDB FAILED
2782 032520 321 06 0 00 032512 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2783
2784 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 36-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0081
2785 ;INST-LDB
2786 ;BYTE INDIRECTLY ADDRESSED
2787 ;P FIELD=0
2788 ;S FIELD=6
2789 ;BYTE WORD ADDRESS=AC7,10,11,12,13
2790 ;AN ERROR WILL OCCUR IF LOADED
2791 ;BYTE DIFFERS FROM CURRENT AC
2792
2793 000004 AC=4
2794 SAVEAC (1,1)^
2795 032521 201 06 0 00 032521 MOVEI AC+2,. ;SAVE TEST PC
2796 032522 202 06 0 00 030051 MOVEM AC+2,TESTPC
2797 032523 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2798 032524 202 06 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2799
2800 011200 SN=11200
2801 000006 ZZ=6
2802
2803 ;TEST LDB, BYTE INDIRECTLY ADDRESSED
2804 G11200: REPEAT ^D5,<
2805 SN=SN+1
2806 ZZ=ZZ+1
2807 MOVSI AC+1,000620 ;SETUP PNTR WORD
2808 MOVEI ,ZZ ;SETUP DEFER ADDRESS
2809 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2810 LDB AC,<AC+1>&17 ;LOAD BYTE
2811 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2812 ER3 AC,SN ;LDB FAILED
2813 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2814 >
2815
2816 011201 SN=SN+1
2817 000007 ZZ=ZZ+1
2818 032525 205 05 0 00 000620 MOVSI AC+1,000620 ;SETUP PNTR WORD
2819 032526 201 00 0 00 000007 MOVEI ,ZZ ;SETUP DEFER ADDRESS
2820 032527 201 07 0 00 000007 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2821 032530 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2822 032531 302 04 0 00 000007 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2823 032532 003 04 0 00 011201 ER3 AC,SN ;LDB FAILED
2824 032533 321 06 0 00 032525 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2825
2826
2827 011202 SN=SN+1
2828 000010 ZZ=ZZ+1
2829 032534 205 05 0 00 000620 MOVSI AC+1,000620 ;SETUP PNTR WORD
2830 032535 201 00 0 00 000010 MOVEI ,ZZ ;SETUP DEFER ADDRESS
2831 032536 201 10 0 00 000010 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2832 032537 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2833 032540 302 04 0 00 000010 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2834 032541 003 04 0 00 011202 ER3 AC,SN ;LDB FAILED
2835 032542 321 06 0 00 032534 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2836
2837
2838 011203 SN=SN+1
2839 000011 ZZ=ZZ+1
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 36-3
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0082
2840 032543 205 05 0 00 000620 MOVSI AC+1,000620 ;SETUP PNTR WORD
2841 032544 201 00 0 00 000011 MOVEI ,ZZ ;SETUP DEFER ADDRESS
2842 032545 201 11 0 00 000011 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2843 032546 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2844 032547 302 04 0 00 000011 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2845 032550 003 04 0 00 011203 ER3 AC,SN ;LDB FAILED
2846 032551 321 06 0 00 032543 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2847
2848
2849 011204 SN=SN+1
2850 000012 ZZ=ZZ+1
2851 032552 205 05 0 00 000620 MOVSI AC+1,000620 ;SETUP PNTR WORD
2852 032553 201 00 0 00 000012 MOVEI ,ZZ ;SETUP DEFER ADDRESS
2853 032554 201 12 0 00 000012 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2854 032555 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2855 032556 302 04 0 00 000012 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2856 032557 003 04 0 00 011204 ER3 AC,SN ;LDB FAILED
2857 032560 321 06 0 00 032552 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2858
2859
2860 011205 SN=SN+1
2861 000013 ZZ=ZZ+1
2862 032561 205 05 0 00 000620 MOVSI AC+1,000620 ;SETUP PNTR WORD
2863 032562 201 00 0 00 000013 MOVEI ,ZZ ;SETUP DEFER ADDRESS
2864 032563 201 13 0 00 000013 MOVEI ZZ,ZZ ;SETUP BYTE WORD
2865 032564 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2866 032565 302 04 0 00 000013 CAIE AC,ZZ ;TEST BYTE=7,10,11,12,13
2867 032566 003 04 0 00 011205 ER3 AC,SN ;LDB FAILED
2868 032567 321 06 0 00 032561 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2869
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 37
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0083
2870
2871 ;INST-LDB
2872 ;BYTE ADDRESS INDEXED AND INDIRECT
2873 ;P FIELD=0
2874 ;S FIELD=6
2875 ;BYTE ADDRESS=AC13,14,15
2876 ;BYTE WORD=13,14,15
2877 ;AN ERROR WILL OCCUR IF LOADED
2878 ;BYTE DIFFERS FROM CURRENT AC
2879
2880 000004 AC=4
2881 SAVEAC (1,1)^
2882 032570 201 06 0 00 032570 MOVEI AC+2,. ;SAVE TEST PC
2883 032571 202 06 0 00 030051 MOVEM AC+2,TESTPC
2884 032572 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2885 032573 202 06 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2886
2887 011300 SN=11300
2888 000012 XX=12
2889 000007 ZZ=7
2890
2891 ;TEST LDB, BYTE ADDR INDEXED AND INDIRECT
2892 G11300: REPEAT ^D3,<
2893 SN=SN+1
2894 XX=XX+1
2895 ZZ=ZZ+1
2896 MOVSI AC+1,000627 ;SETUP PNTR WORD
2897 MOVEI AC+3,ZZ ;SETUP INDEX AC
2898 MOVEI ZZ,XX ;SETUP INDIRECT ADDR
2899 MOVEI XX,XX ;SETUP BYTE WORD
2900 LDB AC,<AC+1>&17 ;LOAD BYTE
2901 CAIE AC,XX ;TEST BYTE=13,14,15
2902 ER3 AC,SN ;LDB FAILED
2903 JUMPL AC+2,.-7 ;LOOP ON ERROR SWITCH
2904 >
2905
2906 011301 SN=SN+1
2907 000013 XX=XX+1
2908 000010 ZZ=ZZ+1
2909 032574 205 05 0 00 000627 MOVSI AC+1,000627 ;SETUP PNTR WORD
2910 032575 201 07 0 00 000010 MOVEI AC+3,ZZ ;SETUP INDEX AC
2911 032576 201 10 0 00 000013 MOVEI ZZ,XX ;SETUP INDIRECT ADDR
2912 032577 201 13 0 00 000013 MOVEI XX,XX ;SETUP BYTE WORD
2913 032600 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2914 032601 302 04 0 00 000013 CAIE AC,XX ;TEST BYTE=13,14,15
2915 032602 003 04 0 00 011301 ER3 AC,SN ;LDB FAILED
2916 032603 321 06 0 00 032574 JUMPL AC+2,.-7 ;LOOP ON ERROR SWITCH
2917
2918
2919 011302 SN=SN+1
2920 000014 XX=XX+1
2921 000011 ZZ=ZZ+1
2922 032604 205 05 0 00 000627 MOVSI AC+1,000627 ;SETUP PNTR WORD
2923 032605 201 07 0 00 000011 MOVEI AC+3,ZZ ;SETUP INDEX AC
2924 032606 201 11 0 00 000014 MOVEI ZZ,XX ;SETUP INDIRECT ADDR
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 37-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0084
2925 032607 201 14 0 00 000014 MOVEI XX,XX ;SETUP BYTE WORD
2926 032610 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2927 032611 302 04 0 00 000014 CAIE AC,XX ;TEST BYTE=13,14,15
2928 032612 003 04 0 00 011302 ER3 AC,SN ;LDB FAILED
2929 032613 321 06 0 00 032604 JUMPL AC+2,.-7 ;LOOP ON ERROR SWITCH
2930
2931
2932 011303 SN=SN+1
2933 000015 XX=XX+1
2934 000012 ZZ=ZZ+1
2935 032614 205 05 0 00 000627 MOVSI AC+1,000627 ;SETUP PNTR WORD
2936 032615 201 07 0 00 000012 MOVEI AC+3,ZZ ;SETUP INDEX AC
2937 032616 201 12 0 00 000015 MOVEI ZZ,XX ;SETUP INDIRECT ADDR
2938 032617 201 15 0 00 000015 MOVEI XX,XX ;SETUP BYTE WORD
2939 032620 135 04 0 00 000005 LDB AC,<AC+1>&17 ;LOAD BYTE
2940 032621 302 04 0 00 000015 CAIE AC,XX ;TEST BYTE=13,14,15
2941 032622 003 04 0 00 011303 ER3 AC,SN ;LDB FAILED
2942 032623 321 06 0 00 032614 JUMPL AC+2,.-7 ;LOOP ON ERROR SWITCH
2943
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 38
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0085
2944
2945 ;INST-ILDB
2946 ;DECREASING P FIELD
2947 ;P FIELD=44,36,30,22,14
2948 ;S FIELD=6
2949 ;BYTE ADDRESS=AC0
2950 ;AN ERROR WILL OCCUR IF AC DIFFERS
2951 ;FROM 77
2952
2953 000005 AC=5
2954 SAVEAC (1,1)^
2955 032624 201 07 0 00 032624 MOVEI AC+2,. ;SAVE TEST PC
2956 032625 202 07 0 00 030051 MOVEM AC+2,TESTPC
2957 032626 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
2958 032627 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
2959
2960 011400 SN=11400
2961 520600 XX=520600
2962 000000 ZZ=0
2963
2964 ;TEST ILDB
2965 G11400: REPEAT ^D5,<
2966 SN=SN+1
2967 XX=XX-060000
2968 ZZ=ZZ-6
2969 MOVSI AC+1,XX ;SETUP PNTR WORD
2970 MOVEI ,77 ;SETUP BYTE WORD
2971 ROT ,ZZ ;ROTATE RIGHT
2972 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
2973 CAIE AC,77 ;TEST AC=77
2974 ER3 AC,SN ;ILDB FAILED
2975 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2976 >
2977
2978 011401 SN=SN+1
2979 440600 XX=XX-060000
2980 777777 777772 ZZ=ZZ-6
2981 032630 205 06 0 00 440600 MOVSI AC+1,XX ;SETUP PNTR WORD
2982 032631 201 00 0 00 000077 MOVEI ,77 ;SETUP BYTE WORD
2983 032632 241 00 0 00 777772 ROT ,ZZ ;ROTATE RIGHT
2984 032633 134 05 0 00 000006 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
2985 032634 302 05 0 00 000077 CAIE AC,77 ;TEST AC=77
2986 032635 003 05 0 00 011401 ER3 AC,SN ;ILDB FAILED
2987 032636 321 07 0 00 032630 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
2988
2989
2990 011402 SN=SN+1
2991 360600 XX=XX-060000
2992 777777 777764 ZZ=ZZ-6
2993 032637 205 06 0 00 360600 MOVSI AC+1,XX ;SETUP PNTR WORD
2994 032640 201 00 0 00 000077 MOVEI ,77 ;SETUP BYTE WORD
2995 032641 241 00 0 00 777764 ROT ,ZZ ;ROTATE RIGHT
2996 032642 134 05 0 00 000006 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
2997 032643 302 05 0 00 000077 CAIE AC,77 ;TEST AC=77
2998 032644 003 05 0 00 011402 ER3 AC,SN ;ILDB FAILED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 38-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0086
2999 032645 321 07 0 00 032637 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3000
3001
3002 011403 SN=SN+1
3003 300600 XX=XX-060000
3004 777777 777756 ZZ=ZZ-6
3005 032646 205 06 0 00 300600 MOVSI AC+1,XX ;SETUP PNTR WORD
3006 032647 201 00 0 00 000077 MOVEI ,77 ;SETUP BYTE WORD
3007 032650 241 00 0 00 777756 ROT ,ZZ ;ROTATE RIGHT
3008 032651 134 05 0 00 000006 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3009 032652 302 05 0 00 000077 CAIE AC,77 ;TEST AC=77
3010 032653 003 05 0 00 011403 ER3 AC,SN ;ILDB FAILED
3011 032654 321 07 0 00 032646 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3012
3013
3014 011404 SN=SN+1
3015 220600 XX=XX-060000
3016 777777 777750 ZZ=ZZ-6
3017 032655 205 06 0 00 220600 MOVSI AC+1,XX ;SETUP PNTR WORD
3018 032656 201 00 0 00 000077 MOVEI ,77 ;SETUP BYTE WORD
3019 032657 241 00 0 00 777750 ROT ,ZZ ;ROTATE RIGHT
3020 032660 134 05 0 00 000006 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3021 032661 302 05 0 00 000077 CAIE AC,77 ;TEST AC=77
3022 032662 003 05 0 00 011404 ER3 AC,SN ;ILDB FAILED
3023 032663 321 07 0 00 032655 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3024
3025
3026 011405 SN=SN+1
3027 140600 XX=XX-060000
3028 777777 777742 ZZ=ZZ-6
3029 032664 205 06 0 00 140600 MOVSI AC+1,XX ;SETUP PNTR WORD
3030 032665 201 00 0 00 000077 MOVEI ,77 ;SETUP BYTE WORD
3031 032666 241 00 0 00 777742 ROT ,ZZ ;ROTATE RIGHT
3032 032667 134 05 0 00 000006 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3033 032670 302 05 0 00 000077 CAIE AC,77 ;TEST AC=77
3034 032671 003 05 0 00 011405 ER3 AC,SN ;ILDB FAILED
3035 032672 321 07 0 00 032664 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3036
3037 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 38-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0087
3038 ;INST-ILDB
3039 ;INCREASING S FIELD
3040 ;CALCULATE NEW P FIELD, INCREMENT
3041 ;BYTE WORD ADDRESS
3042 ;P FIELD=0
3043 ;S FIELD=6,14,22,30,36
3044 ;AN ERROR WILL OCCUR IF AC
3045 ;DIFFERS FROM 77
3046
3047 000014 AC=14
3048 SAVEAC (1,1)^
3049 032673 201 16 0 00 032673 MOVEI AC+2,. ;SAVE TEST PC
3050 032674 202 16 0 00 030051 MOVEM AC+2,TESTPC
3051 032675 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3052 032676 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3053
3054 011500 SN=11500
3055 000000 XX=0
3056 000000 ZZ=0
3057
3058 ;TEST ILDB
3059 G11500: REPEAT ^D5,<
3060 SN=SN+1
3061 XX=XX+600
3062 ZZ=ZZ-6
3063 MOVSI AC+1,XX ;SETUP PNTR WORD
3064 MOVEI 1,77 ;SETUP BYTE WORD
3065 ROT 1,ZZ ;ROTATE RIGHT BYTE WORD
3066 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3067 CAIE AC,77 ;TEST AC=77
3068 ER3 AC,SN ;ILDB FAILED
3069 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3070 >
3071
3072 011501 SN=SN+1
3073 000600 XX=XX+600
3074 777777 777772 ZZ=ZZ-6
3075 032677 205 15 0 00 000600 MOVSI AC+1,XX ;SETUP PNTR WORD
3076 032700 201 01 0 00 000077 MOVEI 1,77 ;SETUP BYTE WORD
3077 032701 241 01 0 00 777772 ROT 1,ZZ ;ROTATE RIGHT BYTE WORD
3078 032702 134 14 0 00 000015 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3079 032703 302 14 0 00 000077 CAIE AC,77 ;TEST AC=77
3080 032704 003 14 0 00 011501 ER3 AC,SN ;ILDB FAILED
3081 032705 321 16 0 00 032677 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3082
3083
3084 011502 SN=SN+1
3085 001400 XX=XX+600
3086 777777 777764 ZZ=ZZ-6
3087 032706 205 15 0 00 001400 MOVSI AC+1,XX ;SETUP PNTR WORD
3088 032707 201 01 0 00 000077 MOVEI 1,77 ;SETUP BYTE WORD
3089 032710 241 01 0 00 777764 ROT 1,ZZ ;ROTATE RIGHT BYTE WORD
3090 032711 134 14 0 00 000015 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3091 032712 302 14 0 00 000077 CAIE AC,77 ;TEST AC=77
3092 032713 003 14 0 00 011502 ER3 AC,SN ;ILDB FAILED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 38-3
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0088
3093 032714 321 16 0 00 032706 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3094
3095
3096 011503 SN=SN+1
3097 002200 XX=XX+600
3098 777777 777756 ZZ=ZZ-6
3099 032715 205 15 0 00 002200 MOVSI AC+1,XX ;SETUP PNTR WORD
3100 032716 201 01 0 00 000077 MOVEI 1,77 ;SETUP BYTE WORD
3101 032717 241 01 0 00 777756 ROT 1,ZZ ;ROTATE RIGHT BYTE WORD
3102 032720 134 14 0 00 000015 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3103 032721 302 14 0 00 000077 CAIE AC,77 ;TEST AC=77
3104 032722 003 14 0 00 011503 ER3 AC,SN ;ILDB FAILED
3105 032723 321 16 0 00 032715 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3106
3107
3108 011504 SN=SN+1
3109 003000 XX=XX+600
3110 777777 777750 ZZ=ZZ-6
3111 032724 205 15 0 00 003000 MOVSI AC+1,XX ;SETUP PNTR WORD
3112 032725 201 01 0 00 000077 MOVEI 1,77 ;SETUP BYTE WORD
3113 032726 241 01 0 00 777750 ROT 1,ZZ ;ROTATE RIGHT BYTE WORD
3114 032727 134 14 0 00 000015 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3115 032730 302 14 0 00 000077 CAIE AC,77 ;TEST AC=77
3116 032731 003 14 0 00 011504 ER3 AC,SN ;ILDB FAILED
3117 032732 321 16 0 00 032724 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3118
3119
3120 011505 SN=SN+1
3121 003600 XX=XX+600
3122 777777 777742 ZZ=ZZ-6
3123 032733 205 15 0 00 003600 MOVSI AC+1,XX ;SETUP PNTR WORD
3124 032734 201 01 0 00 000077 MOVEI 1,77 ;SETUP BYTE WORD
3125 032735 241 01 0 00 777742 ROT 1,ZZ ;ROTATE RIGHT BYTE WORD
3126 032736 134 14 0 00 000015 ILDB AC,<AC+1>&17 ;INC AND LOAD BYTE
3127 032737 302 14 0 00 000077 CAIE AC,77 ;TEST AC=77
3128 032740 003 14 0 00 011505 ER3 AC,SN ;ILDB FAILED
3129 032741 321 16 0 00 032733 JUMPL AC+2,.-6 ;LOOP ON ERROR SWITCH
3130
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 39
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0089
3131
3132 ;INST-ILDB
3133 ;TESTING SPECIAL POINTER
3134 ;WHICH SETS AC TO ZERO
3135 ;PFIELD=20 ORIG,64 AFTER
3136 ;SFIELD=60 ORIG,60 AFTER
3137 ;AN ERROR WILL OCCUR IF AC IS NOT ZEROED
3138
3139 206000 XX=206000
3140
3141 032742 205 15 0 00 206000 G11600: MOVSI AC+1,XX ;SETUP PNTR WORD
3142 032743 477 00 0 00 000001 SETOB 0,1 ;SETUP BYTE WORD
3143 032744 476 00 0 00 000014 SETOM AC ;SETUP AC FOR TEST
3144 032745 134 14 0 00 000015 ILDB AC,<AC+1>&17 ;THIS SHOULD ZERO AC
3145 032746 332 00 0 00 000014 SKIPE AC ;TEST AC=0
3146 032747 003 14 0 00 011601 ER3 AC,11601 ;ILDB FAILED
3147 032750 321 16 0 00 032742 JUMPL AC+2,G11600 ;LOOP ON ERROR SWITCH
3148 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 39-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0090
3149 ;INST-DPB
3150 ;INCREASING P FIELD
3151 ;P FIELD=6,14,22,30,36
3152 ;S FIELD=6
3153 ;BYTE WORD=55
3154 ;AN ERROR WILL OCCUR IF DPB
3155 ;FAILS TO DEPOSIT CORRECTLY
3156
3157 000013 AC=13
3158 SAVEAC (1,1)^
3159 032751 201 15 0 00 032751 MOVEI AC+2,. ;SAVE TEST PC
3160 032752 202 15 0 00 030051 MOVEM AC+2,TESTPC
3161 032753 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3162 032754 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3163
3164 011700 SN=11700
3165 000000 XX=0
3166 000600 ZZ=000600
3167
3168 ;TEST DPB
3169 G11700: REPEAT ^D5,<
3170 SN=SN+1
3171 XX=XX+6
3172 ZZ=ZZ+60000
3173 MOVEI AC-2,55 ;SETUP AC-2
3174 ROT AC-2,XX ;FOR COMPARISON
3175 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3176 SETZ ;SETUP DEST WORD
3177 MOVEI AC,55 ;SETUP BYTE WORD
3178 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3179 CAME ,<AC-2>&17 ;TEST DEST WORD
3180 ER12 ,SN ;DPB FAILED
3181 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3182 >
3183
3184 011701 SN=SN+1
3185 000006 XX=XX+6
3186 060600 ZZ=ZZ+60000
3187 032755 201 11 0 00 000055 MOVEI AC-2,55 ;SETUP AC-2
3188 032756 241 11 0 00 000006 ROT AC-2,XX ;FOR COMPARISON
3189 032757 205 14 0 00 060600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3190 032760 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3191 032761 201 13 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3192 032762 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3193 032763 312 00 0 00 000011 CAME ,<AC-2>&17 ;TEST DEST WORD
3194 032764 012 00 0 00 011701 ER12 ,SN ;DPB FAILED
3195 032765 321 15 0 00 032755 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3196
3197
3198 011702 SN=SN+1
3199 000014 XX=XX+6
3200 140600 ZZ=ZZ+60000
3201 032766 201 11 0 00 000055 MOVEI AC-2,55 ;SETUP AC-2
3202 032767 241 11 0 00 000014 ROT AC-2,XX ;FOR COMPARISON
3203 032770 205 14 0 00 140600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 39-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0091
3204 032771 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3205 032772 201 13 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3206 032773 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3207 032774 312 00 0 00 000011 CAME ,<AC-2>&17 ;TEST DEST WORD
3208 032775 012 00 0 00 011702 ER12 ,SN ;DPB FAILED
3209 032776 321 15 0 00 032766 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3210
3211
3212 011703 SN=SN+1
3213 000022 XX=XX+6
3214 220600 ZZ=ZZ+60000
3215 032777 201 11 0 00 000055 MOVEI AC-2,55 ;SETUP AC-2
3216 033000 241 11 0 00 000022 ROT AC-2,XX ;FOR COMPARISON
3217 033001 205 14 0 00 220600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3218 033002 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3219 033003 201 13 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3220 033004 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3221 033005 312 00 0 00 000011 CAME ,<AC-2>&17 ;TEST DEST WORD
3222 033006 012 00 0 00 011703 ER12 ,SN ;DPB FAILED
3223 033007 321 15 0 00 032777 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3224
3225
3226 011704 SN=SN+1
3227 000030 XX=XX+6
3228 300600 ZZ=ZZ+60000
3229 033010 201 11 0 00 000055 MOVEI AC-2,55 ;SETUP AC-2
3230 033011 241 11 0 00 000030 ROT AC-2,XX ;FOR COMPARISON
3231 033012 205 14 0 00 300600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3232 033013 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3233 033014 201 13 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3234 033015 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3235 033016 312 00 0 00 000011 CAME ,<AC-2>&17 ;TEST DEST WORD
3236 033017 012 00 0 00 011704 ER12 ,SN ;DPB FAILED
3237 033020 321 15 0 00 033010 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3238
3239
3240 011705 SN=SN+1
3241 000036 XX=XX+6
3242 360600 ZZ=ZZ+60000
3243 033021 201 11 0 00 000055 MOVEI AC-2,55 ;SETUP AC-2
3244 033022 241 11 0 00 000036 ROT AC-2,XX ;FOR COMPARISON
3245 033023 205 14 0 00 360600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3246 033024 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3247 033025 201 13 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3248 033026 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3249 033027 312 00 0 00 000011 CAME ,<AC-2>&17 ;TEST DEST WORD
3250 033030 012 00 0 00 011705 ER12 ,SN ;DPB FAILED
3251 033031 321 15 0 00 033021 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3252
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 40
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0092
3253
3254 ;INST-DPB
3255 ;INCREASING P FIELD
3256 ;P FIELD = 0,6,14,22,30
3257 ;S FIELD = 6
3258 ;BYTE WORD=55 (SHIFTING LEFT 6 PLACES)
3259 ;AN ERROR WILL OCCUR IF DPB FAILS
3260 ;TO DEPOSIT CORRECTLY
3261
3262 000012 AC=12
3263 SAVEAC (1,1)^
3264 033032 201 14 0 00 033032 MOVEI AC+2,. ;SAVE TEST PC
3265 033033 202 14 0 00 030051 MOVEM AC+2,TESTPC
3266 033034 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3267 033035 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3268
3269 012000 SN=12000
3270 000000 XX=0
3271 777777 720000 ZZ=-60000
3272
3273 ;TEST DPB
3274 G12000: REPEAT ^D5,<
3275 SN=SN+1
3276 XX=XX+6
3277 ZZ=ZZ+060000
3278 IFE ZZ,<ZZ=000600>
3279 MOVSI AC-2,550000 ;SETUP AC=2
3280 ROT AC-2,XX ;FRO COMPARISON
3281 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3282 MOVEI AC,55 ;SETUP BYTE WORD
3283 SETZ ;SETUP DEST WORD
3284 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3285 CAME ,<AC-2>&17 ;TEST DEST WORD
3286 ER12 ,SN ;DPB FAILED
3287 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3288 >
3289
3290 012001 SN=SN+1
3291 000006 XX=XX+6
3292 000000 ZZ=ZZ+060000
3293 000600 IFE ZZ,<ZZ=000600>
3294 033036 205 10 0 00 550000 MOVSI AC-2,550000 ;SETUP AC=2
3295 033037 241 10 0 00 000006 ROT AC-2,XX ;FRO COMPARISON
3296 033040 205 13 0 00 000600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3297 033041 201 12 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3298 033042 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3299 033043 137 12 0 00 000013 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3300 033044 312 00 0 00 000010 CAME ,<AC-2>&17 ;TEST DEST WORD
3301 033045 012 00 0 00 012001 ER12 ,SN ;DPB FAILED
3302 033046 321 14 0 00 033036 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3303
3304
3305 012002 SN=SN+1
3306 000014 XX=XX+6
3307 060600 ZZ=ZZ+060000
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 40-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0093
3308 IFE ZZ,<ZZ=000600>
3309 033047 205 10 0 00 550000 MOVSI AC-2,550000 ;SETUP AC=2
3310 033050 241 10 0 00 000014 ROT AC-2,XX ;FRO COMPARISON
3311 033051 205 13 0 00 060600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3312 033052 201 12 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3313 033053 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3314 033054 137 12 0 00 000013 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3315 033055 312 00 0 00 000010 CAME ,<AC-2>&17 ;TEST DEST WORD
3316 033056 012 00 0 00 012002 ER12 ,SN ;DPB FAILED
3317 033057 321 14 0 00 033047 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3318
3319
3320 012003 SN=SN+1
3321 000022 XX=XX+6
3322 140600 ZZ=ZZ+060000
3323 IFE ZZ,<ZZ=000600>
3324 033060 205 10 0 00 550000 MOVSI AC-2,550000 ;SETUP AC=2
3325 033061 241 10 0 00 000022 ROT AC-2,XX ;FRO COMPARISON
3326 033062 205 13 0 00 140600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3327 033063 201 12 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3328 033064 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3329 033065 137 12 0 00 000013 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3330 033066 312 00 0 00 000010 CAME ,<AC-2>&17 ;TEST DEST WORD
3331 033067 012 00 0 00 012003 ER12 ,SN ;DPB FAILED
3332 033070 321 14 0 00 033060 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3333
3334
3335 012004 SN=SN+1
3336 000030 XX=XX+6
3337 220600 ZZ=ZZ+060000
3338 IFE ZZ,<ZZ=000600>
3339 033071 205 10 0 00 550000 MOVSI AC-2,550000 ;SETUP AC=2
3340 033072 241 10 0 00 000030 ROT AC-2,XX ;FRO COMPARISON
3341 033073 205 13 0 00 220600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3342 033074 201 12 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3343 033075 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3344 033076 137 12 0 00 000013 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3345 033077 312 00 0 00 000010 CAME ,<AC-2>&17 ;TEST DEST WORD
3346 033100 012 00 0 00 012004 ER12 ,SN ;DPB FAILED
3347 033101 321 14 0 00 033071 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3348
3349
3350 012005 SN=SN+1
3351 000036 XX=XX+6
3352 300600 ZZ=ZZ+060000
3353 IFE ZZ,<ZZ=000600>
3354 033102 205 10 0 00 550000 MOVSI AC-2,550000 ;SETUP AC=2
3355 033103 241 10 0 00 000036 ROT AC-2,XX ;FRO COMPARISON
3356 033104 205 13 0 00 300600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3357 033105 201 12 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3358 033106 400 00 0 00 000000 SETZ ;SETUP DEST WORD
3359 033107 137 12 0 00 000013 DPB AC,<AC+1>&17 ;DEPOSIT BYTE (AC0)
3360 033110 312 00 0 00 000010 CAME ,<AC-2>&17 ;TEST DEST WORD
3361 033111 012 00 0 00 012005 ER12 ,SN ;DPB FAILED
3362 033112 321 14 0 00 033102 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 40-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0094
3363
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 41
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0095
3364 ;INST-IDPB
3365 ;INCREASING S FIELD
3366 ;CALCULATE NEW P FIELD, INCREMENT
3367 ;BYTE WORD ADDRESS
3368 ;P FIELD=0
3369 ;S FIELD=6,14,22,30,36
3370 ;BYTE WORD=77
3371 ;AN ERROR WILL OCCUR IF IDPB FAILS
3372 ;TO DEPOSIT CORRECTLY
3373
3374 000011 AC=11
3375 SAVEAC (1,1)^
3376 033113 201 13 0 00 033113 MOVEI AC+2,. ;SAVE TEST PC
3377 033114 202 13 0 00 030051 MOVEM AC+2,TESTPC
3378 033115 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3379 033116 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3380
3381 012100 SN=12100
3382 000000 XX=0
3383 000000 ZZ=000000
3384
3385 ;TEST IDPB
3386 G12100: REPEAT ^D5,<
3387 SN=SN+1
3388 XX=XX-6
3389 ZZ=ZZ+600
3390 MOVEI AC-2,77 ;SETUP AC-2
3391 ROT AC-2,XX ;FOR COMPARISON
3392 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3393 MOVEI AC,77 ;SETUP BYTE WORD
3394 SETZ 1, ;SETUP DEST WORD
3395 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3396 CAME 1,<AC-2>&17 ;TEST DEST WORD
3397 ER12 1,SN ;IDPB FAILED
3398 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3399 >
3400
3401 012101 SN=SN+1
3402 777777 777772 XX=XX-6
3403 000600 ZZ=ZZ+600
3404 033117 201 07 0 00 000077 MOVEI AC-2,77 ;SETUP AC-2
3405 033120 241 07 0 00 777772 ROT AC-2,XX ;FOR COMPARISON
3406 033121 205 12 0 00 000600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3407 033122 201 11 0 00 000077 MOVEI AC,77 ;SETUP BYTE WORD
3408 033123 400 01 0 00 000000 SETZ 1, ;SETUP DEST WORD
3409 033124 136 11 0 00 000012 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3410 033125 312 01 0 00 000007 CAME 1,<AC-2>&17 ;TEST DEST WORD
3411 033126 012 01 0 00 012101 ER12 1,SN ;IDPB FAILED
3412 033127 321 13 0 00 033117 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3413
3414
3415 012102 SN=SN+1
3416 777777 777764 XX=XX-6
3417 001400 ZZ=ZZ+600
3418 033130 201 07 0 00 000077 MOVEI AC-2,77 ;SETUP AC-2
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 41-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0096
3419 033131 241 07 0 00 777764 ROT AC-2,XX ;FOR COMPARISON
3420 033132 205 12 0 00 001400 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3421 033133 201 11 0 00 000077 MOVEI AC,77 ;SETUP BYTE WORD
3422 033134 400 01 0 00 000000 SETZ 1, ;SETUP DEST WORD
3423 033135 136 11 0 00 000012 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3424 033136 312 01 0 00 000007 CAME 1,<AC-2>&17 ;TEST DEST WORD
3425 033137 012 01 0 00 012102 ER12 1,SN ;IDPB FAILED
3426 033140 321 13 0 00 033130 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3427
3428
3429 012103 SN=SN+1
3430 777777 777756 XX=XX-6
3431 002200 ZZ=ZZ+600
3432 033141 201 07 0 00 000077 MOVEI AC-2,77 ;SETUP AC-2
3433 033142 241 07 0 00 777756 ROT AC-2,XX ;FOR COMPARISON
3434 033143 205 12 0 00 002200 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3435 033144 201 11 0 00 000077 MOVEI AC,77 ;SETUP BYTE WORD
3436 033145 400 01 0 00 000000 SETZ 1, ;SETUP DEST WORD
3437 033146 136 11 0 00 000012 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3438 033147 312 01 0 00 000007 CAME 1,<AC-2>&17 ;TEST DEST WORD
3439 033150 012 01 0 00 012103 ER12 1,SN ;IDPB FAILED
3440 033151 321 13 0 00 033141 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3441
3442
3443 012104 SN=SN+1
3444 777777 777750 XX=XX-6
3445 003000 ZZ=ZZ+600
3446 033152 201 07 0 00 000077 MOVEI AC-2,77 ;SETUP AC-2
3447 033153 241 07 0 00 777750 ROT AC-2,XX ;FOR COMPARISON
3448 033154 205 12 0 00 003000 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3449 033155 201 11 0 00 000077 MOVEI AC,77 ;SETUP BYTE WORD
3450 033156 400 01 0 00 000000 SETZ 1, ;SETUP DEST WORD
3451 033157 136 11 0 00 000012 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3452 033160 312 01 0 00 000007 CAME 1,<AC-2>&17 ;TEST DEST WORD
3453 033161 012 01 0 00 012104 ER12 1,SN ;IDPB FAILED
3454 033162 321 13 0 00 033152 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3455
3456
3457 012105 SN=SN+1
3458 777777 777742 XX=XX-6
3459 003600 ZZ=ZZ+600
3460 033163 201 07 0 00 000077 MOVEI AC-2,77 ;SETUP AC-2
3461 033164 241 07 0 00 777742 ROT AC-2,XX ;FOR COMPARISON
3462 033165 205 12 0 00 003600 MOVSI AC+1,ZZ ;SETUP PNTR WORD
3463 033166 201 11 0 00 000077 MOVEI AC,77 ;SETUP BYTE WORD
3464 033167 400 01 0 00 000000 SETZ 1, ;SETUP DEST WORD
3465 033170 136 11 0 00 000012 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3466 033171 312 01 0 00 000007 CAME 1,<AC-2>&17 ;TEST DEST WORD
3467 033172 012 01 0 00 012105 ER12 1,SN ;IDPB FAILED
3468 033173 321 13 0 00 033163 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3469
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 42
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0097
3470 ;INST-IDPB
3471 ;P FIELD=44
3472 ;S FIELD=6
3473 ;BYTE WORD=55
3474 ;DEST WORD=-1
3475 ;AN ERROR WILL OCCUR IF IDPB
3476 ;FAILS TO DEPOSIT CORRECTLY
3477
3478 000010 AC=10
3479 SAVEAC (1,1)^
3480 033174 201 12 0 00 033174 MOVEI AC+2,. ;SAVE TEST PC
3481 033175 202 12 0 00 030051 MOVEM AC+2,TESTPC
3482 033176 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3483 033177 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3484
3485 012200 SN=12200
3486 000000 ZZ=0
3487
3488 033200 205 11 0 00 440600 G12200: MOVSI AC+1,440600 ;SETUP PNPR WORD
3489 ;TEST IDPB
3490 REPEAT ^D5,<
3491 SN=SN+1
3492 ZZ=ZZ-6
3493 HRLI AC-2,-1 ;SETUP AC-2
3494 HRRI AC-2,-23 ;FOR COMPARISON
3495 ROT AC-2,ZZ ;ROTATE RIGHT BY 6
3496 MOVEI AC,55 ;SETUP BYTE WORD
3497 SETO ;SETUP DEST WORD (AC0)
3498 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3499 CAME ,<AC-2>&17 ;TEST DEST WORD
3500 ER12 ,SN ;IDPB FAILED
3501 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3502 >
3503
3504 012201 SN=SN+1
3505 777777 777772 ZZ=ZZ-6
3506 033201 505 06 0 00 777777 HRLI AC-2,-1 ;SETUP AC-2
3507 033202 541 06 0 00 777755 HRRI AC-2,-23 ;FOR COMPARISON
3508 033203 241 06 0 00 777772 ROT AC-2,ZZ ;ROTATE RIGHT BY 6
3509 033204 201 10 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3510 033205 474 00 0 00 000000 SETO ;SETUP DEST WORD (AC0)
3511 033206 136 10 0 00 000011 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3512 033207 312 00 0 00 000006 CAME ,<AC-2>&17 ;TEST DEST WORD
3513 033210 012 00 0 00 012201 ER12 ,SN ;IDPB FAILED
3514 033211 321 12 0 00 033201 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3515
3516
3517 012202 SN=SN+1
3518 777777 777764 ZZ=ZZ-6
3519 033212 505 06 0 00 777777 HRLI AC-2,-1 ;SETUP AC-2
3520 033213 541 06 0 00 777755 HRRI AC-2,-23 ;FOR COMPARISON
3521 033214 241 06 0 00 777764 ROT AC-2,ZZ ;ROTATE RIGHT BY 6
3522 033215 201 10 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3523 033216 474 00 0 00 000000 SETO ;SETUP DEST WORD (AC0)
3524 033217 136 10 0 00 000011 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 42-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0098
3525 033220 312 00 0 00 000006 CAME ,<AC-2>&17 ;TEST DEST WORD
3526 033221 012 00 0 00 012202 ER12 ,SN ;IDPB FAILED
3527 033222 321 12 0 00 033212 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3528
3529
3530 012203 SN=SN+1
3531 777777 777756 ZZ=ZZ-6
3532 033223 505 06 0 00 777777 HRLI AC-2,-1 ;SETUP AC-2
3533 033224 541 06 0 00 777755 HRRI AC-2,-23 ;FOR COMPARISON
3534 033225 241 06 0 00 777756 ROT AC-2,ZZ ;ROTATE RIGHT BY 6
3535 033226 201 10 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3536 033227 474 00 0 00 000000 SETO ;SETUP DEST WORD (AC0)
3537 033230 136 10 0 00 000011 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3538 033231 312 00 0 00 000006 CAME ,<AC-2>&17 ;TEST DEST WORD
3539 033232 012 00 0 00 012203 ER12 ,SN ;IDPB FAILED
3540 033233 321 12 0 00 033223 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3541
3542
3543 012204 SN=SN+1
3544 777777 777750 ZZ=ZZ-6
3545 033234 505 06 0 00 777777 HRLI AC-2,-1 ;SETUP AC-2
3546 033235 541 06 0 00 777755 HRRI AC-2,-23 ;FOR COMPARISON
3547 033236 241 06 0 00 777750 ROT AC-2,ZZ ;ROTATE RIGHT BY 6
3548 033237 201 10 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3549 033240 474 00 0 00 000000 SETO ;SETUP DEST WORD (AC0)
3550 033241 136 10 0 00 000011 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3551 033242 312 00 0 00 000006 CAME ,<AC-2>&17 ;TEST DEST WORD
3552 033243 012 00 0 00 012204 ER12 ,SN ;IDPB FAILED
3553 033244 321 12 0 00 033234 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3554
3555
3556 012205 SN=SN+1
3557 777777 777742 ZZ=ZZ-6
3558 033245 505 06 0 00 777777 HRLI AC-2,-1 ;SETUP AC-2
3559 033246 541 06 0 00 777755 HRRI AC-2,-23 ;FOR COMPARISON
3560 033247 241 06 0 00 777742 ROT AC-2,ZZ ;ROTATE RIGHT BY 6
3561 033250 201 10 0 00 000055 MOVEI AC,55 ;SETUP BYTE WORD
3562 033251 474 00 0 00 000000 SETO ;SETUP DEST WORD (AC0)
3563 033252 136 10 0 00 000011 IDPB AC,<AC+1>&17 ;INC AND DEPOSIT BYTE
3564 033253 312 00 0 00 000006 CAME ,<AC-2>&17 ;TEST DEST WORD
3565 033254 012 00 0 00 012205 ER12 ,SN ;IDPB FAILED
3566 033255 321 12 0 00 033245 JUMPL AC+2,.-^D8 ;LOOP ON ERROR SWITCH
3567
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 43
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0099
3568 ;INST-LDB-SPECIAL CASE-S GREATER THAN 44
3569 ;P FIELD=7
3570 ;S FIELD=60,40
3571 ;VERIFY THAT THE BYTE PROCESSED IS, AT MOST, 44 BITS IF S GREATER THAN 44
3572
3573 000013 AC=13
3574 SAVEAC (1,1)^
3575 033256 201 15 0 00 033256 MOVEI AC+2,. ;SAVE TEST PC
3576 033257 202 15 0 00 030051 MOVEM AC+2,TESTPC
3577 033260 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3578 033261 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3579
3580 012210 SN=12210
3581 100000 XX=100000
3582
3583 ;TEST LDB
3584 G12210: REPEAT 2,<
3585 SN=SN+1
3586 XX=XX-2000
3587 SETOB 0,2
3588 MOVE 1,[525252,,525377] ;SETUP BYTE WORD
3589 SETZM AC ;CLEAR DEST WORD
3590 MOVE AC+1,[XX,,1] ;SETUP POINTER
3591 LDB AC,<AC+1>&17 ;LOAD BYTE
3592 CAME AC,[002525,,252525] ;TEST DEST WORD
3593 ER3 AC,SN ;LDB FAILED
3594 CAME AC+1,[XX,,1] ;CHECK POINTER
3595 ER4 AC+1,SN ;POINTER WAS MODIFIED
3596 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
3597 >
3598
3599 012211 SN=SN+1
3600 076000 XX=XX-2000
3601 033262 477 00 0 00 000002 SETOB 0,2
3602 033263 200 01 0 00 040722 MOVE 1,[525252,,525377] ;SETUP BYTE WORD
3603 033264 402 00 0 00 000013 SETZM AC ;CLEAR DEST WORD
3604 033265 200 14 0 00 040723 MOVE AC+1,[XX,,1] ;SETUP POINTER
3605 033266 135 13 0 00 000014 LDB AC,<AC+1>&17 ;LOAD BYTE
3606 033267 312 13 0 00 040724 CAME AC,[002525,,252525] ;TEST DEST WORD
3607 033270 003 13 0 00 012211 ER3 AC,SN ;LDB FAILED
3608 033271 312 14 0 00 040723 CAME AC+1,[XX,,1] ;CHECK POINTER
3609 033272 004 14 0 00 012211 ER4 AC+1,SN ;POINTER WAS MODIFIED
3610 033273 321 15 0 00 033262 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
3611
3612
3613 012212 SN=SN+1
3614 074000 XX=XX-2000
3615 033274 477 00 0 00 000002 SETOB 0,2
3616 033275 200 01 0 00 040722 MOVE 1,[525252,,525377] ;SETUP BYTE WORD
3617 033276 402 00 0 00 000013 SETZM AC ;CLEAR DEST WORD
3618 033277 200 14 0 00 040725 MOVE AC+1,[XX,,1] ;SETUP POINTER
3619 033300 135 13 0 00 000014 LDB AC,<AC+1>&17 ;LOAD BYTE
3620 033301 312 13 0 00 040724 CAME AC,[002525,,252525] ;TEST DEST WORD
3621 033302 003 13 0 00 012212 ER3 AC,SN ;LDB FAILED
3622 033303 312 14 0 00 040725 CAME AC+1,[XX,,1] ;CHECK POINTER
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 43-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0100
3623 033304 004 14 0 00 012212 ER4 AC+1,SN ;POINTER WAS MODIFIED
3624 033305 321 15 0 00 033274 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
3625
3626 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 43-2
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0101
3627 ;INST-DPB-SPECIAL CASE-S GREATER THAN 44
3628 ;P FIELD=7
3629 ;S FIELD=60,40
3630 ;VERIFY THAT THE BYTE PROCESSED IS, AT MOST, 44 BITS IF S GREATER THAN 44
3631
3632 012220 SN=12220
3633 100000 XX=100000
3634
3635 ;TEST DPB
3636 G12220: REPEAT 2,<
3637 SN=SN+1
3638 XX=XX-2000
3639 SETOB 0,2
3640 MOVE 1,[707070,,707070] ;SETUP DEST WORD
3641 MOVE AC,[323232,,232323] ;SETUP BYTE WORD
3642 MOVE AC+1,[XX,,1] ;SETUP POINTER
3643 DPB AC,<AC+1>&17 ;DEPOSIT BYTE
3644 MOVEI AC-2,[ASCIZ/C(C(E)-1) FAILED/]
3645 MOVE AC-2,SPDES ;FAILURE DESCRIPTOR
3646 CAME 0,[-1,,-1] ;CHECK DEST WORD -1
3647 ER2 0,SN ;DPB FAILED
3648 CAME 1,[646446,,464670] ;CHECK DEST WORD
3649 ER12 1,SN ;DPB FAILED
3650 MOVEI AC-2,[ASCIZ/C(C(E)+1) FAILED/]
3651 MOVEM AC-2,SPDES ;FAILURE DSCRIPTOR
3652 CAME 2,[-1,,-1] ;CHECK DEST WORD +1
3653 ER2 2,SN ;DPB FAILED
3654 JUMPL AC+2,.-^D15 ;LOOP ON ERROR SWITCH
3655 >
3656
3657 012221 SN=SN+1
3658 076000 XX=XX-2000
3659 033306 477 00 0 00 000002 SETOB 0,2
3660 033307 200 01 0 00 040726 MOVE 1,[707070,,707070] ;SETUP DEST WORD
3661 033310 200 13 0 00 040727 MOVE AC,[323232,,232323] ;SETUP BYTE WORD
3662 033311 200 14 0 00 040723 MOVE AC+1,[XX,,1] ;SETUP POINTER
3663 033312 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE
3664 033313 201 11 0 00 040730 MOVEI AC-2,[ASCIZ/C(C(E)-1) FAILED/]
3665 033314 200 11 0 00 040646 MOVE AC-2,SPDES ;FAILURE DESCRIPTOR
3666 033315 312 00 0 00 040734 CAME 0,[-1,,-1] ;CHECK DEST WORD -1
3667 033316 002 00 0 00 012221 ER2 0,SN ;DPB FAILED
3668 033317 312 01 0 00 040735 CAME 1,[646446,,464670] ;CHECK DEST WORD
3669 033320 012 01 0 00 012221 ER12 1,SN ;DPB FAILED
3670 033321 201 11 0 00 040736 MOVEI AC-2,[ASCIZ/C(C(E)+1) FAILED/]
3671 033322 202 11 0 00 040646 MOVEM AC-2,SPDES ;FAILURE DSCRIPTOR
3672 033323 312 02 0 00 040734 CAME 2,[-1,,-1] ;CHECK DEST WORD +1
3673 033324 002 02 0 00 012221 ER2 2,SN ;DPB FAILED
3674 033325 321 15 0 00 033306 JUMPL AC+2,.-^D15 ;LOOP ON ERROR SWITCH
3675
3676
3677 012222 SN=SN+1
3678 074000 XX=XX-2000
3679 033326 477 00 0 00 000002 SETOB 0,2
3680 033327 200 01 0 00 040726 MOVE 1,[707070,,707070] ;SETUP DEST WORD
3681 033330 200 13 0 00 040727 MOVE AC,[323232,,232323] ;SETUP BYTE WORD
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 43-3
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0102
3682 033331 200 14 0 00 040725 MOVE AC+1,[XX,,1] ;SETUP POINTER
3683 033332 137 13 0 00 000014 DPB AC,<AC+1>&17 ;DEPOSIT BYTE
3684 033333 201 11 0 00 040730 MOVEI AC-2,[ASCIZ/C(C(E)-1) FAILED/]
3685 033334 200 11 0 00 040646 MOVE AC-2,SPDES ;FAILURE DESCRIPTOR
3686 033335 312 00 0 00 040734 CAME 0,[-1,,-1] ;CHECK DEST WORD -1
3687 033336 002 00 0 00 012222 ER2 0,SN ;DPB FAILED
3688 033337 312 01 0 00 040735 CAME 1,[646446,,464670] ;CHECK DEST WORD
3689 033340 012 01 0 00 012222 ER12 1,SN ;DPB FAILED
3690 033341 201 11 0 00 040736 MOVEI AC-2,[ASCIZ/C(C(E)+1) FAILED/]
3691 033342 202 11 0 00 040646 MOVEM AC-2,SPDES ;FAILURE DSCRIPTOR
3692 033343 312 02 0 00 040734 CAME 2,[-1,,-1] ;CHECK DEST WORD +1
3693 033344 002 02 0 00 012222 ER2 2,SN ;DPB FAILED
3694 033345 321 15 0 00 033326 JUMPL AC+2,.-^D15 ;LOOP ON ERROR SWITCH
3695
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 44
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0103
3696 ;VERIFY THAT THE POINTER IS NOT INCREMENTED BY "ILDB" OR "IDPB" IF 'BIS'
3697 ;IS SET; AND THAT THE SECOND PART OF THE BYTE INSTRUCTION CLEARS 'BIS'
3698
3699 000013 AC=13
3700 SAVEAC (1,1)^
3701 033346 201 15 0 00 033346 MOVEI AC+2,. ;SAVE TEST PC
3702 033347 202 15 0 00 030051 MOVEM AC+2,TESTPC
3703 033350 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3704 033351 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3705
3706 033352 200 14 0 00 040742 G12300: MOVE AC+1,[220600,,AC-1] ;SETUP BYTE POINTER
3707 033353 200 13 0 00 040726 MOVE AC,[707070,,707070] ;SETUP AC
3708 033354 200 12 0 00 040743 MOVE AC-1,[112233,,445566] ;SETUP BYTE WORD
3709 033355 254 02 1 00 040744 JRSTF @[BIS,,.+1] ;SET 'BIS' FLAG
3710 033356 134 13 0 00 000014 ILDB AC,AC+1
3711 033357 265 11 0 00 033360 JSP AC-2,.+1 ;SAVE FLAGS
3712 033360 302 13 0 00 000033 CAIE AC,33 ;TEST DEST WORD
3713 033361 003 13 0 00 012301 ER3 AC,12301 ;INCORRECT BYTE WAS LOADED
3714 033362 312 14 0 00 040742 CAME AC+1,[220600,,AC-1] ;TEST POINTER
3715 033363 004 14 0 00 012301 ER4 AC+1,12301 ;POINTER WAS INCREMENTED
3716 033364 603 11 0 00 020000 TLNE AC-2,BIS ;EXAMINE 'BIS'
3717 033365 013 11 0 00 012301 ER13 AC-2,12301 ;'BIS' WAS NOT CLEARED
3718 033366 322 15 0 00 033352 JUMPE AC+2,G12300 ;LOOP ON ERROR SWITCH
3719
3720 033367 200 14 0 00 040742 G12400: MOVE AC+1,[220600,,AC-1] ;SET-UP BYTE POINTER
3721 033370 200 13 0 00 040726 MOVE AC,[707070,,707070] ;SET-UP AC
3722 033371 200 12 0 00 040743 MOVE AC-1,[112233,,445566] ;SETUP BYTE WORD
3723 033372 254 02 1 00 040745 JRSTF @[BIS,,.+1] ;SET 'BIS' FLAG
3724 033373 136 13 0 00 000014 IDPB AC,AC+1
3725 033374 265 11 0 00 033375 JSP AC-2,.+1 ;SAVE FLAGS
3726 033375 312 14 0 00 040742 CAME AC+1,[220600,,AC-1] ;TEST POINTER
3727 033376 004 14 0 00 012401 ER4 AC+1,12401 ;POINTER WAS INCREMENTED
3728 033377 312 12 0 00 040746 CAME AC-1,[112270,,445566] ;TEST BYTE WORD
3729 033400 012 12 0 00 012401 ER12 AC-1,12401 ;INCORRECT BYTE WAS DEPOSITED
3730 033401 603 11 0 00 020000 TLNE AC-2,BIS ;EXAMINE 'BIS'
3731 033402 013 11 0 00 012401 ER13 AC-2,12401 ;'BIS' WAS NOT CLEARED
3732 033403 321 15 0 00 033367 JUMPL AC+2,G12400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 47
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0104
3733 ;MSCL BYTE TESTS - IBP
3734 ;VERIFY THAT IBP WORKS WHEN THE POINTER IS IN AN AC
3735
3736 000007 AC=7
3737 SAVEAC (1,1)^
3738 033404 201 11 0 00 033404 MOVEI AC+2,. ;SAVE TEST PC
3739 033405 202 11 0 00 030051 MOVEM AC+2,TESTPC
3740 033406 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3741 033407 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3742 033410 254 02 1 00 040747 JRSTF @[.+1] ;CLEAR ALL FLAGS
3743
3744 033411 205 05 0 00 170600 G12500: MOVSI AC-2,170600 ;SETUP POINTER
3745 033412 205 06 0 00 110600 MOVSI AC-1,110600 ;RESULT FOR COMPARISON
3746 033413 133 00 0 00 000005 IBP <AC-2>&17 ;*IBP SHOULD PLACE 110600,,0 INTO PTR
3747 033414 312 05 0 00 000006 CAME AC-2,<AC-1>&17 ;IS PTR = 110600,,0 ?
3748 033415 005 05 0 00 012501 ER5 AC-2,12501 ;POINTER FAILURE
3749 033416 321 11 0 00 033411 JUMPL AC+2,G12500 ;LOOP ON ERROR SWITCH
3750
3751 ;MSCL BYTE TESTS - IBP
3752 ;VERIFY THAT IBP WORKS WHEN THE POINTER IS IN CORE MEMORY
3753
3754 000006 AC=6
3755 SAVEAC (1,1)^
3756 033417 201 10 0 00 033417 MOVEI AC+2,. ;SAVE TEST PC
3757 033420 202 10 0 00 030051 MOVEM AC+2,TESTPC
3758 033421 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3759 033422 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3760 033423 254 02 1 00 040750 JRSTF @[.+1] ;CLEAR ALL FLAGS
3761
3762 033424 205 04 0 00 170600 G12510: MOVSI AC-2,170600
3763 033425 202 04 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
3764 033426 205 04 0 00 110600 MOVSI AC-2,110600 ;RESULT FOR COMPARISON
3765 033427 400 05 0 00 000000 SETZ AC-1, ;INITIALIZE FOR RESULT
3766 033430 133 00 0 00 040136 IBP BYTBLK ;*IBP SHOULD PLACE 110600,,0 INTO PTR
3767 033431 200 05 0 00 040136 MOVE AC-1,BYTBLK
3768 033432 312 05 0 00 000004 CAME AC-1,<AC-2>&17 ;IS PTR = 110600,,0 ?
3769 033433 005 05 0 00 012511 ER5 AC-1,12511 ;POINTER FAILURE
3770 033434 321 10 0 00 033424 JUMPL AC+2,G12510 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 48
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0105
3771 ;MSCL BYTE TESTS - DPB
3772 ;VERIFY THAT DPB WORKS WHEN BOTH POINTER AND BYTE
3773 ;ARE IN AC'S
3774
3775 000005 AC=5
3776 SAVEAC (1,1)^
3777 033435 201 07 0 00 033435 MOVEI AC+2,. ;SAVE TEST PC
3778 033436 202 07 0 00 030051 MOVEM AC+2,TESTPC
3779 033437 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3780 033440 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3781 033441 254 02 1 00 040751 JRSTF @[.+1] ;CLEAR ALL FLAGS
3782
3783 033442 205 03 0 00 170600 G12600: MOVSI AC-2,170600 ;SETUP POINTER
3784 033443 541 03 0 00 000001 HRRI AC-2,<AC-4>&17
3785 033444 200 02 0 00 000003 MOVE AC-3,<AC-2>&17 ;POINTER FOR COMPARISON
3786 033445 200 01 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
3787 033446 201 05 0 00 654321 MOVEI AC,654321 ;SETUP AC
3788 033447 200 04 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3789 033450 137 05 0 00 000003 DPB AC,<AC-2>&17 ;DPB SHOULD PLACE 230702.103700 INTO BYTE WORD
3790 033451 312 03 0 00 000002 CAME AC-2,<AC-3>&17 ;WAS POINTER MODIFIED ?
3791 033452 005 03 0 00 012601 ER5 AC-2,12601 ;FAILURE - POINTER WAS MODIFIED
3792 033453 302 05 0 00 654321 CAIE AC,654321 ;WAS AC MODIFIED?
3793 033454 003 05 0 00 012602 ER3 AC,12602 ;FAILURE - AC WAS MODIFIED
3794 033455 312 01 0 00 000004 CAME AC-4,<AC-1>&17 ;WAS BYTE DEPOSITED CORRECTLY?
3795 033456 012 01 0 00 012603 ER12 AC-4,12603 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3796 033457 321 07 0 00 033442 JUMPL AC+2,G12600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 49
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0106
3797 ;MSCL BYTE TESTS - DPB
3798 ;VERIFY THAT DPB WORKS WHEN POINTER IS IN AN AC AND
3799 ;BYTE IS IN CORE MEMORY
3800
3801 000014 AC=14
3802 SAVEAC (1,1)^
3803 033460 201 16 0 00 033460 MOVEI AC+2,. ;SAVE TEST PC
3804 033461 202 16 0 00 030051 MOVEM AC+2,TESTPC
3805 033462 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3806 033463 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3807 033464 254 02 1 00 040754 JRSTF @[.+1] ;CLEAR ALL FLAGS
3808
3809 033465 205 12 0 00 170600 G12610: MOVSI AC-2,170600 ;SETUP POINTER
3810 033466 541 12 0 00 040136 HRRI AC-2,BYTBLK
3811 033467 200 11 0 00 000012 MOVE AC-3,<AC-2>&17 ;POINTER FOR COMPARISON
3812 033470 200 14 0 00 040752 MOVE AC,[230703,,603700] ;SETUP BYTE WORD
3813 033471 202 14 0 00 040136 MOVEM AC,BYTBLK
3814 033472 200 13 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3815 033473 201 14 0 00 654321 MOVEI AC,654321 ;SETUP AC
3816 033474 137 14 0 00 000012 DPB AC,<AC-2>&17 ;DPB SHOULD PLACE 230702,,103700 INTO BYTE WORD
3817 033475 312 12 0 00 000011 CAME AC-2,<AC-3>&17 ;WAS POINTER MODIFIED?
3818 033476 005 12 0 00 012611 ER5 AC-2,12611 ;FAILURE - POINTER WAS MODIFIED
3819 033477 302 14 0 00 654321 CAIE AC,654321 ;WAS AC MODIFIED?
3820 033500 003 14 0 00 012612 ER3 AC,12612 ;FAILURE - AC WAS MODIFIED
3821 033501 200 07 0 00 040136 MOVE AC-5,BYTBLK
3822 033502 312 13 0 00 040136 CAME AC-1,BYTBLK ;WAS BYTE DEPOSITED CORRECTLY?
3823 033503 012 07 0 00 012613 ER12 AC-5,12613 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3824 033504 321 16 0 00 033465 JUMPL AC+2,G12610 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 50
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0107
3825 ;MSCL BYTE TESTS - DPB
3826 ;VERIFY THAT DPB WORKS WHEN BYTE IS IN AN AC AND
3827 ;POINTER IS IN CORE MEMORY
3828
3829 000013 AC=13
3830 SAVEAC (1,1)^
3831 033505 201 15 0 00 033505 MOVEI AC+2,. ;SAVE TEST PC
3832 033506 202 15 0 00 030051 MOVEM AC+2,TESTPC
3833 033507 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3834 033510 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3835 033511 254 02 1 00 040755 JRSTF @[.+1] ;CLEAR ALL FLAGS
3836
3837 033512 205 11 0 00 170600 G12620: MOVSI AC-2,170600
3838 033513 541 11 0 00 000007 HRRI AC-2,<AC-4>&17 ;POINTER FOR COMPARISON
3839 033514 202 11 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
3840 033515 200 07 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
3841 033516 200 12 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3842 033517 201 13 0 00 654321 MOVEI AC,654321 ;SETUP AC
3843 033520 137 13 0 00 040136 DPB AC,BYTBLK ;DPB SHOULD PLACE 230702,,103700 INTO BYTE WORD
3844 033521 200 10 0 00 040136 MOVE AC-3,BYTBLK
3845 033522 312 11 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER MODIFIED?
3846 033523 005 10 0 00 012621 ER5 AC-3,12621 ;FAILURE - POINTER WAS MODIFIED
3847 033524 302 13 0 00 654321 CAIE AC,654321 ;WAS AC MODIFIED?
3848 033525 003 13 0 00 012622 ER3 AC,12622 ;FAILURE - AC WAS MODIFIED
3849 033526 312 07 0 00 000012 CAME AC-4,<AC-1>&17 ;WAS BYTE DEPOSITED CORRECTLY?
3850 033527 012 07 0 00 012523 ER12 AC-4,12523 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3851 033530 321 05 0 00 033512 JUMPL AC+12,G12620 ;LOOP ON ERROR SWITCH
3852
3853 ;MSCL BYTE TESTS - DPB
3854 ;VERIFY THAT DPB WORKS WHEN BOTH POINTER AND BYTE WORD ARE IN CORE MEMORY
3855
3856 000012 AC=12
3857 SAVEAC (1,1)^
3858 033531 201 14 0 00 033531 MOVEI AC+2,. ;SAVE TEST PC
3859 033532 202 14 0 00 030051 MOVEM AC+2,TESTPC
3860 033533 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3861 033534 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3862 033535 254 02 1 00 040756 JRSTF @[.+1] ;CLEAR ALL FLAGS
3863
3864 033536 205 10 0 00 170600 G12630: MOVSI AC-2,170600
3865 033537 541 10 0 00 040141 HRRI AC-2,BYTBLK+3 ;POINTER FOR COMPARISON
3866 033540 202 10 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
3867 033541 200 06 0 00 040752 MOVE AC-4,[230703,,603700]
3868 033542 202 06 0 00 040141 MOVEM AC-4,BYTBLK+3 ;SETUP BYTE WORD
3869 033543 200 11 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3870 033544 201 12 0 00 654321 MOVEI AC,654321 ;SETUP AC
3871 033545 137 12 0 00 040136 DPB AC,BYTBLK ;DPB SHOULD PLACE 230702,,103700 INTO BYTE WORD
3872 033546 200 06 0 00 040136 MOVE AC-4,BYTBLK
3873 033547 312 10 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER MODIFIED?
3874 033550 005 06 0 00 012631 ER5 AC-4,12631 ;FAILURE - POINTER WAS MODIFIED
3875 033551 200 07 0 00 040141 MOVE AC-3,BYTBLK+3
3876 033552 312 11 0 00 040141 CAME AC-1,BYTBLK+3 ;WAS BYTE DEPOSITED CORRECTLY?
3877 033553 012 07 0 00 012632 ER12 AC-3,12632 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3878 033554 302 12 0 00 654321 CAIE AC,654321 ;WAS AC MODIFIED?
3879 033555 003 12 0 00 012633 ER3 AC,12633 ;FAILURE - AC WAS MODIFIED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 50-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0108
3880 033556 321 14 0 00 033536 JUMPL AC+2,G12630 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 51
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0109
3881 ;MSCL BYTE TESTS - IDPB
3882 ;VERIFY THAT IDPB WORKS WHEN BOTH POINTER AND BYTE
3883 ;ARE IN AC'S
3884
3885 000011 AC=11
3886 SAVEAC (1,1)^
3887 033557 201 13 0 00 033557 MOVEI AC+2,. ;SAVE TEST PC
3888 033560 202 13 0 00 030051 MOVEM AC+2,TESTPC
3889 033561 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3890 033562 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3891 033563 254 02 1 00 040757 JRSTF @[.+1] ;CLEAR ALL FLAGS
3892
3893 033564 205 07 0 00 250600 G12700: MOVSI AC-2,250600 ;SETUP POINTER
3894 033565 541 07 0 00 000005 HRRI AC-2,<AC-4>&17
3895 033566 200 06 0 00 000007 MOVE AC-3,<AC-2>&17
3896 033567 505 06 0 00 170600 HRLI AC-3,170600 ;POINTER FOR COMPARISON
3897 033570 200 05 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
3898 033571 201 11 0 00 654321 MOVEI AC,654321 ;SETUP AC
3899 033572 200 10 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3900 033573 136 11 0 00 000007 IDPB AC,<AC-2>&17 ;IDPB SHOULD PLACE 230702,,103700 INTO BYTE WORD
3901 033574 312 07 0 00 000006 CAME AC-2,<AC-3>&17 ;WAS POINTER INCREMENTED CORRECTLY
3902 033575 005 07 0 00 012701 ER5 AC-2,12701 ;FAILURE - POINTER NOT INCREMENTED CORRECTLY
3903 033576 302 11 0 00 654321 CAIE AC,654321 ;WAS AC MODIFIED
3904 033577 003 11 0 00 012700 ER3 AC,12700 ;FAILURE - AC WAS MODIFIED
3905 033600 312 05 0 00 000010 CAME AC-4,<AC-1>&17 ;WAS BYTE DEPOSITED CORRECTLY?
3906 033601 012 05 0 00 012703 ER12 AC-4,12703 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3907 033602 321 13 0 00 033564 JUMPL AC+2,G12700 ;LOOP ON ERROR SWITCH
3908
3909 ;MSCL BYTE TESTS - IDPB
3910 ;VERIFY THAT DPB WORKS WHEN POINTER IS IN AN AC AND
3911 ;BYTE IS IN CORE MEMORY
3912
3913 000010 AC=10
3914 SAVEAC (1,1)^
3915 033603 201 12 0 00 033603 MOVEI AC+2,. ;SAVE TEST PC
3916 033604 202 12 0 00 030051 MOVEM AC+2,TESTPC
3917 033605 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3918 033606 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3919 033607 254 02 1 00 040760 JRSTF @[.+1] ;CLEAR ALL FLAGS
3920
3921 033610 205 06 0 00 250600 G12710: MOVSI AC-2,250600 ;SETUP POINTER
3922 033611 541 06 0 00 040136 HRRI AC-2,BYTBLK
3923 033612 200 05 0 00 000006 MOVE AC-3,<AC-2>&17
3924 033613 505 05 0 00 170600 HRLI AC-3,170600 ;POINTER FOR COMPARISON
3925 033614 200 10 0 00 040752 MOVE AC,[230703,,603700] ;SETUP BYTE WORD
3926 033615 202 10 0 00 040136 MOVEM AC,BYTBLK
3927 033616 200 07 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3928 033617 201 10 0 00 654321 MOVEI AC,654321 ;SETUP AC
3929 033620 136 10 0 00 000006 IDPB AC,<AC-2>&17 ;IDPB SHOULD PLACE 230702,,103700 INTO
3930 ;BYTE WORD AND INCREMENT POINTER
3931 033621 312 06 0 00 000005 CAME AC-2,<AC-3>&17 ;WAS POINTER INCREMENTED CORRECTED
3932 033622 012 06 0 00 012713 ER12 AC-2,12713 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3933 033623 321 12 0 00 033610 JUMPL AC+2,G12710 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 52
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0110
3934 ;MSCL BYTE TESTS - IDPB
3935 ;VERIFY THAT IDPB WORKS WHEN BYTE IS IN AN AC AND
3936 ;POINTER IS IN CORE MEMORY
3937
3938 000007 AC=7
3939 SAVEAC (1,1)^
3940 033624 201 11 0 00 033624 MOVEI AC+2,. ;SAVE TEST PC
3941 033625 202 11 0 00 030051 MOVEM AC+2,TESTPC
3942 033626 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3943 033627 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3944
3945 033630 254 02 1 00 040761 JRSTF @[.+1] ;CLEAR ALL FLAGS
3946
3947 033631 205 05 0 00 250600 G12720: MOVSI AC-2,250600
3948 033632 541 05 0 00 000003 HRRI AC-2,<AC-4>&17
3949 033633 202 05 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
3950 033634 505 05 0 00 170600 HRLI AC-2,170600 ;POINTER FOR COMPARISON
3951 033635 200 03 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
3952 033636 200 06 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3953 033637 201 07 0 00 654321 MOVEI AC,654321 ;;SETUP AC
3954 033640 136 07 0 00 040136 IDPB AC,BYTBLK ;IDPB SHOULD PLACE 230702,,103700 INTO
3955 ;BYTE WORD AND INCREMENT POINTER
3956 033641 200 04 0 00 040136 MOVE AC-3,BYTBLK
3957 033642 312 05 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER INCREMENTED CORRECTLY
3958 033643 005 04 0 00 012721 ER5 AC-3,12721 ;FAILURE - POINTER WAS NOT INCREMENTED CORRECTLY
3959 033644 302 07 0 00 654321 CAIE AC,654321 ;WAS AC MODIFIED?
3960 033645 003 07 0 00 012722 ER3 AC,12722 ;FAILURE - AC WAS MODIFIED
3961 033646 312 03 0 00 000006 CAME AC-4,<AC-1>&17 ;WAS BYTE DEPOSITED CORRECTLY
3962 033647 012 03 0 00 012723 ER12 AC-4,12723 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3963 033650 321 11 0 00 033631 JUMPL AC+2,G12720 ;LOOP ON ERROR SWITCH
3964
3965 ;MSCL BYTE TESTS - IDPB
3966 ;VERIFY THAT IDPB WORKS WHEN BOTH POINTER AND BYTE WORD ARE IN CORE MEMORY
3967
3968 000006 AC=6
3969 SAVEAC (1,1)^
3970 033651 201 10 0 00 033651 MOVEI AC+2,. ;SAVE TEST PC
3971 033652 202 10 0 00 030051 MOVEM AC+2,TESTPC
3972 033653 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
3973 033654 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
3974 033655 254 02 1 00 040762 JRSTF @[.+1] ;CLEAR ALL FLAGS
3975
3976 033656 205 04 0 00 250600 G12730: MOVSI AC-2,250600
3977 033657 541 04 0 00 040141 HRRI AC-2,BYTBLK+3
3978 033660 202 04 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
3979 033661 505 04 0 00 170600 HRLI AC-2,170600 ;POINTER FOR COMPARISON
3980 033662 200 02 0 00 040752 MOVE AC-4,[230703,,603700]
3981 033663 202 02 0 00 040141 MOVEM AC-4,BYTBLK+3 ;SETUP BYTE WORD
3982 033664 200 05 0 00 040753 MOVE AC-1,[230702,,103700] ;BYTE WORD FOR COMPARISON
3983 033665 201 06 0 00 654321 MOVEI AC,654321 ;SETUP AC
3984 033666 136 06 0 00 040136 IDPB AC,BYTBLK ;IDPB SHOULD PLACE 230702,,103700 INTO
3985 ;BYTE WORD AND INCREMENT POINTER
3986 033667 200 02 0 00 040136 MOVE AC-4,BYTBLK
3987 033670 312 04 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER MODIFIED?
3988 033671 005 02 0 00 012731 ER5 AC-4,12731 ;FAILURE - POINTER WAS MODIFIED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 52-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0111
3989 033672 200 03 0 00 040141 MOVE AC-3,BYTBLK+3
3990 033673 312 05 0 00 040141 CAME AC-1,BYTBLK+3 ;WAS BYTE DEPOSITED CORRECTLY
3991 033674 012 03 0 00 012732 ER12 AC-3,12732 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
3992 033675 302 06 0 00 654321 CAIE AC,654321 ;WAS AC MODIFIED
3993 033676 003 06 0 00 012733 ER3 AC,12733 ;FAILURE - AC WAS MODIFIED
3994 033677 321 10 0 00 033656 JUMPL AC+2,G12730 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 53
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0112
3995 ;MSCL BYTE TESTS - LDB
3996 ;VERIFY THAT LDB WORKS WHEN BOTH POINTER AND BYTE
3997 ;ARE IN AC'S
3998
3999 000005 AC=5
4000 SAVEAC (1,1)^
4001 033700 201 07 0 00 033700 MOVEI AC+2,. ;SAVE TEST PC
4002 033701 202 07 0 00 030051 MOVEM AC+2,TESTPC
4003 033702 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4004 033703 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4005 033704 254 02 1 00 040763 JRSTF @[.+1] ;CLEAR ALL FLAGS
4006
4007 033705 205 03 0 00 170600 G13000: MOVSI AC-2,170600 ;SETUP POINTER
4008 033706 541 03 0 00 000001 HRRI AC-2,<AC-4>&17
4009 033707 200 02 0 00 000003 MOVE AC-3,<AC-2>&17 ;POINTER FOR COMPARISON
4010 033710 200 01 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
4011 033711 400 05 0 00 000000 SETZ AC, ;SETUP AC
4012 033712 200 04 0 00 000001 MOVE AC-1,<AC-4>&17 ;BYTE WORD FOR COMPARISON
4013 033713 135 05 0 00 000003 LDB AC,<AC-2>&17 ;LDB SHOULD PLACE 0,,36 INTO THE AC
4014 033714 312 03 0 00 000002 CAME AC-2,<AC-3>&17 ;WAS POINTER MODIFIED?
4015 033715 005 03 0 00 013001 ER5 AC-2,13001 ;FAILURE - POINTER WAS MODIFIED
4016 033716 302 05 0 00 000036 CAIE AC,36 ;WAS BYTE LOADED CORRECTLY?
4017 033717 003 05 0 00 013002 ER3 AC,13002 ;FAILURE - BYTE NOT LOADED CORRECTLY.
4018 033720 312 01 0 00 000004 CAME AC-4,<AC-1>&17 ;WAS BYTE WORD MODIFIED
4019 033721 012 01 0 00 013003 ER12 AC-4,13003 ;FAILURE - BYTE WORD WAS MODIFIED
4020 033722 321 07 0 00 033705 JUMPL AC+2,G13000 ;LOOP ON ERROR SWITCH
4021
4022 ;MSCL BYTE TESTS - LDB
4023 ;VERIFY THAT LDB WORKS WHEN POINTER IS IN AN AC AND
4024 ;BYTE IS IN CORE MEMORY
4025
4026 000014 AC=14
4027 SAVEAC (1,1)^
4028 033723 201 16 0 00 033723 MOVEI AC+2,. ;SAVE TEST PC
4029 033724 202 16 0 00 030051 MOVEM AC+2,TESTPC
4030 033725 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4031 033726 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4032 033727 254 02 1 00 040764 JRSTF @[.+1] ;CLEAR ALL FLAGS
4033
4034 033730 205 12 0 00 170600 G13010: MOVSI AC-2,170600 ;SETUP POINTER
4035 033731 541 12 0 00 040136 HRRI AC-2,BYTBLK
4036 033732 200 11 0 00 000012 MOVE AC-3,<AC-2>&17 ;POINTER FOR COMPARISON
4037 033733 200 13 0 00 040752 MOVE AC-1,[230703,,603700] ;BYTE WORD FOR COMPARISON
4038 033734 202 13 0 00 040136 MOVEM AC-1,BYTBLK ;SETUP BYTE WORD
4039 033735 400 14 0 00 000000 SETZ AC, ;SETUP AC
4040 033736 135 14 0 00 000012 LDB AC,<AC-2>&17 ;LDB SHOULD PLACE 0,,36 INTO THE AC
4041 033737 312 12 0 00 000011 CAME AC-2,<AC-3>&17 ;WAS POINTER MODIFIED?
4042 033740 005 12 0 00 013011 ER5 AC-2,13011 ;FAILURE - POINTER WAS MODIFIED
4043 033741 302 14 0 00 000036 CAIE AC,36 ;WAS BYTE LOADED CORRECTLY?
4044 033742 003 14 0 00 013012 ER3 AC,13012 ;FAILURE - BYTE NOT LOADED CORRECTLY
4045 033743 200 07 0 00 040136 MOVE AC-5,BYTBLK
4046 033744 312 13 0 00 040136 CAME AC-1,BYTBLK ;WAS BYTE WORD MODIFIED?
4047 033745 012 07 0 00 013013 ER12 AC-5,13013 ;FAILURE - BYTE WORD WAS MODIFIED
4048 033746 321 16 0 00 033730 JUMPL AC+2,G13010 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 54
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0113
4049 ;MSCL BYTE TESTS - LDB
4050 ;VERIFY THAT LDB WORKS WHEN BYTE IS IN AN AC AND
4051 ;POINTER IS IN CORE MEMORY.
4052
4053 000013 AC=13
4054 SAVEAC (1,1)^
4055 033747 201 15 0 00 033747 MOVEI AC+2,. ;SAVE TEST PC
4056 033750 202 15 0 00 030051 MOVEM AC+2,TESTPC
4057 033751 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4058 033752 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4059 033753 254 02 1 00 040765 JRSTF @[.+1] ;CLEAR ALL FLAGS
4060
4061 033754 205 11 0 00 170600 G13020: MOVSI AC-2,170600
4062 033755 541 11 0 00 000007 HRRI AC-2,<AC-4>&17 ;POINTER FOR COMPARISON
4063 033756 202 11 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
4064 033757 200 07 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
4065 033760 200 12 0 00 040752 MOVE AC-1,[230703,,603700] ;BYTE WORD FOR COMPARISON
4066 033761 400 13 0 00 000000 SETZ AC, ;SETUP AC
4067 033762 135 13 0 00 040136 LDB AC,BYTBLK ;LDB SHOULD PLACE 20,,36 INTO THE AC
4068 033763 200 10 0 00 040136 MOVE AC-3,BYTBLK
4069 033764 312 11 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER MODIFIED?
4070 033765 005 10 0 00 013021 ER5 AC-3,13021 ;FAILURE - POINTER WAS MODIFIED
4071 033766 302 13 0 00 000036 CAIE AC,36 ;WAS BYTE LOADED CORRECTLY?
4072 033767 003 13 0 00 013022 ER3 AC,13022 ;FAILURE - BYTE NOT LOADED CORRECTLY
4073 033770 312 07 0 00 000012 CAME AC-4,<AC-1>&17 ;WAS BYTE WORD MODIFIED?
4074 033771 012 07 0 00 013023 ER12 AC-4,13023 ;FAILURE - BYTE WORD WAS MODIFIED
4075 033772 321 15 0 00 033754 JUMPL AC+2,G13020 ;LOOP ON ERROR SWITCH
4076
4077 ;MSCL BYTE TESTS - LDB
4078 ;VERIFY THAT LDB WORKS WHEN BOTH POINTER AND BYTE WORD ARE IN CORE MEMORY.
4079
4080 000012 AC=12
4081 SAVEAC (1,1)^
4082 033773 201 14 0 00 033773 MOVEI AC+2,. ;SAVE TEST PC
4083 033774 202 14 0 00 030051 MOVEM AC+2,TESTPC
4084 033775 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4085 033776 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4086 033777 254 02 1 00 040766 JRSTF @[.+1] ;CLEAR ALL FLAGS
4087
4088 034000 205 10 0 00 170600 G13030: MOVSI AC-2,170600
4089 034001 541 10 0 00 040141 HRRI AC-2,BYTBLK+3 ;POINTER FOR COMPARISON
4090 034002 202 10 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
4091 034003 200 06 0 00 040752 MOVE AC-4,[230703,,603700]
4092 034004 202 06 0 00 040141 MOVEM AC-4,BYTBLK+3 ;SETUP BYTE WORD
4093 034005 200 11 0 00 040752 MOVE AC-1,[230703,,603700] ;BYTE WORD FOR COMPARISON
4094 034006 400 12 0 00 000000 SETZ AC, ;SETUP AC
4095 034007 135 12 0 00 040136 LDB AC,BYTBLK ;LDB SHOULD PLACE 20,,36 INTO THE AC
4096 034010 200 06 0 00 040136 MOVE AC-4,BYTBLK
4097 034011 312 10 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER MODIFIED?
4098 034012 005 06 0 00 013031 ER5 AC-4,13031 ;FAILURE - POINTER WAS MODIFIED
4099 034013 200 07 0 00 040141 MOVE AC-3,BYTBLK+3
4100 034014 312 11 0 00 040141 CAME AC-1,BYTBLK+3 ;WAS BYTE WORD MODIFIED?
4101 034015 012 07 0 00 013032 ER12 AC-3,13032 ;FAILURE - BYTE WORD WAS MODIFIED
4102 034016 302 12 0 00 000036 CAIE AC,36 ;WAS BYTE LOADED CORRECTLY?
4103 034017 003 12 0 00 013033 ER3 AC,13033 ;FAILURE - BYTE NOT LOADED CORRECTLY
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 54-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0114
4104 034020 321 14 0 00 034000 JUMPL AC+2,G13030 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 55
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0115
4105 ;MSCL BYTE TESTS - ILDB
4106 ;VERIFY THAT ILDB WORKS WHEN BOTH POINTER AND BYTE
4107 ;ARE IN AC'S.
4108
4109 000011 AC=11
4110 SAVEAC (1,1)^
4111 034021 201 13 0 00 034021 MOVEI AC+2,. ;SAVE TEST PC
4112 034022 202 13 0 00 030051 MOVEM AC+2,TESTPC
4113 034023 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4114 034024 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4115 034025 254 02 1 00 040767 JRSTF @[.+1] ;CLEAR ALL FLAGS
4116
4117 034026 205 07 0 00 170600 G13100: MOVSI AC-2,170600 ;SETUP POINTER
4118 034027 541 07 0 00 000005 HRRI AC-2,<AC-4>&17
4119 034030 200 06 0 00 000007 MOVE AC-3,<AC-2>&17
4120 034031 505 06 0 00 110600 HRLI AC-3,110600 ;POINTER FOR COMPARISON
4121 034032 200 05 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
4122 034033 400 11 0 00 000000 SETZ AC, ;SETUP AC
4123 034034 200 10 0 00 000005 MOVE AC-1,<AC-4>&17 ;BYTE WORD FOR COMPARISON
4124 034035 134 11 0 00 000007 ILDB AC,<AC-2>&17 ;ILDB SHOULD PLACE 0,,3 INTO THE AC
4125 ;AND INCREMENT POINTER
4126 034036 312 07 0 00 000006 CAME AC-2,<AC-3>&17 ;WAS POINTER INCREMENTED CORRECTLY?
4127 034037 005 07 0 00 003101 ER5 AC-2,3101 ;FAILURE - POINTER NOT INCREMENTED CORRECTLY
4128 034040 302 11 0 00 000003 CAIE AC,3 ;WAS BYTE LOADED CORRECTLY?
4129 034041 003 11 0 00 013102 ER3 AC,13102 ;FAILURE - BYTE NOT LOADED CORRECTLY
4130 034042 312 05 0 00 000010 CAME AC-4,<AC-1>&17 ;WAS BYTE WORD MODIFIED?
4131 034043 012 05 0 00 013103 ER12 AC-4,13103 ;FAILURE - BYTE WORD WAS MODIFIED
4132 034044 321 13 0 00 034026 JUMPL AC+2,G13100 ;LOOP ON ERROR SWITCH
4133
4134 ;MSCL BYTE TESTS - ILDB
4135 ;VERIFY THAT ILDB WORKS WHEN POINTER IS IN AN AC AND
4136 ;BYTE IS IN CORE MEMORY
4137
4138 000010 AC=10
4139 SAVEAC (1,1)^
4140 034045 201 12 0 00 034045 MOVEI AC+2,. ;SAVE TEST PC
4141 034046 202 12 0 00 030051 MOVEM AC+2,TESTPC
4142 034047 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4143 034050 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4144 034051 254 02 1 00 040770 JRSTF @[.+1] ;CLEAR ALL FLAGS
4145
4146 034052 205 06 0 00 170600 G13110: MOVSI AC-2,170600 ;SETUP POINTER
4147 034053 541 06 0 00 040136 HRRI AC-2,BYTBLK
4148 034054 200 05 0 00 000006 MOVE AC-3,<AC-2>&17
4149 034055 505 05 0 00 110600 HRLI AC-3,110600 ;POINTER FOR COMPARISON
4150 034056 200 07 0 00 040752 MOVE AC-1,[230703,,603700] ;BYTEWORD FOR COMPARISON
4151 034057 202 10 0 00 040136 MOVEM AC,BYTBLK ;SETUP BYTE WORD
4152 034060 400 10 0 00 000000 SETZ AC, ;SETUP AC
4153 034061 134 10 0 00 000006 ILDB AC,<AC-2>&17 ;ILDB SHOULD PLACE 0,,3 INTO THE AC
4154 ;AND INCREMENT POINTER
4155 034062 312 06 0 00 000005 CAME AC-2,<AC-3>&17 ;WAS POINTER INCREMENTED CORRECTLY?
4156 034063 005 06 0 00 013111 ER5 AC-2,13111 ;FAILURE - POINTER NOT INCREMENTED CORRECTLY
4157 034064 302 10 0 00 000003 CAIE AC,3 ;WAS BYTE LOADED CORRECTLY?
4158 034065 003 10 0 00 013012 ER3 AC,13012 ;FAILURE - BYTE NOT LOADED CORRECTLY
4159 034066 200 03 0 00 040136 MOVE AC-5,BYTBLK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 55-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0116
4160 034067 312 07 0 00 040136 CAME AC-1,BYTBLK ;WAS BYTE WORD MODIFIED?
4161 034070 012 03 0 00 013113 ER12 AC-5,13113 ;FAILURE - BYTE WORD WAS MODIFIED
4162 034071 321 12 0 00 034052 JUMPL AC+2,G13110 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 56
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0117
4163 ;MSCL BYTE TESTS - ILDB
4164 ;VERIFY THAT ILDB WORKS WHEN BYTE IS IN AN AC AND
4165 ;POINTER IS IN CORE MEMORY
4166
4167 000007 AC=7
4168 SAVEAC (1,1)^
4169 034072 201 11 0 00 034072 MOVEI AC+2,. ;SAVE TEST PC
4170 034073 202 11 0 00 030051 MOVEM AC+2,TESTPC
4171 034074 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4172 034075 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4173 034076 254 02 1 00 040771 JRSTF @[.+1] ;CLEAR ALL FLAGS
4174
4175 034077 205 05 0 00 170600 G13120: MOVSI AC-2,170600
4176 034100 541 05 0 00 000003 HRRI AC-2,<AC-4>&17
4177 034101 202 05 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
4178 034102 505 05 0 00 110600 HRLI AC-2,110600 ;POINTER FOR COMPARISON
4179 034103 200 03 0 00 040752 MOVE AC-4,[230703,,603700] ;SETUP BYTE WORD
4180 034104 200 06 0 00 040752 MOVE AC-1,[230703,,603700] ;BYTE WORD FOR COMPARISON
4181 034105 400 00 0 00 000007 SETZ AC ;SETUP AC
4182 034106 134 07 0 00 040136 ILDB AC,BYTBLK ;ILDB SHOULD PLACE 0,,3 INTO THE AC
4183 ;AND INCREMENT POINTER
4184 034107 200 04 0 00 040136 MOVE AC-3,BYTBLK
4185 034110 312 05 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER INCREMENTED CORRECTLY?
4186 034111 005 04 0 00 013121 ER5 AC-3,13121 ;FAILURE - POINTER NOT INCREMENTED CORRECTLY
4187 034112 302 07 0 00 000003 CAIE AC,3 ;WAS BYTE LOADED CORRECTLY?
4188 034113 003 07 0 00 013122 ER3 AC,13122 ;FAILURE - BYTE NOT LOADED CORRECTLY
4189 034114 312 03 0 00 000006 CAME AC-4,<AC-1>&17 ;WAS BYTE WORD MODIFIED?
4190 034115 012 03 0 00 013123 ER12 AC-4,13123 ;FAILURE - BYTE WORD WAS MODIFIED
4191 034116 321 11 0 00 034077 JUMPL AC+2,G13120 ;LOOP ON ERROR SWITCH
4192
4193 ;MSCL BYTE TESTS - ILDB
4194 ;VERIFY THAT ILDB WORKS WHEN BOTH POINTER AND BYTE WORD ARE IN CORE MEMORY
4195
4196 000006 AC=6
4197 SAVEAC (1,1)^
4198 034117 201 10 0 00 034117 MOVEI AC+2,. ;SAVE TEST PC
4199 034120 202 10 0 00 030051 MOVEM AC+2,TESTPC
4200 034121 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4201 034122 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4202 034123 254 02 1 00 040772 JRSTF @[.+1] ;CLEAR ALL FLAGS
4203
4204 034124 205 04 0 00 170600 G13130: MOVSI AC-2,170600
4205 034125 541 04 0 00 040141 HRRI AC-2,BYTBLK+3
4206
4207 034126 202 04 0 00 040136 MOVEM AC-2,BYTBLK ;SETUP POINTER
4208 034127 505 04 0 00 110600 HRLI AC-2,110600 ;POINTER FOR COMPARISON
4209 034130 200 02 0 00 040752 MOVE AC-4,[230703,,603700]
4210 034131 202 02 0 00 040141 MOVEM AC-4,BYTBLK+3 ;SETUP BYTE WORD
4211 034132 200 05 0 00 040752 MOVE AC-1,[230703,,603700] ;BYTE WORD FOR COMPARISON
4212 034133 400 06 0 00 000000 SETZ AC, ;SETUP AC
4213 034134 134 06 0 00 040136 ILDB AC,BYTBLK ;ILDB SHOULD PLACE 0,,3 INTO THE AC
4214 ;AND INCREMENT THE POINTER
4215 034135 200 02 0 00 040136 MOVE AC-4,BYTBLK
4216 034136 312 04 0 00 040136 CAME AC-2,BYTBLK ;WAS POINTER INCREMENTED CORRECTLY?
4217 034137 005 02 0 00 013131 ER5 AC-4,13131 ;FAILURE - POINTER NOT INCREMENTED CORRECTLY
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 56-1
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0118
4218 034140 200 03 0 00 040141 MOVE AC-3,BYTBLK+3
4219 034141 312 05 0 00 040141 CAME AC-1,BYTBLK+3 ;WAS BYTE WORD MODIFIED?
4220 034142 012 03 0 00 013132 ER12 AC-3,13132 ;FAILURE - BYTE WORD WAS MODIFIED
4221 034143 302 06 0 00 000003 CAIE AC,3 ;WAS BYTE LOADED CORRECTLY?
4222 034144 003 06 0 00 013133 ER3 AC,13133 ;FAILURE - BYTE NOT LOADED CORRECTLY
4223 034145 321 10 0 00 034124 JUMPL AC+2,G13130 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 57
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0119
4224 ;TEST LDB WHEN SIZE OF BYTE IS ZERO BITS
4225 ;THE AC SHOULD BE CLEARED
4226
4227 000005 AC=5
4228 SAVEAC (1,1)^
4229 034146 201 07 0 00 034146 MOVEI AC+2,. ;SAVE TEST PC
4230 034147 202 07 0 00 030051 MOVEM AC+2,TESTPC
4231 034150 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4232 034151 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4233 034152 254 02 1 00 040773 JRSTF @[.+1] ;CLEAR ALL FLAGS
4234
4235 034153 201 03 0 00 000001 G13200: MOVEI AC-2,<AC-4>&17 ;SETUP POINTER
4236 034154 474 05 0 00 000000 SETO AC, ;SETUP AC
4237 034155 551 01 0 00 000010 HRRZI AC-4,10 ;SETUP BYTE WORD
4238 034156 135 05 0 00 000001 LDB AC,<AC-4>&17 ;LDB SHOULD CLEAR THE AC
4239 034157 302 05 0 00 000000 CAIE AC,0 ;WAS AC CLEARED?
4240 034160 003 05 0 00 013201 ER3 AC,13201 ;FAILURE - AC WAS NOT CLEARED
4241 034161 302 03 0 00 000001 CAIE AC-2,<AC-4>&17 ;WAS POINTER MODIFIED?
4242 034162 005 03 0 00 013202 ER5 AC-2,13202 ;FAILURE - POINTER WAS MODIFIED
4243 034163 302 01 0 00 000010 CAIE AC-4,10 ;WAS BYTE WORD MODIFIED
4244 034164 012 01 0 00 013203 ER12 AC-4,13203 ;FAILURE - BYTE WORD WAS MODIFIED
4245 034165 321 07 0 00 034153 JUMPL AC+2,G13200 ;LOOP ON ERROR SWITCH
4246
4247 ;TEST ILDB WHEN SIZE OF BYTE IS ZERO BITS
4248 ;THE AC SHOULD BE CLEARED
4249
4250 000014 AC=14
4251 SAVEAC (1,1)^
4252 034166 201 16 0 00 034166 MOVEI AC+2,. ;SAVE TEST PC
4253 034167 202 16 0 00 030051 MOVEM AC+2,TESTPC
4254 034170 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4255 034171 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4256 034172 254 02 1 00 040774 JRSTF @[.+1] ;CLEAR ALL FLAGS
4257
4258 034173 201 12 0 00 000010 G13210: MOVEI AC-2,<AC-4>&17 ;SETUP POINTER
4259 034174 474 14 0 00 000000 SETO AC, ;SETUP AC
4260 034175 551 10 0 00 000010 HRRZI AC-4,10 ;SETUP BYTE WORD
4261 034176 134 14 0 00 000010 ILDB AC,<AC-4>&17 ;ILDB SHOULD CLEAR THE AC
4262 034177 302 14 0 00 000000 CAIE AC,0 ;WAS AC CLEARED
4263 034200 003 14 0 00 013211 ER3 AC,13211 ;FAILURE - AC WAS NOT CLEARED
4264 034201 302 12 0 00 000010 CAIE AC-2,<AC-4>&17 ;WAS POINTER MODIFIED
4265 034202 005 12 0 00 013212 ER5 AC-2,13212 ;FAILURE - POINTER WAS MODIFIED
4266 034203 302 10 0 00 000010 CAIE AC-4,10 ;WAS BYTE WORD MODIFIED?
4267 034204 012 10 0 00 013213 ER12 AC-4,13213 ;FAILURE - BYTE WORD WAS MODIFIED
4268 034205 321 16 0 00 034173 JUMPL AC+2,G13210 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 58
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0120
4269 ;TEST DPB WHEN SIZE OF BYTE IS ZERO BITS
4270 ;THE AC SHOULD NOT BE AFFECTED
4271
4272 000013 AC=13
4273 SAVEAC (1,1)^
4274 034206 201 15 0 00 034206 MOVEI AC+2,. ;SAVE TEST PC
4275 034207 202 15 0 00 030051 MOVEM AC+2,TESTPC
4276 034210 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4277 034211 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4278 034212 254 02 1 00 040775 JRSTF @[.+1] ;CLEAR ALL FLAGS
4279
4280 034213 201 11 0 00 000007 G13220: MOVEI AC-2,<AC-4>&17 ;SETUP POINTER
4281 034214 474 13 0 00 000000 SETO AC, ;SETUP AC
4282 034215 551 07 0 00 000010 HRRZI AC-4,10 ;SETUP BYTE WORD
4283 034216 137 13 0 00 000007 DPB AC,<AC-4>&17 ;DPB SHOULD NOT MODIFY ANYTHING
4284 034217 312 13 0 00 040734 CAME AC,[-1] ;WAS AC MODIFIED?
4285 034220 003 13 0 00 013221 ER3 AC,13221 ;FAILURE - AC WAS MODIFIED
4286 034221 302 11 0 00 000007 CAIE AC-2,<AC-4>&17 ;WAS POINTER MODIFIED?
4287 034222 005 11 0 00 013222 ER5 AC-2,13222 ;FAILURE - POINTER WAS MODIFIED
4288 034223 302 07 0 00 000010 CAIE AC-4,10 ;WAS BYTE WORD MODIFIED?
4289 034224 012 07 0 00 013223 ER12 AC-4,13223 ;FAILURE - BYTE WORD WAS MODIFIED
4290 034225 321 15 0 00 034213 JUMPL AC+2,G13220 ;LOOP ON ERROR SWITCH
4291
4292 ;TEST IDPB WHEN SIZE OF BYTE IS ZERO BITS
4293 ;TITE AC SHOULD NOT BE AFFECTED
4294
4295 000012 AC=12
4296 SAVEAC (1,1)^
4297 034226 201 14 0 00 034226 MOVEI AC+2,. ;SAVE TEST PC
4298 034227 202 14 0 00 030051 MOVEM AC+2,TESTPC
4299 034230 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4300 034231 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4301 034232 254 02 1 00 040776 JRSTF @[.+1] ;CLEAR ALL FLAGS
4302
4303 034233 201 10 0 00 000006 G13230: MOVEI AC-2,<AC-4>&17 ;SETUP POINTER
4304 034234 474 12 0 00 000000 SETO AC, ;SETUP AC
4305 034235 551 06 0 00 000010 HRRZI AC-4,10 ;SETUP BYTE WORD
4306 034236 136 12 0 00 000006 IDPB AC,<AC-4>&17 ;IDPB SHOULD NOT MODIFY ANYTHING
4307 034237 312 12 0 00 040734 CAME AC,[-1] ;WAS AC MODIFIED?
4308 034240 003 12 0 00 013231 ER3 AC,13231 ;FAILURE - AC WAS MODIFIED
4309 034241 302 10 0 00 000006 CAIE AC-2,<AC-4>&17 ;WAS POINTER MODIFIED
4310 034242 005 10 0 00 013232 ER5 AC-2,13232 ;FAILURE - POINTER WAS MODIFIED
4311 034243 302 06 0 00 000010 CAIE AC-4,10 ;WAS BYTE WORD MODIFIED
4312 034244 012 06 0 00 013233 ER12 AC-4,13233 ;FAILURE - BYTE WORD WAS MODIFIED
4313 034245 321 14 0 00 034233 JUMPL AC+2,G13230 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 59
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0121
4314 ;TEST IBP WHEN SIZE OF BYTE IS ZERO BITS
4315 ;THE AC SHOULD NOT BE AFFECTED
4316
4317 000011 AC=11
4318 SAVEAC (1,1)^
4319 034246 201 13 0 00 034246 MOVEI AC+2,. ;SAVE TEST PC
4320 034247 202 13 0 00 030051 MOVEM AC+2,TESTPC
4321 034250 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4322 034251 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4323 034252 254 02 1 00 040777 JRSTF @[.+1] ;CLEAR ALL FLAGS
4324
4325 034253 201 07 0 00 000005 G13240: MOVEI AC-2,<AC-4>&17 ;SETUP POINTER
4326 034254 474 11 0 00 000000 SETO AC, ;SETUP AC
4327 034255 551 05 0 00 000010 HRRZI AC-4,10 ;SETUP BYTE WORD
4328 034256 336 00 0 00 030041 SKIPN KLFLG
4329 034257 133 11 0 00 000005 IBP AC,<AC-4>&17 ;IBP SHOULD NOT MODIFY ANYTHING
4330 034260 332 00 0 00 030041 SKIPE KLFLG
4331 034261 133 00 0 00 000005 IBP 0,<AC-4>&17 ;KL10, DON'T DO ADJBP !
4332 034262 312 11 0 00 040734 CAME AC,[-1] ;WAS AC MODIFIED?
4333 034263 003 11 0 00 013241 ER3 AC,13241 ;FAILURE - AC WAS MODIFIED
4334 034264 302 07 0 00 000005 CAIE AC-2,<AC-4>&17 ;WASPOINTER MODIFIED?
4335 034265 005 07 0 00 013242 ER5 AC-2,13242 ;FAILURE - POINTER WAS MODIFIED
4336 034266 302 05 0 00 000010 CAIE AC-4,10 ;WAS BYTE WORD MODIFIED
4337 034267 012 05 0 00 013243 ER12 AC-4,13243 ;FAILURE - BYTE WORD WAS MODIFIED
4338 034270 321 13 0 00 034253 JUMPL AC+2,G13240 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 60
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0122
4339 ;TEST LDB WHEN SIZE OF BYTE IS ONE BIT
4340
4341 000010 AC=10
4342 SAVEAC (1,1)^
4343 034271 201 12 0 00 034271 MOVEI AC+2,. ;SAVE TEST PC
4344 034272 202 12 0 00 030051 MOVEM AC+2,TESTPC
4345 034273 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4346 034274 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4347 034275 254 02 1 00 041000 JRSTF @[.+1] ;CLEAR ALL FLAGS
4348
4349 034276 205 06 0 00 430100 G13300: MOVSI AC-2,430100
4350 034277 541 06 0 00 000004 HRRI AC-2,<AC-4>&17 ;SETUP POINTER
4351 034300 200 07 0 00 000006 MOVE AC-1,<AC-2>&17 ;POINTER FOR COMPARISON
4352 034301 561 10 0 00 000000 HRROI AC,0 ;SETUP AC
4353 034302 515 04 0 00 777777 HRLZI AC-4,-1 ;SETUP BYTE WORD
4354 034303 200 05 0 00 000004 MOVE AC-3,<AC-4>&17 ;BYTE OWRD FOR COMPARISON
4355 034304 135 10 0 00 000006 LDB AC,<AC-2>&17 ;LDB SHOULD PLACE 0,,1 INTO THE AC
4356 034305 302 10 0 00 000001 CAIE AC,1 ;LOOP ON ERROR SWITCH
4357 034306 003 10 0 00 013301 ER3 AC,13301 ;FAILURE - BYTE NOT LOADED CORRECTLY
4358 034307 312 06 0 00 000007 CAME AC-2,<AC-1>&17 ;WAS POINTER MODIFIED?
4359 034310 005 06 0 00 013302 ER5 AC-2,13302 ;FAILURE POINTER WAS MODIFIED
4360 034311 312 04 0 00 000005 CAME AC-4,<AC-3>&17 ;WAS BYTE WORD MODIFIED?
4361 034312 012 04 0 00 013303 ER12 AC-4,13303 ;FAILURE - BYTE OWRD WAS MODIFIED
4362 034313 321 12 0 00 034276 JUMPL AC+2,G13300 ;LOOP ON ERROR SWITCH
4363
4364 ;TEST LDB WHEN SIZE OF BYTE IS ONE BIT
4365
4366 000007 AC=7
4367 SAVEAC (1,1)^
4368 034314 201 11 0 00 034314 MOVEI AC+2,. ;SAVE TEST PC
4369 034315 202 11 0 00 030051 MOVEM AC+2,TESTPC
4370 034316 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4371 034317 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4372 034320 254 02 1 00 041001 JRSTF @[.+1] ;CLEAR ALL FLAGS
4373
4374 034321 205 05 0 00 000100 G13310: MOVSI AC-2,100
4375 034322 541 05 0 00 000003 HRRI AC-2,<AC-4>&17 ;SETUP POINTER
4376 034323 200 06 0 00 000005 MOVE AC-1,<AC-2>&17 ;POINTER FOR COMPARISON
4377 034324 561 07 0 00 000000 HRROI AC,0 ;SETUP AC
4378 034325 525 03 0 00 000000 HRLOI AC-4,0 ;SETUP BYTE WORD
4379 034326 200 04 0 00 000003 MOVE AC-3,<AC-4>&17 ;BYTE WORD FOR COMPARISON
4380 034327 135 07 0 00 000005 LDB AC,<AC-2>&17 ;LDB SHOULD PLACE 0,,1 INTO THE AC
4381 034330 302 07 0 00 000001 CAIE AC,1 ;LOOP ON ERROR SWITCH
4382 034331 003 07 0 00 013311 ER3 AC,13311 ;FAILURE - BYTE NOT LOADED CORRECTLY
4383 034332 312 05 0 00 000006 CAME AC-2,<AC-1>&17 ;WAS POINTER MODIFIED
4384 034333 005 05 0 00 013312 ER5 AC-2,13312 ;FAILURE - POINTER WAS MODIFIED
4385 034334 312 03 0 00 000004 CAME AC-4,<AC-3>&17 ;WAS BYTE WORD MODIFIED
4386 034335 012 03 0 00 013313 ER12 AC-4,13313 ;FAILURE - BYTE WORD WAS MODIFIED
4387 034336 321 11 0 00 034321 JUMPL AC+2,G13310 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 61
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0123
4388 ;TEST DPB WHEN SIZE OF BYTE IS ONE BIT
4389
4390 000006 AC=6
4391 SAVEAC (1,1)^
4392 034337 201 10 0 00 034337 MOVEI AC+2,. ;SAVE TEST PC
4393 034340 202 10 0 00 030051 MOVEM AC+2,TESTPC
4394 034341 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4395 034342 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4396 034343 254 02 1 00 041002 JRSTF @[.+1] ;CLEAR ALL FLAGS
4397
4398 034344 205 04 0 00 430100 G13320: MOVSI AC-2,430100
4399 034345 541 04 0 00 000002 HRRI AC-2,<AC-4>&17 ;SETUP POINTER
4400 034346 200 05 0 00 000004 MOVE AC-1,<AC-2>&17 ;POINTER FOR COMPARISON
4401 034347 561 06 0 00 000076 HRROI AC,76 ;SETUP AC
4402 034350 202 06 0 00 000001 MOVEM AC,<AC-5>&17 ;AC FOR COMPARISON
4403 034351 474 02 0 00 000000 SETO AC-4, ;SETUP BYTE WORD
4404 034352 200 03 0 00 041003 MOVE AC-3,[377777,,-1] ;BYTE WORD FOR COMPARISON
4405 034353 137 06 0 00 000004 DPB AC,<AC-2>&17 ;DPB SHOULD PLACE 377777,,-1 INTO BYTE WORD
4406 034354 312 06 0 00 000001 CAME AC,<AC-5>&17 ;WAS AC MODIFIED?
4407 034355 003 06 0 00 013321 ER3 AC,13321 ;FAILURE - AC WAS MODIFIED
4408 034356 312 04 0 00 000005 CAME AC-2,<AC-1>&17 ;WAS POINTER MODIFIED
4409 034357 005 04 0 00 013322 ER5 AC-2,13322 ;FAILURE - POINTER WAS MODIFIED
4410 034360 312 02 0 00 000003 CAME AC-4,<AC-3>&17 ;WAS BYTE DEPOSITED CORRECTLY
4411 034361 012 02 0 00 013323 ER12 AC-4,13323 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
4412 034362 321 10 0 00 034344 JUMPL AC+2,G13320 ;LOOP ON ERROR SWITCH
4413
4414 ;TEST DPB WHEN SIZE OF BYTE IS ONE BIT
4415
4416 000005 AC=5
4417 SAVEAC (1,1)^
4418 034363 201 07 0 00 034363 MOVEI AC+2,. ;SAVE TEST PC
4419 034364 202 07 0 00 030051 MOVEM AC+2,TESTPC
4420 034365 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4421 034366 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4422 034367 254 02 1 00 041004 JRSTF @[.+1] ;CLEAR ALL FLAGS
4423
4424 034370 205 03 0 00 000100 G13330: MOVSI AC-2,100
4425 034371 541 03 0 00 000001 HRRI AC-2,<AC-4>&17 ;SETUP POINTER
4426 034372 200 04 0 00 000003 MOVE AC-1,<AC-2>&17 ;POINTER FOR COMPARISON
4427 034373 561 05 0 00 000076 HRROI AC,76 ;SETUP AC
4428 034374 202 05 0 00 000000 MOVEM AC,<AC-5>&17 ;AC FOR COMPARISON
4429 034375 474 01 0 00 000000 SETO AC-4, ;SETUP BYTE WORD
4430 034376 200 02 0 00 041005 MOVE AC-3,[-2] ;BYTE WORD FOR COMPARISON
4431 034377 137 05 0 00 000003 DPB AC,<AC-2>&17 ;DPB SHOULD PLACE -1,,-2 INTO BYTE WORD
4432 034400 312 05 0 00 000000 CAME AC,<AC-5>&17 ;WAS AC MODIFIED
4433 034401 003 05 0 00 013331 ER3 AC,13331 ;FAILURE - AC WAS MODIFIED
4434 034402 312 03 0 00 000004 CAME AC-2,<AC-1>&17 ;WAS POINTER MODIFIED
4435 034403 005 03 0 00 013332 ER5 AC-2,13332 ;FAILURE - POINTER WAS MODIFIED
4436 034404 312 01 0 00 000002 CAME AC-4,<AC-3>&17 ;WAS BYTE DEPOSITED CORRECTLY
4437 034405 012 01 0 00 013333 ER12 AC-4,13333 ;FAILURE - BYTE NOT DEPOSITED CORRECTLY
4438 034406 321 07 0 00 034370 JUMPL AC+2,G13330 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 62
DAKAMM MAC 20-JAN-77 11:34 PART IB-GENERAL BYTE TEST SEQ 0124
4439 ;TEST IBP WHEN S IS GREATER THAN P AND THE ADDRESS FIELD OF THE POINTER IS 777777
4440 ;IBP SHOULD CAUSE THE ADDRESS FIELD TO CLEAR AND P SHOULD BECOME 44-S
4441
4442 000004 AC=4
4443 SAVEAC (1,1)^
4444 034407 201 06 0 00 034407 MOVEI AC+2,. ;SAVE TEST PC
4445 034410 202 06 0 00 030051 MOVEM AC+2,TESTPC
4446 034411 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4447 034412 202 06 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4448 034413 254 02 1 00 041006 JRSTF @[.+1] ;CLEAR ALL FLAGS
4449
4450 034414 525 02 0 00 000100 G13400: HRLOI AC-2,000100 ;SETUP POINTER
4451 034415 515 01 0 00 430101 HRLZI AC-3,430101 ;RESULT FOR COMPARISON (KA)
4452 034416 133 00 0 00 000002 IBP <AC-2>&17 ;IBP SHOULD PLACE 430100,,0 INTO PTR
4453 034417 312 02 0 00 000001 CAME AC-2,<AC-3>&17 ;PASS IF POINTER UPATED CORRECTLY
4454 034420 005 02 0 00 013400 ER5 AC-2,13400 ;POINTER NOT UPDATED CORRECTLY
4455 034421 321 06 0 00 034414 JUMPL AC+2,G13400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 63
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0125
4456 SUBTTL PART II - GENERAL BLOCK TRANSFER TEST
4457
4458 034422 201 00 0 00 041007 MOVEI [ASCIZ/BLT FAILED/]
4459 034423 202 00 0 00 040646 MOVEM SPDES ;INITIALIZE SPECIAL FAILURE DESCRIPTOR
4460
4461 ;VERFIY THAT BLT WILL TRANSFER A 1 - WORD BLOCK OF ZEROS
4462 ;WHERE BOTH SOURCE AND DESTINATION BLOCKS ARE THE SAME
4463 ;AND WITHIN THE AC ADDRESS RANGE.
4464 000007 AC=7
4465 SAVEAC (1,1)^
4466 034424 201 11 0 00 034424 MOVEI AC+2,. ;SAVE TEST PC
4467 034425 202 11 0 00 030051 MOVEM AC+2,TESTPC
4468 034426 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4469 034427 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4470 022100 SN=22100
4471 000001 SRCE=<AC-6>&17 ;SOURCE BLOCK=AC-6
4472 000001 DEST=<AC-6>&17 ;DESTINATION BLOCK=AC-6
4473 000001 SIZ=1 ;BLOCK SIZE = 1 OWRD
4474
4475 034430 200 07 0 00 041012 G22100: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH ADR OF SRCE AND DEST
4476 034431 477 00 0 00 000002 SETOB SRCE-1,SRCE+1 ;PRELOAD SRCE-1 AND SRCE+1 WITH ONES
4477 034432 402 00 0 00 000001 SETZM SRCE ;LOAD SRCE WITH ZEROS
4478 034433 251 07 0 00 000001 BLT AC,DEST+SIZ-1 ;*BLT SHOULD CLEAR DEST BLOCK
4479 022101 SN=SN+1
4480 034434 312 00 0 00 040734 CAME DEST-1,[-1] ;WAS DEST-1 CLOBBERRED?
4481 034435 002 00 0 00 022101 ER2 DEST-1,SN ;DEST -1 WAS CLOBBERRED
4482 022102 SN=SN+1
4483 034436 332 00 0 00 000001 SKIPE DEST ;DID BLT LOAD DEST FROM SRCE?
4484 034437 002 01 0 00 022102 ER2 DEST,SN ;FAIL IF C(DEST) NON-ZERO
4485 022103 SN=SN+1
4486 034440 312 02 0 00 040734 CAME DEST+1,[-1] ;WAS DEST+1 CLOBBERRED?
4487 034441 002 02 0 00 022103 ER2 DEST+1,SN ;DEST +1 WAS CLOBBERRED
4488 034442 321 11 0 00 034430 JUMPL AC+2,G22100 ;LOOP ON ERROR SWITCH
4489 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 63-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0126
4490 ;VERIFY THAT BLT WILL TRANSFER A 1 - WORD BLOCK OF ONES
4491 ;WHERE BOTH SOURCE AND DESTINATION BLOCKS ARE THE SAME
4492 ;AND WITHIN THE AC ADDRESS RANGE.
4493 000014 AC=14
4494 SAVEAC (1,1)^
4495 034443 201 16 0 00 034443 MOVEI AC+2,. ;SAVE TEST PC
4496 034444 202 16 0 00 030051 MOVEM AC+2,TESTPC
4497 034445 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4498 034446 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4499 022200 SN=22200
4500 000006 SRCE=<AC-6>&17 ;SOURCE BLOCK = AC-6
4501 000006 DEST=<AC-6>&17 ;DESTINATION BLOCK = AC-6
4502 000001 SIZ=1 ;BLOCK = 1 WORD
4503
4504 034447 200 14 0 00 041013 G22200: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH ADR OF SRCE AND DEST
4505 034450 403 05 0 00 000007 SETZB SRCE-1,SRCE+1 ;PRELOAD SRCE-1 AND SRCE+1 WITH ZEROS
4506 034451 476 00 0 00 000006 SETOM SRCE ;LOAD SRCE WITH ONES
4507 034452 251 14 0 00 000006 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DEST WITH ONES
4508 022201 SN=SN+1
4509 034453 332 00 0 00 000005 SKIPE DEST-1 ;WAS DEST-1 CLOBBERRED?
4510 034454 002 05 0 00 022201 ER2 DEST-1,SN ;DEST-1 WAS CLOBBERRED
4511 022202 SN=SN+1
4512 034455 312 06 0 00 040734 CAME DEST,[-1] ;DID BLT LOAD DEST FROM SRCE?
4513 034456 002 06 0 00 022202 ER2 DEST,SN ;FAIL IF C(DEST) NOT ALL ONES
4514 022203 SN=SN+1
4515 034457 332 00 0 00 000007 SKIPE DEST+1 ;WAS DEST+1 CLOBBERRED?
4516 034460 002 07 0 00 022203 ER2 DEST+1,SN ;DEST+1 WAS CLOBBERRED
4517 034461 321 16 0 00 034447 JUMPL AC+2,G22200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 64
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0127
4518 ;VERIFY THAT BLT WILL TRANSFER A 1 - WORD BLOCK OF DATA
4519 ;WHERE BOTH SOURCE AND DESTINATION BLOCKS ARE THE SAME
4520 ;AND WITHIN THE AC ADDRESS RANGE.
4521
4522 000014 AC=14
4523 SAVEAC (1,1)^
4524 034462 201 16 0 00 034462 MOVEI AC+2,. ;SAVE TEST PC
4525 034463 202 16 0 00 030051 MOVEM AC+2,TESTPC
4526 034464 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4527 034465 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4528 022300 SN=22300
4529 000006 SRCE=<AC-6>&17 ;SOURCE BLOCK = AC-6
4530 000006 DEST=<AC-6>&17 ;DESTINATION BLOCK = AC-6
4531 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
4532
4533 034466 200 14 0 00 041013 G22300: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH ADR OF ARCE AND DEST
4534 034467 403 05 0 00 000007 SETZB SRCE-1,SRCE+1 ;CLEAR SRCE-1 AND SRCE+1
4535 034470 200 06 0 00 040752 MOVE SRCE,[230703,,603700] ;PRELOAD SOURCE BLOCK
4536 034471 251 14 0 00 000006 BLT AC,DEST+SIZ-1 ;*BLT SHOULD PLACE C(SRCE) INTO DEST
4537 022301 SN=SN+1
4538 034472 332 00 0 00 000005 SKIPE DEST-1 ;WAS DEST-1 CLOBBERRED?
4539 034473 002 05 0 00 022301 ER2 DEST-1,SN ;DEST-1 WAS CLOBBERRED
4540 022302 SN=SN+1
4541 034474 312 06 0 00 040752 CAME DEST,[230703,,603700] ;DID BLT LOAD DEST FROM SRCE
4542 034475 002 06 0 00 022302 ER2 DEST,SN ;FAIL IF C(DEST) NOT 230703,,603700
4543 022303 SN=SN+1
4544 034476 332 00 0 00 000007 SKIPE DEST+1 ;WAS DEST+1 CLOBBERRED?
4545 034477 002 07 0 00 022303 ER2 DEST+1,SN ;DEST+1 WAS CLOBBERRED
4546 034500 321 16 0 00 034466 JUMPL AC+2,G22300 ;LOOP ON ERROR SWITCH
4547 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 64-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0128
4548 ;VERIFY THAT BLT WILL TRANSFER A 1 - WORD BLOCK OF ZEROS
4549 ;WHERE BOTH SOURCE AND DESTINATION BLOCKS ARE THE SAME
4550 ;AND BEYOND THE AC ADDRESS RANGE.
4551 000014 AC=14
4552 SAVEAC (1,1)^
4553 034501 201 16 0 00 034501 MOVEI AC+2,. ;SAVE TEST PC
4554 034502 202 16 0 00 030051 MOVEM AC+2,TESTPC
4555 034503 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4556 034504 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4557 022400 SN=22400
4558 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK = BLTBLK+1
4559 040221 DEST=BLTBLK+1 ;DEST BLOCK = BLTBLK+1
4560 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
4561
4562 034505 200 14 0 00 041014 G22400: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH ADR OF SRCE AND DEST
4563 034506 476 00 0 00 040220 SETOM SRCE-1 ;PRELOAD SRCE-1 WITH ONES
4564 034507 402 00 0 00 040221 SETZM SRCE ;LOAD SRCE WITH ZEROS
4565 034510 476 00 0 00 040222 SETOM SRCE+1 ;PRELOAD SRCE+1 WITH ONES
4566 034511 251 14 0 00 040221 BLT AC,DEST+SIZ-1 ;*BLT SHOULD CLEAR DEST BLOCK
4567 022401 SN=SN+1
4568 034512 200 13 0 00 040220 MOVE AC-1,DEST-1
4569 034513 312 13 0 00 040734 CAME AC-1,[-1] ;WAS DEST-1 CLOBBERRED?
4570 034514 002 13 0 00 022401 ER2 AC-1,SN ;DEST-1 WAS CLOBBERRED
4571 022402 SN=SN+1
4572 034515 200 13 0 00 040221 MOVE AC-1,DEST
4573 034516 332 00 0 00 000013 SKIPE AC-1 ;DID BLT LOAD DEST FROM SRCE?
4574 034517 002 13 0 00 022402 ER2 AC-1,SN ;FAIL IF C(DEST) NOT ZERO
4575 022403 SN=SN+1
4576 034520 200 13 0 00 040222 MOVE AC-1,DEST+1
4577 034521 312 13 0 00 040734 CAME AC-1,[-1] ;WAS DEST+1 CLOBBERRED?
4578 034522 002 13 0 00 022403 ER2 AC-1,SN ;DEST+1 WAS CLOBBERRED
4579 034523 321 15 0 00 034505 JUMPL AC+1,G22400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 65
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0129
4580 ;VERIFY THAT BLT WILL TRANSFER A 1 - WORD BLOCK OF ONES
4581 ;WHERE BOTH SOURCE AND DESTINATION BLOCKS ARE THE SAME
4582 ;AND BEYOND THE AC ADDRESS RANGE.
4583
4584 000013 AC=13
4585 SAVEAC (1,1)^
4586 034524 201 15 0 00 034524 MOVEI AC+2,. ;SAVE TEST PC
4587 034525 202 15 0 00 030051 MOVEM AC+2,TESTPC
4588 034526 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4589 034527 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4590 022500 SN=22500
4591 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK = BLTBLK+1
4592 040221 DEST=BLTBLK+1 ;DEST BLOCK = BLTBLK+1
4593 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
4594
4595 034530 200 13 0 00 041014 G22500: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH ADR OF SRCE AND DEST
4596 034531 402 00 0 00 040220 SETZM SRCE-1 ;PRELOAD SRCE-1 WITH ZEROS
4597 034532 476 00 0 00 040221 SETOM SRCE ;LOAD SRCE WITH ONES
4598 034533 402 00 0 00 040222 SETZM SRCE+1 ;PRELOAD SRCE+1 WITH ZEROS
4599 034534 251 13 0 00 040221 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DEST BLOCK WITH ONES
4600 022501 SN=SN+1
4601 034535 200 12 0 00 040220 MOVE AC-1,DEST-1
4602 034536 332 00 0 00 000012 SKIPE AC-1 ;WAS DEST-1 CLOBBERRED?
4603 034537 002 12 0 00 022501 ER2 AC-1,SN ;DEST-1 WAS CLOBBERRED
4604 022502 SN=SN+1
4605 034540 200 12 0 00 040221 MOVE AC-1,DEST
4606 034541 312 12 0 00 040734 CAME AC-1,[-1] ;DID BLT LOAD DEST FROM SRCE?
4607 034542 002 12 0 00 022502 ER2 AC-1,SN ;FAIL IF C(DEST) NOT ALL ONES
4608 022503 SN=SN+1
4609 034543 200 12 0 00 040222 MOVE AC-1,DEST+1
4610 034544 332 00 0 00 000012 SKIPE AC-1 ;WAS DEST+1 CLOBBERRED?
4611 034545 002 12 0 00 022503 ER2 AC-1,SN ;DEST+1 WAS CLOBBERRED
4612 034546 321 15 0 00 034530 JUMPL AC+2,G22500 ;LOOP ON ERROR SWITCH
4613 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 65-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0130
4614 ;VERIFY THAT BLT WILL TRANSFER A 1 - WORD BLOCK OF DATA
4615 ;WHERE BOTH SOURCE AND DESTINATION BLOCKS ARE THE SAME
4616 ;AND BEYOND THE AC ADDRESS RANGE.
4617
4618 000012 AC=12
4619 SAVEAC (1,1)^
4620 034547 201 14 0 00 034547 MOVEI AC+2,. ;SAVE TEST PC
4621 034550 202 14 0 00 030051 MOVEM AC+2,TESTPC
4622 034551 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4623 034552 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4624 022600 SN=22600
4625 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK = BLTBLK+1
4626 040221 DEST=BLTBLK+1 ;DEST BLOCK = BLTBLK+1
4627 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
4628
4629 034553 200 12 0 00 041014 G22600: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH ADR OF SRCE AND DEST
4630 034554 402 00 0 00 040220 SETZM SRCE-1 ;PRELOAD SRCE-1 WITH ZEROS
4631 034555 200 13 0 00 040752 MOVE AC+1,[230703,,603700] ;LOAD SRCE BLOCK
4632 034556 202 13 0 00 040221 MOVEM AC+1,SRCE
4633 034557 402 00 0 00 040222 SETZM SRCE+1 ;PRELOAD SRCE+1 WITH ZEROS
4634 034560 251 12 0 00 040221 BLT AC,DEST+SIZ-1 ;*BLT SHOULD PLACE C(SRCE) INTO DEST
4635 022601 SN=SN+1
4636 034561 200 11 0 00 040220 MOVE AC-1,DEST-1
4637 034562 332 00 0 00 000011 SKIPE AC-1 ;WAS DEST-1 CLOBBERRED?
4638 034563 002 11 0 00 022601 ER2 AC-1,SN ;DEST-1 WAS CLOBBERRED
4639 022602 SN=SN+1
4640 034564 200 11 0 00 040221 MOVE AC-1,DEST
4641 034565 312 11 0 00 040752 CAME AC-1,[230703,,603700] ;DID BLT LOAD DEST FROM SRCE?
4642 034566 002 11 0 00 022602 ER2 AC-1,SN ;FAIL IF C(DEST) NOT 230703,,603700
4643 022603 SN=SN+1
4644 034567 200 11 0 00 040222 MOVE AC-1,DEST+1
4645 034570 332 00 0 00 000011 SKIPE AC-1 ;WAS DEST+1 CLOBBERRED?
4646 034571 002 11 0 00 022603 ER2 AC-1,SN ;DEST+1 WAS CLOBBERRED
4647 034572 321 13 0 00 034553 JUMPL AC+1,G22600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0131
4648 ;BOTH SOURCE AND DESTINATION BLOCKS HAVE AC ADDRESSES.
4649
4650 BLTM1 (22700,14,<<AC-6>&17>,<<AC-3>&17>,0)^
4651 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
4652 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
4653 ;SOURCE DATA = 0
4654
4655 000014 AC=14
4656 SAVEAC (1,1)^
4657 034573 201 16 0 00 034573 MOVEI AC+2,. ;SAVE TEST PC
4658 034574 202 16 0 00 030051 MOVEM AC+2,TESTPC
4659 034575 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4660 034576 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4661 022700 SN=22700
4662 000006 SRCE=<AC-6>&17 ;1ST LOC OF SOURCE = <AC-6>&17
4663 000011 DEST=<AC-3>&17 ;1ST LOC OF DESTINATION = <AC-3>&17
4664 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
4665
4666 034577 200 14 0 00 041015 G22700: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
4667 GMOV (SRCE-1,<252525252525>)^
4668 IFLE <SRCE-1-20>,<
4669 034600 200 05 0 00 041016 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
4670 IFG <SRCE-1-20>,<
4671 MOVE AC+1,[252525252525]
4672 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
4673 GMOV (SRCE,<0>)^
4674 IFLE <SRCE-20>,<
4675 034601 200 06 0 00 041011 MOVE SRCE,[0] ;PRELOAD SRCE WITH 0>
4676 IFG <SRCE-20>,<
4677 MOVE AC+1,[0]
4678 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 0>^
4679 GMOV (SRCE+1,<770077007700>)^
4680 IFLE <SRCE+1-20>,<
4681 034602 200 07 0 00 041017 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
4682 IFG <SRCE+1-20>,<
4683 MOVE AC+1,[770077007700]
4684 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
4685 GMOV (DEST-1,<070707070707>)^
4686 IFLE <DEST-1-20>,<
4687 034603 200 10 0 00 041020 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
4688 IFG <DEST-1-20>,<
4689 MOVE AC+1,[070707070707]
4690 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
4691 GMOV (DEST,<123456765432>)^
4692 IFLE <DEST-20>,<
4693 034604 200 11 0 00 041021 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
4694 IFG <DEST-20>,<
4695 MOVE AC+1,[123456765432]
4696 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
4697 GMOV (DEST+1,<552255225522>)^
4698 IFLE <DEST+1-20>,<
4699 034605 200 12 0 00 041022 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
4700 IFG <DEST+1-20>,<
4701 MOVE AC+1,[552255225522]
4702 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0132
4703 034606 251 14 0 00 000011 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
4704 GCAM (SRCE-1,<252525252525>)^
4705 022701 SN=SN+1
4706 IFG <SRCE-1-20>,<
4707 MOVE AC-1,SRCE-1
4708 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
4709 IFIDN <DEST>,<SRCE-1>,<
4710 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4711 IFDIF <DEST>,<SRCE-1>,<
4712 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
4713 IFLE <SRCE-1-20>,<
4714 034607 312 05 0 00 041016 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
4715 IFIDN <DEST>,<SRCE-1>,<
4716 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
4717 IFDIF <DEST>,<SRCE-1>,<
4718 034610 002 05 0 00 022701 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
4719 GCAM (SRCE,<0>)^
4720 022702 SN=SN+1
4721 IFG <SRCE-20>,<
4722 MOVE AC-1,SRCE
4723 CAME AC-1,[0] ;IS C(SRCE) = 0
4724 IFIDN <DEST>,<SRCE>,<
4725 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4726 IFDIF <DEST>,<SRCE>,<
4727 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
4728 IFLE <SRCE-20>,<
4729 034611 312 06 0 00 041011 CAME SRCE,[0] ;IS C(SRCE) = 0
4730 IFIDN <DEST>,<SRCE>,<
4731 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
4732 IFDIF <DEST>,<SRCE>,<
4733 034612 002 06 0 00 022702 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
4734 GCAM (SRCE+1,<770077007700>)^
4735 022703 SN=SN+1
4736 IFG <SRCE+1-20>,<
4737 MOVE AC-1,SRCE+1
4738 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
4739 IFIDN <DEST>,<SRCE+1>,<
4740 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4741 IFDIF <DEST>,<SRCE+1>,<
4742 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
4743 IFLE <SRCE+1-20>,<
4744 034613 312 07 0 00 041017 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
4745 IFIDN <DEST>,<SRCE+1>,<
4746 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
4747 IFDIF <DEST>,<SRCE+1>,<
4748 034614 002 07 0 00 022703 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
4749 GCAM (DEST-1,<070707070707>)^
4750 022704 SN=SN+1
4751 IFG <DEST-1-20>,<
4752 MOVE AC-1,DEST-1
4753 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
4754 IFIDN <DEST>,<DEST-1>,<
4755 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4756 IFDIF <DEST>,<DEST-1>,<
4757 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-2
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0133
4758 IFLE <DEST-1-20>,<
4759 034615 312 10 0 00 041020 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
4760 IFIDN <DEST>,<DEST-1>,<
4761 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
4762 IFDIF <DEST>,<DEST-1>,<
4763 034616 002 10 0 00 022704 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
4764 GCAM (DEST,<0>)^
4765 022705 SN=SN+1
4766 IFG <DEST-20>,<
4767 MOVE AC-1,DEST
4768 CAME AC-1,[0] ;IS C(DEST) = 0
4769 IFIDN <DEST>,<DEST>,<
4770 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4771 IFDIF <DEST>,<DEST>,<
4772 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
4773 IFLE <DEST-20>,<
4774 034617 312 11 0 00 041011 CAME DEST,[0] ;IS C(DEST) = 0
4775 IFIDN <DEST>,<DEST>,<
4776 034620 002 11 0 00 022705 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
4777 IFDIF <DEST>,<DEST>,<
4778 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
4779 GCAM (DEST+1,<552255225522>)^
4780 022706 SN=SN+1
4781 IFG <DEST+1-20>,<
4782 MOVE AC-1,DEST+1
4783 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
4784 IFIDN <DEST>,<DEST+1>,<
4785 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4786 IFDIF <DEST>,<DEST+1>,<
4787 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
4788 IFLE <DEST+1-20>,<
4789 034621 312 12 0 00 041022 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
4790 IFIDN <DEST>,<DEST+1>,<
4791 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
4792 IFDIF <DEST>,<DEST+1>,<
4793 034622 002 12 0 00 022706 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
4794 034623 321 16 0 00 034577 JUMPL AC+2,G22700 ;LOOP ON ERROR^
4795 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-3
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0134
4796 ;BOTH SOURCE AND DESTINATION BLOCKS HAVE AC ADDRESSES.
4797
4798 BLTM1 (23000,13,<<AC-6>&17>,<<AC-3>&17>,-1)^
4799 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
4800 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
4801 ;SOURCE DATA = -1
4802
4803 000013 AC=13
4804 SAVEAC (1,1)^
4805 034624 201 15 0 00 034624 MOVEI AC+2,. ;SAVE TEST PC
4806 034625 202 15 0 00 030051 MOVEM AC+2,TESTPC
4807 034626 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4808 034627 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4809 023000 SN=23000
4810 000005 SRCE=<AC-6>&17 ;1ST LOC OF SOURCE = <AC-6>&17
4811 000010 DEST=<AC-3>&17 ;1ST LOC OF DESTINATION = <AC-3>&17
4812 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
4813
4814 034630 200 13 0 00 041023 G23000: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
4815 GMOV (SRCE-1,<252525252525>)^
4816 IFLE <SRCE-1-20>,<
4817 034631 200 04 0 00 041016 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
4818 IFG <SRCE-1-20>,<
4819 MOVE AC+1,[252525252525]
4820 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
4821 GMOV (SRCE,<-1>)^
4822 IFLE <SRCE-20>,<
4823 034632 200 05 0 00 040734 MOVE SRCE,[-1] ;PRELOAD SRCE WITH -1>
4824 IFG <SRCE-20>,<
4825 MOVE AC+1,[-1]
4826 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH -1>^
4827 GMOV (SRCE+1,<770077007700>)^
4828 IFLE <SRCE+1-20>,<
4829 034633 200 06 0 00 041017 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
4830 IFG <SRCE+1-20>,<
4831 MOVE AC+1,[770077007700]
4832 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
4833 GMOV (DEST-1,<070707070707>)^
4834 IFLE <DEST-1-20>,<
4835 034634 200 07 0 00 041020 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
4836 IFG <DEST-1-20>,<
4837 MOVE AC+1,[070707070707]
4838 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
4839 GMOV (DEST,<123456765432>)^
4840 IFLE <DEST-20>,<
4841 034635 200 10 0 00 041021 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
4842 IFG <DEST-20>,<
4843 MOVE AC+1,[123456765432]
4844 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
4845 GMOV (DEST+1,<552255225522>)^
4846 IFLE <DEST+1-20>,<
4847 034636 200 11 0 00 041022 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
4848 IFG <DEST+1-20>,<
4849 MOVE AC+1,[552255225522]
4850 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-4
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0135
4851 034637 251 13 0 00 000010 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
4852 GCAM (SRCE-1,<252525252525>)^
4853 023001 SN=SN+1
4854 IFG <SRCE-1-20>,<
4855 MOVE AC-1,SRCE-1
4856 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
4857 IFIDN <DEST>,<SRCE-1>,<
4858 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4859 IFDIF <DEST>,<SRCE-1>,<
4860 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
4861 IFLE <SRCE-1-20>,<
4862 034640 312 04 0 00 041016 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
4863 IFIDN <DEST>,<SRCE-1>,<
4864 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
4865 IFDIF <DEST>,<SRCE-1>,<
4866 034641 002 04 0 00 023001 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
4867 GCAM (SRCE,<-1>)^
4868 023002 SN=SN+1
4869 IFG <SRCE-20>,<
4870 MOVE AC-1,SRCE
4871 CAME AC-1,[-1] ;IS C(SRCE) = -1
4872 IFIDN <DEST>,<SRCE>,<
4873 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4874 IFDIF <DEST>,<SRCE>,<
4875 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
4876 IFLE <SRCE-20>,<
4877 034642 312 05 0 00 040734 CAME SRCE,[-1] ;IS C(SRCE) = -1
4878 IFIDN <DEST>,<SRCE>,<
4879 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
4880 IFDIF <DEST>,<SRCE>,<
4881 034643 002 05 0 00 023002 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
4882 GCAM (SRCE+1,<770077007700>)^
4883 023003 SN=SN+1
4884 IFG <SRCE+1-20>,<
4885 MOVE AC-1,SRCE+1
4886 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
4887 IFIDN <DEST>,<SRCE+1>,<
4888 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4889 IFDIF <DEST>,<SRCE+1>,<
4890 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
4891 IFLE <SRCE+1-20>,<
4892 034644 312 06 0 00 041017 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
4893 IFIDN <DEST>,<SRCE+1>,<
4894 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
4895 IFDIF <DEST>,<SRCE+1>,<
4896 034645 002 06 0 00 023003 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
4897 GCAM (DEST-1,<070707070707>)^
4898 023004 SN=SN+1
4899 IFG <DEST-1-20>,<
4900 MOVE AC-1,DEST-1
4901 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
4902 IFIDN <DEST>,<DEST-1>,<
4903 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4904 IFDIF <DEST>,<DEST-1>,<
4905 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-5
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0136
4906 IFLE <DEST-1-20>,<
4907 034646 312 07 0 00 041020 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
4908 IFIDN <DEST>,<DEST-1>,<
4909 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
4910 IFDIF <DEST>,<DEST-1>,<
4911 034647 002 07 0 00 023004 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
4912 GCAM (DEST,<-1>)^
4913 023005 SN=SN+1
4914 IFG <DEST-20>,<
4915 MOVE AC-1,DEST
4916 CAME AC-1,[-1] ;IS C(DEST) = -1
4917 IFIDN <DEST>,<DEST>,<
4918 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4919 IFDIF <DEST>,<DEST>,<
4920 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
4921 IFLE <DEST-20>,<
4922 034650 312 10 0 00 040734 CAME DEST,[-1] ;IS C(DEST) = -1
4923 IFIDN <DEST>,<DEST>,<
4924 034651 002 10 0 00 023005 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
4925 IFDIF <DEST>,<DEST>,<
4926 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
4927 GCAM (DEST+1,<552255225522>)^
4928 023006 SN=SN+1
4929 IFG <DEST+1-20>,<
4930 MOVE AC-1,DEST+1
4931 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
4932 IFIDN <DEST>,<DEST+1>,<
4933 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
4934 IFDIF <DEST>,<DEST+1>,<
4935 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
4936 IFLE <DEST+1-20>,<
4937 034652 312 11 0 00 041022 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
4938 IFIDN <DEST>,<DEST+1>,<
4939 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
4940 IFDIF <DEST>,<DEST+1>,<
4941 034653 002 11 0 00 023006 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
4942 034654 321 15 0 00 034630 JUMPL AC+2,G23000 ;LOOP ON ERROR^
4943 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-6
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0137
4944 ;BOTH SOURCE AND DESTINATION BLOCKS HAVE AC ADDRESSES.
4945
4946 BLTM1 (23100,12,<<AC-6>&17>,<<AC-3>&17>,<230703,,603700>)^
4947 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
4948 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
4949 ;SOURCE DATA = 230703,,603700
4950
4951 000012 AC=12
4952 SAVEAC (1,1)^
4953 034655 201 14 0 00 034655 MOVEI AC+2,. ;SAVE TEST PC
4954 034656 202 14 0 00 030051 MOVEM AC+2,TESTPC
4955 034657 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4956 034660 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4957 023100 SN=23100
4958 000004 SRCE=<AC-6>&17 ;1ST LOC OF SOURCE = <AC-6>&17
4959 000007 DEST=<AC-3>&17 ;1ST LOC OF DESTINATION = <AC-3>&17
4960 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
4961
4962 034661 200 12 0 00 041024 G23100: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
4963 GMOV (SRCE-1,<252525252525>)^
4964 IFLE <SRCE-1-20>,<
4965 034662 200 03 0 00 041016 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
4966 IFG <SRCE-1-20>,<
4967 MOVE AC+1,[252525252525]
4968 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
4969 GMOV (SRCE,<230703,,603700>)^
4970 IFLE <SRCE-20>,<
4971 034663 200 04 0 00 040752 MOVE SRCE,[230703,,603700] ;PRELOAD SRCE WITH 230703,,603700>
4972 IFG <SRCE-20>,<
4973 MOVE AC+1,[230703,,603700]
4974 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 230703,,603700>^
4975 GMOV (SRCE+1,<770077007700>)^
4976 IFLE <SRCE+1-20>,<
4977 034664 200 05 0 00 041017 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
4978 IFG <SRCE+1-20>,<
4979 MOVE AC+1,[770077007700]
4980 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
4981 GMOV (DEST-1,<070707070707>)^
4982 IFLE <DEST-1-20>,<
4983 034665 200 06 0 00 041020 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
4984 IFG <DEST-1-20>,<
4985 MOVE AC+1,[070707070707]
4986 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
4987 GMOV (DEST,<123456765432>)^
4988 IFLE <DEST-20>,<
4989 034666 200 07 0 00 041021 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
4990 IFG <DEST-20>,<
4991 MOVE AC+1,[123456765432]
4992 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
4993 GMOV (DEST+1,<552255225522>)^
4994 IFLE <DEST+1-20>,<
4995 034667 200 10 0 00 041022 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
4996 IFG <DEST+1-20>,<
4997 MOVE AC+1,[552255225522]
4998 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-7
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0138
4999 034670 251 12 0 00 000007 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
5000 GCAM (SRCE-1,<252525252525>)^
5001 023101 SN=SN+1
5002 IFG <SRCE-1-20>,<
5003 MOVE AC-1,SRCE-1
5004 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5005 IFIDN <DEST>,<SRCE-1>,<
5006 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5007 IFDIF <DEST>,<SRCE-1>,<
5008 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
5009 IFLE <SRCE-1-20>,<
5010 034671 312 03 0 00 041016 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5011 IFIDN <DEST>,<SRCE-1>,<
5012 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
5013 IFDIF <DEST>,<SRCE-1>,<
5014 034672 002 03 0 00 023101 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
5015 GCAM (SRCE,<230703,,603700>)^
5016 023102 SN=SN+1
5017 IFG <SRCE-20>,<
5018 MOVE AC-1,SRCE
5019 CAME AC-1,[230703,,603700] ;IS C(SRCE) = 230703,,603700
5020 IFIDN <DEST>,<SRCE>,<
5021 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5022 IFDIF <DEST>,<SRCE>,<
5023 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
5024 IFLE <SRCE-20>,<
5025 034673 312 04 0 00 040752 CAME SRCE,[230703,,603700] ;IS C(SRCE) = 230703,,603700
5026 IFIDN <DEST>,<SRCE>,<
5027 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
5028 IFDIF <DEST>,<SRCE>,<
5029 034674 002 04 0 00 023102 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
5030 GCAM (SRCE+1,<770077007700>)^
5031 023103 SN=SN+1
5032 IFG <SRCE+1-20>,<
5033 MOVE AC-1,SRCE+1
5034 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
5035 IFIDN <DEST>,<SRCE+1>,<
5036 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5037 IFDIF <DEST>,<SRCE+1>,<
5038 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
5039 IFLE <SRCE+1-20>,<
5040 034675 312 05 0 00 041017 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
5041 IFIDN <DEST>,<SRCE+1>,<
5042 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
5043 IFDIF <DEST>,<SRCE+1>,<
5044 034676 002 05 0 00 023103 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
5045 GCAM (DEST-1,<070707070707>)^
5046 023104 SN=SN+1
5047 IFG <DEST-1-20>,<
5048 MOVE AC-1,DEST-1
5049 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
5050 IFIDN <DEST>,<DEST-1>,<
5051 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5052 IFDIF <DEST>,<DEST-1>,<
5053 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-8
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0139
5054 IFLE <DEST-1-20>,<
5055 034677 312 06 0 00 041020 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
5056 IFIDN <DEST>,<DEST-1>,<
5057 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
5058 IFDIF <DEST>,<DEST-1>,<
5059 034700 002 06 0 00 023104 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
5060 GCAM (DEST,<230703,,603700>)^
5061 023105 SN=SN+1
5062 IFG <DEST-20>,<
5063 MOVE AC-1,DEST
5064 CAME AC-1,[230703,,603700] ;IS C(DEST) = 230703,,603700
5065 IFIDN <DEST>,<DEST>,<
5066 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5067 IFDIF <DEST>,<DEST>,<
5068 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
5069 IFLE <DEST-20>,<
5070 034701 312 07 0 00 040752 CAME DEST,[230703,,603700] ;IS C(DEST) = 230703,,603700
5071 IFIDN <DEST>,<DEST>,<
5072 034702 002 07 0 00 023105 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
5073 IFDIF <DEST>,<DEST>,<
5074 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
5075 GCAM (DEST+1,<552255225522>)^
5076 023106 SN=SN+1
5077 IFG <DEST+1-20>,<
5078 MOVE AC-1,DEST+1
5079 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
5080 IFIDN <DEST>,<DEST+1>,<
5081 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5082 IFDIF <DEST>,<DEST+1>,<
5083 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
5084 IFLE <DEST+1-20>,<
5085 034703 312 10 0 00 041022 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
5086 IFIDN <DEST>,<DEST+1>,<
5087 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
5088 IFDIF <DEST>,<DEST+1>,<
5089 034704 002 10 0 00 023106 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
5090 034705 321 14 0 00 034661 JUMPL AC+2,G23100 ;LOOP ON ERROR^
5091 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-9
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0140
5092 ;SOURCE BLOCK HAS AC ADDRESS, DESTINATION BLOCK HAS NON-AC ADDRESS
5093
5094 BLTM1 (23200,14,<<AC-6>&17>,<BLTBLK+4>,0)^
5095 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
5096 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
5097 ;SOURCE DATA = 0
5098
5099 000014 AC=14
5100 SAVEAC (1,1)^
5101 034706 201 16 0 00 034706 MOVEI AC+2,. ;SAVE TEST PC
5102 034707 202 16 0 00 030051 MOVEM AC+2,TESTPC
5103 034710 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5104 034711 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5105 023200 SN=23200
5106 000006 SRCE=<AC-6>&17 ;1ST LOC OF SOURCE = <AC-6>&17
5107 040224 DEST=BLTBLK+4 ;1ST LOC OF DESTINATION = BLTBLK+4
5108 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
5109
5110 034712 200 14 0 00 041025 G23200: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
5111 GMOV (SRCE-1,<252525252525>)^
5112 IFLE <SRCE-1-20>,<
5113 034713 200 05 0 00 041016 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
5114 IFG <SRCE-1-20>,<
5115 MOVE AC+1,[252525252525]
5116 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
5117 GMOV (SRCE,<0>)^
5118 IFLE <SRCE-20>,<
5119 034714 200 06 0 00 041011 MOVE SRCE,[0] ;PRELOAD SRCE WITH 0>
5120 IFG <SRCE-20>,<
5121 MOVE AC+1,[0]
5122 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 0>^
5123 GMOV (SRCE+1,<770077007700>)^
5124 IFLE <SRCE+1-20>,<
5125 034715 200 07 0 00 041017 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
5126 IFG <SRCE+1-20>,<
5127 MOVE AC+1,[770077007700]
5128 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
5129 GMOV (DEST-1,<070707070707>)^
5130 IFLE <DEST-1-20>,<
5131 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
5132 IFG <DEST-1-20>,<
5133 034716 200 15 0 00 041020 MOVE AC+1,[070707070707]
5134 034717 202 15 0 00 040223 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
5135 GMOV (DEST,<123456765432>)^
5136 IFLE <DEST-20>,<
5137 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
5138 IFG <DEST-20>,<
5139 034720 200 15 0 00 041021 MOVE AC+1,[123456765432]
5140 034721 202 15 0 00 040224 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
5141 GMOV (DEST+1,<552255225522>)^
5142 IFLE <DEST+1-20>,<
5143 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
5144 IFG <DEST+1-20>,<
5145 034722 200 15 0 00 041022 MOVE AC+1,[552255225522]
5146 034723 202 15 0 00 040225 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-10
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0141
5147 034724 251 14 0 00 040224 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
5148 GCAM (SRCE-1,<252525252525>)^
5149 023201 SN=SN+1
5150 IFG <SRCE-1-20>,<
5151 MOVE AC-1,SRCE-1
5152 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5153 IFIDN <DEST>,<SRCE-1>,<
5154 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5155 IFDIF <DEST>,<SRCE-1>,<
5156 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
5157 IFLE <SRCE-1-20>,<
5158 034725 312 05 0 00 041016 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5159 IFIDN <DEST>,<SRCE-1>,<
5160 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
5161 IFDIF <DEST>,<SRCE-1>,<
5162 034726 002 05 0 00 023201 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
5163 GCAM (SRCE,<0>)^
5164 023202 SN=SN+1
5165 IFG <SRCE-20>,<
5166 MOVE AC-1,SRCE
5167 CAME AC-1,[0] ;IS C(SRCE) = 0
5168 IFIDN <DEST>,<SRCE>,<
5169 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5170 IFDIF <DEST>,<SRCE>,<
5171 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
5172 IFLE <SRCE-20>,<
5173 034727 312 06 0 00 041011 CAME SRCE,[0] ;IS C(SRCE) = 0
5174 IFIDN <DEST>,<SRCE>,<
5175 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
5176 IFDIF <DEST>,<SRCE>,<
5177 034730 002 06 0 00 023202 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
5178 GCAM (SRCE+1,<770077007700>)^
5179 023203 SN=SN+1
5180 IFG <SRCE+1-20>,<
5181 MOVE AC-1,SRCE+1
5182 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
5183 IFIDN <DEST>,<SRCE+1>,<
5184 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5185 IFDIF <DEST>,<SRCE+1>,<
5186 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
5187 IFLE <SRCE+1-20>,<
5188 034731 312 07 0 00 041017 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
5189 IFIDN <DEST>,<SRCE+1>,<
5190 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
5191 IFDIF <DEST>,<SRCE+1>,<
5192 034732 002 07 0 00 023203 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
5193 GCAM (DEST-1,<070707070707>)^
5194 023204 SN=SN+1
5195 IFG <DEST-1-20>,<
5196 034733 200 13 0 00 040223 MOVE AC-1,DEST-1
5197 034734 312 13 0 00 041020 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
5198 IFIDN <DEST>,<DEST-1>,<
5199 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5200 IFDIF <DEST>,<DEST-1>,<
5201 034735 002 13 0 00 023204 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-11
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0142
5202 IFLE <DEST-1-20>,<
5203 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
5204 IFIDN <DEST>,<DEST-1>,<
5205 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
5206 IFDIF <DEST>,<DEST-1>,<
5207 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
5208 GCAM (DEST,<0>)^
5209 023205 SN=SN+1
5210 IFG <DEST-20>,<
5211 034736 200 13 0 00 040224 MOVE AC-1,DEST
5212 034737 312 13 0 00 041011 CAME AC-1,[0] ;IS C(DEST) = 0
5213 IFIDN <DEST>,<DEST>,<
5214 034740 002 13 0 00 023205 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5215 IFDIF <DEST>,<DEST>,<
5216 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
5217 IFLE <DEST-20>,<
5218 CAME DEST,[0] ;IS C(DEST) = 0
5219 IFIDN <DEST>,<DEST>,<
5220 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
5221 IFDIF <DEST>,<DEST>,<
5222 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
5223 GCAM (DEST+1,<552255225522>)^
5224 023206 SN=SN+1
5225 IFG <DEST+1-20>,<
5226 034741 200 13 0 00 040225 MOVE AC-1,DEST+1
5227 034742 312 13 0 00 041022 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
5228 IFIDN <DEST>,<DEST+1>,<
5229 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5230 IFDIF <DEST>,<DEST+1>,<
5231 034743 002 13 0 00 023206 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
5232 IFLE <DEST+1-20>,<
5233 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
5234 IFIDN <DEST>,<DEST+1>,<
5235 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
5236 IFDIF <DEST>,<DEST+1>,<
5237 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
5238 034744 321 16 0 00 034712 JUMPL AC+2,G23200 ;LOOP ON ERROR^
5239 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-12
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0143
5240 ;SOURCE BLOCK HAS AC ADDRESS, DESTINATION BLOCK HAS NON-AC ADDRESS
5241
5242 BLTM1 (23300,13,<<AC-6>&17>,<BLTBLK+4>,-1)^
5243 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
5244 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
5245 ;SOURCE DATA = -1
5246
5247 000013 AC=13
5248 SAVEAC (1,1)^
5249 034745 201 15 0 00 034745 MOVEI AC+2,. ;SAVE TEST PC
5250 034746 202 15 0 00 030051 MOVEM AC+2,TESTPC
5251 034747 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5252 034750 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5253 023300 SN=23300
5254 000005 SRCE=<AC-6>&17 ;1ST LOC OF SOURCE = <AC-6>&17
5255 040224 DEST=BLTBLK+4 ;1ST LOC OF DESTINATION = BLTBLK+4
5256 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
5257
5258 034751 200 13 0 00 041026 G23300: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
5259 GMOV (SRCE-1,<252525252525>)^
5260 IFLE <SRCE-1-20>,<
5261 034752 200 04 0 00 041016 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
5262 IFG <SRCE-1-20>,<
5263 MOVE AC+1,[252525252525]
5264 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
5265 GMOV (SRCE,<-1>)^
5266 IFLE <SRCE-20>,<
5267 034753 200 05 0 00 040734 MOVE SRCE,[-1] ;PRELOAD SRCE WITH -1>
5268 IFG <SRCE-20>,<
5269 MOVE AC+1,[-1]
5270 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH -1>^
5271 GMOV (SRCE+1,<770077007700>)^
5272 IFLE <SRCE+1-20>,<
5273 034754 200 06 0 00 041017 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
5274 IFG <SRCE+1-20>,<
5275 MOVE AC+1,[770077007700]
5276 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
5277 GMOV (DEST-1,<070707070707>)^
5278 IFLE <DEST-1-20>,<
5279 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
5280 IFG <DEST-1-20>,<
5281 034755 200 14 0 00 041020 MOVE AC+1,[070707070707]
5282 034756 202 14 0 00 040223 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
5283 GMOV (DEST,<123456765432>)^
5284 IFLE <DEST-20>,<
5285 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
5286 IFG <DEST-20>,<
5287 034757 200 14 0 00 041021 MOVE AC+1,[123456765432]
5288 034760 202 14 0 00 040224 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
5289 GMOV (DEST+1,<552255225522>)^
5290 IFLE <DEST+1-20>,<
5291 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
5292 IFG <DEST+1-20>,<
5293 034761 200 14 0 00 041022 MOVE AC+1,[552255225522]
5294 034762 202 14 0 00 040225 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-13
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0144
5295 034763 251 13 0 00 040224 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
5296 GCAM (SRCE-1,<252525252525>)^
5297 023301 SN=SN+1
5298 IFG <SRCE-1-20>,<
5299 MOVE AC-1,SRCE-1
5300 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5301 IFIDN <DEST>,<SRCE-1>,<
5302 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5303 IFDIF <DEST>,<SRCE-1>,<
5304 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
5305 IFLE <SRCE-1-20>,<
5306 034764 312 04 0 00 041016 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5307 IFIDN <DEST>,<SRCE-1>,<
5308 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
5309 IFDIF <DEST>,<SRCE-1>,<
5310 034765 002 04 0 00 023301 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
5311 GCAM (SRCE,<-1>)^
5312 023302 SN=SN+1
5313 IFG <SRCE-20>,<
5314 MOVE AC-1,SRCE
5315 CAME AC-1,[-1] ;IS C(SRCE) = -1
5316 IFIDN <DEST>,<SRCE>,<
5317 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5318 IFDIF <DEST>,<SRCE>,<
5319 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
5320 IFLE <SRCE-20>,<
5321 034766 312 05 0 00 040734 CAME SRCE,[-1] ;IS C(SRCE) = -1
5322 IFIDN <DEST>,<SRCE>,<
5323 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
5324 IFDIF <DEST>,<SRCE>,<
5325 034767 002 05 0 00 023302 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
5326 GCAM (SRCE+1,<770077007700>)^
5327 023303 SN=SN+1
5328 IFG <SRCE+1-20>,<
5329 MOVE AC-1,SRCE+1
5330 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
5331 IFIDN <DEST>,<SRCE+1>,<
5332 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5333 IFDIF <DEST>,<SRCE+1>,<
5334 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
5335 IFLE <SRCE+1-20>,<
5336 034770 312 06 0 00 041017 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
5337 IFIDN <DEST>,<SRCE+1>,<
5338 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
5339 IFDIF <DEST>,<SRCE+1>,<
5340 034771 002 06 0 00 023303 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
5341 GCAM (DEST-1,<070707070707>)^
5342 023304 SN=SN+1
5343 IFG <DEST-1-20>,<
5344 034772 200 12 0 00 040223 MOVE AC-1,DEST-1
5345 034773 312 12 0 00 041020 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
5346 IFIDN <DEST>,<DEST-1>,<
5347 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5348 IFDIF <DEST>,<DEST-1>,<
5349 034774 002 12 0 00 023304 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-14
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0145
5350 IFLE <DEST-1-20>,<
5351 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
5352 IFIDN <DEST>,<DEST-1>,<
5353 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
5354 IFDIF <DEST>,<DEST-1>,<
5355 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
5356 GCAM (DEST,<-1>)^
5357 023305 SN=SN+1
5358 IFG <DEST-20>,<
5359 034775 200 12 0 00 040224 MOVE AC-1,DEST
5360 034776 312 12 0 00 040734 CAME AC-1,[-1] ;IS C(DEST) = -1
5361 IFIDN <DEST>,<DEST>,<
5362 034777 002 12 0 00 023305 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5363 IFDIF <DEST>,<DEST>,<
5364 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
5365 IFLE <DEST-20>,<
5366 CAME DEST,[-1] ;IS C(DEST) = -1
5367 IFIDN <DEST>,<DEST>,<
5368 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
5369 IFDIF <DEST>,<DEST>,<
5370 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
5371 GCAM (DEST+1,<552255225522>)^
5372 023306 SN=SN+1
5373 IFG <DEST+1-20>,<
5374 035000 200 12 0 00 040225 MOVE AC-1,DEST+1
5375 035001 312 12 0 00 041022 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
5376 IFIDN <DEST>,<DEST+1>,<
5377 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5378 IFDIF <DEST>,<DEST+1>,<
5379 035002 002 12 0 00 023306 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
5380 IFLE <DEST+1-20>,<
5381 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
5382 IFIDN <DEST>,<DEST+1>,<
5383 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
5384 IFDIF <DEST>,<DEST+1>,<
5385 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
5386 035003 321 15 0 00 034751 JUMPL AC+2,G23300 ;LOOP ON ERROR^
5387 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-15
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0146
5388 ;SOURCE BLOCK HAS AC ADDRESS, DESTINATION BLOCK HAS NON-AC ADDRESS
5389
5390 BLTM1 (23400,12,<<AC-6>&17>,<BLTBLK+4>,<230703,,603700>)^
5391 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
5392 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
5393 ;SOURCE DATA = 230703,,603700
5394
5395 000012 AC=12
5396 SAVEAC (1,1)^
5397 035004 201 14 0 00 035004 MOVEI AC+2,. ;SAVE TEST PC
5398 035005 202 14 0 00 030051 MOVEM AC+2,TESTPC
5399 035006 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5400 035007 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5401 023400 SN=23400
5402 000004 SRCE=<AC-6>&17 ;1ST LOC OF SOURCE = <AC-6>&17
5403 040224 DEST=BLTBLK+4 ;1ST LOC OF DESTINATION = BLTBLK+4
5404 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
5405
5406 035010 200 12 0 00 041027 G23400: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
5407 GMOV (SRCE-1,<252525252525>)^
5408 IFLE <SRCE-1-20>,<
5409 035011 200 03 0 00 041016 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
5410 IFG <SRCE-1-20>,<
5411 MOVE AC+1,[252525252525]
5412 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
5413 GMOV (SRCE,<230703,,603700>)^
5414 IFLE <SRCE-20>,<
5415 035012 200 04 0 00 040752 MOVE SRCE,[230703,,603700] ;PRELOAD SRCE WITH 230703,,603700>
5416 IFG <SRCE-20>,<
5417 MOVE AC+1,[230703,,603700]
5418 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 230703,,603700>^
5419 GMOV (SRCE+1,<770077007700>)^
5420 IFLE <SRCE+1-20>,<
5421 035013 200 05 0 00 041017 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
5422 IFG <SRCE+1-20>,<
5423 MOVE AC+1,[770077007700]
5424 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
5425 GMOV (DEST-1,<070707070707>)^
5426 IFLE <DEST-1-20>,<
5427 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
5428 IFG <DEST-1-20>,<
5429 035014 200 13 0 00 041020 MOVE AC+1,[070707070707]
5430 035015 202 13 0 00 040223 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
5431 GMOV (DEST,<123456765432>)^
5432 IFLE <DEST-20>,<
5433 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
5434 IFG <DEST-20>,<
5435 035016 200 13 0 00 041021 MOVE AC+1,[123456765432]
5436 035017 202 13 0 00 040224 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
5437 GMOV (DEST+1,<552255225522>)^
5438 IFLE <DEST+1-20>,<
5439 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
5440 IFG <DEST+1-20>,<
5441 035020 200 13 0 00 041022 MOVE AC+1,[552255225522]
5442 035021 202 13 0 00 040225 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-16
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0147
5443 035022 251 12 0 00 040224 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
5444 GCAM (SRCE-1,<252525252525>)^
5445 023401 SN=SN+1
5446 IFG <SRCE-1-20>,<
5447 MOVE AC-1,SRCE-1
5448 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5449 IFIDN <DEST>,<SRCE-1>,<
5450 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5451 IFDIF <DEST>,<SRCE-1>,<
5452 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
5453 IFLE <SRCE-1-20>,<
5454 035023 312 03 0 00 041016 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5455 IFIDN <DEST>,<SRCE-1>,<
5456 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
5457 IFDIF <DEST>,<SRCE-1>,<
5458 035024 002 03 0 00 023401 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
5459 GCAM (SRCE,<230703,,603700>)^
5460 023402 SN=SN+1
5461 IFG <SRCE-20>,<
5462 MOVE AC-1,SRCE
5463 CAME AC-1,[230703,,603700] ;IS C(SRCE) = 230703,,603700
5464 IFIDN <DEST>,<SRCE>,<
5465 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5466 IFDIF <DEST>,<SRCE>,<
5467 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
5468 IFLE <SRCE-20>,<
5469 035025 312 04 0 00 040752 CAME SRCE,[230703,,603700] ;IS C(SRCE) = 230703,,603700
5470 IFIDN <DEST>,<SRCE>,<
5471 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
5472 IFDIF <DEST>,<SRCE>,<
5473 035026 002 04 0 00 023402 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
5474 GCAM (SRCE+1,<770077007700>)^
5475 023403 SN=SN+1
5476 IFG <SRCE+1-20>,<
5477 MOVE AC-1,SRCE+1
5478 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
5479 IFIDN <DEST>,<SRCE+1>,<
5480 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5481 IFDIF <DEST>,<SRCE+1>,<
5482 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
5483 IFLE <SRCE+1-20>,<
5484 035027 312 05 0 00 041017 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
5485 IFIDN <DEST>,<SRCE+1>,<
5486 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
5487 IFDIF <DEST>,<SRCE+1>,<
5488 035030 002 05 0 00 023403 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
5489 GCAM (DEST-1,<070707070707>)^
5490 023404 SN=SN+1
5491 IFG <DEST-1-20>,<
5492 035031 200 11 0 00 040223 MOVE AC-1,DEST-1
5493 035032 312 11 0 00 041020 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
5494 IFIDN <DEST>,<DEST-1>,<
5495 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5496 IFDIF <DEST>,<DEST-1>,<
5497 035033 002 11 0 00 023404 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-17
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0148
5498 IFLE <DEST-1-20>,<
5499 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
5500 IFIDN <DEST>,<DEST-1>,<
5501 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
5502 IFDIF <DEST>,<DEST-1>,<
5503 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
5504 GCAM (DEST,<230703,,603700>)^
5505 023405 SN=SN+1
5506 IFG <DEST-20>,<
5507 035034 200 11 0 00 040224 MOVE AC-1,DEST
5508 035035 312 11 0 00 040752 CAME AC-1,[230703,,603700] ;IS C(DEST) = 230703,,603700
5509 IFIDN <DEST>,<DEST>,<
5510 035036 002 11 0 00 023405 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5511 IFDIF <DEST>,<DEST>,<
5512 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
5513 IFLE <DEST-20>,<
5514 CAME DEST,[230703,,603700] ;IS C(DEST) = 230703,,603700
5515 IFIDN <DEST>,<DEST>,<
5516 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
5517 IFDIF <DEST>,<DEST>,<
5518 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
5519 GCAM (DEST+1,<552255225522>)^
5520 023406 SN=SN+1
5521 IFG <DEST+1-20>,<
5522 035037 200 11 0 00 040225 MOVE AC-1,DEST+1
5523 035040 312 11 0 00 041022 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
5524 IFIDN <DEST>,<DEST+1>,<
5525 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5526 IFDIF <DEST>,<DEST+1>,<
5527 035041 002 11 0 00 023406 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
5528 IFLE <DEST+1-20>,<
5529 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
5530 IFIDN <DEST>,<DEST+1>,<
5531 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
5532 IFDIF <DEST>,<DEST+1>,<
5533 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
5534 035042 321 14 0 00 035010 JUMPL AC+2,G23400 ;LOOP ON ERROR^
5535 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-18
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0149
5536 ;BOTH SOURCE AND DESTINATION BLOCKS HAVE NON-AC ADDRESSES
5537
5538 BLTM1 (23500,11,<BLTBLK+1>,<BLTBLK+4>,0)^
5539 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
5540 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
5541 ;SOURCE DATA = 0
5542
5543 000011 AC=11
5544 SAVEAC (1,1)^
5545 035043 201 13 0 00 035043 MOVEI AC+2,. ;SAVE TEST PC
5546 035044 202 13 0 00 030051 MOVEM AC+2,TESTPC
5547 035045 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5548 035046 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5549 023500 SN=23500
5550 040221 SRCE=BLTBLK+1 ;1ST LOC OF SOURCE = BLTBLK+1
5551 040224 DEST=BLTBLK+4 ;1ST LOC OF DESTINATION = BLTBLK+4
5552 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
5553
5554 035047 200 11 0 00 041030 G23500: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
5555 GMOV (SRCE-1,<252525252525>)^
5556 IFLE <SRCE-1-20>,<
5557 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
5558 IFG <SRCE-1-20>,<
5559 035050 200 12 0 00 041016 MOVE AC+1,[252525252525]
5560 035051 202 12 0 00 040220 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
5561 GMOV (SRCE,<0>)^
5562 IFLE <SRCE-20>,<
5563 MOVE SRCE,[0] ;PRELOAD SRCE WITH 0>
5564 IFG <SRCE-20>,<
5565 035052 200 12 0 00 041011 MOVE AC+1,[0]
5566 035053 202 12 0 00 040221 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 0>^
5567 GMOV (SRCE+1,<770077007700>)^
5568 IFLE <SRCE+1-20>,<
5569 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
5570 IFG <SRCE+1-20>,<
5571 035054 200 12 0 00 041017 MOVE AC+1,[770077007700]
5572 035055 202 12 0 00 040222 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
5573 GMOV (DEST-1,<070707070707>)^
5574 IFLE <DEST-1-20>,<
5575 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
5576 IFG <DEST-1-20>,<
5577 035056 200 12 0 00 041020 MOVE AC+1,[070707070707]
5578 035057 202 12 0 00 040223 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
5579 GMOV (DEST,<123456765432>)^
5580 IFLE <DEST-20>,<
5581 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
5582 IFG <DEST-20>,<
5583 035060 200 12 0 00 041021 MOVE AC+1,[123456765432]
5584 035061 202 12 0 00 040224 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
5585 GMOV (DEST+1,<552255225522>)^
5586 IFLE <DEST+1-20>,<
5587 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
5588 IFG <DEST+1-20>,<
5589 035062 200 12 0 00 041022 MOVE AC+1,[552255225522]
5590 035063 202 12 0 00 040225 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-19
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0150
5591 035064 251 11 0 00 040224 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
5592 GCAM (SRCE-1,<252525252525>)^
5593 023501 SN=SN+1
5594 IFG <SRCE-1-20>,<
5595 035065 200 10 0 00 040220 MOVE AC-1,SRCE-1
5596 035066 312 10 0 00 041016 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5597 IFIDN <DEST>,<SRCE-1>,<
5598 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5599 IFDIF <DEST>,<SRCE-1>,<
5600 035067 002 10 0 00 023501 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
5601 IFLE <SRCE-1-20>,<
5602 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5603 IFIDN <DEST>,<SRCE-1>,<
5604 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
5605 IFDIF <DEST>,<SRCE-1>,<
5606 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
5607 GCAM (SRCE,<0>)^
5608 023502 SN=SN+1
5609 IFG <SRCE-20>,<
5610 035070 200 10 0 00 040221 MOVE AC-1,SRCE
5611 035071 312 10 0 00 041011 CAME AC-1,[0] ;IS C(SRCE) = 0
5612 IFIDN <DEST>,<SRCE>,<
5613 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5614 IFDIF <DEST>,<SRCE>,<
5615 035072 002 10 0 00 023502 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
5616 IFLE <SRCE-20>,<
5617 CAME SRCE,[0] ;IS C(SRCE) = 0
5618 IFIDN <DEST>,<SRCE>,<
5619 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
5620 IFDIF <DEST>,<SRCE>,<
5621 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
5622 GCAM (SRCE+1,<770077007700>)^
5623 023503 SN=SN+1
5624 IFG <SRCE+1-20>,<
5625 035073 200 10 0 00 040222 MOVE AC-1,SRCE+1
5626 035074 312 10 0 00 041017 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
5627 IFIDN <DEST>,<SRCE+1>,<
5628 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5629 IFDIF <DEST>,<SRCE+1>,<
5630 035075 002 10 0 00 023503 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
5631 IFLE <SRCE+1-20>,<
5632 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
5633 IFIDN <DEST>,<SRCE+1>,<
5634 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
5635 IFDIF <DEST>,<SRCE+1>,<
5636 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
5637 GCAM (DEST-1,<070707070707>)^
5638 023504 SN=SN+1
5639 IFG <DEST-1-20>,<
5640 035076 200 10 0 00 040223 MOVE AC-1,DEST-1
5641 035077 312 10 0 00 041020 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
5642 IFIDN <DEST>,<DEST-1>,<
5643 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5644 IFDIF <DEST>,<DEST-1>,<
5645 035100 002 10 0 00 023504 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-20
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0151
5646 IFLE <DEST-1-20>,<
5647 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
5648 IFIDN <DEST>,<DEST-1>,<
5649 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
5650 IFDIF <DEST>,<DEST-1>,<
5651 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
5652 GCAM (DEST,<0>)^
5653 023505 SN=SN+1
5654 IFG <DEST-20>,<
5655 035101 200 10 0 00 040224 MOVE AC-1,DEST
5656 035102 312 10 0 00 041011 CAME AC-1,[0] ;IS C(DEST) = 0
5657 IFIDN <DEST>,<DEST>,<
5658 035103 002 10 0 00 023505 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5659 IFDIF <DEST>,<DEST>,<
5660 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
5661 IFLE <DEST-20>,<
5662 CAME DEST,[0] ;IS C(DEST) = 0
5663 IFIDN <DEST>,<DEST>,<
5664 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
5665 IFDIF <DEST>,<DEST>,<
5666 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
5667 GCAM (DEST+1,<552255225522>)^
5668 023506 SN=SN+1
5669 IFG <DEST+1-20>,<
5670 035104 200 10 0 00 040225 MOVE AC-1,DEST+1
5671 035105 312 10 0 00 041022 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
5672 IFIDN <DEST>,<DEST+1>,<
5673 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5674 IFDIF <DEST>,<DEST+1>,<
5675 035106 002 10 0 00 023506 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
5676 IFLE <DEST+1-20>,<
5677 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
5678 IFIDN <DEST>,<DEST+1>,<
5679 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
5680 IFDIF <DEST>,<DEST+1>,<
5681 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
5682 035107 321 13 0 00 035047 JUMPL AC+2,G23500 ;LOOP ON ERROR^
5683 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-21
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0152
5684 ;BOTH SOURCE AND DESTINATION BLOCKS HAVE NON-AC ADDRESSES
5685
5686 BLTM1 (23600,10,<BLTBLK+1>,<BLTBLK+4>,-1)^
5687 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
5688 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
5689 ;SOURCE DATA = -1
5690
5691 000010 AC=10
5692 SAVEAC (1,1)^
5693 035110 201 12 0 00 035110 MOVEI AC+2,. ;SAVE TEST PC
5694 035111 202 12 0 00 030051 MOVEM AC+2,TESTPC
5695 035112 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5696 035113 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5697 023600 SN=23600
5698 040221 SRCE=BLTBLK+1 ;1ST LOC OF SOURCE = BLTBLK+1
5699 040224 DEST=BLTBLK+4 ;1ST LOC OF DESTINATION = BLTBLK+4
5700 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
5701
5702 035114 200 10 0 00 041030 G23600: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
5703 GMOV (SRCE-1,<252525252525>)^
5704 IFLE <SRCE-1-20>,<
5705 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
5706 IFG <SRCE-1-20>,<
5707 035115 200 11 0 00 041016 MOVE AC+1,[252525252525]
5708 035116 202 11 0 00 040220 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
5709 GMOV (SRCE,<-1>)^
5710 IFLE <SRCE-20>,<
5711 MOVE SRCE,[-1] ;PRELOAD SRCE WITH -1>
5712 IFG <SRCE-20>,<
5713 035117 200 11 0 00 040734 MOVE AC+1,[-1]
5714 035120 202 11 0 00 040221 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH -1>^
5715 GMOV (SRCE+1,<770077007700>)^
5716 IFLE <SRCE+1-20>,<
5717 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
5718 IFG <SRCE+1-20>,<
5719 035121 200 11 0 00 041017 MOVE AC+1,[770077007700]
5720 035122 202 11 0 00 040222 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
5721 GMOV (DEST-1,<070707070707>)^
5722 IFLE <DEST-1-20>,<
5723 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
5724 IFG <DEST-1-20>,<
5725 035123 200 11 0 00 041020 MOVE AC+1,[070707070707]
5726 035124 202 11 0 00 040223 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
5727 GMOV (DEST,<123456765432>)^
5728 IFLE <DEST-20>,<
5729 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
5730 IFG <DEST-20>,<
5731 035125 200 11 0 00 041021 MOVE AC+1,[123456765432]
5732 035126 202 11 0 00 040224 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
5733 GMOV (DEST+1,<552255225522>)^
5734 IFLE <DEST+1-20>,<
5735 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
5736 IFG <DEST+1-20>,<
5737 035127 200 11 0 00 041022 MOVE AC+1,[552255225522]
5738 035130 202 11 0 00 040225 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-22
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0153
5739 035131 251 10 0 00 040224 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
5740 GCAM (SRCE-1,<252525252525>)^
5741 023601 SN=SN+1
5742 IFG <SRCE-1-20>,<
5743 035132 200 07 0 00 040220 MOVE AC-1,SRCE-1
5744 035133 312 07 0 00 041016 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5745 IFIDN <DEST>,<SRCE-1>,<
5746 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5747 IFDIF <DEST>,<SRCE-1>,<
5748 035134 002 07 0 00 023601 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
5749 IFLE <SRCE-1-20>,<
5750 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5751 IFIDN <DEST>,<SRCE-1>,<
5752 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
5753 IFDIF <DEST>,<SRCE-1>,<
5754 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
5755 GCAM (SRCE,<-1>)^
5756 023602 SN=SN+1
5757 IFG <SRCE-20>,<
5758 035135 200 07 0 00 040221 MOVE AC-1,SRCE
5759 035136 312 07 0 00 040734 CAME AC-1,[-1] ;IS C(SRCE) = -1
5760 IFIDN <DEST>,<SRCE>,<
5761 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5762 IFDIF <DEST>,<SRCE>,<
5763 035137 002 07 0 00 023602 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
5764 IFLE <SRCE-20>,<
5765 CAME SRCE,[-1] ;IS C(SRCE) = -1
5766 IFIDN <DEST>,<SRCE>,<
5767 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
5768 IFDIF <DEST>,<SRCE>,<
5769 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
5770 GCAM (SRCE+1,<770077007700>)^
5771 023603 SN=SN+1
5772 IFG <SRCE+1-20>,<
5773 035140 200 07 0 00 040222 MOVE AC-1,SRCE+1
5774 035141 312 07 0 00 041017 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
5775 IFIDN <DEST>,<SRCE+1>,<
5776 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5777 IFDIF <DEST>,<SRCE+1>,<
5778 035142 002 07 0 00 023603 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
5779 IFLE <SRCE+1-20>,<
5780 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
5781 IFIDN <DEST>,<SRCE+1>,<
5782 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
5783 IFDIF <DEST>,<SRCE+1>,<
5784 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
5785 GCAM (DEST-1,<070707070707>)^
5786 023604 SN=SN+1
5787 IFG <DEST-1-20>,<
5788 035143 200 07 0 00 040223 MOVE AC-1,DEST-1
5789 035144 312 07 0 00 041020 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
5790 IFIDN <DEST>,<DEST-1>,<
5791 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5792 IFDIF <DEST>,<DEST-1>,<
5793 035145 002 07 0 00 023604 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-23
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0154
5794 IFLE <DEST-1-20>,<
5795 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
5796 IFIDN <DEST>,<DEST-1>,<
5797 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
5798 IFDIF <DEST>,<DEST-1>,<
5799 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
5800 GCAM (DEST,<-1>)^
5801 023605 SN=SN+1
5802 IFG <DEST-20>,<
5803 035146 200 07 0 00 040224 MOVE AC-1,DEST
5804 035147 312 07 0 00 040734 CAME AC-1,[-1] ;IS C(DEST) = -1
5805 IFIDN <DEST>,<DEST>,<
5806 035150 002 07 0 00 023605 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5807 IFDIF <DEST>,<DEST>,<
5808 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
5809 IFLE <DEST-20>,<
5810 CAME DEST,[-1] ;IS C(DEST) = -1
5811 IFIDN <DEST>,<DEST>,<
5812 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
5813 IFDIF <DEST>,<DEST>,<
5814 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
5815 GCAM (DEST+1,<552255225522>)^
5816 023606 SN=SN+1
5817 IFG <DEST+1-20>,<
5818 035151 200 07 0 00 040225 MOVE AC-1,DEST+1
5819 035152 312 07 0 00 041022 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
5820 IFIDN <DEST>,<DEST+1>,<
5821 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5822 IFDIF <DEST>,<DEST+1>,<
5823 035153 002 07 0 00 023606 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
5824 IFLE <DEST+1-20>,<
5825 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
5826 IFIDN <DEST>,<DEST+1>,<
5827 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
5828 IFDIF <DEST>,<DEST+1>,<
5829 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
5830 035154 321 12 0 00 035114 JUMPL AC+2,G23600 ;LOOP ON ERROR^
5831 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-24
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0155
5832 ;BOTH SOURCE AND DESTINATION BLOCKS HAVE NON-AC ADDRESSES
5833
5834 BLTM1 (23700,7,<BLTBLK+1>,<BLTBLK+4>,<230703,,603700>)^
5835 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
5836 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
5837 ;SOURCE DATA = 230703,,603700
5838
5839 000007 AC=7
5840 SAVEAC (1,1)^
5841 035155 201 11 0 00 035155 MOVEI AC+2,. ;SAVE TEST PC
5842 035156 202 11 0 00 030051 MOVEM AC+2,TESTPC
5843 035157 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5844 035160 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5845 023700 SN=23700
5846 040221 SRCE=BLTBLK+1 ;1ST LOC OF SOURCE = BLTBLK+1
5847 040224 DEST=BLTBLK+4 ;1ST LOC OF DESTINATION = BLTBLK+4
5848 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
5849
5850 035161 200 07 0 00 041030 G23700: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
5851 GMOV (SRCE-1,<252525252525>)^
5852 IFLE <SRCE-1-20>,<
5853 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
5854 IFG <SRCE-1-20>,<
5855 035162 200 10 0 00 041016 MOVE AC+1,[252525252525]
5856 035163 202 10 0 00 040220 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
5857 GMOV (SRCE,<230703,,603700>)^
5858 IFLE <SRCE-20>,<
5859 MOVE SRCE,[230703,,603700] ;PRELOAD SRCE WITH 230703,,603700>
5860 IFG <SRCE-20>,<
5861 035164 200 10 0 00 040752 MOVE AC+1,[230703,,603700]
5862 035165 202 10 0 00 040221 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 230703,,603700>^
5863 GMOV (SRCE+1,<770077007700>)^
5864 IFLE <SRCE+1-20>,<
5865 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
5866 IFG <SRCE+1-20>,<
5867 035166 200 10 0 00 041017 MOVE AC+1,[770077007700]
5868 035167 202 10 0 00 040222 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
5869 GMOV (DEST-1,<070707070707>)^
5870 IFLE <DEST-1-20>,<
5871 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
5872 IFG <DEST-1-20>,<
5873 035170 200 10 0 00 041020 MOVE AC+1,[070707070707]
5874 035171 202 10 0 00 040223 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
5875 GMOV (DEST,<123456765432>)^
5876 IFLE <DEST-20>,<
5877 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
5878 IFG <DEST-20>,<
5879 035172 200 10 0 00 041021 MOVE AC+1,[123456765432]
5880 035173 202 10 0 00 040224 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
5881 GMOV (DEST+1,<552255225522>)^
5882 IFLE <DEST+1-20>,<
5883 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
5884 IFG <DEST+1-20>,<
5885 035174 200 10 0 00 041022 MOVE AC+1,[552255225522]
5886 035175 202 10 0 00 040225 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-25
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0156
5887 035176 251 07 0 00 040224 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
5888 GCAM (SRCE-1,<252525252525>)^
5889 023701 SN=SN+1
5890 IFG <SRCE-1-20>,<
5891 035177 200 06 0 00 040220 MOVE AC-1,SRCE-1
5892 035200 312 06 0 00 041016 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5893 IFIDN <DEST>,<SRCE-1>,<
5894 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5895 IFDIF <DEST>,<SRCE-1>,<
5896 035201 002 06 0 00 023701 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
5897 IFLE <SRCE-1-20>,<
5898 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
5899 IFIDN <DEST>,<SRCE-1>,<
5900 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
5901 IFDIF <DEST>,<SRCE-1>,<
5902 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
5903 GCAM (SRCE,<230703,,603700>)^
5904 023702 SN=SN+1
5905 IFG <SRCE-20>,<
5906 035202 200 06 0 00 040221 MOVE AC-1,SRCE
5907 035203 312 06 0 00 040752 CAME AC-1,[230703,,603700] ;IS C(SRCE) = 230703,,603700
5908 IFIDN <DEST>,<SRCE>,<
5909 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5910 IFDIF <DEST>,<SRCE>,<
5911 035204 002 06 0 00 023702 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
5912 IFLE <SRCE-20>,<
5913 CAME SRCE,[230703,,603700] ;IS C(SRCE) = 230703,,603700
5914 IFIDN <DEST>,<SRCE>,<
5915 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
5916 IFDIF <DEST>,<SRCE>,<
5917 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
5918 GCAM (SRCE+1,<770077007700>)^
5919 023703 SN=SN+1
5920 IFG <SRCE+1-20>,<
5921 035205 200 06 0 00 040222 MOVE AC-1,SRCE+1
5922 035206 312 06 0 00 041017 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
5923 IFIDN <DEST>,<SRCE+1>,<
5924 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5925 IFDIF <DEST>,<SRCE+1>,<
5926 035207 002 06 0 00 023703 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
5927 IFLE <SRCE+1-20>,<
5928 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
5929 IFIDN <DEST>,<SRCE+1>,<
5930 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
5931 IFDIF <DEST>,<SRCE+1>,<
5932 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
5933 GCAM (DEST-1,<070707070707>)^
5934 023704 SN=SN+1
5935 IFG <DEST-1-20>,<
5936 035210 200 06 0 00 040223 MOVE AC-1,DEST-1
5937 035211 312 06 0 00 041020 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
5938 IFIDN <DEST>,<DEST-1>,<
5939 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5940 IFDIF <DEST>,<DEST-1>,<
5941 035212 002 06 0 00 023704 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-26
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0157
5942 IFLE <DEST-1-20>,<
5943 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
5944 IFIDN <DEST>,<DEST-1>,<
5945 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
5946 IFDIF <DEST>,<DEST-1>,<
5947 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
5948 GCAM (DEST,<230703,,603700>)^
5949 023705 SN=SN+1
5950 IFG <DEST-20>,<
5951 035213 200 06 0 00 040224 MOVE AC-1,DEST
5952 035214 312 06 0 00 040752 CAME AC-1,[230703,,603700] ;IS C(DEST) = 230703,,603700
5953 IFIDN <DEST>,<DEST>,<
5954 035215 002 06 0 00 023705 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5955 IFDIF <DEST>,<DEST>,<
5956 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
5957 IFLE <DEST-20>,<
5958 CAME DEST,[230703,,603700] ;IS C(DEST) = 230703,,603700
5959 IFIDN <DEST>,<DEST>,<
5960 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
5961 IFDIF <DEST>,<DEST>,<
5962 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
5963 GCAM (DEST+1,<552255225522>)^
5964 023706 SN=SN+1
5965 IFG <DEST+1-20>,<
5966 035216 200 06 0 00 040225 MOVE AC-1,DEST+1
5967 035217 312 06 0 00 041022 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
5968 IFIDN <DEST>,<DEST+1>,<
5969 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
5970 IFDIF <DEST>,<DEST+1>,<
5971 035220 002 06 0 00 023706 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
5972 IFLE <DEST+1-20>,<
5973 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
5974 IFIDN <DEST>,<DEST+1>,<
5975 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
5976 IFDIF <DEST>,<DEST+1>,<
5977 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
5978 035221 321 11 0 00 035161 JUMPL AC+2,G23700 ;LOOP ON ERROR^
5979 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-27
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0158
5980 ;SOURCE BLOCK HAS NON-AC ADDRESS, DESTINATION BLOCK HAS AC ADDRESS
5981
5982 BLTM1 (24000,14,<BLTBLK+1>,<<AC-6>&17>,0)^
5983 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
5984 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
5985 ;SOURCE DATA = 0
5986
5987 000014 AC=14
5988 SAVEAC (1,1)^
5989 035222 201 16 0 00 035222 MOVEI AC+2,. ;SAVE TEST PC
5990 035223 202 16 0 00 030051 MOVEM AC+2,TESTPC
5991 035224 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5992 035225 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5993 024000 SN=24000
5994 040221 SRCE=BLTBLK+1 ;1ST LOC OF SOURCE = BLTBLK+1
5995 000006 DEST=<AC-6>&17 ;1ST LOC OF DESTINATION = <AC-6>&17
5996 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
5997
5998 035226 200 14 0 00 041031 G24000: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
5999 GMOV (SRCE-1,<252525252525>)^
6000 IFLE <SRCE-1-20>,<
6001 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
6002 IFG <SRCE-1-20>,<
6003 035227 200 15 0 00 041016 MOVE AC+1,[252525252525]
6004 035230 202 15 0 00 040220 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
6005 GMOV (SRCE,<0>)^
6006 IFLE <SRCE-20>,<
6007 MOVE SRCE,[0] ;PRELOAD SRCE WITH 0>
6008 IFG <SRCE-20>,<
6009 035231 200 15 0 00 041011 MOVE AC+1,[0]
6010 035232 202 15 0 00 040221 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 0>^
6011 GMOV (SRCE+1,<770077007700>)^
6012 IFLE <SRCE+1-20>,<
6013 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
6014 IFG <SRCE+1-20>,<
6015 035233 200 15 0 00 041017 MOVE AC+1,[770077007700]
6016 035234 202 15 0 00 040222 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
6017 GMOV (DEST-1,<070707070707>)^
6018 IFLE <DEST-1-20>,<
6019 035235 200 05 0 00 041020 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
6020 IFG <DEST-1-20>,<
6021 MOVE AC+1,[070707070707]
6022 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
6023 GMOV (DEST,<123456765432>)^
6024 IFLE <DEST-20>,<
6025 035236 200 06 0 00 041021 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
6026 IFG <DEST-20>,<
6027 MOVE AC+1,[123456765432]
6028 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
6029 GMOV (DEST+1,<552255225522>)^
6030 IFLE <DEST+1-20>,<
6031 035237 200 07 0 00 041022 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
6032 IFG <DEST+1-20>,<
6033 MOVE AC+1,[552255225522]
6034 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-28
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0159
6035 035240 251 14 0 00 000006 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
6036 GCAM (SRCE-1,<252525252525>)^
6037 024001 SN=SN+1
6038 IFG <SRCE-1-20>,<
6039 035241 200 13 0 00 040220 MOVE AC-1,SRCE-1
6040 035242 312 13 0 00 041016 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
6041 IFIDN <DEST>,<SRCE-1>,<
6042 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6043 IFDIF <DEST>,<SRCE-1>,<
6044 035243 002 13 0 00 024001 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
6045 IFLE <SRCE-1-20>,<
6046 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
6047 IFIDN <DEST>,<SRCE-1>,<
6048 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
6049 IFDIF <DEST>,<SRCE-1>,<
6050 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
6051 GCAM (SRCE,<0>)^
6052 024002 SN=SN+1
6053 IFG <SRCE-20>,<
6054 035244 200 13 0 00 040221 MOVE AC-1,SRCE
6055 035245 312 13 0 00 041011 CAME AC-1,[0] ;IS C(SRCE) = 0
6056 IFIDN <DEST>,<SRCE>,<
6057 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6058 IFDIF <DEST>,<SRCE>,<
6059 035246 002 13 0 00 024002 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
6060 IFLE <SRCE-20>,<
6061 CAME SRCE,[0] ;IS C(SRCE) = 0
6062 IFIDN <DEST>,<SRCE>,<
6063 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
6064 IFDIF <DEST>,<SRCE>,<
6065 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
6066 GCAM (SRCE+1,<770077007700>)^
6067 024003 SN=SN+1
6068 IFG <SRCE+1-20>,<
6069 035247 200 13 0 00 040222 MOVE AC-1,SRCE+1
6070 035250 312 13 0 00 041017 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
6071 IFIDN <DEST>,<SRCE+1>,<
6072 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6073 IFDIF <DEST>,<SRCE+1>,<
6074 035251 002 13 0 00 024003 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
6075 IFLE <SRCE+1-20>,<
6076 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
6077 IFIDN <DEST>,<SRCE+1>,<
6078 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
6079 IFDIF <DEST>,<SRCE+1>,<
6080 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
6081 GCAM (DEST-1,<070707070707>)^
6082 024004 SN=SN+1
6083 IFG <DEST-1-20>,<
6084 MOVE AC-1,DEST-1
6085 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
6086 IFIDN <DEST>,<DEST-1>,<
6087 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6088 IFDIF <DEST>,<DEST-1>,<
6089 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-29
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0160
6090 IFLE <DEST-1-20>,<
6091 035252 312 05 0 00 041020 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
6092 IFIDN <DEST>,<DEST-1>,<
6093 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
6094 IFDIF <DEST>,<DEST-1>,<
6095 035253 002 05 0 00 024004 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
6096 GCAM (DEST,<0>)^
6097 024005 SN=SN+1
6098 IFG <DEST-20>,<
6099 MOVE AC-1,DEST
6100 CAME AC-1,[0] ;IS C(DEST) = 0
6101 IFIDN <DEST>,<DEST>,<
6102 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6103 IFDIF <DEST>,<DEST>,<
6104 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
6105 IFLE <DEST-20>,<
6106 035254 312 06 0 00 041011 CAME DEST,[0] ;IS C(DEST) = 0
6107 IFIDN <DEST>,<DEST>,<
6108 035255 002 06 0 00 024005 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
6109 IFDIF <DEST>,<DEST>,<
6110 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
6111 GCAM (DEST+1,<552255225522>)^
6112 024006 SN=SN+1
6113 IFG <DEST+1-20>,<
6114 MOVE AC-1,DEST+1
6115 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
6116 IFIDN <DEST>,<DEST+1>,<
6117 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6118 IFDIF <DEST>,<DEST+1>,<
6119 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
6120 IFLE <DEST+1-20>,<
6121 035256 312 07 0 00 041022 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
6122 IFIDN <DEST>,<DEST+1>,<
6123 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
6124 IFDIF <DEST>,<DEST+1>,<
6125 035257 002 07 0 00 024006 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
6126 035260 321 16 0 00 035226 JUMPL AC+2,G24000 ;LOOP ON ERROR^
6127 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-30
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0161
6128 ;SOURCE BLOCK HAS NON-AC ADDRESS, DESTINATION BLOCK HAS AC ADDRESS
6129
6130 BLTM1 (24100,13,<BLTBLK+1>,<<AC-6>&17>,-1)^
6131 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
6132 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
6133 ;SOURCE DATA = -1
6134
6135 000013 AC=13
6136 SAVEAC (1,1)^
6137 035261 201 15 0 00 035261 MOVEI AC+2,. ;SAVE TEST PC
6138 035262 202 15 0 00 030051 MOVEM AC+2,TESTPC
6139 035263 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6140 035264 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6141 024100 SN=24100
6142 040221 SRCE=BLTBLK+1 ;1ST LOC OF SOURCE = BLTBLK+1
6143 000005 DEST=<AC-6>&17 ;1ST LOC OF DESTINATION = <AC-6>&17
6144 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
6145
6146 035265 200 13 0 00 041032 G24100: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
6147 GMOV (SRCE-1,<252525252525>)^
6148 IFLE <SRCE-1-20>,<
6149 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
6150 IFG <SRCE-1-20>,<
6151 035266 200 14 0 00 041016 MOVE AC+1,[252525252525]
6152 035267 202 14 0 00 040220 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
6153 GMOV (SRCE,<-1>)^
6154 IFLE <SRCE-20>,<
6155 MOVE SRCE,[-1] ;PRELOAD SRCE WITH -1>
6156 IFG <SRCE-20>,<
6157 035270 200 14 0 00 040734 MOVE AC+1,[-1]
6158 035271 202 14 0 00 040221 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH -1>^
6159 GMOV (SRCE+1,<770077007700>)^
6160 IFLE <SRCE+1-20>,<
6161 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
6162 IFG <SRCE+1-20>,<
6163 035272 200 14 0 00 041017 MOVE AC+1,[770077007700]
6164 035273 202 14 0 00 040222 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
6165 GMOV (DEST-1,<070707070707>)^
6166 IFLE <DEST-1-20>,<
6167 035274 200 04 0 00 041020 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
6168 IFG <DEST-1-20>,<
6169 MOVE AC+1,[070707070707]
6170 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
6171 GMOV (DEST,<123456765432>)^
6172 IFLE <DEST-20>,<
6173 035275 200 05 0 00 041021 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
6174 IFG <DEST-20>,<
6175 MOVE AC+1,[123456765432]
6176 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
6177 GMOV (DEST+1,<552255225522>)^
6178 IFLE <DEST+1-20>,<
6179 035276 200 06 0 00 041022 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
6180 IFG <DEST+1-20>,<
6181 MOVE AC+1,[552255225522]
6182 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-31
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0162
6183 035277 251 13 0 00 000005 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
6184 GCAM (SRCE-1,<252525252525>)^
6185 024101 SN=SN+1
6186 IFG <SRCE-1-20>,<
6187 035300 200 12 0 00 040220 MOVE AC-1,SRCE-1
6188 035301 312 12 0 00 041016 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
6189 IFIDN <DEST>,<SRCE-1>,<
6190 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6191 IFDIF <DEST>,<SRCE-1>,<
6192 035302 002 12 0 00 024101 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
6193 IFLE <SRCE-1-20>,<
6194 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
6195 IFIDN <DEST>,<SRCE-1>,<
6196 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
6197 IFDIF <DEST>,<SRCE-1>,<
6198 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
6199 GCAM (SRCE,<-1>)^
6200 024102 SN=SN+1
6201 IFG <SRCE-20>,<
6202 035303 200 12 0 00 040221 MOVE AC-1,SRCE
6203 035304 312 12 0 00 040734 CAME AC-1,[-1] ;IS C(SRCE) = -1
6204 IFIDN <DEST>,<SRCE>,<
6205 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6206 IFDIF <DEST>,<SRCE>,<
6207 035305 002 12 0 00 024102 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
6208 IFLE <SRCE-20>,<
6209 CAME SRCE,[-1] ;IS C(SRCE) = -1
6210 IFIDN <DEST>,<SRCE>,<
6211 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
6212 IFDIF <DEST>,<SRCE>,<
6213 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
6214 GCAM (SRCE+1,<770077007700>)^
6215 024103 SN=SN+1
6216 IFG <SRCE+1-20>,<
6217 035306 200 12 0 00 040222 MOVE AC-1,SRCE+1
6218 035307 312 12 0 00 041017 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
6219 IFIDN <DEST>,<SRCE+1>,<
6220 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6221 IFDIF <DEST>,<SRCE+1>,<
6222 035310 002 12 0 00 024103 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
6223 IFLE <SRCE+1-20>,<
6224 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
6225 IFIDN <DEST>,<SRCE+1>,<
6226 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
6227 IFDIF <DEST>,<SRCE+1>,<
6228 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
6229 GCAM (DEST-1,<070707070707>)^
6230 024104 SN=SN+1
6231 IFG <DEST-1-20>,<
6232 MOVE AC-1,DEST-1
6233 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
6234 IFIDN <DEST>,<DEST-1>,<
6235 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6236 IFDIF <DEST>,<DEST-1>,<
6237 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-32
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0163
6238 IFLE <DEST-1-20>,<
6239 035311 312 04 0 00 041020 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
6240 IFIDN <DEST>,<DEST-1>,<
6241 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
6242 IFDIF <DEST>,<DEST-1>,<
6243 035312 002 04 0 00 024104 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
6244 GCAM (DEST,<-1>)^
6245 024105 SN=SN+1
6246 IFG <DEST-20>,<
6247 MOVE AC-1,DEST
6248 CAME AC-1,[-1] ;IS C(DEST) = -1
6249 IFIDN <DEST>,<DEST>,<
6250 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6251 IFDIF <DEST>,<DEST>,<
6252 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
6253 IFLE <DEST-20>,<
6254 035313 312 05 0 00 040734 CAME DEST,[-1] ;IS C(DEST) = -1
6255 IFIDN <DEST>,<DEST>,<
6256 035314 002 05 0 00 024105 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
6257 IFDIF <DEST>,<DEST>,<
6258 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
6259 GCAM (DEST+1,<552255225522>)^
6260 024106 SN=SN+1
6261 IFG <DEST+1-20>,<
6262 MOVE AC-1,DEST+1
6263 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
6264 IFIDN <DEST>,<DEST+1>,<
6265 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6266 IFDIF <DEST>,<DEST+1>,<
6267 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
6268 IFLE <DEST+1-20>,<
6269 035315 312 06 0 00 041022 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
6270 IFIDN <DEST>,<DEST+1>,<
6271 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
6272 IFDIF <DEST>,<DEST+1>,<
6273 035316 002 06 0 00 024106 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
6274 035317 321 15 0 00 035265 JUMPL AC+2,G24100 ;LOOP ON ERROR^
6275 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-33
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0164
6276 ;SOURCE BLOCK HAS NON-AC ADDRESS, DESTINATION BLOCK HAS AC ADDRESS
6277
6278 BLTM1 (24200,12,<BLTBLK+1>,<<AC-6>&17>,<230703,,603700>)^
6279 ;VERIFY THAT BLT WILL TRANSFER A 1 WORD BLOCK OF DATA
6280 ;WHERE SOURCE AND DESTINATION ARE DIFFERENT
6281 ;SOURCE DATA = 230703,,603700
6282
6283 000012 AC=12
6284 SAVEAC (1,1)^
6285 035320 201 14 0 00 035320 MOVEI AC+2,. ;SAVE TEST PC
6286 035321 202 14 0 00 030051 MOVEM AC+2,TESTPC
6287 035322 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6288 035323 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6289 024200 SN=24200
6290 040221 SRCE=BLTBLK+1 ;1ST LOC OF SOURCE = BLTBLK+1
6291 000004 DEST=<AC-6>&17 ;1ST LOC OF DESTINATION = <AC-6>&17
6292 000001 SIZ=1 ;BLOCK SIZE = 1 WORD
6293
6294 035324 200 12 0 00 041033 G24200: MOVE AC,[SRCE,,DEST] ;LOAD BLT AC
6295 GMOV (SRCE-1,<252525252525>)^
6296 IFLE <SRCE-1-20>,<
6297 MOVE SRCE-1,[252525252525] ;PRELOAD SRCE-1 WITH 252525252525>
6298 IFG <SRCE-1-20>,<
6299 035325 200 13 0 00 041016 MOVE AC+1,[252525252525]
6300 035326 202 13 0 00 040220 MOVEM AC+1,SRCE-1 ;PRELOAD SRCE-1 WITH 252525252525>^
6301 GMOV (SRCE,<230703,,603700>)^
6302 IFLE <SRCE-20>,<
6303 MOVE SRCE,[230703,,603700] ;PRELOAD SRCE WITH 230703,,603700>
6304 IFG <SRCE-20>,<
6305 035327 200 13 0 00 040752 MOVE AC+1,[230703,,603700]
6306 035330 202 13 0 00 040221 MOVEM AC+1,SRCE ;PRELOAD SRCE WITH 230703,,603700>^
6307 GMOV (SRCE+1,<770077007700>)^
6308 IFLE <SRCE+1-20>,<
6309 MOVE SRCE+1,[770077007700] ;PRELOAD SRCE+1 WITH 770077007700>
6310 IFG <SRCE+1-20>,<
6311 035331 200 13 0 00 041017 MOVE AC+1,[770077007700]
6312 035332 202 13 0 00 040222 MOVEM AC+1,SRCE+1 ;PRELOAD SRCE+1 WITH 770077007700>^
6313 GMOV (DEST-1,<070707070707>)^
6314 IFLE <DEST-1-20>,<
6315 035333 200 03 0 00 041020 MOVE DEST-1,[070707070707] ;PRELOAD DEST-1 WITH 070707070707>
6316 IFG <DEST-1-20>,<
6317 MOVE AC+1,[070707070707]
6318 MOVEM AC+1,DEST-1 ;PRELOAD DEST-1 WITH 070707070707>^
6319 GMOV (DEST,<123456765432>)^
6320 IFLE <DEST-20>,<
6321 035334 200 04 0 00 041021 MOVE DEST,[123456765432] ;PRELOAD DEST WITH 123456765432>
6322 IFG <DEST-20>,<
6323 MOVE AC+1,[123456765432]
6324 MOVEM AC+1,DEST ;PRELOAD DEST WITH 123456765432>^
6325 GMOV (DEST+1,<552255225522>)^
6326 IFLE <DEST+1-20>,<
6327 035335 200 05 0 00 041022 MOVE DEST+1,[552255225522] ;PRELOAD DEST+1 WITH 552255225522>
6328 IFG <DEST+1-20>,<
6329 MOVE AC+1,[552255225522]
6330 MOVEM AC+1,DEST+1 ;PRELOAD DEST+1 WITH 552255225522>^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-34
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0165
6331 035336 251 12 0 00 000004 BLT AC,DEST+SIZ-1 ;*BLOCK TRANSFER
6332 GCAM (SRCE-1,<252525252525>)^
6333 024201 SN=SN+1
6334 IFG <SRCE-1-20>,<
6335 035337 200 11 0 00 040220 MOVE AC-1,SRCE-1
6336 035340 312 11 0 00 041016 CAME AC-1,[252525252525] ;IS C(SRCE-1) = 252525252525
6337 IFIDN <DEST>,<SRCE-1>,<
6338 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6339 IFDIF <DEST>,<SRCE-1>,<
6340 035341 002 11 0 00 024201 ER2 AC-1,SN ;C(SRCE-1) WAS CLOBBERED>>
6341 IFLE <SRCE-1-20>,<
6342 CAME SRCE-1,[252525252525] ;IS C(SRCE-1) = 252525252525
6343 IFIDN <DEST>,<SRCE-1>,<
6344 ER2 SRCE-1,SN ;DEST NOT LOADED CORRECTLY>
6345 IFDIF <DEST>,<SRCE-1>,<
6346 ER2 SRCE-1,SN ;C(SRCE-1) WAS CLOBBERED>>^
6347 GCAM (SRCE,<230703,,603700>)^
6348 024202 SN=SN+1
6349 IFG <SRCE-20>,<
6350 035342 200 11 0 00 040221 MOVE AC-1,SRCE
6351 035343 312 11 0 00 040752 CAME AC-1,[230703,,603700] ;IS C(SRCE) = 230703,,603700
6352 IFIDN <DEST>,<SRCE>,<
6353 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6354 IFDIF <DEST>,<SRCE>,<
6355 035344 002 11 0 00 024202 ER2 AC-1,SN ;C(SRCE) WAS CLOBBERED>>
6356 IFLE <SRCE-20>,<
6357 CAME SRCE,[230703,,603700] ;IS C(SRCE) = 230703,,603700
6358 IFIDN <DEST>,<SRCE>,<
6359 ER2 SRCE,SN ;DEST NOT LOADED CORRECTLY>
6360 IFDIF <DEST>,<SRCE>,<
6361 ER2 SRCE,SN ;C(SRCE) WAS CLOBBERED>>^
6362 GCAM (SRCE+1,<770077007700>)^
6363 024203 SN=SN+1
6364 IFG <SRCE+1-20>,<
6365 035345 200 11 0 00 040222 MOVE AC-1,SRCE+1
6366 035346 312 11 0 00 041017 CAME AC-1,[770077007700] ;IS C(SRCE+1) = 770077007700
6367 IFIDN <DEST>,<SRCE+1>,<
6368 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6369 IFDIF <DEST>,<SRCE+1>,<
6370 035347 002 11 0 00 024203 ER2 AC-1,SN ;C(SRCE+1) WAS CLOBBERED>>
6371 IFLE <SRCE+1-20>,<
6372 CAME SRCE+1,[770077007700] ;IS C(SRCE+1) = 770077007700
6373 IFIDN <DEST>,<SRCE+1>,<
6374 ER2 SRCE+1,SN ;DEST NOT LOADED CORRECTLY>
6375 IFDIF <DEST>,<SRCE+1>,<
6376 ER2 SRCE+1,SN ;C(SRCE+1) WAS CLOBBERED>>^
6377 GCAM (DEST-1,<070707070707>)^
6378 024204 SN=SN+1
6379 IFG <DEST-1-20>,<
6380 MOVE AC-1,DEST-1
6381 CAME AC-1,[070707070707] ;IS C(DEST-1) = 070707070707
6382 IFIDN <DEST>,<DEST-1>,<
6383 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6384 IFDIF <DEST>,<DEST-1>,<
6385 ER2 AC-1,SN ;C(DEST-1) WAS CLOBBERED>>
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 66-35
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0166
6386 IFLE <DEST-1-20>,<
6387 035350 312 03 0 00 041020 CAME DEST-1,[070707070707] ;IS C(DEST-1) = 070707070707
6388 IFIDN <DEST>,<DEST-1>,<
6389 ER2 DEST-1,SN ;DEST NOT LOADED CORRECTLY>
6390 IFDIF <DEST>,<DEST-1>,<
6391 035351 002 03 0 00 024204 ER2 DEST-1,SN ;C(DEST-1) WAS CLOBBERED>>^
6392 GCAM (DEST,<230703,,603700>)^
6393 024205 SN=SN+1
6394 IFG <DEST-20>,<
6395 MOVE AC-1,DEST
6396 CAME AC-1,[230703,,603700] ;IS C(DEST) = 230703,,603700
6397 IFIDN <DEST>,<DEST>,<
6398 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6399 IFDIF <DEST>,<DEST>,<
6400 ER2 AC-1,SN ;C(DEST) WAS CLOBBERED>>
6401 IFLE <DEST-20>,<
6402 035352 312 04 0 00 040752 CAME DEST,[230703,,603700] ;IS C(DEST) = 230703,,603700
6403 IFIDN <DEST>,<DEST>,<
6404 035353 002 04 0 00 024205 ER2 DEST,SN ;DEST NOT LOADED CORRECTLY>
6405 IFDIF <DEST>,<DEST>,<
6406 ER2 DEST,SN ;C(DEST) WAS CLOBBERED>>^
6407 GCAM (DEST+1,<552255225522>)^
6408 024206 SN=SN+1
6409 IFG <DEST+1-20>,<
6410 MOVE AC-1,DEST+1
6411 CAME AC-1,[552255225522] ;IS C(DEST+1) = 552255225522
6412 IFIDN <DEST>,<DEST+1>,<
6413 ER2 AC-1,SN ;DEST NOT LOADED CORRECTLY>
6414 IFDIF <DEST>,<DEST+1>,<
6415 ER2 AC-1,SN ;C(DEST+1) WAS CLOBBERED>>
6416 IFLE <DEST+1-20>,<
6417 035354 312 05 0 00 041022 CAME DEST+1,[552255225522] ;IS C(DEST+1) = 552255225522
6418 IFIDN <DEST>,<DEST+1>,<
6419 ER2 DEST+1,SN ;DEST NOT LOADED CORRECTLY>
6420 IFDIF <DEST>,<DEST+1>,<
6421 035355 002 05 0 00 024206 ER2 DEST+1,SN ;C(DEST+1) WAS CLOBBERED>>^
6422 035356 321 14 0 00 035324 JUMPL AC+2,G24200 ;LOOP ON ERROR^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 67
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0167
6423 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6424 ;- AC RANGE - ZEROS
6425
6426 000014 AC=14
6427 SAVEAC (1,1)^
6428 035357 201 16 0 00 035357 MOVEI AC+2,. ;SAVE TEST PC
6429 035360 202 16 0 00 030051 MOVEM AC+2,TESTPC
6430 035361 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6431 035362 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6432
6433 020100 SN=20100
6434 000004 SRCE=<AC-10>&17 ;SOURCE BLOCK STARTING ADDRESS=<AC-10>&17
6435 000004 DEST=<AC-10>&17 ;DESTINATION BLOCK STARTING ADDRESS=<AC-10>&17
6436 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6437
6438 035363 200 14 0 00 041034 G20100: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF SOURCE
6439 ;AND DESTINATION BLOCKS
6440 035364 477 03 0 00 000011 SETOB SRCE-1,SRCE+SIZ ;PRELOAD SOURCE BLOCK -1 AND LAST WORD OF
6441 ;SOURCE BLOCK +1 WITH ONES
6442 035365 403 04 0 00 000005 SETZB SRCE,SRCE+1 ;PRELOAD ALL WORDS OF SOURCE BLOCK WITH ZEROS
6443 035366 403 06 0 00 000007 SETZB SRCE+2,SRCE+3
6444 035367 402 00 0 00 000010 SETZM SRCE+4
6445 035370 251 14 0 00 000010 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6446 020101 SN=SN+1
6447 035371 312 03 0 00 040734 CAME DEST-1,[-1,,-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION BLOCK
6448 ;CLOBBERED?
6449 035372 002 03 0 00 020101 ER2 DEST-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6450 ;BLOCK WAS CLOBBERED?
6451 020102 SN=SN+1
6452 035373 332 00 0 00 000004 SKIPE DEST ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
6453 ;CORRECTLY FROM SOURCE?
6454 035374 002 04 0 00 020102 ER2 DEST,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6455 ;CORRECTLY FROM SOURCE
6456 020103 SN=SN+1
6457 035375 332 00 0 00 000005 SKIPE DEST+1 ;WAS SECOND WORD OF DESTINATION BLOCK LOADED CORRECTLY
6458 ;FROM SOURCE?
6459 035376 002 05 0 00 020103 ER2 DEST+1,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
6460 ;CORRECTLY FROM SOURCE
6461 020104 SN=SN+1
6462 035377 332 00 0 00 000006 SKIPE DEST+2 ;WAS THIRD WORD OF DESTINATION BLOCK LOADED CORRECTLY
6463 ;FROM SOURCE?
6464 035400 002 06 0 00 020104 ER2 DEST+2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6465 ;CORRECTLY FROM SOURCE
6466 020105 SN=SN+1
6467 035401 332 00 0 00 000007 SKIPE DEST+3 ;WAS FOURTH WORD OF DESTINATION BLOCK LOADED CORRECTLY
6468 ;FROM SOURCE?
6469 035402 002 07 0 00 020105 ER2 DEST+3,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
6470 ;CORRECTLY FROM SOURCE
6471 020106 SN=SN+1
6472 035403 332 00 0 00 000010 SKIPE DEST+4 ;WAS FIFTH WORD OF DESTINATION BLOCK LOADED CORRECTLY
6473 ;FROM SOURCE?
6474 035404 002 10 0 00 020106 ER2 DEST+4,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
6475 ;CORRECTLY FROM SOURCE
6476 020107 SN=SN+1
6477 035405 312 11 0 00 040734 CAME DEST+SIZ,[-1,,-1] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 67-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0168
6478 ;CLOBBERED?
6479 035406 002 11 0 00 020107 ER2 DEST+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION
6480 ;BLOCK WAS CLOBBERED
6481 035407 321 16 0 00 035363 JUMPL AC+2,G20100 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 68
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0169
6482 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6483 ;- AC RANGE - ONES
6484
6485 000014 AC=14
6486 SAVEAC (1,1)^
6487 035410 201 16 0 00 035410 MOVEI AC+2,. ;SAVE TEST PC
6488 035411 202 16 0 00 030051 MOVEM AC+2,TESTPC
6489 035412 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6490 035413 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6491
6492 020200 SN=20200
6493 000004 SRCE=<AC-10>&17 ;SOURCE BLOCK STARTING ADDRESS=<AC-10>&17
6494 000004 DEST=<AC-10>&17 ;DESTINATION BLOCK STARTING ADDRESS=<AC-10>&17
6495 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6496
6497 035414 200 14 0 00 041034 G20200: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF SOURCE
6498 ;AND DESTINATION BLOCKS
6499 035415 403 03 0 00 000011 SETZB SRCE-1,SRCE+SIZ ;PRELOAD SOURCE BLOCK -1 AND LAST WORD OF SOURCE
6500 ;BLOCK +1 WITH ZEROS
6501 035416 477 04 0 00 000005 SETOB SRCE,SRCE+1 ;PRELOAD ALL WORDS OF SOURCE BLOCK WITH ONES
6502 035417 477 06 0 00 000007 SETOB SRCE+2,SRCE+3
6503 035420 476 00 0 00 000010 SETOM SRCE+4
6504 035421 251 14 0 00 000010 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6505 020201 SN=SN+1
6506 035422 332 00 0 00 000003 SKIPE DEST-1 ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION BLOCK
6507 ;CLOBBERED?
6508 035423 002 03 0 00 020201 ER2 DEST-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6509 ;BLOCK WAS CLOBBERED?
6510 020202 SN=SN+1
6511 035424 312 04 0 00 040734 CAME DEST,[-1,,-1] ;WAS FIRST WORD OF DESTINATION BLOCK LOAED CORRECTLY
6512 ;FROM SOURCE?
6513 035425 002 04 0 00 020202 ER2 DEST,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6514 ;CORRECTLY FROM SOURCE
6515 020203 SN=SN+1
6516 035426 312 05 0 00 040734 CAME DEST+1,[-1,,-1] ;WAS SECOND WORD OF DESTINATION BLOCK LOADED
6517 ;CORRECTLY FROM SOURCE?
6518 035427 002 05 0 00 020203 ER2 DEST+1,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
6519 ;CORRECTLY FROM SOURCE
6520 020204 SN=SN+1
6521 035430 312 06 0 00 040734 CAME DEST+2,[-1,,-1] ;WAS THIRD WORD OF DESTINATION BLOCK LOADED
6522 ;CORRECTLY FROM SOURCE?
6523 035431 002 06 0 00 020204 ER2 DEST+2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6524 ;CORRECTLY FROM SOURCE
6525 020205 SN=SN+1
6526 035432 312 07 0 00 040734 CAME DEST+3,[-1,,-1] ;WAS FOURTH WORD OF DESTINATION BLOCK LOADED
6527 ;CORRECTLY FROM SOURCE?
6528 035433 002 07 0 00 020205 ER2 DEST+3,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
6529 ;CORRECTLY FROM SOURCE
6530 020206 SN=SN+1
6531 035434 312 10 0 00 040734 CAME DEST+4,[-1,,-1] ;WAS FIFTH WORD OF DESTINATION BLOCK LOADED
6532 ;CORRECTLY FROM SOURCE?
6533 035435 002 10 0 00 020206 ER2 DEST+4,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
6534 ;CORRECTLY FROM SOURCE
6535 020207 SN=SN+1
6536 035436 332 00 0 00 000011 SKIPE DEST+SIZ ;WAS WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 68-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0170
6537 ;CLOBBERED?
6538 035437 002 11 0 00 020207 ER2 DEST+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION
6539 ;BLOCK WAS CLOBBERED
6540 035440 321 16 0 00 035414 JUMPL AC+2,G20200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 69
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0171
6541 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6542 ;- AC RANGE - SINGLE PATTERN
6543
6544 000014 AC=14
6545 SAVEAC (1,1)^
6546 035441 201 16 0 00 035441 MOVEI AC+2,. ;SAVE TEST PC
6547 035442 202 16 0 00 030051 MOVEM AC+2,TESTPC
6548 035443 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6549 035444 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6550
6551 020300 SN=20300
6552 000004 SRCE=<AC-10>&17 ;SOURCE BLOCK STARTING ADDRESS=<AC-10>&17
6553 000004 DEST=<AC-10>&17 ;DESTINATION BLOCK STARTING ADDRESS=<AC-10>&17
6554 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6555
6556 035445 200 14 0 00 041034 G20300: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
6557 ;SOURCE AND DESTINATION BLOCKS
6558 035446 477 03 0 00 000011 SETOB SRCE-1,SRCE+SIZ ;PRELOAD SOURCE BLOCK -1 AND LAST WORD OF SOURCE
6559 ;BLOCK +1 WITH ONES
6560 035447 200 04 0 00 040752 MOVE SRCE,[230703,,603700] ;PRELOAD ALL WORDS OF SOURCE BLOCK WITH
6561 ;230703,,603700
6562 035450 200 05 0 00 040752 MOVE SRCE+1,[230703,,603700]
6563 035451 200 06 0 00 040752 MOVE SRCE+2,[230703,,603700]
6564 035452 200 07 0 00 040752 MOVE SRCE+3,[230703,,603700]
6565 035453 200 10 0 00 040752 MOVE SRCE+4,[230703,,603700]
6566 035454 251 14 0 00 000010 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6567 020301 SN=SN+1
6568 035455 312 03 0 00 040734 CAME DEST-1,[-1,,-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
6569 ;BLOCK CLOBBERED?
6570 035456 002 03 0 00 020301 ER2 DEST-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6571 ;BLOCK WAS CLOBBERED?
6572 020302 SN=SN+1
6573 035457 312 04 0 00 040752 CAME DEST,[230703,,603700] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
6574 ;CORRECTLY FROM SOURCE?
6575 035460 002 04 0 00 020302 ER2 DEST,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6576 ;CORRECTLY FROM SOURCE
6577 020303 SN=SN+1
6578 035461 312 05 0 00 040752 CAME DEST+1,[230703,,603700] ;WAS SECOND WORD OF DESTINATION BLOCK
6579 ;LOADED CORRECTLY FROM SOURCE?
6580 035462 002 05 0 00 020303 ER2 DEST+1,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
6581 ;CORRECTLY FROM SOURCE
6582 020304 SN=SN+1
6583 035463 312 06 0 00 040752 CAME DEST+2,[230703,,603700] ;WAS THIRD WORD OF DESTINATION BLOCK
6584 ;LOADED CORRECTLY FROM SOURCE?
6585 035464 002 06 0 00 020304 ER2 DEST+2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6586 ;CORRECTLY FROM SOURCE
6587 020305 SN=SN+1
6588 035465 312 07 0 00 040752 CAME DEST+3,[230703,,603700] ;WAS FOURTH WORD OF DESTINATION BLOCK
6589 ;LOADED CORRECTLY FROM SOURCE?
6590 035466 002 07 0 00 020305 ER2 DEST+3,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
6591 ;CORRECTLY FROM SOURCE
6592 020306 SN=SN+1
6593 035467 312 10 0 00 040752 CAME DEST+4,[230703,,603700] ;WAS FIFTH WORD OF DESTINATION BLOCK
6594 ;NOT LOADED CORRECTLY FROM SOURCE
6595 035470 002 10 0 00 020306 ER2 DEST+4,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 69-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0172
6596 ;CORRECTLY FROM SOURCE
6597 020307 SN=SN+1
6598 035471 312 11 0 00 040734 CAME DEST+SIZ,[-1,,-1] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
6599 ;BLOCK CLOBBERED?
6600 035472 002 11 0 00 020307 ER2 DEST+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION
6601 ;BLOCK WAS CLOBBERED
6602 035473 321 16 0 00 035445 JUMPL AC+2,G20300 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 70
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0173
6603 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6604 ;- AC RANGE - MULTIPLE PATTERN
6605
6606 000014 AC=14
6607 SAVEAC (1,1)^
6608 035474 201 16 0 00 035474 MOVEI AC+2,. ;SAVE TEST PC
6609 035475 202 16 0 00 030051 MOVEM AC+2,TESTPC
6610 035476 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6611 035477 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6612
6613 020400 SN=20400
6614 000004 SRCE=<AC-10>&17 ;SOURCE BLOCK STARTING ADDRESS=<AC-10>&17
6615 000004 DEST=<AC-10>&17 ;DESTINATION BLOCK STARTING ADDRESS=<AC-10>&17
6616 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6617
6618 035500 200 14 0 00 041034 G20400: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
6619 ;SOURCE AND DESTINATION BLOCKS
6620 035501 200 03 0 00 040752 MOVE SRCE-1,[230703,,603700] ;PRELOAD WORD PRECEEDING FIRST WORD
6621 ;OF SOURCE BLOCK WITH 230703,,603700
6622 035502 200 04 0 00 041016 MOVE SRCE,[252525,,252525] ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH
6623 ;252525,,252525
6624 035503 200 05 0 00 041035 MOVE SRCE+1,[146314,,631463] ;PRELOAD SECOND WORD OF SOURCE BLOCK
6625 ;WITH 146314,,631463
6626 035504 200 06 0 00 041020 MOVE SRCE+2,[070707,,070707] ;PRELOAD THIRD WORD OF SOURCE BLOCK
6627 ;WITH 070707,,070707
6628 035505 200 07 0 00 041036 MOVE SRCE+3,[036074,,170360] ;PRELOAD FOURTH WORD OF SOURCE BLOCK
6629 ;WITH 036074,,170360
6630 035506 200 10 0 00 041037 MOVE SRCE+4,[017407,,603701] ;PRELOAD FIFTH WORD OF SOURCE BLOCK
6631 ;WITH 017407,,603701
6632 035507 200 11 0 00 041040 MOVE SRCE+SIZ,[007603,,607062] ;PRELOAD WORD FOLLOWING LAST WORD
6633 ;OF SOURCE BLOCK WITH 007603,,607062
6634 035510 251 14 0 00 000010 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6635 020401 SN=SN+1
6636 035511 312 03 0 00 040752 CAME DEST-1,[230703,,603700] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
6637 ;BLOCK CLOBBERED?
6638 035512 002 03 0 00 020401 ER2 DEST-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6639 ;BLOCK WAS CLOBBERED?
6640 020402 SN=SN+1
6641 035513 312 04 0 00 041016 CAME DEST,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
6642 ;CORRECTLY FROM SOURCE?
6643 035514 002 04 0 00 020402 ER2 DEST,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6644 ;CORRECTLY FROM SOURCE
6645 020403 SN=SN+1
6646 035515 312 05 0 00 041035 CAME DEST+1,[146314,,631463] ;WAS SECOND WORD OF DESTINATION BLOCK
6647 ;LOADED CORRECTLY FROM SOURCE?
6648 035516 002 05 0 00 020403 ER2 DEST+1,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6649 ;CORRECTLY FROM SOURCE
6650 020404 SN=SN+1
6651 035517 312 06 0 00 041020 CAME DEST+2,[070707,,070707] ;WAS THIRD WORD OF DESTINATION BLOCK
6652 ;LOADED CORRECTLY FROM SOURCE?
6653 035520 002 06 0 00 020404 ER2 DEST+2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6654 ;CORRECTLY FROM SOURCE
6655 020405 SN=SN+1
6656 035521 312 07 0 00 041036 CAME DEST+3,[036074,,170360] ;WAS FOURTH WORD OF DESTINATION BLOCK
6657 ;LOADED CORRECTLY FROM SOURCE?
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 70-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0174
6658 035522 002 07 0 00 020405 ER2 DEST+3,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
6659 ;CORRECTLY FROM SOURCE
6660 020406 SN=SN+1
6661 035523 312 10 0 00 041037 CAME DEST+4,[017407,,603701] ;WAS FIFTH WORD OF DESTINATION BLOCK
6662 ;LOADED CORRECTLY FROM SOURCE?
6663 035524 002 10 0 00 020406 ER2 DEST+4,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
6664 ;CORRECTLY FROM SOURCE
6665 020407 SN=SN+1
6666 035525 312 11 0 00 041040 CAME DEST+SIZ,[007603,,607062] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
6667 ;BLOCK CLOBBERED?
6668 035526 002 11 0 00 020407 ER2 DEST+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION
6669 ;BLOCK WAS CLOBBERED
6670 035527 321 16 0 00 035500 JUMPL AC+2,G20400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 71
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0175
6671 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6672 ;- NON-AC RANGE - ZEROS
6673
6674 000013 AC=13
6675 SAVEAC (1,1)^
6676 035530 201 15 0 00 035530 MOVEI AC+2,. ;SAVE TEST PC
6677 035531 202 15 0 00 030051 MOVEM AC+2,TESTPC
6678 035532 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6679 035533 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6680
6681 020500 SN=20500
6682 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK STARTING ADDRESS=BLTBLK+1
6683 040221 DEST=BLTBLK+1 ;DESTINATION BLOCK STARTING ADDRESS=BLTBLK+1
6684 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6685
6686 035534 200 13 0 00 041014 G20500: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
6687 ;SOURCE AND DESTINATION BLOCKS
6688 035535 476 00 0 00 040220 SETOM SRCE-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
6689 ;WITH ONES
6690 035536 402 00 0 00 040221 SETZM SRCE ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK WITH
6691 ;ZEROS
6692 035537 402 00 0 00 040222 SETZM SRCE+1
6693 035540 402 00 0 00 040223 SETZM SRCE+2
6694 035541 402 00 0 00 040224 SETZM SRCE+3
6695 035542 402 00 0 00 040225 SETZM SRCE+4
6696 035543 476 00 0 00 040226 SETOM SRCE+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK
6697 ;WITH ONES
6698 035544 251 13 0 00 040225 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6699 020501 SN=SN+1
6700 035545 200 11 0 00 040220 MOVE AC-2,DEST-1
6701 035546 312 11 0 00 040734 CAME AC-2,[-1,,-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
6702 ;BLOCK CLOBBERED?
6703 035547 002 11 0 00 020501 ER2 AC-2,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6704 ;BLOCK WAS CLOBBERED?
6705 020502 SN=SN+1
6706 035550 200 11 0 00 040221 MOVE AC-2,DEST
6707 035551 332 00 0 00 000011 SKIPE <AC-2>&17 ;WAS FIRST WORD OF DESTINATION BLOCK LOADED CORRECTLY
6708 ;FROM SOURCE?
6709 035552 002 11 0 00 020502 ER2 AC-2,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6710 ;CORRECTLY FROM SOURCE
6711 020503 SN=SN+1
6712 035553 200 11 0 00 040222 MOVE AC-2,DEST+1
6713 035554 332 00 0 00 000011 SKIPE <AC-2>&17 ;WAS SECOND WORD OF DESTINATION BLOCK LOADED CORRECTLY
6714 ;FROM SOURCE?
6715 035555 002 11 0 00 020503 ER2 AC-2,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
6716 ;CORRECTLY FROM SOURCE
6717 020504 SN=SN+1
6718 035556 200 11 0 00 040223 MOVE AC-2,DEST+2
6719 035557 332 00 0 00 000011 SKIPE <AC-2>&17 ;WAS THIRD WORD OF DESTINATION BLOCK LOADED CORRECTLY
6720 ;FROM SOURCE?
6721 035560 002 11 0 00 020504 ER2 AC-2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6722 ;CORRECTLY FROM SOURCE
6723 020505 SN=SN+1
6724 035561 200 11 0 00 040224 MOVE AC-2,DEST+3
6725 035562 332 00 0 00 000011 SKIPE <AC-2>&17 ;WAS FOURTH WORD OF DESTINATION BLOCK LOADED CORRECTLY
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 71-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0176
6726 ;FROM SOURCE?
6727 035563 002 11 0 00 020505 ER2 AC-2,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
6728 ;CORRECTLY FROM SOURCE
6729 020506 SN=SN+1
6730 035564 200 11 0 00 040225 MOVE AC-2,DEST+4
6731 035565 332 00 0 00 000011 SKIPE <AC-2>&17 ;WAS FIFTH WORD OF DESTINATION BLOCK LOADED CORRECTLY
6732 ;FROM SOURCE?
6733 035566 002 11 0 00 020506 ER2 AC-2,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
6734 ;CORRECTLY FROM SOURCE
6735 020507 SN=SN+1
6736 035567 200 11 0 00 040226 MOVE AC-2,DEST+SIZ
6737 035570 312 11 0 00 040734 CAME AC-2,[-1,,-1] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
6738 ;CLOBBERED?
6739 035571 002 11 0 00 020507 ER2 AC-2,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
6740 ;WAS CLOBBERED
6741 035572 321 15 0 00 035534 JUMPL AC+2,G20500 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 72
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0177
6742 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6743 ;- NON-AC RANGE - ONES
6744
6745 000012 AC=12
6746 SAVEAC (1,1)^
6747 035573 201 14 0 00 035573 MOVEI AC+2,. ;SAVE TEST PC
6748 035574 202 14 0 00 030051 MOVEM AC+2,TESTPC
6749 035575 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6750 035576 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6751
6752 020600 SN=20600
6753 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK STARTING ADDRESS=BLTBLK+1
6754 040221 DEST=BLTBLK+1 ;DESTINATION BLOCK STARTING ADDRESS=BLTBLK+1
6755 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6756
6757 035577 200 12 0 00 041014 G20600: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
6758 ;SOURCE AND DESTINATION BLOCKS
6759 035600 402 00 0 00 040220 SETZM SRCE-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
6760 ;WITH ZEROS
6761 035601 476 00 0 00 040221 SETOM SRCE ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK WITH
6762 ;ONES
6763 035602 476 00 0 00 040222 SETOM SRCE+1
6764 035603 476 00 0 00 040223 SETOM SRCE+2
6765 035604 476 00 0 00 040224 SETOM SRCE+3
6766 035605 476 00 0 00 040225 SETOM SRCE+4
6767 035606 402 00 0 00 040226 SETZM SRCE+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK
6768 ;WITH ZEROS
6769 035607 251 12 0 00 040225 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6770 020601 SN=SN+1
6771 035610 200 10 0 00 040220 MOVE AC-2,DEST-1
6772 035611 332 00 0 00 000010 SKIPE <AC-2>&17 ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION BLOCK
6773 ;CLOBBERED?
6774 035612 002 10 0 00 020601 ER2 AC-2,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6775 ;BLOCK WAS CLOBBERED?
6776 020602 SN=SN+1
6777 035613 200 10 0 00 040221 MOVE AC-2,DEST
6778 035614 312 10 0 00 040734 CAME AC-2,[-1,,-1] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED CORRECTLY
6779 ;FROM SOURCE?
6780 035615 002 10 0 00 020602 ER2 AC-2,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6781 ;CORRECTLY FROM SOURCE
6782 020603 SN=SN+1
6783 035616 200 10 0 00 040222 MOVE AC-2,DEST+1
6784 035617 312 10 0 00 040734 CAME AC-2,[-1,,-1] ;WAS SECOND WORD OF DESTINATION BLOCK LOADED CORRECTLY
6785 ;FROM SOURCE?
6786 035620 002 10 0 00 020603 ER2 AC-2,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
6787 ;CORRECTLY FROM SOURCE
6788 020604 SN=SN+1
6789 035621 200 10 0 00 040223 MOVE AC-2,DEST+2
6790 035622 312 10 0 00 040734 CAME AC-2,[-1,,-1] ;WAS THIRD WORD OF DESTINATION BLOCK LOADED CORRECTLY
6791 ;FROM SOURCE?
6792 035623 002 10 0 00 020604 ER2 AC-2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6793 ;CORRECTLY FROM SOURCE
6794 020605 SN=SN+1
6795 035624 200 10 0 00 040224 MOVE AC-2,DEST+3
6796 035625 312 10 0 00 040734 CAME AC-2,[-1,,-1] ;WAS FOURTH WORD OF DESTINATION BLOCK LOADED CORRECTLY
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 72-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0178
6797 ;FROM SOURCE?
6798 035626 002 10 0 00 020605 ER2 AC-2,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
6799 ;CORRECTLY FROM SOURCE
6800 020606 SN=SN+1
6801 035627 200 10 0 00 040225 MOVE AC-2,DEST+4
6802 035630 312 10 0 00 040734 CAME AC-2,[-1,,-1] ;WAS FIFTH WORD OF DESTINATION BLOCK LOADED CORRECTLY
6803 ;FROM SOURCE?
6804 035631 002 10 0 00 020606 ER2 AC-2,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
6805 ;CORRECTLY FROM SOURCE
6806 020607 SN=SN+1
6807 035632 200 10 0 00 040226 MOVE AC-2,DEST+SIZ
6808 035633 332 00 0 00 000010 SKIPE <AC-2>&17 ;WAS WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
6809 ;CLOBBERED?
6810 035634 002 10 0 00 020607 ER2 AC-2,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
6811 ;WAS CLOBBERED
6812 035635 321 14 0 00 035577 JUMPL AC+2,G20600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 73
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0179
6813 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6814 ;- NON-AC RANGE - SINGLE PATTERN
6815
6816 000011 AC=11
6817 SAVEAC (1,1)^
6818 035636 201 13 0 00 035636 MOVEI AC+2,. ;SAVE TEST PC
6819 035637 202 13 0 00 030051 MOVEM AC+2,TESTPC
6820 035640 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6821 035641 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6822
6823 020700 SN=20700
6824 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK STARTING ADDRESS=BLTBLK+1
6825 040221 DEST=BLTBLK+1 ;DESTINATION BLOCK STARTING ADDRESS=BLTBLK+1
6826 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6827
6828 035642 200 11 0 00 041014 G20700: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
6829 ;SOURCE AND DESTINATION BLOCKS
6830 035643 476 00 0 00 040220 SETOM SRCE-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
6831 ;WITH ONES
6832 035644 200 00 0 00 040752 MOVE [230703,,603700]
6833 035645 202 00 0 00 040221 MOVEM SRCE ;PRELOAD ALL WORDS OF SOURCE BLOCK WITH 230703,,603700
6834 035646 202 00 0 00 040222 MOVEM SRCE+1
6835 035647 202 00 0 00 040223 MOVEM SRCE+2
6836 035650 202 00 0 00 040224 MOVEM SRCE+3
6837 035651 202 00 0 00 040225 MOVEM SRCE+4
6838 035652 476 00 0 00 040226 SETOM SRCE+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK
6839 ;WITH ONES
6840 035653 251 11 0 00 040225 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6841 020701 SN=SN+1
6842 035654 200 07 0 00 040220 MOVE AC-2,DEST-1
6843 035655 312 07 0 00 040734 CAME AC-2,[-1,,-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
6844 ;BLOCK CLOBBERED?
6845 035656 002 07 0 00 020701 ER2 AC-2,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6846 ;BLOCK WAS CLOBBERED?
6847 020702 SN=SN+1
6848 035657 200 07 0 00 040221 MOVE AC-2,DEST
6849 035660 312 07 0 00 040752 CAME AC-2,[230703,,603700] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
6850 ;CORRECTLY FROM SOURCE?
6851 035661 002 07 0 00 020702 ER2 AC-2,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6852 ;CORRECTLY FROM SOURCE
6853 020703 SN=SN+1
6854 035662 200 07 0 00 040222 MOVE AC-2,DEST+1
6855 035663 312 07 0 00 040752 CAME AC-2,[230703,,603700] ;WAS SECOND WORD OF DESTINATION BLOCK
6856 ;LOADED CORRECTLY FROM SOURCE?
6857 035664 002 07 0 00 020703 ER2 AC-2,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
6858 ;CORRECTLY FROM SOURCE
6859 020704 SN=SN+1
6860 035665 200 07 0 00 040223 MOVE AC-2,DEST+2
6861 035666 312 07 0 00 040752 CAME AC-2,[230703,,603700] ;WAS THIRD WORD OF DESTINATION BLOCK LOADED
6862 ;CORRECTLY FROM SOURCE?
6863 035667 002 07 0 00 020704 ER2 AC-2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6864 ;CORRECTLY FROM SOURCE
6865 020705 SN=SN+1
6866 035670 200 07 0 00 040224 MOVE AC-2,DEST+3
6867 035671 312 07 0 00 040752 CAME AC-2,[230703,,603700] ;WAS FOURTH WORD OF DESTINATION BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 73-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0180
6868 ;LOADED CORRECTLY FROM SOURCE?
6869 035672 002 07 0 00 020705 ER2 AC-2,SN ;FOURTH WORD OF DESTINATION BLOCK NOT LOADED CORRECTLY
6870 ;FROM SOURCE
6871 020706 SN=SN+1
6872 035673 200 07 0 00 040225 MOVE AC-2,DEST+4
6873 035674 312 07 0 00 040752 CAME AC-2,[230703,,603700] ;WAS FIFTH WORD OF DESTINATION BLOCK LOADED
6874 ;CORRECTLY FROM SOURCE?
6875 035675 002 07 0 00 020706 ER2 AC-2,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
6876 ;CORRECTLY FROM SOURCE
6877 020707 SN=SN+1
6878 035676 200 07 0 00 040226 MOVE AC-2,DEST+SIZ
6879 035677 312 07 0 00 040734 CAME AC-2,[-1,,-1] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
6880 ;CLOBBERED?
6881 035700 002 13 0 00 020707 ER2 AC+2,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
6882 ;WAS CLOBBERED
6883 035701 321 13 0 00 035642 JUMPL AC+2,G20700 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 74
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0181
6884 ;DO A BLT WHERE SOURCE AND DESTINATION BLOCKS HAVE SAME STARTING ADDRESS
6885 ;- NON-AC RANGE - MULTIPLE PATTERN
6886
6887 000010 AC=10
6888 SAVEAC (1,1)^
6889 035702 201 12 0 00 035702 MOVEI AC+2,. ;SAVE TEST PC
6890 035703 202 12 0 00 030051 MOVEM AC+2,TESTPC
6891 035704 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6892 035705 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6893
6894 021000 SN=21000
6895 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK STARTING ADDRESS=BLTBLK+1
6896 040221 DEST=BLTBLK+1 ;DESTINATION BLOCK STARTING ADDRESS=BLTBLK+1
6897 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6898
6899 035706 200 10 0 00 041014 G21000: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
6900 ;SOURCE AND DESTINATION BLOCKS
6901 035707 200 00 0 00 040752 MOVE [230703,,603700]
6902 035710 202 00 0 00 040220 MOVEM SRCE-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
6903 ;WITH 230703,,603700
6904 035711 200 00 0 00 041016 MOVE [252525,,252525]
6905 035712 202 00 0 00 040221 MOVEM SRCE ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH 252525,,252525
6906 035713 200 00 0 00 041035 MOVE [146314,,631463]
6907 035714 202 00 0 00 040222 MOVEM SRCE+1 ;PRELOAD SECOND WORD OF SOURCE BLOCK
6908 ;WITH 146314,,631463
6909 035715 200 00 0 00 041020 MOVE [070707,,070707]
6910 035716 202 00 0 00 040223 MOVEM SRCE+2 ;PRELOAD THIRD WORD OF SOURCE BLOCK WITH 070707,,070707
6911 035717 200 00 0 00 041036 MOVE [036074,,170360]
6912 035720 202 00 0 00 040224 MOVEM SRCE+3 ;PRELOAD FOURTH WORD OF SOURCE BLOCK
6913 ;WITH 036074,,170360
6914 035721 200 00 0 00 041037 MOVE [017407,,603701]
6915 035722 202 00 0 00 040225 MOVEM SRCE+4 ;PRELOAD FIFTH WORD OF SOURCE BLOCK WITH 017407,,603701
6916 035723 200 00 0 00 041040 MOVE [007603,,607062]
6917 035724 202 00 0 00 040226 MOVEM SRCE+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK
6918 ;WITH 007603,,607062
6919 035725 251 10 0 00 040225 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6920 021001 SN=SN+1
6921 035726 200 06 0 00 040220 MOVE AC-2,DEST-1
6922 035727 312 06 0 00 040752 CAME AC-2,[230703,,603700] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
6923 ;BLOCK CLOBBERED?
6924 035730 002 06 0 00 021001 ER2 AC-2,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
6925 ;BLOCK WAS CLOBBERED?
6926 021002 SN=SN+1
6927 035731 200 06 0 00 040221 MOVE AC-2,DEST
6928 035732 312 06 0 00 041016 CAME AC-2,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
6929 ;CORRECTLY FROM SOURCE?
6930 035733 002 06 0 00 021002 ER2 AC-2,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
6931 ;CORRECTLY FROM SOURCE
6932 021003 SN=SN+1
6933 035734 200 06 0 00 040222 MOVE AC-2,DEST+1
6934 035735 312 06 0 00 041035 CAME AC-2,[146314,,631463] ;WAS SECOND WORD OF DESTINATION BLOCK
6935 ;LOADED CORRECTLY FROM SOURCE?
6936 035736 002 06 0 00 021003 ER2 AC-2,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
6937 ;CORRECTLY FROM SOURCE
6938 021004 SN=SN+1
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 74-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0182
6939 035737 200 06 0 00 040223 MOVE AC-2,DEST+2
6940 035740 312 06 0 00 041020 CAME AC-2,[070707,,070707] ;WAS THIRD WORD OF DESTINATION BLOCK LOADED
6941 ;CORRECTLY FROM SOURCE?
6942 035741 002 06 0 00 021004 ER2 AC-2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
6943 ;CORRECTLY FROM SOURCE
6944 021005 SN=SN+1
6945 035742 200 06 0 00 040224 MOVE AC-2,DEST+3
6946 035743 312 06 0 00 041036 CAME AC-2,[036074,,170360] ;WAS FOURTH WORD OF DESTINATION BLOCK
6947 ;LOADED CORRECTLY FROM SOURCE?
6948 035744 002 06 0 00 021005 ER2 AC-2,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
6949 ;CORRECTLY FROM SOURCE
6950 021006 SN=SN+1
6951 035745 200 06 0 00 040225 MOVE AC-2,DEST+4
6952 035746 312 06 0 00 041037 CAME AC-2,[017407,,603701] ;WAS FIFTH WORD OF DESTINATION BLOCK LOADED
6953 ;CORRECTLY FROM SOURCE?
6954 035747 002 06 0 00 021006 ER2 AC-2,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
6955 ;CORRECTLY FROM SOURCE
6956 021007 SN=SN+1
6957 035750 200 06 0 00 040226 MOVE AC-2,DEST+SIZ
6958 035751 312 06 0 00 041040 CAME AC-2,[007603,,607062] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
6959 ;BLOCK CLOBBERED?
6960 035752 002 06 0 00 021007 ER2 AC-2,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
6961 ;WAS CLOBBERED
6962 035753 321 12 0 00 035706 JUMPL AC+2,G21000 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 75
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0183
6963 ;DO A BLT WHERE DESTINATION STARTING ADDRESS EQUALS SOURCE STARTING
6964 ;ADDRESS MINUS ONE - AC RANGE - MULTIPLE PATTERN
6965
6966 000014 AC=14
6967 SAVEAC (1,1)^
6968 035754 201 16 0 00 035754 MOVEI AC+2,. ;SAVE TEST PC
6969 035755 202 16 0 00 030051 MOVEM AC+2,TESTPC
6970 035756 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6971 035757 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6972
6973 021100 SN=21100
6974 000002 SRCE=<AC-12>&17 ;SOURCE BLOCK STARTING ADDRESS= <AC-12>&17
6975 000001 DEST=<AC-13>&17 ;DESTINATION BLOCK STARTING ADDRESS= <AC-13>&17
6976 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
6977
6978 035760 200 14 0 00 041041 G21100: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
6979 ;SOURCE AND DESTINATION BLOCKS
6980 035761 476 00 0 00 000000 SETOM DEST-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF DESTINATION
6981 ;BLOCK WITH ONES
6982 035762 200 01 0 00 040752 MOVE DEST,[230703,,603700] ;PRELOAD FIRST WORD OF DESTINATION BLOCK
6983 ;WITH 230703,,603700
6984 035763 200 02 0 00 041016 MOVE SRCE,[252525,,252525] ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH
6985 ;252525,,252525
6986 035764 200 03 0 00 041035 MOVE SRCE+1,[146314,,631463] ;PRELOAD SECOND WORD OF SOURCE BLOCK
6987 ;WITH 146314,,631463
6988 035765 200 04 0 00 041020 MOVE SRCE+2,[070707,,070707] ;PRELOAD THIRD WORD OF SOURCE BLOCK
6989 ;WITH 070707,,070707
6990 035766 200 05 0 00 041042 MOVE SRCE+3,[036074,,170630] ;PRELOAD FOURTH WORD OF SOURCE BLOCK
6991 ;WITH 036074,,170630
6992 035767 200 06 0 00 041037 MOVE SRCE+4,[017407,,603701] ;PRELOAD FIFTH WORD OF SOURCE BLOCK
6993 ;WITH 017407,,603701
6994 035770 200 07 0 00 041040 MOVE SRCE+SIZ,[007603,,607062] ;PRELOAD WORD FOLLOWING LAST WORD
6995 ;OF SOURCE BLOCK WITH 007603,,607062
6996 035771 251 14 0 00 000005 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
6997 021101 SN=SN+1
6998 035772 312 00 0 00 040734 CAME DEST-1,[-1,,-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
6999 ;BLOCK CLOBBERED?
7000 035773 002 00 0 00 021101 ER2 DEST-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
7001 ;BLOCK WAS CLOBBERED?
7002 021102 SN=SN+1
7003 035774 312 01 0 00 041016 CAME DEST,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
7004 ;CORRECTLY FROM SOURCE?
7005 035775 002 01 0 00 021102 ER2 DEST,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
7006 ;CORRECTLY FROM SOURCE
7007 021103 SN=SN+1
7008 035776 312 02 0 00 041035 CAME DEST+1,[146314,,631463] ;WAS SECOND WORD OF DESTINATION BLOCK
7009 ;LOADED CORRECTLY FROM SOURCE?
7010 035777 002 02 0 00 021103 ER2 DEST+1,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
7011 ;CORRECTLY FROM SOURCE
7012 021104 SN=SN+1
7013 036000 312 03 0 00 041020 CAME DEST+2,[070707,,070707] ;WAS THIRD WORD OF DESTINATION BLOCK
7014 ;LOADED CORRECTLY FROM SOURCE?
7015 036001 002 03 0 00 021104 ER2 DEST+2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
7016 ;CORRECTLY FROM SOURCE
7017
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 75-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0184
7018 021105 SN=SN+1
7019 036002 312 04 0 00 041042 CAME DEST+3,[036074,,170630] ;WAS FOURTH WORD OF DESTINATION
7020 ;BLOCK LOADED CORRECTLY FROM SOURCE?
7021 036003 002 04 0 00 021105 ER2 DEST+3,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
7022 ;CORRECTLY FROM SOURCE
7023 021106 SN=SN+1
7024 036004 312 05 0 00 041037 CAME DEST+4,[017407,,603701] ;WAS LAST WORD OF DESTINATION BLOCK
7025 ;LOADED CORRECTLY FROM SOURCE?
7026 036005 002 05 0 00 021106 ER2 DEST+4,SN ;FAIL IF LAST WORD OF DESTINATION BLOCK NOT LOADED
7027 ;CORRECTLY FROM SOURCE
7028 021107 SN=SN+1
7029 036006 312 06 0 00 041037 CAME DEST+SIZ,[017407,,603701] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
7030 ;BLOCK CLOBBERED?
7031 036007 002 06 0 00 021107 ER2 DEST+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION
7032 ;BLOCK WAS CLOBBERED
7033 021110 SN=SN+1
7034 036010 312 07 0 00 041040 CAME SRCE+SIZ,[007603,,607062] ;WAS WORD FOLLOWING LAST WORD OF SOURCE
7035 ;BLOCK CLOBBERED?
7036 036011 002 07 0 00 021110 ER2 SRCE+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF SOURCE BLOCK
7037 ;WAS CLOBBERED
7038 036012 321 16 0 00 035760 JUMPL AC+2,G21100 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 76
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0185
7039 ;DO A BLT WHERE DESTINATION STARTING ADDRESS EQUALS SOURCE STARTING
7040 ;ADDRESS MINUS ONE - NON-AC RANGE - MULTIPLE PATTERN
7041
7042 000006 AC=6
7043 SAVEAC (1,1)^
7044 036013 201 10 0 00 036013 MOVEI AC+2,. ;SAVE TEST PC
7045 036014 202 10 0 00 030051 MOVEM AC+2,TESTPC
7046 036015 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7047 036016 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7048
7049 021200 SN=21200
7050 040222 SRCE=BLTBLK+2 ;SOURCE BLOCK STARTING ADDRESS= BLTBLK+2
7051 040221 DEST=BLTBLK+1 ;DESTINATION BLOCK STARTING ADDRESS= BLTBLK+1
7052 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
7053
7054 036017 200 06 0 00 041043 G21200: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
7055 ;SOURCE AND DESTINATION BLOCKS
7056 036020 476 00 0 00 040220 SETOM DEST-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF DESTINATION
7057 ;BLOCK WITH ONES
7058 036021 200 00 0 00 040752 MOVE [230703,,603700]
7059 036022 202 00 0 00 040221 MOVEM DEST ;PRELOAD FIRST WORD OF DESTINATION BLOCK
7060 ;WITH 230703,,603700
7061 036023 200 00 0 00 041016 MOVE [252525,,252525]
7062 036024 202 00 0 00 040222 MOVEM SRCE ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH 252525,,252525
7063 036025 200 00 0 00 041035 MOVE [146314,,631463]
7064 036026 202 00 0 00 040223 MOVEM SRCE+1 ;PRELOAD SECOND WORD OF SOURCE BLOCK
7065 ;WITH 146314,,631463
7066 036027 200 00 0 00 041020 MOVE [070707,,070707]
7067 036030 202 00 0 00 040224 MOVEM SRCE+2 ;PRELOAD THIRD WORD OF SOURCE BLOCK WITH 070707,,070707
7068 036031 200 00 0 00 041042 MOVE [036074,,170630]
7069 036032 202 00 0 00 040225 MOVEM SRCE+3 ;PRELOAD FOURTH WORD OF SOURCE BLOCK
7070 ;WITH 036074,,170630
7071 036033 200 00 0 00 041037 MOVE [017407,,603701]
7072 036034 202 00 0 00 040226 MOVEM SRCE+4 ;PRELOAD FIFTH WORD OF SOURCE BLOCK WITH 017407,,603701
7073 036035 200 00 0 00 041040 MOVE [007603,,607062]
7074 036036 202 00 0 00 040227 MOVEM SRCE+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK
7075 ;WITH 007603,,607062
7076 036037 251 06 0 00 040225 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 77
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0186
7077 ;DO A BLT WHERE DESTINATION STARTING ADDRESS EQUALS SOURCE STARTING
7078 ;ADDRESS MINUS ONE - NON-AC RANGE - MULTIPLE PATTERN (CONTINUED)
7079
7080 021201 SN=SN+1
7081 036040 200 04 0 00 040220 MOVE AC-2,DEST-1
7082 036041 312 04 0 00 040734 CAME AC-2,[-1,,-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
7083 ;BLOCK CLOBBERED?
7084 036042 002 04 0 00 021201 ER2 AC-2,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
7085 ;BLOCK WAS CLOBBERED?
7086 021202 SN=SN+1
7087 036043 200 04 0 00 040221 MOVE AC-2,DEST
7088 036044 312 04 0 00 041016 CAME AC-2,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
7089 ;CORRECTLY FROM SOURCE?
7090 036045 002 04 0 00 021202 ER2 AC-2,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
7091 ;CORRECTLY FROM SOURCE
7092 021203 SN=SN+1
7093 036046 200 04 0 00 040222 MOVE AC-2,DEST+1
7094 036047 312 04 0 00 041035 CAME AC-2,[146314,,631463] ;WAS SECOND WORD OF DESTINATION BLOCK
7095 ;LOADED CORRECTLY FROM SOURCE?
7096 036050 002 04 0 00 021203 ER2 AC-2,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
7097 ;CORRECTLY FROM SOURCE
7098 021204 SN=SN+1
7099 036051 200 04 0 00 040223 MOVE AC-2,DEST+2
7100 036052 312 04 0 00 041020 CAME AC-2,[070707,,070707] ;WAS THIRD WORD OF DESTINATION BLOCK LOADED
7101 ;CORRECTLY FROM SOURCE?
7102 036053 002 04 0 00 021204 ER2 AC-2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
7103 ;CORRECTLY FROM SOURCE
7104 021205 SN=SN+1
7105 036054 200 04 0 00 040224 MOVE AC-2,DEST+3
7106 036055 312 04 0 00 041042 CAME AC-2,[036074,,170630] ;WAS FOURTH WORD OF DESTINATION BLOCK
7107 ;LOADED CORRECTLY FROM SOURCE?
7108 036056 002 04 0 00 021205 ER2 AC-2,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
7109 ;CORRECTLY FROM SOURCE
7110 021206 SN=SN+1
7111 036057 200 04 0 00 040225 MOVE AC-2,DEST+4
7112 036060 312 04 0 00 041037 CAME AC-2,[017407,,603701] ;WAS LAST WORD OF DESTINATION BLOCK LOADED
7113 ;CORRECTLY FROM SOURCE?
7114 036061 002 04 0 00 021206 ER2 AC-2,SN ;FAIL IF LAST WORD OF DESTINATION BLOCK NOT LOADED
7115 ;CORRECTLY FROM SOURCE
7116 021207 SN=SN+1
7117 036062 200 04 0 00 040226 MOVE AC-2,DEST+SIZ
7118 036063 312 04 0 00 041037 CAME AC-2,[017407,,603701] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
7119 ;BLOCK CLOBBERED?
7120 036064 002 04 0 00 021207 ER2 AC-2,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
7121 ;WAS CLOBBERED
7122 021210 SN=SN+1
7123 036065 200 04 0 00 040227 MOVE AC-2,SRCE+SIZ
7124 036066 312 04 0 00 041040 CAME AC-2,[007603,,607062] ;WAS WORD FOLLOWING LAST WORD OF SOURCE
7125 ;BLOCK CLOBBERED?
7126 036067 002 04 0 00 021210 ER2 AC-2,SN ;FAIL IF WORD FOLLOWING LAST WORD OF SOURCE BLOCK WAS
7127 ;CLOBBERED
7128 036070 321 10 0 00 036017 JUMPL AC+2,G21200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 78
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0187
7129 ;DO A BLT WHERE DESTINATION STARTING ADDRESS EQUALS SOURCE STARTING
7130 ;ADDRESS PLUS ONE - AC RANGE - MULTIPLE PATTERN
7131
7132 000014 AC=14
7133 SAVEAC (1,1)^
7134 036071 201 16 0 00 036071 MOVEI AC+2,. ;SAVE TEST PC
7135 036072 202 16 0 00 030051 MOVEM AC+2,TESTPC
7136 036073 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7137 036074 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7138
7139 021300 SN=21300
7140 000001 SRCE=<AC-13>&17 ;SOURCE BLOCK STARTING ADDRESS= <AC-13>&17
7141 000002 DEST=<AC-12>&17 ;DESTINATION BLOCK STARTING ADDRESS= <AC-12>&17
7142 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
7143
7144 036075 200 14 0 00 041044 G21300: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
7145 ;SOURCE AND DESTINATION BLOCKS
7146 036076 200 00 0 00 040752 MOVE SRCE-1,[230703,,603700] ;PRELOAD WORD PRECEEDING FIRST WORD
7147 ;OF SOURCE BLOCK WITH 230703,,603700
7148 036077 200 01 0 00 041016 MOVE SRCE,[252525,,252525] ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH
7149 ;252525,,252525
7150 036100 200 02 0 00 041035 MOVE SRCE+1,[146314,,631463] ;PRELOAD SECOND WORD OF SOURCE BLOCK
7151 ;WITH 146314,,631463
7152 036101 200 03 0 00 041020 MOVE SRCE+2,[070707,,070707] ;PRELOAD THIRD WORD OF SOURCE BLOCK
7153 ;WITH 070707,,070707
7154 036102 200 04 0 00 041042 MOVE SRCE+3,[036074,,170630] ;PRELOAD FOURTH WORD OF SOURCE BLOCK
7155 ;WITH 036074,,170630
7156 036103 200 05 0 00 041037 MOVE SRCE+4,[017407,,603701] ;PRELOAD FIFTH WORD OF SOURCE BLOCK
7157 ;WITH 017407,,603701
7158 036104 200 06 0 00 041040 MOVE SRCE+SIZ,[007603,,607062] ;PRELOAD WORD FOLLOWING LAST WORD
7159 ;OF SOURCE BLOCK WITH 007603,,607062
7160 036105 476 00 0 00 000007 SETOM DEST+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
7161 ;WITH ONES
7162 036106 251 14 0 00 000006 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
7163 021301 SN=SN+1
7164 036107 312 00 0 00 040752 CAME SRCE-1,[230703,,603700] ;WAS WORD PRECEEDING FIRST WORD OF SOURCE
7165 ;BLOCK CLOBBERED?
7166 036110 002 00 0 00 021301 ER2 SRCE-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
7167 ;WAS CLOBBERED
7168 021302 SN=SN+1
7169 036111 312 01 0 00 041016 CAME SRCE,[252525,,252525] ;WAS FIRST WORD OF SOURCE BLOCK CLOBBERED
7170 036112 002 01 0 00 021302 ER2 SRCE,SN ;FAIL IF FIRST WORD OF SOURCE BLOCK WAS CLOBBERED
7171 021303 SN=SN+1
7172 036113 312 02 0 00 041016 CAME DEST,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
7173 ;CORRECTLY FROM SOURCE?
7174 036114 002 02 0 00 021303 ER2 DEST,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
7175 ;CORRECTLY FROM SOURCE
7176 021304 SN=SN+1
7177 036115 312 03 0 00 041016 CAME DEST+1,[252525,,252525] ;WAS SECOND WORD OF DESTINATION BLOCK
7178 ;LOADED CORRECTLY FROM SOURCE?
7179 036116 002 03 0 00 021304 ER2 DEST+1,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
7180 ;CORRECTLY FROM SOURCE
7181 021305 SN=SN+1
7182 036117 312 04 0 00 041016 CAME DEST+2,[252525,,252525] ;WAS THIRD WORD OF DESTINATION BLOCK
7183 ;LOADED CORRECTLY FROM SOURCE?
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 78-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0188
7184 036120 002 04 0 00 021305 ER2 DEST+2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
7185 ;CORRECTLY FROM SOURCE
7186 021306 SN=SN+1
7187 036121 312 05 0 00 041016 CAME DEST+3,[252525,,252525] ;WAS FOURTH WORD OF DESTINATION BLOCK
7188 ;LOADED CORRECTLY FROM SOURCE?
7189 036122 002 05 0 00 021306 ER2 DEST+3,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
7190 ;CORRECTLY FROM SOURCE
7191 021307 SN=SN+1
7192 036123 312 06 0 00 041016 CAME DEST+4,[252525,,252525] ;WAS LAST WORD OF DESTINATION BLOCK
7193 ;LOADED CORRECTLY FROM SOURCE?
7194 036124 002 06 0 00 021307 ER2 DEST+4,SN ;FAIL IF LAST WORD OF DESTINATION BLOCK NOT LOADED
7195 ;CORRECTLY FROM SOURCE
7196 021310 SN=SN+1
7197 036125 312 07 0 00 040734 CAME DEST+SIZ,[-1,,-1] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
7198 ;BLOCK CLOBBERED?
7199 036126 002 07 0 00 021310 ER2 DEST+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION
7200 ;BLOCK WAS CLOBBERED
7201 036127 321 16 0 00 036075 JUMPL AC+2,G21300 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 79
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0189
7202 ;DO A BLT WHERE DESTINATION STARTING ADDRESS EQUALS SOURCE STARTING
7203 ;ADDRESS PLUS ONE - NON-AC RANGE - MULTIPLE PATTERN
7204
7205 000004 AC=4
7206 SAVEAC (1,1)^
7207 036130 201 06 0 00 036130 MOVEI AC+2,. ;SAVE TEST PC
7208 036131 202 06 0 00 030051 MOVEM AC+2,TESTPC
7209 036132 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7210 036133 202 06 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7211
7212 021400 SN=21400
7213 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK STARTING ADDRESS= BLTBLK+1
7214 040222 DEST=BLTBLK+2 ;DESTINATION BLOCK STARTING ADDRESS= BLTBLK+2
7215 000005 SIZ=5 ;BLOCK SIZE=5 WORDS
7216
7217 036134 200 04 0 00 041045 G21400: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
7218 ;SOURCE AND DESTINATION BLOCKS
7219 036135 200 00 0 00 040752 MOVE [230703,,603700]
7220 036136 202 00 0 00 040220 MOVEM SRCE-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
7221 ;WITH 23703,,603700
7222 036137 200 00 0 00 041016 MOVE [252525,,252525]
7223 036140 202 00 0 00 040221 MOVEM SRCE ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH 252525,,252525
7224 036141 200 00 0 00 041046 MOVE [146314,,146314]
7225 036142 202 00 0 00 040222 MOVEM SRCE+1 ;PRELOAD SECOND WORD OF SOURCE BLOCK
7226 ;WITH 146314,,631463
7227 036143 200 00 0 00 041020 MOVE [070707,,070707]
7228 036144 202 00 0 00 040223 MOVEM SRCE+2 ;PRELOAD THIRD WORD OF SOURCE BLOCK WITH 070707,,070707
7229 036145 200 00 0 00 041042 MOVE [036074,,170630]
7230 036146 202 00 0 00 040224 MOVEM SRCE+3 ;PRELOAD FOURTH WORD OF SOURCE BLOCK
7231 ;WITH 036074,,170630
7232 036147 200 00 0 00 041037 MOVE [017407,,603701]
7233 036150 202 00 0 00 040225 MOVEM SRCE+4 ;PRELOAD FIFTH WORD OF SOURCE BLOCK WITH 017407,,603701
7234 036151 200 00 0 00 041040 MOVE [007603,,607062]
7235 036152 202 00 0 00 040226 MOVEM SRCE+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK
7236 ;WITH 007603,,607062
7237 036153 476 00 0 00 040227 SETOM DEST+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
7238 ;WITH ONES
7239 036154 251 04 0 00 040226 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 80
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0190
7240 ;DO A BLT WHERE DESTINATION STARTING ADDRESS EQUALS SOURCE STARTING
7241 ;ADDRESS PLUS ONE - NON-AC RANGE - MULTIPLE PATTERN (CONTINUED)
7242
7243 021401 SN=SN+1
7244 036155 200 02 0 00 040220 MOVE AC-2,SRCE-1
7245 036156 312 02 0 00 040752 CAME AC-2,[230703,,603700] ;WAS WORD PRECEEDING FIRST WORD OF SOURCE
7246 ;BLOCK CLOBBERED?
7247 036157 002 02 0 00 021401 ER2 AC-2,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
7248 ;WAS CLOBBERED
7249 021402 SN=SN+1
7250 036160 200 02 0 00 040221 MOVE AC-2,SRCE
7251 036161 312 02 0 00 041016 CAME AC-2,[252525,,252525] ;WAS FIRST WORD OF SOURCE BLOCK CLOBBERED
7252 036162 002 02 0 00 021402 ER2 AC-2,SN ;FAIL IF FIRST WORD OF SOURCE BLOCK WAS CLOBBERED
7253 021403 SN=SN+1
7254 036163 200 02 0 00 040222 MOVE AC-2,DEST
7255 036164 312 02 0 00 041016 CAME AC-2,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
7256 ;CORRECTLY FROM SOURCE?
7257 036165 002 02 0 00 021403 ER2 AC-2,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
7258 ;CORRECTLY FROM SOURCE
7259 021404 SN=SN+1
7260 036166 200 02 0 00 040223 MOVE AC-2,DEST+1
7261 036167 312 02 0 00 041016 CAME AC-2,[252525,,252525] ;WAS SECOND WORD OF DESTINATION BLOCK
7262 ;LOADED CORRECTLY FROM SOURCE?
7263 036170 002 02 0 00 021404 ER2 AC-2,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
7264 ;CORRECTLY FROM SOURCE
7265 021405 SN=SN+1
7266 036171 200 02 0 00 040224 MOVE AC-2,DEST+2
7267 036172 312 02 0 00 041016 CAME AC-2,[252525,,252525] ;WAS THIRD WORD OF DESTINATION BLOCK LOADED
7268 ;CORRECTLY FROM SOURCE?
7269 036173 002 02 0 00 021405 ER2 AC-2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
7270 ;CORRECTLY FROM SOURCE
7271 021406 SN=SN+1
7272 036174 200 02 0 00 040225 MOVE AC-2,DEST+3
7273 036175 312 02 0 00 041016 CAME AC-2,[252525,,252525] ;WAS FOURTH WORD OF DESTINATION BLOCK
7274 ;LOADED CORRECTLY FROM SOURCE?
7275 036176 002 02 0 00 021406 ER2 AC-2,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
7276 ;CORRECTLY FROM SOURCE
7277 021407 SN=SN+1
7278 036177 200 02 0 00 040226 MOVE AC-2,DEST+4
7279 036200 312 02 0 00 041016 CAME AC-2,[252525,,252525] ;WAS LAST WORD OF DESTINATION BLOCK LOADED
7280 ;CORRECTLY FROM SOURCE?
7281 036201 002 02 0 00 021407 ER2 AC-2,SN ;FAIL IF LAST WORD OF DESTINATION BLOCK NOT LOADED
7282 ;CORRECTLY FROM SOURCE
7283 021410 SN=SN+1
7284 036202 200 02 0 00 040227 MOVE AC-2,DEST+SIZ
7285 036203 312 02 0 00 040734 CAME AC-2,[-1,,-1] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
7286 ;CLOBBERED?
7287 036204 002 02 0 00 021410 ER2 AC-2,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
7288 ;WAS CLOBBERED
7289 036205 321 06 0 00 036134 JUMPL AC+2,G21400 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 81
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0191
7290 ;DO A BLT WHERE SOURCE BLOCK HAS AC ADDRESS AND DESTINATION BLOCK
7291 ;HAS NON-AC ADDRESS- MULTIPLE PATTERN
7292
7293 000014 AC=14
7294 SAVEAC (1,1)^
7295 036206 201 16 0 00 036206 MOVEI AC+2,. ;SAVE TEST PC
7296 036207 202 16 0 00 030051 MOVEM AC+2,TESTPC
7297 036210 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7298 036211 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7299
7300 021500 SN=21500
7301 000001 SRCE=<AC-13>&17 ;SOURCE BLOCK STARTING ADDRESS=<AC-13>&17
7302 040221 DEST=BLTBLK+1 ;DESTINATION BLOCK STARTING ADDRESS=BLTBLK+1
7303 000012 SIZ=^D10 ;BLOCK SIZE=10 WORDS
7304
7305 036212 200 14 0 00 041047 G21500: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
7306 ;SOURCE AND DESTINATION BLOCKS
7307 036213 200 00 0 00 040752 MOVE SRCE-1,[230703,,603700] ;PRELOAD WORD PRECEEDING FIRST WORD
7308 ;OF SOURCE BLOCK WITH 230703,,603700
7309 036214 200 01 0 00 041016 MOVE SRCE,[252525,,252525] ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH
7310 ;252525,,252525
7311 036215 200 02 0 00 041035 MOVE SRCE+1,[146314,,631463] ;PRELOAD SECOND WORD OF SOURCE BLOCK
7312 ;WITH 146314,,631463
7313 036216 200 03 0 00 041020 MOVE SRCE+2,[070707,,070707] ;PRELOAD THIRD WORD OF SOURCE BLOCK
7314 ;WITH 070707,,070707
7315 036217 200 04 0 00 041042 MOVE SRCE+3,[036074,,170630] ;PRELOAD FOURTH WORD OF SOURCE BLOCK
7316 ;WITH 036074,,170630
7317 036220 200 05 0 00 041037 MOVE SRCE+4,[017407,,603701] ;PRELOAD FIFTH WORD OF SOURCE BLOCK
7318 ;WITH 017407,,603701
7319 036221 200 06 0 00 041050 MOVE SRCE+5,[007700,,770077] ;PRELOAD SIXTH WORD OF SOURCE BLOCK
7320 ;WITH 007700,,770077
7321 036222 200 07 0 00 041051 MOVE SRCE+6,[003760,,077401] ;PRELOAD SEVENTH WORD OF SOURCE BLOCK
7322 ;WITH 003760,,077401
7323 036223 200 10 0 00 041052 MOVE SRCE+7,[001774,,007760] ;PRELOAD EIGHTH WORD OF SOURCE BLOCK
7324 ;WITH 001774,,007760
7325 036224 200 11 0 00 041053 MOVE SRCE+^D8,[000777,,000777] ;PRELOAD NINTH WORD OF SOURCE BLOCK
7326 ;WITH 000777,,000777
7327 036225 200 12 0 00 041054 MOVE SRCE+^D9,[000377,,600077] ;PRELOAD TENTH WORD OF SOURCE BLOCK
7328 ;WITH 000377,,600077
7329 036226 200 13 0 00 041040 MOVE SRCE+SIZ,[007603,,607062] ;PRELOAD WORD FOLLOWING LAST WORD
7330 ;OF SOURCE BLOCK WITH 007603,,607062
7331 036227 202 00 0 00 041212 MOVEM GSVAC0#
7332 036230 561 00 0 00 040220 HRROI DEST-1
7333 036231 202 00 0 00 040220 MOVEM DEST-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF DESTINATION
7334 ;BLOCK WITH DEST-1
7335 036232 561 00 0 00 040221 HRROI DEST
7336 036233 202 00 0 00 040221 MOVEM DEST ;PRELOAD FIRST WORD OF DESTINATION BLOCK WITH DEST
7337 036234 561 00 0 00 040222 HRROI DEST+1
7338 036235 202 00 0 00 040222 MOVEM DEST+1 ;PRELOAD SECOND WORD OF DESTINATION BLOCK WITH DEST+1
7339 036236 561 00 0 00 040223 HRROI DEST+2
7340 036237 202 00 0 00 040223 MOVEM DEST+2 ;PRELOAD THIRD WORD OF DESTINATION BLOCK WITH DEST+2
7341 036240 561 00 0 00 040224 HRROI DEST+3
7342 036241 202 00 0 00 040224 MOVEM DEST+3 ;PRELOAD FOURTH WORD OF DESTINATION BLOCK WITH DEST+3
7343 036242 561 00 0 00 040225 HRROI DEST+4
7344 036243 202 00 0 00 040225 MOVEM DEST+4 ;PRELOAD FIFTH WORD OF DESTINATION BLOCK WITH DEST+4
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 81-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0192
7345 036244 561 00 0 00 040226 HRROI DEST+5
7346 036245 202 00 0 00 040226 MOVEM DEST+5 ;PRELOAD SIXTH WORD OF DESTINATION BLOCK WITH DEST+5
7347 036246 561 00 0 00 040227 HRROI DEST+6
7348 036247 202 00 0 00 040227 MOVEM DEST+6 ;PRELOAD SEVENTH WORD OF DESTINATION BLOCK WITH DEST+6
7349 036250 561 00 0 00 040230 HRROI DEST+7
7350 036251 202 00 0 00 040230 MOVEM DEST+7 ;PRELOAD EIGHTH WORD OF DESTINATION BLOCK WITH DEST+7
7351 036252 561 00 0 00 040231 HRROI DEST+^D8
7352 036253 202 00 0 00 040231 MOVEM DEST+^D8 ;PRELOAD NINTH WORD OF DESTINATION BLOCK WITH DEST+8
7353 036254 561 00 0 00 040232 HRROI DEST+^D9
7354 036255 202 00 0 00 040232 MOVEM DEST+^D9 ;PRELOAD TENTH WORD OF DESTINATION BLOCK WITH DEST+9
7355 036256 561 00 0 00 040233 HRROI DEST+SIZ
7356 036257 202 00 0 00 040233 MOVEM DEST+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
7357 ;WITH DEST+SIZ
7358 036260 200 00 0 00 041212 MOVE GSVAC0
7359
7360 036261 251 14 0 00 040232 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 82
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0193
7361 ;DO A BLT WHERE SOURCE BLOCK HAS AC ADDRESS AND DESTINATION BLOCK
7362 ;HAS NON-AC ADDRESS- MULTIPLE PATTERN (CONTINUED)
7363
7364 021501 SN=SN+1
7365 036262 312 00 0 00 040752 CAME SRCE-1,[230703,,603700] ;WAS WORD PRECEEDING FIRST WORD OF SOURCE
7366 ;BLOCK CLOBBERED?
7367 036263 002 00 0 00 021501 ER2 SRCE-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
7368 ;WAS CLOBBERED
7369 021502 SN=SN+1
7370 036264 312 01 0 00 041016 CAME SRCE,[252525,,252525] ;WAS FIRST WORD OF SOURCE BLOCK CLOBBERED
7371 036265 002 01 0 00 021502 ER2 SRCE,SN ;FAIL IF FIRST WORD OF SOURCE BLOCK WAS CLOBBERED
7372 021503 SN=SN+1
7373 036266 312 02 0 00 041035 CAME SRCE+1,[146314,,631463] ;WAS SECOND WORD OF SOURCE BLOCK CLOBBERED?
7374 036267 002 02 0 00 021503 ER2 SRCE+1,SN ;FAIL IF SECOND WORD OF SOURCE BLOCK WAS CLOBBERED
7375 021504 SN=SN+1
7376 036270 312 03 0 00 041020 CAME SRCE+2,[070707,,070707] ;WAS THIRD WORD OF SOURCE BLOCK CLOBBERED?
7377 036271 002 03 0 00 021504 ER2 SRCE+2,SN ;FAIL IF THIRD WORD OF SOURCE BLOCK WAS CLOBBERED
7378 021505 SN=SN+1
7379 036272 312 04 0 00 041042 CAME SRCE+3,[036074,,170630] ;WAS FOURTH WORD OF SOURCE BLOCK CLOBBERED?
7380 036273 002 04 0 00 021505 ER2 SRCE+3,SN ;FAIL IF FOURTH WORD OF SOURCE BLOCK WAS CLOBBERED
7381 021506 SN=SN+1
7382 036274 312 05 0 00 041037 CAME SRCE+4,[017407,,603701] ;WAS FIFTH WORD OF SOURCE BLOCK CLOBBERED?
7383 036275 002 05 0 00 021506 ER2 SRCE+4,SN ;FAIL IF FIFTH WORD OF SOURCE BLOCK WAS CLOBBERED
7384 021507 SN=SN+1
7385 036276 312 06 0 00 041050 CAME SRCE+5,[007700,,770077] ;WAS SIXTH WORD OF SOURCE BLOCK CLOBBERED?
7386 036277 002 06 0 00 021507 ER2 SRCE+5,SN ;FAIL IF SIXTH WORD OF SOURCE BLOCK WAS CLOBBERED
7387 021510 SN=SN+1
7388 036300 312 07 0 00 041051 CAME SRCE+6,[003760,,077401] ;WAS SEVENTH WORD OF SOURCE BLOCK CLOBBERED?
7389 036301 002 07 0 00 021510 ER2 SRCE+6,SN ;FAIL IF SEVENTH WORD OF SOURCE BLOCK WAS CLOBBERED
7390 021511 SN=SN+1
7391 036302 312 10 0 00 041052 CAME SRCE+7,[001774,,007760] ;WAS EIGHTH WORD OF SOURCE BLOCK CLOBBERED?
7392 036303 002 10 0 00 021511 ER2 SRCE+7,SN ;FAIL IF EIGHTH WORD OF SOURCE BLOCK WAS CLOBBERED
7393 021512 SN=SN+1
7394 036304 312 11 0 00 041053 CAME SRCE+^D8,[000777,,000777] ;WAS NINTH WORD OF SOURCE BLOCK CLOBBERED?
7395 036305 002 11 0 00 021512 ER2 SRCE+^D8,SN ;FAIL IF NINTH WORD OF SOURCE BLOCK WAS CLOBBERED
7396 021513 SN=SN+1
7397 036306 312 12 0 00 041054 CAME SRCE+^D9,[000377,,600077] ;WAS LAST WORD OF SOURCE BLOCK CLOBBERED?
7398 036307 002 12 0 00 021513 ER2 SRCE+^D9,SN ;FAIL IF LAST WORD OF SOURCE BLOCK WAS CLOBBERED
7399 021514 SN=SN+1
7400 036310 312 13 0 00 041040 CAME SRCE+SIZ,[007603,,607062] ;WAS WORD FOLLOWING LAST WORD OF SOURCE
7401 ;BLOCK CLOBBERED?
7402 036311 002 13 0 00 021514 ER2 SRCE+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF SOURCE BLOCK
7403 ;WAS CLOBBERED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 83
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0194
7404 ;DO A BLT WHERE SOURCE BLOCK HAS AC ADDRESS AND DESTINATION BLOCK
7405 ;HAS NON-AC ADDRESS- MULTIPLE PATTERN (CONTINUED)
7406
7407 021515 SN=SN+1
7408 036312 200 15 0 00 040220 MOVE AC+1,DEST-1
7409 036313 312 15 0 00 041055 CAME AC+1,[-1,,DEST-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
7410 ;BLOCK CLOBBERED?
7411 036314 002 15 0 00 021515 ER2 AC+1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
7412 ;BLOCK WAS CLOBBERED?
7413 021516 SN=SN+1
7414 036315 200 15 0 00 040221 MOVE AC+1,DEST
7415 036316 312 15 0 00 041016 CAME AC+1,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
7416 ;CORRECTLY FROM SOURCE?
7417 036317 002 15 0 00 021516 ER2 AC+1,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
7418 ;CORRECTLY FROM SOURCE
7419 021517 SN=SN+1
7420 036320 200 15 0 00 040222 MOVE AC+1,DEST+1
7421 036321 312 15 0 00 041035 CAME AC+1,[146314,,631463] ;WAS SECOND WORD OF DESTINATION BLOCK
7422 ;LOADED CORRECTLY FROM SOURCE?
7423 036322 002 15 0 00 021517 ER2 AC+1,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
7424 ;CORRECTLY FROM SOURCE
7425 021520 SN=SN+1
7426 036323 200 15 0 00 040223 MOVE AC+1,DEST+2
7427 036324 312 15 0 00 041020 CAME AC+1,[070707,,070707] ;WAS THIRD WORD OF DESTINATION BLOCK LOADED
7428 ;CORRECTLY FROM SOURCE?
7429 036325 002 15 0 00 021520 ER2 AC+1,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
7430 ;CORRECTLY FROM SOURCE
7431 021521 SN=SN+1
7432 036326 200 15 0 00 040224 MOVE AC+1,DEST+3
7433 036327 312 15 0 00 041042 CAME AC+1,[036074,,170630] ;WAS FOURTH WORD OF DESTINATION BLOCK
7434 ;LOADED CORRECTLY FROM SOURCE?
7435 036330 002 15 0 00 021521 ER2 AC+1,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
7436 ;CORRECTLY FROM SOURCE
7437 021522 SN=SN+1
7438 036331 200 15 0 00 040225 MOVE AC+1,DEST+4
7439 036332 312 15 0 00 041037 CAME AC+1,[017407,,603701] ;WAS FIFTH WORD OF DESTINATION BLOCK
7440 ;LOADED CORRECTLY FROM SOURCE?
7441 036333 002 15 0 00 021522 ER2 AC+1,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
7442 ;CORRECTLY FROM SOURCE
7443 021523 SN=SN+1
7444 036334 200 15 0 00 040226 MOVE AC+1,DEST+5
7445 036335 312 15 0 00 041050 CAME AC+1,[007700,,770077] ;WAS SIXTH WORD OF DESTINATION BLOCK LOADED
7446 ;CORRECTLY FROM SOURCE?
7447 036336 002 15 0 00 021523 ER2 AC+1,SN ;FAIL IF SIXTH WORD OF DESTINATION BLOCK NOT LOADED
7448 ;CORRECTLY FROM SOURCE
7449 021524 SN=SN+1
7450 036337 200 15 0 00 040227 MOVE AC+1,DEST+6
7451 036340 312 15 0 00 041051 CAME AC+1,[003760,,077401] ;WAS SEVENTH WORD OF DESTINATION BLOCK
7452 ;LOADED CORRECTLY FROM SOURCE?
7453 036341 002 15 0 00 021524 ER2 AC+1,SN ;FAIL IF SEVENTH WORD OF DESTINATION BLOCK NOT LOADED
7454 ;CORRECTLY FROM SOURCE
7455 021525 SN=SN+1
7456 036342 200 15 0 00 040230 MOVE AC+1,DEST+7
7457 036343 312 15 0 00 041052 CAME AC+1,[001774,,007760] ;WAS EIGHTH WORD OF DESTINATION BLOCK
7458 ;LOADED CORRECTLY FROM SOURCE?
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 83-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0195
7459 036344 002 15 0 00 021525 ER2 AC+1,SN ;FAIL IF EIGHTH WORD OF DESTINATION BLOCK NOT LOADED
7460 ;CORRECTLY FROM SOURCE
7461 021526 SN=SN+1
7462 036345 200 15 0 00 040231 MOVE AC+1,DEST+^D8
7463 036346 312 15 0 00 041053 CAME AC+1,[000777,,000777] ;WAS NINTH WORD OF DESTINATION BLOCK LOADED
7464 ;CORRECTLY FROM SOURCE?
7465 036347 002 15 0 00 021526 ER2 AC+1,SN ;FAIL IF NINTH WORD OF DESTINATION BLOCK NOT LOADED
7466 ;CORRECTLY FROM SOURCE
7467 021527 SN=SN+1
7468 036350 200 15 0 00 040232 MOVE AC+1,DEST+^D9
7469 036351 312 15 0 00 041054 CAME AC+1,[000377,,600077] ;WAS LAST WORD OF DESTINATION BLOCK LOADED
7470 ;CORRECTLY FROM SOURCE?
7471 036352 002 15 0 00 021527 ER2 AC+1,SN ;FAIL IF LAST WORD OF DESTINATION BLOCK NOT LOADED
7472 ;CORRECTLY FROM SOURCE
7473 021530 SN=SN+1
7474 036353 200 15 0 00 040233 MOVE AC+1,DEST+SIZ
7475 036354 312 15 0 00 041056 CAME AC+1,[-1,,DEST+SIZ] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
7476 ;BLOCK CLOBBERED?
7477 036355 002 15 0 00 021530 ER2 AC+1,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION BLOCK
7478 ;WAS CLOBBERED
7479 036356 321 16 0 00 036212 JUMPL AC+2,G21500 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 84
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0196
7480 ;DO A BLT WHERE SOURCE BLOCK HAS NON-AC ADDRESS AND DESTINATION BLOCK
7481 ;HAS AC ADDRESS - MULTIPLE PATTERN
7482
7483 000014 AC=14
7484 SAVEAC (1,1)^
7485 036357 201 16 0 00 036357 MOVEI AC+2,. ;SAVE TEST PC
7486 036360 202 16 0 00 030051 MOVEM AC+2,TESTPC
7487 036361 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7488 036362 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7489
7490 021600 SN=21600
7491 040221 SRCE=BLTBLK+1 ;SOURCE BLOCK STARTING ADDRESS= BLTBLK+1
7492 000001 DEST=<AC-13>&17 ;DESTINATION BLOCK STARTING ADDRESS= <AC-13>&17
7493 000012 SIZ=^D10 ;BLOCK SIZE=10 WORDS
7494
7495 036363 200 14 0 00 041057 G21600: MOVE AC,[SRCE,,DEST] ;PRELOAD AC WITH STARTING ADDRESSES OF
7496 ;SOURCE AND DESTINATION BLOCKS
7497 036364 200 00 0 00 040752 MOVE [230703,,603700]
7498 036365 202 00 0 00 040220 MOVEM SRCE-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
7499 ;WITH 230703,,603700
7500 036366 200 00 0 00 041016 MOVE [252525,,252525]
7501 036367 202 00 0 00 040221 MOVEM SRCE ;PRELOAD FIRST WORD OF SOURCE BLOCK WITH 252525,,252525
7502 036370 200 00 0 00 041035 MOVE [146314,,631463]
7503 036371 202 00 0 00 040222 MOVEM SRCE+1 ;PRELOAD SECOND WORD OF SOURCE BLOCK
7504 ;WITH 146314,,631463
7505 036372 200 00 0 00 041020 MOVE [070707,,070707]
7506 036373 202 00 0 00 040223 MOVEM SRCE+2 ;PRELOAD THIRD WORD OF SOURCE BLOCK WITH 070707,,070707
7507 036374 200 00 0 00 041042 MOVE [036074,,170630]
7508 036375 202 00 0 00 040224 MOVEM SRCE+3 ;PRELOAD FOURTH WORD OF SOURCE BLOCK
7509 ;WITH 036074,,170630
7510 036376 200 00 0 00 041037 MOVE [017407,,603701]
7511 036377 202 00 0 00 040225 MOVEM SRCE+4 ;PRELOAD
7512 ;FIFTH WORD OF SOURCE BLOCK WITH 017407,,603701
7513 036400 200 00 0 00 041050 MOVE [007700,,770077]
7514 036401 202 00 0 00 040226 MOVEM SRCE+5 ;PRELOAD SIXTH WORD OF SOURCE BLOCK WITH 007700,,770077
7515 036402 200 00 0 00 041051 MOVE [003760,,077401]
7516 036403 202 00 0 00 040227 MOVEM SRCE+6 ;PRELOAD SEVENTH WORD OF SOURCE BLOCK
7517 ;WITH 003760,,077401
7518 036404 200 00 0 00 041052 MOVE [001774,,007760]
7519 036405 202 00 0 00 040230 MOVEM SRCE+7 ;PRELOAD EIGHTH WORD OF SOURCE BLOCK
7520 ;WITH 001774,,007760
7521 036406 200 00 0 00 041053 MOVE [000777,,000777]
7522 036407 202 00 0 00 040231 MOVEM SRCE+^D8 ;PRELOAD NINTH WORD OF SOURCE BLOCK WITH 000777,,000777
7523 036410 200 00 0 00 041054 MOVE [000377,,600077]
7524 036411 202 00 0 00 040232 MOVEM SRCE+^D9 ;PRELOAD TENTH WORD OF SOURCE BLOCK WITH 000377,,600077
7525 036412 200 00 0 00 041040 MOVE [007603,,607062]
7526 036413 202 00 0 00 040233 MOVEM SRCE+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF SOURCE BLOCK
7527 ;WITH 007603,,607062
7528 036414 561 00 0 00 000000 HRROI DEST-1,DEST-1 ;PRELOAD WORD PRECEEDING FIRST WORD OF DESTINATION
7529 ;BLOCK WITH DEST-1
7530 036415 561 01 0 00 000001 HRROI DEST,DEST ;PRELOAD FIRST WORD OF DESTINATION BLOCK WITH DEST
7531 036416 561 02 0 00 000002 HRROI DEST+1,DEST+1 ;PRELOAD SECOND WORD OF DESTINATION BLOCK
7532 ;WITH DEST+1,DEST+1
7533 036417 561 03 0 00 000003 HRROI DEST+2,DEST+2 ;PRELOAD THIRD WORD OF DESTINATION BLOCK WITH DEST+2
7534 036420 561 04 0 00 000004 HRROI DEST+3,DEST+3 ;PRELOAD FOURTH WORD OF DESTINATION BLOCK WITH DEST+3
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 84-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0197
7535 036421 561 05 0 00 000005 HRROI DEST+4,DEST+4 ;PRELOAD FIFTH WORD OF DESTINATION BLOCK WITH DEST+4
7536 036422 561 06 0 00 000006 HRROI DEST+5,DEST+5 ;PRELOAD SIXTH WORD OF DESTINATION BLOCK WITH DEST+5
7537 036423 561 07 0 00 000007 HRROI DEST+6,DEST+6 ;PRELOAD SEVENTH WORD OF DESTINATION BLOCK WITH DEST+6
7538 036424 561 10 0 00 000010 HRROI DEST+7,DEST+7 ;PRELOAD EIGHTH WORD OF DESTINATION BLOCK WITH DEST+7
7539 036425 561 11 0 00 000011 HRROI DEST+^D8,DEST+^D8 ;PRELOAD NINTH WORD OF DESTINATION BLOCK WITH DEST+8
7540 036426 561 12 0 00 000012 HRROI DEST+^D9,DEST+^D9 ;PRELOAD TENTH WORD OF DESTINATION BLOCK WITH DEST+9
7541 036427 561 13 0 00 000013 HRROI DEST+SIZ,DEST+SIZ ;PRELOAD WORD FOLLOWING LAST WORD OF DESTINATION
7542 ;BLOCK WITH DEST+SIZ
7543 036430 251 14 0 00 000012 BLT AC,DEST+SIZ-1 ;*BLT SHOULD LOAD DESTINATION BLOCK FROM SOURCE BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 85
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0198
7544 ;DO A BLT WHERE SOURCE BLOCK HAS NON-AC ADDRESS AND DESTINATION BLOCK
7545 ;HAS AC ADDRESS - MULTIPLE PATTERN (CONTINUED)
7546
7547 021601 SN=SN+1
7548 036431 200 15 0 00 040220 MOVE AC+1,SRCE-1
7549 036432 312 15 0 00 040752 CAME AC+1,[230703,,603700] ;WAS WORD PRECEEDING FIRST WORD OF SOURCE
7550 ;BLOCK CLOBBERED?
7551 036433 002 15 0 00 021601 ER2 AC+1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF SOURCE BLOCK
7552 ;WAS CLOBBERED
7553 021602 SN=SN+1
7554 036434 200 15 0 00 040221 MOVE AC+1,SRCE
7555 036435 312 15 0 00 041016 CAME AC+1,[252525,,252525] ;WAS FIRST WORD OF SOURCE BLOCK CLOBBERED
7556 036436 002 15 0 00 021602 ER2 AC+1,SN ;FAIL IF FIRST WORD OF SOURCE BLOCK WAS CLOBBERED
7557 021603 SN=SN+1
7558 036437 200 15 0 00 040222 MOVE AC+1,SRCE+1
7559 036440 312 15 0 00 041035 CAME AC+1,[146314,,631463] ;WAS SECOND WORD OF SOURCE BLOCK CLOBBERED?
7560 036441 002 15 0 00 021603 ER2 AC+1,SN ;FAIL IF SECOND WORD OF SOURCE BLOCK WAS CLOBBERED
7561 021604 SN=SN+1
7562 036442 200 15 0 00 040223 MOVE AC+1,SRCE+2
7563 036443 312 15 0 00 041020 CAME AC+1,[070707,,070707] ;WAS THIRD WORD OF SOURCE BLOCK CLOBBERED?
7564 036444 002 15 0 00 021604 ER2 AC+1,SN ;FAIL IF THIRD WORD OF SOURCE BLOCK WAS CLOBBERED
7565 021605 SN=SN+1
7566 036445 200 15 0 00 040224 MOVE AC+1,SRCE+3
7567 036446 312 15 0 00 041042 CAME AC+1,[036074,,170630] ;WAS FOURTH WORD OF SOURCE BLOCK CLOBBERED?
7568 036447 002 15 0 00 021605 ER2 AC+1,SN ;FAIL IF FOURTH WORD OF SOURCE BLOCK WAS CLOBBERED
7569 021606 SN=SN+1
7570 036450 200 15 0 00 040225 MOVE AC+1,SRCE+4
7571 036451 312 15 0 00 041037 CAME AC+1,[017407,,603701] ;WAS FIFTH WORD OF SOURCE BLOCK CLOBBERED?
7572 036452 002 15 0 00 021606 ER2 AC+1,SN ;FAIL IF FIFTH WORD OF SOURCE BLOCK WAS CLOBBERED
7573 021607 SN=SN+1
7574 036453 200 15 0 00 040226 MOVE AC+1,SRCE+5
7575 036454 312 15 0 00 041050 CAME AC+1,[007700,,770077] ;WAS SIXTH WORD OF SOURCE BLOCK CLOBBERED?
7576 036455 002 15 0 00 021607 ER2 AC+1,SN ;FAIL IF SIXTH WORD OF SOURCE BLOCK WAS CLOBBERED
7577 021610 SN=SN+1
7578 036456 200 15 0 00 040227 MOVE AC+1,SRCE+6
7579 036457 312 15 0 00 041051 CAME AC+1,[003760,,077401] ;WAS SEVENTH WORD OF SOURCE BLOCK CLOBBERED?
7580 036460 002 15 0 00 021610 ER2 AC+1,SN ;FAIL IF SEVENTH WORD OF SOURCE BLOCK WAS CLOBBERED
7581 021611 SN=SN+1
7582 036461 200 15 0 00 040230 MOVE AC+1,SRCE+7
7583 036462 312 15 0 00 041052 CAME AC+1,[001774,,007760] ;WAS EIGHTH WORD OF SOURCE BLOCK CLOBBERED?
7584 036463 002 15 0 00 021611 ER2 AC+1,SN ;FAIL IF EIGTH WORD OF SOURCE BLOCK WAS CLOBBERED
7585 021612 SN=SN+1
7586 036464 200 15 0 00 040231 MOVE AC+1,SRCE+^D8
7587 036465 312 15 0 00 041053 CAME AC+1,[000777,,000777] ;WAS NINTH WORD OF SOURCE BLOCK CLOBBERED?
7588 036466 002 15 0 00 021612 ER2 AC+1,SN ;FAIL IF NINTH WORD OF SOURCE BLOCK WAS CLOBBERED
7589 021613 SN=SN+1
7590 036467 200 15 0 00 040232 MOVE AC+1,SRCE+^D9
7591 036470 312 15 0 00 041054 CAME AC+1,[000377,,600077] ;WAS LAST WORD OF SOURCE BLOCK CLOBBERED?
7592 036471 002 15 0 00 021613 ER2 AC+1,SN ;FAIL IF LAST WORD OF SOURCE BLOCK WAS CLOBBERED
7593 021614 SN=SN+1
7594 036472 200 15 0 00 040233 MOVE AC+1,SRCE+SIZ
7595 036473 312 15 0 00 041040 CAME AC+1,[007603,,607062] ;WAS WORD FOLLOWING LAST WORD OF SOURCE
7596 ;BLOCK CLOBBERED?
7597 036474 002 15 0 00 021614 ER2 AC+1,SN ;FAIL IF WORD FOLLOWING LAST WORD OF SOURCE BLOCK WAS
7598 ;CLOBBERED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 86
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0199
7599 ;DO A BLT WHERE SOURCE BLOCK HAS NON-AC ADDRESS AND DESTINATION BLOCK
7600 ;HAS AC ADDRESS - MULTIPLE PATTERN (CONTINUED)
7601
7602 021615 SN=SN+1
7603 036475 312 00 0 00 041060 CAME DEST-1,[-1,,DEST-1] ;WAS WORD PRECEEDING FIRST WORD OF DESTINATION
7604 ;BLOCK CLOBBERED?
7605 036476 002 00 0 00 021615 ER2 DEST-1,SN ;FAIL IF WORD PRECEEDING FIRST WORD OF DESTINATION
7606 ;BLOCK WAS CLOBBERED?
7607 021616 SN=SN+1
7608 036477 312 01 0 00 041016 CAME DEST,[252525,,252525] ;WAS FIRST WORD OF DESTINATION BLOCK LOADED
7609 ;CORRECTLY FROM SOURCE?
7610 036500 002 01 0 00 021616 ER2 DEST,SN ;FAIL IF FIRST WORD OF DESTINATION BLOCK NOT LOADED
7611 ;CORRECTLY FROM SOURCE
7612 021617 SN=SN+1
7613 036501 312 02 0 00 041035 CAME DEST+1,[146314,,631463] ;WAS SECOND WORD OF DESTINATION BLOCK
7614 ;LOADED CORRECTLY FROM SOURCE?
7615 036502 002 02 0 00 021617 ER2 DEST+1,SN ;FAIL IF SECOND WORD OF DESTINATION BLOCK NOT LOADED
7616 ;CORRECTLY FROM SOURCE
7617 021620 SN=SN+1
7618 036503 312 03 0 00 041020 CAME DEST+2,[070707,,070707] ;WAS THIRD WORD OF DESTINATION BLOCK
7619 ;LOADED CORRECTLY FROM SOURCE?
7620 036504 002 03 0 00 021620 ER2 DEST+2,SN ;FAIL IF THIRD WORD OF DESTINATION BLOCK NOT LOADED
7621 ;CORRECTLY FROM SOURCE
7622 021621 SN=SN+1
7623 036505 312 04 0 00 041042 CAME DEST+3,[036074,,170630] ;WAS FOURTH WORD OF DESTINATION BLOCK
7624 ;LOADED CORRECTLY FROM SOURCE?
7625 036506 002 04 0 00 021621 ER2 DEST+3,SN ;FAIL IF FOURTH WORD OF DESTINATION BLOCK NOT LOADED
7626 ;CORRECTLY FROM SOURCE
7627 021622 SN=SN+1
7628 036507 312 05 0 00 041037 CAME DEST+4,[017407,,603701] ;WAS FIFTH WORD OF DESTINATION BLOCK
7629 ;LOADED CORRECTLY FROM SOURCE?
7630 036510 002 05 0 00 021622 ER2 DEST+4,SN ;FAIL IF FIFTH WORD OF DESTINATION BLOCK NOT LOADED
7631 ;CORRECTLY FROM SOURCE
7632 021623 SN=SN+1
7633 036511 312 06 0 00 041050 CAME DEST+5,[007700,,770077] ;WAS SIXTH WORD OF DESTINATION BLOCK
7634 ;LOADED CORRECTLY FROM SOURCE?
7635 036512 002 06 0 00 021623 ER2 DEST+5,SN ;FAIL IF SIXTH WORD OF DESTINATION BLOCK NOT LOADED
7636 ;CORRECTLY FROM SOURCE
7637 021624 SN=SN+1
7638 036513 312 07 0 00 041051 CAME DEST+6,[003760,,077401] ;WAS SEVENTH WORD OF DESTINATION BLOCK
7639 ;LOADED CORRECTLY FROM SOURCE?
7640 036514 002 07 0 00 021624 ER2 DEST+6,SN ;FAIL IF SEVENTH WORD OF DESTINATION BLOCK NOT LOADED
7641 ;CORRECTLY FROM SOURCE
7642 021625 SN=SN+1
7643 036515 312 10 0 00 041052 CAME DEST+7,[001774,,007760] ;WAS EIGHTH WORD OF DESTINATION BLOCK
7644 ;LOADED CORRECTLY FROM SOURCE?
7645 036516 002 10 0 00 021625 ER2 DEST+7,SN ;FAIL IF EIGHTH WORD OF DESTINATION BLOCK NOT LOADED
7646 ;CORRECTLY FROM SOURCE
7647 021626 SN=SN+1
7648 036517 312 11 0 00 041053 CAME DEST+^D8,[000777,,000777] ;WAS NINTH WORD OF DESTINATION BLOCK
7649 ;LOADED CORRECTLY FROM SOURCE?
7650 036520 002 11 0 00 021626 ER2 DEST+^D8,SN ;FAIL IF NINTH WORD OF DESTINATION BLOCK NOT LOADED
7651 ;CORRECTLY FROM SOURCE
7652 021627 SN=SN+1
7653 036521 312 12 0 00 041054 CAME DEST+^D9,[000377,,600077] ;WAS LAST WORD OF DESTINATION BLOCK
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 86-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0200
7654 ;LOADED CORRECTLY FROM SOURCE?
7655 036522 002 12 0 00 021627 ER2 DEST+^D9,SN ;FAIL IF LAST WORD OF DESTINATION BLOCK NOT LOADED
7656 ;CORRECTLY FROM SOURCE
7657 021630 SN=SN+1
7658 036523 312 13 0 00 041061 CAME DEST+SIZ,[-1,,DEST+SIZ] ;WAS WORD FOLLOWING LAST WORD OF DESTINATION
7659 ;BLOCK CLOBBERED?
7660 036524 002 13 0 00 021630 ER2 DEST+SIZ,SN ;FAIL IF WORD FOLLOWING LAST WORD OF DESTINATION
7661 ;BLOCK WAS CLOBBERED
7662 036525 321 16 0 00 036363 JUMPL AC+2,G21600 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 87
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0201
7663 ;TEST BLT WITH 'E' LESS THAN RH(AC)
7664 ;SUCH THAT THE BLT INSTR. TRANSFERS ONLY ONE WORD, THEN STOPS.
7665
7666 000010 AC=10
7667 SAVEAC (1,1)^
7668 036526 201 12 0 00 036526 MOVEI AC+2,. ;SAVE TEST PC
7669 036527 202 12 0 00 030051 MOVEM AC+2,TESTPC
7670 036530 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7671 036531 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7672 021700 SN=21700
7673
7674 041224 BLTSRC=END+2
7675 041230 BLTDST=END+6
7676
7677 036532 200 10 0 00 041016 G21700: MOVE AC,[252525,,252525] ; PRELOAD FOR SRC-1
7678 036533 202 10 0 00 041223 MOVEM AC,BLTSRC-1
7679 036534 200 10 0 00 040726 MOVE AC,[707070,,707070] ; PRELOAD FOR SRC
7680 036535 202 10 0 00 041224 MOVEM AC,BLTSRC
7681 036536 200 10 0 00 041062 MOVE AC,[525252,,525252] ;PRELOAD FOR SRC+1
7682 036537 202 10 0 00 041225 MOVEM AC,BLTSRC+1
7683 036540 200 10 0 00 041063 MOVE AC,[123456,,654321] ;PRELOAD FOR DST-1
7684 036541 202 10 0 00 041227 MOVEM AC,BLTDST-1
7685 036542 200 10 0 00 041020 MOVE AC,[070707,,070707] ;PRELOAD FOR DST
7686 036543 202 10 0 00 041230 MOVEM AC,BLTDST
7687 036544 200 10 0 00 040743 MOVE AC,[112233,,445566] ;PRELOAD FOR DST+1
7688 036545 202 10 0 00 041231 MOVEM AC,BLTDST+1
7689
7690 036546 200 10 0 00 041064 MOVE AC,[BLTSRC,,BLTDST] ;SETUP BLT PTR=FROM,,TO
7691 036547 251 10 0 00 041227 BLT AC,BLTDST-1 ;*BLT SHOULD XFER ONE WORD AND STOP
7692
7693 021701 SN=SN+1
7694 036550 312 10 0 00 041064 CAME AC,[BLTSRC,,BLTDST] ;SEE IF PTR CHANGED
7695 036551 002 10 0 00 021701 ER2 AC,SN ;YES, REPORT
7696 021702 SN=SN+1
7697 036552 200 10 0 00 041016 MOVE AC,[252525,,252525] ;GET PRELOAD FOR SRC-1
7698 036553 312 10 0 00 041223 CAME AC,BLTSRC-1 ;SEE IF OK
7699 036554 002 10 0 00 021702 ER2 AC,SN ;REPORT ERROR
7700 021703 SN=SN+1
7701 036555 200 10 0 00 040726 MOVE AC,[707070,,707070] ;GET PRELOAD FOR SRC
7702 036556 312 10 0 00 041224 CAME AC,BLTSRC ;SEE IF SRC OK
7703 036557 002 10 0 00 021703 ER2 AC,SN ; REPORT ERR
7704 021704 SN=SN+1
7705 036560 200 10 0 00 041062 MOVE AC,[525252,,525252] ;GET PRELOAD FOR SRC+1
7706 036561 312 10 0 00 041225 CAME AC,BLTSRC+1 ;SEE IF OK
7707 036562 002 10 0 00 021704 ER2 AC,SN ;REPORT ER
7708 021705 SN=SN+1
7709 036563 200 10 0 00 041063 MOVE AC,[123456,,654321] ;GET PRELOAD FOR DST-1
7710 036564 312 10 0 00 041227 CAME AC,BLTDST-1 ;SEE IF OK
7711 036565 002 10 0 00 021705 ER2 AC,SN ;REPORT ERR
7712 021706 SN=SN+1
7713 036566 200 10 0 00 040726 MOVE AC,[707070,,707070] ;GET PRELOAD FOR SRC***
7714 036567 312 10 0 00 041230 CAME AC,BLTDST ;SEE IF IT XFERED A WORD
7715 036570 002 10 0 00 021706 ER2 AC,SN ;REPORT ER
7716 021707 SN=SN+1
7717 036571 200 10 0 00 040743 MOVE AC,[112233,,445566] ;GET PRELOAD FOR DST+1
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 87-1
DAKAMM MAC 20-JAN-77 11:34 PART II - GENERAL BLOCK TRANSFER TEST SEQ 0202
7718 036572 312 10 0 00 041231 CAME AC,BLTDST+1 ;SEE IF XFERED ONLY ONE WORD
7719 036573 002 10 0 00 021707 ER2 AC,SN ;REPORT ERR
7720
7721 036574 321 12 0 00 036532 JUMPL AC+2,G21700 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 88
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0203
7722 SUBTTL PART III - GENERAL JFFO TEST
7723
7724 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0
7725
7726 030100 G30000: SN=30100
7727 777777 777777 AC=-1
7728
7729 036575 201 00 0 00 041065 MOVEI [ASCIZ/JFFO NO-JUMP FAILED/]
7730 036576 202 00 0 00 040646 MOVEM SPDES ;INITIALIZE SPECIAL FAILURE DESCRIPTOR
7731
7732 G30100: REPEAT ^D13,<
7733 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7734 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7735
7736 SN=SN+1
7737 AC=<AC+1>&17
7738 SAVEAC (1,1)
7739
7740 SETZM AC ;CLEAR AC
7741 SETOM <AC+1>&17 ;INITIALIZE AC+1
7742 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7743 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7744 ER2 AC,SN ;ERROR IF JFFO JUMPED
7745 SKIPE AC ;EXAMINE AC
7746 ER3 AC,SN ;C(AC) WAS CLOBBERED
7747 SKIPE <AC+1>&17 ;EXAMINE AC+1
7748 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7749 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7750 >
7751
7752 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7753 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7754
7755 030101 SN=SN+1
7756 000000 AC=<AC+1>&17
7757 SAVEAC (1,1)^
7758 036577 201 02 0 00 036577 MOVEI AC+2,. ;SAVE TEST PC
7759 036600 202 02 0 00 030051 MOVEM AC+2,TESTPC
7760 036601 201 02 0 00 000002 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7761 036602 202 02 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7762
7763 036603 402 00 0 00 000000 SETZM AC ;CLEAR AC
7764 036604 476 00 0 00 000001 SETOM <AC+1>&17 ;INITIALIZE AC+1
7765 036605 243 00 0 00 036607 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7766 036606 254 00 0 00 036610 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7767 036607 002 00 0 00 030101 ER2 AC,SN ;ERROR IF JFFO JUMPED
7768 036610 332 00 0 00 000000 SKIPE AC ;EXAMINE AC
7769 036611 003 00 0 00 030101 ER3 AC,SN ;C(AC) WAS CLOBBERED
7770 036612 332 00 0 00 000001 SKIPE <AC+1>&17 ;EXAMINE AC+1
7771 036613 004 01 0 00 030101 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7772 036614 321 02 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7773
7774
7775 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7776 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 88-1
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0204
7777
7778 030102 SN=SN+1
7779 000001 AC=<AC+1>&17
7780 SAVEAC (1,1)^
7781 036615 201 03 0 00 036615 MOVEI AC+2,. ;SAVE TEST PC
7782 036616 202 03 0 00 030051 MOVEM AC+2,TESTPC
7783 036617 201 03 0 00 000003 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7784 036620 202 03 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7785
7786 036621 402 00 0 00 000001 SETZM AC ;CLEAR AC
7787 036622 476 00 0 00 000002 SETOM <AC+1>&17 ;INITIALIZE AC+1
7788 036623 243 01 0 00 036625 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7789 036624 254 00 0 00 036626 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7790 036625 002 01 0 00 030102 ER2 AC,SN ;ERROR IF JFFO JUMPED
7791 036626 332 00 0 00 000001 SKIPE AC ;EXAMINE AC
7792 036627 003 01 0 00 030102 ER3 AC,SN ;C(AC) WAS CLOBBERED
7793 036630 332 00 0 00 000002 SKIPE <AC+1>&17 ;EXAMINE AC+1
7794 036631 004 02 0 00 030102 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7795 036632 321 03 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7796
7797
7798 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7799 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7800
7801 030103 SN=SN+1
7802 000002 AC=<AC+1>&17
7803 SAVEAC (1,1)^
7804 036633 201 04 0 00 036633 MOVEI AC+2,. ;SAVE TEST PC
7805 036634 202 04 0 00 030051 MOVEM AC+2,TESTPC
7806 036635 201 04 0 00 000004 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7807 036636 202 04 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7808
7809 036637 402 00 0 00 000002 SETZM AC ;CLEAR AC
7810 036640 476 00 0 00 000003 SETOM <AC+1>&17 ;INITIALIZE AC+1
7811 036641 243 02 0 00 036643 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7812 036642 254 00 0 00 036644 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7813 036643 002 02 0 00 030103 ER2 AC,SN ;ERROR IF JFFO JUMPED
7814 036644 332 00 0 00 000002 SKIPE AC ;EXAMINE AC
7815 036645 003 02 0 00 030103 ER3 AC,SN ;C(AC) WAS CLOBBERED
7816 036646 332 00 0 00 000003 SKIPE <AC+1>&17 ;EXAMINE AC+1
7817 036647 004 03 0 00 030103 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7818 036650 321 04 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7819
7820
7821 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7822 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7823
7824 030104 SN=SN+1
7825 000003 AC=<AC+1>&17
7826 SAVEAC (1,1)^
7827 036651 201 05 0 00 036651 MOVEI AC+2,. ;SAVE TEST PC
7828 036652 202 05 0 00 030051 MOVEM AC+2,TESTPC
7829 036653 201 05 0 00 000005 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7830 036654 202 05 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7831
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 88-2
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0205
7832 036655 402 00 0 00 000003 SETZM AC ;CLEAR AC
7833 036656 476 00 0 00 000004 SETOM <AC+1>&17 ;INITIALIZE AC+1
7834 036657 243 03 0 00 036661 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7835 036660 254 00 0 00 036662 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7836 036661 002 03 0 00 030104 ER2 AC,SN ;ERROR IF JFFO JUMPED
7837 036662 332 00 0 00 000003 SKIPE AC ;EXAMINE AC
7838 036663 003 03 0 00 030104 ER3 AC,SN ;C(AC) WAS CLOBBERED
7839 036664 332 00 0 00 000004 SKIPE <AC+1>&17 ;EXAMINE AC+1
7840 036665 004 04 0 00 030104 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7841 036666 321 05 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7842
7843
7844 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7845 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7846
7847 030105 SN=SN+1
7848 000004 AC=<AC+1>&17
7849 SAVEAC (1,1)^
7850 036667 201 06 0 00 036667 MOVEI AC+2,. ;SAVE TEST PC
7851 036670 202 06 0 00 030051 MOVEM AC+2,TESTPC
7852 036671 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7853 036672 202 06 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7854
7855 036673 402 00 0 00 000004 SETZM AC ;CLEAR AC
7856 036674 476 00 0 00 000005 SETOM <AC+1>&17 ;INITIALIZE AC+1
7857 036675 243 04 0 00 036677 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7858 036676 254 00 0 00 036700 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7859 036677 002 04 0 00 030105 ER2 AC,SN ;ERROR IF JFFO JUMPED
7860 036700 332 00 0 00 000004 SKIPE AC ;EXAMINE AC
7861 036701 003 04 0 00 030105 ER3 AC,SN ;C(AC) WAS CLOBBERED
7862 036702 332 00 0 00 000005 SKIPE <AC+1>&17 ;EXAMINE AC+1
7863 036703 004 05 0 00 030105 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7864 036704 321 06 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7865
7866
7867 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7868 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7869
7870 030106 SN=SN+1
7871 000005 AC=<AC+1>&17
7872 SAVEAC (1,1)^
7873 036705 201 07 0 00 036705 MOVEI AC+2,. ;SAVE TEST PC
7874 036706 202 07 0 00 030051 MOVEM AC+2,TESTPC
7875 036707 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7876 036710 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7877
7878 036711 402 00 0 00 000005 SETZM AC ;CLEAR AC
7879 036712 476 00 0 00 000006 SETOM <AC+1>&17 ;INITIALIZE AC+1
7880 036713 243 05 0 00 036715 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7881 036714 254 00 0 00 036716 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7882 036715 002 05 0 00 030106 ER2 AC,SN ;ERROR IF JFFO JUMPED
7883 036716 332 00 0 00 000005 SKIPE AC ;EXAMINE AC
7884 036717 003 05 0 00 030106 ER3 AC,SN ;C(AC) WAS CLOBBERED
7885 036720 332 00 0 00 000006 SKIPE <AC+1>&17 ;EXAMINE AC+1
7886 036721 004 06 0 00 030106 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 88-3
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0206
7887 036722 321 07 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7888
7889
7890 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7891 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7892
7893 030107 SN=SN+1
7894 000006 AC=<AC+1>&17
7895 SAVEAC (1,1)^
7896 036723 201 10 0 00 036723 MOVEI AC+2,. ;SAVE TEST PC
7897 036724 202 10 0 00 030051 MOVEM AC+2,TESTPC
7898 036725 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7899 036726 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7900
7901 036727 402 00 0 00 000006 SETZM AC ;CLEAR AC
7902 036730 476 00 0 00 000007 SETOM <AC+1>&17 ;INITIALIZE AC+1
7903 036731 243 06 0 00 036733 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7904 036732 254 00 0 00 036734 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7905 036733 002 06 0 00 030107 ER2 AC,SN ;ERROR IF JFFO JUMPED
7906 036734 332 00 0 00 000006 SKIPE AC ;EXAMINE AC
7907 036735 003 06 0 00 030107 ER3 AC,SN ;C(AC) WAS CLOBBERED
7908 036736 332 00 0 00 000007 SKIPE <AC+1>&17 ;EXAMINE AC+1
7909 036737 004 07 0 00 030107 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7910 036740 321 10 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7911
7912
7913 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7914 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7915
7916 030110 SN=SN+1
7917 000007 AC=<AC+1>&17
7918 SAVEAC (1,1)^
7919 036741 201 11 0 00 036741 MOVEI AC+2,. ;SAVE TEST PC
7920 036742 202 11 0 00 030051 MOVEM AC+2,TESTPC
7921 036743 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7922 036744 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7923
7924 036745 402 00 0 00 000007 SETZM AC ;CLEAR AC
7925 036746 476 00 0 00 000010 SETOM <AC+1>&17 ;INITIALIZE AC+1
7926 036747 243 07 0 00 036751 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7927 036750 254 00 0 00 036752 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7928 036751 002 07 0 00 030110 ER2 AC,SN ;ERROR IF JFFO JUMPED
7929 036752 332 00 0 00 000007 SKIPE AC ;EXAMINE AC
7930 036753 003 07 0 00 030110 ER3 AC,SN ;C(AC) WAS CLOBBERED
7931 036754 332 00 0 00 000010 SKIPE <AC+1>&17 ;EXAMINE AC+1
7932 036755 004 10 0 00 030110 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7933 036756 321 11 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7934
7935
7936 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7937 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7938
7939 030111 SN=SN+1
7940 000010 AC=<AC+1>&17
7941 SAVEAC (1,1)^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 88-4
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0207
7942 036757 201 12 0 00 036757 MOVEI AC+2,. ;SAVE TEST PC
7943 036760 202 12 0 00 030051 MOVEM AC+2,TESTPC
7944 036761 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7945 036762 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7946
7947 036763 402 00 0 00 000010 SETZM AC ;CLEAR AC
7948 036764 476 00 0 00 000011 SETOM <AC+1>&17 ;INITIALIZE AC+1
7949 036765 243 10 0 00 036767 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7950 036766 254 00 0 00 036770 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7951 036767 002 10 0 00 030111 ER2 AC,SN ;ERROR IF JFFO JUMPED
7952 036770 332 00 0 00 000010 SKIPE AC ;EXAMINE AC
7953 036771 003 10 0 00 030111 ER3 AC,SN ;C(AC) WAS CLOBBERED
7954 036772 332 00 0 00 000011 SKIPE <AC+1>&17 ;EXAMINE AC+1
7955 036773 004 11 0 00 030111 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7956 036774 321 12 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7957
7958
7959 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7960 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7961
7962 030112 SN=SN+1
7963 000011 AC=<AC+1>&17
7964 SAVEAC (1,1)^
7965 036775 201 13 0 00 036775 MOVEI AC+2,. ;SAVE TEST PC
7966 036776 202 13 0 00 030051 MOVEM AC+2,TESTPC
7967 036777 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7968 037000 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7969
7970 037001 402 00 0 00 000011 SETZM AC ;CLEAR AC
7971 037002 476 00 0 00 000012 SETOM <AC+1>&17 ;INITIALIZE AC+1
7972 037003 243 11 0 00 037005 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7973 037004 254 00 0 00 037006 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
7974 037005 002 11 0 00 030112 ER2 AC,SN ;ERROR IF JFFO JUMPED
7975 037006 332 00 0 00 000011 SKIPE AC ;EXAMINE AC
7976 037007 003 11 0 00 030112 ER3 AC,SN ;C(AC) WAS CLOBBERED
7977 037010 332 00 0 00 000012 SKIPE <AC+1>&17 ;EXAMINE AC+1
7978 037011 004 12 0 00 030112 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
7979 037012 321 13 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
7980
7981
7982 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
7983 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
7984
7985 030113 SN=SN+1
7986 000012 AC=<AC+1>&17
7987 SAVEAC (1,1)^
7988 037013 201 14 0 00 037013 MOVEI AC+2,. ;SAVE TEST PC
7989 037014 202 14 0 00 030051 MOVEM AC+2,TESTPC
7990 037015 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
7991 037016 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
7992
7993 037017 402 00 0 00 000012 SETZM AC ;CLEAR AC
7994 037020 476 00 0 00 000013 SETOM <AC+1>&17 ;INITIALIZE AC+1
7995 037021 243 12 0 00 037023 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
7996 037022 254 00 0 00 037024 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 88-5
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0208
7997 037023 002 12 0 00 030113 ER2 AC,SN ;ERROR IF JFFO JUMPED
7998 037024 332 00 0 00 000012 SKIPE AC ;EXAMINE AC
7999 037025 003 12 0 00 030113 ER3 AC,SN ;C(AC) WAS CLOBBERED
8000 037026 332 00 0 00 000013 SKIPE <AC+1>&17 ;EXAMINE AC+1
8001 037027 004 13 0 00 030113 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
8002 037030 321 14 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8003
8004
8005 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
8006 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8007
8008 030114 SN=SN+1
8009 000013 AC=<AC+1>&17
8010 SAVEAC (1,1)^
8011 037031 201 15 0 00 037031 MOVEI AC+2,. ;SAVE TEST PC
8012 037032 202 15 0 00 030051 MOVEM AC+2,TESTPC
8013 037033 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8014 037034 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8015
8016 037035 402 00 0 00 000013 SETZM AC ;CLEAR AC
8017 037036 476 00 0 00 000014 SETOM <AC+1>&17 ;INITIALIZE AC+1
8018 037037 243 13 0 00 037041 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
8019 037040 254 00 0 00 037042 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
8020 037041 002 13 0 00 030114 ER2 AC,SN ;ERROR IF JFFO JUMPED
8021 037042 332 00 0 00 000013 SKIPE AC ;EXAMINE AC
8022 037043 003 13 0 00 030114 ER3 AC,SN ;C(AC) WAS CLOBBERED
8023 037044 332 00 0 00 000014 SKIPE <AC+1>&17 ;EXAMINE AC+1
8024 037045 004 14 0 00 030114 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
8025 037046 321 15 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8026
8027
8028 ;VERIFY THAT JFFO WILL CLEAR AC+1 AND NOT JUMP WHEN C(AC)=0.
8029 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8030
8031 030115 SN=SN+1
8032 000014 AC=<AC+1>&17
8033 SAVEAC (1,1)^
8034 037047 201 16 0 00 037047 MOVEI AC+2,. ;SAVE TEST PC
8035 037050 202 16 0 00 030051 MOVEM AC+2,TESTPC
8036 037051 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8037 037052 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8038
8039 037053 402 00 0 00 000014 SETZM AC ;CLEAR AC
8040 037054 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8041 037055 243 14 0 00 037057 JFFO AC,.+2 ;*JFFO SHOULD CLEAR AC+1 AND NOT JUMP
8042 037056 254 00 0 00 037060 JRST .+2 ;PASS IF JFFO DOES NOT JUMP
8043 037057 002 14 0 00 030115 ER2 AC,SN ;ERROR IF JFFO JUMPED
8044 037060 332 00 0 00 000014 SKIPE AC ;EXAMINE AC
8045 037061 003 14 0 00 030115 ER3 AC,SN ;C(AC) WAS CLOBBERED
8046 037062 332 00 0 00 000015 SKIPE <AC+1>&17 ;EXAMINE AC+1
8047 037063 004 15 0 00 030115 ER4 AC+1,SN ;AC+1 WAS NOT CLEARED
8048 037064 321 16 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8049
8050 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 88-6
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0209
8051 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8052 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8053
8054 037065 201 00 0 00 041071 MOVEI [ASCIZ/JFFO JUMP FAILED/]
8055 037066 202 00 0 00 040646 MOVEM SPDES ;INITIALIZE SPECIAL FAILURE DESCRIPTER
8056
8057 037067 477 14 0 00 000015 G30200: SETOB AC,<AC+1>&17 ;INITIALIZE AC AND AC+1
8058 037070 243 14 0 00 037072 JFFO AC,.+2
8059 037071 002 14 0 00 030201 ER2 AC,30201 ;ERROR IF JFFO DID NOT JUMP
8060 037072 312 14 0 00 040734 CAME AC,[-1,,-1] ;EXAMINE AC
8061 037073 003 14 0 00 030201 ER3 AC,30201 ;C(AC) WAS CLOBBERED
8062 037074 332 00 0 00 000015 SKIPE <AC+1>&17 ;EXAMINE AC+1
8063 037075 004 15 0 00 030201 ER4 AC+1,30201 ;C(AC+1) NOT = TO NO OF LEADING ZEROS IN AC
8064 037076 321 16 0 00 037067 JUMPL AC+2,G30200 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0210
8065 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8066 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8067 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8068
8069 030300 SN=30300
8070 000001 000000 XX=1000000
8071 777777 777777 ZZ=-1
8072
8073 G30300: REPEAT ^D18,<
8074 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8075 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8076 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8077
8078 SN=SN+1
8079 XX=XX/2
8080 ZZ=ZZ+1
8081 MOVSI AC,XX ;INITIALIZE AC
8082 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8083 SETOM <AC+1>&17 ;INITIALIZE AC+1
8084 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8085 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8086 CAME AC,<AC-2>&17 ;EXAMINE AC
8087 ER3 AC,SN ;C(AC) WAS CLOBBERED
8088 CAIE AC+1,ZZ ;EXAMINE AC+1
8089 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8090 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8091 >
8092
8093 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8094 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8095 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8096
8097 030301 SN=SN+1
8098 400000 XX=XX/2
8099 000000 ZZ=ZZ+1
8100 037077 205 14 0 00 400000 MOVSI AC,XX ;INITIALIZE AC
8101 037100 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8102 037101 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8103 037102 243 14 0 00 037104 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8104 037103 002 14 0 00 030301 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8105 037104 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8106 037105 003 14 0 00 030301 ER3 AC,SN ;C(AC) WAS CLOBBERED
8107 037106 302 15 0 00 000000 CAIE AC+1,ZZ ;EXAMINE AC+1
8108 037107 004 15 0 00 030301 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8109 037110 321 16 0 00 037077 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8110
8111
8112 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8113 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8114 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8115
8116 030302 SN=SN+1
8117 200000 XX=XX/2
8118 000001 ZZ=ZZ+1
8119 037111 205 14 0 00 200000 MOVSI AC,XX ;INITIALIZE AC
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-1
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0211
8120 037112 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8121 037113 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8122 037114 243 14 0 00 037116 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8123 037115 002 14 0 00 030302 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8124 037116 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8125 037117 003 14 0 00 030302 ER3 AC,SN ;C(AC) WAS CLOBBERED
8126 037120 302 15 0 00 000001 CAIE AC+1,ZZ ;EXAMINE AC+1
8127 037121 004 15 0 00 030302 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8128 037122 321 16 0 00 037111 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8129
8130
8131 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8132 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8133 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8134
8135 030303 SN=SN+1
8136 100000 XX=XX/2
8137 000002 ZZ=ZZ+1
8138 037123 205 14 0 00 100000 MOVSI AC,XX ;INITIALIZE AC
8139 037124 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8140 037125 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8141 037126 243 14 0 00 037130 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8142 037127 002 14 0 00 030303 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8143 037130 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8144 037131 003 14 0 00 030303 ER3 AC,SN ;C(AC) WAS CLOBBERED
8145 037132 302 15 0 00 000002 CAIE AC+1,ZZ ;EXAMINE AC+1
8146 037133 004 15 0 00 030303 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8147 037134 321 16 0 00 037123 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8148
8149
8150 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8151 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8152 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8153
8154 030304 SN=SN+1
8155 040000 XX=XX/2
8156 000003 ZZ=ZZ+1
8157 037135 205 14 0 00 040000 MOVSI AC,XX ;INITIALIZE AC
8158 037136 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8159 037137 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8160 037140 243 14 0 00 037142 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8161 037141 002 14 0 00 030304 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8162 037142 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8163 037143 003 14 0 00 030304 ER3 AC,SN ;C(AC) WAS CLOBBERED
8164 037144 302 15 0 00 000003 CAIE AC+1,ZZ ;EXAMINE AC+1
8165 037145 004 15 0 00 030304 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8166 037146 321 16 0 00 037135 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8167
8168
8169 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8170 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8171 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8172
8173 030305 SN=SN+1
8174 020000 XX=XX/2
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-2
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0212
8175 000004 ZZ=ZZ+1
8176 037147 205 14 0 00 020000 MOVSI AC,XX ;INITIALIZE AC
8177 037150 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8178 037151 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8179 037152 243 14 0 00 037154 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8180 037153 002 14 0 00 030305 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8181 037154 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8182 037155 003 14 0 00 030305 ER3 AC,SN ;C(AC) WAS CLOBBERED
8183 037156 302 15 0 00 000004 CAIE AC+1,ZZ ;EXAMINE AC+1
8184 037157 004 15 0 00 030305 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8185 037160 321 16 0 00 037147 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8186
8187
8188 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8189 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8190 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8191
8192 030306 SN=SN+1
8193 010000 XX=XX/2
8194 000005 ZZ=ZZ+1
8195 037161 205 14 0 00 010000 MOVSI AC,XX ;INITIALIZE AC
8196 037162 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8197 037163 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8198 037164 243 14 0 00 037166 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8199 037165 002 14 0 00 030306 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8200 037166 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8201 037167 003 14 0 00 030306 ER3 AC,SN ;C(AC) WAS CLOBBERED
8202 037170 302 15 0 00 000005 CAIE AC+1,ZZ ;EXAMINE AC+1
8203 037171 004 15 0 00 030306 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8204 037172 321 16 0 00 037161 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8205
8206
8207 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8208 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8209 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8210
8211 030307 SN=SN+1
8212 004000 XX=XX/2
8213 000006 ZZ=ZZ+1
8214 037173 205 14 0 00 004000 MOVSI AC,XX ;INITIALIZE AC
8215 037174 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8216 037175 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8217 037176 243 14 0 00 037200 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8218 037177 002 14 0 00 030307 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8219 037200 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8220 037201 003 14 0 00 030307 ER3 AC,SN ;C(AC) WAS CLOBBERED
8221 037202 302 15 0 00 000006 CAIE AC+1,ZZ ;EXAMINE AC+1
8222 037203 004 15 0 00 030307 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8223 037204 321 16 0 00 037173 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8224
8225
8226 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8227 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8228 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8229
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-3
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0213
8230 030310 SN=SN+1
8231 002000 XX=XX/2
8232 000007 ZZ=ZZ+1
8233 037205 205 14 0 00 002000 MOVSI AC,XX ;INITIALIZE AC
8234 037206 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8235 037207 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8236 037210 243 14 0 00 037212 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8237 037211 002 14 0 00 030310 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8238 037212 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8239 037213 003 14 0 00 030310 ER3 AC,SN ;C(AC) WAS CLOBBERED
8240 037214 302 15 0 00 000007 CAIE AC+1,ZZ ;EXAMINE AC+1
8241 037215 004 15 0 00 030310 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8242 037216 321 16 0 00 037205 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8243
8244
8245 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8246 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8247 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8248
8249 030311 SN=SN+1
8250 001000 XX=XX/2
8251 000010 ZZ=ZZ+1
8252 037217 205 14 0 00 001000 MOVSI AC,XX ;INITIALIZE AC
8253 037220 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8254 037221 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8255 037222 243 14 0 00 037224 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8256 037223 002 14 0 00 030311 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8257 037224 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8258 037225 003 14 0 00 030311 ER3 AC,SN ;C(AC) WAS CLOBBERED
8259 037226 302 15 0 00 000010 CAIE AC+1,ZZ ;EXAMINE AC+1
8260 037227 004 15 0 00 030311 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8261 037230 321 16 0 00 037217 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8262
8263
8264 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8265 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8266 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8267
8268 030312 SN=SN+1
8269 000400 XX=XX/2
8270 000011 ZZ=ZZ+1
8271 037231 205 14 0 00 000400 MOVSI AC,XX ;INITIALIZE AC
8272 037232 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8273 037233 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8274 037234 243 14 0 00 037236 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8275 037235 002 14 0 00 030312 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8276 037236 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8277 037237 003 14 0 00 030312 ER3 AC,SN ;C(AC) WAS CLOBBERED
8278 037240 302 15 0 00 000011 CAIE AC+1,ZZ ;EXAMINE AC+1
8279 037241 004 15 0 00 030312 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8280 037242 321 16 0 00 037231 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8281
8282
8283 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8284 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-4
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0214
8285 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8286
8287 030313 SN=SN+1
8288 000200 XX=XX/2
8289 000012 ZZ=ZZ+1
8290 037243 205 14 0 00 000200 MOVSI AC,XX ;INITIALIZE AC
8291 037244 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8292 037245 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8293 037246 243 14 0 00 037250 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8294 037247 002 14 0 00 030313 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8295 037250 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8296 037251 003 14 0 00 030313 ER3 AC,SN ;C(AC) WAS CLOBBERED
8297 037252 302 15 0 00 000012 CAIE AC+1,ZZ ;EXAMINE AC+1
8298 037253 004 15 0 00 030313 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8299 037254 321 16 0 00 037243 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8300
8301
8302 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8303 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8304 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8305
8306 030314 SN=SN+1
8307 000100 XX=XX/2
8308 000013 ZZ=ZZ+1
8309 037255 205 14 0 00 000100 MOVSI AC,XX ;INITIALIZE AC
8310 037256 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8311 037257 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8312 037260 243 14 0 00 037262 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8313 037261 002 14 0 00 030314 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8314 037262 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8315 037263 003 14 0 00 030314 ER3 AC,SN ;C(AC) WAS CLOBBERED
8316 037264 302 15 0 00 000013 CAIE AC+1,ZZ ;EXAMINE AC+1
8317 037265 004 15 0 00 030314 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8318 037266 321 16 0 00 037255 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8319
8320
8321 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8322 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8323 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8324
8325 030315 SN=SN+1
8326 000040 XX=XX/2
8327 000014 ZZ=ZZ+1
8328 037267 205 14 0 00 000040 MOVSI AC,XX ;INITIALIZE AC
8329 037270 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8330 037271 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8331 037272 243 14 0 00 037274 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8332 037273 002 14 0 00 030315 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8333 037274 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8334 037275 003 14 0 00 030315 ER3 AC,SN ;C(AC) WAS CLOBBERED
8335 037276 302 15 0 00 000014 CAIE AC+1,ZZ ;EXAMINE AC+1
8336 037277 004 15 0 00 030315 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8337 037300 321 16 0 00 037267 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8338
8339
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-5
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0215
8340 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8341 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8342 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8343
8344 030316 SN=SN+1
8345 000020 XX=XX/2
8346 000015 ZZ=ZZ+1
8347 037301 205 14 0 00 000020 MOVSI AC,XX ;INITIALIZE AC
8348 037302 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8349 037303 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8350 037304 243 14 0 00 037306 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8351 037305 002 14 0 00 030316 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8352 037306 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8353 037307 003 14 0 00 030316 ER3 AC,SN ;C(AC) WAS CLOBBERED
8354 037310 302 15 0 00 000015 CAIE AC+1,ZZ ;EXAMINE AC+1
8355 037311 004 15 0 00 030316 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8356 037312 321 16 0 00 037301 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8357
8358
8359 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8360 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8361 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8362
8363 030317 SN=SN+1
8364 000010 XX=XX/2
8365 000016 ZZ=ZZ+1
8366 037313 205 14 0 00 000010 MOVSI AC,XX ;INITIALIZE AC
8367 037314 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8368 037315 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8369 037316 243 14 0 00 037320 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8370 037317 002 14 0 00 030317 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8371 037320 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8372 037321 003 14 0 00 030317 ER3 AC,SN ;C(AC) WAS CLOBBERED
8373 037322 302 15 0 00 000016 CAIE AC+1,ZZ ;EXAMINE AC+1
8374 037323 004 15 0 00 030317 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8375 037324 321 16 0 00 037313 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8376
8377
8378 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8379 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8380 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8381
8382 030320 SN=SN+1
8383 000004 XX=XX/2
8384 000017 ZZ=ZZ+1
8385 037325 205 14 0 00 000004 MOVSI AC,XX ;INITIALIZE AC
8386 037326 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8387 037327 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8388 037330 243 14 0 00 037332 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8389 037331 002 14 0 00 030320 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8390 037332 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8391 037333 003 14 0 00 030320 ER3 AC,SN ;C(AC) WAS CLOBBERED
8392 037334 302 15 0 00 000017 CAIE AC+1,ZZ ;EXAMINE AC+1
8393 037335 004 15 0 00 030320 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8394 037336 321 16 0 00 037325 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-6
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0216
8395
8396
8397 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8398 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8399 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8400
8401 030321 SN=SN+1
8402 000002 XX=XX/2
8403 000020 ZZ=ZZ+1
8404 037337 205 14 0 00 000002 MOVSI AC,XX ;INITIALIZE AC
8405 037340 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8406 037341 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8407 037342 243 14 0 00 037344 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8408 037343 002 14 0 00 030321 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8409 037344 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8410 037345 003 14 0 00 030321 ER3 AC,SN ;C(AC) WAS CLOBBERED
8411 037346 302 15 0 00 000020 CAIE AC+1,ZZ ;EXAMINE AC+1
8412 037347 004 15 0 00 030321 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8413 037350 321 16 0 00 037337 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8414
8415
8416 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8417 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8418 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8419
8420 030322 SN=SN+1
8421 000001 XX=XX/2
8422 000021 ZZ=ZZ+1
8423 037351 205 14 0 00 000001 MOVSI AC,XX ;INITIALIZE AC
8424 037352 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR COMPARISON
8425 037353 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8426 037354 243 14 0 00 037356 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8427 037355 002 14 0 00 030322 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8428 037356 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8429 037357 003 14 0 00 030322 ER3 AC,SN ;C(AC) WAS CLOBBERED
8430 037360 302 15 0 00 000021 CAIE AC+1,ZZ ;EXAMINE AC+1
8431 037361 004 15 0 00 030322 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8432 037362 321 16 0 00 037351 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8433
8434 PAGE
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-7
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0217
8435 030400 SN=30400
8436 000001 000000 XX=1000000
8437
8438 G30400: REPEAT ^D18,<
8439 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8440 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8441 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8442
8443 SN=SN+1
8444 XX=XX/2
8445 ZZ=ZZ+1
8446 MOVEI AC,XX ;INITIALIZE AC
8447 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8448 SETOM <AC+1>&17 ;INITIALIZE AC+1
8449 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8450 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8451 CAME AC,<AC-2>&17 ;EXAMINE AC
8452 ER3 AC,SN ;C(AC) WAS CLOBBERED
8453 CAIE AC+1,ZZ ;EXAMINE AC+1
8454 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8455 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8456 >
8457
8458 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8459 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8460 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8461
8462 030401 SN=SN+1
8463 400000 XX=XX/2
8464 000022 ZZ=ZZ+1
8465 037363 201 14 0 00 400000 MOVEI AC,XX ;INITIALIZE AC
8466 037364 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8467 037365 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8468 037366 243 14 0 00 037370 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8469 037367 002 14 0 00 030401 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8470 037370 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8471 037371 003 14 0 00 030401 ER3 AC,SN ;C(AC) WAS CLOBBERED
8472 037372 302 15 0 00 000022 CAIE AC+1,ZZ ;EXAMINE AC+1
8473 037373 004 15 0 00 030401 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8474 037374 321 16 0 00 037363 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8475
8476
8477 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8478 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8479 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8480
8481 030402 SN=SN+1
8482 200000 XX=XX/2
8483 000023 ZZ=ZZ+1
8484 037375 201 14 0 00 200000 MOVEI AC,XX ;INITIALIZE AC
8485 037376 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8486 037377 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8487 037400 243 14 0 00 037402 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8488 037401 002 14 0 00 030402 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8489 037402 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-8
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0218
8490 037403 003 14 0 00 030402 ER3 AC,SN ;C(AC) WAS CLOBBERED
8491 037404 302 15 0 00 000023 CAIE AC+1,ZZ ;EXAMINE AC+1
8492 037405 004 15 0 00 030402 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8493 037406 321 16 0 00 037375 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8494
8495
8496 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8497 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8498 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8499
8500 030403 SN=SN+1
8501 100000 XX=XX/2
8502 000024 ZZ=ZZ+1
8503 037407 201 14 0 00 100000 MOVEI AC,XX ;INITIALIZE AC
8504 037410 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8505 037411 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8506 037412 243 14 0 00 037414 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8507 037413 002 14 0 00 030403 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8508 037414 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8509 037415 003 14 0 00 030403 ER3 AC,SN ;C(AC) WAS CLOBBERED
8510 037416 302 15 0 00 000024 CAIE AC+1,ZZ ;EXAMINE AC+1
8511 037417 004 15 0 00 030403 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8512 037420 321 16 0 00 037407 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8513
8514
8515 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8516 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8517 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8518
8519 030404 SN=SN+1
8520 040000 XX=XX/2
8521 000025 ZZ=ZZ+1
8522 037421 201 14 0 00 040000 MOVEI AC,XX ;INITIALIZE AC
8523 037422 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8524 037423 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8525 037424 243 14 0 00 037426 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8526 037425 002 14 0 00 030404 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8527 037426 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8528 037427 003 14 0 00 030404 ER3 AC,SN ;C(AC) WAS CLOBBERED
8529 037430 302 15 0 00 000025 CAIE AC+1,ZZ ;EXAMINE AC+1
8530 037431 004 15 0 00 030404 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8531 037432 321 16 0 00 037421 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8532
8533
8534 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8535 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8536 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8537
8538 030405 SN=SN+1
8539 020000 XX=XX/2
8540 000026 ZZ=ZZ+1
8541 037433 201 14 0 00 020000 MOVEI AC,XX ;INITIALIZE AC
8542 037434 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8543 037435 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8544 037436 243 14 0 00 037440 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-9
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0219
8545 037437 002 14 0 00 030405 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8546 037440 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8547 037441 003 14 0 00 030405 ER3 AC,SN ;C(AC) WAS CLOBBERED
8548 037442 302 15 0 00 000026 CAIE AC+1,ZZ ;EXAMINE AC+1
8549 037443 004 15 0 00 030405 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8550 037444 321 16 0 00 037433 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8551
8552
8553 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8554 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8555 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8556
8557 030406 SN=SN+1
8558 010000 XX=XX/2
8559 000027 ZZ=ZZ+1
8560 037445 201 14 0 00 010000 MOVEI AC,XX ;INITIALIZE AC
8561 037446 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8562 037447 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8563 037450 243 14 0 00 037452 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8564 037451 002 14 0 00 030406 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8565 037452 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8566 037453 003 14 0 00 030406 ER3 AC,SN ;C(AC) WAS CLOBBERED
8567 037454 302 15 0 00 000027 CAIE AC+1,ZZ ;EXAMINE AC+1
8568 037455 004 15 0 00 030406 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8569 037456 321 16 0 00 037445 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8570
8571
8572 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8573 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8574 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8575
8576 030407 SN=SN+1
8577 004000 XX=XX/2
8578 000030 ZZ=ZZ+1
8579 037457 201 14 0 00 004000 MOVEI AC,XX ;INITIALIZE AC
8580 037460 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8581 037461 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8582 037462 243 14 0 00 037464 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8583 037463 002 14 0 00 030407 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8584 037464 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8585 037465 003 14 0 00 030407 ER3 AC,SN ;C(AC) WAS CLOBBERED
8586 037466 302 15 0 00 000030 CAIE AC+1,ZZ ;EXAMINE AC+1
8587 037467 004 15 0 00 030407 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8588 037470 321 16 0 00 037457 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8589
8590
8591 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8592 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8593 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8594
8595 030410 SN=SN+1
8596 002000 XX=XX/2
8597 000031 ZZ=ZZ+1
8598 037471 201 14 0 00 002000 MOVEI AC,XX ;INITIALIZE AC
8599 037472 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-10
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0220
8600 037473 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8601 037474 243 14 0 00 037476 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8602 037475 002 14 0 00 030410 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8603 037476 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8604 037477 003 14 0 00 030410 ER3 AC,SN ;C(AC) WAS CLOBBERED
8605 037500 302 15 0 00 000031 CAIE AC+1,ZZ ;EXAMINE AC+1
8606 037501 004 15 0 00 030410 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8607 037502 321 16 0 00 037471 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8608
8609
8610 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8611 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8612 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8613
8614 030411 SN=SN+1
8615 001000 XX=XX/2
8616 000032 ZZ=ZZ+1
8617 037503 201 14 0 00 001000 MOVEI AC,XX ;INITIALIZE AC
8618 037504 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8619 037505 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8620 037506 243 14 0 00 037510 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8621 037507 002 14 0 00 030411 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8622 037510 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8623 037511 003 14 0 00 030411 ER3 AC,SN ;C(AC) WAS CLOBBERED
8624 037512 302 15 0 00 000032 CAIE AC+1,ZZ ;EXAMINE AC+1
8625 037513 004 15 0 00 030411 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8626 037514 321 16 0 00 037503 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8627
8628
8629 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8630 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8631 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8632
8633 030412 SN=SN+1
8634 000400 XX=XX/2
8635 000033 ZZ=ZZ+1
8636 037515 201 14 0 00 000400 MOVEI AC,XX ;INITIALIZE AC
8637 037516 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8638 037517 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8639 037520 243 14 0 00 037522 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8640 037521 002 14 0 00 030412 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8641 037522 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8642 037523 003 14 0 00 030412 ER3 AC,SN ;C(AC) WAS CLOBBERED
8643 037524 302 15 0 00 000033 CAIE AC+1,ZZ ;EXAMINE AC+1
8644 037525 004 15 0 00 030412 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8645 037526 321 16 0 00 037515 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8646
8647
8648 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8649 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8650 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8651
8652 030413 SN=SN+1
8653 000200 XX=XX/2
8654 000034 ZZ=ZZ+1
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-11
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0221
8655 037527 201 14 0 00 000200 MOVEI AC,XX ;INITIALIZE AC
8656 037530 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8657 037531 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8658 037532 243 14 0 00 037534 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8659 037533 002 14 0 00 030413 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8660 037534 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8661 037535 003 14 0 00 030413 ER3 AC,SN ;C(AC) WAS CLOBBERED
8662 037536 302 15 0 00 000034 CAIE AC+1,ZZ ;EXAMINE AC+1
8663 037537 004 15 0 00 030413 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8664 037540 321 16 0 00 037527 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8665
8666
8667 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8668 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8669 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8670
8671 030414 SN=SN+1
8672 000100 XX=XX/2
8673 000035 ZZ=ZZ+1
8674 037541 201 14 0 00 000100 MOVEI AC,XX ;INITIALIZE AC
8675 037542 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8676 037543 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8677 037544 243 14 0 00 037546 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8678 037545 002 14 0 00 030414 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8679 037546 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8680 037547 003 14 0 00 030414 ER3 AC,SN ;C(AC) WAS CLOBBERED
8681 037550 302 15 0 00 000035 CAIE AC+1,ZZ ;EXAMINE AC+1
8682 037551 004 15 0 00 030414 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8683 037552 321 16 0 00 037541 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8684
8685
8686 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8687 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8688 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8689
8690 030415 SN=SN+1
8691 000040 XX=XX/2
8692 000036 ZZ=ZZ+1
8693 037553 201 14 0 00 000040 MOVEI AC,XX ;INITIALIZE AC
8694 037554 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8695 037555 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8696 037556 243 14 0 00 037560 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8697 037557 002 14 0 00 030415 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8698 037560 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8699 037561 003 14 0 00 030415 ER3 AC,SN ;C(AC) WAS CLOBBERED
8700 037562 302 15 0 00 000036 CAIE AC+1,ZZ ;EXAMINE AC+1
8701 037563 004 15 0 00 030415 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8702 037564 321 16 0 00 037553 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8703
8704
8705 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8706 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8707 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8708
8709 030416 SN=SN+1
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-12
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0222
8710 000020 XX=XX/2
8711 000037 ZZ=ZZ+1
8712 037565 201 14 0 00 000020 MOVEI AC,XX ;INITIALIZE AC
8713 037566 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8714 037567 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8715 037570 243 14 0 00 037572 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8716 037571 002 14 0 00 030416 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8717 037572 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8718 037573 003 14 0 00 030416 ER3 AC,SN ;C(AC) WAS CLOBBERED
8719 037574 302 15 0 00 000037 CAIE AC+1,ZZ ;EXAMINE AC+1
8720 037575 004 15 0 00 030416 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8721 037576 321 16 0 00 037565 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8722
8723
8724 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8725 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8726 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8727
8728 030417 SN=SN+1
8729 000010 XX=XX/2
8730 000040 ZZ=ZZ+1
8731 037577 201 14 0 00 000010 MOVEI AC,XX ;INITIALIZE AC
8732 037600 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8733 037601 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8734 037602 243 14 0 00 037604 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8735 037603 002 14 0 00 030417 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8736 037604 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8737 037605 003 14 0 00 030417 ER3 AC,SN ;C(AC) WAS CLOBBERED
8738 037606 302 15 0 00 000040 CAIE AC+1,ZZ ;EXAMINE AC+1
8739 037607 004 15 0 00 030417 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8740 037610 321 16 0 00 037577 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8741
8742
8743 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8744 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8745 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8746
8747 030420 SN=SN+1
8748 000004 XX=XX/2
8749 000041 ZZ=ZZ+1
8750 037611 201 14 0 00 000004 MOVEI AC,XX ;INITIALIZE AC
8751 037612 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8752 037613 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8753 037614 243 14 0 00 037616 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8754 037615 002 14 0 00 030420 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8755 037616 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8756 037617 003 14 0 00 030420 ER3 AC,SN ;C(AC) WAS CLOBBERED
8757 037620 302 15 0 00 000041 CAIE AC+1,ZZ ;EXAMINE AC+1
8758 037621 004 15 0 00 030420 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8759 037622 321 16 0 00 037611 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8760
8761
8762 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8763 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8764 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 89-13
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0223
8765
8766 030421 SN=SN+1
8767 000002 XX=XX/2
8768 000042 ZZ=ZZ+1
8769 037623 201 14 0 00 000002 MOVEI AC,XX ;INITIALIZE AC
8770 037624 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8771 037625 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8772 037626 243 14 0 00 037630 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8773 037627 002 14 0 00 030421 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8774 037630 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8775 037631 003 14 0 00 030421 ER3 AC,SN ;C(AC) WAS CLOBBERED
8776 037632 302 15 0 00 000042 CAIE AC+1,ZZ ;EXAMINE AC+1
8777 037633 004 15 0 00 030421 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8778 037634 321 16 0 00 037623 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8779
8780
8781 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8782 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO
8783 ;RIPPLE A ONE THROUGH A FIELD OF ZEROS IN THE AC TO TEST JFFO
8784
8785 030422 SN=SN+1
8786 000001 XX=XX/2
8787 000043 ZZ=ZZ+1
8788 037635 201 14 0 00 000001 MOVEI AC,XX ;INITIALIZE AC
8789 037636 200 12 0 00 000014 MOVE AC-2,AC ;INITIALIZE AC-2 FOR LATER COMPARISON
8790 037637 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
8791 037640 243 14 0 00 037642 JFFO AC,.+2 ;*JFFO SHOULD PLACE ZZ INTO AC+1 AND JUMP
8792 037641 002 14 0 00 030422 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8793 037642 312 14 0 00 000012 CAME AC,<AC-2>&17 ;EXAMINE AC
8794 037643 003 14 0 00 030422 ER3 AC,SN ;C(AC) WAS CLOBBERED
8795 037644 302 15 0 00 000043 CAIE AC+1,ZZ ;EXAMINE AC+1
8796 037645 004 15 0 00 030422 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ERRORS IN AC
8797 037646 321 16 0 00 037635 JUMPL AC+2,.-^D9 ;LOOP ON ERROR SWITCH
8798
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 90
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0224
8799 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8800 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8801 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8802
8803 030500 SN=30500
8804 777777 777777 AC=-1
8805
8806 G30500: REPEAT ^D13,<
8807 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8808 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8809 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8810
8811 SN=SN+1
8812 AC=<AC+1>&17
8813 SAVEAC (1,1)
8814
8815 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8816 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8817 SETOM <AC+1>&17 ;INITIALIZE AC+1
8818 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8819 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8820 CAME AC,GSVAC ;EXAMINE AC
8821 ER3 AC,SN ;C(AC) WAS CLOBBERED
8822 CAIE AC+1,AC ;EXAMINE AC+1
8823 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8824 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8825 >
8826
8827 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8828 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8829 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8830
8831 030501 SN=SN+1
8832 000000 AC=<AC+1>&17
8833 SAVEAC (1,1)^
8834 037647 201 02 0 00 037647 MOVEI AC+2,. ;SAVE TEST PC
8835 037650 202 02 0 00 030051 MOVEM AC+2,TESTPC
8836 037651 201 02 0 00 000002 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8837 037652 202 02 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8838
8839 037653 205 00 0 00 400000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8840 037654 202 00 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8841 037655 476 00 0 00 000001 SETOM <AC+1>&17 ;INITIALIZE AC+1
8842 037656 243 00 0 00 037660 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8843 037657 002 00 0 00 030501 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8844 037660 312 00 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
8845 037661 003 00 0 00 030501 ER3 AC,SN ;C(AC) WAS CLOBBERED
8846 037662 302 01 0 00 000000 CAIE AC+1,AC ;EXAMINE AC+1
8847 037663 004 01 0 00 030501 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8848 037664 321 02 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8849
8850
8851 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8852 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8853 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 90-1
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0225
8854
8855 030502 SN=SN+1
8856 000001 AC=<AC+1>&17
8857 SAVEAC (1,1)^
8858 037665 201 03 0 00 037665 MOVEI AC+2,. ;SAVE TEST PC
8859 037666 202 03 0 00 030051 MOVEM AC+2,TESTPC
8860 037667 201 03 0 00 000003 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8861 037670 202 03 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8862
8863 037671 205 01 0 00 200000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8864 037672 202 01 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8865 037673 476 00 0 00 000002 SETOM <AC+1>&17 ;INITIALIZE AC+1
8866 037674 243 01 0 00 037676 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8867 037675 002 01 0 00 030502 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8868 037676 312 01 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
8869 037677 003 01 0 00 030502 ER3 AC,SN ;C(AC) WAS CLOBBERED
8870 037700 302 02 0 00 000001 CAIE AC+1,AC ;EXAMINE AC+1
8871 037701 004 02 0 00 030502 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8872 037702 321 03 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8873
8874
8875 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8876 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8877 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8878
8879 030503 SN=SN+1
8880 000002 AC=<AC+1>&17
8881 SAVEAC (1,1)^
8882 037703 201 04 0 00 037703 MOVEI AC+2,. ;SAVE TEST PC
8883 037704 202 04 0 00 030051 MOVEM AC+2,TESTPC
8884 037705 201 04 0 00 000004 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8885 037706 202 04 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8886
8887 037707 205 02 0 00 100000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8888 037710 202 02 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8889 037711 476 00 0 00 000003 SETOM <AC+1>&17 ;INITIALIZE AC+1
8890 037712 243 02 0 00 037714 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8891 037713 002 02 0 00 030503 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8892 037714 312 02 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
8893 037715 003 02 0 00 030503 ER3 AC,SN ;C(AC) WAS CLOBBERED
8894 037716 302 03 0 00 000002 CAIE AC+1,AC ;EXAMINE AC+1
8895 037717 004 03 0 00 030503 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8896 037720 321 04 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8897
8898
8899 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8900 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8901 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8902
8903 030504 SN=SN+1
8904 000003 AC=<AC+1>&17
8905 SAVEAC (1,1)^
8906 037721 201 05 0 00 037721 MOVEI AC+2,. ;SAVE TEST PC
8907 037722 202 05 0 00 030051 MOVEM AC+2,TESTPC
8908 037723 201 05 0 00 000005 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 90-2
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0226
8909 037724 202 05 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8910
8911 037725 205 03 0 00 040000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8912 037726 202 03 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8913 037727 476 00 0 00 000004 SETOM <AC+1>&17 ;INITIALIZE AC+1
8914 037730 243 03 0 00 037732 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8915 037731 002 03 0 00 030504 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8916 037732 312 03 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
8917 037733 003 03 0 00 030504 ER3 AC,SN ;C(AC) WAS CLOBBERED
8918 037734 302 04 0 00 000003 CAIE AC+1,AC ;EXAMINE AC+1
8919 037735 004 04 0 00 030504 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8920 037736 321 05 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8921
8922
8923 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8924 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8925 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8926
8927 030505 SN=SN+1
8928 000004 AC=<AC+1>&17
8929 SAVEAC (1,1)^
8930 037737 201 06 0 00 037737 MOVEI AC+2,. ;SAVE TEST PC
8931 037740 202 06 0 00 030051 MOVEM AC+2,TESTPC
8932 037741 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8933 037742 202 06 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8934
8935 037743 205 04 0 00 020000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8936 037744 202 04 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8937 037745 476 00 0 00 000005 SETOM <AC+1>&17 ;INITIALIZE AC+1
8938 037746 243 04 0 00 037750 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8939 037747 002 04 0 00 030505 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8940 037750 312 04 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
8941 037751 003 04 0 00 030505 ER3 AC,SN ;C(AC) WAS CLOBBERED
8942 037752 302 05 0 00 000004 CAIE AC+1,AC ;EXAMINE AC+1
8943 037753 004 05 0 00 030505 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8944 037754 321 06 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8945
8946
8947 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8948 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8949 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8950
8951 030506 SN=SN+1
8952 000005 AC=<AC+1>&17
8953 SAVEAC (1,1)^
8954 037755 201 07 0 00 037755 MOVEI AC+2,. ;SAVE TEST PC
8955 037756 202 07 0 00 030051 MOVEM AC+2,TESTPC
8956 037757 201 07 0 00 000007 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8957 037760 202 07 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8958
8959 037761 205 05 0 00 010000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8960 037762 202 05 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8961 037763 476 00 0 00 000006 SETOM <AC+1>&17 ;INITIALIZE AC+1
8962 037764 243 05 0 00 037766 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8963 037765 002 05 0 00 030506 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 90-3
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0227
8964 037766 312 05 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
8965 037767 003 05 0 00 030506 ER3 AC,SN ;C(AC) WAS CLOBBERED
8966 037770 302 06 0 00 000005 CAIE AC+1,AC ;EXAMINE AC+1
8967 037771 004 06 0 00 030506 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8968 037772 321 07 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8969
8970
8971 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8972 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8973 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8974
8975 030507 SN=SN+1
8976 000006 AC=<AC+1>&17
8977 SAVEAC (1,1)^
8978 037773 201 10 0 00 037773 MOVEI AC+2,. ;SAVE TEST PC
8979 037774 202 10 0 00 030051 MOVEM AC+2,TESTPC
8980 037775 201 10 0 00 000010 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
8981 037776 202 10 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
8982
8983 037777 205 06 0 00 004000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
8984 040000 202 06 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
8985 040001 476 00 0 00 000007 SETOM <AC+1>&17 ;INITIALIZE AC+1
8986 040002 243 06 0 00 040004 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
8987 040003 002 06 0 00 030507 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
8988 040004 312 06 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
8989 040005 003 06 0 00 030507 ER3 AC,SN ;C(AC) WAS CLOBBERED
8990 040006 302 07 0 00 000006 CAIE AC+1,AC ;EXAMINE AC+1
8991 040007 004 07 0 00 030507 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
8992 040010 321 10 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
8993
8994
8995 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
8996 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
8997 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
8998
8999 030510 SN=SN+1
9000 000007 AC=<AC+1>&17
9001 SAVEAC (1,1)^
9002 040011 201 11 0 00 040011 MOVEI AC+2,. ;SAVE TEST PC
9003 040012 202 11 0 00 030051 MOVEM AC+2,TESTPC
9004 040013 201 11 0 00 000011 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
9005 040014 202 11 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
9006
9007 040015 205 07 0 00 002000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
9008 040016 202 07 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
9009 040017 476 00 0 00 000010 SETOM <AC+1>&17 ;INITIALIZE AC+1
9010 040020 243 07 0 00 040022 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
9011 040021 002 07 0 00 030510 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
9012 040022 312 07 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
9013 040023 003 07 0 00 030510 ER3 AC,SN ;C(AC) WAS CLOBBERED
9014 040024 302 10 0 00 000007 CAIE AC+1,AC ;EXAMINE AC+1
9015 040025 004 10 0 00 030510 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
9016 040026 321 11 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
9017
9018
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 90-4
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0228
9019 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
9020 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
9021 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
9022
9023 030511 SN=SN+1
9024 000010 AC=<AC+1>&17
9025 SAVEAC (1,1)^
9026 040027 201 12 0 00 040027 MOVEI AC+2,. ;SAVE TEST PC
9027 040030 202 12 0 00 030051 MOVEM AC+2,TESTPC
9028 040031 201 12 0 00 000012 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
9029 040032 202 12 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
9030
9031 040033 205 10 0 00 001000 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
9032 040034 202 10 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
9033 040035 476 00 0 00 000011 SETOM <AC+1>&17 ;INITIALIZE AC+1
9034 040036 243 10 0 00 040040 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
9035 040037 002 10 0 00 030511 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
9036 040040 312 10 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
9037 040041 003 10 0 00 030511 ER3 AC,SN ;C(AC) WAS CLOBBERED
9038 040042 302 11 0 00 000010 CAIE AC+1,AC ;EXAMINE AC+1
9039 040043 004 11 0 00 030511 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
9040 040044 321 12 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
9041
9042
9043 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
9044 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
9045 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
9046
9047 030512 SN=SN+1
9048 000011 AC=<AC+1>&17
9049 SAVEAC (1,1)^
9050 040045 201 13 0 00 040045 MOVEI AC+2,. ;SAVE TEST PC
9051 040046 202 13 0 00 030051 MOVEM AC+2,TESTPC
9052 040047 201 13 0 00 000013 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
9053 040050 202 13 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
9054
9055 040051 205 11 0 00 000400 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
9056 040052 202 11 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
9057 040053 476 00 0 00 000012 SETOM <AC+1>&17 ;INITIALIZE AC+1
9058 040054 243 11 0 00 040056 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
9059 040055 002 11 0 00 030512 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
9060 040056 312 11 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
9061 040057 003 11 0 00 030512 ER3 AC,SN ;C(AC) WAS CLOBBERED
9062 040060 302 12 0 00 000011 CAIE AC+1,AC ;EXAMINE AC+1
9063 040061 004 12 0 00 030512 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
9064 040062 321 13 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
9065
9066
9067 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
9068 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
9069 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
9070
9071 030513 SN=SN+1
9072 000012 AC=<AC+1>&17
9073 SAVEAC (1,1)^
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 90-5
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0229
9074 040063 201 14 0 00 040063 MOVEI AC+2,. ;SAVE TEST PC
9075 040064 202 14 0 00 030051 MOVEM AC+2,TESTPC
9076 040065 201 14 0 00 000014 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
9077 040066 202 14 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
9078
9079 040067 205 12 0 00 000200 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
9080 040070 202 12 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
9081 040071 476 00 0 00 000013 SETOM <AC+1>&17 ;INITIALIZE AC+1
9082 040072 243 12 0 00 040074 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
9083 040073 002 12 0 00 030513 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
9084 040074 312 12 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
9085 040075 003 12 0 00 030513 ER3 AC,SN ;C(AC) WAS CLOBBERED
9086 040076 302 13 0 00 000012 CAIE AC+1,AC ;EXAMINE AC+1
9087 040077 004 13 0 00 030513 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
9088 040100 321 14 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
9089
9090
9091 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
9092 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
9093 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
9094
9095 030514 SN=SN+1
9096 000013 AC=<AC+1>&17
9097 SAVEAC (1,1)^
9098 040101 201 15 0 00 040101 MOVEI AC+2,. ;SAVE TEST PC
9099 040102 202 15 0 00 030051 MOVEM AC+2,TESTPC
9100 040103 201 15 0 00 000015 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
9101 040104 202 15 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
9102
9103 040105 205 13 0 00 000100 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
9104 040106 202 13 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
9105 040107 476 00 0 00 000014 SETOM <AC+1>&17 ;INITIALIZE AC+1
9106 040110 243 13 0 00 040112 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
9107 040111 002 13 0 00 030514 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
9108 040112 312 13 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
9109 040113 003 13 0 00 030514 ER3 AC,SN ;C(AC) WAS CLOBBERED
9110 040114 302 14 0 00 000013 CAIE AC+1,AC ;EXAMINE AC+1
9111 040115 004 14 0 00 030514 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
9112 040116 321 15 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
9113
9114
9115 ;VERIFY THAT JFFO WILL JUMP AND SET AC+1 TO THE NO. OF LEADING
9116 ;ZEROS IN AC WHEN C(AC) IS NON-ZERO.
9117 ;THIS TEST IS REPEATED 13 TIMES, ONCE FOR EACH USABLE AC.
9118
9119 030515 SN=SN+1
9120 000014 AC=<AC+1>&17
9121 SAVEAC (1,1)^
9122 040117 201 16 0 00 040117 MOVEI AC+2,. ;SAVE TEST PC
9123 040120 202 16 0 00 030051 MOVEM AC+2,TESTPC
9124 040121 201 16 0 00 000016 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
9125 040122 202 16 0 00 041210 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
9126
9127 040123 205 14 0 00 000040 MOVSI AC,(1B<^O<AC>>) ;INITIALIZE AC
9128 040124 202 14 0 00 041211 MOVEM AC,GSVAC# ;INITIALIZE FOR LATER COMPARISON
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 90-6
DAKAMM MAC 20-JAN-77 11:34 PART III - GENERAL JFFO TEST SEQ 0230
9129 040125 476 00 0 00 000015 SETOM <AC+1>&17 ;INITIALIZE AC+1
9130 040126 243 14 0 00 040130 JFFO AC,.+2 ;*JFFO SHOULD PLACE AC INTO AC+1 AC+1 AND JUMP
9131 040127 002 14 0 00 030515 ER2 AC,SN ;ERROR IF JFFO DID NOT JUMP
9132 040130 312 14 0 00 041211 CAME AC,GSVAC ;EXAMINE AC
9133 040131 003 14 0 00 030515 ER3 AC,SN ;C(AC) WAS CLOBBERED
9134 040132 302 15 0 00 000014 CAIE AC+1,AC ;EXAMINE AC+1
9135 040133 004 15 0 00 030515 ER4 AC+1,SN ;C(AC+1) NOT = NO. OF LEADING ZEROS IN AC
9136 040134 321 16 0 00 777767 JUMPL AC+2,-^D9 ;LOOP ON ERROR SWITCH
9137
9138
9139 040135 254 00 0 00 030057 LAST1: JRST BEGEND ;REPEAT DIAGNOSTIC
9140
9141 IF1,<PURGE BYTBLK>
9142 040136 BYTBLK: BLOCK ^D50
9143
9144 IF1,<PURGE BLTBLK>
9145 040220 BLTBLK: BLOCK ^D200
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1
UUOERR KLM 22-APR-75 01:42 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975 SEQ 0231
9146 SUBTTL *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975
9147
9148 ;THIS SUBROUTINE PROVIDES ERROR REPORTING THRU THE USE OF UUO'S.
9149
9150 040530 202 00 0 00 041216 ERRMES: MOVEM 0,%ERAC0# ;SAVE AC0
9151 IFDEF EXCASB,<IFDEF KI10,<
9152 SKIPN KAIFLG
9153 JRST .+5
9154 SKIPE USER ;USER MODE ?
9155 JRST .+3
9156 SKIPE MARGIN
9157 DATAO APR,[IMGNOF,,ISPDOF] ;CLR MARGINS >>
9158 040531 202 01 0 00 041217 MOVEM 1,%ERAC1# ;SAVE AC1
9159 040532 202 02 0 00 041220 MOVEM 2,%ERAC2# ;SAVE AC2
9160 040533 350 00 0 00 030053 AOS ERRTLS ;INCREMENT ERROR TOTALS
9161 040534 550 00 0 00 030114 HRRZ 0,$SVUPC ;GET PC OF UUO
9162 040535 316 00 0 00 030052 CAMN 0,ERRPC ;PC = PC OF LAST ERROR ?
9163 040536 350 00 0 00 041213 AOS MICNT# ;YES, ADD 1 TO ERROR COUNT
9164 040537 200 00 0 00 041213 MOVE 0,MICNT
9165 040540 504 00 0 00 030114 HRL 0,$SVUPC
9166 040541 336 00 0 00 030041 SKIPN KLFLG ;NOT KL10
9167 040542 332 00 0 00 030037 SKIPE USER ;AND NOT USER?
9168 040543 254 00 0 00 040545 JRST .+2
9169 040544 7 004 14 0 00 000000 DATAO PI,0 ;YES, DISPLAY ERROR PC,ERROR COUNT
9170 040545 402 00 0 00 041214 SETZM PROCED# ;CLEAR PROCEED FLAG
9171 040546 037 10 0 00 000002 SWITCH
9172 040547 603 00 0 00 040000 TLNE NOPNT ;PRINTOUT ?
9173 040550 254 00 0 00 040663 JRST %ERRS1 ;NO, RESTORE AC'S AND RETURN
9174 040551 200 01 0 00 030113 MOVE 1,$SVUUO
9175 040552 242 01 0 00 777745 LSH 1,-^D27
9176 040553 202 01 0 00 041215 MOVEM 1,%ACS1A# ;SAVE UUO NUMBER
9177 040554 200 00 0 00 041216 MOVE 0,%ERAC0
9178 040555 200 01 0 00 041217 MOVE 1,%ERAC1
9179 040556 335 00 1 00 041210 SKIPGE @ERRLOP ;ERR LOOP AC > OR = 0 ?
9180 040557 254 00 0 00 040715 JRST %ERRS4 ;NO, SEE IF PRINT ALL
9181 040560 402 00 0 00 041213 %ERMS1: SETZM MICNT ;CLEAR ERROR COUNT
9182 040561 331 00 0 00 030043 SKIPL MONCTL ;DIAG MON OR SYS EXER ?
9183 040562 254 00 0 00 040566 JRST .+4 ;NO, DON'T NEED TITLE
9184 040563 336 00 0 00 041221 SKIPN %ERFST# ;FIRST ERROR ?
9185 040564 037 04 0 00 000002 PNTNM ;YES, PRINT PROGRAM TITLE
9186 040565 476 00 0 00 041221 SETOM %ERFST
9187 040566 336 00 0 00 030047 SKIPN PASCNT ;FIRST PASS ?
9188 040567 254 00 0 00 040573 JRST .+4 ;YES
9189 PMSG <^TEST PASS COUNT = >^
9190 040570 037 02 0 00 041075 PSIXM [SIXBIT\^TEST PASS COUNT = _\]^
9191 040571 200 00 0 00 030047 MOVE PASCNT
9192 040572 037 15 0 00 000000 PNTDEC
9193 PMSG <^PC = >^
9194 040573 037 02 0 00 041101 PSIXM [SIXBIT\^PC = _\]^
9195 040574 550 00 0 00 030114 HRRZ 0,$SVUPC ;GET PC OF UUO
9196 040575 202 00 0 00 030052 MOVEM 0,ERRPC ;SAVE FOR COMPARE
9197 040576 037 06 0 00 000000 PNT6 ;PRINT UUO ADDRESS
9198 XLIST
9199 IFDEF ERDIAG,<LIST
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 2
UUOERR KLM 22-APR-75 01:42 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975 SEQ 0232
9200 ;DIAGNOSTIC FORMAT ERROR PRINTER
9201
9202 ;PRINT RESULT
9203
9204 040577 %ERMS2: PMSG <^RESULT = >^
9205 040577 037 02 0 00 041103 PSIXM [SIXBIT\^RESULT = _\]^
9206 040600 200 01 0 00 030113 MOVE 1,$SVUUO ;GET AC # OF UUO
9207 040601 242 01 0 00 777751 LSH 1,-27
9208 040602 405 01 0 00 000017 ANDI 1,17
9209 040603 200 00 0 01 000000 MOVE 0,(1) ;GET C(AC)
9210 040604 307 01 0 00 000001 CAIG 1,1 ;IS AC # = TO SAVE AC ?
9211 040605 200 00 0 01 041216 MOVE 0,%ERAC0(1) ;YES, GET SAVED AC
9212 040606 037 13 0 00 000000 PNTHW ;PRINT C(AC)
9213
9214 040607 200 00 0 00 030046 MOVE CONSW
9215 040610 603 00 0 00 000200 TLNE TXTINH ;PRINT FAILURE DES AND FLT NBR ?
9216 040611 254 00 0 00 040660 JRST %ERMORE ;NO, RESTORE AC'S ETC.
9217
9218 ;PRINT FAILURE DESCRIPTOR
9219
9220 040612 200 01 0 00 041215 MOVE 1,%ACS1A ;GET UUO NUMBER
9221 040613 307 01 0 00 000001 CAIG 1,1 ;PRINT DESCRIPTOR ?
9222 040614 254 00 0 00 040620 JRST %ERMS3 ;NO, JUST PRINT FAULT NUMBER
9223 040615 037 00 0 00 030242 PCRL
9224 040616 200 00 0 01 040644 MOVE %FLTTB(1)
9225 040617 037 17 0 00 000000 PNTAL ;PRINT FAULT DESCRIPTOR
9226
9227 ;PRINT FAULT NUMBER
9228
9229 040620 %ERMS3: PMSG <^FAULT NUMBER = >^
9230 040620 037 02 0 00 041105 PSIXM [SIXBIT\^FAULT NUMBER = _\]^
9231 040621 201 00 0 00 040643 MOVEI TLET
9232 040622 037 00 0 00 000000 PNTA ;PRINT TEST LETTER
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 3
UUOERR KLM 22-APR-75 01:42 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975 SEQ 0233
9233
9234 040623 550 00 0 00 030113 HRRZ $SVUUO
9235 040624 602 00 0 00 700000 TRNE 700000
9236 040625 254 00 0 00 040641 JRST %ER6X
9237 040626 602 00 0 00 070000 TRNE 070000
9238 040627 254 00 0 00 040637 JRST %ER5X
9239 040630 602 00 0 00 007000 TRNE 007000
9240 040631 254 00 0 00 040635 JRST %ER4X
9241 040632 037 03 0 00 000000 PNT3 ;PRINT FAULT NUMBER
9242 040633 037 00 0 00 030242 %ER7X: PCRL
9243 040634 254 00 0 00 040660 JRST %ERMORE
9244
9245 040635 037 04 0 00 000000 %ER4X: PNT4
9246 040636 254 00 0 00 040633 JRST %ER7X
9247 040637 037 05 0 00 000000 %ER5X: PNT5
9248 040640 254 00 0 00 040633 JRST %ER7X
9249 040641 037 06 0 00 000000 %ER6X: PNT6
9250 040642 254 00 0 00 040633 JRST %ER7X
9251
9252 ;FAILURE DESCRIPTORS
9253
9254 040643 000000 000000 TLET: 0 ;TEST LETTER
9255 040644 000000 000000 %FLTTB: 0 ;DESCRIPTOR TABLE
9256 040645 000000 041011 %NODES: [0] ;NO DESCRIPTOR
9257 040646 000000 041011 SPDES: [0] ;SPECIAL USER FAILURE DESCRIPTOR
9258 040647 000000 041110 $ACF: [ASCIZ/C(AC) FAILED/]
9259 040650 000000 041113 %AC1F: [ASCIZ/C(AC+1) FAILED/]
9260 040651 000000 041116 %EF: [ASCIZ/C(E) FAILED/]
9261 040652 000000 041121 %E1F: [ASCIZ/C(E+1) FAILED/]
9262 040653 000000 041124 %ARF: [ASCIZ/C(C(ACR)) FAILED/]
9263 040654 000000 041130 %AR1F: [ASCIZ/C(C(ACR+1)) FAILED/]
9264 040655 000000 041134 %ALF: [ASCIZ/C(C(ACL)) FAILED/]
9265 040656 000000 041140 %EEF: [ASCIZ/C(C(E)) FAILED/]
9266 040657 000000 041143 %FF: [ASCIZ/FLAG FAILED/]
9267 >
9268 XLIST
9269 LIST
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 8
UUOERR KLM 22-APR-75 01:42 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975 SEQ 0234
9270 ;RESTORE AC'S AND RETURN OR HALT
9271
9272 040660 256 00 0 00 030101 %ERMORE:XCT ERMORE
9273 040661 037 16 0 00 000002 PNTMGN ;PRINT MARGINS
9274 040662 037 10 0 00 000002 SWITCH
9275
9276 040663 037 07 0 00 000003 %ERRS1: TTALTM ;ALTMODE CHECK
9277 040664 254 00 0 00 040670 JRST .+4 ;NONE
9278 040665 201 00 0 00 040670 MOVEI .+3 ;SAVE CONT ADDRESS
9279 040666 202 00 0 00 000130 MOVEM JOBOPC
9280 040667 254 00 1 00 030063 JRST @ALTMGO ;PERFORM TRANSFER
9281 040670 200 00 0 00 030046 MOVE CONSW
9282 040671 603 00 0 00 002000 TLNE 0,ERSTOP ;HALT ON ERROR SWITCH SET ?
9283 040672 037 14 0 00 000004 ERRHLT ;YES
9284 040673 607 00 0 00 004000 TLNN 0,LOOPER ;LOOP ON ERROR SWITCH SET ?
9285 040674 476 00 0 00 041214 SETOM PROCED ;NO, SET THE PROCEED FLAG
9286 040675 603 00 0 00 010000 TLNE 0,DING ;RING BELL SWITCH SET ?
9287 040676 037 01 0 00 000007 PBELL ;YES, GO RING BELL
9288
9289 040677 200 02 0 00 041220 %ERRS2: MOVE 2,%ERAC2 ;RESTORE AC'S
9290 040700 200 01 0 00 041217 MOVE 1,%ERAC1
9291 040701 476 00 1 00 041210 SETOM @ERRLOP ;SET C(ERR LOOP AC) TO -1
9292 040702 336 00 0 00 041214 SKIPN PROCED ;LOOP ON ERROR ?
9293 040703 254 00 0 00 040713 JRST %ERRS5 ;YES
9294 040704 350 00 1 00 041210 AOS @ERRLOP ;NO, INC C(ERR LOOP AC)
9295 040705 350 00 1 00 041210 AOS @ERRLOP ;SO IT ='S 1
9296 040706 331 00 0 00 030043 SKIPL MONCTL ;UNDER DIAGNOSTIC MONITOR ?
9297 040707 254 00 0 00 040713 JRST %ERRS5 ;NO, CONTINUE PROGRAM
9298 040710 200 00 0 00 030053 MOVE 0,ERRTLS ;YES
9299 040711 301 00 0 00 000005 CAIL 0,5 ;PRINTED ALLOWED ERRORS ?
9300 040712 254 00 0 00 030061 JRST $BEND2
9301
9302 040713 200 00 0 00 041216 %ERRS5: MOVE 0,%ERAC0 ;NO, CONTINUE PROGRAM
9303 IFDEF EXCASB,<IFDEF KI10,<
9304 SKIPN KAIFLG
9305 JRST .+5
9306 SKIPE USER
9307 JRST .+3
9308 SKIPE MARGIN
9309 DATAO APR,MARGIN ;RESET MARGIN SYSTEM >>
9310 040714 254 00 0 00 030065 JRST UUOEXT
9311
9312 040715 200 00 0 00 030046 %ERRS4: MOVE 0,CONSW
9313 040716 607 00 0 00 001000 TLNN PALERS ;PRINT ALL ERRORS ?
9314 040717 254 00 0 00 040663 JRST %ERRS1 ;NO
9315 040720 254 00 0 00 040560 JRST %ERMS1 ;YES
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1
STOR KLM 18-JAN-77 11:42 *STOR* RESERVED STORAGE, JAN 18,1977 SEQ 0235
9316 SUBTTL *STOR* RESERVED STORAGE, JAN 18,1977
9317
9318 ;PROGRAM LITERALS
9319
9320 XLIST
9321 IFNDEF $LPAPER,<LIST>
9322 040721 LIT
9323 040721 101 115 000 000 000
9324 040722 525252 525377
9325 040723 076000 000001
9326 040724 002525 252525
9327 040725 074000 000001
9328 040726 707070 707070
9329 040727 323232 232323
9330 040730 103 050 103 050 105
9331 040731 051 055 061 051 040
9332 040732 106 101 111 114 105
9333 040733 104 000 000 000 000
9334 040734 777777 777777
9335 040735 646446 464670
9336 040736 103 050 103 050 105
9337 040737 051 053 061 051 040
9338 040740 106 101 111 114 105
9339 040741 104 000 000 000 000
9340 040742 220600 000012
9341 040743 112233 445566
9342 040744 020000 033356
9343 040745 020000 033373
9344 040746 112270 445566
9345 040747 000000 033411
9346 040750 000000 033424
9347 040751 000000 033442
9348 040752 230703 603700
9349 040753 230702 103700
9350 040754 000000 033465
9351 040755 000000 033512
9352 040756 000000 033536
9353 040757 000000 033564
9354 040760 000000 033610
9355 040761 000000 033631
9356 040762 000000 033656
9357 040763 000000 033705
9358 040764 000000 033730
9359 040765 000000 033754
9360 040766 000000 034000
9361 040767 000000 034026
9362 040770 000000 034052
9363 040771 000000 034077
9364 040772 000000 034124
9365 040773 000000 034153
9366 040774 000000 034173
9367 040775 000000 034213
9368 040776 000000 034233
9369 040777 000000 034253
9370 041000 000000 034276
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1-1
STOR KLM 18-JAN-77 11:42 *STOR* RESERVED STORAGE, JAN 18,1977 SEQ 0236
9371 041001 000000 034321
9372 041002 000000 034344
9373 041003 377777 777777
9374 041004 000000 034370
9375 041005 777777 777776
9376 041006 000000 034414
9377 041007 102 114 124 040 106
9378 041010 101 111 114 105 104
9379 041011 000 000 000 000 000
9380 041012 000001 000001
9381 041013 000006 000006
9382 041014 040221 040221
9383 041015 000006 000011
9384 041016 252525 252525
9385 041017 770077 007700
9386 041020 070707 070707
9387 041021 123456 765432
9388 041022 552255 225522
9389 041023 000005 000010
9390 041024 000004 000007
9391 041025 000006 040224
9392 041026 000005 040224
9393 041027 000004 040224
9394 041030 040221 040224
9395 041031 040221 000006
9396 041032 040221 000005
9397 041033 040221 000004
9398 041034 000004 000004
9399 041035 146314 631463
9400 041036 036074 170360
9401 041037 017407 603701
9402 041040 007603 607062
9403 041041 000002 000001
9404 041042 036074 170630
9405 041043 040222 040221
9406 041044 000001 000002
9407 041045 040221 040222
9408 041046 146314 146314
9409 041047 000001 040221
9410 041050 007700 770077
9411 041051 003760 077401
9412 041052 001774 007760
9413 041053 000777 000777
9414 041054 000377 600077
9415 041055 777777 040220
9416 041056 777777 040233
9417 041057 040221 000001
9418 041060 777777 000000
9419 041061 777777 000013
9420 041062 525252 525252
9421 041063 123456 654321
9422 041064 041224 041230
9423 041065 112 106 106 117 040
9424 041066 116 117 055 112 125
9425 041067 115 120 040 106 101
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1-2
STOR KLM 18-JAN-77 11:42 *STOR* RESERVED STORAGE, JAN 18,1977 SEQ 0237
9426 041070 111 114 105 104 000
9427 041071 112 106 106 117 040
9428 041072 112 125 115 120 040
9429 041073 106 101 111 114 105
9430 041074 104 000 000 000 000
9431 041075 76 64 45 63 64 00
9432 041076 60 41 63 63 00 43
9433 041077 57 65 56 64 00 35
9434 041100 00 77 00 00 00 00
9435 041101 76 60 43 00 35 00
9436 041102 00 00 77 00 00 00
9437 041103 76 62 45 63 65 54
9438 041104 64 00 00 35 00 77
9439 041105 76 46 41 65 54 64
9440 041106 00 56 65 55 42 45
9441 041107 62 00 35 00 77 00
9442 041110 103 050 101 103 051
9443 041111 040 106 101 111 114
9444 041112 105 104 000 000 000
9445 041113 103 050 101 103 053
9446 041114 061 051 040 106 101
9447 041115 111 114 105 104 000
9448 041116 103 050 105 051 040
9449 041117 106 101 111 114 105
9450 041120 104 000 000 000 000
9451 041121 103 050 105 053 061
9452 041122 051 040 106 101 111
9453 041123 114 105 104 000 000
9454 041124 103 050 103 050 101
9455 041125 103 122 051 051 040
9456 041126 106 101 111 114 105
9457 041127 104 000 000 000 000
9458 041130 103 050 103 050 101
9459 041131 103 122 053 061 051
9460 041132 051 040 106 101 111
9461 041133 114 105 104 000 000
9462 041134 103 050 103 050 101
9463 041135 103 114 051 051 040
9464 041136 106 101 111 114 105
9465 041137 104 000 000 000 000
9466 041140 103 050 103 050 105
9467 041141 051 051 040 106 101
9468 041142 111 114 105 104 000
9469 041143 106 114 101 107 040
9470 041144 106 101 111 114 105
9471 041145 104 000 000 000 000
9472 LIST
9473 041147 000000 000000 ENDSLD: 0
9474
9475 IFDEF DEBUG,<
9476 041150 PATCH: BLOCK DEBUG ;PATCHING AREA
9477 >
9478
9479 ;PROGRAM VARIABLES
9480 041210 VAR
DAKAM PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (13) 0,2 MACRO %52(537) 15:23 20-JAN-77 PAGE 1-3
STOR KLM 18-JAN-77 11:42 *STOR* RESERVED STORAGE, JAN 18,1977 SEQ 0238
9481
9482 IFDEF PGMEND,<
9483 041222 000000 000000 END: 0
9484 030000 END BEGIN >
NO ERRORS DETECTED
PROGRAM BREAK IS 000000
ABSLUTE BREAK IS 041223
CPU TIME USED 00:42.173
11K CORE USED
AABCLR 431#
AADRBK 431# SEQ 0239
AAPRC1 431#
ABORT 163#
AC 799# 801 802 803 804 806 808 809 810 811 812 823# 825 826
827 828 830 831 833 834 836 842# 844 845 846 847 849 850
851 852 853 854 860# 862 863 864 865 867 868 869 870 871
872 883# 885 886 887 888 909 910 911 912 913 914 920 921
922 923 924 925 931 932 933 934 935 936 942 943 944 945
946 947 953 954 955 956 957 958 964 965 966 967 968 969
971# 973 974 975 976 979 980 981 982 983 984 987 988 989
990 991 992 994 995 996 997 998 999 1002 1003 1004 1005 1006
1007 1010 1011 1012 1013 1014 1015 1020# 1022 1023 1024 1025 1027 1028
1029 1030 1031 1032 1033 1042# 1044 1045 1046 1047 1049 1050 1051 1052
1053 1054 1055 1063# 1065 1066 1067 1068 1070 1071 1072 1073 1074 1075
1076 1079 1080 1081 1082 1083 1084 1085 1088 1089 1090 1091 1092 1093
1094 1097 1098 1099 1100 1101 1102 1103 1106 1107 1108 1109 1110 1111
1112 1114 1115 1116 1117 1118 1119 1120 1132# 1134 1135 1136 1137 1139
1140 1141 1142 1143 1144 1145 1156# 1158 1159 1160 1161 1164 1165 1166
1167 1168 1169 1170 1173 1174 1175 1176 1177 1178 1179 1182 1183 1184
1185 1186 1187 1188 1191 1192 1193 1194 1195 1196 1197 1205# 1207 1208
1209 1210 1212 1213 1214 1215 1216 1217 1218 1226# 1228 1229 1230 1231
1233 1234 1235 1236 1237 1238 1239 1240 1250# 1252 1253 1254 1255 1257
1258 1260 1261 1262 1263 1264 1271# 1273 1274 1275 1276 1278 1279 1281
1282 1283 1284 1290# 1292 1293 1294 1295 1297 1299 1300 1301 1302 1312#
1314 1315 1316 1317 1319 1320 1322 1323 1324 1325 1328 1329 1331 1332
1333 1334 1337 1338 1340 1341 1342 1343 1346 1347 1349 1350 1351 1352
1354 1355 1357 1358 1359 1360 1363 1364 1366 1367 1368 1369 1375# 1377
1378 1379 1380 1382 1383 1385 1386 1387 1388 1394# 1396 1397 1398 1399
1401 1402 1404 1405 1406 1407 1417# 1419 1420 1421 1422 1424 1426 1428
1429 1438# 1440 1441 1442 1443 1445 1447 1448 1449 1450 1451 1465# 1467
1468 1469 1470 1472 1475 1476 1477 1478 1479 1492# 1494 1495 1496 1497
1499 1500 1502 1503 1504 1505 1506 1516# 1518 1519 1520 1521 1523 1524
1528 1529 1530 1531 1540# 1542 1543 1544 1545 1547 1548 1549 1552 1553
1554 1555 1564# 1566 1567 1568 1569 1571 1572 1577 1578 1579 1580 1587#
1589 1590 1591 1592 1594 1595 1600 1601 1602 1603 1614# 1616 1617 1618
1619 1621 1622 1623 1624 1625 1626 1637# 1639 1640 1641 1642 1644 1645
1647 1648 1650 1651 1652 1661# 1663 1664 1665 1666 1668 1669 1671 1672
1673 1674 1675 1676 1686# 1688 1689 1690 1691 1693 1694 1695 1697 1698
1700 1711# 1713 1714 1715 1716 1718 1719 1720 1722 1723 1725 1735# 1737
1738 1739 1740 1742 1743 1744 1745 1747 1748 1750 1760# 1762 1763 1764
1765 1767 1768 1769 1771 1772 1774 1784# 1786 1787 1788 1789 1791 1792
1793 1795 1796 1798 1807# 1809 1810 1811 1812 1814 1815 1816 1818 1819
1821 1831# 1833 1834 1835 1836 1838 1839 1841 1842 1843 1844 1845 1863#
1865 1866 1867 1868 1870 1871 1872 1874 1875 1876 1879 1892# 1894 1895
1896 1897 1919 1920 1921 1922 1923 1924 1930 1931 1932 1933 1934 1935
1941 1942 1943 1944 1945 1946 1952 1953 1954 1955 1956 1957 1963 1964
1965 1966 1967 1968 1979# 1981 1982 1983 1984 2009 2010 2011 2012 2013
2014 2021 2022 2023 2024 2025 2026 2033 2034 2035 2036 2037 2038 2045
2046 2047 2048 2049 2050 2057 2058 2059 2060 2061 2062 2074# 2076 2077
2078 2079 2102 2103 2104 2105 2106 2107 2108 2114 2115 2116 2117 2118
2119 2120 2126 2127 2128 2129 2130 2131 2132 2138 2139 2140 2141 2142
2143 2144 2150 2151 2152 2153 2154 2155 2156 2168# 2170 2171 2172 2173
2195 2197 2198 2199 2200 2206 2208 2209 2210 2211 2217 2219 2220 2221
2222 2228 2230 2231 2232 2233 2239 2241 2242 2243 2244 2257# 2259 2260 SEQ 0240
2261 2262 2285 2288 2289 2290 2291 2297 2300 2301 2302 2303 2309 2312
2313 2314 2315 2321 2324 2325 2326 2327 2333 2336 2337 2338 2339 2351#
2353 2354 2355 2356 2376 2377 2379 2380 2381 2382 2387 2388 2390 2391
2392 2393 2398 2399 2401 2402 2403 2404 2409 2410 2412 2413 2414 2415
2420 2421 2423 2424 2425 2426 2438# 2440 2441 2442 2443 2466 2467 2468
2469 2477 2478 2479 2480 2488 2489 2490 2491 2499 2500 2501 2502 2510
2511 2512 2513 2525# 2527 2528 2529 2530 2552 2553 2557 2558 2559 2560
2565 2566 2570 2571 2572 2573 2578 2579 2583 2584 2585 2586 2591 2592
2596 2597 2598 2599 2604 2605 2609 2610 2611 2612 2623# 2625 2626 2627
2628 2662 2663 2664 2665 2677 2678 2679 2680 2692 2693 2694 2695 2707#
2709 2710 2711 2712 2732 2733 2735 2736 2737 2738 2743 2744 2746 2747
2748 2749 2754 2755 2757 2758 2759 2760 2765 2766 2768 2769 2770 2771
2776 2777 2779 2780 2781 2782 2793# 2795 2796 2797 2798 2818 2821 2822
2823 2824 2829 2832 2833 2834 2835 2840 2843 2844 2845 2846 2851 2854
2855 2856 2857 2862 2865 2866 2867 2868 2880# 2882 2883 2884 2885 2909
2910 2913 2914 2915 2916 2922 2923 2926 2927 2928 2929 2935 2936 2939
2940 2941 2942 2953# 2955 2956 2957 2958 2981 2984 2985 2986 2987 2993
2996 2997 2998 2999 3005 3008 3009 3010 3011 3017 3020 3021 3022 3023
3029 3032 3033 3034 3035 3047# 3049 3050 3051 3052 3075 3078 3079 3080
3081 3087 3090 3091 3092 3093 3099 3102 3103 3104 3105 3111 3114 3115
3116 3117 3123 3126 3127 3128 3129 3141 3143 3144 3145 3146 3147 3157#
3159 3160 3161 3162 3187 3188 3189 3191 3192 3193 3195 3201 3202 3203
3205 3206 3207 3209 3215 3216 3217 3219 3220 3221 3223 3229 3230 3231
3233 3234 3235 3237 3243 3244 3245 3247 3248 3249 3251 3262# 3264 3265
3266 3267 3294 3295 3296 3297 3299 3300 3302 3309 3310 3311 3312 3314
3315 3317 3324 3325 3326 3327 3329 3330 3332 3339 3340 3341 3342 3344
3345 3347 3354 3355 3356 3357 3359 3360 3362 3374# 3376 3377 3378 3379
3404 3405 3406 3407 3409 3410 3412 3418 3419 3420 3421 3423 3424 3426
3432 3433 3434 3435 3437 3438 3440 3446 3447 3448 3449 3451 3452 3454
3460 3461 3462 3463 3465 3466 3468 3478# 3480 3481 3482 3483 3488 3506
3507 3508 3509 3511 3512 3514 3519 3520 3521 3522 3524 3525 3527 3532
3533 3534 3535 3537 3538 3540 3545 3546 3547 3548 3550 3551 3553 3558
3559 3560 3561 3563 3564 3566 3573# 3575 3576 3577 3578 3603 3604 3605
3606 3607 3608 3609 3610 3617 3618 3619 3620 3621 3622 3623 3624 3661
3662 3663 3664 3665 3670 3671 3674 3681 3682 3683 3684 3685 3690 3691
3694 3699# 3701 3702 3703 3704 3706 3707 3708 3710 3711 3712 3713 3714
3715 3716 3717 3718 3720 3721 3722 3724 3725 3726 3727 3728 3729 3730
3731 3732 3736# 3738 3739 3740 3741 3744 3745 3746 3747 3748 3749 3754#
3756 3757 3758 3759 3762 3763 3764 3765 3767 3768 3769 3770 3775# 3777
3778 3779 3780 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793
3794 3795 3796 3801# 3803 3804 3805 3806 3809 3810 3811 3812 3813 3814
3815 3816 3817 3818 3819 3820 3821 3822 3823 3824 3829# 3831 3832 3833
3834 3837 3838 3839 3840 3841 3842 3843 3844 3845 3846 3847 3848 3849
3850 3851 3856# 3858 3859 3860 3861 3864 3865 3866 3867 3868 3869 3870
3871 3872 3873 3874 3875 3876 3877 3878 3879 3880 3885# 3887 3888 3889
3890 3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903 3904 3905
3906 3907 3913# 3915 3916 3917 3918 3921 3922 3923 3924 3925 3926 3927
3928 3929 3931 3932 3933 3938# 3940 3941 3942 3943 3947 3948 3949 3950
3951 3952 3953 3954 3956 3957 3958 3959 3960 3961 3962 3963 3968# 3970
3971 3972 3973 3976 3977 3978 3979 3980 3981 3982 3983 3984 3986 3987
3988 3989 3990 3991 3992 3993 3994 3999# 4001 4002 4003 4004 4007 4008
4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4026# 4028
4029 4030 4031 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 SEQ 0241
4045 4046 4047 4048 4053# 4055 4056 4057 4058 4061 4062 4063 4064 4065
4066 4067 4068 4069 4070 4071 4072 4073 4074 4075 4080# 4082 4083 4084
4085 4088 4089 4090 4091 4092 4093 4094 4095 4096 4097 4098 4099 4100
4101 4102 4103 4104 4109# 4111 4112 4113 4114 4117 4118 4119 4120 4121
4122 4123 4124 4126 4127 4128 4129 4130 4131 4132 4138# 4140 4141 4142
4143 4146 4147 4148 4149 4150 4151 4152 4153 4155 4156 4157 4158 4159
4160 4161 4162 4167# 4169 4170 4171 4172 4175 4176 4177 4178 4179 4180
4181 4182 4184 4185 4186 4187 4188 4189 4190 4191 4196# 4198 4199 4200
4201 4204 4205 4207 4208 4209 4210 4211 4212 4213 4215 4216 4217 4218
4219 4220 4221 4222 4223 4227# 4229 4230 4231 4232 4235 4236 4237 4238
4239 4240 4241 4242 4243 4244 4245 4250# 4252 4253 4254 4255 4258 4259
4260 4261 4262 4263 4264 4265 4266 4267 4268 4272# 4274 4275 4276 4277
4280 4281 4282 4283 4284 4285 4286 4287 4288 4289 4290 4295# 4297 4298
4299 4300 4303 4304 4305 4306 4307 4308 4309 4310 4311 4312 4313 4317#
4319 4320 4321 4322 4325 4326 4327 4329 4331 4332 4333 4334 4335 4336
4337 4338 4341# 4343 4344 4345 4346 4349 4350 4351 4352 4353 4354 4355
4356 4357 4358 4359 4360 4361 4362 4366# 4368 4369 4370 4371 4374 4375
4376 4377 4378 4379 4380 4381 4382 4383 4384 4385 4386 4387 4390# 4392
4393 4394 4395 4398 4399 4400 4401 4402 4403 4404 4405 4406 4407 4408
4409 4410 4411 4412 4416# 4418 4419 4420 4421 4424 4425 4426 4427 4428
4429 4430 4431 4432 4433 4434 4435 4436 4437 4438 4442# 4444 4445 4446
4447 4450 4451 4452 4453 4454 4455 4464# 4466 4467 4468 4469 4471 4472
4475 4478 4488 4493# 4495 4496 4497 4498 4500 4501 4504 4507 4517 4522#
4524 4525 4526 4527 4529 4530 4533 4536 4546 4551# 4553 4554 4555 4556
4562 4566 4568 4569 4570 4572 4573 4574 4576 4577 4578 4579 4584# 4586
4587 4588 4589 4595 4599 4601 4602 4603 4605 4606 4607 4609 4610 4611
4612 4618# 4620 4621 4622 4623 4629 4631 4632 4634 4636 4637 4638 4640
4641 4642 4644 4645 4646 4647 4655# 4657 4658 4659 4660 4662 4663 4666
4703 4794 4803# 4805 4806 4807 4808 4810 4811 4814 4851 4942 4951# 4953
4954 4955 4956 4958 4959 4962 4999 5090 5099# 5101 5102 5103 5104 5106
5110 5133 5134 5139 5140 5145 5146 5147 5196 5197 5201 5211 5212 5214
5226 5227 5231 5238 5247# 5249 5250 5251 5252 5254 5258 5281 5282 5287
5288 5293 5294 5295 5344 5345 5349 5359 5360 5362 5374 5375 5379 5386
5395# 5397 5398 5399 5400 5402 5406 5429 5430 5435 5436 5441 5442 5443
5492 5493 5497 5507 5508 5510 5522 5523 5527 5534 5543# 5545 5546 5547
5548 5554 5559 5560 5565 5566 5571 5572 5577 5578 5583 5584 5589 5590
5591 5595 5596 5600 5610 5611 5615 5625 5626 5630 5640 5641 5645 5655
5656 5658 5670 5671 5675 5682 5691# 5693 5694 5695 5696 5702 5707 5708
5713 5714 5719 5720 5725 5726 5731 5732 5737 5738 5739 5743 5744 5748
5758 5759 5763 5773 5774 5778 5788 5789 5793 5803 5804 5806 5818 5819
5823 5830 5839# 5841 5842 5843 5844 5850 5855 5856 5861 5862 5867 5868
5873 5874 5879 5880 5885 5886 5887 5891 5892 5896 5906 5907 5911 5921
5922 5926 5936 5937 5941 5951 5952 5954 5966 5967 5971 5978 5987# 5989
5990 5991 5992 5995 5998 6003 6004 6009 6010 6015 6016 6035 6039 6040
6044 6054 6055 6059 6069 6070 6074 6126 6135# 6137 6138 6139 6140 6143
6146 6151 6152 6157 6158 6163 6164 6183 6187 6188 6192 6202 6203 6207
6217 6218 6222 6274 6283# 6285 6286 6287 6288 6291 6294 6299 6300 6305
6306 6311 6312 6331 6335 6336 6340 6350 6351 6355 6365 6366 6370 6422
6426# 6428 6429 6430 6431 6434 6435 6438 6445 6481 6485# 6487 6488 6489
6490 6493 6494 6497 6504 6540 6544# 6546 6547 6548 6549 6552 6553 6556
6566 6602 6606# 6608 6609 6610 6611 6614 6615 6618 6634 6670 6674# 6676
6677 6678 6679 6686 6698 6700 6701 6703 6706 6707 6709 6712 6713 6715
6718 6719 6721 6724 6725 6727 6730 6731 6733 6736 6737 6739 6741 6745# SEQ 0242
6747 6748 6749 6750 6757 6769 6771 6772 6774 6777 6778 6780 6783 6784
6786 6789 6790 6792 6795 6796 6798 6801 6802 6804 6807 6808 6810 6812
6816# 6818 6819 6820 6821 6828 6840 6842 6843 6845 6848 6849 6851 6854
6855 6857 6860 6861 6863 6866 6867 6869 6872 6873 6875 6878 6879 6881
6883 6887# 6889 6890 6891 6892 6899 6919 6921 6922 6924 6927 6928 6930
6933 6934 6936 6939 6940 6942 6945 6946 6948 6951 6952 6954 6957 6958
6960 6962 6966# 6968 6969 6970 6971 6974 6975 6978 6996 7038 7042# 7044
7045 7046 7047 7054 7076 7081 7082 7084 7087 7088 7090 7093 7094 7096
7099 7100 7102 7105 7106 7108 7111 7112 7114 7117 7118 7120 7123 7124
7126 7128 7132# 7134 7135 7136 7137 7140 7141 7144 7162 7201 7205# 7207
7208 7209 7210 7217 7239 7244 7245 7247 7250 7251 7252 7254 7255 7257
7260 7261 7263 7266 7267 7269 7272 7273 7275 7278 7279 7281 7284 7285
7287 7289 7293# 7295 7296 7297 7298 7301 7305 7360 7408 7409 7411 7414
7415 7417 7420 7421 7423 7426 7427 7429 7432 7433 7435 7438 7439 7441
7444 7445 7447 7450 7451 7453 7456 7457 7459 7462 7463 7465 7468 7469
7471 7474 7475 7477 7479 7483# 7485 7486 7487 7488 7492 7495 7543 7548
7549 7551 7554 7555 7556 7558 7559 7560 7562 7563 7564 7566 7567 7568
7570 7571 7572 7574 7575 7576 7578 7579 7580 7582 7583 7584 7586 7587
7588 7590 7591 7592 7594 7595 7597 7662 7666# 7668 7669 7670 7671 7677
7678 7679 7680 7681 7682 7683 7684 7685 7686 7687 7688 7690 7691 7694
7695 7697 7698 7699 7701 7702 7703 7705 7706 7707 7709 7710 7711 7713
7714 7715 7717 7718 7719 7721 7727# 7756 7756# 7758 7759 7760 7761 7763
7764 7765 7767 7768 7769 7770 7771 7772 7779 7779# 7781 7782 7783 7784
7786 7787 7788 7790 7791 7792 7793 7794 7795 7802 7802# 7804 7805 7806
7807 7809 7810 7811 7813 7814 7815 7816 7817 7818 7825 7825# 7827 7828
7829 7830 7832 7833 7834 7836 7837 7838 7839 7840 7841 7848 7848# 7850
7851 7852 7853 7855 7856 7857 7859 7860 7861 7862 7863 7864 7871 7871#
7873 7874 7875 7876 7878 7879 7880 7882 7883 7884 7885 7886 7887 7894
7894# 7896 7897 7898 7899 7901 7902 7903 7905 7906 7907 7908 7909 7910
7917 7917# 7919 7920 7921 7922 7924 7925 7926 7928 7929 7930 7931 7932
7933 7940 7940# 7942 7943 7944 7945 7947 7948 7949 7951 7952 7953 7954
7955 7956 7963 7963# 7965 7966 7967 7968 7970 7971 7972 7974 7975 7976
7977 7978 7979 7986 7986# 7988 7989 7990 7991 7993 7994 7995 7997 7998
7999 8000 8001 8002 8009 8009# 8011 8012 8013 8014 8016 8017 8018 8020
8021 8022 8023 8024 8025 8032 8032# 8034 8035 8036 8037 8039 8040 8041
8043 8044 8045 8046 8047 8048 8057 8058 8059 8060 8061 8062 8063 8064
8100 8101 8102 8103 8104 8105 8106 8107 8108 8109 8119 8120 8121 8122
8123 8124 8125 8126 8127 8128 8138 8139 8140 8141 8142 8143 8144 8145
8146 8147 8157 8158 8159 8160 8161 8162 8163 8164 8165 8166 8176 8177
8178 8179 8180 8181 8182 8183 8184 8185 8195 8196 8197 8198 8199 8200
8201 8202 8203 8204 8214 8215 8216 8217 8218 8219 8220 8221 8222 8223
8233 8234 8235 8236 8237 8238 8239 8240 8241 8242 8252 8253 8254 8255
8256 8257 8258 8259 8260 8261 8271 8272 8273 8274 8275 8276 8277 8278
8279 8280 8290 8291 8292 8293 8294 8295 8296 8297 8298 8299 8309 8310
8311 8312 8313 8314 8315 8316 8317 8318 8328 8329 8330 8331 8332 8333
8334 8335 8336 8337 8347 8348 8349 8350 8351 8352 8353 8354 8355 8356
8366 8367 8368 8369 8370 8371 8372 8373 8374 8375 8385 8386 8387 8388
8389 8390 8391 8392 8393 8394 8404 8405 8406 8407 8408 8409 8410 8411
8412 8413 8423 8424 8425 8426 8427 8428 8429 8430 8431 8432 8465 8466
8467 8468 8469 8470 8471 8472 8473 8474 8484 8485 8486 8487 8488 8489
8490 8491 8492 8493 8503 8504 8505 8506 8507 8508 8509 8510 8511 8512
8522 8523 8524 8525 8526 8527 8528 8529 8530 8531 8541 8542 8543 8544
8545 8546 8547 8548 8549 8550 8560 8561 8562 8563 8564 8565 8566 8567 SEQ 0243
8568 8569 8579 8580 8581 8582 8583 8584 8585 8586 8587 8588 8598 8599
8600 8601 8602 8603 8604 8605 8606 8607 8617 8618 8619 8620 8621 8622
8623 8624 8625 8626 8636 8637 8638 8639 8640 8641 8642 8643 8644 8645
8655 8656 8657 8658 8659 8660 8661 8662 8663 8664 8674 8675 8676 8677
8678 8679 8680 8681 8682 8683 8693 8694 8695 8696 8697 8698 8699 8700
8701 8702 8712 8713 8714 8715 8716 8717 8718 8719 8720 8721 8731 8732
8733 8734 8735 8736 8737 8738 8739 8740 8750 8751 8752 8753 8754 8755
8756 8757 8758 8759 8769 8770 8771 8772 8773 8774 8775 8776 8777 8778
8788 8789 8790 8791 8792 8793 8794 8795 8796 8797 8804# 8832 8832# 8834
8835 8836 8837 8839 8840 8841 8842 8843 8844 8845 8846 8847 8848 8856
8856# 8858 8859 8860 8861 8863 8864 8865 8866 8867 8868 8869 8870 8871
8872 8880 8880# 8882 8883 8884 8885 8887 8888 8889 8890 8891 8892 8893
8894 8895 8896 8904 8904# 8906 8907 8908 8909 8911 8912 8913 8914 8915
8916 8917 8918 8919 8920 8928 8928# 8930 8931 8932 8933 8935 8936 8937
8938 8939 8940 8941 8942 8943 8944 8952 8952# 8954 8955 8956 8957 8959
8960 8961 8962 8963 8964 8965 8966 8967 8968 8976 8976# 8978 8979 8980
8981 8983 8984 8985 8986 8987 8988 8989 8990 8991 8992 9000 9000# 9002
9003 9004 9005 9007 9008 9009 9010 9011 9012 9013 9014 9015 9016 9024
9024# 9026 9027 9028 9029 9031 9032 9033 9034 9035 9036 9037 9038 9039
9040 9048 9048# 9050 9051 9052 9053 9055 9056 9057 9058 9059 9060 9061
9062 9063 9064 9072 9072# 9074 9075 9076 9077 9079 9080 9081 9082 9083
9084 9085 9086 9087 9088 9096 9096# 9098 9099 9100 9101 9103 9104 9105
9106 9107 9108 9109 9110 9111 9112 9120 9120# 9122 9123 9124 9125 9127
9128 9129 9130 9131 9132 9133 9134 9135 9136
AFOCLR 431#
AFODIS 431#
AFOENB 431#
AFOV 431#
ALTMGO 517# 9280
AMPCLR 431#
AMPV 431#
ANXCLR 431#
ANXM 431#
AOVCLR 431#
AOVDIS 431#
AOVENB 431#
AOVFLO 431#
APAREN 431#
APARER 431#
APDCLR 431#
APDLOV 431#
APWRFL 431#
AROV 431#
AROVU 431#
AST 632#
ATRPOS 431#
ATSIN 633#
AUSRIO 431#
BEGEND 513# 9139
BEGIN 67 68 69 70 71 72 73 74 75 76 77 377 378 444#
9484
BEGIN1 460# 514
BELL 636# SEQ 0244
BIS 431# 3709 3716 3723 3730
BLTBLK 4558 4559 4591 4592 4625 4626 5107 5255 5403 5550 5551 5698 5699 5846
5847 5994 6142 6290 6682 6683 6753 6754 6824 6825 6895 6896 7050 7051
7213 7214 7302 7491 9145#
BLTDST 7675# 7684 7686 7688 7690 7691 7694 7710 7714 7718
BLTSRC 7674# 7678 7680 7682 7690 7694 7698 7702 7706
BYTBLK 3763 3766 3767 3810 3813 3821 3822 3839 3843 3844 3845 3865 3866 3868
3871 3872 3873 3875 3876 3922 3926 3949 3954 3956 3957 3977 3978 3981
3984 3986 3987 3989 3990 4035 4038 4045 4046 4063 4067 4068 4069 4089
4090 4092 4095 4096 4097 4099 4100 4147 4151 4159 4160 4177 4182 4184
4185 4205 4207 4210 4213 4215 4216 4218 4219 9142#
CCA 431#
CHAIN 183#
CHNOFF 431#
CHNON 431#
CLK 431#
CLKCLR 431#
CLKDIS 431#
CLKENB 431#
CLKU 431#
CLOCKF 499#
CNTLC 516#
COMMA 625#
CONSW 500# 9214 9281 9312
CPOPJ 520#
CPOPJ1 518#
CRLF 312 313 620#
CRLF2 316 317 622#
CRY0 431#
CRY1 431#
CSHFLG 679#
CSHMEM 680#
CYCL60 673#
DCK 431#
DDTLNK 197# 458
DDTSRT 458#
DEBUG 58# 9475 9476
DECVER 5# 12 26 479
DEST 4472# 4475 4478 4480 4481 4483 4484 4486 4487 4501# 4504 4507 4509 4510
4512 4513 4515 4516 4530# 4533 4536 4538 4539 4541 4542 4544 4545 4559#
4562 4566 4568 4572 4576 4592# 4595 4599 4601 4605 4609 4626# 4629 4634
4636 4640 4644 4663# 4666 4686 4687 4688 4692 4693 4694 4698 4699 4700
4703 4751 4758 4759 4763 4766 4773 4774 4776 4781 4788 4789 4793 4811#
4814 4834 4835 4836 4840 4841 4842 4846 4847 4848 4851 4899 4906 4907
4911 4914 4921 4922 4924 4929 4936 4937 4941 4959# 4962 4982 4983 4984
4988 4989 4990 4994 4995 4996 4999 5047 5054 5055 5059 5062 5069 5070
5072 5077 5084 5085 5089 5107# 5110 5130 5132 5134 5136 5138 5140 5142
5144 5146 5147 5195 5196 5202 5210 5211 5217 5225 5226 5232 5255# 5258
5278 5280 5282 5284 5286 5288 5290 5292 5294 5295 5343 5344 5350 5358
5359 5365 5373 5374 5380 5403# 5406 5426 5428 5430 5432 5434 5436 5438
5440 5442 5443 5491 5492 5498 5506 5507 5513 5521 5522 5528 5551# 5554
5574 5576 5578 5580 5582 5584 5586 5588 5590 5591 5639 5640 5646 5654
5655 5661 5669 5670 5676 5699# 5702 5722 5724 5726 5728 5730 5732 5734 SEQ 0245
5736 5738 5739 5787 5788 5794 5802 5803 5809 5817 5818 5824 5847# 5850
5870 5872 5874 5876 5878 5880 5882 5884 5886 5887 5935 5936 5942 5950
5951 5957 5965 5966 5972 5995# 5998 6018 6019 6020 6024 6025 6026 6030
6031 6032 6035 6083 6090 6091 6095 6098 6105 6106 6108 6113 6120 6121
6125 6143# 6146 6166 6167 6168 6172 6173 6174 6178 6179 6180 6183 6231
6238 6239 6243 6246 6253 6254 6256 6261 6268 6269 6273 6291# 6294 6314
6315 6316 6320 6321 6322 6326 6327 6328 6331 6379 6386 6387 6391 6394
6401 6402 6404 6409 6416 6417 6421 6435# 6438 6445 6447 6449 6452 6454
6457 6459 6462 6464 6467 6469 6472 6474 6477 6479 6494# 6497 6504 6506
6508 6511 6513 6516 6518 6521 6523 6526 6528 6531 6533 6536 6538 6553#
6556 6566 6568 6570 6573 6575 6578 6580 6583 6585 6588 6590 6593 6595
6598 6600 6615# 6618 6634 6636 6638 6641 6643 6646 6648 6651 6653 6656
6658 6661 6663 6666 6668 6683# 6686 6698 6700 6706 6712 6718 6724 6730
6736 6754# 6757 6769 6771 6777 6783 6789 6795 6801 6807 6825# 6828 6840
6842 6848 6854 6860 6866 6872 6878 6896# 6899 6919 6921 6927 6933 6939
6945 6951 6957 6975# 6978 6980 6982 6996 6998 7000 7003 7005 7008 7010
7013 7015 7019 7021 7024 7026 7029 7031 7051# 7054 7056 7059 7076 7081
7087 7093 7099 7105 7111 7117 7141# 7144 7160 7162 7172 7174 7177 7179
7182 7184 7187 7189 7192 7194 7197 7199 7214# 7217 7237 7239 7254 7260
7266 7272 7278 7284 7302# 7305 7332 7333 7335 7336 7337 7338 7339 7340
7341 7342 7343 7344 7345 7346 7347 7348 7349 7350 7351 7352 7353 7354
7355 7356 7360 7408 7409 7414 7420 7426 7432 7438 7444 7450 7456 7462
7468 7474 7475 7492# 7495 7528 7530 7531 7533 7534 7535 7536 7537 7538
7539 7540 7541 7543 7603 7605 7608 7610 7613 7615 7618 7620 7623 7625
7628 7630 7633 7635 7638 7640 7643 7645 7648 7650 7653 7655 7658 7660
DF22F 584#
DIAGMN 447#
DING 169# 9286
DOLLAR 639#
DSKUPD 484
END 7674 7675 9483#
ENDFIX 753#
ENDSLD 9473#
ERDIAG 63# 9199
ERMORE 533# 9272
ERRELB 9269
ERRLOP 804# 804 828# 828 847# 847 865# 865 888# 888 976# 976 1025# 1025
1047# 1047 1068# 1068 1137# 1137 1161# 1161 1210# 1210 1231# 1231 1255# 1255
1276# 1276 1295# 1295 1317# 1317 1380# 1380 1399# 1399 1422# 1422 1443# 1443
1470# 1470 1497# 1497 1521# 1521 1545# 1545 1569# 1569 1592# 1592 1619# 1619
1642# 1642 1666# 1666 1691# 1691 1716# 1716 1740# 1740 1765# 1765 1789# 1789
1812# 1812 1836# 1836 1868# 1868 1897# 1897 1984# 1984 2079# 2079 2173# 2173
2262# 2262 2356# 2356 2443# 2443 2530# 2530 2628# 2628 2712# 2712 2798# 2798
2885# 2885 2958# 2958 3052# 3052 3162# 3162 3267# 3267 3379# 3379 3483# 3483
3578# 3578 3704# 3704 3741# 3741 3759# 3759 3780# 3780 3806# 3806 3834# 3834
3861# 3861 3890# 3890 3918# 3918 3943# 3943 3973# 3973 4004# 4004 4031# 4031
4058# 4058 4085# 4085 4114# 4114 4143# 4143 4172# 4172 4201# 4201 4232# 4232
4255# 4255 4277# 4277 4300# 4300 4322# 4322 4346# 4346 4371# 4371 4395# 4395
4421# 4421 4447# 4447 4469# 4469 4498# 4498 4527# 4527 4556# 4556 4589# 4589
4623# 4623 4660# 4660 4808# 4808 4956# 4956 5104# 5104 5252# 5252 5400# 5400
5548# 5548 5696# 5696 5844# 5844 5992# 5992 6140# 6140 6288# 6288 6431# 6431
6490# 6490 6549# 6549 6611# 6611 6679# 6679 6750# 6750 6821# 6821 6892# 6892
6971# 6971 7047# 7047 7137# 7137 7210# 7210 7298# 7298 7488# 7488 7671# 7671 SEQ 0246
7761# 7761 7784# 7784 7807# 7807 7830# 7830 7853# 7853 7876# 7876 7899# 7899
7922# 7922 7945# 7945 7968# 7968 7991# 7991 8014# 8014 8037# 8037 8837# 8837
8861# 8861 8885# 8885 8909# 8909 8933# 8933 8957# 8957 8981# 8981 9005# 9005
9029# 9029 9053# 9053 9077# 9077 9101# 9101 9125# 9125 9179 9291 9294 9295
ERRMES 45 46 47 48 49 50 51 52 53 54 55 9150#
ERRPC 504# 9162 9196
ERRTLS 505# 9160 9298
ERSTOP 172# 9282
EXCASB 59# 482 9151 9303
EXIOT 431#
EXIT 756# 757
FOV 431#
FOVU 431#
FRDLNK 195#
FSELNK 194#
FXU 431#
G00 779 799#
G100 806# 812
G1000 987# 992
G10000 1904#
G10100 1992#
G10200 2086#
G10300 2180#
G10400 2269#
G10500 2362#
G10600 2449#
G10700 2536#
G1100 994# 999
G11000 2637#
G11100 2718#
G11200 2804#
G11300 2892#
G11400 2965#
G11500 3059#
G11600 3141# 3147
G11700 3169#
G1200 1002# 1007
G12000 3274#
G12100 3386#
G12200 3488#
G12210 3584#
G12220 3636#
G12300 3706# 3718
G12400 3720# 3732
G12500 3744# 3749
G12510 3762# 3770
G12600 3783# 3796
G12610 3809# 3824
G12620 3837# 3851
G12630 3864# 3880
G12700 3893# 3907
G12710 3921# 3933
G12720 3947# 3963 SEQ 0247
G12730 3976# 3994
G1300 1010# 1015
G13000 4007# 4020
G13010 4034# 4048
G13020 4061# 4075
G13030 4088# 4104
G13100 4117# 4132
G13110 4146# 4162
G13120 4175# 4191
G13130 4204# 4223
G13200 4235# 4245
G13210 4258# 4268
G13220 4280# 4290
G13230 4303# 4313
G13240 4325# 4338
G13300 4349# 4362
G13310 4374# 4387
G13320 4398# 4412
G13330 4424# 4438
G13400 4450# 4455
G1400 1027# 1033
G1500 1049# 1055
G1600 1070# 1076
G1700 1079# 1085
G200 830# 836
G2000 1088# 1094
G20100 6438# 6481
G20200 6497# 6540
G20300 6556# 6602
G20400 6618# 6670
G20500 6686# 6741
G20600 6757# 6812
G20700 6828# 6883
G2100 1097# 1103
G21000 6899# 6962
G21100 6978# 7038
G21200 7054# 7128
G21300 7144# 7201
G21400 7217# 7289
G21500 7305# 7479
G21600 7495# 7662
G21700 7677# 7721
G2200 1106# 1112
G22100 4475# 4488
G22200 4504# 4517
G22300 4533# 4546
G22400 4562# 4579
G22500 4595# 4612
G22600 4629# 4647
G22700 4666# 4794
G2300 1114# 1120
G23000 4814# 4942
G23100 4962# 5090 SEQ 0248
G23200 5110# 5238
G23300 5258# 5386
G23400 5406# 5534
G23500 5554# 5682
G23600 5702# 5830
G23700 5850# 5978
G2400 1139# 1145
G24000 5998# 6126
G24100 6146# 6274
G24200 6294# 6422
G2600 1164# 1170
G2700 1173# 1179
G300 849# 854
G3000 1182# 1188
G30000 7726#
G30100 7732#
G30200 8057# 8064
G30300 8073#
G30400 8438#
G30500 8806#
G3100 1191# 1197
G3200 1212# 1218
G3300 1233# 1240
G3400 1257# 1264
G3500 1278# 1284
G3600 1297# 1302
G3700 1319# 1325
G400 867# 872
G4000 1328# 1334
G4100 1337# 1343
G4200 1346# 1352
G4300 1354# 1360
G4400 1363# 1369
G4600 1382# 1388
G4700 1401# 1407
G5000 1424# 1429
G5100 1445# 1451
G5200 1472# 1479
G5300 1499# 1506
G5400 1523# 1531
G5500 1547# 1555
G5600 1571# 1580
G5700 1594# 1603
G600 894#
G6000 1621# 1626
G6100 1644# 1652
G6200 1668# 1676
G6300 1693# 1700
G6400 1718# 1725
G700 979# 984
G7000 1742# 1750
G7100 1767# 1774
G7200 1791# 1798 SEQ 0249
G7400 1814# 1821
G7600 1838# 1845
G7700 1870# 1879
GSVAC 8840# 8840 8844 8864# 8864 8868 8888# 8888 8892 8912# 8912 8916 8936# 8936
8940 8960# 8960 8964 8984# 8984 8988 9008# 9008 9012 9032# 9032 9036 9056#
9056 9060 9080# 9080 9084 9104# 9104 9108 9128# 9128 9132
GSVAC0 7331# 7331 7358
HYPEN 630#
INHCSH 180#
INHPAG 177#
INXM 431#
IOCLR 431#
ITERAT 88# 477
ITRCH1 537#
ITRCNT 477#
JOB41 431#
JOBAPR 431#
JOBCNI 431#
JOBDDT 431#
JOBFF 431#
JOBOPC 431# 9279
JOBREL 431#
JOBREN 431#
JOBSA 431#
JOBSYM 431#
JOBTPC 431#
JOBUSY 431#
JOBUUO 431#
JOBVER 431#
KA10 61# 431
KAHZ50 185#
KAIFLG 494#
KI10 431 9151 9303
KL10 431
KLFLG 495# 4328 4330 9166
KLOLD 392
KLTYP 711#
LAST1 9139#
LDLNK 196# 447 449
LFP 634#
LOOPER 171# 9284
LUUO 431#
LUUO1 45# 564 565
LUUO10 52# 564 569
LUUO11 53# 564 569
LUUO12 54# 564 570
LUUO13 55# 564 570
LUUO14 564 571
LUUO15 564 571
LUUO16 564 572
LUUO17 564 572
LUUO2 46# 564 566
LUUO20 564 573 SEQ 0250
LUUO21 564 573
LUUO22 564 574
LUUO23 564 574
LUUO24 564 575
LUUO25 564 575
LUUO26 564 576
LUUO27 564 576
LUUO3 47# 564 566
LUUO30 564 577
LUUO31 564 577
LUUO32 564 578
LUUO33 564 578
LUUO4 48# 564 567
LUUO5 49# 564 567
LUUO6 50# 564 568
LUUO7 51# 564 568
LUUOI 431#
MAPNEW 585#
MARGIN 507#
MCNVER 4# 12 26 479
MEMLOW 587#
MEMMAP 485
MEMSIZ 588#
MEMTOT 586#
MICNT 9163# 9163 9164 9181
MINUS 629#
MODDVC 179#
MODDVL 377 377# 480
MODDVU 378 378# 481
MODLNK 198# 444
MONCTL 497# 9182 9296
MONFLG 496#
MONTEN 498#
MPVU 431#
NOPNT 167# 9172
NXMU 431#
OPRSEL 181#
OPTIME 599#
P 224 225 226 227 431# 519
PAG 431#
PALERS 173# 9313
PARCLR 431#
PARDIS 431#
PAREA0 81#
PAREA1 82# 475
PAREA2 83# 476
PAREA3 84# 473
PAREA4 85# 474
PAREA5 86# 486
PAREA6 87# 487
PAREA7 486#
PAREA8 487#
PARENB 431# SEQ 0251
PARU 431#
PASCNT 501# 9187 9191
PATCH 9476#
PDISF 596#
PDLOVU 431#
PERIOD 626#
PFSTRT 453#
PGMEND 62# 9482
PGMNAM 478 759#
PI 9169
PICHN1 431#
PICHN2 431#
PICHN3 431#
PICHN4 431#
PICHN5 431#
PICHN6 431#
PICHN7 431#
PICHNA 431#
PICLR 431#
PIOFF 431#
PION 431#
PLIST 665# 665
PLISTE 665 667# 751
PLISTS 666#
PLUS 631#
PNTENB 595#
PNTEXT 474#
PNTFLG 594#
PNTINH 597#
PNTLPT 168#
PNTNAM 473#
PNTSPC 598#
PROCED 9170# 9170 9285 9292
PVPAGI 692#
PWFCLR 431#
QUEST 637#
RADIX 640#
RADLSC 642#
RADLSP 641#
RANDBS 475#
REENTR 455#
RELIAB 175#
REPT 431#
REPT1 431#
REPTU 553#
REQSET 431#
RESRT1 530#
RESRT2 531#
RETURN 462#
RSTART 164#
RTP 635#
RUNFLG 502#
SADR1 67# 451 SEQ 0252
SADR10 76# 467
SADR11 77# 468
SADR2 68# 453
SADR3 69# 455
SADR4 70#
SADR5 71# 516
SADR6 72# 517
SADR7 73# 464
SADR8 74# 465
SADR9 75# 466
SBINIT 237 461#
SCOPE 554#
SFSTRT 451#
SIZ 4473# 4478 4502# 4507 4531# 4536 4560# 4566 4593# 4599 4627# 4634 4664# 4703
4812# 4851 4960# 4999 5108# 5147 5256# 5295 5404# 5443 5552# 5591 5700# 5739
5848# 5887 5996# 6035 6144# 6183 6292# 6331 6436# 6440 6445 6477 6479 6495#
6499 6504 6536 6538 6554# 6558 6566 6598 6600 6616# 6632 6634 6666 6668
6684# 6696 6698 6736 6755# 6767 6769 6807 6826# 6838 6840 6878 6897# 6917
6919 6957 6976# 6994 6996 7029 7031 7034 7036 7052# 7074 7076 7117 7123
7142# 7158 7160 7162 7197 7199 7215# 7235 7237 7239 7284 7303# 7329 7355
7356 7360 7400 7402 7474 7475 7493# 7526 7541 7543 7594 7658 7660
SLASH 638#
SN 890# 906 906# 913 917 917# 924 928 928# 935 939 939# 946 950
950# 957 961 961# 968 1899# 1916 1916# 1923 1927 1927# 1934 1938 1938#
1945 1949 1949# 1956 1960 1960# 1967 1986# 2005 2005# 2013 2017 2017# 2025
2029 2029# 2037 2041 2041# 2049 2053 2053# 2061 2081# 2099 2099# 2107 2111
2111# 2119 2123 2123# 2131 2135 2135# 2143 2147 2147# 2155 2175# 2192 2192#
2199 2203 2203# 2210 2214 2214# 2221 2225 2225# 2232 2236 2236# 2243 2264#
2282 2282# 2290 2294 2294# 2302 2306 2306# 2314 2318 2318# 2326 2330 2330#
2338 2358# 2374 2374# 2381 2385 2385# 2392 2396 2396# 2403 2407 2407# 2414
2418 2418# 2425 2445# 2461 2461# 2468 2472 2472# 2479 2483 2483# 2490 2494
2494# 2501 2505 2505# 2512 2532# 2550 2550# 2559 2563 2563# 2572 2576 2576#
2585 2589 2589# 2598 2602 2602# 2611 2630# 2653 2653# 2664 2668 2668# 2679
2683 2683# 2694 2714# 2730 2730# 2737 2741 2741# 2748 2752 2752# 2759 2763
2763# 2770 2774 2774# 2781 2800# 2816 2816# 2823 2827 2827# 2834 2838 2838#
2845 2849 2849# 2856 2860 2860# 2867 2887# 2906 2906# 2915 2919 2919# 2928
2932 2932# 2941 2960# 2978 2978# 2986 2990 2990# 2998 3002 3002# 3010 3014
3014# 3022 3026 3026# 3034 3054# 3072 3072# 3080 3084 3084# 3092 3096 3096#
3104 3108 3108# 3116 3120 3120# 3128 3164# 3184 3184# 3194 3198 3198# 3208
3212 3212# 3222 3226 3226# 3236 3240 3240# 3250 3269# 3290 3290# 3301 3305
3305# 3316 3320 3320# 3331 3335 3335# 3346 3350 3350# 3361 3381# 3401 3401#
3411 3415 3415# 3425 3429 3429# 3439 3443 3443# 3453 3457 3457# 3467 3485#
3504 3504# 3513 3517 3517# 3526 3530 3530# 3539 3543 3543# 3552 3556 3556#
3565 3580# 3599 3599# 3607 3609 3613 3613# 3621 3623 3632# 3657 3657# 3667
3669 3673 3677 3677# 3687 3689 3693 4470# 4479 4479# 4481 4482 4482# 4484
4485 4485# 4487 4499# 4508 4508# 4510 4511 4511# 4513 4514 4514# 4516 4528#
4537 4537# 4539 4540 4540# 4542 4543 4543# 4545 4557# 4567 4567# 4570 4571
4571# 4574 4575 4575# 4578 4590# 4600 4600# 4603 4604 4604# 4607 4608 4608#
4611 4624# 4635 4635# 4638 4639 4639# 4642 4643 4643# 4646 4661# 4705 4705#
4718 4720 4720# 4733 4735 4735# 4748 4750 4750# 4763 4765 4765# 4776 4780
4780# 4793 4809# 4853 4853# 4866 4868 4868# 4881 4883 4883# 4896 4898 4898#
4911 4913 4913# 4924 4928 4928# 4941 4957# 5001 5001# 5014 5016 5016# 5029
5031 5031# 5044 5046 5046# 5059 5061 5061# 5072 5076 5076# 5089 5105# 5149 SEQ 0253
5149# 5162 5164 5164# 5177 5179 5179# 5192 5194 5194# 5201 5209 5209# 5214
5224 5224# 5231 5253# 5297 5297# 5310 5312 5312# 5325 5327 5327# 5340 5342
5342# 5349 5357 5357# 5362 5372 5372# 5379 5401# 5445 5445# 5458 5460 5460#
5473 5475 5475# 5488 5490 5490# 5497 5505 5505# 5510 5520 5520# 5527 5549#
5593 5593# 5600 5608 5608# 5615 5623 5623# 5630 5638 5638# 5645 5653 5653#
5658 5668 5668# 5675 5697# 5741 5741# 5748 5756 5756# 5763 5771 5771# 5778
5786 5786# 5793 5801 5801# 5806 5816 5816# 5823 5845# 5889 5889# 5896 5904
5904# 5911 5919 5919# 5926 5934 5934# 5941 5949 5949# 5954 5964 5964# 5971
5993# 6037 6037# 6044 6052 6052# 6059 6067 6067# 6074 6082 6082# 6095 6097
6097# 6108 6112 6112# 6125 6141# 6185 6185# 6192 6200 6200# 6207 6215 6215#
6222 6230 6230# 6243 6245 6245# 6256 6260 6260# 6273 6289# 6333 6333# 6340
6348 6348# 6355 6363 6363# 6370 6378 6378# 6391 6393 6393# 6404 6408 6408#
6421 6433# 6446 6446# 6449 6451 6451# 6454 6456 6456# 6459 6461 6461# 6464
6466 6466# 6469 6471 6471# 6474 6476 6476# 6479 6492# 6505 6505# 6508 6510
6510# 6513 6515 6515# 6518 6520 6520# 6523 6525 6525# 6528 6530 6530# 6533
6535 6535# 6538 6551# 6567 6567# 6570 6572 6572# 6575 6577 6577# 6580 6582
6582# 6585 6587 6587# 6590 6592 6592# 6595 6597 6597# 6600 6613# 6635 6635#
6638 6640 6640# 6643 6645 6645# 6648 6650 6650# 6653 6655 6655# 6658 6660
6660# 6663 6665 6665# 6668 6681# 6699 6699# 6703 6705 6705# 6709 6711 6711#
6715 6717 6717# 6721 6723 6723# 6727 6729 6729# 6733 6735 6735# 6739 6752#
6770 6770# 6774 6776 6776# 6780 6782 6782# 6786 6788 6788# 6792 6794 6794#
6798 6800 6800# 6804 6806 6806# 6810 6823# 6841 6841# 6845 6847 6847# 6851
6853 6853# 6857 6859 6859# 6863 6865 6865# 6869 6871 6871# 6875 6877 6877#
6881 6894# 6920 6920# 6924 6926 6926# 6930 6932 6932# 6936 6938 6938# 6942
6944 6944# 6948 6950 6950# 6954 6956 6956# 6960 6973# 6997 6997# 7000 7002
7002# 7005 7007 7007# 7010 7012 7012# 7015 7018 7018# 7021 7023 7023# 7026
7028 7028# 7031 7033 7033# 7036 7049# 7080 7080# 7084 7086 7086# 7090 7092
7092# 7096 7098 7098# 7102 7104 7104# 7108 7110 7110# 7114 7116 7116# 7120
7122 7122# 7126 7139# 7163 7163# 7166 7168 7168# 7170 7171 7171# 7174 7176
7176# 7179 7181 7181# 7184 7186 7186# 7189 7191 7191# 7194 7196 7196# 7199
7212# 7243 7243# 7247 7249 7249# 7252 7253 7253# 7257 7259 7259# 7263 7265
7265# 7269 7271 7271# 7275 7277 7277# 7281 7283 7283# 7287 7300# 7364 7364#
7367 7369 7369# 7371 7372 7372# 7374 7375 7375# 7377 7378 7378# 7380 7381
7381# 7383 7384 7384# 7386 7387 7387# 7389 7390 7390# 7392 7393 7393# 7395
7396 7396# 7398 7399 7399# 7402 7407 7407# 7411 7413 7413# 7417 7419 7419#
7423 7425 7425# 7429 7431 7431# 7435 7437 7437# 7441 7443 7443# 7447 7449
7449# 7453 7455 7455# 7459 7461 7461# 7465 7467 7467# 7471 7473 7473# 7477
7490# 7547 7547# 7551 7553 7553# 7556 7557 7557# 7560 7561 7561# 7564 7565
7565# 7568 7569 7569# 7572 7573 7573# 7576 7577 7577# 7580 7581 7581# 7584
7585 7585# 7588 7589 7589# 7592 7593 7593# 7597 7602 7602# 7605 7607 7607#
7610 7612 7612# 7615 7617 7617# 7620 7622 7622# 7625 7627 7627# 7630 7632
7632# 7635 7637 7637# 7640 7642 7642# 7645 7647 7647# 7650 7652 7652# 7655
7657 7657# 7660 7672# 7693 7693# 7695 7696 7696# 7699 7700 7700# 7703 7704
7704# 7707 7708 7708# 7711 7712 7712# 7715 7716 7716# 7719 7726# 7755 7755#
7767 7769 7771 7778 7778# 7790 7792 7794 7801 7801# 7813 7815 7817 7824
7824# 7836 7838 7840 7847 7847# 7859 7861 7863 7870 7870# 7882 7884 7886
7893 7893# 7905 7907 7909 7916 7916# 7928 7930 7932 7939 7939# 7951 7953
7955 7962 7962# 7974 7976 7978 7985 7985# 7997 7999 8001 8008 8008# 8020
8022 8024 8031 8031# 8043 8045 8047 8069# 8097 8097# 8104 8106 8108 8116
8116# 8123 8125 8127 8135 8135# 8142 8144 8146 8154 8154# 8161 8163 8165
8173 8173# 8180 8182 8184 8192 8192# 8199 8201 8203 8211 8211# 8218 8220
8222 8230 8230# 8237 8239 8241 8249 8249# 8256 8258 8260 8268 8268# 8275
8277 8279 8287 8287# 8294 8296 8298 8306 8306# 8313 8315 8317 8325 8325# SEQ 0254
8332 8334 8336 8344 8344# 8351 8353 8355 8363 8363# 8370 8372 8374 8382
8382# 8389 8391 8393 8401 8401# 8408 8410 8412 8420 8420# 8427 8429 8431
8435# 8462 8462# 8469 8471 8473 8481 8481# 8488 8490 8492 8500 8500# 8507
8509 8511 8519 8519# 8526 8528 8530 8538 8538# 8545 8547 8549 8557 8557#
8564 8566 8568 8576 8576# 8583 8585 8587 8595 8595# 8602 8604 8606 8614
8614# 8621 8623 8625 8633 8633# 8640 8642 8644 8652 8652# 8659 8661 8663
8671 8671# 8678 8680 8682 8690 8690# 8697 8699 8701 8709 8709# 8716 8718
8720 8728 8728# 8735 8737 8739 8747 8747# 8754 8756 8758 8766 8766# 8773
8775 8777 8785 8785# 8792 8794 8796 8803# 8831 8831# 8843 8845 8847 8855
8855# 8867 8869 8871 8879 8879# 8891 8893 8895 8903 8903# 8915 8917 8919
8927 8927# 8939 8941 8943 8951 8951# 8963 8965 8967 8975 8975# 8987 8989
8991 8999 8999# 9011 9013 9015 9023 9023# 9035 9037 9039 9047 9047# 9059
9061 9063 9071 9071# 9083 9085 9087 9095 9095# 9107 9109 9111 9119 9119#
9131 9133 9135
SPACE 627#
SPDES 3665 3671 3685 3691 4459 7730 8055 9257#
SRCE 4471# 4475 4476 4477 4500# 4504 4505 4506 4529# 4533 4534 4535 4558# 4562
4563 4564 4565 4591# 4595 4596 4597 4598 4625# 4629 4630 4632 4633 4662#
4666 4668 4669 4670 4674 4675 4676 4680 4681 4682 4706 4713 4714 4718
4721 4728 4729 4733 4736 4743 4744 4748 4810# 4814 4816 4817 4818 4822
4823 4824 4828 4829 4830 4854 4861 4862 4866 4869 4876 4877 4881 4884
4891 4892 4896 4958# 4962 4964 4965 4966 4970 4971 4972 4976 4977 4978
5002 5009 5010 5014 5017 5024 5025 5029 5032 5039 5040 5044 5106# 5110
5112 5113 5114 5118 5119 5120 5124 5125 5126 5150 5157 5158 5162 5165
5172 5173 5177 5180 5187 5188 5192 5254# 5258 5260 5261 5262 5266 5267
5268 5272 5273 5274 5298 5305 5306 5310 5313 5320 5321 5325 5328 5335
5336 5340 5402# 5406 5408 5409 5410 5414 5415 5416 5420 5421 5422 5446
5453 5454 5458 5461 5468 5469 5473 5476 5483 5484 5488 5550# 5554 5556
5558 5560 5562 5564 5566 5568 5570 5572 5594 5595 5601 5609 5610 5616
5624 5625 5631 5698# 5702 5704 5706 5708 5710 5712 5714 5716 5718 5720
5742 5743 5749 5757 5758 5764 5772 5773 5779 5846# 5850 5852 5854 5856
5858 5860 5862 5864 5866 5868 5890 5891 5897 5905 5906 5912 5920 5921
5927 5994# 5998 6000 6002 6004 6006 6008 6010 6012 6014 6016 6038 6039
6045 6053 6054 6060 6068 6069 6075 6142# 6146 6148 6150 6152 6154 6156
6158 6160 6162 6164 6186 6187 6193 6201 6202 6208 6216 6217 6223 6290#
6294 6296 6298 6300 6302 6304 6306 6308 6310 6312 6334 6335 6341 6349
6350 6356 6364 6365 6371 6434# 6438 6440 6442 6443 6444 6493# 6497 6499
6501 6502 6503 6552# 6556 6558 6560 6562 6563 6564 6565 6614# 6618 6620
6622 6624 6626 6628 6630 6632 6682# 6686 6688 6690 6692 6693 6694 6695
6696 6753# 6757 6759 6761 6763 6764 6765 6766 6767 6824# 6828 6830 6833
6834 6835 6836 6837 6838 6895# 6899 6902 6905 6907 6910 6912 6915 6917
6974# 6978 6984 6986 6988 6990 6992 6994 7034 7036 7050# 7054 7062 7064
7067 7069 7072 7074 7123 7140# 7144 7146 7148 7150 7152 7154 7156 7158
7164 7166 7169 7170 7213# 7217 7220 7223 7225 7228 7230 7233 7235 7244
7250 7301# 7305 7307 7309 7311 7313 7315 7317 7319 7321 7323 7325 7327
7329 7365 7367 7370 7371 7373 7374 7376 7377 7379 7380 7382 7383 7385
7386 7388 7389 7391 7392 7394 7395 7397 7398 7400 7402 7491# 7495 7498
7501 7503 7506 7508 7511 7514 7516 7519 7522 7524 7526 7548 7554 7558
7562 7566 7570 7574 7578 7582 7586 7590 7594
SRTDDT 457#
START 445 775#
START1 464#
START2 465# SEQ 0255
START3 466#
START4 467#
START5 468#
STARTA 460 779#
SUBLNK 199# 461
SWTEXR 476#
SYSEXR 449#
TAB 628#
TESTPC 503# 802 826 845 863 886 974 1023 1045 1066 1135 1159 1208 1229
1253 1274 1293 1315 1378 1397 1420 1441 1468 1495 1519 1543 1567 1590
1617 1640 1664 1689 1714 1738 1763 1787 1810 1834 1866 1895 1982 2077
2171 2260 2354 2441 2528 2626 2710 2796 2883 2956 3050 3160 3265 3377
3481 3576 3702 3739 3757 3778 3804 3832 3859 3888 3916 3941 3971 4002
4029 4056 4083 4112 4141 4170 4199 4230 4253 4275 4298 4320 4344 4369
4393 4419 4445 4467 4496 4525 4554 4587 4621 4658 4806 4954 5102 5250
5398 5546 5694 5842 5990 6138 6286 6429 6488 6547 6609 6677 6748 6819
6890 6969 7045 7135 7208 7296 7486 7669 7759 7782 7805 7828 7851 7874
7897 7920 7943 7966 7989 8012 8035 8835 8859 8883 8907 8931 8955 8979
9003 9027 9051 9075 9099 9123
TICKS 506#
TLET 777 9231 9254#
TOTALS 165#
TTNBRF 686#
TTYFIL 602#
TTYSPD 603#
TXTINH 176# 9215
USER 493# 9167
USERF 431#
USRASB 60# 483
USRCRF 612#
USRLFF 611#
UUODIS 565#
UUOEXT 521# 9310
UUORTN 522#
UUOSKP 519#
VV 2631# 2654 2654# 2658 2669 2669# 2673 2684 2684# 2688
WW 1988# 2007 2007# 2009 2019 2019# 2021 2031 2031# 2033 2043 2043# 2045 2055
2055# 2057 2632# 2655 2655# 2658 2659 2670 2670# 2673 2674 2685 2685# 2688
2689
XX 1900# 1917 1917# 1919 1928 1928# 1930 1939 1939# 1941 1950 1950# 1952 1961
1961# 1963 1987# 2006 2006# 2009 2018 2018# 2021 2030 2030# 2033 2042 2042#
2045 2054 2054# 2057 2082# 2100 2100# 2102 2112 2112# 2114 2124 2124# 2126
2136 2136# 2138 2148 2148# 2150 2176# 2193 2193# 2195 2204 2204# 2206 2215
2215# 2217 2226 2226# 2228 2237 2237# 2239 2265# 2283 2283# 2287 2295 2295#
2299 2307 2307# 2311 2319 2319# 2323 2331 2331# 2335 2633# 2656 2656# 2659
2660 2661 2663 2671 2671# 2674 2675 2676 2678 2686 2686# 2689 2690 2691
2693 2888# 2907 2907# 2911 2912 2914 2920 2920# 2924 2925 2927 2933 2933#
2937 2938 2940 2961# 2979 2979# 2981 2991 2991# 2993 3003 3003# 3005 3015
3015# 3017 3027 3027# 3029 3055# 3073 3073# 3075 3085 3085# 3087 3097 3097#
3099 3109 3109# 3111 3121 3121# 3123 3139# 3141 3165# 3185 3185# 3188 3199
3199# 3202 3213 3213# 3216 3227 3227# 3230 3241 3241# 3244 3270# 3291 3291#
3295 3306 3306# 3310 3321 3321# 3325 3336 3336# 3340 3351 3351# 3355 3382#
3402 3402# 3405 3416 3416# 3419 3430 3430# 3433 3444 3444# 3447 3458 3458# SEQ 0256
3461 3581# 3600 3600# 3604 3608 3614 3614# 3618 3622 3633# 3658 3658# 3662
3678 3678# 3682 8070# 8098 8098# 8100 8117 8117# 8119 8136 8136# 8138 8155
8155# 8157 8174 8174# 8176 8193 8193# 8195 8212 8212# 8214 8231 8231# 8233
8250 8250# 8252 8269 8269# 8271 8288 8288# 8290 8307 8307# 8309 8326 8326#
8328 8345 8345# 8347 8364 8364# 8366 8383 8383# 8385 8402 8402# 8404 8421
8421# 8423 8436# 8463 8463# 8465 8482 8482# 8484 8501 8501# 8503 8520 8520#
8522 8539 8539# 8541 8558 8558# 8560 8577 8577# 8579 8596 8596# 8598 8615
8615# 8617 8634 8634# 8636 8653 8653# 8655 8672 8672# 8674 8691 8691# 8693
8710 8710# 8712 8729 8729# 8731 8748 8748# 8750 8767 8767# 8769 8786 8786#
8788
YY 892# 908 908# 909 919 919# 920 930 930# 931 941 941# 942 952
952# 953 963 963# 964
ZZ 891# 907 907# 909 910 918 918# 920 921 929 929# 931 932 940
940# 942 943 951 951# 953 954 962 962# 964 965 1901# 1918 1918#
1920 1929 1929# 1931 1940 1940# 1942 1951 1951# 1953 1962 1962# 1964 1989#
2008 2008# 2010 2020 2020# 2022 2032 2032# 2034 2044 2044# 2046 2056 2056#
2058 2083# 2101 2101# 2102 2104 2113 2113# 2114 2116 2125 2125# 2126 2128
2137 2137# 2138 2140 2149 2149# 2150 2152 2177# 2194 2194# 2198 2205 2205#
2209 2216 2216# 2220 2227 2227# 2231 2238 2238# 2242 2266# 2284 2284# 2285
2296 2296# 2297 2308 2308# 2309 2320 2320# 2321 2332 2332# 2333 2359# 2375
2375# 2377 2378 2380 2386 2386# 2388 2389 2391 2397 2397# 2399 2400 2402
2408 2408# 2410 2411 2413 2419 2419# 2421 2422 2424 2446# 2462 2462# 2464
2465 2466 2467 2473 2473# 2475 2476 2477 2478 2484 2484# 2486 2487 2488
2489 2495 2495# 2497 2498 2499 2500 2506 2506# 2508 2509 2510 2511 2533#
2551 2551# 2553 2554 2555 2558 2564 2564# 2566 2567 2568 2571 2577 2577#
2579 2580 2581 2584 2590 2590# 2592 2593 2594 2597 2603 2603# 2605 2606
2607 2610 2634# 2657 2657# 2662 2672 2672# 2677 2687 2687# 2692 2715# 2731
2731# 2733 2734 2736 2742 2742# 2744 2745 2747 2753 2753# 2755 2756 2758
2764 2764# 2766 2767 2769 2775 2775# 2777 2778 2780 2801# 2817 2817# 2819
2820 2822 2828 2828# 2830 2831 2833 2839 2839# 2841 2842 2844 2850 2850#
2852 2853 2855 2861 2861# 2863 2864 2866 2889# 2908 2908# 2910 2911 2921
2921# 2923 2924 2934 2934# 2936 2937 2962# 2980 2980# 2983 2992 2992# 2995
3004 3004# 3007 3016 3016# 3019 3028 3028# 3031 3056# 3074 3074# 3077 3086
3086# 3089 3098 3098# 3101 3110 3110# 3113 3122 3122# 3125 3166# 3186 3186#
3189 3200 3200# 3203 3214 3214# 3217 3228 3228# 3231 3242 3242# 3245 3271#
3292 3292# 3293 3293# 3296 3307 3307# 3308 3311 3322 3322# 3323 3326 3337
3337# 3338 3341 3352 3352# 3353 3356 3383# 3403 3403# 3406 3417 3417# 3420
3431 3431# 3434 3445 3445# 3448 3459 3459# 3462 3486# 3505 3505# 3508 3518
3518# 3521 3531 3531# 3534 3544 3544# 3547 3557 3557# 3560 8071# 8099 8099#
8107 8118 8118# 8126 8137 8137# 8145 8156 8156# 8164 8175 8175# 8183 8194
8194# 8202 8213 8213# 8221 8232 8232# 8240 8251 8251# 8259 8270 8270# 8278
8289 8289# 8297 8308 8308# 8316 8327 8327# 8335 8346 8346# 8354 8365 8365#
8373 8384 8384# 8392 8403 8403# 8411 8422 8422# 8430 8464 8464# 8472 8483
8483# 8491 8502 8502# 8510 8521 8521# 8529 8540 8540# 8548 8559 8559# 8567
8578 8578# 8586 8597 8597# 8605 8616 8616# 8624 8635 8635# 8643 8654 8654#
8662 8673 8673# 8681 8692 8692# 8700 8711 8711# 8719 8730 8730# 8738 8749
8749# 8757 8768 8768# 8776 8787 8787# 8795
$$MUUO 717#
$$OUTE 723#
$$TAX1 735#
$$TAX2 736#
$$TOGG 729#
$$UUO 706# SEQ 0257
$ACC0 544#
$ACF 9258#
$BEND1 514#
$BEND2 515# 9300
$CHRIN 605#
$CRLF 607#
$DEVCH 431#
$DSKUP 484#
$DVCH1 431#
$DVOFF 601#
$EMODE 482#
$ENDFX 751# 752
$FFF 609#
$IBUF 657#
$INEXT 659#
$INNM 658#
$ITRHL 525#
$ITRX1 526#
$LPAPE 9321
$MMAP 485#
$MODVL 480#
$MODVU 481#
$OBUF 648#
$ONETM 508#
$OUTEX 650#
$OUTNM 649#
$PAPER 431
$PARER 532#
$PNAME 478#
$PSHER 536#
$PVER 479#
$RSRTX 528#
$RSRTY 529#
$SPAG1 548#
$START 445#
$SVAPR 546#
$SVPAG 547#
$SVPI 545#
$SVUPC 551# 9161 9165 9195
$SVUUO 550# 9174 9206 9234
$TABF 608#
$TTCHR 604#
$TWCNT 600#
$TYPNB 606#
$UMODE 483#
$UORTX 523#
$USRHL 527#
$UUOER 524# 565
$VTF 610#
%AC1F 9259#
%ACS1A 9176# 9176 9220
%ACTFL 557#
%ACTUL 558# SEQ 0258
%ALF 9264#
%AR1F 9263#
%ARF 9262#
%COREC 556#
%CORFL 555#
%DISCR 559#
%E1F 9261#
%EEF 9265#
%EF 9260#
%ER4X 9240 9245#
%ER5X 9238 9247#
%ER6X 9236 9249#
%ER7X 9242# 9246 9248 9250
%ERAC0 9150# 9150 9177 9211 9302
%ERAC1 9158# 9158 9178 9290
%ERAC2 9159# 9159 9289
%ERFST 9184# 9184 9186
%ERHI1 698#
%ERHI2 699#
%ERHI3 700#
%ERMOR 9216 9243 9272#
%ERMS1 9181# 9315
%ERMS2 9204#
%ERMS3 9222 9229#
%ERRS1 9173 9276# 9314
%ERRS2 9289#
%ERRS4 9180 9312#
%ERRS5 9293 9297 9302#
%FF 9266#
%FLTTB 9224 9255#
%NODES 9256#
.JB41 431#
.JBAPR 431#
.JBCNI 431#
.JBDDT 431#
.JBFF 431#
.JBOPC 431#
.JBREL 431#
.JBREN 431#
.JBSA 431#
.JBSYM 431#
.JBTPC 431#
.JBUSY 431#
.JBUUO 431#
.JBVER 431#
BLTM1 126# 4650 4798 4946 5094 5242 5390 5538 5686 5834 5982 6130 6278
CFLUSH 348# SEQ 0259
CINVAL 347#
CLOKOP 342#
CWRTBI 349#
DROPDV 309# 756
ENDUUO 355# 513
EOPUUO 356# 515
ER1 33#
ER10 40#
ER11 41#
ER12 42# 835 1649 1699 1724 1749 1773 1797 1820 1878 3194 3208 3222 3236
3250 3301 3316 3331 3346 3361 3411 3425 3439 3453 3467 3513 3526 3539
3552 3565 3669 3689 3729 3795 3823 3850 3877 3906 3932 3962 3991 4019
4047 4074 4101 4131 4161 4190 4220 4244 4267 4289 4312 4337 4361 4386
4411 4437
ER13 43# 1844 3717 3731
ER2 34# 3667 3673 3687 3693 4481 4484 4487 4510 4513 4516 4539 4542 4545
4570 4574 4578 4603 4607 4611 4638 4642 4646 4718 4733 4748 4763 4776
4793 4866 4881 4896 4911 4924 4941 5014 5029 5044 5059 5072 5089 5162
5177 5192 5201 5214 5231 5310 5325 5340 5349 5362 5379 5458 5473 5488
5497 5510 5527 5600 5615 5630 5645 5658 5675 5748 5763 5778 5793 5806
5823 5896 5911 5926 5941 5954 5971 6044 6059 6074 6095 6108 6125 6192
6207 6222 6243 6256 6273 6340 6355 6370 6391 6404 6421 6449 6454 6459
6464 6469 6474 6479 6508 6513 6518 6523 6528 6533 6538 6570 6575 6580
6585 6590 6595 6600 6638 6643 6648 6653 6658 6663 6668 6703 6709 6715
6721 6727 6733 6739 6774 6780 6786 6792 6798 6804 6810 6845 6851 6857
6863 6869 6875 6881 6924 6930 6936 6942 6948 6954 6960 7000 7005 7010
7015 7021 7026 7031 7036 7084 7090 7096 7102 7108 7114 7120 7126 7166
7170 7174 7179 7184 7189 7194 7199 7247 7252 7257 7263 7269 7275 7281
7287 7367 7371 7374 7377 7380 7383 7386 7389 7392 7395 7398 7402 7411
7417 7423 7429 7435 7441 7447 7453 7459 7465 7471 7477 7551 7556 7560
7564 7568 7572 7576 7580 7584 7588 7592 7597 7605 7610 7615 7620 7625
7630 7635 7640 7645 7650 7655 7660 7695 7699 7703 7707 7711 7715 7719
7767 7790 7813 7836 7859 7882 7905 7928 7951 7974 7997 8020 8043 8059
8104 8123 8142 8161 8180 8199 8218 8237 8256 8275 8294 8313 8332 8351
8370 8389 8408 8427 8469 8488 8507 8526 8545 8564 8583 8602 8621 8640
8659 8678 8697 8716 8735 8754 8773 8792 8843 8867 8891 8915 8939 8963
8987 9011 9035 9059 9083 9107 9131
ER3 35# 811 1263 1283 1301 1324 1333 1342 1351 1359 1368 1387 1406 1428
1450 1478 1505 1530 1554 1579 1602 1673 2199 2210 2221 2232 2243 2290
2302 2314 2326 2338 2381 2392 2403 2414 2425 2468 2479 2490 2501 2512
2559 2572 2585 2598 2611 2664 2679 2694 2737 2748 2759 2770 2781 2823
2834 2845 2856 2867 2915 2928 2941 2986 2998 3010 3022 3034 3080 3092
3104 3116 3128 3146 3607 3621 3713 3793 3820 3848 3879 3904 3960 3993
4017 4044 4072 4103 4129 4158 4188 4222 4240 4263 4285 4308 4333 4357
4382 4407 4433 7769 7792 7815 7838 7861 7884 7907 7930 7953 7976 7999
8022 8045 8061 8106 8125 8144 8163 8182 8201 8220 8239 8258 8277 8296
8315 8334 8353 8372 8391 8410 8429 8471 8490 8509 8528 8547 8566 8585
8604 8623 8642 8661 8680 8699 8718 8737 8756 8775 8794 8845 8869 8893
8917 8941 8965 8989 9013 9037 9061 9085 9109 9133
ER4 36# 1625 3609 3623 3715 3727 7771 7794 7817 7840 7863 7886 7909 7932
7955 7978 8001 8024 8047 8063 8108 8127 8146 8165 8184 8203 8222 8241
8260 8279 8298 8317 8336 8355 8374 8393 8412 8431 8473 8492 8511 8530
8549 8568 8587 8606 8625 8644 8663 8682 8701 8720 8739 8758 8777 8796 SEQ 0260
8847 8871 8895 8919 8943 8967 8991 9015 9039 9063 9087 9111 9135
ER5 37# 853 871 913 924 935 946 957 968 983 991 998 1006 1014
1032 1054 1075 1084 1093 1102 1111 1119 1144 1169 1178 1187 1196 1217
1239 1651 1675 1876 1923 1934 1945 1956 1967 2013 2025 2037 2049 2061
2107 2119 2131 2143 2155 3748 3769 3791 3818 3846 3874 3902 3958 3988
4015 4042 4070 4098 4127 4156 4186 4217 4242 4265 4287 4310 4335 4359
4384 4409 4435 4454
ER6 38#
ER7 39#
ERLOOP 400#
ERLP1 401#
ERLP2 402#
ERRHLT 244# 9283
ERROR 409#
ERROR1 421#
ERUUO 399#
FATAL 243#
FRD36 384#
FRD8 385#
FREAD 383#
FSELEC 382#
GCAM 111# 4704 4719 4734 4749 4764 4779 4852 4867 4882 4897 4912 4927 5000
5015 5030 5045 5060 5075 5148 5163 5178 5193 5208 5223 5296 5311 5326
5341 5356 5371 5444 5459 5474 5489 5504 5519 5592 5607 5622 5637 5652
5667 5740 5755 5770 5785 5800 5815 5888 5903 5918 5933 5948 5963 6036
6051 6066 6081 6096 6111 6184 6199 6214 6229 6244 6259 6332 6347 6362
6377 6392 6407
GET 227#
GMOV 104# 4667 4673 4679 4685 4691 4697 4815 4821 4827 4833 4839 4845 4963
4969 4975 4981 4987 4993 5111 5117 5123 5129 5135 5141 5259 5265 5271
5277 5283 5289 5407 5413 5419 5425 5431 5437 5555 5561 5567 5573 5579
5585 5703 5709 5715 5721 5727 5733 5851 5857 5863 5869 5875 5881 5999
6005 6011 6017 6023 6029 6147 6153 6159 6165 6171 6177 6295 6301 6307
6313 6319 6325
GO 224#
HALT 229# 534
JEN 231#
JRSTF 230# 3709 3723 3742 3760 3781 3807 3835 3862 3891 3919 3945 3974 4005
4032 4059 4086 4115 4144 4173 4202 4233 4256 4278 4301 4323 4347 4372
4396 4422 4448
MAPADR 365#
MAPCNK 366#
MAPMEM 362#
MAPPNT 368#
MAPSET 367#
MEMSEG 364#
MEMZRO 363#
MODPCP 375#
MODPCU 374#
MTROP 343#
NAME 9# 12
PBELL 318# 9287
PCRL 312# 9223 9242 SEQ 0261
PCRL2 316#
PCRL2F 317#
PCRLF 313#
PFORCE 320#
PGMINT 237# 775
PJRST 228#
PMSG 322# 9189 9193 9204 9229
PMSGF 325#
PNT1 278#
PNT11 292#
PNT11F 293#
PNT1F 279#
PNT2 280#
PNT2F 281#
PNT3 282# 9241
PNT3F 283#
PNT4 284# 9245
PNT4F 285#
PNT5 286# 9247
PNT5F 287#
PNT6 288# 9197 9249
PNT6F 289#
PNT7 290#
PNT7F 291#
PNTA 264# 9232
PNTADF 295#
PNTADR 294#
PNTAF 265#
PNTAL 266# 9225
PNTALF 267#
PNTCHF 277#
PNTCHR 276#
PNTCI 274#
PNTCIF 275#
PNTCW 310#
PNTCWF 311#
PNTDCF 303#
PNTDEC 302# 9192
PNTDS 304#
PNTDSF 305#
PNTHW 298# 9212
PNTHWF 299#
PNTMGN 389# 9273
PNTMSF 271#
PNTMSG 270#
PNTNM 306# 9185
PNTOCF 301#
PNTOCS 300#
PNTOCT 296#
PNTOTF 297#
PNTSIX 307#
PNTSXF 308#
PSIXL 268# SEQ 0262
PSIXLF 269#
PSIXM 272# 9190 9194 9205 9230
PSIXMF 273#
PSP 314#
PSPF 315#
PUT 226#
REPTUO 403#
RTN 225# 521
S 155# 157 161 190 192 201 204 219 220 222 233 235 239 241
246 250 395 397 431 436 442 469 471 489 491 509 511 540
542 560 562 580 582 590 592 613 618 644 646 653 655 661
663 669 671 675 677 682 684 688 690 694 696 702 704 707
709 713 715 719 721 725 727 731 733 738 743 747 749
SAVEAC 92# 800 824 843 861 884 972 1021 1043 1064 1133 1157 1206 1227
1251 1272 1291 1313 1376 1395 1418 1439 1466 1493 1517 1541 1565 1588
1615 1638 1662 1687 1712 1736 1761 1785 1808 1832 1864 1893 1980 2075
2169 2258 2352 2439 2526 2624 2708 2794 2881 2954 3048 3158 3263 3375
3479 3574 3700 3737 3755 3776 3802 3830 3857 3886 3914 3939 3969 4000
4027 4054 4081 4110 4139 4168 4197 4228 4251 4273 4296 4318 4342 4367
4391 4417 4443 4465 4494 4523 4552 4585 4619 4656 4804 4952 5100 5248
5396 5544 5692 5840 5988 6136 6284 6427 6486 6545 6607 6675 6746 6817
6888 6967 7043 7133 7206 7294 7484 7667 7757 7780 7803 7826 7849 7872
7895 7918 7941 7964 7987 8010 8033 8833 8857 8881 8905 8929 8953 8977
9001 9025 9049 9073 9097 9121
SIXBTZ 331#
SWITCH 337# 9171 9274
TTALTM 259# 9276
TTICHR 252#
TTICNV 257#
TTIDEC 256#
TTINO 254#
TTIOCT 255#
TTIYES 253#
TTLOOK 258#
TTSIXB 260#
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 1
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0263
*030631 IBP 0,000006
INITIAL
C(AC)=000000 777777
C(E)=140600 000000
FINAL
C(E)=140600 000000
TIME PC MA SC FE AR MQ BR
IT0 030631 030631 0 0 133000000006 0 140600000000
IT1 030631 0 0 0 133000000006 0 140600000000
AT3 030631 0 0 0 000000000006 0 133000000006
AT6 030631 000006 0 0 000000000006 0 133000000006
FT0 030631 000006 0 0 140600000000 0 133000000006
FT1A 030631 000006 0 0 140600000000 0 140600000000
FT9 030632 000006 0 0 140600000000 0 140600000000
ET0 030632 000006 0 0 140600000000 0 140600000000
BYT1 030632 000006 014 0 140600000000 0 140600000000
BYT4 030632 000006 0 0 060600000000 0 140600000000
ST9 030632 000006 0 0 060600000000 0 140600000000
*030644 IBP 0,000015
INITIAL
C(AC)=777777 777777
C(E)=140600 000000
FINAL
C(E)=140600 000000
TIME PC MA SC FE AR MQ BR
IT0 030644 030644 0 0 133000000015 0 140600000000
IT1 030644 0 0 0 133000000015 0 140600000000
AT3 030644 0 0 0 000000000015 0 133000000015
AT6 030644 000015 0 0 000000000015 0 133000000015
FT0 030644 000015 0 0 140600000000 0 133000000015
FT1A 030644 000015 0 0 140600000000 0 140600000000
FT9 030645 000015 0 0 140600000000 0 140600000000
ET0 030645 000015 0 0 140600000000 0 140600000000
BYT1 030645 000015 014 0 140600000000 0 140600000000
BYT4 030645 000015 0 0 060600000000 0 140600000000
ST9 030645 000015 0 0 060600000000 0 140600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 2
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0264
*030656 IBP 0,000014
INITIAL
C(AC)=777777 777777
C(E)=140600 000000
FINAL
C(E)=140600 000000
TIME PC MA SC FE AR MQ BR
IT0 030656 030656 0 0 133000000014 0 140600000000
IT1 030656 0 0 0 133000000014 0 140600000000
AT3 030656 0 0 0 000000000014 0 133000000014
AT6 030656 000014 0 0 000000000014 0 133000000014
FT0 030656 000014 0 0 140600000000 0 133000000014
FT1A 030656 000014 0 0 140600000000 0 140600000000
FT9 030657 000014 0 0 140600000000 0 140600000000
ET0 030657 000014 0 0 140600000000 0 140600000000
BYT1 030657 000014 014 0 140600000000 0 140600000000
BYT4 030657 000014 0 0 060600000000 0 140600000000
ST9 030657 000014 0 0 060600000000 0 140600000000
*030670 IBP 0,000013
INITIAL
C(AC)=777777 777777
C(E)=160600 000000
FINAL
C(E)=160600 000000
TIME PC MA SC FE AR MQ BR
IT0 030670 030670 0 0 133000000013 0 160600000000
IT1 030670 0 0 0 133000000013 0 160600000000
AT3 030670 0 0 0 000000000013 0 133000000013
AT6 030670 000013 0 0 000000000013 0 133000000013
FT0 030670 000013 0 0 160600000000 0 133000000013
FT1A 030670 000013 0 0 160600000000 0 160600000000
FT9 030671 000013 0 0 160600000000 0 160600000000
ET0 030671 000013 0 0 160600000000 0 160600000000
BYT1 030671 000013 016 0 160600000000 0 160600000000
BYT4 030671 000013 0 0 100600000000 0 160600000000
ST9 030671 000013 0 0 100600000000 0 160600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 3
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0265
*030702 IBP 0,000011
INITIAL
C(AC)=777777 777777
C(E)=770100 000000
FINAL
C(E)=770100 000000
TIME PC MA SC FE AR MQ BR
IT0 030702 030702 0 0 133000000011 0 770100000000
IT1 030702 0 0 0 133000000011 0 770100000000
AT3 030702 0 0 0 000000000011 0 133000000011
AT6 030702 000011 0 0 000000000011 0 133000000011
FT0 030702 000011 0 0 770100000000 0 133000000011
FT1A 030702 000011 0 0 770100000000 0 770100000000
FT9 030703 000011 0 0 770100000000 0 770100000000
ET0 030703 000011 0 0 770100000000 0 770100000000
BYT1 030703 000011 077 0 770100000000 0 770100000000
BYT4 030703 000011 0 0 760100000000 0 770100000000
ST9 030703 000011 0 0 760100000000 0 770100000000
*030710 IBP 0,000011
INITIAL
C(AC)=777777 777777
C(E)=770200 000000
FINAL
C(E)=770200 000000
TIME PC MA SC FE AR MQ BR
IT0 030710 030710 0 0 133000000011 0 770200000000
IT1 030710 0 0 0 133000000011 0 770200000000
AT3 030710 0 0 0 000000000011 0 133000000011
AT6 030710 000011 0 0 000000000011 0 133000000011
FT0 030710 000011 0 0 770200000000 0 133000000011
FT1A 030710 000011 0 0 770200000000 0 770200000000
FT9 030711 000011 0 0 770200000000 0 770200000000
ET0 030711 000011 0 0 770200000000 0 770200000000
BYT1 030711 000011 077 0 770200000000 0 770200000000
BYT4 030711 000011 0 0 750200000000 0 770200000000
ST9 030711 000011 0 0 750200000000 0 770200000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 4
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0266
*030716 IBP 0,000011
INITIAL
C(AC)=777777 777777
C(E)=770400 000000
FINAL
C(E)=770400 000000
TIME PC MA SC FE AR MQ BR
IT0 030716 030716 0 0 133000000011 0 770400000000
IT1 030716 0 0 0 133000000011 0 770400000000
AT3 030716 0 0 0 000000000011 0 133000000011
AT6 030716 000011 0 0 000000000011 0 133000000011
FT0 030716 000011 0 0 770400000000 0 133000000011
FT1A 030716 000011 0 0 770400000000 0 770400000000
FT9 030717 000011 0 0 770400000000 0 770400000000
ET0 030717 000011 0 0 770400000000 0 770400000000
BYT1 030717 000011 077 0 770400000000 0 770400000000
BYT4 030717 000011 0 0 730400000000 0 770400000000
ST9 030717 000011 0 0 730400000000 0 770400000000
*030724 IBP 0,000011
INITIAL
C(AC)=777777 777777
C(E)=771000 000000
FINAL
C(E)=771000 000000
TIME PC MA SC FE AR MQ BR
IT0 030724 030724 0 0 133000000011 0 771000000000
IT1 030724 0 0 0 133000000011 0 771000000000
AT3 030724 0 0 0 000000000011 0 133000000011
AT6 030724 000011 0 0 000000000011 0 133000000011
FT0 030724 000011 0 0 771000000000 0 133000000011
FT1A 030724 000011 0 0 771000000000 0 771000000000
FT9 030725 000011 0 0 771000000000 0 771000000000
ET0 030725 000011 0 0 771000000000 0 771000000000
BYT1 030725 000011 077 0 771000000000 0 771000000000
BYT4 030725 000011 0 0 671000000000 0 771000000000
ST9 030725 000011 0 0 671000000000 0 771000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 5
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0267
*030732 IBP 0,000011
INITIAL
C(AC)=777777 777777
C(E)=772000 000000
FINAL
C(E)=772000 000000
TIME PC MA SC FE AR MQ BR
IT0 030732 030732 0 0 133000000011 0 772000000000
IT1 030732 0 0 0 133000000011 0 772000000000
AT3 030732 0 0 0 000000000011 0 133000000011
AT6 030732 000011 0 0 000000000011 0 133000000011
FT0 030732 000011 0 0 772000000000 0 133000000011
FT1A 030732 000011 0 0 772000000000 0 772000000000
FT9 030733 000011 0 0 772000000000 0 772000000000
ET0 030733 000011 0 0 772000000000 0 772000000000
BYT1 030733 000011 077 0 772000000000 0 772000000000
BYT4 030733 000011 0 0 572000000000 0 772000000000
ST9 030733 000011 0 0 572000000000 0 772000000000
*030740 IBP 0,000011
INITIAL
C(AC)=777777 777777
C(E)=774000 000000
FINAL
C(E)=774000 000000
TIME PC MA SC FE AR MQ BR
IT0 030740 030740 0 0 133000000011 0 774000000000
IT1 030740 0 0 0 133000000011 0 774000000000
AT3 030740 0 0 0 000000000011 0 133000000011
AT6 030740 000011 0 0 000000000011 0 133000000011
FT0 030740 000011 0 0 774000000000 0 133000000011
FT1A 030740 000011 0 0 774000000000 0 774000000000
FT9 030741 000011 0 0 774000000000 0 774000000000
ET0 030741 000011 0 0 774000000000 0 774000000000
BYT1 030741 000011 077 0 774000000000 0 774000000000
BYT4 030741 000011 0 0 374000000000 0 774000000000
ST9 030741 000011 0 0 374000000000 0 774000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 6
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0268
*030752 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=402000 000000
FINAL
C(E)=402000 000000
TIME PC MA SC FE AR MQ BR
IT0 030752 030752 0 0 133000000012 0 402000000000
IT1 030752 0 0 0 133000000012 0 402000000000
AT3 030752 0 0 0 000000000012 0 133000000012
AT6 030752 000012 0 0 000000000012 0 133000000012
FT0 030752 000012 0 0 402000000000 0 133000000012
FT1A 030752 000012 0 0 402000000000 0 402000000000
FT9 030753 000012 0 0 402000000000 0 402000000000
ET0 030753 000012 0 0 402000000000 0 402000000000
BYT1 030753 000012 0 0 402000000000 0 402000000000
BYT4 030753 000012 0 0 202000000000 0 402000000000
ST9 030753 000012 0 0 202000000000 0 402000000000
*030760 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=603000 000000
FINAL
C(E)=603000 000000
TIME PC MA SC FE AR MQ BR
IT0 030760 030760 0 0 133000000012 0 603000000000
IT1 030760 0 0 0 133000000012 0 603000000000
AT3 030760 0 0 0 000000000012 0 133000000012
AT6 030760 000012 0 0 000000000012 0 133000000012
FT0 030760 000012 0 0 603000000000 0 133000000012
FT1A 030760 000012 0 0 603000000000 0 603000000000
FT9 030761 000012 0 0 603000000000 0 603000000000
ET0 030761 000012 0 0 603000000000 0 603000000000
BYT1 030761 000012 0 0 603000000000 0 603000000000
BYT4 030761 000012 0 0 303000000000 0 603000000000
ST9 030761 000012 0 0 303000000000 0 603000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 7
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0269
*030766 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=301400 000000
FINAL
C(E)=301400 000000
TIME PC MA SC FE AR MQ BR
IT0 030766 030766 0 0 133000000012 0 301400000000
IT1 030766 0 0 0 133000000012 0 301400000000
AT3 030766 0 0 0 000000000012 0 133000000012
AT6 030766 000012 0 0 000000000012 0 133000000012
FT0 030766 000012 0 0 301400000000 0 133000000012
FT1A 030766 000012 0 0 301400000000 0 301400000000
FT9 030767 000012 0 0 301400000000 0 301400000000
ET0 030767 000012 0 0 301400000000 0 301400000000
BYT1 030767 000012 0 0 301400000000 0 301400000000
BYT4 030767 000012 0 0 141400000000 0 301400000000
ST9 030767 000012 0 0 141400000000 0 301400000000
*030774 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=140600 000000
FINAL
C(E)=140600 000000
TIME PC MA SC FE AR MQ BR
IT0 030774 030774 0 0 133000000012 0 140600000000
IT1 030774 0 0 0 133000000012 0 140600000000
AT3 030774 0 0 0 000000000012 0 133000000012
AT6 030774 000012 0 0 000000000012 0 133000000012
FT0 030774 000012 0 0 140600000000 0 133000000012
FT1A 030774 000012 0 0 140600000000 0 140600000000
FT9 030775 000012 0 0 140600000000 0 140600000000
ET0 030775 000012 0 0 140600000000 0 140600000000
BYT1 030775 000012 014 0 140600000000 0 140600000000
BYT4 030775 000012 0 0 060600000000 0 140600000000
ST9 030775 000012 0 0 060600000000 0 140600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 8
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0270
*031002 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=060300 000000
FINAL
C(E)=060300 000000
TIME PC MA SC FE AR MQ BR
IT0 031002 031002 0 0 133000000012 0 060300000000
IT1 031002 0 0 0 133000000012 0 060300000000
AT3 031002 0 0 0 000000000012 0 133000000012
AT6 031002 000012 0 0 000000000012 0 133000000012
FT0 031002 000012 0 0 060300000000 0 133000000012
FT1A 031002 000012 0 0 060300000000 0 060300000000
FT9 031003 000012 0 0 060300000000 0 060300000000
ET0 031003 000012 0 0 060300000000 0 060300000000
BYT1 031003 000012 006 0 060300000000 0 060300000000
BYT4 031003 000012 0 0 030300000000 0 060300000000
ST9 031003 000012 0 0 030300000000 0 060300000000
*031014 IBP 0,000006
INITIAL
C(AC)=777777 777777
C(E)=051000 000000
FINAL
C(E)=051000 000000
TIME PC MA SC FE AR MQ BR
IT0 031014 031014 0 0 133000000006 0 051000000000
IT1 031014 0 0 0 133000000006 0 051000000000
AT3 031014 0 0 0 000000000006 0 133000000006
AT6 031014 000006 0 0 000000000006 0 133000000006
FT0 031014 000006 0 0 051000000000 0 133000000006
FT1A 031014 000006 0 0 051000000000 0 051000000000
FT9 031015 000006 0 0 051000000000 0 051000000000
ET0 031015 000006 0 0 051000000000 0 051000000000
BYT1 031015 000006 005 0 051000000000 0 051000000000
BYT2 031015 000006 0 0 051000000001 0 051000000000
BYT3 031015 000006 144 0 051000000001 0 051000000000
BYT4 031015 000006 0 0 341000000001 0 051000000000
ST9 031015 000006 0 0 341000000001 0 051000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 9
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0271
*031027 IBP 0,000006
INITIAL
C(AC)=777777 777777
C(E)=160600 000000
FINAL
C(E)=160600 000000
TIME PC MA SC FE AR MQ BR
IT0 031027 031027 0 0 133000000006 0 160600000000
IT1 031027 0 0 0 133000000006 0 160600000000
AT3 031027 0 0 0 000000000006 0 133000000006
AT6 031027 000006 0 0 000000000006 0 133000000006
FT0 031027 000006 0 0 160600000000 0 133000000006
FT1A 031027 000006 0 0 160600000000 0 160600000000
FT9 031030 000006 0 0 160600000000 0 160600000000
ET0 031030 000006 0 0 160600000000 0 160600000000
BYT1 031030 000006 016 0 160600000000 0 160600000000
BYT4 031030 000006 0 0 100600000000 0 160600000000
ST9 031030 000006 0 0 100600000000 0 160600000000
*031042 IBP 0,000015
INITIAL
C(AC)=777777 777777
C(E)=010100 000000
FINAL
C(E)=010100 000000
TIME PC MA SC FE AR MQ BR
IT0 031042 031042 0 0 133000000015 0 010100000000
IT1 031042 0 0 0 133000000015 0 010100000000
AT3 031042 0 0 0 000000000015 0 133000000015
AT6 031042 000015 0 0 000000000015 0 133000000015
FT0 031042 000015 0 0 010100000000 0 133000000015
FT1A 031042 000015 0 0 010100000000 0 010100000000
FT9 031043 000015 0 0 010100000000 0 010100000000
ET0 031043 000015 0 0 010100000000 0 010100000000
BYT1 031043 000015 001 0 010100000000 0 010100000000
BYT4 031043 000015 0 0 000100000000 0 010100000000
ST9 031043 000015 0 0 000100000000 0 010100000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 10
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0272
*031051 IBP 0,000015
INITIAL
C(AC)=777777 777777
C(E)=020200 000000
FINAL
C(E)=020200 000000
TIME PC MA SC FE AR MQ BR
IT0 031051 031051 0 0 133000000015 0 020200000000
IT1 031051 0 0 0 133000000015 0 020200000000
AT3 031051 0 0 0 000000000015 0 133000000015
AT6 031051 000015 0 0 000000000015 0 133000000015
FT0 031051 000015 0 0 020200000000 0 133000000015
FT1A 031051 000015 0 0 020200000000 0 020200000000
FT9 031052 000015 0 0 020200000000 0 020200000000
ET0 031052 000015 0 0 020200000000 0 020200000000
BYT1 031052 000015 002 0 020200000000 0 020200000000
BYT4 031052 000015 0 0 000200000000 0 020200000000
ST9 031052 000015 0 0 000200000000 0 020200000000
*031060 IBP 0,000015
INITIAL
C(AC)=777777 777777
C(E)=040400 000000
FINAL
C(E)=040400 000000
TIME PC MA SC FE AR MQ BR
IT0 031060 031060 0 0 133000000015 0 040400000000
IT1 031060 0 0 0 133000000015 0 040400000000
AT3 031060 0 0 0 000000000015 0 133000000015
AT6 031060 000015 0 0 000000000015 0 133000000015
FT0 031060 000015 0 0 040400000000 0 133000000015
FT1A 031060 000015 0 0 040400000000 0 040400000000
FT9 031061 000015 0 0 040400000000 0 040400000000
ET0 031061 000015 0 0 040400000000 0 040400000000
BYT1 031061 000015 004 0 040400000000 0 040400000000
BYT4 031061 000015 0 0 000400000000 0 040400000000
ST9 031061 000015 0 0 000400000000 0 040400000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 11
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0273
*031067 IBP 0,000015
INITIAL
C(AC)=777777 777777
C(E)=101000 000000
FINAL
C(E)=101000 000000
TIME PC MA SC FE AR MQ BR
IT0 031067 031067 0 0 133000000015 0 101000000000
IT1 031067 0 0 0 133000000015 0 101000000000
AT3 031067 0 0 0 000000000015 0 133000000015
AT6 031067 000015 0 0 000000000015 0 133000000015
FT0 031067 000015 0 0 101000000000 0 133000000015
FT1A 031067 000015 0 0 101000000000 0 101000000000
FT9 031070 000015 0 0 101000000000 0 101000000000
ET0 031070 000015 0 0 101000000000 0 101000000000
BYT1 031070 000015 0 0 101000000000 0 101000000000
BYT4 031070 000015 0 0 001000000000 0 101000000000
ST9 031070 000015 0 0 001000000000 0 101000000000
*031076 IBP 0,000015
INITIAL
C(AC)=777777 777777
C(E)=202000 000000
FINAL
C(E)=202000 000000
TIME PC MA SC FE AR MQ BR
IT0 031076 031076 0 0 133000000015 0 202000000000
IT1 031076 0 0 0 133000000015 0 202000000000
AT3 031076 0 0 0 000000000015 0 133000000015
AT6 031076 000015 0 0 000000000015 0 133000000015
FT0 031076 000015 0 0 202000000000 0 133000000015
FT1A 031076 000015 0 0 202000000000 0 202000000000
FT9 031077 000015 0 0 202000000000 0 202000000000
ET0 031077 000015 0 0 202000000000 0 202000000000
BYT1 031077 000015 0 0 202000000000 0 202000000000
BYT4 031077 000015 0 0 002000000000 0 202000000000
ST9 031077 000015 0 0 002000000000 0 202000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 12
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0274
*031105 IBP 0,000015
INITIAL
C(AC)=777777 777777
C(E)=404000 000000
FINAL
C(E)=404000 000000
TIME PC MA SC FE AR MQ BR
IT0 031105 031105 0 0 133000000015 0 404000000000
IT1 031105 0 0 0 133000000015 0 404000000000
AT3 031105 0 0 0 000000000015 0 133000000015
AT6 031105 000015 0 0 000000000015 0 133000000015
FT0 031105 000015 0 0 404000000000 0 133000000015
FT1A 031105 000015 0 0 404000000000 0 404000000000
FT9 031106 000015 0 0 404000000000 0 404000000000
ET0 031106 000015 0 0 404000000000 0 404000000000
BYT1 031106 000015 0 0 404000000000 0 404000000000
BYT4 031106 000015 0 0 004000000000 0 404000000000
ST9 031106 000015 0 0 004000000000 0 404000000000
*031120 IBP 0,000014
INITIAL
C(AC)=777777 777777
C(E)=061000 000000
FINAL
C(E)=061000 000000
TIME PC MA SC FE AR MQ BR
IT0 031120 031120 0 0 133000000014 0 061000000000
IT1 031120 0 0 0 133000000014 0 061000000000
AT3 031120 0 0 0 000000000014 0 133000000014
AT6 031120 000014 0 0 000000000014 0 133000000014
FT0 031120 000014 0 0 061000000000 0 133000000014
FT1A 031120 000014 0 0 061000000000 0 061000000000
FT9 031121 000014 0 0 061000000000 0 061000000000
ET0 031121 000014 0 0 061000000000 0 061000000000
BYT1 031121 000014 006 0 061000000000 0 061000000000
BYT2 031121 000014 0 0 061000000001 0 061000000000
BYT3 031121 000014 144 0 061000000001 0 061000000000
BYT4 031121 000014 0 0 341000000001 0 061000000000
ST9 031121 000014 0 0 341000000001 0 061000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 13
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0275
*031133 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=202100 000000
FINAL
C(E)=202100 000000
TIME PC MA SC FE AR MQ BR
IT0 031133 031133 0 0 133000000012 0 202100000000
IT1 031133 0 0 0 133000000012 0 202100000000
AT3 031133 0 0 0 000000000012 0 133000000012
AT6 031133 000012 0 0 000000000012 0 133000000012
FT0 031133 000012 0 0 202100000000 0 133000000012
FT1A 031133 000012 0 0 202100000000 0 202100000000
FT9 031134 000012 0 0 202100000000 0 202100000000
ET0 031134 000012 0 0 202100000000 0 202100000000
BYT1 031134 000012 0 0 202100000000 0 202100000000
BYT2 031134 000012 0 0 202100000001 0 202100000000
BYT3 031134 000012 144 0 202100000001 0 202100000000
BYT4 031134 000012 0 0 232100000001 0 202100000000
ST9 031134 000012 0 0 232100000001 0 202100000000
*031142 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=101100 000000
FINAL
C(E)=101100 000000
TIME PC MA SC FE AR MQ BR
IT0 031142 031142 0 0 133000000012 0 101100000000
IT1 031142 0 0 0 133000000012 0 101100000000
AT3 031142 0 0 0 000000000012 0 133000000012
AT6 031142 000012 0 0 000000000012 0 133000000012
FT0 031142 000012 0 0 101100000000 0 133000000012
FT1A 031142 000012 0 0 101100000000 0 101100000000
FT9 031143 000012 0 0 101100000000 0 101100000000
ET0 031143 000012 0 0 101100000000 0 101100000000
BYT1 031143 000012 0 0 101100000000 0 101100000000
BYT2 031143 000012 0 0 101100000001 0 101100000000
BYT3 031143 000012 144 0 101100000001 0 101100000000
BYT4 031143 000012 0 0 331100000001 0 101100000000
ST9 031143 000012 0 0 331100000001 0 101100000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 14
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0276
*031151 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=020300 000000
FINAL
C(E)=020300 000000
TIME PC MA SC FE AR MQ BR
IT0 031151 031151 0 0 133000000012 0 020300000000
IT1 031151 0 0 0 133000000012 0 020300000000
AT3 031151 0 0 0 000000000012 0 133000000012
AT6 031151 000012 0 0 000000000012 0 133000000012
FT0 031151 000012 0 0 020300000000 0 133000000012
FT1A 031151 000012 0 0 020300000000 0 020300000000
FT9 031152 000012 0 0 020300000000 0 020300000000
ET0 031152 000012 0 0 020300000000 0 020300000000
BYT1 031152 000012 002 0 020300000000 0 020300000000
BYT2 031152 000012 0 0 020300000001 0 020300000000
BYT3 031152 000012 144 0 020300000001 0 020300000000
BYT4 031152 000012 0 0 410300000001 0 020300000000
ST9 031152 000012 0 0 410300000001 0 020300000000
*031160 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=010200 000000
FINAL
C(E)=010200 000000
TIME PC MA SC FE AR MQ BR
IT0 031160 031160 0 0 133000000012 0 010200000000
IT1 031160 0 0 0 133000000012 0 010200000000
AT3 031160 0 0 0 000000000012 0 133000000012
AT6 031160 000012 0 0 000000000012 0 133000000012
FT0 031160 000012 0 0 010200000000 0 133000000012
FT1A 031160 000012 0 0 010200000000 0 010200000000
FT9 031161 000012 0 0 010200000000 0 010200000000
ET0 031161 000012 0 0 010200000000 0 010200000000
BYT1 031161 000012 001 0 010200000000 0 010200000000
BYT2 031161 000012 0 0 010200000001 0 010200000000
BYT3 031161 000012 144 0 010200000001 0 010200000000
BYT4 031161 000012 0 0 420200000001 0 010200000000
ST9 031161 000012 0 0 420200000001 0 010200000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 15
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0277
*031174 IBP 0,000013
INITIAL
C(AC)=777777 777777
C(E)=061000 000000
FINAL
C(E)=061000 000000
TIME PC MA SC FE AR MQ BR
IT0 031174 031174 0 0 133000000013 0 061000000000
IT1 031174 0 0 0 133000000013 0 061000000000
AT3 031174 0 0 0 000000000013 0 133000000013
AT6 031174 000013 0 0 000000000013 0 133000000013
FT0 031174 000013 0 0 061000000000 0 133000000013
FT1A 031174 000013 0 0 061000000000 0 061000000000
FT9 031175 000013 0 0 061000000000 0 061000000000
ET0 031175 000013 0 0 061000000000 0 061000000000
BYT1 031175 000013 006 0 061000000000 0 061000000000
BYT2 031175 000013 0 0 061000000001 0 061000000000
BYT3 031175 000013 144 0 061000000001 0 061000000000
BYT4 031175 000013 0 0 341000000001 0 061000000000
ST9 031175 000013 0 0 341000000001 0 061000000000
*031210 IBP 0,000012
INITIAL
C(AC)=777777 777777
C(E)=061000 000011
FINAL
C(E)=061000 000011
TIME PC MA SC FE AR MQ BR
IT0 031210 031210 0 0 133000000012 0 061000000011
IT1 031210 0 0 0 133000000012 0 061000000011
AT3 031210 0 0 0 000000000012 0 133000000012
AT6 031210 000012 0 0 000000000012 0 133000000012
FT0 031210 000012 0 0 061000000011 0 133000000012
FT1A 031210 000012 0 0 061000000011 0 061000000011
FT9 031211 000012 0 0 061000000011 0 061000000011
ET0 031211 000012 0 0 061000000011 0 061000000011
BYT1 031211 000012 006 0 061000000011 0 061000000011
BYT2 031211 000012 0 0 061000000012 0 061000000011
BYT3 031211 000012 144 0 061000000012 0 061000000011
BYT4 031211 000012 0 0 341000000012 0 061000000011
ST9 031211 000012 0 0 341000000012 0 061000000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 16
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0278
*031224 LDB 14,000015
INITIAL
C(AC)=000000 000000
C(E)=000600 000005 C(C(E))=000000 777777
FINAL
C(AC)=000000 000077
C(E)=000600 000005 C(C(E))=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031224 031224 0 0 135600000015 0 000000777777
IT1 031224 0 0 0 135600000015 0 000000777777
AT3 031224 0 0 0 000000000015 0 135600000015
AT6 031224 000015 0 0 000000000015 0 135600000015
FT0 031224 000015 0 0 000600000005 0 135600000015
FT1A 031224 000015 0 0 000600000005 0 000600000005
FT9 031224 000015 0 0 000600000005 0 000600000005
ET0 031224 000015 0 0 000600000005 0 000600000005
BYT6 031224 000015 0 0 000600000005 0 000600000005
BYT7 031224 000015 772 0 000600000005 0 000600000005
SCT0 031224 000015 772 0 000600000005 0 000600000005
SCT3 031224 000015 773 0 000600000005 000000000001 000600000005
SCT3 031224 000015 774 0 000600000005 000000000003 000600000005
SCT3 031224 000015 775 0 000600000005 000000000007 000600000005
SCT3 031224 000015 776 0 000600000005 000000000017 000600000005
SCT3 031224 000015 777 0 000600000005 000000000037 000600000005
SCT3 031224 000015 0 0 000600000005 000000000077 000600000005
SCT4 031224 000015 0 0 000600000005 000000000077 000600000005
BYT7A 031224 000015 0 0 000600000005 000000000077 000600000005
IT1 031224 0 0 0 000600000005 000000000077 000600000005
AT3 031224 0 0 0 000000000005 000000000077 000600000005
AT6 031224 000005 0 0 000000000005 000000000077 000600000005
FT0 031224 000005 0 0 000000777777 000000000077 000600000005
FT1A 031224 000005 0 0 000000777777 000000000077 000000777777
FT9 031225 000005 0 0 000000777777 000000000077 000000777777
ET0 031225 000005 0 0 000000777777 000000000077 000000777777
SCT0 031225 000005 0 0 000000777777 000000000077 000000777777
SCT4 031225 000005 0 0 000000777777 000000000077 000000777777
LBT1 031225 000005 0 0 000000000077 000000000077 000000777777
ST0 031225 000005 0 0 000000000077 000000000077 000000777777
ST1 031225 000005 0 0 000000000077 000000000077 000000777777
ST2 031225 000005 0 0 000000000077 000000000077 000000777777
ST9 031225 000005 0 0 000000000077 000000000077 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 17
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0279
*031237 LDB 11,000012
INITIAL
C(AC)=341000 000000
C(E)=140600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031237 031237 0 0 135440000012 0 777777777777
IT1 031237 0 0 0 135440000012 0 777777777777
AT3 031237 0 0 0 000000000012 0 135440000012
AT6 031237 000012 0 0 000000000012 0 135440000012
FT0 031237 000012 0 0 140600000000 0 135440000012
FT1A 031237 000012 0 0 140600000000 0 140600000000
FT9 031237 000012 0 0 140600000000 0 140600000000
ET0 031237 000012 0 0 140600000000 0 140600000000
BYT6 031237 000012 0 0 140600000000 0 140600000000
BYT7 031237 000012 772 0 140600000000 0 140600000000
SCT0 031237 000012 772 0 140600000000 0 140600000000
SCT3 031237 000012 773 0 140600000000 000000000001 140600000000
SCT3 031237 000012 774 0 140600000000 000000000003 140600000000
SCT3 031237 000012 775 0 140600000000 000000000007 140600000000
SCT3 031237 000012 776 0 140600000000 000000000017 140600000000
SCT3 031237 000012 777 0 140600000000 000000000037 140600000000
SCT3 031237 000012 0 0 140600000000 000000000077 140600000000
SCT4 031237 000012 0 0 140600000000 000000000077 140600000000
BYT7A 031237 000012 014 0 140600000000 000000000077 140600000000
IT1 031237 0 014 0 140600000000 000000000077 140600000000
AT3 031237 0 014 0 0 000000000077 140600000000
AT6 031237 0 014 0 0 000000000077 140600000000
FT0 031237 0 014 0 777777777777 000000000077 140600000000
FT1A 031237 0 014 0 777777777777 000000000077 777777777777
FT9 031240 0 014 0 777777777777 000000000077 777777777777
ET0 031240 0 764 0 777777777777 000000000077 777777777777
SCT0 031240 0 764 0 777777777777 000000000077 777777777777
SCT3 031240 0 765 0 377777777777 000000000077 777777777777
SCT3 031240 0 766 0 177777777777 000000000077 777777777777
SCT3 031240 0 767 0 077777777777 000000000077 777777777777
SCT3 031240 0 0 0 037777777777 000000000077 777777777777
SCT3 031240 0 771 0 017777777777 000000000077 777777777777
SCT3 031240 0 772 0 007777777777 000000000077 777777777777
SCT3 031240 0 773 0 003777777777 000000000077 777777777777
SCT3 031240 0 774 0 001777777777 000000000077 777777777777
SCT3 031240 0 775 0 000777777777 000000000077 777777777777
SCT3 031240 0 776 0 000377777777 000000000077 777777777777
SCT3 031240 0 777 0 000177777777 000000000077 777777777777
SCT3 031240 0 0 0 000077777777 000000000077 777777777777
SCT4 031240 0 0 0 000077777777 000000000077 777777777777
LBT1 031240 0 0 0 000000000077 000000000077 777777777777
ST0 031240 0 0 0 000000000077 000000000077 777777777777
ST1 031240 0 0 0 000000000077 000000000077 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 18
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0280
ST2 031240 0 0 0 000000000077 000000000077 777777777777
ST9 031240 0 0 0 000000000077 000000000077 777777777777
*031251 LDB 6,000007
INITIAL
C(AC)=100600 000000
C(E)=140600 000000 C(C(E))=000000 777777
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031251 031251 0 0 135300000007 0 000000777777
IT1 031251 0 0 0 135300000007 0 000000777777
AT3 031251 0 0 0 000000000007 0 135300000007
AT6 031251 000007 0 0 000000000007 0 135300000007
FT0 031251 000007 0 0 140600000000 0 135300000007
FT1A 031251 000007 0 0 140600000000 0 140600000000
FT9 031251 000007 0 0 140600000000 0 140600000000
ET0 031251 000007 0 0 140600000000 0 140600000000
BYT6 031251 000007 0 0 140600000000 0 140600000000
BYT7 031251 000007 772 0 140600000000 0 140600000000
SCT0 031251 000007 772 0 140600000000 0 140600000000
SCT3 031251 000007 773 0 140600000000 000000000001 140600000000
SCT3 031251 000007 774 0 140600000000 000000000003 140600000000
SCT3 031251 000007 775 0 140600000000 000000000007 140600000000
SCT3 031251 000007 776 0 140600000000 000000000017 140600000000
SCT3 031251 000007 777 0 140600000000 000000000037 140600000000
SCT3 031251 000007 0 0 140600000000 000000000077 140600000000
SCT4 031251 000007 0 0 140600000000 000000000077 140600000000
BYT7A 031251 000007 014 0 140600000000 000000000077 140600000000
IT1 031251 0 014 0 140600000000 000000000077 140600000000
AT3 031251 0 014 0 0 000000000077 140600000000
AT6 031251 0 014 0 0 000000000077 140600000000
FT0 031251 0 014 0 000000777777 000000000077 140600000000
FT1A 031251 0 014 0 000000777777 000000000077 000000777777
FT9 031252 0 014 0 000000777777 000000000077 000000777777
ET0 031252 0 764 0 000000777777 000000000077 000000777777
SCT0 031252 0 764 0 000000777777 000000000077 000000777777
SCT3 031252 0 765 0 000000377777 000000000077 000000777777
SCT3 031252 0 766 0 000000177777 000000000077 000000777777
SCT3 031252 0 767 0 000000077777 000000000077 000000777777
SCT3 031252 0 0 0 000000037777 000000000077 000000777777
SCT3 031252 0 771 0 000000017777 000000000077 000000777777
SCT3 031252 0 772 0 000000007777 000000000077 000000777777
SCT3 031252 0 773 0 000000003777 000000000077 000000777777
SCT3 031252 0 774 0 000000001777 000000000077 000000777777
SCT3 031252 0 775 0 000000000777 000000000077 000000777777
SCT3 031252 0 776 0 000000000377 000000000077 000000777777
SCT3 031252 0 777 0 000000000177 000000000077 000000777777
SCT3 031252 0 0 0 000000000077 000000000077 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 19
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0281
SCT4 031252 0 0 0 000000000077 000000000077 000000777777
LBT1 031252 0 0 0 000000000077 000000000077 000000777777
ST0 031252 0 0 0 000000000077 000000000077 000000777777
ST1 031252 0 0 0 000000000077 000000000077 000000777777
ST2 031252 0 0 0 000000000077 000000000077 000000777777
ST9 031252 0 0 0 000000000077 000000000077 000000777777
*031264 LDB 5,000006
INITIAL
C(AC)=000000 777777
C(E)=004000 000000 C(C(E))=777777 777777
FINAL
C(AC)=037777 777777
C(E)=004000 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031264 031264 0 0 135240000006 0 777777777777
IT1 031264 0 0 0 135240000006 0 777777777777
AT3 031264 0 0 0 000000000006 0 135240000006
AT6 031264 000006 0 0 000000000006 0 135240000006
FT0 031264 000006 0 0 004000000000 0 135240000006
FT1A 031264 000006 0 0 004000000000 0 004000000000
FT9 031264 000006 0 0 004000000000 0 004000000000
ET0 031264 000006 0 0 004000000000 0 004000000000
BYT6 031264 000006 0 0 004000000000 0 004000000000
BYT7 031264 000006 0 0 004000000000 0 004000000000
SCT0 031264 000006 0 0 004000000000 0 004000000000
SCT3 031264 000006 741 0 004000000000 000000000001 004000000000
SCT3 031264 000006 742 0 004000000000 000000000003 004000000000
SCT3 031264 000006 743 0 004000000000 000000000007 004000000000
SCT3 031264 000006 744 0 004000000000 000000000017 004000000000
SCT3 031264 000006 745 0 004000000000 000000000037 004000000000
SCT3 031264 000006 746 0 004000000000 000000000077 004000000000
SCT3 031264 000006 747 0 004000000000 000000000177 004000000000
SCT3 031264 000006 0 0 004000000000 000000000377 004000000000
SCT3 031264 000006 751 0 004000000000 000000000777 004000000000
SCT3 031264 000006 752 0 004000000000 000000001777 004000000000
SCT3 031264 000006 753 0 004000000000 000000003777 004000000000
SCT3 031264 000006 754 0 004000000000 000000007777 004000000000
SCT3 031264 000006 755 0 004000000000 000000017777 004000000000
SCT3 031264 000006 756 0 004000000000 000000037777 004000000000
SCT3 031264 000006 757 0 004000000000 000000077777 004000000000
SCT3 031264 000006 0 0 004000000000 000000177777 004000000000
SCT3 031264 000006 761 0 004000000000 000000377777 004000000000
SCT3 031264 000006 762 0 004000000000 000000777777 004000000000
SCT3 031264 000006 763 0 004000000000 000001777777 004000000000
SCT3 031264 000006 764 0 004000000000 000003777777 004000000000
SCT3 031264 000006 765 0 004000000000 000007777777 004000000000
SCT3 031264 000006 766 0 004000000000 000017777777 004000000000
SCT3 031264 000006 767 0 004000000000 000037777777 004000000000
SCT3 031264 000006 0 0 004000000000 000077777777 004000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 20
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0282
SCT3 031264 000006 771 0 004000000000 000177777777 004000000000
SCT3 031264 000006 772 0 004000000000 000377777777 004000000000
SCT3 031264 000006 773 0 004000000000 000777777777 004000000000
SCT3 031264 000006 774 0 004000000000 001777777777 004000000000
SCT3 031264 000006 775 0 004000000000 003777777777 004000000000
SCT3 031264 000006 776 0 004000000000 007777777777 004000000000
SCT3 031264 000006 777 0 004000000000 017777777777 004000000000
SCT3 031264 000006 0 0 004000000000 037777777777 004000000000
SCT4 031264 000006 0 0 004000000000 037777777777 004000000000
BYT7A 031264 000006 0 0 004000000000 037777777777 004000000000
IT1 031264 0 0 0 004000000000 037777777777 004000000000
AT3 031264 0 0 0 0 037777777777 004000000000
AT6 031264 0 0 0 0 037777777777 004000000000
FT0 031264 0 0 0 777777777777 037777777777 004000000000
FT1A 031264 0 0 0 777777777777 037777777777 777777777777
FT9 031265 0 0 0 777777777777 037777777777 777777777777
ET0 031265 0 0 0 777777777777 037777777777 777777777777
SCT0 031265 0 0 0 777777777777 037777777777 777777777777
SCT4 031265 0 0 0 777777777777 037777777777 777777777777
LBT1 031265 0 0 0 037777777777 037777777777 777777777777
ST0 031265 0 0 0 037777777777 037777777777 777777777777
ST1 031265 0 0 0 037777777777 037777777777 777777777777
ST2 031265 0 0 0 037777777777 037777777777 777777777777
ST9 031265 0 0 0 037777777777 037777777777 777777777777
*031273 LDB 5,000006
INITIAL
C(AC)=037777 777777
C(E)=002000 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 177777
C(E)=002000 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031273 031273 0 0 135240000006 0 777777777777
IT1 031273 0 0 0 135240000006 0 777777777777
AT3 031273 0 0 0 000000000006 0 135240000006
AT6 031273 000006 0 0 000000000006 0 135240000006
FT0 031273 000006 0 0 002000000000 0 135240000006
FT1A 031273 000006 0 0 002000000000 0 002000000000
FT9 031273 000006 0 0 002000000000 0 002000000000
ET0 031273 000006 0 0 002000000000 0 002000000000
BYT6 031273 000006 0 0 002000000000 0 002000000000
BYT7 031273 000006 0 0 002000000000 0 002000000000
SCT0 031273 000006 0 0 002000000000 0 002000000000
SCT3 031273 000006 761 0 002000000000 000000000001 002000000000
SCT3 031273 000006 762 0 002000000000 000000000003 002000000000
SCT3 031273 000006 763 0 002000000000 000000000007 002000000000
SCT3 031273 000006 764 0 002000000000 000000000017 002000000000
SCT3 031273 000006 765 0 002000000000 000000000037 002000000000
SCT3 031273 000006 766 0 002000000000 000000000077 002000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 21
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0283
SCT3 031273 000006 767 0 002000000000 000000000177 002000000000
SCT3 031273 000006 0 0 002000000000 000000000377 002000000000
SCT3 031273 000006 771 0 002000000000 000000000777 002000000000
SCT3 031273 000006 772 0 002000000000 000000001777 002000000000
SCT3 031273 000006 773 0 002000000000 000000003777 002000000000
SCT3 031273 000006 774 0 002000000000 000000007777 002000000000
SCT3 031273 000006 775 0 002000000000 000000017777 002000000000
SCT3 031273 000006 776 0 002000000000 000000037777 002000000000
SCT3 031273 000006 777 0 002000000000 000000077777 002000000000
SCT3 031273 000006 0 0 002000000000 000000177777 002000000000
SCT4 031273 000006 0 0 002000000000 000000177777 002000000000
BYT7A 031273 000006 0 0 002000000000 000000177777 002000000000
IT1 031273 0 0 0 002000000000 000000177777 002000000000
AT3 031273 0 0 0 0 000000177777 002000000000
AT6 031273 0 0 0 0 000000177777 002000000000
FT0 031273 0 0 0 777777777777 000000177777 002000000000
FT1A 031273 0 0 0 777777777777 000000177777 777777777777
FT9 031274 0 0 0 777777777777 000000177777 777777777777
ET0 031274 0 0 0 777777777777 000000177777 777777777777
SCT0 031274 0 0 0 777777777777 000000177777 777777777777
SCT4 031274 0 0 0 777777777777 000000177777 777777777777
LBT1 031274 0 0 0 000000177777 000000177777 777777777777
ST0 031274 0 0 0 000000177777 000000177777 777777777777
ST1 031274 0 0 0 000000177777 000000177777 777777777777
ST2 031274 0 0 0 000000177777 000000177777 777777777777
ST9 031274 0 0 0 000000177777 000000177777 777777777777
*031302 LDB 5,000006
INITIAL
C(AC)=000000 177777
C(E)=001000 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000377
C(E)=001000 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031302 031302 0 0 135240000006 0 777777777777
IT1 031302 0 0 0 135240000006 0 777777777777
AT3 031302 0 0 0 000000000006 0 135240000006
AT6 031302 000006 0 0 000000000006 0 135240000006
FT0 031302 000006 0 0 001000000000 0 135240000006
FT1A 031302 000006 0 0 001000000000 0 001000000000
FT9 031302 000006 0 0 001000000000 0 001000000000
ET0 031302 000006 0 0 001000000000 0 001000000000
BYT6 031302 000006 0 0 001000000000 0 001000000000
BYT7 031302 000006 0 0 001000000000 0 001000000000
SCT0 031302 000006 0 0 001000000000 0 001000000000
SCT3 031302 000006 771 0 001000000000 000000000001 001000000000
SCT3 031302 000006 772 0 001000000000 000000000003 001000000000
SCT3 031302 000006 773 0 001000000000 000000000007 001000000000
SCT3 031302 000006 774 0 001000000000 000000000017 001000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 22
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0284
SCT3 031302 000006 775 0 001000000000 000000000037 001000000000
SCT3 031302 000006 776 0 001000000000 000000000077 001000000000
SCT3 031302 000006 777 0 001000000000 000000000177 001000000000
SCT3 031302 000006 0 0 001000000000 000000000377 001000000000
SCT4 031302 000006 0 0 001000000000 000000000377 001000000000
BYT7A 031302 000006 0 0 001000000000 000000000377 001000000000
IT1 031302 0 0 0 001000000000 000000000377 001000000000
AT3 031302 0 0 0 0 000000000377 001000000000
AT6 031302 0 0 0 0 000000000377 001000000000
FT0 031302 0 0 0 777777777777 000000000377 001000000000
FT1A 031302 0 0 0 777777777777 000000000377 777777777777
FT9 031303 0 0 0 777777777777 000000000377 777777777777
ET0 031303 0 0 0 777777777777 000000000377 777777777777
SCT0 031303 0 0 0 777777777777 000000000377 777777777777
SCT4 031303 0 0 0 777777777777 000000000377 777777777777
LBT1 031303 0 0 0 000000000377 000000000377 777777777777
ST0 031303 0 0 0 000000000377 000000000377 777777777777
ST1 031303 0 0 0 000000000377 000000000377 777777777777
ST2 031303 0 0 0 000000000377 000000000377 777777777777
ST9 031303 0 0 0 000000000377 000000000377 777777777777
*031311 LDB 5,000006
INITIAL
C(AC)=000000 000377
C(E)=000400 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000017
C(E)=000400 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031311 031311 0 0 135240000006 0 777777777777
IT1 031311 0 0 0 135240000006 0 777777777777
AT3 031311 0 0 0 000000000006 0 135240000006
AT6 031311 000006 0 0 000000000006 0 135240000006
FT0 031311 000006 0 0 000400000000 0 135240000006
FT1A 031311 000006 0 0 000400000000 0 000400000000
FT9 031311 000006 0 0 000400000000 0 000400000000
ET0 031311 000006 0 0 000400000000 0 000400000000
BYT6 031311 000006 0 0 000400000000 0 000400000000
BYT7 031311 000006 774 0 000400000000 0 000400000000
SCT0 031311 000006 774 0 000400000000 0 000400000000
SCT3 031311 000006 775 0 000400000000 000000000001 000400000000
SCT3 031311 000006 776 0 000400000000 000000000003 000400000000
SCT3 031311 000006 777 0 000400000000 000000000007 000400000000
SCT3 031311 000006 0 0 000400000000 000000000017 000400000000
SCT4 031311 000006 0 0 000400000000 000000000017 000400000000
BYT7A 031311 000006 0 0 000400000000 000000000017 000400000000
IT1 031311 0 0 0 000400000000 000000000017 000400000000
AT3 031311 0 0 0 0 000000000017 000400000000
AT6 031311 0 0 0 0 000000000017 000400000000
FT0 031311 0 0 0 777777777777 000000000017 000400000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 23
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0285
FT1A 031311 0 0 0 777777777777 000000000017 777777777777
FT9 031312 0 0 0 777777777777 000000000017 777777777777
ET0 031312 0 0 0 777777777777 000000000017 777777777777
SCT0 031312 0 0 0 777777777777 000000000017 777777777777
SCT4 031312 0 0 0 777777777777 000000000017 777777777777
LBT1 031312 0 0 0 000000000017 000000000017 777777777777
ST0 031312 0 0 0 000000000017 000000000017 777777777777
ST1 031312 0 0 0 000000000017 000000000017 777777777777
ST2 031312 0 0 0 000000000017 000000000017 777777777777
ST9 031312 0 0 0 000000000017 000000000017 777777777777
*031320 LDB 5,000006
INITIAL
C(AC)=000000 000017
C(E)=000200 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000003
C(E)=000200 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031320 031320 0 0 135240000006 0 777777777777
IT1 031320 0 0 0 135240000006 0 777777777777
AT3 031320 0 0 0 000000000006 0 135240000006
AT6 031320 000006 0 0 000000000006 0 135240000006
FT0 031320 000006 0 0 000200000000 0 135240000006
FT1A 031320 000006 0 0 000200000000 0 000200000000
FT9 031320 000006 0 0 000200000000 0 000200000000
ET0 031320 000006 0 0 000200000000 0 000200000000
BYT6 031320 000006 0 0 000200000000 0 000200000000
BYT7 031320 000006 776 0 000200000000 0 000200000000
SCT0 031320 000006 776 0 000200000000 0 000200000000
SCT3 031320 000006 777 0 000200000000 000000000001 000200000000
SCT3 031320 000006 0 0 000200000000 000000000003 000200000000
SCT4 031320 000006 0 0 000200000000 000000000003 000200000000
BYT7A 031320 000006 0 0 000200000000 000000000003 000200000000
IT1 031320 0 0 0 000200000000 000000000003 000200000000
AT3 031320 0 0 0 0 000000000003 000200000000
AT6 031320 0 0 0 0 000000000003 000200000000
FT0 031320 0 0 0 777777777777 000000000003 000200000000
FT1A 031320 0 0 0 777777777777 000000000003 777777777777
FT9 031321 0 0 0 777777777777 000000000003 777777777777
ET0 031321 0 0 0 777777777777 000000000003 777777777777
SCT0 031321 0 0 0 777777777777 000000000003 777777777777
SCT4 031321 0 0 0 777777777777 000000000003 777777777777
LBT1 031321 0 0 0 000000000003 000000000003 777777777777
ST0 031321 0 0 0 000000000003 000000000003 777777777777
ST1 031321 0 0 0 000000000003 000000000003 777777777777
ST2 031321 0 0 0 000000000003 000000000003 777777777777
ST9 031321 0 0 0 000000000003 000000000003 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 24
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0286
*031327 LDB 5,000006
INITIAL
C(AC)=000000 000003
C(E)=000100 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000001
C(E)=000100 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031327 031327 0 0 135240000006 0 777777777777
IT1 031327 0 0 0 135240000006 0 777777777777
AT3 031327 0 0 0 000000000006 0 135240000006
AT6 031327 000006 0 0 000000000006 0 135240000006
FT0 031327 000006 0 0 000100000000 0 135240000006
FT1A 031327 000006 0 0 000100000000 0 000100000000
FT9 031327 000006 0 0 000100000000 0 000100000000
ET0 031327 000006 0 0 000100000000 0 000100000000
BYT6 031327 000006 0 0 000100000000 0 000100000000
BYT7 031327 000006 777 0 000100000000 0 000100000000
SCT0 031327 000006 777 0 000100000000 0 000100000000
SCT3 031327 000006 0 0 000100000000 000000000001 000100000000
SCT4 031327 000006 0 0 000100000000 000000000001 000100000000
BYT7A 031327 000006 0 0 000100000000 000000000001 000100000000
IT1 031327 0 0 0 000100000000 000000000001 000100000000
AT3 031327 0 0 0 0 000000000001 000100000000
AT6 031327 0 0 0 0 000000000001 000100000000
FT0 031327 0 0 0 777777777777 000000000001 000100000000
FT1A 031327 0 0 0 777777777777 000000000001 777777777777
FT9 031330 0 0 0 777777777777 000000000001 777777777777
ET0 031330 0 0 0 777777777777 000000000001 777777777777
SCT0 031330 0 0 0 777777777777 000000000001 777777777777
SCT4 031330 0 0 0 777777777777 000000000001 777777777777
LBT1 031330 0 0 0 000000000001 000000000001 777777777777
ST0 031330 0 0 0 000000000001 000000000001 777777777777
ST1 031330 0 0 0 000000000001 000000000001 777777777777
ST2 031330 0 0 0 000000000001 000000000001 777777777777
ST9 031330 0 0 0 000000000001 000000000001 777777777777
*031342 LDB 14,000015
INITIAL
C(AC)=000000 000077
C(E)=061400 000000 C(C(E))=000000 007700
FINAL
C(AC)=000000 000077
C(E)=061400 000000 C(C(E))=000000 007700
TIME PC MA SC FE AR MQ BR
IT0 031342 031342 0 0 135600000015 0 000000007700
IT1 031342 0 0 0 135600000015 0 000000007700
AT3 031342 0 0 0 000000000015 0 135600000015
AT6 031342 000015 0 0 000000000015 0 135600000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 25
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0287
FT0 031342 000015 0 0 061400000000 0 135600000015
FT1A 031342 000015 0 0 061400000000 0 061400000000
FT9 031342 000015 0 0 061400000000 0 061400000000
ET0 031342 000015 0 0 061400000000 0 061400000000
BYT6 031342 000015 0 0 061400000000 0 061400000000
BYT7 031342 000015 764 0 061400000000 0 061400000000
SCT0 031342 000015 764 0 061400000000 0 061400000000
SCT3 031342 000015 765 0 061400000000 000000000001 061400000000
SCT3 031342 000015 766 0 061400000000 000000000003 061400000000
SCT3 031342 000015 767 0 061400000000 000000000007 061400000000
SCT3 031342 000015 0 0 061400000000 000000000017 061400000000
SCT3 031342 000015 771 0 061400000000 000000000037 061400000000
SCT3 031342 000015 772 0 061400000000 000000000077 061400000000
SCT3 031342 000015 773 0 061400000000 000000000177 061400000000
SCT3 031342 000015 774 0 061400000000 000000000377 061400000000
SCT3 031342 000015 775 0 061400000000 000000000777 061400000000
SCT3 031342 000015 776 0 061400000000 000000001777 061400000000
SCT3 031342 000015 777 0 061400000000 000000003777 061400000000
SCT3 031342 000015 0 0 061400000000 000000007777 061400000000
SCT4 031342 000015 0 0 061400000000 000000007777 061400000000
BYT7A 031342 000015 006 0 061400000000 000000007777 061400000000
IT1 031342 0 006 0 061400000000 000000007777 061400000000
AT3 031342 0 006 0 0 000000007777 061400000000
AT6 031342 0 006 0 0 000000007777 061400000000
FT0 031342 0 006 0 000000007700 000000007777 061400000000
FT1A 031342 0 006 0 000000007700 000000007777 000000007700
FT9 031343 0 006 0 000000007700 000000007777 000000007700
ET0 031343 0 772 0 000000007700 000000007777 000000007700
SCT0 031343 0 772 0 000000007700 000000007777 000000007700
SCT3 031343 0 773 0 000000003740 000000007777 000000007700
SCT3 031343 0 774 0 000000001760 000000007777 000000007700
SCT3 031343 0 775 0 000000000770 000000007777 000000007700
SCT3 031343 0 776 0 000000000374 000000007777 000000007700
SCT3 031343 0 777 0 000000000176 000000007777 000000007700
SCT3 031343 0 0 0 000000000077 000000007777 000000007700
SCT4 031343 0 0 0 000000000077 000000007777 000000007700
LBT1 031343 0 0 0 000000000077 000000007777 000000007700
ST0 031343 0 0 0 000000000077 000000007777 000000007700
ST1 031343 0 0 0 000000000077 000000007777 000000007700
ST2 031343 0 0 0 000000000077 000000007777 000000007700
ST9 031343 0 0 0 000000000077 000000007777 000000007700
*031355 LDB 13,000014
INITIAL
C(AC)=000000 000013
C(E)=060600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000077
C(E)=060600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 26
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0288
IT0 031355 031355 0 0 135540000014 0 777777777777
IT1 031355 0 0 0 135540000014 0 777777777777
AT3 031355 0 0 0 000000000014 0 135540000014
AT6 031355 000014 0 0 000000000014 0 135540000014
FT0 031355 000014 0 0 060600000000 0 135540000014
FT1A 031355 000014 0 0 060600000000 0 060600000000
FT9 031355 000014 0 0 060600000000 0 060600000000
ET0 031355 000014 0 0 060600000000 0 060600000000
BYT6 031355 000014 0 0 060600000000 0 060600000000
BYT7 031355 000014 772 0 060600000000 0 060600000000
SCT0 031355 000014 772 0 060600000000 0 060600000000
SCT3 031355 000014 773 0 060600000000 000000000001 060600000000
SCT3 031355 000014 774 0 060600000000 000000000003 060600000000
SCT3 031355 000014 775 0 060600000000 000000000007 060600000000
SCT3 031355 000014 776 0 060600000000 000000000017 060600000000
SCT3 031355 000014 777 0 060600000000 000000000037 060600000000
SCT3 031355 000014 0 0 060600000000 000000000077 060600000000
SCT4 031355 000014 0 0 060600000000 000000000077 060600000000
BYT7A 031355 000014 006 0 060600000000 000000000077 060600000000
IT1 031355 0 006 0 060600000000 000000000077 060600000000
AT3 031355 0 006 0 0 000000000077 060600000000
AT6 031355 0 006 0 0 000000000077 060600000000
FT0 031355 0 006 0 777777777777 000000000077 060600000000
FT1A 031355 0 006 0 777777777777 000000000077 777777777777
FT9 031356 0 006 0 777777777777 000000000077 777777777777
ET0 031356 0 772 0 777777777777 000000000077 777777777777
SCT0 031356 0 772 0 777777777777 000000000077 777777777777
SCT3 031356 0 773 0 377777777777 000000000077 777777777777
SCT3 031356 0 774 0 177777777777 000000000077 777777777777
SCT3 031356 0 775 0 077777777777 000000000077 777777777777
SCT3 031356 0 776 0 037777777777 000000000077 777777777777
SCT3 031356 0 777 0 017777777777 000000000077 777777777777
SCT3 031356 0 0 0 007777777777 000000000077 777777777777
SCT4 031356 0 0 0 007777777777 000000000077 777777777777
LBT1 031356 0 0 0 000000000077 000000000077 777777777777
ST0 031356 0 0 0 000000000077 000000000077 777777777777
ST1 031356 0 0 0 000000000077 000000000077 777777777777
ST2 031356 0 0 0 000000000077 000000000077 777777777777
ST9 031356 0 0 0 000000000077 000000000077 777777777777
*031367 LDB 10,000011
INITIAL
C(AC)=000000 000010
C(E)=140600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031367 031367 0 0 135400000011 0 777777777777
IT1 031367 0 0 0 135400000011 0 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 27
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0289
AT3 031367 0 0 0 000000000011 0 135400000011
AT6 031367 000011 0 0 000000000011 0 135400000011
FT0 031367 000011 0 0 140600000000 0 135400000011
FT1A 031367 000011 0 0 140600000000 0 140600000000
FT9 031367 000011 0 0 140600000000 0 140600000000
ET0 031367 000011 0 0 140600000000 0 140600000000
BYT6 031367 000011 0 0 140600000000 0 140600000000
BYT7 031367 000011 772 0 140600000000 0 140600000000
SCT0 031367 000011 772 0 140600000000 0 140600000000
SCT3 031367 000011 773 0 140600000000 000000000001 140600000000
SCT3 031367 000011 774 0 140600000000 000000000003 140600000000
SCT3 031367 000011 775 0 140600000000 000000000007 140600000000
SCT3 031367 000011 776 0 140600000000 000000000017 140600000000
SCT3 031367 000011 777 0 140600000000 000000000037 140600000000
SCT3 031367 000011 0 0 140600000000 000000000077 140600000000
SCT4 031367 000011 0 0 140600000000 000000000077 140600000000
BYT7A 031367 000011 014 0 140600000000 000000000077 140600000000
IT1 031367 0 014 0 140600000000 000000000077 140600000000
AT3 031367 0 014 0 0 000000000077 140600000000
AT6 031367 0 014 0 0 000000000077 140600000000
FT0 031367 0 014 0 777777777777 000000000077 140600000000
FT1A 031367 0 014 0 777777777777 000000000077 777777777777
FT9 031370 0 014 0 777777777777 000000000077 777777777777
ET0 031370 0 764 0 777777777777 000000000077 777777777777
SCT0 031370 0 764 0 777777777777 000000000077 777777777777
SCT3 031370 0 765 0 377777777777 000000000077 777777777777
SCT3 031370 0 766 0 177777777777 000000000077 777777777777
SCT3 031370 0 767 0 077777777777 000000000077 777777777777
SCT3 031370 0 0 0 037777777777 000000000077 777777777777
SCT3 031370 0 771 0 017777777777 000000000077 777777777777
SCT3 031370 0 772 0 007777777777 000000000077 777777777777
SCT3 031370 0 773 0 003777777777 000000000077 777777777777
SCT3 031370 0 774 0 001777777777 000000000077 777777777777
SCT3 031370 0 775 0 000777777777 000000000077 777777777777
SCT3 031370 0 776 0 000377777777 000000000077 777777777777
SCT3 031370 0 777 0 000177777777 000000000077 777777777777
SCT3 031370 0 0 0 000077777777 000000000077 777777777777
SCT4 031370 0 0 0 000077777777 000000000077 777777777777
LBT1 031370 0 0 0 000000000077 000000000077 777777777777
ST0 031370 0 0 0 000000000077 000000000077 777777777777
ST1 031370 0 0 0 000000000077 000000000077 777777777777
ST2 031370 0 0 0 000000000077 000000000077 777777777777
ST9 031370 0 0 0 000000000077 000000000077 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 28
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0290
*031401 LDB 7,000010
INITIAL
C(AC)=000000 000007
C(E)=140600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031401 031401 0 0 135340000010 0 777777777777
IT1 031401 0 0 0 135340000010 0 777777777777
AT3 031401 0 0 0 000000000010 0 135340000010
AT6 031401 000010 0 0 000000000010 0 135340000010
FT0 031401 000010 0 0 140600000000 0 135340000010
FT1A 031401 000010 0 0 140600000000 0 140600000000
FT9 031401 000010 0 0 140600000000 0 140600000000
ET0 031401 000010 0 0 140600000000 0 140600000000
BYT6 031401 000010 0 0 140600000000 0 140600000000
BYT7 031401 000010 772 0 140600000000 0 140600000000
SCT0 031401 000010 772 0 140600000000 0 140600000000
SCT3 031401 000010 773 0 140600000000 000000000001 140600000000
SCT3 031401 000010 774 0 140600000000 000000000003 140600000000
SCT3 031401 000010 775 0 140600000000 000000000007 140600000000
SCT3 031401 000010 776 0 140600000000 000000000017 140600000000
SCT3 031401 000010 777 0 140600000000 000000000037 140600000000
SCT3 031401 000010 0 0 140600000000 000000000077 140600000000
SCT4 031401 000010 0 0 140600000000 000000000077 140600000000
BYT7A 031401 000010 014 0 140600000000 000000000077 140600000000
IT1 031401 0 014 0 140600000000 000000000077 140600000000
AT3 031401 0 014 0 0 000000000077 140600000000
AT6 031401 0 014 0 0 000000000077 140600000000
FT0 031401 0 014 0 777777777777 000000000077 140600000000
FT1A 031401 0 014 0 777777777777 000000000077 777777777777
FT9 031402 0 014 0 777777777777 000000000077 777777777777
ET0 031402 0 764 0 777777777777 000000000077 777777777777
SCT0 031402 0 764 0 777777777777 000000000077 777777777777
SCT3 031402 0 765 0 377777777777 000000000077 777777777777
SCT3 031402 0 766 0 177777777777 000000000077 777777777777
SCT3 031402 0 767 0 077777777777 000000000077 777777777777
SCT3 031402 0 0 0 037777777777 000000000077 777777777777
SCT3 031402 0 771 0 017777777777 000000000077 777777777777
SCT3 031402 0 772 0 007777777777 000000000077 777777777777
SCT3 031402 0 773 0 003777777777 000000000077 777777777777
SCT3 031402 0 774 0 001777777777 000000000077 777777777777
SCT3 031402 0 775 0 000777777777 000000000077 777777777777
SCT3 031402 0 776 0 000377777777 000000000077 777777777777
SCT3 031402 0 777 0 000177777777 000000000077 777777777777
SCT3 031402 0 0 0 000077777777 000000000077 777777777777
SCT4 031402 0 0 0 000077777777 000000000077 777777777777
LBT1 031402 0 0 0 000000000077 000000000077 777777777777
ST0 031402 0 0 0 000000000077 000000000077 777777777777
ST1 031402 0 0 0 000000000077 000000000077 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 29
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0291
ST2 031402 0 0 0 000000000077 000000000077 777777777777
ST9 031402 0 0 0 000000000077 000000000077 777777777777
*031416 LDB 6,@000007
INITIAL
C(AC)=000100 000000
C(E)=000600 000000 C(C(E))=000600 000014
FINAL
C(AC)=000000 000044
C(E)=000600 000014 C(C(E))=000000 000044
TIME PC MA SC FE AR MQ BR
IT0 031416 031416 0 0 135320000007 0 000000000044
IT1 031416 0 0 0 135320000007 0 000000000044
AT3 031416 0 0 0 000000000007 0 135320000007
AT4 031416 000007 0 0 000600000000 0 135320000007
IT1 031416 0 0 0 000600000000 0 135320000007
AT3 031416 0 0 0 0 0 000600000000
AT6 031416 0 0 0 0 0 000600000000
FT0 031416 0 0 0 000600000014 0 000600000000
FT1A 031416 0 0 0 000600000014 0 000600000014
FT9 031416 0 0 0 000600000014 0 000600000014
ET0 031416 0 0 0 000600000014 0 000600000014
BYT6 031416 0 0 0 000600000014 0 000600000014
BYT7 031416 0 772 0 000600000014 0 000600000014
SCT0 031416 0 772 0 000600000014 0 000600000014
SCT3 031416 0 773 0 000600000014 000000000001 000600000014
SCT3 031416 0 774 0 000600000014 000000000003 000600000014
SCT3 031416 0 775 0 000600000014 000000000007 000600000014
SCT3 031416 0 776 0 000600000014 000000000017 000600000014
SCT3 031416 0 777 0 000600000014 000000000037 000600000014
SCT3 031416 0 0 0 000600000014 000000000077 000600000014
SCT4 031416 0 0 0 000600000014 000000000077 000600000014
BYT7A 031416 0 0 0 000600000014 000000000077 000600000014
IT1 031416 0 0 0 000600000014 000000000077 000600000014
AT3 031416 0 0 0 000000000014 000000000077 000600000014
AT6 031416 000014 0 0 000000000014 000000000077 000600000014
FT0 031416 000014 0 0 000000000044 000000000077 000600000014
FT1A 031416 000014 0 0 000000000044 000000000077 000000000044
FT9 031417 000014 0 0 000000000044 000000000077 000000000044
ET0 031417 000014 0 0 000000000044 000000000077 000000000044
SCT0 031417 000014 0 0 000000000044 000000000077 000000000044
SCT4 031417 000014 0 0 000000000044 000000000077 000000000044
LBT1 031417 000014 0 0 000000000044 000000000077 000000000044
ST0 031417 000014 0 0 000000000044 000000000077 000000000044
ST1 031417 000014 0 0 000000000044 000000000077 000000000044
ST2 031417 000014 0 0 000000000044 000000000077 000000000044
ST9 031417 000014 0 0 000000000044 000000000077 000000000044
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 30
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0292
*031432 LDB 7,000010(7)
INITIAL
C(AC)=000000 000004
C(E)=000000 000010 C(C(E))=000000 000010
FINAL
C(AC)=000000 002222
C(E)=061400 000000 C(C(E))=000000 222222
TIME PC MA SC FE AR MQ BR
IT0 031432 031432 0 0 135347000010 0 000000222222
IT1 031432 0 0 0 135347000010 0 000000222222
AT1 031432 0 0 0 0 0 135347000010
AT2 031432 0 0 0 000000000004 0 135347000010
AT3 031432 0 0 0 000000000014 0 000000000014
AT6 031432 000014 0 0 000000000014 0 000000000014
FT0 031432 000014 0 0 061400000000 0 000000000014
FT1A 031432 000014 0 0 061400000000 0 061400000000
FT9 031432 000014 0 0 061400000000 0 061400000000
ET0 031432 000014 0 0 061400000000 0 061400000000
BYT6 031432 000014 0 0 061400000000 0 061400000000
BYT7 031432 000014 764 0 061400000000 0 061400000000
SCT0 031432 000014 764 0 061400000000 0 061400000000
SCT3 031432 000014 765 0 061400000000 000000000001 061400000000
SCT3 031432 000014 766 0 061400000000 000000000003 061400000000
SCT3 031432 000014 767 0 061400000000 000000000007 061400000000
SCT3 031432 000014 0 0 061400000000 000000000017 061400000000
SCT3 031432 000014 771 0 061400000000 000000000037 061400000000
SCT3 031432 000014 772 0 061400000000 000000000077 061400000000
SCT3 031432 000014 773 0 061400000000 000000000177 061400000000
SCT3 031432 000014 774 0 061400000000 000000000377 061400000000
SCT3 031432 000014 775 0 061400000000 000000000777 061400000000
SCT3 031432 000014 776 0 061400000000 000000001777 061400000000
SCT3 031432 000014 777 0 061400000000 000000003777 061400000000
SCT3 031432 000014 0 0 061400000000 000000007777 061400000000
SCT4 031432 000014 0 0 061400000000 000000007777 061400000000
BYT7A 031432 000014 006 0 061400000000 000000007777 061400000000
IT1 031432 0 006 0 061400000000 000000007777 061400000000
AT3 031432 0 006 0 0 000000007777 061400000000
AT6 031432 0 006 0 0 000000007777 061400000000
FT0 031432 0 006 0 000000222222 000000007777 061400000000
FT1A 031432 0 006 0 000000222222 000000007777 000000222222
FT9 031433 0 006 0 000000222222 000000007777 000000222222
ET0 031433 0 772 0 000000222222 000000007777 000000222222
SCT0 031433 0 772 0 000000222222 000000007777 000000222222
SCT3 031433 0 773 0 000000111111 000000007777 000000222222
SCT3 031433 0 774 0 000000044444 000000007777 000000222222
SCT3 031433 0 775 0 000000022222 000000007777 000000222222
SCT3 031433 0 776 0 000000011111 000000007777 000000222222
SCT3 031433 0 777 0 000000004444 000000007777 000000222222
SCT3 031433 0 0 0 000000002222 000000007777 000000222222
SCT4 031433 0 0 0 000000002222 000000007777 000000222222
LBT1 031433 0 0 0 000000002222 000000007777 000000222222
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 31
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0293
ST0 031433 0 0 0 000000002222 000000007777 000000222222
ST1 031433 0 0 0 000000002222 000000007777 000000222222
ST2 031433 0 0 0 000000002222 000000007777 000000222222
ST9 031433 0 0 0 000000002222 000000007777 000000222222
*031447 LDB 10,000011
INITIAL
C(AC)=000000 000010
C(E)=000607 000005 C(C(E))=000000 000055
FINAL
C(AC)=000000 000077
C(E)=000607 000005 C(C(E))=000000 000055
TIME PC MA SC FE AR MQ BR
IT0 031447 031447 0 0 135400000011 0 000000000077
IT1 031447 0 0 0 135400000011 0 000000000077
AT3 031447 0 0 0 000000000011 0 135400000011
AT6 031447 000011 0 0 000000000011 0 135400000011
FT0 031447 000011 0 0 000607000005 0 135400000011
FT1A 031447 000011 0 0 000607000005 0 000607000005
FT9 031447 000011 0 0 000607000005 0 000607000005
ET0 031447 000011 0 0 000607000005 0 000607000005
BYT6 031447 000011 0 0 000607000005 0 000607000005
BYT7 031447 000011 772 0 000607000005 0 000607000005
SCT0 031447 000011 772 0 000607000005 0 000607000005
SCT3 031447 000011 773 0 000607000005 000000000001 000607000005
SCT3 031447 000011 774 0 000607000005 000000000003 000607000005
SCT3 031447 000011 775 0 000607000005 000000000007 000607000005
SCT3 031447 000011 776 0 000607000005 000000000017 000607000005
SCT3 031447 000011 777 0 000607000005 000000000037 000607000005
SCT3 031447 000011 0 0 000607000005 000000000077 000607000005
SCT4 031447 000011 0 0 000607000005 000000000077 000607000005
BYT7A 031447 000011 0 0 000607000005 000000000077 000607000005
IT1 031447 0 0 0 000607000005 000000000077 000607000005
AT1 031447 0 0 0 0 000000000077 000607000005
AT2 031447 0 0 0 000000000010 000000000077 000607000005
AT3 031447 0 0 0 000000000015 000000000077 000000000015
AT6 031447 000015 0 0 000000000015 000000000077 000000000015
FT0 031447 000015 0 0 000000000077 000000000077 000000000015
FT1A 031447 000015 0 0 000000000077 000000000077 000000000077
FT9 031450 000015 0 0 000000000077 000000000077 000000000077
ET0 031450 000015 0 0 000000000077 000000000077 000000000077
SCT0 031450 000015 0 0 000000000077 000000000077 000000000077
SCT4 031450 000015 0 0 000000000077 000000000077 000000000077
LBT1 031450 000015 0 0 000000000077 000000000077 000000000077
ST0 031450 000015 0 0 000000000077 000000000077 000000000077
ST1 031450 000015 0 0 000000000077 000000000077 000000000077
ST2 031450 000015 0 0 000000000077 000000000077 000000000077
ST9 031450 000015 0 0 000000000077 000000000077 000000000077
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 32
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0294
*031464 LDB 10,000011
INITIAL
C(AC)=000000 000000
C(E)=000607 000005 C(C(E))=000000 000000
FINAL
C(AC)=000000 000077
C(E)=000607 000005 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031464 031464 0 0 135400000011 0 000000000077
IT1 031464 0 0 0 135400000011 0 000000000077
AT3 031464 0 0 0 000000000011 0 135400000011
AT6 031464 000011 0 0 000000000011 0 135400000011
FT0 031464 000011 0 0 000607000005 0 135400000011
FT1A 031464 000011 0 0 000607000005 0 000607000005
FT9 031464 000011 0 0 000607000005 0 000607000005
ET0 031464 000011 0 0 000607000005 0 000607000005
BYT6 031464 000011 0 0 000607000005 0 000607000005
BYT7 031464 000011 772 0 000607000005 0 000607000005
SCT0 031464 000011 772 0 000607000005 0 000607000005
SCT3 031464 000011 773 0 000607000005 000000000001 000607000005
SCT3 031464 000011 774 0 000607000005 000000000003 000607000005
SCT3 031464 000011 775 0 000607000005 000000000007 000607000005
SCT3 031464 000011 776 0 000607000005 000000000017 000607000005
SCT3 031464 000011 777 0 000607000005 000000000037 000607000005
SCT3 031464 000011 0 0 000607000005 000000000077 000607000005
SCT4 031464 000011 0 0 000607000005 000000000077 000607000005
BYT7A 031464 000011 0 0 000607000005 000000000077 000607000005
IT1 031464 0 0 0 000607000005 000000000077 000607000005
AT1 031464 0 0 0 0 000000000077 000607000005
AT2 031464 0 0 0 000000000010 000000000077 000607000005
AT3 031464 0 0 0 000000000015 000000000077 000000000015
AT6 031464 000015 0 0 000000000015 000000000077 000000000015
FT0 031464 000015 0 0 000000000077 000000000077 000000000015
FT1A 031464 000015 0 0 000000000077 000000000077 000000000077
FT9 031465 000015 0 0 000000000077 000000000077 000000000077
ET0 031465 000015 0 0 000000000077 000000000077 000000000077
SCT0 031465 000015 0 0 000000000077 000000000077 000000000077
SCT4 031465 000015 0 0 000000000077 000000000077 000000000077
LBT1 031465 000015 0 0 000000000077 000000000077 000000000077
ST0 031465 000015 0 0 000000000077 000000000077 000000000077
ST1 031465 000015 0 0 000000000077 000000000077 000000000077
ST2 031465 000015 0 0 000000000077 000000000077 000000000077
ST9 031465 000015 0 0 000000000077 000000000077 000000000077
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 33
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0295
*031502 LDB 10,000011
INITIAL
C(AC)=000000 000077
C(E)=000607 000005 C(C(E))=000000 000000
FINAL
C(AC)=000000 000015
C(E)=000607 000005 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031502 031502 0 0 135400000011 0 000000000015
IT1 031502 0 0 0 135400000011 0 000000000015
AT3 031502 0 0 0 000000000011 0 135400000011
AT6 031502 000011 0 0 000000000011 0 135400000011
FT0 031502 000011 0 0 000607000005 0 135400000011
FT1A 031502 000011 0 0 000607000005 0 000607000005
FT9 031502 000011 0 0 000607000005 0 000607000005
ET0 031502 000011 0 0 000607000005 0 000607000005
BYT6 031502 000011 0 0 000607000005 0 000607000005
BYT7 031502 000011 772 0 000607000005 0 000607000005
SCT0 031502 000011 772 0 000607000005 0 000607000005
SCT3 031502 000011 773 0 000607000005 000000000001 000607000005
SCT3 031502 000011 774 0 000607000005 000000000003 000607000005
SCT3 031502 000011 775 0 000607000005 000000000007 000607000005
SCT3 031502 000011 776 0 000607000005 000000000017 000607000005
SCT3 031502 000011 777 0 000607000005 000000000037 000607000005
SCT3 031502 000011 0 0 000607000005 000000000077 000607000005
SCT4 031502 000011 0 0 000607000005 000000000077 000607000005
BYT7A 031502 000011 0 0 000607000005 000000000077 000607000005
IT1 031502 0 0 0 000607000005 000000000077 000607000005
AT1 031502 0 0 0 0 000000000077 000607000005
AT2 031502 0 0 0 000000000010 000000000077 000607000005
AT3 031502 0 0 0 000000000015 000000000077 000000000015
AT6 031502 000015 0 0 000000000015 000000000077 000000000015
FT0 031502 000015 0 0 000000000015 000000000077 000000000015
FT1A 031502 000015 0 0 000000000015 000000000077 000000000015
FT9 031503 000015 0 0 000000000015 000000000077 000000000015
ET0 031503 000015 0 0 000000000015 000000000077 000000000015
SCT0 031503 000015 0 0 000000000015 000000000077 000000000015
SCT4 031503 000015 0 0 000000000015 000000000077 000000000015
LBT1 031503 000015 0 0 000000000015 000000000077 000000000015
ST0 031503 000015 0 0 000000000015 000000000077 000000000015
ST1 031503 000015 0 0 000000000015 000000000077 000000000015
ST2 031503 000015 0 0 000000000015 000000000077 000000000015
ST9 031503 000015 0 0 000000000015 000000000077 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 34
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0296
*031520 LDB 10,000011
INITIAL
C(AC)=000000 000015
C(E)=000607 000005 C(C(E))=000000 000000
FINAL
C(AC)=000000 000015
C(E)=000607 000005 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031520 031520 0 0 135400000011 0 000000000015
IT1 031520 0 0 0 135400000011 0 000000000015
AT3 031520 0 0 0 000000000011 0 135400000011
AT6 031520 000011 0 0 000000000011 0 135400000011
FT0 031520 000011 0 0 000607000005 0 135400000011
FT1A 031520 000011 0 0 000607000005 0 000607000005
FT9 031520 000011 0 0 000607000005 0 000607000005
ET0 031520 000011 0 0 000607000005 0 000607000005
BYT6 031520 000011 0 0 000607000005 0 000607000005
BYT7 031520 000011 772 0 000607000005 0 000607000005
SCT0 031520 000011 772 0 000607000005 0 000607000005
SCT3 031520 000011 773 0 000607000005 000000000001 000607000005
SCT3 031520 000011 774 0 000607000005 000000000003 000607000005
SCT3 031520 000011 775 0 000607000005 000000000007 000607000005
SCT3 031520 000011 776 0 000607000005 000000000017 000607000005
SCT3 031520 000011 777 0 000607000005 000000000037 000607000005
SCT3 031520 000011 0 0 000607000005 000000000077 000607000005
SCT4 031520 000011 0 0 000607000005 000000000077 000607000005
BYT7A 031520 000011 0 0 000607000005 000000000077 000607000005
IT1 031520 0 0 0 000607000005 000000000077 000607000005
AT1 031520 0 0 0 0 000000000077 000607000005
AT2 031520 0 0 0 000000000010 000000000077 000607000005
AT3 031520 0 0 0 000000000015 000000000077 000000000015
AT6 031520 000015 0 0 000000000015 000000000077 000000000015
FT0 031520 000015 0 0 000000000015 000000000077 000000000015
FT1A 031520 000015 0 0 000000000015 000000000077 000000000015
FT9 031521 000015 0 0 000000000015 000000000077 000000000015
ET0 031521 000015 0 0 000000000015 000000000077 000000000015
SCT0 031521 000015 0 0 000000000015 000000000077 000000000015
SCT4 031521 000015 0 0 000000000015 000000000077 000000000015
LBT1 031521 000015 0 0 000000000015 000000000077 000000000015
ST0 031521 000015 0 0 000000000015 000000000077 000000000015
ST1 031521 000015 0 0 000000000015 000000000077 000000000015
ST2 031521 000015 0 0 000000000015 000000000077 000000000015
ST9 031521 000015 0 0 000000000015 000000000077 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 35
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0297
*031532 ILDB 5,000006
INITIAL
C(AC)=000000 000000
C(E)=160600 000000 C(C(E))=000000 000007
FINAL
C(AC)=000000 000000
C(E)=100600 000000 C(C(E))=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 031532 031532 0 0 134240000006 0 000000000007
IT1 031532 0 0 0 134240000006 0 000000000007
AT3 031532 0 0 0 000000000006 0 134240000006
AT6 031532 000006 0 0 000000000006 0 134240000006
FT0 031532 000006 0 0 160600000000 0 134240000006
FT1A 031532 000006 0 0 160600000000 0 160600000000
FT9 031532 000006 0 0 160600000000 0 160600000000
ET0 031532 000006 0 0 160600000000 0 160600000000
BYT1 031532 000006 016 0 160600000000 0 160600000000
BYT4 031532 000006 0 0 100600000000 0 160600000000
BYT7 031532 000006 772 0 100600000000 0 160600000000
SCT0 031532 000006 772 0 100600000000 0 160600000000
SCT3 031532 000006 773 0 100600000000 000000000001 160600000000
SCT3 031532 000006 774 0 100600000000 000000000003 160600000000
SCT3 031532 000006 775 0 100600000000 000000000007 160600000000
SCT3 031532 000006 776 0 100600000000 000000000017 160600000000
SCT3 031532 000006 777 0 100600000000 000000000037 160600000000
SCT3 031532 000006 0 0 100600000000 000000000077 160600000000
SCT4 031532 000006 0 0 100600000000 000000000077 160600000000
BYT7A 031532 000006 0 0 100600000000 000000000077 160600000000
IT1 031532 0 0 0 100600000000 000000000077 160600000000
AT3 031532 0 0 0 0 000000000077 100600000000
AT6 031532 0 0 0 0 000000000077 100600000000
FT0 031532 0 0 0 000000000007 000000000077 100600000000
FT1A 031532 0 0 0 000000000007 000000000077 000000000007
FT9 031533 0 0 0 000000000007 000000000077 000000000007
ET0 031533 0 0 0 000000000007 000000000077 000000000007
SCT0 031533 0 0 0 000000000007 000000000077 000000000007
SCT3 031533 0 771 0 000000000003 000000000077 000000000007
SCT3 031533 0 772 0 000000000001 000000000077 000000000007
SCT3 031533 0 773 0 0 000000000077 000000000007
SCT3 031533 0 774 0 0 000000000077 000000000007
SCT3 031533 0 775 0 0 000000000077 000000000007
SCT3 031533 0 776 0 0 000000000077 000000000007
SCT3 031533 0 777 0 0 000000000077 000000000007
SCT3 031533 0 0 0 0 000000000077 000000000007
SCT4 031533 0 0 0 0 000000000077 000000000007
LBT1 031533 0 0 0 0 000000000077 000000000007
ST0 031533 0 0 0 0 000000000077 000000000007
ST1 031533 0 0 0 0 000000000077 000000000007
ST2 031533 0 0 0 0 000000000077 000000000007
ST9 031533 0 0 0 0 000000000077 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 36
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0298
*031545 ILDB 14,000015
INITIAL
C(AC)=000000 000033
C(E)=222200 000000 C(C(E))=000000 777777
FINAL
C(AC)=000000 777777
C(E)=002200 000000 C(C(E))=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 031545 031545 0 0 134600000015 0 000000777777
IT1 031545 0 0 0 134600000015 0 000000777777
AT3 031545 0 0 0 000000000015 0 134600000015
AT6 031545 000015 0 0 000000000015 0 134600000015
FT0 031545 000015 0 0 222200000000 0 134600000015
FT1A 031545 000015 0 0 222200000000 0 222200000000
FT9 031545 000015 0 0 222200000000 0 222200000000
ET0 031545 000015 0 0 222200000000 0 222200000000
BYT1 031545 000015 022 0 222200000000 0 222200000000
BYT4 031545 000015 0 0 002200000000 0 222200000000
BYT7 031545 000015 756 0 002200000000 0 222200000000
SCT0 031545 000015 756 0 002200000000 0 222200000000
SCT3 031545 000015 757 0 002200000000 000000000001 222200000000
SCT3 031545 000015 0 0 002200000000 000000000003 222200000000
SCT3 031545 000015 761 0 002200000000 000000000007 222200000000
SCT3 031545 000015 762 0 002200000000 000000000017 222200000000
SCT3 031545 000015 763 0 002200000000 000000000037 222200000000
SCT3 031545 000015 764 0 002200000000 000000000077 222200000000
SCT3 031545 000015 765 0 002200000000 000000000177 222200000000
SCT3 031545 000015 766 0 002200000000 000000000377 222200000000
SCT3 031545 000015 767 0 002200000000 000000000777 222200000000
SCT3 031545 000015 0 0 002200000000 000000001777 222200000000
SCT3 031545 000015 771 0 002200000000 000000003777 222200000000
SCT3 031545 000015 772 0 002200000000 000000007777 222200000000
SCT3 031545 000015 773 0 002200000000 000000017777 222200000000
SCT3 031545 000015 774 0 002200000000 000000037777 222200000000
SCT3 031545 000015 775 0 002200000000 000000077777 222200000000
SCT3 031545 000015 776 0 002200000000 000000177777 222200000000
SCT3 031545 000015 777 0 002200000000 000000377777 222200000000
SCT3 031545 000015 0 0 002200000000 000000777777 222200000000
SCT4 031545 000015 0 0 002200000000 000000777777 222200000000
BYT7A 031545 000015 0 0 002200000000 000000777777 222200000000
IT1 031545 0 0 0 002200000000 000000777777 222200000000
AT3 031545 0 0 0 0 000000777777 002200000000
AT6 031545 0 0 0 0 000000777777 002200000000
FT0 031545 0 0 0 000000777777 000000777777 002200000000
FT1A 031545 0 0 0 000000777777 000000777777 000000777777
FT9 031546 0 0 0 000000777777 000000777777 000000777777
ET0 031546 0 0 0 000000777777 000000777777 000000777777
SCT0 031546 0 0 0 000000777777 000000777777 000000777777
SCT4 031546 0 0 0 000000777777 000000777777 000000777777
LBT1 031546 0 0 0 000000777777 000000777777 000000777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 37
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0299
ST0 031546 0 0 0 000000777777 000000777777 000000777777
ST1 031546 0 0 0 000000777777 000000777777 000000777777
ST2 031546 0 0 0 000000777777 000000777777 000000777777
ST9 031546 0 0 0 000000777777 000000777777 000000777777
*031562 ILDB 13,000014
INITIAL
C(AC)=000000 000077
C(E)=220600 000000 C(C(E))=000000 770000
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=000000 770000
TIME PC MA SC FE AR MQ BR
IT0 031562 031562 0 0 134540000014 0 000000770000
IT1 031562 0 0 0 134540000014 0 000000770000
AT3 031562 0 0 0 000000000014 0 134540000014
AT6 031562 000014 0 0 000000000014 0 134540000014
FT0 031562 000014 0 0 220600000000 0 134540000014
FT1A 031562 000014 0 0 220600000000 0 220600000000
FT9 031562 000014 0 0 220600000000 0 220600000000
ET0 031562 000014 0 0 220600000000 0 220600000000
BYT1 031562 000014 022 0 220600000000 0 220600000000
BYT4 031562 000014 0 0 140600000000 0 220600000000
BYT7 031562 000014 772 0 140600000000 0 220600000000
SCT0 031562 000014 772 0 140600000000 0 220600000000
SCT3 031562 000014 773 0 140600000000 000000000001 220600000000
SCT3 031562 000014 774 0 140600000000 000000000003 220600000000
SCT3 031562 000014 775 0 140600000000 000000000007 220600000000
SCT3 031562 000014 776 0 140600000000 000000000017 220600000000
SCT3 031562 000014 777 0 140600000000 000000000037 220600000000
SCT3 031562 000014 0 0 140600000000 000000000077 220600000000
SCT4 031562 000014 0 0 140600000000 000000000077 220600000000
BYT7A 031562 000014 014 0 140600000000 000000000077 220600000000
IT1 031562 0 014 0 140600000000 000000000077 220600000000
AT3 031562 0 014 0 0 000000000077 140600000000
AT6 031562 0 014 0 0 000000000077 140600000000
FT0 031562 0 014 0 000000770000 000000000077 140600000000
FT1A 031562 0 014 0 000000770000 000000000077 000000770000
FT9 031563 0 014 0 000000770000 000000000077 000000770000
ET0 031563 0 764 0 000000770000 000000000077 000000770000
SCT0 031563 0 764 0 000000770000 000000000077 000000770000
SCT3 031563 0 765 0 000000374000 000000000077 000000770000
SCT3 031563 0 766 0 000000176000 000000000077 000000770000
SCT3 031563 0 767 0 000000077000 000000000077 000000770000
SCT3 031563 0 0 0 000000037400 000000000077 000000770000
SCT3 031563 0 771 0 000000017600 000000000077 000000770000
SCT3 031563 0 772 0 000000007700 000000000077 000000770000
SCT3 031563 0 773 0 000000003740 000000000077 000000770000
SCT3 031563 0 774 0 000000001760 000000000077 000000770000
SCT3 031563 0 775 0 000000000770 000000000077 000000770000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 38
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0300
SCT3 031563 0 776 0 000000000374 000000000077 000000770000
SCT3 031563 0 777 0 000000000176 000000000077 000000770000
SCT3 031563 0 0 0 000000000077 000000000077 000000770000
SCT4 031563 0 0 0 000000000077 000000000077 000000770000
LBT1 031563 0 0 0 000000000077 000000000077 000000770000
ST0 031563 0 0 0 000000000077 000000000077 000000770000
ST1 031563 0 0 0 000000000077 000000000077 000000770000
ST2 031563 0 0 0 000000000077 000000000077 000000770000
ST9 031563 0 0 0 000000000077 000000000077 000000770000
*031600 DPB 12,000013
INITIAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 137500000013 0 000000770000
IT1 0 0 0 0 137500000013 0 000000770000
AT3 0 0 0 0 000000000013 0 137500000013
AT6 0 000013 0 0 000000000013 0 137500000013
FT0 0 000013 0 0 140600000000 0 137500000013
FT1A 0 000013 0 0 140600000000 0 140600000000
FT9 0 000013 0 0 140600000000 0 140600000000
ET0 0 000013 0 0 140600000000 0 140600000000
BYT6 0 000013 0 0 140600000000 0 140600000000
BYT7 0 000013 772 0 140600000000 0 140600000000
SCT0 0 000013 772 0 140600000000 0 140600000000
SCT3 0 000013 773 0 140600000000 000000000001 140600000000
SCT3 0 000013 774 0 140600000000 000000000003 140600000000
SCT3 0 000013 775 0 140600000000 000000000007 140600000000
SCT3 0 000013 776 0 140600000000 000000000017 140600000000
SCT3 0 000013 777 0 140600000000 000000000037 140600000000
SCT3 0 000013 0 0 140600000000 000000000077 140600000000
SCT4 0 000013 0 0 140600000000 000000000077 140600000000
BYT7A 0 000013 014 0 140600000000 000000000077 140600000000
IT1 0 0 014 0 140600000000 000000000077 140600000000
AT3 0 0 014 0 0 000000000077 140600000000
AT6 0 0 014 0 0 000000000077 140600000000
FT0 0 0 014 0 0 000000000077 140600000000
FT1A 0 0 014 0 0 000000000077 0
FT2 0 0 014 0 0 000000000077 0
FT2RQ 0 0 014 0 000000000077 000000000077 0
FT3 0 0 014 0 000000000077 000000000077 0
FT9 031601 0 014 0 000000000077 000000000077 0
ET0 031601 0 764 0 000000000077 000000000077 0
SCT0 031601 0 764 0 000000000077 000000000077 0
SCT3 031601 0 765 0 000000000176 000000000176 0
SCT3 031601 0 766 0 000000000374 000000000374 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 39
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0301
SCT3 031601 0 767 0 000000000770 000000000770 0
SCT3 031601 0 0 0 000000001760 000000001760 0
SCT3 031601 0 771 0 000000003740 000000003740 0
SCT3 031601 0 772 0 000000007700 000000007700 0
SCT3 031601 0 773 0 000000017600 000000017600 0
SCT3 031601 0 774 0 000000037400 000000037400 0
SCT3 031601 0 775 0 000000077000 000000077000 0
SCT3 031601 0 776 0 000000176000 000000176000 0
SCT3 031601 0 777 0 000000374000 000000374000 0
SCT3 031601 0 0 0 000000770000 000000770000 0
SCT4 031601 0 0 0 000000770000 000000770000 0
DBT1 031601 0 0 0 000000770000 000000770000 0
DBT2 031601 0 0 0 000000770000 0 000000770000
DBT3 031601 0 0 0 777777007777 0 000000770000
DBT4 031601 0 0 0 0 0 000000770000
DBT5 031601 0 0 0 000000770000 0 000000770000
ST0 031601 0 0 0 000000770000 0 000000770000
ST6 031601 0 0 0 000000770000 0 000000770000
ST6A 031601 0 0 0 000000770000 0 000000770000
ST9 031601 0 0 0 000000770000 0 000000770000
*031614 DPB 7,000010
INITIAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031614 031614 0 0 137340000010 0 000000550000
IT1 031614 0 0 0 137340000010 0 000000550000
AT3 031614 0 0 0 000000000010 0 137340000010
AT6 031614 000010 0 0 000000000010 0 137340000010
FT0 031614 000010 0 0 140600000000 0 137340000010
FT1A 031614 000010 0 0 140600000000 0 140600000000
FT9 031614 000010 0 0 140600000000 0 140600000000
ET0 031614 000010 0 0 140600000000 0 140600000000
BYT6 031614 000010 0 0 140600000000 0 140600000000
BYT7 031614 000010 772 0 140600000000 0 140600000000
SCT0 031614 000010 772 0 140600000000 0 140600000000
SCT3 031614 000010 773 0 140600000000 000000000001 140600000000
SCT3 031614 000010 774 0 140600000000 000000000003 140600000000
SCT3 031614 000010 775 0 140600000000 000000000007 140600000000
SCT3 031614 000010 776 0 140600000000 000000000017 140600000000
SCT3 031614 000010 777 0 140600000000 000000000037 140600000000
SCT3 031614 000010 0 0 140600000000 000000000077 140600000000
SCT4 031614 000010 0 0 140600000000 000000000077 140600000000
BYT7A 031614 000010 014 0 140600000000 000000000077 140600000000
IT1 031614 0 014 0 140600000000 000000000077 140600000000
AT3 031614 0 014 0 0 000000000077 140600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 40
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0302
AT6 031614 0 014 0 0 000000000077 140600000000
FT0 031614 0 014 0 777777777777 000000000077 140600000000
FT1A 031614 0 014 0 777777777777 000000000077 777777777777
FT2 031614 0 014 0 0 000000000077 777777777777
FT2RQ 031614 0 014 0 000000000055 000000000077 777777777777
FT3 031614 0 014 0 000000000055 000000000077 777777777777
FT9 031615 0 014 0 000000000055 000000000077 777777777777
ET0 031615 0 764 0 000000000055 000000000077 777777777777
SCT0 031615 0 764 0 000000000055 000000000077 777777777777
SCT3 031615 0 765 0 000000000132 000000000176 777777777777
SCT3 031615 0 766 0 000000000264 000000000374 777777777777
SCT3 031615 0 767 0 000000000550 000000000770 777777777777
SCT3 031615 0 0 0 000000001320 000000001760 777777777777
SCT3 031615 0 771 0 000000002640 000000003740 777777777777
SCT3 031615 0 772 0 000000005500 000000007700 777777777777
SCT3 031615 0 773 0 000000013200 000000017600 777777777777
SCT3 031615 0 774 0 000000026400 000000037400 777777777777
SCT3 031615 0 775 0 000000055000 000000077000 777777777777
SCT3 031615 0 776 0 000000132000 000000176000 777777777777
SCT3 031615 0 777 0 000000264000 000000374000 777777777777
SCT3 031615 0 0 0 000000550000 000000770000 777777777777
SCT4 031615 0 0 0 000000550000 000000770000 777777777777
DBT1 031615 0 0 0 000000550000 000000770000 777777777777
DBT2 031615 0 0 0 000000770000 777777777777 000000550000
DBT3 031615 0 0 0 777777007777 777777777777 000000550000
DBT4 031615 0 0 0 777777007777 777777777777 000000550000
DBT5 031615 0 0 0 777777557777 777777777777 000000550000
ST0 031615 0 0 0 777777557777 777777777777 000000550000
ST6 031615 0 0 0 777777557777 777777777777 000000550000
ST6A 031615 0 0 0 777777557777 777777777777 000000550000
ST9 031615 0 0 0 777777557777 777777777777 000000550000
*031631 DPB 5,000006
INITIAL
C(AC)=000000 005555
C(E)=140600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 005555
C(E)=140600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031631 031631 0 0 137240000006 0 000000550000
IT1 031631 0 0 0 137240000006 0 000000550000
AT3 031631 0 0 0 000000000006 0 137240000006
AT6 031631 000006 0 0 000000000006 0 137240000006
FT0 031631 000006 0 0 140600000000 0 137240000006
FT1A 031631 000006 0 0 140600000000 0 140600000000
FT9 031631 000006 0 0 140600000000 0 140600000000
ET0 031631 000006 0 0 140600000000 0 140600000000
BYT6 031631 000006 0 0 140600000000 0 140600000000
BYT7 031631 000006 772 0 140600000000 0 140600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 41
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0303
SCT0 031631 000006 772 0 140600000000 0 140600000000
SCT3 031631 000006 773 0 140600000000 000000000001 140600000000
SCT3 031631 000006 774 0 140600000000 000000000003 140600000000
SCT3 031631 000006 775 0 140600000000 000000000007 140600000000
SCT3 031631 000006 776 0 140600000000 000000000017 140600000000
SCT3 031631 000006 777 0 140600000000 000000000037 140600000000
SCT3 031631 000006 0 0 140600000000 000000000077 140600000000
SCT4 031631 000006 0 0 140600000000 000000000077 140600000000
BYT7A 031631 000006 014 0 140600000000 000000000077 140600000000
IT1 031631 0 014 0 140600000000 000000000077 140600000000
AT3 031631 0 014 0 0 000000000077 140600000000
AT6 031631 0 014 0 0 000000000077 140600000000
FT0 031631 0 014 0 0 000000000077 140600000000
FT1A 031631 0 014 0 0 000000000077 0
FT2 031631 0 014 0 0 000000000077 0
FT2RQ 031631 0 014 0 000000005555 000000000077 0
FT3 031631 0 014 0 000000005555 000000000077 0
FT9 031632 0 014 0 000000005555 000000000077 0
ET0 031632 0 764 0 000000005555 000000000077 0
SCT0 031632 0 764 0 000000005555 000000000077 0
SCT3 031632 0 765 0 000000013332 000000000176 0
SCT3 031632 0 766 0 000000026664 000000000374 0
SCT3 031632 0 767 0 000000055550 000000000770 0
SCT3 031632 0 0 0 000000133320 000000001760 0
SCT3 031632 0 771 0 000000266640 000000003740 0
SCT3 031632 0 772 0 000000555500 000000007700 0
SCT3 031632 0 773 0 000001333200 000000017600 0
SCT3 031632 0 774 0 000002666400 000000037400 0
SCT3 031632 0 775 0 000005555000 000000077000 0
SCT3 031632 0 776 0 000013332000 000000176000 0
SCT3 031632 0 777 0 000026664000 000000374000 0
SCT3 031632 0 0 0 000055550000 000000770000 0
SCT4 031632 0 0 0 000055550000 000000770000 0
DBT1 031632 0 0 0 000055550000 000000770000 0
DBT2 031632 0 0 0 000000770000 0 000055550000
DBT3 031632 0 0 0 777777007777 0 000000550000
DBT4 031632 0 0 0 0 0 000000550000
DBT5 031632 0 0 0 000000550000 0 000000550000
ST0 031632 0 0 0 000000550000 0 000000550000
ST6 031632 0 0 0 000000550000 0 000000550000
ST6A 031632 0 0 0 000000550000 0 000000550000
ST9 031632 0 0 0 000000550000 0 000000550000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 42
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0304
*031645 DPB 14,000015
INITIAL
C(AC)=000000 000055
C(E)=061400 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000055
C(E)=061400 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031645 031645 0 0 137600000015 0 000000005500
IT1 031645 0 0 0 137600000015 0 000000005500
AT3 031645 0 0 0 000000000015 0 137600000015
AT6 031645 000015 0 0 000000000015 0 137600000015
FT0 031645 000015 0 0 061400000000 0 137600000015
FT1A 031645 000015 0 0 061400000000 0 061400000000
FT9 031645 000015 0 0 061400000000 0 061400000000
ET0 031645 000015 0 0 061400000000 0 061400000000
BYT6 031645 000015 0 0 061400000000 0 061400000000
BYT7 031645 000015 764 0 061400000000 0 061400000000
SCT0 031645 000015 764 0 061400000000 0 061400000000
SCT3 031645 000015 765 0 061400000000 000000000001 061400000000
SCT3 031645 000015 766 0 061400000000 000000000003 061400000000
SCT3 031645 000015 767 0 061400000000 000000000007 061400000000
SCT3 031645 000015 0 0 061400000000 000000000017 061400000000
SCT3 031645 000015 771 0 061400000000 000000000037 061400000000
SCT3 031645 000015 772 0 061400000000 000000000077 061400000000
SCT3 031645 000015 773 0 061400000000 000000000177 061400000000
SCT3 031645 000015 774 0 061400000000 000000000377 061400000000
SCT3 031645 000015 775 0 061400000000 000000000777 061400000000
SCT3 031645 000015 776 0 061400000000 000000001777 061400000000
SCT3 031645 000015 777 0 061400000000 000000003777 061400000000
SCT3 031645 000015 0 0 061400000000 000000007777 061400000000
SCT4 031645 000015 0 0 061400000000 000000007777 061400000000
BYT7A 031645 000015 006 0 061400000000 000000007777 061400000000
IT1 031645 0 006 0 061400000000 000000007777 061400000000
AT3 031645 0 006 0 0 000000007777 061400000000
AT6 031645 0 006 0 0 000000007777 061400000000
FT0 031645 0 006 0 777777777777 000000007777 061400000000
FT1A 031645 0 006 0 777777777777 000000007777 777777777777
FT2 031645 0 006 0 0 000000007777 777777777777
FT2RQ 031645 0 006 0 000000000055 000000007777 777777777777
FT3 031645 0 006 0 000000000055 000000007777 777777777777
FT9 031646 0 006 0 000000000055 000000007777 777777777777
ET0 031646 0 772 0 000000000055 000000007777 777777777777
SCT0 031646 0 772 0 000000000055 000000007777 777777777777
SCT3 031646 0 773 0 000000000132 000000017776 777777777777
SCT3 031646 0 774 0 000000000264 000000037774 777777777777
SCT3 031646 0 775 0 000000000550 000000077770 777777777777
SCT3 031646 0 776 0 000000001320 000000177760 777777777777
SCT3 031646 0 777 0 000000002640 000000377740 777777777777
SCT3 031646 0 0 0 000000005500 000000777700 777777777777
SCT4 031646 0 0 0 000000005500 000000777700 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 43
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0305
DBT1 031646 0 0 0 000000005500 000000777700 777777777777
DBT2 031646 0 0 0 000000777700 777777777777 000000005500
DBT3 031646 0 0 0 777777000077 777777777777 000000005500
DBT4 031646 0 0 0 777777000077 777777777777 000000005500
DBT5 031646 0 0 0 777777005577 777777777777 000000005500
ST0 031646 0 0 0 777777005577 777777777777 000000005500
ST6 031646 0 0 0 777777005577 777777777777 000000005500
ST6A 031646 0 0 0 777777005577 777777777777 000000005500
ST9 031646 0 0 0 777777005577 777777777777 000000005500
*031661 DPB 13,000014
INITIAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031661 031661 0 0 137540000014 0 000000550000
IT1 031661 0 0 0 137540000014 0 000000550000
AT3 031661 0 0 0 000000000014 0 137540000014
AT6 031661 000014 0 0 000000000014 0 137540000014
FT0 031661 000014 0 0 140600000000 0 137540000014
FT1A 031661 000014 0 0 140600000000 0 140600000000
FT9 031661 000014 0 0 140600000000 0 140600000000
ET0 031661 000014 0 0 140600000000 0 140600000000
BYT6 031661 000014 0 0 140600000000 0 140600000000
BYT7 031661 000014 772 0 140600000000 0 140600000000
SCT0 031661 000014 772 0 140600000000 0 140600000000
SCT3 031661 000014 773 0 140600000000 000000000001 140600000000
SCT3 031661 000014 774 0 140600000000 000000000003 140600000000
SCT3 031661 000014 775 0 140600000000 000000000007 140600000000
SCT3 031661 000014 776 0 140600000000 000000000017 140600000000
SCT3 031661 000014 777 0 140600000000 000000000037 140600000000
SCT3 031661 000014 0 0 140600000000 000000000077 140600000000
SCT4 031661 000014 0 0 140600000000 000000000077 140600000000
BYT7A 031661 000014 014 0 140600000000 000000000077 140600000000
IT1 031661 0 014 0 140600000000 000000000077 140600000000
AT3 031661 0 014 0 0 000000000077 140600000000
AT6 031661 0 014 0 0 000000000077 140600000000
FT0 031661 0 014 0 0 000000000077 140600000000
FT1A 031661 0 014 0 0 000000000077 0
FT2 031661 0 014 0 0 000000000077 0
FT2RQ 031661 0 014 0 000000000055 000000000077 0
FT3 031661 0 014 0 000000000055 000000000077 0
FT9 031662 0 014 0 000000000055 000000000077 0
ET0 031662 0 764 0 000000000055 000000000077 0
SCT0 031662 0 764 0 000000000055 000000000077 0
SCT3 031662 0 765 0 000000000132 000000000176 0
SCT3 031662 0 766 0 000000000264 000000000374 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 44
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0306
SCT3 031662 0 767 0 000000000550 000000000770 0
SCT3 031662 0 0 0 000000001320 000000001760 0
SCT3 031662 0 771 0 000000002640 000000003740 0
SCT3 031662 0 772 0 000000005500 000000007700 0
SCT3 031662 0 773 0 000000013200 000000017600 0
SCT3 031662 0 774 0 000000026400 000000037400 0
SCT3 031662 0 775 0 000000055000 000000077000 0
SCT3 031662 0 776 0 000000132000 000000176000 0
SCT3 031662 0 777 0 000000264000 000000374000 0
SCT3 031662 0 0 0 000000550000 000000770000 0
SCT4 031662 0 0 0 000000550000 000000770000 0
DBT1 031662 0 0 0 000000550000 000000770000 0
DBT2 031662 0 0 0 000000770000 0 000000550000
DBT3 031662 0 0 0 777777007777 0 000000550000
DBT4 031662 0 0 0 0 0 000000550000
DBT5 031662 0 0 0 000000550000 0 000000550000
ST0 031662 0 0 0 000000550000 0 000000550000
ST6 031662 0 0 0 000000550000 0 000000550000
ST6A 031662 0 0 0 000000550000 0 000000550000
ST9 031662 0 0 0 000000550000 0 000000550000
*031675 DPB 11,000012
INITIAL
C(AC)=000000 005555
C(E)=220600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 005555
C(E)=220600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 031675 031675 0 0 137440000012 0 000055000000
IT1 031675 0 0 0 137440000012 0 000055000000
AT3 031675 0 0 0 000000000012 0 137440000012
AT6 031675 000012 0 0 000000000012 0 137440000012
FT0 031675 000012 0 0 220600000000 0 137440000012
FT1A 031675 000012 0 0 220600000000 0 220600000000
FT9 031675 000012 0 0 220600000000 0 220600000000
ET0 031675 000012 0 0 220600000000 0 220600000000
BYT6 031675 000012 0 0 220600000000 0 220600000000
BYT7 031675 000012 772 0 220600000000 0 220600000000
SCT0 031675 000012 772 0 220600000000 0 220600000000
SCT3 031675 000012 773 0 220600000000 000000000001 220600000000
SCT3 031675 000012 774 0 220600000000 000000000003 220600000000
SCT3 031675 000012 775 0 220600000000 000000000007 220600000000
SCT3 031675 000012 776 0 220600000000 000000000017 220600000000
SCT3 031675 000012 777 0 220600000000 000000000037 220600000000
SCT3 031675 000012 0 0 220600000000 000000000077 220600000000
SCT4 031675 000012 0 0 220600000000 000000000077 220600000000
BYT7A 031675 000012 022 0 220600000000 000000000077 220600000000
IT1 031675 0 022 0 220600000000 000000000077 220600000000
AT3 031675 0 022 0 0 000000000077 220600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 45
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0307
AT6 031675 0 022 0 0 000000000077 220600000000
FT0 031675 0 022 0 777777777777 000000000077 220600000000
FT1A 031675 0 022 0 777777777777 000000000077 777777777777
FT2 031675 0 022 0 0 000000000077 777777777777
FT2RQ 031675 0 022 0 000000005555 000000000077 777777777777
FT3 031675 0 022 0 000000005555 000000000077 777777777777
FT9 031676 0 022 0 000000005555 000000000077 777777777777
ET0 031676 0 756 0 000000005555 000000000077 777777777777
SCT0 031676 0 756 0 000000005555 000000000077 777777777777
SCT3 031676 0 757 0 000000013332 000000000176 777777777777
SCT3 031676 0 0 0 000000026664 000000000374 777777777777
SCT3 031676 0 761 0 000000055550 000000000770 777777777777
SCT3 031676 0 762 0 000000133320 000000001760 777777777777
SCT3 031676 0 763 0 000000266640 000000003740 777777777777
SCT3 031676 0 764 0 000000555500 000000007700 777777777777
SCT3 031676 0 765 0 000001333200 000000017600 777777777777
SCT3 031676 0 766 0 000002666400 000000037400 777777777777
SCT3 031676 0 767 0 000005555000 000000077000 777777777777
SCT3 031676 0 0 0 000013332000 000000176000 777777777777
SCT3 031676 0 771 0 000026664000 000000374000 777777777777
SCT3 031676 0 772 0 000055550000 000000770000 777777777777
SCT3 031676 0 773 0 000133320000 000001760000 777777777777
SCT3 031676 0 774 0 000266640000 000003740000 777777777777
SCT3 031676 0 775 0 000555500000 000007700000 777777777777
SCT3 031676 0 776 0 001333200000 000017600000 777777777777
SCT3 031676 0 777 0 002666400000 000037400000 777777777777
SCT3 031676 0 0 0 005555000000 000077000000 777777777777
SCT4 031676 0 0 0 005555000000 000077000000 777777777777
DBT1 031676 0 0 0 005555000000 000077000000 777777777777
DBT2 031676 0 0 0 000077000000 777777777777 005555000000
DBT3 031676 0 0 0 777700777777 777777777777 000055000000
DBT4 031676 0 0 0 777700777777 777777777777 000055000000
DBT5 031676 0 0 0 777755777777 777777777777 000055000000
ST0 031676 0 0 0 777755777777 777777777777 000055000000
ST6 031676 0 0 0 777755777777 777777777777 000055000000
ST6A 031676 0 0 0 777755777777 777777777777 000055000000
ST9 031676 0 0 0 777755777777 777777777777 000055000000
*031710 DPB 7,000010
INITIAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031710 031710 0 0 137340000010 0 000000550000
IT1 031710 0 0 0 137340000010 0 000000550000
AT3 031710 0 0 0 000000000010 0 137340000010
AT6 031710 000010 0 0 000000000010 0 137340000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 46
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0308
FT0 031710 000010 0 0 140600000000 0 137340000010
FT1A 031710 000010 0 0 140600000000 0 140600000000
FT9 031710 000010 0 0 140600000000 0 140600000000
ET0 031710 000010 0 0 140600000000 0 140600000000
BYT6 031710 000010 0 0 140600000000 0 140600000000
BYT7 031710 000010 772 0 140600000000 0 140600000000
SCT0 031710 000010 772 0 140600000000 0 140600000000
SCT3 031710 000010 773 0 140600000000 000000000001 140600000000
SCT3 031710 000010 774 0 140600000000 000000000003 140600000000
SCT3 031710 000010 775 0 140600000000 000000000007 140600000000
SCT3 031710 000010 776 0 140600000000 000000000017 140600000000
SCT3 031710 000010 777 0 140600000000 000000000037 140600000000
SCT3 031710 000010 0 0 140600000000 000000000077 140600000000
SCT4 031710 000010 0 0 140600000000 000000000077 140600000000
BYT7A 031710 000010 014 0 140600000000 000000000077 140600000000
IT1 031710 0 014 0 140600000000 000000000077 140600000000
AT3 031710 0 014 0 0 000000000077 140600000000
AT6 031710 0 014 0 0 000000000077 140600000000
FT0 031710 0 014 0 0 000000000077 140600000000
FT1A 031710 0 014 0 0 000000000077 0
FT2 031710 0 014 0 0 000000000077 0
FT2RQ 031710 0 014 0 000000000055 000000000077 0
FT3 031710 0 014 0 000000000055 000000000077 0
FT9 031711 0 014 0 000000000055 000000000077 0
ET0 031711 0 764 0 000000000055 000000000077 0
SCT0 031711 0 764 0 000000000055 000000000077 0
SCT3 031711 0 765 0 000000000132 000000000176 0
SCT3 031711 0 766 0 000000000264 000000000374 0
SCT3 031711 0 767 0 000000000550 000000000770 0
SCT3 031711 0 0 0 000000001320 000000001760 0
SCT3 031711 0 771 0 000000002640 000000003740 0
SCT3 031711 0 772 0 000000005500 000000007700 0
SCT3 031711 0 773 0 000000013200 000000017600 0
SCT3 031711 0 774 0 000000026400 000000037400 0
SCT3 031711 0 775 0 000000055000 000000077000 0
SCT3 031711 0 776 0 000000132000 000000176000 0
SCT3 031711 0 777 0 000000264000 000000374000 0
SCT3 031711 0 0 0 000000550000 000000770000 0
SCT4 031711 0 0 0 000000550000 000000770000 0
DBT1 031711 0 0 0 000000550000 000000770000 0
DBT2 031711 0 0 0 000000770000 0 000000550000
DBT3 031711 0 0 0 777777007777 0 000000550000
DBT4 031711 0 0 0 0 0 000000550000
DBT5 031711 0 0 0 000000550000 0 000000550000
ST0 031711 0 0 0 000000550000 0 000000550000
ST6 031711 0 0 0 000000550000 0 000000550000
ST6A 031711 0 0 0 000000550000 0 000000550000
ST9 031711 0 0 0 000000550000 0 000000550000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 47
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0309
*031725 IDPB 5,000006
INITIAL
C(AC)=000000 000077
C(E)=220600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 031725 031725 0 0 136240000006 0 000000770000
IT1 031725 0 0 0 136240000006 0 000000770000
AT3 031725 0 0 0 000000000006 0 136240000006
AT6 031725 000006 0 0 000000000006 0 136240000006
FT0 031725 000006 0 0 220600000000 0 136240000006
FT1A 031725 000006 0 0 220600000000 0 220600000000
FT9 031725 000006 0 0 220600000000 0 220600000000
ET0 031725 000006 0 0 220600000000 0 220600000000
BYT1 031725 000006 022 0 220600000000 0 220600000000
BYT4 031725 000006 0 0 140600000000 0 220600000000
BYT7 031725 000006 772 0 140600000000 0 220600000000
SCT0 031725 000006 772 0 140600000000 0 220600000000
SCT3 031725 000006 773 0 140600000000 000000000001 220600000000
SCT3 031725 000006 774 0 140600000000 000000000003 220600000000
SCT3 031725 000006 775 0 140600000000 000000000007 220600000000
SCT3 031725 000006 776 0 140600000000 000000000017 220600000000
SCT3 031725 000006 777 0 140600000000 000000000037 220600000000
SCT3 031725 000006 0 0 140600000000 000000000077 220600000000
SCT4 031725 000006 0 0 140600000000 000000000077 220600000000
BYT7A 031725 000006 014 0 140600000000 000000000077 220600000000
IT1 031725 0 014 0 140600000000 000000000077 220600000000
AT3 031725 0 014 0 0 000000000077 140600000000
AT6 031725 0 014 0 0 000000000077 140600000000
FT0 031725 0 014 0 0 000000000077 140600000000
FT1A 031725 0 014 0 0 000000000077 0
FT2 031725 0 014 0 0 000000000077 0
FT2RQ 031725 0 014 0 000000000077 000000000077 0
FT3 031725 0 014 0 000000000077 000000000077 0
FT9 031726 0 014 0 000000000077 000000000077 0
ET0 031726 0 764 0 000000000077 000000000077 0
SCT0 031726 0 764 0 000000000077 000000000077 0
SCT3 031726 0 765 0 000000000176 000000000176 0
SCT3 031726 0 766 0 000000000374 000000000374 0
SCT3 031726 0 767 0 000000000770 000000000770 0
SCT3 031726 0 0 0 000000001760 000000001760 0
SCT3 031726 0 771 0 000000003740 000000003740 0
SCT3 031726 0 772 0 000000007700 000000007700 0
SCT3 031726 0 773 0 000000017600 000000017600 0
SCT3 031726 0 774 0 000000037400 000000037400 0
SCT3 031726 0 775 0 000000077000 000000077000 0
SCT3 031726 0 776 0 000000176000 000000176000 0
SCT3 031726 0 777 0 000000374000 000000374000 0
SCT3 031726 0 0 0 000000770000 000000770000 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 48
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0310
SCT4 031726 0 0 0 000000770000 000000770000 0
DBT1 031726 0 0 0 000000770000 000000770000 0
DBT2 031726 0 0 0 000000770000 0 000000770000
DBT3 031726 0 0 0 777777007777 0 000000770000
DBT4 031726 0 0 0 0 0 000000770000
DBT5 031726 0 0 0 000000770000 0 000000770000
ST0 031726 0 0 0 000000770000 0 000000770000
ST6 031726 0 0 0 000000770000 0 000000770000
ST6A 031726 0 0 0 000000770000 0 000000770000
ST9 031726 0 0 0 000000770000 0 000000770000
*031741 IBP 0,000006
INITIAL
C(AC)=000000 770000
C(E)=220600 000000
FINAL
C(E)=220600 000000
TIME PC MA SC FE AR MQ BR
IT0 031741 031741 0 0 133000000006 0 220600000000
IT1 031741 0 0 0 133000000006 0 220600000000
AT3 031741 0 0 0 000000000006 0 133000000006
AT6 031741 000006 0 0 000000000006 0 133000000006
FT0 031741 000006 0 0 220600000000 0 133000000006
FT1A 031741 000006 0 0 220600000000 0 220600000000
FT9 031742 000006 0 0 220600000000 0 220600000000
ET0 031742 000006 0 0 220600000000 0 220600000000
BYT1 031742 000006 022 0 220600000000 0 220600000000
BYT4 031742 000006 0 0 140600000000 0 220600000000
ST9 031742 000006 0 0 140600000000 0 220600000000
*031747 IBP 0,000006
INITIAL
C(AC)=000000 770000
C(E)=200600 000000
FINAL
C(E)=200600 000000
TIME PC MA SC FE AR MQ BR
IT0 031747 031747 0 0 133000000006 0 200600000000
IT1 031747 0 0 0 133000000006 0 200600000000
AT3 031747 0 0 0 000000000006 0 133000000006
AT6 031747 000006 0 0 000000000006 0 133000000006
FT0 031747 000006 0 0 200600000000 0 133000000006
FT1A 031747 000006 0 0 200600000000 0 200600000000
FT9 031750 000006 0 0 200600000000 0 200600000000
ET0 031750 000006 0 0 200600000000 0 200600000000
BYT1 031750 000006 0 0 200600000000 0 200600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 49
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0311
BYT4 031750 000006 0 0 120600000000 0 200600000000
ST9 031750 000006 0 0 120600000000 0 200600000000
*031755 IBP 0,000006
INITIAL
C(AC)=000000 770000
C(E)=160600 000000
FINAL
C(E)=160600 000000
TIME PC MA SC FE AR MQ BR
IT0 031755 031755 0 0 133000000006 0 160600000000
IT1 031755 0 0 0 133000000006 0 160600000000
AT3 031755 0 0 0 000000000006 0 133000000006
AT6 031755 000006 0 0 000000000006 0 133000000006
FT0 031755 000006 0 0 160600000000 0 133000000006
FT1A 031755 000006 0 0 160600000000 0 160600000000
FT9 031756 000006 0 0 160600000000 0 160600000000
ET0 031756 000006 0 0 160600000000 0 160600000000
BYT1 031756 000006 016 0 160600000000 0 160600000000
BYT4 031756 000006 0 0 100600000000 0 160600000000
ST9 031756 000006 0 0 100600000000 0 160600000000
*031763 IBP 0,000006
INITIAL
C(AC)=000000 770000
C(E)=140600 000000
FINAL
C(E)=140600 000000
TIME PC MA SC FE AR MQ BR
IT0 031763 031763 0 0 133000000006 0 140600000000
IT1 031763 0 0 0 133000000006 0 140600000000
AT3 031763 0 0 0 000000000006 0 133000000006
AT6 031763 000006 0 0 000000000006 0 133000000006
FT0 031763 000006 0 0 140600000000 0 133000000006
FT1A 031763 000006 0 0 140600000000 0 140600000000
FT9 031764 000006 0 0 140600000000 0 140600000000
ET0 031764 000006 0 0 140600000000 0 140600000000
BYT1 031764 000006 014 0 140600000000 0 140600000000
BYT4 031764 000006 0 0 060600000000 0 140600000000
ST9 031764 000006 0 0 060600000000 0 140600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 50
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0312
*031771 IBP 0,000006
INITIAL
C(AC)=000000 770000
C(E)=120600 000000
FINAL
C(E)=120600 000000
TIME PC MA SC FE AR MQ BR
IT0 031771 031771 0 0 133000000006 0 120600000000
IT1 031771 0 0 0 133000000006 0 120600000000
AT3 031771 0 0 0 000000000006 0 133000000006
AT6 031771 000006 0 0 000000000006 0 133000000006
FT0 031771 000006 0 0 120600000000 0 133000000006
FT1A 031771 000006 0 0 120600000000 0 120600000000
FT9 031772 000006 0 0 120600000000 0 120600000000
ET0 031772 000006 0 0 120600000000 0 120600000000
BYT1 031772 000006 012 0 120600000000 0 120600000000
BYT4 031772 000006 0 0 040600000000 0 120600000000
ST9 031772 000006 0 0 040600000000 0 120600000000
*032003 IBP 0,000015
INITIAL
C(AC)=000000 770000
C(E)=221400 000000
FINAL
C(E)=221400 000000
TIME PC MA SC FE AR MQ BR
IT0 032003 032003 0 0 133000000015 0 221400000000
IT1 032003 0 0 0 133000000015 0 221400000000
AT3 032003 0 0 0 000000000015 0 133000000015
AT6 032003 000015 0 0 000000000015 0 133000000015
FT0 032003 000015 0 0 221400000000 0 133000000015
FT1A 032003 000015 0 0 221400000000 0 221400000000
FT9 032004 000015 0 0 221400000000 0 221400000000
ET0 032004 000015 0 0 221400000000 0 221400000000
BYT1 032004 000015 022 0 221400000000 0 221400000000
BYT4 032004 000015 0 0 061400000000 0 221400000000
ST9 032004 000015 0 0 061400000000 0 221400000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 51
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0313
*032011 IBP 0,000015
INITIAL
C(AC)=000000 770000
C(E)=221200 000000
FINAL
C(E)=221200 000000
TIME PC MA SC FE AR MQ BR
IT0 032011 032011 0 0 133000000015 0 221200000000
IT1 032011 0 0 0 133000000015 0 221200000000
AT3 032011 0 0 0 000000000015 0 133000000015
AT6 032011 000015 0 0 000000000015 0 133000000015
FT0 032011 000015 0 0 221200000000 0 133000000015
FT1A 032011 000015 0 0 221200000000 0 221200000000
FT9 032012 000015 0 0 221200000000 0 221200000000
ET0 032012 000015 0 0 221200000000 0 221200000000
BYT1 032012 000015 022 0 221200000000 0 221200000000
BYT4 032012 000015 0 0 101200000000 0 221200000000
ST9 032012 000015 0 0 101200000000 0 221200000000
*032017 IBP 0,000015
INITIAL
C(AC)=000000 770000
C(E)=221000 000000
FINAL
C(E)=221000 000000
TIME PC MA SC FE AR MQ BR
IT0 032017 032017 0 0 133000000015 0 221000000000
IT1 032017 0 0 0 133000000015 0 221000000000
AT3 032017 0 0 0 000000000015 0 133000000015
AT6 032017 000015 0 0 000000000015 0 133000000015
FT0 032017 000015 0 0 221000000000 0 133000000015
FT1A 032017 000015 0 0 221000000000 0 221000000000
FT9 032020 000015 0 0 221000000000 0 221000000000
ET0 032020 000015 0 0 221000000000 0 221000000000
BYT1 032020 000015 022 0 221000000000 0 221000000000
BYT4 032020 000015 0 0 121000000000 0 221000000000
ST9 032020 000015 0 0 121000000000 0 221000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 52
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0314
*032025 IBP 0,000015
INITIAL
C(AC)=000000 770000
C(E)=220600 000000
FINAL
C(E)=220600 000000
TIME PC MA SC FE AR MQ BR
IT0 032025 032025 0 0 133000000015 0 220600000000
IT1 032025 0 0 0 133000000015 0 220600000000
AT3 032025 0 0 0 000000000015 0 133000000015
AT6 032025 000015 0 0 000000000015 0 133000000015
FT0 032025 000015 0 0 220600000000 0 133000000015
FT1A 032025 000015 0 0 220600000000 0 220600000000
FT9 032026 000015 0 0 220600000000 0 220600000000
ET0 032026 000015 0 0 220600000000 0 220600000000
BYT1 032026 000015 022 0 220600000000 0 220600000000
BYT4 032026 000015 0 0 140600000000 0 220600000000
ST9 032026 000015 0 0 140600000000 0 220600000000
*032033 IBP 0,000015
INITIAL
C(AC)=000000 770000
C(E)=220400 000000
FINAL
C(E)=220400 000000
TIME PC MA SC FE AR MQ BR
IT0 032033 032033 0 0 133000000015 0 220400000000
IT1 032033 0 0 0 133000000015 0 220400000000
AT3 032033 0 0 0 000000000015 0 133000000015
AT6 032033 000015 0 0 000000000015 0 133000000015
FT0 032033 000015 0 0 220400000000 0 133000000015
FT1A 032033 000015 0 0 220400000000 0 220400000000
FT9 032034 000015 0 0 220400000000 0 220400000000
ET0 032034 000015 0 0 220400000000 0 220400000000
BYT1 032034 000015 022 0 220400000000 0 220400000000
BYT4 032034 000015 0 0 160400000000 0 220400000000
ST9 032034 000015 0 0 160400000000 0 220400000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 53
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0315
*032046 IBP 0,000014
INITIAL
C(AC)=000000 770000
C(E)=001400 000000
FINAL
C(E)=001400 000000
TIME PC MA SC FE AR MQ BR
IT0 032046 032046 0 0 133000000014 0 001400000000
IT1 032046 0 0 0 133000000014 0 001400000000
AT3 032046 0 0 0 000000000014 0 133000000014
AT6 032046 000014 0 0 000000000014 0 133000000014
FT0 032046 000014 0 0 001400000000 0 133000000014
FT1A 032046 000014 0 0 001400000000 0 001400000000
FT9 032047 000014 0 0 001400000000 0 001400000000
ET0 032047 000014 0 0 001400000000 0 001400000000
BYT1 032047 000014 0 0 001400000000 0 001400000000
BYT2 032047 000014 0 0 001400000001 0 001400000000
BYT3 032047 000014 144 0 001400000001 0 001400000000
BYT4 032047 000014 0 0 301400000001 0 001400000000
ST9 032047 000014 0 0 301400000001 0 001400000000
*032055 IBP 0,000014
INITIAL
C(AC)=000000 770000
C(E)=001200 000000
FINAL
C(E)=001200 000000
TIME PC MA SC FE AR MQ BR
IT0 032055 032055 0 0 133000000014 0 001200000000
IT1 032055 0 0 0 133000000014 0 001200000000
AT3 032055 0 0 0 000000000014 0 133000000014
AT6 032055 000014 0 0 000000000014 0 133000000014
FT0 032055 000014 0 0 001200000000 0 133000000014
FT1A 032055 000014 0 0 001200000000 0 001200000000
FT9 032056 000014 0 0 001200000000 0 001200000000
ET0 032056 000014 0 0 001200000000 0 001200000000
BYT1 032056 000014 0 0 001200000000 0 001200000000
BYT2 032056 000014 0 0 001200000001 0 001200000000
BYT3 032056 000014 144 0 001200000001 0 001200000000
BYT4 032056 000014 0 0 321200000001 0 001200000000
ST9 032056 000014 0 0 321200000001 0 001200000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 54
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0316
*032064 IBP 0,000014
INITIAL
C(AC)=000000 770000
C(E)=001000 000000
FINAL
C(E)=001000 000000
TIME PC MA SC FE AR MQ BR
IT0 032064 032064 0 0 133000000014 0 001000000000
IT1 032064 0 0 0 133000000014 0 001000000000
AT3 032064 0 0 0 000000000014 0 133000000014
AT6 032064 000014 0 0 000000000014 0 133000000014
FT0 032064 000014 0 0 001000000000 0 133000000014
FT1A 032064 000014 0 0 001000000000 0 001000000000
FT9 032065 000014 0 0 001000000000 0 001000000000
ET0 032065 000014 0 0 001000000000 0 001000000000
BYT1 032065 000014 0 0 001000000000 0 001000000000
BYT2 032065 000014 0 0 001000000001 0 001000000000
BYT3 032065 000014 144 0 001000000001 0 001000000000
BYT4 032065 000014 0 0 341000000001 0 001000000000
ST9 032065 000014 0 0 341000000001 0 001000000000
*032073 IBP 0,000014
INITIAL
C(AC)=000000 770000
C(E)=000600 000000
FINAL
C(E)=000600 000000
TIME PC MA SC FE AR MQ BR
IT0 032073 032073 0 0 133000000014 0 000600000000
IT1 032073 0 0 0 133000000014 0 000600000000
AT3 032073 0 0 0 000000000014 0 133000000014
AT6 032073 000014 0 0 000000000014 0 133000000014
FT0 032073 000014 0 0 000600000000 0 133000000014
FT1A 032073 000014 0 0 000600000000 0 000600000000
FT9 032074 000014 0 0 000600000000 0 000600000000
ET0 032074 000014 0 0 000600000000 0 000600000000
BYT1 032074 000014 0 0 000600000000 0 000600000000
BYT2 032074 000014 0 0 000600000001 0 000600000000
BYT3 032074 000014 144 0 000600000001 0 000600000000
BYT4 032074 000014 0 0 360600000001 0 000600000000
ST9 032074 000014 0 0 360600000001 0 000600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 55
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0317
*032102 IBP 0,000014
INITIAL
C(AC)=000000 770000
C(E)=000400 000000
FINAL
C(E)=000400 000000
TIME PC MA SC FE AR MQ BR
IT0 032102 032102 0 0 133000000014 0 000400000000
IT1 032102 0 0 0 133000000014 0 000400000000
AT3 032102 0 0 0 000000000014 0 133000000014
AT6 032102 000014 0 0 000000000014 0 133000000014
FT0 032102 000014 0 0 000400000000 0 133000000014
FT1A 032102 000014 0 0 000400000000 0 000400000000
FT9 032103 000014 0 0 000400000000 0 000400000000
ET0 032103 000014 0 0 000400000000 0 000400000000
BYT1 032103 000014 0 0 000400000000 0 000400000000
BYT2 032103 000014 0 0 000400000001 0 000400000000
BYT3 032103 000014 144 0 000400000001 0 000400000000
BYT4 032103 000014 0 0 400400000001 0 000400000000
ST9 032103 000014 0 0 400400000001 0 000400000000
*032114 LDB 12,000013
INITIAL
C(AC)=160400 000000
C(E)=220100 000000 C(C(E))=777777 000000
FINAL
C(AC)=000000 000001
C(E)=220100 000000 C(C(E))=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032114 032114 0 0 135500000013 0 777777000000
IT1 032114 0 0 0 135500000013 0 777777000000
AT3 032114 0 0 0 000000000013 0 135500000013
AT6 032114 000013 0 0 000000000013 0 135500000013
FT0 032114 000013 0 0 220100000000 0 135500000013
FT1A 032114 000013 0 0 220100000000 0 220100000000
FT9 032114 000013 0 0 220100000000 0 220100000000
ET0 032114 000013 0 0 220100000000 0 220100000000
BYT6 032114 000013 0 0 220100000000 0 220100000000
BYT7 032114 000013 777 0 220100000000 0 220100000000
SCT0 032114 000013 777 0 220100000000 0 220100000000
SCT3 032114 000013 0 0 220100000000 000000000001 220100000000
SCT4 032114 000013 0 0 220100000000 000000000001 220100000000
BYT7A 032114 000013 022 0 220100000000 000000000001 220100000000
IT1 032114 0 022 0 220100000000 000000000001 220100000000
AT3 032114 0 022 0 0 000000000001 220100000000
AT6 032114 0 022 0 0 000000000001 220100000000
FT0 032114 0 022 0 777777000000 000000000001 220100000000
FT1A 032114 0 022 0 777777000000 000000000001 777777000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 56
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0318
FT9 032115 0 022 0 777777000000 000000000001 777777000000
ET0 032115 0 756 0 777777000000 000000000001 777777000000
SCT0 032115 0 756 0 777777000000 000000000001 777777000000
SCT3 032115 0 757 0 377777400000 000000000001 777777000000
SCT3 032115 0 0 0 177777600000 000000000001 777777000000
SCT3 032115 0 761 0 077777700000 000000000001 777777000000
SCT3 032115 0 762 0 037777740000 000000000001 777777000000
SCT3 032115 0 763 0 017777760000 000000000001 777777000000
SCT3 032115 0 764 0 007777770000 000000000001 777777000000
SCT3 032115 0 765 0 003777774000 000000000001 777777000000
SCT3 032115 0 766 0 001777776000 000000000001 777777000000
SCT3 032115 0 767 0 000777777000 000000000001 777777000000
SCT3 032115 0 0 0 000377777400 000000000001 777777000000
SCT3 032115 0 771 0 000177777600 000000000001 777777000000
SCT3 032115 0 772 0 000077777700 000000000001 777777000000
SCT3 032115 0 773 0 000037777740 000000000001 777777000000
SCT3 032115 0 774 0 000017777760 000000000001 777777000000
SCT3 032115 0 775 0 000007777770 000000000001 777777000000
SCT3 032115 0 776 0 000003777774 000000000001 777777000000
SCT3 032115 0 777 0 000001777776 000000000001 777777000000
SCT3 032115 0 0 0 000000777777 000000000001 777777000000
SCT4 032115 0 0 0 000000777777 000000000001 777777000000
LBT1 032115 0 0 0 000000000001 000000000001 777777000000
ST0 032115 0 0 0 000000000001 000000000001 777777000000
ST1 032115 0 0 0 000000000001 000000000001 777777000000
ST2 032115 0 0 0 000000000001 000000000001 777777000000
ST9 032115 0 0 0 000000000001 000000000001 777777000000
*032122 LDB 12,000013
INITIAL
C(AC)=000000 000001
C(E)=220200 000000 C(C(E))=777777 000000
FINAL
C(AC)=000000 000003
C(E)=220200 000000 C(C(E))=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032122 032122 0 0 135500000013 0 777777000000
IT1 032122 0 0 0 135500000013 0 777777000000
AT3 032122 0 0 0 000000000013 0 135500000013
AT6 032122 000013 0 0 000000000013 0 135500000013
FT0 032122 000013 0 0 220200000000 0 135500000013
FT1A 032122 000013 0 0 220200000000 0 220200000000
FT9 032122 000013 0 0 220200000000 0 220200000000
ET0 032122 000013 0 0 220200000000 0 220200000000
BYT6 032122 000013 0 0 220200000000 0 220200000000
BYT7 032122 000013 776 0 220200000000 0 220200000000
SCT0 032122 000013 776 0 220200000000 0 220200000000
SCT3 032122 000013 777 0 220200000000 000000000001 220200000000
SCT3 032122 000013 0 0 220200000000 000000000003 220200000000
SCT4 032122 000013 0 0 220200000000 000000000003 220200000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 57
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0319
BYT7A 032122 000013 022 0 220200000000 000000000003 220200000000
IT1 032122 0 022 0 220200000000 000000000003 220200000000
AT3 032122 0 022 0 0 000000000003 220200000000
AT6 032122 0 022 0 0 000000000003 220200000000
FT0 032122 0 022 0 777777000000 000000000003 220200000000
FT1A 032122 0 022 0 777777000000 000000000003 777777000000
FT9 032123 0 022 0 777777000000 000000000003 777777000000
ET0 032123 0 756 0 777777000000 000000000003 777777000000
SCT0 032123 0 756 0 777777000000 000000000003 777777000000
SCT3 032123 0 757 0 377777400000 000000000003 777777000000
SCT3 032123 0 0 0 177777600000 000000000003 777777000000
SCT3 032123 0 761 0 077777700000 000000000003 777777000000
SCT3 032123 0 762 0 037777740000 000000000003 777777000000
SCT3 032123 0 763 0 017777760000 000000000003 777777000000
SCT3 032123 0 764 0 007777770000 000000000003 777777000000
SCT3 032123 0 765 0 003777774000 000000000003 777777000000
SCT3 032123 0 766 0 001777776000 000000000003 777777000000
SCT3 032123 0 767 0 000777777000 000000000003 777777000000
SCT3 032123 0 0 0 000377777400 000000000003 777777000000
SCT3 032123 0 771 0 000177777600 000000000003 777777000000
SCT3 032123 0 772 0 000077777700 000000000003 777777000000
SCT3 032123 0 773 0 000037777740 000000000003 777777000000
SCT3 032123 0 774 0 000017777760 000000000003 777777000000
SCT3 032123 0 775 0 000007777770 000000000003 777777000000
SCT3 032123 0 776 0 000003777774 000000000003 777777000000
SCT3 032123 0 777 0 000001777776 000000000003 777777000000
SCT3 032123 0 0 0 000000777777 000000000003 777777000000
SCT4 032123 0 0 0 000000777777 000000000003 777777000000
LBT1 032123 0 0 0 000000000003 000000000003 777777000000
ST0 032123 0 0 0 000000000003 000000000003 777777000000
ST1 032123 0 0 0 000000000003 000000000003 777777000000
ST2 032123 0 0 0 000000000003 000000000003 777777000000
ST9 032123 0 0 0 000000000003 000000000003 777777000000
*032130 LDB 12,000013
INITIAL
C(AC)=000000 000003
C(E)=220300 000000 C(C(E))=777777 000000
FINAL
C(AC)=000000 000007
C(E)=220300 000000 C(C(E))=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032130 032130 0 0 135500000013 0 777777000000
IT1 032130 0 0 0 135500000013 0 777777000000
AT3 032130 0 0 0 000000000013 0 135500000013
AT6 032130 000013 0 0 000000000013 0 135500000013
FT0 032130 000013 0 0 220300000000 0 135500000013
FT1A 032130 000013 0 0 220300000000 0 220300000000
FT9 032130 000013 0 0 220300000000 0 220300000000
ET0 032130 000013 0 0 220300000000 0 220300000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 58
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0320
BYT6 032130 000013 0 0 220300000000 0 220300000000
BYT7 032130 000013 775 0 220300000000 0 220300000000
SCT0 032130 000013 775 0 220300000000 0 220300000000
SCT3 032130 000013 776 0 220300000000 000000000001 220300000000
SCT3 032130 000013 777 0 220300000000 000000000003 220300000000
SCT3 032130 000013 0 0 220300000000 000000000007 220300000000
SCT4 032130 000013 0 0 220300000000 000000000007 220300000000
BYT7A 032130 000013 022 0 220300000000 000000000007 220300000000
IT1 032130 0 022 0 220300000000 000000000007 220300000000
AT3 032130 0 022 0 0 000000000007 220300000000
AT6 032130 0 022 0 0 000000000007 220300000000
FT0 032130 0 022 0 777777000000 000000000007 220300000000
FT1A 032130 0 022 0 777777000000 000000000007 777777000000
FT9 032131 0 022 0 777777000000 000000000007 777777000000
ET0 032131 0 756 0 777777000000 000000000007 777777000000
SCT0 032131 0 756 0 777777000000 000000000007 777777000000
SCT3 032131 0 757 0 377777400000 000000000007 777777000000
SCT3 032131 0 0 0 177777600000 000000000007 777777000000
SCT3 032131 0 761 0 077777700000 000000000007 777777000000
SCT3 032131 0 762 0 037777740000 000000000007 777777000000
SCT3 032131 0 763 0 017777760000 000000000007 777777000000
SCT3 032131 0 764 0 007777770000 000000000007 777777000000
SCT3 032131 0 765 0 003777774000 000000000007 777777000000
SCT3 032131 0 766 0 001777776000 000000000007 777777000000
SCT3 032131 0 767 0 000777777000 000000000007 777777000000
SCT3 032131 0 0 0 000377777400 000000000007 777777000000
SCT3 032131 0 771 0 000177777600 000000000007 777777000000
SCT3 032131 0 772 0 000077777700 000000000007 777777000000
SCT3 032131 0 773 0 000037777740 000000000007 777777000000
SCT3 032131 0 774 0 000017777760 000000000007 777777000000
SCT3 032131 0 775 0 000007777770 000000000007 777777000000
SCT3 032131 0 776 0 000003777774 000000000007 777777000000
SCT3 032131 0 777 0 000001777776 000000000007 777777000000
SCT3 032131 0 0 0 000000777777 000000000007 777777000000
SCT4 032131 0 0 0 000000777777 000000000007 777777000000
LBT1 032131 0 0 0 000000000007 000000000007 777777000000
ST0 032131 0 0 0 000000000007 000000000007 777777000000
ST1 032131 0 0 0 000000000007 000000000007 777777000000
ST2 032131 0 0 0 000000000007 000000000007 777777000000
ST9 032131 0 0 0 000000000007 000000000007 777777000000
*032136 LDB 12,000013
INITIAL
C(AC)=000000 000007
C(E)=220400 000000 C(C(E))=777777 000000
FINAL
C(AC)=000000 000017
C(E)=220400 000000 C(C(E))=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032136 032136 0 0 135500000013 0 777777000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 59
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0321
IT1 032136 0 0 0 135500000013 0 777777000000
AT3 032136 0 0 0 000000000013 0 135500000013
AT6 032136 000013 0 0 000000000013 0 135500000013
FT0 032136 000013 0 0 220400000000 0 135500000013
FT1A 032136 000013 0 0 220400000000 0 220400000000
FT9 032136 000013 0 0 220400000000 0 220400000000
ET0 032136 000013 0 0 220400000000 0 220400000000
BYT6 032136 000013 0 0 220400000000 0 220400000000
BYT7 032136 000013 774 0 220400000000 0 220400000000
SCT0 032136 000013 774 0 220400000000 0 220400000000
SCT3 032136 000013 775 0 220400000000 000000000001 220400000000
SCT3 032136 000013 776 0 220400000000 000000000003 220400000000
SCT3 032136 000013 777 0 220400000000 000000000007 220400000000
SCT3 032136 000013 0 0 220400000000 000000000017 220400000000
SCT4 032136 000013 0 0 220400000000 000000000017 220400000000
BYT7A 032136 000013 022 0 220400000000 000000000017 220400000000
IT1 032136 0 022 0 220400000000 000000000017 220400000000
AT3 032136 0 022 0 0 000000000017 220400000000
AT6 032136 0 022 0 0 000000000017 220400000000
FT0 032136 0 022 0 777777000000 000000000017 220400000000
FT1A 032136 0 022 0 777777000000 000000000017 777777000000
FT9 032137 0 022 0 777777000000 000000000017 777777000000
ET0 032137 0 756 0 777777000000 000000000017 777777000000
SCT0 032137 0 756 0 777777000000 000000000017 777777000000
SCT3 032137 0 757 0 377777400000 000000000017 777777000000
SCT3 032137 0 0 0 177777600000 000000000017 777777000000
SCT3 032137 0 761 0 077777700000 000000000017 777777000000
SCT3 032137 0 762 0 037777740000 000000000017 777777000000
SCT3 032137 0 763 0 017777760000 000000000017 777777000000
SCT3 032137 0 764 0 007777770000 000000000017 777777000000
SCT3 032137 0 765 0 003777774000 000000000017 777777000000
SCT3 032137 0 766 0 001777776000 000000000017 777777000000
SCT3 032137 0 767 0 000777777000 000000000017 777777000000
SCT3 032137 0 0 0 000377777400 000000000017 777777000000
SCT3 032137 0 771 0 000177777600 000000000017 777777000000
SCT3 032137 0 772 0 000077777700 000000000017 777777000000
SCT3 032137 0 773 0 000037777740 000000000017 777777000000
SCT3 032137 0 774 0 000017777760 000000000017 777777000000
SCT3 032137 0 775 0 000007777770 000000000017 777777000000
SCT3 032137 0 776 0 000003777774 000000000017 777777000000
SCT3 032137 0 777 0 000001777776 000000000017 777777000000
SCT3 032137 0 0 0 000000777777 000000000017 777777000000
SCT4 032137 0 0 0 000000777777 000000000017 777777000000
LBT1 032137 0 0 0 000000000017 000000000017 777777000000
ST0 032137 0 0 0 000000000017 000000000017 777777000000
ST1 032137 0 0 0 000000000017 000000000017 777777000000
ST2 032137 0 0 0 000000000017 000000000017 777777000000
ST9 032137 0 0 0 000000000017 000000000017 777777000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 60
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0322
*032144 LDB 12,000013
INITIAL
C(AC)=000000 000017
C(E)=220500 000000 C(C(E))=777777 000000
FINAL
C(AC)=000000 000037
C(E)=220500 000000 C(C(E))=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 032144 032144 0 0 135500000013 0 777777000000
IT1 032144 0 0 0 135500000013 0 777777000000
AT3 032144 0 0 0 000000000013 0 135500000013
AT6 032144 000013 0 0 000000000013 0 135500000013
FT0 032144 000013 0 0 220500000000 0 135500000013
FT1A 032144 000013 0 0 220500000000 0 220500000000
FT9 032144 000013 0 0 220500000000 0 220500000000
ET0 032144 000013 0 0 220500000000 0 220500000000
BYT6 032144 000013 0 0 220500000000 0 220500000000
BYT7 032144 000013 773 0 220500000000 0 220500000000
SCT0 032144 000013 773 0 220500000000 0 220500000000
SCT3 032144 000013 774 0 220500000000 000000000001 220500000000
SCT3 032144 000013 775 0 220500000000 000000000003 220500000000
SCT3 032144 000013 776 0 220500000000 000000000007 220500000000
SCT3 032144 000013 777 0 220500000000 000000000017 220500000000
SCT3 032144 000013 0 0 220500000000 000000000037 220500000000
SCT4 032144 000013 0 0 220500000000 000000000037 220500000000
BYT7A 032144 000013 022 0 220500000000 000000000037 220500000000
IT1 032144 0 022 0 220500000000 000000000037 220500000000
AT3 032144 0 022 0 0 000000000037 220500000000
AT6 032144 0 022 0 0 000000000037 220500000000
FT0 032144 0 022 0 777777000000 000000000037 220500000000
FT1A 032144 0 022 0 777777000000 000000000037 777777000000
FT9 032145 0 022 0 777777000000 000000000037 777777000000
ET0 032145 0 756 0 777777000000 000000000037 777777000000
SCT0 032145 0 756 0 777777000000 000000000037 777777000000
SCT3 032145 0 757 0 377777400000 000000000037 777777000000
SCT3 032145 0 0 0 177777600000 000000000037 777777000000
SCT3 032145 0 761 0 077777700000 000000000037 777777000000
SCT3 032145 0 762 0 037777740000 000000000037 777777000000
SCT3 032145 0 763 0 017777760000 000000000037 777777000000
SCT3 032145 0 764 0 007777770000 000000000037 777777000000
SCT3 032145 0 765 0 003777774000 000000000037 777777000000
SCT3 032145 0 766 0 001777776000 000000000037 777777000000
SCT3 032145 0 767 0 000777777000 000000000037 777777000000
SCT3 032145 0 0 0 000377777400 000000000037 777777000000
SCT3 032145 0 771 0 000177777600 000000000037 777777000000
SCT3 032145 0 772 0 000077777700 000000000037 777777000000
SCT3 032145 0 773 0 000037777740 000000000037 777777000000
SCT3 032145 0 774 0 000017777760 000000000037 777777000000
SCT3 032145 0 775 0 000007777770 000000000037 777777000000
SCT3 032145 0 776 0 000003777774 000000000037 777777000000
SCT3 032145 0 777 0 000001777776 000000000037 777777000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 61
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0323
SCT3 032145 0 0 0 000000777777 000000000037 777777000000
SCT4 032145 0 0 0 000000777777 000000000037 777777000000
LBT1 032145 0 0 0 000000000037 000000000037 777777000000
ST0 032145 0 0 0 000000000037 000000000037 777777000000
ST1 032145 0 0 0 000000000037 000000000037 777777000000
ST2 032145 0 0 0 000000000037 000000000037 777777000000
ST9 032145 0 0 0 000000000037 000000000037 777777000000
*032157 LDB 11,000012
INITIAL
C(AC)=400400 000001
C(E)=140300 000000 C(C(E))=000000 070000
FINAL
C(AC)=000000 000007
C(E)=140300 000000 C(C(E))=000000 070000
TIME PC MA SC FE AR MQ BR
IT0 032157 032157 0 0 135440000012 0 000000070000
IT1 032157 0 0 0 135440000012 0 000000070000
AT3 032157 0 0 0 000000000012 0 135440000012
AT6 032157 000012 0 0 000000000012 0 135440000012
FT0 032157 000012 0 0 140300000000 0 135440000012
FT1A 032157 000012 0 0 140300000000 0 140300000000
FT9 032157 000012 0 0 140300000000 0 140300000000
ET0 032157 000012 0 0 140300000000 0 140300000000
BYT6 032157 000012 0 0 140300000000 0 140300000000
BYT7 032157 000012 775 0 140300000000 0 140300000000
SCT0 032157 000012 775 0 140300000000 0 140300000000
SCT3 032157 000012 776 0 140300000000 000000000001 140300000000
SCT3 032157 000012 777 0 140300000000 000000000003 140300000000
SCT3 032157 000012 0 0 140300000000 000000000007 140300000000
SCT4 032157 000012 0 0 140300000000 000000000007 140300000000
BYT7A 032157 000012 014 0 140300000000 000000000007 140300000000
IT1 032157 0 014 0 140300000000 000000000007 140300000000
AT3 032157 0 014 0 0 000000000007 140300000000
AT6 032157 0 014 0 0 000000000007 140300000000
FT0 032157 0 014 0 000000070000 000000000007 140300000000
FT1A 032157 0 014 0 000000070000 000000000007 000000070000
FT9 032160 0 014 0 000000070000 000000000007 000000070000
ET0 032160 0 764 0 000000070000 000000000007 000000070000
SCT0 032160 0 764 0 000000070000 000000000007 000000070000
SCT3 032160 0 765 0 000000034000 000000000007 000000070000
SCT3 032160 0 766 0 000000016000 000000000007 000000070000
SCT3 032160 0 767 0 000000007000 000000000007 000000070000
SCT3 032160 0 0 0 000000003400 000000000007 000000070000
SCT3 032160 0 771 0 000000001600 000000000007 000000070000
SCT3 032160 0 772 0 000000000700 000000000007 000000070000
SCT3 032160 0 773 0 000000000340 000000000007 000000070000
SCT3 032160 0 774 0 000000000160 000000000007 000000070000
SCT3 032160 0 775 0 000000000070 000000000007 000000070000
SCT3 032160 0 776 0 000000000034 000000000007 000000070000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 62
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0324
SCT3 032160 0 777 0 000000000016 000000000007 000000070000
SCT3 032160 0 0 0 000000000007 000000000007 000000070000
SCT4 032160 0 0 0 000000000007 000000000007 000000070000
LBT1 032160 0 0 0 000000000007 000000000007 000000070000
ST0 032160 0 0 0 000000000007 000000000007 000000070000
ST1 032160 0 0 0 000000000007 000000000007 000000070000
ST2 032160 0 0 0 000000000007 000000000007 000000070000
ST9 032160 0 0 0 000000000007 000000000007 000000070000
*032166 LDB 11,000012
INITIAL
C(AC)=000000 000007
C(E)=170300 000000 C(C(E))=000000 700000
FINAL
C(AC)=000000 000007
C(E)=170300 000000 C(C(E))=000000 700000
TIME PC MA SC FE AR MQ BR
IT0 032166 032166 0 0 135440000012 0 000000700000
IT1 032166 0 0 0 135440000012 0 000000700000
AT3 032166 0 0 0 000000000012 0 135440000012
AT6 032166 000012 0 0 000000000012 0 135440000012
FT0 032166 000012 0 0 170300000000 0 135440000012
FT1A 032166 000012 0 0 170300000000 0 170300000000
FT9 032166 000012 0 0 170300000000 0 170300000000
ET0 032166 000012 0 0 170300000000 0 170300000000
BYT6 032166 000012 0 0 170300000000 0 170300000000
BYT7 032166 000012 775 0 170300000000 0 170300000000
SCT0 032166 000012 775 0 170300000000 0 170300000000
SCT3 032166 000012 776 0 170300000000 000000000001 170300000000
SCT3 032166 000012 777 0 170300000000 000000000003 170300000000
SCT3 032166 000012 0 0 170300000000 000000000007 170300000000
SCT4 032166 000012 0 0 170300000000 000000000007 170300000000
BYT7A 032166 000012 017 0 170300000000 000000000007 170300000000
IT1 032166 0 017 0 170300000000 000000000007 170300000000
AT3 032166 0 017 0 0 000000000007 170300000000
AT6 032166 0 017 0 0 000000000007 170300000000
FT0 032166 0 017 0 000000700000 000000000007 170300000000
FT1A 032166 0 017 0 000000700000 000000000007 000000700000
FT9 032167 0 017 0 000000700000 000000000007 000000700000
ET0 032167 0 761 0 000000700000 000000000007 000000700000
SCT0 032167 0 761 0 000000700000 000000000007 000000700000
SCT3 032167 0 762 0 000000340000 000000000007 000000700000
SCT3 032167 0 763 0 000000160000 000000000007 000000700000
SCT3 032167 0 764 0 000000070000 000000000007 000000700000
SCT3 032167 0 765 0 000000034000 000000000007 000000700000
SCT3 032167 0 766 0 000000016000 000000000007 000000700000
SCT3 032167 0 767 0 000000007000 000000000007 000000700000
SCT3 032167 0 0 0 000000003400 000000000007 000000700000
SCT3 032167 0 771 0 000000001600 000000000007 000000700000
SCT3 032167 0 772 0 000000000700 000000000007 000000700000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 63
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0325
SCT3 032167 0 773 0 000000000340 000000000007 000000700000
SCT3 032167 0 774 0 000000000160 000000000007 000000700000
SCT3 032167 0 775 0 000000000070 000000000007 000000700000
SCT3 032167 0 776 0 000000000034 000000000007 000000700000
SCT3 032167 0 777 0 000000000016 000000000007 000000700000
SCT3 032167 0 0 0 000000000007 000000000007 000000700000
SCT4 032167 0 0 0 000000000007 000000000007 000000700000
LBT1 032167 0 0 0 000000000007 000000000007 000000700000
ST0 032167 0 0 0 000000000007 000000000007 000000700000
ST1 032167 0 0 0 000000000007 000000000007 000000700000
ST2 032167 0 0 0 000000000007 000000000007 000000700000
ST9 032167 0 0 0 000000000007 000000000007 000000700000
*032175 LDB 11,000012
INITIAL
C(AC)=000000 000007
C(E)=220300 000000 C(C(E))=000007 000000
FINAL
C(AC)=000000 000007
C(E)=220300 000000 C(C(E))=000007 000000
TIME PC MA SC FE AR MQ BR
IT0 032175 032175 0 0 135440000012 0 000007000000
IT1 032175 0 0 0 135440000012 0 000007000000
AT3 032175 0 0 0 000000000012 0 135440000012
AT6 032175 000012 0 0 000000000012 0 135440000012
FT0 032175 000012 0 0 220300000000 0 135440000012
FT1A 032175 000012 0 0 220300000000 0 220300000000
FT9 032175 000012 0 0 220300000000 0 220300000000
ET0 032175 000012 0 0 220300000000 0 220300000000
BYT6 032175 000012 0 0 220300000000 0 220300000000
BYT7 032175 000012 775 0 220300000000 0 220300000000
SCT0 032175 000012 775 0 220300000000 0 220300000000
SCT3 032175 000012 776 0 220300000000 000000000001 220300000000
SCT3 032175 000012 777 0 220300000000 000000000003 220300000000
SCT3 032175 000012 0 0 220300000000 000000000007 220300000000
SCT4 032175 000012 0 0 220300000000 000000000007 220300000000
BYT7A 032175 000012 022 0 220300000000 000000000007 220300000000
IT1 032175 0 022 0 220300000000 000000000007 220300000000
AT3 032175 0 022 0 0 000000000007 220300000000
AT6 032175 0 022 0 0 000000000007 220300000000
FT0 032175 0 022 0 000007000000 000000000007 220300000000
FT1A 032175 0 022 0 000007000000 000000000007 000007000000
FT9 032176 0 022 0 000007000000 000000000007 000007000000
ET0 032176 0 756 0 000007000000 000000000007 000007000000
SCT0 032176 0 756 0 000007000000 000000000007 000007000000
SCT3 032176 0 757 0 000003400000 000000000007 000007000000
SCT3 032176 0 0 0 000001600000 000000000007 000007000000
SCT3 032176 0 761 0 000000700000 000000000007 000007000000
SCT3 032176 0 762 0 000000340000 000000000007 000007000000
SCT3 032176 0 763 0 000000160000 000000000007 000007000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 64
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0326
SCT3 032176 0 764 0 000000070000 000000000007 000007000000
SCT3 032176 0 765 0 000000034000 000000000007 000007000000
SCT3 032176 0 766 0 000000016000 000000000007 000007000000
SCT3 032176 0 767 0 000000007000 000000000007 000007000000
SCT3 032176 0 0 0 000000003400 000000000007 000007000000
SCT3 032176 0 771 0 000000001600 000000000007 000007000000
SCT3 032176 0 772 0 000000000700 000000000007 000007000000
SCT3 032176 0 773 0 000000000340 000000000007 000007000000
SCT3 032176 0 774 0 000000000160 000000000007 000007000000
SCT3 032176 0 775 0 000000000070 000000000007 000007000000
SCT3 032176 0 776 0 000000000034 000000000007 000007000000
SCT3 032176 0 777 0 000000000016 000000000007 000007000000
SCT3 032176 0 0 0 000000000007 000000000007 000007000000
SCT4 032176 0 0 0 000000000007 000000000007 000007000000
LBT1 032176 0 0 0 000000000007 000000000007 000007000000
ST0 032176 0 0 0 000000000007 000000000007 000007000000
ST1 032176 0 0 0 000000000007 000000000007 000007000000
ST2 032176 0 0 0 000000000007 000000000007 000007000000
ST9 032176 0 0 0 000000000007 000000000007 000007000000
*032204 LDB 11,000012
INITIAL
C(AC)=000000 000007
C(E)=250300 000000 C(C(E))=000070 000000
FINAL
C(AC)=000000 000007
C(E)=250300 000000 C(C(E))=000070 000000
TIME PC MA SC FE AR MQ BR
IT0 032204 032204 0 0 135440000012 0 000070000000
IT1 032204 0 0 0 135440000012 0 000070000000
AT3 032204 0 0 0 000000000012 0 135440000012
AT6 032204 000012 0 0 000000000012 0 135440000012
FT0 032204 000012 0 0 250300000000 0 135440000012
FT1A 032204 000012 0 0 250300000000 0 250300000000
FT9 032204 000012 0 0 250300000000 0 250300000000
ET0 032204 000012 0 0 250300000000 0 250300000000
BYT6 032204 000012 0 0 250300000000 0 250300000000
BYT7 032204 000012 775 0 250300000000 0 250300000000
SCT0 032204 000012 775 0 250300000000 0 250300000000
SCT3 032204 000012 776 0 250300000000 000000000001 250300000000
SCT3 032204 000012 777 0 250300000000 000000000003 250300000000
SCT3 032204 000012 0 0 250300000000 000000000007 250300000000
SCT4 032204 000012 0 0 250300000000 000000000007 250300000000
BYT7A 032204 000012 025 0 250300000000 000000000007 250300000000
IT1 032204 0 025 0 250300000000 000000000007 250300000000
AT3 032204 0 025 0 0 000000000007 250300000000
AT6 032204 0 025 0 0 000000000007 250300000000
FT0 032204 0 025 0 000070000000 000000000007 250300000000
FT1A 032204 0 025 0 000070000000 000000000007 000070000000
FT9 032205 0 025 0 000070000000 000000000007 000070000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 65
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0327
ET0 032205 0 753 0 000070000000 000000000007 000070000000
SCT0 032205 0 753 0 000070000000 000000000007 000070000000
SCT3 032205 0 754 0 000034000000 000000000007 000070000000
SCT3 032205 0 755 0 000016000000 000000000007 000070000000
SCT3 032205 0 756 0 000007000000 000000000007 000070000000
SCT3 032205 0 757 0 000003400000 000000000007 000070000000
SCT3 032205 0 0 0 000001600000 000000000007 000070000000
SCT3 032205 0 761 0 000000700000 000000000007 000070000000
SCT3 032205 0 762 0 000000340000 000000000007 000070000000
SCT3 032205 0 763 0 000000160000 000000000007 000070000000
SCT3 032205 0 764 0 000000070000 000000000007 000070000000
SCT3 032205 0 765 0 000000034000 000000000007 000070000000
SCT3 032205 0 766 0 000000016000 000000000007 000070000000
SCT3 032205 0 767 0 000000007000 000000000007 000070000000
SCT3 032205 0 0 0 000000003400 000000000007 000070000000
SCT3 032205 0 771 0 000000001600 000000000007 000070000000
SCT3 032205 0 772 0 000000000700 000000000007 000070000000
SCT3 032205 0 773 0 000000000340 000000000007 000070000000
SCT3 032205 0 774 0 000000000160 000000000007 000070000000
SCT3 032205 0 775 0 000000000070 000000000007 000070000000
SCT3 032205 0 776 0 000000000034 000000000007 000070000000
SCT3 032205 0 777 0 000000000016 000000000007 000070000000
SCT3 032205 0 0 0 000000000007 000000000007 000070000000
SCT4 032205 0 0 0 000000000007 000000000007 000070000000
LBT1 032205 0 0 0 000000000007 000000000007 000070000000
ST0 032205 0 0 0 000000000007 000000000007 000070000000
ST1 032205 0 0 0 000000000007 000000000007 000070000000
ST2 032205 0 0 0 000000000007 000000000007 000070000000
ST9 032205 0 0 0 000000000007 000000000007 000070000000
*032213 LDB 11,000012
INITIAL
C(AC)=000000 000007
C(E)=300300 000000 C(C(E))=000700 000000
FINAL
C(AC)=000000 000007
C(E)=300300 000000 C(C(E))=000700 000000
TIME PC MA SC FE AR MQ BR
IT0 032213 032213 0 0 135440000012 0 000700000000
IT1 032213 0 0 0 135440000012 0 000700000000
AT3 032213 0 0 0 000000000012 0 135440000012
AT6 032213 000012 0 0 000000000012 0 135440000012
FT0 032213 000012 0 0 300300000000 0 135440000012
FT1A 032213 000012 0 0 300300000000 0 300300000000
FT9 032213 000012 0 0 300300000000 0 300300000000
ET0 032213 000012 0 0 300300000000 0 300300000000
BYT6 032213 000012 0 0 300300000000 0 300300000000
BYT7 032213 000012 775 0 300300000000 0 300300000000
SCT0 032213 000012 775 0 300300000000 0 300300000000
SCT3 032213 000012 776 0 300300000000 000000000001 300300000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 66
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0328
SCT3 032213 000012 777 0 300300000000 000000000003 300300000000
SCT3 032213 000012 0 0 300300000000 000000000007 300300000000
SCT4 032213 000012 0 0 300300000000 000000000007 300300000000
BYT7A 032213 000012 0 0 300300000000 000000000007 300300000000
IT1 032213 0 0 0 300300000000 000000000007 300300000000
AT3 032213 0 0 0 0 000000000007 300300000000
AT6 032213 0 0 0 0 000000000007 300300000000
FT0 032213 0 0 0 000700000000 000000000007 300300000000
FT1A 032213 0 0 0 000700000000 000000000007 000700000000
FT9 032214 0 0 0 000700000000 000000000007 000700000000
ET0 032214 0 0 0 000700000000 000000000007 000700000000
SCT0 032214 0 0 0 000700000000 000000000007 000700000000
SCT3 032214 0 751 0 000340000000 000000000007 000700000000
SCT3 032214 0 752 0 000160000000 000000000007 000700000000
SCT3 032214 0 753 0 000070000000 000000000007 000700000000
SCT3 032214 0 754 0 000034000000 000000000007 000700000000
SCT3 032214 0 755 0 000016000000 000000000007 000700000000
SCT3 032214 0 756 0 000007000000 000000000007 000700000000
SCT3 032214 0 757 0 000003400000 000000000007 000700000000
SCT3 032214 0 0 0 000001600000 000000000007 000700000000
SCT3 032214 0 761 0 000000700000 000000000007 000700000000
SCT3 032214 0 762 0 000000340000 000000000007 000700000000
SCT3 032214 0 763 0 000000160000 000000000007 000700000000
SCT3 032214 0 764 0 000000070000 000000000007 000700000000
SCT3 032214 0 765 0 000000034000 000000000007 000700000000
SCT3 032214 0 766 0 000000016000 000000000007 000700000000
SCT3 032214 0 767 0 000000007000 000000000007 000700000000
SCT3 032214 0 0 0 000000003400 000000000007 000700000000
SCT3 032214 0 771 0 000000001600 000000000007 000700000000
SCT3 032214 0 772 0 000000000700 000000000007 000700000000
SCT3 032214 0 773 0 000000000340 000000000007 000700000000
SCT3 032214 0 774 0 000000000160 000000000007 000700000000
SCT3 032214 0 775 0 000000000070 000000000007 000700000000
SCT3 032214 0 776 0 000000000034 000000000007 000700000000
SCT3 032214 0 777 0 000000000016 000000000007 000700000000
SCT3 032214 0 0 0 000000000007 000000000007 000700000000
SCT4 032214 0 0 0 000000000007 000000000007 000700000000
LBT1 032214 0 0 0 000000000007 000000000007 000700000000
ST0 032214 0 0 0 000000000007 000000000007 000700000000
ST1 032214 0 0 0 000000000007 000000000007 000700000000
ST2 032214 0 0 0 000000000007 000000000007 000700000000
ST9 032214 0 0 0 000000000007 000000000007 000700000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 67
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0329
*032226 LDB 7,000010
INITIAL
C(AC)=000000 000007
C(E)=220300 000006 C(C(E))=000006 000000
FINAL
C(AC)=000000 000006
C(E)=220300 000006 C(C(E))=000006 000000
TIME PC MA SC FE AR MQ BR
IT0 032226 032226 0 0 135340000010 0 000006000000
IT1 032226 0 0 0 135340000010 0 000006000000
AT3 032226 0 0 0 000000000010 0 135340000010
AT6 032226 000010 0 0 000000000010 0 135340000010
FT0 032226 000010 0 0 220300000006 0 135340000010
FT1A 032226 000010 0 0 220300000006 0 220300000006
FT9 032226 000010 0 0 220300000006 0 220300000006
ET0 032226 000010 0 0 220300000006 0 220300000006
BYT6 032226 000010 0 0 220300000006 0 220300000006
BYT7 032226 000010 775 0 220300000006 0 220300000006
SCT0 032226 000010 775 0 220300000006 0 220300000006
SCT3 032226 000010 776 0 220300000006 000000000001 220300000006
SCT3 032226 000010 777 0 220300000006 000000000003 220300000006
SCT3 032226 000010 0 0 220300000006 000000000007 220300000006
SCT4 032226 000010 0 0 220300000006 000000000007 220300000006
BYT7A 032226 000010 022 0 220300000006 000000000007 220300000006
IT1 032226 0 022 0 220300000006 000000000007 220300000006
AT3 032226 0 022 0 000000000006 000000000007 220300000006
AT6 032226 000006 022 0 000000000006 000000000007 220300000006
FT0 032226 000006 022 0 000006000000 000000000007 220300000006
FT1A 032226 000006 022 0 000006000000 000000000007 000006000000
FT9 032227 000006 022 0 000006000000 000000000007 000006000000
ET0 032227 000006 756 0 000006000000 000000000007 000006000000
SCT0 032227 000006 756 0 000006000000 000000000007 000006000000
SCT3 032227 000006 757 0 000003000000 000000000007 000006000000
SCT3 032227 000006 0 0 000001400000 000000000007 000006000000
SCT3 032227 000006 761 0 000000600000 000000000007 000006000000
SCT3 032227 000006 762 0 000000300000 000000000007 000006000000
SCT3 032227 000006 763 0 000000140000 000000000007 000006000000
SCT3 032227 000006 764 0 000000060000 000000000007 000006000000
SCT3 032227 000006 765 0 000000030000 000000000007 000006000000
SCT3 032227 000006 766 0 000000014000 000000000007 000006000000
SCT3 032227 000006 767 0 000000006000 000000000007 000006000000
SCT3 032227 000006 0 0 000000003000 000000000007 000006000000
SCT3 032227 000006 771 0 000000001400 000000000007 000006000000
SCT3 032227 000006 772 0 000000000600 000000000007 000006000000
SCT3 032227 000006 773 0 000000000300 000000000007 000006000000
SCT3 032227 000006 774 0 000000000140 000000000007 000006000000
SCT3 032227 000006 775 0 000000000060 000000000007 000006000000
SCT3 032227 000006 776 0 000000000030 000000000007 000006000000
SCT3 032227 000006 777 0 000000000014 000000000007 000006000000
SCT3 032227 000006 0 0 000000000006 000000000007 000006000000
SCT4 032227 000006 0 0 000000000006 000000000007 000006000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 68
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0330
LBT1 032227 000006 0 0 000000000006 000000000007 000006000000
ST0 032227 000006 0 0 000000000006 000000000007 000006000000
ST1 032227 000006 0 0 000000000006 000000000007 000006000000
ST2 032227 000006 0 0 000000000006 000000000007 000006000000
ST9 032227 000006 0 0 000000000006 000000000007 000006000000
*032235 LDB 7,000010
INITIAL
C(AC)=000000 000006
C(E)=220300 000005 C(C(E))=000005 000000
FINAL
C(AC)=000000 000005
C(E)=220300 000005 C(C(E))=000005 000000
TIME PC MA SC FE AR MQ BR
IT0 032235 032235 0 0 135340000010 0 000005000000
IT1 032235 0 0 0 135340000010 0 000005000000
AT3 032235 0 0 0 000000000010 0 135340000010
AT6 032235 000010 0 0 000000000010 0 135340000010
FT0 032235 000010 0 0 220300000005 0 135340000010
FT1A 032235 000010 0 0 220300000005 0 220300000005
FT9 032235 000010 0 0 220300000005 0 220300000005
ET0 032235 000010 0 0 220300000005 0 220300000005
BYT6 032235 000010 0 0 220300000005 0 220300000005
BYT7 032235 000010 775 0 220300000005 0 220300000005
SCT0 032235 000010 775 0 220300000005 0 220300000005
SCT3 032235 000010 776 0 220300000005 000000000001 220300000005
SCT3 032235 000010 777 0 220300000005 000000000003 220300000005
SCT3 032235 000010 0 0 220300000005 000000000007 220300000005
SCT4 032235 000010 0 0 220300000005 000000000007 220300000005
BYT7A 032235 000010 022 0 220300000005 000000000007 220300000005
IT1 032235 0 022 0 220300000005 000000000007 220300000005
AT3 032235 0 022 0 000000000005 000000000007 220300000005
AT6 032235 000005 022 0 000000000005 000000000007 220300000005
FT0 032235 000005 022 0 000005000000 000000000007 220300000005
FT1A 032235 000005 022 0 000005000000 000000000007 000005000000
FT9 032236 000005 022 0 000005000000 000000000007 000005000000
ET0 032236 000005 756 0 000005000000 000000000007 000005000000
SCT0 032236 000005 756 0 000005000000 000000000007 000005000000
SCT3 032236 000005 757 0 000002400000 000000000007 000005000000
SCT3 032236 000005 0 0 000001200000 000000000007 000005000000
SCT3 032236 000005 761 0 000000500000 000000000007 000005000000
SCT3 032236 000005 762 0 000000240000 000000000007 000005000000
SCT3 032236 000005 763 0 000000120000 000000000007 000005000000
SCT3 032236 000005 764 0 000000050000 000000000007 000005000000
SCT3 032236 000005 765 0 000000024000 000000000007 000005000000
SCT3 032236 000005 766 0 000000012000 000000000007 000005000000
SCT3 032236 000005 767 0 000000005000 000000000007 000005000000
SCT3 032236 000005 0 0 000000002400 000000000007 000005000000
SCT3 032236 000005 771 0 000000001200 000000000007 000005000000
SCT3 032236 000005 772 0 000000000500 000000000007 000005000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 69
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0331
SCT3 032236 000005 773 0 000000000240 000000000007 000005000000
SCT3 032236 000005 774 0 000000000120 000000000007 000005000000
SCT3 032236 000005 775 0 000000000050 000000000007 000005000000
SCT3 032236 000005 776 0 000000000024 000000000007 000005000000
SCT3 032236 000005 777 0 000000000012 000000000007 000005000000
SCT3 032236 000005 0 0 000000000005 000000000007 000005000000
SCT4 032236 000005 0 0 000000000005 000000000007 000005000000
LBT1 032236 000005 0 0 000000000005 000000000007 000005000000
ST0 032236 000005 0 0 000000000005 000000000007 000005000000
ST1 032236 000005 0 0 000000000005 000000000007 000005000000
ST2 032236 000005 0 0 000000000005 000000000007 000005000000
ST9 032236 000005 0 0 000000000005 000000000007 000005000000
*032244 LDB 7,000010
INITIAL
C(AC)=000000 000005
C(E)=220300 000004 C(C(E))=000004 000000
FINAL
C(AC)=000000 000004
C(E)=220300 000004 C(C(E))=000004 000000
TIME PC MA SC FE AR MQ BR
IT0 032244 032244 0 0 135340000010 0 000004000000
IT1 032244 0 0 0 135340000010 0 000004000000
AT3 032244 0 0 0 000000000010 0 135340000010
AT6 032244 000010 0 0 000000000010 0 135340000010
FT0 032244 000010 0 0 220300000004 0 135340000010
FT1A 032244 000010 0 0 220300000004 0 220300000004
FT9 032244 000010 0 0 220300000004 0 220300000004
ET0 032244 000010 0 0 220300000004 0 220300000004
BYT6 032244 000010 0 0 220300000004 0 220300000004
BYT7 032244 000010 775 0 220300000004 0 220300000004
SCT0 032244 000010 775 0 220300000004 0 220300000004
SCT3 032244 000010 776 0 220300000004 000000000001 220300000004
SCT3 032244 000010 777 0 220300000004 000000000003 220300000004
SCT3 032244 000010 0 0 220300000004 000000000007 220300000004
SCT4 032244 000010 0 0 220300000004 000000000007 220300000004
BYT7A 032244 000010 022 0 220300000004 000000000007 220300000004
IT1 032244 0 022 0 220300000004 000000000007 220300000004
AT3 032244 0 022 0 000000000004 000000000007 220300000004
AT6 032244 000004 022 0 000000000004 000000000007 220300000004
FT0 032244 000004 022 0 000004000000 000000000007 220300000004
FT1A 032244 000004 022 0 000004000000 000000000007 000004000000
FT9 032245 000004 022 0 000004000000 000000000007 000004000000
ET0 032245 000004 756 0 000004000000 000000000007 000004000000
SCT0 032245 000004 756 0 000004000000 000000000007 000004000000
SCT3 032245 000004 757 0 000002000000 000000000007 000004000000
SCT3 032245 000004 0 0 000001000000 000000000007 000004000000
SCT3 032245 000004 761 0 000000400000 000000000007 000004000000
SCT3 032245 000004 762 0 000000200000 000000000007 000004000000
SCT3 032245 000004 763 0 000000100000 000000000007 000004000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 70
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0332
SCT3 032245 000004 764 0 000000040000 000000000007 000004000000
SCT3 032245 000004 765 0 000000020000 000000000007 000004000000
SCT3 032245 000004 766 0 000000010000 000000000007 000004000000
SCT3 032245 000004 767 0 000000004000 000000000007 000004000000
SCT3 032245 000004 0 0 000000002000 000000000007 000004000000
SCT3 032245 000004 771 0 000000001000 000000000007 000004000000
SCT3 032245 000004 772 0 000000000400 000000000007 000004000000
SCT3 032245 000004 773 0 000000000200 000000000007 000004000000
SCT3 032245 000004 774 0 000000000100 000000000007 000004000000
SCT3 032245 000004 775 0 000000000040 000000000007 000004000000
SCT3 032245 000004 776 0 000000000020 000000000007 000004000000
SCT3 032245 000004 777 0 000000000010 000000000007 000004000000
SCT3 032245 000004 0 0 000000000004 000000000007 000004000000
SCT4 032245 000004 0 0 000000000004 000000000007 000004000000
LBT1 032245 000004 0 0 000000000004 000000000007 000004000000
ST0 032245 000004 0 0 000000000004 000000000007 000004000000
ST1 032245 000004 0 0 000000000004 000000000007 000004000000
ST2 032245 000004 0 0 000000000004 000000000007 000004000000
ST9 032245 000004 0 0 000000000004 000000000007 000004000000
*032253 LDB 7,000010
INITIAL
C(AC)=000000 000004
C(E)=220300 000003 C(C(E))=000003 000000
FINAL
C(AC)=000000 000003
C(E)=220300 000003 C(C(E))=000003 000000
TIME PC MA SC FE AR MQ BR
IT0 032253 032253 0 0 135340000010 0 000003000000
IT1 032253 0 0 0 135340000010 0 000003000000
AT3 032253 0 0 0 000000000010 0 135340000010
AT6 032253 000010 0 0 000000000010 0 135340000010
FT0 032253 000010 0 0 220300000003 0 135340000010
FT1A 032253 000010 0 0 220300000003 0 220300000003
FT9 032253 000010 0 0 220300000003 0 220300000003
ET0 032253 000010 0 0 220300000003 0 220300000003
BYT6 032253 000010 0 0 220300000003 0 220300000003
BYT7 032253 000010 775 0 220300000003 0 220300000003
SCT0 032253 000010 775 0 220300000003 0 220300000003
SCT3 032253 000010 776 0 220300000003 000000000001 220300000003
SCT3 032253 000010 777 0 220300000003 000000000003 220300000003
SCT3 032253 000010 0 0 220300000003 000000000007 220300000003
SCT4 032253 000010 0 0 220300000003 000000000007 220300000003
BYT7A 032253 000010 022 0 220300000003 000000000007 220300000003
IT1 032253 0 022 0 220300000003 000000000007 220300000003
AT3 032253 0 022 0 000000000003 000000000007 220300000003
AT6 032253 000003 022 0 000000000003 000000000007 220300000003
FT0 032253 000003 022 0 000003000000 000000000007 220300000003
FT1A 032253 000003 022 0 000003000000 000000000007 000003000000
FT9 032254 000003 022 0 000003000000 000000000007 000003000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 71
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0333
ET0 032254 000003 756 0 000003000000 000000000007 000003000000
SCT0 032254 000003 756 0 000003000000 000000000007 000003000000
SCT3 032254 000003 757 0 000001400000 000000000007 000003000000
SCT3 032254 000003 0 0 000000600000 000000000007 000003000000
SCT3 032254 000003 761 0 000000300000 000000000007 000003000000
SCT3 032254 000003 762 0 000000140000 000000000007 000003000000
SCT3 032254 000003 763 0 000000060000 000000000007 000003000000
SCT3 032254 000003 764 0 000000030000 000000000007 000003000000
SCT3 032254 000003 765 0 000000014000 000000000007 000003000000
SCT3 032254 000003 766 0 000000006000 000000000007 000003000000
SCT3 032254 000003 767 0 000000003000 000000000007 000003000000
SCT3 032254 000003 0 0 000000001400 000000000007 000003000000
SCT3 032254 000003 771 0 000000000600 000000000007 000003000000
SCT3 032254 000003 772 0 000000000300 000000000007 000003000000
SCT3 032254 000003 773 0 000000000140 000000000007 000003000000
SCT3 032254 000003 774 0 000000000060 000000000007 000003000000
SCT3 032254 000003 775 0 000000000030 000000000007 000003000000
SCT3 032254 000003 776 0 000000000014 000000000007 000003000000
SCT3 032254 000003 777 0 000000000006 000000000007 000003000000
SCT3 032254 000003 0 0 000000000003 000000000007 000003000000
SCT4 032254 000003 0 0 000000000003 000000000007 000003000000
LBT1 032254 000003 0 0 000000000003 000000000007 000003000000
ST0 032254 000003 0 0 000000000003 000000000007 000003000000
ST1 032254 000003 0 0 000000000003 000000000007 000003000000
ST2 032254 000003 0 0 000000000003 000000000007 000003000000
ST9 032254 000003 0 0 000000000003 000000000007 000003000000
*032262 LDB 7,000010
INITIAL
C(AC)=000000 000003
C(E)=220300 000002 C(C(E))=000002 000000
FINAL
C(AC)=000000 000002
C(E)=220300 000002 C(C(E))=000002 000000
TIME PC MA SC FE AR MQ BR
IT0 032262 032262 0 0 135340000010 0 000002000000
IT1 032262 0 0 0 135340000010 0 000002000000
AT3 032262 0 0 0 000000000010 0 135340000010
AT6 032262 000010 0 0 000000000010 0 135340000010
FT0 032262 000010 0 0 220300000002 0 135340000010
FT1A 032262 000010 0 0 220300000002 0 220300000002
FT9 032262 000010 0 0 220300000002 0 220300000002
ET0 032262 000010 0 0 220300000002 0 220300000002
BYT6 032262 000010 0 0 220300000002 0 220300000002
BYT7 032262 000010 775 0 220300000002 0 220300000002
SCT0 032262 000010 775 0 220300000002 0 220300000002
SCT3 032262 000010 776 0 220300000002 000000000001 220300000002
SCT3 032262 000010 777 0 220300000002 000000000003 220300000002
SCT3 032262 000010 0 0 220300000002 000000000007 220300000002
SCT4 032262 000010 0 0 220300000002 000000000007 220300000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 72
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0334
BYT7A 032262 000010 022 0 220300000002 000000000007 220300000002
IT1 032262 0 022 0 220300000002 000000000007 220300000002
AT3 032262 0 022 0 000000000002 000000000007 220300000002
AT6 032262 000002 022 0 000000000002 000000000007 220300000002
FT0 032262 000002 022 0 000002000000 000000000007 220300000002
FT1A 032262 000002 022 0 000002000000 000000000007 000002000000
FT9 032263 000002 022 0 000002000000 000000000007 000002000000
ET0 032263 000002 756 0 000002000000 000000000007 000002000000
SCT0 032263 000002 756 0 000002000000 000000000007 000002000000
SCT3 032263 000002 757 0 000001000000 000000000007 000002000000
SCT3 032263 000002 0 0 000000400000 000000000007 000002000000
SCT3 032263 000002 761 0 000000200000 000000000007 000002000000
SCT3 032263 000002 762 0 000000100000 000000000007 000002000000
SCT3 032263 000002 763 0 000000040000 000000000007 000002000000
SCT3 032263 000002 764 0 000000020000 000000000007 000002000000
SCT3 032263 000002 765 0 000000010000 000000000007 000002000000
SCT3 032263 000002 766 0 000000004000 000000000007 000002000000
SCT3 032263 000002 767 0 000000002000 000000000007 000002000000
SCT3 032263 000002 0 0 000000001000 000000000007 000002000000
SCT3 032263 000002 771 0 000000000400 000000000007 000002000000
SCT3 032263 000002 772 0 000000000200 000000000007 000002000000
SCT3 032263 000002 773 0 000000000100 000000000007 000002000000
SCT3 032263 000002 774 0 000000000040 000000000007 000002000000
SCT3 032263 000002 775 0 000000000020 000000000007 000002000000
SCT3 032263 000002 776 0 000000000010 000000000007 000002000000
SCT3 032263 000002 777 0 000000000004 000000000007 000002000000
SCT3 032263 000002 0 0 000000000002 000000000007 000002000000
SCT4 032263 000002 0 0 000000000002 000000000007 000002000000
LBT1 032263 000002 0 0 000000000002 000000000007 000002000000
ST0 032263 000002 0 0 000000000002 000000000007 000002000000
ST1 032263 000002 0 0 000000000002 000000000007 000002000000
ST2 032263 000002 0 0 000000000002 000000000007 000002000000
ST9 032263 000002 0 0 000000000002 000000000007 000002000000
*032275 LDB 10,000000(1)
INITIAL
C(AC)=220300 000002
C(E)=000300 000000 C(C(E))=000300 000000
FINAL
C(AC)=000000 000001
C(E)=000300 000001 C(C(E))=000300 000001
TIME PC MA SC FE AR MQ BR
IT0 032275 032275 0 0 135401000000 0 000300000001
IT1 032275 0 0 0 135401000000 0 000300000001
AT1 032275 0 0 0 0 0 135401000000
AT2 032275 0 0 0 000300000001 0 135401000000
AT3 032275 0 0 0 000000000001 0 000300000001
AT6 032275 000001 0 0 000000000001 0 000300000001
FT0 032275 000001 0 0 000300000001 0 000300000001
FT1A 032275 000001 0 0 000300000001 0 000300000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 73
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0335
FT9 032275 000001 0 0 000300000001 0 000300000001
ET0 032275 000001 0 0 000300000001 0 000300000001
BYT6 032275 000001 0 0 000300000001 0 000300000001
BYT7 032275 000001 775 0 000300000001 0 000300000001
SCT0 032275 000001 775 0 000300000001 0 000300000001
SCT3 032275 000001 776 0 000300000001 000000000001 000300000001
SCT3 032275 000001 777 0 000300000001 000000000003 000300000001
SCT3 032275 000001 0 0 000300000001 000000000007 000300000001
SCT4 032275 000001 0 0 000300000001 000000000007 000300000001
BYT7A 032275 000001 0 0 000300000001 000000000007 000300000001
IT1 032275 0 0 0 000300000001 000000000007 000300000001
AT3 032275 0 0 0 000000000001 000000000007 000300000001
AT6 032275 000001 0 0 000000000001 000000000007 000300000001
FT0 032275 000001 0 0 000300000001 000000000007 000300000001
FT1A 032275 000001 0 0 000300000001 000000000007 000300000001
FT9 032276 000001 0 0 000300000001 000000000007 000300000001
ET0 032276 000001 0 0 000300000001 000000000007 000300000001
SCT0 032276 000001 0 0 000300000001 000000000007 000300000001
SCT4 032276 000001 0 0 000300000001 000000000007 000300000001
LBT1 032276 000001 0 0 000000000001 000000000007 000300000001
ST0 032276 000001 0 0 000000000001 000000000007 000300000001
ST1 032276 000001 0 0 000000000001 000000000007 000300000001
ST2 032276 000001 0 0 000000000001 000000000007 000300000001
ST9 032276 000001 0 0 000000000001 000000000007 000300000001
*032304 LDB 10,000000(2)
INITIAL
C(AC)=000000 000001
C(E)=000300 000000 C(C(E))=000300 000000
FINAL
C(AC)=000000 000002
C(E)=000300 000002 C(C(E))=000300 000002
TIME PC MA SC FE AR MQ BR
IT0 032304 032304 0 0 135402000000 0 000300000002
IT1 032304 0 0 0 135402000000 0 000300000002
AT1 032304 0 0 0 0 0 135402000000
AT2 032304 0 0 0 000300000002 0 135402000000
AT3 032304 0 0 0 000000000002 0 000300000002
AT6 032304 000002 0 0 000000000002 0 000300000002
FT0 032304 000002 0 0 000300000002 0 000300000002
FT1A 032304 000002 0 0 000300000002 0 000300000002
FT9 032304 000002 0 0 000300000002 0 000300000002
ET0 032304 000002 0 0 000300000002 0 000300000002
BYT6 032304 000002 0 0 000300000002 0 000300000002
BYT7 032304 000002 775 0 000300000002 0 000300000002
SCT0 032304 000002 775 0 000300000002 0 000300000002
SCT3 032304 000002 776 0 000300000002 000000000001 000300000002
SCT3 032304 000002 777 0 000300000002 000000000003 000300000002
SCT3 032304 000002 0 0 000300000002 000000000007 000300000002
SCT4 032304 000002 0 0 000300000002 000000000007 000300000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 74
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0336
BYT7A 032304 000002 0 0 000300000002 000000000007 000300000002
IT1 032304 0 0 0 000300000002 000000000007 000300000002
AT3 032304 0 0 0 000000000002 000000000007 000300000002
AT6 032304 000002 0 0 000000000002 000000000007 000300000002
FT0 032304 000002 0 0 000300000002 000000000007 000300000002
FT1A 032304 000002 0 0 000300000002 000000000007 000300000002
FT9 032305 000002 0 0 000300000002 000000000007 000300000002
ET0 032305 000002 0 0 000300000002 000000000007 000300000002
SCT0 032305 000002 0 0 000300000002 000000000007 000300000002
SCT4 032305 000002 0 0 000300000002 000000000007 000300000002
LBT1 032305 000002 0 0 000000000002 000000000007 000300000002
ST0 032305 000002 0 0 000000000002 000000000007 000300000002
ST1 032305 000002 0 0 000000000002 000000000007 000300000002
ST2 032305 000002 0 0 000000000002 000000000007 000300000002
ST9 032305 000002 0 0 000000000002 000000000007 000300000002
*032313 LDB 10,000000(3)
INITIAL
C(AC)=000000 000002
C(E)=000300 000000 C(C(E))=000300 000000
FINAL
C(AC)=000000 000003
C(E)=000300 000003 C(C(E))=000300 000003
TIME PC MA SC FE AR MQ BR
IT0 032313 032313 0 0 135403000000 0 000300000003
IT1 032313 0 0 0 135403000000 0 000300000003
AT1 032313 0 0 0 0 0 135403000000
AT2 032313 0 0 0 000300000003 0 135403000000
AT3 032313 0 0 0 000000000003 0 000300000003
AT6 032313 000003 0 0 000000000003 0 000300000003
FT0 032313 000003 0 0 000300000003 0 000300000003
FT1A 032313 000003 0 0 000300000003 0 000300000003
FT9 032313 000003 0 0 000300000003 0 000300000003
ET0 032313 000003 0 0 000300000003 0 000300000003
BYT6 032313 000003 0 0 000300000003 0 000300000003
BYT7 032313 000003 775 0 000300000003 0 000300000003
SCT0 032313 000003 775 0 000300000003 0 000300000003
SCT3 032313 000003 776 0 000300000003 000000000001 000300000003
SCT3 032313 000003 777 0 000300000003 000000000003 000300000003
SCT3 032313 000003 0 0 000300000003 000000000007 000300000003
SCT4 032313 000003 0 0 000300000003 000000000007 000300000003
BYT7A 032313 000003 0 0 000300000003 000000000007 000300000003
IT1 032313 0 0 0 000300000003 000000000007 000300000003
AT3 032313 0 0 0 000000000003 000000000007 000300000003
AT6 032313 000003 0 0 000000000003 000000000007 000300000003
FT0 032313 000003 0 0 000300000003 000000000007 000300000003
FT1A 032313 000003 0 0 000300000003 000000000007 000300000003
FT9 032314 000003 0 0 000300000003 000000000007 000300000003
ET0 032314 000003 0 0 000300000003 000000000007 000300000003
SCT0 032314 000003 0 0 000300000003 000000000007 000300000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 75
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0337
SCT4 032314 000003 0 0 000300000003 000000000007 000300000003
LBT1 032314 000003 0 0 000000000003 000000000007 000300000003
ST0 032314 000003 0 0 000000000003 000000000007 000300000003
ST1 032314 000003 0 0 000000000003 000000000007 000300000003
ST2 032314 000003 0 0 000000000003 000000000007 000300000003
ST9 032314 000003 0 0 000000000003 000000000007 000300000003
*032322 LDB 10,000000(4)
INITIAL
C(AC)=000000 000003
C(E)=000300 000000 C(C(E))=000300 000000
FINAL
C(AC)=000000 000004
C(E)=000300 000004 C(C(E))=000300 000004
TIME PC MA SC FE AR MQ BR
IT0 032322 032322 0 0 135404000000 0 000300000004
IT1 032322 0 0 0 135404000000 0 000300000004
AT1 032322 0 0 0 0 0 135404000000
AT2 032322 0 0 0 000300000004 0 135404000000
AT3 032322 0 0 0 000000000004 0 000300000004
AT6 032322 000004 0 0 000000000004 0 000300000004
FT0 032322 000004 0 0 000300000004 0 000300000004
FT1A 032322 000004 0 0 000300000004 0 000300000004
FT9 032322 000004 0 0 000300000004 0 000300000004
ET0 032322 000004 0 0 000300000004 0 000300000004
BYT6 032322 000004 0 0 000300000004 0 000300000004
BYT7 032322 000004 775 0 000300000004 0 000300000004
SCT0 032322 000004 775 0 000300000004 0 000300000004
SCT3 032322 000004 776 0 000300000004 000000000001 000300000004
SCT3 032322 000004 777 0 000300000004 000000000003 000300000004
SCT3 032322 000004 0 0 000300000004 000000000007 000300000004
SCT4 032322 000004 0 0 000300000004 000000000007 000300000004
BYT7A 032322 000004 0 0 000300000004 000000000007 000300000004
IT1 032322 0 0 0 000300000004 000000000007 000300000004
AT3 032322 0 0 0 000000000004 000000000007 000300000004
AT6 032322 000004 0 0 000000000004 000000000007 000300000004
FT0 032322 000004 0 0 000300000004 000000000007 000300000004
FT1A 032322 000004 0 0 000300000004 000000000007 000300000004
FT9 032323 000004 0 0 000300000004 000000000007 000300000004
ET0 032323 000004 0 0 000300000004 000000000007 000300000004
SCT0 032323 000004 0 0 000300000004 000000000007 000300000004
SCT4 032323 000004 0 0 000300000004 000000000007 000300000004
LBT1 032323 000004 0 0 000000000004 000000000007 000300000004
ST0 032323 000004 0 0 000000000004 000000000007 000300000004
ST1 032323 000004 0 0 000000000004 000000000007 000300000004
ST2 032323 000004 0 0 000000000004 000000000007 000300000004
ST9 032323 000004 0 0 000000000004 000000000007 000300000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 76
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0338
*032331 LDB 10,000000(5)
INITIAL
C(AC)=000000 000004
C(E)=000300 000000 C(C(E))=000300 000000
FINAL
C(AC)=000000 000005
C(E)=000300 000005 C(C(E))=000300 000005
TIME PC MA SC FE AR MQ BR
IT0 032331 032331 0 0 135405000000 0 000300000005
IT1 032331 0 0 0 135405000000 0 000300000005
AT1 032331 0 0 0 0 0 135405000000
AT2 032331 0 0 0 000300000005 0 135405000000
AT3 032331 0 0 0 000000000005 0 000300000005
AT6 032331 000005 0 0 000000000005 0 000300000005
FT0 032331 000005 0 0 000300000005 0 000300000005
FT1A 032331 000005 0 0 000300000005 0 000300000005
FT9 032331 000005 0 0 000300000005 0 000300000005
ET0 032331 000005 0 0 000300000005 0 000300000005
BYT6 032331 000005 0 0 000300000005 0 000300000005
BYT7 032331 000005 775 0 000300000005 0 000300000005
SCT0 032331 000005 775 0 000300000005 0 000300000005
SCT3 032331 000005 776 0 000300000005 000000000001 000300000005
SCT3 032331 000005 777 0 000300000005 000000000003 000300000005
SCT3 032331 000005 0 0 000300000005 000000000007 000300000005
SCT4 032331 000005 0 0 000300000005 000000000007 000300000005
BYT7A 032331 000005 0 0 000300000005 000000000007 000300000005
IT1 032331 0 0 0 000300000005 000000000007 000300000005
AT3 032331 0 0 0 000000000005 000000000007 000300000005
AT6 032331 000005 0 0 000000000005 000000000007 000300000005
FT0 032331 000005 0 0 000300000005 000000000007 000300000005
FT1A 032331 000005 0 0 000300000005 000000000007 000300000005
FT9 032332 000005 0 0 000300000005 000000000007 000300000005
ET0 032332 000005 0 0 000300000005 000000000007 000300000005
SCT0 032332 000005 0 0 000300000005 000000000007 000300000005
SCT4 032332 000005 0 0 000300000005 000000000007 000300000005
LBT1 032332 000005 0 0 000000000005 000000000007 000300000005
ST0 032332 000005 0 0 000000000005 000000000007 000300000005
ST1 032332 000005 0 0 000000000005 000000000007 000300000005
ST2 032332 000005 0 0 000000000005 000000000007 000300000005
ST9 032332 000005 0 0 000000000005 000000000007 000300000005
*032346 LDB 7,@000010
INITIAL
C(AC)=000000 000002
C(E)=440300 000001 C(C(E))=000300 000001
FINAL
C(AC)=000000 000001
C(E)=000300 000001 C(C(E))=000300 000001
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 77
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0339
IT0 032346 032346 0 0 135360000010 0 000300000001
IT1 032346 0 0 0 135360000010 0 000300000001
AT3 032346 0 0 0 000000000010 0 135360000010
AT4 032346 000010 0 0 440300000001 0 135360000010
IT1 032346 0 0 0 440300000001 0 135360000010
AT3 032346 0 0 0 000000000001 0 440300000001
AT6 032346 000001 0 0 000000000001 0 440300000001
FT0 032346 000001 0 0 000300000001 0 440300000001
FT1A 032346 000001 0 0 000300000001 0 000300000001
FT9 032346 000001 0 0 000300000001 0 000300000001
ET0 032346 000001 0 0 000300000001 0 000300000001
BYT6 032346 000001 0 0 000300000001 0 000300000001
BYT7 032346 000001 775 0 000300000001 0 000300000001
SCT0 032346 000001 775 0 000300000001 0 000300000001
SCT3 032346 000001 776 0 000300000001 000000000001 000300000001
SCT3 032346 000001 777 0 000300000001 000000000003 000300000001
SCT3 032346 000001 0 0 000300000001 000000000007 000300000001
SCT4 032346 000001 0 0 000300000001 000000000007 000300000001
BYT7A 032346 000001 0 0 000300000001 000000000007 000300000001
IT1 032346 0 0 0 000300000001 000000000007 000300000001
AT3 032346 0 0 0 000000000001 000000000007 000300000001
AT6 032346 000001 0 0 000000000001 000000000007 000300000001
FT0 032346 000001 0 0 000300000001 000000000007 000300000001
FT1A 032346 000001 0 0 000300000001 000000000007 000300000001
FT9 032347 000001 0 0 000300000001 000000000007 000300000001
ET0 032347 000001 0 0 000300000001 000000000007 000300000001
SCT0 032347 000001 0 0 000300000001 000000000007 000300000001
SCT4 032347 000001 0 0 000300000001 000000000007 000300000001
LBT1 032347 000001 0 0 000000000001 000000000007 000300000001
ST0 032347 000001 0 0 000000000001 000000000007 000300000001
ST1 032347 000001 0 0 000000000001 000000000007 000300000001
ST2 032347 000001 0 0 000000000001 000000000007 000300000001
ST9 032347 000001 0 0 000000000001 000000000007 000300000001
*032357 LDB 7,@000010
INITIAL
C(AC)=000000 000001
C(E)=440300 000002 C(C(E))=000300 000002
FINAL
C(AC)=000000 000002
C(E)=000300 000002 C(C(E))=000300 000002
TIME PC MA SC FE AR MQ BR
IT0 032357 032357 0 0 135360000010 0 000300000002
IT1 032357 0 0 0 135360000010 0 000300000002
AT3 032357 0 0 0 000000000010 0 135360000010
AT4 032357 000010 0 0 440300000002 0 135360000010
IT1 032357 0 0 0 440300000002 0 135360000010
AT3 032357 0 0 0 000000000002 0 440300000002
AT6 032357 000002 0 0 000000000002 0 440300000002
FT0 032357 000002 0 0 000300000002 0 440300000002
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 78
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0340
FT1A 032357 000002 0 0 000300000002 0 000300000002
FT9 032357 000002 0 0 000300000002 0 000300000002
ET0 032357 000002 0 0 000300000002 0 000300000002
BYT6 032357 000002 0 0 000300000002 0 000300000002
BYT7 032357 000002 775 0 000300000002 0 000300000002
SCT0 032357 000002 775 0 000300000002 0 000300000002
SCT3 032357 000002 776 0 000300000002 000000000001 000300000002
SCT3 032357 000002 777 0 000300000002 000000000003 000300000002
SCT3 032357 000002 0 0 000300000002 000000000007 000300000002
SCT4 032357 000002 0 0 000300000002 000000000007 000300000002
BYT7A 032357 000002 0 0 000300000002 000000000007 000300000002
IT1 032357 0 0 0 000300000002 000000000007 000300000002
AT3 032357 0 0 0 000000000002 000000000007 000300000002
AT6 032357 000002 0 0 000000000002 000000000007 000300000002
FT0 032357 000002 0 0 000300000002 000000000007 000300000002
FT1A 032357 000002 0 0 000300000002 000000000007 000300000002
FT9 032360 000002 0 0 000300000002 000000000007 000300000002
ET0 032360 000002 0 0 000300000002 000000000007 000300000002
SCT0 032360 000002 0 0 000300000002 000000000007 000300000002
SCT4 032360 000002 0 0 000300000002 000000000007 000300000002
LBT1 032360 000002 0 0 000000000002 000000000007 000300000002
ST0 032360 000002 0 0 000000000002 000000000007 000300000002
ST1 032360 000002 0 0 000000000002 000000000007 000300000002
ST2 032360 000002 0 0 000000000002 000000000007 000300000002
ST9 032360 000002 0 0 000000000002 000000000007 000300000002
*032370 LDB 7,@000010
INITIAL
C(AC)=000000 000002
C(E)=440300 000003 C(C(E))=000300 000003
FINAL
C(AC)=000000 000003
C(E)=000300 000003 C(C(E))=000300 000003
TIME PC MA SC FE AR MQ BR
IT0 032370 032370 0 0 135360000010 0 000300000003
IT1 032370 0 0 0 135360000010 0 000300000003
AT3 032370 0 0 0 000000000010 0 135360000010
AT4 032370 000010 0 0 440300000003 0 135360000010
IT1 032370 0 0 0 440300000003 0 135360000010
AT3 032370 0 0 0 000000000003 0 440300000003
AT6 032370 000003 0 0 000000000003 0 440300000003
FT0 032370 000003 0 0 000300000003 0 440300000003
FT1A 032370 000003 0 0 000300000003 0 000300000003
FT9 032370 000003 0 0 000300000003 0 000300000003
ET0 032370 000003 0 0 000300000003 0 000300000003
BYT6 032370 000003 0 0 000300000003 0 000300000003
BYT7 032370 000003 775 0 000300000003 0 000300000003
SCT0 032370 000003 775 0 000300000003 0 000300000003
SCT3 032370 000003 776 0 000300000003 000000000001 000300000003
SCT3 032370 000003 777 0 000300000003 000000000003 000300000003
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 79
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0341
SCT3 032370 000003 0 0 000300000003 000000000007 000300000003
SCT4 032370 000003 0 0 000300000003 000000000007 000300000003
BYT7A 032370 000003 0 0 000300000003 000000000007 000300000003
IT1 032370 0 0 0 000300000003 000000000007 000300000003
AT3 032370 0 0 0 000000000003 000000000007 000300000003
AT6 032370 000003 0 0 000000000003 000000000007 000300000003
FT0 032370 000003 0 0 000300000003 000000000007 000300000003
FT1A 032370 000003 0 0 000300000003 000000000007 000300000003
FT9 032371 000003 0 0 000300000003 000000000007 000300000003
ET0 032371 000003 0 0 000300000003 000000000007 000300000003
SCT0 032371 000003 0 0 000300000003 000000000007 000300000003
SCT4 032371 000003 0 0 000300000003 000000000007 000300000003
LBT1 032371 000003 0 0 000000000003 000000000007 000300000003
ST0 032371 000003 0 0 000000000003 000000000007 000300000003
ST1 032371 000003 0 0 000000000003 000000000007 000300000003
ST2 032371 000003 0 0 000000000003 000000000007 000300000003
ST9 032371 000003 0 0 000000000003 000000000007 000300000003
*032401 LDB 7,@000010
INITIAL
C(AC)=000000 000003
C(E)=440300 000004 C(C(E))=000300 000004
FINAL
C(AC)=000000 000004
C(E)=000300 000004 C(C(E))=000300 000004
TIME PC MA SC FE AR MQ BR
IT0 032401 032401 0 0 135360000010 0 000300000004
IT1 032401 0 0 0 135360000010 0 000300000004
AT3 032401 0 0 0 000000000010 0 135360000010
AT4 032401 000010 0 0 440300000004 0 135360000010
IT1 032401 0 0 0 440300000004 0 135360000010
AT3 032401 0 0 0 000000000004 0 440300000004
AT6 032401 000004 0 0 000000000004 0 440300000004
FT0 032401 000004 0 0 000300000004 0 440300000004
FT1A 032401 000004 0 0 000300000004 0 000300000004
FT9 032401 000004 0 0 000300000004 0 000300000004
ET0 032401 000004 0 0 000300000004 0 000300000004
BYT6 032401 000004 0 0 000300000004 0 000300000004
BYT7 032401 000004 775 0 000300000004 0 000300000004
SCT0 032401 000004 775 0 000300000004 0 000300000004
SCT3 032401 000004 776 0 000300000004 000000000001 000300000004
SCT3 032401 000004 777 0 000300000004 000000000003 000300000004
SCT3 032401 000004 0 0 000300000004 000000000007 000300000004
SCT4 032401 000004 0 0 000300000004 000000000007 000300000004
BYT7A 032401 000004 0 0 000300000004 000000000007 000300000004
IT1 032401 0 0 0 000300000004 000000000007 000300000004
AT3 032401 0 0 0 000000000004 000000000007 000300000004
AT6 032401 000004 0 0 000000000004 000000000007 000300000004
FT0 032401 000004 0 0 000300000004 000000000007 000300000004
FT1A 032401 000004 0 0 000300000004 000000000007 000300000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 80
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0342
FT9 032402 000004 0 0 000300000004 000000000007 000300000004
ET0 032402 000004 0 0 000300000004 000000000007 000300000004
SCT0 032402 000004 0 0 000300000004 000000000007 000300000004
SCT4 032402 000004 0 0 000300000004 000000000007 000300000004
LBT1 032402 000004 0 0 000000000004 000000000007 000300000004
ST0 032402 000004 0 0 000000000004 000000000007 000300000004
ST1 032402 000004 0 0 000000000004 000000000007 000300000004
ST2 032402 000004 0 0 000000000004 000000000007 000300000004
ST9 032402 000004 0 0 000000000004 000000000007 000300000004
*032412 LDB 7,@000010
INITIAL
C(AC)=000000 000004
C(E)=440300 000005 C(C(E))=000300 000005
FINAL
C(AC)=000000 000005
C(E)=000300 000005 C(C(E))=000300 000005
TIME PC MA SC FE AR MQ BR
IT0 032412 032412 0 0 135360000010 0 000300000005
IT1 032412 0 0 0 135360000010 0 000300000005
AT3 032412 0 0 0 000000000010 0 135360000010
AT4 032412 000010 0 0 440300000005 0 135360000010
IT1 032412 0 0 0 440300000005 0 135360000010
AT3 032412 0 0 0 000000000005 0 440300000005
AT6 032412 000005 0 0 000000000005 0 440300000005
FT0 032412 000005 0 0 000300000005 0 440300000005
FT1A 032412 000005 0 0 000300000005 0 000300000005
FT9 032412 000005 0 0 000300000005 0 000300000005
ET0 032412 000005 0 0 000300000005 0 000300000005
BYT6 032412 000005 0 0 000300000005 0 000300000005
BYT7 032412 000005 775 0 000300000005 0 000300000005
SCT0 032412 000005 775 0 000300000005 0 000300000005
SCT3 032412 000005 776 0 000300000005 000000000001 000300000005
SCT3 032412 000005 777 0 000300000005 000000000003 000300000005
SCT3 032412 000005 0 0 000300000005 000000000007 000300000005
SCT4 032412 000005 0 0 000300000005 000000000007 000300000005
BYT7A 032412 000005 0 0 000300000005 000000000007 000300000005
IT1 032412 0 0 0 000300000005 000000000007 000300000005
AT3 032412 0 0 0 000000000005 000000000007 000300000005
AT6 032412 000005 0 0 000000000005 000000000007 000300000005
FT0 032412 000005 0 0 000300000005 000000000007 000300000005
FT1A 032412 000005 0 0 000300000005 000000000007 000300000005
FT9 032413 000005 0 0 000300000005 000000000007 000300000005
ET0 032413 000005 0 0 000300000005 000000000007 000300000005
SCT0 032413 000005 0 0 000300000005 000000000007 000300000005
SCT4 032413 000005 0 0 000300000005 000000000007 000300000005
LBT1 032413 000005 0 0 000000000005 000000000007 000300000005
ST0 032413 000005 0 0 000000000005 000000000007 000300000005
ST1 032413 000005 0 0 000000000005 000000000007 000300000005
ST2 032413 000005 0 0 000000000005 000000000007 000300000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 81
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0343
ST9 032413 000005 0 0 000000000005 000000000007 000300000005
*032426 LDB 10,@000000(4)
INITIAL
C(AC)=440300 000005
C(E)=000000 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000012
C(E)=000600 000012 C(C(E))=000600 000012
TIME PC MA SC FE AR MQ BR
IT0 032426 032426 0 0 135424000000 0 000600000012
IT1 032426 0 0 0 135424000000 0 000600000012
AT1 032426 0 0 0 0 0 135424000000
AT2 032426 0 0 0 000000000007 0 135424000000
AT3 032426 0 0 0 000000000007 0 000000000007
AT4 032426 000007 0 0 000000000012 0 000000000007
IT1 032426 0 0 0 000000000012 0 000000000007
AT3 032426 0 0 0 000000000012 0 000000000012
AT6 032426 000012 0 0 000000000012 0 000000000012
FT0 032426 000012 0 0 000600000012 0 000000000012
FT1A 032426 000012 0 0 000600000012 0 000600000012
FT9 032426 000012 0 0 000600000012 0 000600000012
ET0 032426 000012 0 0 000600000012 0 000600000012
BYT6 032426 000012 0 0 000600000012 0 000600000012
BYT7 032426 000012 772 0 000600000012 0 000600000012
SCT0 032426 000012 772 0 000600000012 0 000600000012
SCT3 032426 000012 773 0 000600000012 000000000001 000600000012
SCT3 032426 000012 774 0 000600000012 000000000003 000600000012
SCT3 032426 000012 775 0 000600000012 000000000007 000600000012
SCT3 032426 000012 776 0 000600000012 000000000017 000600000012
SCT3 032426 000012 777 0 000600000012 000000000037 000600000012
SCT3 032426 000012 0 0 000600000012 000000000077 000600000012
SCT4 032426 000012 0 0 000600000012 000000000077 000600000012
BYT7A 032426 000012 0 0 000600000012 000000000077 000600000012
IT1 032426 0 0 0 000600000012 000000000077 000600000012
AT3 032426 0 0 0 000000000012 000000000077 000600000012
AT6 032426 000012 0 0 000000000012 000000000077 000600000012
FT0 032426 000012 0 0 000600000012 000000000077 000600000012
FT1A 032426 000012 0 0 000600000012 000000000077 000600000012
FT9 032427 000012 0 0 000600000012 000000000077 000600000012
ET0 032427 000012 0 0 000600000012 000000000077 000600000012
SCT0 032427 000012 0 0 000600000012 000000000077 000600000012
SCT4 032427 000012 0 0 000600000012 000000000077 000600000012
LBT1 032427 000012 0 0 000000000012 000000000077 000600000012
ST0 032427 000012 0 0 000000000012 000000000077 000600000012
ST1 032427 000012 0 0 000000000012 000000000077 000600000012
ST2 032427 000012 0 0 000000000012 000000000077 000600000012
ST9 032427 000012 0 0 000000000012 000000000077 000600000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 82
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0344
*032436 LDB 10,@000000(5)
INITIAL
C(AC)=000000 000013
C(E)=000000 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000013
C(E)=000600 000013 C(C(E))=000600 000013
TIME PC MA SC FE AR MQ BR
IT0 032436 032436 0 0 135425000000 0 000600000013
IT1 032436 0 0 0 135425000000 0 000600000013
AT1 032436 0 0 0 0 0 135425000000
AT2 032436 0 0 0 000000000010 0 135425000000
AT3 032436 0 0 0 000000000010 0 000000000010
AT4 032436 000010 0 0 000000000013 0 000000000010
IT1 032436 0 0 0 000000000013 0 000000000010
AT3 032436 0 0 0 000000000013 0 000000000013
AT6 032436 000013 0 0 000000000013 0 000000000013
FT0 032436 000013 0 0 000600000013 0 000000000013
FT1A 032436 000013 0 0 000600000013 0 000600000013
FT9 032436 000013 0 0 000600000013 0 000600000013
ET0 032436 000013 0 0 000600000013 0 000600000013
BYT6 032436 000013 0 0 000600000013 0 000600000013
BYT7 032436 000013 772 0 000600000013 0 000600000013
SCT0 032436 000013 772 0 000600000013 0 000600000013
SCT3 032436 000013 773 0 000600000013 000000000001 000600000013
SCT3 032436 000013 774 0 000600000013 000000000003 000600000013
SCT3 032436 000013 775 0 000600000013 000000000007 000600000013
SCT3 032436 000013 776 0 000600000013 000000000017 000600000013
SCT3 032436 000013 777 0 000600000013 000000000037 000600000013
SCT3 032436 000013 0 0 000600000013 000000000077 000600000013
SCT4 032436 000013 0 0 000600000013 000000000077 000600000013
BYT7A 032436 000013 0 0 000600000013 000000000077 000600000013
IT1 032436 0 0 0 000600000013 000000000077 000600000013
AT3 032436 0 0 0 000000000013 000000000077 000600000013
AT6 032436 000013 0 0 000000000013 000000000077 000600000013
FT0 032436 000013 0 0 000600000013 000000000077 000600000013
FT1A 032436 000013 0 0 000600000013 000000000077 000600000013
FT9 032437 000013 0 0 000600000013 000000000077 000600000013
ET0 032437 000013 0 0 000600000013 000000000077 000600000013
SCT0 032437 000013 0 0 000600000013 000000000077 000600000013
SCT4 032437 000013 0 0 000600000013 000000000077 000600000013
LBT1 032437 000013 0 0 000000000013 000000000077 000600000013
ST0 032437 000013 0 0 000000000013 000000000077 000600000013
ST1 032437 000013 0 0 000000000013 000000000077 000600000013
ST2 032437 000013 0 0 000000000013 000000000077 000600000013
ST9 032437 000013 0 0 000000000013 000000000077 000600000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 83
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0345
*032446 LDB 10,@000000(6)
INITIAL
C(AC)=000000 000013
C(E)=000000 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000014
C(E)=000600 000014 C(C(E))=000600 000014
TIME PC MA SC FE AR MQ BR
IT0 032446 032446 0 0 135426000000 0 000600000014
IT1 032446 0 0 0 135426000000 0 000600000014
AT1 032446 0 0 0 0 0 135426000000
AT2 032446 0 0 0 000000000011 0 135426000000
AT3 032446 0 0 0 000000000011 0 000000000011
AT4 032446 000011 0 0 000000000014 0 000000000011
IT1 032446 0 0 0 000000000014 0 000000000011
AT3 032446 0 0 0 000000000014 0 000000000014
AT6 032446 000014 0 0 000000000014 0 000000000014
FT0 032446 000014 0 0 000600000014 0 000000000014
FT1A 032446 000014 0 0 000600000014 0 000600000014
FT9 032446 000014 0 0 000600000014 0 000600000014
ET0 032446 000014 0 0 000600000014 0 000600000014
BYT6 032446 000014 0 0 000600000014 0 000600000014
BYT7 032446 000014 772 0 000600000014 0 000600000014
SCT0 032446 000014 772 0 000600000014 0 000600000014
SCT3 032446 000014 773 0 000600000014 000000000001 000600000014
SCT3 032446 000014 774 0 000600000014 000000000003 000600000014
SCT3 032446 000014 775 0 000600000014 000000000007 000600000014
SCT3 032446 000014 776 0 000600000014 000000000017 000600000014
SCT3 032446 000014 777 0 000600000014 000000000037 000600000014
SCT3 032446 000014 0 0 000600000014 000000000077 000600000014
SCT4 032446 000014 0 0 000600000014 000000000077 000600000014
BYT7A 032446 000014 0 0 000600000014 000000000077 000600000014
IT1 032446 0 0 0 000600000014 000000000077 000600000014
AT3 032446 0 0 0 000000000014 000000000077 000600000014
AT6 032446 000014 0 0 000000000014 000000000077 000600000014
FT0 032446 000014 0 0 000600000014 000000000077 000600000014
FT1A 032446 000014 0 0 000600000014 000000000077 000600000014
FT9 032447 000014 0 0 000600000014 000000000077 000600000014
ET0 032447 000014 0 0 000600000014 000000000077 000600000014
SCT0 032447 000014 0 0 000600000014 000000000077 000600000014
SCT4 032447 000014 0 0 000600000014 000000000077 000600000014
LBT1 032447 000014 0 0 000000000014 000000000077 000600000014
ST0 032447 000014 0 0 000000000014 000000000077 000600000014
ST1 032447 000014 0 0 000000000014 000000000077 000600000014
ST2 032447 000014 0 0 000000000014 000000000077 000600000014
ST9 032447 000014 0 0 000000000014 000000000077 000600000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 84
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0346
*032461 LDB 4,000005
INITIAL
C(AC)=000000 000007
C(E)=000607 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000007
C(E)=000607 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032461 032461 0 0 135200000005 0 000000000007
IT1 032461 0 0 0 135200000005 0 000000000007
AT3 032461 0 0 0 000000000005 0 135200000005
AT6 032461 000005 0 0 000000000005 0 135200000005
FT0 032461 000005 0 0 000607000000 0 135200000005
FT1A 032461 000005 0 0 000607000000 0 000607000000
FT9 032461 000005 0 0 000607000000 0 000607000000
ET0 032461 000005 0 0 000607000000 0 000607000000
BYT6 032461 000005 0 0 000607000000 0 000607000000
BYT7 032461 000005 772 0 000607000000 0 000607000000
SCT0 032461 000005 772 0 000607000000 0 000607000000
SCT3 032461 000005 773 0 000607000000 000000000001 000607000000
SCT3 032461 000005 774 0 000607000000 000000000003 000607000000
SCT3 032461 000005 775 0 000607000000 000000000007 000607000000
SCT3 032461 000005 776 0 000607000000 000000000017 000607000000
SCT3 032461 000005 777 0 000607000000 000000000037 000607000000
SCT3 032461 000005 0 0 000607000000 000000000077 000607000000
SCT4 032461 000005 0 0 000607000000 000000000077 000607000000
BYT7A 032461 000005 0 0 000607000000 000000000077 000607000000
IT1 032461 0 0 0 000607000000 000000000077 000607000000
AT1 032461 0 0 0 0 000000000077 000607000000
AT2 032461 0 0 0 000000000007 000000000077 000607000000
AT3 032461 0 0 0 000000000007 000000000077 000000000007
AT6 032461 000007 0 0 000000000007 000000000077 000000000007
FT0 032461 000007 0 0 000000000007 000000000077 000000000007
FT1A 032461 000007 0 0 000000000007 000000000077 000000000007
FT9 032462 000007 0 0 000000000007 000000000077 000000000007
ET0 032462 000007 0 0 000000000007 000000000077 000000000007
SCT0 032462 000007 0 0 000000000007 000000000077 000000000007
SCT4 032462 000007 0 0 000000000007 000000000077 000000000007
LBT1 032462 000007 0 0 000000000007 000000000077 000000000007
ST0 032462 000007 0 0 000000000007 000000000077 000000000007
ST1 032462 000007 0 0 000000000007 000000000077 000000000007
ST2 032462 000007 0 0 000000000007 000000000077 000000000007
ST9 032462 000007 0 0 000000000007 000000000077 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 85
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0347
*032470 LDB 4,000005
INITIAL
C(AC)=000000 000007
C(E)=000607 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000010
C(E)=000607 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032470 032470 0 0 135200000005 0 000000000010
IT1 032470 0 0 0 135200000005 0 000000000010
AT3 032470 0 0 0 000000000005 0 135200000005
AT6 032470 000005 0 0 000000000005 0 135200000005
FT0 032470 000005 0 0 000607000000 0 135200000005
FT1A 032470 000005 0 0 000607000000 0 000607000000
FT9 032470 000005 0 0 000607000000 0 000607000000
ET0 032470 000005 0 0 000607000000 0 000607000000
BYT6 032470 000005 0 0 000607000000 0 000607000000
BYT7 032470 000005 772 0 000607000000 0 000607000000
SCT0 032470 000005 772 0 000607000000 0 000607000000
SCT3 032470 000005 773 0 000607000000 000000000001 000607000000
SCT3 032470 000005 774 0 000607000000 000000000003 000607000000
SCT3 032470 000005 775 0 000607000000 000000000007 000607000000
SCT3 032470 000005 776 0 000607000000 000000000017 000607000000
SCT3 032470 000005 777 0 000607000000 000000000037 000607000000
SCT3 032470 000005 0 0 000607000000 000000000077 000607000000
SCT4 032470 000005 0 0 000607000000 000000000077 000607000000
BYT7A 032470 000005 0 0 000607000000 000000000077 000607000000
IT1 032470 0 0 0 000607000000 000000000077 000607000000
AT1 032470 0 0 0 0 000000000077 000607000000
AT2 032470 0 0 0 000000000010 000000000077 000607000000
AT3 032470 0 0 0 000000000010 000000000077 000000000010
AT6 032470 000010 0 0 000000000010 000000000077 000000000010
FT0 032470 000010 0 0 000000000010 000000000077 000000000010
FT1A 032470 000010 0 0 000000000010 000000000077 000000000010
FT9 032471 000010 0 0 000000000010 000000000077 000000000010
ET0 032471 000010 0 0 000000000010 000000000077 000000000010
SCT0 032471 000010 0 0 000000000010 000000000077 000000000010
SCT4 032471 000010 0 0 000000000010 000000000077 000000000010
LBT1 032471 000010 0 0 000000000010 000000000077 000000000010
ST0 032471 000010 0 0 000000000010 000000000077 000000000010
ST1 032471 000010 0 0 000000000010 000000000077 000000000010
ST2 032471 000010 0 0 000000000010 000000000077 000000000010
ST9 032471 000010 0 0 000000000010 000000000077 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 86
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0348
*032477 LDB 4,000005
INITIAL
C(AC)=000000 000010
C(E)=000607 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000011
C(E)=000607 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032477 032477 0 0 135200000005 0 000000000011
IT1 032477 0 0 0 135200000005 0 000000000011
AT3 032477 0 0 0 000000000005 0 135200000005
AT6 032477 000005 0 0 000000000005 0 135200000005
FT0 032477 000005 0 0 000607000000 0 135200000005
FT1A 032477 000005 0 0 000607000000 0 000607000000
FT9 032477 000005 0 0 000607000000 0 000607000000
ET0 032477 000005 0 0 000607000000 0 000607000000
BYT6 032477 000005 0 0 000607000000 0 000607000000
BYT7 032477 000005 772 0 000607000000 0 000607000000
SCT0 032477 000005 772 0 000607000000 0 000607000000
SCT3 032477 000005 773 0 000607000000 000000000001 000607000000
SCT3 032477 000005 774 0 000607000000 000000000003 000607000000
SCT3 032477 000005 775 0 000607000000 000000000007 000607000000
SCT3 032477 000005 776 0 000607000000 000000000017 000607000000
SCT3 032477 000005 777 0 000607000000 000000000037 000607000000
SCT3 032477 000005 0 0 000607000000 000000000077 000607000000
SCT4 032477 000005 0 0 000607000000 000000000077 000607000000
BYT7A 032477 000005 0 0 000607000000 000000000077 000607000000
IT1 032477 0 0 0 000607000000 000000000077 000607000000
AT1 032477 0 0 0 0 000000000077 000607000000
AT2 032477 0 0 0 000000000011 000000000077 000607000000
AT3 032477 0 0 0 000000000011 000000000077 000000000011
AT6 032477 000011 0 0 000000000011 000000000077 000000000011
FT0 032477 000011 0 0 000000000011 000000000077 000000000011
FT1A 032477 000011 0 0 000000000011 000000000077 000000000011
FT9 0 000011 0 0 000000000011 000000000077 000000000011
ET0 0 000011 0 0 000000000011 000000000077 000000000011
SCT0 0 000011 0 0 000000000011 000000000077 000000000011
SCT4 0 000011 0 0 000000000011 000000000077 000000000011
LBT1 0 000011 0 0 000000000011 000000000077 000000000011
ST0 0 000011 0 0 000000000011 000000000077 000000000011
ST1 0 000011 0 0 000000000011 000000000077 000000000011
ST2 0 000011 0 0 000000000011 000000000077 000000000011
ST9 0 000011 0 0 000000000011 000000000077 000000000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 87
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0349
*032506 LDB 4,000005
INITIAL
C(AC)=000000 000011
C(E)=000607 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000012
C(E)=000607 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032506 032506 0 0 135200000005 0 000000000012
IT1 032506 0 0 0 135200000005 0 000000000012
AT3 032506 0 0 0 000000000005 0 135200000005
AT6 032506 000005 0 0 000000000005 0 135200000005
FT0 032506 000005 0 0 000607000000 0 135200000005
FT1A 032506 000005 0 0 000607000000 0 000607000000
FT9 032506 000005 0 0 000607000000 0 000607000000
ET0 032506 000005 0 0 000607000000 0 000607000000
BYT6 032506 000005 0 0 000607000000 0 000607000000
BYT7 032506 000005 772 0 000607000000 0 000607000000
SCT0 032506 000005 772 0 000607000000 0 000607000000
SCT3 032506 000005 773 0 000607000000 000000000001 000607000000
SCT3 032506 000005 774 0 000607000000 000000000003 000607000000
SCT3 032506 000005 775 0 000607000000 000000000007 000607000000
SCT3 032506 000005 776 0 000607000000 000000000017 000607000000
SCT3 032506 000005 777 0 000607000000 000000000037 000607000000
SCT3 032506 000005 0 0 000607000000 000000000077 000607000000
SCT4 032506 000005 0 0 000607000000 000000000077 000607000000
BYT7A 032506 000005 0 0 000607000000 000000000077 000607000000
IT1 032506 0 0 0 000607000000 000000000077 000607000000
AT1 032506 0 0 0 0 000000000077 000607000000
AT2 032506 0 0 0 000000000012 000000000077 000607000000
AT3 032506 0 0 0 000000000012 000000000077 000000000012
AT6 032506 000012 0 0 000000000012 000000000077 000000000012
FT0 032506 000012 0 0 000000000012 000000000077 000000000012
FT1A 032506 000012 0 0 000000000012 000000000077 000000000012
FT9 032507 000012 0 0 000000000012 000000000077 000000000012
ET0 032507 000012 0 0 000000000012 000000000077 000000000012
SCT0 032507 000012 0 0 000000000012 000000000077 000000000012
SCT4 032507 000012 0 0 000000000012 000000000077 000000000012
LBT1 032507 000012 0 0 000000000012 000000000077 000000000012
ST0 032507 000012 0 0 000000000012 000000000077 000000000012
ST1 032507 000012 0 0 000000000012 000000000077 000000000012
ST2 032507 000012 0 0 000000000012 000000000077 000000000012
ST9 032507 000012 0 0 000000000012 000000000077 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 88
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0350
*032515 LDB 4,000005
INITIAL
C(AC)=000000 000012
C(E)=000607 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000013
C(E)=000607 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032515 032515 0 0 135200000005 0 000000000013
IT1 032515 0 0 0 135200000005 0 000000000013
AT3 032515 0 0 0 000000000005 0 135200000005
AT6 032515 000005 0 0 000000000005 0 135200000005
FT0 032515 000005 0 0 000607000000 0 135200000005
FT1A 032515 000005 0 0 000607000000 0 000607000000
FT9 032515 000005 0 0 000607000000 0 000607000000
ET0 032515 000005 0 0 000607000000 0 000607000000
BYT6 032515 000005 0 0 000607000000 0 000607000000
BYT7 032515 000005 772 0 000607000000 0 000607000000
SCT0 032515 000005 772 0 000607000000 0 000607000000
SCT3 032515 000005 773 0 000607000000 000000000001 000607000000
SCT3 032515 000005 774 0 000607000000 000000000003 000607000000
SCT3 032515 000005 775 0 000607000000 000000000007 000607000000
SCT3 032515 000005 776 0 000607000000 000000000017 000607000000
SCT3 032515 000005 777 0 000607000000 000000000037 000607000000
SCT3 032515 000005 0 0 000607000000 000000000077 000607000000
SCT4 032515 000005 0 0 000607000000 000000000077 000607000000
BYT7A 032515 000005 0 0 000607000000 000000000077 000607000000
IT1 032515 0 0 0 000607000000 000000000077 000607000000
AT1 032515 0 0 0 0 000000000077 000607000000
AT2 032515 0 0 0 000000000013 000000000077 000607000000
AT3 032515 0 0 0 000000000013 000000000077 000000000013
AT6 032515 000013 0 0 000000000013 000000000077 000000000013
FT0 032515 000013 0 0 000000000013 000000000077 000000000013
FT1A 032515 000013 0 0 000000000013 000000000077 000000000013
FT9 032516 000013 0 0 000000000013 000000000077 000000000013
ET0 032516 000013 0 0 000000000013 000000000077 000000000013
SCT0 032516 000013 0 0 000000000013 000000000077 000000000013
SCT4 032516 000013 0 0 000000000013 000000000077 000000000013
LBT1 032516 000013 0 0 000000000013 000000000077 000000000013
ST0 032516 000013 0 0 000000000013 000000000077 000000000013
ST1 032516 000013 0 0 000000000013 000000000077 000000000013
ST2 032516 000013 0 0 000000000013 000000000077 000000000013
ST9 032516 000013 0 0 000000000013 000000000077 000000000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 89
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0351
*032530 LDB 4,000005
INITIAL
C(AC)=000000 000013
C(E)=000620 000000 C(C(E))=000000 000007
FINAL
C(AC)=000000 000007
C(E)=000620 000000 C(C(E))=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 032530 032530 0 0 135200000005 0 000000000007
IT1 032530 0 0 0 135200000005 0 000000000007
AT3 032530 0 0 0 000000000005 0 135200000005
AT6 032530 000005 0 0 000000000005 0 135200000005
FT0 032530 000005 0 0 000620000000 0 135200000005
FT1A 032530 000005 0 0 000620000000 0 000620000000
FT9 032530 000005 0 0 000620000000 0 000620000000
ET0 032530 000005 0 0 000620000000 0 000620000000
BYT6 032530 000005 0 0 000620000000 0 000620000000
BYT7 032530 000005 772 0 000620000000 0 000620000000
SCT0 032530 000005 772 0 000620000000 0 000620000000
SCT3 032530 000005 773 0 000620000000 000000000001 000620000000
SCT3 032530 000005 774 0 000620000000 000000000003 000620000000
SCT3 032530 000005 775 0 000620000000 000000000007 000620000000
SCT3 032530 000005 776 0 000620000000 000000000017 000620000000
SCT3 032530 000005 777 0 000620000000 000000000037 000620000000
SCT3 032530 000005 0 0 000620000000 000000000077 000620000000
SCT4 032530 000005 0 0 000620000000 000000000077 000620000000
BYT7A 032530 000005 0 0 000620000000 000000000077 000620000000
IT1 032530 0 0 0 000620000000 000000000077 000620000000
AT3 032530 0 0 0 0 000000000077 000620000000
AT4 032530 0 0 0 000000000007 000000000077 000620000000
IT1 032530 0 0 0 000000000007 000000000077 000620000000
AT3 032530 0 0 0 000000000007 000000000077 000000000007
AT6 032530 000007 0 0 000000000007 000000000077 000000000007
FT0 032530 000007 0 0 000000000007 000000000077 000000000007
FT1A 032530 000007 0 0 000000000007 000000000077 000000000007
FT9 032531 000007 0 0 000000000007 000000000077 000000000007
ET0 032531 000007 0 0 000000000007 000000000077 000000000007
SCT0 032531 000007 0 0 000000000007 000000000077 000000000007
SCT4 032531 000007 0 0 000000000007 000000000077 000000000007
LBT1 032531 000007 0 0 000000000007 000000000077 000000000007
ST0 032531 000007 0 0 000000000007 000000000077 000000000007
ST1 032531 000007 0 0 000000000007 000000000077 000000000007
ST2 032531 000007 0 0 000000000007 000000000077 000000000007
ST9 032531 000007 0 0 000000000007 000000000077 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 90
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0352
*032537 LDB 4,000005
INITIAL
C(AC)=000000 000007
C(E)=000620 000000 C(C(E))=000000 000010
FINAL
C(AC)=000000 000010
C(E)=000620 000000 C(C(E))=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 032537 032537 0 0 135200000005 0 000000000010
IT1 032537 0 0 0 135200000005 0 000000000010
AT3 032537 0 0 0 000000000005 0 135200000005
AT6 032537 000005 0 0 000000000005 0 135200000005
FT0 032537 000005 0 0 000620000000 0 135200000005
FT1A 032537 000005 0 0 000620000000 0 000620000000
FT9 032537 000005 0 0 000620000000 0 000620000000
ET0 032537 000005 0 0 000620000000 0 000620000000
BYT6 032537 000005 0 0 000620000000 0 000620000000
BYT7 032537 000005 772 0 000620000000 0 000620000000
SCT0 032537 000005 772 0 000620000000 0 000620000000
SCT3 032537 000005 773 0 000620000000 000000000001 000620000000
SCT3 032537 000005 774 0 000620000000 000000000003 000620000000
SCT3 032537 000005 775 0 000620000000 000000000007 000620000000
SCT3 032537 000005 776 0 000620000000 000000000017 000620000000
SCT3 032537 000005 777 0 000620000000 000000000037 000620000000
SCT3 032537 000005 0 0 000620000000 000000000077 000620000000
SCT4 032537 000005 0 0 000620000000 000000000077 000620000000
BYT7A 032537 000005 0 0 000620000000 000000000077 000620000000
IT1 032537 0 0 0 000620000000 000000000077 000620000000
AT3 032537 0 0 0 0 000000000077 000620000000
AT4 032537 0 0 0 000000000010 000000000077 000620000000
IT1 032537 0 0 0 000000000010 000000000077 000620000000
AT3 032537 0 0 0 000000000010 000000000077 000000000010
AT6 032537 000010 0 0 000000000010 000000000077 000000000010
FT0 032537 000010 0 0 000000000010 000000000077 000000000010
FT1A 032537 000010 0 0 000000000010 000000000077 000000000010
FT9 032540 000010 0 0 000000000010 000000000077 000000000010
ET0 032540 000010 0 0 000000000010 000000000077 000000000010
SCT0 032540 000010 0 0 000000000010 000000000077 000000000010
SCT4 032540 000010 0 0 000000000010 000000000077 000000000010
LBT1 032540 000010 0 0 000000000010 000000000077 000000000010
ST0 032540 000010 0 0 000000000010 000000000077 000000000010
ST1 032540 000010 0 0 000000000010 000000000077 000000000010
ST2 032540 000010 0 0 000000000010 000000000077 000000000010
ST9 032540 000010 0 0 000000000010 000000000077 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 91
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0353
*032546 LDB 4,000005
INITIAL
C(AC)=000000 000010
C(E)=000620 000000 C(C(E))=000000 000011
FINAL
C(AC)=000000 000011
C(E)=000620 000000 C(C(E))=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 032546 032546 0 0 135200000005 0 000000000011
IT1 032546 0 0 0 135200000005 0 000000000011
AT3 032546 0 0 0 000000000005 0 135200000005
AT6 032546 000005 0 0 000000000005 0 135200000005
FT0 032546 000005 0 0 000620000000 0 135200000005
FT1A 032546 000005 0 0 000620000000 0 000620000000
FT9 032546 000005 0 0 000620000000 0 000620000000
ET0 032546 000005 0 0 000620000000 0 000620000000
BYT6 032546 000005 0 0 000620000000 0 000620000000
BYT7 032546 000005 772 0 000620000000 0 000620000000
SCT0 032546 000005 772 0 000620000000 0 000620000000
SCT3 032546 000005 773 0 000620000000 000000000001 000620000000
SCT3 032546 000005 774 0 000620000000 000000000003 000620000000
SCT3 032546 000005 775 0 000620000000 000000000007 000620000000
SCT3 032546 000005 776 0 000620000000 000000000017 000620000000
SCT3 032546 000005 777 0 000620000000 000000000037 000620000000
SCT3 032546 000005 0 0 000620000000 000000000077 000620000000
SCT4 032546 000005 0 0 000620000000 000000000077 000620000000
BYT7A 032546 000005 0 0 000620000000 000000000077 000620000000
IT1 032546 0 0 0 000620000000 000000000077 000620000000
AT3 032546 0 0 0 0 000000000077 000620000000
AT4 032546 0 0 0 000000000011 000000000077 000620000000
IT1 032546 0 0 0 000000000011 000000000077 000620000000
AT3 032546 0 0 0 000000000011 000000000077 000000000011
AT6 032546 000011 0 0 000000000011 000000000077 000000000011
FT0 032546 000011 0 0 000000000011 000000000077 000000000011
FT1A 032546 000011 0 0 000000000011 000000000077 000000000011
FT9 032547 000011 0 0 000000000011 000000000077 000000000011
ET0 032547 000011 0 0 000000000011 000000000077 000000000011
SCT0 032547 000011 0 0 000000000011 000000000077 000000000011
SCT4 032547 000011 0 0 000000000011 000000000077 000000000011
LBT1 032547 000011 0 0 000000000011 000000000077 000000000011
ST0 032547 000011 0 0 000000000011 000000000077 000000000011
ST1 032547 000011 0 0 000000000011 000000000077 000000000011
ST2 032547 000011 0 0 000000000011 000000000077 000000000011
ST9 032547 000011 0 0 000000000011 000000000077 000000000011
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 92
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0354
*032555 LDB 4,000005
INITIAL
C(AC)=000000 000011
C(E)=000620 000000 C(C(E))=000000 000012
FINAL
C(AC)=000000 000012
C(E)=000620 000000 C(C(E))=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 032555 032555 0 0 135200000005 0 000000000012
IT1 032555 0 0 0 135200000005 0 000000000012
AT3 032555 0 0 0 000000000005 0 135200000005
AT6 032555 000005 0 0 000000000005 0 135200000005
FT0 032555 000005 0 0 000620000000 0 135200000005
FT1A 032555 000005 0 0 000620000000 0 000620000000
FT9 032555 000005 0 0 000620000000 0 000620000000
ET0 032555 000005 0 0 000620000000 0 000620000000
BYT6 032555 000005 0 0 000620000000 0 000620000000
BYT7 032555 000005 772 0 000620000000 0 000620000000
SCT0 032555 000005 772 0 000620000000 0 000620000000
SCT3 032555 000005 773 0 000620000000 000000000001 000620000000
SCT3 032555 000005 774 0 000620000000 000000000003 000620000000
SCT3 032555 000005 775 0 000620000000 000000000007 000620000000
SCT3 032555 000005 776 0 000620000000 000000000017 000620000000
SCT3 032555 000005 777 0 000620000000 000000000037 000620000000
SCT3 032555 000005 0 0 000620000000 000000000077 000620000000
SCT4 032555 000005 0 0 000620000000 000000000077 000620000000
BYT7A 032555 000005 0 0 000620000000 000000000077 000620000000
IT1 032555 0 0 0 000620000000 000000000077 000620000000
AT3 032555 0 0 0 0 000000000077 000620000000
AT4 032555 0 0 0 000000000012 000000000077 000620000000
IT1 032555 0 0 0 000000000012 000000000077 000620000000
AT3 032555 0 0 0 000000000012 000000000077 000000000012
AT6 032555 000012 0 0 000000000012 000000000077 000000000012
FT0 032555 000012 0 0 000000000012 000000000077 000000000012
FT1A 032555 000012 0 0 000000000012 000000000077 000000000012
FT9 032556 000012 0 0 000000000012 000000000077 000000000012
ET0 032556 000012 0 0 000000000012 000000000077 000000000012
SCT0 032556 000012 0 0 000000000012 000000000077 000000000012
SCT4 032556 000012 0 0 000000000012 000000000077 000000000012
LBT1 032556 000012 0 0 000000000012 000000000077 000000000012
ST0 032556 000012 0 0 000000000012 000000000077 000000000012
ST1 032556 000012 0 0 000000000012 000000000077 000000000012
ST2 032556 000012 0 0 000000000012 000000000077 000000000012
ST9 032556 000012 0 0 000000000012 000000000077 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 93
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0355
*032564 LDB 4,000005
INITIAL
C(AC)=000000 000012
C(E)=000620 000000 C(C(E))=000000 000013
FINAL
C(AC)=000000 000013
C(E)=000620 000000 C(C(E))=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 032564 032564 0 0 135200000005 0 000000000013
IT1 032564 0 0 0 135200000005 0 000000000013
AT3 032564 0 0 0 000000000005 0 135200000005
AT6 032564 000005 0 0 000000000005 0 135200000005
FT0 032564 000005 0 0 000620000000 0 135200000005
FT1A 032564 000005 0 0 000620000000 0 000620000000
FT9 032564 000005 0 0 000620000000 0 000620000000
ET0 032564 000005 0 0 000620000000 0 000620000000
BYT6 032564 000005 0 0 000620000000 0 000620000000
BYT7 032564 000005 772 0 000620000000 0 000620000000
SCT0 032564 000005 772 0 000620000000 0 000620000000
SCT3 032564 000005 773 0 000620000000 000000000001 000620000000
SCT3 032564 000005 774 0 000620000000 000000000003 000620000000
SCT3 032564 000005 775 0 000620000000 000000000007 000620000000
SCT3 032564 000005 776 0 000620000000 000000000017 000620000000
SCT3 032564 000005 777 0 000620000000 000000000037 000620000000
SCT3 032564 000005 0 0 000620000000 000000000077 000620000000
SCT4 032564 000005 0 0 000620000000 000000000077 000620000000
BYT7A 032564 000005 0 0 000620000000 000000000077 000620000000
IT1 032564 0 0 0 000620000000 000000000077 000620000000
AT3 032564 0 0 0 0 000000000077 000620000000
AT4 032564 0 0 0 000000000013 000000000077 000620000000
IT1 032564 0 0 0 000000000013 000000000077 000620000000
AT3 032564 0 0 0 000000000013 000000000077 000000000013
AT6 032564 000013 0 0 000000000013 000000000077 000000000013
FT0 032564 000013 0 0 000000000013 000000000077 000000000013
FT1A 032564 000013 0 0 000000000013 000000000077 000000000013
FT9 032565 000013 0 0 000000000013 000000000077 000000000013
ET0 032565 000013 0 0 000000000013 000000000077 000000000013
SCT0 032565 000013 0 0 000000000013 000000000077 000000000013
SCT4 032565 000013 0 0 000000000013 000000000077 000000000013
LBT1 032565 000013 0 0 000000000013 000000000077 000000000013
ST0 032565 000013 0 0 000000000013 000000000077 000000000013
ST1 032565 000013 0 0 000000000013 000000000077 000000000013
ST2 032565 000013 0 0 000000000013 000000000077 000000000013
ST9 032565 000013 0 0 000000000013 000000000077 000000000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 94
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0356
*032600 LDB 4,000005
INITIAL
C(AC)=000000 000013
C(E)=000627 000000 C(C(E))=000000 000013
FINAL
C(AC)=000000 000013
C(E)=000627 000000 C(C(E))=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 135200000005 0 000000000013
IT1 0 0 0 0 135200000005 0 000000000013
AT3 0 0 0 0 000000000005 0 135200000005
AT6 0 000005 0 0 000000000005 0 135200000005
FT0 0 000005 0 0 000627000000 0 135200000005
FT1A 0 000005 0 0 000627000000 0 000627000000
FT9 0 000005 0 0 000627000000 0 000627000000
ET0 0 000005 0 0 000627000000 0 000627000000
BYT6 0 000005 0 0 000627000000 0 000627000000
BYT7 0 000005 772 0 000627000000 0 000627000000
SCT0 0 000005 772 0 000627000000 0 000627000000
SCT3 0 000005 773 0 000627000000 000000000001 000627000000
SCT3 0 000005 774 0 000627000000 000000000003 000627000000
SCT3 0 000005 775 0 000627000000 000000000007 000627000000
SCT3 0 000005 776 0 000627000000 000000000017 000627000000
SCT3 0 000005 777 0 000627000000 000000000037 000627000000
SCT3 0 000005 0 0 000627000000 000000000077 000627000000
SCT4 0 000005 0 0 000627000000 000000000077 000627000000
BYT7A 0 000005 0 0 000627000000 000000000077 000627000000
IT1 0 0 0 0 000627000000 000000000077 000627000000
AT1 0 0 0 0 0 000000000077 000627000000
AT2 0 0 0 0 000000000010 000000000077 000627000000
AT3 0 0 0 0 000000000010 000000000077 000000000010
AT4 0 000010 0 0 000000000013 000000000077 000000000010
IT1 0 0 0 0 000000000013 000000000077 000000000010
AT3 0 0 0 0 000000000013 000000000077 000000000013
AT6 0 000013 0 0 000000000013 000000000077 000000000013
FT0 0 000013 0 0 000000000013 000000000077 000000000013
FT1A 0 000013 0 0 000000000013 000000000077 000000000013
FT9 032601 000013 0 0 000000000013 000000000077 000000000013
ET0 032601 000013 0 0 000000000013 000000000077 000000000013
SCT0 032601 000013 0 0 000000000013 000000000077 000000000013
SCT4 032601 000013 0 0 000000000013 000000000077 000000000013
LBT1 032601 000013 0 0 000000000013 000000000077 000000000013
ST0 032601 000013 0 0 000000000013 000000000077 000000000013
ST1 032601 000013 0 0 000000000013 000000000077 000000000013
ST2 032601 000013 0 0 000000000013 000000000077 000000000013
ST9 032601 000013 0 0 000000000013 000000000077 000000000013
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 95
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0357
*032610 LDB 4,000005
INITIAL
C(AC)=000000 000013
C(E)=000627 000000 C(C(E))=000000 000013
FINAL
C(AC)=000000 000014
C(E)=000627 000000 C(C(E))=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 032610 032610 0 0 135200000005 0 000000000014
IT1 032610 0 0 0 135200000005 0 000000000014
AT3 032610 0 0 0 000000000005 0 135200000005
AT6 032610 000005 0 0 000000000005 0 135200000005
FT0 032610 000005 0 0 000627000000 0 135200000005
FT1A 032610 000005 0 0 000627000000 0 000627000000
FT9 032610 000005 0 0 000627000000 0 000627000000
ET0 032610 000005 0 0 000627000000 0 000627000000
BYT6 032610 000005 0 0 000627000000 0 000627000000
BYT7 032610 000005 772 0 000627000000 0 000627000000
SCT0 032610 000005 772 0 000627000000 0 000627000000
SCT3 032610 000005 773 0 000627000000 000000000001 000627000000
SCT3 032610 000005 774 0 000627000000 000000000003 000627000000
SCT3 032610 000005 775 0 000627000000 000000000007 000627000000
SCT3 032610 000005 776 0 000627000000 000000000017 000627000000
SCT3 032610 000005 777 0 000627000000 000000000037 000627000000
SCT3 032610 000005 0 0 000627000000 000000000077 000627000000
SCT4 032610 000005 0 0 000627000000 000000000077 000627000000
BYT7A 032610 000005 0 0 000627000000 000000000077 000627000000
IT1 032610 0 0 0 000627000000 000000000077 000627000000
AT1 032610 0 0 0 0 000000000077 000627000000
AT2 032610 0 0 0 000000000011 000000000077 000627000000
AT3 032610 0 0 0 000000000011 000000000077 000000000011
AT4 032610 000011 0 0 000000000014 000000000077 000000000011
IT1 032610 0 0 0 000000000014 000000000077 000000000011
AT3 032610 0 0 0 000000000014 000000000077 000000000014
AT6 032610 000014 0 0 000000000014 000000000077 000000000014
FT0 032610 000014 0 0 000000000014 000000000077 000000000014
FT1A 032610 000014 0 0 000000000014 000000000077 000000000014
FT9 032611 000014 0 0 000000000014 000000000077 000000000014
ET0 032611 000014 0 0 000000000014 000000000077 000000000014
SCT0 032611 000014 0 0 000000000014 000000000077 000000000014
SCT4 032611 000014 0 0 000000000014 000000000077 000000000014
LBT1 032611 000014 0 0 000000000014 000000000077 000000000014
ST0 032611 000014 0 0 000000000014 000000000077 000000000014
ST1 032611 000014 0 0 000000000014 000000000077 000000000014
ST2 032611 000014 0 0 000000000014 000000000077 000000000014
ST9 032611 000014 0 0 000000000014 000000000077 000000000014
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 96
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0358
*032620 LDB 4,000005
INITIAL
C(AC)=000000 000014
C(E)=000627 000000 C(C(E))=000000 000013
FINAL
C(AC)=000000 000015
C(E)=000627 000000 C(C(E))=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 032620 032620 0 0 135200000005 0 000000000015
IT1 032620 0 0 0 135200000005 0 000000000015
AT3 032620 0 0 0 000000000005 0 135200000005
AT6 032620 000005 0 0 000000000005 0 135200000005
FT0 032620 000005 0 0 000627000000 0 135200000005
FT1A 032620 000005 0 0 000627000000 0 000627000000
FT9 032620 000005 0 0 000627000000 0 000627000000
ET0 032620 000005 0 0 000627000000 0 000627000000
BYT6 032620 000005 0 0 000627000000 0 000627000000
BYT7 032620 000005 772 0 000627000000 0 000627000000
SCT0 032620 000005 772 0 000627000000 0 000627000000
SCT3 032620 000005 773 0 000627000000 000000000001 000627000000
SCT3 032620 000005 774 0 000627000000 000000000003 000627000000
SCT3 032620 000005 775 0 000627000000 000000000007 000627000000
SCT3 032620 000005 776 0 000627000000 000000000017 000627000000
SCT3 032620 000005 777 0 000627000000 000000000037 000627000000
SCT3 032620 000005 0 0 000627000000 000000000077 000627000000
SCT4 032620 000005 0 0 000627000000 000000000077 000627000000
BYT7A 032620 000005 0 0 000627000000 000000000077 000627000000
IT1 032620 0 0 0 000627000000 000000000077 000627000000
AT1 032620 0 0 0 0 000000000077 000627000000
AT2 032620 0 0 0 000000000012 000000000077 000627000000
AT3 032620 0 0 0 000000000012 000000000077 000000000012
AT4 032620 000012 0 0 000000000015 000000000077 000000000012
IT1 032620 0 0 0 000000000015 000000000077 000000000012
AT3 032620 0 0 0 000000000015 000000000077 000000000015
AT6 032620 000015 0 0 000000000015 000000000077 000000000015
FT0 032620 000015 0 0 000000000015 000000000077 000000000015
FT1A 032620 000015 0 0 000000000015 000000000077 000000000015
FT9 032621 000015 0 0 000000000015 000000000077 000000000015
ET0 032621 000015 0 0 000000000015 000000000077 000000000015
SCT0 032621 000015 0 0 000000000015 000000000077 000000000015
SCT4 032621 000015 0 0 000000000015 000000000077 000000000015
LBT1 032621 000015 0 0 000000000015 000000000077 000000000015
ST0 032621 000015 0 0 000000000015 000000000077 000000000015
ST1 032621 000015 0 0 000000000015 000000000077 000000000015
ST2 032621 000015 0 0 000000000015 000000000077 000000000015
ST9 032621 000015 0 0 000000000015 000000000077 000000000015
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 97
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0359
*032633 ILDB 5,000006
INITIAL
C(AC)=000627 000000
C(E)=440600 000000 C(C(E))=770000 000000
FINAL
C(AC)=000000 000077
C(E)=360600 000000 C(C(E))=770000 000000
TIME PC MA SC FE AR MQ BR
IT0 032633 032633 0 0 134240000006 0 770000000000
IT1 032633 0 0 0 134240000006 0 770000000000
AT3 032633 0 0 0 000000000006 0 134240000006
AT6 032633 000006 0 0 000000000006 0 134240000006
FT0 032633 000006 0 0 440600000000 0 134240000006
FT1A 032633 000006 0 0 440600000000 0 440600000000
FT9 032633 000006 0 0 440600000000 0 440600000000
ET0 032633 000006 0 0 440600000000 0 440600000000
BYT1 032633 000006 044 0 440600000000 0 440600000000
BYT4 032633 000006 0 0 360600000000 0 440600000000
BYT7 032633 000006 772 0 360600000000 0 440600000000
SCT0 032633 000006 772 0 360600000000 0 440600000000
SCT3 032633 000006 773 0 360600000000 000000000001 440600000000
SCT3 032633 000006 774 0 360600000000 000000000003 440600000000
SCT3 032633 000006 775 0 360600000000 000000000007 440600000000
SCT3 032633 000006 776 0 360600000000 000000000017 440600000000
SCT3 032633 000006 777 0 360600000000 000000000037 440600000000
SCT3 032633 000006 0 0 360600000000 000000000077 440600000000
SCT4 032633 000006 0 0 360600000000 000000000077 440600000000
BYT7A 032633 000006 036 0 360600000000 000000000077 440600000000
IT1 032633 0 036 0 360600000000 000000000077 440600000000
AT3 032633 0 036 0 0 000000000077 360600000000
AT6 032633 0 036 0 0 000000000077 360600000000
FT0 032633 0 036 0 770000000000 000000000077 360600000000
FT1A 032633 0 036 0 770000000000 000000000077 770000000000
FT9 032634 0 036 0 770000000000 000000000077 770000000000
ET0 032634 0 742 0 770000000000 000000000077 770000000000
SCT0 032634 0 742 0 770000000000 000000000077 770000000000
SCT3 032634 0 743 0 374000000000 000000000077 770000000000
SCT3 032634 0 744 0 176000000000 000000000077 770000000000
SCT3 032634 0 745 0 077000000000 000000000077 770000000000
SCT3 032634 0 746 0 037400000000 000000000077 770000000000
SCT3 032634 0 747 0 017600000000 000000000077 770000000000
SCT3 032634 0 0 0 007700000000 000000000077 770000000000
SCT3 032634 0 751 0 003740000000 000000000077 770000000000
SCT3 032634 0 752 0 001760000000 000000000077 770000000000
SCT3 032634 0 753 0 000770000000 000000000077 770000000000
SCT3 032634 0 754 0 000374000000 000000000077 770000000000
SCT3 032634 0 755 0 000176000000 000000000077 770000000000
SCT3 032634 0 756 0 000077000000 000000000077 770000000000
SCT3 032634 0 757 0 000037400000 000000000077 770000000000
SCT3 032634 0 0 0 000017600000 000000000077 770000000000
SCT3 032634 0 761 0 000007700000 000000000077 770000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 98
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0360
SCT3 032634 0 762 0 000003740000 000000000077 770000000000
SCT3 032634 0 763 0 000001760000 000000000077 770000000000
SCT3 032634 0 764 0 000000770000 000000000077 770000000000
SCT3 032634 0 765 0 000000374000 000000000077 770000000000
SCT3 032634 0 766 0 000000176000 000000000077 770000000000
SCT3 032634 0 767 0 000000077000 000000000077 770000000000
SCT3 032634 0 0 0 000000037400 000000000077 770000000000
SCT3 032634 0 771 0 000000017600 000000000077 770000000000
SCT3 032634 0 772 0 000000007700 000000000077 770000000000
SCT3 032634 0 773 0 000000003740 000000000077 770000000000
SCT3 032634 0 774 0 000000001760 000000000077 770000000000
SCT3 032634 0 775 0 000000000770 000000000077 770000000000
SCT3 032634 0 776 0 000000000374 000000000077 770000000000
SCT3 032634 0 777 0 000000000176 000000000077 770000000000
SCT3 032634 0 0 0 000000000077 000000000077 770000000000
SCT4 032634 0 0 0 000000000077 000000000077 770000000000
LBT1 032634 0 0 0 000000000077 000000000077 770000000000
ST0 032634 0 0 0 000000000077 000000000077 770000000000
ST1 032634 0 0 0 000000000077 000000000077 770000000000
ST2 032634 0 0 0 000000000077 000000000077 770000000000
ST9 032634 0 0 0 000000000077 000000000077 770000000000
*032642 ILDB 5,000006
INITIAL
C(AC)=000000 000077
C(E)=360600 000000 C(C(E))=007700 000000
FINAL
C(AC)=000000 000077
C(E)=300600 000000 C(C(E))=007700 000000
TIME PC MA SC FE AR MQ BR
IT0 032642 032642 0 0 134240000006 0 007700000000
IT1 032642 0 0 0 134240000006 0 007700000000
AT3 032642 0 0 0 000000000006 0 134240000006
AT6 032642 000006 0 0 000000000006 0 134240000006
FT0 032642 000006 0 0 360600000000 0 134240000006
FT1A 032642 000006 0 0 360600000000 0 360600000000
FT9 032642 000006 0 0 360600000000 0 360600000000
ET0 032642 000006 0 0 360600000000 0 360600000000
BYT1 032642 000006 036 0 360600000000 0 360600000000
BYT4 032642 000006 0 0 300600000000 0 360600000000
BYT7 032642 000006 772 0 300600000000 0 360600000000
SCT0 032642 000006 772 0 300600000000 0 360600000000
SCT3 032642 000006 773 0 300600000000 000000000001 360600000000
SCT3 032642 000006 774 0 300600000000 000000000003 360600000000
SCT3 032642 000006 775 0 300600000000 000000000007 360600000000
SCT3 032642 000006 776 0 300600000000 000000000017 360600000000
SCT3 032642 000006 777 0 300600000000 000000000037 360600000000
SCT3 032642 000006 0 0 300600000000 000000000077 360600000000
SCT4 032642 000006 0 0 300600000000 000000000077 360600000000
BYT7A 032642 000006 0 0 300600000000 000000000077 360600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 99
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0361
IT1 032642 0 0 0 300600000000 000000000077 360600000000
AT3 032642 0 0 0 0 000000000077 300600000000
AT6 032642 0 0 0 0 000000000077 300600000000
FT0 032642 0 0 0 007700000000 000000000077 300600000000
FT1A 032642 0 0 0 007700000000 000000000077 007700000000
FT9 032643 0 0 0 007700000000 000000000077 007700000000
ET0 032643 0 0 0 007700000000 000000000077 007700000000
SCT0 032643 0 0 0 007700000000 000000000077 007700000000
SCT3 032643 0 751 0 003740000000 000000000077 007700000000
SCT3 032643 0 752 0 001760000000 000000000077 007700000000
SCT3 032643 0 753 0 000770000000 000000000077 007700000000
SCT3 032643 0 754 0 000374000000 000000000077 007700000000
SCT3 032643 0 755 0 000176000000 000000000077 007700000000
SCT3 032643 0 756 0 000077000000 000000000077 007700000000
SCT3 032643 0 757 0 000037400000 000000000077 007700000000
SCT3 032643 0 0 0 000017600000 000000000077 007700000000
SCT3 032643 0 761 0 000007700000 000000000077 007700000000
SCT3 032643 0 762 0 000003740000 000000000077 007700000000
SCT3 032643 0 763 0 000001760000 000000000077 007700000000
SCT3 032643 0 764 0 000000770000 000000000077 007700000000
SCT3 032643 0 765 0 000000374000 000000000077 007700000000
SCT3 032643 0 766 0 000000176000 000000000077 007700000000
SCT3 032643 0 767 0 000000077000 000000000077 007700000000
SCT3 032643 0 0 0 000000037400 000000000077 007700000000
SCT3 032643 0 771 0 000000017600 000000000077 007700000000
SCT3 032643 0 772 0 000000007700 000000000077 007700000000
SCT3 032643 0 773 0 000000003740 000000000077 007700000000
SCT3 032643 0 774 0 000000001760 000000000077 007700000000
SCT3 032643 0 775 0 000000000770 000000000077 007700000000
SCT3 032643 0 776 0 000000000374 000000000077 007700000000
SCT3 032643 0 777 0 000000000176 000000000077 007700000000
SCT3 032643 0 0 0 000000000077 000000000077 007700000000
SCT4 032643 0 0 0 000000000077 000000000077 007700000000
LBT1 032643 0 0 0 000000000077 000000000077 007700000000
ST0 032643 0 0 0 000000000077 000000000077 007700000000
ST1 032643 0 0 0 000000000077 000000000077 007700000000
ST2 032643 0 0 0 000000000077 000000000077 007700000000
ST9 032643 0 0 0 000000000077 000000000077 007700000000
*032651 ILDB 5,000006
INITIAL
C(AC)=000000 000077
C(E)=300600 000000 C(C(E))=000077 000000
FINAL
C(AC)=000000 000077
C(E)=220600 000000 C(C(E))=000077 000000
TIME PC MA SC FE AR MQ BR
IT0 032651 032651 0 0 134240000006 0 000077000000
IT1 032651 0 0 0 134240000006 0 000077000000
AT3 032651 0 0 0 000000000006 0 134240000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 100
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0362
AT6 032651 000006 0 0 000000000006 0 134240000006
FT0 032651 000006 0 0 300600000000 0 134240000006
FT1A 032651 000006 0 0 300600000000 0 300600000000
FT9 032651 000006 0 0 300600000000 0 300600000000
ET0 032651 000006 0 0 300600000000 0 300600000000
BYT1 032651 000006 0 0 300600000000 0 300600000000
BYT4 032651 000006 0 0 220600000000 0 300600000000
BYT7 032651 000006 772 0 220600000000 0 300600000000
SCT0 032651 000006 772 0 220600000000 0 300600000000
SCT3 032651 000006 773 0 220600000000 000000000001 300600000000
SCT3 032651 000006 774 0 220600000000 000000000003 300600000000
SCT3 032651 000006 775 0 220600000000 000000000007 300600000000
SCT3 032651 000006 776 0 220600000000 000000000017 300600000000
SCT3 032651 000006 777 0 220600000000 000000000037 300600000000
SCT3 032651 000006 0 0 220600000000 000000000077 300600000000
SCT4 032651 000006 0 0 220600000000 000000000077 300600000000
BYT7A 032651 000006 022 0 220600000000 000000000077 300600000000
IT1 032651 0 022 0 220600000000 000000000077 300600000000
AT3 032651 0 022 0 0 000000000077 220600000000
AT6 032651 0 022 0 0 000000000077 220600000000
FT0 032651 0 022 0 000077000000 000000000077 220600000000
FT1A 032651 0 022 0 000077000000 000000000077 000077000000
FT9 032652 0 022 0 000077000000 000000000077 000077000000
ET0 032652 0 756 0 000077000000 000000000077 000077000000
SCT0 032652 0 756 0 000077000000 000000000077 000077000000
SCT3 032652 0 757 0 000037400000 000000000077 000077000000
SCT3 032652 0 0 0 000017600000 000000000077 000077000000
SCT3 032652 0 761 0 000007700000 000000000077 000077000000
SCT3 032652 0 762 0 000003740000 000000000077 000077000000
SCT3 032652 0 763 0 000001760000 000000000077 000077000000
SCT3 032652 0 764 0 000000770000 000000000077 000077000000
SCT3 032652 0 765 0 000000374000 000000000077 000077000000
SCT3 032652 0 766 0 000000176000 000000000077 000077000000
SCT3 032652 0 767 0 000000077000 000000000077 000077000000
SCT3 032652 0 0 0 000000037400 000000000077 000077000000
SCT3 032652 0 771 0 000000017600 000000000077 000077000000
SCT3 032652 0 772 0 000000007700 000000000077 000077000000
SCT3 032652 0 773 0 000000003740 000000000077 000077000000
SCT3 032652 0 774 0 000000001760 000000000077 000077000000
SCT3 032652 0 775 0 000000000770 000000000077 000077000000
SCT3 032652 0 776 0 000000000374 000000000077 000077000000
SCT3 032652 0 777 0 000000000176 000000000077 000077000000
SCT3 032652 0 0 0 000000000077 000000000077 000077000000
SCT4 032652 0 0 0 000000000077 000000000077 000077000000
LBT1 032652 0 0 0 000000000077 000000000077 000077000000
ST0 032652 0 0 0 000000000077 000000000077 000077000000
ST1 032652 0 0 0 000000000077 000000000077 000077000000
ST2 032652 0 0 0 000000000077 000000000077 000077000000
ST9 032652 0 0 0 000000000077 000000000077 000077000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 101
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0363
*032660 ILDB 5,000006
INITIAL
C(AC)=000000 000077
C(E)=220600 000000 C(C(E))=000000 770000
FINAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=000000 770000
TIME PC MA SC FE AR MQ BR
IT0 032660 032660 0 0 134240000006 0 000000770000
IT1 032660 0 0 0 134240000006 0 000000770000
AT3 032660 0 0 0 000000000006 0 134240000006
AT6 032660 000006 0 0 000000000006 0 134240000006
FT0 032660 000006 0 0 220600000000 0 134240000006
FT1A 032660 000006 0 0 220600000000 0 220600000000
FT9 032660 000006 0 0 220600000000 0 220600000000
ET0 032660 000006 0 0 220600000000 0 220600000000
BYT1 032660 000006 022 0 220600000000 0 220600000000
BYT4 032660 000006 0 0 140600000000 0 220600000000
BYT7 032660 000006 772 0 140600000000 0 220600000000
SCT0 032660 000006 772 0 140600000000 0 220600000000
SCT3 032660 000006 773 0 140600000000 000000000001 220600000000
SCT3 032660 000006 774 0 140600000000 000000000003 220600000000
SCT3 032660 000006 775 0 140600000000 000000000007 220600000000
SCT3 032660 000006 776 0 140600000000 000000000017 220600000000
SCT3 032660 000006 777 0 140600000000 000000000037 220600000000
SCT3 032660 000006 0 0 140600000000 000000000077 220600000000
SCT4 032660 000006 0 0 140600000000 000000000077 220600000000
BYT7A 032660 000006 014 0 140600000000 000000000077 220600000000
IT1 032660 0 014 0 140600000000 000000000077 220600000000
AT3 032660 0 014 0 0 000000000077 140600000000
AT6 032660 0 014 0 0 000000000077 140600000000
FT0 032660 0 014 0 000000770000 000000000077 140600000000
FT1A 032660 0 014 0 000000770000 000000000077 000000770000
FT9 032661 0 014 0 000000770000 000000000077 000000770000
ET0 032661 0 764 0 000000770000 000000000077 000000770000
SCT0 032661 0 764 0 000000770000 000000000077 000000770000
SCT3 032661 0 765 0 000000374000 000000000077 000000770000
SCT3 032661 0 766 0 000000176000 000000000077 000000770000
SCT3 032661 0 767 0 000000077000 000000000077 000000770000
SCT3 032661 0 0 0 000000037400 000000000077 000000770000
SCT3 032661 0 771 0 000000017600 000000000077 000000770000
SCT3 032661 0 772 0 000000007700 000000000077 000000770000
SCT3 032661 0 773 0 000000003740 000000000077 000000770000
SCT3 032661 0 774 0 000000001760 000000000077 000000770000
SCT3 032661 0 775 0 000000000770 000000000077 000000770000
SCT3 032661 0 776 0 000000000374 000000000077 000000770000
SCT3 032661 0 777 0 000000000176 000000000077 000000770000
SCT3 032661 0 0 0 000000000077 000000000077 000000770000
SCT4 032661 0 0 0 000000000077 000000000077 000000770000
LBT1 032661 0 0 0 000000000077 000000000077 000000770000
ST0 032661 0 0 0 000000000077 000000000077 000000770000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 102
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0364
ST1 032661 0 0 0 000000000077 000000000077 000000770000
ST2 032661 0 0 0 000000000077 000000000077 000000770000
ST9 032661 0 0 0 000000000077 000000000077 000000770000
*032667 ILDB 5,000006
INITIAL
C(AC)=000000 000077
C(E)=140600 000000 C(C(E))=000000 007700
FINAL
C(AC)=000000 000077
C(E)=060600 000000 C(C(E))=000000 007700
TIME PC MA SC FE AR MQ BR
IT0 032667 032667 0 0 134240000006 0 000000007700
IT1 032667 0 0 0 134240000006 0 000000007700
AT3 032667 0 0 0 000000000006 0 134240000006
AT6 032667 000006 0 0 000000000006 0 134240000006
FT0 032667 000006 0 0 140600000000 0 134240000006
FT1A 032667 000006 0 0 140600000000 0 140600000000
FT9 032667 000006 0 0 140600000000 0 140600000000
ET0 032667 000006 0 0 140600000000 0 140600000000
BYT1 032667 000006 014 0 140600000000 0 140600000000
BYT4 032667 000006 0 0 060600000000 0 140600000000
BYT7 032667 000006 772 0 060600000000 0 140600000000
SCT0 032667 000006 772 0 060600000000 0 140600000000
SCT3 032667 000006 773 0 060600000000 000000000001 140600000000
SCT3 032667 000006 774 0 060600000000 000000000003 140600000000
SCT3 032667 000006 775 0 060600000000 000000000007 140600000000
SCT3 032667 000006 776 0 060600000000 000000000017 140600000000
SCT3 032667 000006 777 0 060600000000 000000000037 140600000000
SCT3 032667 000006 0 0 060600000000 000000000077 140600000000
SCT4 032667 000006 0 0 060600000000 000000000077 140600000000
BYT7A 032667 000006 006 0 060600000000 000000000077 140600000000
IT1 032667 0 006 0 060600000000 000000000077 140600000000
AT3 032667 0 006 0 0 000000000077 060600000000
AT6 032667 0 006 0 0 000000000077 060600000000
FT0 032667 0 006 0 000000007700 000000000077 060600000000
FT1A 032667 0 006 0 000000007700 000000000077 000000007700
FT9 032670 0 006 0 000000007700 000000000077 000000007700
ET0 032670 0 772 0 000000007700 000000000077 000000007700
SCT0 032670 0 772 0 000000007700 000000000077 000000007700
SCT3 032670 0 773 0 000000003740 000000000077 000000007700
SCT3 032670 0 774 0 000000001760 000000000077 000000007700
SCT3 032670 0 775 0 000000000770 000000000077 000000007700
SCT3 032670 0 776 0 000000000374 000000000077 000000007700
SCT3 032670 0 777 0 000000000176 000000000077 000000007700
SCT3 032670 0 0 0 000000000077 000000000077 000000007700
SCT4 032670 0 0 0 000000000077 000000000077 000000007700
LBT1 032670 0 0 0 000000000077 000000000077 000000007700
ST0 032670 0 0 0 000000000077 000000000077 000000007700
ST1 032670 0 0 0 000000000077 000000000077 000000007700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 103
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0365
ST2 032670 0 0 0 000000000077 000000000077 000000007700
ST9 032670 0 0 0 000000000077 000000000077 000000007700
*032702 ILDB 14,000015
INITIAL
C(AC)=000000 000014
C(E)=000600 000000 C(C(E))=000000 007700
FINAL
C(AC)=000000 000077
C(E)=360600 000001 C(C(E))=770000 000000
TIME PC MA SC FE AR MQ BR
IT0 032702 032702 0 0 134600000015 0 770000000000
IT1 032702 0 0 0 134600000015 0 770000000000
AT3 032702 0 0 0 000000000015 0 134600000015
AT6 032702 000015 0 0 000000000015 0 134600000015
FT0 032702 000015 0 0 000600000000 0 134600000015
FT1A 032702 000015 0 0 000600000000 0 000600000000
FT9 032702 000015 0 0 000600000000 0 000600000000
ET0 032702 000015 0 0 000600000000 0 000600000000
BYT1 032702 000015 0 0 000600000000 0 000600000000
BYT2 032702 000015 0 0 000600000001 0 000600000000
BYT3 032702 000015 144 0 000600000001 0 000600000000
BYT4 032702 000015 0 0 360600000001 0 000600000000
BYT7 032702 000015 772 0 360600000001 0 000600000000
SCT0 032702 000015 772 0 360600000001 0 000600000000
SCT3 032702 000015 773 0 360600000001 000000000001 000600000000
SCT3 032702 000015 774 0 360600000001 000000000003 000600000000
SCT3 032702 000015 775 0 360600000001 000000000007 000600000000
SCT3 032702 000015 776 0 360600000001 000000000017 000600000000
SCT3 032702 000015 777 0 360600000001 000000000037 000600000000
SCT3 032702 000015 0 0 360600000001 000000000077 000600000000
SCT4 032702 000015 0 0 360600000001 000000000077 000600000000
BYT7A 032702 000015 036 0 360600000001 000000000077 000600000000
IT1 032702 0 036 0 360600000001 000000000077 000600000000
AT3 032702 0 036 0 000000000001 000000000077 360600000001
AT6 032702 000001 036 0 000000000001 000000000077 360600000001
FT0 032702 000001 036 0 770000000000 000000000077 360600000001
FT1A 032702 000001 036 0 770000000000 000000000077 770000000000
FT9 032703 000001 036 0 770000000000 000000000077 770000000000
ET0 032703 000001 742 0 770000000000 000000000077 770000000000
SCT0 032703 000001 742 0 770000000000 000000000077 770000000000
SCT3 032703 000001 743 0 374000000000 000000000077 770000000000
SCT3 032703 000001 744 0 176000000000 000000000077 770000000000
SCT3 032703 000001 745 0 077000000000 000000000077 770000000000
SCT3 032703 000001 746 0 037400000000 000000000077 770000000000
SCT3 032703 000001 747 0 017600000000 000000000077 770000000000
SCT3 032703 000001 0 0 007700000000 000000000077 770000000000
SCT3 032703 000001 751 0 003740000000 000000000077 770000000000
SCT3 032703 000001 752 0 001760000000 000000000077 770000000000
SCT3 032703 000001 753 0 000770000000 000000000077 770000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 104
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0366
SCT3 032703 000001 754 0 000374000000 000000000077 770000000000
SCT3 032703 000001 755 0 000176000000 000000000077 770000000000
SCT3 032703 000001 756 0 000077000000 000000000077 770000000000
SCT3 032703 000001 757 0 000037400000 000000000077 770000000000
SCT3 032703 000001 0 0 000017600000 000000000077 770000000000
SCT3 032703 000001 761 0 000007700000 000000000077 770000000000
SCT3 032703 000001 762 0 000003740000 000000000077 770000000000
SCT3 032703 000001 763 0 000001760000 000000000077 770000000000
SCT3 032703 000001 764 0 000000770000 000000000077 770000000000
SCT3 032703 000001 765 0 000000374000 000000000077 770000000000
SCT3 032703 000001 766 0 000000176000 000000000077 770000000000
SCT3 032703 000001 767 0 000000077000 000000000077 770000000000
SCT3 032703 000001 0 0 000000037400 000000000077 770000000000
SCT3 032703 000001 771 0 000000017600 000000000077 770000000000
SCT3 032703 000001 772 0 000000007700 000000000077 770000000000
SCT3 032703 000001 773 0 000000003740 000000000077 770000000000
SCT3 032703 000001 774 0 000000001760 000000000077 770000000000
SCT3 032703 000001 775 0 000000000770 000000000077 770000000000
SCT3 032703 000001 776 0 000000000374 000000000077 770000000000
SCT3 032703 000001 777 0 000000000176 000000000077 770000000000
SCT3 032703 000001 0 0 000000000077 000000000077 770000000000
SCT4 032703 000001 0 0 000000000077 000000000077 770000000000
LBT1 032703 000001 0 0 000000000077 000000000077 770000000000
ST0 032703 000001 0 0 000000000077 000000000077 770000000000
ST1 032703 000001 0 0 000000000077 000000000077 770000000000
ST2 032703 000001 0 0 000000000077 000000000077 770000000000
ST9 032703 000001 0 0 000000000077 000000000077 770000000000
*032711 ILDB 14,000015
INITIAL
C(AC)=000000 000077
C(E)=001400 000000 C(C(E))=000000 007700
FINAL
C(AC)=000000 000077
C(E)=301400 000001 C(C(E))=007700 000000
TIME PC MA SC FE AR MQ BR
IT0 032711 032711 0 0 134600000015 0 007700000000
IT1 032711 0 0 0 134600000015 0 007700000000
AT3 032711 0 0 0 000000000015 0 134600000015
AT6 032711 000015 0 0 000000000015 0 134600000015
FT0 032711 000015 0 0 001400000000 0 134600000015
FT1A 032711 000015 0 0 001400000000 0 001400000000
FT9 032711 000015 0 0 001400000000 0 001400000000
ET0 032711 000015 0 0 001400000000 0 001400000000
BYT1 032711 000015 0 0 001400000000 0 001400000000
BYT2 032711 000015 0 0 001400000001 0 001400000000
BYT3 032711 000015 144 0 001400000001 0 001400000000
BYT4 032711 000015 0 0 301400000001 0 001400000000
BYT7 032711 000015 764 0 301400000001 0 001400000000
SCT0 032711 000015 764 0 301400000001 0 001400000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 105
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0367
SCT3 032711 000015 765 0 301400000001 000000000001 001400000000
SCT3 032711 000015 766 0 301400000001 000000000003 001400000000
SCT3 032711 000015 767 0 301400000001 000000000007 001400000000
SCT3 032711 000015 0 0 301400000001 000000000017 001400000000
SCT3 032711 000015 771 0 301400000001 000000000037 001400000000
SCT3 032711 000015 772 0 301400000001 000000000077 001400000000
SCT3 032711 000015 773 0 301400000001 000000000177 001400000000
SCT3 032711 000015 774 0 301400000001 000000000377 001400000000
SCT3 032711 000015 775 0 301400000001 000000000777 001400000000
SCT3 032711 000015 776 0 301400000001 000000001777 001400000000
SCT3 032711 000015 777 0 301400000001 000000003777 001400000000
SCT3 032711 000015 0 0 301400000001 000000007777 001400000000
SCT4 032711 000015 0 0 301400000001 000000007777 001400000000
BYT7A 032711 000015 0 0 301400000001 000000007777 001400000000
IT1 032711 0 0 0 301400000001 000000007777 001400000000
AT3 032711 0 0 0 000000000001 000000007777 301400000001
AT6 032711 000001 0 0 000000000001 000000007777 301400000001
FT0 032711 000001 0 0 007700000000 000000007777 301400000001
FT1A 032711 000001 0 0 007700000000 000000007777 007700000000
FT9 032712 000001 0 0 007700000000 000000007777 007700000000
ET0 032712 000001 0 0 007700000000 000000007777 007700000000
SCT0 032712 000001 0 0 007700000000 000000007777 007700000000
SCT3 032712 000001 751 0 003740000000 000000007777 007700000000
SCT3 032712 000001 752 0 001760000000 000000007777 007700000000
SCT3 032712 000001 753 0 000770000000 000000007777 007700000000
SCT3 032712 000001 754 0 000374000000 000000007777 007700000000
SCT3 032712 000001 755 0 000176000000 000000007777 007700000000
SCT3 032712 000001 756 0 000077000000 000000007777 007700000000
SCT3 032712 000001 757 0 000037400000 000000007777 007700000000
SCT3 032712 000001 0 0 000017600000 000000007777 007700000000
SCT3 032712 000001 761 0 000007700000 000000007777 007700000000
SCT3 032712 000001 762 0 000003740000 000000007777 007700000000
SCT3 032712 000001 763 0 000001760000 000000007777 007700000000
SCT3 032712 000001 764 0 000000770000 000000007777 007700000000
SCT3 032712 000001 765 0 000000374000 000000007777 007700000000
SCT3 032712 000001 766 0 000000176000 000000007777 007700000000
SCT3 032712 000001 767 0 000000077000 000000007777 007700000000
SCT3 032712 000001 0 0 000000037400 000000007777 007700000000
SCT3 032712 000001 771 0 000000017600 000000007777 007700000000
SCT3 032712 000001 772 0 000000007700 000000007777 007700000000
SCT3 032712 000001 773 0 000000003740 000000007777 007700000000
SCT3 032712 000001 774 0 000000001760 000000007777 007700000000
SCT3 032712 000001 775 0 000000000770 000000007777 007700000000
SCT3 032712 000001 776 0 000000000374 000000007777 007700000000
SCT3 032712 000001 777 0 000000000176 000000007777 007700000000
SCT3 032712 000001 0 0 000000000077 000000007777 007700000000
SCT4 032712 000001 0 0 000000000077 000000007777 007700000000
LBT1 032712 000001 0 0 000000000077 000000007777 007700000000
ST0 032712 000001 0 0 000000000077 000000007777 007700000000
ST1 032712 000001 0 0 000000000077 000000007777 007700000000
ST2 032712 000001 0 0 000000000077 000000007777 007700000000
ST9 032712 000001 0 0 000000000077 000000007777 007700000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 106
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0368
*032720 ILDB 14,000015
INITIAL
C(AC)=000000 000077
C(E)=002200 000000 C(C(E))=000000 007700
FINAL
C(AC)=000000 000077
C(E)=222200 000001 C(C(E))=000077 000000
TIME PC MA SC FE AR MQ BR
IT0 032720 032720 0 0 134600000015 0 000077000000
IT1 032720 0 0 0 134600000015 0 000077000000
AT3 032720 0 0 0 000000000015 0 134600000015
AT6 032720 000015 0 0 000000000015 0 134600000015
FT0 032720 000015 0 0 002200000000 0 134600000015
FT1A 032720 000015 0 0 002200000000 0 002200000000
FT9 032720 000015 0 0 002200000000 0 002200000000
ET0 032720 000015 0 0 002200000000 0 002200000000
BYT1 032720 000015 0 0 002200000000 0 002200000000
BYT2 032720 000015 0 0 002200000001 0 002200000000
BYT3 032720 000015 144 0 002200000001 0 002200000000
BYT4 032720 000015 0 0 222200000001 0 002200000000
BYT7 032720 000015 756 0 222200000001 0 002200000000
SCT0 032720 000015 756 0 222200000001 0 002200000000
SCT3 032720 000015 757 0 222200000001 000000000001 002200000000
SCT3 032720 000015 0 0 222200000001 000000000003 002200000000
SCT3 032720 000015 761 0 222200000001 000000000007 002200000000
SCT3 032720 000015 762 0 222200000001 000000000017 002200000000
SCT3 032720 000015 763 0 222200000001 000000000037 002200000000
SCT3 032720 000015 764 0 222200000001 000000000077 002200000000
SCT3 032720 000015 765 0 222200000001 000000000177 002200000000
SCT3 032720 000015 766 0 222200000001 000000000377 002200000000
SCT3 032720 000015 767 0 222200000001 000000000777 002200000000
SCT3 032720 000015 0 0 222200000001 000000001777 002200000000
SCT3 032720 000015 771 0 222200000001 000000003777 002200000000
SCT3 032720 000015 772 0 222200000001 000000007777 002200000000
SCT3 032720 000015 773 0 222200000001 000000017777 002200000000
SCT3 032720 000015 774 0 222200000001 000000037777 002200000000
SCT3 032720 000015 775 0 222200000001 000000077777 002200000000
SCT3 032720 000015 776 0 222200000001 000000177777 002200000000
SCT3 032720 000015 777 0 222200000001 000000377777 002200000000
SCT3 032720 000015 0 0 222200000001 000000777777 002200000000
SCT4 032720 000015 0 0 222200000001 000000777777 002200000000
BYT7A 032720 000015 022 0 222200000001 000000777777 002200000000
IT1 032720 0 022 0 222200000001 000000777777 002200000000
AT3 032720 0 022 0 000000000001 000000777777 222200000001
AT6 032720 000001 022 0 000000000001 000000777777 222200000001
FT0 032720 000001 022 0 000077000000 000000777777 222200000001
FT1A 032720 000001 022 0 000077000000 000000777777 000077000000
FT9 032721 000001 022 0 000077000000 000000777777 000077000000
ET0 032721 000001 756 0 000077000000 000000777777 000077000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 107
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0369
SCT0 032721 000001 756 0 000077000000 000000777777 000077000000
SCT3 032721 000001 757 0 000037400000 000000777777 000077000000
SCT3 032721 000001 0 0 000017600000 000000777777 000077000000
SCT3 032721 000001 761 0 000007700000 000000777777 000077000000
SCT3 032721 000001 762 0 000003740000 000000777777 000077000000
SCT3 032721 000001 763 0 000001760000 000000777777 000077000000
SCT3 032721 000001 764 0 000000770000 000000777777 000077000000
SCT3 032721 000001 765 0 000000374000 000000777777 000077000000
SCT3 032721 000001 766 0 000000176000 000000777777 000077000000
SCT3 032721 000001 767 0 000000077000 000000777777 000077000000
SCT3 032721 000001 0 0 000000037400 000000777777 000077000000
SCT3 032721 000001 771 0 000000017600 000000777777 000077000000
SCT3 032721 000001 772 0 000000007700 000000777777 000077000000
SCT3 032721 000001 773 0 000000003740 000000777777 000077000000
SCT3 032721 000001 774 0 000000001760 000000777777 000077000000
SCT3 032721 000001 775 0 000000000770 000000777777 000077000000
SCT3 032721 000001 776 0 000000000374 000000777777 000077000000
SCT3 032721 000001 777 0 000000000176 000000777777 000077000000
SCT3 032721 000001 0 0 000000000077 000000777777 000077000000
SCT4 032721 000001 0 0 000000000077 000000777777 000077000000
LBT1 032721 000001 0 0 000000000077 000000777777 000077000000
ST0 032721 000001 0 0 000000000077 000000777777 000077000000
ST1 032721 000001 0 0 000000000077 000000777777 000077000000
ST2 032721 000001 0 0 000000000077 000000777777 000077000000
ST9 032721 000001 0 0 000000000077 000000777777 000077000000
*032727 ILDB 14,000015
INITIAL
C(AC)=000000 000077
C(E)=003000 000000 C(C(E))=000000 007700
FINAL
C(AC)=000000 000077
C(E)=143000 000001 C(C(E))=000000 770000
TIME PC MA SC FE AR MQ BR
IT0 032727 032727 0 0 134600000015 0 000000770000
IT1 032727 0 0 0 134600000015 0 000000770000
AT3 032727 0 0 0 000000000015 0 134600000015
AT6 032727 000015 0 0 000000000015 0 134600000015
FT0 032727 000015 0 0 003000000000 0 134600000015
FT1A 032727 000015 0 0 003000000000 0 003000000000
FT9 032727 000015 0 0 003000000000 0 003000000000
ET0 032727 000015 0 0 003000000000 0 003000000000
BYT1 032727 000015 0 0 003000000000 0 003000000000
BYT2 032727 000015 0 0 003000000001 0 003000000000
BYT3 032727 000015 144 0 003000000001 0 003000000000
BYT4 032727 000015 0 0 143000000001 0 003000000000
BYT7 032727 000015 0 0 143000000001 0 003000000000
SCT0 032727 000015 0 0 143000000001 0 003000000000
SCT3 032727 000015 751 0 143000000001 000000000001 003000000000
SCT3 032727 000015 752 0 143000000001 000000000003 003000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 108
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0370
SCT3 032727 000015 753 0 143000000001 000000000007 003000000000
SCT3 032727 000015 754 0 143000000001 000000000017 003000000000
SCT3 032727 000015 755 0 143000000001 000000000037 003000000000
SCT3 032727 000015 756 0 143000000001 000000000077 003000000000
SCT3 032727 000015 757 0 143000000001 000000000177 003000000000
SCT3 032727 000015 0 0 143000000001 000000000377 003000000000
SCT3 032727 000015 761 0 143000000001 000000000777 003000000000
SCT3 032727 000015 762 0 143000000001 000000001777 003000000000
SCT3 032727 000015 763 0 143000000001 000000003777 003000000000
SCT3 032727 000015 764 0 143000000001 000000007777 003000000000
SCT3 032727 000015 765 0 143000000001 000000017777 003000000000
SCT3 032727 000015 766 0 143000000001 000000037777 003000000000
SCT3 032727 000015 767 0 143000000001 000000077777 003000000000
SCT3 032727 000015 0 0 143000000001 000000177777 003000000000
SCT3 032727 000015 771 0 143000000001 000000377777 003000000000
SCT3 032727 000015 772 0 143000000001 000000777777 003000000000
SCT3 032727 000015 773 0 143000000001 000001777777 003000000000
SCT3 032727 000015 774 0 143000000001 000003777777 003000000000
SCT3 032727 000015 775 0 143000000001 000007777777 003000000000
SCT3 032727 000015 776 0 143000000001 000017777777 003000000000
SCT3 032727 000015 777 0 143000000001 000037777777 003000000000
SCT3 032727 000015 0 0 143000000001 000077777777 003000000000
SCT4 032727 000015 0 0 143000000001 000077777777 003000000000
BYT7A 032727 000015 014 0 143000000001 000077777777 003000000000
IT1 032727 0 014 0 143000000001 000077777777 003000000000
AT3 032727 0 014 0 000000000001 000077777777 143000000001
AT6 032727 000001 014 0 000000000001 000077777777 143000000001
FT0 032727 000001 014 0 000000770000 000077777777 143000000001
FT1A 032727 000001 014 0 000000770000 000077777777 000000770000
FT9 032730 000001 014 0 000000770000 000077777777 000000770000
ET0 032730 000001 764 0 000000770000 000077777777 000000770000
SCT0 032730 000001 764 0 000000770000 000077777777 000000770000
SCT3 032730 000001 765 0 000000374000 000077777777 000000770000
SCT3 032730 000001 766 0 000000176000 000077777777 000000770000
SCT3 032730 000001 767 0 000000077000 000077777777 000000770000
SCT3 032730 000001 0 0 000000037400 000077777777 000000770000
SCT3 032730 000001 771 0 000000017600 000077777777 000000770000
SCT3 032730 000001 772 0 000000007700 000077777777 000000770000
SCT3 032730 000001 773 0 000000003740 000077777777 000000770000
SCT3 032730 000001 774 0 000000001760 000077777777 000000770000
SCT3 032730 000001 775 0 000000000770 000077777777 000000770000
SCT3 032730 000001 776 0 000000000374 000077777777 000000770000
SCT3 032730 000001 777 0 000000000176 000077777777 000000770000
SCT3 032730 000001 0 0 000000000077 000077777777 000000770000
SCT4 032730 000001 0 0 000000000077 000077777777 000000770000
LBT1 032730 000001 0 0 000000000077 000077777777 000000770000
ST0 032730 000001 0 0 000000000077 000077777777 000000770000
ST1 032730 000001 0 0 000000000077 000077777777 000000770000
ST2 032730 000001 0 0 000000000077 000077777777 000000770000
ST9 032730 000001 0 0 000000000077 000077777777 000000770000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 109
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0371
*032736 ILDB 14,000015
INITIAL
C(AC)=000000 000077
C(E)=003600 000000 C(C(E))=000000 007700
FINAL
C(AC)=000000 000077
C(E)=063600 000001 C(C(E))=000000 007700
TIME PC MA SC FE AR MQ BR
IT0 032736 032736 0 0 134600000015 0 000000007700
IT1 032736 0 0 0 134600000015 0 000000007700
AT3 032736 0 0 0 000000000015 0 134600000015
AT6 032736 000015 0 0 000000000015 0 134600000015
FT0 032736 000015 0 0 003600000000 0 134600000015
FT1A 032736 000015 0 0 003600000000 0 003600000000
FT9 032736 000015 0 0 003600000000 0 003600000000
ET0 032736 000015 0 0 003600000000 0 003600000000
BYT1 032736 000015 0 0 003600000000 0 003600000000
BYT2 032736 000015 0 0 003600000001 0 003600000000
BYT3 032736 000015 144 0 003600000001 0 003600000000
BYT4 032736 000015 0 0 063600000001 0 003600000000
BYT7 032736 000015 742 0 063600000001 0 003600000000
SCT0 032736 000015 742 0 063600000001 0 003600000000
SCT3 032736 000015 743 0 063600000001 000000000001 003600000000
SCT3 032736 000015 744 0 063600000001 000000000003 003600000000
SCT3 032736 000015 745 0 063600000001 000000000007 003600000000
SCT3 032736 000015 746 0 063600000001 000000000017 003600000000
SCT3 032736 000015 747 0 063600000001 000000000037 003600000000
SCT3 032736 000015 0 0 063600000001 000000000077 003600000000
SCT3 032736 000015 751 0 063600000001 000000000177 003600000000
SCT3 032736 000015 752 0 063600000001 000000000377 003600000000
SCT3 032736 000015 753 0 063600000001 000000000777 003600000000
SCT3 032736 000015 754 0 063600000001 000000001777 003600000000
SCT3 032736 000015 755 0 063600000001 000000003777 003600000000
SCT3 032736 000015 756 0 063600000001 000000007777 003600000000
SCT3 032736 000015 757 0 063600000001 000000017777 003600000000
SCT3 032736 000015 0 0 063600000001 000000037777 003600000000
SCT3 032736 000015 761 0 063600000001 000000077777 003600000000
SCT3 032736 000015 762 0 063600000001 000000177777 003600000000
SCT3 032736 000015 763 0 063600000001 000000377777 003600000000
SCT3 032736 000015 764 0 063600000001 000000777777 003600000000
SCT3 032736 000015 765 0 063600000001 000001777777 003600000000
SCT3 032736 000015 766 0 063600000001 000003777777 003600000000
SCT3 032736 000015 767 0 063600000001 000007777777 003600000000
SCT3 032736 000015 0 0 063600000001 000017777777 003600000000
SCT3 032736 000015 771 0 063600000001 000037777777 003600000000
SCT3 032736 000015 772 0 063600000001 000077777777 003600000000
SCT3 032736 000015 773 0 063600000001 000177777777 003600000000
SCT3 032736 000015 774 0 063600000001 000377777777 003600000000
SCT3 032736 000015 775 0 063600000001 000777777777 003600000000
SCT3 032736 000015 776 0 063600000001 001777777777 003600000000
SCT3 032736 000015 777 0 063600000001 003777777777 003600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 110
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0372
SCT3 032736 000015 0 0 063600000001 007777777777 003600000000
SCT4 032736 000015 0 0 063600000001 007777777777 003600000000
BYT7A 032736 000015 006 0 063600000001 007777777777 003600000000
IT1 032736 0 006 0 063600000001 007777777777 003600000000
AT3 032736 0 006 0 000000000001 007777777777 063600000001
AT6 032736 000001 006 0 000000000001 007777777777 063600000001
FT0 032736 000001 006 0 000000007700 007777777777 063600000001
FT1A 032736 000001 006 0 000000007700 007777777777 000000007700
FT9 032737 000001 006 0 000000007700 007777777777 000000007700
ET0 032737 000001 772 0 000000007700 007777777777 000000007700
SCT0 032737 000001 772 0 000000007700 007777777777 000000007700
SCT3 032737 000001 773 0 000000003740 007777777777 000000007700
SCT3 032737 000001 774 0 000000001760 007777777777 000000007700
SCT3 032737 000001 775 0 000000000770 007777777777 000000007700
SCT3 032737 000001 776 0 000000000374 007777777777 000000007700
SCT3 032737 000001 777 0 000000000176 007777777777 000000007700
SCT3 032737 000001 0 0 000000000077 007777777777 000000007700
SCT4 032737 000001 0 0 000000000077 007777777777 000000007700
LBT1 032737 000001 0 0 000000000077 007777777777 000000007700
ST0 032737 000001 0 0 000000000077 007777777777 000000007700
ST1 032737 000001 0 0 000000000077 007777777777 000000007700
ST2 032737 000001 0 0 000000000077 007777777777 000000007700
ST9 032737 000001 0 0 000000000077 007777777777 000000007700
*032745 ILDB 14,000015
INITIAL
C(AC)=777777 777777
C(E)=206000 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000000
C(E)=646000 000001 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 032745 032745 0 0 134600000015 0 777777777777
IT1 032745 0 0 0 134600000015 0 777777777777
AT3 032745 0 0 0 000000000015 0 134600000015
AT6 032745 000015 0 0 000000000015 0 134600000015
FT0 032745 000015 0 0 206000000000 0 134600000015
FT1A 032745 000015 0 0 206000000000 0 206000000000
FT9 032745 000015 0 0 206000000000 0 206000000000
ET0 032745 000015 0 0 206000000000 0 206000000000
BYT1 032745 000015 0 0 206000000000 0 206000000000
BYT2 032745 000015 0 0 206000000001 0 206000000000
BYT3 032745 000015 144 0 206000000001 0 206000000000
BYT4 032745 000015 0 0 646000000001 0 206000000000
BYT7 032745 000015 0 0 646000000001 0 206000000000
SCT0 032745 000015 0 0 646000000001 0 206000000000
SCT3 032745 000015 721 0 646000000001 000000000001 206000000000
SCT3 032745 000015 722 0 646000000001 000000000003 206000000000
SCT3 032745 000015 723 0 646000000001 000000000007 206000000000
SCT3 032745 000015 724 0 646000000001 000000000017 206000000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 111
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0373
SCT3 032745 000015 725 0 646000000001 000000000037 206000000000
SCT3 032745 000015 726 0 646000000001 000000000077 206000000000
SCT3 032745 000015 727 0 646000000001 000000000177 206000000000
SCT3 032745 000015 0 0 646000000001 000000000377 206000000000
SCT3 032745 000015 731 0 646000000001 000000000777 206000000000
SCT3 032745 000015 732 0 646000000001 000000001777 206000000000
SCT3 032745 000015 733 0 646000000001 000000003777 206000000000
SCT3 032745 000015 734 0 646000000001 000000007777 206000000000
SCT3 032745 000015 735 0 646000000001 000000017777 206000000000
SCT3 032745 000015 736 0 646000000001 000000037777 206000000000
SCT3 032745 000015 737 0 646000000001 000000077777 206000000000
SCT3 032745 000015 0 0 646000000001 000000177777 206000000000
SCT3 032745 000015 741 0 646000000001 000000377777 206000000000
SCT3 032745 000015 742 0 646000000001 000000777777 206000000000
SCT3 032745 000015 743 0 646000000001 000001777777 206000000000
SCT3 032745 000015 744 0 646000000001 000003777777 206000000000
SCT3 032745 000015 745 0 646000000001 000007777777 206000000000
SCT3 032745 000015 746 0 646000000001 000017777777 206000000000
SCT3 032745 000015 747 0 646000000001 000037777777 206000000000
SCT3 032745 000015 0 0 646000000001 000077777777 206000000000
SCT3 032745 000015 751 0 646000000001 000177777777 206000000000
SCT3 032745 000015 752 0 646000000001 000377777777 206000000000
SCT3 032745 000015 753 0 646000000001 000777777777 206000000000
SCT3 032745 000015 754 0 646000000001 001777777777 206000000000
SCT3 032745 000015 755 0 646000000001 003777777777 206000000000
SCT3 032745 000015 756 0 646000000001 007777777777 206000000000
SCT3 032745 000015 757 0 646000000001 017777777777 206000000000
SCT3 032745 000015 0 0 646000000001 037777777777 206000000000
SCT3 032745 000015 761 0 646000000001 077777777777 206000000000
SCT3 032745 000015 762 0 646000000001 177777777777 206000000000
SCT3 032745 000015 763 0 646000000001 377777777777 206000000000
SCT3 032745 000015 764 0 646000000001 777777777777 206000000000
SCT3 032745 000015 765 0 646000000001 777777777777 206000000000
SCT3 032745 000015 766 0 646000000001 777777777777 206000000000
SCT3 032745 000015 767 0 646000000001 777777777777 206000000000
SCT3 032745 000015 0 0 646000000001 777777777777 206000000000
SCT3 032745 000015 771 0 646000000001 777777777777 206000000000
SCT3 032745 000015 772 0 646000000001 777777777777 206000000000
SCT3 032745 000015 773 0 646000000001 777777777777 206000000000
SCT3 032745 000015 774 0 646000000001 777777777777 206000000000
SCT3 032745 000015 775 0 646000000001 777777777777 206000000000
SCT3 032745 000015 776 0 646000000001 777777777777 206000000000
SCT3 032745 000015 777 0 646000000001 777777777777 206000000000
SCT3 032745 000015 0 0 646000000001 777777777777 206000000000
SCT4 032745 000015 0 0 646000000001 777777777777 206000000000
BYT7A 032745 000015 064 0 646000000001 777777777777 206000000000
IT1 032745 0 064 0 646000000001 777777777777 206000000000
AT3 032745 0 064 0 000000000001 777777777777 646000000001
AT6 032745 000001 064 0 000000000001 777777777777 646000000001
FT0 032745 000001 064 0 777777777777 777777777777 646000000001
FT1A 032745 000001 064 0 777777777777 777777777777 777777777777
FT9 032746 000001 064 0 777777777777 777777777777 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 112
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0374
ET0 032746 000001 714 0 777777777777 777777777777 777777777777
SCT0 032746 000001 714 0 777777777777 777777777777 777777777777
SCT3 032746 000001 715 0 377777777777 777777777777 777777777777
SCT3 032746 000001 716 0 177777777777 777777777777 777777777777
SCT3 032746 000001 717 0 077777777777 777777777777 777777777777
SCT3 032746 000001 0 0 037777777777 777777777777 777777777777
SCT3 032746 000001 721 0 017777777777 777777777777 777777777777
SCT3 032746 000001 722 0 007777777777 777777777777 777777777777
SCT3 032746 000001 723 0 003777777777 777777777777 777777777777
SCT3 032746 000001 724 0 001777777777 777777777777 777777777777
SCT3 032746 000001 725 0 000777777777 777777777777 777777777777
SCT3 032746 000001 726 0 000377777777 777777777777 777777777777
SCT3 032746 000001 727 0 000177777777 777777777777 777777777777
SCT3 032746 000001 0 0 000077777777 777777777777 777777777777
SCT3 032746 000001 731 0 000037777777 777777777777 777777777777
SCT3 032746 000001 732 0 000017777777 777777777777 777777777777
SCT3 032746 000001 733 0 000007777777 777777777777 777777777777
SCT3 032746 000001 734 0 000003777777 777777777777 777777777777
SCT3 032746 000001 735 0 000001777777 777777777777 777777777777
SCT3 032746 000001 736 0 000000777777 777777777777 777777777777
SCT3 032746 000001 737 0 000000377777 777777777777 777777777777
SCT3 032746 000001 0 0 000000177777 777777777777 777777777777
SCT3 032746 000001 741 0 000000077777 777777777777 777777777777
SCT3 032746 000001 742 0 000000037777 777777777777 777777777777
SCT3 032746 000001 743 0 000000017777 777777777777 777777777777
SCT3 032746 000001 744 0 000000007777 777777777777 777777777777
SCT3 032746 000001 745 0 000000003777 777777777777 777777777777
SCT3 032746 000001 746 0 000000001777 777777777777 777777777777
SCT3 032746 000001 747 0 000000000777 777777777777 777777777777
SCT3 032746 000001 0 0 000000000377 777777777777 777777777777
SCT3 032746 000001 751 0 000000000177 777777777777 777777777777
SCT3 032746 000001 752 0 000000000077 777777777777 777777777777
SCT3 032746 000001 753 0 000000000037 777777777777 777777777777
SCT3 032746 000001 754 0 000000000017 777777777777 777777777777
SCT3 032746 000001 755 0 000000000007 777777777777 777777777777
SCT3 032746 000001 756 0 000000000003 777777777777 777777777777
SCT3 032746 000001 757 0 000000000001 777777777777 777777777777
SCT3 032746 000001 0 0 0 777777777777 777777777777
SCT3 032746 000001 761 0 0 777777777777 777777777777
SCT3 032746 000001 762 0 0 777777777777 777777777777
SCT3 032746 000001 763 0 0 777777777777 777777777777
SCT3 032746 000001 764 0 0 777777777777 777777777777
SCT3 032746 000001 765 0 0 777777777777 777777777777
SCT3 032746 000001 766 0 0 777777777777 777777777777
SCT3 032746 000001 767 0 0 777777777777 777777777777
SCT3 032746 000001 0 0 0 777777777777 777777777777
SCT3 032746 000001 771 0 0 777777777777 777777777777
SCT3 032746 000001 772 0 0 777777777777 777777777777
SCT3 032746 000001 773 0 0 777777777777 777777777777
SCT3 032746 000001 774 0 0 777777777777 777777777777
SCT3 032746 000001 775 0 0 777777777777 777777777777
SCT3 032746 000001 776 0 0 777777777777 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 113
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0375
SCT3 032746 000001 777 0 0 777777777777 777777777777
SCT3 032746 000001 0 0 0 777777777777 777777777777
SCT4 032746 000001 0 0 0 777777777777 777777777777
LBT1 032746 000001 0 0 0 777777777777 777777777777
ST0 032746 000001 0 0 0 777777777777 777777777777
ST1 032746 000001 0 0 0 777777777777 777777777777
ST2 032746 000001 0 0 0 777777777777 777777777777
ST9 032746 000001 0 0 0 777777777777 777777777777
*032762 DPB 13,000014
INITIAL
C(AC)=000000 000055
C(E)=060600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=060600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032762 032762 0 0 137540000014 0 000000005500
IT1 032762 0 0 0 137540000014 0 000000005500
AT3 032762 0 0 0 000000000014 0 137540000014
AT6 032762 000014 0 0 000000000014 0 137540000014
FT0 032762 000014 0 0 060600000000 0 137540000014
FT1A 032762 000014 0 0 060600000000 0 060600000000
FT9 032762 000014 0 0 060600000000 0 060600000000
ET0 032762 000014 0 0 060600000000 0 060600000000
BYT6 032762 000014 0 0 060600000000 0 060600000000
BYT7 032762 000014 772 0 060600000000 0 060600000000
SCT0 032762 000014 772 0 060600000000 0 060600000000
SCT3 032762 000014 773 0 060600000000 000000000001 060600000000
SCT3 032762 000014 774 0 060600000000 000000000003 060600000000
SCT3 032762 000014 775 0 060600000000 000000000007 060600000000
SCT3 032762 000014 776 0 060600000000 000000000017 060600000000
SCT3 032762 000014 777 0 060600000000 000000000037 060600000000
SCT3 032762 000014 0 0 060600000000 000000000077 060600000000
SCT4 032762 000014 0 0 060600000000 000000000077 060600000000
BYT7A 032762 000014 006 0 060600000000 000000000077 060600000000
IT1 032762 0 006 0 060600000000 000000000077 060600000000
AT3 032762 0 006 0 0 000000000077 060600000000
AT6 032762 0 006 0 0 000000000077 060600000000
FT0 032762 0 006 0 0 000000000077 060600000000
FT1A 032762 0 006 0 0 000000000077 0
FT2 032762 0 006 0 0 000000000077 0
FT2RQ 032762 0 006 0 000000000055 000000000077 0
FT3 032762 0 006 0 000000000055 000000000077 0
FT9 032763 0 006 0 000000000055 000000000077 0
ET0 032763 0 772 0 000000000055 000000000077 0
SCT0 032763 0 772 0 000000000055 000000000077 0
SCT3 032763 0 773 0 000000000132 000000000176 0
SCT3 032763 0 774 0 000000000264 000000000374 0
SCT3 032763 0 775 0 000000000550 000000000770 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 114
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0376
SCT3 032763 0 776 0 000000001320 000000001760 0
SCT3 032763 0 777 0 000000002640 000000003740 0
SCT3 032763 0 0 0 000000005500 000000007700 0
SCT4 032763 0 0 0 000000005500 000000007700 0
DBT1 032763 0 0 0 000000005500 000000007700 0
DBT2 032763 0 0 0 000000007700 0 000000005500
DBT3 032763 0 0 0 777777770077 0 000000005500
DBT4 032763 0 0 0 0 0 000000005500
DBT5 032763 0 0 0 000000005500 0 000000005500
ST0 032763 0 0 0 000000005500 0 000000005500
ST6 032763 0 0 0 000000005500 0 000000005500
ST6A 032763 0 0 0 000000005500 0 000000005500
ST9 032763 0 0 0 000000005500 0 000000005500
*032773 DPB 13,000014
INITIAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 032773 032773 0 0 137540000014 0 000000550000
IT1 032773 0 0 0 137540000014 0 000000550000
AT3 032773 0 0 0 000000000014 0 137540000014
AT6 032773 000014 0 0 000000000014 0 137540000014
FT0 032773 000014 0 0 140600000000 0 137540000014
FT1A 032773 000014 0 0 140600000000 0 140600000000
FT9 032773 000014 0 0 140600000000 0 140600000000
ET0 032773 000014 0 0 140600000000 0 140600000000
BYT6 032773 000014 0 0 140600000000 0 140600000000
BYT7 032773 000014 772 0 140600000000 0 140600000000
SCT0 032773 000014 772 0 140600000000 0 140600000000
SCT3 032773 000014 773 0 140600000000 000000000001 140600000000
SCT3 032773 000014 774 0 140600000000 000000000003 140600000000
SCT3 032773 000014 775 0 140600000000 000000000007 140600000000
SCT3 032773 000014 776 0 140600000000 000000000017 140600000000
SCT3 032773 000014 777 0 140600000000 000000000037 140600000000
SCT3 032773 000014 0 0 140600000000 000000000077 140600000000
SCT4 032773 000014 0 0 140600000000 000000000077 140600000000
BYT7A 032773 000014 014 0 140600000000 000000000077 140600000000
IT1 032773 0 014 0 140600000000 000000000077 140600000000
AT3 032773 0 014 0 0 000000000077 140600000000
AT6 032773 0 014 0 0 000000000077 140600000000
FT0 032773 0 014 0 0 000000000077 140600000000
FT1A 032773 0 014 0 0 000000000077 0
FT2 032773 0 014 0 0 000000000077 0
FT2RQ 032773 0 014 0 000000000055 000000000077 0
FT3 032773 0 014 0 000000000055 000000000077 0
FT9 032774 0 014 0 000000000055 000000000077 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 115
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0377
ET0 032774 0 764 0 000000000055 000000000077 0
SCT0 032774 0 764 0 000000000055 000000000077 0
SCT3 032774 0 765 0 000000000132 000000000176 0
SCT3 032774 0 766 0 000000000264 000000000374 0
SCT3 032774 0 767 0 000000000550 000000000770 0
SCT3 032774 0 0 0 000000001320 000000001760 0
SCT3 032774 0 771 0 000000002640 000000003740 0
SCT3 032774 0 772 0 000000005500 000000007700 0
SCT3 032774 0 773 0 000000013200 000000017600 0
SCT3 032774 0 774 0 000000026400 000000037400 0
SCT3 032774 0 775 0 000000055000 000000077000 0
SCT3 032774 0 776 0 000000132000 000000176000 0
SCT3 032774 0 777 0 000000264000 000000374000 0
SCT3 032774 0 0 0 000000550000 000000770000 0
SCT4 032774 0 0 0 000000550000 000000770000 0
DBT1 032774 0 0 0 000000550000 000000770000 0
DBT2 032774 0 0 0 000000770000 0 000000550000
DBT3 032774 0 0 0 777777007777 0 000000550000
DBT4 032774 0 0 0 0 0 000000550000
DBT5 032774 0 0 0 000000550000 0 000000550000
ST0 032774 0 0 0 000000550000 0 000000550000
ST6 032774 0 0 0 000000550000 0 000000550000
ST6A 032774 0 0 0 000000550000 0 000000550000
ST9 032774 0 0 0 000000550000 0 000000550000
*033004 DPB 13,000014
INITIAL
C(AC)=000000 000055
C(E)=220600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=220600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033004 033004 0 0 137540000014 0 000055000000
IT1 033004 0 0 0 137540000014 0 000055000000
AT3 033004 0 0 0 000000000014 0 137540000014
AT6 033004 000014 0 0 000000000014 0 137540000014
FT0 033004 000014 0 0 220600000000 0 137540000014
FT1A 033004 000014 0 0 220600000000 0 220600000000
FT9 033004 000014 0 0 220600000000 0 220600000000
ET0 033004 000014 0 0 220600000000 0 220600000000
BYT6 033004 000014 0 0 220600000000 0 220600000000
BYT7 033004 000014 772 0 220600000000 0 220600000000
SCT0 033004 000014 772 0 220600000000 0 220600000000
SCT3 033004 000014 773 0 220600000000 000000000001 220600000000
SCT3 033004 000014 774 0 220600000000 000000000003 220600000000
SCT3 033004 000014 775 0 220600000000 000000000007 220600000000
SCT3 033004 000014 776 0 220600000000 000000000017 220600000000
SCT3 033004 000014 777 0 220600000000 000000000037 220600000000
SCT3 033004 000014 0 0 220600000000 000000000077 220600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 116
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0378
SCT4 033004 000014 0 0 220600000000 000000000077 220600000000
BYT7A 033004 000014 022 0 220600000000 000000000077 220600000000
IT1 033004 0 022 0 220600000000 000000000077 220600000000
AT3 033004 0 022 0 0 000000000077 220600000000
AT6 033004 0 022 0 0 000000000077 220600000000
FT0 033004 0 022 0 0 000000000077 220600000000
FT1A 033004 0 022 0 0 000000000077 0
FT2 033004 0 022 0 0 000000000077 0
FT2RQ 033004 0 022 0 000000000055 000000000077 0
FT3 033004 0 022 0 000000000055 000000000077 0
FT9 033005 0 022 0 000000000055 000000000077 0
ET0 033005 0 756 0 000000000055 000000000077 0
SCT0 033005 0 756 0 000000000055 000000000077 0
SCT3 033005 0 757 0 000000000132 000000000176 0
SCT3 033005 0 0 0 000000000264 000000000374 0
SCT3 033005 0 761 0 000000000550 000000000770 0
SCT3 033005 0 762 0 000000001320 000000001760 0
SCT3 033005 0 763 0 000000002640 000000003740 0
SCT3 033005 0 764 0 000000005500 000000007700 0
SCT3 033005 0 765 0 000000013200 000000017600 0
SCT3 033005 0 766 0 000000026400 000000037400 0
SCT3 033005 0 767 0 000000055000 000000077000 0
SCT3 033005 0 0 0 000000132000 000000176000 0
SCT3 033005 0 771 0 000000264000 000000374000 0
SCT3 033005 0 772 0 000000550000 000000770000 0
SCT3 033005 0 773 0 000001320000 000001760000 0
SCT3 033005 0 774 0 000002640000 000003740000 0
SCT3 033005 0 775 0 000005500000 000007700000 0
SCT3 033005 0 776 0 000013200000 000017600000 0
SCT3 033005 0 777 0 000026400000 000037400000 0
SCT3 033005 0 0 0 000055000000 000077000000 0
SCT4 033005 0 0 0 000055000000 000077000000 0
DBT1 033005 0 0 0 000055000000 000077000000 0
DBT2 033005 0 0 0 000077000000 0 000055000000
DBT3 033005 0 0 0 777700777777 0 000055000000
DBT4 033005 0 0 0 0 0 000055000000
DBT5 033005 0 0 0 000055000000 0 000055000000
ST0 033005 0 0 0 000055000000 0 000055000000
ST6 033005 0 0 0 000055000000 0 000055000000
ST6A 033005 0 0 0 000055000000 0 000055000000
ST9 033005 0 0 0 000055000000 0 000055000000
*033015 DPB 13,000014
INITIAL
C(AC)=000000 000055
C(E)=300600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=300600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 117
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0379
IT0 033015 033015 0 0 137540000014 0 005500000000
IT1 033015 0 0 0 137540000014 0 005500000000
AT3 033015 0 0 0 000000000014 0 137540000014
AT6 033015 000014 0 0 000000000014 0 137540000014
FT0 033015 000014 0 0 300600000000 0 137540000014
FT1A 033015 000014 0 0 300600000000 0 300600000000
FT9 033015 000014 0 0 300600000000 0 300600000000
ET0 033015 000014 0 0 300600000000 0 300600000000
BYT6 033015 000014 0 0 300600000000 0 300600000000
BYT7 033015 000014 772 0 300600000000 0 300600000000
SCT0 033015 000014 772 0 300600000000 0 300600000000
SCT3 033015 000014 773 0 300600000000 000000000001 300600000000
SCT3 033015 000014 774 0 300600000000 000000000003 300600000000
SCT3 033015 000014 775 0 300600000000 000000000007 300600000000
SCT3 033015 000014 776 0 300600000000 000000000017 300600000000
SCT3 033015 000014 777 0 300600000000 000000000037 300600000000
SCT3 033015 000014 0 0 300600000000 000000000077 300600000000
SCT4 033015 000014 0 0 300600000000 000000000077 300600000000
BYT7A 033015 000014 0 0 300600000000 000000000077 300600000000
IT1 033015 0 0 0 300600000000 000000000077 300600000000
AT3 033015 0 0 0 0 000000000077 300600000000
AT6 033015 0 0 0 0 000000000077 300600000000
FT0 033015 0 0 0 0 000000000077 300600000000
FT1A 033015 0 0 0 0 000000000077 0
FT2 033015 0 0 0 0 000000000077 0
FT2RQ 033015 0 0 0 000000000055 000000000077 0
FT3 033015 0 0 0 000000000055 000000000077 0
FT9 033016 0 0 0 000000000055 000000000077 0
ET0 033016 0 0 0 000000000055 000000000077 0
SCT0 033016 0 0 0 000000000055 000000000077 0
SCT3 033016 0 751 0 000000000132 000000000176 0
SCT3 033016 0 752 0 000000000264 000000000374 0
SCT3 033016 0 753 0 000000000550 000000000770 0
SCT3 033016 0 754 0 000000001320 000000001760 0
SCT3 033016 0 755 0 000000002640 000000003740 0
SCT3 033016 0 756 0 000000005500 000000007700 0
SCT3 033016 0 757 0 000000013200 000000017600 0
SCT3 033016 0 0 0 000000026400 000000037400 0
SCT3 033016 0 761 0 000000055000 000000077000 0
SCT3 033016 0 762 0 000000132000 000000176000 0
SCT3 033016 0 763 0 000000264000 000000374000 0
SCT3 033016 0 764 0 000000550000 000000770000 0
SCT3 033016 0 765 0 000001320000 000001760000 0
SCT3 033016 0 766 0 000002640000 000003740000 0
SCT3 033016 0 767 0 000005500000 000007700000 0
SCT3 033016 0 0 0 000013200000 000017600000 0
SCT3 033016 0 771 0 000026400000 000037400000 0
SCT3 033016 0 772 0 000055000000 000077000000 0
SCT3 033016 0 773 0 000132000000 000176000000 0
SCT3 033016 0 774 0 000264000000 000374000000 0
SCT3 033016 0 775 0 000550000000 000770000000 0
SCT3 033016 0 776 0 001320000000 001760000000 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 118
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0380
SCT3 033016 0 777 0 002640000000 003740000000 0
SCT3 033016 0 0 0 005500000000 007700000000 0
SCT4 033016 0 0 0 005500000000 007700000000 0
DBT1 033016 0 0 0 005500000000 007700000000 0
DBT2 033016 0 0 0 007700000000 0 005500000000
DBT3 033016 0 0 0 770077777777 0 005500000000
DBT4 033016 0 0 0 0 0 005500000000
DBT5 033016 0 0 0 005500000000 0 005500000000
ST0 033016 0 0 0 005500000000 0 005500000000
ST6 033016 0 0 0 005500000000 0 005500000000
ST6A 033016 0 0 0 005500000000 0 005500000000
ST9 033016 0 0 0 005500000000 0 005500000000
*033026 DPB 13,000014
INITIAL
C(AC)=000000 000055
C(E)=360600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=360600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033026 033026 0 0 137540000014 0 550000000000
IT1 033026 0 0 0 137540000014 0 550000000000
AT3 033026 0 0 0 000000000014 0 137540000014
AT6 033026 000014 0 0 000000000014 0 137540000014
FT0 033026 000014 0 0 360600000000 0 137540000014
FT1A 033026 000014 0 0 360600000000 0 360600000000
FT9 033026 000014 0 0 360600000000 0 360600000000
ET0 033026 000014 0 0 360600000000 0 360600000000
BYT6 033026 000014 0 0 360600000000 0 360600000000
BYT7 033026 000014 772 0 360600000000 0 360600000000
SCT0 033026 000014 772 0 360600000000 0 360600000000
SCT3 033026 000014 773 0 360600000000 000000000001 360600000000
SCT3 033026 000014 774 0 360600000000 000000000003 360600000000
SCT3 033026 000014 775 0 360600000000 000000000007 360600000000
SCT3 033026 000014 776 0 360600000000 000000000017 360600000000
SCT3 033026 000014 777 0 360600000000 000000000037 360600000000
SCT3 033026 000014 0 0 360600000000 000000000077 360600000000
SCT4 033026 000014 0 0 360600000000 000000000077 360600000000
BYT7A 033026 000014 036 0 360600000000 000000000077 360600000000
IT1 033026 0 036 0 360600000000 000000000077 360600000000
AT3 033026 0 036 0 0 000000000077 360600000000
AT6 033026 0 036 0 0 000000000077 360600000000
FT0 033026 0 036 0 0 000000000077 360600000000
FT1A 033026 0 036 0 0 000000000077 0
FT2 033026 0 036 0 0 000000000077 0
FT2RQ 033026 0 036 0 000000000055 000000000077 0
FT3 033026 0 036 0 000000000055 000000000077 0
FT9 033027 0 036 0 000000000055 000000000077 0
ET0 033027 0 742 0 000000000055 000000000077 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 119
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0381
SCT0 033027 0 742 0 000000000055 000000000077 0
SCT3 033027 0 743 0 000000000132 000000000176 0
SCT3 033027 0 744 0 000000000264 000000000374 0
SCT3 033027 0 745 0 000000000550 000000000770 0
SCT3 033027 0 746 0 000000001320 000000001760 0
SCT3 033027 0 747 0 000000002640 000000003740 0
SCT3 033027 0 0 0 000000005500 000000007700 0
SCT3 033027 0 751 0 000000013200 000000017600 0
SCT3 033027 0 752 0 000000026400 000000037400 0
SCT3 033027 0 753 0 000000055000 000000077000 0
SCT3 033027 0 754 0 000000132000 000000176000 0
SCT3 033027 0 755 0 000000264000 000000374000 0
SCT3 033027 0 756 0 000000550000 000000770000 0
SCT3 033027 0 757 0 000001320000 000001760000 0
SCT3 033027 0 0 0 000002640000 000003740000 0
SCT3 033027 0 761 0 000005500000 000007700000 0
SCT3 033027 0 762 0 000013200000 000017600000 0
SCT3 033027 0 763 0 000026400000 000037400000 0
SCT3 033027 0 764 0 000055000000 000077000000 0
SCT3 033027 0 765 0 000132000000 000176000000 0
SCT3 033027 0 766 0 000264000000 000374000000 0
SCT3 033027 0 767 0 000550000000 000770000000 0
SCT3 033027 0 0 0 001320000000 001760000000 0
SCT3 033027 0 771 0 002640000000 003740000000 0
SCT3 033027 0 772 0 005500000000 007700000000 0
SCT3 033027 0 773 0 013200000000 017600000000 0
SCT3 033027 0 774 0 026400000000 037400000000 0
SCT3 033027 0 775 0 055000000000 077000000000 0
SCT3 033027 0 776 0 132000000000 176000000000 0
SCT3 033027 0 777 0 264000000000 374000000000 0
SCT3 033027 0 0 0 550000000000 770000000000 0
SCT4 033027 0 0 0 550000000000 770000000000 0
DBT1 033027 0 0 0 550000000000 770000000000 0
DBT2 033027 0 0 0 770000000000 0 550000000000
DBT3 033027 0 0 0 007777777777 0 550000000000
DBT4 033027 0 0 0 0 0 550000000000
DBT5 033027 0 0 0 550000000000 0 550000000000
ST0 033027 0 0 0 550000000000 0 550000000000
ST6 033027 0 0 0 550000000000 0 550000000000
ST6A 033027 0 0 0 550000000000 0 550000000000
ST9 033027 0 0 0 550000000000 0 550000000000
*033043 DPB 12,000013
INITIAL
C(AC)=000000 000055
C(E)=000600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=000600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 120
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0382
IT0 033043 033043 0 0 137500000013 0 000000000055
IT1 033043 0 0 0 137500000013 0 000000000055
AT3 033043 0 0 0 000000000013 0 137500000013
AT6 033043 000013 0 0 000000000013 0 137500000013
FT0 033043 000013 0 0 000600000000 0 137500000013
FT1A 033043 000013 0 0 000600000000 0 000600000000
FT9 033043 000013 0 0 000600000000 0 000600000000
ET0 033043 000013 0 0 000600000000 0 000600000000
BYT6 033043 000013 0 0 000600000000 0 000600000000
BYT7 033043 000013 772 0 000600000000 0 000600000000
SCT0 033043 000013 772 0 000600000000 0 000600000000
SCT3 033043 000013 773 0 000600000000 000000000001 000600000000
SCT3 033043 000013 774 0 000600000000 000000000003 000600000000
SCT3 033043 000013 775 0 000600000000 000000000007 000600000000
SCT3 033043 000013 776 0 000600000000 000000000017 000600000000
SCT3 033043 000013 777 0 000600000000 000000000037 000600000000
SCT3 033043 000013 0 0 000600000000 000000000077 000600000000
SCT4 033043 000013 0 0 000600000000 000000000077 000600000000
BYT7A 033043 000013 0 0 000600000000 000000000077 000600000000
IT1 033043 0 0 0 000600000000 000000000077 000600000000
AT3 033043 0 0 0 0 000000000077 000600000000
AT6 033043 0 0 0 0 000000000077 000600000000
FT0 033043 0 0 0 0 000000000077 000600000000
FT1A 033043 0 0 0 0 000000000077 0
FT2 033043 0 0 0 0 000000000077 0
FT2RQ 033043 0 0 0 000000000055 000000000077 0
FT3 033043 0 0 0 000000000055 000000000077 0
FT9 033044 0 0 0 000000000055 000000000077 0
ET0 033044 0 0 0 000000000055 000000000077 0
SCT0 033044 0 0 0 000000000055 000000000077 0
SCT4 033044 0 0 0 000000000055 000000000077 0
DBT1 033044 0 0 0 000000000055 000000000077 0
DBT2 033044 0 0 0 000000000077 0 000000000055
DBT3 033044 0 0 0 777777777700 0 000000000055
DBT4 033044 0 0 0 0 0 000000000055
DBT5 033044 0 0 0 000000000055 0 000000000055
ST0 033044 0 0 0 000000000055 0 000000000055
ST6 033044 0 0 0 000000000055 0 000000000055
ST6A 033044 0 0 0 000000000055 0 000000000055
ST9 033044 0 0 0 000000000055 0 000000000055
*033054 DPB 12,000013
INITIAL
C(AC)=000000 000055
C(E)=060600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=060600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033054 033054 0 0 137500000013 0 000000005500
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 121
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0383
IT1 033054 0 0 0 137500000013 0 000000005500
AT3 033054 0 0 0 000000000013 0 137500000013
AT6 033054 000013 0 0 000000000013 0 137500000013
FT0 033054 000013 0 0 060600000000 0 137500000013
FT1A 033054 000013 0 0 060600000000 0 060600000000
FT9 033054 000013 0 0 060600000000 0 060600000000
ET0 033054 000013 0 0 060600000000 0 060600000000
BYT6 033054 000013 0 0 060600000000 0 060600000000
BYT7 033054 000013 772 0 060600000000 0 060600000000
SCT0 033054 000013 772 0 060600000000 0 060600000000
SCT3 033054 000013 773 0 060600000000 000000000001 060600000000
SCT3 033054 000013 774 0 060600000000 000000000003 060600000000
SCT3 033054 000013 775 0 060600000000 000000000007 060600000000
SCT3 033054 000013 776 0 060600000000 000000000017 060600000000
SCT3 033054 000013 777 0 060600000000 000000000037 060600000000
SCT3 033054 000013 0 0 060600000000 000000000077 060600000000
SCT4 033054 000013 0 0 060600000000 000000000077 060600000000
BYT7A 033054 000013 006 0 060600000000 000000000077 060600000000
IT1 033054 0 006 0 060600000000 000000000077 060600000000
AT3 033054 0 006 0 0 000000000077 060600000000
AT6 033054 0 006 0 0 000000000077 060600000000
FT0 033054 0 006 0 0 000000000077 060600000000
FT1A 033054 0 006 0 0 000000000077 0
FT2 033054 0 006 0 0 000000000077 0
FT2RQ 033054 0 006 0 000000000055 000000000077 0
FT3 033054 0 006 0 000000000055 000000000077 0
FT9 033055 0 006 0 000000000055 000000000077 0
ET0 033055 0 772 0 000000000055 000000000077 0
SCT0 033055 0 772 0 000000000055 000000000077 0
SCT3 033055 0 773 0 000000000132 000000000176 0
SCT3 033055 0 774 0 000000000264 000000000374 0
SCT3 033055 0 775 0 000000000550 000000000770 0
SCT3 033055 0 776 0 000000001320 000000001760 0
SCT3 033055 0 777 0 000000002640 000000003740 0
SCT3 033055 0 0 0 000000005500 000000007700 0
SCT4 033055 0 0 0 000000005500 000000007700 0
DBT1 033055 0 0 0 000000005500 000000007700 0
DBT2 033055 0 0 0 000000007700 0 000000005500
DBT3 033055 0 0 0 777777770077 0 000000005500
DBT4 033055 0 0 0 0 0 000000005500
DBT5 033055 0 0 0 000000005500 0 000000005500
ST0 033055 0 0 0 000000005500 0 000000005500
ST6 033055 0 0 0 000000005500 0 000000005500
ST6A 033055 0 0 0 000000005500 0 000000005500
ST9 033055 0 0 0 000000005500 0 000000005500
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 122
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0384
*033065 DPB 12,000013
INITIAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033065 033065 0 0 137500000013 0 000000550000
IT1 033065 0 0 0 137500000013 0 000000550000
AT3 033065 0 0 0 000000000013 0 137500000013
AT6 033065 000013 0 0 000000000013 0 137500000013
FT0 033065 000013 0 0 140600000000 0 137500000013
FT1A 033065 000013 0 0 140600000000 0 140600000000
FT9 033065 000013 0 0 140600000000 0 140600000000
ET0 033065 000013 0 0 140600000000 0 140600000000
BYT6 033065 000013 0 0 140600000000 0 140600000000
BYT7 033065 000013 772 0 140600000000 0 140600000000
SCT0 033065 000013 772 0 140600000000 0 140600000000
SCT3 033065 000013 773 0 140600000000 000000000001 140600000000
SCT3 033065 000013 774 0 140600000000 000000000003 140600000000
SCT3 033065 000013 775 0 140600000000 000000000007 140600000000
SCT3 033065 000013 776 0 140600000000 000000000017 140600000000
SCT3 033065 000013 777 0 140600000000 000000000037 140600000000
SCT3 033065 000013 0 0 140600000000 000000000077 140600000000
SCT4 033065 000013 0 0 140600000000 000000000077 140600000000
BYT7A 033065 000013 014 0 140600000000 000000000077 140600000000
IT1 033065 0 014 0 140600000000 000000000077 140600000000
AT3 033065 0 014 0 0 000000000077 140600000000
AT6 033065 0 014 0 0 000000000077 140600000000
FT0 033065 0 014 0 0 000000000077 140600000000
FT1A 033065 0 014 0 0 000000000077 0
FT2 033065 0 014 0 0 000000000077 0
FT2RQ 033065 0 014 0 000000000055 000000000077 0
FT3 033065 0 014 0 000000000055 000000000077 0
FT9 033066 0 014 0 000000000055 000000000077 0
ET0 033066 0 764 0 000000000055 000000000077 0
SCT0 033066 0 764 0 000000000055 000000000077 0
SCT3 033066 0 765 0 000000000132 000000000176 0
SCT3 033066 0 766 0 000000000264 000000000374 0
SCT3 033066 0 767 0 000000000550 000000000770 0
SCT3 033066 0 0 0 000000001320 000000001760 0
SCT3 033066 0 771 0 000000002640 000000003740 0
SCT3 033066 0 772 0 000000005500 000000007700 0
SCT3 033066 0 773 0 000000013200 000000017600 0
SCT3 033066 0 774 0 000000026400 000000037400 0
SCT3 033066 0 775 0 000000055000 000000077000 0
SCT3 033066 0 776 0 000000132000 000000176000 0
SCT3 033066 0 777 0 000000264000 000000374000 0
SCT3 033066 0 0 0 000000550000 000000770000 0
SCT4 033066 0 0 0 000000550000 000000770000 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 123
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0385
DBT1 033066 0 0 0 000000550000 000000770000 0
DBT2 033066 0 0 0 000000770000 0 000000550000
DBT3 033066 0 0 0 777777007777 0 000000550000
DBT4 033066 0 0 0 0 0 000000550000
DBT5 033066 0 0 0 000000550000 0 000000550000
ST0 033066 0 0 0 000000550000 0 000000550000
ST6 033066 0 0 0 000000550000 0 000000550000
ST6A 033066 0 0 0 000000550000 0 000000550000
ST9 033066 0 0 0 000000550000 0 000000550000
*033076 DPB 12,000013
INITIAL
C(AC)=000000 000055
C(E)=220600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=220600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033076 033076 0 0 137500000013 0 000055000000
IT1 033076 0 0 0 137500000013 0 000055000000
AT3 033076 0 0 0 000000000013 0 137500000013
AT6 033076 000013 0 0 000000000013 0 137500000013
FT0 033076 000013 0 0 220600000000 0 137500000013
FT1A 033076 000013 0 0 220600000000 0 220600000000
FT9 033076 000013 0 0 220600000000 0 220600000000
ET0 033076 000013 0 0 220600000000 0 220600000000
BYT6 033076 000013 0 0 220600000000 0 220600000000
BYT7 033076 000013 772 0 220600000000 0 220600000000
SCT0 033076 000013 772 0 220600000000 0 220600000000
SCT3 033076 000013 773 0 220600000000 000000000001 220600000000
SCT3 033076 000013 774 0 220600000000 000000000003 220600000000
SCT3 033076 000013 775 0 220600000000 000000000007 220600000000
SCT3 033076 000013 776 0 220600000000 000000000017 220600000000
SCT3 033076 000013 777 0 220600000000 000000000037 220600000000
SCT3 033076 000013 0 0 220600000000 000000000077 220600000000
SCT4 033076 000013 0 0 220600000000 000000000077 220600000000
BYT7A 033076 000013 022 0 220600000000 000000000077 220600000000
IT1 033076 0 022 0 220600000000 000000000077 220600000000
AT3 033076 0 022 0 0 000000000077 220600000000
AT6 033076 0 022 0 0 000000000077 220600000000
FT0 033076 0 022 0 0 000000000077 220600000000
FT1A 033076 0 022 0 0 000000000077 0
FT2 033076 0 022 0 0 000000000077 0
FT2RQ 033076 0 022 0 000000000055 000000000077 0
FT3 033076 0 022 0 000000000055 000000000077 0
FT9 033077 0 022 0 000000000055 000000000077 0
ET0 033077 0 756 0 000000000055 000000000077 0
SCT0 033077 0 756 0 000000000055 000000000077 0
SCT3 033077 0 757 0 000000000132 000000000176 0
SCT3 033077 0 0 0 000000000264 000000000374 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 124
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0386
SCT3 033077 0 761 0 000000000550 000000000770 0
SCT3 033077 0 762 0 000000001320 000000001760 0
SCT3 033077 0 763 0 000000002640 000000003740 0
SCT3 033077 0 764 0 000000005500 000000007700 0
SCT3 033077 0 765 0 000000013200 000000017600 0
SCT3 033077 0 766 0 000000026400 000000037400 0
SCT3 033077 0 767 0 000000055000 000000077000 0
SCT3 033077 0 0 0 000000132000 000000176000 0
SCT3 033077 0 771 0 000000264000 000000374000 0
SCT3 033077 0 772 0 000000550000 000000770000 0
SCT3 033077 0 773 0 000001320000 000001760000 0
SCT3 033077 0 774 0 000002640000 000003740000 0
SCT3 033077 0 775 0 000005500000 000007700000 0
SCT3 033077 0 776 0 000013200000 000017600000 0
SCT3 033077 0 777 0 000026400000 000037400000 0
SCT3 033077 0 0 0 000055000000 000077000000 0
SCT4 033077 0 0 0 000055000000 000077000000 0
DBT1 033077 0 0 0 000055000000 000077000000 0
DBT2 033077 0 0 0 000077000000 0 000055000000
DBT3 033077 0 0 0 777700777777 0 000055000000
DBT4 033077 0 0 0 0 0 000055000000
DBT5 033077 0 0 0 000055000000 0 000055000000
ST0 033077 0 0 0 000055000000 0 000055000000
ST6 033077 0 0 0 000055000000 0 000055000000
ST6A 033077 0 0 0 000055000000 0 000055000000
ST9 033077 0 0 0 000055000000 0 000055000000
*033107 DPB 12,000013
INITIAL
C(AC)=000000 000055
C(E)=300600 000000 C(C(E))=000000 000000
FINAL
C(AC)=000000 000055
C(E)=300600 000000 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033107 033107 0 0 137500000013 0 005500000000
IT1 033107 0 0 0 137500000013 0 005500000000
AT3 033107 0 0 0 000000000013 0 137500000013
AT6 033107 000013 0 0 000000000013 0 137500000013
FT0 033107 000013 0 0 300600000000 0 137500000013
FT1A 033107 000013 0 0 300600000000 0 300600000000
FT9 033107 000013 0 0 300600000000 0 300600000000
ET0 033107 000013 0 0 300600000000 0 300600000000
BYT6 033107 000013 0 0 300600000000 0 300600000000
BYT7 033107 000013 772 0 300600000000 0 300600000000
SCT0 033107 000013 772 0 300600000000 0 300600000000
SCT3 033107 000013 773 0 300600000000 000000000001 300600000000
SCT3 033107 000013 774 0 300600000000 000000000003 300600000000
SCT3 033107 000013 775 0 300600000000 000000000007 300600000000
SCT3 033107 000013 776 0 300600000000 000000000017 300600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 125
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0387
SCT3 033107 000013 777 0 300600000000 000000000037 300600000000
SCT3 033107 000013 0 0 300600000000 000000000077 300600000000
SCT4 033107 000013 0 0 300600000000 000000000077 300600000000
BYT7A 033107 000013 0 0 300600000000 000000000077 300600000000
IT1 033107 0 0 0 300600000000 000000000077 300600000000
AT3 033107 0 0 0 0 000000000077 300600000000
AT6 033107 0 0 0 0 000000000077 300600000000
FT0 033107 0 0 0 0 000000000077 300600000000
FT1A 033107 0 0 0 0 000000000077 0
FT2 033107 0 0 0 0 000000000077 0
FT2RQ 033107 0 0 0 000000000055 000000000077 0
FT3 033107 0 0 0 000000000055 000000000077 0
FT9 033110 0 0 0 000000000055 000000000077 0
ET0 033110 0 0 0 000000000055 000000000077 0
SCT0 033110 0 0 0 000000000055 000000000077 0
SCT3 033110 0 751 0 000000000132 000000000176 0
SCT3 033110 0 752 0 000000000264 000000000374 0
SCT3 033110 0 753 0 000000000550 000000000770 0
SCT3 033110 0 754 0 000000001320 000000001760 0
SCT3 033110 0 755 0 000000002640 000000003740 0
SCT3 033110 0 756 0 000000005500 000000007700 0
SCT3 033110 0 757 0 000000013200 000000017600 0
SCT3 033110 0 0 0 000000026400 000000037400 0
SCT3 033110 0 761 0 000000055000 000000077000 0
SCT3 033110 0 762 0 000000132000 000000176000 0
SCT3 033110 0 763 0 000000264000 000000374000 0
SCT3 033110 0 764 0 000000550000 000000770000 0
SCT3 033110 0 765 0 000001320000 000001760000 0
SCT3 033110 0 766 0 000002640000 000003740000 0
SCT3 033110 0 767 0 000005500000 000007700000 0
SCT3 033110 0 0 0 000013200000 000017600000 0
SCT3 033110 0 771 0 000026400000 000037400000 0
SCT3 033110 0 772 0 000055000000 000077000000 0
SCT3 033110 0 773 0 000132000000 000176000000 0
SCT3 033110 0 774 0 000264000000 000374000000 0
SCT3 033110 0 775 0 000550000000 000770000000 0
SCT3 033110 0 776 0 001320000000 001760000000 0
SCT3 033110 0 777 0 002640000000 003740000000 0
SCT3 033110 0 0 0 005500000000 007700000000 0
SCT4 033110 0 0 0 005500000000 007700000000 0
DBT1 033110 0 0 0 005500000000 007700000000 0
DBT2 033110 0 0 0 007700000000 0 005500000000
DBT3 033110 0 0 0 770077777777 0 005500000000
DBT4 033110 0 0 0 0 0 005500000000
DBT5 033110 0 0 0 005500000000 0 005500000000
ST0 033110 0 0 0 005500000000 0 005500000000
ST6 033110 0 0 0 005500000000 0 005500000000
ST6A 033110 0 0 0 005500000000 0 005500000000
ST9 033110 0 0 0 005500000000 0 005500000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 126
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0388
*033124 IDPB 11,000012
INITIAL
C(AC)=000000 000077
C(E)=000600 000000 C(C(E))=005500 000000
FINAL
C(AC)=000000 000077
C(E)=360600 000001 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033124 033124 0 0 136440000012 0 770000000000
IT1 033124 0 0 0 136440000012 0 770000000000
AT3 033124 0 0 0 000000000012 0 136440000012
AT6 033124 000012 0 0 000000000012 0 136440000012
FT0 033124 000012 0 0 000600000000 0 136440000012
FT1A 033124 000012 0 0 000600000000 0 000600000000
FT9 033124 000012 0 0 000600000000 0 000600000000
ET0 033124 000012 0 0 000600000000 0 000600000000
BYT1 033124 000012 0 0 000600000000 0 000600000000
BYT2 033124 000012 0 0 000600000001 0 000600000000
BYT3 033124 000012 144 0 000600000001 0 000600000000
BYT4 033124 000012 0 0 360600000001 0 000600000000
BYT7 033124 000012 772 0 360600000001 0 000600000000
SCT0 033124 000012 772 0 360600000001 0 000600000000
SCT3 033124 000012 773 0 360600000001 000000000001 000600000000
SCT3 033124 000012 774 0 360600000001 000000000003 000600000000
SCT3 033124 000012 775 0 360600000001 000000000007 000600000000
SCT3 033124 000012 776 0 360600000001 000000000017 000600000000
SCT3 033124 000012 777 0 360600000001 000000000037 000600000000
SCT3 033124 000012 0 0 360600000001 000000000077 000600000000
SCT4 033124 000012 0 0 360600000001 000000000077 000600000000
BYT7A 033124 000012 036 0 360600000001 000000000077 000600000000
IT1 033124 0 036 0 360600000001 000000000077 000600000000
AT3 033124 0 036 0 000000000001 000000000077 360600000001
AT6 033124 000001 036 0 000000000001 000000000077 360600000001
FT0 033124 000001 036 0 0 000000000077 360600000001
FT1A 033124 000001 036 0 0 000000000077 0
FT2 033124 000001 036 0 0 000000000077 0
FT2RQ 033124 000001 036 0 000000000077 000000000077 0
FT3 033124 000001 036 0 000000000077 000000000077 0
FT9 033125 000001 036 0 000000000077 000000000077 0
ET0 033125 000001 742 0 000000000077 000000000077 0
SCT0 033125 000001 742 0 000000000077 000000000077 0
SCT3 033125 000001 743 0 000000000176 000000000176 0
SCT3 033125 000001 744 0 000000000374 000000000374 0
SCT3 033125 000001 745 0 000000000770 000000000770 0
SCT3 033125 000001 746 0 000000001760 000000001760 0
SCT3 033125 000001 747 0 000000003740 000000003740 0
SCT3 033125 000001 0 0 000000007700 000000007700 0
SCT3 033125 000001 751 0 000000017600 000000017600 0
SCT3 033125 000001 752 0 000000037400 000000037400 0
SCT3 033125 000001 753 0 000000077000 000000077000 0
SCT3 033125 000001 754 0 000000176000 000000176000 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 127
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0389
SCT3 033125 000001 755 0 000000374000 000000374000 0
SCT3 033125 000001 756 0 000000770000 000000770000 0
SCT3 033125 000001 757 0 000001760000 000001760000 0
SCT3 033125 000001 0 0 000003740000 000003740000 0
SCT3 033125 000001 761 0 000007700000 000007700000 0
SCT3 033125 000001 762 0 000017600000 000017600000 0
SCT3 033125 000001 763 0 000037400000 000037400000 0
SCT3 033125 000001 764 0 000077000000 000077000000 0
SCT3 033125 000001 765 0 000176000000 000176000000 0
SCT3 033125 000001 766 0 000374000000 000374000000 0
SCT3 033125 000001 767 0 000770000000 000770000000 0
SCT3 033125 000001 0 0 001760000000 001760000000 0
SCT3 033125 000001 771 0 003740000000 003740000000 0
SCT3 033125 000001 772 0 007700000000 007700000000 0
SCT3 033125 000001 773 0 017600000000 017600000000 0
SCT3 033125 000001 774 0 037400000000 037400000000 0
SCT3 033125 000001 775 0 077000000000 077000000000 0
SCT3 033125 000001 776 0 176000000000 176000000000 0
SCT3 033125 000001 777 0 374000000000 374000000000 0
SCT3 033125 000001 0 0 770000000000 770000000000 0
SCT4 033125 000001 0 0 770000000000 770000000000 0
DBT1 033125 000001 0 0 770000000000 770000000000 0
DBT2 033125 000001 0 0 770000000000 0 770000000000
DBT3 033125 000001 0 0 007777777777 0 770000000000
DBT4 033125 000001 0 0 0 0 770000000000
DBT5 033125 000001 0 0 770000000000 0 770000000000
ST0 033125 000001 0 0 770000000000 0 770000000000
ST6 033125 000001 0 0 770000000000 0 770000000000
ST6A 033125 000001 0 0 770000000000 0 770000000000
ST9 033125 000001 0 0 770000000000 0 770000000000
*033135 IDPB 11,000012
INITIAL
C(AC)=000000 000077
C(E)=001400 000000 C(C(E))=005500 000000
FINAL
C(AC)=000000 000077
C(E)=301400 000001 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033135 033135 0 0 136440000012 0 007700000000
IT1 033135 0 0 0 136440000012 0 007700000000
AT3 033135 0 0 0 000000000012 0 136440000012
AT6 033135 000012 0 0 000000000012 0 136440000012
FT0 033135 000012 0 0 001400000000 0 136440000012
FT1A 033135 000012 0 0 001400000000 0 001400000000
FT9 033135 000012 0 0 001400000000 0 001400000000
ET0 033135 000012 0 0 001400000000 0 001400000000
BYT1 033135 000012 0 0 001400000000 0 001400000000
BYT2 033135 000012 0 0 001400000001 0 001400000000
BYT3 033135 000012 144 0 001400000001 0 001400000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 128
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0390
BYT4 033135 000012 0 0 301400000001 0 001400000000
BYT7 033135 000012 764 0 301400000001 0 001400000000
SCT0 033135 000012 764 0 301400000001 0 001400000000
SCT3 033135 000012 765 0 301400000001 000000000001 001400000000
SCT3 033135 000012 766 0 301400000001 000000000003 001400000000
SCT3 033135 000012 767 0 301400000001 000000000007 001400000000
SCT3 033135 000012 0 0 301400000001 000000000017 001400000000
SCT3 033135 000012 771 0 301400000001 000000000037 001400000000
SCT3 033135 000012 772 0 301400000001 000000000077 001400000000
SCT3 033135 000012 773 0 301400000001 000000000177 001400000000
SCT3 033135 000012 774 0 301400000001 000000000377 001400000000
SCT3 033135 000012 775 0 301400000001 000000000777 001400000000
SCT3 033135 000012 776 0 301400000001 000000001777 001400000000
SCT3 033135 000012 777 0 301400000001 000000003777 001400000000
SCT3 033135 000012 0 0 301400000001 000000007777 001400000000
SCT4 033135 000012 0 0 301400000001 000000007777 001400000000
BYT7A 033135 000012 0 0 301400000001 000000007777 001400000000
IT1 033135 0 0 0 301400000001 000000007777 001400000000
AT3 033135 0 0 0 000000000001 000000007777 301400000001
AT6 033135 000001 0 0 000000000001 000000007777 301400000001
FT0 033135 000001 0 0 0 000000007777 301400000001
FT1A 033135 000001 0 0 0 000000007777 0
FT2 033135 000001 0 0 0 000000007777 0
FT2RQ 033135 000001 0 0 000000000077 000000007777 0
FT3 033135 000001 0 0 000000000077 000000007777 0
FT9 033136 000001 0 0 000000000077 000000007777 0
ET0 033136 000001 0 0 000000000077 000000007777 0
SCT0 033136 000001 0 0 000000000077 000000007777 0
SCT3 033136 000001 751 0 000000000176 000000017776 0
SCT3 033136 000001 752 0 000000000374 000000037774 0
SCT3 033136 000001 753 0 000000000770 000000077770 0
SCT3 033136 000001 754 0 000000001760 000000177760 0
SCT3 033136 000001 755 0 000000003740 000000377740 0
SCT3 033136 000001 756 0 000000007700 000000777700 0
SCT3 033136 000001 757 0 000000017600 000001777600 0
SCT3 033136 000001 0 0 000000037400 000003777400 0
SCT3 033136 000001 761 0 000000077000 000007777000 0
SCT3 033136 000001 762 0 000000176000 000017776000 0
SCT3 033136 000001 763 0 000000374000 000037774000 0
SCT3 033136 000001 764 0 000000770000 000077770000 0
SCT3 033136 000001 765 0 000001760000 000177760000 0
SCT3 033136 000001 766 0 000003740000 000377740000 0
SCT3 033136 000001 767 0 000007700000 000777700000 0
SCT3 033136 000001 0 0 000017600000 001777600000 0
SCT3 033136 000001 771 0 000037400000 003777400000 0
SCT3 033136 000001 772 0 000077000000 007777000000 0
SCT3 033136 000001 773 0 000176000000 017776000000 0
SCT3 033136 000001 774 0 000374000000 037774000000 0
SCT3 033136 000001 775 0 000770000000 077770000000 0
SCT3 033136 000001 776 0 001760000000 177760000000 0
SCT3 033136 000001 777 0 003740000000 377740000000 0
SCT3 033136 000001 0 0 007700000000 777700000000 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 129
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0391
SCT4 033136 000001 0 0 007700000000 777700000000 0
DBT1 033136 000001 0 0 007700000000 777700000000 0
DBT2 033136 000001 0 0 777700000000 0 007700000000
DBT3 033136 000001 0 0 000077777777 0 007700000000
DBT4 033136 000001 0 0 0 0 007700000000
DBT5 033136 000001 0 0 007700000000 0 007700000000
ST0 033136 000001 0 0 007700000000 0 007700000000
ST6 033136 000001 0 0 007700000000 0 007700000000
ST6A 033136 000001 0 0 007700000000 0 007700000000
ST9 033136 000001 0 0 007700000000 0 007700000000
*033146 IDPB 11,000012
INITIAL
C(AC)=000000 000077
C(E)=002200 000000 C(C(E))=005500 000000
FINAL
C(AC)=000000 000077
C(E)=222200 000001 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033146 033146 0 0 136440000012 0 000077000000
IT1 033146 0 0 0 136440000012 0 000077000000
AT3 033146 0 0 0 000000000012 0 136440000012
AT6 033146 000012 0 0 000000000012 0 136440000012
FT0 033146 000012 0 0 002200000000 0 136440000012
FT1A 033146 000012 0 0 002200000000 0 002200000000
FT9 033146 000012 0 0 002200000000 0 002200000000
ET0 033146 000012 0 0 002200000000 0 002200000000
BYT1 033146 000012 0 0 002200000000 0 002200000000
BYT2 033146 000012 0 0 002200000001 0 002200000000
BYT3 033146 000012 144 0 002200000001 0 002200000000
BYT4 033146 000012 0 0 222200000001 0 002200000000
BYT7 033146 000012 756 0 222200000001 0 002200000000
SCT0 033146 000012 756 0 222200000001 0 002200000000
SCT3 033146 000012 757 0 222200000001 000000000001 002200000000
SCT3 033146 000012 0 0 222200000001 000000000003 002200000000
SCT3 033146 000012 761 0 222200000001 000000000007 002200000000
SCT3 033146 000012 762 0 222200000001 000000000017 002200000000
SCT3 033146 000012 763 0 222200000001 000000000037 002200000000
SCT3 033146 000012 764 0 222200000001 000000000077 002200000000
SCT3 033146 000012 765 0 222200000001 000000000177 002200000000
SCT3 033146 000012 766 0 222200000001 000000000377 002200000000
SCT3 033146 000012 767 0 222200000001 000000000777 002200000000
SCT3 033146 000012 0 0 222200000001 000000001777 002200000000
SCT3 033146 000012 771 0 222200000001 000000003777 002200000000
SCT3 033146 000012 772 0 222200000001 000000007777 002200000000
SCT3 033146 000012 773 0 222200000001 000000017777 002200000000
SCT3 033146 000012 774 0 222200000001 000000037777 002200000000
SCT3 033146 000012 775 0 222200000001 000000077777 002200000000
SCT3 033146 000012 776 0 222200000001 000000177777 002200000000
SCT3 033146 000012 777 0 222200000001 000000377777 002200000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 130
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0392
SCT3 033146 000012 0 0 222200000001 000000777777 002200000000
SCT4 033146 000012 0 0 222200000001 000000777777 002200000000
BYT7A 033146 000012 022 0 222200000001 000000777777 002200000000
IT1 033146 0 022 0 222200000001 000000777777 002200000000
AT3 033146 0 022 0 000000000001 000000777777 222200000001
AT6 033146 000001 022 0 000000000001 000000777777 222200000001
FT0 033146 000001 022 0 0 000000777777 222200000001
FT1A 033146 000001 022 0 0 000000777777 0
FT2 033146 000001 022 0 0 000000777777 0
FT2RQ 033146 000001 022 0 000000000077 000000777777 0
FT3 033146 000001 022 0 000000000077 000000777777 0
FT9 033147 000001 022 0 000000000077 000000777777 0
ET0 033147 000001 756 0 000000000077 000000777777 0
SCT0 033147 000001 756 0 000000000077 000000777777 0
SCT3 033147 000001 757 0 000000000176 000001777776 0
SCT3 033147 000001 0 0 000000000374 000003777774 0
SCT3 033147 000001 761 0 000000000770 000007777770 0
SCT3 033147 000001 762 0 000000001760 000017777760 0
SCT3 033147 000001 763 0 000000003740 000037777740 0
SCT3 033147 000001 764 0 000000007700 000077777700 0
SCT3 033147 000001 765 0 000000017600 000177777600 0
SCT3 033147 000001 766 0 000000037400 000377777400 0
SCT3 033147 000001 767 0 000000077000 000777777000 0
SCT3 033147 000001 0 0 000000176000 001777776000 0
SCT3 033147 000001 771 0 000000374000 003777774000 0
SCT3 033147 000001 772 0 000000770000 007777770000 0
SCT3 033147 000001 773 0 000001760000 017777760000 0
SCT3 033147 000001 774 0 000003740000 037777740000 0
SCT3 033147 000001 775 0 000007700000 077777700000 0
SCT3 033147 000001 776 0 000017600000 177777600000 0
SCT3 033147 000001 777 0 000037400000 377777400000 0
SCT3 033147 000001 0 0 000077000000 777777000000 0
SCT4 033147 000001 0 0 000077000000 777777000000 0
DBT1 033147 000001 0 0 000077000000 777777000000 0
DBT2 033147 000001 0 0 777777000000 0 000077000000
DBT3 033147 000001 0 0 000000777777 0 000077000000
DBT4 033147 000001 0 0 0 0 000077000000
DBT5 033147 000001 0 0 000077000000 0 000077000000
ST0 033147 000001 0 0 000077000000 0 000077000000
ST6 033147 000001 0 0 000077000000 0 000077000000
ST6A 033147 000001 0 0 000077000000 0 000077000000
ST9 033147 000001 0 0 000077000000 0 000077000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 131
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0393
*033157 IDPB 11,000012
INITIAL
C(AC)=000000 000077
C(E)=003000 000000 C(C(E))=005500 000000
FINAL
C(AC)=000000 000077
C(E)=143000 000001 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033157 033157 0 0 136440000012 0 000000770000
IT1 033157 0 0 0 136440000012 0 000000770000
AT3 033157 0 0 0 000000000012 0 136440000012
AT6 033157 000012 0 0 000000000012 0 136440000012
FT0 033157 000012 0 0 003000000000 0 136440000012
FT1A 033157 000012 0 0 003000000000 0 003000000000
FT9 033157 000012 0 0 003000000000 0 003000000000
ET0 033157 000012 0 0 003000000000 0 003000000000
BYT1 033157 000012 0 0 003000000000 0 003000000000
BYT2 033157 000012 0 0 003000000001 0 003000000000
BYT3 033157 000012 144 0 003000000001 0 003000000000
BYT4 033157 000012 0 0 143000000001 0 003000000000
BYT7 033157 000012 0 0 143000000001 0 003000000000
SCT0 033157 000012 0 0 143000000001 0 003000000000
SCT3 033157 000012 751 0 143000000001 000000000001 003000000000
SCT3 033157 000012 752 0 143000000001 000000000003 003000000000
SCT3 033157 000012 753 0 143000000001 000000000007 003000000000
SCT3 033157 000012 754 0 143000000001 000000000017 003000000000
SCT3 033157 000012 755 0 143000000001 000000000037 003000000000
SCT3 033157 000012 756 0 143000000001 000000000077 003000000000
SCT3 033157 000012 757 0 143000000001 000000000177 003000000000
SCT3 033157 000012 0 0 143000000001 000000000377 003000000000
SCT3 033157 000012 761 0 143000000001 000000000777 003000000000
SCT3 033157 000012 762 0 143000000001 000000001777 003000000000
SCT3 033157 000012 763 0 143000000001 000000003777 003000000000
SCT3 033157 000012 764 0 143000000001 000000007777 003000000000
SCT3 033157 000012 765 0 143000000001 000000017777 003000000000
SCT3 033157 000012 766 0 143000000001 000000037777 003000000000
SCT3 033157 000012 767 0 143000000001 000000077777 003000000000
SCT3 033157 000012 0 0 143000000001 000000177777 003000000000
SCT3 033157 000012 771 0 143000000001 000000377777 003000000000
SCT3 033157 000012 772 0 143000000001 000000777777 003000000000
SCT3 033157 000012 773 0 143000000001 000001777777 003000000000
SCT3 033157 000012 774 0 143000000001 000003777777 003000000000
SCT3 033157 000012 775 0 143000000001 000007777777 003000000000
SCT3 033157 000012 776 0 143000000001 000017777777 003000000000
SCT3 033157 000012 777 0 143000000001 000037777777 003000000000
SCT3 033157 000012 0 0 143000000001 000077777777 003000000000
SCT4 033157 000012 0 0 143000000001 000077777777 003000000000
BYT7A 033157 000012 014 0 143000000001 000077777777 003000000000
IT1 033157 0 014 0 143000000001 000077777777 003000000000
AT3 033157 0 014 0 000000000001 000077777777 143000000001
AT6 033157 000001 014 0 000000000001 000077777777 143000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 132
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0394
FT0 033157 000001 014 0 0 000077777777 143000000001
FT1A 033157 000001 014 0 0 000077777777 0
FT2 033157 000001 014 0 0 000077777777 0
FT2RQ 033157 000001 014 0 000000000077 000077777777 0
FT3 033157 000001 014 0 000000000077 000077777777 0
FT9 033160 000001 014 0 000000000077 000077777777 0
ET0 033160 000001 764 0 000000000077 000077777777 0
SCT0 033160 000001 764 0 000000000077 000077777777 0
SCT3 033160 000001 765 0 000000000176 000177777776 0
SCT3 033160 000001 766 0 000000000374 000377777774 0
SCT3 033160 000001 767 0 000000000770 000777777770 0
SCT3 033160 000001 0 0 000000001760 001777777760 0
SCT3 033160 000001 771 0 000000003740 003777777740 0
SCT3 033160 000001 772 0 000000007700 007777777700 0
SCT3 033160 000001 773 0 000000017600 017777777600 0
SCT3 033160 000001 774 0 000000037400 037777777400 0
SCT3 033160 000001 775 0 000000077000 077777777000 0
SCT3 033160 000001 776 0 000000176000 177777776000 0
SCT3 033160 000001 777 0 000000374000 377777774000 0
SCT3 033160 000001 0 0 000000770000 777777770000 0
SCT4 033160 000001 0 0 000000770000 777777770000 0
DBT1 033160 000001 0 0 000000770000 777777770000 0
DBT2 033160 000001 0 0 777777770000 0 000000770000
DBT3 033160 000001 0 0 000000007777 0 000000770000
DBT4 033160 000001 0 0 0 0 000000770000
DBT5 033160 000001 0 0 000000770000 0 000000770000
ST0 033160 000001 0 0 000000770000 0 000000770000
ST6 033160 000001 0 0 000000770000 0 000000770000
ST6A 033160 000001 0 0 000000770000 0 000000770000
ST9 033160 000001 0 0 000000770000 0 000000770000
*033170 IDPB 11,000012
INITIAL
C(AC)=000000 000077
C(E)=003600 000000 C(C(E))=005500 000000
FINAL
C(AC)=000000 000077
C(E)=063600 000001 C(C(E))=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 033170 033170 0 0 136440000012 0 000000007700
IT1 033170 0 0 0 136440000012 0 000000007700
AT3 033170 0 0 0 000000000012 0 136440000012
AT6 033170 000012 0 0 000000000012 0 136440000012
FT0 033170 000012 0 0 003600000000 0 136440000012
FT1A 033170 000012 0 0 003600000000 0 003600000000
FT9 033170 000012 0 0 003600000000 0 003600000000
ET0 033170 000012 0 0 003600000000 0 003600000000
BYT1 033170 000012 0 0 003600000000 0 003600000000
BYT2 033170 000012 0 0 003600000001 0 003600000000
BYT3 033170 000012 144 0 003600000001 0 003600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 133
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0395
BYT4 033170 000012 0 0 063600000001 0 003600000000
BYT7 033170 000012 742 0 063600000001 0 003600000000
SCT0 033170 000012 742 0 063600000001 0 003600000000
SCT3 033170 000012 743 0 063600000001 000000000001 003600000000
SCT3 033170 000012 744 0 063600000001 000000000003 003600000000
SCT3 033170 000012 745 0 063600000001 000000000007 003600000000
SCT3 033170 000012 746 0 063600000001 000000000017 003600000000
SCT3 033170 000012 747 0 063600000001 000000000037 003600000000
SCT3 033170 000012 0 0 063600000001 000000000077 003600000000
SCT3 033170 000012 751 0 063600000001 000000000177 003600000000
SCT3 033170 000012 752 0 063600000001 000000000377 003600000000
SCT3 033170 000012 753 0 063600000001 000000000777 003600000000
SCT3 033170 000012 754 0 063600000001 000000001777 003600000000
SCT3 033170 000012 755 0 063600000001 000000003777 003600000000
SCT3 033170 000012 756 0 063600000001 000000007777 003600000000
SCT3 033170 000012 757 0 063600000001 000000017777 003600000000
SCT3 033170 000012 0 0 063600000001 000000037777 003600000000
SCT3 033170 000012 761 0 063600000001 000000077777 003600000000
SCT3 033170 000012 762 0 063600000001 000000177777 003600000000
SCT3 033170 000012 763 0 063600000001 000000377777 003600000000
SCT3 033170 000012 764 0 063600000001 000000777777 003600000000
SCT3 033170 000012 765 0 063600000001 000001777777 003600000000
SCT3 033170 000012 766 0 063600000001 000003777777 003600000000
SCT3 033170 000012 767 0 063600000001 000007777777 003600000000
SCT3 033170 000012 0 0 063600000001 000017777777 003600000000
SCT3 033170 000012 771 0 063600000001 000037777777 003600000000
SCT3 033170 000012 772 0 063600000001 000077777777 003600000000
SCT3 033170 000012 773 0 063600000001 000177777777 003600000000
SCT3 033170 000012 774 0 063600000001 000377777777 003600000000
SCT3 033170 000012 775 0 063600000001 000777777777 003600000000
SCT3 033170 000012 776 0 063600000001 001777777777 003600000000
SCT3 033170 000012 777 0 063600000001 003777777777 003600000000
SCT3 033170 000012 0 0 063600000001 007777777777 003600000000
SCT4 033170 000012 0 0 063600000001 007777777777 003600000000
BYT7A 033170 000012 006 0 063600000001 007777777777 003600000000
IT1 033170 0 006 0 063600000001 007777777777 003600000000
AT3 033170 0 006 0 000000000001 007777777777 063600000001
AT6 033170 000001 006 0 000000000001 007777777777 063600000001
FT0 033170 000001 006 0 0 007777777777 063600000001
FT1A 033170 000001 006 0 0 007777777777 0
FT2 033170 000001 006 0 0 007777777777 0
FT2RQ 033170 000001 006 0 000000000077 007777777777 0
FT3 033170 000001 006 0 000000000077 007777777777 0
FT9 033171 000001 006 0 000000000077 007777777777 0
ET0 033171 000001 772 0 000000000077 007777777777 0
SCT0 033171 000001 772 0 000000000077 007777777777 0
SCT3 033171 000001 773 0 000000000176 017777777776 0
SCT3 033171 000001 774 0 000000000374 037777777774 0
SCT3 033171 000001 775 0 000000000770 077777777770 0
SCT3 033171 000001 776 0 000000001760 177777777760 0
SCT3 033171 000001 777 0 000000003740 377777777740 0
SCT3 033171 000001 0 0 000000007700 777777777700 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 134
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0396
SCT4 033171 000001 0 0 000000007700 777777777700 0
DBT1 033171 000001 0 0 000000007700 777777777700 0
DBT2 033171 000001 0 0 777777777700 0 000000007700
DBT3 033171 000001 0 0 000000000077 0 000000007700
DBT4 033171 000001 0 0 0 0 000000007700
DBT5 033171 000001 0 0 000000007700 0 000000007700
ST0 033171 000001 0 0 000000007700 0 000000007700
ST6 033171 000001 0 0 000000007700 0 000000007700
ST6A 033171 000001 0 0 000000007700 0 000000007700
ST9 033171 000001 0 0 000000007700 0 000000007700
*033206 IDPB 10,000011
INITIAL
C(AC)=000000 000055
C(E)=440600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000055
C(E)=360600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033206 033206 0 0 136400000011 0 550000000000
IT1 033206 0 0 0 136400000011 0 550000000000
AT3 033206 0 0 0 000000000011 0 136400000011
AT6 033206 000011 0 0 000000000011 0 136400000011
FT0 033206 000011 0 0 440600000000 0 136400000011
FT1A 033206 000011 0 0 440600000000 0 440600000000
FT9 033206 000011 0 0 440600000000 0 440600000000
ET0 033206 000011 0 0 440600000000 0 440600000000
BYT1 033206 000011 044 0 440600000000 0 440600000000
BYT4 033206 000011 0 0 360600000000 0 440600000000
BYT7 033206 000011 772 0 360600000000 0 440600000000
SCT0 033206 000011 772 0 360600000000 0 440600000000
SCT3 033206 000011 773 0 360600000000 000000000001 440600000000
SCT3 033206 000011 774 0 360600000000 000000000003 440600000000
SCT3 033206 000011 775 0 360600000000 000000000007 440600000000
SCT3 033206 000011 776 0 360600000000 000000000017 440600000000
SCT3 033206 000011 777 0 360600000000 000000000037 440600000000
SCT3 033206 000011 0 0 360600000000 000000000077 440600000000
SCT4 033206 000011 0 0 360600000000 000000000077 440600000000
BYT7A 033206 000011 036 0 360600000000 000000000077 440600000000
IT1 033206 0 036 0 360600000000 000000000077 440600000000
AT3 033206 0 036 0 0 000000000077 360600000000
AT6 033206 0 036 0 0 000000000077 360600000000
FT0 033206 0 036 0 777777777777 000000000077 360600000000
FT1A 033206 0 036 0 777777777777 000000000077 777777777777
FT2 033206 0 036 0 0 000000000077 777777777777
FT2RQ 033206 0 036 0 000000000055 000000000077 777777777777
FT3 033206 0 036 0 000000000055 000000000077 777777777777
FT9 033207 0 036 0 000000000055 000000000077 777777777777
ET0 033207 0 742 0 000000000055 000000000077 777777777777
SCT0 033207 0 742 0 000000000055 000000000077 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 135
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0397
SCT3 033207 0 743 0 000000000132 000000000176 777777777777
SCT3 033207 0 744 0 000000000264 000000000374 777777777777
SCT3 033207 0 745 0 000000000550 000000000770 777777777777
SCT3 033207 0 746 0 000000001320 000000001760 777777777777
SCT3 033207 0 747 0 000000002640 000000003740 777777777777
SCT3 033207 0 0 0 000000005500 000000007700 777777777777
SCT3 033207 0 751 0 000000013200 000000017600 777777777777
SCT3 033207 0 752 0 000000026400 000000037400 777777777777
SCT3 033207 0 753 0 000000055000 000000077000 777777777777
SCT3 033207 0 754 0 000000132000 000000176000 777777777777
SCT3 033207 0 755 0 000000264000 000000374000 777777777777
SCT3 033207 0 756 0 000000550000 000000770000 777777777777
SCT3 033207 0 757 0 000001320000 000001760000 777777777777
SCT3 033207 0 0 0 000002640000 000003740000 777777777777
SCT3 033207 0 761 0 000005500000 000007700000 777777777777
SCT3 033207 0 762 0 000013200000 000017600000 777777777777
SCT3 033207 0 763 0 000026400000 000037400000 777777777777
SCT3 033207 0 764 0 000055000000 000077000000 777777777777
SCT3 033207 0 765 0 000132000000 000176000000 777777777777
SCT3 033207 0 766 0 000264000000 000374000000 777777777777
SCT3 033207 0 767 0 000550000000 000770000000 777777777777
SCT3 033207 0 0 0 001320000000 001760000000 777777777777
SCT3 033207 0 771 0 002640000000 003740000000 777777777777
SCT3 033207 0 772 0 005500000000 007700000000 777777777777
SCT3 033207 0 773 0 013200000000 017600000000 777777777777
SCT3 033207 0 774 0 026400000000 037400000000 777777777777
SCT3 033207 0 775 0 055000000000 077000000000 777777777777
SCT3 033207 0 776 0 132000000000 176000000000 777777777777
SCT3 033207 0 777 0 264000000000 374000000000 777777777777
SCT3 033207 0 0 0 550000000000 770000000000 777777777777
SCT4 033207 0 0 0 550000000000 770000000000 777777777777
DBT1 033207 0 0 0 550000000000 770000000000 777777777777
DBT2 033207 0 0 0 770000000000 777777777777 550000000000
DBT3 033207 0 0 0 007777777777 777777777777 550000000000
DBT4 033207 0 0 0 007777777777 777777777777 550000000000
DBT5 033207 0 0 0 557777777777 777777777777 550000000000
ST0 033207 0 0 0 557777777777 777777777777 550000000000
ST6 033207 0 0 0 557777777777 777777777777 550000000000
ST6A 033207 0 0 0 557777777777 777777777777 550000000000
ST9 033207 0 0 0 557777777777 777777777777 550000000000
*033217 IDPB 10,000011
INITIAL
C(AC)=000000 000055
C(E)=360600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000055
C(E)=300600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033217 033217 0 0 136400000011 0 005500000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 136
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0398
IT1 033217 0 0 0 136400000011 0 005500000000
AT3 033217 0 0 0 000000000011 0 136400000011
AT6 033217 000011 0 0 000000000011 0 136400000011
FT0 033217 000011 0 0 360600000000 0 136400000011
FT1A 033217 000011 0 0 360600000000 0 360600000000
FT9 033217 000011 0 0 360600000000 0 360600000000
ET0 033217 000011 0 0 360600000000 0 360600000000
BYT1 033217 000011 036 0 360600000000 0 360600000000
BYT4 033217 000011 0 0 300600000000 0 360600000000
BYT7 033217 000011 772 0 300600000000 0 360600000000
SCT0 033217 000011 772 0 300600000000 0 360600000000
SCT3 033217 000011 773 0 300600000000 000000000001 360600000000
SCT3 033217 000011 774 0 300600000000 000000000003 360600000000
SCT3 033217 000011 775 0 300600000000 000000000007 360600000000
SCT3 033217 000011 776 0 300600000000 000000000017 360600000000
SCT3 033217 000011 777 0 300600000000 000000000037 360600000000
SCT3 033217 000011 0 0 300600000000 000000000077 360600000000
SCT4 033217 000011 0 0 300600000000 000000000077 360600000000
BYT7A 033217 000011 0 0 300600000000 000000000077 360600000000
IT1 033217 0 0 0 300600000000 000000000077 360600000000
AT3 033217 0 0 0 0 000000000077 300600000000
AT6 033217 0 0 0 0 000000000077 300600000000
FT0 033217 0 0 0 777777777777 000000000077 300600000000
FT1A 033217 0 0 0 777777777777 000000000077 777777777777
FT2 033217 0 0 0 0 000000000077 777777777777
FT2RQ 033217 0 0 0 000000000055 000000000077 777777777777
FT3 033217 0 0 0 000000000055 000000000077 777777777777
FT9 033220 0 0 0 000000000055 000000000077 777777777777
ET0 033220 0 0 0 000000000055 000000000077 777777777777
SCT0 033220 0 0 0 000000000055 000000000077 777777777777
SCT3 033220 0 751 0 000000000132 000000000176 777777777777
SCT3 033220 0 752 0 000000000264 000000000374 777777777777
SCT3 033220 0 753 0 000000000550 000000000770 777777777777
SCT3 033220 0 754 0 000000001320 000000001760 777777777777
SCT3 033220 0 755 0 000000002640 000000003740 777777777777
SCT3 033220 0 756 0 000000005500 000000007700 777777777777
SCT3 033220 0 757 0 000000013200 000000017600 777777777777
SCT3 033220 0 0 0 000000026400 000000037400 777777777777
SCT3 033220 0 761 0 000000055000 000000077000 777777777777
SCT3 033220 0 762 0 000000132000 000000176000 777777777777
SCT3 033220 0 763 0 000000264000 000000374000 777777777777
SCT3 033220 0 764 0 000000550000 000000770000 777777777777
SCT3 033220 0 765 0 000001320000 000001760000 777777777777
SCT3 033220 0 766 0 000002640000 000003740000 777777777777
SCT3 033220 0 767 0 000005500000 000007700000 777777777777
SCT3 033220 0 0 0 000013200000 000017600000 777777777777
SCT3 033220 0 771 0 000026400000 000037400000 777777777777
SCT3 033220 0 772 0 000055000000 000077000000 777777777777
SCT3 033220 0 773 0 000132000000 000176000000 777777777777
SCT3 033220 0 774 0 000264000000 000374000000 777777777777
SCT3 033220 0 775 0 000550000000 000770000000 777777777777
SCT3 033220 0 776 0 001320000000 001760000000 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 137
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0399
SCT3 033220 0 777 0 002640000000 003740000000 777777777777
SCT3 033220 0 0 0 005500000000 007700000000 777777777777
SCT4 033220 0 0 0 005500000000 007700000000 777777777777
DBT1 033220 0 0 0 005500000000 007700000000 777777777777
DBT2 033220 0 0 0 007700000000 777777777777 005500000000
DBT3 033220 0 0 0 770077777777 777777777777 005500000000
DBT4 033220 0 0 0 770077777777 777777777777 005500000000
DBT5 033220 0 0 0 775577777777 777777777777 005500000000
ST0 033220 0 0 0 775577777777 777777777777 005500000000
ST6 033220 0 0 0 775577777777 777777777777 005500000000
ST6A 033220 0 0 0 775577777777 777777777777 005500000000
ST9 033220 0 0 0 775577777777 777777777777 005500000000
*033230 IDPB 10,000011
INITIAL
C(AC)=000000 000055
C(E)=300600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000055
C(E)=220600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033230 033230 0 0 136400000011 0 000055000000
IT1 033230 0 0 0 136400000011 0 000055000000
AT3 033230 0 0 0 000000000011 0 136400000011
AT6 033230 000011 0 0 000000000011 0 136400000011
FT0 033230 000011 0 0 300600000000 0 136400000011
FT1A 033230 000011 0 0 300600000000 0 300600000000
FT9 033230 000011 0 0 300600000000 0 300600000000
ET0 033230 000011 0 0 300600000000 0 300600000000
BYT1 033230 000011 0 0 300600000000 0 300600000000
BYT4 033230 000011 0 0 220600000000 0 300600000000
BYT7 033230 000011 772 0 220600000000 0 300600000000
SCT0 033230 000011 772 0 220600000000 0 300600000000
SCT3 033230 000011 773 0 220600000000 000000000001 300600000000
SCT3 033230 000011 774 0 220600000000 000000000003 300600000000
SCT3 033230 000011 775 0 220600000000 000000000007 300600000000
SCT3 033230 000011 776 0 220600000000 000000000017 300600000000
SCT3 033230 000011 777 0 220600000000 000000000037 300600000000
SCT3 033230 000011 0 0 220600000000 000000000077 300600000000
SCT4 033230 000011 0 0 220600000000 000000000077 300600000000
BYT7A 033230 000011 022 0 220600000000 000000000077 300600000000
IT1 033230 0 022 0 220600000000 000000000077 300600000000
AT3 033230 0 022 0 0 000000000077 220600000000
AT6 033230 0 022 0 0 000000000077 220600000000
FT0 033230 0 022 0 777777777777 000000000077 220600000000
FT1A 033230 0 022 0 777777777777 000000000077 777777777777
FT2 033230 0 022 0 0 000000000077 777777777777
FT2RQ 033230 0 022 0 000000000055 000000000077 777777777777
FT3 033230 0 022 0 000000000055 000000000077 777777777777
FT9 033231 0 022 0 000000000055 000000000077 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 138
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0400
ET0 033231 0 756 0 000000000055 000000000077 777777777777
SCT0 033231 0 756 0 000000000055 000000000077 777777777777
SCT3 033231 0 757 0 000000000132 000000000176 777777777777
SCT3 033231 0 0 0 000000000264 000000000374 777777777777
SCT3 033231 0 761 0 000000000550 000000000770 777777777777
SCT3 033231 0 762 0 000000001320 000000001760 777777777777
SCT3 033231 0 763 0 000000002640 000000003740 777777777777
SCT3 033231 0 764 0 000000005500 000000007700 777777777777
SCT3 033231 0 765 0 000000013200 000000017600 777777777777
SCT3 033231 0 766 0 000000026400 000000037400 777777777777
SCT3 033231 0 767 0 000000055000 000000077000 777777777777
SCT3 033231 0 0 0 000000132000 000000176000 777777777777
SCT3 033231 0 771 0 000000264000 000000374000 777777777777
SCT3 033231 0 772 0 000000550000 000000770000 777777777777
SCT3 033231 0 773 0 000001320000 000001760000 777777777777
SCT3 033231 0 774 0 000002640000 000003740000 777777777777
SCT3 033231 0 775 0 000005500000 000007700000 777777777777
SCT3 033231 0 776 0 000013200000 000017600000 777777777777
SCT3 033231 0 777 0 000026400000 000037400000 777777777777
SCT3 033231 0 0 0 000055000000 000077000000 777777777777
SCT4 033231 0 0 0 000055000000 000077000000 777777777777
DBT1 033231 0 0 0 000055000000 000077000000 777777777777
DBT2 033231 0 0 0 000077000000 777777777777 000055000000
DBT3 033231 0 0 0 777700777777 777777777777 000055000000
DBT4 033231 0 0 0 777700777777 777777777777 000055000000
DBT5 033231 0 0 0 777755777777 777777777777 000055000000
ST0 033231 0 0 0 777755777777 777777777777 000055000000
ST6 033231 0 0 0 777755777777 777777777777 000055000000
ST6A 033231 0 0 0 777755777777 777777777777 000055000000
ST9 033231 0 0 0 777755777777 777777777777 000055000000
*033241 IDPB 10,000011
INITIAL
C(AC)=000000 000055
C(E)=220600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033241 033241 0 0 136400000011 0 000000550000
IT1 033241 0 0 0 136400000011 0 000000550000
AT3 033241 0 0 0 000000000011 0 136400000011
AT6 033241 000011 0 0 000000000011 0 136400000011
FT0 033241 000011 0 0 220600000000 0 136400000011
FT1A 033241 000011 0 0 220600000000 0 220600000000
FT9 033241 000011 0 0 220600000000 0 220600000000
ET0 033241 000011 0 0 220600000000 0 220600000000
BYT1 033241 000011 022 0 220600000000 0 220600000000
BYT4 033241 000011 0 0 140600000000 0 220600000000
BYT7 033241 000011 772 0 140600000000 0 220600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 139
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0401
SCT0 033241 000011 772 0 140600000000 0 220600000000
SCT3 033241 000011 773 0 140600000000 000000000001 220600000000
SCT3 033241 000011 774 0 140600000000 000000000003 220600000000
SCT3 033241 000011 775 0 140600000000 000000000007 220600000000
SCT3 033241 000011 776 0 140600000000 000000000017 220600000000
SCT3 033241 000011 777 0 140600000000 000000000037 220600000000
SCT3 033241 000011 0 0 140600000000 000000000077 220600000000
SCT4 033241 000011 0 0 140600000000 000000000077 220600000000
BYT7A 033241 000011 014 0 140600000000 000000000077 220600000000
IT1 033241 0 014 0 140600000000 000000000077 220600000000
AT3 033241 0 014 0 0 000000000077 140600000000
AT6 033241 0 014 0 0 000000000077 140600000000
FT0 033241 0 014 0 777777777777 000000000077 140600000000
FT1A 033241 0 014 0 777777777777 000000000077 777777777777
FT2 033241 0 014 0 0 000000000077 777777777777
FT2RQ 033241 0 014 0 000000000055 000000000077 777777777777
FT3 033241 0 014 0 000000000055 000000000077 777777777777
FT9 033242 0 014 0 000000000055 000000000077 777777777777
ET0 033242 0 764 0 000000000055 000000000077 777777777777
SCT0 033242 0 764 0 000000000055 000000000077 777777777777
SCT3 033242 0 765 0 000000000132 000000000176 777777777777
SCT3 033242 0 766 0 000000000264 000000000374 777777777777
SCT3 033242 0 767 0 000000000550 000000000770 777777777777
SCT3 033242 0 0 0 000000001320 000000001760 777777777777
SCT3 033242 0 771 0 000000002640 000000003740 777777777777
SCT3 033242 0 772 0 000000005500 000000007700 777777777777
SCT3 033242 0 773 0 000000013200 000000017600 777777777777
SCT3 033242 0 774 0 000000026400 000000037400 777777777777
SCT3 033242 0 775 0 000000055000 000000077000 777777777777
SCT3 033242 0 776 0 000000132000 000000176000 777777777777
SCT3 033242 0 777 0 000000264000 000000374000 777777777777
SCT3 033242 0 0 0 000000550000 000000770000 777777777777
SCT4 033242 0 0 0 000000550000 000000770000 777777777777
DBT1 033242 0 0 0 000000550000 000000770000 777777777777
DBT2 033242 0 0 0 000000770000 777777777777 000000550000
DBT3 033242 0 0 0 777777007777 777777777777 000000550000
DBT4 033242 0 0 0 777777007777 777777777777 000000550000
DBT5 033242 0 0 0 777777557777 777777777777 000000550000
ST0 033242 0 0 0 777777557777 777777777777 000000550000
ST6 033242 0 0 0 777777557777 777777777777 000000550000
ST6A 033242 0 0 0 777777557777 777777777777 000000550000
ST9 033242 0 0 0 777777557777 777777777777 000000550000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 140
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0402
*033252 IDPB 10,000011
INITIAL
C(AC)=000000 000055
C(E)=140600 000000 C(C(E))=777777 777777
FINAL
C(AC)=000000 000055
C(E)=060600 000000 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 033252 033252 0 0 136400000011 0 000000005500
IT1 033252 0 0 0 136400000011 0 000000005500
AT3 033252 0 0 0 000000000011 0 136400000011
AT6 033252 000011 0 0 000000000011 0 136400000011
FT0 033252 000011 0 0 140600000000 0 136400000011
FT1A 033252 000011 0 0 140600000000 0 140600000000
FT9 033252 000011 0 0 140600000000 0 140600000000
ET0 033252 000011 0 0 140600000000 0 140600000000
BYT1 033252 000011 014 0 140600000000 0 140600000000
BYT4 033252 000011 0 0 060600000000 0 140600000000
BYT7 033252 000011 772 0 060600000000 0 140600000000
SCT0 033252 000011 772 0 060600000000 0 140600000000
SCT3 033252 000011 773 0 060600000000 000000000001 140600000000
SCT3 033252 000011 774 0 060600000000 000000000003 140600000000
SCT3 033252 000011 775 0 060600000000 000000000007 140600000000
SCT3 033252 000011 776 0 060600000000 000000000017 140600000000
SCT3 033252 000011 777 0 060600000000 000000000037 140600000000
SCT3 033252 000011 0 0 060600000000 000000000077 140600000000
SCT4 033252 000011 0 0 060600000000 000000000077 140600000000
BYT7A 033252 000011 006 0 060600000000 000000000077 140600000000
IT1 033252 0 006 0 060600000000 000000000077 140600000000
AT3 033252 0 006 0 0 000000000077 060600000000
AT6 033252 0 006 0 0 000000000077 060600000000
FT0 033252 0 006 0 777777777777 000000000077 060600000000
FT1A 033252 0 006 0 777777777777 000000000077 777777777777
FT2 033252 0 006 0 0 000000000077 777777777777
FT2RQ 033252 0 006 0 000000000055 000000000077 777777777777
FT3 033252 0 006 0 000000000055 000000000077 777777777777
FT9 033253 0 006 0 000000000055 000000000077 777777777777
ET0 033253 0 772 0 000000000055 000000000077 777777777777
SCT0 033253 0 772 0 000000000055 000000000077 777777777777
SCT3 033253 0 773 0 000000000132 000000000176 777777777777
SCT3 033253 0 774 0 000000000264 000000000374 777777777777
SCT3 033253 0 775 0 000000000550 000000000770 777777777777
SCT3 033253 0 776 0 000000001320 000000001760 777777777777
SCT3 033253 0 777 0 000000002640 000000003740 777777777777
SCT3 033253 0 0 0 000000005500 000000007700 777777777777
SCT4 033253 0 0 0 000000005500 000000007700 777777777777
DBT1 033253 0 0 0 000000005500 000000007700 777777777777
DBT2 033253 0 0 0 000000007700 777777777777 000000005500
DBT3 033253 0 0 0 777777770077 777777777777 000000005500
DBT4 033253 0 0 0 777777770077 777777777777 000000005500
DBT5 033253 0 0 0 777777775577 777777777777 000000005500
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 141
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0403
ST0 033253 0 0 0 777777775577 777777777777 000000005500
ST6 033253 0 0 0 777777775577 777777777777 000000005500
ST6A 033253 0 0 0 777777775577 777777777777 000000005500
ST9 033253 0 0 0 777777775577 777777777777 000000005500
*033266 LDB 13,000014
INITIAL
C(AC)=000000 000000
C(E)=076000 000001 C(C(E))=525252 525377
FINAL
C(AC)=002525 252525
C(E)=076000 000001 C(C(E))=525252 525377
TIME PC MA SC FE AR MQ BR
IT0 033266 033266 0 0 135540000014 0 525252525377
IT1 033266 0 0 0 135540000014 0 525252525377
AT3 033266 0 0 0 000000000014 0 135540000014
AT6 033266 000014 0 0 000000000014 0 135540000014
FT0 033266 000014 0 0 076000000001 0 135540000014
FT1A 033266 000014 0 0 076000000001 0 076000000001
FT9 033266 000014 0 0 076000000001 0 076000000001
ET0 033266 000014 0 0 076000000001 0 076000000001
BYT6 033266 000014 0 0 076000000001 0 076000000001
BYT7 033266 000014 0 0 076000000001 0 076000000001
SCT0 033266 000014 0 0 076000000001 0 076000000001
SCT3 033266 000014 721 0 076000000001 000000000001 076000000001
SCT3 033266 000014 722 0 076000000001 000000000003 076000000001
SCT3 033266 000014 723 0 076000000001 000000000007 076000000001
SCT3 033266 000014 724 0 076000000001 000000000017 076000000001
SCT3 033266 000014 725 0 076000000001 000000000037 076000000001
SCT3 033266 000014 726 0 076000000001 000000000077 076000000001
SCT3 033266 000014 727 0 076000000001 000000000177 076000000001
SCT3 033266 000014 0 0 076000000001 000000000377 076000000001
SCT3 033266 000014 731 0 076000000001 000000000777 076000000001
SCT3 033266 000014 732 0 076000000001 000000001777 076000000001
SCT3 033266 000014 733 0 076000000001 000000003777 076000000001
SCT3 033266 000014 734 0 076000000001 000000007777 076000000001
SCT3 033266 000014 735 0 076000000001 000000017777 076000000001
SCT3 033266 000014 736 0 076000000001 000000037777 076000000001
SCT3 033266 000014 737 0 076000000001 000000077777 076000000001
SCT3 033266 000014 0 0 076000000001 000000177777 076000000001
SCT3 033266 000014 741 0 076000000001 000000377777 076000000001
SCT3 033266 000014 742 0 076000000001 000000777777 076000000001
SCT3 033266 000014 743 0 076000000001 000001777777 076000000001
SCT3 033266 000014 744 0 076000000001 000003777777 076000000001
SCT3 033266 000014 745 0 076000000001 000007777777 076000000001
SCT3 033266 000014 746 0 076000000001 000017777777 076000000001
SCT3 033266 000014 747 0 076000000001 000037777777 076000000001
SCT3 033266 000014 0 0 076000000001 000077777777 076000000001
SCT3 033266 000014 751 0 076000000001 000177777777 076000000001
SCT3 033266 000014 752 0 076000000001 000377777777 076000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 142
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0404
SCT3 033266 000014 753 0 076000000001 000777777777 076000000001
SCT3 033266 000014 754 0 076000000001 001777777777 076000000001
SCT3 033266 000014 755 0 076000000001 003777777777 076000000001
SCT3 033266 000014 756 0 076000000001 007777777777 076000000001
SCT3 033266 000014 757 0 076000000001 017777777777 076000000001
SCT3 033266 000014 0 0 076000000001 037777777777 076000000001
SCT3 033266 000014 761 0 076000000001 077777777777 076000000001
SCT3 033266 000014 762 0 076000000001 177777777777 076000000001
SCT3 033266 000014 763 0 076000000001 377777777777 076000000001
SCT3 033266 000014 764 0 076000000001 777777777777 076000000001
SCT3 033266 000014 765 0 076000000001 777777777777 076000000001
SCT3 033266 000014 766 0 076000000001 777777777777 076000000001
SCT3 033266 000014 767 0 076000000001 777777777777 076000000001
SCT3 033266 000014 0 0 076000000001 777777777777 076000000001
SCT3 033266 000014 771 0 076000000001 777777777777 076000000001
SCT3 033266 000014 772 0 076000000001 777777777777 076000000001
SCT3 033266 000014 773 0 076000000001 777777777777 076000000001
SCT3 033266 000014 774 0 076000000001 777777777777 076000000001
SCT3 033266 000014 775 0 076000000001 777777777777 076000000001
SCT3 033266 000014 776 0 076000000001 777777777777 076000000001
SCT3 033266 000014 777 0 076000000001 777777777777 076000000001
SCT3 033266 000014 0 0 076000000001 777777777777 076000000001
SCT4 033266 000014 0 0 076000000001 777777777777 076000000001
BYT7A 033266 000014 007 0 076000000001 777777777777 076000000001
IT1 033266 0 007 0 076000000001 777777777777 076000000001
AT3 033266 0 007 0 000000000001 777777777777 076000000001
AT6 033266 000001 007 0 000000000001 777777777777 076000000001
FT0 033266 000001 007 0 525252525377 777777777777 076000000001
FT1A 033266 000001 007 0 525252525377 777777777777 525252525377
FT9 033267 000001 007 0 525252525377 777777777777 525252525377
ET0 033267 000001 771 0 525252525377 777777777777 525252525377
SCT0 033267 000001 771 0 525252525377 777777777777 525252525377
SCT3 033267 000001 772 0 252525252577 777777777777 525252525377
SCT3 033267 000001 773 0 125252525277 777777777777 525252525377
SCT3 033267 000001 774 0 052525252537 777777777777 525252525377
SCT3 033267 000001 775 0 025252525257 777777777777 525252525377
SCT3 033267 000001 776 0 012525252527 777777777777 525252525377
SCT3 033267 000001 777 0 005252525253 777777777777 525252525377
SCT3 033267 000001 0 0 002525252525 777777777777 525252525377
SCT4 033267 000001 0 0 002525252525 777777777777 525252525377
LBT1 033267 000001 0 0 002525252525 777777777777 525252525377
ST0 033267 000001 0 0 002525252525 777777777777 525252525377
ST1 033267 000001 0 0 002525252525 777777777777 525252525377
ST2 033267 000001 0 0 002525252525 777777777777 525252525377
ST9 033267 000001 0 0 002525252525 777777777777 525252525377
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 143
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0405
*033300 LDB 13,000014
INITIAL
C(AC)=000000 000000
C(E)=074000 000001 C(C(E))=525252 525377
FINAL
C(AC)=002525 252525
C(E)=074000 000001 C(C(E))=525252 525377
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 135540000014 0 525252525377
IT1 0 0 0 0 135540000014 0 525252525377
AT3 0 0 0 0 000000000014 0 135540000014
AT6 0 000014 0 0 000000000014 0 135540000014
FT0 0 000014 0 0 074000000001 0 135540000014
FT1A 0 000014 0 0 074000000001 0 074000000001
FT9 0 000014 0 0 074000000001 0 074000000001
ET0 0 000014 0 0 074000000001 0 074000000001
BYT6 0 000014 0 0 074000000001 0 074000000001
BYT7 0 000014 0 0 074000000001 0 074000000001
SCT0 0 000014 0 0 074000000001 0 074000000001
SCT3 0 000014 741 0 074000000001 000000000001 074000000001
SCT3 0 000014 742 0 074000000001 000000000003 074000000001
SCT3 0 000014 743 0 074000000001 000000000007 074000000001
SCT3 0 000014 744 0 074000000001 000000000017 074000000001
SCT3 0 000014 745 0 074000000001 000000000037 074000000001
SCT3 0 000014 746 0 074000000001 000000000077 074000000001
SCT3 0 000014 747 0 074000000001 000000000177 074000000001
SCT3 0 000014 0 0 074000000001 000000000377 074000000001
SCT3 0 000014 751 0 074000000001 000000000777 074000000001
SCT3 0 000014 752 0 074000000001 000000001777 074000000001
SCT3 0 000014 753 0 074000000001 000000003777 074000000001
SCT3 0 000014 754 0 074000000001 000000007777 074000000001
SCT3 0 000014 755 0 074000000001 000000017777 074000000001
SCT3 0 000014 756 0 074000000001 000000037777 074000000001
SCT3 0 000014 757 0 074000000001 000000077777 074000000001
SCT3 0 000014 0 0 074000000001 000000177777 074000000001
SCT3 0 000014 761 0 074000000001 000000377777 074000000001
SCT3 0 000014 762 0 074000000001 000000777777 074000000001
SCT3 0 000014 763 0 074000000001 000001777777 074000000001
SCT3 0 000014 764 0 074000000001 000003777777 074000000001
SCT3 0 000014 765 0 074000000001 000007777777 074000000001
SCT3 0 000014 766 0 074000000001 000017777777 074000000001
SCT3 0 000014 767 0 074000000001 000037777777 074000000001
SCT3 0 000014 0 0 074000000001 000077777777 074000000001
SCT3 0 000014 771 0 074000000001 000177777777 074000000001
SCT3 0 000014 772 0 074000000001 000377777777 074000000001
SCT3 0 000014 773 0 074000000001 000777777777 074000000001
SCT3 0 000014 774 0 074000000001 001777777777 074000000001
SCT3 0 000014 775 0 074000000001 003777777777 074000000001
SCT3 0 000014 776 0 074000000001 007777777777 074000000001
SCT3 0 000014 777 0 074000000001 017777777777 074000000001
SCT3 0 000014 0 0 074000000001 037777777777 074000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 144
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0406
SCT4 0 000014 0 0 074000000001 037777777777 074000000001
BYT7A 0 000014 007 0 074000000001 037777777777 074000000001
IT1 0 0 007 0 074000000001 037777777777 074000000001
AT3 0 0 007 0 000000000001 037777777777 074000000001
AT6 0 000001 007 0 000000000001 037777777777 074000000001
FT0 0 000001 007 0 525252525377 037777777777 074000000001
FT1A 0 000001 007 0 525252525377 037777777777 525252525377
FT9 033301 000001 007 0 525252525377 037777777777 525252525377
ET0 033301 000001 771 0 525252525377 037777777777 525252525377
SCT0 033301 000001 771 0 525252525377 037777777777 525252525377
SCT3 033301 000001 772 0 252525252577 037777777777 525252525377
SCT3 033301 000001 773 0 125252525277 037777777777 525252525377
SCT3 033301 000001 774 0 052525252537 037777777777 525252525377
SCT3 033301 000001 775 0 025252525257 037777777777 525252525377
SCT3 033301 000001 776 0 012525252527 037777777777 525252525377
SCT3 033301 000001 777 0 005252525253 037777777777 525252525377
SCT3 033301 000001 0 0 002525252525 037777777777 525252525377
SCT4 033301 000001 0 0 002525252525 037777777777 525252525377
LBT1 033301 000001 0 0 002525252525 037777777777 525252525377
ST0 033301 000001 0 0 002525252525 037777777777 525252525377
ST1 033301 000001 0 0 002525252525 037777777777 525252525377
ST2 033301 000001 0 0 002525252525 037777777777 525252525377
ST9 033301 000001 0 0 002525252525 037777777777 525252525377
*033312 DPB 13,000014
INITIAL
C(AC)=323232 232323
C(E)=076000 000001 C(C(E))=707070 707070
FINAL
C(AC)=323232 232323
C(E)=076000 000001 C(C(E))=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033312 033312 0 0 137540000014 0 646446464600
IT1 033312 0 0 0 137540000014 0 646446464600
AT3 033312 0 0 0 000000000014 0 137540000014
AT6 033312 000014 0 0 000000000014 0 137540000014
FT0 033312 000014 0 0 076000000001 0 137540000014
FT1A 033312 000014 0 0 076000000001 0 076000000001
FT9 033312 000014 0 0 076000000001 0 076000000001
ET0 033312 000014 0 0 076000000001 0 076000000001
BYT6 033312 000014 0 0 076000000001 0 076000000001
BYT7 033312 000014 0 0 076000000001 0 076000000001
SCT0 033312 000014 0 0 076000000001 0 076000000001
SCT3 033312 000014 721 0 076000000001 000000000001 076000000001
SCT3 033312 000014 722 0 076000000001 000000000003 076000000001
SCT3 033312 000014 723 0 076000000001 000000000007 076000000001
SCT3 033312 000014 724 0 076000000001 000000000017 076000000001
SCT3 033312 000014 725 0 076000000001 000000000037 076000000001
SCT3 033312 000014 726 0 076000000001 000000000077 076000000001
SCT3 033312 000014 727 0 076000000001 000000000177 076000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 145
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0407
SCT3 033312 000014 0 0 076000000001 000000000377 076000000001
SCT3 033312 000014 731 0 076000000001 000000000777 076000000001
SCT3 033312 000014 732 0 076000000001 000000001777 076000000001
SCT3 033312 000014 733 0 076000000001 000000003777 076000000001
SCT3 033312 000014 734 0 076000000001 000000007777 076000000001
SCT3 033312 000014 735 0 076000000001 000000017777 076000000001
SCT3 033312 000014 736 0 076000000001 000000037777 076000000001
SCT3 033312 000014 737 0 076000000001 000000077777 076000000001
SCT3 033312 000014 0 0 076000000001 000000177777 076000000001
SCT3 033312 000014 741 0 076000000001 000000377777 076000000001
SCT3 033312 000014 742 0 076000000001 000000777777 076000000001
SCT3 033312 000014 743 0 076000000001 000001777777 076000000001
SCT3 033312 000014 744 0 076000000001 000003777777 076000000001
SCT3 033312 000014 745 0 076000000001 000007777777 076000000001
SCT3 033312 000014 746 0 076000000001 000017777777 076000000001
SCT3 033312 000014 747 0 076000000001 000037777777 076000000001
SCT3 033312 000014 0 0 076000000001 000077777777 076000000001
SCT3 033312 000014 751 0 076000000001 000177777777 076000000001
SCT3 033312 000014 752 0 076000000001 000377777777 076000000001
SCT3 033312 000014 753 0 076000000001 000777777777 076000000001
SCT3 033312 000014 754 0 076000000001 001777777777 076000000001
SCT3 033312 000014 755 0 076000000001 003777777777 076000000001
SCT3 033312 000014 756 0 076000000001 007777777777 076000000001
SCT3 033312 000014 757 0 076000000001 017777777777 076000000001
SCT3 033312 000014 0 0 076000000001 037777777777 076000000001
SCT3 033312 000014 761 0 076000000001 077777777777 076000000001
SCT3 033312 000014 762 0 076000000001 177777777777 076000000001
SCT3 033312 000014 763 0 076000000001 377777777777 076000000001
SCT3 033312 000014 764 0 076000000001 777777777777 076000000001
SCT3 033312 000014 765 0 076000000001 777777777777 076000000001
SCT3 033312 000014 766 0 076000000001 777777777777 076000000001
SCT3 033312 000014 767 0 076000000001 777777777777 076000000001
SCT3 033312 000014 0 0 076000000001 777777777777 076000000001
SCT3 033312 000014 771 0 076000000001 777777777777 076000000001
SCT3 033312 000014 772 0 076000000001 777777777777 076000000001
SCT3 033312 000014 773 0 076000000001 777777777777 076000000001
SCT3 033312 000014 774 0 076000000001 777777777777 076000000001
SCT3 033312 000014 775 0 076000000001 777777777777 076000000001
SCT3 033312 000014 776 0 076000000001 777777777777 076000000001
SCT3 033312 000014 777 0 076000000001 777777777777 076000000001
SCT3 033312 000014 0 0 076000000001 777777777777 076000000001
SCT4 033312 000014 0 0 076000000001 777777777777 076000000001
BYT7A 033312 000014 007 0 076000000001 777777777777 076000000001
IT1 033312 0 007 0 076000000001 777777777777 076000000001
AT3 033312 0 007 0 000000000001 777777777777 076000000001
AT6 033312 000001 007 0 000000000001 777777777777 076000000001
FT0 033312 000001 007 0 707070707070 777777777777 076000000001
FT1A 033312 000001 007 0 707070707070 777777777777 707070707070
FT2 033312 000001 007 0 0 777777777777 707070707070
FT2RQ 033312 000001 007 0 323232232323 777777777777 707070707070
FT3 033312 000001 007 0 323232232323 777777777777 707070707070
FT9 033313 000001 007 0 323232232323 777777777777 707070707070
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 146
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0408
ET0 033313 000001 771 0 323232232323 777777777777 707070707070
SCT0 033313 000001 771 0 323232232323 777777777777 707070707070
SCT3 033313 000001 772 0 646464464646 777777777776 707070707070
SCT3 033313 000001 773 0 515151151514 777777777774 707070707070
SCT3 033313 000001 774 0 232322323230 777777777770 707070707070
SCT3 033313 000001 775 0 464644646460 777777777760 707070707070
SCT3 033313 000001 776 0 151511515140 777777777740 707070707070
SCT3 033313 000001 777 0 323223232300 777777777700 707070707070
SCT3 033313 000001 0 0 646446464600 777777777600 707070707070
SCT4 033313 000001 0 0 646446464600 777777777600 707070707070
DBT1 033313 000001 0 0 646446464600 777777777600 707070707070
DBT2 033313 000001 0 0 777777777600 707070707070 646446464600
DBT3 033313 000001 0 0 000000000177 707070707070 646446464600
DBT4 033313 000001 0 0 000000000070 707070707070 646446464600
DBT5 033313 000001 0 0 646446464670 707070707070 646446464600
ST0 033313 000001 0 0 646446464670 707070707070 646446464600
ST6 033313 000001 0 0 646446464670 707070707070 646446464600
ST6A 033313 000001 0 0 646446464670 707070707070 646446464600
ST9 033313 000001 0 0 646446464670 707070707070 646446464600
*033332 DPB 13,000014
INITIAL
C(AC)=323232 232323
C(E)=074000 000001 C(C(E))=707070 707070
FINAL
C(AC)=323232 232323
C(E)=074000 000001 C(C(E))=707070 707070
TIME PC MA SC FE AR MQ BR
IT0 033332 033332 0 0 137540000014 0 646446464600
IT1 033332 0 0 0 137540000014 0 646446464600
AT3 033332 0 0 0 000000000014 0 137540000014
AT6 033332 000014 0 0 000000000014 0 137540000014
FT0 033332 000014 0 0 074000000001 0 137540000014
FT1A 033332 000014 0 0 074000000001 0 074000000001
FT9 033332 000014 0 0 074000000001 0 074000000001
ET0 033332 000014 0 0 074000000001 0 074000000001
BYT6 033332 000014 0 0 074000000001 0 074000000001
BYT7 033332 000014 0 0 074000000001 0 074000000001
SCT0 033332 000014 0 0 074000000001 0 074000000001
SCT3 033332 000014 741 0 074000000001 000000000001 074000000001
SCT3 033332 000014 742 0 074000000001 000000000003 074000000001
SCT3 033332 000014 743 0 074000000001 000000000007 074000000001
SCT3 033332 000014 744 0 074000000001 000000000017 074000000001
SCT3 033332 000014 745 0 074000000001 000000000037 074000000001
SCT3 033332 000014 746 0 074000000001 000000000077 074000000001
SCT3 033332 000014 747 0 074000000001 000000000177 074000000001
SCT3 033332 000014 0 0 074000000001 000000000377 074000000001
SCT3 033332 000014 751 0 074000000001 000000000777 074000000001
SCT3 033332 000014 752 0 074000000001 000000001777 074000000001
SCT3 033332 000014 753 0 074000000001 000000003777 074000000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 147
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0409
SCT3 033332 000014 754 0 074000000001 000000007777 074000000001
SCT3 033332 000014 755 0 074000000001 000000017777 074000000001
SCT3 033332 000014 756 0 074000000001 000000037777 074000000001
SCT3 033332 000014 757 0 074000000001 000000077777 074000000001
SCT3 033332 000014 0 0 074000000001 000000177777 074000000001
SCT3 033332 000014 761 0 074000000001 000000377777 074000000001
SCT3 033332 000014 762 0 074000000001 000000777777 074000000001
SCT3 033332 000014 763 0 074000000001 000001777777 074000000001
SCT3 033332 000014 764 0 074000000001 000003777777 074000000001
SCT3 033332 000014 765 0 074000000001 000007777777 074000000001
SCT3 033332 000014 766 0 074000000001 000017777777 074000000001
SCT3 033332 000014 767 0 074000000001 000037777777 074000000001
SCT3 033332 000014 0 0 074000000001 000077777777 074000000001
SCT3 033332 000014 771 0 074000000001 000177777777 074000000001
SCT3 033332 000014 772 0 074000000001 000377777777 074000000001
SCT3 033332 000014 773 0 074000000001 000777777777 074000000001
SCT3 033332 000014 774 0 074000000001 001777777777 074000000001
SCT3 033332 000014 775 0 074000000001 003777777777 074000000001
SCT3 033332 000014 776 0 074000000001 007777777777 074000000001
SCT3 033332 000014 777 0 074000000001 017777777777 074000000001
SCT3 033332 000014 0 0 074000000001 037777777777 074000000001
SCT4 033332 000014 0 0 074000000001 037777777777 074000000001
BYT7A 033332 000014 007 0 074000000001 037777777777 074000000001
IT1 033332 0 007 0 074000000001 037777777777 074000000001
AT3 033332 0 007 0 000000000001 037777777777 074000000001
AT6 033332 000001 007 0 000000000001 037777777777 074000000001
FT0 033332 000001 007 0 707070707070 037777777777 074000000001
FT1A 033332 000001 007 0 707070707070 037777777777 707070707070
FT2 033332 000001 007 0 0 037777777777 707070707070
FT2RQ 033332 000001 007 0 323232232323 037777777777 707070707070
FT3 033332 000001 007 0 323232232323 037777777777 707070707070
FT9 033333 000001 007 0 323232232323 037777777777 707070707070
ET0 033333 000001 771 0 323232232323 037777777777 707070707070
SCT0 033333 000001 771 0 323232232323 037777777777 707070707070
SCT3 033333 000001 772 0 646464464646 077777777776 707070707070
SCT3 033333 000001 773 0 515151151514 177777777774 707070707070
SCT3 033333 000001 774 0 232322323230 377777777770 707070707070
SCT3 033333 000001 775 0 464644646460 777777777760 707070707070
SCT3 033333 000001 776 0 151511515140 777777777740 707070707070
SCT3 033333 000001 777 0 323223232300 777777777700 707070707070
SCT3 033333 000001 0 0 646446464600 777777777600 707070707070
SCT4 033333 000001 0 0 646446464600 777777777600 707070707070
DBT1 033333 000001 0 0 646446464600 777777777600 707070707070
DBT2 033333 000001 0 0 777777777600 707070707070 646446464600
DBT3 033333 000001 0 0 000000000177 707070707070 646446464600
DBT4 033333 000001 0 0 000000000070 707070707070 646446464600
DBT5 033333 000001 0 0 646446464670 707070707070 646446464600
ST0 033333 000001 0 0 646446464670 707070707070 646446464600
ST6 033333 000001 0 0 646446464670 707070707070 646446464600
ST6A 033333 000001 0 0 646446464670 707070707070 646446464600
ST9 033333 000001 0 0 646446464670 707070707070 646446464600
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 148
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0410
*033356 ILDB 13,000014
INITIAL
C(AC)=707070 707070
C(E)=220600 000012 C(C(E))=112233 445566
FINAL
C(AC)=000000 000033
C(E)=220600 000012 C(C(E))=112233 445566
TIME PC MA SC FE AR MQ BR
IT0 033356 033356 0 0 134540000014 0 112233445566
IT1 033356 0 0 0 134540000014 0 112233445566
AT3 033356 0 0 0 000000000014 0 134540000014
AT6 033356 000014 0 0 000000000014 0 134540000014
FT0 033356 000014 0 0 220600000012 0 134540000014
FT1A 033356 000014 0 0 220600000012 0 220600000012
FT9 033356 000014 0 0 220600000012 0 220600000012
ET0 033356 000014 0 0 220600000012 0 220600000012
BYT6 033356 000014 0 0 220600000012 0 220600000012
BYT7 033356 000014 772 0 220600000012 0 220600000012
SCT0 033356 000014 772 0 220600000012 0 220600000012
SCT3 033356 000014 773 0 220600000012 000000000001 220600000012
SCT3 033356 000014 774 0 220600000012 000000000003 220600000012
SCT3 033356 000014 775 0 220600000012 000000000007 220600000012
SCT3 033356 000014 776 0 220600000012 000000000017 220600000012
SCT3 033356 000014 777 0 220600000012 000000000037 220600000012
SCT3 033356 000014 0 0 220600000012 000000000077 220600000012
SCT4 033356 000014 0 0 220600000012 000000000077 220600000012
BYT7A 033356 000014 022 0 220600000012 000000000077 220600000012
IT1 033356 0 022 0 220600000012 000000000077 220600000012
AT3 033356 0 022 0 000000000012 000000000077 220600000012
AT6 033356 000012 022 0 000000000012 000000000077 220600000012
FT0 033356 000012 022 0 112233445566 000000000077 220600000012
FT1A 033356 000012 022 0 112233445566 000000000077 112233445566
FT9 033357 000012 022 0 112233445566 000000000077 112233445566
ET0 033357 000012 756 0 112233445566 000000000077 112233445566
SCT0 033357 000012 756 0 112233445566 000000000077 112233445566
SCT3 033357 000012 757 0 045115622673 000000000077 112233445566
SCT3 033357 000012 0 0 022446711335 000000000077 112233445566
SCT3 033357 000012 761 0 011223344556 000000000077 112233445566
SCT3 033357 000012 762 0 004511562267 000000000077 112233445566
SCT3 033357 000012 763 0 002244671133 000000000077 112233445566
SCT3 033357 000012 764 0 001122334455 000000000077 112233445566
SCT3 033357 000012 765 0 000451156226 000000000077 112233445566
SCT3 033357 000012 766 0 000224467113 000000000077 112233445566
SCT3 033357 000012 767 0 000112233445 000000000077 112233445566
SCT3 033357 000012 0 0 000045115622 000000000077 112233445566
SCT3 033357 000012 771 0 000022446711 000000000077 112233445566
SCT3 033357 000012 772 0 000011223344 000000000077 112233445566
SCT3 033357 000012 773 0 000004511562 000000000077 112233445566
SCT3 033357 000012 774 0 000002244671 000000000077 112233445566
SCT3 033357 000012 775 0 000001122334 000000000077 112233445566
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 149
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0411
SCT3 033357 000012 776 0 000000451156 000000000077 112233445566
SCT3 033357 000012 777 0 000000224467 000000000077 112233445566
SCT3 033357 000012 0 0 000000112233 000000000077 112233445566
SCT4 033357 000012 0 0 000000112233 000000000077 112233445566
LBT1 033357 000012 0 0 000000000033 000000000077 112233445566
ST0 033357 000012 0 0 000000000033 000000000077 112233445566
ST1 033357 000012 0 0 000000000033 000000000077 112233445566
ST2 033357 000012 0 0 000000000033 000000000077 112233445566
ST9 033357 000012 0 0 000000000033 000000000077 112233445566
*033373 IDPB 13,000014
INITIAL
C(AC)=707070 707070
C(E)=220600 000012 C(C(E))=112233 445566
FINAL
C(AC)=707070 707070
C(E)=220600 000012 C(C(E))=112233 445566
TIME PC MA SC FE AR MQ BR
IT0 033373 033373 0 0 136540000014 0 000070000000
IT1 033373 0 0 0 136540000014 0 000070000000
AT3 033373 0 0 0 000000000014 0 136540000014
AT6 033373 000014 0 0 000000000014 0 136540000014
FT0 033373 000014 0 0 220600000012 0 136540000014
FT1A 033373 000014 0 0 220600000012 0 220600000012
FT9 033373 000014 0 0 220600000012 0 220600000012
ET0 033373 000014 0 0 220600000012 0 220600000012
BYT6 033373 000014 0 0 220600000012 0 220600000012
BYT7 033373 000014 772 0 220600000012 0 220600000012
SCT0 033373 000014 772 0 220600000012 0 220600000012
SCT3 033373 000014 773 0 220600000012 000000000001 220600000012
SCT3 033373 000014 774 0 220600000012 000000000003 220600000012
SCT3 033373 000014 775 0 220600000012 000000000007 220600000012
SCT3 033373 000014 776 0 220600000012 000000000017 220600000012
SCT3 033373 000014 777 0 220600000012 000000000037 220600000012
SCT3 033373 000014 0 0 220600000012 000000000077 220600000012
SCT4 033373 000014 0 0 220600000012 000000000077 220600000012
BYT7A 033373 000014 022 0 220600000012 000000000077 220600000012
IT1 033373 0 022 0 220600000012 000000000077 220600000012
AT3 033373 0 022 0 000000000012 000000000077 220600000012
AT6 033373 000012 022 0 000000000012 000000000077 220600000012
FT0 033373 000012 022 0 112233445566 000000000077 220600000012
FT1A 033373 000012 022 0 112233445566 000000000077 112233445566
FT2 033373 000012 022 0 0 000000000077 112233445566
FT2RQ 033373 000012 022 0 707070707070 000000000077 112233445566
FT3 033373 000012 022 0 707070707070 000000000077 112233445566
FT9 033374 000012 022 0 707070707070 000000000077 112233445566
ET0 033374 000012 756 0 707070707070 000000000077 112233445566
SCT0 033374 000012 756 0 707070707070 000000000077 112233445566
SCT3 033374 000012 757 0 616161616160 000000000176 112233445566
SCT3 033374 000012 0 0 434343434340 000000000374 112233445566
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 150
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0412
SCT3 033374 000012 761 0 070707070700 000000000770 112233445566
SCT3 033374 000012 762 0 161616161600 000000001760 112233445566
SCT3 033374 000012 763 0 343434343400 000000003740 112233445566
SCT3 033374 000012 764 0 707070707000 000000007700 112233445566
SCT3 033374 000012 765 0 616161616000 000000017600 112233445566
SCT3 033374 000012 766 0 434343434000 000000037400 112233445566
SCT3 033374 000012 767 0 070707070000 000000077000 112233445566
SCT3 033374 000012 0 0 161616160000 000000176000 112233445566
SCT3 033374 000012 771 0 343434340000 000000374000 112233445566
SCT3 033374 000012 772 0 707070700000 000000770000 112233445566
SCT3 033374 000012 773 0 616161600000 000001760000 112233445566
SCT3 033374 000012 774 0 434343400000 000003740000 112233445566
SCT3 033374 000012 775 0 070707000000 000007700000 112233445566
SCT3 033374 000012 776 0 161616000000 000017600000 112233445566
SCT3 033374 000012 777 0 343434000000 000037400000 112233445566
SCT3 033374 000012 0 0 707070000000 000077000000 112233445566
SCT4 033374 000012 0 0 707070000000 000077000000 112233445566
DBT1 033374 000012 0 0 707070000000 000077000000 112233445566
DBT2 033374 000012 0 0 000077000000 112233445566 707070000000
DBT3 033374 000012 0 0 777700777777 112233445566 000070000000
DBT4 033374 000012 0 0 112200445566 112233445566 000070000000
DBT5 033374 000012 0 0 112270445566 112233445566 000070000000
ST0 033374 000012 0 0 112270445566 112233445566 000070000000
ST6 033374 000012 0 0 112270445566 112233445566 000070000000
ST6A 033374 000012 0 0 112270445566 112233445566 000070000000
ST9 033374 000012 0 0 112270445566 112233445566 000070000000
*033413 IBP 0,000005
INITIAL
C(AC)=777777 777777
C(E)=170600 000000
FINAL
C(E)=170600 000000
TIME PC MA SC FE AR MQ BR
IT0 033413 033413 0 0 133000000005 0 170600000000
IT1 033413 0 0 0 133000000005 0 170600000000
AT3 033413 0 0 0 000000000005 0 133000000005
AT6 033413 000005 0 0 000000000005 0 133000000005
FT0 033413 000005 0 0 170600000000 0 133000000005
FT1A 033413 000005 0 0 170600000000 0 170600000000
FT9 033414 000005 0 0 170600000000 0 170600000000
ET0 033414 000005 0 0 170600000000 0 170600000000
BYT1 033414 000005 017 0 170600000000 0 170600000000
BYT4 033414 000005 0 0 110600000000 0 170600000000
ST9 033414 000005 0 0 110600000000 0 170600000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 151
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0413
*033430 IBP 0,040136
INITIAL
C(AC)=777777 777777
C(E)=170600 000000
FINAL
C(E)=170600 000000
TIME PC MA SC FE AR MQ BR
IT0 033430 033430 0 0 133000040136 0 170600000000
IT1 033430 0 0 0 133000040136 0 170600000000
AT3 033430 0 0 0 000000040136 0 133000040136
AT6 033430 040136 0 0 000000040136 0 133000040136
FT0 033430 040136 0 0 170600000000 0 133000040136
FT1A 033430 040136 0 0 170600000000 0 170600000000
FT9 033431 040136 0 0 170600000000 0 170600000000
ET0 033431 040136 0 0 170600000000 0 170600000000
BYT1 033431 040136 017 0 170600000000 0 170600000000
BYT4 033431 040136 0 0 110600000000 0 170600000000
ST9 033431 040136 0 0 110600000000 0 170600000000
*033450 DPB 5,000003
INITIAL
C(AC)=000000 654321
C(E)=170600 000001 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 000001 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033450 033450 0 0 137240000003 0 000002100000
IT1 033450 0 0 0 137240000003 0 000002100000
AT3 033450 0 0 0 000000000003 0 137240000003
AT6 033450 000003 0 0 000000000003 0 137240000003
FT0 033450 000003 0 0 170600000001 0 137240000003
FT1A 033450 000003 0 0 170600000001 0 170600000001
FT9 033450 000003 0 0 170600000001 0 170600000001
ET0 033450 000003 0 0 170600000001 0 170600000001
BYT6 033450 000003 0 0 170600000001 0 170600000001
BYT7 033450 000003 772 0 170600000001 0 170600000001
SCT0 033450 000003 772 0 170600000001 0 170600000001
SCT3 033450 000003 773 0 170600000001 000000000001 170600000001
SCT3 033450 000003 774 0 170600000001 000000000003 170600000001
SCT3 033450 000003 775 0 170600000001 000000000007 170600000001
SCT3 033450 000003 776 0 170600000001 000000000017 170600000001
SCT3 033450 000003 777 0 170600000001 000000000037 170600000001
SCT3 033450 000003 0 0 170600000001 000000000077 170600000001
SCT4 033450 000003 0 0 170600000001 000000000077 170600000001
BYT7A 033450 000003 017 0 170600000001 000000000077 170600000001
IT1 033450 0 017 0 170600000001 000000000077 170600000001
AT3 033450 0 017 0 000000000001 000000000077 170600000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 152
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0414
AT6 033450 000001 017 0 000000000001 000000000077 170600000001
FT0 033450 000001 017 0 230703603700 000000000077 170600000001
FT1A 033450 000001 017 0 230703603700 000000000077 230703603700
FT2 033450 000001 017 0 0 000000000077 230703603700
FT2RQ 033450 000001 017 0 000000654321 000000000077 230703603700
FT3 033450 000001 017 0 000000654321 000000000077 230703603700
FT9 033451 000001 017 0 000000654321 000000000077 230703603700
ET0 033451 000001 761 0 000000654321 000000000077 230703603700
SCT0 033451 000001 761 0 000000654321 000000000077 230703603700
SCT3 033451 000001 762 0 000001530642 000000000176 230703603700
SCT3 033451 000001 763 0 000003261504 000000000374 230703603700
SCT3 033451 000001 764 0 000006543210 000000000770 230703603700
SCT3 033451 000001 765 0 000015306420 000000001760 230703603700
SCT3 033451 000001 766 0 000032615040 000000003740 230703603700
SCT3 033451 000001 767 0 000065432100 000000007700 230703603700
SCT3 033451 000001 0 0 000153064200 000000017600 230703603700
SCT3 033451 000001 771 0 000326150400 000000037400 230703603700
SCT3 033451 000001 772 0 000654321000 000000077000 230703603700
SCT3 033451 000001 773 0 001530642000 000000176000 230703603700
SCT3 033451 000001 774 0 003261504000 000000374000 230703603700
SCT3 033451 000001 775 0 006543210000 000000770000 230703603700
SCT3 033451 000001 776 0 015306420000 000001760000 230703603700
SCT3 033451 000001 777 0 032615040000 000003740000 230703603700
SCT3 033451 000001 0 0 065432100000 000007700000 230703603700
SCT4 033451 000001 0 0 065432100000 000007700000 230703603700
DBT1 033451 000001 0 0 065432100000 000007700000 230703603700
DBT2 033451 000001 0 0 000007700000 230703603700 065432100000
DBT3 033451 000001 0 0 777770077777 230703603700 000002100000
DBT4 033451 000001 0 0 230700003700 230703603700 000002100000
DBT5 033451 000001 0 0 230702103700 230703603700 000002100000
ST0 033451 000001 0 0 230702103700 230703603700 000002100000
ST6 033451 000001 0 0 230702103700 230703603700 000002100000
ST6A 033451 000001 0 0 230702103700 230703603700 000002100000
ST9 033451 000001 0 0 230702103700 230703603700 000002100000
*033474 DPB 14,000012
INITIAL
C(AC)=000000 654321
C(E)=170600 040136 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 040136 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033474 033474 0 0 137600000012 0 000002100000
IT1 033474 0 0 0 137600000012 0 000002100000
AT3 033474 0 0 0 000000000012 0 137600000012
AT6 033474 000012 0 0 000000000012 0 137600000012
FT0 033474 000012 0 0 170600040136 0 137600000012
FT1A 033474 000012 0 0 170600040136 0 170600040136
FT9 033474 000012 0 0 170600040136 0 170600040136
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 153
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0415
ET0 033474 000012 0 0 170600040136 0 170600040136
BYT6 033474 000012 0 0 170600040136 0 170600040136
BYT7 033474 000012 772 0 170600040136 0 170600040136
SCT0 033474 000012 772 0 170600040136 0 170600040136
SCT3 033474 000012 773 0 170600040136 000000000001 170600040136
SCT3 033474 000012 774 0 170600040136 000000000003 170600040136
SCT3 033474 000012 775 0 170600040136 000000000007 170600040136
SCT3 033474 000012 776 0 170600040136 000000000017 170600040136
SCT3 033474 000012 777 0 170600040136 000000000037 170600040136
SCT3 033474 000012 0 0 170600040136 000000000077 170600040136
SCT4 033474 000012 0 0 170600040136 000000000077 170600040136
BYT7A 033474 000012 017 0 170600040136 000000000077 170600040136
IT1 033474 0 017 0 170600040136 000000000077 170600040136
AT3 033474 0 017 0 000000040136 000000000077 170600040136
AT6 033474 040136 017 0 000000040136 000000000077 170600040136
FT0 033474 040136 017 0 230703603700 000000000077 170600040136
FT1A 033474 040136 017 0 230703603700 000000000077 230703603700
FT2 033474 040136 017 0 0 000000000077 230703603700
FT2RQ 033474 040136 017 0 000000654321 000000000077 230703603700
FT3 033474 040136 017 0 000000654321 000000000077 230703603700
FT9 033475 040136 017 0 000000654321 000000000077 230703603700
ET0 033475 040136 761 0 000000654321 000000000077 230703603700
SCT0 033475 040136 761 0 000000654321 000000000077 230703603700
SCT3 033475 040136 762 0 000001530642 000000000176 230703603700
SCT3 033475 040136 763 0 000003261504 000000000374 230703603700
SCT3 033475 040136 764 0 000006543210 000000000770 230703603700
SCT3 033475 040136 765 0 000015306420 000000001760 230703603700
SCT3 033475 040136 766 0 000032615040 000000003740 230703603700
SCT3 033475 040136 767 0 000065432100 000000007700 230703603700
SCT3 033475 040136 0 0 000153064200 000000017600 230703603700
SCT3 033475 040136 771 0 000326150400 000000037400 230703603700
SCT3 033475 040136 772 0 000654321000 000000077000 230703603700
SCT3 033475 040136 773 0 001530642000 000000176000 230703603700
SCT3 033475 040136 774 0 003261504000 000000374000 230703603700
SCT3 033475 040136 775 0 006543210000 000000770000 230703603700
SCT3 033475 040136 776 0 015306420000 000001760000 230703603700
SCT3 033475 040136 777 0 032615040000 000003740000 230703603700
SCT3 033475 040136 0 0 065432100000 000007700000 230703603700
SCT4 033475 040136 0 0 065432100000 000007700000 230703603700
DBT1 033475 040136 0 0 065432100000 000007700000 230703603700
DBT2 033475 040136 0 0 000007700000 230703603700 065432100000
DBT3 033475 040136 0 0 777770077777 230703603700 000002100000
DBT4 033475 040136 0 0 230700003700 230703603700 000002100000
DBT5 033475 040136 0 0 230702103700 230703603700 000002100000
ST0 033475 040136 0 0 230702103700 230703603700 000002100000
ST6 033475 040136 0 0 230702103700 230703603700 000002100000
ST6A 033475 040136 0 0 230702103700 230703603700 000002100000
ST9 033475 040136 0 0 230702103700 230703603700 000002100000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 154
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0416
*033520 DPB 13,040136
INITIAL
C(AC)=000000 654321
C(E)=170600 000007 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 000007 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033520 033520 0 0 137540040136 0 000002100000
IT1 033520 0 0 0 137540040136 0 000002100000
AT3 033520 0 0 0 000000040136 0 137540040136
AT6 033520 040136 0 0 000000040136 0 137540040136
FT0 033520 040136 0 0 170600000007 0 137540040136
FT1A 033520 040136 0 0 170600000007 0 170600000007
FT9 033520 040136 0 0 170600000007 0 170600000007
ET0 033520 040136 0 0 170600000007 0 170600000007
BYT6 033520 040136 0 0 170600000007 0 170600000007
BYT7 033520 040136 772 0 170600000007 0 170600000007
SCT0 033520 040136 772 0 170600000007 0 170600000007
SCT3 033520 040136 773 0 170600000007 000000000001 170600000007
SCT3 033520 040136 774 0 170600000007 000000000003 170600000007
SCT3 033520 040136 775 0 170600000007 000000000007 170600000007
SCT3 033520 040136 776 0 170600000007 000000000017 170600000007
SCT3 033520 040136 777 0 170600000007 000000000037 170600000007
SCT3 033520 040136 0 0 170600000007 000000000077 170600000007
SCT4 033520 040136 0 0 170600000007 000000000077 170600000007
BYT7A 033520 040136 017 0 170600000007 000000000077 170600000007
IT1 033520 0 017 0 170600000007 000000000077 170600000007
AT3 033520 0 017 0 000000000007 000000000077 170600000007
AT6 033520 000007 017 0 000000000007 000000000077 170600000007
FT0 033520 000007 017 0 230703603700 000000000077 170600000007
FT1A 033520 000007 017 0 230703603700 000000000077 230703603700
FT2 033520 000007 017 0 0 000000000077 230703603700
FT2RQ 033520 000007 017 0 000000654321 000000000077 230703603700
FT3 033520 000007 017 0 000000654321 000000000077 230703603700
FT9 033521 000007 017 0 000000654321 000000000077 230703603700
ET0 033521 000007 761 0 000000654321 000000000077 230703603700
SCT0 033521 000007 761 0 000000654321 000000000077 230703603700
SCT3 033521 000007 762 0 000001530642 000000000176 230703603700
SCT3 033521 000007 763 0 000003261504 000000000374 230703603700
SCT3 033521 000007 764 0 000006543210 000000000770 230703603700
SCT3 033521 000007 765 0 000015306420 000000001760 230703603700
SCT3 033521 000007 766 0 000032615040 000000003740 230703603700
SCT3 033521 000007 767 0 000065432100 000000007700 230703603700
SCT3 033521 000007 0 0 000153064200 000000017600 230703603700
SCT3 033521 000007 771 0 000326150400 000000037400 230703603700
SCT3 033521 000007 772 0 000654321000 000000077000 230703603700
SCT3 033521 000007 773 0 001530642000 000000176000 230703603700
SCT3 033521 000007 774 0 003261504000 000000374000 230703603700
SCT3 033521 000007 775 0 006543210000 000000770000 230703603700
SCT3 033521 000007 776 0 015306420000 000001760000 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 155
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0417
SCT3 033521 000007 777 0 032615040000 000003740000 230703603700
SCT3 033521 000007 0 0 065432100000 000007700000 230703603700
SCT4 033521 000007 0 0 065432100000 000007700000 230703603700
DBT1 033521 000007 0 0 065432100000 000007700000 230703603700
DBT2 033521 000007 0 0 000007700000 230703603700 065432100000
DBT3 033521 000007 0 0 777770077777 230703603700 000002100000
DBT4 033521 000007 0 0 230700003700 230703603700 000002100000
DBT5 033521 000007 0 0 230702103700 230703603700 000002100000
ST0 033521 000007 0 0 230702103700 230703603700 000002100000
ST6 033521 000007 0 0 230702103700 230703603700 000002100000
ST6A 033521 000007 0 0 230702103700 230703603700 000002100000
ST9 033521 000007 0 0 230702103700 230703603700 000002100000
*033545 DPB 12,040136
INITIAL
C(AC)=000000 654321
C(E)=170600 040141 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 040141 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033545 033545 0 0 137500040136 0 000002100000
IT1 033545 0 0 0 137500040136 0 000002100000
AT3 033545 0 0 0 000000040136 0 137500040136
AT6 033545 040136 0 0 000000040136 0 137500040136
FT0 033545 040136 0 0 170600040141 0 137500040136
FT1A 033545 040136 0 0 170600040141 0 170600040141
FT9 033545 040136 0 0 170600040141 0 170600040141
ET0 033545 040136 0 0 170600040141 0 170600040141
BYT6 033545 040136 0 0 170600040141 0 170600040141
BYT7 033545 040136 772 0 170600040141 0 170600040141
SCT0 033545 040136 772 0 170600040141 0 170600040141
SCT3 033545 040136 773 0 170600040141 000000000001 170600040141
SCT3 033545 040136 774 0 170600040141 000000000003 170600040141
SCT3 033545 040136 775 0 170600040141 000000000007 170600040141
SCT3 033545 040136 776 0 170600040141 000000000017 170600040141
SCT3 033545 040136 777 0 170600040141 000000000037 170600040141
SCT3 033545 040136 0 0 170600040141 000000000077 170600040141
SCT4 033545 040136 0 0 170600040141 000000000077 170600040141
BYT7A 033545 040136 017 0 170600040141 000000000077 170600040141
IT1 033545 0 017 0 170600040141 000000000077 170600040141
AT3 033545 0 017 0 000000040141 000000000077 170600040141
AT6 033545 040141 017 0 000000040141 000000000077 170600040141
FT0 033545 040141 017 0 230703603700 000000000077 170600040141
FT1A 033545 040141 017 0 230703603700 000000000077 230703603700
FT2 033545 040141 017 0 0 000000000077 230703603700
FT2RQ 033545 040141 017 0 000000654321 000000000077 230703603700
FT3 033545 040141 017 0 000000654321 000000000077 230703603700
FT9 033546 040141 017 0 000000654321 000000000077 230703603700
ET0 033546 040141 761 0 000000654321 000000000077 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 156
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0418
SCT0 033546 040141 761 0 000000654321 000000000077 230703603700
SCT3 033546 040141 762 0 000001530642 000000000176 230703603700
SCT3 033546 040141 763 0 000003261504 000000000374 230703603700
SCT3 033546 040141 764 0 000006543210 000000000770 230703603700
SCT3 033546 040141 765 0 000015306420 000000001760 230703603700
SCT3 033546 040141 766 0 000032615040 000000003740 230703603700
SCT3 033546 040141 767 0 000065432100 000000007700 230703603700
SCT3 033546 040141 0 0 000153064200 000000017600 230703603700
SCT3 033546 040141 771 0 000326150400 000000037400 230703603700
SCT3 033546 040141 772 0 000654321000 000000077000 230703603700
SCT3 033546 040141 773 0 001530642000 000000176000 230703603700
SCT3 033546 040141 774 0 003261504000 000000374000 230703603700
SCT3 033546 040141 775 0 006543210000 000000770000 230703603700
SCT3 033546 040141 776 0 015306420000 000001760000 230703603700
SCT3 033546 040141 777 0 032615040000 000003740000 230703603700
SCT3 033546 040141 0 0 065432100000 000007700000 230703603700
SCT4 033546 040141 0 0 065432100000 000007700000 230703603700
DBT1 033546 040141 0 0 065432100000 000007700000 230703603700
DBT2 033546 040141 0 0 000007700000 230703603700 065432100000
DBT3 033546 040141 0 0 777770077777 230703603700 000002100000
DBT4 033546 040141 0 0 230700003700 230703603700 000002100000
DBT5 033546 040141 0 0 230702103700 230703603700 000002100000
ST0 033546 040141 0 0 230702103700 230703603700 000002100000
ST6 033546 040141 0 0 230702103700 230703603700 000002100000
ST6A 033546 040141 0 0 230702103700 230703603700 000002100000
ST9 033546 040141 0 0 230702103700 230703603700 000002100000
*033573 IDPB 11,000007
INITIAL
C(AC)=000000 654321
C(E)=250600 000005 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 000005 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033573 033573 0 0 136440000007 0 000002100000
IT1 033573 0 0 0 136440000007 0 000002100000
AT3 033573 0 0 0 000000000007 0 136440000007
AT6 033573 000007 0 0 000000000007 0 136440000007
FT0 033573 000007 0 0 250600000005 0 136440000007
FT1A 033573 000007 0 0 250600000005 0 250600000005
FT9 033573 000007 0 0 250600000005 0 250600000005
ET0 033573 000007 0 0 250600000005 0 250600000005
BYT1 033573 000007 025 0 250600000005 0 250600000005
BYT4 033573 000007 0 0 170600000005 0 250600000005
BYT7 033573 000007 772 0 170600000005 0 250600000005
SCT0 033573 000007 772 0 170600000005 0 250600000005
SCT3 033573 000007 773 0 170600000005 000000000001 250600000005
SCT3 033573 000007 774 0 170600000005 000000000003 250600000005
SCT3 033573 000007 775 0 170600000005 000000000007 250600000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 157
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0419
SCT3 033573 000007 776 0 170600000005 000000000017 250600000005
SCT3 033573 000007 777 0 170600000005 000000000037 250600000005
SCT3 033573 000007 0 0 170600000005 000000000077 250600000005
SCT4 033573 000007 0 0 170600000005 000000000077 250600000005
BYT7A 033573 000007 017 0 170600000005 000000000077 250600000005
IT1 033573 0 017 0 170600000005 000000000077 250600000005
AT3 033573 0 017 0 000000000005 000000000077 170600000005
AT6 033573 000005 017 0 000000000005 000000000077 170600000005
FT0 033573 000005 017 0 230703603700 000000000077 170600000005
FT1A 033573 000005 017 0 230703603700 000000000077 230703603700
FT2 033573 000005 017 0 0 000000000077 230703603700
FT2RQ 033573 000005 017 0 000000654321 000000000077 230703603700
FT3 033573 000005 017 0 000000654321 000000000077 230703603700
FT9 033574 000005 017 0 000000654321 000000000077 230703603700
ET0 033574 000005 761 0 000000654321 000000000077 230703603700
SCT0 033574 000005 761 0 000000654321 000000000077 230703603700
SCT3 033574 000005 762 0 000001530642 000000000176 230703603700
SCT3 033574 000005 763 0 000003261504 000000000374 230703603700
SCT3 033574 000005 764 0 000006543210 000000000770 230703603700
SCT3 033574 000005 765 0 000015306420 000000001760 230703603700
SCT3 033574 000005 766 0 000032615040 000000003740 230703603700
SCT3 033574 000005 767 0 000065432100 000000007700 230703603700
SCT3 033574 000005 0 0 000153064200 000000017600 230703603700
SCT3 033574 000005 771 0 000326150400 000000037400 230703603700
SCT3 033574 000005 772 0 000654321000 000000077000 230703603700
SCT3 033574 000005 773 0 001530642000 000000176000 230703603700
SCT3 033574 000005 774 0 003261504000 000000374000 230703603700
SCT3 033574 000005 775 0 006543210000 000000770000 230703603700
SCT3 033574 000005 776 0 015306420000 000001760000 230703603700
SCT3 033574 000005 777 0 032615040000 000003740000 230703603700
SCT3 033574 000005 0 0 065432100000 000007700000 230703603700
SCT4 033574 000005 0 0 065432100000 000007700000 230703603700
DBT1 033574 000005 0 0 065432100000 000007700000 230703603700
DBT2 033574 000005 0 0 000007700000 230703603700 065432100000
DBT3 033574 000005 0 0 777770077777 230703603700 000002100000
DBT4 033574 000005 0 0 230700003700 230703603700 000002100000
DBT5 033574 000005 0 0 230702103700 230703603700 000002100000
ST0 033574 000005 0 0 230702103700 230703603700 000002100000
ST6 033574 000005 0 0 230702103700 230703603700 000002100000
ST6A 033574 000005 0 0 230702103700 230703603700 000002100000
ST9 033574 000005 0 0 230702103700 230703603700 000002100000
*033620 IDPB 10,000006
INITIAL
C(AC)=000000 654321
C(E)=250600 040136 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 040136 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 158
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0420
IT0 033620 033620 0 0 136400000006 0 000002100000
IT1 033620 0 0 0 136400000006 0 000002100000
AT3 033620 0 0 0 000000000006 0 136400000006
AT6 033620 000006 0 0 000000000006 0 136400000006
FT0 033620 000006 0 0 250600040136 0 136400000006
FT1A 033620 000006 0 0 250600040136 0 250600040136
FT9 033620 000006 0 0 250600040136 0 250600040136
ET0 033620 000006 0 0 250600040136 0 250600040136
BYT1 033620 000006 025 0 250600040136 0 250600040136
BYT4 033620 000006 0 0 170600040136 0 250600040136
BYT7 033620 000006 772 0 170600040136 0 250600040136
SCT0 033620 000006 772 0 170600040136 0 250600040136
SCT3 033620 000006 773 0 170600040136 000000000001 250600040136
SCT3 033620 000006 774 0 170600040136 000000000003 250600040136
SCT3 033620 000006 775 0 170600040136 000000000007 250600040136
SCT3 033620 000006 776 0 170600040136 000000000017 250600040136
SCT3 033620 000006 777 0 170600040136 000000000037 250600040136
SCT3 033620 000006 0 0 170600040136 000000000077 250600040136
SCT4 033620 000006 0 0 170600040136 000000000077 250600040136
BYT7A 033620 000006 017 0 170600040136 000000000077 250600040136
IT1 033620 0 017 0 170600040136 000000000077 250600040136
AT3 033620 0 017 0 000000040136 000000000077 170600040136
AT6 033620 040136 017 0 000000040136 000000000077 170600040136
FT0 033620 040136 017 0 230703603700 000000000077 170600040136
FT1A 033620 040136 017 0 230703603700 000000000077 230703603700
FT2 033620 040136 017 0 0 000000000077 230703603700
FT2RQ 033620 040136 017 0 000000654321 000000000077 230703603700
FT3 033620 040136 017 0 000000654321 000000000077 230703603700
FT9 033621 040136 017 0 000000654321 000000000077 230703603700
ET0 033621 040136 761 0 000000654321 000000000077 230703603700
SCT0 033621 040136 761 0 000000654321 000000000077 230703603700
SCT3 033621 040136 762 0 000001530642 000000000176 230703603700
SCT3 033621 040136 763 0 000003261504 000000000374 230703603700
SCT3 033621 040136 764 0 000006543210 000000000770 230703603700
SCT3 033621 040136 765 0 000015306420 000000001760 230703603700
SCT3 033621 040136 766 0 000032615040 000000003740 230703603700
SCT3 033621 040136 767 0 000065432100 000000007700 230703603700
SCT3 033621 040136 0 0 000153064200 000000017600 230703603700
SCT3 033621 040136 771 0 000326150400 000000037400 230703603700
SCT3 033621 040136 772 0 000654321000 000000077000 230703603700
SCT3 033621 040136 773 0 001530642000 000000176000 230703603700
SCT3 033621 040136 774 0 003261504000 000000374000 230703603700
SCT3 033621 040136 775 0 006543210000 000000770000 230703603700
SCT3 033621 040136 776 0 015306420000 000001760000 230703603700
SCT3 033621 040136 777 0 032615040000 000003740000 230703603700
SCT3 033621 040136 0 0 065432100000 000007700000 230703603700
SCT4 033621 040136 0 0 065432100000 000007700000 230703603700
DBT1 033621 040136 0 0 065432100000 000007700000 230703603700
DBT2 033621 040136 0 0 000007700000 230703603700 065432100000
DBT3 033621 040136 0 0 777770077777 230703603700 000002100000
DBT4 033621 040136 0 0 230700003700 230703603700 000002100000
DBT5 033621 040136 0 0 230702103700 230703603700 000002100000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 159
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0421
ST0 033621 040136 0 0 230702103700 230703603700 000002100000
ST6 033621 040136 0 0 230702103700 230703603700 000002100000
ST6A 033621 040136 0 0 230702103700 230703603700 000002100000
ST9 033621 040136 0 0 230702103700 230703603700 000002100000
*033640 IDPB 7,040136
INITIAL
C(AC)=000000 654321
C(E)=250600 000003 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 000003 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033640 033640 0 0 136340040136 0 000002100000
IT1 033640 0 0 0 136340040136 0 000002100000
AT3 033640 0 0 0 000000040136 0 136340040136
AT6 033640 040136 0 0 000000040136 0 136340040136
FT0 033640 040136 0 0 250600000003 0 136340040136
FT1A 033640 040136 0 0 250600000003 0 250600000003
FT9 033640 040136 0 0 250600000003 0 250600000003
ET0 033640 040136 0 0 250600000003 0 250600000003
BYT1 033640 040136 025 0 250600000003 0 250600000003
BYT4 033640 040136 0 0 170600000003 0 250600000003
BYT7 033640 040136 772 0 170600000003 0 250600000003
SCT0 033640 040136 772 0 170600000003 0 250600000003
SCT3 033640 040136 773 0 170600000003 000000000001 250600000003
SCT3 033640 040136 774 0 170600000003 000000000003 250600000003
SCT3 033640 040136 775 0 170600000003 000000000007 250600000003
SCT3 033640 040136 776 0 170600000003 000000000017 250600000003
SCT3 033640 040136 777 0 170600000003 000000000037 250600000003
SCT3 033640 040136 0 0 170600000003 000000000077 250600000003
SCT4 033640 040136 0 0 170600000003 000000000077 250600000003
BYT7A 033640 040136 017 0 170600000003 000000000077 250600000003
IT1 033640 0 017 0 170600000003 000000000077 250600000003
AT3 033640 0 017 0 000000000003 000000000077 170600000003
AT6 033640 000003 017 0 000000000003 000000000077 170600000003
FT0 033640 000003 017 0 230703603700 000000000077 170600000003
FT1A 033640 000003 017 0 230703603700 000000000077 230703603700
FT2 033640 000003 017 0 0 000000000077 230703603700
FT2RQ 033640 000003 017 0 000000654321 000000000077 230703603700
FT3 033640 000003 017 0 000000654321 000000000077 230703603700
FT9 033641 000003 017 0 000000654321 000000000077 230703603700
ET0 033641 000003 761 0 000000654321 000000000077 230703603700
SCT0 033641 000003 761 0 000000654321 000000000077 230703603700
SCT3 033641 000003 762 0 000001530642 000000000176 230703603700
SCT3 033641 000003 763 0 000003261504 000000000374 230703603700
SCT3 033641 000003 764 0 000006543210 000000000770 230703603700
SCT3 033641 000003 765 0 000015306420 000000001760 230703603700
SCT3 033641 000003 766 0 000032615040 000000003740 230703603700
SCT3 033641 000003 767 0 000065432100 000000007700 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 160
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0422
SCT3 033641 000003 0 0 000153064200 000000017600 230703603700
SCT3 033641 000003 771 0 000326150400 000000037400 230703603700
SCT3 033641 000003 772 0 000654321000 000000077000 230703603700
SCT3 033641 000003 773 0 001530642000 000000176000 230703603700
SCT3 033641 000003 774 0 003261504000 000000374000 230703603700
SCT3 033641 000003 775 0 006543210000 000000770000 230703603700
SCT3 033641 000003 776 0 015306420000 000001760000 230703603700
SCT3 033641 000003 777 0 032615040000 000003740000 230703603700
SCT3 033641 000003 0 0 065432100000 000007700000 230703603700
SCT4 033641 000003 0 0 065432100000 000007700000 230703603700
DBT1 033641 000003 0 0 065432100000 000007700000 230703603700
DBT2 033641 000003 0 0 000007700000 230703603700 065432100000
DBT3 033641 000003 0 0 777770077777 230703603700 000002100000
DBT4 033641 000003 0 0 230700003700 230703603700 000002100000
DBT5 033641 000003 0 0 230702103700 230703603700 000002100000
ST0 033641 000003 0 0 230702103700 230703603700 000002100000
ST6 033641 000003 0 0 230702103700 230703603700 000002100000
ST6A 033641 000003 0 0 230702103700 230703603700 000002100000
ST9 033641 000003 0 0 230702103700 230703603700 000002100000
*033666 IDPB 6,040136
INITIAL
C(AC)=000000 654321
C(E)=250600 040141 C(C(E))=230703 603700
FINAL
C(AC)=000000 654321
C(E)=170600 040141 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033666 033666 0 0 136300040136 0 000002100000
IT1 033666 0 0 0 136300040136 0 000002100000
AT3 033666 0 0 0 000000040136 0 136300040136
AT6 033666 040136 0 0 000000040136 0 136300040136
FT0 033666 040136 0 0 250600040141 0 136300040136
FT1A 033666 040136 0 0 250600040141 0 250600040141
FT9 033666 040136 0 0 250600040141 0 250600040141
ET0 033666 040136 0 0 250600040141 0 250600040141
BYT1 033666 040136 025 0 250600040141 0 250600040141
BYT4 033666 040136 0 0 170600040141 0 250600040141
BYT7 033666 040136 772 0 170600040141 0 250600040141
SCT0 033666 040136 772 0 170600040141 0 250600040141
SCT3 033666 040136 773 0 170600040141 000000000001 250600040141
SCT3 033666 040136 774 0 170600040141 000000000003 250600040141
SCT3 033666 040136 775 0 170600040141 000000000007 250600040141
SCT3 033666 040136 776 0 170600040141 000000000017 250600040141
SCT3 033666 040136 777 0 170600040141 000000000037 250600040141
SCT3 033666 040136 0 0 170600040141 000000000077 250600040141
SCT4 033666 040136 0 0 170600040141 000000000077 250600040141
BYT7A 033666 040136 017 0 170600040141 000000000077 250600040141
IT1 033666 0 017 0 170600040141 000000000077 250600040141
AT3 033666 0 017 0 000000040141 000000000077 170600040141
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 161
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0423
AT6 033666 040141 017 0 000000040141 000000000077 170600040141
FT0 033666 040141 017 0 230703603700 000000000077 170600040141
FT1A 033666 040141 017 0 230703603700 000000000077 230703603700
FT2 033666 040141 017 0 0 000000000077 230703603700
FT2RQ 033666 040141 017 0 000000654321 000000000077 230703603700
FT3 033666 040141 017 0 000000654321 000000000077 230703603700
FT9 033667 040141 017 0 000000654321 000000000077 230703603700
ET0 033667 040141 761 0 000000654321 000000000077 230703603700
SCT0 033667 040141 761 0 000000654321 000000000077 230703603700
SCT3 033667 040141 762 0 000001530642 000000000176 230703603700
SCT3 033667 040141 763 0 000003261504 000000000374 230703603700
SCT3 033667 040141 764 0 000006543210 000000000770 230703603700
SCT3 033667 040141 765 0 000015306420 000000001760 230703603700
SCT3 033667 040141 766 0 000032615040 000000003740 230703603700
SCT3 033667 040141 767 0 000065432100 000000007700 230703603700
SCT3 033667 040141 0 0 000153064200 000000017600 230703603700
SCT3 033667 040141 771 0 000326150400 000000037400 230703603700
SCT3 033667 040141 772 0 000654321000 000000077000 230703603700
SCT3 033667 040141 773 0 001530642000 000000176000 230703603700
SCT3 033667 040141 774 0 003261504000 000000374000 230703603700
SCT3 033667 040141 775 0 006543210000 000000770000 230703603700
SCT3 033667 040141 776 0 015306420000 000001760000 230703603700
SCT3 033667 040141 777 0 032615040000 000003740000 230703603700
SCT3 033667 040141 0 0 065432100000 000007700000 230703603700
SCT4 033667 040141 0 0 065432100000 000007700000 230703603700
DBT1 033667 040141 0 0 065432100000 000007700000 230703603700
DBT2 033667 040141 0 0 000007700000 230703603700 065432100000
DBT3 033667 040141 0 0 777770077777 230703603700 000002100000
DBT4 033667 040141 0 0 230700003700 230703603700 000002100000
DBT5 033667 040141 0 0 230702103700 230703603700 000002100000
ST0 033667 040141 0 0 230702103700 230703603700 000002100000
ST6 033667 040141 0 0 230702103700 230703603700 000002100000
ST6A 033667 040141 0 0 230702103700 230703603700 000002100000
ST9 033667 040141 0 0 230702103700 230703603700 000002100000
*033713 LDB 5,000003
INITIAL
C(AC)=000000 000000
C(E)=170600 000001 C(C(E))=230703 603700
FINAL
C(AC)=000000 000036
C(E)=170600 000001 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033713 033713 0 0 135240000003 0 230703603700
IT1 033713 0 0 0 135240000003 0 230703603700
AT3 033713 0 0 0 000000000003 0 135240000003
AT6 033713 000003 0 0 000000000003 0 135240000003
FT0 033713 000003 0 0 170600000001 0 135240000003
FT1A 033713 000003 0 0 170600000001 0 170600000001
FT9 033713 000003 0 0 170600000001 0 170600000001
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 162
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0424
ET0 033713 000003 0 0 170600000001 0 170600000001
BYT6 033713 000003 0 0 170600000001 0 170600000001
BYT7 033713 000003 772 0 170600000001 0 170600000001
SCT0 033713 000003 772 0 170600000001 0 170600000001
SCT3 033713 000003 773 0 170600000001 000000000001 170600000001
SCT3 033713 000003 774 0 170600000001 000000000003 170600000001
SCT3 033713 000003 775 0 170600000001 000000000007 170600000001
SCT3 033713 000003 776 0 170600000001 000000000017 170600000001
SCT3 033713 000003 777 0 170600000001 000000000037 170600000001
SCT3 033713 000003 0 0 170600000001 000000000077 170600000001
SCT4 033713 000003 0 0 170600000001 000000000077 170600000001
BYT7A 033713 000003 017 0 170600000001 000000000077 170600000001
IT1 033713 0 017 0 170600000001 000000000077 170600000001
AT3 033713 0 017 0 000000000001 000000000077 170600000001
AT6 033713 000001 017 0 000000000001 000000000077 170600000001
FT0 033713 000001 017 0 230703603700 000000000077 170600000001
FT1A 033713 000001 017 0 230703603700 000000000077 230703603700
FT9 033714 000001 017 0 230703603700 000000000077 230703603700
ET0 033714 000001 761 0 230703603700 000000000077 230703603700
SCT0 033714 000001 761 0 230703603700 000000000077 230703603700
SCT3 033714 000001 762 0 114341701740 000000000077 230703603700
SCT3 033714 000001 763 0 046160740760 000000000077 230703603700
SCT3 033714 000001 764 0 023070360370 000000000077 230703603700
SCT3 033714 000001 765 0 011434170174 000000000077 230703603700
SCT3 033714 000001 766 0 004616074076 000000000077 230703603700
SCT3 033714 000001 767 0 002307036037 000000000077 230703603700
SCT3 033714 000001 0 0 001143417017 000000000077 230703603700
SCT3 033714 000001 771 0 000461607407 000000000077 230703603700
SCT3 033714 000001 772 0 000230703603 000000000077 230703603700
SCT3 033714 000001 773 0 000114341701 000000000077 230703603700
SCT3 033714 000001 774 0 000046160740 000000000077 230703603700
SCT3 033714 000001 775 0 000023070360 000000000077 230703603700
SCT3 033714 000001 776 0 000011434170 000000000077 230703603700
SCT3 033714 000001 777 0 000004616074 000000000077 230703603700
SCT3 033714 000001 0 0 000002307036 000000000077 230703603700
SCT4 033714 000001 0 0 000002307036 000000000077 230703603700
LBT1 033714 000001 0 0 000000000036 000000000077 230703603700
ST0 033714 000001 0 0 000000000036 000000000077 230703603700
ST1 033714 000001 0 0 000000000036 000000000077 230703603700
ST2 033714 000001 0 0 000000000036 000000000077 230703603700
ST9 033714 000001 0 0 000000000036 000000000077 230703603700
*033736 LDB 14,000012
INITIAL
C(AC)=000000 000000
C(E)=170600 040136 C(C(E))=230703 603700
FINAL
C(AC)=000000 000036
C(E)=170600 040136 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 163
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0425
IT0 033736 033736 0 0 135600000012 0 230703603700
IT1 033736 0 0 0 135600000012 0 230703603700
AT3 033736 0 0 0 000000000012 0 135600000012
AT6 033736 000012 0 0 000000000012 0 135600000012
FT0 033736 000012 0 0 170600040136 0 135600000012
FT1A 033736 000012 0 0 170600040136 0 170600040136
FT9 033736 000012 0 0 170600040136 0 170600040136
ET0 033736 000012 0 0 170600040136 0 170600040136
BYT6 033736 000012 0 0 170600040136 0 170600040136
BYT7 033736 000012 772 0 170600040136 0 170600040136
SCT0 033736 000012 772 0 170600040136 0 170600040136
SCT3 033736 000012 773 0 170600040136 000000000001 170600040136
SCT3 033736 000012 774 0 170600040136 000000000003 170600040136
SCT3 033736 000012 775 0 170600040136 000000000007 170600040136
SCT3 033736 000012 776 0 170600040136 000000000017 170600040136
SCT3 033736 000012 777 0 170600040136 000000000037 170600040136
SCT3 033736 000012 0 0 170600040136 000000000077 170600040136
SCT4 033736 000012 0 0 170600040136 000000000077 170600040136
BYT7A 033736 000012 017 0 170600040136 000000000077 170600040136
IT1 033736 0 017 0 170600040136 000000000077 170600040136
AT3 033736 0 017 0 000000040136 000000000077 170600040136
AT6 033736 040136 017 0 000000040136 000000000077 170600040136
FT0 033736 040136 017 0 230703603700 000000000077 170600040136
FT1A 033736 040136 017 0 230703603700 000000000077 230703603700
FT9 033737 040136 017 0 230703603700 000000000077 230703603700
ET0 033737 040136 761 0 230703603700 000000000077 230703603700
SCT0 033737 040136 761 0 230703603700 000000000077 230703603700
SCT3 033737 040136 762 0 114341701740 000000000077 230703603700
SCT3 033737 040136 763 0 046160740760 000000000077 230703603700
SCT3 033737 040136 764 0 023070360370 000000000077 230703603700
SCT3 033737 040136 765 0 011434170174 000000000077 230703603700
SCT3 033737 040136 766 0 004616074076 000000000077 230703603700
SCT3 033737 040136 767 0 002307036037 000000000077 230703603700
SCT3 033737 040136 0 0 001143417017 000000000077 230703603700
SCT3 033737 040136 771 0 000461607407 000000000077 230703603700
SCT3 033737 040136 772 0 000230703603 000000000077 230703603700
SCT3 033737 040136 773 0 000114341701 000000000077 230703603700
SCT3 033737 040136 774 0 000046160740 000000000077 230703603700
SCT3 033737 040136 775 0 000023070360 000000000077 230703603700
SCT3 033737 040136 776 0 000011434170 000000000077 230703603700
SCT3 033737 040136 777 0 000004616074 000000000077 230703603700
SCT3 033737 040136 0 0 000002307036 000000000077 230703603700
SCT4 033737 040136 0 0 000002307036 000000000077 230703603700
LBT1 033737 040136 0 0 000000000036 000000000077 230703603700
ST0 033737 040136 0 0 000000000036 000000000077 230703603700
ST1 033737 040136 0 0 000000000036 000000000077 230703603700
ST2 033737 040136 0 0 000000000036 000000000077 230703603700
ST9 033737 040136 0 0 000000000036 000000000077 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 164
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0426
*033762 LDB 13,040136
INITIAL
C(AC)=000000 000000
C(E)=170600 000007 C(C(E))=230703 603700
FINAL
C(AC)=000000 000036
C(E)=170600 000007 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 033762 033762 0 0 135540040136 0 230703603700
IT1 033762 0 0 0 135540040136 0 230703603700
AT3 033762 0 0 0 000000040136 0 135540040136
AT6 033762 040136 0 0 000000040136 0 135540040136
FT0 033762 040136 0 0 170600000007 0 135540040136
FT1A 033762 040136 0 0 170600000007 0 170600000007
FT9 033762 040136 0 0 170600000007 0 170600000007
ET0 033762 040136 0 0 170600000007 0 170600000007
BYT6 033762 040136 0 0 170600000007 0 170600000007
BYT7 033762 040136 772 0 170600000007 0 170600000007
SCT0 033762 040136 772 0 170600000007 0 170600000007
SCT3 033762 040136 773 0 170600000007 000000000001 170600000007
SCT3 033762 040136 774 0 170600000007 000000000003 170600000007
SCT3 033762 040136 775 0 170600000007 000000000007 170600000007
SCT3 033762 040136 776 0 170600000007 000000000017 170600000007
SCT3 033762 040136 777 0 170600000007 000000000037 170600000007
SCT3 033762 040136 0 0 170600000007 000000000077 170600000007
SCT4 033762 040136 0 0 170600000007 000000000077 170600000007
BYT7A 033762 040136 017 0 170600000007 000000000077 170600000007
IT1 033762 0 017 0 170600000007 000000000077 170600000007
AT3 033762 0 017 0 000000000007 000000000077 170600000007
AT6 033762 000007 017 0 000000000007 000000000077 170600000007
FT0 033762 000007 017 0 230703603700 000000000077 170600000007
FT1A 033762 000007 017 0 230703603700 000000000077 230703603700
FT9 033763 000007 017 0 230703603700 000000000077 230703603700
ET0 033763 000007 761 0 230703603700 000000000077 230703603700
SCT0 033763 000007 761 0 230703603700 000000000077 230703603700
SCT3 033763 000007 762 0 114341701740 000000000077 230703603700
SCT3 033763 000007 763 0 046160740760 000000000077 230703603700
SCT3 033763 000007 764 0 023070360370 000000000077 230703603700
SCT3 033763 000007 765 0 011434170174 000000000077 230703603700
SCT3 033763 000007 766 0 004616074076 000000000077 230703603700
SCT3 033763 000007 767 0 002307036037 000000000077 230703603700
SCT3 033763 000007 0 0 001143417017 000000000077 230703603700
SCT3 033763 000007 771 0 000461607407 000000000077 230703603700
SCT3 033763 000007 772 0 000230703603 000000000077 230703603700
SCT3 033763 000007 773 0 000114341701 000000000077 230703603700
SCT3 033763 000007 774 0 000046160740 000000000077 230703603700
SCT3 033763 000007 775 0 000023070360 000000000077 230703603700
SCT3 033763 000007 776 0 000011434170 000000000077 230703603700
SCT3 033763 000007 777 0 000004616074 000000000077 230703603700
SCT3 033763 000007 0 0 000002307036 000000000077 230703603700
SCT4 033763 000007 0 0 000002307036 000000000077 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 165
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0427
LBT1 033763 000007 0 0 000000000036 000000000077 230703603700
ST0 033763 000007 0 0 000000000036 000000000077 230703603700
ST1 033763 000007 0 0 000000000036 000000000077 230703603700
ST2 033763 000007 0 0 000000000036 000000000077 230703603700
ST9 033763 000007 0 0 000000000036 000000000077 230703603700
*034007 LDB 12,040136
INITIAL
C(AC)=000000 000000
C(E)=170600 040141 C(C(E))=230703 603700
FINAL
C(AC)=000000 000036
C(E)=170600 040141 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 034007 034007 0 0 135500040136 0 230703603700
IT1 034007 0 0 0 135500040136 0 230703603700
AT3 034007 0 0 0 000000040136 0 135500040136
AT6 034007 040136 0 0 000000040136 0 135500040136
FT0 034007 040136 0 0 170600040141 0 135500040136
FT1A 034007 040136 0 0 170600040141 0 170600040141
FT9 034007 040136 0 0 170600040141 0 170600040141
ET0 034007 040136 0 0 170600040141 0 170600040141
BYT6 034007 040136 0 0 170600040141 0 170600040141
BYT7 034007 040136 772 0 170600040141 0 170600040141
SCT0 034007 040136 772 0 170600040141 0 170600040141
SCT3 034007 040136 773 0 170600040141 000000000001 170600040141
SCT3 034007 040136 774 0 170600040141 000000000003 170600040141
SCT3 034007 040136 775 0 170600040141 000000000007 170600040141
SCT3 034007 040136 776 0 170600040141 000000000017 170600040141
SCT3 034007 040136 777 0 170600040141 000000000037 170600040141
SCT3 034007 040136 0 0 170600040141 000000000077 170600040141
SCT4 034007 040136 0 0 170600040141 000000000077 170600040141
BYT7A 034007 040136 017 0 170600040141 000000000077 170600040141
IT1 034007 0 017 0 170600040141 000000000077 170600040141
AT3 034007 0 017 0 000000040141 000000000077 170600040141
AT6 034007 040141 017 0 000000040141 000000000077 170600040141
FT0 034007 040141 017 0 230703603700 000000000077 170600040141
FT1A 034007 040141 017 0 230703603700 000000000077 230703603700
FT9 034010 040141 017 0 230703603700 000000000077 230703603700
ET0 034010 040141 761 0 230703603700 000000000077 230703603700
SCT0 034010 040141 761 0 230703603700 000000000077 230703603700
SCT3 034010 040141 762 0 114341701740 000000000077 230703603700
SCT3 034010 040141 763 0 046160740760 000000000077 230703603700
SCT3 034010 040141 764 0 023070360370 000000000077 230703603700
SCT3 034010 040141 765 0 011434170174 000000000077 230703603700
SCT3 034010 040141 766 0 004616074076 000000000077 230703603700
SCT3 034010 040141 767 0 002307036037 000000000077 230703603700
SCT3 034010 040141 0 0 001143417017 000000000077 230703603700
SCT3 034010 040141 771 0 000461607407 000000000077 230703603700
SCT3 034010 040141 772 0 000230703603 000000000077 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 166
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0428
SCT3 034010 040141 773 0 000114341701 000000000077 230703603700
SCT3 034010 040141 774 0 000046160740 000000000077 230703603700
SCT3 034010 040141 775 0 000023070360 000000000077 230703603700
SCT3 034010 040141 776 0 000011434170 000000000077 230703603700
SCT3 034010 040141 777 0 000004616074 000000000077 230703603700
SCT3 034010 040141 0 0 000002307036 000000000077 230703603700
SCT4 034010 040141 0 0 000002307036 000000000077 230703603700
LBT1 034010 040141 0 0 000000000036 000000000077 230703603700
ST0 034010 040141 0 0 000000000036 000000000077 230703603700
ST1 034010 040141 0 0 000000000036 000000000077 230703603700
ST2 034010 040141 0 0 000000000036 000000000077 230703603700
ST9 034010 040141 0 0 000000000036 000000000077 230703603700
*034035 ILDB 11,000007
INITIAL
C(AC)=000000 000000
C(E)=170600 000005 C(C(E))=230703 603700
FINAL
C(AC)=000000 000003
C(E)=110600 000005 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 034035 034035 0 0 134440000007 0 230703603700
IT1 034035 0 0 0 134440000007 0 230703603700
AT3 034035 0 0 0 000000000007 0 134440000007
AT6 034035 000007 0 0 000000000007 0 134440000007
FT0 034035 000007 0 0 170600000005 0 134440000007
FT1A 034035 000007 0 0 170600000005 0 170600000005
FT9 034035 000007 0 0 170600000005 0 170600000005
ET0 034035 000007 0 0 170600000005 0 170600000005
BYT1 034035 000007 017 0 170600000005 0 170600000005
BYT4 034035 000007 0 0 110600000005 0 170600000005
BYT7 034035 000007 772 0 110600000005 0 170600000005
SCT0 034035 000007 772 0 110600000005 0 170600000005
SCT3 034035 000007 773 0 110600000005 000000000001 170600000005
SCT3 034035 000007 774 0 110600000005 000000000003 170600000005
SCT3 034035 000007 775 0 110600000005 000000000007 170600000005
SCT3 034035 000007 776 0 110600000005 000000000017 170600000005
SCT3 034035 000007 777 0 110600000005 000000000037 170600000005
SCT3 034035 000007 0 0 110600000005 000000000077 170600000005
SCT4 034035 000007 0 0 110600000005 000000000077 170600000005
BYT7A 034035 000007 011 0 110600000005 000000000077 170600000005
IT1 034035 0 011 0 110600000005 000000000077 170600000005
AT3 034035 0 011 0 000000000005 000000000077 110600000005
AT6 034035 000005 011 0 000000000005 000000000077 110600000005
FT0 034035 000005 011 0 230703603700 000000000077 110600000005
FT1A 034035 000005 011 0 230703603700 000000000077 230703603700
FT9 034036 000005 011 0 230703603700 000000000077 230703603700
ET0 034036 000005 767 0 230703603700 000000000077 230703603700
SCT0 034036 000005 767 0 230703603700 000000000077 230703603700
SCT3 034036 000005 0 0 114341701740 000000000077 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 167
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0429
SCT3 034036 000005 771 0 046160740760 000000000077 230703603700
SCT3 034036 000005 772 0 023070360370 000000000077 230703603700
SCT3 034036 000005 773 0 011434170174 000000000077 230703603700
SCT3 034036 000005 774 0 004616074076 000000000077 230703603700
SCT3 034036 000005 775 0 002307036037 000000000077 230703603700
SCT3 034036 000005 776 0 001143417017 000000000077 230703603700
SCT3 034036 000005 777 0 000461607407 000000000077 230703603700
SCT3 034036 000005 0 0 000230703603 000000000077 230703603700
SCT4 034036 000005 0 0 000230703603 000000000077 230703603700
LBT1 034036 000005 0 0 000000000003 000000000077 230703603700
ST0 034036 000005 0 0 000000000003 000000000077 230703603700
ST1 034036 000005 0 0 000000000003 000000000077 230703603700
ST2 034036 000005 0 0 000000000003 000000000077 230703603700
ST9 034036 000005 0 0 000000000003 000000000077 230703603700
*034061 ILDB 10,000006
INITIAL
C(AC)=000000 000000
C(E)=170600 040136 C(C(E))=230703 603700
FINAL
C(AC)=000000 000003
C(E)=110600 040136 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 034061 034061 0 0 134400000006 0 230703603700
IT1 034061 0 0 0 134400000006 0 230703603700
AT3 034061 0 0 0 000000000006 0 134400000006
AT6 034061 000006 0 0 000000000006 0 134400000006
FT0 034061 000006 0 0 170600040136 0 134400000006
FT1A 034061 000006 0 0 170600040136 0 170600040136
FT9 034061 000006 0 0 170600040136 0 170600040136
ET0 034061 000006 0 0 170600040136 0 170600040136
BYT1 034061 000006 017 0 170600040136 0 170600040136
BYT4 034061 000006 0 0 110600040136 0 170600040136
BYT7 034061 000006 772 0 110600040136 0 170600040136
SCT0 034061 000006 772 0 110600040136 0 170600040136
SCT3 034061 000006 773 0 110600040136 000000000001 170600040136
SCT3 034061 000006 774 0 110600040136 000000000003 170600040136
SCT3 034061 000006 775 0 110600040136 000000000007 170600040136
SCT3 034061 000006 776 0 110600040136 000000000017 170600040136
SCT3 034061 000006 777 0 110600040136 000000000037 170600040136
SCT3 034061 000006 0 0 110600040136 000000000077 170600040136
SCT4 034061 000006 0 0 110600040136 000000000077 170600040136
BYT7A 034061 000006 011 0 110600040136 000000000077 170600040136
IT1 034061 0 011 0 110600040136 000000000077 170600040136
AT3 034061 0 011 0 000000040136 000000000077 110600040136
AT6 034061 040136 011 0 000000040136 000000000077 110600040136
FT0 034061 040136 011 0 230703603700 000000000077 110600040136
FT1A 034061 040136 011 0 230703603700 000000000077 230703603700
FT9 034062 040136 011 0 230703603700 000000000077 230703603700
ET0 034062 040136 767 0 230703603700 000000000077 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 168
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0430
SCT0 034062 040136 767 0 230703603700 000000000077 230703603700
SCT3 034062 040136 0 0 114341701740 000000000077 230703603700
SCT3 034062 040136 771 0 046160740760 000000000077 230703603700
SCT3 034062 040136 772 0 023070360370 000000000077 230703603700
SCT3 034062 040136 773 0 011434170174 000000000077 230703603700
SCT3 034062 040136 774 0 004616074076 000000000077 230703603700
SCT3 034062 040136 775 0 002307036037 000000000077 230703603700
SCT3 034062 040136 776 0 001143417017 000000000077 230703603700
SCT3 034062 040136 777 0 000461607407 000000000077 230703603700
SCT3 034062 040136 0 0 000230703603 000000000077 230703603700
SCT4 034062 040136 0 0 000230703603 000000000077 230703603700
LBT1 034062 040136 0 0 000000000003 000000000077 230703603700
ST0 034062 040136 0 0 000000000003 000000000077 230703603700
ST1 034062 040136 0 0 000000000003 000000000077 230703603700
ST2 034062 040136 0 0 000000000003 000000000077 230703603700
ST9 034062 040136 0 0 000000000003 000000000077 230703603700
*034106 ILDB 7,040136
INITIAL
C(AC)=230703 603700
C(E)=170600 000003 C(C(E))=230703 603700
FINAL
C(AC)=000000 000003
C(E)=110600 000003 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 034106 034106 0 0 134340040136 0 230703603700
IT1 034106 0 0 0 134340040136 0 230703603700
AT3 034106 0 0 0 000000040136 0 134340040136
AT6 034106 040136 0 0 000000040136 0 134340040136
FT0 034106 040136 0 0 170600000003 0 134340040136
FT1A 034106 040136 0 0 170600000003 0 170600000003
FT9 034106 040136 0 0 170600000003 0 170600000003
ET0 034106 040136 0 0 170600000003 0 170600000003
BYT1 034106 040136 017 0 170600000003 0 170600000003
BYT4 034106 040136 0 0 110600000003 0 170600000003
BYT7 034106 040136 772 0 110600000003 0 170600000003
SCT0 034106 040136 772 0 110600000003 0 170600000003
SCT3 034106 040136 773 0 110600000003 000000000001 170600000003
SCT3 034106 040136 774 0 110600000003 000000000003 170600000003
SCT3 034106 040136 775 0 110600000003 000000000007 170600000003
SCT3 034106 040136 776 0 110600000003 000000000017 170600000003
SCT3 034106 040136 777 0 110600000003 000000000037 170600000003
SCT3 034106 040136 0 0 110600000003 000000000077 170600000003
SCT4 034106 040136 0 0 110600000003 000000000077 170600000003
BYT7A 034106 040136 011 0 110600000003 000000000077 170600000003
IT1 034106 0 011 0 110600000003 000000000077 170600000003
AT3 034106 0 011 0 000000000003 000000000077 110600000003
AT6 034106 000003 011 0 000000000003 000000000077 110600000003
FT0 034106 000003 011 0 230703603700 000000000077 110600000003
FT1A 034106 000003 011 0 230703603700 000000000077 230703603700
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 169
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0431
FT9 034107 000003 011 0 230703603700 000000000077 230703603700
ET0 034107 000003 767 0 230703603700 000000000077 230703603700
SCT0 034107 000003 767 0 230703603700 000000000077 230703603700
SCT3 034107 000003 0 0 114341701740 000000000077 230703603700
SCT3 034107 000003 771 0 046160740760 000000000077 230703603700
SCT3 034107 000003 772 0 023070360370 000000000077 230703603700
SCT3 034107 000003 773 0 011434170174 000000000077 230703603700
SCT3 034107 000003 774 0 004616074076 000000000077 230703603700
SCT3 034107 000003 775 0 002307036037 000000000077 230703603700
SCT3 034107 000003 776 0 001143417017 000000000077 230703603700
SCT3 034107 000003 777 0 000461607407 000000000077 230703603700
SCT3 034107 000003 0 0 000230703603 000000000077 230703603700
SCT4 034107 000003 0 0 000230703603 000000000077 230703603700
LBT1 034107 000003 0 0 000000000003 000000000077 230703603700
ST0 034107 000003 0 0 000000000003 000000000077 230703603700
ST1 034107 000003 0 0 000000000003 000000000077 230703603700
ST2 034107 000003 0 0 000000000003 000000000077 230703603700
ST9 034107 000003 0 0 000000000003 000000000077 230703603700
*034134 ILDB 6,040136
INITIAL
C(AC)=000000 000000
C(E)=170600 040141 C(C(E))=230703 603700
FINAL
C(AC)=000000 000003
C(E)=110600 040141 C(C(E))=230703 603700
TIME PC MA SC FE AR MQ BR
IT0 034134 034134 0 0 134300040136 0 230703603700
IT1 034134 0 0 0 134300040136 0 230703603700
AT3 034134 0 0 0 000000040136 0 134300040136
AT6 034134 040136 0 0 000000040136 0 134300040136
FT0 034134 040136 0 0 170600040141 0 134300040136
FT1A 034134 040136 0 0 170600040141 0 170600040141
FT9 034134 040136 0 0 170600040141 0 170600040141
ET0 034134 040136 0 0 170600040141 0 170600040141
BYT1 034134 040136 017 0 170600040141 0 170600040141
BYT4 034134 040136 0 0 110600040141 0 170600040141
BYT7 034134 040136 772 0 110600040141 0 170600040141
SCT0 034134 040136 772 0 110600040141 0 170600040141
SCT3 034134 040136 773 0 110600040141 000000000001 170600040141
SCT3 034134 040136 774 0 110600040141 000000000003 170600040141
SCT3 034134 040136 775 0 110600040141 000000000007 170600040141
SCT3 034134 040136 776 0 110600040141 000000000017 170600040141
SCT3 034134 040136 777 0 110600040141 000000000037 170600040141
SCT3 034134 040136 0 0 110600040141 000000000077 170600040141
SCT4 034134 040136 0 0 110600040141 000000000077 170600040141
BYT7A 034134 040136 011 0 110600040141 000000000077 170600040141
IT1 034134 0 011 0 110600040141 000000000077 170600040141
AT3 034134 0 011 0 000000040141 000000000077 110600040141
AT6 034134 040141 011 0 000000040141 000000000077 110600040141
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 170
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0432
FT0 034134 040141 011 0 230703603700 000000000077 110600040141
FT1A 034134 040141 011 0 230703603700 000000000077 230703603700
FT9 034135 040141 011 0 230703603700 000000000077 230703603700
ET0 034135 040141 767 0 230703603700 000000000077 230703603700
SCT0 034135 040141 767 0 230703603700 000000000077 230703603700
SCT3 034135 040141 0 0 114341701740 000000000077 230703603700
SCT3 034135 040141 771 0 046160740760 000000000077 230703603700
SCT3 034135 040141 772 0 023070360370 000000000077 230703603700
SCT3 034135 040141 773 0 011434170174 000000000077 230703603700
SCT3 034135 040141 774 0 004616074076 000000000077 230703603700
SCT3 034135 040141 775 0 002307036037 000000000077 230703603700
SCT3 034135 040141 776 0 001143417017 000000000077 230703603700
SCT3 034135 040141 777 0 000461607407 000000000077 230703603700
SCT3 034135 040141 0 0 000230703603 000000000077 230703603700
SCT4 034135 040141 0 0 000230703603 000000000077 230703603700
LBT1 034135 040141 0 0 000000000003 000000000077 230703603700
ST0 034135 040141 0 0 000000000003 000000000077 230703603700
ST1 034135 040141 0 0 000000000003 000000000077 230703603700
ST2 034135 040141 0 0 000000000003 000000000077 230703603700
ST9 034135 040141 0 0 000000000003 000000000077 230703603700
*034156 LDB 5,000001
INITIAL
C(AC)=777777 777777
C(E)=000000 000010 C(C(E))=000000 000010
FINAL
C(AC)=000000 000000
C(E)=000000 000010 C(C(E))=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 034156 034156 0 0 135240000001 0 000000000010
IT1 034156 0 0 0 135240000001 0 000000000010
AT3 034156 0 0 0 000000000001 0 135240000001
AT6 034156 000001 0 0 000000000001 0 135240000001
FT0 034156 000001 0 0 000000000010 0 135240000001
FT1A 034156 000001 0 0 000000000010 0 000000000010
FT9 034156 000001 0 0 000000000010 0 000000000010
ET0 034156 000001 0 0 000000000010 0 000000000010
BYT6 034156 000001 0 0 000000000010 0 000000000010
BYT7 034156 000001 0 0 000000000010 0 000000000010
SCT0 034156 000001 0 0 000000000010 0 000000000010
SCT4 034156 000001 0 0 000000000010 0 000000000010
BYT7A 034156 000001 0 0 000000000010 0 000000000010
IT1 034156 0 0 0 000000000010 0 000000000010
AT3 034156 0 0 0 000000000010 0 000000000010
AT6 034156 000010 0 0 000000000010 0 000000000010
FT0 034156 000010 0 0 000000000010 0 000000000010
FT1A 034156 000010 0 0 000000000010 0 000000000010
FT9 034157 000010 0 0 000000000010 0 000000000010
ET0 034157 000010 0 0 000000000010 0 000000000010
SCT0 034157 000010 0 0 000000000010 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 171
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0433
SCT4 034157 000010 0 0 000000000010 0 000000000010
LBT1 034157 000010 0 0 0 0 000000000010
ST0 034157 000010 0 0 0 0 000000000010
ST1 034157 000010 0 0 0 0 000000000010
ST2 034157 000010 0 0 0 0 000000000010
ST9 034157 000010 0 0 0 0 000000000010
*034176 ILDB 14,000010
INITIAL
C(AC)=777777 777777
C(E)=000000 000010 C(C(E))=000000 000010
FINAL
C(AC)=000000 000000
C(E)=000000 000010 C(C(E))=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 034176 034176 0 0 134600000010 0 000000000010
IT1 034176 0 0 0 134600000010 0 000000000010
AT3 034176 0 0 0 000000000010 0 134600000010
AT6 034176 000010 0 0 000000000010 0 134600000010
FT0 034176 000010 0 0 000000000010 0 134600000010
FT1A 034176 000010 0 0 000000000010 0 000000000010
FT9 034176 000010 0 0 000000000010 0 000000000010
ET0 034176 000010 0 0 000000000010 0 000000000010
BYT1 034176 000010 0 0 000000000010 0 000000000010
BYT4 034176 000010 0 0 000000000010 0 000000000010
BYT7 034176 000010 0 0 000000000010 0 000000000010
SCT0 034176 000010 0 0 000000000010 0 000000000010
SCT4 034176 000010 0 0 000000000010 0 000000000010
BYT7A 034176 000010 0 0 000000000010 0 000000000010
IT1 034176 0 0 0 000000000010 0 000000000010
AT3 034176 0 0 0 000000000010 0 000000000010
AT6 034176 000010 0 0 000000000010 0 000000000010
FT0 034176 000010 0 0 000000000010 0 000000000010
FT1A 034176 000010 0 0 000000000010 0 000000000010
FT9 034177 000010 0 0 000000000010 0 000000000010
ET0 034177 000010 0 0 000000000010 0 000000000010
SCT0 034177 000010 0 0 000000000010 0 000000000010
SCT4 034177 000010 0 0 000000000010 0 000000000010
LBT1 034177 000010 0 0 0 0 000000000010
ST0 034177 000010 0 0 0 0 000000000010
ST1 034177 000010 0 0 0 0 000000000010
ST2 034177 000010 0 0 0 0 000000000010
ST9 034177 000010 0 0 0 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 172
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0434
*034216 DPB 13,000007
INITIAL
C(AC)=777777 777777
C(E)=000000 000010 C(C(E))=000000 000010
FINAL
C(AC)=777777 777777
C(E)=000000 000010 C(C(E))=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 034216 034216 0 0 137540000007 0 0
IT1 034216 0 0 0 137540000007 0 0
AT3 034216 0 0 0 000000000007 0 137540000007
AT6 034216 000007 0 0 000000000007 0 137540000007
FT0 034216 000007 0 0 000000000010 0 137540000007
FT1A 034216 000007 0 0 000000000010 0 000000000010
FT9 034216 000007 0 0 000000000010 0 000000000010
ET0 034216 000007 0 0 000000000010 0 000000000010
BYT6 034216 000007 0 0 000000000010 0 000000000010
BYT7 034216 000007 0 0 000000000010 0 000000000010
SCT0 034216 000007 0 0 000000000010 0 000000000010
SCT4 034216 000007 0 0 000000000010 0 000000000010
BYT7A 034216 000007 0 0 000000000010 0 000000000010
IT1 034216 0 0 0 000000000010 0 000000000010
AT3 034216 0 0 0 000000000010 0 000000000010
AT6 034216 000010 0 0 000000000010 0 000000000010
FT0 034216 000010 0 0 000000000010 0 000000000010
FT1A 034216 000010 0 0 000000000010 0 000000000010
FT2 034216 000010 0 0 0 0 000000000010
FT2RQ 034216 000010 0 0 777777777777 0 000000000010
FT3 034216 000010 0 0 777777777777 0 000000000010
FT9 034217 000010 0 0 777777777777 0 000000000010
ET0 034217 000010 0 0 777777777777 0 000000000010
SCT0 034217 000010 0 0 777777777777 0 000000000010
SCT4 034217 000010 0 0 777777777777 0 000000000010
DBT1 034217 000010 0 0 777777777777 0 000000000010
DBT2 034217 000010 0 0 0 000000000010 777777777777
DBT3 034217 000010 0 0 777777777777 000000000010 0
DBT4 034217 000010 0 0 000000000010 000000000010 0
DBT5 034217 000010 0 0 000000000010 000000000010 0
ST0 034217 000010 0 0 000000000010 000000000010 0
ST6 034217 000010 0 0 000000000010 000000000010 0
ST6A 034217 000010 0 0 000000000010 000000000010 0
ST9 034217 000010 0 0 000000000010 000000000010 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 173
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0435
*034236 IDPB 12,000006
INITIAL
C(AC)=777777 777777
C(E)=000000 000010 C(C(E))=000000 000006
FINAL
C(AC)=777777 777777
C(E)=000000 000010 C(C(E))=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 034236 034236 0 0 136500000006 0 0
IT1 034236 0 0 0 136500000006 0 0
AT3 034236 0 0 0 000000000006 0 136500000006
AT6 034236 000006 0 0 000000000006 0 136500000006
FT0 034236 000006 0 0 000000000010 0 136500000006
FT1A 034236 000006 0 0 000000000010 0 000000000010
FT9 034236 000006 0 0 000000000010 0 000000000010
ET0 034236 000006 0 0 000000000010 0 000000000010
BYT1 034236 000006 0 0 000000000010 0 000000000010
BYT4 034236 000006 0 0 000000000010 0 000000000010
BYT7 034236 000006 0 0 000000000010 0 000000000010
SCT0 034236 000006 0 0 000000000010 0 000000000010
SCT4 034236 000006 0 0 000000000010 0 000000000010
BYT7A 034236 000006 0 0 000000000010 0 000000000010
IT1 034236 0 0 0 000000000010 0 000000000010
AT3 034236 0 0 0 000000000010 0 000000000010
AT6 034236 000010 0 0 000000000010 0 000000000010
FT0 034236 000010 0 0 000000000006 0 000000000010
FT1A 034236 000010 0 0 000000000006 0 000000000006
FT2 034236 000010 0 0 0 0 000000000006
FT2RQ 034236 000010 0 0 777777777777 0 000000000006
FT3 034236 000010 0 0 777777777777 0 000000000006
FT9 034237 000010 0 0 777777777777 0 000000000006
ET0 034237 000010 0 0 777777777777 0 000000000006
SCT0 034237 000010 0 0 777777777777 0 000000000006
SCT4 034237 000010 0 0 777777777777 0 000000000006
DBT1 034237 000010 0 0 777777777777 0 000000000006
DBT2 034237 000010 0 0 0 000000000006 777777777777
DBT3 034237 000010 0 0 777777777777 000000000006 0
DBT4 034237 000010 0 0 000000000006 000000000006 0
DBT5 034237 000010 0 0 000000000006 000000000006 0
ST0 034237 000010 0 0 000000000006 000000000006 0
ST6 034237 000010 0 0 000000000006 000000000006 0
ST6A 034237 000010 0 0 000000000006 000000000006 0
ST9 034237 000010 0 0 000000000006 000000000006 0
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 174
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0436
*034257 IBP 11,000005
INITIAL
C(AC)=777777 777777
C(E)=000000 000010
FINAL
C(E)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 034257 034257 0 0 133440000005 0 000000000010
IT1 034257 0 0 0 133440000005 0 000000000010
AT3 034257 0 0 0 000000000005 0 133440000005
AT6 034257 000005 0 0 000000000005 0 133440000005
FT0 034257 000005 0 0 000000000010 0 133440000005
FT1A 034257 000005 0 0 000000000010 0 000000000010
FT9 034260 000005 0 0 000000000010 0 000000000010
ET0 034260 000005 0 0 000000000010 0 000000000010
BYT1 034260 000005 0 0 000000000010 0 000000000010
BYT4 034260 000005 0 0 000000000010 0 000000000010
ST9 034260 000005 0 0 000000000010 0 000000000010
*034304 LDB 10,000006
INITIAL
C(AC)=777777 000000
C(E)=430100 000004 C(C(E))=777777 000000
FINAL
C(AC)=000000 000001
C(E)=430100 000004 C(C(E))=777777 000000
TIME PC MA SC FE AR MQ BR
IT0 034304 034304 0 0 135400000006 0 777777000000
IT1 034304 0 0 0 135400000006 0 777777000000
AT3 034304 0 0 0 000000000006 0 135400000006
AT6 034304 000006 0 0 000000000006 0 135400000006
FT0 034304 000006 0 0 430100000004 0 135400000006
FT1A 034304 000006 0 0 430100000004 0 430100000004
FT9 034304 000006 0 0 430100000004 0 430100000004
ET0 034304 000006 0 0 430100000004 0 430100000004
BYT6 034304 000006 0 0 430100000004 0 430100000004
BYT7 034304 000006 777 0 430100000004 0 430100000004
SCT0 034304 000006 777 0 430100000004 0 430100000004
SCT3 034304 000006 0 0 430100000004 000000000001 430100000004
SCT4 034304 000006 0 0 430100000004 000000000001 430100000004
BYT7A 034304 000006 043 0 430100000004 000000000001 430100000004
IT1 034304 0 043 0 430100000004 000000000001 430100000004
AT3 034304 0 043 0 000000000004 000000000001 430100000004
AT6 034304 000004 043 0 000000000004 000000000001 430100000004
FT0 034304 000004 043 0 777777000000 000000000001 430100000004
FT1A 034304 000004 043 0 777777000000 000000000001 777777000000
FT9 034305 000004 043 0 777777000000 000000000001 777777000000
ET0 034305 000004 735 0 777777000000 000000000001 777777000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 175
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0437
SCT0 034305 000004 735 0 777777000000 000000000001 777777000000
SCT3 034305 000004 736 0 377777400000 000000000001 777777000000
SCT3 034305 000004 737 0 177777600000 000000000001 777777000000
SCT3 034305 000004 0 0 077777700000 000000000001 777777000000
SCT3 034305 000004 741 0 037777740000 000000000001 777777000000
SCT3 034305 000004 742 0 017777760000 000000000001 777777000000
SCT3 034305 000004 743 0 007777770000 000000000001 777777000000
SCT3 034305 000004 744 0 003777774000 000000000001 777777000000
SCT3 034305 000004 745 0 001777776000 000000000001 777777000000
SCT3 034305 000004 746 0 000777777000 000000000001 777777000000
SCT3 034305 000004 747 0 000377777400 000000000001 777777000000
SCT3 034305 000004 0 0 000177777600 000000000001 777777000000
SCT3 034305 000004 751 0 000077777700 000000000001 777777000000
SCT3 034305 000004 752 0 000037777740 000000000001 777777000000
SCT3 034305 000004 753 0 000017777760 000000000001 777777000000
SCT3 034305 000004 754 0 000007777770 000000000001 777777000000
SCT3 034305 000004 755 0 000003777774 000000000001 777777000000
SCT3 034305 000004 756 0 000001777776 000000000001 777777000000
SCT3 034305 000004 757 0 000000777777 000000000001 777777000000
SCT3 034305 000004 0 0 000000377777 000000000001 777777000000
SCT3 034305 000004 761 0 000000177777 000000000001 777777000000
SCT3 034305 000004 762 0 000000077777 000000000001 777777000000
SCT3 034305 000004 763 0 000000037777 000000000001 777777000000
SCT3 034305 000004 764 0 000000017777 000000000001 777777000000
SCT3 034305 000004 765 0 000000007777 000000000001 777777000000
SCT3 034305 000004 766 0 000000003777 000000000001 777777000000
SCT3 034305 000004 767 0 000000001777 000000000001 777777000000
SCT3 034305 000004 0 0 000000000777 000000000001 777777000000
SCT3 034305 000004 771 0 000000000377 000000000001 777777000000
SCT3 034305 000004 772 0 000000000177 000000000001 777777000000
SCT3 034305 000004 773 0 000000000077 000000000001 777777000000
SCT3 034305 000004 774 0 000000000037 000000000001 777777000000
SCT3 034305 000004 775 0 000000000017 000000000001 777777000000
SCT3 034305 000004 776 0 000000000007 000000000001 777777000000
SCT3 034305 000004 777 0 000000000003 000000000001 777777000000
SCT3 034305 000004 0 0 000000000001 000000000001 777777000000
SCT4 034305 000004 0 0 000000000001 000000000001 777777000000
LBT1 034305 000004 0 0 000000000001 000000000001 777777000000
ST0 034305 000004 0 0 000000000001 000000000001 777777000000
ST1 034305 000004 0 0 000000000001 000000000001 777777000000
ST2 034305 000004 0 0 000000000001 000000000001 777777000000
ST9 034305 000004 0 0 000000000001 000000000001 777777000000
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 176
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0438
*034327 LDB 7,000005
INITIAL
C(AC)=777777 000000
C(E)=000100 000003 C(C(E))=000000 777777
FINAL
C(AC)=000000 000001
C(E)=000100 000003 C(C(E))=000000 777777
TIME PC MA SC FE AR MQ BR
IT0 034327 034327 0 0 135340000005 0 000000777777
IT1 034327 0 0 0 135340000005 0 000000777777
AT3 034327 0 0 0 000000000005 0 135340000005
AT6 034327 000005 0 0 000000000005 0 135340000005
FT0 034327 000005 0 0 000100000003 0 135340000005
FT1A 034327 000005 0 0 000100000003 0 000100000003
FT9 034327 000005 0 0 000100000003 0 000100000003
ET0 034327 000005 0 0 000100000003 0 000100000003
BYT6 034327 000005 0 0 000100000003 0 000100000003
BYT7 034327 000005 777 0 000100000003 0 000100000003
SCT0 034327 000005 777 0 000100000003 0 000100000003
SCT3 034327 000005 0 0 000100000003 000000000001 000100000003
SCT4 034327 000005 0 0 000100000003 000000000001 000100000003
BYT7A 034327 000005 0 0 000100000003 000000000001 000100000003
IT1 034327 0 0 0 000100000003 000000000001 000100000003
AT3 034327 0 0 0 000000000003 000000000001 000100000003
AT6 034327 000003 0 0 000000000003 000000000001 000100000003
FT0 034327 000003 0 0 000000777777 000000000001 000100000003
FT1A 034327 000003 0 0 000000777777 000000000001 000000777777
FT9 034330 000003 0 0 000000777777 000000000001 000000777777
ET0 034330 000003 0 0 000000777777 000000000001 000000777777
SCT0 034330 000003 0 0 000000777777 000000000001 000000777777
SCT4 034330 000003 0 0 000000777777 000000000001 000000777777
LBT1 034330 000003 0 0 000000000001 000000000001 000000777777
ST0 034330 000003 0 0 000000000001 000000000001 000000777777
ST1 034330 000003 0 0 000000000001 000000000001 000000777777
ST2 034330 000003 0 0 000000000001 000000000001 000000777777
ST9 034330 000003 0 0 000000000001 000000000001 000000777777
*034353 DPB 6,000004
INITIAL
C(AC)=777777 000076
C(E)=430100 000002 C(C(E))=777777 777777
FINAL
C(AC)=777777 000076
C(E)=430100 000002 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034353 034353 0 0 137300000004 0 0
IT1 034353 0 0 0 137300000004 0 0
AT3 034353 0 0 0 000000000004 0 137300000004
AT6 034353 000004 0 0 000000000004 0 137300000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 177
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0439
FT0 034353 000004 0 0 430100000002 0 137300000004
FT1A 034353 000004 0 0 430100000002 0 430100000002
FT9 034353 000004 0 0 430100000002 0 430100000002
ET0 034353 000004 0 0 430100000002 0 430100000002
BYT6 034353 000004 0 0 430100000002 0 430100000002
BYT7 034353 000004 777 0 430100000002 0 430100000002
SCT0 034353 000004 777 0 430100000002 0 430100000002
SCT3 034353 000004 0 0 430100000002 000000000001 430100000002
SCT4 034353 000004 0 0 430100000002 000000000001 430100000002
BYT7A 034353 000004 043 0 430100000002 000000000001 430100000002
IT1 034353 0 043 0 430100000002 000000000001 430100000002
AT3 034353 0 043 0 000000000002 000000000001 430100000002
AT6 034353 000002 043 0 000000000002 000000000001 430100000002
FT0 034353 000002 043 0 777777777777 000000000001 430100000002
FT1A 034353 000002 043 0 777777777777 000000000001 777777777777
FT2 034353 000002 043 0 0 000000000001 777777777777
FT2RQ 034353 000002 043 0 777777000076 000000000001 777777777777
FT3 034353 000002 043 0 777777000076 000000000001 777777777777
FT9 034354 000002 043 0 777777000076 000000000001 777777777777
ET0 034354 000002 735 0 777777000076 000000000001 777777777777
SCT0 034354 000002 735 0 777777000076 000000000001 777777777777
SCT3 034354 000002 736 0 777776000174 000000000002 777777777777
SCT3 034354 000002 737 0 777774000370 000000000004 777777777777
SCT3 034354 000002 0 0 777770000760 000000000010 777777777777
SCT3 034354 000002 741 0 777760001740 000000000020 777777777777
SCT3 034354 000002 742 0 777740003700 000000000040 777777777777
SCT3 034354 000002 743 0 777700007600 000000000100 777777777777
SCT3 034354 000002 744 0 777600017400 000000000200 777777777777
SCT3 034354 000002 745 0 777400037000 000000000400 777777777777
SCT3 034354 000002 746 0 777000076000 000000001000 777777777777
SCT3 034354 000002 747 0 776000174000 000000002000 777777777777
SCT3 034354 000002 0 0 774000370000 000000004000 777777777777
SCT3 034354 000002 751 0 770000760000 000000010000 777777777777
SCT3 034354 000002 752 0 760001740000 000000020000 777777777777
SCT3 034354 000002 753 0 740003700000 000000040000 777777777777
SCT3 034354 000002 754 0 700007600000 000000100000 777777777777
SCT3 034354 000002 755 0 600017400000 000000200000 777777777777
SCT3 034354 000002 756 0 400037000000 000000400000 777777777777
SCT3 034354 000002 757 0 000076000000 000001000000 777777777777
SCT3 034354 000002 0 0 000174000000 000002000000 777777777777
SCT3 034354 000002 761 0 000370000000 000004000000 777777777777
SCT3 034354 000002 762 0 000760000000 000010000000 777777777777
SCT3 034354 000002 763 0 001740000000 000020000000 777777777777
SCT3 034354 000002 764 0 003700000000 000040000000 777777777777
SCT3 034354 000002 765 0 007600000000 000100000000 777777777777
SCT3 034354 000002 766 0 017400000000 000200000000 777777777777
SCT3 034354 000002 767 0 037000000000 000400000000 777777777777
SCT3 034354 000002 0 0 076000000000 001000000000 777777777777
SCT3 034354 000002 771 0 174000000000 002000000000 777777777777
SCT3 034354 000002 772 0 370000000000 004000000000 777777777777
SCT3 034354 000002 773 0 760000000000 010000000000 777777777777
SCT3 034354 000002 774 0 740000000000 020000000000 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 178
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0440
SCT3 034354 000002 775 0 700000000000 040000000000 777777777777
SCT3 034354 000002 776 0 600000000000 100000000000 777777777777
SCT3 034354 000002 777 0 400000000000 200000000000 777777777777
SCT3 034354 000002 0 0 0 400000000000 777777777777
SCT4 034354 000002 0 0 0 400000000000 777777777777
DBT1 034354 000002 0 0 0 400000000000 777777777777
DBT2 034354 000002 0 0 400000000000 777777777777 0
DBT3 034354 000002 0 0 377777777777 777777777777 0
DBT4 034354 000002 0 0 377777777777 777777777777 0
DBT5 034354 000002 0 0 377777777777 777777777777 0
ST0 034354 000002 0 0 377777777777 777777777777 0
ST6 034354 000002 0 0 377777777777 777777777777 0
ST6A 034354 000002 0 0 377777777777 777777777777 0
ST9 034354 000002 0 0 377777777777 777777777777 0
*034377 DPB 5,000003
INITIAL
C(AC)=777777 000076
C(E)=000100 000001 C(C(E))=777777 777777
FINAL
C(AC)=777777 000076
C(E)=000100 000001 C(C(E))=777777 777777
TIME PC MA SC FE AR MQ BR
IT0 034377 034377 0 0 137240000003 0 0
IT1 034377 0 0 0 137240000003 0 0
AT3 034377 0 0 0 000000000003 0 137240000003
AT6 034377 000003 0 0 000000000003 0 137240000003
FT0 034377 000003 0 0 000100000001 0 137240000003
FT1A 034377 000003 0 0 000100000001 0 000100000001
FT9 034377 000003 0 0 000100000001 0 000100000001
ET0 034377 000003 0 0 000100000001 0 000100000001
BYT6 034377 000003 0 0 000100000001 0 000100000001
BYT7 034377 000003 777 0 000100000001 0 000100000001
SCT0 034377 000003 777 0 000100000001 0 000100000001
SCT3 034377 000003 0 0 000100000001 000000000001 000100000001
SCT4 034377 000003 0 0 000100000001 000000000001 000100000001
BYT7A 034377 000003 0 0 000100000001 000000000001 000100000001
IT1 034377 0 0 0 000100000001 000000000001 000100000001
AT3 034377 0 0 0 000000000001 000000000001 000100000001
AT6 034377 000001 0 0 000000000001 000000000001 000100000001
FT0 034377 000001 0 0 777777777777 000000000001 000100000001
FT1A 034377 000001 0 0 777777777777 000000000001 777777777777
FT2 034377 000001 0 0 0 000000000001 777777777777
FT2RQ 034377 000001 0 0 777777000076 000000000001 777777777777
FT3 034377 000001 0 0 777777000076 000000000001 777777777777
FT9 0 000001 0 0 777777000076 000000000001 777777777777
ET0 0 000001 0 0 777777000076 000000000001 777777777777
SCT0 0 000001 0 0 777777000076 000000000001 777777777777
SCT4 0 000001 0 0 777777000076 000000000001 777777777777
DBT1 0 000001 0 0 777777000076 000000000001 777777777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 179
DAKAM 000000 000000 770000 000000 130000 000000 030000 777777 SEQ 0441
DBT2 0 000001 0 0 000000000001 777777777777 777777000076
DBT3 0 000001 0 0 777777777776 777777777777 0
DBT4 0 000001 0 0 777777777776 777777777777 0
DBT5 0 000001 0 0 777777777776 777777777777 0
ST0 0 000001 0 0 777777777776 777777777777 0
ST6 0 000001 0 0 777777777776 777777777777 0
ST6A 0 000001 0 0 777777777776 777777777777 0
ST9 0 000001 0 0 777777777776 777777777777 0
*034416 IBP 0,000002
INITIAL
C(AC)=777777 000076
C(E)=000100 777777
FINAL
C(E)=000100 777777
TIME PC MA SC FE AR MQ BR
IT0 034416 034416 0 0 133000000002 0 000100777777
IT1 034416 0 0 0 133000000002 0 000100777777
AT3 034416 0 0 0 000000000002 0 133000000002
AT6 034416 000002 0 0 000000000002 0 133000000002
FT0 034416 000002 0 0 000100777777 0 133000000002
FT1A 034416 000002 0 0 000100777777 0 000100777777
FT9 034417 000002 0 0 000100777777 0 000100777777
ET0 034417 000002 0 0 000100777777 0 000100777777
BYT1 034417 000002 0 0 000100777777 0 000100777777
BYT2 034417 000002 0 0 000101000000 0 000100777777
BYT3 034417 000002 144 0 000101000000 0 000100777777
BYT4 034417 000002 0 0 430101000000 0 000100777777
ST9 034417 000002 0 0 430101000000 0 000100777777
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 1
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0442
*034433 BLT 7,000001
INITIAL
C(AC)=000001 000001
FINAL
C(AC)=000001 000001
TIME PC MA SC FE AR MQ BR
IT0 034433 034433 0 0 251340000001 0 000000000001
IT1 034433 0 0 0 251340000001 0 000000000001
AT3 034433 0 0 0 000000000001 0 251340000001
AT6 034433 000001 0 0 000000000001 0 251340000001
FT1A 034433 000001 0 0 000000000001 0 000000000001
FT2 034433 000001 0 0 0 0 000000000001
FT2RQ 034433 000001 0 0 000001000001 0 000000000001
FT3 034433 000001 0 0 000001000001 0 000000000001
FT6 034433 000001 0 0 000001000001 0 000000000001
FT7 034433 000001 0 0 0 000001000001 000000000001
FT4RQ 034433 000001 0 0 0 000001000001 000000000001
FT4A 034433 000001 0 0 000001000001 0 000000000001
FT9 034433 000001 0 0 000001000001 0 000000000001
ET0 034433 000001 0 0 000001000001 0 000000000001
ET1 034433 000001 0 0 000001000001 0 000000000001
ET2 034433 000001 0 0 0 000002000002 000000000001
BLTT1 034433 000001 0 0 000000000002 000002000002 000000000001
BLTT2 034434 000001 0 0 000000000002 000002000002 000000000001
ST9 034434 000001 0 0 000000000002 000002000002 000000000001
*034452 BLT 14,000006
INITIAL
C(AC)=000006 000006
FINAL
C(AC)=000006 000006
TIME PC MA SC FE AR MQ BR
IT0 034452 034452 0 0 251600000006 0 000000000006
IT1 034452 0 0 0 251600000006 0 000000000006
AT3 034452 0 0 0 000000000006 0 251600000006
AT6 034452 000006 0 0 000000000006 0 251600000006
FT1A 034452 000006 0 0 000000000006 0 000000000006
FT2 034452 000006 0 0 0 0 000000000006
FT2RQ 034452 000006 0 0 000006000006 0 000000000006
FT3 034452 000006 0 0 000006000006 0 000000000006
FT6 034452 000006 0 0 000006000006 0 000000000006
FT7 034452 000006 0 0 777777777777 000006000006 000000000006
FT4RQ 034452 000006 0 0 777777777777 000006000006 000000000006
FT4A 034452 000006 0 0 000006000006 777777777777 000000000006
FT9 034452 000006 0 0 000006000006 777777777777 000000000006
ET0 034452 000006 0 0 000006000006 777777777777 000000000006
ET1 034452 000006 0 0 000006000006 777777777777 000000000006
ET2 034452 000006 0 0 777777777777 000007000007 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 2
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0443
BLTT1 034452 000006 0 0 000000000007 000007000007 000000000006
BLTT2 034453 000006 0 0 000000000007 000007000007 000000000006
ST9 034453 000006 0 0 000000000007 000007000007 000000000006
*034471 BLT 14,000006
INITIAL
C(AC)=000006 000006
FINAL
C(AC)=000006 000006
TIME PC MA SC FE AR MQ BR
IT0 034471 034471 0 0 251600000006 0 000000000006
IT1 034471 0 0 0 251600000006 0 000000000006
AT3 034471 0 0 0 000000000006 0 251600000006
AT6 034471 000006 0 0 000000000006 0 251600000006
FT1A 034471 000006 0 0 000000000006 0 000000000006
FT2 034471 000006 0 0 0 0 000000000006
FT2RQ 034471 000006 0 0 000006000006 0 000000000006
FT3 034471 000006 0 0 000006000006 0 000000000006
FT6 034471 000006 0 0 000006000006 0 000000000006
FT7 034471 000006 0 0 230703603700 000006000006 000000000006
FT4RQ 034471 000006 0 0 230703603700 000006000006 000000000006
FT4A 034471 000006 0 0 000006000006 230703603700 000000000006
FT9 034471 000006 0 0 000006000006 230703603700 000000000006
ET0 034471 000006 0 0 000006000006 230703603700 000000000006
ET1 034471 000006 0 0 000006000006 230703603700 000000000006
ET2 034471 000006 0 0 230703603700 000007000007 000000000006
BLTT1 034471 000006 0 0 000000000007 000007000007 000000000006
BLTT2 034472 000006 0 0 000000000007 000007000007 000000000006
ST9 034472 000006 0 0 000000000007 000007000007 000000000006
*034511 BLT 14,040221
INITIAL
C(AC)=040221 040221
FINAL
C(AC)=040221 040221
TIME PC MA SC FE AR MQ BR
IT0 034511 034511 0 0 251600040221 0 000000040221
IT1 034511 0 0 0 251600040221 0 000000040221
AT3 034511 0 0 0 000000040221 0 251600040221
AT6 034511 040221 0 0 000000040221 0 251600040221
FT1A 034511 040221 0 0 000000040221 0 000000040221
FT2 034511 040221 0 0 0 0 000000040221
FT2RQ 034511 040221 0 0 040221040221 0 000000040221
FT3 034511 040221 0 0 040221040221 0 000000040221
FT6 034511 040221 0 0 040221040221 0 000000040221
FT7 034511 040221 0 0 0 040221040221 000000040221
FT4RQ 034511 040221 0 0 0 040221040221 000000040221
FT4A 034511 040221 0 0 040221040221 0 000000040221
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 3
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0444
FT9 034511 040221 0 0 040221040221 0 000000040221
ET0 034511 040221 0 0 040221040221 0 000000040221
ET1 034511 040221 0 0 040221040221 0 000000040221
ET2 034511 040221 0 0 0 040222040222 000000040221
BLTT1 034511 040221 0 0 000000040222 040222040222 000000040221
BLTT2 034512 040221 0 0 000000040222 040222040222 000000040221
ST9 034512 040221 0 0 000000040222 040222040222 000000040221
*034534 BLT 13,040221
INITIAL
C(AC)=040221 040221
FINAL
C(AC)=040221 040221
TIME PC MA SC FE AR MQ BR
IT0 034534 034534 0 0 251540040221 0 000000040221
IT1 034534 0 0 0 251540040221 0 000000040221
AT3 034534 0 0 0 000000040221 0 251540040221
AT6 034534 040221 0 0 000000040221 0 251540040221
FT1A 034534 040221 0 0 000000040221 0 000000040221
FT2 034534 040221 0 0 0 0 000000040221
FT2RQ 034534 040221 0 0 040221040221 0 000000040221
FT3 034534 040221 0 0 040221040221 0 000000040221
FT6 034534 040221 0 0 040221040221 0 000000040221
FT7 034534 040221 0 0 777777777777 040221040221 000000040221
FT4RQ 034534 040221 0 0 777777777777 040221040221 000000040221
FT4A 034534 040221 0 0 040221040221 777777777777 000000040221
FT9 034534 040221 0 0 040221040221 777777777777 000000040221
ET0 034534 040221 0 0 040221040221 777777777777 000000040221
ET1 034534 040221 0 0 040221040221 777777777777 000000040221
ET2 034534 040221 0 0 777777777777 040222040222 000000040221
BLTT1 034534 040221 0 0 000000040222 040222040222 000000040221
BLTT2 034535 040221 0 0 000000040222 040222040222 000000040221
ST9 034535 040221 0 0 000000040222 040222040222 000000040221
*034560 BLT 12,040221
INITIAL
C(AC)=040221 040221
FINAL
C(AC)=040221 040221
TIME PC MA SC FE AR MQ BR
IT0 034560 034560 0 0 251500040221 0 000000040221
IT1 034560 0 0 0 251500040221 0 000000040221
AT3 034560 0 0 0 000000040221 0 251500040221
AT6 034560 040221 0 0 000000040221 0 251500040221
FT1A 034560 040221 0 0 000000040221 0 000000040221
FT2 034560 040221 0 0 0 0 000000040221
FT2RQ 034560 040221 0 0 040221040221 0 000000040221
FT3 034560 040221 0 0 040221040221 0 000000040221
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 4
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0445
FT6 034560 040221 0 0 040221040221 0 000000040221
FT7 034560 040221 0 0 230703603700 040221040221 000000040221
FT4RQ 034560 040221 0 0 230703603700 040221040221 000000040221
FT4A 034560 040221 0 0 040221040221 230703603700 000000040221
FT9 034560 040221 0 0 040221040221 230703603700 000000040221
ET0 034560 040221 0 0 040221040221 230703603700 000000040221
ET1 034560 040221 0 0 040221040221 230703603700 000000040221
ET2 034560 040221 0 0 230703603700 040222040222 000000040221
BLTT1 034560 040221 0 0 000000040222 040222040222 000000040221
BLTT2 034561 040221 0 0 000000040222 040222040222 000000040221
ST9 034561 040221 0 0 000000040222 040222040222 000000040221
*034606 BLT 14,000011
INITIAL
C(AC)=000006 000011
FINAL
C(AC)=000006 000011
TIME PC MA SC FE AR MQ BR
IT0 034606 034606 0 0 251600000011 0 000000000011
IT1 034606 0 0 0 251600000011 0 000000000011
AT3 034606 0 0 0 000000000011 0 251600000011
AT6 034606 000011 0 0 000000000011 0 251600000011
FT1A 034606 000011 0 0 000000000011 0 000000000011
FT2 034606 000011 0 0 0 0 000000000011
FT2RQ 034606 000011 0 0 000006000011 0 000000000011
FT3 034606 000011 0 0 000006000011 0 000000000011
FT6 034606 000011 0 0 000011000006 0 000000000011
FT7 034606 000006 0 0 0 000011000006 000000000011
FT4RQ 034606 000006 0 0 0 000011000006 000000000011
FT4A 034606 000006 0 0 000011000006 0 000000000011
FT9 034606 000006 0 0 000011000006 0 000000000011
ET0 034606 000006 0 0 000006000011 0 000000000011
ET1 034606 000011 0 0 000006000011 0 000000000011
ET2 034606 000011 0 0 0 000007000012 000000000011
BLTT1 034606 000011 0 0 000000000012 000007000012 000000000011
BLTT2 034607 000011 0 0 000000000012 000007000012 000000000011
ST9 034607 000011 0 0 000000000012 000007000012 000000000011
*034637 BLT 13,000010
INITIAL
C(AC)=000005 000010
FINAL
C(AC)=000005 000010
TIME PC MA SC FE AR MQ BR
IT0 034637 034637 0 0 251540000010 0 000000000010
IT1 034637 0 0 0 251540000010 0 000000000010
AT3 034637 0 0 0 000000000010 0 251540000010
AT6 034637 000010 0 0 000000000010 0 251540000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 5
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0446
FT1A 034637 000010 0 0 000000000010 0 000000000010
FT2 034637 000010 0 0 0 0 000000000010
FT2RQ 034637 000010 0 0 000005000010 0 000000000010
FT3 034637 000010 0 0 000005000010 0 000000000010
FT6 034637 000010 0 0 000010000005 0 000000000010
FT7 034637 000005 0 0 777777777777 000010000005 000000000010
FT4RQ 034637 000005 0 0 777777777777 000010000005 000000000010
FT4A 034637 000005 0 0 000010000005 777777777777 000000000010
FT9 034637 000005 0 0 000010000005 777777777777 000000000010
ET0 034637 000005 0 0 000005000010 777777777777 000000000010
ET1 034637 000010 0 0 000005000010 777777777777 000000000010
ET2 034637 000010 0 0 777777777777 000006000011 000000000010
BLTT1 034637 000010 0 0 000000000011 000006000011 000000000010
BLTT2 034640 000010 0 0 000000000011 000006000011 000000000010
ST9 034640 000010 0 0 000000000011 000006000011 000000000010
*034670 BLT 12,000007
INITIAL
C(AC)=000004 000007
FINAL
C(AC)=000004 000007
TIME PC MA SC FE AR MQ BR
IT0 034670 034670 0 0 251500000007 0 000000000007
IT1 034670 0 0 0 251500000007 0 000000000007
AT3 034670 0 0 0 000000000007 0 251500000007
AT6 034670 000007 0 0 000000000007 0 251500000007
FT1A 034670 000007 0 0 000000000007 0 000000000007
FT2 034670 000007 0 0 0 0 000000000007
FT2RQ 034670 000007 0 0 000004000007 0 000000000007
FT3 034670 000007 0 0 000004000007 0 000000000007
FT6 034670 000007 0 0 000007000004 0 000000000007
FT7 034670 000004 0 0 230703603700 000007000004 000000000007
FT4RQ 034670 000004 0 0 230703603700 000007000004 000000000007
FT4A 034670 000004 0 0 000007000004 230703603700 000000000007
FT9 034670 000004 0 0 000007000004 230703603700 000000000007
ET0 034670 000004 0 0 000004000007 230703603700 000000000007
ET1 034670 000007 0 0 000004000007 230703603700 000000000007
ET2 034670 000007 0 0 230703603700 000005000010 000000000007
BLTT1 034670 000007 0 0 000000000010 000005000010 000000000007
BLTT2 034671 000007 0 0 000000000010 000005000010 000000000007
ST9 034671 000007 0 0 000000000010 000005000010 000000000007
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 6
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0447
*034724 BLT 14,040224
INITIAL
C(AC)=000006 040224
FINAL
C(AC)=000006 040224
TIME PC MA SC FE AR MQ BR
IT0 034724 034724 0 0 251600040224 0 000000040224
IT1 034724 0 0 0 251600040224 0 000000040224
AT3 034724 0 0 0 000000040224 0 251600040224
AT6 034724 040224 0 0 000000040224 0 251600040224
FT1A 034724 040224 0 0 000000040224 0 000000040224
FT2 034724 040224 0 0 0 0 000000040224
FT2RQ 034724 040224 0 0 000006040224 0 000000040224
FT3 034724 040224 0 0 000006040224 0 000000040224
FT6 034724 040224 0 0 040224000006 0 000000040224
FT7 034724 000006 0 0 0 040224000006 000000040224
FT4RQ 034724 000006 0 0 0 040224000006 000000040224
FT4A 034724 000006 0 0 040224000006 0 000000040224
FT9 034724 000006 0 0 040224000006 0 000000040224
ET0 034724 000006 0 0 000006040224 0 000000040224
ET1 034724 040224 0 0 000006040224 0 000000040224
ET2 034724 040224 0 0 0 000007040225 000000040224
BLTT1 034724 040224 0 0 000000040225 000007040225 000000040224
BLTT2 034725 040224 0 0 000000040225 000007040225 000000040224
ST9 034725 040224 0 0 000000040225 000007040225 000000040224
*034763 BLT 13,040224
INITIAL
C(AC)=000005 040224
FINAL
C(AC)=000005 040224
TIME PC MA SC FE AR MQ BR
IT0 034763 034763 0 0 251540040224 0 000000040224
IT1 034763 0 0 0 251540040224 0 000000040224
AT3 034763 0 0 0 000000040224 0 251540040224
AT6 034763 040224 0 0 000000040224 0 251540040224
FT1A 034763 040224 0 0 000000040224 0 000000040224
FT2 034763 040224 0 0 0 0 000000040224
FT2RQ 034763 040224 0 0 000005040224 0 000000040224
FT3 034763 040224 0 0 000005040224 0 000000040224
FT6 034763 040224 0 0 040224000005 0 000000040224
FT7 034763 000005 0 0 777777777777 040224000005 000000040224
FT4RQ 034763 000005 0 0 777777777777 040224000005 000000040224
FT4A 034763 000005 0 0 040224000005 777777777777 000000040224
FT9 034763 000005 0 0 040224000005 777777777777 000000040224
ET0 034763 000005 0 0 000005040224 777777777777 000000040224
ET1 034763 040224 0 0 000005040224 777777777777 000000040224
ET2 034763 040224 0 0 777777777777 000006040225 000000040224
BLTT1 034763 040224 0 0 000000040225 000006040225 000000040224
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 7
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0448
BLTT2 034764 040224 0 0 000000040225 000006040225 000000040224
ST9 034764 040224 0 0 000000040225 000006040225 000000040224
*035022 BLT 12,040224
INITIAL
C(AC)=000004 040224
FINAL
C(AC)=000004 040224
TIME PC MA SC FE AR MQ BR
IT0 035022 035022 0 0 251500040224 0 000000040224
IT1 035022 0 0 0 251500040224 0 000000040224
AT3 035022 0 0 0 000000040224 0 251500040224
AT6 035022 040224 0 0 000000040224 0 251500040224
FT1A 035022 040224 0 0 000000040224 0 000000040224
FT2 035022 040224 0 0 0 0 000000040224
FT2RQ 035022 040224 0 0 000004040224 0 000000040224
FT3 035022 040224 0 0 000004040224 0 000000040224
FT6 035022 040224 0 0 040224000004 0 000000040224
FT7 035022 000004 0 0 230703603700 040224000004 000000040224
FT4RQ 035022 000004 0 0 230703603700 040224000004 000000040224
FT4A 035022 000004 0 0 040224000004 230703603700 000000040224
FT9 035022 000004 0 0 040224000004 230703603700 000000040224
ET0 035022 000004 0 0 000004040224 230703603700 000000040224
ET1 035022 040224 0 0 000004040224 230703603700 000000040224
ET2 035022 040224 0 0 230703603700 000005040225 000000040224
BLTT1 035022 040224 0 0 000000040225 000005040225 000000040224
BLTT2 035023 040224 0 0 000000040225 000005040225 000000040224
ST9 035023 040224 0 0 000000040225 000005040225 000000040224
*035064 BLT 11,040224
INITIAL
C(AC)=040221 040224
FINAL
C(AC)=040221 040224
TIME PC MA SC FE AR MQ BR
IT0 035064 035064 0 0 251440040224 0 000000040224
IT1 035064 0 0 0 251440040224 0 000000040224
AT3 035064 0 0 0 000000040224 0 251440040224
AT6 035064 040224 0 0 000000040224 0 251440040224
FT1A 035064 040224 0 0 000000040224 0 000000040224
FT2 035064 040224 0 0 0 0 000000040224
FT2RQ 035064 040224 0 0 040221040224 0 000000040224
FT3 035064 040224 0 0 040221040224 0 000000040224
FT6 035064 040224 0 0 040224040221 0 000000040224
FT7 035064 040221 0 0 0 040224040221 000000040224
FT4RQ 035064 040221 0 0 0 040224040221 000000040224
FT4A 035064 040221 0 0 040224040221 0 000000040224
FT9 035064 040221 0 0 040224040221 0 000000040224
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 8
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0449
ET0 035064 040221 0 0 040221040224 0 000000040224
ET1 035064 040224 0 0 040221040224 0 000000040224
ET2 035064 040224 0 0 0 040222040225 000000040224
BLTT1 035064 040224 0 0 000000040225 040222040225 000000040224
BLTT2 035065 040224 0 0 000000040225 040222040225 000000040224
ST9 035065 040224 0 0 000000040225 040222040225 000000040224
*035131 BLT 10,040224
INITIAL
C(AC)=040221 040224
FINAL
C(AC)=040221 040224
TIME PC MA SC FE AR MQ BR
IT0 035131 035131 0 0 251400040224 0 000000040224
IT1 035131 0 0 0 251400040224 0 000000040224
AT3 035131 0 0 0 000000040224 0 251400040224
AT6 035131 040224 0 0 000000040224 0 251400040224
FT1A 035131 040224 0 0 000000040224 0 000000040224
FT2 035131 040224 0 0 0 0 000000040224
FT2RQ 035131 040224 0 0 040221040224 0 000000040224
FT3 035131 040224 0 0 040221040224 0 000000040224
FT6 035131 040224 0 0 040224040221 0 000000040224
FT7 035131 040221 0 0 777777777777 040224040221 000000040224
FT4RQ 035131 040221 0 0 777777777777 040224040221 000000040224
FT4A 035131 040221 0 0 040224040221 777777777777 000000040224
FT9 035131 040221 0 0 040224040221 777777777777 000000040224
ET0 035131 040221 0 0 040221040224 777777777777 000000040224
ET1 035131 040224 0 0 040221040224 777777777777 000000040224
ET2 035131 040224 0 0 777777777777 040222040225 000000040224
BLTT1 035131 040224 0 0 000000040225 040222040225 000000040224
BLTT2 035132 040224 0 0 000000040225 040222040225 000000040224
ST9 035132 040224 0 0 000000040225 040222040225 000000040224
*035176 BLT 7,040224
INITIAL
C(AC)=040221 040224
FINAL
C(AC)=040221 040224
TIME PC MA SC FE AR MQ BR
IT0 035176 035176 0 0 251340040224 0 000000040224
IT1 035176 0 0 0 251340040224 0 000000040224
AT3 035176 0 0 0 000000040224 0 251340040224
AT6 035176 040224 0 0 000000040224 0 251340040224
FT1A 035176 040224 0 0 000000040224 0 000000040224
FT2 035176 040224 0 0 0 0 000000040224
FT2RQ 035176 040224 0 0 040221040224 0 000000040224
FT3 035176 040224 0 0 040221040224 0 000000040224
FT6 035176 040224 0 0 040224040221 0 000000040224
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 9
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0450
FT7 035176 040221 0 0 230703603700 040224040221 000000040224
FT4RQ 035176 040221 0 0 230703603700 040224040221 000000040224
FT4A 035176 040221 0 0 040224040221 230703603700 000000040224
FT9 035176 040221 0 0 040224040221 230703603700 000000040224
ET0 035176 040221 0 0 040221040224 230703603700 000000040224
ET1 035176 040224 0 0 040221040224 230703603700 000000040224
ET2 035176 040224 0 0 230703603700 040222040225 000000040224
BLTT1 035176 040224 0 0 000000040225 040222040225 000000040224
BLTT2 035177 040224 0 0 000000040225 040222040225 000000040224
ST9 035177 040224 0 0 000000040225 040222040225 000000040224
*035240 BLT 14,000006
INITIAL
C(AC)=040221 000006
FINAL
C(AC)=040221 000006
TIME PC MA SC FE AR MQ BR
IT0 035240 035240 0 0 251600000006 0 000000000006
IT1 035240 0 0 0 251600000006 0 000000000006
AT3 035240 0 0 0 000000000006 0 251600000006
AT6 035240 000006 0 0 000000000006 0 251600000006
FT1A 035240 000006 0 0 000000000006 0 000000000006
FT2 035240 000006 0 0 0 0 000000000006
FT2RQ 035240 000006 0 0 040221000006 0 000000000006
FT3 035240 000006 0 0 040221000006 0 000000000006
FT6 035240 000006 0 0 000006040221 0 000000000006
FT7 035240 040221 0 0 0 000006040221 000000000006
FT4RQ 035240 040221 0 0 0 000006040221 000000000006
FT4A 035240 040221 0 0 000006040221 0 000000000006
FT9 035240 040221 0 0 000006040221 0 000000000006
ET0 035240 040221 0 0 040221000006 0 000000000006
ET1 035240 000006 0 0 040221000006 0 000000000006
ET2 035240 000006 0 0 0 040222000007 000000000006
BLTT1 035240 000006 0 0 000000000007 040222000007 000000000006
BLTT2 035241 000006 0 0 000000000007 040222000007 000000000006
ST9 035241 000006 0 0 000000000007 040222000007 000000000006
*035277 BLT 13,000005
INITIAL
C(AC)=040221 000005
FINAL
C(AC)=040221 000005
TIME PC MA SC FE AR MQ BR
IT0 035277 035277 0 0 251540000005 0 000000000005
IT1 035277 0 0 0 251540000005 0 000000000005
AT3 035277 0 0 0 000000000005 0 251540000005
AT6 035277 000005 0 0 000000000005 0 251540000005
FT1A 035277 000005 0 0 000000000005 0 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 10
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0451
FT2 035277 000005 0 0 0 0 000000000005
FT2RQ 035277 000005 0 0 040221000005 0 000000000005
FT3 035277 000005 0 0 040221000005 0 000000000005
FT6 035277 000005 0 0 000005040221 0 000000000005
FT7 035277 040221 0 0 777777777777 000005040221 000000000005
FT4RQ 035277 040221 0 0 777777777777 000005040221 000000000005
FT4A 035277 040221 0 0 000005040221 777777777777 000000000005
FT9 035277 040221 0 0 000005040221 777777777777 000000000005
ET0 035277 040221 0 0 040221000005 777777777777 000000000005
ET1 035277 000005 0 0 040221000005 777777777777 000000000005
ET2 035277 000005 0 0 777777777777 040222000006 000000000005
BLTT1 035277 000005 0 0 000000000006 040222000006 000000000005
BLTT2 0 000005 0 0 000000000006 040222000006 000000000005
ST9 0 000005 0 0 000000000006 040222000006 000000000005
*035336 BLT 12,000004
INITIAL
C(AC)=040221 000004
FINAL
C(AC)=040221 000004
TIME PC MA SC FE AR MQ BR
IT0 035336 035336 0 0 251500000004 0 000000000004
IT1 035336 0 0 0 251500000004 0 000000000004
AT3 035336 0 0 0 000000000004 0 251500000004
AT6 035336 000004 0 0 000000000004 0 251500000004
FT1A 035336 000004 0 0 000000000004 0 000000000004
FT2 035336 000004 0 0 0 0 000000000004
FT2RQ 035336 000004 0 0 040221000004 0 000000000004
FT3 035336 000004 0 0 040221000004 0 000000000004
FT6 035336 000004 0 0 000004040221 0 000000000004
FT7 035336 040221 0 0 230703603700 000004040221 000000000004
FT4RQ 035336 040221 0 0 230703603700 000004040221 000000000004
FT4A 035336 040221 0 0 000004040221 230703603700 000000000004
FT9 035336 040221 0 0 000004040221 230703603700 000000000004
ET0 035336 040221 0 0 040221000004 230703603700 000000000004
ET1 035336 000004 0 0 040221000004 230703603700 000000000004
ET2 035336 000004 0 0 230703603700 040222000005 000000000004
BLTT1 035336 000004 0 0 000000000005 040222000005 000000000004
BLTT2 035337 000004 0 0 000000000005 040222000005 000000000004
ST9 035337 000004 0 0 000000000005 040222000005 000000000004
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 11
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0452
*035370 BLT 14,000010
INITIAL
C(AC)=000004 000004
FINAL
C(AC)=000004 000004
TIME PC MA SC FE AR MQ BR
IT0 035370 035370 0 0 251600000010 0 000000000010
IT1 035370 0 0 0 251600000010 0 000000000010
AT3 035370 0 0 0 000000000010 0 251600000010
AT6 035370 000010 0 0 000000000010 0 251600000010
FT1A 035370 000010 0 0 000000000010 0 000000000010
FT2 035370 000010 0 0 0 0 000000000010
FT2RQ 035370 000010 0 0 000004000004 0 000000000010
FT3 035370 000010 0 0 000004000004 0 000000000010
FT6 035370 000010 0 0 000004000004 0 000000000010
FT7 035370 000004 0 0 0 000004000004 000000000010
FT4RQ 035370 000004 0 0 0 000004000004 000000000010
FT4A 035370 000004 0 0 000004000004 0 000000000010
FT9 035370 000004 0 0 000004000004 0 000000000010
ET0 035370 000004 0 0 000004000004 0 000000000010
ET1 035370 000004 0 0 000004000004 0 000000000010
ET2 035370 000004 0 0 0 000005000005 000000000010
BLTT1 035370 000004 0 0 000000000005 000005000005 000000000010
BLTT3 035370 000004 0 0 000005000005 0 000000000010
FT6 035370 000004 0 0 000005000005 0 000000000010
FT7 035370 000005 0 0 0 000005000005 000000000010
FT4RQ 035370 000005 0 0 0 000005000005 000000000010
FT4A 035370 000005 0 0 000005000005 0 000000000010
FT9 035370 000005 0 0 000005000005 0 000000000010
ET0 035370 000005 0 0 000005000005 0 000000000010
ET1 035370 000005 0 0 000005000005 0 000000000010
ET2 035370 000005 0 0 0 000006000006 000000000010
BLTT1 035370 000005 0 0 000000000006 000006000006 000000000010
BLTT3 035370 000005 0 0 000006000006 0 000000000010
FT6 035370 000005 0 0 000006000006 0 000000000010
FT7 035370 000006 0 0 0 000006000006 000000000010
FT4RQ 035370 000006 0 0 0 000006000006 000000000010
FT4A 035370 000006 0 0 000006000006 0 000000000010
FT9 035370 000006 0 0 000006000006 0 000000000010
ET0 035370 000006 0 0 000006000006 0 000000000010
ET1 035370 000006 0 0 000006000006 0 000000000010
ET2 035370 000006 0 0 0 000007000007 000000000010
BLTT1 035370 000006 0 0 000000000007 000007000007 000000000010
BLTT3 035370 000006 0 0 000007000007 0 000000000010
FT6 035370 000006 0 0 000007000007 0 000000000010
FT7 035370 000007 0 0 0 000007000007 000000000010
FT4RQ 035370 000007 0 0 0 000007000007 000000000010
FT4A 035370 000007 0 0 000007000007 0 000000000010
FT9 035370 000007 0 0 000007000007 0 000000000010
ET0 035370 000007 0 0 000007000007 0 000000000010
ET1 035370 000007 0 0 000007000007 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 12
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0453
ET2 035370 000007 0 0 0 000010000010 000000000010
BLTT1 035370 000007 0 0 000000000010 000010000010 000000000010
BLTT3 035370 000007 0 0 000010000010 0 000000000010
FT6 035370 000007 0 0 000010000010 0 000000000010
FT7 035370 000010 0 0 0 000010000010 000000000010
FT4RQ 035370 000010 0 0 0 000010000010 000000000010
FT4A 035370 000010 0 0 000010000010 0 000000000010
FT9 035370 000010 0 0 000010000010 0 000000000010
ET0 035370 000010 0 0 000010000010 0 000000000010
ET1 035370 000010 0 0 000010000010 0 000000000010
ET2 035370 000010 0 0 0 000011000011 000000000010
BLTT1 035370 000010 0 0 000000000011 000011000011 000000000010
BLTT2 035371 000010 0 0 000000000011 000011000011 000000000010
ST9 035371 000010 0 0 000000000011 000011000011 000000000010
*035421 BLT 14,000010
INITIAL
C(AC)=000004 000004
FINAL
C(AC)=000004 000004
TIME PC MA SC FE AR MQ BR
IT0 035421 035421 0 0 251600000010 0 000000000010
IT1 035421 0 0 0 251600000010 0 000000000010
AT3 035421 0 0 0 000000000010 0 251600000010
AT6 035421 000010 0 0 000000000010 0 251600000010
FT1A 035421 000010 0 0 000000000010 0 000000000010
FT2 035421 000010 0 0 0 0 000000000010
FT2RQ 035421 000010 0 0 000004000004 0 000000000010
FT3 035421 000010 0 0 000004000004 0 000000000010
FT6 035421 000010 0 0 000004000004 0 000000000010
FT7 035421 000004 0 0 777777777777 000004000004 000000000010
FT4RQ 035421 000004 0 0 777777777777 000004000004 000000000010
FT4A 035421 000004 0 0 000004000004 777777777777 000000000010
FT9 035421 000004 0 0 000004000004 777777777777 000000000010
ET0 035421 000004 0 0 000004000004 777777777777 000000000010
ET1 035421 000004 0 0 000004000004 777777777777 000000000010
ET2 035421 000004 0 0 777777777777 000005000005 000000000010
BLTT1 035421 000004 0 0 000000000005 000005000005 000000000010
BLTT3 035421 000004 0 0 000005000005 0 000000000010
FT6 035421 000004 0 0 000005000005 0 000000000010
FT7 035421 000005 0 0 777777777777 000005000005 000000000010
FT4RQ 035421 000005 0 0 777777777777 000005000005 000000000010
FT4A 035421 000005 0 0 000005000005 777777777777 000000000010
FT9 035421 000005 0 0 000005000005 777777777777 000000000010
ET0 035421 000005 0 0 000005000005 777777777777 000000000010
ET1 035421 000005 0 0 000005000005 777777777777 000000000010
ET2 035421 000005 0 0 777777777777 000006000006 000000000010
BLTT1 035421 000005 0 0 000000000006 000006000006 000000000010
BLTT3 035421 000005 0 0 000006000006 0 000000000010
FT6 035421 000005 0 0 000006000006 0 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 13
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0454
FT7 035421 000006 0 0 777777777777 000006000006 000000000010
FT4RQ 035421 000006 0 0 777777777777 000006000006 000000000010
FT4A 035421 000006 0 0 000006000006 777777777777 000000000010
FT9 035421 000006 0 0 000006000006 777777777777 000000000010
ET0 035421 000006 0 0 000006000006 777777777777 000000000010
ET1 035421 000006 0 0 000006000006 777777777777 000000000010
ET2 035421 000006 0 0 777777777777 000007000007 000000000010
BLTT1 035421 000006 0 0 000000000007 000007000007 000000000010
BLTT3 035421 000006 0 0 000007000007 0 000000000010
FT6 035421 000006 0 0 000007000007 0 000000000010
FT7 035421 000007 0 0 777777777777 000007000007 000000000010
FT4RQ 035421 000007 0 0 777777777777 000007000007 000000000010
FT4A 035421 000007 0 0 000007000007 777777777777 000000000010
FT9 035421 000007 0 0 000007000007 777777777777 000000000010
ET0 035421 000007 0 0 000007000007 777777777777 000000000010
ET1 035421 000007 0 0 000007000007 777777777777 000000000010
ET2 035421 000007 0 0 777777777777 000010000010 000000000010
BLTT1 035421 000007 0 0 000000000010 000010000010 000000000010
BLTT3 035421 000007 0 0 000010000010 0 000000000010
FT6 035421 000007 0 0 000010000010 0 000000000010
FT7 035421 000010 0 0 777777777777 000010000010 000000000010
FT4RQ 035421 000010 0 0 777777777777 000010000010 000000000010
FT4A 035421 000010 0 0 000010000010 777777777777 000000000010
FT9 035421 000010 0 0 000010000010 777777777777 000000000010
ET0 035421 000010 0 0 000010000010 777777777777 000000000010
ET1 035421 000010 0 0 000010000010 777777777777 000000000010
ET2 035421 000010 0 0 777777777777 000011000011 000000000010
BLTT1 035421 000010 0 0 000000000011 000011000011 000000000010
BLTT2 035422 000010 0 0 000000000011 000011000011 000000000010
ST9 035422 000010 0 0 000000000011 000011000011 000000000010
*035454 BLT 14,000010
INITIAL
C(AC)=000004 000004
FINAL
C(AC)=000004 000004
TIME PC MA SC FE AR MQ BR
IT0 035454 035454 0 0 251600000010 0 000000000010
IT1 035454 0 0 0 251600000010 0 000000000010
AT3 035454 0 0 0 000000000010 0 251600000010
AT6 035454 000010 0 0 000000000010 0 251600000010
FT1A 035454 000010 0 0 000000000010 0 000000000010
FT2 035454 000010 0 0 0 0 000000000010
FT2RQ 035454 000010 0 0 000004000004 0 000000000010
FT3 035454 000010 0 0 000004000004 0 000000000010
FT6 035454 000010 0 0 000004000004 0 000000000010
FT7 035454 000004 0 0 230703603700 000004000004 000000000010
FT4RQ 035454 000004 0 0 230703603700 000004000004 000000000010
FT4A 035454 000004 0 0 000004000004 230703603700 000000000010
FT9 035454 000004 0 0 000004000004 230703603700 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 14
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0455
ET0 035454 000004 0 0 000004000004 230703603700 000000000010
ET1 035454 000004 0 0 000004000004 230703603700 000000000010
ET2 035454 000004 0 0 230703603700 000005000005 000000000010
BLTT1 035454 000004 0 0 000000000005 000005000005 000000000010
BLTT3 035454 000004 0 0 000005000005 0 000000000010
FT6 035454 000004 0 0 000005000005 0 000000000010
FT7 035454 000005 0 0 230703603700 000005000005 000000000010
FT4RQ 035454 000005 0 0 230703603700 000005000005 000000000010
FT4A 035454 000005 0 0 000005000005 230703603700 000000000010
FT9 035454 000005 0 0 000005000005 230703603700 000000000010
ET0 035454 000005 0 0 000005000005 230703603700 000000000010
ET1 035454 000005 0 0 000005000005 230703603700 000000000010
ET2 035454 000005 0 0 230703603700 000006000006 000000000010
BLTT1 035454 000005 0 0 000000000006 000006000006 000000000010
BLTT3 035454 000005 0 0 000006000006 0 000000000010
FT6 035454 000005 0 0 000006000006 0 000000000010
FT7 035454 000006 0 0 230703603700 000006000006 000000000010
FT4RQ 035454 000006 0 0 230703603700 000006000006 000000000010
FT4A 035454 000006 0 0 000006000006 230703603700 000000000010
FT9 035454 000006 0 0 000006000006 230703603700 000000000010
ET0 035454 000006 0 0 000006000006 230703603700 000000000010
ET1 035454 000006 0 0 000006000006 230703603700 000000000010
ET2 035454 000006 0 0 230703603700 000007000007 000000000010
BLTT1 035454 000006 0 0 000000000007 000007000007 000000000010
BLTT3 035454 000006 0 0 000007000007 0 000000000010
FT6 035454 000006 0 0 000007000007 0 000000000010
FT7 035454 000007 0 0 230703603700 000007000007 000000000010
FT4RQ 035454 000007 0 0 230703603700 000007000007 000000000010
FT4A 035454 000007 0 0 000007000007 230703603700 000000000010
FT9 035454 000007 0 0 000007000007 230703603700 000000000010
ET0 035454 000007 0 0 000007000007 230703603700 000000000010
ET1 035454 000007 0 0 000007000007 230703603700 000000000010
ET2 035454 000007 0 0 230703603700 000010000010 000000000010
BLTT1 035454 000007 0 0 000000000010 000010000010 000000000010
BLTT3 035454 000007 0 0 000010000010 0 000000000010
FT6 035454 000007 0 0 000010000010 0 000000000010
FT7 035454 000010 0 0 230703603700 000010000010 000000000010
FT4RQ 035454 000010 0 0 230703603700 000010000010 000000000010
FT4A 035454 000010 0 0 000010000010 230703603700 000000000010
FT9 035454 000010 0 0 000010000010 230703603700 000000000010
ET0 035454 000010 0 0 000010000010 230703603700 000000000010
ET1 035454 000010 0 0 000010000010 230703603700 000000000010
ET2 035454 000010 0 0 230703603700 000011000011 000000000010
BLTT1 035454 000010 0 0 000000000011 000011000011 000000000010
BLTT2 035455 000010 0 0 000000000011 000011000011 000000000010
ST9 035455 000010 0 0 000000000011 000011000011 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 15
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0456
*035510 BLT 14,000010
INITIAL
C(AC)=000004 000004
FINAL
C(AC)=000004 000004
TIME PC MA SC FE AR MQ BR
IT0 035510 035510 0 0 251600000010 0 000000000010
IT1 035510 0 0 0 251600000010 0 000000000010
AT3 035510 0 0 0 000000000010 0 251600000010
AT6 035510 000010 0 0 000000000010 0 251600000010
FT1A 035510 000010 0 0 000000000010 0 000000000010
FT2 035510 000010 0 0 0 0 000000000010
FT2RQ 035510 000010 0 0 000004000004 0 000000000010
FT3 035510 000010 0 0 000004000004 0 000000000010
FT6 035510 000010 0 0 000004000004 0 000000000010
FT7 035510 000004 0 0 252525252525 000004000004 000000000010
FT4RQ 035510 000004 0 0 252525252525 000004000004 000000000010
FT4A 035510 000004 0 0 000004000004 252525252525 000000000010
FT9 035510 000004 0 0 000004000004 252525252525 000000000010
ET0 035510 000004 0 0 000004000004 252525252525 000000000010
ET1 035510 000004 0 0 000004000004 252525252525 000000000010
ET2 035510 000004 0 0 252525252525 000005000005 000000000010
BLTT1 035510 000004 0 0 000000000005 000005000005 000000000010
BLTT3 035510 000004 0 0 000005000005 0 000000000010
FT6 035510 000004 0 0 000005000005 0 000000000010
FT7 035510 000005 0 0 146314631463 000005000005 000000000010
FT4RQ 035510 000005 0 0 146314631463 000005000005 000000000010
FT4A 035510 000005 0 0 000005000005 146314631463 000000000010
FT9 035510 000005 0 0 000005000005 146314631463 000000000010
ET0 035510 000005 0 0 000005000005 146314631463 000000000010
ET1 035510 000005 0 0 000005000005 146314631463 000000000010
ET2 035510 000005 0 0 146314631463 000006000006 000000000010
BLTT1 035510 000005 0 0 000000000006 000006000006 000000000010
BLTT3 035510 000005 0 0 000006000006 0 000000000010
FT6 035510 000005 0 0 000006000006 0 000000000010
FT7 035510 000006 0 0 070707070707 000006000006 000000000010
FT4RQ 035510 000006 0 0 070707070707 000006000006 000000000010
FT4A 035510 000006 0 0 000006000006 070707070707 000000000010
FT9 035510 000006 0 0 000006000006 070707070707 000000000010
ET0 035510 000006 0 0 000006000006 070707070707 000000000010
ET1 035510 000006 0 0 000006000006 070707070707 000000000010
ET2 035510 000006 0 0 070707070707 000007000007 000000000010
BLTT1 035510 000006 0 0 000000000007 000007000007 000000000010
BLTT3 035510 000006 0 0 000007000007 0 000000000010
FT6 035510 000006 0 0 000007000007 0 000000000010
FT7 035510 000007 0 0 036074170360 000007000007 000000000010
FT4RQ 035510 000007 0 0 036074170360 000007000007 000000000010
FT4A 035510 000007 0 0 000007000007 036074170360 000000000010
FT9 035510 000007 0 0 000007000007 036074170360 000000000010
ET0 035510 000007 0 0 000007000007 036074170360 000000000010
ET1 035510 000007 0 0 000007000007 036074170360 000000000010
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 16
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0457
ET2 035510 000007 0 0 036074170360 000010000010 000000000010
BLTT1 035510 000007 0 0 000000000010 000010000010 000000000010
BLTT3 035510 000007 0 0 000010000010 0 000000000010
FT6 035510 000007 0 0 000010000010 0 000000000010
FT7 035510 000010 0 0 017407603701 000010000010 000000000010
FT4RQ 035510 000010 0 0 017407603701 000010000010 000000000010
FT4A 035510 000010 0 0 000010000010 017407603701 000000000010
FT9 035510 000010 0 0 000010000010 017407603701 000000000010
ET0 035510 000010 0 0 000010000010 017407603701 000000000010
ET1 035510 000010 0 0 000010000010 017407603701 000000000010
ET2 035510 000010 0 0 017407603701 000011000011 000000000010
BLTT1 035510 000010 0 0 000000000011 000011000011 000000000010
BLTT2 035511 000010 0 0 000000000011 000011000011 000000000010
ST9 035511 000010 0 0 000000000011 000011000011 000000000010
*035544 BLT 13,040225
INITIAL
C(AC)=040221 040221
FINAL
C(AC)=040221 040221
TIME PC MA SC FE AR MQ BR
IT0 035544 035544 0 0 251540040225 0 000000040225
IT1 035544 0 0 0 251540040225 0 000000040225
AT3 035544 0 0 0 000000040225 0 251540040225
AT6 035544 040225 0 0 000000040225 0 251540040225
FT1A 035544 040225 0 0 000000040225 0 000000040225
FT2 035544 040225 0 0 0 0 000000040225
FT2RQ 035544 040225 0 0 040221040221 0 000000040225
FT3 035544 040225 0 0 040221040221 0 000000040225
FT6 035544 040225 0 0 040221040221 0 000000040225
FT7 035544 040221 0 0 0 040221040221 000000040225
FT4RQ 035544 040221 0 0 0 040221040221 000000040225
FT4A 035544 040221 0 0 040221040221 0 000000040225
FT9 035544 040221 0 0 040221040221 0 000000040225
ET0 035544 040221 0 0 040221040221 0 000000040225
ET1 035544 040221 0 0 040221040221 0 000000040225
ET2 035544 040221 0 0 0 040222040222 000000040225
BLTT1 035544 040221 0 0 000000040222 040222040222 000000040225
BLTT3 035544 040221 0 0 040222040222 0 000000040225
FT6 035544 040221 0 0 040222040222 0 000000040225
FT7 035544 040222 0 0 0 040222040222 000000040225
FT4RQ 035544 040222 0 0 0 040222040222 000000040225
FT4A 035544 040222 0 0 040222040222 0 000000040225
FT9 035544 040222 0 0 040222040222 0 000000040225
ET0 035544 040222 0 0 040222040222 0 000000040225
ET1 035544 040222 0 0 040222040222 0 000000040225
ET2 035544 040222 0 0 0 040223040223 000000040225
BLTT1 035544 040222 0 0 000000040223 040223040223 000000040225
BLTT3 035544 040222 0 0 040223040223 0 000000040225
FT6 035544 040222 0 0 040223040223 0 000000040225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 17
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0458
FT7 035544 040223 0 0 0 040223040223 000000040225
FT4RQ 035544 040223 0 0 0 040223040223 000000040225
FT4A 035544 040223 0 0 040223040223 0 000000040225
FT9 035544 040223 0 0 040223040223 0 000000040225
ET0 035544 040223 0 0 040223040223 0 000000040225
ET1 035544 040223 0 0 040223040223 0 000000040225
ET2 035544 040223 0 0 0 040224040224 000000040225
BLTT1 035544 040223 0 0 000000040224 040224040224 000000040225
BLTT3 035544 040223 0 0 040224040224 0 000000040225
FT6 035544 040223 0 0 040224040224 0 000000040225
FT7 035544 040224 0 0 0 040224040224 000000040225
FT4RQ 035544 040224 0 0 0 040224040224 000000040225
FT4A 035544 040224 0 0 040224040224 0 000000040225
FT9 035544 040224 0 0 040224040224 0 000000040225
ET0 035544 040224 0 0 040224040224 0 000000040225
ET1 035544 040224 0 0 040224040224 0 000000040225
ET2 035544 040224 0 0 0 040225040225 000000040225
BLTT1 035544 040224 0 0 000000040225 040225040225 000000040225
BLTT3 035544 040224 0 0 040225040225 0 000000040225
FT6 035544 040224 0 0 040225040225 0 000000040225
FT7 035544 040225 0 0 0 040225040225 000000040225
FT4RQ 035544 040225 0 0 0 040225040225 000000040225
FT4A 035544 040225 0 0 040225040225 0 000000040225
FT9 035544 040225 0 0 040225040225 0 000000040225
ET0 035544 040225 0 0 040225040225 0 000000040225
ET1 035544 040225 0 0 040225040225 0 000000040225
ET2 035544 040225 0 0 0 040226040226 000000040225
BLTT1 035544 040225 0 0 000000040226 040226040226 000000040225
BLTT2 035545 040225 0 0 000000040226 040226040226 000000040225
ST9 035545 040225 0 0 000000040226 040226040226 000000040225
*035607 BLT 12,040225
INITIAL
C(AC)=040221 040221
FINAL
C(AC)=040221 040221
TIME PC MA SC FE AR MQ BR
IT0 035607 035607 0 0 251500040225 0 000000040225
IT1 035607 0 0 0 251500040225 0 000000040225
AT3 035607 0 0 0 000000040225 0 251500040225
AT6 035607 040225 0 0 000000040225 0 251500040225
FT1A 035607 040225 0 0 000000040225 0 000000040225
FT2 035607 040225 0 0 0 0 000000040225
FT2RQ 035607 040225 0 0 040221040221 0 000000040225
FT3 035607 040225 0 0 040221040221 0 000000040225
FT6 035607 040225 0 0 040221040221 0 000000040225
FT7 035607 040221 0 0 777777777777 040221040221 000000040225
FT4RQ 035607 040221 0 0 777777777777 040221040221 000000040225
FT4A 035607 040221 0 0 040221040221 777777777777 000000040225
FT9 035607 040221 0 0 040221040221 777777777777 000000040225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 18
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0459
ET0 035607 040221 0 0 040221040221 777777777777 000000040225
ET1 035607 040221 0 0 040221040221 777777777777 000000040225
ET2 035607 040221 0 0 777777777777 040222040222 000000040225
BLTT1 035607 040221 0 0 000000040222 040222040222 000000040225
BLTT3 035607 040221 0 0 040222040222 0 000000040225
FT6 035607 040221 0 0 040222040222 0 000000040225
FT7 035607 040222 0 0 777777777777 040222040222 000000040225
FT4RQ 035607 040222 0 0 777777777777 040222040222 000000040225
FT4A 035607 040222 0 0 040222040222 777777777777 000000040225
FT9 035607 040222 0 0 040222040222 777777777777 000000040225
ET0 035607 040222 0 0 040222040222 777777777777 000000040225
ET1 035607 040222 0 0 040222040222 777777777777 000000040225
ET2 035607 040222 0 0 777777777777 040223040223 000000040225
BLTT1 035607 040222 0 0 000000040223 040223040223 000000040225
BLTT3 035607 040222 0 0 040223040223 0 000000040225
FT6 035607 040222 0 0 040223040223 0 000000040225
FT7 035607 040223 0 0 777777777777 040223040223 000000040225
FT4RQ 035607 040223 0 0 777777777777 040223040223 000000040225
FT4A 035607 040223 0 0 040223040223 777777777777 000000040225
FT9 035607 040223 0 0 040223040223 777777777777 000000040225
ET0 035607 040223 0 0 040223040223 777777777777 000000040225
ET1 035607 040223 0 0 040223040223 777777777777 000000040225
ET2 035607 040223 0 0 777777777777 040224040224 000000040225
BLTT1 035607 040223 0 0 000000040224 040224040224 000000040225
BLTT3 035607 040223 0 0 040224040224 0 000000040225
FT6 035607 040223 0 0 040224040224 0 000000040225
FT7 035607 040224 0 0 777777777777 040224040224 000000040225
FT4RQ 035607 040224 0 0 777777777777 040224040224 000000040225
FT4A 035607 040224 0 0 040224040224 777777777777 000000040225
FT9 035607 040224 0 0 040224040224 777777777777 000000040225
ET0 035607 040224 0 0 040224040224 777777777777 000000040225
ET1 035607 040224 0 0 040224040224 777777777777 000000040225
ET2 035607 040224 0 0 777777777777 040225040225 000000040225
BLTT1 035607 040224 0 0 000000040225 040225040225 000000040225
BLTT3 035607 040224 0 0 040225040225 0 000000040225
FT6 035607 040224 0 0 040225040225 0 000000040225
FT7 035607 040225 0 0 777777777777 040225040225 000000040225
FT4RQ 035607 040225 0 0 777777777777 040225040225 000000040225
FT4A 035607 040225 0 0 040225040225 777777777777 000000040225
FT9 035607 040225 0 0 040225040225 777777777777 000000040225
ET0 035607 040225 0 0 040225040225 777777777777 000000040225
ET1 035607 040225 0 0 040225040225 777777777777 000000040225
ET2 035607 040225 0 0 777777777777 040226040226 000000040225
BLTT1 035607 040225 0 0 000000040226 040226040226 000000040225
BLTT2 035610 040225 0 0 000000040226 040226040226 000000040225
ST9 035610 040225 0 0 000000040226 040226040226 000000040225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 19
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0460
*035653 BLT 11,040225
INITIAL
C(AC)=040221 040221
FINAL
C(AC)=040221 040221
TIME PC MA SC FE AR MQ BR
IT0 035653 035653 0 0 251440040225 0 000000040225
IT1 035653 0 0 0 251440040225 0 000000040225
AT3 035653 0 0 0 000000040225 0 251440040225
AT6 035653 040225 0 0 000000040225 0 251440040225
FT1A 035653 040225 0 0 000000040225 0 000000040225
FT2 035653 040225 0 0 0 0 000000040225
FT2RQ 035653 040225 0 0 040221040221 0 000000040225
FT3 035653 040225 0 0 040221040221 0 000000040225
FT6 035653 040225 0 0 040221040221 0 000000040225
FT7 035653 040221 0 0 230703603700 040221040221 000000040225
FT4RQ 035653 040221 0 0 230703603700 040221040221 000000040225
FT4A 035653 040221 0 0 040221040221 230703603700 000000040225
FT9 035653 040221 0 0 040221040221 230703603700 000000040225
ET0 035653 040221 0 0 040221040221 230703603700 000000040225
ET1 035653 040221 0 0 040221040221 230703603700 000000040225
ET2 035653 040221 0 0 230703603700 040222040222 000000040225
BLTT1 035653 040221 0 0 000000040222 040222040222 000000040225
BLTT3 035653 040221 0 0 040222040222 0 000000040225
FT6 035653 040221 0 0 040222040222 0 000000040225
FT7 035653 040222 0 0 230703603700 040222040222 000000040225
FT4RQ 035653 040222 0 0 230703603700 040222040222 000000040225
FT4A 035653 040222 0 0 040222040222 230703603700 000000040225
FT9 035653 040222 0 0 040222040222 230703603700 000000040225
ET0 035653 040222 0 0 040222040222 230703603700 000000040225
ET1 035653 040222 0 0 040222040222 230703603700 000000040225
ET2 035653 040222 0 0 230703603700 040223040223 000000040225
BLTT1 035653 040222 0 0 000000040223 040223040223 000000040225
BLTT3 035653 040222 0 0 040223040223 0 000000040225
FT6 035653 040222 0 0 040223040223 0 000000040225
FT7 035653 040223 0 0 230703603700 040223040223 000000040225
FT4RQ 035653 040223 0 0 230703603700 040223040223 000000040225
FT4A 035653 040223 0 0 040223040223 230703603700 000000040225
FT9 035653 040223 0 0 040223040223 230703603700 000000040225
ET0 035653 040223 0 0 040223040223 230703603700 000000040225
ET1 035653 040223 0 0 040223040223 230703603700 000000040225
ET2 035653 040223 0 0 230703603700 040224040224 000000040225
BLTT1 035653 040223 0 0 000000040224 040224040224 000000040225
BLTT3 035653 040223 0 0 040224040224 0 000000040225
FT6 035653 040223 0 0 040224040224 0 000000040225
FT7 035653 040224 0 0 230703603700 040224040224 000000040225
FT4RQ 035653 040224 0 0 230703603700 040224040224 000000040225
FT4A 035653 040224 0 0 040224040224 230703603700 000000040225
FT9 035653 040224 0 0 040224040224 230703603700 000000040225
ET0 035653 040224 0 0 040224040224 230703603700 000000040225
ET1 035653 040224 0 0 040224040224 230703603700 000000040225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 20
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0461
ET2 035653 040224 0 0 230703603700 040225040225 000000040225
BLTT1 035653 040224 0 0 000000040225 040225040225 000000040225
BLTT3 035653 040224 0 0 040225040225 0 000000040225
FT6 035653 040224 0 0 040225040225 0 000000040225
FT7 035653 040225 0 0 230703603700 040225040225 000000040225
FT4RQ 035653 040225 0 0 230703603700 040225040225 000000040225
FT4A 035653 040225 0 0 040225040225 230703603700 000000040225
FT9 035653 040225 0 0 040225040225 230703603700 000000040225
ET0 035653 040225 0 0 040225040225 230703603700 000000040225
ET1 035653 040225 0 0 040225040225 230703603700 000000040225
ET2 035653 040225 0 0 230703603700 040226040226 000000040225
BLTT1 035653 040225 0 0 000000040226 040226040226 000000040225
BLTT2 035654 040225 0 0 000000040226 040226040226 000000040225
ST9 035654 040225 0 0 000000040226 040226040226 000000040225
*035725 BLT 10,040225
INITIAL
C(AC)=040221 040221
FINAL
C(AC)=040221 040221
TIME PC MA SC FE AR MQ BR
IT0 035725 035725 0 0 251400040225 0 000000040225
IT1 035725 0 0 0 251400040225 0 000000040225
AT3 035725 0 0 0 000000040225 0 251400040225
AT6 035725 040225 0 0 000000040225 0 251400040225
FT1A 035725 040225 0 0 000000040225 0 000000040225
FT2 035725 040225 0 0 0 0 000000040225
FT2RQ 035725 040225 0 0 040221040221 0 000000040225
FT3 035725 040225 0 0 040221040221 0 000000040225
FT6 035725 040225 0 0 040221040221 0 000000040225
FT7 035725 040221 0 0 252525252525 040221040221 000000040225
FT4RQ 035725 040221 0 0 252525252525 040221040221 000000040225
FT4A 035725 040221 0 0 040221040221 252525252525 000000040225
FT9 035725 040221 0 0 040221040221 252525252525 000000040225
ET0 035725 040221 0 0 040221040221 252525252525 000000040225
ET1 035725 040221 0 0 040221040221 252525252525 000000040225
ET2 035725 040221 0 0 252525252525 040222040222 000000040225
BLTT1 035725 040221 0 0 000000040222 040222040222 000000040225
BLTT3 035725 040221 0 0 040222040222 0 000000040225
FT6 035725 040221 0 0 040222040222 0 000000040225
FT7 035725 040222 0 0 146314631463 040222040222 000000040225
FT4RQ 035725 040222 0 0 146314631463 040222040222 000000040225
FT4A 035725 040222 0 0 040222040222 146314631463 000000040225
FT9 035725 040222 0 0 040222040222 146314631463 000000040225
ET0 035725 040222 0 0 040222040222 146314631463 000000040225
ET1 035725 040222 0 0 040222040222 146314631463 000000040225
ET2 035725 040222 0 0 146314631463 040223040223 000000040225
BLTT1 035725 040222 0 0 000000040223 040223040223 000000040225
BLTT3 035725 040222 0 0 040223040223 0 000000040225
FT6 035725 040222 0 0 040223040223 0 000000040225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 21
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0462
FT7 035725 040223 0 0 070707070707 040223040223 000000040225
FT4RQ 035725 040223 0 0 070707070707 040223040223 000000040225
FT4A 035725 040223 0 0 040223040223 070707070707 000000040225
FT9 035725 040223 0 0 040223040223 070707070707 000000040225
ET0 035725 040223 0 0 040223040223 070707070707 000000040225
ET1 035725 040223 0 0 040223040223 070707070707 000000040225
ET2 035725 040223 0 0 070707070707 040224040224 000000040225
BLTT1 035725 040223 0 0 000000040224 040224040224 000000040225
BLTT3 035725 040223 0 0 040224040224 0 000000040225
FT6 035725 040223 0 0 040224040224 0 000000040225
FT7 035725 040224 0 0 036074170360 040224040224 000000040225
FT4RQ 035725 040224 0 0 036074170360 040224040224 000000040225
FT4A 035725 040224 0 0 040224040224 036074170360 000000040225
FT9 035725 040224 0 0 040224040224 036074170360 000000040225
ET0 035725 040224 0 0 040224040224 036074170360 000000040225
ET1 035725 040224 0 0 040224040224 036074170360 000000040225
ET2 035725 040224 0 0 036074170360 040225040225 000000040225
BLTT1 035725 040224 0 0 000000040225 040225040225 000000040225
BLTT3 035725 040224 0 0 040225040225 0 000000040225
FT6 035725 040224 0 0 040225040225 0 000000040225
FT7 035725 040225 0 0 017407603701 040225040225 000000040225
FT4RQ 035725 040225 0 0 017407603701 040225040225 000000040225
FT4A 035725 040225 0 0 040225040225 017407603701 000000040225
FT9 035725 040225 0 0 040225040225 017407603701 000000040225
ET0 035725 040225 0 0 040225040225 017407603701 000000040225
ET1 035725 040225 0 0 040225040225 017407603701 000000040225
ET2 035725 040225 0 0 017407603701 040226040226 000000040225
BLTT1 035725 040225 0 0 000000040226 040226040226 000000040225
BLTT2 035726 040225 0 0 000000040226 040226040226 000000040225
ST9 035726 040225 0 0 000000040226 040226040226 000000040225
*035771 BLT 14,000005
INITIAL
C(AC)=000002 000001
FINAL
C(AC)=000002 000001
TIME PC MA SC FE AR MQ BR
IT0 035771 035771 0 0 251600000005 0 000000000005
IT1 035771 0 0 0 251600000005 0 000000000005
AT3 035771 0 0 0 000000000005 0 251600000005
AT6 035771 000005 0 0 000000000005 0 251600000005
FT1A 035771 000005 0 0 000000000005 0 000000000005
FT2 035771 000005 0 0 0 0 000000000005
FT2RQ 035771 000005 0 0 000002000001 0 000000000005
FT3 035771 000005 0 0 000002000001 0 000000000005
FT6 035771 000005 0 0 000001000002 0 000000000005
FT7 035771 000002 0 0 252525252525 000001000002 000000000005
FT4RQ 035771 000002 0 0 252525252525 000001000002 000000000005
FT4A 035771 000002 0 0 000001000002 252525252525 000000000005
FT9 035771 000002 0 0 000001000002 252525252525 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 22
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0463
ET0 035771 000002 0 0 000002000001 252525252525 000000000005
ET1 035771 000001 0 0 000002000001 252525252525 000000000005
ET2 035771 000001 0 0 252525252525 000003000002 000000000005
BLTT1 035771 000001 0 0 000000000002 000003000002 000000000005
BLTT3 035771 000001 0 0 000003000002 0 000000000005
FT6 035771 000001 0 0 000002000003 0 000000000005
FT7 035771 000003 0 0 146314631463 000002000003 000000000005
FT4RQ 035771 000003 0 0 146314631463 000002000003 000000000005
FT4A 035771 000003 0 0 000002000003 146314631463 000000000005
FT9 035771 000003 0 0 000002000003 146314631463 000000000005
ET0 035771 000003 0 0 000003000002 146314631463 000000000005
ET1 035771 000002 0 0 000003000002 146314631463 000000000005
ET2 035771 000002 0 0 146314631463 000004000003 000000000005
BLTT1 035771 000002 0 0 000000000003 000004000003 000000000005
BLTT3 035771 000002 0 0 000004000003 0 000000000005
FT6 035771 000002 0 0 000003000004 0 000000000005
FT7 035771 000004 0 0 070707070707 000003000004 000000000005
FT4RQ 035771 000004 0 0 070707070707 000003000004 000000000005
FT4A 035771 000004 0 0 000003000004 070707070707 000000000005
FT9 035771 000004 0 0 000003000004 070707070707 000000000005
ET0 035771 000004 0 0 000004000003 070707070707 000000000005
ET1 035771 000003 0 0 000004000003 070707070707 000000000005
ET2 035771 000003 0 0 070707070707 000005000004 000000000005
BLTT1 035771 000003 0 0 000000000004 000005000004 000000000005
BLTT3 035771 000003 0 0 000005000004 0 000000000005
FT6 035771 000003 0 0 000004000005 0 000000000005
FT7 035771 000005 0 0 036074170630 000004000005 000000000005
FT4RQ 035771 000005 0 0 036074170630 000004000005 000000000005
FT4A 035771 000005 0 0 000004000005 036074170630 000000000005
FT9 035771 000005 0 0 000004000005 036074170630 000000000005
ET0 035771 000005 0 0 000005000004 036074170630 000000000005
ET1 035771 000004 0 0 000005000004 036074170630 000000000005
ET2 035771 000004 0 0 036074170630 000006000005 000000000005
BLTT1 035771 000004 0 0 000000000005 000006000005 000000000005
BLTT3 035771 000004 0 0 000006000005 0 000000000005
FT6 035771 000004 0 0 000005000006 0 000000000005
FT7 035771 000006 0 0 017407603701 000005000006 000000000005
FT4RQ 035771 000006 0 0 017407603701 000005000006 000000000005
FT4A 035771 000006 0 0 000005000006 017407603701 000000000005
FT9 035771 000006 0 0 000005000006 017407603701 000000000005
ET0 035771 000006 0 0 000006000005 017407603701 000000000005
ET1 035771 000005 0 0 000006000005 017407603701 000000000005
ET2 035771 000005 0 0 017407603701 000007000006 000000000005
BLTT1 035771 000005 0 0 000000000006 000007000006 000000000005
BLTT2 035772 000005 0 0 000000000006 000007000006 000000000005
ST9 035772 000005 0 0 000000000006 000007000006 000000000005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 23
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0464
*036037 BLT 6,040225
INITIAL
C(AC)=040222 040221
FINAL
C(AC)=040222 040221
TIME PC MA SC FE AR MQ BR
IT0 036037 036037 0 0 251300040225 0 000000040225
IT1 036037 0 0 0 251300040225 0 000000040225
AT3 036037 0 0 0 000000040225 0 251300040225
AT6 036037 040225 0 0 000000040225 0 251300040225
FT1A 036037 040225 0 0 000000040225 0 000000040225
FT2 036037 040225 0 0 0 0 000000040225
FT2RQ 036037 040225 0 0 040222040221 0 000000040225
FT3 036037 040225 0 0 040222040221 0 000000040225
FT6 036037 040225 0 0 040221040222 0 000000040225
FT7 036037 040222 0 0 252525252525 040221040222 000000040225
FT4RQ 036037 040222 0 0 252525252525 040221040222 000000040225
FT4A 036037 040222 0 0 040221040222 252525252525 000000040225
FT9 036037 040222 0 0 040221040222 252525252525 000000040225
ET0 036037 040222 0 0 040222040221 252525252525 000000040225
ET1 036037 040221 0 0 040222040221 252525252525 000000040225
ET2 036037 040221 0 0 252525252525 040223040222 000000040225
BLTT1 036037 040221 0 0 000000040222 040223040222 000000040225
BLTT3 036037 040221 0 0 040223040222 0 000000040225
FT6 036037 040221 0 0 040222040223 0 000000040225
FT7 036037 040223 0 0 146314631463 040222040223 000000040225
FT4RQ 036037 040223 0 0 146314631463 040222040223 000000040225
FT4A 036037 040223 0 0 040222040223 146314631463 000000040225
FT9 036037 040223 0 0 040222040223 146314631463 000000040225
ET0 036037 040223 0 0 040223040222 146314631463 000000040225
ET1 036037 040222 0 0 040223040222 146314631463 000000040225
ET2 036037 040222 0 0 146314631463 040224040223 000000040225
BLTT1 036037 040222 0 0 000000040223 040224040223 000000040225
BLTT3 036037 040222 0 0 040224040223 0 000000040225
FT6 036037 040222 0 0 040223040224 0 000000040225
FT7 036037 040224 0 0 070707070707 040223040224 000000040225
FT4RQ 036037 040224 0 0 070707070707 040223040224 000000040225
FT4A 036037 040224 0 0 040223040224 070707070707 000000040225
FT9 036037 040224 0 0 040223040224 070707070707 000000040225
ET0 036037 040224 0 0 040224040223 070707070707 000000040225
ET1 036037 040223 0 0 040224040223 070707070707 000000040225
ET2 036037 040223 0 0 070707070707 040225040224 000000040225
BLTT1 036037 040223 0 0 000000040224 040225040224 000000040225
BLTT3 036037 040223 0 0 040225040224 0 000000040225
FT6 036037 040223 0 0 040224040225 0 000000040225
FT7 036037 040225 0 0 036074170630 040224040225 000000040225
FT4RQ 036037 040225 0 0 036074170630 040224040225 000000040225
FT4A 036037 040225 0 0 040224040225 036074170630 000000040225
FT9 036037 040225 0 0 040224040225 036074170630 000000040225
ET0 036037 040225 0 0 040225040224 036074170630 000000040225
ET1 036037 040224 0 0 040225040224 036074170630 000000040225
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 24
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0465
ET2 036037 040224 0 0 036074170630 040226040225 000000040225
BLTT1 036037 040224 0 0 000000040225 040226040225 000000040225
BLTT3 036037 040224 0 0 040226040225 0 000000040225
FT6 036037 040224 0 0 040225040226 0 000000040225
FT7 036037 040226 0 0 017407603701 040225040226 000000040225
FT4RQ 036037 040226 0 0 017407603701 040225040226 000000040225
FT4A 036037 040226 0 0 040225040226 017407603701 000000040225
FT9 036037 040226 0 0 040225040226 017407603701 000000040225
ET0 036037 040226 0 0 040226040225 017407603701 000000040225
ET1 036037 040225 0 0 040226040225 017407603701 000000040225
ET2 036037 040225 0 0 017407603701 040227040226 000000040225
BLTT1 036037 040225 0 0 000000040226 040227040226 000000040225
BLTT2 036040 040225 0 0 000000040226 040227040226 000000040225
ST9 036040 040225 0 0 000000040226 040227040226 000000040225
*036106 BLT 14,000006
INITIAL
C(AC)=000001 000002
FINAL
C(AC)=000001 000002
TIME PC MA SC FE AR MQ BR
IT0 036106 036106 0 0 251600000006 0 000000000006
IT1 036106 0 0 0 251600000006 0 000000000006
AT3 036106 0 0 0 000000000006 0 251600000006
AT6 036106 000006 0 0 000000000006 0 251600000006
FT1A 036106 000006 0 0 000000000006 0 000000000006
FT2 036106 000006 0 0 0 0 000000000006
FT2RQ 036106 000006 0 0 000001000002 0 000000000006
FT3 036106 000006 0 0 000001000002 0 000000000006
FT6 036106 000006 0 0 000002000001 0 000000000006
FT7 036106 000001 0 0 252525252525 000002000001 000000000006
FT4RQ 036106 000001 0 0 252525252525 000002000001 000000000006
FT4A 036106 000001 0 0 000002000001 252525252525 000000000006
FT9 036106 000001 0 0 000002000001 252525252525 000000000006
ET0 036106 000001 0 0 000001000002 252525252525 000000000006
ET1 036106 000002 0 0 000001000002 252525252525 000000000006
ET2 036106 000002 0 0 252525252525 000002000003 000000000006
BLTT1 036106 000002 0 0 000000000003 000002000003 000000000006
BLTT3 036106 000002 0 0 000002000003 0 000000000006
FT6 036106 000002 0 0 000003000002 0 000000000006
FT7 036106 000002 0 0 252525252525 000003000002 000000000006
FT4RQ 036106 000002 0 0 252525252525 000003000002 000000000006
FT4A 036106 000002 0 0 000003000002 252525252525 000000000006
FT9 036106 000002 0 0 000003000002 252525252525 000000000006
ET0 036106 000002 0 0 000002000003 252525252525 000000000006
ET1 036106 000003 0 0 000002000003 252525252525 000000000006
ET2 036106 000003 0 0 252525252525 000003000004 000000000006
BLTT1 036106 000003 0 0 000000000004 000003000004 000000000006
BLTT3 036106 000003 0 0 000003000004 0 000000000006
FT6 036106 000003 0 0 000004000003 0 000000000006
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 25
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0466
FT7 036106 000003 0 0 252525252525 000004000003 000000000006
FT4RQ 036106 000003 0 0 252525252525 000004000003 000000000006
FT4A 036106 000003 0 0 000004000003 252525252525 000000000006
FT9 036106 000003 0 0 000004000003 252525252525 000000000006
ET0 036106 000003 0 0 000003000004 252525252525 000000000006
ET1 036106 000004 0 0 000003000004 252525252525 000000000006
ET2 036106 000004 0 0 252525252525 000004000005 000000000006
BLTT1 036106 000004 0 0 000000000005 000004000005 000000000006
BLTT3 036106 000004 0 0 000004000005 0 000000000006
FT6 036106 000004 0 0 000005000004 0 000000000006
FT7 036106 000004 0 0 252525252525 000005000004 000000000006
FT4RQ 036106 000004 0 0 252525252525 000005000004 000000000006
FT4A 036106 000004 0 0 000005000004 252525252525 000000000006
FT9 036106 000004 0 0 000005000004 252525252525 000000000006
ET0 036106 000004 0 0 000004000005 252525252525 000000000006
ET1 036106 000005 0 0 000004000005 252525252525 000000000006
ET2 036106 000005 0 0 252525252525 000005000006 000000000006
BLTT1 036106 000005 0 0 000000000006 000005000006 000000000006
BLTT3 036106 000005 0 0 000005000006 0 000000000006
FT6 036106 000005 0 0 000006000005 0 000000000006
FT7 036106 000005 0 0 252525252525 000006000005 000000000006
FT4RQ 036106 000005 0 0 252525252525 000006000005 000000000006
FT4A 036106 000005 0 0 000006000005 252525252525 000000000006
FT9 036106 000005 0 0 000006000005 252525252525 000000000006
ET0 036106 000005 0 0 000005000006 252525252525 000000000006
ET1 036106 000006 0 0 000005000006 252525252525 000000000006
ET2 036106 000006 0 0 252525252525 000006000007 000000000006
BLTT1 036106 000006 0 0 000000000007 000006000007 000000000006
BLTT2 036107 000006 0 0 000000000007 000006000007 000000000006
ST9 036107 000006 0 0 000000000007 000006000007 000000000006
*036154 BLT 4,040226
INITIAL
C(AC)=040221 040222
FINAL
C(AC)=040221 040222
TIME PC MA SC FE AR MQ BR
IT0 036154 036154 0 0 251200040226 0 000000040226
IT1 036154 0 0 0 251200040226 0 000000040226
AT3 036154 0 0 0 000000040226 0 251200040226
AT6 036154 040226 0 0 000000040226 0 251200040226
FT1A 036154 040226 0 0 000000040226 0 000000040226
FT2 036154 040226 0 0 0 0 000000040226
FT2RQ 036154 040226 0 0 040221040222 0 000000040226
FT3 036154 040226 0 0 040221040222 0 000000040226
FT6 036154 040226 0 0 040222040221 0 000000040226
FT7 036154 040221 0 0 252525252525 040222040221 000000040226
FT4RQ 036154 040221 0 0 252525252525 040222040221 000000040226
FT4A 036154 040221 0 0 040222040221 252525252525 000000040226
FT9 036154 040221 0 0 040222040221 252525252525 000000040226
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 26
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0467
ET0 036154 040221 0 0 040221040222 252525252525 000000040226
ET1 036154 040222 0 0 040221040222 252525252525 000000040226
ET2 036154 040222 0 0 252525252525 040222040223 000000040226
BLTT1 036154 040222 0 0 000000040223 040222040223 000000040226
BLTT3 036154 040222 0 0 040222040223 0 000000040226
FT6 036154 040222 0 0 040223040222 0 000000040226
FT7 036154 040222 0 0 252525252525 040223040222 000000040226
FT4RQ 036154 040222 0 0 252525252525 040223040222 000000040226
FT4A 036154 040222 0 0 040223040222 252525252525 000000040226
FT9 036154 040222 0 0 040223040222 252525252525 000000040226
ET0 036154 040222 0 0 040222040223 252525252525 000000040226
ET1 036154 040223 0 0 040222040223 252525252525 000000040226
ET2 036154 040223 0 0 252525252525 040223040224 000000040226
BLTT1 036154 040223 0 0 000000040224 040223040224 000000040226
BLTT3 036154 040223 0 0 040223040224 0 000000040226
FT6 036154 040223 0 0 040224040223 0 000000040226
FT7 036154 040223 0 0 252525252525 040224040223 000000040226
FT4RQ 036154 040223 0 0 252525252525 040224040223 000000040226
FT4A 036154 040223 0 0 040224040223 252525252525 000000040226
FT9 036154 040223 0 0 040224040223 252525252525 000000040226
ET0 036154 040223 0 0 040223040224 252525252525 000000040226
ET1 036154 040224 0 0 040223040224 252525252525 000000040226
ET2 036154 040224 0 0 252525252525 040224040225 000000040226
BLTT1 036154 040224 0 0 000000040225 040224040225 000000040226
BLTT3 036154 040224 0 0 040224040225 0 000000040226
FT6 036154 040224 0 0 040225040224 0 000000040226
FT7 036154 040224 0 0 252525252525 040225040224 000000040226
FT4RQ 036154 040224 0 0 252525252525 040225040224 000000040226
FT4A 036154 040224 0 0 040225040224 252525252525 000000040226
FT9 036154 040224 0 0 040225040224 252525252525 000000040226
ET0 036154 040224 0 0 040224040225 252525252525 000000040226
ET1 036154 040225 0 0 040224040225 252525252525 000000040226
ET2 036154 040225 0 0 252525252525 040225040226 000000040226
BLTT1 036154 040225 0 0 000000040226 040225040226 000000040226
BLTT3 036154 040225 0 0 040225040226 0 000000040226
FT6 036154 040225 0 0 040226040225 0 000000040226
FT7 036154 040225 0 0 252525252525 040226040225 000000040226
FT4RQ 036154 040225 0 0 252525252525 040226040225 000000040226
FT4A 036154 040225 0 0 040226040225 252525252525 000000040226
FT9 036154 040225 0 0 040226040225 252525252525 000000040226
ET0 036154 040225 0 0 040225040226 252525252525 000000040226
ET1 036154 040226 0 0 040225040226 252525252525 000000040226
ET2 036154 040226 0 0 252525252525 040226040227 000000040226
BLTT1 036154 040226 0 0 000000040227 040226040227 000000040226
BLTT2 036155 040226 0 0 000000040227 040226040227 000000040226
ST9 036155 040226 0 0 000000040227 040226040227 000000040226
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 27
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0468
*036261 BLT 14,040232
INITIAL
C(AC)=000001 040221
FINAL
C(AC)=000001 040221
TIME PC MA SC FE AR MQ BR
IT0 036261 036261 0 0 251600040232 0 000000040232
IT1 036261 0 0 0 251600040232 0 000000040232
AT3 036261 0 0 0 000000040232 0 251600040232
AT6 036261 040232 0 0 000000040232 0 251600040232
FT1A 036261 040232 0 0 000000040232 0 000000040232
FT2 036261 040232 0 0 0 0 000000040232
FT2RQ 036261 040232 0 0 000001040221 0 000000040232
FT3 036261 040232 0 0 000001040221 0 000000040232
FT6 036261 040232 0 0 040221000001 0 000000040232
FT7 036261 000001 0 0 252525252525 040221000001 000000040232
FT4RQ 036261 000001 0 0 252525252525 040221000001 000000040232
FT4A 036261 000001 0 0 040221000001 252525252525 000000040232
FT9 036261 000001 0 0 040221000001 252525252525 000000040232
ET0 036261 000001 0 0 000001040221 252525252525 000000040232
ET1 036261 040221 0 0 000001040221 252525252525 000000040232
ET2 036261 040221 0 0 252525252525 000002040222 000000040232
BLTT1 036261 040221 0 0 000000040222 000002040222 000000040232
BLTT3 036261 040221 0 0 000002040222 0 000000040232
FT6 036261 040221 0 0 040222000002 0 000000040232
FT7 036261 000002 0 0 146314631463 040222000002 000000040232
FT4RQ 036261 000002 0 0 146314631463 040222000002 000000040232
FT4A 036261 000002 0 0 040222000002 146314631463 000000040232
FT9 036261 000002 0 0 040222000002 146314631463 000000040232
ET0 036261 000002 0 0 000002040222 146314631463 000000040232
ET1 036261 040222 0 0 000002040222 146314631463 000000040232
ET2 036261 040222 0 0 146314631463 000003040223 000000040232
BLTT1 036261 040222 0 0 000000040223 000003040223 000000040232
BLTT3 036261 040222 0 0 000003040223 0 000000040232
FT6 036261 040222 0 0 040223000003 0 000000040232
FT7 036261 000003 0 0 070707070707 040223000003 000000040232
FT4RQ 036261 000003 0 0 070707070707 040223000003 000000040232
FT4A 036261 000003 0 0 040223000003 070707070707 000000040232
FT9 036261 000003 0 0 040223000003 070707070707 000000040232
ET0 036261 000003 0 0 000003040223 070707070707 000000040232
ET1 036261 040223 0 0 000003040223 070707070707 000000040232
ET2 036261 040223 0 0 070707070707 000004040224 000000040232
BLTT1 036261 040223 0 0 000000040224 000004040224 000000040232
BLTT3 036261 040223 0 0 000004040224 0 000000040232
FT6 036261 040223 0 0 040224000004 0 000000040232
FT7 036261 000004 0 0 036074170630 040224000004 000000040232
FT4RQ 036261 000004 0 0 036074170630 040224000004 000000040232
FT4A 036261 000004 0 0 040224000004 036074170630 000000040232
FT9 036261 000004 0 0 040224000004 036074170630 000000040232
ET0 036261 000004 0 0 000004040224 036074170630 000000040232
ET1 036261 040224 0 0 000004040224 036074170630 000000040232
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 28
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0469
ET2 036261 040224 0 0 036074170630 000005040225 000000040232
BLTT1 036261 040224 0 0 000000040225 000005040225 000000040232
BLTT3 036261 040224 0 0 000005040225 0 000000040232
FT6 036261 040224 0 0 040225000005 0 000000040232
FT7 036261 000005 0 0 017407603701 040225000005 000000040232
FT4RQ 036261 000005 0 0 017407603701 040225000005 000000040232
FT4A 036261 000005 0 0 040225000005 017407603701 000000040232
FT9 036261 000005 0 0 040225000005 017407603701 000000040232
ET0 036261 000005 0 0 000005040225 017407603701 000000040232
ET1 036261 040225 0 0 000005040225 017407603701 000000040232
ET2 036261 040225 0 0 017407603701 000006040226 000000040232
BLTT1 036261 040225 0 0 000000040226 000006040226 000000040232
BLTT3 036261 040225 0 0 000006040226 0 000000040232
FT6 036261 040225 0 0 040226000006 0 000000040232
FT7 036261 000006 0 0 007700770077 040226000006 000000040232
FT4RQ 036261 000006 0 0 007700770077 040226000006 000000040232
FT4A 036261 000006 0 0 040226000006 007700770077 000000040232
FT9 036261 000006 0 0 040226000006 007700770077 000000040232
ET0 036261 000006 0 0 000006040226 007700770077 000000040232
ET1 036261 040226 0 0 000006040226 007700770077 000000040232
ET2 036261 040226 0 0 007700770077 000007040227 000000040232
BLTT1 036261 040226 0 0 000000040227 000007040227 000000040232
BLTT3 036261 040226 0 0 000007040227 0 000000040232
FT6 036261 040226 0 0 040227000007 0 000000040232
FT7 036261 000007 0 0 003760077401 040227000007 000000040232
FT4RQ 036261 000007 0 0 003760077401 040227000007 000000040232
FT4A 036261 000007 0 0 040227000007 003760077401 000000040232
FT9 036261 000007 0 0 040227000007 003760077401 000000040232
ET0 036261 000007 0 0 000007040227 003760077401 000000040232
ET1 036261 040227 0 0 000007040227 003760077401 000000040232
ET2 036261 040227 0 0 003760077401 000010040230 000000040232
BLTT1 036261 040227 0 0 000000040230 000010040230 000000040232
BLTT3 036261 040227 0 0 000010040230 0 000000040232
FT6 036261 040227 0 0 040230000010 0 000000040232
FT7 036261 000010 0 0 001774007760 040230000010 000000040232
FT4RQ 036261 000010 0 0 001774007760 040230000010 000000040232
FT4A 036261 000010 0 0 040230000010 001774007760 000000040232
FT9 036261 000010 0 0 040230000010 001774007760 000000040232
ET0 036261 000010 0 0 000010040230 001774007760 000000040232
ET1 036261 040230 0 0 000010040230 001774007760 000000040232
ET2 036261 040230 0 0 001774007760 000011040231 000000040232
BLTT1 036261 040230 0 0 000000040231 000011040231 000000040232
BLTT3 036261 040230 0 0 000011040231 0 000000040232
FT6 036261 040230 0 0 040231000011 0 000000040232
FT7 036261 000011 0 0 000777000777 040231000011 000000040232
FT4RQ 036261 000011 0 0 000777000777 040231000011 000000040232
FT4A 036261 000011 0 0 040231000011 000777000777 000000040232
FT9 036261 000011 0 0 040231000011 000777000777 000000040232
ET0 036261 000011 0 0 000011040231 000777000777 000000040232
ET1 036261 040231 0 0 000011040231 000777000777 000000040232
ET2 036261 040231 0 0 000777000777 000012040232 000000040232
BLTT1 036261 040231 0 0 000000040232 000012040232 000000040232
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 29
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0470
BLTT3 036261 040231 0 0 000012040232 0 000000040232
FT6 036261 040231 0 0 040232000012 0 000000040232
FT7 036261 000012 0 0 000377600077 040232000012 000000040232
FT4RQ 036261 000012 0 0 000377600077 040232000012 000000040232
FT4A 036261 000012 0 0 040232000012 000377600077 000000040232
FT9 036261 000012 0 0 040232000012 000377600077 000000040232
ET0 036261 000012 0 0 000012040232 000377600077 000000040232
ET1 036261 040232 0 0 000012040232 000377600077 000000040232
ET2 036261 040232 0 0 000377600077 000013040233 000000040232
BLTT1 036261 040232 0 0 000000040233 000013040233 000000040232
BLTT2 036262 040232 0 0 000000040233 000013040233 000000040232
ST9 036262 040232 0 0 000000040233 000013040233 000000040232
*036430 BLT 14,000012
INITIAL
C(AC)=040221 000001
FINAL
C(AC)=040221 000001
TIME PC MA SC FE AR MQ BR
IT0 036430 036430 0 0 251600000012 0 000000000012
IT1 036430 0 0 0 251600000012 0 000000000012
AT3 036430 0 0 0 000000000012 0 251600000012
AT6 036430 000012 0 0 000000000012 0 251600000012
FT1A 036430 000012 0 0 000000000012 0 000000000012
FT2 036430 000012 0 0 0 0 000000000012
FT2RQ 036430 000012 0 0 040221000001 0 000000000012
FT3 036430 000012 0 0 040221000001 0 000000000012
FT6 036430 000012 0 0 000001040221 0 000000000012
FT7 036430 040221 0 0 252525252525 000001040221 000000000012
FT4RQ 036430 040221 0 0 252525252525 000001040221 000000000012
FT4A 036430 040221 0 0 000001040221 252525252525 000000000012
FT9 036430 040221 0 0 000001040221 252525252525 000000000012
ET0 036430 040221 0 0 040221000001 252525252525 000000000012
ET1 036430 000001 0 0 040221000001 252525252525 000000000012
ET2 036430 000001 0 0 252525252525 040222000002 000000000012
BLTT1 036430 000001 0 0 000000000002 040222000002 000000000012
BLTT3 036430 000001 0 0 040222000002 0 000000000012
FT6 036430 000001 0 0 000002040222 0 000000000012
FT7 036430 040222 0 0 146314631463 000002040222 000000000012
FT4RQ 036430 040222 0 0 146314631463 000002040222 000000000012
FT4A 036430 040222 0 0 000002040222 146314631463 000000000012
FT9 036430 040222 0 0 000002040222 146314631463 000000000012
ET0 036430 040222 0 0 040222000002 146314631463 000000000012
ET1 036430 000002 0 0 040222000002 146314631463 000000000012
ET2 036430 000002 0 0 146314631463 040223000003 000000000012
BLTT1 036430 000002 0 0 000000000003 040223000003 000000000012
BLTT3 036430 000002 0 0 040223000003 0 000000000012
FT6 036430 000002 0 0 000003040223 0 000000000012
FT7 036430 040223 0 0 070707070707 000003040223 000000000012
FT4RQ 036430 040223 0 0 070707070707 000003040223 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 30
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0471
FT4A 036430 040223 0 0 000003040223 070707070707 000000000012
FT9 036430 040223 0 0 000003040223 070707070707 000000000012
ET0 036430 040223 0 0 040223000003 070707070707 000000000012
ET1 036430 000003 0 0 040223000003 070707070707 000000000012
ET2 036430 000003 0 0 070707070707 040224000004 000000000012
BLTT1 036430 000003 0 0 000000000004 040224000004 000000000012
BLTT3 036430 000003 0 0 040224000004 0 000000000012
FT6 036430 000003 0 0 000004040224 0 000000000012
FT7 036430 040224 0 0 036074170630 000004040224 000000000012
FT4RQ 036430 040224 0 0 036074170630 000004040224 000000000012
FT4A 036430 040224 0 0 000004040224 036074170630 000000000012
FT9 036430 040224 0 0 000004040224 036074170630 000000000012
ET0 036430 040224 0 0 040224000004 036074170630 000000000012
ET1 036430 000004 0 0 040224000004 036074170630 000000000012
ET2 036430 000004 0 0 036074170630 040225000005 000000000012
BLTT1 036430 000004 0 0 000000000005 040225000005 000000000012
BLTT3 036430 000004 0 0 040225000005 0 000000000012
FT6 036430 000004 0 0 000005040225 0 000000000012
FT7 036430 040225 0 0 017407603701 000005040225 000000000012
FT4RQ 036430 040225 0 0 017407603701 000005040225 000000000012
FT4A 036430 040225 0 0 000005040225 017407603701 000000000012
FT9 036430 040225 0 0 000005040225 017407603701 000000000012
ET0 036430 040225 0 0 040225000005 017407603701 000000000012
ET1 036430 000005 0 0 040225000005 017407603701 000000000012
ET2 036430 000005 0 0 017407603701 040226000006 000000000012
BLTT1 036430 000005 0 0 000000000006 040226000006 000000000012
BLTT3 036430 000005 0 0 040226000006 0 000000000012
FT6 036430 000005 0 0 000006040226 0 000000000012
FT7 036430 040226 0 0 007700770077 000006040226 000000000012
FT4RQ 036430 040226 0 0 007700770077 000006040226 000000000012
FT4A 036430 040226 0 0 000006040226 007700770077 000000000012
FT9 036430 040226 0 0 000006040226 007700770077 000000000012
ET0 036430 040226 0 0 040226000006 007700770077 000000000012
ET1 036430 000006 0 0 040226000006 007700770077 000000000012
ET2 036430 000006 0 0 007700770077 040227000007 000000000012
BLTT1 036430 000006 0 0 000000000007 040227000007 000000000012
BLTT3 036430 000006 0 0 040227000007 0 000000000012
FT6 036430 000006 0 0 000007040227 0 000000000012
FT7 036430 040227 0 0 003760077401 000007040227 000000000012
FT4RQ 036430 040227 0 0 003760077401 000007040227 000000000012
FT4A 036430 040227 0 0 000007040227 003760077401 000000000012
FT9 036430 040227 0 0 000007040227 003760077401 000000000012
ET0 036430 040227 0 0 040227000007 003760077401 000000000012
ET1 036430 000007 0 0 040227000007 003760077401 000000000012
ET2 036430 000007 0 0 003760077401 040230000010 000000000012
BLTT1 036430 000007 0 0 000000000010 040230000010 000000000012
BLTT3 036430 000007 0 0 040230000010 0 000000000012
FT6 036430 000007 0 0 000010040230 0 000000000012
FT7 036430 040230 0 0 001774007760 000010040230 000000000012
FT4RQ 036430 040230 0 0 001774007760 000010040230 000000000012
FT4A 036430 040230 0 0 000010040230 001774007760 000000000012
FT9 036430 040230 0 0 000010040230 001774007760 000000000012
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 31
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0472
ET0 036430 040230 0 0 040230000010 001774007760 000000000012
ET1 036430 000010 0 0 040230000010 001774007760 000000000012
ET2 036430 000010 0 0 001774007760 040231000011 000000000012
BLTT1 036430 000010 0 0 000000000011 040231000011 000000000012
BLTT3 036430 000010 0 0 040231000011 0 000000000012
FT6 036430 000010 0 0 000011040231 0 000000000012
FT7 036430 040231 0 0 000777000777 000011040231 000000000012
FT4RQ 036430 040231 0 0 000777000777 000011040231 000000000012
FT4A 036430 040231 0 0 000011040231 000777000777 000000000012
FT9 036430 040231 0 0 000011040231 000777000777 000000000012
ET0 036430 040231 0 0 040231000011 000777000777 000000000012
ET1 036430 000011 0 0 040231000011 000777000777 000000000012
ET2 036430 000011 0 0 000777000777 040232000012 000000000012
BLTT1 036430 000011 0 0 000000000012 040232000012 000000000012
BLTT3 036430 000011 0 0 040232000012 0 000000000012
FT6 036430 000011 0 0 000012040232 0 000000000012
FT7 036430 040232 0 0 000377600077 000012040232 000000000012
FT4RQ 036430 040232 0 0 000377600077 000012040232 000000000012
FT4A 036430 040232 0 0 000012040232 000377600077 000000000012
FT9 036430 040232 0 0 000012040232 000377600077 000000000012
ET0 036430 040232 0 0 040232000012 000377600077 000000000012
ET1 036430 000012 0 0 040232000012 000377600077 000000000012
ET2 036430 000012 0 0 000377600077 040233000013 000000000012
BLTT1 036430 000012 0 0 000000000013 040233000013 000000000012
BLTT2 036431 000012 0 0 000000000013 040233000013 000000000012
ST9 036431 000012 0 0 000000000013 040233000013 000000000012
*036547 BLT 10,041227
INITIAL
C(AC)=041224 041230
FINAL
C(AC)=041224 041230
TIME PC MA SC FE AR MQ BR
IT0 036547 036547 0 0 251400041227 0 000000041227
IT1 036547 0 0 0 251400041227 0 000000041227
AT3 036547 0 0 0 000000041227 0 251400041227
AT6 036547 041227 0 0 000000041227 0 251400041227
FT1A 036547 041227 0 0 000000041227 0 000000041227
FT2 036547 041227 0 0 0 0 000000041227
FT2RQ 036547 041227 0 0 041224041230 0 000000041227
FT3 036547 041227 0 0 041224041230 0 000000041227
FT6 036547 041227 0 0 041230041224 0 000000041227
FT7 036547 041224 0 0 707070707070 041230041224 000000041227
FT4RQ 036547 041224 0 0 707070707070 041230041224 000000041227
FT4A 036547 041224 0 0 041230041224 707070707070 000000041227
FT9 036547 041224 0 0 041230041224 707070707070 000000041227
ET0 036547 041224 0 0 041224041230 707070707070 000000041227
ET1 036547 041230 0 0 041224041230 707070707070 000000041227
ET2 036547 041230 0 0 707070707070 041225041231 000000041227
BLTT1 036547 041230 0 0 000000041231 041225041231 000000041227
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 32
DAKAM 000000 000000 777000 000000 251000 000000 030000 777777 SEQ 0473
BLTT2 036550 041230 0 0 000000041231 041225041231 000000041227
ST9 036550 041230 0 0 000000041231 041225041231 000000041227
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 1
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0474
*036605 JFFO 0,036607
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036605 036605 0 0 243000036607 0 000000036607
IT1 036605 0 0 0 243000036607 0 000000036607
AT3 036605 0 0 0 000000036607 0 243000036607
AT6 036605 036607 0 0 000000036607 0 243000036607
FT1A 036605 036607 0 0 000000036607 0 000000036607
FT2 036605 036607 0 0 0 0 000000036607
FT2RQ 036605 036607 0 0 0 0 000000036607
FT3 036605 036607 0 0 0 0 000000036607
FT9 036606 036607 0 0 0 0 000000036607
ST0 036606 036607 0 0 0 0 000000036607
ST1 036606 036607 0 0 0 0 000000036607
ST2 036606 036607 0 0 0 0 000000036607
ST9 036606 036607 0 0 0 0 000000036607
*036623 JFFO 1,036625
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036623 036623 0 0 243040036625 0 000000036625
IT1 036623 0 0 0 243040036625 0 000000036625
AT3 036623 0 0 0 000000036625 0 243040036625
AT6 036623 036625 0 0 000000036625 0 243040036625
FT1A 036623 036625 0 0 000000036625 0 000000036625
FT2 036623 036625 0 0 0 0 000000036625
FT2RQ 036623 036625 0 0 0 0 000000036625
FT3 036623 036625 0 0 0 0 000000036625
FT9 036624 036625 0 0 0 0 000000036625
ST0 036624 036625 0 0 0 0 000000036625
ST1 036624 036625 0 0 0 0 000000036625
ST2 036624 036625 0 0 0 0 000000036625
ST9 036624 036625 0 0 0 0 000000036625
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 2
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0475
*036641 JFFO 2,036643
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036641 036641 0 0 243100036643 0 000000036643
IT1 036641 0 0 0 243100036643 0 000000036643
AT3 036641 0 0 0 000000036643 0 243100036643
AT6 036641 036643 0 0 000000036643 0 243100036643
FT1A 036641 036643 0 0 000000036643 0 000000036643
FT2 036641 036643 0 0 0 0 000000036643
FT2RQ 036641 036643 0 0 0 0 000000036643
FT3 036641 036643 0 0 0 0 000000036643
FT9 036642 036643 0 0 0 0 000000036643
ST0 036642 036643 0 0 0 0 000000036643
ST1 036642 036643 0 0 0 0 000000036643
ST2 036642 036643 0 0 0 0 000000036643
ST9 036642 036643 0 0 0 0 000000036643
*036657 JFFO 3,036661
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036657 036657 0 0 243140036661 0 000000036661
IT1 036657 0 0 0 243140036661 0 000000036661
AT3 036657 0 0 0 000000036661 0 243140036661
AT6 036657 036661 0 0 000000036661 0 243140036661
FT1A 036657 036661 0 0 000000036661 0 000000036661
FT2 036657 036661 0 0 0 0 000000036661
FT2RQ 036657 036661 0 0 0 0 000000036661
FT3 036657 036661 0 0 0 0 000000036661
FT9 036660 036661 0 0 0 0 000000036661
ST0 036660 036661 0 0 0 0 000000036661
ST1 036660 036661 0 0 0 0 000000036661
ST2 036660 036661 0 0 0 0 000000036661
ST9 036660 036661 0 0 0 0 000000036661
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 3
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0476
*036675 JFFO 4,036677
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036675 036675 0 0 243200036677 0 000000036677
IT1 036675 0 0 0 243200036677 0 000000036677
AT3 036675 0 0 0 000000036677 0 243200036677
AT6 036675 036677 0 0 000000036677 0 243200036677
FT1A 036675 036677 0 0 000000036677 0 000000036677
FT2 036675 036677 0 0 0 0 000000036677
FT2RQ 036675 036677 0 0 0 0 000000036677
FT3 036675 036677 0 0 0 0 000000036677
FT9 036676 036677 0 0 0 0 000000036677
ST0 036676 036677 0 0 0 0 000000036677
ST1 036676 036677 0 0 0 0 000000036677
ST2 036676 036677 0 0 0 0 000000036677
ST9 036676 036677 0 0 0 0 000000036677
*036713 JFFO 5,036715
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036713 036713 0 0 243240036715 0 000000036715
IT1 036713 0 0 0 243240036715 0 000000036715
AT3 036713 0 0 0 000000036715 0 243240036715
AT6 036713 036715 0 0 000000036715 0 243240036715
FT1A 036713 036715 0 0 000000036715 0 000000036715
FT2 036713 036715 0 0 0 0 000000036715
FT2RQ 036713 036715 0 0 0 0 000000036715
FT3 036713 036715 0 0 0 0 000000036715
FT9 036714 036715 0 0 0 0 000000036715
ST0 036714 036715 0 0 0 0 000000036715
ST1 036714 036715 0 0 0 0 000000036715
ST2 036714 036715 0 0 0 0 000000036715
ST9 036714 036715 0 0 0 0 000000036715
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 4
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0477
*036731 JFFO 6,036733
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036731 036731 0 0 243300036733 0 000000036733
IT1 036731 0 0 0 243300036733 0 000000036733
AT3 036731 0 0 0 000000036733 0 243300036733
AT6 036731 036733 0 0 000000036733 0 243300036733
FT1A 036731 036733 0 0 000000036733 0 000000036733
FT2 036731 036733 0 0 0 0 000000036733
FT2RQ 036731 036733 0 0 0 0 000000036733
FT3 036731 036733 0 0 0 0 000000036733
FT9 036732 036733 0 0 0 0 000000036733
ST0 036732 036733 0 0 0 0 000000036733
ST1 036732 036733 0 0 0 0 000000036733
ST2 036732 036733 0 0 0 0 000000036733
ST9 036732 036733 0 0 0 0 000000036733
*036747 JFFO 7,036751
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036747 036747 0 0 243340036751 0 000000036751
IT1 036747 0 0 0 243340036751 0 000000036751
AT3 036747 0 0 0 000000036751 0 243340036751
AT6 036747 036751 0 0 000000036751 0 243340036751
FT1A 036747 036751 0 0 000000036751 0 000000036751
FT2 036747 036751 0 0 0 0 000000036751
FT2RQ 036747 036751 0 0 0 0 000000036751
FT3 036747 036751 0 0 0 0 000000036751
FT9 036750 036751 0 0 0 0 000000036751
ST0 036750 036751 0 0 0 0 000000036751
ST1 036750 036751 0 0 0 0 000000036751
ST2 036750 036751 0 0 0 0 000000036751
ST9 036750 036751 0 0 0 0 000000036751
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 5
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0478
*036765 JFFO 10,036767
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 036765 036765 0 0 243400036767 0 000000036767
IT1 036765 0 0 0 243400036767 0 000000036767
AT3 036765 0 0 0 000000036767 0 243400036767
AT6 036765 036767 0 0 000000036767 0 243400036767
FT1A 036765 036767 0 0 000000036767 0 000000036767
FT2 036765 036767 0 0 0 0 000000036767
FT2RQ 036765 036767 0 0 0 0 000000036767
FT3 036765 036767 0 0 0 0 000000036767
FT9 036766 036767 0 0 0 0 000000036767
ST0 036766 036767 0 0 0 0 000000036767
ST1 036766 036767 0 0 0 0 000000036767
ST2 036766 036767 0 0 0 0 000000036767
ST9 036766 036767 0 0 0 0 000000036767
*037003 JFFO 11,037005
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 037003 037003 0 0 243440037005 0 000000037005
IT1 037003 0 0 0 243440037005 0 000000037005
AT3 037003 0 0 0 000000037005 0 243440037005
AT6 037003 037005 0 0 000000037005 0 243440037005
FT1A 037003 037005 0 0 000000037005 0 000000037005
FT2 037003 037005 0 0 0 0 000000037005
FT2RQ 037003 037005 0 0 0 0 000000037005
FT3 037003 037005 0 0 0 0 000000037005
FT9 037004 037005 0 0 0 0 000000037005
ST0 037004 037005 0 0 0 0 000000037005
ST1 037004 037005 0 0 0 0 000000037005
ST2 037004 037005 0 0 0 0 000000037005
ST9 037004 037005 0 0 0 0 000000037005
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 6
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0479
*037021 JFFO 12,037023
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 037021 037021 0 0 243500037023 0 000000037023
IT1 037021 0 0 0 243500037023 0 000000037023
AT3 037021 0 0 0 000000037023 0 243500037023
AT6 037021 037023 0 0 000000037023 0 243500037023
FT1A 037021 037023 0 0 000000037023 0 000000037023
FT2 037021 037023 0 0 0 0 000000037023
FT2RQ 037021 037023 0 0 0 0 000000037023
FT3 037021 037023 0 0 0 0 000000037023
FT9 037022 037023 0 0 0 0 000000037023
ST0 037022 037023 0 0 0 0 000000037023
ST1 037022 037023 0 0 0 0 000000037023
ST2 037022 037023 0 0 0 0 000000037023
ST9 037022 037023 0 0 0 0 000000037023
*037037 JFFO 13,037041
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 037037 037037 0 0 243540037041 0 000000037041
IT1 037037 0 0 0 243540037041 0 000000037041
AT3 037037 0 0 0 000000037041 0 243540037041
AT6 037037 037041 0 0 000000037041 0 243540037041
FT1A 037037 037041 0 0 000000037041 0 000000037041
FT2 037037 037041 0 0 0 0 000000037041
FT2RQ 037037 037041 0 0 0 0 000000037041
FT3 037037 037041 0 0 0 0 000000037041
FT9 037040 037041 0 0 0 0 000000037041
ST0 037040 037041 0 0 0 0 000000037041
ST1 037040 037041 0 0 0 0 000000037041
ST2 037040 037041 0 0 0 0 000000037041
ST9 037040 037041 0 0 0 0 000000037041
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 7
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0480
*037055 JFFO 14,037057
INITIAL
C(AC)=000000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 037055 037055 0 0 243600037057 0 000000037057
IT1 037055 0 0 0 243600037057 0 000000037057
AT3 037055 0 0 0 000000037057 0 243600037057
AT6 037055 037057 0 0 000000037057 0 243600037057
FT1A 037055 037057 0 0 000000037057 0 000000037057
FT2 037055 037057 0 0 0 0 000000037057
FT2RQ 037055 037057 0 0 0 0 000000037057
FT3 037055 037057 0 0 0 0 000000037057
FT9 037056 037057 0 0 0 0 000000037057
ST0 037056 037057 0 0 0 0 000000037057
ST1 037056 037057 0 0 0 0 000000037057
ST2 037056 037057 0 0 0 0 000000037057
ST9 037056 037057 0 0 0 0 000000037057
*037070 JFFO 14,037072
INITIAL
C(AC)=777777 777777 C(AC+1)=777777 777777
FINAL
C(AC)=777777 777777 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 037070 037070 0 0 243600037072 0 000000037072
IT1 037070 0 0 0 243600037072 0 000000037072
AT3 037070 0 0 0 000000037072 0 243600037072
AT6 037070 037072 0 0 000000037072 0 243600037072
FT1A 037070 037072 0 0 000000037072 0 000000037072
FT2 037070 037072 0 0 0 0 000000037072
FT2RQ 037070 037072 0 0 777777777777 0 000000037072
FT3 037070 037072 0 0 777777777777 0 000000037072
FT9 037071 037072 0 0 777777777777 0 000000037072
ST0 037072 037072 0 0 0 0 000000037072
ST1 037072 037072 0 0 0 0 000000037072
ST2 037072 037072 0 0 0 0 000000037072
ST9 037072 037072 0 0 0 0 000000037072
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 8
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0481
*037102 JFFO 14,037104
INITIAL
C(AC)=400000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=400000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 037102 037102 0 0 243600037104 0 000000037104
IT1 037102 0 0 0 243600037104 0 000000037104
AT3 037102 0 0 0 000000037104 0 243600037104
AT6 037102 037104 0 0 000000037104 0 243600037104
FT1A 037102 037104 0 0 000000037104 0 000000037104
FT2 037102 037104 0 0 0 0 000000037104
FT2RQ 037102 037104 0 0 400000000000 0 000000037104
FT3 037102 037104 0 0 400000000000 0 000000037104
FT9 037103 037104 0 0 400000000000 0 000000037104
ST0 037104 037104 0 0 0 0 000000037104
ST1 037104 037104 0 0 0 0 000000037104
ST2 037104 037104 0 0 0 0 000000037104
ST9 037104 037104 0 0 0 0 000000037104
*037114 JFFO 14,037116
INITIAL
C(AC)=200000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=200000 000000 C(AC+1)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 037114 037114 0 0 243600037116 0 000000037116
IT1 037114 0 0 0 243600037116 0 000000037116
AT3 037114 0 0 0 000000037116 0 243600037116
AT6 037114 037116 0 0 000000037116 0 243600037116
FT1A 037114 037116 0 0 000000037116 0 000000037116
FT2 037114 037116 0 0 0 0 000000037116
FT2RQ 037114 037116 0 0 200000000000 0 000000037116
FT3 037114 037116 0 0 200000000000 0 000000037116
FT9 037115 037116 0 0 200000000000 0 000000037116
ST0 037116 037116 0 0 000000000001 0 000000037116
ST1 037116 037116 0 0 000000000001 0 000000037116
ST2 037116 037116 0 0 000000000001 0 000000037116
ST9 037116 037116 0 0 000000000001 0 000000037116
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 9
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0482
*037126 JFFO 14,037130
INITIAL
C(AC)=100000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=100000 000000 C(AC+1)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 037126 037126 0 0 243600037130 0 000000037130
IT1 037126 0 0 0 243600037130 0 000000037130
AT3 037126 0 0 0 000000037130 0 243600037130
AT6 037126 037130 0 0 000000037130 0 243600037130
FT1A 037126 037130 0 0 000000037130 0 000000037130
FT2 037126 037130 0 0 0 0 000000037130
FT2RQ 037126 037130 0 0 100000000000 0 000000037130
FT3 037126 037130 0 0 100000000000 0 000000037130
FT9 037127 037130 0 0 100000000000 0 000000037130
ST0 037130 037130 0 0 000000000002 0 000000037130
ST1 037130 037130 0 0 000000000002 0 000000037130
ST2 037130 037130 0 0 000000000002 0 000000037130
ST9 037130 037130 0 0 000000000002 0 000000037130
*037140 JFFO 14,037142
INITIAL
C(AC)=040000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=040000 000000 C(AC+1)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 037140 037140 0 0 243600037142 0 000000037142
IT1 037140 0 0 0 243600037142 0 000000037142
AT3 037140 0 0 0 000000037142 0 243600037142
AT6 037140 037142 0 0 000000037142 0 243600037142
FT1A 037140 037142 0 0 000000037142 0 000000037142
FT2 037140 037142 0 0 0 0 000000037142
FT2RQ 037140 037142 0 0 040000000000 0 000000037142
FT3 037140 037142 0 0 040000000000 0 000000037142
FT9 037141 037142 0 0 040000000000 0 000000037142
ST0 037142 037142 0 0 000000000003 0 000000037142
ST1 037142 037142 0 0 000000000003 0 000000037142
ST2 037142 037142 0 0 000000000003 0 000000037142
ST9 037142 037142 0 0 000000000003 0 000000037142
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 10
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0483
*037152 JFFO 14,037154
INITIAL
C(AC)=020000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=020000 000000 C(AC+1)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 037152 037152 0 0 243600037154 0 000000037154
IT1 037152 0 0 0 243600037154 0 000000037154
AT3 037152 0 0 0 000000037154 0 243600037154
AT6 037152 037154 0 0 000000037154 0 243600037154
FT1A 037152 037154 0 0 000000037154 0 000000037154
FT2 037152 037154 0 0 0 0 000000037154
FT2RQ 037152 037154 0 0 020000000000 0 000000037154
FT3 037152 037154 0 0 020000000000 0 000000037154
FT9 037153 037154 0 0 020000000000 0 000000037154
ST0 037154 037154 0 0 000000000004 0 000000037154
ST1 037154 037154 0 0 000000000004 0 000000037154
ST2 037154 037154 0 0 000000000004 0 000000037154
ST9 037154 037154 0 0 000000000004 0 000000037154
*037164 JFFO 14,037166
INITIAL
C(AC)=010000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=010000 000000 C(AC+1)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 037164 037164 0 0 243600037166 0 000000037166
IT1 037164 0 0 0 243600037166 0 000000037166
AT3 037164 0 0 0 000000037166 0 243600037166
AT6 037164 037166 0 0 000000037166 0 243600037166
FT1A 037164 037166 0 0 000000037166 0 000000037166
FT2 037164 037166 0 0 0 0 000000037166
FT2RQ 037164 037166 0 0 010000000000 0 000000037166
FT3 037164 037166 0 0 010000000000 0 000000037166
FT9 037165 037166 0 0 010000000000 0 000000037166
ST0 037166 037166 0 0 000000000005 0 000000037166
ST1 037166 037166 0 0 000000000005 0 000000037166
ST2 037166 037166 0 0 000000000005 0 000000037166
ST9 037166 037166 0 0 000000000005 0 000000037166
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 11
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0484
*037176 JFFO 14,037200
INITIAL
C(AC)=004000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=004000 000000 C(AC+1)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 037176 037176 0 0 243600037200 0 000000037200
IT1 037176 0 0 0 243600037200 0 000000037200
AT3 037176 0 0 0 000000037200 0 243600037200
AT6 037176 0 0 0 000000037200 0 243600037200
FT1A 037176 0 0 0 000000037200 0 000000037200
FT2 037176 0 0 0 0 0 000000037200
FT2RQ 037176 0 0 0 004000000000 0 000000037200
FT3 037176 0 0 0 004000000000 0 000000037200
FT9 037177 0 0 0 004000000000 0 000000037200
ST0 0 0 0 0 000000000006 0 000000037200
ST1 0 0 0 0 000000000006 0 000000037200
ST2 0 0 0 0 000000000006 0 000000037200
ST9 0 0 0 0 000000000006 0 000000037200
*037210 JFFO 14,037212
INITIAL
C(AC)=002000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=002000 000000 C(AC+1)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 037210 037210 0 0 243600037212 0 000000037212
IT1 037210 0 0 0 243600037212 0 000000037212
AT3 037210 0 0 0 000000037212 0 243600037212
AT6 037210 037212 0 0 000000037212 0 243600037212
FT1A 037210 037212 0 0 000000037212 0 000000037212
FT2 037210 037212 0 0 0 0 000000037212
FT2RQ 037210 037212 0 0 002000000000 0 000000037212
FT3 037210 037212 0 0 002000000000 0 000000037212
FT9 037211 037212 0 0 002000000000 0 000000037212
ST0 037212 037212 0 0 000000000007 0 000000037212
ST1 037212 037212 0 0 000000000007 0 000000037212
ST2 037212 037212 0 0 000000000007 0 000000037212
ST9 037212 037212 0 0 000000000007 0 000000037212
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 12
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0485
*037222 JFFO 14,037224
INITIAL
C(AC)=001000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=001000 000000 C(AC+1)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 037222 037222 0 0 243600037224 0 000000037224
IT1 037222 0 0 0 243600037224 0 000000037224
AT3 037222 0 0 0 000000037224 0 243600037224
AT6 037222 037224 0 0 000000037224 0 243600037224
FT1A 037222 037224 0 0 000000037224 0 000000037224
FT2 037222 037224 0 0 0 0 000000037224
FT2RQ 037222 037224 0 0 001000000000 0 000000037224
FT3 037222 037224 0 0 001000000000 0 000000037224
FT9 037223 037224 0 0 001000000000 0 000000037224
ST0 037224 037224 0 0 000000000010 0 000000037224
ST1 037224 037224 0 0 000000000010 0 000000037224
ST2 037224 037224 0 0 000000000010 0 000000037224
ST9 037224 037224 0 0 000000000010 0 000000037224
*037234 JFFO 14,037236
INITIAL
C(AC)=000400 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000400 000000 C(AC+1)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 037234 037234 0 0 243600037236 0 000000037236
IT1 037234 0 0 0 243600037236 0 000000037236
AT3 037234 0 0 0 000000037236 0 243600037236
AT6 037234 037236 0 0 000000037236 0 243600037236
FT1A 037234 037236 0 0 000000037236 0 000000037236
FT2 037234 037236 0 0 0 0 000000037236
FT2RQ 037234 037236 0 0 000400000000 0 000000037236
FT3 037234 037236 0 0 000400000000 0 000000037236
FT9 037235 037236 0 0 000400000000 0 000000037236
ST0 037236 037236 0 0 000000000011 0 000000037236
ST1 037236 037236 0 0 000000000011 0 000000037236
ST2 037236 037236 0 0 000000000011 0 000000037236
ST9 037236 037236 0 0 000000000011 0 000000037236
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 13
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0486
*037246 JFFO 14,037250
INITIAL
C(AC)=000200 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000200 000000 C(AC+1)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 037246 037246 0 0 243600037250 0 000000037250
IT1 037246 0 0 0 243600037250 0 000000037250
AT3 037246 0 0 0 000000037250 0 243600037250
AT6 037246 037250 0 0 000000037250 0 243600037250
FT1A 037246 037250 0 0 000000037250 0 000000037250
FT2 037246 037250 0 0 0 0 000000037250
FT2RQ 037246 037250 0 0 000200000000 0 000000037250
FT3 037246 037250 0 0 000200000000 0 000000037250
FT9 037247 037250 0 0 000200000000 0 000000037250
ST0 037250 037250 0 0 000000000012 0 000000037250
ST1 037250 037250 0 0 000000000012 0 000000037250
ST2 037250 037250 0 0 000000000012 0 000000037250
ST9 037250 037250 0 0 000000000012 0 000000037250
*037260 JFFO 14,037262
INITIAL
C(AC)=000100 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000100 000000 C(AC+1)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 037260 037260 0 0 243600037262 0 000000037262
IT1 037260 0 0 0 243600037262 0 000000037262
AT3 037260 0 0 0 000000037262 0 243600037262
AT6 037260 037262 0 0 000000037262 0 243600037262
FT1A 037260 037262 0 0 000000037262 0 000000037262
FT2 037260 037262 0 0 0 0 000000037262
FT2RQ 037260 037262 0 0 000100000000 0 000000037262
FT3 037260 037262 0 0 000100000000 0 000000037262
FT9 037261 037262 0 0 000100000000 0 000000037262
ST0 037262 037262 0 0 000000000013 0 000000037262
ST1 037262 037262 0 0 000000000013 0 000000037262
ST2 037262 037262 0 0 000000000013 0 000000037262
ST9 037262 037262 0 0 000000000013 0 000000037262
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 14
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0487
*037272 JFFO 14,037274
INITIAL
C(AC)=000040 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000040 000000 C(AC+1)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 037272 037272 0 0 243600037274 0 000000037274
IT1 037272 0 0 0 243600037274 0 000000037274
AT3 037272 0 0 0 000000037274 0 243600037274
AT6 037272 037274 0 0 000000037274 0 243600037274
FT1A 037272 037274 0 0 000000037274 0 000000037274
FT2 037272 037274 0 0 0 0 000000037274
FT2RQ 037272 037274 0 0 000040000000 0 000000037274
FT3 037272 037274 0 0 000040000000 0 000000037274
FT9 037273 037274 0 0 000040000000 0 000000037274
ST0 037274 037274 0 0 000000000014 0 000000037274
ST1 037274 037274 0 0 000000000014 0 000000037274
ST2 037274 037274 0 0 000000000014 0 000000037274
ST9 037274 037274 0 0 000000000014 0 000000037274
*037304 JFFO 14,037306
INITIAL
C(AC)=000020 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000020 000000 C(AC+1)=000000 000015
TIME PC MA SC FE AR MQ BR
IT0 037304 037304 0 0 243600037306 0 000000037306
IT1 037304 0 0 0 243600037306 0 000000037306
AT3 037304 0 0 0 000000037306 0 243600037306
AT6 037304 037306 0 0 000000037306 0 243600037306
FT1A 037304 037306 0 0 000000037306 0 000000037306
FT2 037304 037306 0 0 0 0 000000037306
FT2RQ 037304 037306 0 0 000020000000 0 000000037306
FT3 037304 037306 0 0 000020000000 0 000000037306
FT9 037305 037306 0 0 000020000000 0 000000037306
ST0 037306 037306 0 0 000000000015 0 000000037306
ST1 037306 037306 0 0 000000000015 0 000000037306
ST2 037306 037306 0 0 000000000015 0 000000037306
ST9 037306 037306 0 0 000000000015 0 000000037306
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 15
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0488
*037316 JFFO 14,037320
INITIAL
C(AC)=000010 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000010 000000 C(AC+1)=000000 000016
TIME PC MA SC FE AR MQ BR
IT0 037316 037316 0 0 243600037320 0 000000037320
IT1 037316 0 0 0 243600037320 0 000000037320
AT3 037316 0 0 0 000000037320 0 243600037320
AT6 037316 037320 0 0 000000037320 0 243600037320
FT1A 037316 037320 0 0 000000037320 0 000000037320
FT2 037316 037320 0 0 0 0 000000037320
FT2RQ 037316 037320 0 0 000010000000 0 000000037320
FT3 037316 037320 0 0 000010000000 0 000000037320
FT9 037317 037320 0 0 000010000000 0 000000037320
ST0 037320 037320 0 0 000000000016 0 000000037320
ST1 037320 037320 0 0 000000000016 0 000000037320
ST2 037320 037320 0 0 000000000016 0 000000037320
ST9 037320 037320 0 0 000000000016 0 000000037320
*037330 JFFO 14,037332
INITIAL
C(AC)=000004 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000004 000000 C(AC+1)=000000 000017
TIME PC MA SC FE AR MQ BR
IT0 037330 037330 0 0 243600037332 0 000000037332
IT1 037330 0 0 0 243600037332 0 000000037332
AT3 037330 0 0 0 000000037332 0 243600037332
AT6 037330 037332 0 0 000000037332 0 243600037332
FT1A 037330 037332 0 0 000000037332 0 000000037332
FT2 037330 037332 0 0 0 0 000000037332
FT2RQ 037330 037332 0 0 000004000000 0 000000037332
FT3 037330 037332 0 0 000004000000 0 000000037332
FT9 037331 037332 0 0 000004000000 0 000000037332
ST0 037332 037332 0 0 000000000017 0 000000037332
ST1 037332 037332 0 0 000000000017 0 000000037332
ST2 037332 037332 0 0 000000000017 0 000000037332
ST9 037332 037332 0 0 000000000017 0 000000037332
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 16
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0489
*037342 JFFO 14,037344
INITIAL
C(AC)=000002 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000002 000000 C(AC+1)=000000 000020
TIME PC MA SC FE AR MQ BR
IT0 037342 037342 0 0 243600037344 0 000000037344
IT1 037342 0 0 0 243600037344 0 000000037344
AT3 037342 0 0 0 000000037344 0 243600037344
AT6 037342 037344 0 0 000000037344 0 243600037344
FT1A 037342 037344 0 0 000000037344 0 000000037344
FT2 037342 037344 0 0 0 0 000000037344
FT2RQ 037342 037344 0 0 000002000000 0 000000037344
FT3 037342 037344 0 0 000002000000 0 000000037344
FT9 037343 037344 0 0 000002000000 0 000000037344
ST0 037344 037344 0 0 000000000020 0 000000037344
ST1 037344 037344 0 0 000000000020 0 000000037344
ST2 037344 037344 0 0 000000000020 0 000000037344
ST9 037344 037344 0 0 000000000020 0 000000037344
*037354 JFFO 14,037356
INITIAL
C(AC)=000001 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000001 000000 C(AC+1)=000000 000021
TIME PC MA SC FE AR MQ BR
IT0 037354 037354 0 0 243600037356 0 000000037356
IT1 037354 0 0 0 243600037356 0 000000037356
AT3 037354 0 0 0 000000037356 0 243600037356
AT6 037354 037356 0 0 000000037356 0 243600037356
FT1A 037354 037356 0 0 000000037356 0 000000037356
FT2 037354 037356 0 0 0 0 000000037356
FT2RQ 037354 037356 0 0 000001000000 0 000000037356
FT3 037354 037356 0 0 000001000000 0 000000037356
FT9 037355 037356 0 0 000001000000 0 000000037356
ST0 037356 037356 0 0 000000000021 0 000000037356
ST1 037356 037356 0 0 000000000021 0 000000037356
ST2 037356 037356 0 0 000000000021 0 000000037356
ST9 037356 037356 0 0 000000000021 0 000000037356
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 17
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0490
*037366 JFFO 14,037370
INITIAL
C(AC)=000000 400000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 400000 C(AC+1)=000000 000022
TIME PC MA SC FE AR MQ BR
IT0 037366 037366 0 0 243600037370 0 000000037370
IT1 037366 0 0 0 243600037370 0 000000037370
AT3 037366 0 0 0 000000037370 0 243600037370
AT6 037366 037370 0 0 000000037370 0 243600037370
FT1A 037366 037370 0 0 000000037370 0 000000037370
FT2 037366 037370 0 0 0 0 000000037370
FT2RQ 037366 037370 0 0 000000400000 0 000000037370
FT3 037366 037370 0 0 000000400000 0 000000037370
FT9 037367 037370 0 0 000000400000 0 000000037370
ST0 037370 037370 0 0 000000000022 0 000000037370
ST1 037370 037370 0 0 000000000022 0 000000037370
ST2 037370 037370 0 0 000000000022 0 000000037370
ST9 037370 037370 0 0 000000000022 0 000000037370
*037400 JFFO 14,037402
INITIAL
C(AC)=000000 200000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 200000 C(AC+1)=000000 000023
TIME PC MA SC FE AR MQ BR
IT0 0 0 0 0 243600037402 0 000000037402
IT1 0 0 0 0 243600037402 0 000000037402
AT3 0 0 0 0 000000037402 0 243600037402
AT6 0 037402 0 0 000000037402 0 243600037402
FT1A 0 037402 0 0 000000037402 0 000000037402
FT2 0 037402 0 0 0 0 000000037402
FT2RQ 0 037402 0 0 000000200000 0 000000037402
FT3 0 037402 0 0 000000200000 0 000000037402
FT9 037401 037402 0 0 000000200000 0 000000037402
ST0 037402 037402 0 0 000000000023 0 000000037402
ST1 037402 037402 0 0 000000000023 0 000000037402
ST2 037402 037402 0 0 000000000023 0 000000037402
ST9 037402 037402 0 0 000000000023 0 000000037402
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 18
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0491
*037412 JFFO 14,037414
INITIAL
C(AC)=000000 100000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 100000 C(AC+1)=000000 000024
TIME PC MA SC FE AR MQ BR
IT0 037412 037412 0 0 243600037414 0 000000037414
IT1 037412 0 0 0 243600037414 0 000000037414
AT3 037412 0 0 0 000000037414 0 243600037414
AT6 037412 037414 0 0 000000037414 0 243600037414
FT1A 037412 037414 0 0 000000037414 0 000000037414
FT2 037412 037414 0 0 0 0 000000037414
FT2RQ 037412 037414 0 0 000000100000 0 000000037414
FT3 037412 037414 0 0 000000100000 0 000000037414
FT9 037413 037414 0 0 000000100000 0 000000037414
ST0 037414 037414 0 0 000000000024 0 000000037414
ST1 037414 037414 0 0 000000000024 0 000000037414
ST2 037414 037414 0 0 000000000024 0 000000037414
ST9 037414 037414 0 0 000000000024 0 000000037414
*037424 JFFO 14,037426
INITIAL
C(AC)=000000 040000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 040000 C(AC+1)=000000 000025
TIME PC MA SC FE AR MQ BR
IT0 037424 037424 0 0 243600037426 0 000000037426
IT1 037424 0 0 0 243600037426 0 000000037426
AT3 037424 0 0 0 000000037426 0 243600037426
AT6 037424 037426 0 0 000000037426 0 243600037426
FT1A 037424 037426 0 0 000000037426 0 000000037426
FT2 037424 037426 0 0 0 0 000000037426
FT2RQ 037424 037426 0 0 000000040000 0 000000037426
FT3 037424 037426 0 0 000000040000 0 000000037426
FT9 037425 037426 0 0 000000040000 0 000000037426
ST0 037426 037426 0 0 000000000025 0 000000037426
ST1 037426 037426 0 0 000000000025 0 000000037426
ST2 037426 037426 0 0 000000000025 0 000000037426
ST9 037426 037426 0 0 000000000025 0 000000037426
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 19
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0492
*037436 JFFO 14,037440
INITIAL
C(AC)=000000 020000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 020000 C(AC+1)=000000 000026
TIME PC MA SC FE AR MQ BR
IT0 037436 037436 0 0 243600037440 0 000000037440
IT1 037436 0 0 0 243600037440 0 000000037440
AT3 037436 0 0 0 000000037440 0 243600037440
AT6 037436 037440 0 0 000000037440 0 243600037440
FT1A 037436 037440 0 0 000000037440 0 000000037440
FT2 037436 037440 0 0 0 0 000000037440
FT2RQ 037436 037440 0 0 000000020000 0 000000037440
FT3 037436 037440 0 0 000000020000 0 000000037440
FT9 037437 037440 0 0 000000020000 0 000000037440
ST0 037440 037440 0 0 000000000026 0 000000037440
ST1 037440 037440 0 0 000000000026 0 000000037440
ST2 037440 037440 0 0 000000000026 0 000000037440
ST9 037440 037440 0 0 000000000026 0 000000037440
*037450 JFFO 14,037452
INITIAL
C(AC)=000000 010000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 010000 C(AC+1)=000000 000027
TIME PC MA SC FE AR MQ BR
IT0 037450 037450 0 0 243600037452 0 000000037452
IT1 037450 0 0 0 243600037452 0 000000037452
AT3 037450 0 0 0 000000037452 0 243600037452
AT6 037450 037452 0 0 000000037452 0 243600037452
FT1A 037450 037452 0 0 000000037452 0 000000037452
FT2 037450 037452 0 0 0 0 000000037452
FT2RQ 037450 037452 0 0 000000010000 0 000000037452
FT3 037450 037452 0 0 000000010000 0 000000037452
FT9 037451 037452 0 0 000000010000 0 000000037452
ST0 037452 037452 0 0 000000000027 0 000000037452
ST1 037452 037452 0 0 000000000027 0 000000037452
ST2 037452 037452 0 0 000000000027 0 000000037452
ST9 037452 037452 0 0 000000000027 0 000000037452
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 20
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0493
*037462 JFFO 14,037464
INITIAL
C(AC)=000000 004000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 004000 C(AC+1)=000000 000030
TIME PC MA SC FE AR MQ BR
IT0 037462 037462 0 0 243600037464 0 000000037464
IT1 037462 0 0 0 243600037464 0 000000037464
AT3 037462 0 0 0 000000037464 0 243600037464
AT6 037462 037464 0 0 000000037464 0 243600037464
FT1A 037462 037464 0 0 000000037464 0 000000037464
FT2 037462 037464 0 0 0 0 000000037464
FT2RQ 037462 037464 0 0 000000004000 0 000000037464
FT3 037462 037464 0 0 000000004000 0 000000037464
FT9 037463 037464 0 0 000000004000 0 000000037464
ST0 037464 037464 0 0 000000000030 0 000000037464
ST1 037464 037464 0 0 000000000030 0 000000037464
ST2 037464 037464 0 0 000000000030 0 000000037464
ST9 037464 037464 0 0 000000000030 0 000000037464
*037474 JFFO 14,037476
INITIAL
C(AC)=000000 002000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 002000 C(AC+1)=000000 000031
TIME PC MA SC FE AR MQ BR
IT0 037474 037474 0 0 243600037476 0 000000037476
IT1 037474 0 0 0 243600037476 0 000000037476
AT3 037474 0 0 0 000000037476 0 243600037476
AT6 037474 037476 0 0 000000037476 0 243600037476
FT1A 037474 037476 0 0 000000037476 0 000000037476
FT2 037474 037476 0 0 0 0 000000037476
FT2RQ 037474 037476 0 0 000000002000 0 000000037476
FT3 037474 037476 0 0 000000002000 0 000000037476
FT9 037475 037476 0 0 000000002000 0 000000037476
ST0 037476 037476 0 0 000000000031 0 000000037476
ST1 037476 037476 0 0 000000000031 0 000000037476
ST2 037476 037476 0 0 000000000031 0 000000037476
ST9 037476 037476 0 0 000000000031 0 000000037476
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 21
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0494
*037506 JFFO 14,037510
INITIAL
C(AC)=000000 001000 C(AC+1)=777777 777777
FINAL
C(AC)=000000 001000 C(AC+1)=000000 000032
TIME PC MA SC FE AR MQ BR
IT0 037506 037506 0 0 243600037510 0 000000037510
IT1 037506 0 0 0 243600037510 0 000000037510
AT3 037506 0 0 0 000000037510 0 243600037510
AT6 037506 037510 0 0 000000037510 0 243600037510
FT1A 037506 037510 0 0 000000037510 0 000000037510
FT2 037506 037510 0 0 0 0 000000037510
FT2RQ 037506 037510 0 0 000000001000 0 000000037510
FT3 037506 037510 0 0 000000001000 0 000000037510
FT9 037507 037510 0 0 000000001000 0 000000037510
ST0 037510 037510 0 0 000000000032 0 000000037510
ST1 037510 037510 0 0 000000000032 0 000000037510
ST2 037510 037510 0 0 000000000032 0 000000037510
ST9 037510 037510 0 0 000000000032 0 000000037510
*037520 JFFO 14,037522
INITIAL
C(AC)=000000 000400 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000400 C(AC+1)=000000 000033
TIME PC MA SC FE AR MQ BR
IT0 037520 037520 0 0 243600037522 0 000000037522
IT1 037520 0 0 0 243600037522 0 000000037522
AT3 037520 0 0 0 000000037522 0 243600037522
AT6 037520 037522 0 0 000000037522 0 243600037522
FT1A 037520 037522 0 0 000000037522 0 000000037522
FT2 037520 037522 0 0 0 0 000000037522
FT2RQ 037520 037522 0 0 000000000400 0 000000037522
FT3 037520 037522 0 0 000000000400 0 000000037522
FT9 037521 037522 0 0 000000000400 0 000000037522
ST0 037522 037522 0 0 000000000033 0 000000037522
ST1 037522 037522 0 0 000000000033 0 000000037522
ST2 037522 037522 0 0 000000000033 0 000000037522
ST9 037522 037522 0 0 000000000033 0 000000037522
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 22
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0495
*037532 JFFO 14,037534
INITIAL
C(AC)=000000 000200 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000200 C(AC+1)=000000 000034
TIME PC MA SC FE AR MQ BR
IT0 037532 037532 0 0 243600037534 0 000000037534
IT1 037532 0 0 0 243600037534 0 000000037534
AT3 037532 0 0 0 000000037534 0 243600037534
AT6 037532 037534 0 0 000000037534 0 243600037534
FT1A 037532 037534 0 0 000000037534 0 000000037534
FT2 037532 037534 0 0 0 0 000000037534
FT2RQ 037532 037534 0 0 000000000200 0 000000037534
FT3 037532 037534 0 0 000000000200 0 000000037534
FT9 037533 037534 0 0 000000000200 0 000000037534
ST0 037534 037534 0 0 000000000034 0 000000037534
ST1 037534 037534 0 0 000000000034 0 000000037534
ST2 037534 037534 0 0 000000000034 0 000000037534
ST9 037534 037534 0 0 000000000034 0 000000037534
*037544 JFFO 14,037546
INITIAL
C(AC)=000000 000100 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000100 C(AC+1)=000000 000035
TIME PC MA SC FE AR MQ BR
IT0 037544 037544 0 0 243600037546 0 000000037546
IT1 037544 0 0 0 243600037546 0 000000037546
AT3 037544 0 0 0 000000037546 0 243600037546
AT6 037544 037546 0 0 000000037546 0 243600037546
FT1A 037544 037546 0 0 000000037546 0 000000037546
FT2 037544 037546 0 0 0 0 000000037546
FT2RQ 037544 037546 0 0 000000000100 0 000000037546
FT3 037544 037546 0 0 000000000100 0 000000037546
FT9 037545 037546 0 0 000000000100 0 000000037546
ST0 037546 037546 0 0 000000000035 0 000000037546
ST1 037546 037546 0 0 000000000035 0 000000037546
ST2 037546 037546 0 0 000000000035 0 000000037546
ST9 037546 037546 0 0 000000000035 0 000000037546
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 23
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0496
*037556 JFFO 14,037560
INITIAL
C(AC)=000000 000040 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000040 C(AC+1)=000000 000036
TIME PC MA SC FE AR MQ BR
IT0 037556 037556 0 0 243600037560 0 000000037560
IT1 037556 0 0 0 243600037560 0 000000037560
AT3 037556 0 0 0 000000037560 0 243600037560
AT6 037556 037560 0 0 000000037560 0 243600037560
FT1A 037556 037560 0 0 000000037560 0 000000037560
FT2 037556 037560 0 0 0 0 000000037560
FT2RQ 037556 037560 0 0 000000000040 0 000000037560
FT3 037556 037560 0 0 000000000040 0 000000037560
FT9 037557 037560 0 0 000000000040 0 000000037560
ST0 037560 037560 0 0 000000000036 0 000000037560
ST1 037560 037560 0 0 000000000036 0 000000037560
ST2 037560 037560 0 0 000000000036 0 000000037560
ST9 037560 037560 0 0 000000000036 0 000000037560
*037570 JFFO 14,037572
INITIAL
C(AC)=000000 000020 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000020 C(AC+1)=000000 000037
TIME PC MA SC FE AR MQ BR
IT0 037570 037570 0 0 243600037572 0 000000037572
IT1 037570 0 0 0 243600037572 0 000000037572
AT3 037570 0 0 0 000000037572 0 243600037572
AT6 037570 037572 0 0 000000037572 0 243600037572
FT1A 037570 037572 0 0 000000037572 0 000000037572
FT2 037570 037572 0 0 0 0 000000037572
FT2RQ 037570 037572 0 0 000000000020 0 000000037572
FT3 037570 037572 0 0 000000000020 0 000000037572
FT9 037571 037572 0 0 000000000020 0 000000037572
ST0 037572 037572 0 0 000000000037 0 000000037572
ST1 037572 037572 0 0 000000000037 0 000000037572
ST2 037572 037572 0 0 000000000037 0 000000037572
ST9 037572 037572 0 0 000000000037 0 000000037572
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 24
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0497
*037602 JFFO 14,037604
INITIAL
C(AC)=000000 000010 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000010 C(AC+1)=000000 000040
TIME PC MA SC FE AR MQ BR
IT0 037602 037602 0 0 243600037604 0 000000037604
IT1 037602 0 0 0 243600037604 0 000000037604
AT3 037602 0 0 0 000000037604 0 243600037604
AT6 037602 037604 0 0 000000037604 0 243600037604
FT1A 037602 037604 0 0 000000037604 0 000000037604
FT2 037602 037604 0 0 0 0 000000037604
FT2RQ 037602 037604 0 0 000000000010 0 000000037604
FT3 037602 037604 0 0 000000000010 0 000000037604
FT9 037603 037604 0 0 000000000010 0 000000037604
ST0 037604 037604 0 0 000000000040 0 000000037604
ST1 037604 037604 0 0 000000000040 0 000000037604
ST2 037604 037604 0 0 000000000040 0 000000037604
ST9 037604 037604 0 0 000000000040 0 000000037604
*037614 JFFO 14,037616
INITIAL
C(AC)=000000 000004 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000004 C(AC+1)=000000 000041
TIME PC MA SC FE AR MQ BR
IT0 037614 037614 0 0 243600037616 0 000000037616
IT1 037614 0 0 0 243600037616 0 000000037616
AT3 037614 0 0 0 000000037616 0 243600037616
AT6 037614 037616 0 0 000000037616 0 243600037616
FT1A 037614 037616 0 0 000000037616 0 000000037616
FT2 037614 037616 0 0 0 0 000000037616
FT2RQ 037614 037616 0 0 000000000004 0 000000037616
FT3 037614 037616 0 0 000000000004 0 000000037616
FT9 037615 037616 0 0 000000000004 0 000000037616
ST0 037616 037616 0 0 000000000041 0 000000037616
ST1 037616 037616 0 0 000000000041 0 000000037616
ST2 037616 037616 0 0 000000000041 0 000000037616
ST9 037616 037616 0 0 000000000041 0 000000037616
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 25
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0498
*037626 JFFO 14,037630
INITIAL
C(AC)=000000 000002 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000002 C(AC+1)=000000 000042
TIME PC MA SC FE AR MQ BR
IT0 037626 037626 0 0 243600037630 0 000000037630
IT1 037626 0 0 0 243600037630 0 000000037630
AT3 037626 0 0 0 000000037630 0 243600037630
AT6 037626 037630 0 0 000000037630 0 243600037630
FT1A 037626 037630 0 0 000000037630 0 000000037630
FT2 037626 037630 0 0 0 0 000000037630
FT2RQ 037626 037630 0 0 000000000002 0 000000037630
FT3 037626 037630 0 0 000000000002 0 000000037630
FT9 037627 037630 0 0 000000000002 0 000000037630
ST0 037630 037630 0 0 000000000042 0 000000037630
ST1 037630 037630 0 0 000000000042 0 000000037630
ST2 037630 037630 0 0 000000000042 0 000000037630
ST9 037630 037630 0 0 000000000042 0 000000037630
*037640 JFFO 14,037642
INITIAL
C(AC)=000000 000001 C(AC+1)=777777 777777
FINAL
C(AC)=000000 000001 C(AC+1)=000000 000043
TIME PC MA SC FE AR MQ BR
IT0 037640 037640 0 0 243600037642 0 000000037642
IT1 037640 0 0 0 243600037642 0 000000037642
AT3 037640 0 0 0 000000037642 0 243600037642
AT6 037640 037642 0 0 000000037642 0 243600037642
FT1A 037640 037642 0 0 000000037642 0 000000037642
FT2 037640 037642 0 0 0 0 000000037642
FT2RQ 037640 037642 0 0 000000000001 0 000000037642
FT3 037640 037642 0 0 000000000001 0 000000037642
FT9 037641 037642 0 0 000000000001 0 000000037642
ST0 037642 037642 0 0 000000000043 0 000000037642
ST1 037642 037642 0 0 000000000043 0 000000037642
ST2 037642 037642 0 0 000000000043 0 000000037642
ST9 037642 037642 0 0 000000000043 0 000000037642
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 26
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0499
*037656 JFFO 0,037660
INITIAL
C(AC)=400000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=400000 000000 C(AC+1)=000000 000000
TIME PC MA SC FE AR MQ BR
IT0 037656 037656 0 0 243000037660 0 000000037660
IT1 037656 0 0 0 243000037660 0 000000037660
AT3 037656 0 0 0 000000037660 0 243000037660
AT6 037656 037660 0 0 000000037660 0 243000037660
FT1A 037656 037660 0 0 000000037660 0 000000037660
FT2 037656 037660 0 0 0 0 000000037660
FT2RQ 037656 037660 0 0 400000000000 0 000000037660
FT3 037656 037660 0 0 400000000000 0 000000037660
FT9 037657 037660 0 0 400000000000 0 000000037660
ST0 037660 037660 0 0 0 0 000000037660
ST1 037660 037660 0 0 0 0 000000037660
ST2 037660 037660 0 0 0 0 000000037660
ST9 037660 037660 0 0 0 0 000000037660
*037674 JFFO 1,037676
INITIAL
C(AC)=200000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=200000 000000 C(AC+1)=000000 000001
TIME PC MA SC FE AR MQ BR
IT0 037674 037674 0 0 243040037676 0 000000037676
IT1 037674 0 0 0 243040037676 0 000000037676
AT3 037674 0 0 0 000000037676 0 243040037676
AT6 037674 037676 0 0 000000037676 0 243040037676
FT1A 037674 037676 0 0 000000037676 0 000000037676
FT2 037674 037676 0 0 0 0 000000037676
FT2RQ 037674 037676 0 0 200000000000 0 000000037676
FT3 037674 037676 0 0 200000000000 0 000000037676
FT9 037675 037676 0 0 200000000000 0 000000037676
ST0 037676 037676 0 0 000000000001 0 000000037676
ST1 037676 037676 0 0 000000000001 0 000000037676
ST2 037676 037676 0 0 000000000001 0 000000037676
ST9 037676 037676 0 0 000000000001 0 000000037676
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 27
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0500
*037712 JFFO 2,037714
INITIAL
C(AC)=100000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=100000 000000 C(AC+1)=000000 000002
TIME PC MA SC FE AR MQ BR
IT0 037712 037712 0 0 243100037714 0 000000037714
IT1 037712 0 0 0 243100037714 0 000000037714
AT3 037712 0 0 0 000000037714 0 243100037714
AT6 037712 037714 0 0 000000037714 0 243100037714
FT1A 037712 037714 0 0 000000037714 0 000000037714
FT2 037712 037714 0 0 0 0 000000037714
FT2RQ 037712 037714 0 0 100000000000 0 000000037714
FT3 037712 037714 0 0 100000000000 0 000000037714
FT9 037713 037714 0 0 100000000000 0 000000037714
ST0 037714 037714 0 0 000000000002 0 000000037714
ST1 037714 037714 0 0 000000000002 0 000000037714
ST2 037714 037714 0 0 000000000002 0 000000037714
ST9 037714 037714 0 0 000000000002 0 000000037714
*037730 JFFO 3,037732
INITIAL
C(AC)=040000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=040000 000000 C(AC+1)=000000 000003
TIME PC MA SC FE AR MQ BR
IT0 037730 037730 0 0 243140037732 0 000000037732
IT1 037730 0 0 0 243140037732 0 000000037732
AT3 037730 0 0 0 000000037732 0 243140037732
AT6 037730 037732 0 0 000000037732 0 243140037732
FT1A 037730 037732 0 0 000000037732 0 000000037732
FT2 037730 037732 0 0 0 0 000000037732
FT2RQ 037730 037732 0 0 040000000000 0 000000037732
FT3 037730 037732 0 0 040000000000 0 000000037732
FT9 037731 037732 0 0 040000000000 0 000000037732
ST0 037732 037732 0 0 000000000003 0 000000037732
ST1 037732 037732 0 0 000000000003 0 000000037732
ST2 037732 037732 0 0 000000000003 0 000000037732
ST9 037732 037732 0 0 000000000003 0 000000037732
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 28
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0501
*037746 JFFO 4,037750
INITIAL
C(AC)=020000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=020000 000000 C(AC+1)=000000 000004
TIME PC MA SC FE AR MQ BR
IT0 037746 037746 0 0 243200037750 0 000000037750
IT1 037746 0 0 0 243200037750 0 000000037750
AT3 037746 0 0 0 000000037750 0 243200037750
AT6 037746 037750 0 0 000000037750 0 243200037750
FT1A 037746 037750 0 0 000000037750 0 000000037750
FT2 037746 037750 0 0 0 0 000000037750
FT2RQ 037746 037750 0 0 020000000000 0 000000037750
FT3 037746 037750 0 0 020000000000 0 000000037750
FT9 037747 037750 0 0 020000000000 0 000000037750
ST0 037750 037750 0 0 000000000004 0 000000037750
ST1 037750 037750 0 0 000000000004 0 000000037750
ST2 037750 037750 0 0 000000000004 0 000000037750
ST9 037750 037750 0 0 000000000004 0 000000037750
*037764 JFFO 5,037766
INITIAL
C(AC)=010000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=010000 000000 C(AC+1)=000000 000005
TIME PC MA SC FE AR MQ BR
IT0 037764 037764 0 0 243240037766 0 000000037766
IT1 037764 0 0 0 243240037766 0 000000037766
AT3 037764 0 0 0 000000037766 0 243240037766
AT6 037764 037766 0 0 000000037766 0 243240037766
FT1A 037764 037766 0 0 000000037766 0 000000037766
FT2 037764 037766 0 0 0 0 000000037766
FT2RQ 037764 037766 0 0 010000000000 0 000000037766
FT3 037764 037766 0 0 010000000000 0 000000037766
FT9 037765 037766 0 0 010000000000 0 000000037766
ST0 037766 037766 0 0 000000000005 0 000000037766
ST1 037766 037766 0 0 000000000005 0 000000037766
ST2 037766 037766 0 0 000000000005 0 000000037766
ST9 037766 037766 0 0 000000000005 0 000000037766
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 29
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0502
*040002 JFFO 6,040004
INITIAL
C(AC)=004000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=004000 000000 C(AC+1)=000000 000006
TIME PC MA SC FE AR MQ BR
IT0 040002 040002 0 0 243300040004 0 000000040004
IT1 040002 0 0 0 243300040004 0 000000040004
AT3 040002 0 0 0 000000040004 0 243300040004
AT6 040002 040004 0 0 000000040004 0 243300040004
FT1A 040002 040004 0 0 000000040004 0 000000040004
FT2 040002 040004 0 0 0 0 000000040004
FT2RQ 040002 040004 0 0 004000000000 0 000000040004
FT3 040002 040004 0 0 004000000000 0 000000040004
FT9 040003 040004 0 0 004000000000 0 000000040004
ST0 040004 040004 0 0 000000000006 0 000000040004
ST1 040004 040004 0 0 000000000006 0 000000040004
ST2 040004 040004 0 0 000000000006 0 000000040004
ST9 040004 040004 0 0 000000000006 0 000000040004
*040020 JFFO 7,040022
INITIAL
C(AC)=002000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=002000 000000 C(AC+1)=000000 000007
TIME PC MA SC FE AR MQ BR
IT0 040020 040020 0 0 243340040022 0 000000040022
IT1 040020 0 0 0 243340040022 0 000000040022
AT3 040020 0 0 0 000000040022 0 243340040022
AT6 040020 040022 0 0 000000040022 0 243340040022
FT1A 040020 040022 0 0 000000040022 0 000000040022
FT2 040020 040022 0 0 0 0 000000040022
FT2RQ 040020 040022 0 0 002000000000 0 000000040022
FT3 040020 040022 0 0 002000000000 0 000000040022
FT9 040021 040022 0 0 002000000000 0 000000040022
ST0 040022 040022 0 0 000000000007 0 000000040022
ST1 040022 040022 0 0 000000000007 0 000000040022
ST2 040022 040022 0 0 000000000007 0 000000040022
ST9 040022 040022 0 0 000000000007 0 000000040022
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 30
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0503
*040036 JFFO 10,040040
INITIAL
C(AC)=001000 000000 C(AC+1)=777777 777777
FINAL
C(AC)=001000 000000 C(AC+1)=000000 000010
TIME PC MA SC FE AR MQ BR
IT0 040036 040036 0 0 243400040040 0 000000040040
IT1 040036 0 0 0 243400040040 0 000000040040
AT3 040036 0 0 0 000000040040 0 243400040040
AT6 040036 040040 0 0 000000040040 0 243400040040
FT1A 040036 040040 0 0 000000040040 0 000000040040
FT2 040036 040040 0 0 0 0 000000040040
FT2RQ 040036 040040 0 0 001000000000 0 000000040040
FT3 040036 040040 0 0 001000000000 0 000000040040
FT9 040037 040040 0 0 001000000000 0 000000040040
ST0 040040 040040 0 0 000000000010 0 000000040040
ST1 040040 040040 0 0 000000000010 0 000000040040
ST2 040040 040040 0 0 000000000010 0 000000040040
ST9 040040 040040 0 0 000000000010 0 000000040040
*040054 JFFO 11,040056
INITIAL
C(AC)=000400 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000400 000000 C(AC+1)=000000 000011
TIME PC MA SC FE AR MQ BR
IT0 040054 040054 0 0 243440040056 0 000000040056
IT1 040054 0 0 0 243440040056 0 000000040056
AT3 040054 0 0 0 000000040056 0 243440040056
AT6 040054 040056 0 0 000000040056 0 243440040056
FT1A 040054 040056 0 0 000000040056 0 000000040056
FT2 040054 040056 0 0 0 0 000000040056
FT2RQ 040054 040056 0 0 000400000000 0 000000040056
FT3 040054 040056 0 0 000400000000 0 000000040056
FT9 040055 040056 0 0 000400000000 0 000000040056
ST0 040056 040056 0 0 000000000011 0 000000040056
ST1 040056 040056 0 0 000000000011 0 000000040056
ST2 040056 040056 0 0 000000000011 0 000000040056
ST9 040056 040056 0 0 000000000011 0 000000040056
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 31
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0504
*040072 JFFO 12,040074
INITIAL
C(AC)=000200 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000200 000000 C(AC+1)=000000 000012
TIME PC MA SC FE AR MQ BR
IT0 040072 040072 0 0 243500040074 0 000000040074
IT1 040072 0 0 0 243500040074 0 000000040074
AT3 040072 0 0 0 000000040074 0 243500040074
AT6 040072 040074 0 0 000000040074 0 243500040074
FT1A 040072 040074 0 0 000000040074 0 000000040074
FT2 040072 040074 0 0 0 0 000000040074
FT2RQ 040072 040074 0 0 000200000000 0 000000040074
FT3 040072 040074 0 0 000200000000 0 000000040074
FT9 040073 040074 0 0 000200000000 0 000000040074
ST0 040074 040074 0 0 000000000012 0 000000040074
ST1 040074 040074 0 0 000000000012 0 000000040074
ST2 040074 040074 0 0 000000000012 0 000000040074
ST9 040074 040074 0 0 000000000012 0 000000040074
*040110 JFFO 13,040112
INITIAL
C(AC)=000100 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000100 000000 C(AC+1)=000000 000013
TIME PC MA SC FE AR MQ BR
IT0 040110 040110 0 0 243540040112 0 000000040112
IT1 040110 0 0 0 243540040112 0 000000040112
AT3 040110 0 0 0 000000040112 0 243540040112
AT6 040110 040112 0 0 000000040112 0 243540040112
FT1A 040110 040112 0 0 000000040112 0 000000040112
FT2 040110 040112 0 0 0 0 000000040112
FT2RQ 040110 040112 0 0 000100000000 0 000000040112
FT3 040110 040112 0 0 000100000000 0 000000040112
FT9 040111 040112 0 0 000100000000 0 000000040112
ST0 040112 040112 0 0 000000000013 0 000000040112
ST1 040112 040112 0 0 000000000013 0 000000040112
ST2 040112 040112 0 0 000000000013 0 000000040112
ST9 040112 040112 0 0 000000000013 0 000000040112
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KASIM VER 0.2 20-JAN-77 PAGE 32
DAKAM 000000 000000 777000 000000 243000 000000 030000 777777 SEQ 0505
*040126 JFFO 14,040130
INITIAL
C(AC)=000040 000000 C(AC+1)=777777 777777
FINAL
C(AC)=000040 000000 C(AC+1)=000000 000014
TIME PC MA SC FE AR MQ BR
IT0 040126 040126 0 0 243600040130 0 000000040130
IT1 040126 0 0 0 243600040130 0 000000040130
AT3 040126 0 0 0 000000040130 0 243600040130
AT6 040126 040130 0 0 000000040130 0 243600040130
FT1A 040126 040130 0 0 000000040130 0 000000040130
FT2 040126 040130 0 0 0 0 000000040130
FT2RQ 040126 040130 0 0 000040000000 0 000000040130
FT3 040126 040130 0 0 000040000000 0 000000040130
FT9 040127 040130 0 0 000040000000 0 000000040130
ST0 040130 040130 0 0 000000000014 0 000000040130
ST1 040130 040130 0 0 000000000014 0 000000040130
ST2 040130 040130 0 0 000000000014 0 000000040130
ST9 040130 040130 0 0 000000000014 0 000000040130